kois 22 Postado Março 10, 2012 Share Postado Março 10, 2012 (editado) Alquem ae tem Npc q TROKA cassino Coins por Pokemon local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function doBuyPokemonWithCasinoCoins(cid, poke) npcHandler:onSellpokemon(cid) end function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end if msgcontains(msg, 'pokemon') then selfSay("Hello ".. getCreatureName(cid) .. ", I have two Pokemons to choose one among them, {Eevee} and {Porygon}, which would you choose? ", cid) talkState[cid] = 1 end if (msgcontains(msg, 'Eevee') or msgcontains(msg, 'eevee')) and talkState[cid] == 1 then selfSay("Are you sure you want an Eevee?", cid) talkState[cid] = 2 elseif (msgcontains(msg, 'nao') or msgcontains(msg, 'no')) and talkState[cid] == 2 then selfSay("Did not like this choice? You can choose one {Porygon} too.", cid) talkState[cid] = 1 elseif (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) and talkState[cid] == 2 then local pokemon = Eevee if pokemon == "" then return true end local gender = getRandomGenderByName(pokemon) local mypoke = getPokemonStatus(pokemon) if not mypoke then return true end local level = 5 local extrastr = 1.5 local btype = "normal" local offense = mypoke.off * level * extrastr local defense = mypoke.def * level * extrastr local speed = mypoke.agi * level * extrastr local vit = mypoke.vit * level * extrastr local spatk = mypoke.spatk * level * extrastr local happy = 180 local leveltable = getPokemonExperienceTable(pokemon) local item = doCreateItemEx(2219) doItemSetAttribute(item, "poke", pokemon) doItemSetAttribute(item, "hp", 1) doItemSetAttribute(item, "level", level) doItemSetAttribute(item, "exp", leveltable[level]) doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level]) doItemSetAttribute(item, "offense", offense) doItemSetAttribute(item, "defense", defense) doItemSetAttribute(item, "speed", speed) doItemSetAttribute(item, "vitality", vit) doItemSetAttribute(item, "specialattack", spatk) doItemSetAttribute(item, "happy", happy) doItemSetAttribute(item, "gender", gender) doItemSetAttribute(item, "description", "Contains a "..pokemon..".") doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".") doPlayerAddItemEx(cid, item, true) doTransformItem(item, pokeballs[btype].on) setPlayerStorageValue(cid, 23254, getPlayerStorageValue(cid, 23254) - 22000) selfSay("Here you are! You have just bought an Eevee for 22000 casino coins!", cid) talkState[cid] = 0 end if (msgcontains(msg, 'Porygon') or msgcontains(msg, 'porygon')) and talkState[cid] == 1 then selfSay("Are you sure you want a porygon?", cid) talkState[cid] = 3 elseif (msgcontains(msg, 'nao') or msgcontains(msg, 'no')) and talkState[cid] == 3 then selfSay("Did not like his choice? You can choose a {Eevee} too.", cid) talkState[cid] = 1 elseif (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) and talkState[cid] == 3 then local pokemon1 = Porygon if pokemon1 == "" then return true end local gender = getRandomGenderByName(pokemon1) local mypoke = getPokemonStatus(pokemon1) if not mypoke then return true end local level = 5 local extrastr = 1.5 local btype = "normal" local offense = mypoke.off * level * extrastr local defense = mypoke.def * level * extrastr local speed = mypoke.agi * level * extrastr local vit = mypoke.vit * level * extrastr local spatk = mypoke.spatk * level * extrastr local happy = 180 local leveltable = getPokemonExperienceTable(pokemon1) local item = doCreateItemEx(2219) doItemSetAttribute(item, "poke", pokemon1) doItemSetAttribute(item, "hp", 1) doItemSetAttribute(item, "level", level) doItemSetAttribute(item, "exp", leveltable[level]) doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level]) doItemSetAttribute(item, "offense", offense) doItemSetAttribute(item, "defense", defense) doItemSetAttribute(item, "speed", speed) doItemSetAttribute(item, "vitality", vit) doItemSetAttribute(item, "specialattack", spatk) doItemSetAttribute(item, "happy", happy) doItemSetAttribute(item, "gender", gender) doItemSetAttribute(item, "description", "Contains a "..pokemon1..".") doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon1..".") doPlayerAddItemEx(cid, item, true) doTransformItem(item, pokeballs[btype].on) setPlayerStorageValue(cid, 23254, getPlayerStorageValue(cid, 23255) - 45000) selfSay("Here you are! You have just bought a Porygon for 45000 casino coins!",cid) talkState[cid] = 0 end end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) Esse Script q eu uso mais vc fala Hi/pokemon/nome do pokemon/dai ela nao fala mais nada e nao da o pokemon alquem me ajuda ae Editado Março 10, 2012 por Kois Link para o comentário Compartilhar em outros sites More sharing options...
Dudu08267 7 Postado Março 10, 2012 Share Postado Março 10, 2012 (editado) '-' no otscript live ta dando isso kois INFO: Starting OTScript Debug.lua ERROR: Cópia de config.lua:1: attempt to index global 'KeywordHandler' (a nil value) INFO: Stopping OTScript Debug.lua não poderia ser nessa tal keywordHandler? '-' Editado Março 10, 2012 por Dudu08267 Link para o comentário Compartilhar em outros sites More sharing options...
Slicer 1070 Postado Março 10, 2012 Share Postado Março 10, 2012 (editado) @Dudu08267 isso da em qlqr script de npc.. @Kois usa esse ^^ ja testei.. parece ta 100%... eh.. achei uns problemas como o price do porygon e se o cara tivese 6 pokes sei la pra onde ia a ball.. mas ja corri.. entao se alguem ja tiver pego o npc.. por favor pegue denovo! npc cassino, pokes por cassino coins... by kois, edited by me local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function doBuyPokemonWithCasinoCoins(cid, poke) npcHandler:onSellpokemon(cid) end function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end ------------------------------------------------------------ local function buyPoke(cid, pokemon, price, lvl) if pokemon == "" then return true end local gender = getRandomGenderByName(pokemon) local mypoke = getPokemonStatus(pokemon) if not mypoke then return true end local level = lvl local extrastr = 1.5 local btype = "normal" local offense = mypoke.off * level * extrastr local defense = mypoke.def * level * extrastr local speed = mypoke.agi * level * extrastr local vit = mypoke.vit * level * extrastr local spatk = mypoke.spatk * level * extrastr local happy = 180 local leveltable = getPokemonExperienceTable(pokemon) if getPlayerFreeCap(cid) >= 6 or getContainerSize(getPlayerSlotItem(cid, 3).uid) >= 18 then item = doCreateItemEx(11826) else item = doAddContainerItem(getPlayerSlotItem(cid, 3).uid, 11826, 1) end doItemSetAttribute(item, "poke", pokemon) doItemSetAttribute(item, "hp", 1) doItemSetAttribute(item, "level", level) doItemSetAttribute(item, "exp", leveltable[level]) doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level]) doItemSetAttribute(item, "offense", offense) doItemSetAttribute(item, "defense", defense) doItemSetAttribute(item, "speed", speed) doItemSetAttribute(item, "vitality", vit) doItemSetAttribute(item, "specialattack", spatk) doItemSetAttribute(item, "happy", happy) doItemSetAttribute(item, "gender", gender) doItemSetAttribute(item, "description", "Contains a "..pokemon..".") doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".") if getPlayerFreeCap(cid) >= 6 or getContainerSize(getPlayerSlotItem(cid, 3).uid) >= 18 then doPlayerSendMailByName(getCreatureName(cid), item, 1) end setPlayerStorageValue(cid, 23254, getPlayerStorageValue(cid, 23254) - price) end ------------------------------------------------------------------------------ if msgcontains(msg, 'pokemon') then selfSay("Hello ".. getCreatureName(cid) .. ", I have two Pokemons to choose one among them, {Eevee} and {Porygon}, which would you choose? ", cid) talkState[cid] = 1 elseif (msgcontains(msg, 'Eevee') or msgcontains(msg, 'eevee')) and talkState[cid] == 1 then selfSay("Are you sure you want buy an Eevee for 22000 cassino coins?", cid) talkState[cid] = 2 elseif (msgcontains(msg, 'Porygon') or msgcontains(msg, 'porygon')) and talkState[cid] == 1 then selfSay("Are you sure you want buy an Porygon for 45000 cassino coins?", cid) talkState[cid] = 3 elseif (msgcontains(msg, 'nao') or msgcontains(msg, 'no')) and talkState[cid] == 2 then selfSay("Did not like this choice? You can choose one {Porygon} too.", cid) talkState[cid] = 1 elseif (msgcontains(msg, 'nao') or msgcontains(msg, 'no')) and talkState[cid] == 3 then selfSay("Did not like this choice? You can choose one {Eevee} too.", cid) talkState[cid] = 1 elseif (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) and talkState[cid] == 2 then if getPlayerStorageValue(cid, 23254) >= 22000 then local pokemon = "Eevee" local price = 22000 local lvl = 20 buyPoke(cid, pokemon, price, lvl) selfSay("Here you are! You have just bought an "..pokemon.." for "..price.." casino coins!", cid) talkState[cid] = 0 else selfSay("You don't have enought cassino coins!", cid) talkState[cid] = 0 end elseif (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) and talkState[cid] == 3 then if getPlayerStorageValue(cid, 23254) >= 45000 then local pokemon = "Porygon" local price = 45000 local lvl = 40 buyPoke(cid, pokemon, price, lvl) selfSay("Here you are! You have just bought an "..pokemon.." for "..price.." casino coins!", cid) talkState[cid] = 0 else selfSay("You don't have enought cassino coins!", cid) talkState[cid] = 0 end end end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) Editado Março 11, 2012 por Slicer Link para o comentário Compartilhar em outros sites More sharing options...
ZeNit91 11 Postado Março 10, 2012 Share Postado Março 10, 2012 O npc do Cassino ta bugado. Vou tentar resolver aki depois posto a solucao para galera Link para o comentário Compartilhar em outros sites More sharing options...
Roversinho 2 Postado Março 10, 2012 Share Postado Março 10, 2012 alguém pode me ajuda toda ves que ponho online outras pessoas n conseguem logar apenas eu da error conection failed Link para o comentário Compartilhar em outros sites More sharing options...
Slicer 1070 Postado Março 11, 2012 Share Postado Março 11, 2012 @Zerons bugado? expecifique.. pois em meus testes estava 100%.. lembrando q eh hi, pokemon, nome do poke, yes Link para o comentário Compartilhar em outros sites More sharing options...
MarcosFraga 34 Postado Março 11, 2012 Share Postado Março 11, 2012 (editado) @Zerons bugado? expecifique.. pois em meus testes estava 100%.. lembrando q eh hi, pokemon, nome do poke, yes 100% funcional só tive que mecher no script da coin case pois o maximo permitido era 1000 coloquei 10.000 trocou pokemon normal e diminiui da case certinho. Rep+ Quem estiver tentando com acc de god não vai ir pra bp mesmo com free cap vai direto pro CP. Editado Março 11, 2012 por SoulOroshie Link para o comentário Compartilhar em outros sites More sharing options...
Denuvo 71 Postado Março 11, 2012 Share Postado Março 11, 2012 algen sabe dizer como poe 20% a mais de exp para players vips? ou se ja tem no server? obg rep+ Link para o comentário Compartilhar em outros sites More sharing options...
Slicer 1070 Postado Março 11, 2012 Share Postado Março 11, 2012 @SoulOroshie eh eh.. maldito GOD com full cap ;p Link para o comentário Compartilhar em outros sites More sharing options...
SaikiSailed 0 Postado Março 11, 2012 Share Postado Março 11, 2012 Como acomodo las fotos de pokes johtos en el Pokemon bar? Link para o comentário Compartilhar em outros sites More sharing options...
ZeNit91 11 Postado Março 11, 2012 Share Postado Março 11, 2012 @Zerons bugado? expecifique.. pois em meus testes estava 100%.. lembrando q eh hi, pokemon, nome do poke, yes @Zerons bugado? expecifique.. pois em meus testes estava 100%.. lembrando q eh hi, pokemon, nome do poke, yes 100% funcional só tive que mecher no script da coin case pois o maximo permitido era 1000 coloquei 10.000 trocou pokemon normal e diminiui da case certinho. Rep+ Quem estiver tentando com acc de god não vai ir pra bp mesmo com free cap vai direto pro CP. mlz fata erro meu tava testado do kois --' Link para o comentário Compartilhar em outros sites More sharing options...
fernandofw 2 Postado Março 11, 2012 Share Postado Março 11, 2012 Me ajudem preciso de um um npc. q tipo no meu ot tem cassino qdo ajente tiver 5000 pontos fala com o npc diz hi hitmonlee yes e ganha um hitmonlee e paga 5000 coin? Podem colocar um script e colar aqui pra mim e o .lua tb? Link para o comentário Compartilhar em outros sites More sharing options...
AlanWake 0 Postado Março 11, 2012 Share Postado Março 11, 2012 Alguem ai pode postar o negocio das promotion que nem o da zeref se possivel vc zeref posta ai seu server, se nao ql a versao do server mais nova? Rep+ Link para o comentário Compartilhar em outros sites More sharing options...
Denuvo 71 Postado Março 11, 2012 Share Postado Março 11, 2012 como faço pra diminuir o rate da pesca tá mt rapido.. um kra no meu serve ja ta lvl 85 só pescando de ontem pra hj obg Link para o comentário Compartilhar em outros sites More sharing options...
Slicer 1070 Postado Março 11, 2012 Share Postado Março 11, 2012 (editado) @fernandinhobeiramar mano volta uma pagina e pega o script q eu postei la e edita ele pra hitmonlee/chan.. n eh dificil.. ;x @AlanWake a versao mais nova eh a q ta na 1* pagina desse topico.. e duvido q ele poste a dele ^^ @ChuckNorris666 oia mano.. achu q o unico jeito de arruma isso eh na source... pq se tu coloca o minimo ainda vai upa muito rapido.. ;x deve ter como aumenta a qntdade de pnts q precisa pra upa 1 lvl de pesca na source sei la.. ou algu do genero.. ;x detalhe.. no meu outro serv eu coloquei um math.random pra add pnt de fishing.. tpw.. dai no caso teria 30% chance de aumenta fishing.. dai ia upando mais lento.. mas vai de cada um neh.. ;x if math.random(1, 100) <= 30 then add pnt em fishing end Editado Março 11, 2012 por Slicer Link para o comentário Compartilhar em outros sites More sharing options...
Posts Recomendados