Ir para conteúdo

Superkoopa

Membro
  • Registro em

  • Última visita

  1. lauasss reagiu a uma resposta no tópico: Mega Mewtwo Y
  2. isex reagiu a uma resposta no tópico: Muitos Shiny *-*
  3. isex reagiu a uma resposta no tópico: Mega Mewtwo Y
  4. Azareft reagiu a uma resposta no tópico: Mega Mewtwo Y
  5. Isso ai não é nada 3D, é só um gif, você pode ir catando eles no google msm. Tipo essa minha foto
  6. Superkoopa alterou sua foto pessoal
  7. Superkoopa postou uma resposta no tópico em Formação de Equipe
    Como posso manter contato? Sei usar o Remere's Map Editor em um nível bem avançado! Se quiser chamar entra nesse rede de Hamachi >> CTUSUIS // Senha: 123 << É primitivo eu sei, mais é um jeito bem rápido!
  8. cleber13 reagiu a uma resposta no tópico: Mega Mewtwo Y
  9. Eu estava tentando fazer o seguinte no meu poketibia: Derrotar Brock Brock da uma storage Ir até a Misty Misty verifica se o Brock deu a storage Derrotar Misty Misty da uma storage e assim por diante até chegar na liga, sem pular nenhum líder de ginásio! Mais não funciona sou muito, muito novo mesmo nessas coisas... olha a script do brock e da misty: Brock: local focus = 0 local max_distance = 8 local talk_start = 0 local conv = 0 local fighting = false local challenger = 0 local afk_limit_time = 30 -- seconds local afk_time = 0 -- don't change local battle_turn = 1 -- don't change local challenger_turn = 0 -- don't change local pokemons = { {name = "Geodude", level = 10, extralevel = 0, sex = SEX_MALE, nick = "", ball = "normal"}, {name = "Onix", level = 12, extralevel = 0, sex = SEX_MALE, nick = "", ball = "normal"}, } local function doSummonGymPokemon(npc) local this = npc if not isCreature(this) then return true end if #getCreatureSummons(this) >= 1 or focus == 0 then return true end local it = pokemons[battle_turn] doSummonMonster(this, it.name) local summon = getCreatureSummons(this)[1] local balleffect = pokeballs["normal"].effect if it.ball and pokeballs[it.ball] then balleffect = pokeballs[it.ball].effect end doSendMagicEffect(getThingPos(summon), balleffect) setPlayerStorageValue(summon, 10000, balleffect) setPlayerStorageValue(summon, 10001, gobackmsgs[math.random(#gobackmsgs)].back:gsub("doka", it.nick ~= "" and it.nick or it.name)) setPlayerStorageValue(summon, 1007, it.nick ~= "" and it.nick or it.name) doSetMonsterGym(summon, focus) local name = it.nick ~= "" and it.nick or getCreatureName(this).."s "..it.name setWildPokemonLevel(summon, it.level, getPokemonStatus(it.name, (it.extralevel + it.level)), name, 1.5) doCreatureSay(this, gobackmsgs[math.random(#gobackmsgs)].go:gsub("doka", getPlayerStorageValue(summon, 1007)), 1) fighting = true battle_turn = battle_turn + 1 end local function doWinDuel(cid, npc) if not isCreature(cid) then return true end local this = npc local a = gymbadges[getCreatureName(this)] + 8 doCreatureSay(npc, "You won the duel! Congratulations, take this "..getItemNameById(a - 8).." as a prize.", 1) setPlayerStorageValue(cid, 99951, 3) local b = getPlayerItemById(cid, true, a) if b.uid > 0 then doTransformItem(b.uid, b.itemid - 8) end end function onCreatureSay(cid, type, msg) local msg = string.lower(msg) if focus == cid then talk_start = os.clock() end if msgcontains(msg, 'hi') and focus == 0 and getDistanceToCreature(cid) <= 4 then focus = cid talk_start = os.clock() conv = 1 selfSay("Hello "..getCreatureName(cid)..", my name is Brock and I'm Pewter's Gym Leader. How may I help you?") return true end if isDuelMsg(msg) and conv == 1 and focus == cid then --if getPlayerItemCount(cid, gymbadges[getCreatureName(getThis())]) >= 1 then -- selfSay("You have already won my Boulder Badge, maybe some other day we can fight.") -- focus = 0 --return true --end if not hasPokemon(cid) then selfSay("To battle agains't a gym leader you need pokemons.") return true end selfSay("You are challenging me to a battle. It will be a "..#pokemons.." pokemon limit battle, let's start?") conv = 2 return true end if isConfirmMsg(msg) and conv == 2 and focus == cid then challenger = focus setPlayerStorageValue(cid, 990, 1) selfSay("Yea, let's fight!") talk_start = os.clock() addEvent(doSummonGymPokemon, 850, getThis()) conv = 3 return true end if isNegMsg(msg) and conv == 2 and focus == cid then focus = 0 selfSay("It is better for you to refuse a battle against me!") return true end if msgcontains(msg, 'bye') and focus == cid then selfSay('Bye and do your best trainer!') setPlayerStorageValue(focus, 990, -1) focus = 0 return true end end local afk_warning = false local change = false function onThink() if focus == 0 then selfTurn(2) fighting = false challenger = 0 challenger_turn = 0 battle_turn = 1 afk_time = 0 afk_warning = false if #getCreatureSummons(getThis()) >= 1 then setPlayerStorageValue(getCreatureSummons(getThis())[1], 1006, 0) doCreatureAddHealth(getCreatureSummons(getThis())[1], -getCreatureMaxHealth(getCreatureSummons(getThis())[1])) end return true else if not isCreature(focus) then focus = 0 return true end if fighting then talk_start = os.clock() if not isCreature(getCreatureTarget(getThis())) then if #getCreatureSummons(challenger) >= 1 then if getCreatureOutfit(getCreatureSummons(challenger)[1]).lookType ~= 2 then --alterado v2.6 selfAttackCreature(getCreatureSummons(challenger)[1]) challenger_turn = challenger_turn + 1 afk_time = 0 end else afk_time = afk_time + 0.5 if change then change = false challenger_turn = challenger_turn + 1 end end end if afk_time > afk_limit_time then setPlayerStorageValue(focus, 990, -1) focus = 0 selfSay("I have waited too long, come back when you are ready!") return true end if not afk_warning and afk_time > afk_limit_time / 2 then selfSay("Where's your pokemon? Let's fight!") afk_warning = true end if #getCreatureSummons(getThis()) == 0 then if battle_turn > #pokemons then addEvent(doWinDuel, 1000, focus, getThis()) setPlayerStorageValue(focus, 990, -1) focus = 0 return true end addEvent(doSummonGymPokemon, 1000, getThis()) end if not hasPokemon(challenger) or challenger_turn >= 7 or challenger_turn > #pokemons then selfSay("You lost our duel! Maybe some other time you'll defeat me.") setPlayerStorageValue(focus, 990, -1) focus = 0 return true end end local npcpos = getThingPos(getThis()) local focpos = getThingPos(focus) if npcpos.z ~= focpos.z then setPlayerStorageValue(focus, 990, -1) focus = 0 selfSay("Bye then.") return true end if (os.clock() - talk_start) > 30 then selfSay("Good bye and keep training!") setPlayerStorageValue(focus, 990, -1) focus = 0 end if getDistanceToCreature(focus) > max_distance then setPlayerStorageValue(focus, 990, -1) focus = 0 return true end local dir = doRedirectDirection(getDirectionTo(npcpos, focpos)) selfTurn(dir) end return true end Misty: local focus = 0 local max_distance = 8 local talk_start = 0 local conv = 0 local fighting = false local challenger = 0 local afk_limit_time = 30 -- seconds local afk_time = 0 -- don't change local battle_turn = 1 -- don't change local challenger_turn = 0 -- don't change local pokemons = { {name = "Staryu", level = 18, extralevel = 0, sex = SEX_MALE, nick = "", ball = "normal"}, {name = "Starmie", level = 21, extralevel = 0, sex = SEX_MALE, nick = "", ball = "normal"}, } local function doSummonGymPokemon(npc) local this = npc if #getCreatureSummons(this) >= 1 or focus == 0 then return true end local it = pokemons[battle_turn] doSummonMonster(this, it.name) local summon = getCreatureSummons(this)[1] local balleffect = pokeballs["normal"].effect if it.ball and pokeballs[it.ball] then balleffect = pokeballs[it.ball].effect end doSendMagicEffect(getThingPos(summon), balleffect) setPlayerStorageValue(summon, 10000, balleffect) setPlayerStorageValue(summon, 10001, gobackmsgs[math.random(#gobackmsgs)].back:gsub("doka", it.nick ~= "" and it.nick or it.name)) setPlayerStorageValue(summon, 1007, it.nick ~= "" and it.nick or it.name) doSetMonsterGym(summon, focus) local name = it.nick ~= "" and it.nick or getCreatureName(this).."s "..it.name setWildPokemonLevel(summon, it.level, getPokemonStatus(it.name, it.extralevel + it.level), name, 1.5) doCreatureSay(this, gobackmsgs[math.random(#gobackmsgs)].go:gsub("doka", getPlayerStorageValue(summon, 1007)), 1) fighting = true battle_turn = battle_turn + 1 end local function doWinDuel(cid, npc) if getPlayerStorageValue(cid, 99951) == 6 then if not isCreature(cid) then return true end local this = npc local a = gymbadges[getCreatureName(this)] + 8 doCreatureSay(npc, "You won the duel! Congratulations, take this "..getItemNameById(a - 8).." as a prize.", 1) setPlayerStorageValue(cid, 99952, 3) local b = getPlayerItemById(cid, true, a) if b.uid > 0 then doTransformItem(b.uid, b.itemid - 8) end else selfSay("Voce ainda não derrotou Brock!", cid) talkState[cid] = 0 return true end function onCreatureSay(cid, type, msg) local msg = string.lower(msg) if focus == cid then talk_start = os.clock() end if msgcontains(msg, 'hi') and focus == 0 and getDistanceToCreature(cid) <= 4 then focus = cid talk_start = os.clock() conv = 1 selfSay("Hello "..getCreatureName(cid)..", my name is Misty and I'm Cerulean's Gym Leader. How may I help you?") return true end if isDuelMsg(msg) and conv == 1 and focus == cid then --if getPlayerItemCount(cid, gymbadges[getCreatureName(getThis())]) >= 1 then -- selfSay("You have already won my Cascade Badge, maybe some other day we can fight.") -- focus = 0 --return true --end if not hasPokemon(cid) then selfSay("To battle agains't a gym leader you need pokemons.") return true end selfSay("You are challenging me to a battle. It will be a "..#pokemons.." pokemon limit battle, let's start?") conv = 2 return true end if isConfirmMsg(msg) and conv == 2 and focus == cid then challenger = focus setPlayerStorageValue(cid, 990, 1) selfSay("Yea, let's fight!") talk_start = os.clock() addEvent(doSummonGymPokemon, 850, getThis()) conv = 3 return true end if isNegMsg(msg) and conv == 2 and focus == cid then focus = 0 selfSay("It is better for you to refuse a battle against me!") return true end if msgcontains(msg, 'bye') and focus == cid then selfSay('Bye and do your best trainer!') setPlayerStorageValue(focus, 990, -1) focus = 0 return true end end local afk_warning = false function onThink() --doSendAnimatedText(getThingPos(getThis()), getCreatureName(getThis()), 215) if focus == 0 then selfTurn(2) fighting = false challenger = 0 challenger_turn = 0 battle_turn = 1 afk_time = 0 afk_warning = false if #getCreatureSummons(getThis()) >= 1 then setPlayerStorageValue(getCreatureSummons(getThis())[1], 1006, 0) doCreatureAddHealth(getCreatureSummons(getThis())[1], -getCreatureMaxHealth(getCreatureSummons(getThis())[1])) end return true else if not isCreature(focus) then focus = 0 return true end if fighting then talk_start = os.clock() if not isCreature(getCreatureTarget(getThis())) then if #getCreatureSummons(challenger) >= 1 then if getCreatureOutfit(getCreatureSummons(challenger)[1]).lookType ~= 2 then --alterado v2.6 selfAttackCreature(getCreatureSummons(challenger)[1]) challenger_turn = challenger_turn + 1 afk_time = 0 end else afk_time = afk_time + 0.5 end end if afk_time > afk_limit_time then setPlayerStorageValue(focus, 990, -1) focus = 0 selfSay("I have waited too long, come back when you are ready!") return true end if not afk_warning and afk_time > afk_limit_time / 2 then selfSay("Where's your pokemon? Let's fight!") afk_warning = true end if #getCreatureSummons(getThis()) == 0 then if battle_turn > #pokemons then addEvent(doWinDuel, 1000, focus, getThis()) setPlayerStorageValue(focus, 990, -1) focus = 0 return true end addEvent(doSummonGymPokemon, 1000, getThis()) end if not hasPokemon(challenger) or challenger_turn >= 7 or challenger_turn > #pokemons then selfSay("You lost our duel! Maybe some other time you'll defeat me.") setPlayerStorageValue(focus, 990, -1) focus = 0 return true end end local npcpos = getThingPos(getThis()) local focpos = getThingPos(focus) if npcpos.z ~= focpos.z then setPlayerStorageValue(focus, 990, -1) focus = 0 selfSay("Bye then.") return true end if (os.clock() - talk_start) > 30 then selfSay("Good bye and keep training!") setPlayerStorageValue(focus, 990, -1) focus = 0 end if getDistanceToCreature(focus) > max_distance then setPlayerStorageValue(focus, 990, -1) focus = 0 return true end local dir = doRedirectDirection(getDirectionTo(npcpos, focpos)) selfTurn(dir) end return true end UP
  10. L3K0T começou a seguir Superkoopa
  11. L3K0T reagiu a uma resposta no tópico: Muitos Shiny *-*
  12. Superkoopa postou uma resposta no tópico em Sprites
    Olá , só passei pra postar alguns shiny q fiz pro meu poketibia. Ai achei melhor postar pra todo mundo usar :D Shiny: Bulbasaur, Ivysaur, Charmander, Charmeleon, Squirtle (SURF), Wartotle (SURF), Caterpie, Metapod, Weedle, Kakuna, Treecko, Torchic, Combusken, Mudkip, Marshtomp, Sceptile, Grovyle, Swampert, TOGEKISS <<< Esqueci de colocar na foto :x Link: http://www.mediafire.com/file/b4nn2m78v8r771x/Shiny.rar Scan: https://www.virustotal.com/pt/file/677838328fd6fd628ab8a1af4ad38b238f9a22da76c84fd1b570a4ded5886117/analysis/ <<< Isso deve servir :D
  13. Superkoopa postou uma resposta no tópico em Sprites
    Bom eu já criei esse post mais parece que ele não saiu , ent vamos lá! Essa é a sprite do Mega Mewtwo Y/Shiny Mega Mewtwo feitas por min , pra servidores que tem Icon System os ícones já estão ai! Foto Se gostou da REP+ Link: http://www.mediafire.com/file/15n5buc8kef6xe4/Mega_Mewtwo_Y.rar Scan: https://www.virustotal.com/pt/file/b6c23fd84c83767bc9134fd57ff4bd83fa9e51dc7a26c14e8a71663442e11ef3/analysis/1482325750/ Creditos: -Eu, por ter feito a sprite -PXG por ter feito o Mewtwo que eu usei
  14. Superkoopa postou uma resposta no tópico em Formação de Equipe
    Spriter e um pouco scripter... Se quiser conversar entra nessa rede do Hamachi: PokemonWordlOnline007 123
  15. Entra nesa sala do Hamachi: Sala: TBKCCPOKETIBIA Senha: 123
  16. Cara já criei minha conta lá... To esperando vc me responder! Manda seu nick la pra gente conversar 05/10/2016 as 12:40 vou estar on te esperando lá
  17. Superkoopa postou uma resposta no tópico em Formação de Equipe
    Eai galera do Tibiaking Estou aqui para apresentar meu projeto Pokémon Wordl Online! Nos temos: Sistema de Mega Evolução <<< OBS: As Mega Evoluções estão balanceadas e podem ser revertidas! <<< Pokémons 1,2 e 3ª geração Boost System 100% Clã System 100% Ditto System 100% Master Ball System 50% <<< Falta bloquear alguns Shinies entre outros sistemas... --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- Vagas para: Scripter Mapper --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- Desejamos crescer e nos tornar um servidor grande!
  18. Superkoopa reagiu a uma resposta no tópico: Como criar item infinito
  19. Superkoopa postou uma resposta no tópico em Suporte Tibia OTServer
    Gente estou com um problema aqui! Eu criei uma Mega Stone "Charizardite X" e queria saber como deixa-la infinita, que nunca quebre Ja coloquei isso no item: <attribute key="breakChance" value="0" /> E continua sumindo quando eu uso Alguém sabe como resolver?
  20. Ok vou postar... Bom não é bem uma Mega Stone eu fiz por cima da Shiny Fire Stone e por ai vai! <item id="12401" article="a" name="Absolite"> <attribute key="description" value="A unknow Stone" /> </item> <item id="12402" article="a" name="Alakazite"> <attribute key="description" value="A unknow Stone" /> </item> <item id="12403" article="a" name="Ampharosite"> <attribute key="description" value="A unknow Stone" /> </item> <item id="12404" article="a" name="Blastoisinite"> <attribute key="description" value="A unknow Stone" /> </item> <item id="12405" article="a" name="Charizardite X"> <attribute key="description" value="A unknow Stone" /> </item> <item id="12407" article="a" name="Steelixite"> <attribute key="description" value="A unknow Stone" /> </item> <item id="12408" article="a" name="Tyranitarite"> <attribute key="description" value="A unknow Stone" /> </item> <item id="12409" article="a" name="Venusarite"> <attribute key="description" value="A unknow Stone" /> </item>
  21. Cara não deu certo, eu queria fazer uma Mega Stone infinita pro meu Poketibia, no caso a Charizardite X
  22. Superkoopa reagiu a uma resposta no tópico: Como criar item infinito
  23. Queria saber como criar um item infinito,que possa ser usado quantas vezes eu quiser. Se alguém souber posta ai!
  24. Olá. Como fazer um item que mudar de direções? exemplo: uma geladeira que pode ficar de frente ou de lado Foto:

Informação Importante

Confirmação de Termo