Subwat

bah nem sei como funciona um server de pokemon. =/

BOM EU TENHO ESSE SISTEMA DE RANKS AQUI EM BAIXO,eu queria um NOVO Rank AO FALAR !rank votos,aparecer quem tem mais storagevalue 6004, VLW. acho que é simples só que eu nao sei fazer. VOU DAR REP+ FLW function getPlayerNameByGUID2(n) local c = db.getResult("SELECT `name` FROM `players` WHERE `id` = "..n..";") if c:getID() == -1 then return "SQL_ERROR["..n.."]" end return c:getDataString("name") end function onSay(cid, words, param) local max = 100 local letters_to_next = 20 local skills = { ['fist'] = 0, ['club'] = 1, ['sword'] = 2, ['axe'] = 3, ['distance'] = 4, ['shielding'] = 5, ['fishing'] = 6, ['dist'] = 4, ['shield'] = 5, ['fish'] = 6, } local name_now local name = "Highscore for level\n" local rkn = 0 local no_break = 0 param = string.lower(param) dofile('config.lua') if param == "" or param == "level" and ( param ~= "magic" and param == "ml") and skills[param] == nil then name = name.."\n" name = name.."Rank Level - Nome do Jogador\n" local v = db.getResult("SELECT `name`, `level`, `experience` FROM `players` WHERE `group_id` <= 2 ORDER BY `experience` DESC LIMIT 0,"..(max)..";") repeat no_break = no_break +1 if v:getID() == -1 then break end rkn = rkn+1 name_now, l = v:getDataString("name"), string.len(v:getDataString("name")) space = "" for i=1, letters_to_next-l do space = space.." " end name = name..rkn..". "..v:getDataInt("level") .." - "..name_now..space.." ".."\n" if no_break >= 20 then break end until v:next() == false elseif param == "magic" or param == "ml" then name = name.."\n" name = name.."Rank Magic - Nome do Jogador\n" local v = db.getResult("SELECT `name`, `level`, `maglevel` FROM `players` WHERE `group_id` <= 2 ORDER BY `maglevel` DESC LIMIT 0,"..(max)..";") repeat if v:getID() == -1 then break end rkn = rkn+1 name_now, l = v:getDataString("name"), string.len(v:getDataString("name")) space = "" for i=1, letters_to_next-l do space = space.." " end name = name..rkn..". "..v:getDataInt("maglevel").." - "..name_now..space.." ".." ".."".."\n" until v:next() == false elseif param == "mana" or param == "MANA" then name = name.."\n" name = name.."Rank Mana - Nome do Jogador\n" local v = db.getResult("SELECT `name`, `level`, `manamax` FROM `players` WHERE `group_id` <= 2 ORDER BY `manamax` DESC LIMIT 0,"..(max)..";") repeat if v:getID() == -1 then break end rkn = rkn+1 name_now, l = v:getDataString("name"), string.len(v:getDataString("name")) space = "" for i=1, letters_to_next-l do space = space.." " end name = name..rkn..". "..v:getDataInt("manamax").." - "..name_now..space.." ".." ".."".."\n" until v:next() == false elseif param == "health" or param == "hp" then name = name.."\n" name = name.."Rank Health - Nome do Jogador\n" local v = db.getResult("SELECT `name`, `level`, `healthmax` FROM `players` WHERE `group_id` <= 2 ORDER BY `healthmax` DESC LIMIT 0,"..(max)..";") repeat if v:getID() == -1 then break end rkn = rkn+1 name_now, l = v:getDataString("name"), string.len(v:getDataString("name")) space = "" for i=1, letters_to_next-l do space = space.." " end name = name..rkn..". "..v:getDataInt("healthmax").." - "..name_now..space.." ".." ".."".."\n" until v:next() == false elseif param == "resets" then name = name.."Rank Resets - Nome do Jogador\n" local v = db.getResult("SELECT `player_id`, `value` FROM `player_storage` WHERE `key` = 1020 ORDER BY `value` DESC LIMIT 0,"..(max)..";") local kk = 0 repeat if kk == max or v:getID() == -1 then break end kk = kk+1 name_now, l = getPlayerNameByGUID2(v:getDataInt("player_id")), string.len(getPlayerNameByGUID2(v:getDataInt("player_id"))) space = "" for i=1, letters_to_next-l do space = space.." " end if name_now == nil then name_now = 'sql error['..v:getDataInt("player_id")..']' end name = name..kk..". "..v:getDataInt("value").." - "..name_now..space.." ".." ".."".."\n" until v:next() == false elseif skills[param] ~= nil then name = name.."\n" name = name.."Rank "..param.." fighting - Nome do Jogador\n" local v = db.getResult("SELECT `player_id`, `value` FROM `player_skills` WHERE `skillid` = "..skills[param].." ORDER BY `value` DESC;") local kk = 0 repeat if kk == max or v:getID() == -1 then break end kk = kk+1 name_now, l = getPlayerNameByGUID2(v:getDataInt("player_id")), string.len(getPlayerNameByGUID2(v:getDataInt("player_id"))) space = "" for i=1, letters_to_next-l do space = space.." " end if name_now == nil then name_now = 'sql error['..v:getDataInt("player_id")..']' end name = name..kk..". "..v:getDataInt("value").." - "..name_now..space.." \n" until v:next() == false end if name ~= "Highscore\n" then doShowTextDialog(cid, 6500, name) end return true end

Uma dúvida. Qualquer vocação irá estár apta a usar este sistema? ou é só para Mages?

Ae pessoal VENHO POSTAR A NOVA VERSÃO DO HEROSERV AGORA SEM BUGS E COM MUITAS NOVIDADES. COMANDOS:!!sword (1kk precisa ter promotion "riot knight") !axe (1kk precisa ter promotion "riot knight") !club (1kk precisa ter promotion "riot knight") !sorcerer (1kk precisa ter promotion "riot sorcerer") !druid (1kk precisa ter promotion "riot druid") !knightshield (1kk precisa ter promotion "riot knight") !paladinshield (1kk precisa ter promotion "riot paladin") !paladinmagic (1kk precisa ter promotion "riot paladin") !knightmagic (1kk precisa ter promotion "riot knight") !rank hp !rank mana !buyvip CIDADES arumha vip city ice island sphere DOWNLOAD:HEROSERV 0.0.6 CRÉDITOS: SUBWAT (99%) mix Team (1% pelo distro) SEM O BUG DE PEGAR GOD OU QUALQUER COISA PARECIDA,SE TIVER ALGUM BUG NO MAPA ME AVISEM FLWS!

cara fico perfeito esse sistema.

sim tem que por está tag primeiro. <talkaction words="!repair;/repair" script="REPAIR.lua"/>

vlw man,se tiver algum bug se me reporta que essa semana to me dedicando a arrumar bugs. flw

eu fiz um uma vez por talkaction saka só xD é meio antigo acho q foi ano passado esse script --[[ script By Subwat Reparar soft e firewalker!]]-- function onSay(cid, words, param) local config = { price = 10000, new_soft = 6132, -- id da nova soft boots worn_soft = 10021, -- id da velha soft boots new_firewalker = 9933, -- id da firewalker boots worn_firewalker = 10022, -- id da velha firewalker boots needPremium = true -- se precisa ser premium (true or false) } if (config.needPremium == true) and (not isPremium(cid)) then doPlayerSendTextMessage(cid, 23, "desculpe apenas Premium players podem recarregar Suas Botas.") return TRUE end if param == "soft" or param == "softboots" then if getPlayerItemCount(cid, config.worn_soft) >= 1 then if doPlayerRemoveMoney(cid,config.price) == TRUE then doPlayerRemoveItem(cid,config.worn_soft,1) doPlayerAddItem(cid,config.new_soft, 1) end end return TRUE end if param == "firewalker" or param == "firewalkerboots" then if getPlayerItemCount(cid, config.worn_firewalker) >= 1 then if doPlayerRemoveMoney(cid,config.price) == TRUE then doPlayerRemoveItem(cid,config.worn_firewalker,1) doPlayerAddItem(cid,config.new_firewalker, 1) end end return TRUE end end @OFFTOPIC man que estranho,a maioria dos cara que meche com script é do Rio grande do Sul ou é de perto kk. estranho

(Ô.Ô)

não entendi. sinceramente.

eu uso windows 7,e tenho ot.