[ERROR] FragGuildSystem URGENTE !

[tiroleivi 262]

Bom Estou com o Seguinte erro :

 

 

FragGuildSystem :

2. frag_guild = {
3. 
   
4. start_frags = 120155, -- dont edit
5. 
   
6. FragsToWinAcess = 100, -- to win guild acess
7. 
   
8. FragsPerKill = 1,
9. 
   
10. AcessTimeDays = 2,
11. 
    
12. MoreExpToGuild = true,
13. 
    
14. Exp_Rate = 1.1, -- 10%
15. 
    
16. Honor_Storage = 215548,
17. 
    
18. Honor_Point = 5
19. 
    
20. }
21. 
    
22.  
23. 
    
24.  
25. 
    
26. function getFragsByGuild(GuildName)
27. 
    
28. local check = db.getResult("SELECT `frags` FROM `guilds` WHERE `id` = " ..getGuildId(GuildName))
29. 
    
30. return check:getDataInt("frags") <= 0 and 0 or check:getDataInt("frags") end
31. 
    
32. function addFragsByGuild(GuildName,amount)
33. 
    
34. db.executeQuery("UPDATE `guilds` SET `frags` = "..getFragsByGuild(GuildName).."+"..amount.." WHERE `guilds`.`id` = "..getGuildId(GuildName)) end
35. 
    
36. function removeFragsByGuild(GuildName,amount)
37. 
    
38. db.executeQuery("UPDATE `guilds` SET `frags` = "..getFragsByGuild(GuildName).."-"..amount.." WHERE `guilds`.`id` = "..getGuildId(GuildName)) end
39. 
    
40. function setFragsByGuild(GuildName,value)
41. 
    
42. db.executeQuery("UPDATE `guilds` SET `frags` = "..value.." WHERE `guilds`.`id` = "..getGuildId(GuildName)) end
43. 
    
44. function cleanGuildFrags()
45. 
    
46. db.executeQuery("UPDATE guilds SET frags = 0;")
47. 
    
48. end
49. 
    
50. function getAcessTime(GuildName)
51. 
    
52. local query = db.getResult("SELECT `acesstime` FROM `guilds` WHERE `id` = " ..getGuildId(GuildName))
53. 
    
54. if query:getID() ~= -1 then return query:getDataInt("acesstime") end
55. 
    
56. end
57. 
    
58. function removeAcessGuildServer()
59. 
    
60. return db.executeQuery("UPDATE guilds SET acesstime = 0;")
61. 
    
62. end
63. 
    
64. function HaveGuild(cid)
65. 
    
66. return getPlayerGuildId(cid) > 0 and TRUE or FALSE
67. 
    
68. end
69. 
    
70. function doBroadCastGuild(GuildName,type,msg)
71. 
    
72. local players = {}
73. 
    
74. for _, cid in pairs(getPlayersOnline()) do
75. 
    
76. if getPlayerGuildName(cid) == GuildName then
77. 
    
78. table.insert(players, cid) end end
79. 
    
80. for i = 1, #players do doPlayerSendTextMessage(players,type,msg) end

return true end
function setAcessTime(GuildName, time)
return db.executeQuery("UPDATE `guilds` SET `acesstime` = "..time.." WHERE `guilds`.`id` = "..getGuildId(GuildName))
end
function getDaysAcess(GuildName)
local acess = math.ceil((getAcessTime(GuildName) - os.time())/(86400))
return acess <= 0 and 0 or acess
end
function HaveAcess(GuildName)
return getDaysAcess(GuildName) > 0 and TRUE or FALSE
end
function getGuildWinnerName()
local guildname = ''
local query = db.getResult("SELECT `name` FROM `guilds`;")  
if(query:getID() ~= -1) then  
repeat  
if HaveAcess(query:getDataString("name")) then
guildname = query:getDataString("name")
end
until not query:next()  
query:free()
end
return guildname
end
function addAcess(GuildName, days)
if days > 0 then
local add = days*86400
local time = getDaysAcess(GuildName) == 0 and (os.time() + add) or (getAcessTime(GuildName) + add)
return setAcessTime(GuildName, time) end
return nil end
function doRemoveAcess(GuildName, days)
if days > 0 then
local remove = days*86400
local time = getAcessTime(GuildName) - remove
return setAcessTime(GuildName, (time <= 0 and 1 or time)) end
return nil end
function getAcessDate(GuildName)
if HaveAcess(GuildName) then return os.date("%d/%m/%y %X", getAcessTime(GuildName)) end
return FALSE
end
function getHonorPoints(cid)
local Honor = getPlayerStorageValue(cid, frag_guild.Honor_Storage)
return Honor < 0 and 0 or Honor
end
function addHonorPoints(GuildName, amount)
local PlayersGuild = db.getResult("SELECT `name` FROM `players` WHERE `rank_id` IN (SELECT `id` FROM `guild_ranks` WHERE `guild_id` = " .. getGuildId(GuildName) .. ");")  
if (PlayersGuild:getID() ~= -1) then
repeat
local pid,Guid = getPlayerByNameWildcard(PlayersGuild:getDataString("name")),getPlayerGUIDByName(PlayersGuild:getDataString("name"))
if(not pid or isPlayerGhost(pid)) then
local getHonor = db.getResult("SELECT `value` FROM `player_storage` WHERE `player_id` = ".. Guid .." AND `key` = ".. frag_guild.Honor_Storage)
if (getHonor:getID() ~= -1) then
repeat
db.executeQuery("UPDATE `player_storage` SET `value` = ".. (getHonor:getDataInt("value")+amount) .." WHERE `player_id` = ".. Guid .." AND `key` = ".. frag_guild.Honor_Storage)
until not(getHonor:next())
getHonor:free()
end
else
setPlayerStorageValue(getPlayerByName(PlayersGuild:getDataString("name")), frag_guild.Honor_Storage, getHonorPoints(getPlayerByName(PlayersGuild:getDataString("name")))+amount)
end
until not PlayersGuild:next()
PlayersGuild:free()
end
return true
end

[Emersonssss 114]

Esse esta informando que 3 funções não existe, vc instalou a LIB corretamente ?

[tiroleivi 262]

Não fui eu que coloquei, está no ot que eu baixei :
\/ \/ \/ \/ \/ \/ \/ \/ \/
Baiak Barão by Death Rocks e Fabiodias (03/07/2014)

Se não for pedir muito, se vc tiver um Tutorial que vc recomende para q eu possa usar para refazer o procedimento eu agradeço.

Editado Julho 10, 2014 por tiroleivi (veja o histórico de edições)