sistema Weapon Hit Rank!

[Vodkart 1515]

Créditos:

 

Jhon & Vodkart

 

Como funciona:

 

É um sistema simples, mostra o rank de maior hit do server, seja de axe, sword, club, wand, etc...

 

Mostra o Nome do player - [Hit] - Nome da weapon

 

imagem de exemplo:

rank axe

rank club

rank sd

 

obs: como o sistema de rank normal, level e etc, para aparecer no rank o jogador tem que relogar ou dar serversalve.

 

 

 

MODS:

 

RankHit.xml

<?xml version="1.0" encoding="UTF-8"?>  
<mod name="RankHit" version="1.0" author="Vodkart e Jhon" contact="xtibia.com" enabled="yes">  
<config name="rank_func"><![CDATA[
WEAPON_WAND = {2190, 2191, 2188, 8921, 2189, 2187, 8920, 8922, 2184, 7414, 2453}
WEAPON_ROD = {2182, 2186, 2185, 8911, 2181, 2183, 8912, 8910, 7958, 12609}
storage_mostdamage = {
CLUB = {155201,156201},
SWORD = {155202,156202},
AXE = {155203,156203},
WAND = {155204,156204},
ROD = {155205,156205},
DISTANCE = {155206,156206},
MAGIC_SD = {155207,156207,157207}
}
function setSdHit(cid, damage)
if damage > getPlayerStorageValue(cid, storage_mostdamage.MAGIC_SD[1]) then
setPlayerStorageValue(cid, storage_mostdamage.MAGIC_SD[1], damage)
setPlayerStorageValue(cid, storage_mostdamage.MAGIC_SD[2], 2268)
end
return true
end
function setPlayerMostHitMage(cid, damage, weapon)
if isInArray(WEAPON_WAND, getPlayerSlotItem(cid, CONST_SLOT_LEFT).itemid) == TRUE or isInArray(WEAPON_WAND, getPlayerSlotItem(cid, CONST_SLOT_RIGHT).itemid) == TRUE then
if damage > getPlayerStorageValue(cid, storage_mostdamage.WAND[1]) then setPlayerStorageValue(cid, storage_mostdamage.WAND[1], damage) setPlayerStorageValue(cid, storage_mostdamage.WAND[2], weapon) end
elseif isInArray(WEAPON_ROD, getPlayerSlotItem(cid, CONST_SLOT_LEFT).itemid) == TRUE or isInArray(WEAPON_ROD, getPlayerSlotItem(cid, CONST_SLOT_RIGHT).itemid) == TRUE then
if damage > getPlayerStorageValue(cid, storage_mostdamage.ROD[1]) then setPlayerStorageValue(cid, storage_mostdamage.ROD[1], damage) setPlayerStorageValue(cid, storage_mostdamage.ROD[2], weapon) end
end
return true
end
function getRankHit(cid, value, wvalue, max, RankName) -- by vodka
local str,arm ="",""
str = "--[".. (RankName == nil and "RANK STORAGE" or ""..RankName.."") .."]--\n\n"
local query = db.getResult("SELECT `player_id`, `value` FROM `player_storage` WHERE `key` = "..value.." ORDER BY cast(value as INTEGER) DESC;")
if (query:getID() ~= -1) then k = 1 repeat if k > max then break end
local getweapon = db.getResult("SELECT `value` FROM `player_storage` WHERE `player_id` = ".. query:getDataString("player_id") .." AND `key` = "..wvalue)
if (getweapon:getID() ~= -1) then
arm = getItemNameById(getweapon:getDataString("value"))
end
str = str .. "\n " .. k .. ". "..getPlayerNameByGUID(query:getDataString("player_id")).." - [" .. query:getDataInt("value") .. "] - "..arm..""
k = k + 1 until not query:next() end return doPlayerPopupFYI(cid, str)
end
function haveWeapon(cid) -- by vodka
local armas = {1,2,3,5,6}
if getPlayerSlotItem(cid, CONST_SLOT_RIGHT).itemid > 0 and isInArray(armas, getItemWeaponType(getPlayerSlotItem(cid, CONST_SLOT_RIGHT).uid)) or getPlayerSlotItem(cid, CONST_SLOT_LEFT).itemid > 0 and isInArray(armas, getItemWeaponType(getPlayerSlotItem(cid, CONST_SLOT_LEFT).uid)) then
return true
end
return false
end
function getWeaponType(cid) -- by vodka
return getPlayerSlotItem(cid, CONST_SLOT_LEFT).itemid == 0 and getItemWeaponType(getPlayerSlotItem(cid, CONST_SLOT_RIGHT).uid) or getItemWeaponType(getPlayerSlotItem(cid, CONST_SLOT_LEFT).uid)
end
]]></config>
<talkaction words="/rankhit;!rankhit" event="buffer"><![CDATA[
domodlib('rank_func')
local rank_hit = {
["axe"] = {storage_mostdamage.AXE[1],storage_mostdamage.AXE[2]},
["sword"] = {storage_mostdamage.SWORD[1],storage_mostdamage.SWORD[2]},
["club"] = {storage_mostdamage.CLUB[1],storage_mostdamage.CLUB[2]},
["wand"] = {storage_mostdamage.WAND[1],storage_mostdamage.WAND[2]},
["rod"] = {storage_mostdamage.ROD[1],storage_mostdamage.ROD[2]},
["distance"] = {storage_mostdamage.DISTANCE[1],storage_mostdamage.DISTANCE[2]},
["sd"] = {storage_mostdamage.MAGIC_SD[1],storage_mostdamage.MAGIC_SD[2]}
}
local param = string.lower(param)
if (param == "") then
local str = ""
str = str .. ""..getCreatureName(cid).." Hit\'s\:\n\n"
for hit, item in pairs(rank_hit) do
str = str..string.upper(hit)..": ".. (getPlayerStorageValue(cid, item[1]) ~= -1 and "["..getPlayerStorageValue(cid, item[1]).."] - "..getItemNameById(getPlayerStorageValue(cid, item[2])).."" or "None") .."\n"
end
str = str .. ""
doPlayerPopupFYI(cid,str)
return true
end
if not rank_hit[param] then
return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"digite o nome correto.")
end
return getRankHit(cid, rank_hit[param][1],rank_hit[param][2], 10, "Rank "..param)
]]></talkaction>
<event type="login" name="Rank Hit" event="script"><![CDATA[  
domodlib('rank_func')
function onLogin(cid)
registerCreatureEvent(cid, "RankhitCombat")
return true  
end  
]]></event>
<event type="combat" name="RankhitCombat" event="script"><![CDATA[
domodlib('rank_func')
			 registerCreatureEvent(target, "RankhitStats")
return true
]]></event>
<event type="statschange" name="RankhitStats" event="script"><![CDATA[
domodlib('rank_func')
if type == STATSCHANGE_HEALTHLOSS and isPlayer(attacker) and haveWeapon(attacker) then
t = {
[1] = {storage_mostdamage.SWORD[1],storage_mostdamage.SWORD[2]},
[2] = {storage_mostdamage.CLUB[1],storage_mostdamage.CLUB[2]},
[3] = {storage_mostdamage.AXE[1],storage_mostdamage.AXE[2]},
[5] = {storage_mostdamage.DISTANCE[1],storage_mostdamage.DISTANCE[2]}
}
MyWeapon = getPlayerSlotItem(attacker, CONST_SLOT_LEFT).itemid == 0 and getPlayerSlotItem(attacker, CONST_SLOT_RIGHT).itemid or getPlayerSlotItem(attacker, CONST_SLOT_LEFT).itemid
if (getPlayerStorageValue(attacker, storage_mostdamage.MAGIC_SD[3]) >= os.time()) then
setSdHit(attacker,value)
elseif t[getWeaponType(attacker)] then
if value > getPlayerStorageValue(attacker, t[getWeaponType(attacker)][1]) then
setPlayerStorageValue(attacker, t[getWeaponType(attacker)][1], value)
setPlayerStorageValue(attacker, t[getWeaponType(attacker)][2], MyWeapon)
end
else
setPlayerMostHitMage(attacker, value, MyWeapon)
end  
end
return true
]]></event>
</mod>

 

 

Em data > spells > scripts > attack > sudden death.lua adicione depois de function onCastSpell(cid, var)

 

setPlayerStorageValue(cid, 157207, os.time()+3)

 

ficando assim:

function onCastSpell(cid, var)
setPlayerStorageValue(cid, 157207, os.time()+3)
return doCombat(cid, combat, var)
end

Editado Junho 4, 2012 por Vodkart

[jhon992 370]

Ótimo script, pra quem busca algo novo para otserv.

[AnneMotta 234]

demorou mais saiu em KSOKAOSOKSAOKASOKSA' ta perfeito. rep+.

[Beeki 284]

Vodkart seu emo, sistema perfeito! Irei usar... vlw (:

[458621 1]

Ai, deu esse erro aqui:

 

 

[Error - LuaScriptInterface::loadFile] data/talkactions/scripts/rankhit.lua:1: '=' expected near 'onSay'

[30/04/2012 17:59:50] [Warning - Event::loadScript] Cannot load script (data/talkactions/scripts/rankhit.lua)

[30/04/2012 17:59:50] data/talkactions/scripts/rankhit.lua:1: '=' expected near 'onSay'

[30/04/2012 17:59:50] [Error - LuaScriptInterface::loadFile] cannot open data/creaturescripts/scripts/rankhit.lua: No such file or directory

[30/04/2012 17:59:50] [Warning - Event::loadScript] Cannot load script (data/creaturescripts/scripts/rankhit.lua)

[30/04/2012 17:59:50] cannot open data/creaturescripts/scripts/rankhit.lua: No such file or directory

[30/04/2012 17:59:50] [Error - LuaScriptInterface::loadFile] cannot open data/creaturescripts/scripts/rankhit.lua: No such file or directory

[30/04/2012 17:59:50] [Warning - Event::loadScript] Cannot load script (data/creaturescripts/scripts/rankhit.lua)

[30/04/2012 17:59:50] cannot open data/creaturescripts/scripts/rankhit.lua: No such file or directory

 

AJUDA AI, Se me ajudar, é REP+

[Vodkart 1515]

Ai, deu esse erro aqui:

 

 

[Error - LuaScriptInterface::loadFile] data/talkactions/scripts/rankhit.lua:1: '=' expected near 'onSay'

[30/04/2012 17:59:50] [Warning - Event::loadScript] Cannot load script (data/talkactions/scripts/rankhit.lua)

[30/04/2012 17:59:50] data/talkactions/scripts/rankhit.lua:1: '=' expected near 'onSay'

[30/04/2012 17:59:50] [Error - LuaScriptInterface::loadFile] cannot open data/creaturescripts/scripts/rankhit.lua: No such file or directory

[30/04/2012 17:59:50] [Warning - Event::loadScript] Cannot load script (data/creaturescripts/scripts/rankhit.lua)

[30/04/2012 17:59:50] cannot open data/creaturescripts/scripts/rankhit.lua: No such file or directory

[30/04/2012 17:59:50] [Error - LuaScriptInterface::loadFile] cannot open data/creaturescripts/scripts/rankhit.lua: No such file or directory

[30/04/2012 17:59:50] [Warning - Event::loadScript] Cannot load script (data/creaturescripts/scripts/rankhit.lua)

[30/04/2012 17:59:50] cannot open data/creaturescripts/scripts/rankhit.lua: No such file or directory

 

AJUDA AI, Se me ajudar, é REP+

 

você deve ter feito algo errado, diz que não está achando diretório '-'

 

 

 

@EDITED

 

- Agr só por MODS

- adicionado rank de SD

Editado Abril 30, 2012 por Vodkart

[AnneMotta 234]

Ideia de rank de sd foi minha, rep mais pra mim. até.

[Vodkart 1515]

Ideia de rank de sd foi minha, rep mais pra mim. até.

Foi mesmo, se tivesse ficado quieta eu não teria mais trabalho =(

kkkkkk

rep -

[AnneMotta 234]

KASOKOASOKAOKAOKS', agora você chegara ao rep 700 graças a anne!

[Elexonic 15]

error :S

[Vodkart 1515]

error :S

 

É porque seu servidor é Mysql, mas vamos resolver isso...

 

 

Troque está linha:

 

local query = db.getResult("SELECT `player_id`, `value` FROM `player_storage` WHERE `key` = "..value.." ORDER BY cast(value as INTEGER) DESC;")

 

por essa:

 

local query = db.getResult("SELECT `player_id`, `value` FROM `player_storage` WHERE `key` = "..value.." ORDER BY cast(value as SIGNED) DESC;")

[Elexonic 15]

Eu posso modificar para só ver o top 10 no rankhit sd, etc espada?

apenas os 10 primeiros em cada habilidade

funciona perfeitamente bem =)

obrigado

[Vodkart 1515]

Eu possomodificar parasóvero top 10norankhitsd,etcespada?

apenasos 10 primeirosem cada habilidade

funciona perfeitamente bem=)

obrigado

 

Mas já está configurado para mostrar só os 10 primeiros

 

return getRankHit(cid, rank_hit[param][1],rank_hit[param][2], 10, "Rank "..param)

 

Onde está o número 10 é o número max que vai aparecer no rank

 

oq vc quis dizer com sem cada habilidade?

 

---------------------------------

vcs acham que seria bom colocar um "info" que mostra os hits dos próprios jogadores?

por exemplo eu uso o comando !rankhit info, ai mostra meus hits de todas as armas:

 

Editado Maio 3, 2012 por Vodkart

[jhon992 370]

fica show de bola esse "info".

[Vodkart 1515]

vlw jhon

ja adc ao script entao =]