Aqui está
<talkaction words="!newhealth;!superhealth;!supermana;!especialhealth;!especialmana" script="buyhealth.lua"/>
function onSay(cid, words, param) if(isPlayerPzLocked(cid) ~= true) then if(words == "!newhealth") then if(getPlayerStorageValue(cid, 25001) <= 0) then if(doPlayerRemoveMoney(cid, 20000) == true) setCreatureMaxHealth(cid, getCreatureMaxHealth(cid)+20000) setCreatureMaxMana(cid, getCreatureMaxMana(cid)+20000) doPlayerSetStorageValue(cid, 25001, 1) doCreatureAddHealth(cid, getCreatureMaxHealth(cid)) doCreatureAddMana(cid, getCreatureMaxMana(cid)) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem 20000 gps.") end else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você já comprou.") end elseif(words == "!superhealth") then if(getPlayerStorageValue(cid, 25002) <= 0) then if(doPlayerRemoveMoney(cid, 2500000) == true) setCreatureMaxHealth(cid, getCreatureMaxHealth(cid)+250000) doPlayerSetStorageValue(cid, 25002, 1) doCreatureAddHealth(cid, getCreatureMaxHealth(cid)) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem 2500000 gps.") end else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você já comprou.") end elseif(words == "!supermana") then if(getPlayerStorageValue(cid, 25003) <= 0) then if(doPlayerRemoveMoney(cid, 2500000) == true) setCreatureMaxMana(cid, getCreatureMaxMana(cid)+250000) doPlayerSetStorageValue(cid, 25003, 1) doCreatureAddMana(cid, getCreatureMaxMana(cid)) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem 2500000 gps.") end else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você já comprou.") end elseif(words == "!especialhealth") then if(getPlayerStorageValue(cid, 25004) <= 0) then if(doPlayerRemoveMoney(cid, 5000000) == true) setCreatureMaxHealth(cid, getCreatureMaxHealth(cid)+500000) doPlayerSetStorageValue(cid, 25004, 1) doCreatureAddHealth(cid, getCreatureMaxHealth(cid)) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem 5000000 gps.") end else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você já comprou.") end elseif(words == "!especialmana") then if(getPlayerStorageValue(cid, 25005) <= 0) then if(doPlayerRemoveMoney(cid, 5000000) == true) setCreatureMaxMana(cid, getCreatureMaxMana(cid)+500000) doPlayerSetStorageValue(cid, 25005, 1) doCreatureAddMana(cid, getCreatureMaxMana(cid)) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem 5000000 gps.") end else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você já comprou.") end end else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não pode comprar quando estiver com battle.") end return true end
Espero que goste =]





info
Grupo: Campones
Registrado: 23/01/10
Posts: 6
Reputação: 0
Char no Tibia: Knight The Aldora
Bom Xtibianos Gostaria DE 5 Scripts
1° !newhealth a pessoa so pode falar quando tiver sem pz e qando falar vai custa 20k e ela vai comprar 20k d life e 20k d mana ( So Pode-se comprar 1 vez)
2° !superhealth A Pessoa so pode falar se tiver sem pz e quando falar ela vai comprar 250k d life por 2kk 50 crystal coin.. ( So Pode-se comprar 1 vez)
3° !supermana A Pessoa so pode falar se tiver sem pz e quando falar ela vai comprar 250k d mana por 2kk 50
crystal coin.. ( So Pode-se comprar 1 vez)
4° !special health A Pessoa so pode falar se tiver sem pz e quando flar ela vai comprar 500k d life por 6kk ( So Pode-se comprar 1 vez)
5° !specialmana Pessoa so pode falar se tiver sem pz e quando flar ela vai comprar 500k d mana por 6kk( So Pode-se comprar 1 vez)
Bom Gostaria Mto Urgente Desses Scripts !! Tds Eles AS PSSOAS so podem comprar 1 vez c tentarem d novo eles perdem o dinhero ou não da obrigado !!Urgente COMANDO BUYHEALTH (ComprarLife) BUYMANA (comprarmana)