Advertisement
Guest User

Untitled

a guest
Dec 13th, 2015
30
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.06 KB | None | 0 0
  1. local delay = {}
  2. function onSay(cid, words, param, channel)
  3. if(delay[cid] ~= nil and delay[cid] == os.time()) then
  4. return false
  5. end
  6. delay[cid] = os.time()
  7. local guild = getPlayerGuildId(cid)
  8. if(not guild or getPlayerGuildLevel(cid) < GUILDLEVEL_LEADER) then
  9. doPlayerSendChannelMessage(cid, "", "You cannot execute this talkaction.", TALKTYPE_CHANNEL_W, 0)
  10. return true
  11. end
  12.  
  13. local t = string.explode(param, ",")
  14. if(not t[2]) then
  15. doPlayerSendChannelMessage(cid, "", "Not enough param(s).", TALKTYPE_CHANNEL_W, 0)
  16. return true
  17. end
  18.  
  19. local enemy = getGuildId(t[2])
  20. if(not enemy) then
  21. doPlayerSendChannelMessage(cid, "", "Guild " .. t[2] .. " does not exists.", TALKTYPE_CHANNEL_W, 0)
  22. return true
  23. end
  24.  
  25. if(enemy == guild) then
  26. doPlayerSendChannelMessage(cid, "", "You cannot perform war action on your own guild.", TALKTYPE_CHANNEL_W, 0)
  27. return true
  28. end
  29.  
  30. local enemyName, tmp = "", db.getResult("SELECT `name` FROM `guilds` WHERE `id` = " .. enemy)
  31. if(tmp:getID() ~= -1) then
  32. enemyName = tmp:getDataString("name")
  33. tmp:free()
  34. end
  35.  
  36. if(isInArray({"accept", "reject", "cancel"}, t[1])) then
  37. local query = "`guild_id` = " .. enemy .. " AND `enemy_id` = " .. guild
  38. if(t[1] == "cancel") then
  39. query = "`guild_id` = " .. guild .. " AND `enemy_id` = " .. enemy
  40. end
  41.  
  42. tmp = db.getResult("SELECT `id`, `begin`, `end`, `payment` FROM `guild_wars` WHERE " .. query .. " AND `status` = 0")
  43. if(tmp:getID() == -1) then
  44. doPlayerSendChannelMessage(cid, "", "Currently there's no pending invitation for a war with " .. enemyName .. ".", TALKTYPE_CHANNEL_W, 0)
  45. return true
  46. end
  47.  
  48. if(t[1] == "accept") then
  49. local _tmp = db.getResult("SELECT `balance` FROM `guilds` WHERE `id` = " .. guild)
  50. local state = _tmp:getID() < 0 or _tmp:getDataInt("balance") < tmp:getDataInt("payment")
  51.  
  52. _tmp:free()
  53. if(state) then
  54. doPlayerSendChannelMessage(cid, "", "Your guild balance is too low to accept this invitation.", TALKTYPE_CHANNEL_W, 0)
  55. return true
  56. end
  57.  
  58. db.executeQuery("UPDATE `guilds` SET `balance` = `balance` - " .. tmp:getDataInt("payment") .. " WHERE `id` = " .. guild)
  59. end
  60.  
  61. query = "UPDATE `guild_wars` SET "
  62. local msg = "accepted " .. enemyName .. " invitation to war."
  63. if(t[1] == "reject") then
  64. query = query .. "`end` = " .. os.time() .. ", `status` = 2"
  65. msg = "rejected " .. enemyName .. " invitation to war."
  66. elseif(t[1] == "cancel") then
  67. query = query .. "`end` = " .. os.time() .. ", `status` = 3"
  68. msg = "canceled invitation to a war with " .. enemyName .. "."
  69. else
  70. query = query .. "`begin` = " .. os.time() .. ", `end` = " .. (tmp:getDataInt("end") > 0 and (os.time() + ((tmp:getDataInt("begin") - tmp:getDataInt("end")) / 86400)) or 0) .. ", `status` = 1"
  71. end
  72.  
  73. query = query .. " WHERE `id` = " .. tmp:getDataInt("id")
  74. if(t[1] == "accept") then
  75. doGuildAddEnemy(guild, enemy, tmp:getDataInt("id"), WAR_GUILD)
  76. doGuildAddEnemy(enemy, guild, tmp:getDataInt("id"), WAR_ENEMY)
  77. end
  78.  
  79. tmp:free()
  80. db.executeQuery(query)
  81. doBroadcastMessage(getPlayerGuildName(cid) .. " has " .. msg, MESSAGE_EVENT_ADVANCE)
  82. return true
  83. end
  84.  
  85. if(t[1] == "invite") then
  86. local str = ""
  87. tmp = db.getResult("SELECT `guild_id`, `status` FROM `guild_wars` WHERE `guild_id` IN (" .. guild .. "," .. enemy .. ") AND `enemy_id` IN (" .. enemy .. "," .. guild .. ") AND `status` IN (0, 1)")
  88. if(tmp:getID() ~= -1) then
  89. if(tmp:getDataInt("status") == 0) then
  90. if(tmp:getDataInt("guild_id") == guild) then
  91. str = "You have already invited " .. enemyName .. " to war."
  92. else
  93. str = enemyName .. " have already invited you to war."
  94. end
  95. else
  96. str = "You are already on a war with " .. enemyName .. "."
  97. end
  98.  
  99. tmp:free()
  100. end
  101.  
  102. if(str ~= "") then
  103. doPlayerSendChannelMessage(cid, "", str, TALKTYPE_CHANNEL_W, 0)
  104. return true
  105. end
  106.  
  107. local frags = tonumber(t[3])
  108. if(frags ~= nil) then
  109. frags = math.max(10, math.min(1000, frags))
  110. else
  111. frags = 100
  112. end
  113.  
  114. local payment = tonumber(t[4])
  115. if(payment ~= nil) then
  116. payment = math.max(100000, math.min(1000000000, payment))
  117. tmp = db.getResult("SELECT `balance` FROM `guilds` WHERE `id` = " .. guild)
  118.  
  119. local state = tmp:getID() < 0 or tmp:getDataInt("balance") < payment
  120. tmp:free()
  121. if(state) then
  122. doPlayerSendChannelMessage(cid, "", "Your guild balance is too low for such payment.", TALKTYPE_CHANNEL_W, 0)
  123. return true
  124. end
  125.  
  126. db.executeQuery("UPDATE `guilds` SET `balance` = `balance` - " .. payment .. " WHERE `id` = " .. guild)
  127. else
  128. payment = 0
  129. end
  130.  
  131. local begining, ending = os.time(), tonumber(t[5])
  132. if(ending ~= nil and ending ~= 0) then
  133. ending = begining + (ending * 86400)
  134. else
  135. ending = 0
  136. end
  137.  
  138. db.executeQuery("INSERT INTO `guild_wars` (`guild_id`, `enemy_id`, `begin`, `end`, `frags`, `payment`) VALUES (" .. guild .. ", " .. enemy .. ", " .. begining .. ", " .. ending .. ", " .. frags .. ", " .. payment .. ");")
  139. doBroadcastMessage(getPlayerGuildName(cid) .. " has invited " .. enemyName .. " to war till " .. frags .. " frags.", MESSAGE_EVENT_ADVANCE)
  140. return true
  141. end
  142.  
  143. if(not isInArray({"end", "finish"}, t[1])) then
  144. return false
  145. end
  146.  
  147. local status = (t[1] == "end" and 1 or 4)
  148. tmp = db.getResult("SELECT `id` FROM `guild_wars` WHERE `guild_id` = " .. guild .. " AND `enemy_id` = " .. enemy .. " AND `status` = " .. status)
  149. if(tmp:getID() ~= -1) then
  150. local query = "UPDATE `guild_wars` SET `end` = " .. os.time() .. ", `status` = 5 WHERE `id` = " .. tmp:getDataInt("id")
  151. tmp:free()
  152. doGuildRemoveEnemy(guild, enemy)
  153. doGuildRemoveEnemy(enemy, guild)
  154.  
  155. db.executeQuery(query)
  156. doBroadcastMessage(getPlayerGuildName(cid) .. " has " .. (status == 4 and "mend fences" or "ended up a war") .. " with " .. enemyName .. ".", MESSAGE_EVENT_ADVANCE)
  157. return true
  158. end
  159.  
  160. if(status == 4) then
  161. doPlayerSendChannelMessage(cid, "", "Currently there's no pending war truce from " .. enemyName .. ".", TALKTYPE_CHANNEL_W, 0)
  162. return true
  163. end
  164.  
  165. tmp = db.getResult("SELECT `id`, `end` FROM `guild_wars` WHERE `guild_id` = " .. enemy .. " AND `enemy_id` = " .. guild .. " AND `status` = 1")
  166. if(tmp:getID() ~= -1) then
  167. if(tmp:getDataInt("end") > 0) then
  168. tmp:free()
  169. doPlayerSendChannelMessage(cid, "", "You cannot request ending for war with " .. enemyName .. ".", TALKTYPE_CHANNEL_W, 0)
  170. return true
  171. end
  172.  
  173. local query = "UPDATE `guild_wars` SET `status` = 4, `end` = " .. os.time() .. " WHERE `id` = " .. tmp:getDataInt("id")
  174. tmp:free()
  175.  
  176. db.executeQuery(query)
  177. doBroadcastMessage(getPlayerGuildName(cid) .. " has signed an armstice declaration on a war with " .. enemyName .. ".", MESSAGE_EVENT_ADVANCE)
  178. return true
  179. end
  180.  
  181. doPlayerSendChannelMessage(cid, "", "Currently there's no active war with " .. enemyName .. ".", TALKTYPE_CHANNEL_W, 0)
  182. return true
  183. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement