[NV:Facil, 8.22,8.31] !ranks no seu sv

[Daniloz 0]

Nome: (!rank no seu servidor.)

Versão: (8.22, 8.31.)

Tipo do script: (Talkaction.)

Servidor Testado: (The forgotten server.)

Autor: (Darth Sidious)

 

First

 

Tem servidor que fexa porcausa do !ranks, em outros ele consegue aguentar tranquilo.

 

Abra o seu servidor/talkaction/talkaction.xml, adicione no final o citado abaixo.

 

<talkaction words="!ranks" script="highscores.lua"/>

 

Depois disso salve.

 

Em seguida abra um arquivo em bloco de notas ( notepad ) vazio, cole isso!

 

function onSay(cid, words, param)

dofile("./config.lua")

local players = 20 -- The amount of players that is shown in the list

local maxgroupid = 1 -- Players in groups above this is not shown in the list

 

if sqlType == "mysql" then

env = assert(luasql.mysql())

con = assert(env:connect(mysqlDatabase, mysqlUser, mysqlPass, mysqlHost, mysqlPort))

else -- sqlite

env = assert(luasql.sqlite3())

con = assert(env:connect(sqliteDatabase))

end

 

local str = ""

if param == "level" or param == "exp" or param == "lvl" or param == "" then

cur = assert(con:execute("SELECT `name`, `level`, `experience` FROM `players` WHERE `group_id` <= "..maxgroupid.." ORDER BY `experience` DESC LIMIT 0,"..players..";"))

row = cur:fetch({}, "a")

str = "# [Level] - Name - (Experience)\n"

local i = 0

while row do

str = str.."\n#"..(i+1).." ["..row.level.."] - "..row.name.." - ("..row.experience..")"

row = cur:fetch (row, "a")

i = i+1

end

elseif param == "maglevel" or param == "magic" or param == "ml" then

cur = assert(con:execute("SELECT `name`, `maglevel` FROM `players` WHERE `group_id` <= "..maxgroupid.." ORDER BY `maglevel` DESC LIMIT 0,"..players..";"))

row = cur:fetch({}, "a")

str = "# [Magic Level] - Name\n"

local i = 0

while row do

str = str.."\n#"..(i+1).." ["..row.maglevel.."] - "..row.name..""

row = cur:fetch (row, "a")

i = i+1

end

elseif param == "fist" then

cur = assert(con:execute("SELECT `player_id`, `value` FROM `player_skills` WHERE `skillid` = 0 ORDER BY `value` DESC;"))

row = cur:fetch({}, "a")

str = "# [Fist Fighting] - Name\n"

local i = 0

while row do

if i == players then

break

end

query = assert(con:execute("SELECT `name` FROM `players` WHERE `group_id` <= "..maxgroupid.." AND `id` = "..row.player_id..""))

sql = query:fetch({}, "a")

if sql ~= nil then

str = str.."\n#"..(i+1).." ["..row.value.."] - "..sql.name..""

i = i+1

end

row = cur:fetch (row, "a")

end

elseif param == "club" then

cur = assert(con:execute("SELECT `player_id`, `value` FROM `player_skills` WHERE `skillid` = 1 ORDER BY `value` DESC;"))

row = cur:fetch({}, "a")

str = "# [Club Fighting] - Name\n"

local i = 0

while row do

if i == players then

break

end

query = assert(con:execute("SELECT `name` FROM `players` WHERE `group_id` <= "..maxgroupid.." AND `id` = "..row.player_id..""))

sql = query:fetch({}, "a")

if sql ~= nil then

str = str.."\n#"..(i+1).." ["..row.value.."] - "..sql.name..""

i = i+1

end

row = cur:fetch (row, "a")

end

elseif param == "sword" then

cur = assert(con:execute("SELECT `player_id`, `value` FROM `player_skills` WHERE `skillid` = 2 ORDER BY `value` DESC;"))

row = cur:fetch({}, "a")

str = "# [sword Fighting] - Name\n"

local i = 0

while row do

if i == players then

break

end

query = assert(con:execute("SELECT `name` FROM `players` WHERE `group_id` <= "..maxgroupid.." AND `id` = "..row.player_id..""))

sql = query:fetch({}, "a")

if sql ~= nil then

str = str.."\n#"..(i+1).." ["..row.value.."] - "..sql.name..""

i = i+1

end

row = cur:fetch (row, "a")

end

elseif param == "axe" then

cur = assert(con:execute("SELECT `player_id`, `value` FROM `player_skills` WHERE `skillid` = 3 ORDER BY `value` DESC;"))

row = cur:fetch({}, "a")

str = "# [Axe Fighting] - Name\n"

local i = 0

while row do

if i == players then

break

end

query = assert(con:execute("SELECT `name` FROM `players` WHERE `group_id` <= "..maxgroupid.." AND `id` = "..row.player_id..""))

sql = query:fetch({}, "a")

if sql ~= nil then

str = str.."\n#"..(i+1).." ["..row.value.."] - "..sql.name..""

i = i+1

end

row = cur:fetch (row, "a")

end

elseif param == "dist" or param == "distance" then

cur = assert(con:execute("SELECT `player_id`, `value` FROM `player_skills` WHERE `skillid` = 4 ORDER BY `value` DESC;"))

row = cur:fetch({}, "a")

str = "# [Distance Fighting] - Name\n"

local i = 0

while row do

if i == players then

break

end

query = assert(con:execute("SELECT `name` FROM `players` WHERE `group_id` <= "..maxgroupid.." AND `id` = "..row.player_id..""))

sql = query:fetch({}, "a")

if sql ~= nil then

str = str.."\n#"..(i+1).." ["..row.value.."] - "..sql.name..""

i = i+1

end

row = cur:fetch (row, "a")

end

elseif param == "shield" or param == "shielding" then

cur = assert(con:execute("SELECT `player_id`, `value` FROM `player_skills` WHERE `skillid` = 5 ORDER BY `value` DESC;"))

row = cur:fetch({}, "a")

str = "# [shielding] - Name\n"

local i = 0

while row do

if i == players then

break

end

query = assert(con:execute("SELECT `name` FROM `players` WHERE `group_id` <= "..maxgroupid.." AND `id` = "..row.player_id..""))

sql = query:fetch({}, "a")

if sql ~= nil then

str = str.."\n#"..(i+1).." ["..row.value.."] - "..sql.name..""

i = i+1

end

row = cur:fetch (row, "a")

end

elseif param == "fish" or param == "fishing" then

cur = assert(con:execute("SELECT `player_id`, `value` FROM `player_skills` WHERE `skillid` = 6 ORDER BY `value` DESC;"))

row = cur:fetch({}, "a")

str = "# [Fishing] - Name\n"

local i = 0

while row do

if i == players then

break

end

query = assert(con:execute("SELECT `name` FROM `players` WHERE `group_id` <= "..maxgroupid.." AND `id` = "..row.player_id..""))

sql = query:fetch({}, "a")

if sql ~= nil then

str = str.."\n#"..(i+1).." ["..row.value.."] - "..sql.name..""

i = i+1

end

row = cur:fetch (row, "a")

end

end

if str ~= "" then

doPlayerPopupFYI(cid, str)

end

con:close()

env:close()

end

 

Em seguida salve como highscores.lua

 

 

Após isso siga :

 

Abra a pasta de seu servidor ~> abra o seu config.lua, você vai ver tudo, procure isso :

 

-- Guilds

ingameGuildSystem = "yes"

 

Em baixo disso você vai pular 1 linha e colar isso :

-- Highscores

highscoreDisplayPlayers = 15

updateHighscoresAfterMinutes = 1

 

Feito isso ficará assim.

 

-- Guilds

ingameGuildSystem = "yes"

 

-- Highscores

highscoreDisplayPlayers = 15

updateHighscoresAfterMinutes = 1

 

Você deverá pular mais uma linha para ficar seu config.lua direito e completo:

-- Guilds

ingameGuildSystem = "yes"

 

-- Highscores

highscoreDisplayPlayers = 15

updateHighscoresAfterMinutes = 1

 

-- Houses

housePriceEachSQM = 1000

houseRentPeriod = "never"

 

Bom fim de tutorial, obrigado pela atenção!

Editado 6 Dezembro, 2008 por Daniloz

[Nord 2]

Agora sim, perfeito

 

Aprovado

[renanf456 0]

Infelizmenti aki naum funfo "/

 

ps:meu serve eh 8.31 :S

[Daniloz 0]

O tutorial deve estar de acordo com seu distro ~ Tfs 8.22 ou 8.31.

 

Caso não funcione leia com atenção e tente novamente, tenho certeza de que dará tudo certo, boa sorte e obrigado por postar.

[tiaguim 0]

aaakie n funfo..o script deu load certim sem bug nenhum mas da hr do !ranks n aparec nada ='[

oke é?

[Daniloz 0]

#tiaguim, Algo você fez errado, tente vêr se o tutorial é compativel a o seu TFS~The forgotten server, 8.22 ou 8.31.

 

Somente a essas versões são compativeis com o tutorial.

[Deragon 25]

parabens ripper

esse codigo foi feito pela equipe do tfs

seu ripperzinho

edite o topico ou reportarei por rip

[lokodelloko 0]

essa scripter foi feita pela tfs ...

 

ja tem para download junto com os ots. .

 

voce está reportado

[Daniloz 0]

Oooh não diga, grandes bosta até parece que o Nord não sabia disso, tanto que ele aprovou este tópico.

 

Antes de postar não fala besteira.

 

Obs: Estou ensinando a botarem no servidor, não desmereço créditos ao Gesior verdadeiro criador deste script.

[Deragon 25]

cara, todos erram

no caso o nord errou em aprovar seu tópico

ensinou alguma coisa ?

só to vendo voce colocar umas linhas ai pra bota no config.lua e criar um arquivo no talkactions e colocar um script que você só colocou ai

então mude os créditos até o fim de hoje ou lhe reportarei por ripping

sugestão: bote creditos para script e para seu "tutorial"

[°ºMatheusº° 0]

aqui da: attempt to index global 'luasql' (a nil value)

 

help?

[Deragon 25]

matheus

acho q o seu tfs é o 0.3, esse ai soh funciona em 2.7-

[°ºMatheusº° 0]

eh, eh o 0.3....n tem nenhum !ranks pro 0.3 n?

[N1cK777 0]

Mt bom, mas meu server jah veio com esse comando ;D

[gnr 0]

Quem baixa TSF já vem com esse script então não vejo a nescessidado desse tópico. :fist:

[sokaporva 0]

Nao tem um que funcione no darkness.s3db ?

[ricardinho1039 0]

Agora sim, perfeito

[sokaporva 0]

No meu TFS eu ele buga o SQL...

Editei o script e dexei apenas com Rank de lvl.. ta 99% ele da um erro no Pront do OT mas nada de grave... Sabe me dizer se nao tem alguma atualizacao q de para arrumar isso ?

[Amax 0]

Fraglist para fazer um rank de quem mato + no server n tem como nao?

[FakLess 0]

Bem Util ^^

Tchao