Ir para conteúdo

[Talkaction]Sistema M1 Até M6 + Tutorial De Edições.


peewee

Posts Recomendados

[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 +

Editado por PeeWee
Link para o comentário
Compartilhar em outros sites

Espero que Gostem, Dos pokemon que eu adicionei não testei todos, apenas testei 3 deles.

 

Agora para ser feito mais M fica muito mais facil, so olhar a diferença entre eles ^^

Link para o comentário
Compartilhar em outros sites

@Lucaspt Primeiro voce terá que retirar o m1 que está na pasta spell, delete ele.

 

Logo após abra a pasta talkactions > scripts, jogue os 3 arquivos do topico dentro da pasta(quando montar script coloque nome de SistemaM1 // SistemaM2 // SistemaM3 , fazendo isso salve os arquivos e deixe na pasta talkactions.

 

Em seguida Volte a pasta talkactions e abra o arquivo com nome talkactions em bloco de notas e adicione as linhas que estão no topico.

 

<talkaction words="m1" event="script" value="SistemaM1.lua"/>

<talkaction words="m2" event="script" value="SistemaM2.lua"/>

<talkaction words="m3" event="script" value="SistemaM3.lua"/>

Link para o comentário
Compartilhar em outros sites

@ dimmmy , fiz em talkactions porque quando eu estava indo dormir fiquei pensando em maneiras de se fazer o comando, primeiro eu tinha tentado em spells, mais após usar a magia ele ficava dando spaw do m1, dai fiquei pensando em outras maneiras, e me lembrei do comando que os jogadores tem, pensei porque nao fazer, e deu certo ^^.

 

 

Qualquer bug so falar que eu tento resolver.

Link para o comentário
Compartilhar em outros sites

@Peewee lo mais impportante é:

 

function onSay(cid, words, param, channel)

local summons = getCreatureSummons(cid)

if #summons == 0 then

return doPlayerSendCancel(cid,"You doesn\'t not have Poke")

end

doPlayerCastSpell(getCreatureSummons(cid)[1], param)

return true

end

Editado por 132820
Link para o comentário
Compartilhar em outros sites

ai cara mt bom...

mais eu ja to com ataques do m1 até o m14 igual ao svke só usando esse mesmo script ae qui otro membro posto como spell e tbm ja arrumei o dano mais nao irei postar pq sera usado em meu server

se o meu server n for pra frente eu posto todos os scripts dele ^^

 

mais ai ta de parabens por postar essas talkaction garanto que ira ajudar bastante gente

Link para o comentário
Compartilhar em outros sites

Postou Hoje, 09:37

 

@Lucaspt Primeiro voce terá que retirar o m1 que está na pasta spell, delete ele.

 

Logo após abra a pasta talkactions > scripts, jogue os 3 arquivos do topico dentro da pasta(quando montar script coloque nome de SistemaM1 // SistemaM2 // SistemaM3 , fazendo isso salve os arquivos e deixe na pasta talkactions.

 

Em seguida Volte a pasta talkactions e abra o arquivo com nome talkactions em bloco de notas e adicione as linhas que estão no topico.

 

<talkaction words="m1" event="script" value="SistemaM1.lua"/>

<talkaction words="m2" event="script" value="SistemaM2.lua"/>

<talkaction words="m3" event="script" value="SistemaM3.lua"/>

 

Te Ajudei? Rep +

Contato : pee.wee@hotmail.com.br

 

 

-----------------------------------------------------

 

ei pee aki n funfa n sei pq fis tudo q vc pidiu /\ m1 ,m2,m3 mas n funfa ajuda ai passa a pasta do teu serve sl plix

Link para o comentário
Compartilhar em outros sites

×
×
  • Criar Novo...