(Resolvido)Script de patente help me

danielzin021 · Outubro 16, 2022

bom pessoal achei esse script de patente e só tinha isso e sou leigo não sei como instalar no meu servidor alguém poderia ajudar?

function getPlayerFrags(cid)
    local time = os.time()
    local times = {today = (time - 86400), week = (time - (7 * 86400))}
    local contents, result = {day = {}, week = {}, month = {}}, db.getResult("SELECT `pd`.`date`, `pd`.`level`, `p`.`name` FROM `player_killers` pk LEFT JOIN `killers` k ON `pk`.`kill_id` = `k`.`id` LEFT JOIN `player_deaths` pd ON `k`.`death_id` = `pd`.`id` LEFT JOIN `players` p ON `pd`.`player_id` = `p`.`id` WHERE `pk`.`player_id` = " .. getPlayerGUID(cid) .. " AND `k`.`unjustified` = 1 AND `pd`.`date` >= " .. (time - (30 * 86400)) .. " ORDER BY `pd`.`date` DESC")
    if(result:getID() ~= -1) then
        repeat
            local content = {date = result:getDataInt("date")}
            if(content.date > times.today) then
                table.insert(contents.day, content)
            elseif(content.date > times.week) then
                table.insert(contents.week, content)
            else
                table.insert(contents.month, content)
            end
        until not result:next()
        result:free()
    end
    local size = {
        day = table.maxn(contents.day),
        week = table.maxn(contents.week),
        month = table.maxn(contents.month)
    }
    return size.day + size.week + size.month
end
function getDeathsAndKills(cid, type) -- by vodka
    local query,d = db.getResult("SELECT `player_id` FROM "..(tostring(type) == "kill" and "`player_killers`" or "`player_deaths`").." WHERE `player_id` = "..getPlayerGUID(cid)),0
        if (query:getID() ~= -1) then
            repeat
                d = d+1
            until not query:next()
            query:free()
        end
    return d  
end
function GetPatenteLook(cid)
	local ranks, kills = {
		[{0, 9}] = "Iniciante", 
		[{10, 49}] = "Ganguests",
		[{50, 99}] = "Assassino",
		[{100, 149}] = "Dead",
		[{150, 199}] = "Sanguinario",		
		[{200, math.huge}] = "Killer"
	},getDeathsAndKills(cid, "kill")
	for v , r in pairs(ranks) do
		if kills >= v[1] and kills <= v[2] then
			return r
		end
	end
end
function onLogin(cid)
    registerCreatureEvent(cid, "newlook")
    return true
end
 
function onLook(cid, thing, position, lookDistance)
    if isPlayer(thing.uid) and thing.uid ~= cid then
        doPlayerSetSpecialDescription(thing.uid,"\n"..(getPlayerSex(thing.uid) == 0 and "She" or "").." Ele Matou ["..getDeathsAndKills(thing.uid, "kill").."]Players.\n"..(getPlayerSex(thing.uid) == 0 and "She" or "").." Ele Morreu ["..getDeathsAndKills(thing.uid, "death").."] Vezes...\nSua Patente é "..GetPatenteLook(thing.uid)..".")
        return true
    elseif thing.uid == cid then
        doPlayerSetSpecialDescription(cid,"\nVoce Matou ["..getDeathsAndKills(cid, "kill").."]Players.\nVoce Morreu ["..getDeathsAndKills(cid, "death").."]  Vezes...\nSua Patente é "..GetPatenteLook(cid)..".")
        local string = 'You see yourself.'
        if getPlayerFlagValue(cid, PLAYERFLAG_SHOWGROUPINSTEADOFVOCATION) then
            string = string..' You are '.. getPlayerGroupName(cid) ..'.'
        elseif getPlayerVocation(cid) ~= 0 then
            string = string..' You are '.. getPlayerVocationName(cid) ..'.'
        else
            string = string..' You have no vocation.'
        end
        string = string..getPlayerSpecialDescription(cid)..'\n'
 
        if getPlayerGuildId(cid) > 0 then
            string = string..' You are ' .. (getPlayerGuildRank(cid) == '' and 'a member' or getPlayerGuildRank(cid)) ..' of the '.. getPlayerGuildName(cid)
            string = getPlayerGuildNick(cid) ~= '' and string..' ('.. getPlayerGuildNick(cid) ..').' or string..'.'
        end
 
        if getPlayerFlagValue(cid, PLAYERCUSTOMFLAG_CANSEECREATUREDETAILS) then
            string = string..'\nHealth: ['.. getCreatureHealth(cid) ..' / '.. getCreatureMaxHealth(cid) ..'], Mana: ['.. getCreatureMana(cid) ..' / '.. getCreatureMaxMana(cid) ..'].'
            string = string..'\nIP: '.. doConvertIntegerToIp(getPlayerIp(cid)) ..'.'
        end
 
        if getPlayerFlagValue(cid, PLAYERCUSTOMFLAG_CANSEEPOSITION) then
            string = string..'\nPosition: [X:'.. position.x..'] [Y:'.. position.y..'] [Z:'.. position.z..'].'
        end
        doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, string)  
        return false
    end
    return true
end

FeeTads · Outubro 16, 2022

Em 16/10/2022 em 23:30, danielzin021 disse:


bom pessoal achei esse script de patente e só tinha isso e sou leigo não sei como instalar no meu servidor alguém poderia ajudar?

function getPlayerFrags(cid)
    local time = os.time()
    local times = {today = (time - 86400), week = (time - (7 * 86400))}
    local contents, result = {day = {}, week = {}, month = {}}, db.getResult("SELECT `pd`.`date`, `pd`.`level`, `p`.`name` FROM `player_killers` pk LEFT JOIN `killers` k ON `pk`.`kill_id` = `k`.`id` LEFT JOIN `player_deaths` pd ON `k`.`death_id` = `pd`.`id` LEFT JOIN `players` p ON `pd`.`player_id` = `p`.`id` WHERE `pk`.`player_id` = " .. getPlayerGUID(cid) .. " AND `k`.`unjustified` = 1 AND `pd`.`date` >= " .. (time - (30 * 86400)) .. " ORDER BY `pd`.`date` DESC")
    if(result:getID() ~= -1) then
        repeat
            local content = {date = result:getDataInt("date")}
            if(content.date > times.today) then
                table.insert(contents.day, content)
            elseif(content.date > times.week) then
                table.insert(contents.week, content)
            else
                table.insert(contents.month, content)
            end
        until not result:next()
        result:free()
    end
    local size = {
        day = table.maxn(contents.day),
        week = table.maxn(contents.week),
        month = table.maxn(contents.month)
    }
    return size.day + size.week + size.month
end
function getDeathsAndKills(cid, type) -- by vodka
    local query,d = db.getResult("SELECT `player_id` FROM "..(tostring(type) == "kill" and "`player_killers`" or "`player_deaths`").." WHERE `player_id` = "..getPlayerGUID(cid)),0
        if (query:getID() ~= -1) then
            repeat
                d = d+1
            until not query:next()
            query:free()
        end
    return d  
end
function GetPatenteLook(cid)
	local ranks, kills = {
		[{0, 9}] = "Iniciante", 
		[{10, 49}] = "Ganguests",
		[{50, 99}] = "Assassino",
		[{100, 149}] = "Dead",
		[{150, 199}] = "Sanguinario",		
		[{200, math.huge}] = "Killer"
	},getDeathsAndKills(cid, "kill")
	for v , r in pairs(ranks) do
		if kills >= v[1] and kills <= v[2] then
			return r
		end
	end
end
function onLogin(cid)
    registerCreatureEvent(cid, "newlook")
    return true
end
 
function onLook(cid, thing, position, lookDistance)
    if isPlayer(thing.uid) and thing.uid ~= cid then
        doPlayerSetSpecialDescription(thing.uid,"\n"..(getPlayerSex(thing.uid) == 0 and "She" or "").." Ele Matou ["..getDeathsAndKills(thing.uid, "kill").."]Players.\n"..(getPlayerSex(thing.uid) == 0 and "She" or "").." Ele Morreu ["..getDeathsAndKills(thing.uid, "death").."] Vezes...\nSua Patente é "..GetPatenteLook(thing.uid)..".")
        return true
    elseif thing.uid == cid then
        doPlayerSetSpecialDescription(cid,"\nVoce Matou ["..getDeathsAndKills(cid, "kill").."]Players.\nVoce Morreu ["..getDeathsAndKills(cid, "death").."]  Vezes...\nSua Patente é "..GetPatenteLook(cid)..".")
        local string = 'You see yourself.'
        if getPlayerFlagValue(cid, PLAYERFLAG_SHOWGROUPINSTEADOFVOCATION) then
            string = string..' You are '.. getPlayerGroupName(cid) ..'.'
        elseif getPlayerVocation(cid) ~= 0 then
            string = string..' You are '.. getPlayerVocationName(cid) ..'.'
        else
            string = string..' You have no vocation.'
        end
        string = string..getPlayerSpecialDescription(cid)..'\n'
 
        if getPlayerGuildId(cid) > 0 then
            string = string..' You are ' .. (getPlayerGuildRank(cid) == '' and 'a member' or getPlayerGuildRank(cid)) ..' of the '.. getPlayerGuildName(cid)
            string = getPlayerGuildNick(cid) ~= '' and string..' ('.. getPlayerGuildNick(cid) ..').' or string..'.'
        end
 
        if getPlayerFlagValue(cid, PLAYERCUSTOMFLAG_CANSEECREATUREDETAILS) then
            string = string..'\nHealth: ['.. getCreatureHealth(cid) ..' / '.. getCreatureMaxHealth(cid) ..'], Mana: ['.. getCreatureMana(cid) ..' / '.. getCreatureMaxMana(cid) ..'].'
            string = string..'\nIP: '.. doConvertIntegerToIp(getPlayerIp(cid)) ..'.'
        end
 
        if getPlayerFlagValue(cid, PLAYERCUSTOMFLAG_CANSEEPOSITION) then
            string = string..'\nPosition: [X:'.. position.x..'] [Y:'.. position.y..'] [Z:'.. position.z..'].'
        end
        doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, string)  
        return false
    end
    return true
end

Mostrar mais

cria um arquivo ou coloca dentro de algum que ja exista, EXEMPLO:

data > creaturescripts > scripts > onLook.lua

Cola esse código dentro do arquivo.

depois vai em creaturescripts.xml

data > creaturescripts > creaturescripts.xml
cola essa tag:

<event type="look" name="newOnLook" script="onLook.lua"/>
<event type="login" name="newlook" event="script" value="onLook.lua" />

ai da

/reload creature

e reloga, que ja vai aparecer.

OBS: CHECA se já não existe algum arquivo de "look", pq pode sobescrever e tirar algo que vc ja usa.

Em 16/10/2022 em 23:30, danielzin021 disse:

function onLogin(cid)

registerCreatureEvent(cid, "newlook")
return true
end

Mostrar mais

onde ta isso ^
bota isso:

function onLogin(cid)
    registerCreatureEvent(cid, "newOnLook")
    registerCreatureEvent(cid, "newlook")
    return true
end

danielzin021 · Outubro 17, 2022

Em 16/10/2022 em 23:37, FeeTads disse:
cria um arquivo ou coloca dentro de algum que ja exista, EXEMPLO:

data > creaturescripts > scripts > onLook.lua

Cola esse código dentro do arquivo.

depois vai em creaturescripts.xml

data > creaturescripts > creaturescripts.xml
cola essa tag:
<event type="look" name="newOnLook" script="onLook.lua"/>
<event type="login" name="newlook" event="script" value="onLook.lua" />
ai da
/reload creature
e reloga, que ja vai aparecer.

OBS: CHECA se já não existe algum arquivo de "look", pq pode sobescrever e tirar algo que vc ja usa.

onde ta isso ^
bota isso:
function onLogin(cid)
    registerCreatureEvent(cid, "newOnLook")
    registerCreatureEvent(cid, "newlook")
    return true
end
Mostrar mais

Irmão desculpe incomodar mas o script não está amostrando as patentes apenas a quantidade de frags, consegue ver?

FeeTads · Outubro 17, 2022

Em 17/10/2022 em 21:35, danielzin021 disse:

Irmão desculpe incomodar mas o script não está amostrando as patentes apenas a quantidade de frags, consegue ver?

Mostrar mais

provavelmente vc tem outro script de "look" ja funcionando, e está sobscrevendo após esse

danielzin021 · Outubro 17, 2022

Em 17/10/2022 em 23:19, FeeTads disse:

provavelmente vc tem outro script de "look" ja funcionando, e está sobscrevendo após esse

Expand Mostrar mais

irmãozin mas antes de eu adicionar esse script não aparecia nem o frag

Entrar

(Resolvido)Script de patente help me

Posts Recomendados

danielzin021 2

Link para o post

Compartilhar em outros sites

Top Posters In This Topic

Popular Days

Top Posters In This Topic

Popular Days

Popular Posts

danielzin021

Posted Images

FeeTads 173

Link para o post

Compartilhar em outros sites

danielzin021 2

Link para o post

Compartilhar em outros sites

FeeTads 173

Link para o post

Compartilhar em outros sites

danielzin021 2

Link para o post

Compartilhar em outros sites

Participe da conversa

Quem Está Navegando 0 membros estão online

Estatísticas dos Fóruns

TibiaKing

Open Tibia Server

Redes Sociais

Anuncie no TibiaKing

Fóruns

Cursos TibiaKing

Informação Importante