DA
action

[Action] Box System Perfeito

Por Daimonium, 26 de jan. de 2011 em Actions e Talkactions

script
6
2.6k
DaimoniumD
26 de janeiro de 2011 às 14:26

Esse script esta igual ao servidor do SVKE, quando voce tem os 6 pokemons, o pokemon da box vai para o depot.

 

Crie um arquivo em data/actions/scripts com o nome box4.lua

 

 

function onUse(cid, item, frompos, item2, topos)

local box = {
[1] ={msg = "You Open a Box +4",np = "Contains a Venusaur.",nm= "Venusaur"},
[2] ={msg = "You Open a Box +4",np = "Contains a Charizard.",nm= "Charizard"},
[3] ={msg = "You Open a Box +4",np = 'Contains a Blastoise.',nm= 'Blastoise'},
[4] ={msg = "You Open a Box +4",np = 'Contains a Pidgeot.',nm= 'Pidgeot'},
[5] ={msg = "You Open a Box +4",np = 'Contains a Nidoqueen.',nm= 'Nidoqueen'},
[6] ={msg = "You Open a Box +4",np = 'Contains a Nidoking.',nm= 'Nidoking'},
[7] ={msg = "You Open a Box +4",np = 'Contains a Ninetales.',nm= 'Ninetales'},
[8] ={msg = "You Open a Box +4",np = 'Contains a Arcanine.',nm= 'Arcanine'},
[9] ={msg = "You Open a Box +4",np = 'Contains a Poliwrath.',nm= 'Poliwrath'},
[10] ={msg = "You Open a Box +4",np = 'Contains a Alakazam.',nm= 'Alakazam'},
[11] ={msg = "You Open a Box +4",np = 'Contains a Machamp.',nm= 'Machamp'},
[12] ={msg = "You Open a Box +4",np = 'Contains a Tentacruel.',nm= 'Tentacruel'},
[13] ={msg = "You Open a Box +4",np = 'Contains a Golem.',nm= 'Golem'},
[14] ={msg = "You Open a Box +4",np = 'Contains a Dewgong.',nm= 'Dewgong'},
[15] ={msg = "You Open a Box +4",np = 'Contains a Gengar.',nm= 'Gengar'},
[16] ={msg = "You Open a Box +4",np = 'Contains a Rhydon.',nm= 'Rhydon'},
[17] ={msg = "You Open a Box +4",np = 'Contains a Scyther.',nm= 'Scyther'},
[18] ={msg = "You Open a Box +4",np = 'Contains a Jynx.',nm= 'Jynx'},
[19] ={msg = "You Open a Box +4",np = 'Contains a Electabuzz.',nm= 'Electabuzz'},
[20] ={msg = "You Open a Box +4",np = 'Contains a Magmar.',nm= 'Magmar'},
[21] ={msg = "You Open a Box +4",np = 'Contains a Gyarados.',nm= 'Gyarados'},
[22] ={msg = "You Open a Box +4",np = 'Contains a Lapras.',nm= 'Lapras'},
[23] ={msg = "You Open a Box +4",np = 'Contains a Omastar.',nm= 'Omastar'},
[24] ={msg = "You Open a Box +4",np = 'Contains a Kabutops.',nm= 'Kabutops'},
[25] ={msg = "You Open a Box +4",np = 'Contains a Aerodactyl.',nm= 'Aerodactyl'},
[26] ={msg = "You Open a Box +4",np = 'Contains a Snorlax.',nm= 'Snorlax'},
[27] ={msg = "You Open a Box +4",np = 'Contains a Dragonair.',nm= 'Dragonair'},
[28] ={msg = "You Open a Box +4",np = 'Contains a Dragonite.',nm= 'Dragonite'}
}
local level = 60 -- level para usar
local e = box[math.random(1,28)]
local boxid = 2222 -- id da ball que vai ser dada ao jogador
local pk = "This is "..e.nm.."'s pokeball. HP = [1/1]"

if getPlayerFreeCap(cid) <= 0.99 and getPlayerLevel(cid) >= level then
doPlayerSendTextMessage(cid,22,e.msg)
b = doCreateItemEx(boxid-1)
doItemSetAttribute(b, "poke", pk)
doItemSetAttribute(b, "nome", "e.nm")
doItemSetAttribute(b, "description", e.np)
doPlayerSendMailByName(getPlayerName(cid), b, 1)
doPlayerSendTextMessage(cid, 27, "Since you are already holding six pokemons, this pokeball has been sent to your depot.")
doRemoveItem(item.uid, 1)
else
doPlayerSendCancel(cid, "You must be at least level "..level.." to use this box.")
end
if getPlayerFreeCap(cid) >= 0.99 and getPlayerLevel(cid) >= level then
doPlayerSendTextMessage(cid,22,e.msg)
b = doPlayerAddItem(cid, boxid, 1)
doItemSetAttribute(b, "poke", pk)
doItemSetAttribute(b, "nome", "e.nm")
doItemSetAttribute(b, "description", e.np)
doRemoveItem(item.uid, 1)
else
doPlayerSendCancel(cid, "You must be at least level "..level.." to use this box.")
end
return TRUE
end

 

 

Em actions.xml adicione

 

      <action itemid="7891" event="script" value="box4.lua"/>

 

 

 

Creditos pelo script base: dedeu400

 

PS: Feito para o server do Pokemon Dash

Editado Janeiro 31 por Daimonium

topmasterT
26 de janeiro de 2011 às 17:07

no server da thalia num funfa, qdo vc poe o id da ball ele vira a ball mais n sai e nem vai no lugar correto.=/

DaimoniumD
26 de janeiro de 2011 às 19:18

no server da thalia num funfa, qdo vc poe o id da ball ele vira a ball mais n sai e nem vai no lugar correto.=/

 

Desculpe, eu esqueci de botar no topico para qual server foi feito, agora edite e botei um PS. O Server do(a) Thalia usa um sistema diferente de go/back.

superbruno100S
29 de janeiro de 2011 às 20:14

Esse script esta igual ao servidor do SVKE, quando voce tem os 6 pokemons, o pokemon da box vai para o depot.

 

Crie um arquivo em data/actions/scripts com o nome box4.lua

 

 

function onUse(cid, item, frompos, item2, topos)

local box = {
[1] ={msg = "You Open a Box +4",np = "Contains a Venusaur.",nm= "Venusaur"},
[2] ={msg = "You Open a Box +4",np = "Contains a Charizard.",nm= "Charizard"},
[3] ={msg = "You Open a Box +4",np = 'Contains a Blastoise.',nm= 'Blastoise'},
[4] ={msg = "You Open a Box +4",np = 'Contains a Pidgeot.',nm= 'Pidgeot'},
[5] ={msg = "You Open a Box +4",np = 'Contains a Nidoqueen.',nm= 'Nidoqueen'},
[6] ={msg = "You Open a Box +4",np = 'Contains a Nidoking.',nm= 'Nidoking'},
[7] ={msg = "You Open a Box +4",np = 'Contains a Ninetales.',nm= 'Ninetales'},
[8] ={msg = "You Open a Box +4",np = 'Contains a Arcanine.',nm= 'Arcanine'},
[9] ={msg = "You Open a Box +4",np = 'Contains a Poliwrath.',nm= 'Poliwrath'},
[10] ={msg = "You Open a Box +4",np = 'Contains a Alakazam.',nm= 'Alakazam'},
[11] ={msg = "You Open a Box +4",np = 'Contains a Machamp.',nm= 'Machamp'},
[12] ={msg = "You Open a Box +4",np = 'Contains a Tentacruel.',nm= 'Tentacruel'},
[13] ={msg = "You Open a Box +4",np = 'Contains a Golem.',nm= 'Golem'},
[14] ={msg = "You Open a Box +4",np = 'Contains a Dewgong.',nm= 'Dewgong'},
[15] ={msg = "You Open a Box +4",np = 'Contains a Gengar.',nm= 'Gengar'},
[16] ={msg = "You Open a Box +4",np = 'Contains a Rhydon.',nm= 'Rhydon'},
[17] ={msg = "You Open a Box +4",np = 'Contains a Scyther.',nm= 'Scyther'},
[18] ={msg = "You Open a Box +4",np = 'Contains a Jynx.',nm= 'Jynx'},
[19] ={msg = "You Open a Box +4",np = 'Contains a Electabuzz.',nm= 'Electabuzz'},
[20] ={msg = "You Open a Box +4",np = 'Contains a Magmar.',nm= 'Magmar'},
[21] ={msg = "You Open a Box +4",np = 'Contains a Gyarados.',nm= 'Gyarados'},
[22] ={msg = "You Open a Box +4",np = 'Contains a Lapras.',nm= 'Lapras'},
[23] ={msg = "You Open a Box +4",np = 'Contains a Omastar.',nm= 'Omastar'},
[24] ={msg = "You Open a Box +4",np = 'Contains a Kabutops.',nm= 'Kabutops'},
[25] ={msg = "You Open a Box +4",np = 'Contains a Aerodactyl.',nm= 'Aerodactyl'},
[26] ={msg = "You Open a Box +4",np = 'Contains a Snorlax.',nm= 'Snorlax'},
[27] ={msg = "You Open a Box +4",np = 'Contains a Dragonair.',nm= 'Dragonair'},
[28] ={msg = "You Open a Box +4",np = 'Contains a Dragonite.',nm= 'Dragonite'}
}
local level = 60 -- level para usar
local e = box[math.random(1,28)]
local boxid = 2222 -- id da ball que vai ser dada ao jogador
local pk = "This is "..e.nm.."'s pokeball. HP = [1/1]"

if getPlayerFreeCap(cid) <= 0.99 and getPlayerLevel(cid) >= level then
doPlayerSendTextMessage(cid,22,e.msg)
b = doCreateItemEx(boxid-1)
doItemSetAttribute(b, "poke", pk)
doItemSetAttribute(b, "nome", "e.nm")
doItemSetAttribute(b, "description", e.np)
doPlayerSendMailByName(getPlayerName(cid), b, 1)
doPlayerSendTextMessage(cid, 27, "Since you are already holding six pokemons, this pokeball has been sent to your depot.")
doRemoveItem(item.uid, 1)
else
doPlayerSendCancel(cid, "You must be at least level "..level.." to use this box.")
end
if getPlayerFreeCap(cid) >= 0.99 and getPlayerLevel(cid) >= level then
doPlayerSendTextMessage(cid,22,e.msg)
b = doPlayerAddItem(cid, boxid, 1)
doItemSetAttribute(b, "poke", pk)
doItemSetAttribute(b, "nome", "e.nm")
doItemSetAttribute(b, "description", e.np)
doRemoveItem(item.uid, 1)
else
doPlayerSendCancel(cid, "You must be at least level "..level.." to use this box.")
end
return TRUE
end

 

 

Em actions.xml adicione

 

      <action itemid="7891" event="script" value="box4.lua"/>

 

 

 

Creditos pelo script base: dedeu400

 

PS: Feito para o server do Pokemon Dash

 

FUNFA NO POKEMON FLASH V5.0?

LilitaL
05 de fevereiro de 2011 às 11:05

brunex: Sim testeado

2 semanas depois...
superbruno100S
13 de fevereiro de 2011 às 17:58

brunex: Sim testeado

 

Valeu ;D