Mulizeu

EDITED O POSTE function onUse(cid, item, frompos, item2, topos) if not isCreature(item2.uid) or not isSummon(item2.uid) then doPlayerSendCancel(cid, "You can only give this Boost to trainers' pokemons.") return true end if getCreatureHealth(item2.uid) == 0 then return true end local pb = getPlayerSlotItem(getCreatureMaster(item2.uid), 8) --doPlayerSendTextMessage(cid, 27, "You gave a Boost Stone to "..getPokeName(item2.uid)..".") local level = getItemAttribute(pb.uid, "level") local exp = getItemAttribute(pb.uid, "exp") local neededexp = getItemAttribute(pb.uid, "nextlevelexp") local boost = getItemAttribute(pb.uid, "boost") or 0 if boost >= 200 then doPlayerSendCancel(cid, "Your pokemon is already at maximum boost.") return true end doRemoveItem(item.uid, 1) if getHappiness(item2.uid) < 50 then doSendMagicEffect(getThingPos(item2.uid), 168) return true end doCreatureSay(item2.uid, "BOOST+.", TALKTYPE_ORANGE_1) doSetItemAttribute(pb.uid, "boost", boost + 1) doPlayerSendTextMessage(getCreatureMaster(item2.uid), 27, "Your "..getPokeName(item2.uid).." has eaten a Boost Stone!") doSendFlareEffect(getThingPos(item2.uid)) doSendAnimatedText(getThingPos(item2.uid), "B O O S T!", 215) doCreatureSay(cid, getPokeName(item2.uid)..", take this Boost!", TALKTYPE_SAY) return false end

Vdd agr sim, é que eu tinha feito um antes, dps deixei menor e esqueci de editar! Malz....

Td bem então, fica a vontade para efutar teste caso hajá erro ou debug, me avise que reformularei!

Foi testado antes de postar, e durante os testes n ouve erro nem debug, e eu declarei target sendo que life e mana são usadas com target!

Se for pda, vc tem que acrescentar na lib!

removido--

Veja assim! local winpos = { {x=1010,y=1010,z=7}, {x=1010,y=1011,z=7}, {x=1010,y=1012,z=7} } -- Posições onde é possível usar a runa nos Players. if isInArray(getCreaturePosition(item2.uid),winpos) == false then doPlayerSendCancel(cid,"Sorry, the player is not at the winners place!") end

function onAttack(cid, target) if ((getCreaturePosition(target).x == getCreaturePosition(cid).x or getCreaturePosition(target).x == getCreaturePosition(cid).x+1 or getCreaturePosition(target).x == getCreaturePosition(cid).x-1) and (getCreaturePosition(target).y == getCreaturePosition(cid).y or getCreaturePosition(target).y == getCreaturePosition(cid).y+1 or getCreaturePosition(target).y == getCreaturePosition(cid).y-1)) then if (math.random(1,100) > (100 - 5)) then mana = (getPlayerMana(target)*0.1) doPlayerSendTextMessage(cid, 23, "Você sugou "..mana.." de Mana do "..getCreatureName(target)..".") doSendMagicEffect(getCreaturePosition(target), 98) doPlayerAddMana(target, -mana) doPlayerAddMana(cid, mana) doSendMagicEffect(getCreaturePosition(cid),10) return true else return true end end return true end

Certeza que n ta funfando, pq ele n solta efeito quando suga tem que prestar a tenção na mana! Com efeito function onAttack(cid, target) if ((getCreaturePosition(target).x == getCreaturePosition(cid).x or getCreaturePosition(target).x == getCreaturePosition(cid).x+1 or getCreaturePosition(target).x == getCreaturePosition(cid).x-1) and (getCreaturePosition(target).y == getCreaturePosition(cid).y or getCreaturePosition(target).y == getCreaturePosition(cid).y+1 or getCreaturePosition(target).y == getCreaturePosition(cid).y-1)) then for i=0, #weaponpar do if (getPlayerSlotItem(cid, 5).itemid == weaponpar[i] or getPlayerSlotItem(cid, 6).itemid == weaponpar[i]) then if (math.random(1,100) > (100 - chancepar)) then life = (getPlayerMana(target)*0.1) doPlayerSendTextMessage(cid, 23, "Você sugou "..life.." de Mana do "..getCreatureName(target)..".") doSendMagicEffect(getCreaturePosition(target), 98) doPlayerAddMana(target, -life) doPlayerAddMana(cid, life) doSendMagicEffect(getCreaturePosition(cid),10) return true else return true end end end end return true end

local weaponpar = {2377, 2378, 2379, 2380} -- id dos items que sugarão life local chancepar = 5 function onAttack(cid, target) if ((getCreaturePosition(target).x == getCreaturePosition(cid).x or getCreaturePosition(target).x == getCreaturePosition(cid).x+1 or getCreaturePosition(target).x == getCreaturePosition(cid).x-1) and (getCreaturePosition(target).y == getCreaturePosition(cid).y or getCreaturePosition(target).y == getCreaturePosition(cid).y+1 or getCreaturePosition(target).y == getCreaturePosition(cid).y-1)) then for i=0, #weaponpar do if (getPlayerSlotItem(cid, 5).itemid == weaponpar[i] or getPlayerSlotItem(cid, 6).itemid == weaponpar[i]) then if (math.random(1,100) > (100 - chancepar)) then life = (getPlayerMana(target)*0.1) doPlayerSendTextMessage(cid, 23, "Você sugou "..life.." de Mana do "..getCreatureName(target)..".") doSendMagicEffect(getCreaturePosition(target), 98) doPlayerAddMana(target, -life) doPlayerAddMana(cid, life) return true else return true end end end end return true end

Mais ele contua a encher mana e life vazia ou cheia?? se for cheia é so por isso local interval = 0 local heals = { ['hp'] = 800, ['mana'] = 800, } ---- local interval = 1000 local function rot(cid,n,old) local tb_rot = {{0,2},{6,5},{1,3},{7,4},false} if isPlayer(cid) == FALSE or tb_rot[n] == nil or old.x ~= getCreaturePosition(cid).x or old.y ~= getCreaturePosition(cid).y then return false end if tb_rot[n] == false then doCreatureAddHealth(cid, heals['hp']) doCreatureAddMana(cid, heals['mana']) doSendMagicEffect(getCreaturePosition(cid), 3) addEvent(rot, interval,cid,2,old) return false end n = n+1 addEvent(rot, interval,cid,n,old) end function onSay(cid, words, param) if isInArray(cid) == TRUE then return FALSE end if getPlayerMaxMana(cid) and getCreatureMaxHealth(cid) then return doPlayerSendCancel(cid,"Your life and mana full") end addEvent(rot, interval,cid,1,getCreaturePosition(cid)) return FALSE end

local interval = 0 local heals = { ['hp'] = 800, ['mana'] = 800, } ---- local interval = 1000 local function rot(cid,n,old) local tb_rot = {{0,2},{6,5},{1,3},{7,4},false} if isPlayer(cid) == FALSE or tb_rot[n] == nil or old.x ~= getCreaturePosition(cid).x or old.y ~= getCreaturePosition(cid).y then return false end if tb_rot[n] == false then doCreatureAddHealth(cid, heals['hp']) doCreatureAddMana(cid, heals['mana']) doSendMagicEffect(getCreaturePosition(cid), 3) addEvent(rot, interval,cid,2,old) return false end n = n+1 addEvent(rot, interval,cid,n,old) end function onSay(cid, words, param) if isInArray(cid) == TRUE then return FALSE end if getPlayerMaxMana(cid) and getCreatureMaxHealth(cid) then doPlayerSendCancel(cid,"Your life and mana full") end addEvent(rot, interval,cid,1,getCreaturePosition(cid)) return FALSE end

local interval = 0 local heals = { ['hp'] = 800, ['mana'] = 800, } ---- local interval = 1000 local function rot(cid,n,old) local tb_rot = {{0,2},{6,5},{1,3},{7,4},false} if isPlayer(cid) == FALSE or tb_rot[n] == nil or old.x ~= getCreaturePosition(cid).x or old.y ~= getCreaturePosition(cid).y then return false end if tb_rot[n] == false then doCreatureAddHealth(cid, heals['hp']) doCreatureAddMana(cid, heals['mana']) doSendMagicEffect(getCreaturePosition(cid), 3) addEvent(rot, interval,cid,2,old) return false end n = n+1 addEvent(rot, interval,cid,n,old) end function onSay(cid, words, param) if isInArray(cid) == TRUE then return FALSE end if getPlayerMaxMana(cid) == getPlayerMana(cid) and getCreatureMaxHealth(cid) == getCreatureHealth(cid)then doPlayerSendCancel(cid,"Your life and mana full") end addEvent(rot, interval,cid,1,getCreaturePosition(cid)) return FALSE end

local interval = 0 local heals = { ['hp'] = 800, ['mana'] = 800, } ---- local interval = 1000 local function rot(cid,n,old) local tb_rot = {{0,2},{6,5},{1,3},{7,4},false} if isPlayer(cid) == FALSE or tb_rot[n] == nil or old.x ~= getCreaturePosition(cid).x or old.y ~= getCreaturePosition(cid).y then return false end if tb_rot[n] == false then doCreatureAddHealth(cid, heals['hp']) doCreatureAddMana(cid, heals['mana']) doSendMagicEffect(getCreaturePosition(cid), 3) addEvent(rot, interval,cid,2,old) return false end n = n+1 addEvent(rot, interval,cid,n,old) end function onSay(cid, words, param) if isInArray(cid) == TRUE then return FALSE end if getPlayerMana(cid) == getPlayerMaxMana(cid) and getCreatureHealth(cid) == getCreatureMaxHealth(cid)then doPlayerSendCancel(cid,"Your life and mana full") end addEvent(rot, interval,cid,1,getCreaturePosition(cid)) return FALSE end

Sobre aquilo assim q tiver tempo te mando ageitado! esquenta com rep+ nao, oq vale é ajudar e aprender cada dia!

function onUse(cid,item,position,item2,fromPosition) local remove = false ---item quando usado sera removido? false == nao if getPlayerAccess(cid) <= 4 then return doPlayerSendCancel(cid,"Sorry, only members to staff") end -------------------------------------------------------------------------- if getPlayerAccess(item2.uid) >= 4 then return doPlayerSendCancel(cid,"Sorry, not used in staff") end -------------------------------------------------------------------------- doTeleportThing(item2.uid,{x=0,y=0,z=0}) -----pos onde sera teleportado doPlayerSendTextMessage(item2.uid,27,"Oh!, you is a winner player!") doSendMagicEffect(getCreaturePosition(item2.uid), 10) doSendAnimatedText(getCreaturePosition(item2.uid), "Winner!", 140) setPlayerStorageValue(item2.uid,999,0) ---------altere a storage -------------------------------------------------------------------------- if remove == true then doPlayerRemoveItem(item.uid) end return TRUE end

facilitaria se vc posta-se o script!

Pow Falar oq vindo dessa cara, meu xará, simplismente fantastico....... Concerteza merece mto mais do meu simples rep+ Abraços xará!

Vdd esqueci desse detalhe minha nega =] .........!

function onUse(cid, Item, fromPosition, itemEx, toPosition) doTeleportThing (cid, {x=1048,y=1053,z=7} ) doPlayerRemoveItem(cid,item.uid) return true end faltava o doPlayerRemoveItem(cid,item.uid)

function onKill(cid, target, lastHitKiller) if isPlayer(target) == TRUE and isCreature(lastHitKiller) then doSetCreatureDropLoot(cid, false) return TRUE end end

Vlw por me dizer q ia postar! Brincadeira minha nega =] bacana msm, gostei =] deu um upgrade!

Malz ae tava afastado do xtibia, Vodkart SZ meu brother, entra no msn quando der Veio! Gente esse systema da por npc, porem eu e vodkart optamos por naum disponibilizar ele, porem iremos rever e veremos se postamos!

@Byerne Pergunta pro smarthbox se ele sabe qual parametro tem que por, eu sei pois fui eu quem o criou mais vamos ve se o smarthbox sabe!

@subwat então cara eu ate tava pensando em fazer com evoluções porem, eu fiz esse script para sanar um pedido! gostei da tua critica e ou fazer por evoluções!