Ir para conteúdo
TK News
  • Cadastre-se

Action%2525252FTalkaction [WarInvite] /war invite TFS 1.0

Absolute

Por ,
em Scripts tfs 0.4 (OLD)

 Share Seguidores 1

Posts Recomendados

  • Este é um post popular.
Absolute

Absolute 0

Postado
  • Este é um post popular.
Postado

Fala galera do TK, vi em alguns servidores grandes 10.x+ o comando de /war invite, ou seja todos os servidores que baixamos não contém este sistema, então resolvi pegar o script original como base e adapta-lo para tfs 1.0, trocando as funções e tudo mais.

 

 

fBREgBE.png

 

 

 

Sem mimimi vamos ao que interessa:

 

 

Em data/talkactions/scripts crie um arquivo chamado: gwarabsolute.lua e dentro adicione o seguinte conteúdo:


function onSay(cid, words, param)
 
        local player = Player(cid)
        local guild = player:getGuild()
        if(guild == nil) then
                player:sendCancelMessage("You need to be in a guild in order to execute this talkaction.")
                return false
        end
 
        local guild = getPlayerGuildId(cid)
        if not guild or (player:getGuildLevel() < GUILDLEVEL_LEADER) then
                player:sendCancelMessage("You cannot execute this talkaction.")
                return false
        end
 
        local t = string.split(param, ",")
        if(not t[2]) then      
                player:sendChannelMessage("", "Not enough param(s).", TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                return false
        end
 
        local enemy = getGuildId(t[2])
        if(not enemy) then
                player:sendChannelMessage("", "Guild \"" .. t[2] .. "\" does not exists.", TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                return false
        end
 
        if(enemy == guild) then
                player:sendChannelMessage("", "You cannot perform war action on your own guild.", TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                return false
        end
 
        local enemyName, tmp = "", db.storeQuery("SELECT `name` FROM `guilds` WHERE `id` = " .. enemy)
        if tmp ~= false then
                enemyName = result.getDataString(tmp, "name")
                result.free(tmp)
        end
 
        if(isInArray({"accept", "reject", "cancel"}, t[1])) then
                local query = "`guild1` = " .. enemy .. " AND `guild2` = " .. guild
                if(t[1] == "cancel") then
                        query = "`guild1` = " .. guild .. " AND `guild2` = " .. enemy
                end
 
                tmp = db.storeQuery("SELECT `id`, `started`, `ended`, `payment` FROM `guild_wars` WHERE " .. query .. " AND `status` = 0")
                if(tmp == false) then
                        player:sendChannelMessage("", "Currently there's no pending invitation for a war with " .. enemyName .. ".", TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                        return false
                end
 
                if(t[1] == "accept") then
                        local _tmp = db.storeQuery("SELECT `balance` FROM `guilds` WHERE `id` = " .. guild)
                        local state = result.getDataInt(_tmp, "balance") < result.getDataInt(tmp, "payment")
 
                        result.free(_tmp)
                        if(state) then
                                player:sendChannelMessage("", "Your guild balance is too low to accept this invitation.", TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                                return false
                        end
 
                        db.query("UPDATE `guilds` SET `balance` = `balance` - " .. result.getDataInt(tmp, "payment") .. " WHERE `id` = " .. guild)
                end
 
                query = "UPDATE `guild_wars` SET "
                local msg = "accepted " .. enemyName .. " invitation to war."
                if(t[1] == "reject") then
                        query = query .. "`ended` = " .. os.time() .. ", `status` = 2"
                        msg = "rejected " .. enemyName .. " invitation to war."
                elseif(t[1] == "cancel") then
                        query = query .. "`ended` = " .. os.time() .. ", `status` = 3"
                        msg = "canceled invitation to a war with " .. enemyName .. "."
                else
                        query = query .. "`started` = " .. os.time() .. ", `ended` = " .. (result.getDataInt(tmp, "ended") > 0 and (os.time() + ((result.getDataInt(tmp, "started") - result.getDataInt(tmp, "ended")) / 86400)) or 0) .. ", `status` = 1"
                end
 
                query = query .. " WHERE `id` = " .. result.getDataInt(tmp, "id")
                result.free(tmp)
                db.query(query)
                broadcastMessage(getPlayerGuildName(cid) .. " has " .. msg, MESSAGE_EVENT_ADVANCE)
                return false
        end
 
        if(t[1] == "invite") then
                local str = ""
                tmp = db.storeQuery("SELECT `guild1`, `status` FROM `guild_wars` WHERE `guild1` IN (" .. guild .. "," .. enemy .. ") AND `guild2` IN (" .. enemy .. "," .. guild .. ") AND `status` IN (0, 1)")
        if(tmp ~= false) then
                       
                        if(result.getDataInt(tmp, "status") == 0) then
                                if(result.getDataInt(tmp, "guild1") == guild) then
                                        str = "You have already invited " .. enemyName .. " to war."
                                else
                                        str = enemyName .. " have already invited you to war."
                                end
                        else
                                str = "You are already on a war with " .. enemyName .. "."
                        end
 
                        result.free(tmp)
                end
 
                if(str ~= "") then
                        player:sendChannelMessage("", str, TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                        return false
                end
 
                local frags = tonumber(t[3])
                if(frags ~= nil) then
                        frags = math.max(10, math.min(1000, frags))
                else
                        frags = 100
                end
 
                local payment = tonumber(t[4])
                if(payment ~= nil) then
                        payment = math.floor(payment)+1000
                        tmp = db.storeQuery("SELECT `balance` FROM `guilds` WHERE `id` = " .. guild)
 
                        local state = result.getDataInt(tmp, "balance") < payment
                        result.free(tmp)
                        if(state) then
                                player:sendChannelMessage("", "Your guild balance is too low for such payment.", TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                                return false
                        end
 
                        db.query("UPDATE `guilds` SET `balance` = `balance` - " .. payment .. " WHERE `id` = " .. guild)
                else
                        payment = 0
                end
 
                local begining, ending = os.time(), tonumber(t[5])
                if(ending ~= nil and ending ~= 0) then
                        ending = begining + (ending * 86400)
                else
                        ending = 0
                end
 
                db.query("INSERT INTO `guild_wars` (`guild1`, `guild2`, `started`, `ended`, `frags`, `payment`) VALUES (" .. guild .. ", " .. enemy .. ", " .. begining .. ", " .. ending .. ", " .. frags .. ", " .. payment .. ");")
                broadcastMessage(getPlayerGuildName(cid) .. " has invited " .. enemyName .. " to war till " .. frags .. " frags.", MESSAGE_EVENT_ADVANCE)
                return false
        end
 
        if(not isInArray({"end", "finish"}, t[1])) then
                return false
        end
 
        local status = (t[1] == "end" and 1 or 4)
        tmp = db.storeQuery("SELECT `id` FROM `guild_wars` WHERE `guild1` = " .. guild .. " AND `guild2` = " .. enemy .. " AND `status` = " .. status)
        if(tmp ~= false) then
                local query = "UPDATE `guild_wars` SET `ended` = " .. os.time() .. ", `status` = 5 WHERE `id` = " .. result.getDataInt(tmp, "id")
                result.free(tmp)
 
                db.query(query)
                broadcastMessage(getPlayerGuildName(cid) .. " has " .. (status == 4 and "mend fences" or "ended up a war") .. " with " .. enemyName .. ".", MESSAGE_EVENT_ADVANCE)
                return false
        end
 
        if(status == 4) then
                player:sendChannelMessage("", "Currently there's no pending war truce from " .. enemyName .. ".", TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                return false
        end
 
        tmp = db.storeQuery("SELECT `id`, `ended` FROM `guild_wars` WHERE `guild1` = " .. enemy .. " AND `guild2` = " .. guild .. " AND `status` = 1")
        if(tmp ~= false) then
                if(result.getDataInt(tmp, "ended") > 0) then
                        result.free(tmp)
                        player:sendChannelMessage("", "You cannot request ending for war with " .. enemyName .. ".", TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                        return false
                end
 
                local query = "UPDATE `guild_wars` SET `status` = 4, `ended` = " .. os.time() .. " WHERE `id` = " .. result.getDataInt(tmp, "id")
                result.free(tmp)
 
                db.query(query)
                broadcastMessage(getPlayerGuildName(cid) .. " has signed an armstice declaration on a war with " .. enemyName .. ".", MESSAGE_EVENT_ADVANCE)
                return false
        end
       
        player:sendChannelMessage("", "Currently there's no active war with " .. enemyName .. ".", TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
        return false
end

 

Ainda em data/talkactions/scripts crie um arquivo com nome de absolutebalance.lua e dentro adicione:

  local function isValidMoney(value)
        if(value == nil) then
                return false
        end
        return (value > 0 and value <= 99999999999999)
end
 
function onSay(cid, words, param)
 
        local player = Player(cid)
        local guild = player:getGuild():getId()
        if(guild == nil) then
                return true
        end
 
        local t = string.split(param, ' ', 1)
       
        if(player:getGuildLevel() == GUILDLEVEL_LEADER and isInArray({'pick'}, t[1])) then
                if(t[1] == 'pick') then
                        local money = {tonumber(t[2])}
                        if(not isValidMoney(money[1])) then
                                player:sendChannelMessage('', 'Invalid amount of money specified.', TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                                return false
                        end
 
                        local resultId = db.storeQuery("SELECT `balance` FROM `guilds` WHERE `id` = " .. guild)
                        if resultId == false then
                                return false
                        end
                       
                        money[2] = result.getDataInt(resultId, "balance")
                        result.free(resultId)
 
                        if(money[1] > money[2]) then
                                player:sendChannelMessage('', 'The balance is too low for such amount.', TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                                return false
                        end
 
                        if(not db.query('UPDATE `guilds` SET `balance` = `balance` - ' .. money[1] .. ' WHERE `id` = ' .. guild .. ' LIMIT 1;')) then
                                return false
                        end
 
                        doPlayerAddMoney(cid, money[1])
                        player:sendChannelMessage('', 'You have just picked ' .. money[1] .. ' money from your guild balance.', TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                else
                        player:sendChannelMessage('', 'Invalid sub-command.', TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                end
        elseif(t[1] == 'donate') then
                local money = tonumber(t[2])
                if(not isValidMoney(money)) then
                        player:sendChannelMessage('', 'Invalid amount of money specified.', TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                        return true
                end
 
                if(getPlayerMoney(cid) < money) then
                        player:sendChannelMessage('', 'You don\'t have enough money.', TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                        return true
                end
 
                if(not doPlayerRemoveMoney(cid, money)) then
                        return false
                end
 
                db.query('UPDATE `guilds` SET `balance` = `balance` + ' .. money .. ' WHERE `id` = ' .. guild .. ' LIMIT 1;')
                player:sendChannelMessage('', 'You have transfered ' .. money .. ' money to your guild balance.', TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
        else
                local resultId = db.storeQuery('SELECT `name`, `balance` FROM `guilds` WHERE `id` = ' .. guild)
                if resultId == false then
                        return false
                end
                player:sendChannelMessage('', 'Current balance of guild ' .. result.getDataString(resultId, "name") .. ' is: ' .. result.getDataInt(resultId, "balance") .. ' bronze coins.', TALKTYPE_CHANNEL_R1, CHANNEL_GUILD)
                result.free(resultId)
        end
end

Pós isto, abra seu talkactions.xml e dentro adicione:

 <!--War System TALK by Absolute -->
	<talkaction words="/war" separator=" " script="gwarabsolute.lua" />
	<talkaction words="/balance" separator=" " script="absolutebalance.lua" />

Nota: Você deve conter as colunas na database (Praticamente todas já possuem).

 

 

 

Tabela de comando in-game para players:

mMGQyUU.png

 

divisor.png

 

 

Observação Final: Você pode manter tanto a página quanto a talkaction para seu GuildWAR.

divisor.png

 

 

 

 

Este conteúdo é feito por mim e exclusivo ao fórum tibiaking.com, não autorizo cópias ou demais postagens.

 

 

Demais dúvidas utilize o fórum para perguntar.

 

Espero ter ajudado.

 

Absolute.

YDmXTU2.png

 

Entenda tudo sobre VPS, DEDICADOS & HOSPEDAGENS. => Clique aqui

Global Full Download 10.9x - TFS 1.2/FERUMBRAS/KRAILOS. => Clique aqui

 

Muitos querem aquilo que você tem, 
mas vão desistir quando souberem o preço que você pagou.

 

skype-favicon.png lu.lukinha

message-16.png [email protected]

Link para o post
Compartilhar em outros sites
MauroelBrizola

MauroelBrizola 5

Postado
Postado

Vou utilizar com certeza!

Grande contribuição.


O meu estava dando um erro: 01:12 Guild " Openprise" does not exists.

 

No arquivo absolutebalance.lua:

Troquei:

local t = string.split(param, ",")

Por:
  local t = string.explode(param, ",")

 

E funcionou!

background-two4.gif

[ 10.41 ] [ Custom Map ] [ Eventos ] [ Resets ] [ VIP ] [ Shop ] [ Slots ]

[ openprise.com.br ] [ www.openprise.com.br ]

Link para o post
Compartilhar em outros sites
doda4ever

doda4ever 6

Postado
Postado

vlw absolute, eu tinha posto o sistema pelo site. Mas vou pelo game tbm

"Antes de morrer, viva!"

 


 
http://fast-baiak.com
BAIAK 8.60 MAIS COMPLETO DA ATUALIDADE!

Se leu eh viado!

 

 

Link para o post
Compartilhar em outros sites
Povildo

Povildo 23

Postado
Postado

e para ver no website você tem não ?


e para ver no website você tem não ?

 não está pegando aqui não

Link para o post
Compartilhar em outros sites
  • 3 weeks later...
  • 9 months later...
lamina

lamina 24

Postado
Postado (editado) 
Lua Script Error: [TalkAction Interface] 
data/talkactions/scripts/gwarabsolute.lua:onSay
data/talkactions/scripts/gwarabsolute.lua:11: attempt to compare number with nil
stack traceback:
	[C]: in function '__lt'
	data/talkactions/scripts/gwarabsolute.lua:11: in function <data/talkactions/scripts/gwarabsolute.lua:1>

10.77 erro :v

Editado por lamina (veja o histórico de edições)

Antica Global - Server Online

 

SITE: http://anticaglobal.com/

IP: anticaglobal.com
EXP: 999x [sTAGES]
ML: 300x
SKILL: 500x
LOOT: 10x
 
VERSÃO: 10.77
PORTA: 7171
 
Stages:
1 - 8 level, 999x
9 - 20 level, 950x
21 - 50 level, 800x
51 - 100 level, 750x
101 - 130 level, 650x
131 - 180 level, 550x
181 - 230 level, 450x
231 - 300 level, 350x
301+ level, 300x
 
Link para o post
Compartilhar em outros sites
kaboflow

kaboflow 9

Postado
Postado
[01/07/2015 21:16:48] [Error - TalkAction Interface] 
[01/07/2015 21:16:48] data/talkactions/scripts/war.lua:onSay
[01/07/2015 21:16:48] Description: 
[01/07/2015 21:16:48] data/talkactions/scripts/war.lua:133: attempt to call field 'executeQuery' (a nil value)
[01/07/2015 21:16:48] stack traceback:
[01/07/2015 21:16:48] data/talkactions/scripts/war.lua:133: in function <data/talkactions/scripts/war.lua:1>
[01/07/2015 21:16:49] OTSYS_SQLITE3_PREPARE(): SQLITE ERROR: no such table: guild_wars (SELECT "guild_id", "status" FROM "guild_wars" WHERE "guild_id" IN (4,2) AND "enemy_id" IN (2,4) AND "status" IN (0, 1))
 
[01/07/2015 21:16:49] [Error - TalkAction Interface] 
[01/07/2015 21:16:49] data/talkactions/scripts/war.lua:onSay
[01/07/2015 21:16:49] Description: 
[01/07/2015 21:16:49] data/talkactions/scripts/war.lua:133: attempt to call field 'executeQuery' (a nil value)
[01/07/2015 21:16:49] stack traceback:
[01/07/2015 21:16:49] data/talkactions/scripts/war.lua:133: in function <data/talkactions/scripts/war.lua:1>

iTRMWRP.png

Link para o post
Compartilhar em outros sites
  • 4 weeks later...
gustavoood

gustavoood 1

Postado
Postado

cara ta dando erro o comando nao ta funcionando olha o erro 

 

[24/07/2015 05:29:54] [Error - TalkAction Interface] 

[24/07/2015 05:29:54] data/talkactions/scripts/gwarabsolute.lua:onSay
[24/07/2015 05:29:54] Description: 
[24/07/2015 05:29:54] data/talkactions/scripts/gwarabsolute.lua:3: attempt to call global 'Player' (a nil value)
[24/07/2015 05:29:54] stack traceback:
[24/07/2015 05:29:54] data/talkactions/scripts/gwarabsolute.lua:3: in function <data/talkactions/scri

                                                                    by : GOTD

                                                       :facepalm: esperando voce morrer..

 

 

                                                                 40% Scripter

                                                                 70% Mapper

Link para o post
Compartilhar em outros sites
  • 1 year later...
King Daniel

King Daniel 0

Postado
Postado

[23/04/2017 09:08:51] [Error - TalkAction Interface] 
[23/04/2017 09:08:51] data/talkactions/scripts/gwarabsolute.lua:onSay
[23/04/2017 09:08:51] Description: 
[23/04/2017 09:08:51] data/talkactions/scripts/gwarabsolute.lua:3: attempt to call global 'Player' (a nil value)
[23/04/2017 09:08:51] stack traceback:
[23/04/2017 09:08:51]     data/talkactions/scripts/gwarabsolute.lua:3: in function <data/talkactions/scripts/gwarabsolute.lua:1>
 

 

alguem pode min ajuda ?

Link para o post
Compartilhar em outros sites
  • 6 months later...

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Seguidores 1
Ir para a lista de tópicos

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

  • Conteúdo Similar

    • .Smile
      /adm para virar GOD /player para virar PLAYER
      Por .Smile
      Olá a todos, atualmente estou aprendendo programação e desenvolvendo um Servidor, uma das coisas chatas a se fazer era ficar alternando entre um Personagem PLAYER e outro GOD para testar algumas coisas, com esses 2 scripts eu resolvi esse problema.

      É um script simples que eu pretendo futuramente melhorá-lo.

      What does the command do?
      /adm - Transforma seu personagem em GOD e kika ele
      /player - Transforma seu personagem em PLAYER e kika ele
       
      LEMBRANDO QUE: Não é qualquer que consegue usar esse comando, você precisa ter dado a sua conta o acesso de god, assim podendo ter esse comando num Servidor Online com outros jogadores sem que os mesmos possam usar.

      \data\talkactions
      talkactions.xml
      Code: <talkaction words="/player" script="player.lua" /> <talkaction words="/adm" script="adm.lua" /> \data\talkactions\scripts 
      adm.lua
      Code: function onSay(player, words, param) if player:getAccountType() < ACCOUNT_TYPE_GOD then return false end local position = player:getPosition() player:setGroup(Group(3)) position:sendMagicEffect(14) player:remove() return false end \data\talkactions\scripts
      player.lua
      function onSay(player, words, param) if player:getAccountType() < ACCOUNT_TYPE_GOD then return false end local position = player:getPosition() player:setGroup(Group(1)) position:sendMagicEffect(13) player:remove() return false end  
    • DeanWinchester
      (Resolvido)Erro config.lua
      Por DeanWinchester
      Xamp dando o seguinte erro

      ja apaguei oque tinha que apagar no config.lua e não funciona
    • maper007
      (Resolvido)bug no shoop (gesior)
      Por maper007
      Boa Noite...
       
      Estou usando o website do Victor (+ recente) porem quando eu compro alguma coisa no shoop... ele n para de chegar na acc os itens ex: eu comprei 1 wand (esta programado para o player receber apos 30 sec) 30 sec depois chega para o player so que sempre depois de 30 sec eu fico recebendo essa wand..... no console n apareceu nenhum erro....
      comoq eu arrumo isso ??
       
      meu servidor é 10.53
       
      shoop (globalevents)
       



       
      fico no aguardo... vlw
    • leoleo
      (Resolvido)Duvida sobre function
      Por leoleo
      Boa noite amigos, gostaria de pedir ajuda de vocês para terminar um script o qual vou postar aqui no tibiaking.
       
      Estou agarrado desde hoje de manha pois tnão consigo achar uma forma de buscar o house-id
      ja tentei com
       
      getHouseFromPos(pos)
      getTileHouseInfo(pos)
       
      .. e etc ...
       
      Estou usando TFS 1.0
       
      Desde já agradesço
    • igorppbr
      (Resolvido)[AJUDA] Spell de imortalidade tfs 1.0
      Por igorppbr
      Salve galera do TK, estou com um problema venho tentando adicionar a spell de imortalidade que encontrei aqui no forum, porem ela da um erro, segue:
       
      attempt to call global 'Condition' < a nil value >
       
       
      Uso TFS 1.0, se alguém puder me ajudar ou mesmo postar um script dessa spell para 1.0 ficarei muito agradecido, desde ja agradeço pela atenção.

      @UP !!

TibiaKing

Open Tibia Server

Quer aprender a criar seu próprio servidor de Tibia? Então está no lugar certo, aqui você encontrará milhares de tutorias, scripts, códigos, mapas e utilitários para que você possa fazer o seu próprio servidor de Tibia começando do zero.

Redes Sociais

Anuncie no TibiaKing

Precisa de mais visibilidade em seus projetos? Quer fazer um plano publicitário para o seu servidor? Anuncie no OTKing e faça sua divulgação, possuímos centenas de acessos simultâneos e milhares diários, com certeza será a sua solução!

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo

  Eu aceito