◄ Catapult System ►

Por sejameuamigo

março 26, 2011 em Actions e Talkactions

sejameuamigo

Campones

INFOS

Grupo: Campones

Registrado: 13/06/10

Posts: 27

Char no Tibia: Sexoebom

Postado em março 26, 2011

Nome: Catapult

Versão Testada: 8.54

Server Usado: [8.54~8.57] Alissow Ots 4.0

Descrição: Você cria uma catapulta (ids: 5598, 5599, 5600, 5601) e, você escolhe uma parte (ou mais de uma) para por o unique ID de 1121 (ou outro). Ao dar use na parte com UID 1121, vai ser lançado um projétil, hitando o que tiver no caminho dele. No final o projétil cai no chão.

Code:

catapult.lua:

function onUse(cid, item, fromPosition, itemEx, toPosition)
local combate = COMBAT_PHYSICALDAMAGE -- tipo de dano

p = fromPosition

local a0 = {x=p.x, y=p.y-1, z=p.z}

local a1 = {x=p.x, y=p.y-2, z=p.z}

local a2 = {x=p.x, y=p.y-3, z=p.z}

local a3 = {x=p.x, y=p.y-4, z=p.z}

local a4 = {x=p.x, y=p.y-5, z=p.z}

local end1 = {x=p.x, y=p.y-6, z=p.z}

local storage = 3425 -- Não mecha aqui

local MIN_DAMAGE = 100 -- dano minimo

local MAX_DAMAGE = 500 -- dano maximo

local level = 50 -- level necessario

local UID = 1121 -- unique id do item

if getPlayerStorageValue(cid,storage) == 1 then

doPlayerSendCancel(cid,"You are exhausted.")

end

if getPlayerLevel(cid) < level then

doPlayerSendCancel(cid,"You must be level "..level..".")

end

if getPlayerLevel(cid) >= level and item.uid == UID and getPlayerStorageValue(cid,storage) == -1 then

setPlayerStorageValue(cid,storage,1)

addEvent(setPlayerStorageValue,5000,cid,storage,-1)

addEvent(doSendDistanceShoot,100,fromPosition, a4, 1)

addEvent(doAreaCombatHealth,100,a0, combate, a0, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)

addEvent(doAreaCombatHealth,200,a1, combate, a1, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)

addEvent(doAreaCombatHealth,300,a2, combate, a2, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)

addEvent(doAreaCombatHealth,400,a3, combate, a3, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)

addEvent(doAreaCombatHealth,500,a4, combate, a4, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)

addEvent(doCreateItem,600,2544,1,end1)

addEvent(doSendMagicEffect,600,end1,3)

end

return TRUE

end

actions.xml:

<action uniqueid="1121" script="catapult.lua" allowfaruse="1"/>

UID do item

Gostou? Rep+

Não Gostou? Rep+

Piso que bloqueia jogadores

Item que teleporta o jogador para sua cidade natal

Woodcutting

Item que clona mostros

Morra e ganhe 'x' item

Tibizeiro

O microfone pra mim é tudo

Campones

INFOS

Grupo: Campones

Registrado: 07/01/09

Posts: 51

Postado em março 29, 2011

da pra por no andar no andar 6 e ela tira dano no 7?

_ferrari_

Barão

INFOS

Grupo: Barão

Registrado: 27/12/06

Posts: 202

Postado em março 30, 2011

/\ é uma boa idéia, tente colocar mais opções para edição.

Também mude o Unique ID por Action ID, pois o Action pode ser usado mais de uma vez. abraço :smile_positivo:

Objetivos:
50 posts [x]
100 posts[x]
200 posts[x]
500 posts[x]
"Um post em um fórum deve como uma saia. Longa o suficiente para cobrir o assunto, porém curta o suficiente para manter as coisas interessantes"
Gosta de mim? Foi com minha cara? Quer me matar? Use:

LookAssassin

Campones

INFOS

Grupo: Campones

Registrado: 01/01/11

Posts: 6

Char no Tibia: Look Assassin

Postado em maio 03, 2011

a ideia do andar 6 i para o 7 e boa ^^ eu apoio

Ajudei Então Agradeça nao custa Cash,Gold, nem mouse!

Fiz Um Pedido Certo ? Da Um Rep + ai

Não Fiz nenhuma besteira ate agora da um Rep +

paulgrande

Perceba que você é sua própria criação Você é seu próprio mestre

Artesão

INFOS

Grupo: Artesão

Registrado: 09/12/10

Posts: 138

Char no Tibia: Loh Pabllitooh

Postado em maio 03, 2011

poe videos do sistema

coming soon

"Sozinho eu sou agora o meu inimigo intimo.
Lembranças más vem, pensamentos bons vai,
Me ajude, sozinho penso merda pra caralho.
Gente que acredito, gosto e admiro,
Brigava por justiça e paz levou tiro:
Malcom X, Ghandi, Lennon, Marvin Gaye,
Che Guevara, 2Pac, Bob Marley e
O evangélico Martin Luther King.
Lembrei de um truta meu falar assim:
- Não joga pérolas aos porcos irmão,
Joga lavagem eles prefere assim.

gonorreiaswat

I'm AdrianøØ SwaTT

Conde

INFOS

Grupo: Conde

Registrado: 16/09/07

Posts: 600

Gênero: Masculino

Char no Tibia: NãoJogoMais

Postado em julho 08, 2011

Vou usar no meu OTServ

Assim que testá-lo e funcionar, eu dou REP+

Valeu aee...abraços

Atenciosamente,
Adriano Swatt'

Eskylo

boa sorte

Visconde

INFOS

Grupo: Visconde

Registrado: 11/08/10

Posts: 477

Gênero: Masculino

Postado em julho 08, 2011

Gostei bastante da idéia e parabéns pelo desenvolvimento do script.

Acho que um loop, como for iria bem no script, procure tutoriais sobre.

Vocês que falaram acima, se quiserem fazer damage no andar de cima, em vez do andar da catapulta é só alterar

local a0 = {x=p.x, y=p.y-1, z=p.z}
local a1 = {x=p.x, y=p.y-2, z=p.z}
local a2 = {x=p.x, y=p.y-3, z=p.z}
local a3 = {x=p.x, y=p.y-4, z=p.z}
local a4 = {x=p.x, y=p.y-5, z=p.z}
local end1 = {x=p.x, y=p.y-6, z=p.z}

por

local a0 = {x=p.x, y=p.y-1, z=p.z+1}
local a1 = {x=p.x, y=p.y-2, z=p.z+1}
local a2 = {x=p.x, y=p.y-3, z=p.z+1}
local a3 = {x=p.x, y=p.y-4, z=p.z+1}
local a4 = {x=p.x, y=p.y-5, z=p.z+1}
local end1 = {x=p.x, y=p.y-6, z=p.z+1}

Agora se quizerem tanto no de cima quanto no de baixo, terão que adicionar umas linhas no script.

Atenciosamente, Eskylo

gonorreiaswat

I'm AdrianøØ SwaTT

Conde

INFOS

Grupo: Conde

Registrado: 16/09/07

Posts: 600

Gênero: Masculino

Char no Tibia: NãoJogoMais

Postado em julho 08, 2011

Ficaria ainda melhor o Script se colocasse pra EXP dos monstros que morrerem for para o Player que atirou com a Catapulta.

Se alguém fizer ae... ajudaria pakas!

Abraços

Atenciosamente,
Adriano Swatt'

Eskylo

boa sorte

Visconde

INFOS

Grupo: Visconde

Registrado: 11/08/10

Posts: 477

Gênero: Masculino

Postado em julho 08, 2011

Ficaria ainda melhor o Script se colocasse pra EXP dos monstros que morrerem for para o Player que atirou com a Catapulta.

Se alguém fizer ae... ajudaria pakas!

Abraços

Simples!

Aqui onde tem esses addEvent você tem que trocar para cid, em um lugar aqui, ficando assim:

addEvent(doAreaCombatHealth,100,cid, combate, a0, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)
addEvent(doAreaCombatHealth,200,cid, combate, a1, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)
addEvent(doAreaCombatHealth,300,cid, combate, a2, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)
addEvent(doAreaCombatHealth,400,cid, combate, a3, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)
addEvent(doAreaCombatHealth,500,cid, combate, a4, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)

Atenciosamente, Eskylo

gonorreiaswat

I'm AdrianøØ SwaTT

Conde

INFOS

Grupo: Conde

Registrado: 16/09/07

Posts: 600

Gênero: Masculino

Char no Tibia: NãoJogoMais

Postado em julho 08, 2011

Ficaria ainda melhor o Script se colocasse pra EXP dos monstros que morrerem for para o Player que atirou com a Catapulta.

Se alguém fizer ae... ajudaria pakas!

Abraços

Simples!

Aqui onde tem esses addEvent você tem que trocar para cid, em um lugar aqui, ficando assim:
addEvent(doAreaCombatHealth,100,cid, combate, a0, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)
addEvent(doAreaCombatHealth,200,cid, combate, a1, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)
addEvent(doAreaCombatHealth,300,cid, combate, a2, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)
addEvent(doAreaCombatHealth,400,cid, combate, a3, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)
addEvent(doAreaCombatHealth,500,cid, combate, a4, 0, -MIN_DAMAGE, -MAX_DAMAGE, 2)