• There is NO official Otland's Discord server and NO official Otland's server list. The Otland's Staff does not manage any Discord server or server list. Moderators or administrator of any Discord server or server lists have NO connection to the Otland's Staff. Do not get scammed!

Lua Error TFS 1.0

Natan Beckman

Natan Beckman

Well-Known Member
Joined
Aug 1, 2010
Messages
548
Reaction score
52
Location
Teresina-PI/Br
I use TFS 1.0.

when execute command !guildpoints
show this error:
Code: 
Lua Script Error: [TalkAction Interface]
data/talkactions/scripts/guildpoints.lua:onSay
data/talkactions/scripts/guildpoints.lua:75: attempt to index global 'Query' (a number value)
stack traceback:
        [C]: in function '__index'
        data/talkactions/scripts/guildpoints.lua:75: in function <data/talkactions/scripts/guildpoints.lua:71>

Code: 
GuildPointsConfigs={
        ExecuteIntervalHours=24,
        NeedPlayersOnline=7,
        NeedDiferentIps=5,
        MinLevel=70,
        AddPointsForAcc=19}


function getGuildPlayersValidAccIDS(GuildID,MinLevel)
       localRanksIDS={}
       localAccsID={}
       localValidAccsID={}
        Query1= db.storeQuery("SELECT `id` FROM `guild_ranks` WHERE guild_id = '"..GuildID.."'")
       if(Query1:getID()==-1)then
               returnValidAccsID
       end
       for i =1,Query1:getRows()do
               table.insert(RanksIDS,Query1:getDataInt("id"))
                Query1:next()
       end
        Query2= db.storeQuery("SELECT `account_id` FROM `players` WHERE `rank_id` IN (".. table.concat(RanksIDS,', ')..") AND `level` >= "..MinLevel.."")
       if(Query2:getID()==-1)then
               returnValidAccsID
       end
       for i =1,Query2:getRows()do
               localAccID=Query2:getDataInt("account_id")
               if#AccsID > 0 then
                       for k =1,#AccsID do
                               ifAccID==AccsID[k]then
                                        AddAccList=false
                                       break
                               end
                                AddAccList=true
                       end
                       ifAddAccListthen
                               table.insert(AccsID,AccID)
                       end
               else
                       table.insert(AccsID,AccID)
               end
                Query2:next()
       end
        Query3= db.storeQuery("SELECT `id` FROM `accounts` WHERE `guild_points_stats` = 0 AND `id` IN (".. table.concat(AccsID,', ')..")")
       if(Query3:getID()==-1)then
               returnValidAccsID
       end
       for i =1,Query3:getRows()do
               localAccID=Query3:getDataInt("id")
               if#ValidAccsID > 0 then
                       for k =1,#ValidAccsID do
                               ifAccID==ValidAccsID[k]then
                                        AddAccList=false
                                       break
                               end
                                AddAccList=true
                       end
                       ifAddAccListthen
                               table.insert(ValidAccsID,AccID)
                       end
               else
                       table.insert(ValidAccsID,AccID)
               end
                Query3:next()
       end
       returnValidAccsIDend


function onSay(cid, words, param, channel)
       if(getPlayerGuildLevel(cid)==3)then
               localGuildID= getPlayerGuildId(cid)
                Query= db.storeQuery("SELECT `last_execute_points` FROM `guilds` WHERE id = '"..GuildID.."'")
               if(Query:getID()==-1)then
                       returntrue
               end
               ifQuery:getDataInt("last_execute_points")< os.time()then
                       localGuildMembers={}
                       localGuildMembersOnline={}
                       localPlayersOnline= getPlayersOnline()
                       for i, pid in ipairs(PlayersOnline)do
                               if getPlayerGuildId(pid)==GuildIDthen
                                       if getPlayerLevel(pid)>=GuildPointsConfigs.MinLevelthen
                                               table.insert(GuildMembersOnline, pid)
                                       end
                               end
                       end
                       if#GuildMembersOnline >= GuildPointsConfigs.NeedPlayersOnline then
                               local IPS ={}
                               for i, pid in ipairs(GuildMembersOnline)do
                                       localPlayerIP= getPlayerIp(pid)
                                       if#IPS > 0 then
                                               for k =1,#IPS do
                                                       ifPlayerIP== IPS[k]then
                                                                AddIPList=false
                                                               break
                                                       end
                                                        AddIPList=true
                                               end
                                               ifAddIPListthen
                                                       table.insert(IPS,PlayerIP)
                                               end
                                       else
                                               table.insert(IPS,PlayerIP)
                                       end
                               end
                               if#IPS >= GuildPointsConfigs.NeedDiferentIps then
                                       localValidAccounts= getGuildPlayersValidAccIDS(GuildID,GuildPointsConfigs.MinLevel)
                                        db.executeQuery("UPDATE `guilds` SET `last_execute_points` = ".. os.time()+(GuildPointsConfigs.ExecuteIntervalHours*3600).." WHERE `guilds`.`id` = "..GuildID..";")
                                        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,""..#ValidAccounts .." Players received points")
                                       if#ValidAccounts > 0 then
                                                db.executeQuery("UPDATE `accounts` SET `guild_points` = `guild_points` + "..GuildPointsConfigs.AddPointsForAcc..", `guild_points_stats` = ".. os.time().." WHERE `id` IN (".. table.concat(ValidAccounts,',')..");")
                                               for i, pid in ipairs(GuildMembersOnline)do
                                                       localPlayerMSGAccID= getPlayerAccountId(pid)
                                                       for k =1,#ValidAccounts do
                                                               ifPlayerMSGAccID==ValidAccounts[k]then
                                                                        doPlayerSendTextMessage(pid, MESSAGE_INFO_DESCR,"You received "..GuildPointsConfigs.AddPointsForAcc.." guild points.")
                                                                       break
                                                               end
                                                       end
                                               end
                                       end
                               else
                                        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"Only "..#IPS .." players are valid, you need ".. GuildPointsConfigs.NeedDiferentIps .." players with different ips.")
                               end
                       else
                                doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"Has only "..#GuildMembersOnline .." players online you need ".. GuildPointsConfigs.NeedPlayersOnline .." players online at least from level "..GuildPointsConfigs.MinLevel ..".")
                       end
               else
                        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"The command can only be run once every "..GuildPointsConfigs.ExecuteIntervalHours.." hours.")
               end
       else
                doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"Only guild leader can request points.")
       end
       return true
end

help
 
Sort by date Sort by votes
The person who wrote this script should be beaten with a hammer... Try this one I have no ide if it works or not, if it dosen't just quote me and ill see whats wrong, mainly only cleaned up the code and lost what line the bug was on.
Code: 
local GuildPointsConfigs = {
    ExecuteIntervalHours = 24,
    NeedPlayersOnline = 7,
    NeedDiferentIps = 5,
    MinLevel = 70,
    AddPointsForAcc = 19
}

function getGuildPlayersValidAccIDS(GuildID, MinLevel)   
    local RanksIDS, AccsID, ValidAccsID = {}, {}, {}
    local Query1 = db.storeQuery("SELECT `id` FROM `guild_ranks` WHERE guild_id = '" .. GuildID .. "'")
    if(Query1:getID() == -1) then
        return ValidAccsID
    end
   
    for i = 1, Query1:getRows() do
        table.insert(RanksIDS, Query1:getDataInt("id"))
        Query1:next()
    end
   
    local Query2 = db.storeQuery("SELECT `account_id` FROM `players` WHERE `rank_id` IN (".. table.concat(RanksIDS,', ')..") AND `level` >= "..MinLevel.."")
    if(Query2:getID() == -1) then
        return ValidAccsID
    end
   
    for i = 1, Query2:getRows() do
        local AccID = Query2:getDataInt("account_id")
        if(#AccsID > 0) then
            for k = 1, #AccsID do
                if(AccID == AccsID[k]) then
                    AddAccList=false
                    break
                end
               
                AddAccList=true
            end
           
            if(AddAccList) then
                table.insert(AccsID,AccID)
            end
        else
            table.insert(AccsID,AccID)
        end
       
        Query2:next()
    end
   
    local Query3 = db.storeQuery("SELECT `id` FROM `accounts` WHERE `guild_points_stats` = 0 AND `id` IN (".. table.concat(AccsID,', ')..")")
   
    if(Query3:getID() == -1) then
        return ValidAccsID
    end
   
    for i = 1, Query3:getRows() do
        local AccID=Query3:getDataInt("id")
        if(#ValidAccsID > 0) then
            for k = 1, #ValidAccsID do
                if(AccID == ValidAccsID[k]) then
                    AddAccList=false
                    break
                end
               
                AddAccList=true
            end
            if(AddAccList) then
                table.insert(ValidAccsID,AccID)
            end
        else
            table.insert(ValidAccsID,AccID)
        end
       
        Query3:next()
    end
return ValidAccsID
end

function onSay(cid, words, param, channel)
    local player = Player(cid)
    if(player:getGuildLevel == 3) then
        local GuildID = player:getGuild():getId()
        local Query = db.storeQuery("SELECT `last_execute_points` FROM `guilds` WHERE id = '" .. GuildID .. "'")
        if(Query:getID() == -1) then
            return true
        end
       
        if(Query:getDataInt("last_execute_points") < os.time()) then
            local GuildMembers = {}
            local GuildMembersOnline = {}
            for i, pid in ipairs(Game.getPlayers()) do
                local targetPlayer = Player(pid)
                if(targetPlayer:getGuild():getId() == GuildID)then
                    if(targetPlayer:getLevel() >= GuildPointsConfigs.MinLevel) then
                        table.insert(GuildMembersOnline, pid)
                    end
                end
            end
           
            if(#GuildMembersOnline >= GuildPointsConfigs.NeedPlayersOnline) then
                local IPS = {}
                for i, pid in ipairs(GuildMembersOnline)do
                    local PlayerIP = getPlayerIp(pid)
                    if(#IPS > 0) then
                        for k = 1, #IPS do
                            if(PlayerIP == IPS[k]) then
                                AddIPList = false
                                break
                            end
                            AddIPList = true
                        end
                        if(AddIPList) then
                            table.insert(IPS,PlayerIP)
                        end
                    else
                        table.insert(IPS,PlayerIP)
                    end
                end
               
                if(#IPS >= GuildPointsConfigs.NeedDiferentIps) then
                    local ValidAccounts = getGuildPlayersValidAccIDS(GuildID,GuildPointsConfigs.MinLevel)
                    db.query("UPDATE `guilds` SET `last_execute_points` = ".. os.time()+(GuildPointsConfigs.ExecuteIntervalHours*3600).." WHERE `guilds`.`id` = "..GuildID..";")
                    player:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE,"" .. #ValidAccounts .. " Players received points")
                   
                    if(#ValidAccounts > 0) then
                        db.query("UPDATE `accounts` SET `guild_points` = `guild_points` + "..GuildPointsConfigs.AddPointsForAcc..", `guild_points_stats` = ".. os.time().." WHERE `id` IN (".. table.concat(ValidAccounts,',')..");")
                        for i, pid in ipairs(GuildMembersOnline)do
                            local targetPlayer = Player(pid)
                            local PlayerMSGAccID = targetPlayer:getAccountId()
                            for k = 1, #ValidAccounts do
                                if(PlayerMSGAccID == ValidAccounts[k]) then
                                    targetPlayer:sendTextMessage(MESSAGE_INFO_DESCR,"You received "..GuildPointsConfigs.AddPointsForAcc.." guild points.")
                                    break
                                end
                            end
                        end
                    end
                else
                    player:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE,"Only " .. #IPS .. " players are valid, you need ".. GuildPointsConfigs.NeedDiferentIps .." players with different ips.")
                end
            else
                player:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE,"Has only " .. #GuildMembersOnline .. " players online you need ".. GuildPointsConfigs.NeedPlayersOnline .." players online at least from level ".. GuildPointsConfigs.MinLevel .. ".")
            end
        else
            player:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE,"The command can only be run once every " .. GuildPointsConfigs.ExecuteIntervalHours .. " hours.")
        end
    else
        player:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE,"Only guild leader can request points.")
    end
return true
end
 
Upvote 0 Downvote

Similar threads

B
  • Question
Lua Error in Reset System (TFS 0.4)
Replies
1
Views
391
Mateus Robeerto
Mateus Robeerto
Hbraveq
  • Solved
Lua Task in party TFS 1.5 7.72
Replies
7
Views
695
Hbraveq
Hbraveq
G
  • Question
Lua Autoloot Script/Error onkill-Mods
Replies
1
Views
334
Gaber Zen
G
J
  • Question
Auction system Problem
Replies
0
Views
246
jareczekjsp
J
samuel157
  • Solved
Lua [SQLite] -=[TFS]=- 0.4 8.60 Perfect System VIP 2.0 - Doesn't work as it should
Replies
13
Views
530
samuel157
samuel157
G
  • Question
Lua Script Resets System (otx2- Clinet 8.60)
2
Replies
39
Views
2K
domciacho
D
G
  • Question
Lua Auto loot-No Limt-mods
Replies
2
Views
438
Gaber Zen
G
L
  • Question
TFS 0.X Autoloot bug
Replies
5
Views
570
Gaber Zen
G
Kownikuzyt
  • Question
[TFS 0.4_DEV rev3884] Server problem #1
Replies
10
Views
427
Tenzhiro
Tenzhiro
J
  • Question
Autoloot Problem tfs 0.4
Replies
1
Views
290
jareczekjsp
J
Back
Top