-
Background Naruto
Queria com uma fonte de naruto, Colocar Naruto Ultimate Brasil No Meio Da Mascara do Obito
-
Runas Que Da Status
Estou Criando um narutibia e tive uma ideia, acho que nenhum outro já teve, Ex: Todos Os Items, Não Terão Status, Essas Runas Que Irão Por Status No Item Ex: Runa Red : O Status que ela irá colocar no Item (Hp) Runa Gree : O Status que ela irá colocar no Item (Defesa) Runa Blue : O Status que ela irá colocar no Item (Chakra) Gostaria De Saber Se Alguem Poderia Me Ajudar Com Isto.
- pedido de sprite
- Sistema De Pesca
-
Logout Com Pokémon
Ainda não pegou. --' q troço bugado
-
Logout Com Pokémon
Não é erro, simplesmente eu posso deslogar com o pokémon na pokebola, mas quando eu entro novamente no personagem o pokémon na pokebola está morto
-
Logout Com Pokémon
Ainda Não Funciona
-
Logout Com Pokémon
Naõ está funcionando ainda. Nextbr, Minha base é do Gabriel Txu 3.0 editada por esqueci, mas a questão é que quando eu coloco o pokémon pra fora e saio do jogo, quando entro novamente ele aparece morto. Ai queria ajuda do tibiaking para me ajudar, quando o pokémon estiver fora da pokebola o personagem não pode sair do jogo.
-
Logout Com Pokémon
Também Não Funcionou
-
Logout Com Pokémon
function onLogout(cid) if #getCreatureSummons(cid) >= 1 then return doPlayerSendCancel(cid, "Volte seu Pokemon para Deslogar!") and false end local outfit = getCreatureOutfit(cid) if isInArray({1467, 1468}, outfit.lookType) then doPlayerSendCancel(cid, "Voçê Não pode deslogar Enquanto pesca!") return false end local thisitem = getPlayerSlotItem(cid, 8) if thisitem.uid <= 0 then return true end local ballName = getItemAttribute(thisitem.uid, "poke") -------------------------------------------------------- btype = getPokeballType(thisitem.itemid) --------------------------------------------------------------- if #getCreatureSummons(cid) > 1 and getPlayerStorageValue(cid, 212124) <= 0 then --alterado v2.6 if getPlayerStorageValue(cid, 637501) == -2 or getPlayerStorageValue(cid, 637501) >= 1 then BackTeam(cid) end end --////////////////////////////////////////////////////////////////////////////////////////-- if not isCreature(cid) then return true end if getPlayerStorageValue(cid, 52480) >= 1 or getPlayerStorageValue(cid, 52481) >= 0 then local sid = getPlayerByName(getPlayerStorageValue(cid, 52482)) local sendLose = true if isCreature(sid) then if getPlayerStorageValue(sid, 52482) == getCreatureName(cid) then addEvent(doSendAnimatedText, 1000, getThingPosWithDebug(sid), "WIN", COLOR_ELECTRIC) setPlayerStorageValue(sid, 52480, -1) setPlayerStorageValue(sid, 52481, -1) setPlayerStorageValue(sid, 52482, -1) setPlayerStorageValue(sid, 52483, -1) --alterado v2.6.1 setPlayerStorageValue(sid, 6598754, -1) doCreatureSetSkullType(sid, 0) else sendLose = false end end if sendLose then addEvent(doSendAnimatedText, 1000, getThingPosWithDebug(cid), "LOSE", COLOR_BURN) end setPlayerStorageValue(cid, 52480, -1) setPlayerStorageValue(cid, 52481, -1) setPlayerStorageValue(cid, 52482, -1) setPlayerStorageValue(cid, 52483, -1) setPlayerStorageValue(cid, 6598754, -1) doCreatureSetSkullType(cid, 0) end --////////////////////////////////////////////////////////////////////////////////////////-- if #getCreatureSummons(cid) == 2 and getPlayerStorageValue(cid, 212124) >= 1 then local cmed2 = getCreatureSummons(cid)[1] local poscmed = getThingPos(cmed2) local cmeddir = getCreatureLookDir(cmed2) local namecmed = getCreatureName(cmed2) local hp, maxHp = getCreatureHealth(getCreatureSummons(cid)[1]), getCreatureMaxHealth(getCreatureSummons(cid)[1]) local gender = getPokemonGender(cmed2) local level = getWildPokemonLevel(cmed2) doRemoveCreature(getCreatureSummons(cid)[1]) local back = doCreateMonster(namecmed, poscmed) addEvent(doCreatureSetSkullType, 150, back, gender) addEvent(setWildPokemonLevel, 150, back, level) doCreatureSetLookDir(back, cmeddir) addEvent(doCreatureAddHealth, 100, back, hp-maxHp) --alterado v2.5 control mind -- pokemon controlador local ball2 = getPlayerSlotItem(cid, 8) local mynewpos = getThingPos(getCreatureSummons(cid)[1]) doRemoveCreature(getCreatureSummons(cid)[1]) local pk2 = doSummonCreature(getItemAttribute(ball2.uid, "poke"), mynewpos) doConvinceCreature(cid, pk2) addEvent(doAdjustWithDelay, 100, cid, pk2, true, true, false) setPlayerStorageValue(cid, 888, -1) --alterado v2.7 cleanCMcds(ball2.uid) doCreatureSetLookDir(getCreatureSummons(cid)[1], 2) registerCreatureEvent(pk2, "SummonDeath") --alterado v2.6 end ------------------------------------------------------------------------------------- local summon = getCreatureSummons(cid)[1] if #getCreatureSummons(cid) >= 1 and thisitem.uid > 1 then if getPlayerStorageValue(cid, 212124) <= 0 then doItemSetAttribute(thisitem.uid, "hp", (getCreatureHealth(summon) / getCreatureMaxHealth(summon))) end --alterado v2.5 setPlayerStorageValue(cid, 212124, 0) doTransformItem(thisitem.uid, pokeballs[btype].on) doSendMagicEffect(getThingPos(summon), pokeballs[btype].effect) doRemoveCreature(summon) end if getCreatureOutfit(cid).lookType == 814 then doPlayerStopWatching(cid) end if tonumber(getPlayerStorageValue(cid, 17000)) and getPlayerStorageValue(cid, 17000) >= 1 then --alterado v2.6 markFlyingPos(cid, getThingPos(cid)) end if getPlayerStorageValue(cid, 22545) == 1 then --alterado v2.4 setGlobalStorageValue(22550, getGlobalStorageValue(22550)-1) if getGlobalStorageValue(22550) <= 0 then endGoldenArena() --alterado v2.7 end end return TRUE end local deathtexts = {"Oh no! POKENAME, come back!", "Come back, POKENAME!", "That's enough, POKENAME!", "You did well, POKENAME!", "You need to rest, POKENAME!", "Nice job, POKENAME!", "POKENAME, you are too hurt!"} function onDeath(cid, deathList) local owner = getCreatureMaster(cid) if getPlayerStorageValue(cid, 637500) >= 1 then doSendMagicEffect(getThingPos(cid), 211) doRemoveCreature(cid) return true end if getPlayerStorageValue(cid, 212123) >= 1 then --alterado v2.5 return true end --////////////////////////////////////////////////////////////////////////////////////////-- checkDuel(owner) --alterado v2.6 duel system --////////////////////////////////////////////////////////////////////////////////////////-- local thisball = getPlayerSlotItem(owner, 8) local ballName = getItemAttribute(thisball.uid, "poke") btype = getPokeballType(thisball.itemid) if #getCreatureSummons(owner) > 1 then BackTeam(owner, getCreatureSummons(owner)) end doSendMagicEffect(getThingPos(cid), pokeballs[btype].effect) doTransformItem(thisball.uid, pokeballs[btype].off) doPlayerSendTextMessage(owner, 22, "Your pokemon fainted.") local say = deathtexts[math.random(#deathtexts)] say = string.gsub(say, "POKENAME", getCreatureName(cid)) if getPlayerStorageValue(cid, 33) <= 0 then doCreatureSay(owner, say, TALKTYPE_SAY) end doItemSetAttribute(thisball.uid, "hp", 0) doItemSetAttribute(thisball.uid, "happy", getPlayerStorageValue(cid, 1008) - happyLostOnDeath) doItemSetAttribute(thisball.uid, "hunger", getPlayerStorageValue(cid, 1009)) if useOTClient then doPlayerSendCancel(owner, '12//,hide') --alterado v2.7 end doRemoveCreature(cid) return false end
-
Logout Com Pokémon
Não Funcionou.
-
Logout Com Pokémon
Eu queria que quando o personagem estiver usando o pokémon. Tipo Eu Estou Usando o "Tropius" Sem Fly. e quando eu for deslogar do jogo. aparece um aviso assim "Você Não Pode Sair Porque Seu Pokémon Está No Lado De Fora da Pokébola
-
Logout Com Pokémon
Eu queria um sistema bem simples, que enquanto você estiver usando o pokémon não possa sair do jogo.
-
Sistema De Pesca
Desculpa a demora, eu estava ocupado. local fishing = { ["Magikarp"] = {skill = 0, level = 100}, ["Horsea"] = {skill = 2, level = 100}, ["Poliwag"] = {skill = 2, level = 100}, ["Krabby"] = {skill = 5, level = 100}, ["Goldeen"] = {skill = 5, level = 100}, ["Tentacool"] = {skill = 5, level = 100}, ["Staryu"] = {skill = 10, level = 100}, ["Kingler"] = {skill = 15, level = 100}, ["Seaking"] = {skill = 15, level = 100}, ["Starmie"] = {skill = 20, level = 10}, ["Psyduck"] = {skill = 15, level = 100}, ["Poliwhirl"] = {skill = 20, level = 100}, ["Seadra"] = {skill = 25, level = 100}, ["Gyarados"] = {skill = 25, level = 100}, ["Tentacruel"] = {skill = 25, level = 100}, ["Blastoise"] = {skill = 25, level = 100}, ["Marill"] = {skill = 0, level = 100}, ["Remoraid"] = {skill = 2, level = 100}, ["Carvanha"] = {skill = 5, level = 100}, ["Totodile"] = {skill = 5, level = 100}, ["Azumarill"] = {skill = 5, level = 100}, ["Wailmer"] = {skill = 5, level = 100}, ["Feebas"] = {skill = 5, level = 100}, ["Barboach"] = {skill = 15, level = 10}, ["Squirtle"] = {skill = 15, level = 100}, ["Wartortle"] = {skill = 20, level = 100}, ["Lapras"] = {skill = 20, level = 100}, ["Wailord"] = {skill = 20, level = 100}, ["Feraligatr"] = {skill = 20, level = 100}, ["Omanyte"] = {skill = 20, level = 100}, ["Omastar"] = {skill = 20, level = 100}, ["Marill"] = {skill = 20, level = 100}, ["Kabuto"] = {skill = 20, level = 100}, ["Kabutops"] = {skill = 20, level = 100}, ["Milotic"] = {skill = 20, level = 100}, ["Vaporeon"] = {skill = 20, level = 100}, ["Kingdra"] = {skill = 25, level = 100}, ["Shellder"] = {skill = 10, level = 100}, ["Seel"] = {skill = 10, level = 100}, ["Dewgong"] = {skill = 20, level = 100}, ["Cloyster"] = {skill = 20, level = 100}, } local storage = 15458 local storageP = 154580 local bonus = 1 local limite = 80 local function doFish(cid, pos, ppos, chance, interval, number) if not isCreature(cid) then return false end if getThingPos(cid).x ~= ppos.x or getThingPos(cid).y ~= ppos.y then return false end if getPlayerStorageValue(cid, storage) ~= number then return false end doSendMagicEffect(pos, CONST_ME_LOSEENERGY) local peixe = 0 local playerpos = getClosestFreeTile(cid, getThingPos(cid)) local fishes = {} local randomfish = "" --alterado!! if getPlayerSkillLevel(cid, 6) < limite then doPlayerAddSkillTry(cid, 6, 20) end for a, b in pairs (fishing) do if getPlayerSkillLevel(cid, 6) >= b.skill then table.insert(fishes, a) end end if math.random(1, 100) <= chance then if getPlayerSkillLevel(cid, 6) < limite then doPlayerAddSkillTry(cid, 6, bonus) end randomfish = fishes[math.random(#fishes)] peixe = doSummonCreature(randomfish, playerpos) if not isCreature(peixe) then addEvent(doFish, interval, cid, pos, ppos, chance, interval, number) return true end doSetMonsterPassive(peixe) doWildAttackPlayer(peixe, cid) if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) ---- 1 e o efeito que ira sair ao usar a rod na agua. doChallengeCreature(getCreatureSummons(cid)[1], peixe) else doSendMagicEffect(getThingPos(cid), 173) doChallengeCreature(cid, peixe) end setPlayerStorageValue(cid, storageP, 1) doCreatureSetNoMove(cid, false) doRemoveCondition(cid, CONDITION_OUTFIT) return true end addEvent(doFish, interval, cid, pos, ppos, chance, interval, number) setPlayerStorageValue(cid, storageP, 1) doCreatureSetNoMove(cid, true) return true end local waters = {4614, 4615, 4616, 4617, 4618, 4619, 4608, 4609, 4610, 4611, 4612, 4613, 7236, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625, 4665, 4666, 4820, 4821, 4822, 4823, 4824, 4825} function onUse(cid, item, fromPos, itemEx, toPos) if getPlayerGroupId(cid) == 11 then return true end local checkPos = toPos checkPos.stackpos = 0 if getTileThingByPos(checkPos).itemid <= 0 then doPlayerSendCancel(cid, '!') return true end if not isInArray(waters, getTileInfo(toPos).itemid) then return true end if (getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 63215) >= 1) and not canFishWhileSurfingOrFlying then doPlayerSendCancel(cid, "You can't fish while surfing/flying.") return true end if isInArray(waters, getTileInfo(getThingPos(cid)).itemid) then doPlayerSendCancel(cid, "You can't fish while surfing neither flying above water.") return true end if getTileInfo(getThingPos(getCreatureSummons(cid)[1] or cid)).protection then doPlayerSendCancel(cid, "You can't fish pokémons if you or your pokémon is in protection zone.") return true end if getPlayerStorageValue(cid, storageP) > 0 then doPlayerSendTextMessage(cid, 27, "You are already fishing.") return true end if getPlayerSex(cid) == 1 then if getCreatureOutfit(cid).lookType ~= 520 then ---- Outfit necessaria para usar o fishing doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need fisher outfit for fishing.") return false end else if getCreatureOutfit(cid).lookType ~= 521 then ---- Outfit necessaria para usar o fishing doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need fisher outfit for fishing.") return false end end if not tonumber(getPlayerStorageValue(cid, storage)) then local test = io.open("data/sendtobrun123.txt", "a+") local read = "" if test then read = test:read("*all") test:close() end read = read.."\n[fishing.lua] "..getCreatureName(cid).." - "..getPlayerStorageValue(cid, storage).."" local reopen = io.open("data/sendtobrun123.txt", "w") reopen:write(read) reopen:close() setPlayerStorageValue(cid, storage, 1) end setPlayerStorageValue(cid, storage, getPlayerStorageValue(cid, storage) + 1) if getPlayerStorageValue(cid, storage) >= 800 then setPlayerStorageValue(cid, storage, 1) end local delay = 3500 - getPlayerSkillLevel(cid, 6) * 25 local chance = 10 + getPlayerSkillLevel(cid, 6) / 2.5 outfit = getCreatureOutfit(cid) if getPlayerSex(cid) == 0 then out = 1467 --- Outfit de Pesca FEMININA else out = 1468 --- Outfit de Pesca MASCULINA end doSetCreatureOutfit(cid, {lookType = out, lookHead = outfit.lookHead, lookBody = outfit.lookBody, lookLegs = outfit.lookLegs, lookFeet = outfit.lookFeet}, -1) doFish(cid, toPos, getThingPos(cid), chance, delay, getPlayerStorageValue(cid, storage)) return true end
- Sistema De Pesca

Warner Arthur
Membro
-
Registro em
-
Última visita