[Talkaction]Sistema M1 até M6 + Tutorial de Edições.
Créditos:
Apocarai
PeeWee
Olá, antes eu já havia postado o sistema até m3, agora venho traze-lo até m6.
Do m4 até m6 decidir fazer diferente, dessa vez quem irá colocar as magias , combat e level necessário será vocês.
Estou fazendo isso para que vocês entendam melhor o comando, e caso precisarem editar que não precisem e ajuda.
No final do Tópico estará os tutoriais.
M1
-----------------NORMAL Quick Attack------------------------------
local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 111)
setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
---------------- Wirlwind -------------------------------
local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 42)
setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
arr2 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 3, 0, 3, 0, 3, 0, 0, 0},
{0, 0, 0, 3, 0, 3, 0, 3, 0, 0, 0},
{0, 0, 0, 0, 3, 3, 3, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local area2 = createCombatArea(arr2)
setCombatArea(combat2, area2)
----------------------------normal Scratch -------------------------
local combat3 = createCombatObject()
setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat3, COMBAT_PARAM_EFFECT, 142)
setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
--------------------------- Dragon Claw-----------------------------
local combat4 = createCombatObject()
setCombatParam(combat4, COMBAT_PARAM_EFFECT, 141)
setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
-------------------------- HeadButt -----------------------------
local combat5 = createCombatObject()
setCombatParam(combat5, COMBAT_PARAM_EFFECT, 16)
setCombatParam(combat5, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat5, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
-------------------------- String Shot -----------------------------
local combat6 = createCombatObject()
setCombatParam(combat6, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat6, COMBAT_PARAM_EFFECT, 137)
setCombatParam(combat6, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat6, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
------------------------- Horn Attack ------------------------------
local combat7 = createCombatObject()
setCombatParam(combat7, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat7, COMBAT_PARAM_EFFECT, 59)
setCombatParam(combat7, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat7, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
--------------------------- Bite ------------------------------
local combat8 = createCombatObject()
setCombatParam(combat8, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat8, COMBAT_PARAM_EFFECT, 138)
setCombatParam(combat8, COMBAT_PARAM_DISTANCEEFFECT, 138)
setCombatFormula(combat8, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
-------------------------- Mega Kick --------------------------
local combat9 = createCombatObject()
setCombatParam(combat9, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat9, COMBAT_PARAM_EFFECT, 112)
setCombatFormula(combat9, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
-------------------------- Razor Leaf -----------------------
local combat10 = createCombatObject()
setCombatParam(combat10, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat10, COMBAT_PARAM_EFFECT, 79)
setCombatParam(combat10, COMBAT_PARAM_DISTANCEEFFECT, 5)
setCombatFormula(combat10, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
------------------------- Bubbles----------------------------
local combat11 = createCombatObject()
setCombatParam(combat11, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat11, COMBAT_PARAM_EFFECT, 68)
setCombatParam(combat11, COMBAT_PARAM_DISTANCEEFFECT, 2)
setCombatFormula(combat11, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
------------------------ String Shot ------------------------
local combat12 = createCombatObject()
setCombatParam(combat12, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat12, COMBAT_PARAM_EFFECT, 137)
setCombatParam(combat12, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat12, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
------------------------ Horn Attack -----------------------
local combat13 = createCombatObject()
setCombatParam(combat13, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat13, COMBAT_PARAM_EFFECT, 9)
setCombatParam(combat13, COMBAT_PARAM_DISTANCEEFFECT, 25)
setCombatFormula(combat13, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
------------------------ Super Sonic -----------------------
local combat14 = createCombatObject()
setCombatParam(combat14, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat14, COMBAT_PARAM_EFFECT, 22)
setCombatParam(combat14, COMBAT_PARAM_DISTANCEEFFECT, 24)
setCombatFormula(combat14, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
----------------------- Sand Attack -----------------------
local combat15 = createCombatObject()
setCombatParam(combat15, COMBAT_PARAM_EFFECT, 122)
setCombatParam(combat15, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat15, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
arr15 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local area15 = createCombatArea(arr15)
setCombatArea(combat15, area15)
local c = {
["Bulbasaur"] = {x = {
m1 = combat1,
spell = "Quick Attack",
minLv = 20,
distance = 3
}
},
["Ivysaur"] = {x = {
m1 = combat1,
spell = "Quick Attack",
minLv = 40,
distance = 3
}
},
["Venusaur"] = {x = {
m1 = combat1,
spell = "Quick Attack",
minLv = 85,
distance = 3
}
},
["Charmander"] = {x = {
m1 = combat3,
spell = "Scratch",
minLv = 20,
distance = 3
}
},
["Charmeleon"] = {x = {
m1 = combat3,
spell = "Scratch",
minLv = 40,
distance = 3
}
},
["Charizard"] = {x = {
m1 = combat4,
spell = "Dragon Claw",
minLv = 85,
distance = 3
}
},
["Squirtle"] = {x = {
m1 = combat1,
spell = "Headbutt",
minLv = 20,
distance = 3
}
},
["Wartortle"] = {x = {
m1 = combat1,
spell = "Headbutt",
minLv = 40,
distance = 3
}
},
["Blastoise"] = {x = {
m1 = combat1,
spell = "Headbutt",
minLv = 85,
distance = 3
}
},
["Caterpie"] = {x = {
m1 = combat1,
spell = "Headbutt",
minLv = 1,
distance = 3
}
},
["Metapod"] = {x = {
m1 = combat12,
spell = "String Shot",
minLv = 15,
distance = 3
}
},
["Butterfree"] = {x = {
m1 = combat12,
spell = "String Shot",
minLv = 30,
distance = 3
}
},
["Weedle"] = {x = {
m1 = combat7,
spell = "Horn Attack",
minLv = 1,
distance = 3
}
},
["Kakuna"] = {x = {
m1 = combat12,
spell = "String Shot",
minLv = 15,
distance = 3
}
},
["Beedrill"] = {x = {
m1 = combat12,
spell = "String Shot",
minLv = 25,
distance = 3
}
},
["Pidgey"] = {x = {
m1 = combat1,
spell = "Quick Attack",
minLv = 1,
distance = 3
}
},
["Pidgeotto"] = {x = {
m1 = combat1,
spell = "Quick Attack",
minLv = 20,
distance = 3
}
},
["Pidgeot"] = {x = {
m1 = combat1,
spell = "Quick Attack",
minLv = 65,
distance = 3
}
},
["Rattata"] = {x = {
m1 = combat1,
spell = "Quick Attack",
minLv = 1,
distance = 3
}
},
["Raticate"] = {x = {
m1 = combat1,
spell = "Quick Attack",
minLv = 25,
distance = 3
}
},
["Spearow"] = {x = {
m1 = combat1,
spell = "Quick Attack",
minLv = 10,
distance = 3
}
},
["Fearow"] = {x = {
m1 = combat1,
spell = "Quick Attack",
minLv = 50,
distance = 3
}
},
["Ekans"] = {x = {
m1 = combat8,
spell = "Bite",
minLv = 15,
distance = 3
}
},
["Arbok"] = {x = {
m1 = combat8,
spell = "Bite",
minLv = 35,
distance = 3
}
},
["Pikachu"] = {x = {
m1 = combat1,
spell = "Quick Attack",
minLv = 20,
distance = 3
}
},
["Raichu"] = {x = {
m1 = combat9,
spell = "Mega Kick",
minLv = 50,
distance = 3
}
},
["Sandshrew"] = {x = {
m1 = combat15,
spell = "Sand Attack",
minLv = 20,
distance = 3
}
},
["Sandslash"] = {x = {
m1 = combat15,
spell = "Sand Attack",
minLv = 55,
distance = 3
}
}
}
function onSay(cid, var)
local summ = getCreatureSummons(cid)
if #summ == 0 then
return doPlayerSendCancel(cid, "Sorry, but you need a pokemon.")
end
for i = 1, #summ do
for name, _ in pairs(c) do
if getCreatureName(summ[i]):lower() == name:lower() then
local con = c[name].x
if getPlayerLevel(cid) < con.minLv then
return doPlayerSendCancel(cid, "Sorry, but you must be level " .. con.minLv .. " or higher to cast.") and doSendMagicEffect(getThingPos(cid), 2)
end
local distance = (not con.distance) and 1 or con.distance
if not isCreature(getCreatureTarget(cid)) or getCreatureTarget(cid) == summ[i] then
return doPlayerSendCancel(cid, "Invalid target.") and doSendMagicEffect(getThingPos(cid), 2)
end
if getDistanceBetween(getThingPos(summ[i]), getThingPos(getCreatureTarget(cid))) > distance then
return doPlayerSendCancel(cid, "Sorry, your pokemon is too far away.") and doSendMagicEffect(getThingPos(cid), 2)
end
if getPlayerStorageValue(cid, 20000) <= os.time() then
doPlayerSetStorageValue(cid, 20000, os.time()+5)
doCombat(summ[i], con.m1, numberToVariant(getCreatureTarget(cid)))
doCreatureSay(cid, name .. ", " .. con.spell .. ".")
end
doPlayerSendTextMessage(cid,26,"Tempo para usar M1 denovo: "..(getPlayerStorageValue(cid, 23000)-os.time()).." sec.")
doSendMagicEffect(getThingPos(cid), 2)
end
end
end
return true
end
M2
local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 111)
setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 42)
setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
arr2 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 3, 0, 3, 0, 3, 0, 0, 0},
{0, 0, 0, 3, 0, 3, 0, 3, 0, 0, 0},
{0, 0, 0, 0, 3, 3, 3, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local area2 = createCombatArea(arr2)
setCombatArea(combat2, area2)
local combat3 = createCombatObject()
setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat3, COMBAT_PARAM_EFFECT, 142)
setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
local combat4 = createCombatObject()
setCombatParam(combat4, COMBAT_PARAM_EFFECT, 141)
setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
local combat5 = createCombatObject()
setCombatParam(combat5, COMBAT_PARAM_EFFECT, 16)
setCombatParam(combat5, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat5, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
local combat6 = createCombatObject()
setCombatParam(combat6, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat6, COMBAT_PARAM_EFFECT, 137)
setCombatParam(combat6, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat6, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
local combat7 = createCombatObject()
setCombatParam(combat7, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat7, COMBAT_PARAM_EFFECT, 59)
setCombatParam(combat7, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat7, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
local combat8 = createCombatObject()
setCombatParam(combat8, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat8, COMBAT_PARAM_EFFECT, 138)
setCombatParam(combat8, COMBAT_PARAM_DISTANCEEFFECT, 138)
setCombatFormula(combat8, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
local combat9 = createCombatObject()
setCombatParam(combat9, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat9, COMBAT_PARAM_EFFECT, 112)
setCombatFormula(combat9, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
local combat10 = createCombatObject()
setCombatParam(combat10, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat10, COMBAT_PARAM_EFFECT, 79)
setCombatParam(combat10, COMBAT_PARAM_DISTANCEEFFECT, 5)
setCombatFormula(combat10, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
local combat11 = createCombatObject()
setCombatParam(combat11, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat11, COMBAT_PARAM_EFFECT, 68)
setCombatParam(combat11, COMBAT_PARAM_DISTANCEEFFECT, 2)
setCombatFormula(combat11, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
local combat12 = createCombatObject()
setCombatParam(combat12, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat12, COMBAT_PARAM_EFFECT, 137)
setCombatParam(combat12, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat12, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
local combat13 = createCombatObject()
setCombatParam(combat13, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat13, COMBAT_PARAM_EFFECT, 9)
setCombatParam(combat13, COMBAT_PARAM_DISTANCEEFFECT, 25)
setCombatFormula(combat13, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
local combat14 = createCombatObject()
setCombatParam(combat14, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat14, COMBAT_PARAM_EFFECT, 22)
setCombatParam(combat14, COMBAT_PARAM_DISTANCEEFFECT, 24)
setCombatFormula(combat14, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
local combat15 = createCombatObject()
setCombatParam(combat15, COMBAT_PARAM_EFFECT, 122)
setCombatParam(combat15, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat15, COMBAT_FORMULA_LEVELMAGIC, -6.3, 0, -5.5, 0)
arr15 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local area15 = createCombatArea(arr15)
setCombatArea(combat15, area15)
local c = {
["Bulbasaur"] = {x = {
m2 = combat10,
spell = "Razor Leaf",
minLv = 20,
distance = 3
}
},
["Ivysaur"] = {x = {
m2 = combat10,
spell = "Razor Leaf",
minLv = 40,
distance = 3
}
},
["Venusaur"] = {x = {
m2 = combat10,
spell = "Razor Leaf",
minLv = 85,
distance = 3
}
},
["Charmander"] = {x = {
m2 = combat4,
spell = "Ember",
minLv = 20,
distance = 3
}
},
["Charmeleon"] = {x = {
m2 = combat4,
spell = "Ember",
minLv = 40,
distance = 3
}
},
["Charizard"] = {x = {
m2 = combat4,
spell = "Ember",
minLv = 85,
distance = 3
}
},
["Squirtle"] = {x = {
m2 = combat1,
spell = "Bubbles",
minLv = 20,
distance = 3
}
},
["Wartortle"] = {x = {
m2 = combat1,
spell = "Bubbles",
minLv = 40,
distance = 3
}
},
["Blastoise"] = {x = {
m2 = combat1,
spell = "Bubbles",
minLv = 85,
distance = 3
}
},
["Caterpie"] = {x = {
m2 = combat6,
spell = "String Shot",
minLv = 1,
distance = 3
}
},
["Metapod"] = {x = {
m2 = combat5,
spell = "Headbutt",
minLv = 15,
distance = 3
}
},
["Butterfree"] = {x = {
m2 = combat14,
spell = "Super Sonic",
minLv = 30,
distance = 3
}
},
["Weedle"] = {x = {
m2 = combat6,
spell = "String Shot",
minLv = 1,
distance = 3
}
},
["Kakuna"] = {x = {
m2 = combat5,
spell = "Headbutt",
minLv = 15,
distance = 3
}
},
["Beedrill"] = {x = {
m2 = combat5,
spell = "Poison Sting",
minLv = 25,
distance = 3
}
},
["Pidgey"] = {x = {
m2 = combat15,
spell = "Sand Attack",
minLv = 1,
distance = 3
}
},
["Pidgeotto"] = {x = {
m2 = combat15,
spell = "Sand Attack",
minLv = 20,
distance = 3
}
},
["Pidgeot"] = {x = {
m2 = combat15,
spell = "Sand Attack",
minLv = 65,
distance = 3
}
},
["Rattata"] = {x = {
m2 = combat8,
spell = "Bite",
minLv = 1,
distance = 3
}
},
["Raticate"] = {x = {
m2 = combat8,
spell = "Bite",
minLv = 25,
distance = 3
}
},
["Spearow"] = {x = {
m2 = combat15,
spell = "Sand Attack",
minLv = 10,
distance = 3
}
},
["Fearow"] = {x = {
m2 = combat15,
spell = "Sand Attack",
minLv = 50,
distance = 3
}
},
["Ekans"] = {x = {
m2 = combat5,
spell = "Poison Fang",
minLv = 15,
distance = 3
}
},
["Arbok"] = {x = {
m2 = combat5,
spell = "Poison Fang",
minLv = 35,
distance = 3
}
},
["Pikachu"] = {x = {
m2 = combat9,
spell = "Thunder Shock",
minLv = 20,
distance = 3
}
},
["Raichu"] = {x = {
m2 = combat9,
spell = "Thunder Shock",
minLv = 50,
distance = 3
}
},
["Sandshrew"] = {x = {
m2 = combat15,
spell = "Mud Shot",
minLv = 20,
distance = 3
}
},
["Sandslash"] = {x = {
m2 = combat15,
spell = "Mud Shot",
minLv = 55,
distance = 3
}
}
}
function onSay(cid, var)
local summ = getCreatureSummons(cid)
if #summ == 0 then
return doPlayerSendCancel(cid, "Sorry, but you need a pokemon.")
end
for j = 1, #summ do
for name, _ in pairs(c) do
if getCreatureName(summ[j]):lower() == name:lower() then
local con = c[name].x
if getPlayerLevel(cid) < con.minLv then
return doPlayerSendCancel(cid, "Sorry, but you must be level " .. con.minLv .. " or higher to cast.") and doSendMagicEffect(getThingPos(cid), 2)
end
local distance = (not con.distance) and 1 or con.distance
if not isCreature(getCreatureTarget(cid)) or getCreatureTarget(cid) == summ[j] then
return doPlayerSendCancel(cid, "Invalid target.") and doSendMagicEffect(getThingPos(cid), 2)
end
if getDistanceBetween(getThingPos(summ[j]), getThingPos(getCreatureTarget(cid))) > distance then
return doPlayerSendCancel(cid, "Sorry, your pokemon is too far away.") and doSendMagicEffect(getThingPos(cid), 2)
end
if getPlayerStorageValue(cid, 21000) <= os.time() then
doPlayerSetStorageValue(cid, 21000, os.time()+5)
doCombat(summ[j], con.m2, numberToVariant(getCreatureTarget(cid)))
doCreatureSay(cid, name .. ", " .. con.spell .. ".")
end
doPlayerSendTextMessage(cid,26,"Tempo para usar M2 denovo: "..(getPlayerStorageValue(cid, 23000)-os.time()).." sec.")
doSendMagicEffect(getThingPos(cid), 2)
end
end
end
return true
end
M3
local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 111)
setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 42)
setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
arr2 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 3, 0, 3, 0, 3, 0, 0, 0},
{0, 0, 0, 3, 0, 3, 0, 3, 0, 0, 0},
{0, 0, 0, 0, 3, 3, 3, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local area2 = createCombatArea(arr2)
setCombatArea(combat2, area2)
local combat3 = createCombatObject()
setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat3, COMBAT_PARAM_EFFECT, 142)
setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
local combat4 = createCombatObject()
setCombatParam(combat4, COMBAT_PARAM_EFFECT, 141)
setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
local combat5 = createCombatObject()
setCombatParam(combat5, COMBAT_PARAM_EFFECT, 16)
setCombatParam(combat5, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat5, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
local combat6 = createCombatObject()
setCombatParam(combat6, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat6, COMBAT_PARAM_EFFECT, 137)
setCombatParam(combat6, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat6, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
local combat7 = createCombatObject()
setCombatParam(combat7, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat7, COMBAT_PARAM_EFFECT, 59)
setCombatParam(combat7, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat7, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
local combat8 = createCombatObject()
setCombatParam(combat8, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat8, COMBAT_PARAM_EFFECT, 138)
setCombatParam(combat8, COMBAT_PARAM_DISTANCEEFFECT, 138)
setCombatFormula(combat8, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
local combat9 = createCombatObject()
setCombatParam(combat9, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat9, COMBAT_PARAM_EFFECT, 112)
setCombatFormula(combat9, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
local combat10 = createCombatObject()
setCombatParam(combat10, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat10, COMBAT_PARAM_EFFECT, 79)
setCombatParam(combat10, COMBAT_PARAM_DISTANCEEFFECT, 5)
setCombatFormula(combat10, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
local combat11 = createCombatObject()
setCombatParam(combat11, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat11, COMBAT_PARAM_EFFECT, 68)
setCombatParam(combat11, COMBAT_PARAM_DISTANCEEFFECT, 2)
setCombatFormula(combat11, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
local combat12 = createCombatObject()
setCombatParam(combat12, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat12, COMBAT_PARAM_EFFECT, 137)
setCombatParam(combat12, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat12, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
local combat13 = createCombatObject()
setCombatParam(combat13, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat13, COMBAT_PARAM_EFFECT, 9)
setCombatParam(combat13, COMBAT_PARAM_DISTANCEEFFECT, 25)
setCombatFormula(combat13, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
local combat14 = createCombatObject()
setCombatParam(combat14, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat14, COMBAT_PARAM_EFFECT, 22)
setCombatParam(combat14, COMBAT_PARAM_DISTANCEEFFECT, 24)
setCombatFormula(combat14, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
local combat15 = createCombatObject()
setCombatParam(combat15, COMBAT_PARAM_EFFECT, 122)
setCombatParam(combat15, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat15, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
arr15 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local area15 = createCombatArea(arr15)
setCombatArea(combat15, area15)
local c = {
["Bulbasaur"] = {x = {
m3 = combat10,
spell = "Vine Whip",
minLv = 20,
distance = 3
}
},
["Ivysaur"] = {x = {
m3 = combat10,
spell = "Vine Whip",
minLv = 40,
distance = 3
}
},
["Venusaur"] = {x = {
m3 = combat10,
spell = "Vine Whip",
minLv = 85,
distance = 3
}
},
["Charmander"] = {x = {
m3 = combat4,
spell = "Flamethrower",
minLv = 20,
distance = 3
}
},
["Charmeleon"] = {x = {
m3 = combat4,
spell = "Flamethrower",
minLv = 40,
distance = 3
}
},
["Charizard"] = {x = {
m3 = combat4,
spell = "Flamethrower",
minLv = 85,
distance = 3
}
},
["Squirtle"] = {x = {
m3 = combat1,
spell = "Water Gun",
minLv = 20,
distance = 3
}
},
["Wartortle"] = {x = {
m3 = combat1,
spell = "Water Gun",
minLv = 40,
distance = 3
}
},
["Blastoise"] = {x = {
m3 = combat1,
spell = "Water Gun",
minLv = 85,
distance = 3
}
},
["Caterpie"] = {x = {
m3 = combat6,
spell = "Bug Bite",
minLv = 1,
distance = 3
}
},
["Metapod"] = {x = {
m3 = combat5,
spell = "Harden",
minLv = 15,
distance = 3
}
},
["Butterfree"] = {x = {
m3 = combat14,
spell = "Headbutt",
minLv = 30,
distance = 3
}
},
["Weedle"] = {x = {
m3 = combat5,
spell = "Poison Sting",
minLv = 1,
distance = 3
}
},
["Kakuna"] = {x = {
m3 = combat12,
spell = "Harden",
minLv = 15,
distance = 3
}
},
["Beedrill"] = {x = {
m3 = combat12,
spell = "Fury Cutter",
minLv = 25,
distance = 3
}
},
["Pidgey"] = {x = {
m3 = combat15,
spell = "Gust",
minLv = 1,
distance = 3
}
},
["Pidgeotto"] = {x = {
m3 = combat15,
spell = "Whirlwind",
minLv = 20,
distance = 3
}
},
["Pidgeot"] = {x = {
m3 = combat15,
spell = "Whirlwind",
minLv = 65,
distance = 3
}
},
["Rattata"] = {x = {
m3 = combat3,
spell = "Scratch",
minLv = 1,
distance = 3
}
},
["Raticate"] = {x = {
m3 = combat3,
spell = "Scratch",
minLv = 25,
distance = 3
}
},
["Spearow"] = {x = {
m3 = combat15,
spell = "Sand Attack",
minLv = 10,
distance = 3
}
},
["Fearow"] = {x = {
m3 = combat15,
spell = "Gust",
minLv = 50,
distance = 3
}
},
["Ekans"] = {x = {
m3 = combat5,
spell = "Sting Gun",
minLv = 15,
distance = 3
}
},
["Arbok"] = {x = {
m3 = combat5,
spell = "Sting Gun",
minLv = 35,
distance = 3
}
},
["Pikachu"] = {x = {
m3 = combat9,
spell = "Thunder Bolt",
minLv = 20,
distance = 3
}
},
["Raichu"] = {x = {
m3 = combat9,
spell = "Thunder Bolt",
minLv = 50,
distance = 3
}
},
["Sandshrew"] = {x = {
m3 = combat3,
spell = "Scratch",
minLv = 20,
distance = 3
}
},
["Sandslash"] = {x = {
m3 = combat3,
spell = "Scratch",
minLv = 55,
distance = 3
}
}
}
function onSay(cid, var)
local summ = getCreatureSummons(cid)
if #summ == 0 then
return doPlayerSendCancel(cid, "Sorry, but you need a pokemon.")
end
for k = 1, #summ do
for name, _ in pairs(c) do
if getCreatureName(summ[k]):lower() == name:lower() then
local con = c[name].x
if getPlayerLevel(cid) < con.minLv then
return doPlayerSendCancel(cid, "Sorry, but you must be level " .. con.minLv .. " or higher to cast.") and doSendMagicEffect(getThingPos(cid), 2)
end
local distance = (not con.distance) and 1 or con.distance
if not isCreature(getCreatureTarget(cid)) or getCreatureTarget(cid) == summ[k] then
return doPlayerSendCancel(cid, "Invalid target.") and doSendMagicEffect(getThingPos(cid), 2)
end
if getDistanceBetween(getThingPos(summ[k]), getThingPos(getCreatureTarget(cid))) > distance then
return doPlayerSendCancel(cid, "Sorry, your pokemon is too far away.") and doSendMagicEffect(getThingPos(cid), 2)
end
if getPlayerStorageValue(cid, 23000) <= os.time() then
doPlayerSetStorageValue(cid, 23000, os.time()+5)
doCombat(summ[k], con.m3, numberToVariant(getCreatureTarget(cid)))
doCreatureSay(cid, name .. ", " .. con.spell .. ".")
end
doPlayerSendTextMessage(cid,26,"Tempo para usar M3 denovo: "..(getPlayerStorageValue(cid, 23000)-os.time()).." sec.")
doSendMagicEffect(getThingPos(cid), 2)
end
end
end
return true
end
----//----//----//----//----//----//----//----//----//----//----//----//----//----
M4
-----------------NORMAL Quick Attack------------------------------
local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 111)
setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
---------------- Wirlwind -------------------------------
local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 42)
setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
arr2 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 3, 0, 3, 0, 3, 0, 0, 0},
{0, 0, 0, 3, 0, 3, 0, 3, 0, 0, 0},
{0, 0, 0, 0, 3, 3, 3, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local area2 = createCombatArea(arr2)
setCombatArea(combat2, area2)
----------------------------normal Scratch -------------------------
local combat3 = createCombatObject()
setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat3, COMBAT_PARAM_EFFECT, 142)
setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
--------------------------- Dragon Claw-----------------------------
local combat4 = createCombatObject()
setCombatParam(combat4, COMBAT_PARAM_EFFECT, 141)
setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
-------------------------- HeadButt -----------------------------
local combat5 = createCombatObject()
setCombatParam(combat5, COMBAT_PARAM_EFFECT, 16)
setCombatParam(combat5, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat5, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
-------------------------- String Shot -----------------------------
local combat6 = createCombatObject()
setCombatParam(combat6, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat6, COMBAT_PARAM_EFFECT, 137)
setCombatParam(combat6, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat6, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------- Horn Attack ------------------------------
local combat7 = createCombatObject()
setCombatParam(combat7, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat7, COMBAT_PARAM_EFFECT, 59)
setCombatParam(combat7, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat7, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
--------------------------- Bite -----------------------------
local combat8 = createCombatObject()
setCombatParam(combat8, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat8, COMBAT_PARAM_EFFECT, 138)
setCombatParam(combat8, COMBAT_PARAM_DISTANCEEFFECT, 138)
setCombatFormula(combat8, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
-------------------------- Mega Kick --------------------------
local combat9 = createCombatObject()
setCombatParam(combat9, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat9, COMBAT_PARAM_EFFECT, 112)
setCombatFormula(combat9, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
-------------------------- Razor Leaf -----------------------
local combat10 = createCombatObject()
setCombatParam(combat10, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat10, COMBAT_PARAM_EFFECT, 79)
setCombatParam(combat10, COMBAT_PARAM_DISTANCEEFFECT, 5)
setCombatFormula(combat10, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------- Bubbles----------------------------
local combat11 = createCombatObject()
setCombatParam(combat11, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat11, COMBAT_PARAM_EFFECT, 68)
setCombatParam(combat11, COMBAT_PARAM_DISTANCEEFFECT, 2)
setCombatFormula(combat11, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------ String Shot ------------------------
local combat12 = createCombatObject()
setCombatParam(combat12, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat12, COMBAT_PARAM_EFFECT, 137)
setCombatParam(combat12, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat12, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------ Horn Attack -----------------------
local combat13 = createCombatObject()
setCombatParam(combat13, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat13, COMBAT_PARAM_EFFECT, 9)
setCombatParam(combat13, COMBAT_PARAM_DISTANCEEFFECT, 25)
setCombatFormula(combat13, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------ Super Sonic -----------------------
local combat14 = createCombatObject()
setCombatParam(combat14, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat14, COMBAT_PARAM_EFFECT, 22)
setCombatParam(combat14, COMBAT_PARAM_DISTANCEEFFECT, 24)
setCombatFormula(combat14, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
----------------------- Sand Attack -----------------------
local combat15 = createCombatObject()
setCombatParam(combat15, COMBAT_PARAM_EFFECT, 122)
setCombatParam(combat15, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat15, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
arr15 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local area15 = createCombatArea(arr15)
setCombatArea(combat15, area15)
local c = {
["Bulbasaur"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Ivysaur"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Venusaur"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Charmander"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Charmeleon"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Charizard"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Squirtle"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Wartortle"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Blastoise"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Caterpie"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Metapod"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Butterfree"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Weedle"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Kakuna"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Beedrill"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Pidgey"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Pidgeotto"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Pidgeot"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Rattata"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Raticate"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Spearow"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Fearow"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Ekans"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Arbok"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Pikachu"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Raichu"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Sandshrew"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Sandslash"] = {x = {
m4 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
}
}
function onSay(cid, var)
local summ = getCreatureSummons(cid)
if #summ == 0 then
return doPlayerSendCancel(cid, "Sorry, but you need a pokemon.")
end
for l = 1, #summ do
for name, _ in pairs(c) do
if getCreatureName(summ[l]):lower() == name:lower() then
local con = c[name].x
if getPlayerLevel(cid) < con.minLv then
return doPlayerSendCancel(cid, "Sorry, but you must be level " .. con.minLv .. " or higher to cast.") and doSendMagicEffect(getThingPos(cid), 2)
end
local distance = (not con.distance) and 1 or con.distance
if not isCreature(getCreatureTarget(cid)) or getCreatureTarget(cid) == summ[l] then
return doPlayerSendCancel(cid, "Invalid target.") and doSendMagicEffect(getThingPos(cid), 2)
end
if getDistanceBetween(getThingPos(summ[l]), getThingPos(getCreatureTarget(cid))) > distance then
return doPlayerSendCancel(cid, "Sorry, your pokemon is too far away.") and doSendMagicEffect(getThingPos(cid), 2)
end
if getPlayerStorageValue(cid, 21500) <= os.time() then
doPlayerSetStorageValue(cid, 21500, os.time()+5)
doCombat(summ[l], con.m4, numberToVariant(getCreatureTarget(cid)))
doCreatureSay(cid, name .. ", " .. con.spell .. ".")
end
doPlayerSendTextMessage(cid,26,"Tempo para usar M4 denovo: "..(getPlayerStorageValue(cid, 21500)-os.time()).." sec.")
doSendMagicEffect(getThingPos(cid), 2)
end
end
end
return true
end
M5
-----------------NORMAL Quick Attack------------------------------
local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 111)
setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
---------------- Wirlwind -------------------------------
local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 42)
setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
arr2 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 3, 0, 3, 0, 3, 0, 0, 0},
{0, 0, 0, 3, 0, 3, 0, 3, 0, 0, 0},
{0, 0, 0, 0, 3, 3, 3, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local area2 = createCombatArea(arr2)
setCombatArea(combat2, area2)
----------------------------normal Scratch -------------------------
local combat3 = createCombatObject()
setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat3, COMBAT_PARAM_EFFECT, 142)
setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
--------------------------- Dragon Claw-----------------------------
local combat4 = createCombatObject()
setCombatParam(combat4, COMBAT_PARAM_EFFECT, 141)
setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
-------------------------- HeadButt -----------------------------
local combat5 = createCombatObject()
setCombatParam(combat5, COMBAT_PARAM_EFFECT, 16)
setCombatParam(combat5, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat5, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
-------------------------- String Shot -----------------------------
local combat6 = createCombatObject()
setCombatParam(combat6, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat6, COMBAT_PARAM_EFFECT, 137)
setCombatParam(combat6, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat6, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------- Horn Attack ------------------------------
local combat7 = createCombatObject()
setCombatParam(combat7, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat7, COMBAT_PARAM_EFFECT, 59)
setCombatParam(combat7, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat7, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
--------------------------- Bite -----------------------------
local combat8 = createCombatObject()
setCombatParam(combat8, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat8, COMBAT_PARAM_EFFECT, 138)
setCombatParam(combat8, COMBAT_PARAM_DISTANCEEFFECT, 138)
setCombatFormula(combat8, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
-------------------------- Mega Kick --------------------------
local combat9 = createCombatObject()
setCombatParam(combat9, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat9, COMBAT_PARAM_EFFECT, 112)
setCombatFormula(combat9, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
-------------------------- Razor Leaf -----------------------
local combat10 = createCombatObject()
setCombatParam(combat10, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat10, COMBAT_PARAM_EFFECT, 79)
setCombatParam(combat10, COMBAT_PARAM_DISTANCEEFFECT, 5)
setCombatFormula(combat10, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------- Bubbles----------------------------
local combat11 = createCombatObject()
setCombatParam(combat11, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat11, COMBAT_PARAM_EFFECT, 68)
setCombatParam(combat11, COMBAT_PARAM_DISTANCEEFFECT, 2)
setCombatFormula(combat11, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------ String Shot ------------------------
local combat12 = createCombatObject()
setCombatParam(combat12, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat12, COMBAT_PARAM_EFFECT, 137)
setCombatParam(combat12, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat12, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------ Horn Attack -----------------------
local combat13 = createCombatObject()
setCombatParam(combat13, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat13, COMBAT_PARAM_EFFECT, 9)
setCombatParam(combat13, COMBAT_PARAM_DISTANCEEFFECT, 25)
setCombatFormula(combat13, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------ Super Sonic -----------------------
local combat14 = createCombatObject()
setCombatParam(combat14, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat14, COMBAT_PARAM_EFFECT, 22)
setCombatParam(combat14, COMBAT_PARAM_DISTANCEEFFECT, 24)
setCombatFormula(combat14, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
----------------------- Sand Attack -----------------------
local combat15 = createCombatObject()
setCombatParam(combat15, COMBAT_PARAM_EFFECT, 122)
setCombatParam(combat15, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat15, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
arr15 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local area15 = createCombatArea(arr15)
setCombatArea(combat15, area15)
local c = {
["Bulbasaur"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Ivysaur"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Venusaur"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Charmander"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Charmeleon"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Charizard"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Squirtle"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Wartortle"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Blastoise"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Caterpie"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Metapod"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Butterfree"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Weedle"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Kakuna"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Beedrill"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Pidgey"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Pidgeotto"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Pidgeot"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Rattata"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Raticate"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Spearow"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Fearow"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Ekans"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Arbok"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Pikachu"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Raichu"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Sandshrew"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Sandslash"] = {x = {
m5 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
}
}
function onSay(cid, var)
local summ = getCreatureSummons(cid)
if #summ == 0 then
return doPlayerSendCancel(cid, "Sorry, but you need a pokemon.")
end
for m = 1, #summ do
for name, _ in pairs(c) do
if getCreatureName(summ[m]):lower() == name:lower() then
local con = c[name].x
if getPlayerLevel(cid) < con.minLv then
return doPlayerSendCancel(cid, "Sorry, but you must be level " .. con.minLv .. " or higher to cast.") and doSendMagicEffect(getThingPos(cid), 2)
end
local distance = (not con.distance) and 1 or con.distance
if not isCreature(getCreatureTarget(cid)) or getCreatureTarget(cid) == summ[m] then
return doPlayerSendCancel(cid, "Invalid target.") and doSendMagicEffect(getThingPos(cid), 2)
end
if getDistanceBetween(getThingPos(summ[m]), getThingPos(getCreatureTarget(cid))) > distance then
return doPlayerSendCancel(cid, "Sorry, your pokemon is too far away.") and doSendMagicEffect(getThingPos(cid), 2)
end
if getPlayerStorageValue(cid, 22000) <= os.time() then
doPlayerSetStorageValue(cid, 22000, os.time()+5)
doCombat(summ[m], con.m5, numberToVariant(getCreatureTarget(cid)))
doCreatureSay(cid, name .. ", " .. con.spell .. ".")
end
doPlayerSendTextMessage(cid,26,"Tempo para usar M5 denovo: "..(getPlayerStorageValue(cid, 22000)-os.time()).." sec.")
doSendMagicEffect(getThingPos(cid), 2)
end
end
end
return true
end
M6
-----------------NORMAL Quick Attack------------------------------
local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 111)
setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
---------------- Wirlwind -------------------------------
local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 42)
setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
arr2 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 3, 0, 3, 0, 3, 0, 0, 0},
{0, 0, 0, 3, 0, 3, 0, 3, 0, 0, 0},
{0, 0, 0, 0, 3, 3, 3, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local area2 = createCombatArea(arr2)
setCombatArea(combat2, area2)
----------------------------normal Scratch -------------------------
local combat3 = createCombatObject()
setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat3, COMBAT_PARAM_EFFECT, 142)
setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
--------------------------- Dragon Claw-----------------------------
local combat4 = createCombatObject()
setCombatParam(combat4, COMBAT_PARAM_EFFECT, 141)
setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
-------------------------- HeadButt -----------------------------
local combat5 = createCombatObject()
setCombatParam(combat5, COMBAT_PARAM_EFFECT, 16)
setCombatParam(combat5, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat5, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
-------------------------- String Shot -----------------------------
local combat6 = createCombatObject()
setCombatParam(combat6, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat6, COMBAT_PARAM_EFFECT, 137)
setCombatParam(combat6, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat6, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------- Horn Attack ------------------------------
local combat7 = createCombatObject()
setCombatParam(combat7, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat7, COMBAT_PARAM_EFFECT, 59)
setCombatParam(combat7, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat7, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
--------------------------- Bite -----------------------------
local combat8 = createCombatObject()
setCombatParam(combat8, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat8, COMBAT_PARAM_EFFECT, 138)
setCombatParam(combat8, COMBAT_PARAM_DISTANCEEFFECT, 138)
setCombatFormula(combat8, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
-------------------------- Mega Kick --------------------------
local combat9 = createCombatObject()
setCombatParam(combat9, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat9, COMBAT_PARAM_EFFECT, 112)
setCombatFormula(combat9, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
-------------------------- Razor Leaf -----------------------
local combat10 = createCombatObject()
setCombatParam(combat10, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat10, COMBAT_PARAM_EFFECT, 79)
setCombatParam(combat10, COMBAT_PARAM_DISTANCEEFFECT, 5)
setCombatFormula(combat10, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------- Bubbles----------------------------
local combat11 = createCombatObject()
setCombatParam(combat11, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat11, COMBAT_PARAM_EFFECT, 68)
setCombatParam(combat11, COMBAT_PARAM_DISTANCEEFFECT, 2)
setCombatFormula(combat11, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------ String Shot ------------------------
local combat12 = createCombatObject()
setCombatParam(combat12, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat12, COMBAT_PARAM_EFFECT, 137)
setCombatParam(combat12, COMBAT_PARAM_DISTANCEEFFECT, 23)
setCombatFormula(combat12, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------ Horn Attack -----------------------
local combat13 = createCombatObject()
setCombatParam(combat13, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat13, COMBAT_PARAM_EFFECT, 9)
setCombatParam(combat13, COMBAT_PARAM_DISTANCEEFFECT, 25)
setCombatFormula(combat13, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
------------------------ Super Sonic -----------------------
local combat14 = createCombatObject()
setCombatParam(combat14, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat14, COMBAT_PARAM_EFFECT, 22)
setCombatParam(combat14, COMBAT_PARAM_DISTANCEEFFECT, 24)
setCombatFormula(combat14, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
----------------------- Sand Attack -----------------------
local combat15 = createCombatObject()
setCombatParam(combat15, COMBAT_PARAM_EFFECT, 122)
setCombatParam(combat15, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatFormula(combat15, COMBAT_FORMULA_LEVELMAGIC, -6.6, 0, -5.7, 0)
arr15 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local area15 = createCombatArea(arr15)
setCombatArea(combat15, area15)
local c = {
["Bulbasaur"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Ivysaur"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Venusaur"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Charmander"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Charmeleon"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Charizard"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Squirtle"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Wartortle"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Blastoise"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Caterpie"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Metapod"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Butterfree"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Weedle"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Kakuna"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Beedrill"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Pidgey"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Pidgeotto"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Pidgeot"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Rattata"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Raticate"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Spearow"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Fearow"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Ekans"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Arbok"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Pikachu"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Raichu"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Sandshrew"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
},
["Sandslash"] = {x = {
m6 = combat??,
spell = "??",
minLv = ??,
distance = 3
}
}
}
function onSay(cid, var)
local summ = getCreatureSummons(cid)
if #summ == 0 then
return doPlayerSendCancel(cid, "Sorry, but you need a pokemon.")
end
for n = 1, #summ do
for name, _ in pairs(c) do
if getCreatureName(summ[n]):lower() == name:lower() then
local con = c[name].x
if getPlayerLevel(cid) < con.minLv then
return doPlayerSendCancel(cid, "Sorry, but you must be level " .. con.minLv .. " or higher to cast.") and doSendMagicEffect(getThingPos(cid), 2)
end
local distance = (not con.distance) and 1 or con.distance
if not isCreature(getCreatureTarget(cid)) or getCreatureTarget(cid) == summ[n] then
return doPlayerSendCancel(cid, "Invalid target.") and doSendMagicEffect(getThingPos(cid), 2)
end
if getDistanceBetween(getThingPos(summ[n]), getThingPos(getCreatureTarget(cid))) > distance then
return doPlayerSendCancel(cid, "Sorry, your pokemon is too far away.") and doSendMagicEffect(getThingPos(cid), 2)
end
if getPlayerStorageValue(cid, 22500) <= os.time() then
doPlayerSetStorageValue(cid, 22500, os.time()+5)
doCombat(summ[n], con.m6, numberToVariant(getCreatureTarget(cid)))
doCreatureSay(cid, name .. ", " .. con.spell .. ".")
end
doPlayerSendTextMessage(cid,26,"Tempo para usar M6 denovo: "..(getPlayerStorageValue(cid, 22500)-os.time()).." sec.")
doSendMagicEffect(getThingPos(cid), 2)
end
end
end
return true
end
Tags
<talkaction words="m1" event="script" value="SistemaM1.lua"/> <talkaction words="m2" event="script" value="SistemaM2.lua"/> <talkaction words="m3" event="script" value="SistemaM3.lua"/> <talkaction words="m4" event="script" value="SistemaM4.lua"/> <talkaction words="m5" event="script" value="SistemaM5.lua"/> <talkaction words="m6" event="script" value="SistemaM6.lua"/>
Obs. QUANDO SALVAR OS COMANDOS COLOQUE O NOME DE SistemaM... [Nos pontos bote numero da magia.
Tutorial Como Adicionar Magia , Combat e Level.
Exemplo:
["Pikachu"] = {x = {
m1 = combat1, ----[1]
spell = "Quick Attack", ---[2]
minLv = 20, ---- [3]
distance = 3 --- [4]
}
},
[1]combat é efeito da magia, no inicio do código tem exemplo de cada ataque.
[2]Nome da magia que será usada pelo pokemon
[3]Será o level mínimo para que o ataque possa ocorrer.
[4]Será a distancia em que o pokemon poderá soltar seu ataque.
Como adicionar novos M.
Na parte após os pokemon adicionados com suas magias procure essas partes das linhas.
for n = 1, #summ do [1] if getCreatureName(summ[n]):lower() == name:lower() then [2] if not isCreature(getCreatureTarget(cid)) or getCreatureTarget(cid) == summ[n] then [3] if getDistanceBetween(getThingPos(summ[n]), getThingPos(getCreatureTarget(cid))) > distance then [4] [1] for n = 1, cada M tem uma letra diferente que foi colocada, paa que se possa usar magia sem erros. Nunca repita mesma letra. [2] if getCreatureName(summ[n]): coloque a letra que você colocou no for ? = 1. [3] summ[n] mesma coisa das outras se bota letra que você colocou no for. [4] (summ[n]) mesma coisa das outras, se coloca a letra que se colocou no for.
Tempo das Magias
Logo abaixo após as linhas que citei acima , se tem o tempo usado das magias.
if getPlayerStorageValue(cid, 22500) <= os.time() then [1] doPlayerSetStorageValue(cid, 22500, os.time()+5) [2] doCombat(summ[n], con.m6, numberToVariant(getCreatureTarget(cid))) [3] doCreatureSay(cid, name .. ", " .. con.spell .. ".") end [1] (cid, 22500) tempo que leva para magia ser caregada e solta. [2] (cid, 22500, os.time()+5) mesma coisa, o +5 não presisa mudar, caso queira mude. [3] “(summ[n]” coloca oque você colocou no if “con.m6”será o nome do M usado para soltar a magia.
Bom é isso, caso falei alguma besteira me falem que irei arrumar, qualquer duvida me adicione no msn ou poste no tópico.
Não esqueça do REP +
'