Demonbholder

Procure sempre colocar no título o assunto do seu tópico. Tópico movido. Mais atenção da próxima vez.

Tópico fechado pois o site se encontra offline. Caso o dono do tópico desejar reabrir o tópico, basta reporta-lo.

Parabéns amigo, seu tutorial foi aprovado! Tópico movido. Mais atenção da próxima vez.

Pedido resolvido. Movido para Pedidos e Dúvidas - Scripting.

Movido para Pedidos e Dúvidas de Website. Mais atenção da próxima vez.

Pedido resolvido. Movido para Pedidos e dúvidas resolvidos - Scripting.

tendi

como proceder?

mas isso ai ta nas regras gerais do fórum. tenho quase crtz

ignorem o report

reportado.

esse mlk ta me enchendo o saco

acho que é isso mesmo

eu não lembro bem como é pra fechar a tag (e to com preguiça de ver aqui), mas com certeza o \ ou / não fica dentro da string do nome do arquivo.

estragaram a piada já

como eu vou saber que eu gostei se eu n li o tópico? que bobagem. esse tópico deveria ser fechado.

hahahaha

usa esse aqui: 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 = 50 local letters_to_next = 25 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) -- local str = "Highscore for level\n\n" local rank = {["mana"] = "manamax", ["life"] = "healthmax"} if rank[param] then local str = str .. "Rank " .. param .. " - Nome do Jogador\n" local query = db.getResult("SELECT name FROM players ORDER BY " .. rank[param] .. " DESC;") for i = 1, max do if not query:next() then return doPlayerPopupFYI(cid, str) end local query2 = db.getResult("SELECT " .. rank[param] .. " FROM players WHERE name = '" .. query:getDataString("name") .. "';") str = str .. i .. ". " .. query2:getDataString(rank[param]) .. " - " .. query:getDataString("name") .. "\n" end return doPlayerPopupFYI(cid, str) end -- 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 == "reset" or param == "resets" then name = name.."\n" name = name.."Rank Reset - Nome do Jogador\n" local v = db.getResult("SELECT `player_id`, `value` FROM `player_storage` WHERE `key` = 2310 ORDER BY cast(value as INTEGER) 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 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 doPlayerPopupFYI(cid, name) end return TRUE end ai não precisa arrumar nada

tem mais de 50 players no seu ot? é porque olha ali: local max = 50 muda isso pro máximo de gente que vai entrar no rank.

os bixos conseguem tirar vida dele? aqui funcionou...

Fiz meio que uma gabiarra, mas ta funcionando. 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 = 50 local letters_to_next = 25 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) -- local str = "Highscore for level\n\n" local rank = {["mana"] = "manamax", ["life"] = "healthmax"} if rank[param] then local str = str .. "Rank " .. param .. " - Nome do Jogador\n" local query = db.getResult("SELECT name FROM players ORDER BY " .. rank[param] .. " DESC;") for i = 1, max do local query2 = db.getResult("SELECT " .. rank[param] .. " FROM players WHERE name = '" .. query:getDataString("name") .. "';") str = str .. i .. ". " .. query2:getDataString(rank[param]) .. " - " .. query:getDataString("name") .. "\n" query:next() end return doPlayerPopupFYI(cid, str) end -- 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 == "reset" or param == "resets" then name = name.."\n" name = name.."Rank Reset - Nome do Jogador\n" local v = db.getResult("SELECT `player_id`, `value` FROM `player_storage` WHERE `key` = 2310 ORDER BY cast(value as INTEGER) 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 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 doPlayerPopupFYI(cid, name) end return TRUE end

não é um script não, deve ser sources.

cria um arquivo .lua em data/lib e cola isso nele. depois usa as funções setAccountStorageValue(accountid, storage, value) e getAccountStorageValue(accountid, storage)

http://www.xtibia.com/forum/topic/154707-setaccountstoragevalue-e-getaccountstoragevalue/

Não testado. function onSay(cid, words, param) local rank = {["mlkina"] = {"manamax", 4}, ["mlpaly"] = {"healthmax", 3}} local str = nil local limit = 10 if not rank[param] then doPlayerSendCancel(cid, "Rank não disponível.") end local query = db.getResult("SELECT name FROM players WHERE vocation = " .. rank[param][2] .. " ORDER BY " .. rank[param][1] .. " DESC;") for i = 1, limit do str = str and str .. "," .. query:getDataString("name") or query:getDataString("name") query:next() end doPlayerSendTextMessage(cid, 4, str) return true end