Regras

aqui esta.. mas pelo que vi aqui, usa icone, então nem vai mudar nada.. function onSay(cid, words, param) if param == "" then doPlayerSendCancel(cid, 'Command needs parameters, function structure: "/cb [Pokemon Name], [boost], [Gender]".') return 0 end local t = string.explode(param, ",") local name = "" local gender = 0 local btype = "ultra" --"normal" local typeee = typess[math.random(1, 4)] if t[1] then local n = string.explode(t[1], " ") local str = string.sub(n[1], 1, 1) local sta = string.sub(n[1], 2, string.len(n[1])) name = ""..string.upper(str)..""..string.lower(sta).."" if n[2] then str = string.sub(n[2], 1, 1) sta = string.sub(n[2], 2, string.len(n[2])) name = name.." "..string.upper(str)..""..string.lower(sta).."" end if not pokes[name] then doPlayerSendCancel(cid, "Sorry, a pokemon with the name "..name.." doesn't exists.") return true end print(""..name.." ball has been created by "..getPlayerName(cid)..".") end local genders = { ["male"] = 4, ["female"] = 3, ["1"] = 4, ["0"] = 3} if t[3] then if genders[t[3]] then gender = genders[t[3]] else local rate = newpokedex[name].gender if rate == 0 then gender = 3 elseif rate == 1000 then gender = 4 elseif rate == -1 then gender = 0 elseif math.random(1, 1000) <= rate then gender = 4 else gender = 3 end end else local rate = newpokedex[name].gender if rate == 0 then gender = 3 elseif rate == 1000 then gender = 4 elseif rate == -1 then gender = 0 elseif math.random(1, 1000) <= rate then gender = 4 else gender = 3 end end local mypoke = pokes[name] local happy = 255 local item = doCreateItemEx(2219) doItemSetAttribute(item, "poke", name) doItemSetAttribute(item, "hp", 1) if t[2] and tonumber(t[2]) > 0 and tonumber(t[2]) <= 50 then doItemSetAttribute(item, "boost", tonumber(t[2])) end doItemSetAttribute(item, "happy", happy) doItemSetAttribute(item, "gender", gender) if name == "Shiny Hitmonchan" or name == "Hitmonchan" then doItemSetAttribute(item, "hands", 0) end doItemSetAttribute(item, "description", "Contains a "..name..".") doItemSetAttribute(item, "addon", 0) doItemSetAttribute(item, "fakedesc", "Contains a "..name..".") local x = icons[getItemAttribute(item, "poke")] doPlayerAddItemEx(cid, item, true) doItemSetAttribute(item, "ball", "Icone") doItemSetAttribute(item, "icon", "yes") doItemSetAttribute(item, "morta", "no") doTransformItem(item, x.on) return 1 end  

Pesquisa o npc system kra para de preguiça

Todo servidor baseado no PDA já "possui" o sistema, porém mascarado e com níveis fixos. De toda forma, acabei de postar o ZR com level system  Please login or register to see this link.

► PokeZR com Level System ◄ Após receber inúmeras PMs de pessoas me pedindo esse servidor, resolvi liberar visto que não tem nenhum uso para mim. Que eu me lembre, a única modificação em comparação ao ZR original foi a adição do level system do PDA. ATENÇÃO: o level system do PDA possui um bug onde a ball perde todos os atributos devido a algum erro no TFS 0.3.6 (ou talvez seja apenas uma limitação mesmo devido ao excesso de atributos). É possível também que em algumas situações, o level dos pokemons não apareça para todos os players na tela devido a um erro na função doCreatureSetNick, mas basta fazer a seguinte correção nas sources: • Em luascript.cpp procure por: int32_t LuaScriptInterface::luaDoCreatureSetNick(lua_State* L) • Troque a função inteira por isso: int32_t LuaScriptInterface::luaDoCreatureSetNick(lua_State* L) { //doCreatureSetNick(cid, nick) ScriptEnviroment* env = getEnv(); std::string nick = popString(L); Creature* creature = env->getCreatureByUID(popNumber(L)); if (creature) { SpectatorVec list; g_game.getSpectators(list, creature->getPosition()); Player* player = NULL; creature->Nick = nick; for (SpectatorVec::const_iterator it = list.begin(); it != list.end(); ++it) { if (player = (*it)->getPlayer()) { player->sendCreatureNick(creature); } } lua_pushboolean(L, true); } else { lua_pushboolean(L, false); } return 1; } Download Please login or register to see this link.  - usem o client do PokeZR original mesmo disponível Please login or register to see this link.   Créditos ao @Kydrai pela correção na função doCreatureSetNick.

Link do download não funciona .-.