GugaPlays

Tá ai galera sem muita enrolação, é meu primeiro tutorial, duvidas em relação a poketiba só mandar mensagem que gravo um vídeo explicando.
Caso esteja no local errado por favor coloquem no local certo, nunca criei tópico desse tipo.

Esse script ficou show haha

Testa ai 
 
Script = 
 

local poke = {"Arceus", "Black Mega Alakazam", "Shiny Arceus", "Shiny King Arceus", "Black Arceus", "King Arceus", "Shiny Mr. Mime", "Mega Mewtwo", "Shadow Jirachi", 'Mew', 'Mewtwo', 'Mesprit', 'Mega Alakazam', 'Jirachi', 'Shiny Jirachi', 'Shadow Jirachi', 'Red Jirachi', 'Azelf', 'Manaphy', 'Reshiram', 'Zekrom', 'Ancient Slowking', 'Deoxys', 'Shiny Deoxys', 'Deoxys Attck', 'Deoxys Defense', 'Deoxys Speed', 'Abra', 'Kadabra', 'Alakazam', 'Drowzee', 'Hypno', 'Mr. Mime', 'Porygon', 'Shiny Abra', 'Shiny Alakazam', 'Shiny Hypno', 'Porygon2', "Jynx", "Shiny Jynx", "Slowking", "Girafarig", "Misdreavus", "Exeggutor", "Shiny Espeon"} --alterado v1.9 local etele = 9 local cdtele = 1 local config = { premium = false, -- se precisa ser premium account (true or false) battle = true -- se precisa estar sem battle (true). Se colocar false, poderá usar teleport no meio de batalhas } local places = { [1] = {name = "Saffron", id = 1, sto = 897530}, [2] = {name = "Cerulean", id = 2, sto = 897531}, [3] = {name = "Lavender", id = 3, sto = 897532}, [4] = {name = "Fuchsia", id = 4, sto = 897533}, [5] = {name = "Celadon", id = 5, sto = 897534}, [6] = {name = "Viridian", id = 6, sto = 897535}, --alterado v1.7 [7] = {name = "Vermilion", id = 7, sto = 897536}, [8] = {name = "Pewter", id = 8, sto = 897537}, [9] = {name = "Pallet", id = 9}, [10] = {name = "Cinnabar", id = 10, sto = 897538}, [11] = {name = "Snow", id = 11, sto = 897539}, [12] = {name = "House Isle", id = 17, sto = 897540}, [13] = {name = "Duos", id = 15, sto = 897541}, [14] = {name = "Orre", id = 18, sto = 897542}, [15] = {name = "Canavale", id = 20, sto = 897543}, [16] = {name = "LaRose", id = 19, sto = 897544}, } function onSay(cid, words, param) if #getCreatureSummons(cid) == 0 then doPlayerSendCancel(cid, "You need a pokemon to use teleport.") return true end if not isInArray(poke, getCreatureName(getCreatureSummons(cid)[1])) then return 0 end if getPlayerStorageValue(cid, 22545) == 1 then --golden arena doPlayerSendCancel(cid, "You can't do that while the golden arena!") return true end if getPlayerStorageValue(cid, 212124) >= 1 then --alterado v1.6 return doPlayerSendCancel(cid, "You can't do it with a pokemon with mind controlled!") end if getPlayerStorageValue(cid, 52480) >= 1 then return doPlayerSendCancel(cid, "You can't do it while a duel!") --alterado v1.6 end if getPlayerStorageValue(cid, 6598754) == 1 or getPlayerStorageValue(cid, 6598755) == 1 then return doPlayerSendCancel(cid, "You can't do it while in the PVP Zone!") --alterado v1.7 end if exhaustion.get(cid, etele) and exhaustion.get(cid, etele) > 0 then local tempo = tonumber(exhaustion.get(cid, etele)) or 0 local min = math.floor(tempo) doPlayerSendCancel(cid, "Your pokemon is tired, wait "..getStringmytempo(tempo).." to teleport again.") return true end if config.premium and not isPremium(cid) then doPlayerSendCancel(cid, "Only premium members are allowed to use teleport.") return true end if config.battle and getCreatureCondition(cid, CONDITION_INFIGHT) then doPlayerSendCancel(cid, "Your pokemon can't concentrate during battles.") return true end if (param == '') then local str = "" str = str .. "Places to go :\n\nHouse\n" for a = 1, #places do str = str..""..places[a].name.."\n" end doShowTextDialog(cid, 7416, str) return true end local item = getPlayerSlotItem(cid, 8) local nome = getPokeballName(item.uid) local summon = getCreatureSummons(cid)[1] local lastppos = getThingPos(cid) local lastspos = getThingPos(summon) local telepos = {} local myplace = "" local townid = 0 local citySto = 0 --alterado v1.7 if string.lower(param) == "house" then if not getHouseByPlayerGUID(getPlayerGUID(cid)) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You don't own a house.") return true end telepos = getHouseEntry(getHouseByPlayerGUID(getPlayerGUID(cid))) myplace = "our home" else for x = 1, #places do if string.find(string.lower(places[x].name), string.lower(param)) then townid = places[x].id myplace = places[x].name citySto = places[x].sto or -1 --alterado v1.7 end end if myplace == "" then doPlayerSendCancel(cid, "That place doesn't exist.") return true end end if myplace ~= "" and townid > 0 then telepos = getTownTemplePosition(townid) end if getDistanceBetween(getThingPos(cid), telepos) <= 15 then doPlayerSendCancel(cid, "You are too near to the place you want to go!") return true end if myplace == ("Orre" or "Canavale" or "LaRose") and not isPremium(cid) then doPlayerSendCancel(cid, "Somente jogadores VIP podem ir para esta cidade!") return true end doSendMagicEffect(getThingPos(summon), 29) doSendMagicEffect(getThingPos(cid), 29) doTeleportThing(cid, telepos, false) local pos2 = getClosestFreeTile(cid, getPosByDir(getThingPos(cid), SOUTH)) doTeleportThing(summon, pos2, false) doSendMagicEffect(getThingPos(cid), 29) doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1) doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1, false, 0, lastppos) doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER) doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER, false, 0, lastspos) doCreatureSetLookDir(cid, SOUTH) doCreatureSetLookDir(summon, SOUTH) doSendMagicEffect(getThingPos(summon), CONST_ME_TELEPORT) exhaustion.set(cid, etele, cdtele) setPlayerStorageValue(cid, 98796, -1) setPlayerStorageValue(cid, 98797, -1) return true end Não testei.

Olá galerinha do Tk Beleza Hoje venho trazer para vocês o download de um serve que eu usava para por on ficou 9 meses on base Pokemon anonymos fechei o servidor porque acho que não vale apena o tempo gastado com isso retorno muito pouco e não to afim de fazer um projeto do zero ate porque não manjo de programação ta ai um ótimo server para zoar e se quiser por on e vender itens voês podem vender diamantes as chances dos player conseguir diamantes são Pouquíssima bom proveito para vocês 
obss: não terá nova versão
 
 
Master Ball [100%]
Hydra Stone [Removido]
Mega Stone [100%]
Boost Stone [100%]
Shadow Megas [100%]
Red Megas [100%]
Áreas VIP e Free [100%]
Held System [100%]
Double EXP [100%]
Cooldown dos golpes [100%]
Sistema de Torneio [100%]
Pergaminhos [100%]
Todas as gerações [100%]
Sistema de VIP [100%]
Novas quests [100%]
Base editada Poke Dash [100%]
 
Shiny Stone adicionada funcionando [100%] retirado bug do jogar pokebola uniquid no portal que derrubava o server adicionado novos comandos e eles são [ comando de dar diamantes para player comando !vip teleporta os player para area vips etc se quiser saber todos os comandos existentes fala /commands] adicionado novos pokemons entre eles pookemons mini e outros pokemons lendarios não vou fala todos para o tópico não ficar muito grande novas houser adicionadas  evento creep a cada x tempo aparece 3 creeps em uma ilha tp aparece no cp de saffron na hora do evento  areas de eventos reformuladas os eventos abre por comandos  os player antes podia fazer qualquer quest agora para fazer tem de fazer seguindo a ordem da quest inicial ate a b23 novas quests adicionas  entre outras coisas novas foi muita coisa que foi editado no jogo entre eles spraites etc se voês quiserem saber tudo que foi modificado so pedirem que boto um arquivo de texto para download com todas as modificações 
 
obss: conforme fui fazendo atualização os vidos tambem vem com novas atualizações 
se o server passa de 50 player da leg
se o player passa do lvl 35 k buga e os pokemons da vida aos pokemons selvagens em vez de tirar 
esses são os conhecidos 
 
https://www.facebook.com/groups/875704395965230/
 
obss: o client ta um pouco grande por causa do arquivo do launche que não vou disponibilizar 
 
scan 
 
serve
https://www.virustotal.com/pt/file/a0e616052663eef656415afbbb5812a9d3b173a8811faa88a2aca2d2c830b747/analysis/1492060357/
 
cliente
 
https://www.virustotal.com/pt/file/283c264f785b3c7896d8c3b517e169ee5de6e3f3245af1abd18996e884c34dfd/analysis/
 
se gostou de Rep +
ao pessoal do pokemon anonymos para tras 
eu
luan
/entregar nome do player, valor   exemplo: /entregar lerme, 10 | obss: esse comando ta configurado para entragar diamantes para player tanto online ou off e esta configurados pelos os valor do meu server da uma olada no shopping http://pkmlerme.wixsite.com/pkmlerme
 
/darpoke  para saber como ele funciona quando tiver no server fala /darpoke que explicará como ele funciona 
 
/ta iditem, quantidade     exemplo: quero dar x itens para player on falo /ta 2145, 2 eu dei dois diamantes para todos os player que tiver on

function onStepIn(cid, item, position, fromPosition)
if isMonster(cid) then
doTeleportThing(cid, fromPosition, true)
doSendMagicEffect(getThingPos(cid), 2)
return true
end

if getPlayerGroupId(cid) == 1 then
doTeleportThing(cid, fromPosition, true)
doPlayerSendTextMessage(cid, 25, "ops você não é da staff!.")
doSendMagicEffect(getThingPos(cid), 2)
return false
end
doPlayerSendTextMessage(cid, 25, "Bem-vindo(a)!.")
doSendMagicEffect(getThingPos(cid), 12)
return true
end
 
Muda isso \/
<movevent event="StepIn" uniqueid="3003" script="piso staff.lua"/>
pra isso
<movevent type="StepIn" actionid="56830" event="script" value="piso staff.lua"/>
 
 
coloca actionid 56830,no piso pelo mapa novamente!
 
resultado