Ir para conteúdo

kttallan

Infante
  • Total de itens

    1574
  • Registro em

  • Última visita

  • Dias Ganhos

    16

Tudo que kttallan postou

  1. Faça Um Client No Vapus Em Seguida Renomei O dat E Spr E Pic Para Tibia Apos Baixar O No Client Jogue Na Pasta Do Client Delete O Client Antigo.
  2. 1 - simples vá em data/creaturescripter/loguim. e procure pela mensagem e edit ou remova. 2 - Sugiro Ficar Assim Mesmo Pois E Acelerado O Fishing Do Pda Ai Vocé Pescaria Mt Rapido Mesmo Assim. Troque seu Fishing Por esse local fishing = { ["Magikarp"] = {skill = 0, level = -2}, ["Horsea"] = {skill = 20, level = 2}, ["Poliwag"] = {skill = 20, level = 2}, ["Krabby"] = {skill = 20, level = 2}, ["Goldeen"] = {skill = 20, level = 5}, ["Tentacool"] = {skill = 35, level = 2}, ["Staryu"] = {skill = 60, level = 6}, ["Kingler"] = {skill = 75, level = 14}, ["Seaking"] = {skill = 50, level = 11}, ["Starmie"] = {skill = 60, level = 20}, ["Poliwhirl"] = {skill = 60, level = 9}, ["Seadra"] = {skill = 70, level = 15}, ["Gyarados"] = {skill = 100, level = 5}, ["Tentacruel"] = {skill = 100, level = 5}, ["Blastoise"] = {skill = 100, level = 5}, } 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) 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 doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "'You need fisher outfit for fishing'/'Você precisa da outfit 'Fisher' para pescar'") return false end else if getCreatureOutfit(cid).lookType ~= 521 then 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 else out = 1468 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
  3. lol meu amigo vital vocé e foda.. House Muito Legal
  4. Win 7 Ultimeta 64 bits ontem tava pegando normalmente.
  5. Formulário Descrição : Avatar & Sign com nome "Lord Sorte" (sem aspas). Tema : Poketibia Tamanho : 200x265 (avatar) 440x240 (sign)
  6. Ja Esperei 25 Minutos Ja Tentei Abrir um mapa bem pequeno e tbm intalei e deszistalei e n nvolto a pegar.
  7. Olha Gente Estou Com Esse Erro Nó Remeres
  8. DuMal Gostei Muito Da Suas Resposta Nessa Entrevista Pricipalmente Dessa
  9. Roksas sou seu fán Nunca Vi Algo Seu Dar Errado.. Com Esse Npc Ajuda Mt Gente ^^
  10. LuckinhaSan Deixa Passar Essa Pelomenos Ele Boto O Credito ^^
  11. 4.0 Tá Com Muita Cara De Tibia Sé E De Pokemon Tem Que Tar Com Mais Estilo De Pokemon Tirando Isso Bem Organizado
  12. Conserteza Roksas Aki No Forum Já Existe Esse Topico..
  13. Apos Chegar No Xtibia Fui Logo Para Baixar Otserve De Pokemon Achei Muitas Coisas Boas Achei Mt Gente Legal Gabrieltxu , Slicer Etcs. Que Fazinham Trabalhos Muito Surpriendentes Que Eu Não Sabia Nen Por Onde Ia Dai Comecei Ver Topico Por Topicos Descobrindo Coisas Por Coisas Decedir Ser Scripter Pois Achei Muito Legal As Coisas Eu Inspirado Pelos Melhores Scritper Roksas E Outros Ta ae Vim Por Varios Motivos Ao Xtibia E Não TRoco Por Nenhum.
  14. Tenso Muito Tenso Esse tipo De Nuk Mesmo Assim Cria Site Va Por Mim
  15. Topico Reportado Para Que Movam Slicer A Turma Erra Teu Nome Que e Tã Facil kkk
  16. Isso e Chamado De Bomb Account Manager Ele Vai Ficar Logando Na Account Manage Ai O Dristo Estar Muito Lotado De Logs Da Mesma ACc Que e Acc Manager Poderar da Trava No Executavel Tbm Sugiro Vocé Fazer um Site E Melhor
  17. Essas Coisas Não Causa Dano Ao Seu Otserve Não Caso Queira Tirar Muda Para Outro Id No Itens.otb e no Itens.xml
  18. Não Fica Transparente Fica Rosa Dentro Do Servidor o npc
  19. Ola Gente Estou Aki Pedidindo A Ajuda de Vocés Para Uma Simples Informação Quero Saber Qual a Cor Que Faiz as Sprites Ficar Trasparentes Dizem que e rosa so que eu nn sei qual cor e azul ai keria que vocés me manda - sem a informação do Matriz : Verde : Sat : Vermelhor : Lum : Azul : Só Essas Info Pra SAber Qual a Cor Correta
  20. 2 - Erro Um Item Que Estar Bugado Em Tal Posição Explo : 900 968 7
  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...