Ir para conteúdo

kttallan

Infante
  • Total de itens

    1574
  • Registro em

  • Última visita

  • Dias Ganhos

    16

Tudo que kttallan postou

  1. local fishing = { ["Magikarp"] = {skill = 10, level = -2}, ["Horsea"] = {skill = 20, level = 2}, ["Poliwag"] = {skill = 20, level = 2}, ["Krabby"] = {skill = 20, level = 2}, ["Goldeen"] = {skill = 20, level = 4}, ["Psyduck"] = {skill = 30, level = 5}, ["Tentacool"] = {skill = 35, level = 5}, ["Staryu"] = {skill = 35, level = 6}, ["Squirtle"] = {skill = 40, level = 6}, ["Seel"] = {skill = 40, level = 6}, ["Seaking"] = {skill = 50, level = 8}, ["Starmie"] = {skill = 70, level = 8}, ["Slowpoke"] = {skill = 50, level = 8}, ["Poliwhirl"] = {skill = 50, level = 8}, } local storage = 15458 local storageP = 154580 local bonus = 1 local limite = 50 if getPlayerLevel(cid) > 10 then doPlayerSendCancel(cid, "So lvl 10 usa a vara de pescar.") return true end 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 level = 1 --- <nem vem por essa que ja mexi e não funciono '-' local fishes = {} local randomfish = "" --if getPlayerSkillLevel(cid, 6) < limite then --doPlayerAddSkillTry(cid, 6, bonus) --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 and math.random(1, 100) <= 30 then --30 = 30% chance de add fishing doPlayerAddSkillTry(cid, 6, bonus) end randomfish = fishes[math.random(#fishes)] level = getPlayerSkillLevel(cid, 6) / 3 level = level + getPlayerLevel(cid) / 5 level = math.random(level * 0.6, level) level = level + fishing[randomfish].level peixe = doSummonCreature(randomfish, playerpos) if level <= 0 then level = math.random(getPlayerLevel(cid)) end if not isCreature(peixe) then addEvent(doFish, interval, cid, pos, ppos, chance, interval, number) return true end setWildPokemonLevel(peixe, level) 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 ~= 481 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need fisher outfit for fishing.") return false end else if getCreatureOutfit(cid).lookType ~= 482 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 = 546 else out = 545 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
  2. Manin dependendo se voce subistiur corretamento o poke conserteza ficarar correto agr se voce subistiur ele andando por ele parado no dat editor ele vai estar dezorganizado ai so voce ageitando la voce monta seu poke no dat o e spr so armazena sprites @Gabrieltxu relembre edite seu tutorial tem que estar rosa atra dos pokes se na no jogo vao ficar branco..
  3. amigo organiza esse seu topico estar mt desorganizado eu mesmo nao vou te ajudar com u toopico assim uma letra gigante diminui eu nn entendo nada
  4. lool manin tais melhorando ate d + mais fais oq eu te falei dedica 1 semana do teu tempo para fazer um mapa grande e melhor.
  5. vou dar um testin nele aki vlw manin pelo seus sistema de icones qualquer erro conserto facim aki.. hasuhusa boooa manin gostei mesmo ja tenho 2x scripter aki preparado para esses sistema... obs : creditos do smix tabem ne conheço qualquer sistem do xtibia e esse e o dele serve ta show
  6. local fishing = { ["Magikarp"] = {skill = 10, level = -2}, ["Horsea"] = {skill = 20, level = 2}, ["Poliwag"] = {skill = 20, level = 2}, ["Krabby"] = {skill = 20, level = 2}, ["Goldeen"] = {skill = 20, level = 4}, ["Psyduck"] = {skill = 30, level = 5}, ["Tentacool"] = {skill = 35, level = 5}, ["Staryu"] = {skill = 35, level = 6}, ["Squirtle"] = {skill = 40, level = 6}, ["Seel"] = {skill = 40, level = 6}, ["Seaking"] = {skill = 50, level = 8}, ["Starmie"] = {skill = 70, level = 8}, ["Slowpoke"] = {skill = 50, level = 8}, ["Poliwhirl"] = {skill = 50, level = 8}, } local storage = 15458 local storageP = 154580 local bonus = 1 local limite = 50 if getPlayerLevel(cid) > 10 then 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 level = 1 --- <nem vem por essa que ja mexi e não funciono '-' local fishes = {} local randomfish = "" --if getPlayerSkillLevel(cid, 6) < limite then --doPlayerAddSkillTry(cid, 6, bonus) --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 and math.random(1, 100) <= 30 then --30 = 30% chance de add fishing doPlayerAddSkillTry(cid, 6, bonus) end randomfish = fishes[math.random(#fishes)] level = getPlayerSkillLevel(cid, 6) / 3 level = level + getPlayerLevel(cid) / 5 level = math.random(level * 0.6, level) level = level + fishing[randomfish].level peixe = doSummonCreature(randomfish, playerpos) if level <= 0 then level = math.random(getPlayerLevel(cid)) end if not isCreature(peixe) then addEvent(doFish, interval, cid, pos, ppos, chance, interval, number) return true end setWildPokemonLevel(peixe, level) 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 ~= 481 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need fisher outfit for fishing.") return false end else if getCreatureOutfit(cid).lookType ~= 482 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 = 546 else out = 545 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 if getPlayerLevel(cid) > 10 then 10 eo lvl que precisa para usar a vara de pesca
  7. kttallan

    Hunt Gengar

    manin fais assim usa 1 semana de seu tempo sem postar nada aki e vai fazer varios respawns em grande escala c/muito decoraçao detalhes entre muito mais voce fais isso acho q invao pois para fazer isso - de 5 minutos ai voce usa 1 semana do seu tempo e fais um mapa com grande escala de respawns dai mts vao valorizar seu trabalho segue minha dica fica com um rep aew obs : estar melhorando a kd mapa que voce fais
  8. kttallan

    Hunt Ice

    manin fais assim usa 1 semana de seu tempo sem postar nada aki e vai fazer varios respawns em grande escala c/muito decoraçao detalhes entre muito mais voce fais isso acho q invao pois para fazer isso - de 5 minutos ai voce usa 1 semana do seu tempo e fais um mapa com grande escala de respawns dai mts vao valorizar seu trabalho segue minha dica fica com um rep aew
  9. @up esses negocio do addons entre outros tou ageitando ja acho q posto amanhan ou dps de amanhan a verçao 2 com alguns erros corrigidos.
  10. Ola gente estou com esse erro iritante quando eu vou compilar a merda do otclient ai aprece isso quem ajudar odu rep + vlw aew Erro
  11. creio que gabriel matou sua duvida mais tabem lembre do arquivo xml do seu poke e tabem veja se voce estar usando o client serto eu se,pre me eskeço com isso tabem.
  12. no executavel tem reload actions entre outros so voce dar la o reload da spell ai nn precisa feixar o serve por mordifcaçao alguma
  13. /\ usa spoiler fais como gabriel disse ali voce tira e adiciona a vocation.
  14. Ne mais facil usar otclient que e + facil de ageitar o ip entre outros.
  15. e pois coisas no linux sao diferentes do windows
  16. Tentan entra dnv ne mlk esse erro da em todo client
  17. ta lgl so que nao acha que ta imitando muito o pxg nao algo de diferente seria bem legal.
  18. duvida banana nessa parte Abra o arquivo de projeto, (** otclient.cbp **) gerado por CMake com CodeBlocks. R = abrir com bloco de notas ? Clique em Build (como na imagem) Quqe Bild ? Imagem off ? CMake Warning (dev) in CMakeLists.txt: No cmake_minimum_required command is present. A line of code such as cmake_minimum_required(VERSION 2.8) should be added at the top of the file. The version specified may be lower if you wish to support older CMake versions for this project. For more information run "cmake --help-policy CMP0000". This warning is for project developers. Use -Wno-dev to suppress it. esse erro ajudar aew gente
  19. 1 - Ola gente queria saber o seguinte toda vez que eu modificar as sources eu vou ter que compilar ele tudo dnv 2 - outra como compila um otclient pois eu vi o tutorial do bannana toda vez que eu tento compilar fica aparecendo erro dll e mt iritante
  20. 1 - Ola gente queria saber o seguinte toda vez que eu modificar as sources eu vou ter que compilar ele tudo dnv 2 - outra como compila um otclient pois eu vi o tutorial do bannana toda vez que eu tento compilar fica aparecendo erro dll e mt iritante
  21. kttallan

    Template

    feixa aki obs eu sabia que existia essa area queria um diferente ahsuahus
  22. Amigo esse bug ja estar sendo consertado para o oficial
  23. kttallan

    Template

    ainda tou com duvida nao entendi foi nada mais mesmo assim vlw alex tem como tu me arruma um template.
  • Quem Está Navegando   0 membros estão online

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