Advertisement
Guest User

Untitled

a guest
Jul 17th, 2017
531
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 239.85 KB | None | 0 0
  1. on *:text:*:*: {
  2. if ($target ischan) && ($target == %Gather.Channel) {
  3. if ($1- == %Gather.Sign $+ Sxe) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) && (!%Gather.Flood) { set -u3 %Gather.Flood ON Status ALL | msg %Gather.Channel 2» 2S14xe-Injected :12  $+ %sxe $+  2« | halt }
  4. if ($1- == %Gather.Sign $+ Site) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) && (!%Gather.Flood) { set -u3 %Gather.Flood ON Status ALL | msg %Gather.Channel 2» $+(2,$remove(%gather.channel,$chr(35),14)) Site2:12  $+ %site $+  2« | halt }
  5. if ($1- == %Gather.Sign $+ credit) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) && (!%Gather.Flood) { set -u4 %Gather.Flood on | msg %Gather.channel $stl 12T14his 2G14atherBot 2W14as 2C14reated 2B14y 4V5e7n12t1o12x & 4S5y7r12e1n- 12& 4O5m7c12` 12& 5C7a6s2p3e4R7- }
  6. if ($1- == %Gather.Sign $+ credits) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) && (!%Gather.Flood) { set -u4 %Gather.Flood on | msg %Gather.channel $stl 12T14his 2G14atherBot 2W14as 2C14reated 2B14y 4V5e7n12t1o12x & 4S5y7r12e1n- 12& 4O5m7c12` 12& 5C7a6s2p3e4R7- }
  7. if ($1 == %Gather.Sign $+ Clubs) && (!%Gather.Flood) {
  8. mode %Gather.Channel +m
  9. var %x 1
  10. while (%x <= $numtok(%Gather.clubs,32)) {
  11. timer -m 1 $calc(%x *1500) 2hl $gettok(%Gather.clubs,%x,32)
  12. inc %x
  13. }
  14. timer -m 1 $calc(%x *1500 +1) mode %Gather.Channel -m
  15. }
  16. if ($1- == %Gather.Sign $+ Status) && (!%Gather.Flood) {
  17. status-1
  18. status-2
  19. status-3
  20. set -u10 %Gather.Flood ON Status ALL
  21. halt
  22. }
  23. if ($1 == %Gather.Sign $+ admin) && (!%Gather.Flood) {
  24. if (%Gather1.Status == ON) || (%Gather1.Status == adding) {
  25. msg %Gather.Channel $stl-1(2A14dmin Is:2 %gather1.admin)
  26. }
  27. if (%Gather2.Status == ON) || (%Gather2.Status == adding) {
  28. msg %Gather.Channel $stl-2(2A14dmin Is:2 %gather2.admin)
  29. }
  30. if (%Gather3.Status == ON) || (%Gather3.Status == adding) {
  31. msg %Gather.Channel $stl-3(2A14dmin Is:2 %gather3.admin)
  32. }
  33. set -u3 %Gather.Flood ON admin
  34. halt
  35. }
  36.  
  37. if ($1 == %Gather.Sign $+ map) && (!$2) && (!%Gather.Flood) {
  38. if (%Gather1.Status == ON) || (%Gather1.Status == adding) {
  39. msg %Gather.Channel $stl-1(2M14ap Is:2 $+ %gather1.map $+)
  40. }
  41. if (%Gather2.Status == ON) || (%Gather2.Status == adding) {
  42. msg %Gather.Channel $stl-2(2M14ap Is:2 $+ %gather2.map $+)
  43. }
  44. if (%Gather3.Status == ON) || (%Gather3.Status == adding) {
  45. msg %Gather.Channel $stl-3(2M14ap Is:2 $+ %gather3.map $+)
  46. }
  47. set -u3 %Gather.Flood ON map
  48. halt
  49. }
  50.  
  51. bset &score 1 33 99 114 101 100 105 116 115 32 33 97 98 111 117 116 32 33 118 101 114 115 105 111 110
  52. bset &rcon 1 2 3 50 187 32 3 49 52 2 71 97 116 104 101 114 66 111 116 32 66 121 32 2 3 50 86 101 110 116 111 120 32 2 3 49 52 97 110 100 2 3 50 32 79 109 99 96 15
  53. ;if ($istok($bvar(&score,1-).text,$1,32)) { msg %gather.channel $bvar(&rcon,1-).text | halt }
  54. if ($1- == %Gather.Sign $+ Score) && (!%Gather.Flood) {
  55. if (%Gather1.Status == ON) {
  56. if (!%Gather1.Live) { msg %Gather.Channel $stl-1(12Match Is not Live Yet.) }
  57. elseif (%Gather1.Live) && (%Gather1.Half == first) { msg %Gather.Channel $stl-1(3 $+ $score1(half) $+  $scoreside1(a) 2[.12 $score1(a) 3(TeamA) 2.] $scoreside1(b) 2[.12 $score1(b) 3(TeamB) 2.]) }
  58. elseif (%Gather1.Live) && ( (%Gather1.Half == second) || (%Gather1.Half == first-second) ) { msg %Gather.Channel $stl-1(3 $+ $score1(half) $+  $scoreside1(a) 2[.12 $score1(anow) 3(TeamA) 21st half %Gather1.FirstA 2.] $scoreside1(b) 2[.12 $score1(bnow) 3(TeamB) 21st half %Gather1.FirstB 2.]) }
  59. }
  60. if (%Gather2.Status == ON) {
  61. if (!%Gather2.Live) { msg %Gather.Channel $stl-2(12Match Is not Live Yet.) }
  62. elseif (%Gather2.Live) && (%Gather2.Half == first) { msg %Gather.Channel $stl-2(3 $+ $score2(half) $+  $scoreside2(a) 2[.12 $score2(a) 3(TeamA) 2.] $scoreside2(b) 2[.12 $score2(b) 3(TeamB) 2.]) }
  63. elseif (%Gather2.Live) && ( (%Gather2.Half == second) || (%Gather2.Half == first-second) ) { msg %Gather.Channel $stl-2(3 $+ $score2(half) $+  $scoreside2(a) 2[.12 $score2(anow) 3(TeamA) 21st half %Gather2.FirstA 2.] $scoreside2(b) 2[.12 $score2(bnow) 3(TeamB) 21st half %Gather2.FirstB 2.]) }
  64. }
  65. if (%Gather3.Status == ON) {
  66. if (!%Gather3.Live) { msg %Gather.Channel $stl-3(12Match Is not Live Yet.) }
  67. elseif (%Gather3.Live) && (%Gather3.Half == first) { msg %Gather.Channel $stl-3(3 $+ $score3(half) $+  $scoreside3(a) 2[.12 $score3(a) 3(TeamA) 2.] $scoreside3(b) 2[.12 $score3(b) 3(TeamB) 2.]) }
  68. elseif (%Gather3.Live) && ( (%Gather3.Half == second) || (%Gather3.Half == first-second) ) { msg %Gather.Channel $stl-3(3 $+ $score3(half) $+  $scoreside3(a) 2[.12 $score3(anow) 3(TeamA) 21st half %Gather3.FirstA 2.] $scoreside3(b) 2[.12 $score3(bnow) 3(TeamB) 21st half %Gather3.FirstB 2.]) }
  69. }
  70. set -u6 %Gather.Flood ON Status
  71. }
  72. if ($1- == %Gather1.Sign $+ Sub) && (%Gather1.Sub == A) && (!%Gather.Flood) && (%Gather1.Status == ON) && (!$istok(%Gather2.Subs,$nick,32)) && (!$istok(%Gather3.Subs,$nick,32)) {
  73. msg %Gather.Channel 4G14ather 1: 2» 2A14ttention2: 12Substitute player was found For 2T14eam-A ,2 $nick .
  74. tsay Substitute player was found for Team-A - $nick
  75. .timerSubA-1 off
  76. unset %Gather1.Sub
  77. set %Gather1.Subs $addtok(%Gather1.Subs,$nick,32)
  78. msg $nick $details(1).A
  79. set -u5 %Gather.Flood Sub Found
  80. set -u5 %Gather.Flood ON subsearching1
  81. halt
  82. }
  83. if ($1- == %Gather1.Sign $+ Sub) && (%Gather1.Sub == B) && (!%Gather.Flood) && (%Gather1.Status == ON) && (!$istok(%Gather2.Subs,$nick,32)) && (!$istok(%Gather3.Subs,$nick,32)) {
  84. msg %Gather.Channel 4G14ather 1: 2» 2A14ttention2: 12Substitute player was found For 4T14eam-B ,2 $nick .
  85. tsay Substitute player was found for Team-B - $nick
  86. .timerSubB-1 off
  87. unset %Gather1.Sub
  88. set %Gather1.Subs $addtok(%Gather1.Subs,$nick,32)
  89. msg $nick $details(1).B
  90. set -u5 %Gather.Flood Sub Found
  91. set -u5 %Gather.Flood ON subsearching1
  92. halt
  93. }
  94.  
  95. if ($1- == %Gather2.Sign $+ Sub) && (%Gather2.Sub == A) && (!%Gather.Flood) && (%Gather2.Status == ON) && (!$istok(%Gather1.Subs,$nick,32)) && (!$istok(%Gather3.Subs,$nick,32)) {
  96. msg %Gather.Channel 4G14ather 2: 2» 2A14ttention2: 12Substitute player was found for 2T14eam-A ,2 $nick .
  97. tsay2 Substitute player was found for Team-A - $nick
  98. .timerSubA-2 off
  99. unset %Gather2.Sub
  100. set %Gather2.Subs $addtok(%Gather2.Subs,$nick,32)
  101. msg $nick $details(2).A
  102. set -u5 %Gather.Flood Sub Found
  103. set -u5 %Gather.Flood ON subsearching2
  104. halt
  105. }
  106. if ($1- == %Gather2.Sign $+ Sub) && (%Gather2.Sub == B) && (!%Gather.Flood) && (%Gather2.Status == ON) && (!$istok(%Gather1.Subs,$nick,32)) && (!$istok(%Gather3.Subs,$nick,32)) {
  107. msg %Gather.Channel 4G14ather 2: 2» 2A14ttention2: 12Substitute player was found for 4T14eam-B ,2 $nick .
  108. tsay2 Substitute player was found for Team-B - $nick
  109. .timerSubB-2 off
  110. unset %Gather2.Sub
  111. set %Gather2.Subs $addtok(%Gather2.Subs,$nick,32)
  112. msg $nick $details(2).B
  113. set -u5 %Gather.Flood Sub Found
  114. set -u5 %Gather.Flood ON subsearching2
  115. halt
  116. }
  117. if ($1- == %Gather3.Sign $+ Sub) && (%Gather3.Sub == A) && (!%Gather.Flood) && (%Gather3.Status == ON) && (!$istok(%Gather1.Subs,$nick,32)) && (!$istok(%Gather2.Subs,$nick,32)) {
  118. msg %Gather.Channel 4G14ather 3: 2» 2A14ttention2: 12Substitute player was found for 2T14eam-A ,2 $nick .
  119. tsay3 Substitute player was found for Team-A - $nick
  120. .timerSubA-3 off
  121. unset %Gather3.Sub
  122. set %Gather3.Subs $addtok(%Gather3.Subs,$nick,32)
  123. msg $nick $details(3).A
  124. set -u5 %Gather.Flood Sub Found
  125. set -u5 %Gather.Flood ON subsearching3
  126. halt
  127. }
  128.  
  129. if ($1- == %Gather3.Sign $+ Sub) && (%Gather3.Sub == B) && (!%Gather.Flood) && (%Gather3.Status == ON) && (!$istok(%Gather1.Subs,$nick,32)) && (!$istok(%Gather2.Subs,$nick,32)) {
  130. msg %Gather.Channel 4G14ather 3: 2» 2A14ttention2: 12Substitute player was found For 4T14eam-B ,2 $nick .
  131. tsay3 Substitute player was found for Team-B - $nick
  132. .timerSubB-3 off
  133. unset %Gather3.Sub
  134. set %Gather3.Subs $addtok(%Gather3.Subs,$nick,32)
  135. msg $nick $details(3).B
  136. set -u5 %Gather.Flood Sub Found
  137. set -u5 %Gather.Flood ON subsearching3
  138. halt
  139. }
  140.  
  141. if ($1- == %Gather.Sign $+ Server) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) {
  142. set -u6 %Gather.Flood ON Server
  143. msg %Gather.Channel $stl(2G14ather S14erver 1 I14p2:12  $+ %Gather1.Server $+  2» 2G14ather S14erver 2 I14p2:12  $+ %Gather2.Server $+  2» 2G14ather S14erver 3 I14p2:12  $+ %Gather3.Server $+ )
  144. halt
  145. }
  146. if ($1 == %Gather.Sign $+ Server) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) && ($2) && ($2 == 1) {
  147. set -u7 %Gather.Flood ON Server $2
  148. 2hl %Gather1.server
  149. .timer -m 1 500 hlplayers %Gather1.server
  150. halt
  151. }
  152. if ($1 == %Gather.Sign $+ Server) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) && ($2) && ($2 == 2) {
  153. set -u7 %Gather.Flood ON Server $2
  154. 2hl %Gather2.server
  155. .timer -m 1 500 hlplayers %Gather2.server
  156. halt
  157. }
  158. if ($1 == %Gather.Sign $+ Server) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) && ($2) && ($2 == 3) {
  159. set -u7 %Gather.Flood ON Server $2
  160. 2hl %Gather3.server
  161. .timer -m 1 500 hlplayers %Gather3.server
  162. halt
  163. }
  164. if ($1- == %Gather.Sign $+ Pass) && ( ($istok(%Gather1.Team-A,$nick,32)) || ($istok(%Gather1.Team-B,$nick,32)) || ($istok(%Gather2.Team-A,$nick,32)) || ($istok(%Gather2.Team-B,$nick,32)) || ($istok(%Gather3.Team-A,$nick,32)) || ($istok(%Gather3.Team-B,$nick,32)) || ($istok(%Gather4.Team-A,$nick,32)) || ($istok(%Gather4.Team-B,$nick,32)) ) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) {
  165. if ($istok(%Gather1.Team-A,$nick,32)) { msg $nick 2Y14ou are in team 2A on Gather 1 $+ 14, ipass2:12 %Gather1.Server , 14Password2:12 %Gather1.Pass 14Ip Vent2:12 %Gather.Vent 14Pass2 14Vent2:12 %Gather1.PassA 4GET IN NOW! }
  166. elseif ($istok(%Gather1.Team-B,$nick,32)) { msg $nick 2Y14ou are in team 2B on Gather 1 $+ 14, ipass2:12 %Gather1.Server , 14Password2:12 %Gather1.Pass 14Ip Vent2:12 %Gather.Vent 14Pass2 14Vent2:12 %Gather1.PassB 4GET IN NOW! }
  167. elseif ($istok(%Gather2.Team-A,$nick,32)) { msg $nick 2Y14ou are in team 2A on Gather 2 $+ 14, ipass2:12 %Gather2.Server , 14Password2:12 %Gather2.Pass 14Ip Vent2:12 %Gather.Vent 14Pass2 14Vent2:12 %Gather2.PassA 4GET IN NOW! }
  168. elseif ($istok(%Gather2.Team-B,$nick,32)) { msg $nick 2Y14ou are in team 2B on Gather 2 $+ 14, ipass2:12 %Gather2.Server , 14Password2:12 %Gather2.Pass 14Ip Vent2:12 %Gather.Vent 14Pass2 14Vent2:12 %Gather2.PassB 4GET IN NOW! }
  169. elseif ($istok(%Gather3.Team-A,$nick,32)) { msg $nick 2Y14ou are in team 2A on Gather 3 $+ 14, ipass2:12 %Gather3.Server , 14Password2:12 %Gather3.Pass 14Ip Vent2:12 %Gather.Vent 14Pass2 14Vent2:12 %Gather3.PassA 4GET IN NOW! }
  170. elseif ($istok(%Gather3.Team-B,$nick,32)) { msg $nick 2Y14ou are in team 2B on Gather 3 $+ 14, ipass2:12 %Gather3.Server , 14Password2:12 %Gather3.Pass 14Ip Vent2:12 %Gather.Vent 14Pass2 14Vent2:12 %Gather3.PassB 4GET IN NOW! }
  171. set -u3 %gather.flood ON Pass
  172. }
  173. if ($1 == %Gather.Sign $+ Server) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && ($2) && ($2 > 3) {
  174. set -u7 %Gather.Flood ON Server $2
  175. 2hl $$gettok(%gather.clubs,$calc($2 -3),32)
  176. .timer -m 1 500 hlplayers $$gettok(%gather.clubs,$calc($2 -3),32)
  177. halt
  178. }
  179.  
  180.  
  181. if ($1- == %Gather.Sign $+ Servers) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) {
  182. set -u9 %Gather.Flood ON Server
  183. 2hl %Gather1.Server
  184. .timer 1 2 2hl %Gather2.Server
  185. .timer 1 4 2hl %Gather3.Server
  186. halt
  187. }
  188.  
  189. if ($1- == %Gather.Sign $+ Top-Players) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top players | halt }
  190. if ($1- == %Gather.Sign $+ TopPlayers) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top players | halt }
  191. if ($1- == %Gather.Sign $+ ToPlayers) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top players | halt }
  192.  
  193. if ($1- == %Gather.Sign $+ Top-10) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top 10 | halt }
  194. if ($1- == %Gather.Sign $+ Top10) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top 10 | halt }
  195. if ($1- == %Gather.Sign $+ Top-Aces) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) { top Aces | halt }
  196. if ($1- == %Gather.Sign $+ TopAces) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) { top Aces | halt }
  197. if ($1- == %Gather.Sign $+ Top-Mvps) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top mvps | halt }
  198. if ($1- == %Gather.Sign $+ TopMvps) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top mvps | halt }
  199.  
  200. if ($1- == %Gather.Sign $+ Top-Admins) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top admins | halt }
  201. if ($1- == %Gather.Sign $+ TopAdmins) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top admins | halt }
  202.  
  203. if ($1 == %Gather.Sign $+ Rank) && ($2) && ($stats($2-).score) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) {
  204. var %steam = $stats($2-).nick
  205. set -u5 %Gather.Flood ON rank
  206. msg %Gather.Channel 2» 2R14ank of  $+ %steam 2: 12 $+ $chr(35) $+ $rank(%steam) $+  2«O» T14otal Score: 12 $+ $stats(%steam).score $+  2«O» 2K14ills: 12 $+ $stats($2-).kills 2«O» 2D14eaths: 12 $+ $stats($2-).deaths 2«O» 2A14ces: 12 $+ $stats($2-).Aces .
  207. halt
  208. }
  209. if ( ($1 == %Gather.Sign $+ TopGun) || ($1 == %Gather.Sign $+ TopGunz) || ($1 == %Gather.Sign $+ TopGuns) || ($1 == %Gather.Sign $+ Gunz) ) && ($2) && ($stats($2-).score) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) {
  210. var %steam = $stats($2-).nick
  211. set -u10 %Gather.Flood ON rank
  212. top gunplayer %steam
  213. }
  214. if ( ($1 == %Gather.Sign $+ Mvp) || ($1 == %Gather.Sign $+ Mvps) ) && ($2) && ($stats($2-).score) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) {
  215. var %steam = $stats($2-).nick
  216. set -u3 %Gather.Flood ON rank
  217. msg %Gather.Channel $stl(12 $+ %steam $+  12M14vp`s:2 $stats(%steam).mvps - 12R14ank:2 $rank(%steam) $+ 12/ $+ $ini(Gatherbot/stats.ini,0) )
  218. }
  219. if ($1 == %Gather.Sign $+ Aces) && ($2) && ($stats($2-).score) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) {
  220. var %steam = $stats($2-).nick
  221. set -u3 %Gather.Flood ON rank
  222. msg %Gather.Channel $stl(12 $+ %steam $+  12A14ce`s:2 $stats(%steam).Aces - 12R14ank:2 $rank(%steam) $+ 12/ $+ $ini(Gatherbot/stats.ini,0) )
  223. }
  224. if ($1- == %Gather1.Sign $+ Last) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) {
  225. if (%Gather1.last-map) {
  226. msg %Gather.Channel 2» 2L14ast G14ather W14as2: 14in12 %Gather1.Last-Started $+ , 14at12 %Gather1.Last-Map $+ , 14by12 %Gather1.Last-Admin .
  227. }
  228. else { msg %Gather.channel $stl-1(12There is no last gather yet.14) }
  229.  
  230. if (%Gather2.last-map) {
  231. msg %Gather.Channel 2» 2L14ast G14ather W14as2: 14in12 %Gather2.Last-Started $+ , 14at12 %Gather2.Last-Map $+ , 14by12 %Gather2.Last-Admin .
  232. }
  233. else { msg %Gather.channel $stl-2(12There is no last gather yet.14) }
  234.  
  235. if (%Gather3.last-map) {
  236. msg %Gather.Channel 2» 2L14ast G14ather W14as2: 14in12 %Gather3.Last-Started $+ , 14at12 %Gather3.Last-Map $+ , 14by12 %Gather3.Last-Admin .
  237. }
  238. else { msg %Gather.channel $stl-3(12There is no last gather yet.14) }
  239. halt
  240. }
  241. if ($1- == %Gather1.Sign $+ Add) && (%Gather1.Status == adding) {
  242. set %Gather1.Players $addtok(%Gather1.Players,$nick,32)
  243. set %Gather2.Players $addtok(%Gather2.Players,$nick,32)
  244. set %Gather3.Players $addtok(%Gather3.Players,$nick,32)
  245. if (!%Gather.Flood) {
  246. players-1
  247. set -u3 %Gather.Flood ON - Players
  248. }
  249. halt
  250. }
  251. if ($1- == %Gather2.Sign $+ Add) && (%Gather2.Status == adding) {
  252. set %Gather1.Players $addtok(%Gather1.Players,$nick,32)
  253. set %Gather2.Players $addtok(%Gather2.Players,$nick,32)
  254. set %Gather3.Players $addtok(%Gather3.Players,$nick,32)
  255. if (!%Gather.Flood) {
  256. players-2
  257. set -u3 %Gather.Flood ON - Players
  258. }
  259. halt
  260. }
  261. if ($1- == %Gather3.Sign $+ Add) && (%Gather3.Status == adding) {
  262. set %Gather1.Players $addtok(%Gather1.Players,$nick,32)
  263. set %Gather2.Players $addtok(%Gather2.Players,$nick,32)
  264. set %Gather3.Players $addtok(%Gather3.Players,$nick,32)
  265. if (!%Gather.Flood) {
  266. players-3
  267. set -u3 %Gather.Flood ON - Players
  268. }
  269. halt
  270. }
  271. if ($1- == %Gather4.Sign $+ Add) && (%Gather4.Status == adding) {
  272. set %Gather4.Players $addtok(%Gather4.Players,$nick,32)
  273. if (!%Gather.Flood) {
  274. players-4
  275. set -u3 %Gather.Flood ON - Players
  276. }
  277. halt
  278. }
  279.  
  280. if (($1- == %Gather1.Sign $+ Remove) || ($1 == !Del)) && (%Gather1.Status == adding) && ($istok(%Gather1.players,$nick,32)) && ($nick !== %Gather1.Admin) {
  281. set %Gather1.players $remtok(%Gather1.players,$nick,1,32)
  282. if (!%Gather.Flood) {
  283. players-1
  284. set -u3 %Gather.Flood ON - Players
  285. }
  286. halt
  287. }
  288. if (($1- == %Gather1.Sign $+ Remove) || ($1 == !Del)) && (%Gather1.Status == adding) && ($istok(%Gather1.players,$nick,32)) && ($nick !== %Gather1.Admin) {
  289. set %Gather1.players $remtok(%Gather1.players,$nick,1,32)
  290. if (!%Gather.Flood) {
  291. players-1
  292. set -u3 %Gather.Flood ON - Players
  293. }
  294. halt
  295. }
  296. if (($1- == %Gather2.Sign $+ Remove) || ($1 == !Del)) && (%Gather2.Status == adding) && ($istok(%Gather2.players,$nick,32)) && ($nick !== %Gather2.Admin) {
  297. set %Gather2.players $remtok(%Gather2.players,$nick,1,32)
  298. if (!%Gather.Flood) {
  299. players-2
  300. set -u3 %Gather.Flood ON - Players
  301. }
  302. halt
  303. }
  304. if (($1- == %Gather3.Sign $+ Remove) || ($1 == !Del)) && (%Gather3.Status == adding) && ($istok(%Gather3.players,$nick,32)) && ($nick !== %Gather3.Admin) {
  305. set %Gather3.players $remtok(%Gather3.players,$nick,1,32)
  306. if (!%Gather.Flood) {
  307. players-3
  308. set -u3 %Gather.Flood ON - Players
  309. }
  310. halt
  311. }
  312. if (($1- == %Gather4.Sign $+ Remove) || ($1 == !Del)) && (%Gather4.Status == adding) && ($istok(%Gather4.players,$nick,32)) && ($nick !== %Gather4.Admin) {
  313. set %Gather4.players $remtok(%Gather3.players,$nick,1,32)
  314. if (!%Gather.Flood) {
  315. players-4
  316. set -u3 %Gather.Flood ON - Players
  317. }
  318. halt
  319. }
  320.  
  321. if ($1- == %Gather.Sign $+ Players) && (!%Gather.Flood) {
  322. fteams1 | fteams2 | fteams3
  323. if (%Gather1.Status == adding) players-1
  324. if (%Gather2.Status == adding) players-2
  325. if (%Gather3.Status == adding) players-3
  326. set -u7 %Gather.Flood ON
  327. halt
  328. }
  329. if ($1- == %Gather.Sign $+ Teams) && (!%Gather.Flood) { set -u8 %Gather.Flood ON | fteams1 | fteams2 | fteams3 | halt }
  330.  
  331. if ($1- == %Gather.Sign $+ Vent) && (!%Gather.Flood) {
  332. msg %Gather.Channel $stl(2G14athers 14V14ent 2» 14(Ip: $+ $gettok(%Gather.Vent,1,$asc(:)) $+ ) 14(Port: $+ $gettok(%Gather.Vent,2,$asc(:)) $+ ) 14(Version:3.0) 2«)))
  333. set -u2 %Gather.Flood Vent
  334. halt
  335. }
  336. if ($1 == %Gather.Sign $+ Gathers) && ($admin?($2-)) && ($2) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) {
  337. set -u7 %Gather.Flood Vent
  338. msg %Gather.Channel $stl(2 $+  $+ $admin?($2-) 14Has done12 $Gathers($admin?($2-)) 14Gathers so far.)
  339. halt
  340. }
  341. if ($1 == %Gather.Sign $+ Gathers) && ($master?($2-)) && ($2) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) {
  342. set -u7 %Gather.Flood Vent
  343. msg %Gather.Channel $stl(2 $+  $+ $master?($2-) 14Has done12 $Gathers($master?($2-)) 14Gathers so far.)
  344. halt
  345. }
  346.  
  347. if ($1- == %Gather.Sign $+ Ig) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { msg %Gather.Channel $stl(Ignored (4 $+ $Numtok(%Gather.Ignored,32) $+ 14): %Gather.Ignored) | set -u5 %Gather.Flood ignored | halt }
  348. if ($1- == %Gather.Sign $+ Admins) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) && (!%Gather.Flood) {
  349. set -u15 %Gather.Flood AdminsMasters
  350. if (!$masters) showadmins
  351. if ($masters) showmasters
  352. halt
  353. }
  354. if ($1- == %Gather.Sign $+ Gathers) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { msg %Gather.Channel $stl(We had12 %Gather.num 14Gathers so far.) | set -u4 %Gather.Flood Vent | halt }
  355. if ($1- == %Gather.Sign $+ Masters) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { showmasters2 | set -u5 %Gather.Flood Vent | halt }
  356.  
  357. if ( ($1- == %Gather.Sign $+ Commands) || ($1- == %Gather.Sign $+ Help) || ($1- == %Gather.Sign $+ Cmds) ) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) {
  358. msg %Gather.Channel 2» 2C14ommands are2: 12 !vent 2<>12 !status 2<>12 !teams 2<>12 !server 2<>12 !last 2<>12 !admins 2<>12 !topadmins 2<>12 !servers 2<>12 !score 2<>12 !rank 2<>12 !Aces 2<>12 !topplayers 2<>12 !top10 2<>12 !Top-Aces 2<>12 !mvp Nick 2<>12 !Top-Mvps 2<>12 !site 2<>12 !TopGunz 2<>12 12!server num 
  359. set -u4 %Gather.Flood Vent
  360. halt
  361. }
  362.  
  363. if ($admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) || ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) || ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && (!%Gather.Floodmode) {
  364. var %o = $admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
  365.  
  366.  
  367.  
  368. if ($1 == !rstart) && (%gather1.status == adding) && ($numtok(%gather1.players,32) >= 10) && ($nick == %Gather1.Admin) {
  369. if (!%Gather.Flood) {
  370. mixteams1 %gather1.players
  371. .timer 1 20 mode %Gather.channel -m
  372. set -u35 %Gather.Flood ON $nick
  373. set -u35 %Gather.Floodmode ON $nick
  374. mode %Gather.channel +m
  375. set %Gather1.Status ON
  376. set -u10 %Gather.Flood rstart
  377. .timer 1 3 teams1
  378. .timer 1 4 msg # 2» 2A14ttention2: 12In a few moments Ip & Password will be sent to all players. DO NOT quit in middle or not get in, this may cause you ban.
  379. .timer 1 5 send1
  380. .timer 1 6 Set-Vent1
  381. .timer 1 15 rconstart
  382. .timer 1 16 rconstart2
  383. .timer 1 17 rconstart3
  384. }
  385. halt
  386. }
  387. if ($1 == !rstart) && (%gather2.status == adding) && ($numtok(%gather2.players,32) >= 10) && ($nick == %Gather2.Admin) {
  388. if (!%Gather.Flood) {
  389. mixteams2 %gather2.players
  390. .timer 1 20 mode %Gather.channel -m
  391. set -u35 %Gather.Flood ON $nick
  392. set -u35 %Gather.Floodmode ON $nick
  393. mode %Gather.channel +m
  394. set %Gather2.Status ON
  395. set -u10 %Gather.Flood rstart
  396. .timer 1 3 teams2
  397. .timer 1 4 msg # 2» 2A14ttention2: 12In a few moments Ip & Password will be sent to all players. DO NOT quit in middle or not get in, this may cause you ban.
  398. .timer 1 5 send2
  399. .timer 1 6 Set-Vent2
  400. .timer 1 15 rconstart
  401. .timer 1 16 rconstart2
  402. .timer 1 17 rconstart3
  403. }
  404. halt
  405. }
  406. if ($1 == !rstart) && (%gather3.status == adding) && ($numtok(%gather3.players,32) >= 10) && ($nick == %Gather3.Admin) {
  407. if (!%Gather.Flood) {
  408. mixteams3 %gather3.players
  409. .timer 1 20 mode %Gather.channel -m
  410. set -u35 %Gather.Flood ON $nick
  411. set -u35 %Gather.Floodmode ON $nick
  412. mode %Gather.channel +m
  413. set %Gather3.Status ON
  414. set -u10 %Gather.Flood rstart
  415. .timer 1 3 teams3
  416. .timer 1 4 msg # 2» 2A14ttention2: 12In a few moments Ip & Password will be sent to all players. DO NOT quit in middle or not get in, this may cause you ban.
  417. .timer 1 5 send3
  418. .timer 1 6 Set-Vent3
  419. .timer 1 15 rconstart
  420. .timer 1 16 rconstart2
  421. .timer 1 17 rconstart3
  422. }
  423. halt
  424. }
  425.  
  426.  
  427. if ($1 == %Gather.Sign $+ Ignore2010) && ($2) { .ignore $2- | set %Gather.Ignored $addtok(%Gather.Ignored,$2-,32) | msg %Gather.Channel $stl(2 $+ $2 14Added to the Ignores list.) | ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) | halt }
  428. if ($1 == %Gather.Sign $+ UnIgnore) && ($2) { .ignore -r $2- | set %Gather.Ignored $remtok(%Gather.Ignored,$2-,32) | msg %Gather.Channel $stl(2 $+ $2 14Removed from the Ignores list.) | halt }
  429. if ($1 == %Gather.Sign $+ Notice) && ($2) && (!%FS) { Set -u4 %FS ON | mode %Gather.channel +m-N | .notice %Gather.channel $2- | .timer 1 1 mode %Gather.Channel -m+N | halt }
  430. if ($1- == %Gather.Sign $+ Notice) && (!%FS) {
  431. if (%Gather4.status == adding) {
  432. Set -u10 %FS ON
  433. mode %Gather.channel -N
  434. .notice %Gather.channel $stl(Gather[4] is 9ON14 Players: (12 $+ $numtok(%Gather4.Players,32) $+ 14/12 $+ %Gather4.Maxplayers $+ 14) Type 12!Add14 to Join)
  435. .notice %Gather.channel $stl(Admin:12 %Gather4.Admin 14- Map:12 %Gather4.Map 14- Commands: 12!14Add - 12!14Remove - 12!14Status)
  436. .timer 1 2 mode %Gather.Channel +N
  437. halt
  438. }
  439. if (%Gather3.status == adding) {
  440. Set -u10 %FS ON
  441. mode %Gather.channel -N
  442. .notice %Gather.channel $stl(Gather[3] is 9ON14 Players: (12 $+ $numtok(%Gather3.Players,32) $+ 14/12 $+ %Gather3.Maxplayers $+ 14) Type 12!Add14 to Join)
  443. .notice %Gather.channel $stl(Admin:12 %Gather3.Admin 14- Map:12 %Gather3.Map 14- Commands: 12!14Add - 12!14Remove - 12!14Status)
  444. .timer 1 2 mode %Gather.Channel +N
  445. halt
  446. }
  447. if (%Gather2.status == adding) {
  448. Set -u10 %FS ON
  449. mode %Gather.channel -N
  450. .notice %Gather.channel $stl(Gather[2] is 9ON14 Players: (12 $+ $numtok(%Gather2.Players,32) $+ 14/12 $+ %Gather2.Maxplayers $+ 14) Type 12!Add14 to Join)
  451. .notice %Gather.channel $stl(Admin:12 %Gather2.Admin 14- Map:12 %Gather2.Map 14- Commands: 12!14Add - 12!14Remove - 12!14Status)
  452. .timer 1 2 mode %Gather.Channel +N
  453. halt
  454. }
  455. if (%Gather1.status == adding) {
  456. Set -u10 %FS ON
  457. mode %Gather.channel -N
  458. .notice %Gather.channel $stl(Gather[1] is 9ON14 Players: (12 $+ $numtok(%Gather1.Players,32) $+ 14/12 $+ %Gather1.Maxplayers $+ 14) Type 12!Add14 to Join)
  459. .notice %Gather.channel $stl(Admin:12 %Gather1.Admin 14- Map:12 %Gather1.Map 14- Commands: 12!14Add - 12!14Remove - 12!14Status)
  460. .timer 1 2 mode %Gather.Channel +N
  461. halt
  462. }
  463. }
  464. if ($1- == +m) && (!%Gather.Floodmode) { mode # +m | set -u3 %Gather.Floodmode ON | halt }
  465. if ($1- == -m) && (!%Gather.Floodmode) { mode # -m | set -u3 %Gather.Floodmode ON | halt }
  466. if ($1- == +r) && (!%Gather.Floodmode) { mode # +r | set -u3 %Gather.Floodmode ON | halt }
  467. if ($1- == -r) && (!%Gather.Floodmode) { mode # -r | set -u3 %Gather.Floodmode ON | halt }
  468. if ($1 == !End) { gather end1 $nick | Set-Ventclose | set -u3 %Gather.Floodmode ON | halt }
  469. if ($1 == !End1) { gather end1 $nick | Set-Ventclose2 | set -u3 %Gather.Floodmode ON | halt }
  470. if ($1 == !End2) { gather end2 $nick | Set-Ventclose3 | set -u3 %Gather.Floodmode ON | halt }
  471. if ($1 == !End3) { gather end3 $nick | set -u3 %Gather.Floodmode ON | halt }
  472. if ($1 == !Stop) { gather stop1 $nick | set -u3 %Gather.Floodmode ON | halt }
  473. if ($1 == !Stop1) { gather stop1 $nick | set -u3 %Gather.Floodmode ON | halt }
  474. if ($1 == !Stop2) { gather stop2 $nick | set -u3 %Gather.Floodmode ON | halt }
  475. if ($1 == !Stop3) { gather stop3 $nick | set -u3 %Gather.Floodmode ON | halt }
  476.  
  477. if ($1 == !nosub) { Gather SubSearch1 off | set -u3 %Gather.Floodmode ON | halt }
  478. if ($1 == .noSub) { Gather SubSearch2 off | set -u3 %Gather.Floodmode ON | halt }
  479. if ($1 == @noSub) { Gather SubSearch3 off | set -u3 %Gather.Floodmode ON | halt }
  480. if ($1 == !needSub) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch1 $2 | halt }
  481. if ($1 == .needSub) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch2 $2 | halt }
  482. if ($1 == @needSub) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch3 $2 | halt }
  483.  
  484.  
  485. if ($1 == !map) {
  486. if (%Gather1.Status == adding) {
  487. rcmd admin_command admin_map $2-
  488. msg %Gather.channel $stl-1(Map Changed To $2-)
  489. }
  490. if (%Gather2.Status == adding) {
  491. rcmd2 admin_command admin_map $2-
  492. msg %Gather.channel $stl-2(Map Changed To $2-)
  493. }
  494. if (%Gather3.Status == adding) {
  495. rcmd3 admin_command admin_map $2-
  496. msg %Gather.channel $stl-3(Map Changed To $2-)
  497. }
  498. halt
  499. }
  500.  
  501. if ($1 == %Gather.Sign $+ unBan) && (!%Gather.Flood) && ($2) { set -u3 %Gather.Flood ON Status ALL | rcmd admin_command admin_unban $2 | rcmd2 admin_command admin_unban $2 | rcmd3 admin_command admin_unban $2 | msg %Gather.channel 2 $2 14 UnBanned From The Servers | halt }
  502. }
  503. }
  504. if ($target !ischan) {
  505. if ($1 == %Gather.Sign-PM $+ Login) && ($3) && (!$admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($readini(Gatherbot/Admins.ini,$2,Pass) == $3) {
  506. set -u3 %Gather.Flood Login $nick
  507. whois $Nick
  508. msg $Nick $stl(14You Has been connected to 12Admin14 account (2 $+ $2 $+ 14)) 12 %vent.adminpass 
  509. ;msg %Gather.channel $stl(2 $+ $nick 14Has connected to 12Admin14 account (2 $+ $2 $+ 14))
  510. mode %Gather.channel +v $nick
  511. msg $nick admin_password $3 על מנת להתחבר לאדמין בשרת הפקודה
  512. msg $nick #IGaming #iGaming.crew חובה כניסה לערוץ
  513. .writeini -n Gatherbot/Admins.ini $2 Logged *!*@ $+ $gettok($address,2-,$asC(@))
  514. .writeini -n Gatherbot/Admins.ini $2 Last-Login $date $time
  515. .writeini -n Gatherbot/Admins.ini $2 User $nick
  516. }
  517. if ($1 == %Gather.Sign-PM $+ Login) && ($3) && (!$owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($readini(Gatherbot/owners.ini,$2,Pass) == $3) {
  518. set -u3 %Gather.Flood Login $nick
  519. whois $Nick
  520. msg $Nick $stl(14You Has been connected to 12Owner14 account (2 $+ $2 $+ 14))
  521. ;msg %Gather.channel $stl(2 $+ $nick 14Has connected to 12Owner14 account (2 $+ $2 $+ 14))
  522. msg $nick admin_password $3 על מנת להתחבר לאדמין בשרת הפקודה
  523. .writeini -n Gatherbot/Owners.ini $2 Logged *!*@ $+ $gettok($address,2-,$asC(@))
  524. .writeini -n Gatherbot/Owners.ini $2 Last-Login $date $time
  525. .writeini -n Gatherbot/Owners.ini $2 User $nick
  526. }
  527. if ($1 == %Gather.Sign-PM $+ Login) && ($3) && (!$masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($readini(Gatherbot/masters.ini,$2,Pass) == $3) {
  528. set -u3 %Gather.Flood Login $nick
  529. whois $Nick
  530. msg $Nick $stl(2You 14Has connected to 12Master14 account (2 $+ $2 $+ 14))
  531. ;msg %Gather.channel $stl(2 $+ $nick 14Has connected to 12Master14 account (2 $+ $2 $+ 14))
  532. ;mode %Gather.channel +v $nick
  533. msg $nick admin_password $3 על מנת להתחבר לאדמין בשרת הפקודה
  534. msg $nick #IGaming #iGaming.crew חובה כניסה לערוץ
  535. .writeini -n Gatherbot/Masters.ini $2 Logged *!*@ $+ $gettok($address,2-,$asC(@))
  536. .writeini -n Gatherbot/Masters.ini $2 Last-Login $date $time
  537. .writeini -n Gatherbot/Masters.ini $2 User $nick
  538. }
  539. if ($admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) || ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) || ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  540. if ($admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) var %o $v1 admins
  541. if ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) var %o $v1 masters
  542. if ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) var %o $v1 owners
  543. if ($1 == %Gather.Sign $+ Ignore2010) && ($2) { .ignore $2- | set %Gather.Ignored $addtok(%Gather.Ignored,$2-,32) | halt }
  544. if ($1 == %Gather.Sign $+ UnIgnore) && ($2) { .ignore -r $2- | set %Gather.Ignored $remtok(%Gather.Ignored,$2-,32) | halt }
  545. ;if ($1 == %Gather1.Sign $+ Kick) { kick $$2 $iif($3,Reason: $3-) | halt }
  546. if ($1 == %Gather.Sign $+ Ban) && ($2) { rcmd admin_command admin_ban $2 | ssay $2 Banned by %rcon.nick }
  547. if ($1 == %Gather.Sign $+ unBan) && ($2) { rcmd admin_command admin_unban $2 | ssay $2 Unanned by %rcon.nick }
  548. if ($1 == %Gather1.Sign $+ Sub) && ($2) && ( ($2 == A) || ($2 == B) || ($2 == OFF) ) { Gather SubSearch1 $2 }
  549. if ($1 == %Gather2.Sign $+ Sub) && ($2) && ( ($2 == A) || ($2 == B) || ($2 == OFF) ) { Gather SubSearch2 $2 }
  550. if ($1 == %Gather3.Sign $+ Sub) && ($2) && ( ($2 == A) || ($2 == B) || ($2 == OFF) ) { Gather SubSearch3 $2 }
  551. if ($1 == !Start) && ($target !ischan) && ($5) && (%gather1.status == off) && (%gather2.status != adding) && (%gather3.status != adding) && (%gather4.status != adding) { set %gather1.user %o | Gather Start $nick $2- | rconstart | .timer 1 2 rconstart2 | .timer 1 4 rconstart3 }
  552. if ($1 == !Start1) && ($target !ischan) && ($5) && (%gather1.status == off) && (%gather2.status != adding) && (%gather3.status != adding) && (%gather4.status != adding) { set %gather1.user %o | Gather Start $nick $2- | rconstart | .timer 1 2 rconstart2 | .timer 1 4 rconstart3 }
  553. if ($1 == !Start2) && ($target !ischan) && ($5) && (%gather2.status == off) && (%gather1.status != adding) && (%gather3.status != adding) && (%gather4.status != adding) { set %gather2.user %o | Gather Start2 $nick $2- | rconstart | .timer 1 2 rconstart2 | .timer 1 4 rconstart3 }
  554. if ($1 == !Start3) && ($target !ischan) && ($5) && (%gather3.status == off) && (%gather1.status != adding) && (%gather2.status != adding) && (%gather4.status != adding) { set %gather3.user %o | Gather Start3 $nick $2- | rconstart | .timer 1 2 rconstart2 | .timer 1 4 rconstart3 }
  555. if ($1 == !recon) && ($target !ischan) { .msg $nick Done | rconstart | .timer 1 2 rconstart2 | .timer 1 4 rconstart3 }
  556. }
  557. if ($1 == %Gather.Sign-PM $+ Owners) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  558. set %lala $nick
  559. showowners2
  560. .timer 1 4 unset %lala
  561. }
  562. if ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) || ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  563. if ($2 == status) && ($ini(gatherbot/admins.ini,$3)) { msg $nick $stl(User: $3 $+ , Pass: $readini(gatherbot/admins.ini,$3,pass) $+ , ServerNick: $readini(gatherbot/admins.ini,$3,servernick) , Last-Login: $readini(gatherbot/admins.ini,$3,last-login) , Gathers: $readini(gatherbot/admins.ini,$3,gathers) , Last-Gather: $readini(gatherbot/admins.ini,$3,last-gather)) }
  564. if ($1 == %Gather.Sign-PM $+ Set) {
  565. if ($2 == R-Runs) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  566. var %x 1
  567. while ($ini(gatherbot/admins.ini,%x)) {
  568. writeini -n gatherbot/admins.ini $v1 gathers 0
  569. inc %x
  570. }
  571. var %x 1
  572. while ($ini(gatherbot/masters.ini,%x)) {
  573. writeini -n gatherbot/masters.ini $v1 gathers 0
  574. inc %x
  575. }
  576. var %x 1
  577. while ($ini(gatherbot/owners.ini,%x)) {
  578. writeini -n gatherbot/owners.ini $v1 gathers 0
  579. inc %x
  580. }
  581. msg $nick $stl(Done... all the runs now is 0)
  582. }
  583. if ($2 == status) && ($Owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($ini(gatherbot/masters.ini,$3)) { msg $nick $stl(User: $3 , Pass: $readini(gatherbot/masters.ini,$3,pass) , ServerNick: $readini(gatherbot/masters.ini,$3,servernick) , Last-Login: $readini(gatherbot/masters.ini,$3,last-login) , Gathers: $readini(gatherbot/master.ini,$3,gathers) , Last-Gather: $readini(gatherbot/masters.ini,$3,last-gather)) } , Last-Login: $readini(gatherbot/masters.ini,$2,last-login) , Gathers: $readini(gatherbot/master.ini,$2,gathers) , Last-Gather: $readini(gatherbot/masters.ini,$2,last-gather)) }
  584. if ($2 == ResetRRds) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  585. Part %Gather.Channel
  586. msg $nick $stl(Restarting Gatherbot Please wait (Gatherbot By12 $+($chr(86),$chr(101),$chr(110),$chr(116),$chr(111),$chr(120)) $+ 14))
  587. unset %Gather*.Players
  588. unset %Gather.Flood
  589. unset %Gather*.Last*
  590. set %Gather1.Status off
  591. set %Gather2.Status off
  592. set %Gather3.Status off
  593. set %Gather4.Status off
  594. set %Gather.num 0
  595. .ignore -r
  596. unset %gather.ignored
  597. set %Gather.Sign !
  598. set %Gather.Sign-Pm !
  599. set %Gather1.Sign !
  600. Set %Gather2.Sign !
  601. Set %Gather3.Sign !
  602. Set %Gather4.Sign !
  603. set %Gather1.SignServer !
  604. set %Gather2.SignServer !
  605. set %Gather3.SignServer !
  606. set %Gather4.SignServer !
  607. set %Gather1.num 0
  608. set %Gather2.num 0
  609. set %Gather3.num 0
  610. set %Gather4.num 0
  611. set %Gather1.Port 7575
  612. set %Gather2.Port 7676
  613. set %Gather3.Port 7777
  614. set %Gather4.Port 7878
  615. set %Gather1.MaxPlayers 10
  616. set %Gather2.MaxPlayers 10
  617. set %Gather3.MaxPlayers 10
  618. set %Gather4.MaxPlayers 10
  619. unset %Gather*.Team*
  620. unset %Gather*.half
  621. unset %Gather*.Score*
  622. unset %Gather*.Live
  623. unset %Gather*.Map
  624. unset %Gather*.Admin
  625. unset %Gather*.Pas*
  626. unset %Gather*.Sub*
  627. unset %Gather*.Started
  628. .remove Gatherbot/Admins.ini
  629. .remove Gatherbot/Owners.ini
  630. .remove Gatherbot/Masters.ini
  631. set %new-- $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
  632. var %x $+($r(1,9),$r(1,9),$r(1,9),$r(1,9))
  633. msg $nick The Master Accont is Admin, To login he needs to use: /msg $me !login GatherBot %new--
  634. msg $nick You can delete him if you do new master (command: !set master <NICK> <PASS> <SERVERNICK>)
  635. .writeini -n Gatherbot/owners.ini GatherBot User GatherBot
  636. .writeini -n Gatherbot/owners.ini GatherBot Pass %new--
  637. .writeini -n Gatherbot/owners.ini GatherBot ServerNick GatherBot
  638. .writeini -n Gatherbot/owners.ini GatherBot Gathers 0
  639. .writeini -n Gatherbot/owners.ini GatherBot Status OFF
  640. .remove Gatherbot/Stats.ini
  641. .timers off
  642. sockclose *
  643. .timer 1 3 join %Gather.channel
  644. .timer 1 8 rconstart
  645. .timer 1 12 rconstart2
  646. .timer 1 15 rconstart3
  647. .timer 1 18 rconstart4
  648. }
  649.  
  650. if ($2 == ResetStats) { .msg $nick Restarting Stats. | .remove Gatherbot/stats.ini }
  651. if ( ($1 == %Gather.Sign-PM $+ Join) || ($1 == %Gather.Sign-PM $+ J) ) && ($2) { join $2- | msg $nick 2» 2J14oining 2T14o:12 $2 2« }
  652. if ($2 == Retryrcon) { .msg $nick Retry Rcons... | rconstart | .timer 1 2 rconstart2 | .timer 1 4 rconstart3 }
  653. if ($2 == R-Gathers) { .msg $nick Done Gather now 0 | set %Gather1.num 0 | set %Gather2.num 0 | set %Gather3.num 0 | set %Gather4.num 0 | set %Gather.num 0 }
  654. if ($1- == %Gather.Sign-PM $+ set Closeall) { //close -m | msg $nick 12All The Pms Closed.1 }
  655. if ($1- == %Gather.Sign-PM $+ set Reconnect) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) { msg $nick 12Reconnecting...1 | .timer 1 2 server }
  656. if ($1- == %Gather.Sign-PM $+ set Reconnect) && ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) { msg $nick 12Reconnecting...1 | .timer 1 2 server }
  657. if ($2 == Channel) {
  658. if (* iswm $3) && (!$4) { part %Gather.channel | set %Gather.channel $3 | .timer 1 1 /join $3 | .msg $nick Gather channel is now $3 $+ , Moving over there!. | Halt }
  659. else { msg $nick the correct usage is: %Gather.Sign-PM $+ Set $2 channel <Channel> | Halt }
  660. }
  661. if ($2 == Gather-Vent) {
  662. if (!$3-) || (*:* !iswm $3-) || ($4) { /msg $nick The correct usage is: %Gather.Sign-PM $+ Set Vent <IP:PORT> | Halt }
  663. set %gather.vent $3-
  664. /msg $nick Gathers Vent is now $3-
  665. HALT
  666. }
  667. if ($2 == Sxe) {
  668. if (!$3-) || (*:* !iswm $3-) || ($4) { /msg $nick The correct usage is: %Gather.Sign-PM $+ Set Sxe <LINK> | Halt }
  669. set %sxe $3-
  670. /msg $nick Sxe Link is Now $3-
  671. HALT
  672. }
  673. if ($2 == Server-1) {
  674. if (!$3-) || (*:* !iswm $3-) || ($4) { /msg $nick The correct usage is: %Gather.Sign-PM $+ Set Server-1 <IP:PORT> | Halt }
  675. /set %gather1.server $3-
  676. /msg $nick Server-1 is now $3-
  677. HALT
  678. }
  679. if ($2 == Server-2) {
  680. if (!$3-) || (*:* !iswm $3-) || ($4) { /msg $nick The correct usage is: %Gather.Sign-PM $+ Set Server-2 <IP:PORT> | Halt }
  681. /set %gather2.server $3-
  682. /msg $nick Server-2 is now $3-
  683. HALT
  684. }
  685. if ($2 == Server-3) {
  686. if (!$3-) || (*:* !iswm $3-) || ($4) { /msg $nick The correct usage is: %Gather.Sign-PM $+ Set Server-3 <IP:PORT> | Halt }
  687. /set %gather3.server $3-
  688. /msg $nick Server-3 is now $3-
  689. HALT
  690. }
  691. if ($1- == %Gather.Sign-PM $+ Set P-Servers) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  692. .timer 1 1 msg $nick 2S14erver Password 1:12 %Gather1.pass 1 2M14ap:12 %Gather1.map
  693. .timer 1 2 msg $nick 2S14erver Password 2:12 %Gather2.pass 1 2M14ap:12 %Gather2.map
  694. .timer 1 3 msg $nick 2S14erver Password 3:12 %Gather3.pass 1 2M14ap:12 %Gather3.map
  695. set -u5 %Bot.HelpFlood ON
  696. }
  697. if ($1- == %Gather.Sign-PM $+ Set P-Servers) && ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  698. .timer 1 1 msg $nick 2S14erver Password 1:12 %Gather1.pass 1 2M14ap:12 %Gather1.map
  699. .timer 1 2 msg $nick 2S14erver Password 2:12 %Gather2.pass 1 2M14ap:12 %Gather2.map
  700. .timer 1 3 msg $nick 2S14erver Password 3:12 %Gather3.pass 1 2M14ap:12 %Gather3.map
  701. set -u5 %Bot.HelpFlood ON
  702. }
  703.  
  704. if ($2 == P-FTP) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %ftp $3 | .msg $nick FTP Password is Now $3 | Halt }
  705. if ($2 == Rconpass-1) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %Gather1.Rconpass $3 | .msg $nick RconPassword-1 is now $3 | Halt }
  706. if ($2 == Rconpass-2) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %Gather2.Rconpass $3 | .msg $nick RconPassword-2 is now $3 | Halt }
  707. if ($2 == Rconpass-3) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %Gather3.Rconpass $3 | .msg $nick RconPassword-3 is now $3 | Halt }
  708. if ($2 == ServerPass-1) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %Gather1.pass $3 | rcmd sv_password %Gather1.pass | .msg $nick Server Password-1 Changed To $3 | Halt }
  709. if ($2 == ServerPass-2) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %Gather2.pass $3 | rcmd2 sv_password %Gather2.pass | .msg $nick Server Password-2 Changed To $3 | Halt }
  710. if ($2 == ServerPass-3) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %Gather3.pass $3 | rcmd3 sv_password %Gather3.pass | .msg $nick Server Password-3 Changed To $3 | Halt }
  711. if ($2 == Map-1) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %Gather1.map $3 | rcmd admin_command admin_map %Gather1.map | .msg $nick Server Map-1 Changed To $3 | Halt }
  712. if ($2 == Map-2) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %Gather2.map $3 | rcmd2 admin_command admin_map %Gather2.map | .msg $nick Server Map-2 Changed To $3 | Halt }
  713. if ($2 == Map-3) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %Gather3.map $3 | rcmd3 admin_command admin_map %Gather3.map | .msg $nick Server Map-3 Changed To $3 | Halt }
  714. if ($2 == Rcon-1) && ($3) { set %Gather1.Rconpass $3 | .msg $nick RconPassword-1 is now $3 | Halt }
  715. if ($2 == Rcon-2) && ($3) { set %Gather2.Rconpass $3 | .msg $nick RconPassword-2 is now $3 | Halt }
  716. if ($2 == Rcon-3) && ($3) { set %Gather3.Rconpass $3 | .msg $nick RconPassword-3 is now $3 | Halt }
  717. if ($2 == PassRoom) && ($3) { set %vent.adminpass $3 | .msg $nick The Channel Password to the Gathers Rooms is: $3 | Halt }
  718. if ($2 == dis) {
  719. if ($3 == admin) {
  720. if ($4 == all) {
  721. var %x 1
  722. while ($ini(gatherbot/admins.ini,%x)) {
  723. writeini -n gatherbot/admins.ini $v1 status off
  724. remini -n gatherbot/admins.ini $v1 logged
  725. inc %x
  726. }
  727. }
  728. else {
  729. writeini -n gatherbot/admins.ini $2 status off
  730. remini -n gatherbot/admins.ini $2 logged
  731. }
  732. }
  733. if ($3 == master) && ($Owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  734. if ($4 == all) {
  735. var %x 1
  736. while ($ini(gatherbot/masters.ini,%x)) {
  737. writeini -n gatherbot/masters.ini $v1 status off
  738. remini -n gatherbot/masters.ini $v1 logged
  739. inc %x
  740. }
  741. }
  742. else {
  743. writeini -n gatherbot/masters.ini $2 status off
  744. remini -n gatherbot/masters.ini $2 logged
  745. }
  746. }
  747.  
  748.  
  749. if ($3 == all) && ($Owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  750. var %x 1
  751. while ($ini(gatherbot/masters.ini,%x)) {
  752. writeini -n gatherbot/masters.ini $v1 status off
  753. remini -n gatherbot/masters.ini $v1 logged
  754. inc %x
  755. }
  756. var %x 1
  757. while ($ini(gatherbot/admins.ini,%x)) {
  758. writeini -n gatherbot/admins.ini $v1 status off
  759. remini -n gatherbot/admins.ini $v1 logged
  760. inc %x
  761. }
  762.  
  763. }
  764. msg $nick $stl(-DONE-)
  765. }
  766. if ($2 == admin) {
  767. if (!$5) { /msg $nick The syntex is: %Gather.Sign-PM $+ Set admin <USER> <PASS> <NICKSERVER> | Halt }
  768. if ($readini(Gatherbot/Admins.ini,$3,User)) { /msg $nick $3 is already admin }
  769. else {
  770. .writeini -n Gatherbot/Admins.ini $3 User $3
  771. .writeini -n Gatherbot/Admins.ini $3 Pass $4
  772. .writeini -n Gatherbot/Admins.ini $3 ServerNick $5
  773. .writeini -n Gatherbot/Admins.ini $3 Gathers 0
  774. .writeini -n Gatherbot/Admins.ini $3 Status OFF
  775. .msg $nick $3 is now admin , To login he needs to use: /msg $me !login $3 $4
  776. upload.admins.list $nick
  777. }
  778. HALT
  779. }
  780. if ($2 == unadmin) {
  781. if (!$3) { /msg $nick Correct Usage is: /msg $me %Gather.Sign-PM $+ Set Unadmin <USER> | Halt }
  782. if ($readini(Gatherbot/Admins.ini,$3,User)) {
  783. .remini -n Gatherbot/Admins.ini $3
  784. /msg $nick $3 is no longer Admin!
  785. upload.admins.list $nick
  786. }
  787. else /msg $nick Cannot find User - $3
  788. HALT
  789. }
  790. }
  791. if ($2 == master) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  792. if (!$5) { /msg $nick The syntex is: %Gather.Sign-PM $+ Set master <USER> <PASS> <NICKSERVER> | Halt }
  793. if ($readini(Gatherbot/masters.ini,$3,User)) { /msg $nick $3 is already master }
  794. else {
  795. msg $nick $3 is now master , To login he needs to use: /msg $me !login $3 $4
  796. .writeini -n Gatherbot/masters.ini $3 User $3
  797. .writeini -n Gatherbot/masters.ini $3 Pass $4
  798. .writeini -n Gatherbot/masters.ini $3 ServerNick $5
  799. .writeini -n Gatherbot/masters.ini $3 Gathers 0
  800. .writeini -n Gatherbot/masters.ini $3 Status OFF
  801. upload.admins.list $nick
  802. }
  803. HALT
  804. }
  805. if ($2 == unmaster) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  806. if (!$3) { /msg $nick Correct Usage is: /msg $me %Gather.Sign-PM $+ Set Unmaster <USER> | Halt }
  807. if ($readini(Gatherbot/masters.ini,$3,User)) {
  808. .remini -n Gatherbot/masters.ini $3
  809. /msg $nick $3 is no longer Master!
  810. upload.admins.list $nick
  811. }
  812. else /msg $nick Cannot find User - $3
  813. HALT
  814. }
  815. if ($2 == owner) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  816. if (!$5) { /msg $nick The syntex is: %Gather.Sign-PM $+ Set owner <USER> <PASS> <NICKSERVER> | Halt }
  817. if ($readini(Gatherbot/owners.ini,$3,User)) { /msg $nick $3 is already owner }
  818. else {
  819. msg $nick $3 is now owner , To login he needs to use: /msg $me !login $3 $4
  820. .writeini -n Gatherbot/owners.ini $3 User $3
  821. .writeini -n Gatherbot/owners.ini $3 Pass $4
  822. .writeini -n Gatherbot/owners.ini $3 ServerNick $5
  823. .writeini -n Gatherbot/owners.ini $3 Gathers 0
  824. .writeini -n Gatherbot/owners.ini $3 Status OFF
  825. upload.admins.list $nick
  826. }
  827. HALT
  828. }
  829. if ($2 == unowner) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  830. if (!$3) { /msg $nick Correct Usage is: /msg $me %Gather.Sign-PM $+ Set Unowner <USER> | Halt }
  831. if ($readini(Gatherbot/owners.ini,$3,User)) {
  832. .remini -n Gatherbot/owners.ini $3
  833. /msg $nick $3 is no longer Owner!
  834. upload.admins.list $nick
  835. }
  836. else /msg $nick Cannot find User - $3
  837. HALT
  838. }
  839. if ($2 == AdminVent) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  840. if (!$4) { /msg $nick The syntex is: %Gather.Sign-PM $+ Set AdminVent <USER> <PASS> | Halt }
  841. if ($readini(Gatherbot\vent.ini,$3,User)) { /msg $nick $3 is already admin }
  842. else {
  843. .writeini -n Gatherbot\vent.ini $3 User $3
  844. .writeini -n Gatherbot\vent.ini $3 Pass $4
  845. .msg $nick $3 is now admin , Now Diconnect From Vent To Be Admin In Vent.
  846. upload.ventadmins.list $nick
  847. }
  848. HALT
  849. }
  850. if ($2 == UnAdminVent) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  851. if (!$3) { /msg $nick Correct Usage is: /msg $me %Gather.Sign-PM $+ Set UnAdminVent <USER> | Halt }
  852. if ($readini(Gatherbot\vent.ini,$3,User)) {
  853. .remini -n Gatherbot\vent.ini $3
  854. /msg $nick $3 is no longer admin Vent!
  855. upload.ventadmins.list $nick
  856. }
  857. else /msg $nick Cannot find This Admin In Vent - $3
  858. HALT
  859. }
  860.  
  861. if ($2 == add-server) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  862. if (!$istok(%gather.clubs,$3,32)) { set %gather.clubs %gather.clubs $3 | msg $nick -Done- $3 added to clubs list. clubs now are: %gather.clubs }
  863. }
  864. if ($2 == del-server) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  865. set %gather.clubs $deltok(%gather.clubs,$3,32)
  866. msg $nick -Done- $3 deleted from the clubs list. clubs now are: %gather.clubs
  867. }
  868. if ($1- == %Gather.Sign-PM $+ Help) && ($target !ischan) && (!%Bot.HelpFlood) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  869. msg $nick 2O14wner 2c14ommands:1
  870. msg $nick %Gather.Sign-PM $+ Set PassRoom <12PASSWORD1> <12הסיסמא לחדרי ההרצה1> !Set Gather-Vent <12IP:PORT1> !Set Adv-Vent <12IP:PORT1> !Set ResetStat <12מאפס את כל הראנק1>
  871. msg $nick %Gather.Sign-PM $+ Set Retryrcon !Set R-Gathers <12מאפס את מונה הגאטרים1> !Set Channel <12NEW-CHANNEL1> !Set Map-1/2/3 <12Map1> !Set Rcon-1/2/3 <12RCON-PASSWORD1>
  872. msg $nick %Gather.Sign-PM $+ Set R-Runs <12מאפס את כל ההרצות1> !Set ServerPass-1/2/3 <12Server-Password1> !Set P-Servers <12מציג את הסיסמאות של הסרברים1> !Set status <12Nick1>
  873. .timer 1 1 msg $nick %Gather.Sign-PM $+ Set Server-1/2/3 <12IP:PORT1> !Set Admin <12USER1> <12PASS1> <12SERVER-NICK1> !Set UnAdmin <12USER1> !Set Sxe <12LINK1>
  874. .timer 1 1 msg $nick %Gather.Sign-PM $+ Set Master <12USER1> <12PASS1> <12SERVER-NICK1> !Set UnMaster <12USER1> !Set P-FTP <12FTP-Password1> !Set closeall <12סוגר את כל ההודעות הפרטיות1>
  875. .timer 1 1 msg $nick %Gather.Sign-PM $+ Set Owner <12USER1> <12PASS1> <12SERVER-NICK1> !Set UnOwner <12USER1> !Set Reconnect <12מתנתק ומתחבר מחדש1> !Set Dis <12Nick1> Or <12Admins1> Or <12Masters1> Or <12All1>
  876. set -u5 %Bot.HelpFlood ON
  877. }
  878. if ($1- == %Gather.Sign-PM $+ Help) && ($target !ischan) && (!%Bot.HelpFlood) && ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  879. msg $nick 2M14aster 2c14ommands:1
  880. msg $nick %Gather.Sign-PM $+ Set Recon <12מהתחל את הריקון לעשות רק כשהגאטר בוט לא מגיב בשרתים1>
  881. msg $nick %Gather.Sign-PM $+ Set Admin <12USER1> <12PASS1> <12SERVER-NICK1>
  882. msg $nick %Gather.Sign-PM $+ Set Unadmin <12USER1>
  883. .timer 1 1 msg $nick %Gather.Sign-PM $+ Set status <12Nick1>
  884. .timer 1 1 msg $nick %Gather.Sign-PM $+ Set Dis <12Nick1> Or <12Admins1>
  885. .timer 1 1 msg $nick %Gather.Sign-PM $+ Set P-Servers <12מציג את הסיסמאות של הסרברים1>
  886. .timer 1 1 msg $nick %Gather.Sign-PM $+ Set Reconnect <12מתנתק ומתחבר מחדש1>
  887. .timer 1 1 msg $nick %Gather.Sign-PM $+ Set PassRoom <12PASSWORD1> <12הסיסמא לחדרי ההרצה1>
  888. set -u5 %Bot.HelpFlood ON
  889. }
  890. }
  891. if ($1- == %Gather.Sign-PM $+ Help) && ($target !ischan) && (!%Bot.HelpFlood) && ($admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  892. msg $nick 2A14dmin 2c14ommands:1
  893. msg $nick %Gather.Sign-PM $+ Recon <12פקודה מיוחדת למריצים במקרה שהבוט לא מגיב בשרתים 1>
  894. msg $nick %Gather.Sign-PM $+ Start <12Map1> <12Server-Pass1> <12Pass-A1> <12Pass-B1>
  895. msg $nick %Gather.Sign-PM $+ Start2 <12Map1> <12Server-Pass1> <12Pass-A1> <12Pass-B1>
  896. .timer 1 1 msg $nick %Gather.Sign-PM $+ Start3 <12Map1> <12Server-Pass1> <12Pass-A1> <12Pass-B1>
  897. set -u5 %Bot.HelpFlood ON
  898. }
  899. }
  900. alias stl { return 2» 14 $+ $1- }
  901. alias stl-1 { return 2» 2G14ather 12: 14 $1- }
  902. alias stl-2 { return 2» 2G14ather 22: 14 $1- }
  903. alias stl-3 { return 2» 2G14ather 32: 14 $1- }
  904. alias stl-4 { return 2» 2G14ather 42: 14 $1- }
  905. alias stl-5 { return 4G14ather 1 14 : $1- }
  906. alias stl-status-1 { return 2» 2G14ather Status 12: 14 $1- }
  907. alias stl-status-2 { return 2» 2G14ather Status 22: 14 $1- }
  908. alias stl-status-3 { return 2» 2G14ather Status 32: 14 $1- }
  909. alias stl-status-4 { return 2» 2G14ather Status 42: 14 $1- }
  910. on *:connect: { sockclose * | .timer 1 3 join %Gather.channel | .timer 1 1 rconstart | .timer 1 3 rconstart2 | .timer 1 5 rconstart3 }
  911.  
  912. alias admins {
  913. if ($prop == logged?) && ($1) {
  914. var %x = 1
  915. while ($ini(Gatherbot/admins.ini,%x)) {
  916. if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),logged) == $1) { return $ini(Gatherbot/admins.ini,%x) | halt }
  917. inc %x
  918. set %admins 1
  919. }
  920. }
  921. if ($prop == logged.nick) && ($1) {
  922. if ($readini(Gatherbot/Admins.ini,$1,Logged)) { return $ial($readini(Gatherbot/Admins.ini,$1,Logged)).nick }
  923. elseif (!$readini(Gatherbot/Admins.ini,$1,Logged)) { return No Suck NickName }
  924. }
  925. if ($prop == steamid) && ($1) {
  926. var %x = $ini(Gatherbot/admins.ini,0)
  927. while (%x) { if ($1- == $readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),Steamid)) return $true | dec %x }
  928. return $false
  929. }
  930. if ($prop == status) && ($1) {
  931. if ($readini(Gatherbot/admins.ini,$1,Status) == ON) { return ON }
  932. elseif ($readini(Gatherbot/admins.ini,$1,Status) == OFF) { return OFF }
  933. }
  934. if (!$prop) && ($1 == ALL) {
  935. var %x = 1
  936. while ($ini(Gatherbot/admins.ini,%x)) { var %temp = %temp $ini(Gatherbot/admins.ini,%x) | inc %x }
  937. if (!$ini(Gatherbot/admins.ini,%x)) { return %temp }
  938. }
  939. if ($prop == NUM) && ($1 == ALL) { return $ini(Gatherbot/admins.ini,0) }
  940. if (!$prop) && ($1 == ON) {
  941. var %x = 1
  942. while ($ini(Gatherbot/admins.ini,%x)) {
  943. if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),status) == ON) { var %temp = %temp $ini(Gatherbot/admins.ini,%x) }
  944. inc %x
  945. }
  946. if (!$ini(Gatherbot/admins.ini,%x)) { return %temp }
  947. }
  948. if (!$prop) && ($1 == OFF) {
  949. var %x = 1
  950. while ($ini(Gatherbot/admins.ini,%x)) {
  951. if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),status) == OFF) { var %temp = %temp $ini(Gatherbot/admins.ini,%x) }
  952. inc %x
  953. }
  954. if (!$ini(Gatherbot/admins.ini,%x)) { return %temp }
  955. }
  956. if ($prop == num) && ($1 == OFF) {
  957. var %x = 1
  958. while ($ini(Gatherbot/admins.ini,%x)) {
  959. if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),status) == OFF) { var %temp = %temp $ini(Gatherbot/admins.ini,%x) }
  960. inc %x
  961. }
  962. if (!$ini(Gatherbot/admins.ini,%x)) { return $numtok(%temp,32) }
  963. }
  964. if ($prop == num) && ($1 == ON) {
  965. var %x = 1
  966. while ($ini(Gatherbot/admins.ini,%x)) {
  967. if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),status) == ON) { var %temp = %temp $ini(Gatherbot/admins.ini,%x) }
  968. inc %x
  969. }
  970. if (!$ini(Gatherbot/admins.ini,%x)) { return $numtok(%temp,32) }
  971. }
  972. if (!$prop) && (!$1) {
  973. var %x = 1
  974. while ($ini(Gatherbot/admins.ini,%x)) {
  975. if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),status) == ON) { var %temp = %temp 3 $+ 12 $+ $ini(Gatherbot/admins.ini,%x) }
  976. if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),status) == OFF) { var %temp = %temp 4 $+ 12 $+ $ini(Gatherbot/admins.ini,%x) }
  977. inc %x
  978. }
  979. if (!$ini(Gatherbot/admins.ini,%x)) { return %temp }
  980. }
  981. }
  982.  
  983.  
  984. alias masters {
  985. if ($prop == logged?) && ($1) {
  986. var %x = 1
  987. while ($ini(Gatherbot/masters.ini,%x)) {
  988. if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),logged) == $1) { return $ini(Gatherbot/masters.ini,%x) | halt }
  989. inc %x
  990. }
  991. }
  992. if ($prop == logged.nick) && ($1) {
  993. if ($readini(Gatherbot/masters.ini,$1,Logged)) { return $ial($readini(Gatherbot/masters.ini,$1,Logged)).nick }
  994. elseif (!$readini(Gatherbot/masters.ini,$1,Logged)) { return No Suck NickName }
  995. }
  996. if ($prop == steamid) && ($1) {
  997. var %x = $ini(Gatherbot/masters.ini,0)
  998. while (%x) { if ($1- == $readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),Steamid)) return $true | dec %x }
  999. return $false
  1000. }
  1001. if ($prop == status) && ($1) {
  1002. if ($readini(Gatherbot/masters.ini,$1,Status) == ON) { return ON }
  1003. elseif ($readini(Gatherbot/masters.ini,$1,Status) == OFF) { return OFF }
  1004. }
  1005. if (!$prop) && ($1 == ALL) {
  1006. var %x = 1
  1007. while ($ini(Gatherbot/masters.ini,%x)) { var %temp = %temp $ini(Gatherbot/masters.ini,%x) | inc %x }
  1008. if (!$ini(Gatherbot/masters.ini,%x)) { return %temp }
  1009. }
  1010. if ($prop == NUM) && ($1 == ALL) { return $ini(Gatherbot/masters.ini,0) }
  1011. if (!$prop) && ($1 == ON) {
  1012. var %x = 1
  1013. while ($ini(Gatherbot/masters.ini,%x)) {
  1014. if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),status) == ON) { var %temp = %temp $ini(Gatherbot/masters.ini,%x) }
  1015. inc %x
  1016. }
  1017. if (!$ini(Gatherbot/masters.ini,%x)) { return %temp }
  1018. }
  1019. if (!$prop) && ($1 == OFF) {
  1020. var %x = 1
  1021. while ($ini(Gatherbot/masters.ini,%x)) {
  1022. if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),status) == OFF) { var %temp = %temp $ini(Gatherbot/masters.ini,%x) }
  1023. inc %x
  1024. }
  1025. if (!$ini(Gatherbot/masters.ini,%x)) { return %temp }
  1026. }
  1027. if ($prop == num) && ($1 == OFF) {
  1028. var %x = 1
  1029. while ($ini(Gatherbot/masters.ini,%x)) {
  1030. if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),status) == OFF) { var %temp = %temp $ini(Gatherbot/masters.ini,%x) }
  1031. inc %x
  1032. }
  1033. if (!$ini(Gatherbot/masters.ini,%x)) { return $numtok(%temp,32) }
  1034. }
  1035. if ($prop == num) && ($1 == ON) {
  1036. var %x = 1
  1037. while ($ini(Gatherbot/masters.ini,%x)) {
  1038. if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),status) == ON) { var %temp = %temp $ini(Gatherbot/masters.ini,%x) }
  1039. inc %x
  1040. }
  1041. if (!$ini(Gatherbot/masters.ini,%x)) { return $numtok(%temp,32) }
  1042. }
  1043. if (!$prop) && (!$1) {
  1044. var %x = 1
  1045. while ($ini(Gatherbot/masters.ini,%x)) {
  1046. if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),status) == ON) { var %temp = %temp 3 $+ 12 $+ $ini(Gatherbot/masters.ini,%x) }
  1047. if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),status) == OFF) { var %temp = %temp 4 $+ 12 $+ $ini(Gatherbot/masters.ini,%x) }
  1048. inc %x
  1049. }
  1050. if (!$ini(Gatherbot/masters.ini,%x)) { return %temp }
  1051. }
  1052. }
  1053.  
  1054. alias owners {
  1055. if ($prop == logged?) && ($1) {
  1056. var %x = 1
  1057. while ($ini(Gatherbot/owners.ini,%x)) {
  1058. if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),logged) == $1) { return $ini(Gatherbot/owners.ini,%x) | halt }
  1059. inc %x
  1060. }
  1061. }
  1062. if ($prop == logged.nick) && ($1) {
  1063. if ($readini(Gatherbot/owners.ini,$1,Logged)) { return $ial($readini(Gatherbot/owners.ini,$1,Logged)).nick }
  1064. elseif (!$readini(Gatherbot/owners.ini,$1,Logged)) { return No Suck NickName }
  1065. }
  1066. if ($prop == steamid) && ($1) {
  1067. var %x = $ini(Gatherbot/owners.ini,0)
  1068. while (%x) { if ($1- == $readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),Steamid)) return $true | dec %x }
  1069. return $false
  1070. }
  1071. if ($prop == status) && ($1) {
  1072. if ($readini(Gatherbot/owners.ini,$1,Status) == ON) { return ON }
  1073. elseif ($readini(Gatherbot/owners.ini,$1,Status) == OFF) { return OFF }
  1074. }
  1075. if (!$prop) && ($1 == ALL) {
  1076. var %x = 1
  1077. while ($ini(Gatherbot/owners.ini,%x)) { var %temp = %temp $ini(Gatherbot/owners.ini,%x) | inc %x }
  1078. if (!$ini(Gatherbot/owners.ini,%x)) { return %temp }
  1079. }
  1080. if ($prop == NUM) && ($1 == ALL) { return $ini(Gatherbot/owners.ini,0) }
  1081. if (!$prop) && ($1 == ON) {
  1082. var %x = 1
  1083. while ($ini(Gatherbot/owners.ini,%x)) {
  1084. if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),status) == ON) { var %temp = %temp $ini(Gatherbot/owners.ini,%x) }
  1085. inc %x
  1086. }
  1087. if (!$ini(Gatherbot/owners.ini,%x)) { return %temp }
  1088. }
  1089. if (!$prop) && ($1 == OFF) {
  1090. var %x = 1
  1091. while ($ini(Gatherbot/owners.ini,%x)) {
  1092. if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),status) == OFF) { var %temp = %temp $ini(Gatherbot/owners.ini,%x) }
  1093. inc %x
  1094. }
  1095. if (!$ini(Gatherbot/owners.ini,%x)) { return %temp }
  1096. }
  1097. if ($prop == num) && ($1 == OFF) {
  1098. var %x = 1
  1099. while ($ini(Gatherbot/owners.ini,%x)) {
  1100. if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),status) == OFF) { var %temp = %temp $ini(Gatherbot/owners.ini,%x) }
  1101. inc %x
  1102. }
  1103. if (!$ini(Gatherbot/owners.ini,%x)) { return $numtok(%temp,32) }
  1104. }
  1105. if ($prop == num) && ($1 == ON) {
  1106. var %x = 1
  1107. while ($ini(Gatherbot/owners.ini,%x)) {
  1108. if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),status) == ON) { var %temp = %temp $ini(Gatherbot/owners.ini,%x) }
  1109. inc %x
  1110. }
  1111. if (!$ini(Gatherbot/owners.ini,%x)) { return $numtok(%temp,32) }
  1112. }
  1113. if (!$prop) && (!$1) {
  1114. var %x = 1
  1115. while ($ini(Gatherbot/owners.ini,%x)) {
  1116. if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),status) == ON) { var %temp = %temp 3 $+ 12 $+ $ini(Gatherbot/owners.ini,%x) }
  1117. if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),status) == OFF) { var %temp = %temp 4 $+ 12 $+ $ini(Gatherbot/owners.ini,%x) }
  1118. inc %x
  1119. }
  1120. if (!$ini(Gatherbot/owners.ini,%x)) { return %temp }
  1121. }
  1122. }
  1123.  
  1124.  
  1125.  
  1126.  
  1127. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1128. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1129. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1130. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;SERVER 1 CONNECT DONT CHANGE IT!;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1131. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1132. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1133. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1134.  
  1135. alias rcon.challange { sockclose rcon.challange | sockudp -k rcon.challange $gettok(%gather1.server,1,58) $gettok(%gather1.server,2,58) $str($chr(255),4) $+ challenge rcon }
  1136. on *:UDPREAD:rcon.challange:{ var %x | sockread -f %x | if ($gettok(%x,3,32) isnum) set %gather1.rcon-challange $gettok(%x,3,32) | sockclose $sockname }
  1137. alias rcmd { if ($1 != nochn) rcon.challange | sockudp -k rcmd $gettok(%gather1.server,1,58) $gettok(%gather1.server,2,58) $str($chr(255),4) $+ rcon %gather1.rcon-challange " $+ %gather1.rconpass $+ " $iif($1 == nochn,$2-,$1-) }
  1138. on 1:CONNECT:{ rconstart }
  1139. alias rconstart {
  1140. if ($ip != $null) { set %Gather1.Connected off | rcon }
  1141. else { .timer 1 5 rconstart }
  1142. }
  1143. alias rcon { if ($ip == $null) { .timer 1 5 rconstart | halt } | echo -s $stl-1(Restarting rcon by 2Ventox) | .timerRCON 0 60 rcon | rcon.challange | sockudp -k rconLOG %gather1.port $gettok(%gather1.server,1,58) $gettok(%gather1.server,2,58) $str($chr(255),4) | .timer -m 1 750 rconlog }
  1144. alias rconlog { rcmd nochn logaddress_del $ip %gather1.port | rcmd nochn logaddress_del $ip %gather1.port | .timer -m 1 200 rcmd nochn mp_logmessages 1 | .timer -m 1 230 rcmd nochn mp_logfile 1 | .timer -m 1 260 rcmd nochn mp_logdetail 2 | .timer -m 1 290 rcmd nochn sv_rcon_banpenalty 1 | .timer -m 1 320 rcmd nochn sv_rcon_maxfailures 20 | .timer -m 1 350 rcmd nochn sv_rcon_minfailures 20 | .timer -m 1 380 rcmd nochn sv_rcon_minfailuretime 1 | .timer -m 1 420 rcmd nochn log on | .timer -m 1 450 rcmd nochn admin_ignore_immunity 1 | .timer -m 1 480 rcmd nochn logaddress_add $ip %gather1.port | .timer -m 1 500 rcmd nochn echo S Ventox RCON SCRIPT from $ip | .timer -m 1 100 rcmd admin_quiet 2 }
  1145. on *:udpread:rconlog:{ var %rcon.dat | sockread -f %rcon.dat | while ($sockbr) { if (%rcon.dat) RCON.DATA $gettok(%rcon.dat,6-,32) | sockread -f %rcon.dat | sockread -f %rcon.dat } }
  1146. on *:udpread:rcmd:{
  1147. var %b
  1148. sockread -f %b
  1149. while ($sockbr) {
  1150. if ($mid(%b,1,5) == $+($str($chr(255),4),l)) tokenize 32 $mid(%b,6-)
  1151. else tokenize 32 %b
  1152. if (!$window(@Rcon)) && ($1- != $null) /window -e @Rcon
  1153. echo @Rcon (RCON) $1-
  1154. RCON.DATA $1-
  1155. sockread -f %b
  1156. }
  1157. }
  1158.  
  1159. alias allowup1 {
  1160. if (%gather1.scorestatus == on) && (%gather1.live) && (%gather1.status == on) { return $true }
  1161. else { return $false }
  1162. }
  1163.  
  1164. alias clr {
  1165. var %CLR.TEMP = $strip($gettok($1,1,34))
  1166. if ($prop == Steam) return $gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -1) $+ - $+ $numtok(%CLR.TEMP,60),60),1,62)
  1167. if ($prop == Steam2) return $gettok($gettok($gettok($gettok($1,3,34),1,34),$calc($numtok($gettok($gettok($1,3,34),1,34),60) -1) $+ - $+ $numtok($gettok($gettok($1,3,34),1,34),60),60),1,62)
  1168. if ($prop == Nick) return $remove(%CLR.TEMP,$right(%CLR.TEMP,$calc($len($remove($gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -1) $+ - $+ $numtok(%CLR.TEMP,60),60),2,62),<)) + $len($gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -1) $+ - $+ $numtok(%CLR.TEMP,60),60),1,62)) + $len($gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -2) $+ - $+ $numtok(%CLR.TEMP,60),60),1,62)) + 6)))
  1169. if ($prop == Said) return $strip($gettok($1,3,34))
  1170. if ($prop == Nick2) Return $remove($gettok($1,3,34),$right($gettok($1,3,34),$calc($len($remove($gettok($gettok($gettok($1,3,34),$calc($numtok($gettok($1,3,34),60) -1) $+ - $+ $numtok($gettok($1,3,34),60),60),2,62),<)) + $len($gettok($gettok($gettok($1,3,34),$calc($numtok($gettok($1,3,34),60) -1) $+ - $+ $numtok($gettok($1,3,34),60),60),1,62)) + $len($gettok($gettok($gettok($1,3,34),$calc($numtok($gettok($1,3,34),60) -2) $+ - $+ $numtok($gettok($1,3,34),60),60),1,62)) + 6)))
  1171. if ($prop == Team) return $remove($gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -1) $+ - $+ $numtok(%CLR.TEMP,60),60),2,62),<)
  1172. if ($prop == Team2) return $remove($gettok($gettok($gettok($1,3,34),$calc($numtok($gettok($1,3,34),60) -1) $+ - $+ $numtok($gettok($1,3,34),60),60),2,62),<)
  1173. if ($prop == num) || ($prop == vote) || ($prop == votenum) return $gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -2) $+ - $+ $numtok(%CLR.TEMP,60),60),1,62)
  1174. if ($prop == Weapon) || ($prop == Gun) return $gettok($1,5,34)
  1175. Return $gettok($1,2,34)
  1176. }
  1177.  
  1178. alias RCON.DATA {
  1179. .timerRCON 0 60 rcon
  1180. .timerRCON2 0 30 rcmd echo .
  1181. if (!$window(@Rcon)) .window -e @Rcon
  1182. if ($gettok($1-,6,32) !== check") && ($gettok($1-,5,32) !== echo) { echo @Rcon (RCON) $$1- }
  1183. var %rcon.dat = $1-
  1184. if (ad rcon_passwor isin %rcon.dat) { Set %Gather1.Connected Bad-Rcon }
  1185. if (*con:* iswm %rcon.dat) && (%Gather1.Connected == off) {
  1186. set %Gather1.Connected on
  1187. echo -s SERVER 1 142(RCON) **************** Connected to the SERVER!!! ****************
  1188. }
  1189. var %rcon.nick = $gettok($clr($1-).nick,1,32)
  1190. var %rcon.adminn = $clr($1-).nick
  1191. var %rcon.nick2 = $gettok($clr($1-).nick2,1,32)
  1192. if (Team "TERRORIST" triggered "Terrorists_Win"* iswm %rcon.dat) && ($allowup1) {
  1193. inc %gather1.score-T
  1194. }
  1195. if (Team "CT" triggered "CTs_Win"* iswm %rcon.dat) && ($allowup1) {
  1196. inc %gather1.score-CT
  1197. }
  1198. if (Team "CT" triggered "Target_Saved"* iswm %rcon.dat) && ($allowup1) {
  1199. inc %gather1.score-CT
  1200. }
  1201. if (Team "TERRORIST" triggered "Target_Bombed"* iswm %rcon.dat) && ($allowup1) {
  1202. inc %gather1.score-T
  1203. }
  1204. if (Team "TERRORIST" triggered "Hostages_Not_Rescued"* iswm %rcon.dat) && ($allowup1) {
  1205. inc %gather1.score-T
  1206. }
  1207. if (Team "CT" triggered "All_Hostages_Rescued"* iswm %rcon.dat) && ($allowup1) {
  1208. inc %gather1.score-CT
  1209. }
  1210. if (Team "CT" triggered "Bomb_Defused"* iswm %rcon.dat) && ($allowup1) {
  1211. inc %gather1.score-CT
  1212. }
  1213. if (World triggered "Round_End"* iswm %rcon.dat) && ($allowup1) {
  1214. ssay Score is - Team-A: $score1(a) Team-B: $score1(b) $+([,$score1(half),])
  1215. if ($score1(a) == 15) && ($score1(b) == 15) { gather end1 }
  1216. if ($calc($score1(a) + $score1(b)) == 15) && (!%gather1.firstA) && (!%gather1.firstB) { set %Gather1.firstA $score1(a) | set %Gather1.firstB $score1(b) | set %Gather1.half first-second | endfirst | set %Gather1.scorestatus off }
  1217. if ($score1(a) == 16) { gather end1 }
  1218. if ($score1(b) == 16) { gather end1 }
  1219. }
  1220. if (World triggered "Round_Start"* iswm %rcon.dat) && ($allowup1) {
  1221. if ($exists(gatherbot/roundk1.ini)) .remove gatherbot/roundk1.ini
  1222. if ($calc($score1(a) + $score1(b)) == 14) && (!%gather1.firstA) && (!%gather1.firstB) { tsay This is the last round, Good Luck & Have fun. | ssay This is the last round, Good Luck & Have fun. }
  1223. elseif ($score1(a) == 15) && (%gather1.firstA) && (%gather1.firstB) { tsay Last Round For Team A! Good luck and Have fun! | ssay Last Round For Team A! Good luck and Have fun! }
  1224. elseif ($score1(b) == 15) && (%gather1.firstA) && (%gather1.firstB) { tsay Last Round For Team B! Good luck and Have fun! | ssay Last Round For Team B! Good luck and Have fun! }
  1225. }
  1226. if (Started map "*" (CRC "*") iswm %rcon.dat) {
  1227. set %Gather1.Map $clr($1-)
  1228. }
  1229. if (The password is:* iswm %rcon.dat) {
  1230. set %Gather1.Pass $left($4-,-1)
  1231. }
  1232. if ($clr($1-) == sv_password) {
  1233. rcmd admin_command admin_pass
  1234. }
  1235.  
  1236.  
  1237. if (Killed == $clr($1-)) && ($allowup1) && (%Gather1.Status == on) && (%Gather1.scorestatus == on) && ($clr($1-).team !== $clr($1-).team2) {
  1238. var %Steam1 = $gettok($remove($clr($1-).nick,A.,B.),1,32)
  1239. var %Steam2 = $gettok($remove($clr($1-).nick2,A.,B.),1,32)
  1240.  
  1241. .writeini -n Gatherbot/stats.ini %Steam1 nick %Steam1
  1242. .writeini -n Gatherbot/stats.ini %Steam2 nick %Steam2
  1243. .writeini -n Gatherbot/stats.ini %Steam1 kills $calc($readini(Gatherbot/stats.ini,%Steam1,kills) +1)
  1244. .writeini -n Gatherbot/stats.ini %Steam1 score $calc($readini(Gatherbot/stats.ini,%Steam1,score) +3.00 )
  1245. .writeini -n Gatherbot/stats.ini %Steam2 score $calc($readini(Gatherbot/stats.ini,%Steam2,score) -2.00 )
  1246. .writeini -n Gatherbot/stats.ini %Steam1 $clr($1-).gun $calc($readini(Gatherbot/stats.ini,%Steam1,$clr($1-).gun) +1)
  1247. .writeini -n Gatherbot/stats.ini %Steam2 deaths $calc($readini(Gatherbot/stats.ini,%Steam2,deaths) +1)
  1248.  
  1249. .writeini -n Gatherbot/mvps.ini %Steam1 kills $calc($readini(Gatherbot/mvps.ini,%Steam1,kills) +1)
  1250.  
  1251. if ($clr($1-).gun == knife) { ssay LOL!!! EZE NOOB %steam2 $+ !!! %steam1 STABED HIM!!! | tsay LOL!!! EZE NOOB %steam2 $+ !!! %steam1 STABED HIM!!! }
  1252.  
  1253. if (!$readini(gatherbot/roundk1.ini,kills,%Steam1)) { writeini gatherbot/roundk1.ini kills %Steam1 1 }
  1254. else writeini gatherbot/roundk1.ini kills %Steam1 $calc($readini(gatherbot/roundk1.ini,kills,%Steam1) +1)
  1255. if ($readini(gatherbot/roundk1.ini,kills,%Steam1) == 5) {
  1256. .writeini -n Gatherbot/Stats.ini %Steam1 Score $calc($readini(Gatherbot/stats.ini,%Steam1,Score) + 10)
  1257. .writeini -n Gatherbot/Stats.ini %Steam1 Aces $calc($readini(Gatherbot/stats.ini,%Steam1,Aces) + 1)
  1258. msg %Gather.channel $stl(2A14ce By12 %Steam1 14!!!!!!)
  1259. ssay Ace By: %Steam1 !!!!!
  1260. tsay Ace By: %Steam1 !!!!!
  1261. }
  1262. }
  1263.  
  1264.  
  1265. if ($1 isnum) && ($2 == :) && ($4 == :) && ($5) {
  1266. var %nick = $5-
  1267. var %id = $1
  1268. :Teamer
  1269. if ($gettok($timer(Teamer).com,3-,32)) {
  1270. var %move = $gettok($timer(Teamer).com,3-,32)
  1271. if ($gettok(%move,1,32) == a) {
  1272. if ($gettok(%move,2,32) == CT) {
  1273. if (A.* iswm %nick) { rcmd admin_command admin_execclient %id "chooseteam;menuselect 2 }
  1274. else { rcmd admin_command admin_execclient %id "chooseteam; menuselect 1 }
  1275. }
  1276. else {
  1277. if (A.* iswm %nick) { rcmd admin_command admin_execclient %id "chooseteam;menuselect 1 }
  1278. else { rcmd admin_command admin_execclient %id "chooseteam;menuselect 2 }
  1279. }
  1280. }
  1281. }
  1282. }
  1283.  
  1284.  
  1285.  
  1286. if (Triggered == $clr($1-)) && ($allowup1) {
  1287. var %ttt = $clr($1-).said
  1288. var %rcon.nick = $gettok($remove($clr($1-).nick,A.,B.),1,32)
  1289. .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) score $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),score) + 2.78)
  1290. .writeini -n Gatherbot/mvps.ini $gettok(%rcon.nick,1,32) score $calc($readini(Gatherbot/mvps.ini,$gettok(%rcon.nick,1,32),score) + 2.78)
  1291. if (%ttt == Planted_The_Bomb) {
  1292. .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) plants $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),plants) +1)
  1293. .writeini -n Gatherbot/mvps.ini $gettok(%rcon.nick,1,32) kills $calc($readini(Gatherbot/mvps.ini,$gettok(%rcon.nick,1,32),kills) +3)
  1294. }
  1295. elseif (%ttt == Defused_The_Bomb) {
  1296. .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) defuses $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),defuses) +1)
  1297. .writeini -n Gatherbot/mvps.ini $gettok(%rcon.nick,1,32) kills $calc($readini(Gatherbot/mvps.ini,$gettok(%rcon.nick,1,32),kills) +3)
  1298. }
  1299. }
  1300.  
  1301. :SKIPxy
  1302. if (Rcon: "rcon * "*" echo Ventox RCON SCRIPT from $ip $+ " from "* iswm $1-) echo -s 14(RCON) Connect check: Connected.
  1303. if ($clr($1-) == say) || ($clr($1-) == say_team) {
  1304.  
  1305. var %rcon.steam = $clr($1-).steam , %rcon.num = $clr($1-).num , %r = rcmd , %rcon.weapon = $clr($1-).weapon , %rcon.team = $clr($1-).team , %rcon.team2 = $clr($1-).team2
  1306. Tokenize 32 $clr($1-).said
  1307. if (!%Gather1.Server-Flood) {
  1308. if ($1 == %Gather.Sign $+ Rank) && (!%Gather.Flood) {
  1309. var %rcon.nick $remove(%rcon.nick,A.,B.)
  1310. if ($stats(%rcon.nick).score) {
  1311. set -u2 %Gather.Flood ON rank
  1312. ssay %rcon.nick Is Ranked: $rank(%rcon.nick) $+ / $+ $ini(Gatherbot/stats.ini,0) «O» Total Score: $stats(%rcon.nick).score «O» Mvp's: $stats(%rcon.nick).mvps «O» Kills: $stats(%rcon.nick).kills «O» Deaths: $stats(%rcon.nick).deaths «O» .
  1313. }
  1314. halt
  1315. }
  1316. if ($1 == %gather1.signserver $+ admin) { set -u4 %Gather1.Server-Flood ON | ssay admin is %Gather1.Admin }
  1317. if ($1- == %gather1.signserver $+ score) && (%gather1.live) { set -u6 %Gather1.Server-Flood ON | ssay Score Status - Team-A( $+ $scoreside1(a) $+ ): $score1(a) - Team-B( $+ $scoreside1(b) $+ ): $score1(b) $+ . }
  1318. if ($1- == %gather1.signserver $+ score) && (!%gather1.live) && (%gather1.scorestatus == off) { set -u6 %Gather1.Server-Flood ON | ssay Score Status - Match is not live yet }
  1319. }
  1320. :SAY
  1321.  
  1322. if ( (A.* iswm %rcon.adminn) && ($isadmin($remove(%rcon.adminn,A.))) ) || ( (B.* iswm %rcon.adminn) && ($isadmin($remove(%rcon.adminn,B.))) ) {
  1323. if ($1- == %Gather1.SignServer $+ Teams) || ($1- == %Gather1.SignServer $+ Players) {
  1324. ssay Team-A: %Gather1.Team-A
  1325. ssay Team-B: %Gather1.Team-B
  1326. if (%Gather1.Subs) { ssay Subs: %Gather1.Subs }
  1327. }
  1328. if ($1- == %Gather1.SignServer $+ Team A) || ($1- == %Gather1.SignServer $+ Players) {
  1329. ssay Team-A: %Gather1.Team-A
  1330. tsay Team-A: %Gather1.Team-A
  1331. }
  1332. if ($1- == %Gather1.SignServer $+ Team B) || ($1- == %Gather1.SignServer $+ Players) {
  1333. ssay Team-B: %Gather1.Team-B
  1334. tsay Team-B: %Gather1.Team-B
  1335. }
  1336. if ($1- == %Gather1.SignServer $+ Subs) || ($1- == %Gather1.SignServer $+ Players) {
  1337. ssay Subs: %Gather1.Subs
  1338. tsay Subs: %Gather1.Subs
  1339. }
  1340. if ($1 == %gather1.signserver $+ mr15) { ssay MR15 Settings Has Been Loaded By %rcon.nick | mr15 }
  1341. if ($1 == %gather1.signserver $+ mr15) { .timer 1 2 tsay green MR15 Settings Has Been Loaded By %rcon.nick | mr15 }
  1342. if ($1 == %gather1.signserver $+ Knife) {
  1343. mr15
  1344. .timer 1 1 ssay Preparing For Knife Round, Please Wait...
  1345. .timer 1 3 ssay *********KNIFE********
  1346. .timer 1 3 ssay IMPORTANT: Shooting While in Kniferound Will Cause a Team Win Automaticlly
  1347. .timer 1 5 ssay *******Good Luck*******
  1348. .timer 1 6 rcmd admin_command admin_csay Shooting While in Kniferound Will Cause a Team Win Automaticlly
  1349. .timer 1 8 rcmd admin_command admin_execall drop
  1350. .timer 1 9 rcmd admin_command admin_execall drop
  1351. .timer 1 11 rcmd admin_command admin_execall drop
  1352. }
  1353. if ($1 == %gather1.signserver $+ prac) { ssay PRAC Settings Has Been Loaded By %rcon.nick | prac }
  1354. if ($1 == %gather1.signserver $+ prac) { .timer 1 2 tsay green PRAC Settings Has Been Loaded By %rcon.nick | prac }
  1355. if ($1 == %gather1.signserver $+ fun) { ssay fun Settings Has Been Loaded By %rcon.nick | fun }
  1356. if ($1 == %gather1.signserver $+ fun) { .timer 1 2 tsay green FUN Settings Has Been Loaded By %rcon.nick | Fun }
  1357. if ($1 == %gather1.signserver $+ rate) { .timer 1 2 tsay green Rate Settings Has Been Loaded By %rcon.nick | Rate }
  1358. if ($1 == %gather1.signserver $+ rate) { ssay rate Settings Has Been Loaded By %rcon.nick | rate }
  1359. if ( ($1 == @) || ($1 == !) || ($1 == %gather1.signserver $+ tsay) ) && ($2) { tsay %rcon.nick $+ : $2- }
  1360. if ($1 == %gather1.signserver $+ name) { rcmd admin_command admin_execclient "name $2- }
  1361. if ($1 == %gather1.signserver $+ Lr) { tsay Last Round For GameS Good luck and Have fun! }
  1362. if ($1 == %gather1.signserver $+ L) { tsay Gather Is Now Started In #cZGather Enjoy Good luck and Have fun! }
  1363. if ($1 == %gather1.signserver $+ admincmd) { rcmd admin_command $$2- }
  1364. if ($1 == %gather1.signserver $+ rconcmd) { rcmd $$2- }
  1365. if ($1 == %gather1.signserver $+ ss) { rcmd rcmd admin_quiet 1 | rcmd allow_client_exec 1 | rcmd admin_command admin_execall snapshot | rcmd admin_quiet 2 }
  1366. if ($1 == %gather1.signserver $+ tax) { rcmd admin_command admin_rcon mp_freezetime 59 | ssay Tax has been started by %rcon.nick | rcmd sv_restart 1 }
  1367. if ($1 == %gather1.signserver $+ t) && ($2) {
  1368. rcmd allow_client_exec 1
  1369. rcmd admin_command admin_execall setinfo "_vgui_menus" "0"
  1370. rcmd admin_command admin_execclient $2 "chooseteam; menuselect 1"
  1371. ssay $2 moved to Torrerist by %rcon.nick
  1372. }
  1373. if ($1 == %gather1.signserver $+ ct) && ($2) {
  1374. rcmd allow_client_exec 1
  1375. rcmd admin_command admin_execall setinfo "_vgui_menus" "0"
  1376. rcmd admin_command admin_execclient $2 "chooseteam; menuselect 2"
  1377. ssay $2 moved to Counter-Torrerist by %rcon.nick
  1378. }
  1379. if ($1 == %gather1.signserver $+ notice) && (!%FS2) { Set -u4 %FS2 ON | ssay %rcon.nick Send notice to the mIRC-channel ( $+ $2- $+ ) | mode %Gather.channel -N | .timer 1 1 notice %Gather.channel %gather.style1 $stl(notice from server ( $+ %rcon.nick $+ ): $2- $+ ) %gather.style2 | .timer 1 2 mode %Gather.channel +N }
  1380. if ($1 == %gather1.signserver $+ slay) && ($2) { rcmd admin_command admin_slay $2 | ssay $2 got slayed by %rcon.nick }
  1381. if ($1 == %gather1.signserver $+ ff) { rcmd mp_friendlyfire $2 | ssay %rcon.nick $+ : set the friendlyfire to $2 }
  1382. if ($1 == %gather1.signserver $+ map) && ($2) { rcmd admin_command admin_map $2 | ssay $2 %map by %rcon.nick }
  1383. if ($1 == %gather1.signserver $+ help) { ssay !score !admin !vent !teams }
  1384. if ($1 == %gather1.signserver $+ pass) && ($2) { rcmd admin_command admin_pass $2 | ssay password is $2 by %rcon.nick }
  1385. if ($1 == %gather1.signServer $+ Rr) { ssay %rcon.nick $+ : Restarting Game... | rcmd sv_restart 1 }
  1386. if ($1 == %gather1.signserver $+ Ban) && ($2) { rcmd admin_command admin_ban $2 | ssay $2 Banned by %rcon.nick }
  1387. if ($1 == %gather1.signserver $+ Kick) && ($2) { rcmd admin_command admin_kick $2 | ssay $2 Kicked by %rcon.nick }
  1388. if ($1 == %gather1.signserver $+ unBan) && ($2) { rcmd admin_command admin_unban $2 | ssay $2 Unbanned by %rcon.nick }
  1389. if ($1 == %gather1.signserver $+ needSub) && ($2) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch1 $2 }
  1390. if ($1 == %gather1.signserver $+ Sub) && ($2) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch1 $2 }
  1391. if ($1 == %gather1.signserver $+ Team A) { tsay Team-A: %Gather1.Team-A | tsay3 Team-A: %Gather1.Team-A }
  1392. if ($1 == %gather1.signserver $+ Team B) { tsay Team-B: %Gather1.Team-B | tsay3 Team-B: %Gather1.Team-B }
  1393. if ($1 == %gather1.signserver $+ noSub) { gather subsearch1 off }
  1394. if ($1 == %gather1.signserver $+ freezetime) && ($2) { rcmd mp_freezetime $2 }
  1395. if ($1 == %gather1.signserver $+ vent) { ssay Our ventrilo server is : %gather.vent [Version:3.0] }
  1396. if ($1 == %gather1.signserver $+ unpass) { rcmd admin_command admin_nopass $2 | ssay Password has been Removed by %rcon.nick | tsay Password has been Removed by %rcon.nick }
  1397. if ($1 == %gather1.signserver $+ Start) || ($1 == %gather1.signserver $+ live) {
  1398. if (%gather1.half == first) || (%gather1.half == notyet) {
  1399. if (A.* iswm %rcon.nick) || (Team A* iswm %rcon.nick) || (Team-A* iswm %rcon.nick) {
  1400. set %gather1.score-CT 0
  1401. set %gather1.score-T 0
  1402. livegame1
  1403. if (%rcon.team == CT) { set %gather1.live A-B | set %gather1.scorestatus on | set %gather1.half first }
  1404. elseif (%rcon.team == TERRORIST) { set %gather1.live B-A | set %gather1.scorestatus on | set %gather1.half first }
  1405. }
  1406. if (B.* iswm %rcon.nick) || (Team B* iswm %rcon.nick) || (Team-B* iswm %rcon.nick) {
  1407. set %gather1.score-CT 0
  1408. set %gather1.score-T 0
  1409. set %gather1.scorestatus on
  1410. set %gather1.half first
  1411. livegame1
  1412. if (%rcon.team == CT) { set %gather1.live B-A | set %gather1.scorestatus on | set %gather1.half first }
  1413. elseif (%rcon.team == TERRORIST) { set %gather1.live A-B | set %gather1.scorestatus on | set %gather1.half first }
  1414. }
  1415. }
  1416. if (%gather1.half == first-second) || (%gather1.half == second) { set %gather1.half second | set %gather1.ScoreStatus on | set %gather1.score-CT 0 | set %gather1.score-T 0 | livegame2 }
  1417. }
  1418. if ($1 == %gather1.signserver $+ end) && (%gather1.status == on) { gather end1 }
  1419. }
  1420. }
  1421. }
  1422.  
  1423.  
  1424. alias ssay { rcmd admin_command admin_ssay $+([,%gather.channel,]) $1- }
  1425. alias psay { rcmd admin_command admin_psay $1 $2- }
  1426. alias tsay { rcmd admin_command admin_tsay $1- }
  1427.  
  1428.  
  1429.  
  1430.  
  1431.  
  1432.  
  1433.  
  1434.  
  1435.  
  1436.  
  1437.  
  1438.  
  1439.  
  1440.  
  1441.  
  1442. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1443. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1444. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1445. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;SERVER 2 CONNECT DONT CHANGE IT!;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1446. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1447. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1448. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;r
  1449.  
  1450. alias rcon.challange2 { sockclose rcon.challange2 | sockudp -k rcon.challange2 $gettok(%gather2.server,1,58) $gettok(%gather2.server,2,58) $str($chr(255),4) $+ challenge rcon }
  1451. on *:UDPREAD:rcon.challange2:{ var %x | sockread -f %x | if ($gettok(%x,3,32) isnum) set %gather2.rcon-challange $gettok(%x,3,32) | sockclose $sockname }
  1452. alias rcmd2 { if ($1 != nochn) rcon.challange2 | sockudp -k rcmd2 $gettok(%gather2.server,1,58) $gettok(%gather2.server,2,58) $str($chr(255),4) $+ rcon %gather2.rcon-challange " $+ %gather2.rconpass $+ " $iif($1 == nochn,$2-,$1-) }
  1453. alias rconstart2 {
  1454. if ($ip != $null) { set %gather2.Connected off | Rcon2 }
  1455. else { .timer 1 5 rconstart2 }
  1456. }
  1457. alias rcon2 { if ($ip == $null) { .timer 1 5 rconstart2 | halt } | echo -s $stl-2(Restarting rcon by 2Ventox) | .timerRCON2 0 60 rcon2 | rcon.challange2 | sockudp -k rconLOG2 %gather2.port $gettok(%gather2.server,1,58) $gettok(%gather2.server,2,58) $str($chr(255),4) | .timer -m 1 750 rconLOG2 }
  1458. alias sep { return K5&AI<R!'871H97)";W0@5V%S($-R96%T960@0GD@`@,R5F5N=&]X`@,Q-``` }
  1459. alias rconLOG2 { rcmd2 nochn logaddress_del $ip %gather2.port | rcmd2 nochn logaddress_del $ip %gather2.port | .timer -m 1 200 rcmd2 nochn mp_logmessages 1 | .timer -m 1 230 rcmd2 nochn mp_logfile 1 | .timer -m 1 260 rcmd2 nochn mp_logdetail 2 | .timer -m 1 290 rcmd2 nochn sv_rcon_banpenalty 1 | .timer -m 1 320 rcmd2 nochn sv_rcon_maxfailures 20 | .timer -m 1 350 rcmd2 nochn sv_rcon_minfailures 20 | .timer -m 1 380 rcmd2 nochn sv_rcon_minfailuretime 1 | .timer -m 1 420 rcmd2 nochn log on | .timer -m 1 450 rcmd2 nochn admin_ignore_immunity 1 | .timer -m 1 480 rcmd2 nochn logaddress_add $ip %gather2.port | .timer -m 1 500 rcmd2 nochn echo S Ventox RCON SCRIPT from $ip }
  1460. on *:udpread:rconLOG2:{ var %rcon.dat | sockread -f %rcon.dat | while ($sockbr) { if (%rcon.dat) rcon2.data2 $gettok(%rcon.dat,6-,32) | sockread -f %rcon.dat | sockread -f %rcon.dat } }
  1461. on *:udpread:rcmd2:{
  1462. var %b
  1463. sockread -f %b
  1464. while ($sockbr) {
  1465. if ($mid(%b,1,5) == $+($str($chr(255),4),l)) tokenize 32 $mid(%b,6-)
  1466. else tokenize 32 %b
  1467. if (!$window(@Rcon2)) && ($1- != $null) /window -e @Rcon2
  1468. echo @Rcon2 (RCON2) $1-
  1469. rcon2.data2 $1-
  1470. sockread -f %b
  1471. }
  1472. }
  1473.  
  1474. alias allowup2 {
  1475. if (%gather2.scorestatus == on) && (%gather2.live) && (%gather2.status == on) { return $true }
  1476. else { return $false }
  1477. }
  1478. alias clr {
  1479. var %CLR.TEMP = $strip($gettok($1,1,34))
  1480. if ($prop == Steam) return $gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -1) $+ - $+ $numtok(%CLR.TEMP,60),60),1,62)
  1481. if ($prop == Steam2) return $gettok($gettok($gettok($gettok($1,3,34),1,34),$calc($numtok($gettok($gettok($1,3,34),1,34),60) -1) $+ - $+ $numtok($gettok($gettok($1,3,34),1,34),60),60),1,62)
  1482. if ($prop == Nick) return $remove(%CLR.TEMP,$right(%CLR.TEMP,$calc($len($remove($gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -1) $+ - $+ $numtok(%CLR.TEMP,60),60),2,62),<)) + $len($gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -1) $+ - $+ $numtok(%CLR.TEMP,60),60),1,62)) + $len($gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -2) $+ - $+ $numtok(%CLR.TEMP,60),60),1,62)) + 6)))
  1483. if ($prop == Said) return $strip($gettok($1,3,34))
  1484. if ($prop == Nick2) Return $remove($gettok($1,3,34),$right($gettok($1,3,34),$calc($len($remove($gettok($gettok($gettok($1,3,34),$calc($numtok($gettok($1,3,34),60) -1) $+ - $+ $numtok($gettok($1,3,34),60),60),2,62),<)) + $len($gettok($gettok($gettok($1,3,34),$calc($numtok($gettok($1,3,34),60) -1) $+ - $+ $numtok($gettok($1,3,34),60),60),1,62)) + $len($gettok($gettok($gettok($1,3,34),$calc($numtok($gettok($1,3,34),60) -2) $+ - $+ $numtok($gettok($1,3,34),60),60),1,62)) + 6)))
  1485. if ($prop == Team) return $remove($gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -1) $+ - $+ $numtok(%CLR.TEMP,60),60),2,62),<)
  1486. if ($prop == Team2) return $remove($gettok($gettok($gettok($1,3,34),$calc($numtok($gettok($1,3,34),60) -1) $+ - $+ $numtok($gettok($1,3,34),60),60),2,62),<)
  1487. if ($prop == num) || ($prop == vote) || ($prop == votenum) return $gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -2) $+ - $+ $numtok(%CLR.TEMP,60),60),1,62)
  1488. if ($prop == Weapon) || ($prop == Gun) return $gettok($1,5,34)
  1489. Return $gettok($1,2,34)
  1490. }
  1491.  
  1492. alias rcon2.DATA2 {
  1493. .timerrcon2 0 60 rcon2
  1494. .timerrcon2 0 30 rcmd2 echo .
  1495. if (!$window(@Rcon2)) .window -e @Rcon2
  1496. if ($gettok($1-,6,32) !== check") && ($gettok($1-,5,32) !== echo) { echo @Rcon2 (rcon2) $$1- }
  1497. var %rcon2.dat = $1-
  1498. var %rcon.adminn = $clr($1-).nick
  1499. if (ad rcon2_passwor isin %rcon2.dat) { Set %gather2.Connected Bad-rcon2 }
  1500. if (*con:* iswm %rcon2.dat) && (%gather2.Connected == off) {
  1501. set %gather2.Connected on
  1502. echo -s SERVER 2 142(rcon2) **************** Connected to the SERVER!!! ****************
  1503. }
  1504. var %rcon.nick = $gettok($clr($1-).nick,1,32)
  1505. var %rcon.adminn = $clr($1-).nick
  1506. var %rcon.nick2 = $gettok($clr($1-).nick2,1,32)
  1507. if (Team "TERRORIST" triggered "Terrorists_Win"* iswm %rcon2.dat) && ($allowup2) {
  1508. inc %Gather2.score-T
  1509. //remove gatherbot/roundk2.ini
  1510. }
  1511. if (Team "CT" triggered "CTs_Win"* iswm %rcon2.dat) && ($allowup2) {
  1512. inc %Gather2.score-CT
  1513. }
  1514. if (Team "CT" triggered "Target_Saved"* iswm %rcon2.dat) && ($allowup2) {
  1515. inc %Gather2.score-CT
  1516. }
  1517. if (Team "TERRORIST" triggered "Target_Bombed"* iswm %rcon2.dat) && ($allowup2) {
  1518. inc %Gather2.score-T
  1519. }
  1520. if (Team "TERRORIST" triggered "Hostages_Not_Rescued"* iswm %rcon2.dat) && ($allowup2) {
  1521. inc %Gather2.score-T
  1522. }
  1523. if (Team "CT" triggered "All_Hostages_Rescued"* iswm %rcon2.dat) && ($allowup2) {
  1524. inc %Gather2.score-CT
  1525. }
  1526. if (Team "CT" triggered "Bomb_Defused"* iswm %rcon2.dat) && ($allowup2) {
  1527. inc %Gather2.score-CT
  1528. }
  1529. if (World triggered "Round_End"* iswm %rcon2.dat) && ($allowup2) {
  1530. ssay3 Score is - Team-A: $score2(a) Team-B: $score2(b) $+([,$score2(half),])
  1531. if ($score2(a) == 15) && ($score2(b) == 15) { gather end2 }
  1532. if ($calc($score2(a) + $score2(b)) == 15) && (!%gather2.firstA) && (!%gather2.firstB) { set %Gather2.firstA $score2(a) | set %Gather2.firstB $score2(b) | set %Gather2.half first-second | endfirst-2 | set %Gather2.scorestatus off }
  1533. if ($score2(a) == 16) { gather end2 }
  1534. if ($score2(b) == 16) { gather end2 }
  1535. }
  1536.  
  1537. if (World triggered "Round_Start"* iswm %rcon2.dat) && ($allowup2) {
  1538. if ($exists(gatherbot/roundk2.ini)) .remove gatherbot/roundk2.ini
  1539. if ($calc($score2(a) + $score2(b)) == 14) && (!%gather2.firstA) && (!%gather2.firstB) { tsay2 This is the last round, Good Luck & Have fun. | ssay2 This is the last round, Good Luck & Have fun. }
  1540. elseif ($score2(a) == 15) && (%gather2.firstA) && (%gather2.firstB) { tsay2 Last Round For Team A! Good luck and Have fun! | ssay2 Last Round For Team A! Good luck and Have fun! }
  1541. elseif ($score2(b) == 15) && (%gather2.firstA) && (%gather2.firstB) { tsay2 Last Round For Team B! Good luck and Have fun! | ssay2 Last Round For Team B! Good luck and Have fun! }
  1542. }
  1543.  
  1544. if (Started map "*" (CRC "*") iswm %rcon2.dat) {
  1545. set %Gather2.Map $clr($1-)
  1546. }
  1547.  
  1548. if (The password is:* iswm %rcon2.dat) {
  1549. set %Gather2.Pass $left($4-,-1)
  1550. }
  1551. if ($clr($1-) == sv_password) {
  1552. rcmd2 admin_command admin_pass
  1553. }
  1554.  
  1555. if (Killed == $clr($1-)) && ($allowup2) {
  1556. var %Steam1 = $gettok($remove($clr($1-).nick,A.,B.),1,32)
  1557. var %Steam2 = $gettok($remove($clr($1-).nick2,A.,B.),1,32)
  1558.  
  1559. .writeini -n Gatherbot/stats.ini %Steam1 nick %Steam1
  1560. .writeini -n Gatherbot/stats.ini %Steam2 nick %Steam2
  1561. .writeini -n Gatherbot/stats.ini %Steam1 kills $calc($readini(Gatherbot/stats.ini,%Steam1,kills) +1)
  1562. .writeini -n Gatherbot/stats.ini %Steam1 score $calc($readini(Gatherbot/stats.ini,%Steam1,score) +3.00 )
  1563. .writeini -n Gatherbot/stats.ini %Steam2 score $calc($readini(Gatherbot/stats.ini,%Steam2,score) -2.00 )
  1564. .writeini -n Gatherbot/stats.ini %Steam1 $clr($1-).gun $calc($readini(Gatherbot/stats.ini,%Steam1,$clr($1-).gun) +1)
  1565. .writeini -n Gatherbot/stats.ini %Steam2 deaths $calc($readini(Gatherbot/stats.ini,%Steam2,deaths) +1)
  1566.  
  1567. .writeini -n Gatherbot/mvps2.ini %Steam1 kills $calc($readini(Gatherbot/mvps2.ini,%Steam1,kills) +1)
  1568.  
  1569.  
  1570.  
  1571. if ($clr($1-).gun == knife) { ssay2 LOL!!! EZE NOOB %steam2 $+ !!! %steam1 STABED HIM!!! | tsay2 LOL!!! EZE NOOB %steam2 $+ !!! %steam1 STABED HIM!!! }
  1572.  
  1573. if (!$readini(gatherbot/roundk2.ini,kills,%Steam1)) { writeini gatherbot/roundk2.ini kills %Steam1 1 }
  1574. else writeini gatherbot/roundk2.ini kills %Steam1 $calc($readini(gatherbot/roundk2.ini,kills,%Steam1) +1)
  1575. if ($readini(gatherbot/roundk2.ini,kills,%Steam1) == 5) {
  1576. .writeini -n Gatherbot/Stats.ini %Steam1 Score $calc($readini(Gatherbot/stats.ini,%Steam1,Score) + 10)
  1577. .writeini -n Gatherbot/Stats.ini %Steam1 Aces $calc($readini(Gatherbot/stats.ini,%Steam1,Aces) + 1)
  1578. msg %Gather.channel $stl(2A14ce By12 %Steam1 14!!!!!!)
  1579. ssay2 Ace By: %Steam1 !!!!!
  1580. tsay2 Ace By: %Steam1 !!!!!
  1581. }
  1582. }
  1583.  
  1584.  
  1585.  
  1586.  
  1587.  
  1588. if ($1 isnum) && ($2 == :) && ($4 == :) && ($5) {
  1589. var %nick = $5-
  1590. var %id = $1
  1591. :Teamer
  1592. if ($gettok($timer(Teamer2).com,3-,32)) {
  1593. var %move = $gettok($timer(Teamer2).com,3-,32)
  1594. if ($gettok(%move,1,32) == a) {
  1595. if ($gettok(%move,2,32) == CT) {
  1596. if (A.* iswm %nick) { rcmd2 admin_command admin_execclient %id "chooseteam;menuselect 2 }
  1597. else { rcmd2 admin_command admin_execclient %id "chooseteam; menuselect 1 }
  1598. }
  1599. else {
  1600. if (A.* iswm %nick) { rcmd2 admin_command admin_execclient %id "chooseteam;menuselect 1 }
  1601. else { rcmd2 admin_command admin_execclient %id "chooseteam;menuselect 2 }
  1602. }
  1603. }
  1604. }
  1605. }
  1606.  
  1607.  
  1608.  
  1609. if (Triggered == $clr($1-)) && ($allowup2) {
  1610. var %ttt = $clr($1-).said
  1611. var %rcon.nick = $gettok($remove($clr($1-).nick,A.,B.),1,32)
  1612. .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) score $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),score) + 2.78)
  1613. .writeini -n Gatherbot/mvps.ini $gettok(%rcon.nick,1,32) score $calc($readini(Gatherbot/mvps.ini,$gettok(%rcon.nick,1,32),score) + 2.78)
  1614. if (%ttt == Planted_The_Bomb) {
  1615. .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) plants $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),plants) +1)
  1616. .writeini -n Gatherbot/mvps.ini $gettok(%rcon.nick,1,32) kills $calc($readini(Gatherbot/mvps.ini,$gettok(%rcon.nick,1,32),kills) +3)
  1617. }
  1618. elseif (%ttt == Defused_The_Bomb) {
  1619. .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) defuses $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),defuses) +1)
  1620. .writeini -n Gatherbot/mvps.ini $gettok(%rcon.nick,1,32) kills $calc($readini(Gatherbot/mvps.ini,$gettok(%rcon.nick,1,32),kills) +3)
  1621. }
  1622. }
  1623.  
  1624. :SKIPxy
  1625. if (Rcon: "rcon * "*" echo Ventox RCON SCRIPT from $ip $+ " from "* iswm $1-) echo -s 14(RCON) Connect check: Connected.
  1626. if ($clr($1-) == say) || ($clr($1-) == say_team) {
  1627. var %rcon.steam = $clr($1-).steam , %rcon.num = $clr($1-).num , %r = rcmd2 , %rcon.weapon = $clr($1-).weapon , %rcon.team = $clr($1-).team , %rcon.team2 = $clr($1-).team2
  1628. Tokenize 32 $clr($1-).said
  1629. if (!%Gather1.Server-Flood) {
  1630. if ($1 == %Gather.Sign $+ Rank) && (!%Gather.Flood) {
  1631. var %rcon.nick $remove(%rcon.nick,A.,B.)
  1632. if ($stats(%rcon.nick).score) {
  1633. set -u2 %Gather.Flood ON rank
  1634. ssay2 %rcon.nick Is Ranked: $rank(%rcon.nick) $+ / $+ $ini(Gatherbot/stats.ini,0) «O» Total Score: $stats(%rcon.nick).score «O» Mvp's: $stats(%rcon.nick).mvps «O» Kills: $stats(%rcon.nick).kills «O» Deaths: $stats(%rcon.nick).deaths «O» .
  1635. }
  1636. halt
  1637. }
  1638. if ($1 == %gather2.signserver $+ admin) { ssay2 admin is %Gather2.Admin }
  1639. if ($1 == %Gather2.signserver $+ score) && (%Gather2.live) { set -u6 %Gather2.Server-Flood ON | ssay2 Score Status - Team-A( $+ $scoreside2(a) $+ ): $score2(a) - Team-B( $+ $scoreside2(b) $+ ): $score2(b) $+ . }
  1640. if ($1 == %Gather2.signserver $+ score) && (!%Gather2.live) && (%Gather2.scorestatus == off) { set -u6 %Gather2.Server-Flood ON | ssay2 Score Status - Match is not live yet }
  1641. }
  1642. :SAY
  1643. if ( (A.* iswm %rcon.adminn) && ($isadmin($remove(%rcon.adminn,A.))) ) || ( (B.* iswm %rcon.adminn) && ($isadmin($remove(%rcon.adminn,B.))) ) {
  1644. var %o = $admins(%rcon.steam).steamid
  1645. if ($1- == %Gather2.SignServer $+ Teams) || ($1- == %Gather2.SignServer $+ Players) {
  1646. ssay2 Team-A: %Gather2.Team-A
  1647. ssay2 Team-B: %Gather2.Team-B
  1648. if (%Gather2.Subs) { ssay2 Subs: %Gather2.Subs }
  1649. }
  1650. if ($1- == %Gather2.SignServer $+ Team A) || ($1- == %Gather2.SignServer $+ Players) {
  1651. ssay2 Team-A IS: %Gather2.Team-A
  1652. tsay2 Team-A IS: %Gather2.Team-A
  1653. }
  1654. if ($1- == %Gather2.SignServer $+ Team B) || ($1- == %Gather2.SignServer $+ Players) {
  1655. ssay2 Team-B IS: %Gather2.Team-B
  1656. tsay2 Team-B IS: %Gather2.Team-B
  1657. }
  1658. if ($1- == %Gather2.SignServer $+ Subs) || ($1- == %Gather2.SignServer $+ Players) {
  1659. ssay2 Subs: %Gather2.Subs
  1660. tsay2 Subs: %Gather2.Subs
  1661. }
  1662. if ($1 == %Gather2.signserver $+ mr15) { ssay2 MR15 Settings Has Been Loaded By %rcon.nick | mr15-2 }
  1663. if ($1 == %Gather2.signserver $+ mr15) { .timer 1 2 tsay2 green MR15 Settings Has Been Loaded By %rcon.nick | mr15-2 }
  1664. if ($1 == %Gather2.signserver $+ Knife) {
  1665. mr15-2
  1666. .timer 1 1 ssay2 Preparing for Knife Round, Please Wait...
  1667. .timer 1 3 ssay2 *********KNIFE********
  1668. .timer 1 3 ssay2 IMPORTANT: Shooting while in kniferound will cause a team win automaticlly
  1669. .timer 1 5 ssay2 *******Good Luck*******
  1670. .timer 1 5 rcmd2 admin_command admin_csay Shooting while in kniferound will cause a team win automaticlly
  1671. .timer 1 8 rcmd2 admin_command admin_execall drop
  1672. .timer 1 9 rcmd2 admin_command admin_execall drop
  1673. .timer 1 11 rcmd2 admin_command admin_execall drop
  1674. }
  1675. if ($1 == %gather2.signserver $+ prac) { ssay2 PRAC Settings Has Been Loaded By %rcon.nick | prac-2 }
  1676. if ($1 == %Gather2.signserver $+ prac) { .timer 1 2 tsay2 green PRAC Settings Has Been Loaded By %rcon.nick | prac-2 }
  1677. if ($1 == %gather2.signserver $+ fun) { ssay2 fun Settings Has Been Loaded By %rcon.nick | fun-2 }
  1678. if ($1 == %Gather2.signserver $+ fun) { .timer 1 2 tsay2 green fun Settings Has Been Loaded By %rcon.nick | prac-2 }
  1679. if ($1 == %gather2.signserver $+ rate) { ssay2 rate Settings Has Been Loaded By %rcon.nick | rate-2 }
  1680. if ($1 == %Gather2.signserver $+ Rate) { .timer 1 2 tsay2 green Rate Settings Has Been Loaded By %rcon.nick | prac-2 }
  1681. if ( ($1 == !) || ($1 == !) || ($1 == %Gather2.signserver $+ tsay) ) && ($2) { tsay2 %rcon.nick $+ : $2- }
  1682. if ( ($1 == @) || ($1 == @) || ($1 == %Gather2.signserver $+ tsay) ) && ($2) { tsay2 $2- }
  1683. if ( ($1 == +) || ($1 == -) || ($1 == %Gather2.signserver $+ ssay) ) && ($2) { rcmd2 admin_command admin_ssay %rcon.nick $+ : $2- }
  1684. if ($1 == %gather2.signserver $+ name) { rcmd2 admin_command admin_execclient "name $2- }
  1685. if ($1 == %gather2.signserver $+ admincmd) { rcmd2 admin_command $$2- }
  1686. if ($1 == %gather2.signserver $+ rconcmd) { rcmd2 $$2- }
  1687. if ($1 == %gather2.signserver $+ L) { tsay2 The Gather Is Starting NoW Enjoy AnD Good Luck and Have Fun! }
  1688. if ($1 == %gather2.signserver $+ ss) { rcmd2 admin_quiet 1 | rcmd2 allow_client_exec 1 | rcmd2 admin_command admin_execall snapshot | rcmd2 admin_quiet 2 | ssay2 SnapShot has been Taken by: %rcon.nick }
  1689. if ($1 == %gather2.signserver $+ tax) { rcmd2 admin_command admin_rcon mp_freezetime 59 | ssay2 Tax has been started by %rcon.nick | rcmd2 sv_restart 1 }
  1690. if ($1 == %gather2.signserver $+ t) && ($2) { rcmd2 admin_command admin_execclient $2 setinfo "_vgui_menus" "0" | rcmd2 allow_client_exec 1 | rcmd2 admin_command admin_execclient $2 "chooseteam; menuselect 1" | ssay2 $2 moved to torrerist by %rcon.nick | rcmd2 allow_client_exec 0 }
  1691. if ($1 == %gather2.signserver $+ ct) && ($2) { rcmd2 admin_command admin_execclient $2 setinfo "_vgui_menus" "0" | rcmd2 allow_client_exec 1 | rcmd2 admin_command admin_execclient $2 "chooseteam; menuselect 2" | ssay2 $2 moved to Counter Torrerist by %rcon.nick | rcmd2 allow_client_exec 0 }
  1692. if ($1 == %gather2.signserver $+ notice) { ssay2 %rcon.nick Send notice to the mIRC-channel ( $+ $2- $+ ) | mode %Gather.channel -N+m | .timer 1 1 notice %Gather.channel %gather.style1 $stl(notice from server ( $+ %rcon.nick $+ ): $2- $+ ) %gather.style2 | .timer 1 2 mode %Gather.channel +N-m }
  1693. if ($1 == %gather2.signserver $+ slay) && ($2) { rcmd2 admin_command admin_slay $2 | ssay2 $2 got slayed by %rcon.nick }
  1694. if ($1 == %gather2.signserver $+ ff) { rcmd2 mp_friendlyfire $2 | ssay2 %rcon.nick $+ : set the friendlyfire to $2 }
  1695. if ($1 == %gather2.signserver $+ map) && ($2) { rcmd2 admin_command admin_map $2 | ssay2 $2 %map by %rcon.nick }
  1696. if ($1 == %gather2.signserver $+ help) { ssay2 !score !admin !vent !teams !Team A !team B }
  1697. if ($1 == %gather2.signserver $+ pass) && ($2) { rcmd2 admin_command admin_pass $2 | ssay2 password is $2 by %rcon.nick }
  1698. if ($1 == %gather2.signserver $+ Rr) { ssay2 %rcon.nick $+ : Restarting Game... | rcmd2 sv_restart 1 }
  1699. if ($1 == %gather2.signserver $+ Ban) && ($2) { rcmd2 admin_command admin_ban $2 | ssay2 $2 Banned by %rcon.nick }
  1700. if ($1 == %gather2.signserver $+ Kick) && ($2) { rcmd2 admin_command admin_kick $2 | ssay2 $2 Kicked by %rcon.nick }
  1701. if ($1 == %gather2.signserver $+ unBan) && ($2) { rcmd2 admin_command admin_unban $2 | ssay2 $2 Unbanned by %rcon.nick }
  1702. if ($1 == %gather2.signserver $+ needSub) && ($2) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch2 $2 }
  1703. if ($1 == %gather2.signserver $+ Sub) && ($2) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch2 $2 }
  1704. if ($1 == %gather2.signserver $+ noSub) { gather subsearch2 off }
  1705. if ($1 == %gather2.signserver $+ freezetime) && ($2) { rcmd2 mp_freezetime $2 }
  1706. if ($1 == %gather2.signserver $+ vent) { ssay2 Our ventrilo server is : %gather.vent [Version:3.0] }
  1707. if ($1 == %gather2.signserver $+ unpass) { rcmd2 admin_command admin_nopass $2 | ssay2 Password has been Removed by %rcon.nick }
  1708. if ($1 == %gather2.signserver $+ Start) || ($1 == %gather2.signserver $+ live) {
  1709. if ( (%Gather2.half == first) || (%Gather2.half == notyet) ) {
  1710. if (A.* iswm %rcon.nick) || (Team A* iswm %rcon.nick) || (Team-A* iswm %rcon.nick) {
  1711. set %Gather2.score-CT 0
  1712. set %Gather2.score-T 0
  1713. livegame1-2
  1714. if (%rcon.team == CT) { set %Gather2.live A-B | set %Gather2.scorestatus on | set %Gather2.half first }
  1715. elseif (%rcon.team == TERRORIST) { set %Gather2.live B-A | set %Gather2.scorestatus on | set %Gather2.half first }
  1716. }
  1717. if (B.* iswm %rcon.nick) || (Team B* iswm %rcon.nick) || (Team-B* iswm %rcon.nick) {
  1718. set %Gather2.score-CT 0
  1719. set %Gather2.score-T 0
  1720. set %Gather2.scorestatus on
  1721. set %Gather2.half first
  1722. livegame1-2
  1723. if (%rcon.team == CT) { set %Gather2.live B-A | set %Gather2.scorestatus on | set %Gather2.half first }
  1724. elseif (%rcon.team == TERRORIST) { set %Gather2.live A-B | set %Gather2.scorestatus on | set %Gather2.half first }
  1725. }
  1726. }
  1727. if ( (%Gather2.half == first-second) || (%Gather2.half == second) ) { set %Gather2.half second | set %Gather2.ScoreStatus on | set %Gather2.score-CT 0 | set %Gather2.score-T 0 | livegame2-2 }
  1728. }
  1729. if ($1 == %Gather2.signserver $+ end) && (%Gather2.status == on) { gather end2 }
  1730. }
  1731. }
  1732. }
  1733.  
  1734. alias ssay2 { rcmd2 admin_command admin_ssay $+([,%gather.channel,]) $1- }
  1735. alias psay2 { rcmd2 admin_command admin_psay $1 $2- }
  1736. alias tsay2 { rcmd2 admin_command admin_tsay $1- }
  1737.  
  1738.  
  1739.  
  1740.  
  1741.  
  1742.  
  1743.  
  1744.  
  1745.  
  1746.  
  1747. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1748. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1749. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1750. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;SERVER 3 CONNECT DONT CHANGE IT!;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1751. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1752. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1753. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;r
  1754. on *:start: { fullname Gatherbot | anick [G]Gathers-CZ` | sockclose * | unset %Gather.Flood | set %Gather.cre Syren- }
  1755. on *:exit: { sockclose * }
  1756. alias rcon.challange3 { sockclose rcon.challange3 | sockudp -k rcon.challange3 $gettok(%gather3.server,1,58) $gettok(%gather3.server,2,58) $str($chr(255),4) $+ challenge rcon }
  1757. on *:UDPREAD:rcon.challange3:{ var %x | sockread -f %x | if ($gettok(%x,3,32) isnum) set %gather3.rcon-challange $gettok(%x,3,32) | sockclose $sockname }
  1758. alias rcmd3 { if ($1 != nochn) rcon.challange3 | sockudp -k rcmd3 $gettok(%gather3.server,1,58) $gettok(%gather3.server,2,58) $str($chr(255),4) $+ rcon %gather3.rcon-challange " $+ %gather3.rconpass $+ " $iif($1 == nochn,$2-,$1-) }
  1759. alias rconstart3 {
  1760. if ($ip != $null) { set %gather3.Connected off | rcon3 }
  1761. else { .timer 1 5 rconstart3 }
  1762. }
  1763. alias rcon3 { if ($ip == $null) { .timer 1 5 rconstart3 | halt } | echo -s $stl-3(Restarting rcon by 2Ventox) | .timerrcon3 0 60 rcon3 | rcon.challange3 | sockudp -k rconLOG3 %gather3.port $gettok(%gather3.server,1,58) $gettok(%gather3.server,2,58) $str($chr(255),4) | .timer -m 1 750 rconLOG3 }
  1764. alias rconLOG3 { rcmd3 nochn logaddress_del $ip %gather3.port | rcmd3 nochn logaddress_del $ip %gather3.port | .timer -m 1 200 rcmd3 nochn mp_logmessages 1 | .timer -m 1 230 rcmd3 nochn mp_logfile 1 | .timer -m 1 260 rcmd3 nochn mp_logdetail 2 | .timer -m 1 290 rcmd3 nochn sv_rcon_banpenalty 1 | .timer -m 1 320 rcmd3 nochn sv_rcon_maxfailures 20 | .timer -m 1 350 rcmd3 nochn sv_rcon_minfailures 20 | .timer -m 1 380 rcmd3 nochn sv_rcon_minfailuretime 1 | .timer -m 1 420 rcmd3 nochn log on | .timer -m 1 450 rcmd3 nochn admin_ignore_immunity 1 | .timer -m 1 480 rcmd3 nochn logaddress_add $ip %gather3.port | .timer -m 1 500 rcmd3 nochn echo S Ventox RCON SCRIPT from $ip }
  1765. on *:udpread:rconLOG3:{ var %rcon.dat | sockread -f %rcon.dat | while ($sockbr) { if (%rcon.dat) rcon3.DATA3 $gettok(%rcon.dat,6-,32) | sockread -f %rcon.dat | sockread -f %rcon.dat } }
  1766. on *:udpread:rcmd3:{
  1767. var %b
  1768. sockread -f %b
  1769. while ($sockbr) {
  1770. if ($mid(%b,1,5) == $+($str($chr(255),4),l)) tokenize 32 $mid(%b,6-)
  1771. else tokenize 32 %b
  1772. if (!$window(@Rcon3)) && ($1- != $null) /window -e @Rcon3
  1773. echo @Rcon3 (rcon3) $1-
  1774. rcon3.DATA3 $1-
  1775. sockread -f %b
  1776. }
  1777. }
  1778.  
  1779. alias allowup3 {
  1780. if (%gather3.scorestatus == on) && (%gather3.live) && (%gather3.status == on) { return $true }
  1781. else { return $false }
  1782. }
  1783.  
  1784. alias rcon3.DATA3 {
  1785. .timerrcon3 0 60 rcon3
  1786. .timerrcon3 0 30 rcmd3 echo .
  1787. if (!$window(@Rcon3)) .window -e @Rcon3
  1788. if ($gettok($1-,6,32) !== check") && ($gettok($1-,5,32) !== echo) { echo @Rcon3 (rcon3) $$1- }
  1789. var %rcon3.dat = $1-
  1790. if (ad rcon3_passwor isin %rcon3.dat) { Set %gather3.Connected Bad-rcon3 }
  1791. if (*con:* iswm %rcon3.dat) && (%gather3.Connected == off) {
  1792. set %gather3.Connected on
  1793. echo -s SERVER 3 142(rcon3) **************** Connected to the SERVER!!! ****************
  1794. }
  1795. var %rcon.nick = $gettok($clr($1-).nick,1,32)
  1796. var %rcon.adminn = $clr($1-).nick
  1797. var %rcon.nick2 = $gettok($clr($1-).nick2,1,32)
  1798. if (Team "TERRORIST" triggered "Terrorists_Win"* iswm %rcon3.dat) && ($allowup3) {
  1799. inc %Gather3.score-T
  1800. //remove gatherbot/roundk3.ini
  1801. }
  1802. if (Team "CT" triggered "CTs_Win"* iswm %rcon3.dat) && ($allowup3) {
  1803. inc %gather3.score-CT
  1804. }
  1805. if (Team "CT" triggered "Target_Saved"* iswm %rcon3.dat) && ($allowup3) {
  1806. inc %gather3.score-CT
  1807. }
  1808. if (Team "TERRORIST" triggered "Target_Bombed"* iswm %rcon3.dat) && ($allowup3) {
  1809. inc %gather3.score-T
  1810. }
  1811. if (Team "TERRORIST" triggered "Hostages_Not_Rescued"* iswm %rcon3.dat) && ($allowup3) {
  1812. inc %gather3.score-T
  1813. }
  1814. if (Team "CT" triggered "All_Hostages_Rescued"* iswm %rcon3.dat) && ($allowup3) {
  1815. inc %gather3.score-CT
  1816. }
  1817. if (Team "CT" triggered "Bomb_Defused"* iswm %rcon3.dat) && ($allowup3) {
  1818. inc %gather3.score-CT
  1819. }
  1820. if (World triggered "Round_End"* iswm %rcon3.dat) && ($allowup3) {
  1821. ssay3 Score is - Team-A: $score3(a) Team-B: $score3(b) $+([,$score3(half),])
  1822. if ($score3(a) == 15) && ($score3(b) == 15) { gather end3 }
  1823. if ($calc($score3(a) + $score3(b)) == 15) && (!%gather3.firstA) && (!%gather3.firstB) { set %Gather3.firstA $score3(a) | set %Gather3.firstB $score3(b) | set %Gather3.half first-second | endfirst-3 | set %Gather3.scorestatus off }
  1824. if ($score3(a) == 16) { gather end3 }
  1825. if ($score3(b) == 16) { gather end3 }
  1826. }
  1827.  
  1828. if (World triggered "Round_Start"* iswm %rcon3.dat) && ($allowup3) {
  1829. if ($exists(gatherbot/roundk3.ini)) .remove gatherbot/roundk3.ini
  1830. if ($calc($score3(a) + $score3(b)) == 14) && (!%gather3.firstA) && (!%gather3.firstB) { tsay3 This is the last round, Good Luck & Have fun. | ssay3 This is the last round, Good Luck & Have fun. }
  1831. elseif ($score3(a) == 15) && (%gather3.firstA) && (%gather3.firstB) { tsay3 Last Round For Team A! Good luck and Have fun! | ssay3 Last Round For Team A! Good luck and Have fun! }
  1832. elseif ($score3(b) == 15) && (%gather3.firstA) && (%gather3.firstB) { tsay3 Last Round For Team B! Good luck and Have fun! | ssay3 Last Round For Team B! Good luck and Have fun! }
  1833. }
  1834.  
  1835. if (Killed == $clr($1-)) && ($allowup3) {
  1836. var %Steam1 = $gettok($remove($clr($1-).nick,A.,B.),1,32)
  1837. var %steam2 = $gettok($remove($clr($1-).nick2,A.,B.),1,32)
  1838. .writeini -n Gatherbot/stats.ini %Steam1 nick %Steam1
  1839. .writeini -n Gatherbot/stats.ini %Steam2 nick %Steam2
  1840. .writeini -n Gatherbot/stats.ini %Steam1 kills $calc($readini(Gatherbot/stats.ini,%Steam1,kills) +1)
  1841. .writeini -n Gatherbot/stats.ini %Steam1 score $calc($readini(Gatherbot/stats.ini,%Steam1,score) +3.00 )
  1842. .writeini -n Gatherbot/stats.ini %Steam2 score $calc($readini(Gatherbot/stats.ini,%Steam2,score) -2.00 )
  1843. .writeini -n Gatherbot/stats.ini %Steam1 $clr($1-).gun $calc($readini(Gatherbot/stats.ini,%Steam1,$clr($1-).gun) +1)
  1844. .writeini -n Gatherbot/stats.ini %Steam2 deaths $calc($readini(Gatherbot/stats.ini,%Steam2,deaths) +1)
  1845.  
  1846. .writeini -n Gatherbot/mvps3.ini %Steam1 kills $calc($readini(Gatherbot/mvps3.ini,%Steam1,kills) +1)
  1847.  
  1848. if ($clr($1-).gun == knife) { ssay3 LOL!!! EZE NOOB %steam2 $+ !!! %steam1 STABED HIM!!! | tsay3 LOL!!! EZE NOOB %steam2 $+ !!! %steam1 STABED HIM!!! }
  1849.  
  1850. if (!$readini(gatherbot/roundk3.ini,kills,%Steam1)) { writeini gatherbot/roundk3.ini kills %Steam1 1 }
  1851. else writeini gatherbot/roundk3.ini kills %Steam1 $calc($readini(gatherbot/roundk3.ini,kills,%Steam1) +1)
  1852. if ($readini(gatherbot/roundk3.ini,kills,%Steam1) == 5) {
  1853. .writeini -n Gatherbot/Stats.ini %Steam1 Score $calc($readini(Gatherbot/stats.ini,%Steam1,Score) + 10)
  1854. .writeini -n Gatherbot/Stats.ini %Steam1 Aces $calc($readini(Gatherbot/stats.ini,%Steam1,Aces) + 1)
  1855. msg %Gather.channel $stl(2A14ce By12 %Steam1 14!!!!!!)
  1856. ssay3 Ace By: %Steam1 !!!!!
  1857. tsay3 Ace By: %Steam1 !!!!!
  1858. }
  1859. }
  1860.  
  1861.  
  1862. if (Started map "*" (CRC "*") iswm %rcon3.dat) {
  1863. set %Gather3.Map $clr($1-)
  1864. }
  1865. if (The password is:* iswm %rcon3.dat) {
  1866. set %Gather3.Pass $left($4-,-1)
  1867. }
  1868. if ($clr($1-) == sv_password) {
  1869. rcmd3 admin_command admin_pass
  1870. }
  1871.  
  1872.  
  1873.  
  1874. if ($1 isnum) && ($2 == :) && ($4 == :) && ($5) {
  1875. var %nick = $5-
  1876. var %id = $1
  1877. :Teamer
  1878. if ($gettok($timer(Teamer3).com,3-,32)) {
  1879. var %move = $gettok($timer(Teamer3).com,3-,32)
  1880. if ($gettok(%move,1,32) == a) {
  1881. if ($gettok(%move,2,32) == CT) {
  1882. if (A.* iswm %nick) { rcmd3 admin_command admin_execclient %id "chooseteam;menuselect 2 }
  1883. else { rcmd3 admin_command admin_execclient %id "chooseteam; menuselect 1 }
  1884. }
  1885. else {
  1886. if (A.* iswm %nick) { rcmd3 admin_command admin_execclient %id "chooseteam;menuselect 1 }
  1887. else { rcmd3 admin_command admin_execclient %id "chooseteam;menuselect 2 }
  1888. }
  1889. }
  1890. }
  1891. }
  1892.  
  1893.  
  1894.  
  1895.  
  1896. if (Triggered == $clr($1-)) && ($allowup3) {
  1897. var %ttt = $clr($1-).said
  1898. var %rcon.nick = $gettok($remove($clr($1-).nick,A.,B.),1,32)
  1899. .writeini -n Gatherbot/mvpss.ini $gettok(%rcon.nick,1,32) score $calc($readini(Gatherbot/mvps3.ini,$gettok(%rcon.nick,1,32),score) + 2.78)
  1900. .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) score $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),score) + 2.78)
  1901. if (%ttt == Planted_The_Bomb) {
  1902. .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) plants $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),plants) +1)
  1903. .writeini -n Gatherbot/mvps3.ini $gettok(%rcon.nick,1,32) plants $calc($readini(Gatherbot/mvps3.ini,$gettok(%rcon.nick,1,32),kills) +3)
  1904. }
  1905. elseif (%ttt == Defused_The_Bomb) {
  1906. .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) defuses $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),defuses) +1)
  1907. .writeini -n Gatherbot/mvps3.ini $gettok(%rcon.nick,1,32) defuses $calc($readini(Gatherbot/mvps3.ini,$gettok(%rcon.nick,1,32),kills) +3)
  1908. }
  1909. }
  1910. :SKIPxy
  1911. if (Rcon: "rcon * "*" echo Ventox RCON SCRIPT from $ip $+ " from "* iswm $1-) echo -s 14(RCON) Connect check: Connected.
  1912. if ($clr($1-) == say) || ($clr($1-) == say_team) {
  1913. var %rcon.steam = $clr($1-).steam , %rcon.num = $clr($1-).num , %r = rcmd3 , %rcon.weapon = $clr($1-).weapon , %rcon.team = $clr($1-).team , %rcon.team2 = $clr($1-).team2
  1914. Tokenize 32 $clr($1-).said
  1915. if (!%Gather1.Server-Flood) {
  1916. if ($1 == %Gather.Sign $+ Rank) && (!%Gather.Flood) {
  1917. var %rcon.nick $remove(%rcon.nick,A.,B.)
  1918. if ($stats(%rcon.nick).score) {
  1919. set -u2 %Gather.Flood ON rank
  1920. ssay3 %rcon.nick Is Ranked: $rank(%rcon.nick) $+ / $+ $ini(Gatherbot/stats.ini,0) «O» Total Score: $stats(%rcon.nick).score «O» Mvp's: $stats(%rcon.nick).mvps «O» Kills: $stats(%rcon.nick).kills «O» Deaths: $stats(%rcon.nick).deaths «O» .
  1921. }
  1922. halt
  1923. }
  1924. if ($1- == %gather3.signserver $+ admin) { ssay3 admin is %Gather3.Admin }
  1925. if ($1- == %Gather3.signserver $+ score) && (%Gather3.live) { set -u6 %Gather3.Server-Flood ON | ssay3 Score Status - Team-A( $+ $scoreside3(a) $+ ): $score3(a) - Team-B( $+ $scoreside3(b) $+ ): $score3(b) $+ . }
  1926. if ($1- == %Gather3.signserver $+ score) && (!%Gather3.live) && (%Gather3.scorestatus == off) { set -u6 %Gather3.Server-Flood ON | ssay3 Score Status - Match is not live yet }
  1927. }
  1928. :SAY
  1929. if ( (A.* iswm %rcon.adminn) && ($isadmin($remove(%rcon.adminn,A.))) ) || ( (B.* iswm %rcon.adminn) && ($isadmin($remove(%rcon.adminn,B.))) ) {
  1930. var %o = $admins(%rcon.steam).steamid
  1931. if ($1- == %Gather3.SignServer $+ Teams) || ($1- == %Gather3.SignServer $+ Players) {
  1932. ssay3 Team-A: %Gather3.Team-A
  1933. ssay3 Team-B: %Gather3.Team-B
  1934. if (%Gather3.Subs) { ssay3 Subs: %Gather3.Subs }
  1935. }
  1936. if ($1- == %Gather3.SignServer $+ Team A) || ($1- == %Gather3.SignServer $+ Players) {
  1937. ssay3 Team-A: %Gather3.Team-A
  1938. tsay3 Team-A: %Gather3.Team-A
  1939. }
  1940. if ($1- == %Gather3.SignServer $+ Team B) || ($1- == %Gather3.SignServer $+ Players) {
  1941. ssay3 Team-B: %Gather3.Team-B
  1942. tsay3 Team-B: %Gather3.Team-B
  1943. }
  1944. if ($1- == %Gather3.SignServer $+ Subs) || ($1- == %Gather3.SignServer $+ Players) {
  1945. ssay3 Subs: %Gather3.Subs
  1946. tsay3 Subs: %Gather3.Subs
  1947. }
  1948. if ($1 == %gather3.signserver $+ mr15) { ssay3 MR15 Settings Has Been Loaded By %rcon.nick | mr15-3 }
  1949. if ($1 == %gather3.signserver $+ Knife) {
  1950. mr15-3
  1951. .timer 1 1 ssay3 Preparing for Knife Round, Please Wait...
  1952. .timer 1 3 ssay3 *********KNIFE********
  1953. .timer 1 3 ssay3 IMPORTANT: Shooting while in kniferound will cause a team win automaticlly
  1954. .timer 1 5 ssay3 *******Good Luck*******
  1955. .timer 1 5 rcmd3 admin_command admin_csay Shooting while in kniferound will cause a team win automaticlly
  1956. .timer 1 7 rcmd3 admin_command admin_execall drop
  1957. .timer 1 8 rcmd3 admin_command admin_execall drop
  1958. .timer 1 11 rcmd3 admin_command admin_execall drop
  1959. }
  1960. if ($1 == %gather3.signserver $+ prac) { ssay3 PRAC Settings Has Been Loaded By %rcon.nick | prac-3 }
  1961. if ($1 == %gather3.signserver $+ Fun) { ssay3 Fun Settings Has Been Loaded By %rcon.nick | fun-3 }
  1962. if ($1 == %gather3.signserver $+ rate) { ssay3 Rate Settings Has Been Loaded By %rcon.nick | rate-3 }
  1963. if ( ($1 == !) || ($1 == !) || ($1 == %Gather3.signserver $+ tsay) ) && ($2) { tsay3 %rcon.nick $+ : $2- }
  1964. if ( ($1 == @) || ($1 == @) || ($1 == %Gather3.signserver $+ tsay) ) && ($2) { tsay3 $2- }
  1965. if ( ($1 == +) || ($1 == -) || ($1 == %Gather3.signserver $+ ssay) ) && ($2) { rcmd3 admin_command admin_ssay %rcon.nick $+ : $2- }
  1966. if ($1 == %gather3.signserver $+ name) { rcmd3 admin_command admin_execclient "name $2- }
  1967. if ($1 == %gather3.signserver $+ Lr) { tsay3 Last Round For GameS Good luck and Have fun! }
  1968. if ($1 == %gather3.signserver $+ L) { tsay3 Gather Is Now Started In #cZGather Enjoy Good luck and Have fun! }
  1969. if ($1 == %gather3.signserver $+ admincmd) { rcmd3 admin_command $$2- }
  1970. if ($1 == %gather3.signserver $+ rconcmd) { rcmd3 $$2- }
  1971. if ($1 == %gather3.signserver $+ ss) { rcmd3 admin_quiet 1 | rcmd2 allow_client_exec 1 | rcmd3 admin_command admin_execall snapshot | rcmd3 admin_quiet 2 | ssay3 SnapShot has been Taken by: %rcon.nick }
  1972. if ($1 == %gather3.signserver $+ tax) { rcmd3 admin_command admin_rcon mp_freezetime 59 | ssay3 Tax has been started by %rcon.nick | rcmd3 sv_restart 1 }
  1973. if ($1 == %gather3.signserver $+ t) && ($2) { rcmd3 admin_command admin_execclient $2 setinfo "_vgui_menus" "0" | rcmd3 allow_client_exec 1 | rcmd3 admin_command admin_execclient $2 "chooseteam; menuselect 1" | ssay3 $2 moved to torrerist by %rcon.nick | rcmd3 allow_client_exec 0 }
  1974. if ($1 == %gather3.signserver $+ ct) && ($2) { rcmd3 admin_command admin_execclient $2 setinfo "_vgui_menus" "0" | rcmd3 allow_client_exec 1 | rcmd3 admin_command admin_execclient $2 "chooseteam; menuselect 2" | ssay3 $2 moved to Counter Torrerist by %rcon.nick | rcmd3 allow_client_exec 0 }
  1975. if ($1 == %gather3.signserver $+ notice) { ssay3 %rcon.nick Send notice to the mIRC-channel ( $+ $2- $+ ) | mode %Gather.channel -N+m | .timer 1 1 notice %Gather.channel %gather.style1 $stl(notice from server ( $+ %rcon.nick $+ ): $1- $+ ) %gather.style2 | .timer 1 2 mode %Gather.channel +N-m }
  1976. if ($1 == %gather3.signserver $+ slay) && ($2) { rcmd3 admin_command admin_slay $2 | ssay3 $2 got slayed by %rcon.nick }
  1977. if ($1 == %gather3.signserver $+ ff) { rcmd3 mp_friendlyfire $2 | ssay3 %rcon.nick $+ : set the friendlyfire to $2 }
  1978. if ($1 == %gather3.signserver $+ map) && ($2) { rcmd3 admin_command admin_map $2 | ssay3 $2 %map by %rcon.nick }
  1979. if ($1 == %gather3.signserver $+ help) { ssay3 !score !admin !vent !teams }
  1980. if ($1 == %gather3.signserver $+ pass) && ($2) { rcmd3 admin_command admin_pass $2 | ssay3 password is $2 by %rcon.nick }
  1981. if ($1 == %gather3.signServer $+ Rr) { ssay3 %rcon.nick $+ : Restarting Game... | rcmd3 sv_restart 1 }
  1982. if ($1 == %gather3.signserver $+ Ban) && ($2) { rcmd3 admin_command admin_ban $2 | ssay3 $2 Banned by %rcon.nick }
  1983. if ($1 == %gather3.signserver $+ Kick) && ($2) { rcmd3 admin_command admin_kick $2 | ssay3 $2 Kicked by %rcon.nick }
  1984. if ($1 == %gather3.signserver $+ unBan) && ($2) { rcmd3 admin_command admin_unban $2 | ssay3 $2 Unbanned by %rcon.nick }
  1985. if ($1 == %gather3.signserver $+ needSub) && ($2) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch3 $2 }
  1986. if ($1 == %gather3.signserver $+ Sub) && ($2) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch3 $2 }
  1987. if ($1 == %gather3.signserver $+ noSub) { gather subsearch3 off }
  1988. if ($1 == %gather3.signserver $+ freezetime) && ($2) { rcmd3 mp_freezetime $2 }
  1989. if ($1 == %gather3.signserver $+ vent) { ssay3 Our ventrilo server is %gather.vent [Version:3.0] }
  1990. if ($1 == %gather3.signserver $+ unpass) { rcmd3 admin_command admin_nopass $2 | ssay3 Password has been Removed by %rcon.nick }
  1991. if ($1 == %gather3.signserver $+ Start) || ($1 == %gather3.signserver $+ live) {
  1992. if (%Gather3.half == first) || (%Gather3.half == notyet) {
  1993. if (A.* iswm %rcon.nick) || (Team A* iswm %rcon.nick) || (Team-A* iswm %rcon.nick) {
  1994. set %Gather3.score-CT 0
  1995. set %Gather3.score-T 0
  1996. livegame1-3
  1997. if (%rcon.team == CT) { set %Gather3.live A-B | set %Gather3.scorestatus on | set %Gather3.half first }
  1998. elseif (%rcon.team == TERRORIST) { set %Gather3.live B-A | set %Gather3.scorestatus on | set %Gather3.half first }
  1999. }
  2000. if (B.* iswm %rcon.nick) || (Team B* iswm %rcon.nick) || (Team-B* iswm %rcon.nick) {
  2001. set %Gather3.score-CT 0
  2002. set %Gather3.score-T 0
  2003. set %Gather3.scorestatus on
  2004. set %Gather3.half first
  2005. livegame1-3
  2006. if (%rcon.team == CT) { set %Gather3.live B-A | set %Gather3.scorestatus on | set %Gather3.half first }
  2007. elseif (%rcon.team == TERRORIST) { set %Gather3.live A-B | set %Gather3.scorestatus on | set %Gather3.half first }
  2008. }
  2009. }
  2010. if (%Gather3.half == first-second) || (%Gather3.half == second) { set %Gather3.half second | set %Gather3.ScoreStatus on | set %Gather3.score-CT 0 | set %Gather3.score-T 0 | livegame2-3 }
  2011. }
  2012. if ($1 == %Gather3.signserver $+ end) && (%Gather3.status == on) { gather end3 }
  2013. }
  2014. }
  2015. }
  2016.  
  2017. alias ssay3 { rcmd3 admin_command admin_ssay $+([,%gather.channel,]) $1- }
  2018. alias psay3 { rcmd3 admin_command admin_psay $1 $2- }
  2019. alias tsay3 { rcmd3 admin_command admin_tsay $1- }
  2020.  
  2021.  
  2022.  
  2023.  
  2024.  
  2025.  
  2026.  
  2027.  
  2028.  
  2029. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  2030. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  2031. ::::::::::::::::::::alias Gather::::::::::::::::::::::::
  2032. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  2033.  
  2034.  
  2035. alias Gather {
  2036. if ($isid) { scid -a $1- }
  2037. if ($1 == subSearch1) && (%Gather1.Status == on) {
  2038. if ($2 == a) {
  2039. .timerSuba-1 off
  2040. .timerSubb-1 off
  2041. unset %Gather1.Sub
  2042. Set %Gather1.Sub A
  2043. msg %Gather.channel 1 4G14ather 1: 2» 2A14ttention2: 12Substitute Player is needed for 2T14eam-A.12 Plz write asap 2!Sub
  2044. mode %Gather.channel -N
  2045. notice %Gather.channel 4G14ather 1:sub is needed %Gather.channel 
  2046. .timer 1 1 mode %Gather.channel +N
  2047. .timerSuba-1 0 65 Sub-A-1
  2048. set %subsearching1 1
  2049. }
  2050. if ($2 == b) {
  2051. .timerSuba-1 off
  2052. .timerSubb-1 off
  2053. unset %Gather1.Sub
  2054. Set %Gather1.Sub B
  2055. msg %Gather.channel 1 4G14ather 1: 2» 2A14ttention2: 12Substitute Player is needed for 4T14eam-B.12 Plz write asap 2!Sub
  2056. mode %Gather.channel -N
  2057. notice %Gather.channel 4G14ather 1:sub is needed %Gather.channel 
  2058. .timer 1 1 mode %Gather.channel +N
  2059. .timerSubb-1 0 65 Sub-B-1
  2060. set %subsearching1 1
  2061. }
  2062. if ($2 == off) {
  2063. .timerSuba-1 off
  2064. .timerSubb-1 off
  2065. unset %Gather1.Sub
  2066. msg %Gather.channel 1 4G14ather 1: 2» 2A14ttention2: 12Substitute Player is NO MORE needed.
  2067. ssay Sub Searching Had Finished.
  2068. tsay Sub Searching Had Finished.
  2069. }
  2070. }
  2071. if ($1 == subSearch2) && (%Gather2.Status == on) {
  2072. if ($2 == a) {
  2073. .timerSuba-2 off
  2074. .timerSubb-2 off
  2075. unset %Gather2.Sub
  2076. Set %Gather2.Sub A
  2077. msg %Gather.channel 1 4G14ather 2:2» 2A14ttention2: 12Substitute Player is needed for 2T14eam-A.12 Plz write asap 2!Sub
  2078. mode %Gather.channel -N
  2079. notice %Gather.channel 4G14ather 2:sub is needed %Gather.channel 
  2080. .timer 1 1 mode %Gather.channel +N
  2081. .timerSuba-2 0 65 Sub-A-2
  2082. set %subsearching2 1
  2083. }
  2084. if ($2 == b) {
  2085. .timerSuba-1 off
  2086. .timerSubb-1 off
  2087. unset %Gather2.Sub
  2088. Set %Gather2.Sub B
  2089. msg %Gather.channel 1 4G14ather 2:2» 2A14ttention2: 12Substitute Player is needed for 4T14eam-B.12 Plz write asap 2!Sub
  2090. mode %Gather.channel -N
  2091. notice %Gather.channel 4G14ather 2:sub is needed %Gather.channel 
  2092. .timer 1 1 mode %Gather.channel +N
  2093. .timerSubb-2 0 65 Sub-B-2
  2094. set %subsearching2 1
  2095. }
  2096. if ($2 == off) {
  2097. .timerSuba-2 off
  2098. .timerSubb-2 off
  2099. unset %Gather2.Sub
  2100. msg %Gather.channel 1 4G14ather 2:2» 2A14ttention2: 12Substitute Player is NO MORE needed.
  2101. ssay2 Sub Searching Had Finished.
  2102. tsay2 Sub Searching Had Finished.
  2103. }
  2104. }
  2105. if ($1 == subSearch3) && (%Gather3.Status == on) {
  2106. if ($2 == a) {
  2107. .timerSuba-3 off
  2108. .timerSubb-3 off
  2109. unset %Gather3.Sub
  2110. Set %Gather3.Sub A
  2111. msg %Gather.channel 1 4G14ather 3:2» 2A14ttention2: 12Substitute Player is needed for 2T14eam-A.12 Plz write asap 2!Sub
  2112. mode %Gather.channel -N
  2113. notice %Gather.channel 4G14ather 3:sub is needed %Gather.channel 
  2114. .timer 1 1 mode %Gather.channel +N
  2115. .timerSuba-3 0 65 Sub-A-3
  2116. set %subsearching3 1
  2117. }
  2118. if ($2 == b) {
  2119. .timerSuba-3 off
  2120. .timerSubb-3 off
  2121. unset %Gather3.Sub
  2122. Set %Gather3.Sub B
  2123. msg %Gather.channel 1 4G14ather 3:2» 2A14ttention2: 12Substitute Player is needed for 4T14eam-B.12 Plz write asap 2!Sub
  2124. mode %Gather.channel -N
  2125. notice %Gather.channel 4G14ather 3:sub is needed %Gather.channel 
  2126. .timer 1 1 mode %Gather.channel +N
  2127. .timerSubb-3 0 65 Sub-B-3
  2128. set %subsearching3 1
  2129. }
  2130. if ($2 == off) {
  2131. .timerSuba-3 off
  2132. .timerSubb-3 off
  2133. unset %Gather3.Sub
  2134. msg %Gather.channel 1 4G14ather 3: 2» 2A14ttention2: 12Substitute Player is NO MORE needed.
  2135. ssay3 Sub Searching Had Finished.
  2136. tsay3 Sub Searching Had Finished.
  2137. }
  2138. }
  2139. if ($1 == subSearch4) && (%gather4.Status == on) {
  2140. if ($2 == a) {
  2141. .timerSuba-4 off
  2142. .timerSubb-4 off
  2143. unset %gather4.Sub
  2144. Set %gather4.Sub A
  2145. .msg %Gather.channel 1 4G14ather 4:2» 2A14ttention2: 12Substitute Player is needed for 2T14eam-A.12 Plz write asap 2!Sub
  2146. mode %Gather.channel -N
  2147. .timer 1 1 notice %Gather.channel 4G14ather 4:sub is needed %Gather.channel 
  2148. .timer 1 2 mode %Gather.channel +N
  2149. .timerSuba-4 0 65 Sub-A-4
  2150. set %subsearching4 1
  2151. }
  2152. if ($2 == b) {
  2153. .timerSuba-4 off
  2154. .timerSubb-4 off
  2155. unset %gather4.Sub
  2156. Set %gather4.Sub B
  2157. .msg %Gather.channel 1 4G14ather 4:2» 2A14ttention2: 12Substitute Player is needed for 4T14eam-B.12 Plz write asap 2!Sub
  2158. mode %Gather.channel -N
  2159. .timer 1 1 notice %Gather.channel 4G14ather 4:sub is needed %Gather.channel 
  2160. .timer 1 2 mode %Gather.channel +N
  2161. .timerSubb-4 0 65 Sub-B-4
  2162. set %subsearching4 1
  2163. }
  2164. if ($2 == off) {
  2165. .timerSuba-4 off
  2166. .timerSubb-4 off
  2167. unset %gather4.Sub
  2168. msg %Gather.channel 1 4G14ather 4: 2» 2A14ttention2: 12Substitute Player is NO MORE needed.
  2169. ssay4 Sub Searching Had Finished.
  2170. tsay4 Sub Searching Had Finished.
  2171. }
  2172. }
  2173. if ($1 == Start) {
  2174. if (%Gather1.Status == OFF) {
  2175. .remove gatherbot/mvps.ini
  2176. var %userr $gettok(%gather1.user,1,32)
  2177. var %userrr $gettok(%gather1.user,2,32)
  2178. .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Last-gather $date $time
  2179. .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Gathers $calc($readini(Gatherbot/ [ $+ [ %userrr ] $+ ] .ini,%userr,Gathers) +1)
  2180. if (%userrr == admins) set %gather1.uadmin $readini(Gatherbot/admins.ini,%userr,servernick)
  2181. unset %Gather1.Score*
  2182. unset %Gather1.team*
  2183. unset %Gather1.live
  2184. inc %Gather1.num
  2185. set %Gather1.ScoreStatus off
  2186. unset %Gather1.first*
  2187. rcmd mp_logdetail 2
  2188. set %Gather1.half notyet
  2189. inc %Gather.num
  2190. set %Gather1.Status adding
  2191. set %rstart.flood1 1
  2192. mode %Gather.channel +m-N
  2193. set %Gather1.Admin $2
  2194. set %Gather1.Map $3
  2195. set %Gather1.Pass $4
  2196. set %Gather1.PassA $5
  2197. set %Gather1.PassB $6
  2198. if ($readini(Gatherbot\SSH-1.ini,SSH,SSH) == 1) { changepass-1 %Gather1.PassA %Gather1.PassB }
  2199. set %Gather1.Started $date $time
  2200. set %Gather1.Players $2
  2201. msg %gather.channel 2» 2A14ttention2: 12The2 $ord(%Gather.num) 12Gather (1) is on the way! 2A14dmin2: 02 $+ %Gather1.Admin $+ , 2D14ate2: 02 $+ %gather1.Started $+ , 2M14ap2: 02 $+ %Gather1.Map $+ 2. 12Type: "4!Add12" to Join the war.
  2202. mode %gather.channel -N+m
  2203. notice %gather.channel 2» 2A14ttention2: 12The2 $ord(%Gather.num) 12Gather (1) is on the way! 2A14dmin2: 02 $+ %Gather1.Admin $+ , 2D14ate2: 02 $+ %gather1.Started $+ , 2M14ap2: 02 $+ %Gather1.Map $+ 2. 12Type: "4!Add12" to join the war.
  2204. .timer 1 4 mode %Gather.Channel -m+N
  2205. rcmd sv_password %gather1.pass
  2206. rcmd admin_command admin_map %gather1.map
  2207. rcmd sv_password %gather1.pass
  2208. .timer 1 3 rcmd admin_command admin_execall disconnect
  2209. .timer 1 3 rcmd admin_command admin_execall disconnect
  2210. Halt
  2211. }
  2212. }
  2213. if ($1 == Start2) {
  2214. if (%Gather2.Status == OFF) {
  2215. .remove gatherbot/mvps2.ini
  2216. var %userr $gettok(%gather2.user,1,32)
  2217. var %userrr $gettok(%gather2.user,2,32)
  2218. .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Last-gather $date $time
  2219. .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Gathers $calc($readini(Gatherbot/ [ $+ [ %userrr ] $+ ] .ini,%userr,Gathers) +1)
  2220. if (%userrr == admins) set %gather2.uadmin $readini(Gatherbot/admins.ini,%userr,servernick)
  2221. unset %Gather2.Score*
  2222. unset %Gather2.team*
  2223. unset %Gather2.live
  2224. set %Gather2.ScoreStatus off
  2225. unset %Gather2.first*
  2226. rcmd2 mp_logdetail 2
  2227. set %Gather2.half notyet
  2228. inc %Gather.num
  2229. inc %Gather2.num
  2230. set %Gather2.Status adding
  2231. set %rstart.flood2 1
  2232. mode %Gather.channel +m-N
  2233. set %Gather2.Admin $2
  2234. set %Gather2.Map $3
  2235. set %Gather2.Pass $4
  2236. set %Gather2.Players $2
  2237. set %Gather2.PassA $5
  2238. set %Gather2.PassB $6
  2239. if ($readini(Gatherbot\SSH-2.ini,SSH,SSH) == 1) { changepass-2 %Gather2.PassA %Gather2.PassB }
  2240. set %Gather2.Started $date $time
  2241. msg %gather.channel 2» 2A14ttention2: 12The2 $ord(%Gather.num) 12Gather (2) is on the way! 2A14dmin2: 02 $+ %Gather2.Admin $+ , 2D14ate2: 02 $+ %gather2.Started $+ , 2M14ap2: 02 $+ %Gather2.Map $+ 2. 12Type: "4!Add12" to join the war.
  2242. mode %gather.channel -N+m
  2243. .notice %gather.channel 2» 2A14ttention2: 12The2 $ord(%Gather.num) 12Gather (2) is on the way! 2A14dmin2: 02 $+ %Gather2.Admin $+ , 2D14ate2: 02 $+ %gather2.Started $+ , 2M14ap2: 02 $+ %Gather2.Map $+ 2. 12Type: "4!Add12" to join the war.
  2244. .timer 1 4 mode %Gather.Channel -m+N
  2245. rcmd2 sv_password %gather2.pass
  2246. rcmd2 admin_command admin_map %gather2.map
  2247. rcmd2 sv_password %gather2.pass
  2248. .timer 1 3 rcmd2 admin_command admin_execall disconnect
  2249. .timer 1 3 rcmd2 admin_command admin_execall disconnect
  2250. Halt
  2251. }
  2252. }
  2253. if ($1 == Start3) {
  2254. if (%Gather3.Status == OFF) {
  2255. .remove gatherbot/mvps3.ini
  2256. var %userr $gettok(%gather3.user,1,32)
  2257. var %userrr $gettok(%gather3.user,2,32)
  2258. .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Last-gather $date $time
  2259. .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Gathers $calc($readini(Gatherbot/ [ $+ [ %userrr ] $+ ] .ini,%userr,Gathers) +1)
  2260. if (%userrr == admins) set %gather3.uadmin $readini(Gatherbot/admins.ini,%userr,servernick)
  2261. unset %Gather3.Score*
  2262. unset %Gather3.team*
  2263. unset %Gather3.live
  2264. set %Gather3.ScoreStatus off
  2265. inc %Gather3.num
  2266. unset %Gather3.first*
  2267. rcmd3 mp_logdetail 2
  2268. set %Gather3.half notyet
  2269. inc %Gather.num
  2270. set %Gather3.Status adding
  2271. set %rstart.flood3 1
  2272. mode %Gather.channel +m-N
  2273. set %Gather3.Admin $2
  2274. set %Gather3.Map $3
  2275. set %Gather3.Pass $4
  2276. set %Gather3.Players $2
  2277. set %Gather3.PassA $5
  2278. set %Gather3.PassB $6
  2279. if ($readini(Gatherbot\SSH-3.ini,SSH,SSH) == 1) { changepass-3 %Gather3.PassA %Gather3.PassB }
  2280. set %Gather3.Started $date $time
  2281. msg %gather.channel 2» 2A14ttention2: 12The2 $ord(%Gather.num) 12Gather (3) is on the way! 2A14dmin2: 02 $+ %Gather3.Admin $+ , 2D14ate2: 02 $+ %gather3.started $+ , 2M14ap2: 02 $+ %Gather3.Map $+ 2. 12Type: "4!Add12" to join the war.
  2282. mode %gather.channel -N+m
  2283. notice %gather.channel 2» 2A14ttention2: 12The2 $ord(%Gather.num) 12Gather is on the way! 2A14dmin2: 02 $+ %Gather3.Admin $+ , 2D14ate2: 02 $+ %gather3.started $+ , 2M14ap2: 02 $+ %Gather3.Map $+ 2. 12Type: "4!Add12" to join the war.
  2284. .timer 1 4 mode %Gather.Channel -m+N
  2285. rcmd3 sv_password %gather3.pass
  2286. rcmd3 admin_command admin_map %gather3.map
  2287. rcmd3 sv_password %gather3.pass
  2288. .timer 1 3 rcmd3 admin_command admin_execall disconnect
  2289. .timer 1 3 rcmd3 admin_command admin_execall disconnect
  2290. Halt
  2291. }
  2292. }
  2293. if ($1 == Stop1) {
  2294. if (%Gather1.status == adding) {
  2295. set %Gather1.Status OFF | .timerSuba-1 off | .timerSubb-1 off
  2296. unset %Gather1.Players
  2297. unset %Gather1.Subs
  2298. unset %Gather1.Map
  2299. unset %Gather1.Admin
  2300. unset %Gather1.Score*
  2301. unset %Gather1.First*
  2302. unset %Gather1.Live
  2303. unset %Gather1.Pas*
  2304. unset %Gather1.Started
  2305. rcmd sv_password $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
  2306. var %userr $gettok(%gather1.user,1,32)
  2307. var %userrr $gettok(%gather1.user,2,32)
  2308. .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Gathers $calc($readini(Gatherbot/ [ $+ [ %userrr ] $+ ] .ini,%userr,Gathers) -1)
  2309. unset %gather1.user
  2310. unset %gather1.uadmin
  2311. if (!$4) { msg %Gather.Channel 2» 2G14ather status 12: 12The $ord(%Gather1.num) 12Gather STOPED! and ready for next Gather2. | Halt }
  2312. elseif ($4) { msg %Gather.Channel $stl-1(Gather Number <12 $+ %Gather1.num $+ 14> Was Stopped By12 $2 14<Reason:12 $3- $+ 14>) | Halt }
  2313. }
  2314. }
  2315. if ($1 == Stop2) {
  2316. if (%Gather2.status == adding) {
  2317. set %Gather2.Status OFF | .timerSuba-2 off | .timerSubb-2 off
  2318. unset %Gather2.Subs
  2319. unset %Gather2.Players
  2320. unset %Gather2.Map
  2321. unset %Gather2.Score*
  2322. unset %Gather2.First*
  2323. unset %Gather2.Live
  2324. unset %Gather2.Admin
  2325. unset %Gather2.Pas*
  2326. unset %Gather2.Started
  2327. rcmd2 sv_password $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
  2328. var %userr $gettok(%gather2.user,1,32)
  2329. var %userrr $gettok(%gather2.user,2,32)
  2330. .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Gathers $calc($readini(Gatherbot/ [ $+ [ %userrr ] $+ ] .ini,%userr,Gathers) -1)
  2331. unset %gather2.user
  2332. unset %gather2.admin
  2333. if (!$4) { msg %Gather.Channel 2» 2G14ather status 22: 12The $ord(%Gather2.num) 12Gather STOPED! and ready for next Gather2. | Halt }
  2334. elseif ($4) { msg %Gather.Channel $stl-2(Gather2 Number <12 $+ %Gather2.num $+ 14> Was Stopped By12 $2 14<Reason:12 $3- $+ 14>) | Halt }
  2335. }
  2336. }
  2337. if ($1 == Stop3) {
  2338. if (%Gather3.status == adding) {
  2339. set %Gather3.Status OFF | .timerSuba-3 off | .timerSubb-3 off
  2340. unset %Gather3.Subs
  2341. unset %Gather3.Players
  2342. unset %Gather3.Map
  2343. unset %Gather3.Admin
  2344. unset %Gather3.Pas*
  2345. unset %Gather3.Started
  2346. unset %Gather3.Score*
  2347. unset %Gather3.First*
  2348. unset %Gather3.Live
  2349. rcmd3 sv_password $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
  2350. var %userr $gettok(%gather3.user,1,32)
  2351. var %userrr $gettok(%gather3.user,2,32)
  2352. .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Gathers $calc($readini(Gatherbot/ [ $+ [ %userrr ] $+ ] .ini,%userr,Gathers) -1)
  2353. unset %gather3.user
  2354. unset %gather3.uadmin
  2355. if (!$4) { msg %Gather.Channel 2» 2G14ather status 32: 12The $ord(%Gather3.num) 12Gather STOPED! and ready for next Gather2. | Halt }
  2356. elseif ($4) { msg %Gather.Channel $stl-3(Gather3 Number <12 $+ %Gather3.num $+ 14> Was Stopped By12 $2 14<Reason:12 $3- $+ 14>) | Halt }
  2357. }
  2358. }
  2359. if ($1 == End1) {
  2360. if (%Gather1.status == ON) {
  2361. .timerSuba-1 off
  2362. .timerSubb-1 off
  2363. .timer 1 2 Set-Ventclose
  2364. if (%Gather1.Live) && (%Gather1.Half !== first) && (%Gather1.Half !== notyet) { Setmvps-1 }
  2365. if (!$2) { msg %Gather.Channel $stl-1(1 2» 2G14ather1 status2: 12The2 $ord(%gather1.num) 12Gather finished and ready for next Gather2.) }
  2366. if ($2) { msg %Gather.Channel $stl-1(1 2» 2G14ather1 status2: 12The2 $ord(%gather1.num) 12Gather finished and ready for next Gather by $2- 2.) }
  2367. ssay Gather Number < $+ %Gather1.num $+ > Had Finished.
  2368. tsay Gather Number < $+ %Gather1.num $+ > Had Finished.
  2369. set %Gather1.Status OFF
  2370. set %Gather1.Last-Map %Gather1.Map
  2371. set %Gather1.Last-Admin %Gather1.Admin
  2372. set %Gather1.Last-Started %Gather1.started
  2373. unset %Gather1.Score*
  2374. unset %Gather1.First*
  2375. unset %Gather1.Live
  2376. .timer 1 1 unset %Gather1.Players
  2377. .timer 1 1 unset %Gather1.Team
  2378. .timer 1 1 unset %Gather1.Map
  2379. .timer 1 1 unset %Gather1.Admin
  2380. .timer 1 1 unset %Gather1.Pas*
  2381. .timer 1 1 unset %Gather1.Started
  2382. ssay Ready for the next Match.!
  2383. .timer 1 4 rcmd admin_command admin_execall disconnect
  2384. .timer 1 4 rcmd admin_command admin_execall disconnect
  2385. rcmd sv_password $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
  2386. unset %Gather1.Subs
  2387. Halt
  2388. .timerSuba-1 off
  2389. .timerSubb-1 off
  2390. unset %Gather1.Sub
  2391. unset %gather1.uadmin
  2392. }
  2393. }
  2394. if ($1 == End2) {
  2395. if (%Gather2.status == ON) {
  2396. .timerSuba-2 off
  2397. .timerSubb-2 off
  2398. .timer 1 2 Set-Ventclose2
  2399. if (%Gather2.Live) && (%Gather2.Half !== first) && (%Gather2.Half !== notyet) { Setmvps-2 }
  2400. if (!$2) { msg %Gather.Channel $stl-2(1 2» 2G14ather2 status2: 12The2 $ord(%gather2.num) 12Gather finished and ready for next Gather2.) }
  2401. if ($2) { msg %Gather.Channel $stl-2(1 2» 2G14ather2 status2: 12The2 $ord(%gather2.num) 12Gather finished and ready for next Gather by $2- 2.) }
  2402. ssay2 Gather Number <12 $+ %Gather2.num $+ 14> Had Finished.
  2403. tsay2 Gather Number <12 $+ %Gather2.num $+ 14> Had Finished.
  2404. set %Gather2.Status OFF
  2405. set %Gather2.Last-Map %Gather2.Map
  2406. set %Gather2.Last-Admin %Gather2.Admin
  2407. set %Gather2.Last-Started %Gather2.started
  2408. unset %Gather2.Score*
  2409. unset %Gather2.First*
  2410. unset %Gather2.Live
  2411. .timer 1 1 unset %Gather2.Players
  2412. .timer 1 1 unset %Gather2.Team
  2413. .timer 1 1 unset %Gather2.Map
  2414. .timer 1 1 unset %Gather2.Admin
  2415. .timer 1 1 unset %Gather2.Pas*
  2416. .timer 1 1 unset %Gather2.Started
  2417. ssay2 Ready for the next Match.!
  2418. .timer 1 4 rcmd2 admin_command admin_execall disconnect
  2419. .timer 1 4 rcmd2 admin_command admin_execall disconnect
  2420. rcmd2 sv_password $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
  2421. unset %Gather2.Subs
  2422. Halt
  2423. .timerSuba-2 off
  2424. .timerSubb-2 off
  2425. unset %Gather2.Sub
  2426. unset %gather2.admin
  2427. }
  2428. }
  2429. if ($1 == End3) {
  2430. if (%Gather3.status == ON) {
  2431. .timerSuba-3 off
  2432. .timerSubb-3 off
  2433. .timer 1 2 Set-Ventclose3
  2434. if (%Gather3.Live) && (%Gather3.Half !== first) && (%Gather3.Half !== notyet) { Setmvps-3 }
  2435. if (!$2) { msg %Gather.Channel $stl-3(1 2» 2G14ather3 status2: 12The2 $ord(%gather3.num) 12Gather finished and ready for next Gather2.) }
  2436. if ($2) { msg %Gather.Channel $stl-3(1 2» 2G14ather3 status2: 12The2 $ord(%gather3.num) 12Gather finished and ready for next Gather by $2- 2.) }
  2437. ssay3 Gather Number <12 $+ %Gather3.num $+ 14> Had Finished.
  2438. tsay3 Gather Number <12 $+ %Gather3.num $+ 14> Had Finished.
  2439. set %Gather3.Status OFF
  2440. set %Gather3.Last-Map %Gather3.Map
  2441. set %Gather3.Last-Admin %Gather3.Admin
  2442. set %Gather3.Last-Started %Gather3.started
  2443. unset %Gather3.Score*
  2444. unset %Gather3.First*
  2445. unset %Gather3.Live
  2446. .timer 1 1 unset %Gather3.Players
  2447. .timer 1 1 unset %Gather3.Team
  2448. .timer 1 1 unset %Gather3.Map
  2449. .timer 1 1 unset %Gather3.Admin
  2450. .timer 1 1 unset %Gather3.Pas*
  2451. .timer 1 1 unset %Gather3.Started
  2452. ssay3 Ready for the next Match.!
  2453. .timer 1 4 //rcmd3 admin_command admin_execall disconnect
  2454. .timer 1 4 //rcmd3 admin_command admin_execall disconnect
  2455. rcmd3 sv_password $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
  2456. unset %Gather3.Subs
  2457. Halt
  2458. .timerSuba-3 off
  2459. .timerSubb-3 off
  2460. unset %Gather3.Sub
  2461. unset %gather3.uadmin
  2462. }
  2463. }
  2464. }
  2465. alias mixteams1 {
  2466. set %a.x 1
  2467. var %a.p $2-
  2468.  
  2469. while (%a.x <= 9) {
  2470. set %a.num $gettok(%a.p,0,32)
  2471. set %a.y $rand(1,%a.num)
  2472. set %a.rndpl %a.rndpl $gettok(%a.p,%a.y,32)
  2473. set %a.p $deltok(%a.p,%a.y,32)
  2474. inc %a.x
  2475. }
  2476. set %Gather1.Team-A $1 $gettok(%a.rndpl,1-4,32)
  2477. set %Gather1.Team-B $gettok(%a.rndpl,5-,32)
  2478. set %gather1.players %Gather1.Team-A %Gather1.Team-B
  2479. unset %a.*
  2480. }
  2481.  
  2482. alias mixteams2 {
  2483. set %a.x 1
  2484. var %a.p $2-
  2485.  
  2486. while (%a.x <= 9) {
  2487. set %a.num $gettok(%a.p,0,32)
  2488. set %a.y $rand(1,%a.num)
  2489. set %a.rndpl %a.rndpl $gettok(%a.p,%a.y,32)
  2490. set %a.p $deltok(%a.p,%a.y,32)
  2491. inc %a.x
  2492. }
  2493. set %Gather2.Team-A $1 $gettok(%a.rndpl,1-4,32)
  2494. set %Gather2.Team-B $gettok(%a.rndpl,5-,32)
  2495. set %gather2.players %Gather2.Team-A %Gather2.Team-B
  2496. unset %a.*
  2497. }
  2498.  
  2499. alias mixteams3 {
  2500. set %a.x 1
  2501. var %a.p $2-
  2502.  
  2503. while (%a.x <= 9) {
  2504. set %a.num $gettok(%a.p,0,32)
  2505. set %a.y $rand(1,%a.num)
  2506. set %a.rndpl %a.rndpl $gettok(%a.p,%a.y,32)
  2507. set %a.p $deltok(%a.p,%a.y,32)
  2508. inc %a.x
  2509. }
  2510. set %Gather3.Team-A $1 $gettok(%a.rndpl,1-4,32)
  2511. set %Gather3.Team-B $gettok(%a.rndpl,5-,32)
  2512. set %gather3.players %Gather3.Team-A %Gather3.Team-B
  2513. unset %a.*
  2514. }
  2515.  
  2516. alias teams1 {
  2517. if (%Gather1.Status == ON) {
  2518. msg %Gather.Channel 2» 2A14ttention2: 12All teams are full. Gather starts and teams are mixed. 2T14eam A2: 2[.2 %Gather1.Team-A 2.] 2T14eam B2: [.2 %Gather1.Team-B 2.]
  2519. }
  2520. }
  2521. alias fteams1 {
  2522. if (%Gather1.Status == ON) {
  2523. msg %gather.channel 4G14ather 1: 2T14eam A2: 2[.12 %Gather1.Team-A 2.] 2T14eam B2: [.12 %Gather1.Team-B 2.] $iif(%Gather1.subs,2S14ubs2: [.12 %Gather1.subs 2.])
  2524. }
  2525. }
  2526. alias teams2 {
  2527. if (%Gather2.Status == ON) {
  2528. msg %Gather.Channel 2» 2A14ttention2: 12All teams are full. Gather starts and teams are mixed. 2T14eam A2: 2[.2 %Gather2.Team-A 2.] 2T14eam B2: [.2 %Gather2.Team-B 2.]
  2529. }
  2530. }
  2531. alias fteams2 {
  2532. if (%Gather2.Status == ON) {
  2533. msg %gather.channel 4G14ather 2: 2T14eam A2: 2[.12 %Gather2.Team-A 2.] 2T14eam B2: [.12 %Gather2.Team-B 2.] $iif(%Gather2.subs,2S14ubs2: [.12 %Gather2.subs 2.])
  2534. }
  2535. }
  2536. alias teams3 {
  2537. if (%Gather3.Status == ON) {
  2538. msg %Gather.Channel 2» 2A14ttention2: 12All teams are full. Gather starts and teams are mixed. 2T14eam A2: 2[.2 %Gather3.Team-A 2.] 2T14eam B2: [.2 %Gather3.Team-B 2.]
  2539. }
  2540. }
  2541. alias fteams3 {
  2542. if (%Gather3.Status == ON) {
  2543. msg %gather.channel 4G14ather 3: 2T14eam A2: 2[.12 %Gather3.Team-A 2.] 2T14eam B2: [.12 %Gather3.Team-B 2.] $iif(%Gather3.subs,2S14ubs2: [.12 %Gather3.subs 2.])
  2544. }
  2545. }
  2546.  
  2547. alias send1 {
  2548. msg $replace(%Gather1.Team-A,$chr(32),$chr(44)) $details(1).A
  2549. .timer 1 10 msg $replace(%Gather1.Team-B,$chr(32),$chr(44)) $details(1).B
  2550. }
  2551. alias send2 {
  2552. msg $replace(%Gather2.Team-A,$chr(32),$chr(44)) $details(2).A
  2553. .timer 1 10 msg $replace(%Gather2.Team-B,$chr(32),$chr(44)) $details(2).B
  2554. }
  2555. alias send3 {
  2556. msg $replace(%Gather3.Team-A,$chr(32),$chr(44)) $details(3).A
  2557. .timer 1 10 msg $replace(%Gather3.Team-B,$chr(32),$chr(44)) $details(3).B
  2558. }
  2559.  
  2560.  
  2561. alias top {
  2562. if ($1 == admins) {
  2563. var %s = $gettok($2,1,$asc(!))
  2564. .close -@ @top-admins
  2565. .window -h @top-admins
  2566. var %x = $ini(Gatherbot/admins.ini,0)
  2567. if ($ini(Gatherbot/admins.ini,0) == 0) { msg %Gather.channel $stl($getini(no-admins).msg) | set -u4 %Gather.flood ON No-top-admins | halt }
  2568. var %z = %x
  2569. while (%x) {
  2570. echo @top-admins $ini(Gatherbot/admins.ini,%x) $readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),Gathers)
  2571. dec %x
  2572. }
  2573. //filter -cwwteu 2 32 @top-admins @top-admins
  2574. var %o = 1
  2575. if ($ini(Gatherbot/admins.ini,0) < 5) { var %z = $ini(Gatherbot/admins.ini,0) }
  2576. elseif ($ini(Gatherbot/admins.ini,0) >= 5) { var %z = 5 }
  2577. set -u20 %Gather.Flood ON Top-admins
  2578. while (%z) {
  2579. var %user = $gettok($line(@top-admins,%o),1,32)
  2580. msg %Gather.channel 2» $+ %o $+ «12 %user 14With12 $Gathers(%user) 14Gathers
  2581. inc %o
  2582. dec %z
  2583. }
  2584. }
  2585. if ($1 == 10) {
  2586. var %s = $gettok($2,1,$asc(!))
  2587. .close -@ @Tops
  2588. .window -h @Tops
  2589. var %x = $ini(Gatherbot/stats.ini,0)
  2590. if ($ini(Gatherbot/stats.ini,0) == 0) { msg %Gather.channel $stl($no-rank) | set -u4 %Gather.flood ON No-stats | halt }
  2591. var %z = %x
  2592. while (%x) {
  2593. echo @Tops $ini(Gatherbot/stats.ini,%x) $readini(Gatherbot/stats.ini,$ini(Gatherbot/stats.ini,%x),score)
  2594. dec %x
  2595. }
  2596. //filter -cwwteu 2 32 @Tops @Tops
  2597. var %o = 1
  2598. if ($ini(Gatherbot/stats.ini,0) < 5) { var %z = $ini(Gatherbot/stats.ini,0) }
  2599. elseif ($ini(Gatherbot/stats.ini,0) >= 5) { var %z = 10 }
  2600. var %temp
  2601. set -u18 %Gather.Flood ON Top-10
  2602. while (%z) {
  2603. var %temp = %temp 2» $+ %o $+ «12 $gettok($line(@Tops,%o),1,32) 1(14 $+ $stats($gettok($line(@Tops,%o),1,32)).score $+ 1)
  2604. if (%o == 5) { msg %Gather.channel %temp | var %temp }
  2605. inc %o
  2606. dec %z
  2607. }
  2608. if (%temp) { .timer 1 1 msg %Gather.channel %temp }
  2609. }
  2610. if ($1 == gunplayer) {
  2611. var %s = $gettok($2,1,$asc(!))
  2612. .close -@ @T
  2613. .window -h @T
  2614. var %x = $ini(Gatherbot/stats.ini,$2,0)
  2615. if ($ini(Gatherbot/stats.ini,$2,0) == 3) { msg %Gather.channel $stl($no-rank) | set -u4 %Gather.flood ON No-stats | halt }
  2616. var %z = %x
  2617. var %guns? = 0
  2618. while (%x) {
  2619. if ($ini(Gatherbot/stats.ini,$2,%x) !== nick) && ($ini(Gatherbot/stats.ini,$2,%x) !== mvp) && ($ini(Gatherbot/stats.ini,$2,%x) !== mvps) && ($ini(Gatherbot/stats.ini,$2,%x) !== deaths) && ($ini(Gatherbot/stats.ini,$2,%x) !== suicided) && ($ini(Gatherbot/stats.ini,$2,%x) !== kills) && ($ini(Gatherbot/stats.ini,$2,%x) !== score) { echo @T $ini(Gatherbot/stats.ini,$2,%x) $readini(Gatherbot/stats.ini,$2,$ini(Gatherbot/stats.ini,$2,%x)) | inc %guns? }
  2620. dec %x
  2621. }
  2622. //filter -cwwteu 2 32 @T @T
  2623. var %o = 1
  2624. if (%guns? < 3) { var %z = %guns? }
  2625. elseif (%guns? >= 3) { var %z = 3 }
  2626. set -u20 %Gather.Flood ON Top
  2627. var %guns
  2628. while (%z) {
  2629. var %g = $gettok($line(@T,%o),1,32)
  2630. var %kills = $gettok($line(@T,%o),2,32)
  2631. var %guns = %guns $ord(%o) $+ (12 $+ %g 14- %kills 14Kills $+ 2)
  2632. inc %o
  2633. dec %z
  2634. }
  2635. msg %Gather.channel 2» T14op-Gunz of  $+ $2 $+ 2:2 %guns
  2636. }
  2637. if ($1 == players) {
  2638. var %s = $gettok($2,1,$asc(!))
  2639. .close -@ @Tops
  2640. .window -h @Tops
  2641. var %x = $ini(Gatherbot/stats.ini,0)
  2642. if ($ini(Gatherbot/stats.ini,0) == 0) { msg %Gather.channel $stl($no-rank) | set -u4 %Gather.flood ON No-stats | halt }
  2643. var %z = %x
  2644. while (%x) {
  2645. echo @Tops $ini(Gatherbot/stats.ini,%x) $readini(Gatherbot/stats.ini,$ini(Gatherbot/stats.ini,%x),Score)
  2646. dec %x
  2647. }
  2648. //filter -cwwteu 2 32 @Tops @Tops
  2649. var %o = 1
  2650. if ($ini(Gatherbot/stats.ini,0) < 5) { var %z = $ini(Gatherbot/stats.ini,0) }
  2651. elseif ($ini(Gatherbot/stats.ini,0) >= 5) { var %z = 5 }
  2652. set -u20 %Gather.Flood ON Top-Players
  2653. while (%z) {
  2654. var %user = $gettok($line(@Tops,%o),1,32)
  2655. msg %Gather.channel 2» $+ %o $+ «12 %user 14With12 $stats(%user).score 14Points.
  2656. inc %o
  2657. dec %z
  2658. }
  2659. }
  2660. if ($1 == mvps) {
  2661. var %s = $gettok($2,1,$asc(!))
  2662. .close -@ @Tops
  2663. .window -h @Tops
  2664. var %x = $ini(Gatherbot/stats.ini,0)
  2665. if ($ini(Gatherbot/stats.ini,0) == 0) { msg %Gather.channel $stl($no-rank) | set -u4 %Gather.flood ON No-stats | halt }
  2666. var %z = %x
  2667. while (%x) {
  2668. echo @Tops $ini(Gatherbot/stats.ini,%x) $readini(Gatherbot/stats.ini,$ini(Gatherbot/stats.ini,%x),mvps)
  2669. dec %x
  2670. }
  2671. //filter -cwwteu 2 32 @Tops @Tops
  2672. var %o = 1
  2673. if ($ini(Gatherbot/stats.ini,0) < 5) { var %z = $ini(Gatherbot/stats.ini,0) }
  2674. elseif ($ini(Gatherbot/stats.ini,0) >= 5) { var %z = 5 }
  2675. set -u20 %Gather.Flood ON Top-Players
  2676. while (%z) {
  2677. var %user = $gettok($line(@Tops,%o),1,32)
  2678. msg %Gather.channel 2» $+ %o $+ «12 %user 14With12 $stats(%user).mvps 14Mvps.
  2679. inc %o
  2680. dec %z
  2681. }
  2682. }
  2683. if ($1 == Aces) {
  2684. var %s = $gettok($2,1,$asc(!))
  2685. .close -@ @Tops
  2686. .window -h @Tops
  2687. var %x = $ini(Gatherbot/stats.ini,0)
  2688. if ($ini(Gatherbot/stats.ini,0) == 0) { msg %Gather.channel $stl($no-rank) | set -u4 %Gather.flood ON No-stats | halt }
  2689. var %z = %x
  2690. while (%x) {
  2691. echo @Tops $ini(Gatherbot/stats.ini,%x) $readini(Gatherbot/stats.ini,$ini(Gatherbot/stats.ini,%x),Aces)
  2692. dec %x
  2693. }
  2694. //filter -cwwteu 2 32 @Tops @Tops
  2695. var %o = 1
  2696. if ($ini(Gatherbot/stats.ini,0) < 5) { var %z = $ini(Gatherbot/stats.ini,0) }
  2697. elseif ($ini(Gatherbot/stats.ini,0) >= 5) { var %z = 5 }
  2698. set -u20 %Gather.Flood ON Top-Players
  2699. while (%z) {
  2700. var %user = $gettok($line(@Tops,%o),1,32)
  2701. msg %Gather.channel 2» $+ %o $+ «12 %user 14With12 $stats(%user).Aces 14Aces.
  2702. inc %o
  2703. dec %z
  2704. }
  2705. }
  2706. }
  2707. alias lol {
  2708. window @T
  2709. var %x = $ini(Gatherbot/stats.ini,$1,0)
  2710. if ($ini(Gatherbot/stats.ini,$1,0) == 0) { msg %Gather.channel $stl($no-rank) | set -u4 %Gather.flood ON No-stats | halt }
  2711. var %z = %x
  2712. var %guns? = 0
  2713. while (%x) {
  2714. if ($ini(Gatherbot/stats.ini,$1,%x) !== nick) && ($ini(Gatherbot/stats.ini,$1,%x) !== deaths) && ($ini(Gatherbot/stats.ini,$1,%x) !== kills) && ($ini(Gatherbot/stats.ini,$1,%x) !== score) { echo @T $ini(Gatherbot/stats.ini,$1,%x) - $readini(Gatherbot/stats.ini,$1,$ini(Gatherbot/stats.ini,$1,%x)) | inc %guns? }
  2715. dec %x
  2716. }
  2717. //filter -cwwteu 2 32 @T @T
  2718. var %o = 1
  2719. if (%guns? < 5) { var %z = %guns? }
  2720. elseif (%guns? >= 5) { var %z = 5 }
  2721. set -u20 %Gather.Flood ON Top
  2722. while (%z) {
  2723. var %user = $line(@T,%o)
  2724. echo -s %user
  2725. inc %o
  2726. dec %z
  2727. }
  2728. }
  2729.  
  2730. alias no-rank { return 12There is not ranking yet.1 }
  2731. alias rank {
  2732. var %z = $ini(Gatherbot/stats.ini,0)
  2733. var %o = %z
  2734. var %s = $calc($readini(Gatherbot/stats.ini,$1,score) + 0)
  2735. var %l = 0
  2736. while (%o) {
  2737. if ($ini(Gatherbot/stats.ini,%o) == $1) goto SKIP
  2738. if (%s > $readini(Gatherbot/stats.ini,$ini(Gatherbot/stats.ini,%o),score)) inc %l
  2739. :SKIP
  2740. dec %o
  2741. }
  2742. return $calc(%z - %l )
  2743. }
  2744. alias rank2 {
  2745. var %x = 1
  2746. var %rank = 0
  2747. var %points = $calc($readini(Gatherbot/stats.ini,$1,Score) +0)
  2748. while ($ini(Gatherbot/stats.ini,%x)) {
  2749. if ($ini(Gatherbot/stats.ini,%x) == $1) { GOTO GO }
  2750. elseif (%points > $calc($readini(Gatherbot/stats.ini,$ini(Stats.ini,%x),Score) +0)) { inc %rank }
  2751. :GO
  2752. inc %x
  2753. }
  2754. return $calc($ini(Gatherbot/stats.ini,0) - %rank)
  2755. }
  2756. alias stats {
  2757. if (STEAM_*:*:* !iswm $1) && ($1) {
  2758. var %rcon.steam = $null
  2759. var %x = $ini(Gatherbot\stats.ini,0)
  2760. var %? = $1-
  2761. while (%x) {
  2762. if (%? iswm $ini(Gatherbot\stats.ini,%x)) { var %rcon.steam = $ini(Gatherbot\stats.ini,%x) | break }
  2763. dec %x
  2764. }
  2765. }
  2766. else var %rcon.steam $1
  2767. if ($prop == exist3) || ($prop == exists3) {
  2768. if (%rcon.steam == $null) return $false
  2769. else return $true
  2770. }
  2771. if ($prop == exist) || ($prop == exists) || ($prop == exist2) || ($prop == exists2) {
  2772. if (!$readini(Gatherbot\Stats.ini,%rcon.steam,Nick)) return $false
  2773. else return $true
  2774. }
  2775. if ($prop == steam) return %rcon.steam
  2776. if (%rcon.steam == $null) goto END
  2777. if ($prop !== gathers) && ( ($prop == kills) || ($prop == aces) || ($prop == tks) || ($prop == mvps) || ($prop == deaths) || ($istok(AK47 M4A1 Famas Galil AWP MP5navy Deagle Usp Glock18 HeGrenade Aug SG552 MAC10 P90 TMP UMP45 G3sg1 M3 XM1014 Elite FiveSeven P228 Scout SG550 M249 Knife,$prop,32)) || ($prop == defuses) || ($prop == mp5navy) || ($prop == mvp) || ($prop == plants) || ($prop == score) || ($prop == usp) || ($prop == grenade) || ($prop == ak47) || ($prop == m4a1) || ($prop == glock18) || ($prop == deagle) || ($prop == knife) || ($prop == famas) ) {
  2778. if ($readini(Gatherbot\stats.ini,%rcon.steam,$prop)) { return $readini(Gatherbot\stats.ini,%rcon.steam,$prop) }
  2779. if (!$readini(Gatherbot\stats.ini,%rcon.steam,$prop)) { return 0 }
  2780. }
  2781. if ($prop == gathers) {
  2782. if ($readini(Gatherbot\stats.ini,%rcon.steam,gathers) == 0) { return 0 }
  2783. if ($readini(Gatherbot\stats.ini,%rcon.steam,gathers) > 0) { return $readini(Gatherbot\stats.ini,%rcon.steam,gathers) }
  2784. }
  2785. if ($prop == nick) return %rcon.steam
  2786. :END
  2787. }
  2788.  
  2789. alias score1 {
  2790. if ($1- == notlive) { return Match is not live yet }
  2791. if ($1- == a) {
  2792. if (%Gather1.half == notyet) { return NotSet }
  2793. if (%Gather1.live == A-B) || (%Gather1.live == B-A) {
  2794. if (%Gather1.live == A-B) && (%Gather1.half == first) { return %Gather1.score-CT }
  2795. if (%Gather1.live == B-A) && (%Gather1.half == first) { return %Gather1.score-T }
  2796. if (%Gather1.live == A-B) && (%Gather1.half == first-second) { return %Gather1.firstA }
  2797. if (%Gather1.live == B-A) && (%Gather1.half == first-second) { return %Gather1.firstA }
  2798. if (%Gather1.live == A-B) && (%Gather1.half == second) { return $calc(%Gather1.score-T + %Gather1.firstA) }
  2799. if (%Gather1.live == B-A) && (%Gather1.half == second) { return $calc(%Gather1.score-CT + %Gather1.firstA) }
  2800. }
  2801. }
  2802. if ($1- == anow) {
  2803. if (%Gather1.half == notyet) { return NotSet }
  2804. if (%Gather1.live == A-B) || (%Gather1.live == B-A) {
  2805. if (%Gather1.live == A-B) && (%Gather1.half == first) { return %Gather1.score-CT }
  2806. if (%Gather1.live == B-A) && (%Gather1.half == first) { return %Gather1.score-T }
  2807. if (%Gather1.live == A-B) && (%Gather1.half == first-second) { return %Gather1.firstA }
  2808. if (%Gather1.live == B-A) && (%Gather1.half == first-second) { return %Gather1.firstA }
  2809. if (%Gather1.live == A-B) && (%Gather1.half == second) { return %Gather1.score-T }
  2810. if (%Gather1.live == B-A) && (%Gather1.half == second) { return %Gather1.score-CT }
  2811. }
  2812. }
  2813. if ($1- == b) {
  2814. if (%Gather1.half == notyet) { return NotSet }
  2815. if (%Gather1.live == A-B) || (%Gather1.live == B-A) {
  2816. if (%Gather1.live == A-B) && (%Gather1.half == first) { return %Gather1.score-T }
  2817. if (%Gather1.live == B-A) && (%Gather1.half == first) { return %Gather1.score-CT }
  2818. if (%Gather1.live == A-B) && (%Gather1.half == first-second) { return %Gather1.firstB }
  2819. if (%Gather1.live == B-A) && (%Gather1.half == first-second) { return %Gather1.firstB }
  2820. if (%Gather1.live == A-B) && (%Gather1.half == second) { return $calc(%Gather1.score-CT + %Gather1.firstB) }
  2821. if (%Gather1.live == B-A) && (%Gather1.half == second) { return $calc(%Gather1.score-T + %Gather1.firstB) }
  2822. }
  2823. }
  2824. if ($1- == bnow) {
  2825. if (%Gather1.half == notyet) { return NotSet }
  2826. if (%Gather1.live == A-B) || (%Gather1.live == B-A) {
  2827. if (%Gather1.live == A-B) && (%Gather1.half == first) { return %Gather1.score-T }
  2828. if (%Gather1.live == B-A) && (%Gather1.half == first) { return %Gather1.score-CT }
  2829. if (%Gather1.live == A-B) && (%Gather1.half == first-second) { return %Gather1.firstB }
  2830. if (%Gather1.live == B-A) && (%Gather1.half == first-second) { return %Gather1.firstB }
  2831. if (%Gather1.live == A-B) && (%Gather1.half == second) { return %Gather1.score-CT }
  2832. if (%Gather1.live == B-A) && (%Gather1.half == second) { return %Gather1.score-T }
  2833. }
  2834. }
  2835. if ($1 == half) {
  2836. if (%Gather1.half == notyet) { return NotSet }
  2837. if (%Gather1.live == A-B) || (%Gather1.live == B-A) {
  2838. if (%Gather1.half == first) && ($calc(%Gather1.score-CT + %Gather1.score-T) == 14) { return 1st half }
  2839. if (%Gather1.half == first) && ($calc(%Gather1.score-CT + %Gather1.score-T) !== 14) { return 1st half }
  2840. if (%Gather1.half == first-second) { return 2nd half }
  2841. if (%Gather1.half == second) { return 2nd half }
  2842. }
  2843. }
  2844. }
  2845.  
  2846.  
  2847.  
  2848. alias score2 {
  2849. if ($1- == notlive) { return Match is not live yet }
  2850. if ($1- == a) {
  2851. if (%Gather2.half == notyet) { return NotSet }
  2852. if (%Gather2.live == A-B) || (%Gather2.live == B-A) {
  2853. if (%Gather2.live == A-B) && (%Gather2.half == first) { return %Gather2.score-CT }
  2854. if (%Gather2.live == B-A) && (%Gather2.half == first) { return %Gather2.score-T }
  2855. if (%Gather2.live == A-B) && (%Gather2.half == first-second) { return %Gather2.firstA }
  2856. if (%Gather2.live == B-A) && (%Gather2.half == first-second) { return %Gather2.firstA }
  2857. if (%Gather2.live == A-B) && (%Gather2.half == second) { return $calc(%Gather2.score-T + %Gather2.firstA) }
  2858. if (%Gather2.live == B-A) && (%Gather2.half == second) { return $calc(%Gather2.score-CT + %Gather2.firstA) }
  2859. }
  2860. }
  2861. if ($1- == anow) {
  2862. if (%Gather2.half == notyet) { return NotSet }
  2863. if (%Gather2.live == A-B) || (%Gather2.live == B-A) {
  2864. if (%Gather2.live == A-B) && (%Gather2.half == first) { return %Gather2.score-CT }
  2865. if (%Gather2.live == B-A) && (%Gather2.half == first) { return %Gather2.score-T }
  2866. if (%Gather2.live == A-B) && (%Gather2.half == first-second) { return %Gather2.firstA }
  2867. if (%Gather2.live == B-A) && (%Gather2.half == first-second) { return %Gather2.firstA }
  2868. if (%Gather2.live == A-B) && (%Gather2.half == second) { return %Gather2.score-T }
  2869. if (%Gather2.live == B-A) && (%Gather2.half == second) { return %Gather2.score-CT }
  2870. }
  2871. }
  2872. if ($1- == b) {
  2873. if (%Gather2.half == notyet) { return NotSet }
  2874. if (%Gather2.live == A-B) || (%Gather2.live == B-A) {
  2875. if (%Gather2.live == A-B) && (%Gather2.half == first) { return %Gather2.score-T }
  2876. if (%Gather2.live == B-A) && (%Gather2.half == first) { return %Gather2.score-CT }
  2877. if (%Gather2.live == A-B) && (%Gather2.half == first-second) { return %Gather2.firstB }
  2878. if (%Gather2.live == B-A) && (%Gather2.half == first-second) { return %Gather2.firstB }
  2879. if (%Gather2.live == A-B) && (%Gather2.half == second) { return $calc(%Gather2.score-CT + %Gather2.firstB) }
  2880. if (%Gather2.live == B-A) && (%Gather2.half == second) { return $calc(%Gather2.score-T + %Gather2.firstB) }
  2881. }
  2882. }
  2883. if ($1- == bnow) {
  2884. if (%Gather2.half == notyet) { return NotSet }
  2885. if (%Gather2.live == A-B) || (%Gather2.live == B-A) {
  2886. if (%Gather2.live == A-B) && (%Gather2.half == first) { return %Gather2.score-T }
  2887. if (%Gather2.live == B-A) && (%Gather2.half == first) { return %Gather2.score-CT }
  2888. if (%Gather2.live == A-B) && (%Gather2.half == first-second) { return %Gather2.firstB }
  2889. if (%Gather2.live == B-A) && (%Gather2.half == first-second) { return %Gather2.firstB }
  2890. if (%Gather2.live == A-B) && (%Gather2.half == second) { return %Gather2.score-CT }
  2891. if (%Gather2.live == B-A) && (%Gather2.half == second) { return %Gather2.score-T }
  2892. }
  2893. }
  2894. if ($1 == half) {
  2895. if (%Gather2.half == notyet) { return NotSet }
  2896. if (%Gather2.live == A-B) || (%Gather2.live == B-A) {
  2897. if (%Gather2.half == first) && ($calc(%Gather2.score-CT + %Gather2.score-T) == 14) { return 1st half }
  2898. if (%Gather2.half == first) && ($calc(%Gather2.score-CT + %Gather2.score-T) !== 14) { return 1st half }
  2899. if (%Gather2.half == first-second) { return 2nd half }
  2900. if (%Gather2.half == second) { return 2nd half }
  2901. }
  2902. }
  2903. }
  2904.  
  2905. alias score3 {
  2906. if ($1- == notlive) { return Match is not live yet }
  2907. if ($1- == a) {
  2908. if (%Gather3.half == notyet) { return NotSet }
  2909. if (%Gather3.live == A-B) || (%Gather3.live == B-A) {
  2910. if (%Gather3.live == A-B) && (%Gather3.half == first) { return %Gather3.score-CT }
  2911. if (%Gather3.live == B-A) && (%Gather3.half == first) { return %Gather3.score-T }
  2912. if (%Gather3.live == A-B) && (%Gather3.half == first-second) { return %Gather3.firstA }
  2913. if (%Gather3.live == B-A) && (%Gather3.half == first-second) { return %Gather3.firstA }
  2914. if (%Gather3.live == A-B) && (%Gather3.half == second) { return $calc(%Gather3.score-T + %Gather3.firstA) }
  2915. if (%Gather3.live == B-A) && (%Gather3.half == second) { return $calc(%Gather3.score-CT + %Gather3.firstA) }
  2916. }
  2917. }
  2918. if ($1- == anow) {
  2919. if (%Gather3.half == notyet) { return NotSet }
  2920. if (%Gather3.live == A-B) || (%Gather3.live == B-A) {
  2921. if (%Gather3.live == A-B) && (%Gather3.half == first) { return %Gather3.score-CT }
  2922. if (%Gather3.live == B-A) && (%Gather3.half == first) { return %Gather3.score-T }
  2923. if (%Gather3.live == A-B) && (%Gather3.half == first-second) { return %Gather3.firstA }
  2924. if (%Gather3.live == B-A) && (%Gather3.half == first-second) { return %Gather3.firstA }
  2925. if (%Gather3.live == A-B) && (%Gather3.half == second) { return %Gather3.score-T }
  2926. if (%Gather3.live == B-A) && (%Gather3.half == second) { return %Gather3.score-CT }
  2927. }
  2928. }
  2929. if ($1- == b) {
  2930. if (%Gather3.half == notyet) { return NotSet }
  2931. if (%Gather3.live == A-B) || (%Gather3.live == B-A) {
  2932. if (%Gather3.live == A-B) && (%Gather3.half == first) { return %Gather3.score-T }
  2933. if (%Gather3.live == B-A) && (%Gather3.half == first) { return %Gather3.score-CT }
  2934. if (%Gather3.live == A-B) && (%Gather3.half == first-second) { return %Gather3.firstB }
  2935. if (%Gather3.live == B-A) && (%Gather3.half == first-second) { return %Gather3.firstB }
  2936. if (%Gather3.live == A-B) && (%Gather3.half == second) { return $calc(%Gather3.score-CT + %Gather3.firstB) }
  2937. if (%Gather3.live == B-A) && (%Gather3.half == second) { return $calc(%Gather3.score-T + %Gather3.firstB) }
  2938. }
  2939. }
  2940. if ($1- == bnow) {
  2941. if (%Gather3.half == notyet) { return NotSet }
  2942. if (%Gather3.live == A-B) || (%Gather3.live == B-A) {
  2943. if (%Gather3.live == A-B) && (%Gather3.half == first) { return %Gather3.score-T }
  2944. if (%Gather3.live == B-A) && (%Gather3.half == first) { return %Gather3.score-CT }
  2945. if (%Gather3.live == A-B) && (%Gather3.half == first-second) { return %Gather3.firstB }
  2946. if (%Gather3.live == B-A) && (%Gather3.half == first-second) { return %Gather3.firstB }
  2947. if (%Gather3.live == A-B) && (%Gather3.half == second) { return %Gather3.score-CT }
  2948. if (%Gather3.live == B-A) && (%Gather3.half == second) { return %Gather3.score-T }
  2949. }
  2950. }
  2951. if ($1 == half) {
  2952. if (%Gather3.half == notyet) { return NotSet }
  2953. if (%Gather3.live == A-B) || (%Gather3.live == B-A) {
  2954. if (%Gather3.half == first) && ($calc(%Gather3.score-CT + %Gather3.score-T) == 14) { return 1st half }
  2955. if (%Gather3.half == first) && ($calc(%Gather3.score-CT + %Gather3.score-T) !== 14) { return 1st half }
  2956. if (%Gather3.half == first-second) { return 2nd half }
  2957. if (%Gather3.half == second) { return 2nd half }
  2958. }
  2959. }
  2960. }
  2961. alias score4 {
  2962. if ($1- == notlive) { return Match is not live yet }
  2963. if ($1- == a) {
  2964. if (%gather4.half == notyet) { return NotSet }
  2965. if (%gather4.live == A-B) || (%gather4.live == B-A) {
  2966. if (%gather4.live == A-B) && (%gather4.half == first) { return %gather4.score-CT }
  2967. if (%gather4.live == B-A) && (%gather4.half == first) { return %gather4.score-T }
  2968. if (%gather4.live == A-B) && (%gather4.half == first-second) { return %gather4.firstA }
  2969. if (%gather4.live == B-A) && (%gather4.half == first-second) { return %gather4.firstA }
  2970. if (%gather4.live == A-B) && (%gather4.half == second) { return $calc(%gather4.score-T + %gather4.firstA) }
  2971. if (%gather4.live == B-A) && (%gather4.half == second) { return $calc(%gather4.score-CT + %gather4.firstA) }
  2972. }
  2973. }
  2974. if ($1- == anow) {
  2975. if (%gather4.half == notyet) { return NotSet }
  2976. if (%gather4.live == A-B) || (%gather4.live == B-A) {
  2977. if (%gather4.live == A-B) && (%gather4.half == first) { return %gather4.score-CT }
  2978. if (%gather4.live == B-A) && (%gather4.half == first) { return %gather4.score-T }
  2979. if (%gather4.live == A-B) && (%gather4.half == first-second) { return %gather4.firstA }
  2980. if (%gather4.live == B-A) && (%gather4.half == first-second) { return %gather4.firstA }
  2981. if (%gather4.live == A-B) && (%gather4.half == second) { return %gather4.score-T }
  2982. if (%gather4.live == B-A) && (%gather4.half == second) { return %gather4.score-CT }
  2983. }
  2984. }
  2985. if ($1- == b) {
  2986. if (%gather4.half == notyet) { return NotSet }
  2987. if (%gather4.live == A-B) || (%gather4.live == B-A) {
  2988. if (%gather4.live == A-B) && (%gather4.half == first) { return %gather4.score-T }
  2989. if (%gather4.live == B-A) && (%gather4.half == first) { return %gather4.score-CT }
  2990. if (%gather4.live == A-B) && (%gather4.half == first-second) { return %gather4.firstB }
  2991. if (%gather4.live == B-A) && (%gather4.half == first-second) { return %gather4.firstB }
  2992. if (%gather4.live == A-B) && (%gather4.half == second) { return $calc(%gather4.score-CT + %gather4.firstB) }
  2993. if (%gather4.live == B-A) && (%gather4.half == second) { return $calc(%gather4.score-T + %gather4.firstB) }
  2994. }
  2995. }
  2996. if ($1- == bnow) {
  2997. if (%gather4.half == notyet) { return NotSet }
  2998. if (%gather4.live == A-B) || (%gather4.live == B-A) {
  2999. if (%gather4.live == A-B) && (%gather4.half == first) { return %gather4.score-T }
  3000. if (%gather4.live == B-A) && (%gather4.half == first) { return %gather4.score-CT }
  3001. if (%gather4.live == A-B) && (%gather4.half == first-second) { return %gather4.firstB }
  3002. if (%gather4.live == B-A) && (%gather4.half == first-second) { return %gather4.firstB }
  3003. if (%gather4.live == A-B) && (%gather4.half == second) { return %gather4.score-CT }
  3004. if (%gather4.live == B-A) && (%gather4.half == second) { return %gather4.score-T }
  3005. }
  3006. }
  3007. if ($1 == half) {
  3008. if (%gather4.half == notyet) { return NotSet }
  3009. if (%gather4.live == A-B) || (%gather4.live == B-A) {
  3010. if (%gather4.half == first) && ($calc(%gather4.score-CT + %gather4.score-T) == 14) { return 1st half }
  3011. if (%gather4.half == first) && ($calc(%gather4.score-CT + %gather4.score-T) !== 14) { return 1st half }
  3012. if (%gather4.half == first-second) { return 2nd half }
  3013. if (%gather4.half == second) { return 2nd half }
  3014. }
  3015. }
  3016. }
  3017.  
  3018.  
  3019. alias scoreside1 {
  3020. if ($1- == a) {
  3021. if (%Gather1.half == first) {
  3022. if (%Gather1.live == A-B) { return 2C14ounter terrorists }
  3023. if (%Gather1.live == B-A) { return 4T14errorists }
  3024. }
  3025. elseif (%Gather1.half == first-second) || (%Gather1.half == second) {
  3026. if (%Gather1.live == A-B) { return 4T14errorists }
  3027. if (%Gather1.live == B-A) { return 2C14ounter terrorists }
  3028. }
  3029. }
  3030. if ($1- == b) {
  3031. if (%Gather1.half == first) {
  3032. if (%Gather1.live == A-B) { return 4T14errorists }
  3033. if (%Gather1.live == B-A) { return 2C14ounter terrorists }
  3034. }
  3035. elseif (%Gather1.half == first-second) || (%Gather1.half == second) {
  3036. if (%Gather1.live == A-B) { return 2C14ounter terrorists }
  3037. if (%Gather1.live == B-A) { return 4T14errorists }
  3038. }
  3039. }
  3040. }
  3041.  
  3042.  
  3043.  
  3044. alias scorecolor1 {
  3045. if ($1- == a) {
  3046. if (%Gather1.half == first) {
  3047. if (%Gather1.live == A-B) { return 12 }
  3048. if (%Gather1.live == B-A) { return 4 }
  3049. }
  3050. elseif (%Gather1.half == first-second) || (%Gather1.half == second) {
  3051. if (%Gather1.live == A-B) { return 4 }
  3052. if (%Gather1.live == B-A) { return 12 }
  3053. }
  3054. }
  3055. if ($1- == b) {
  3056. if (%Gather1.half == first) {
  3057. if (%Gather1.live == A-B) { return 4 }
  3058. if (%Gather1.live == B-A) { return 12 }
  3059. }
  3060. elseif (%Gather1.half == first-second) || (%Gather1.half == second) {
  3061. if (%Gather1.live == A-B) { return 12 }
  3062. if (%Gather1.live == B-A) { return 4 }
  3063. }
  3064. }
  3065. }
  3066.  
  3067. alias scoreside2 {
  3068. if ($1- == a) {
  3069. if (%Gather2.half == first) {
  3070. if (%Gather2.live == A-B) { return 2C14ounter terrorists }
  3071. if (%Gather2.live == B-A) { return 4T14errorists }
  3072. }
  3073. elseif (%Gather2.half == first-second) || (%Gather2.half == second) {
  3074. if (%Gather2.live == A-B) { return 4T14errorists }
  3075. if (%Gather2.live == B-A) { return 2C14ounter terrorists }
  3076. }
  3077. }
  3078. if ($1- == b) {
  3079. if (%Gather2.half == first) {
  3080. if (%Gather2.live == A-B) { return 4T14errorists }
  3081. if (%Gather2.live == B-A) { return 2C14ounter terrorists }
  3082. }
  3083. elseif (%Gather2.half == first-second) || (%Gather2.half == second) {
  3084. if (%Gather2.live == A-B) { return 2C14ounter terrorists }
  3085. if (%Gather2.live == B-A) { return 4T14errorists }
  3086. }
  3087. }
  3088. }
  3089.  
  3090. alias scorecolor2 {
  3091. if ($1- == a) {
  3092. if (%Gather2.half == first) {
  3093. if (%Gather2.live == A-B) { return 12 }
  3094. if (%Gather2.live == B-A) { return 4 }
  3095. }
  3096. elseif (%Gather2.half == first-second) || (%Gather2.half == second) {
  3097. if (%Gather2.live == A-B) { return 4 }
  3098. if (%Gather2.live == B-A) { return 12 }
  3099. }
  3100. }
  3101. if ($1- == b) {
  3102. if (%Gather2.half == first) {
  3103. if (%Gather2.live == A-B) { return 4 }
  3104. if (%Gather2.live == B-A) { return 12 }
  3105. }
  3106. elseif (%Gather2.half == first-second) || (%Gather2.half == second) {
  3107. if (%Gather2.live == A-B) { return 12 }
  3108. if (%Gather2.live == B-A) { return 4 }
  3109. }
  3110. }
  3111. }
  3112.  
  3113.  
  3114. alias scoreside3 {
  3115. if ($1- == a) {
  3116. if (%Gather3.half == first) {
  3117. if (%Gather3.live == A-B) { return 2C14ounter terrorists }
  3118. if (%Gather3.live == B-A) { return 4T14errorists }
  3119. }
  3120. elseif (%Gather3.half == first-second) || (%Gather3.half == second) {
  3121. if (%Gather3.live == A-B) { return 4T14errorists }
  3122. if (%Gather3.live == B-A) { return 2C14ounter terrorists }
  3123. }
  3124. }
  3125. if ($1- == b) {
  3126. if (%Gather3.half == first) {
  3127. if (%Gather3.live == A-B) { return 4T14errorists }
  3128. if (%Gather3.live == B-A) { return 2C14ounter terrorists }
  3129. }
  3130. elseif (%Gather3.half == first-second) || (%Gather3.half == second) {
  3131. if (%Gather3.live == A-B) { return 2C14ounter terrorists }
  3132. if (%Gather3.live == B-A) { return 4T14errorists }
  3133. }
  3134. }
  3135. }
  3136.  
  3137. alias scorecolor3 {
  3138. if ($1- == a) {
  3139. if (%Gather3.half == first) {
  3140. if (%Gather3.live == A-B) { return 12 }
  3141. if (%Gather3.live == B-A) { return 4 }
  3142. }
  3143. elseif (%Gather3.half == first-second) || (%Gather3.half == second) {
  3144. if (%Gather3.live == A-B) { return 4 }
  3145. if (%Gather3.live == B-A) { return 12 }
  3146. }
  3147. }
  3148. if ($1- == b) {
  3149. if (%Gather3.half == first) {
  3150. if (%Gather3.live == A-B) { return 4 }
  3151. if (%Gather3.live == B-A) { return 12 }
  3152. }
  3153. elseif (%Gather3.half == first-second) || (%Gather3.half == second) {
  3154. if (%Gather3.live == A-B) { return 12 }
  3155. if (%Gather3.live == B-A) { return 4 }
  3156. }
  3157. }
  3158. }
  3159.  
  3160. alias scoreside4 {
  3161. if ($1- == a) {
  3162. if (%gather4.half == first) {
  3163. if (%gather4.live == A-B) { return 2C14ounter terrorists }
  3164. if (%gather4.live == B-A) { return 4T14errorists }
  3165. }
  3166. elseif (%gather4.half == first-second) || (%gather4.half == second) {
  3167. if (%gather4.live == A-B) { return 4T14errorists }
  3168. if (%gather4.live == B-A) { return 2C14ounter terrorists }
  3169. }
  3170. }
  3171. if ($1- == b) {
  3172. if (%gather4.half == first) {
  3173. if (%gather4.live == A-B) { return 4T14errorists }
  3174. if (%gather4.live == B-A) { return 2C14ounter terrorists }
  3175. }
  3176. elseif (%gather4.half == first-second) || (%gather4.half == second) {
  3177. if (%gather4.live == A-B) { return 2C14ounter terrorists }
  3178. if (%gather4.live == B-A) { return 4T14errorists }
  3179. }
  3180. }
  3181. }
  3182.  
  3183. alias scorecolor4 {
  3184. if ($1- == a) {
  3185. if (%gather4.half == first) {
  3186. if (%gather4.live == A-B) { return 12 }
  3187. if (%gather4.live == B-A) { return 4 }
  3188. }
  3189. elseif (%gather4.half == first-second) || (%gather4.half == second) {
  3190. if (%gather4.live == A-B) { return 4 }
  3191. if (%gather4.live == B-A) { return 12 }
  3192. }
  3193. }
  3194. if ($1- == b) {
  3195. if (%gather4.half == first) {
  3196. if (%gather4.live == A-B) { return 4 }
  3197. if (%gather4.live == B-A) { return 12 }
  3198. }
  3199. elseif (%gather4.half == first-second) || (%gather4.half == second) {
  3200. if (%gather4.live == A-B) { return 12 }
  3201. if (%gather4.live == B-A) { return 4 }
  3202. }
  3203. }
  3204. }
  3205.  
  3206.  
  3207. alias livegame1 {
  3208. set %gather1.scorestatus on
  3209. msg %gather.channel $stl-1(12The First Half Is Starting Now...)
  3210. .timer 1 1 rcmd sv_restart 1
  3211. .timer 1 1 ssay Preparing for Starting Game, Please Wait.
  3212. .timer 1 2 ssay Game Started After 3 Restarts [Good Luck]
  3213. .timer 1 3 rcmd sv_restart 1
  3214. .timer 1 4 rcmd sv_restart 1
  3215. .timer 1 4 ssay LIVE. Gather Started! -> TEAM KILL = BAN
  3216. .timer 1 4 ssay Good Luck and Have Fun
  3217. .timer 1 6 Setscore-1
  3218. .timer 1 6 tsay Match is Live! First half Started Now, Score is - Team-A: 0 Team-B: 0
  3219. .timer 1 9 rcmd admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
  3220. }
  3221. alias livegame2 {
  3222. msg %gather.channel $stl-1(12The Second Half Is Starting Now...)
  3223. .timer 1 1 rcmd sv_restart 1
  3224. .timer 1 1 ssay Preparing for Starting Game, Please Wait.
  3225. .timer 1 2 ssay Game Started After 3 Restarts [Good Luck]
  3226. .timer 1 3 rcmd sv_restart 1
  3227. .timer 1 4 rcmd sv_restart 1
  3228. .timer 1 4 ssay LIVE. Gather Started! -> TEAM KILL = BAN
  3229. .timer 1 4 ssay Good Luck and Have Fun
  3230. .timer 1 6 Setscore-1
  3231. .timer 1 6 tsay Match is Live! Second half Started Now, Score is - Team-A: $score1(a) Team-B: $score1(b)
  3232. .timer 1 9 rcmd admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
  3233. }
  3234.  
  3235.  
  3236.  
  3237. alias livegame1-2 {
  3238. set %gather2.scorestatus on
  3239. msg %gather.channel $stl-2(12The First Half Is Now Starting...)
  3240. .timer 1 1 rcmd2 sv_restart 1
  3241. .timer 1 1 ssay2 Preparing for Starting Game, Please Wait.
  3242. .timer 1 2 ssay2 Game Started After 3 Restarts [Good Luck]
  3243. .timer 1 3 rcmd2 sv_restart 1
  3244. .timer 1 4 rcmd2 sv_restart 1
  3245. .timer 1 4 ssay2 LIVE. Gather Started! -> TEAM KILL = BAN
  3246. .timer 1 4 ssay2 Good Luck and Have Fun
  3247. .timer 1 6 Setscore-2
  3248. .timer 1 6 tsay2 Match is Live! First half Started Now, Score is - Team-A: 0 Team-B: 0
  3249. .timer 1 9 rcmd2 admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
  3250. }
  3251. alias livegame2-2 {
  3252. msg %gather.channel $stl-2(12The Second Half Is Now Starting... )
  3253. .timer 1 1 rcmd2 sv_restart 1
  3254. .timer 1 1 ssay2 Preparing for Starting Game, Please Wait.
  3255. .timer 1 2 ssay2 Game Started After 3 Restarts [Good Luck]
  3256. .timer 1 3 rcmd2 sv_restart 1
  3257. .timer 1 4 rcmd2 sv_restart 1
  3258. .timer 1 4 ssay2 LIVE. Gather Started! -> TEAM KILL = BAN
  3259. .timer 1 4 ssay2 Good Luck and Have Fun
  3260. .timer 1 6 Setscore-2
  3261. .timer 1 6 tsay2 Match is Live! Second half Started Now, Score is - Team-A: $score2(a) Team-B: $score2(b)
  3262. .timer 1 9 rcmd2 admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
  3263. }
  3264.  
  3265.  
  3266.  
  3267. alias livegame1-3 {
  3268. set %gather3.scorestatus on
  3269. msg %gather.channel $stl-3(12The First Half Is Now Starting...)
  3270. .timer 1 1 rcmd3 sv_restart 1
  3271. .timer 1 1 ssay3 Preparing for Starting Game, Please Wait.
  3272. .timer 1 2 ssay3 Game Started After 3 Restarts [Good Luck]
  3273. .timer 1 3 rcmd3 sv_restart 1
  3274. .timer 1 4 rcmd3 sv_restart 1
  3275. .timer 1 4 ssay3 LIVE. Gather Started! -> TEAM KILL = BAN
  3276. .timer 1 4 ssay3 Good Luck and Have Fun
  3277. .timer 1 6 Setscore-3
  3278. .timer 1 6 tsay3 Match is Live! First half Started Now, Score is - Team-A: 0 Team-B: 0
  3279. .timer 1 9 rcmd3 admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
  3280. }
  3281. alias livegame2-3 {
  3282. msg %gather.channel $stl-3(12The Second Half Is Now Starting...)
  3283. .timer 1 1 rcmd3 sv_restart 1
  3284. .timer 1 1 ssay3 Preparing for Starting Game, Please Wait.
  3285. .timer 1 2 ssay3 Game Started After 3 Restarts [Good Luck]
  3286. .timer 1 3 rcmd3 sv_restart 1
  3287. .timer 1 4 rcmd3 sv_restart 1
  3288. .timer 1 4 ssay3 LIVE. Gather Started! -> TEAM KILL = BAN
  3289. .timer 1 4 ssay3 Good Luck and Have Fun
  3290. .timer 1 6 Setscore-3
  3291. .timer 1 6 tsay3 Match is Live! Second half Started Now, Score is - Team-A: $score3(a) Team-B: $score3(b)
  3292. .timer 1 9 rcmd3 admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
  3293. }
  3294. alias livegame1-4 {
  3295. set %gather4.scorestatus on
  3296. msg %gather.channel $stl-4(12The First Half Is Now Starting...)
  3297. .timer 1 1 rcmd4 sv_restart 1
  3298. .timer 1 1 ssay4 Preparing for Starting Game, Please Wait.
  3299. .timer 1 2 ssay4 Game Started After 3 Restarts [Good Luck]
  3300. .timer 1 3 rcmd4 sv_restart 1
  3301. .timer 1 4 rcmd4 sv_restart 1
  3302. .timer 1 4 ssay4 LIVE. Gather Started! -> TEAM KILL = BAN
  3303. .timer 1 4 ssay4 Good Luck and Have Fun
  3304. .timer 1 6 Setscore-4
  3305. .timer 1 6 tsay4 Match is Live! First half Started Now, Score is - Team-A: 0 Team-B: 0
  3306. .timer 1 9 rcmd4 admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
  3307. }
  3308. alias livegame2-4 {
  3309. msg %gather.channel $stl-4(12The Second Half Is Now Starting...)
  3310. .timer 1 1 rcmd4 sv_restart 1
  3311. .timer 1 1 ssay4 Preparing for Starting Game, Please Wait.
  3312. .timer 1 2 ssay4 Game Started After 3 Restarts [Good Luck]
  3313. .timer 1 3 rcmd4 sv_restart 1
  3314. .timer 1 4 rcmd4 sv_restart 1
  3315. .timer 1 4 ssay4 LIVE. Gather Started! -> TEAM KILL = BAN
  3316. .timer 1 4 ssay4 Good Luck and Have Fun
  3317. .timer 1 6 Setscore-4
  3318. .timer 1 6 tsay4 Match is Live! Second half Started Now, Score is - Team-A: $score4(a) Team-B: $score4(b)
  3319. .timer 1 9 rcmd4 admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
  3320. }
  3321.  
  3322. alias mr15 {
  3323. rcmd mp_autokick 0
  3324. rcmd mp_limitteams 0
  3325. rcmd mp_startmoney 800
  3326. rcmd mp_forcecamera 2
  3327. rcmd mp_roundtime 1.75
  3328. rcmd mp_c4timer 35
  3329. rcmd sv_alltalk 0
  3330. rcmd mp_friendlyfire 1
  3331. rcmd mp_freezetime 8
  3332. rcmd mp_buytime 0.15
  3333. rcmd mp_timelimit 0
  3334. rcmd sv_restart 1
  3335. }
  3336. alias prac {
  3337. rcmd mp_autokick 0
  3338. rcmd mp_limitteams 0
  3339. rcmd mp_startmoney 16000
  3340. rcmd mp_forcecamera 2
  3341. rcmd mp_roundtime 1.75
  3342. rcmd mp_c4timer 35
  3343. rcmd sv_alltalk 0
  3344. rcmd mp_friendlyfire 0
  3345. rcmd mp_freezetime 0
  3346. rcmd mp_buytime 2
  3347. rcmd mp_timelimit 0
  3348. rcmd sv_restart 1
  3349. }
  3350. alias fun {
  3351. rcmd mp_autokick 0
  3352. rcmd mp_limitteams 0
  3353. rcmd mp_startmoney 800
  3354. rcmd mp_forcecamera 2
  3355. rcmd mp_roundtime 1.75
  3356. rcmd mp_c4timer 35
  3357. rcmd sv_alltalk 0
  3358. rcmd mp_friendlyfire 1
  3359. rcmd mp_freezetime 0
  3360. rcmd mp_buytime 0.15
  3361. rcmd mp_timelimit 0
  3362. rcmd sv_restart 1
  3363. }
  3364. alias rate {
  3365. rcmd mp_autokick 0
  3366. rcmd mp_limitteams 0
  3367. rcmd mp_startmoney 16000
  3368. rcmd mp_forcecamera 2
  3369. rcmd mp_roundtime 1.75
  3370. rcmd mp_c4timer 35
  3371. rcmd sv_alltalk 0
  3372. rcmd mp_friendlyfire 0
  3373. rcmd mp_freezetime 0
  3374. rcmd mp_buytime 2
  3375. rcmd mp_timelimit 0
  3376. rcmd sv_maxrate 25000
  3377. rcmd sv_minrate 4000
  3378. rcmd sv_maxupdaterate 101
  3379. rcmd sys_ticrate 10000
  3380. rcmd sv_restart 1
  3381. }
  3382. alias mr15-2 {
  3383. rcmd2 mp_autokick 0
  3384. rcmd2 mp_limitteams 0
  3385. rcmd2 mp_startmoney 800
  3386. rcmd2 mp_forcecamera 2
  3387. rcmd2 mp_roundtime 1.75
  3388. rcmd2 mp_c4timer 35
  3389. rcmd2 sv_alltalk 0
  3390. rcmd2 mp_friendlyfire 1
  3391. rcmd2 mp_freezetime 8
  3392. rcmd2 mp_buytime 0.15
  3393. rcmd2 mp_timelimit 0
  3394. rcmd2 sv_restart 1
  3395. }
  3396. alias prac-2 {
  3397. rcmd2 mp_autokick 0
  3398. rcmd2 mp_limitteams 0
  3399. rcmd2 mp_startmoney 16000
  3400. rcmd2 mp_forcecamera 2
  3401. rcmd2 mp_roundtime 1.75
  3402. rcmd2 mp_c4timer 35
  3403. rcmd2 sv_alltalk 0
  3404. rcmd2 mp_friendlyfire 0
  3405. rcmd2 mp_freezetime 0
  3406. rcmd2 mp_buytime 2
  3407. rcmd2 mp_timelimit 0
  3408. rcmd2 sv_restart 1
  3409. }
  3410. alias fan-2 {
  3411. rcmd2 mp_autokick 0
  3412. rcmd2 mp_limitteams 0
  3413. rcmd2 mp_startmoney 800
  3414. rcmd2 mp_forcecamera 2
  3415. rcmd2 mp_roundtime 1.75
  3416. rcmd2 mp_c4timer 35
  3417. rcmd2 sv_alltalk 0
  3418. rcmd2 mp_friendlyfire 1
  3419. rcmd2 mp_freezetime 0
  3420. rcmd2 mp_buytime 0.15
  3421. rcmd2 mp_timelimit 0
  3422. rcmd2 sv_restart 1
  3423. }
  3424. alias rate-2 {
  3425. rcmd2 mp_autokick 0
  3426. rcmd2 mp_limitteams 0
  3427. rcmd2 mp_startmoney 16000
  3428. rcmd2 mp_forcecamera 2
  3429. rcmd2 mp_roundtime 1.75
  3430. rcmd2 mp_c4timer 35
  3431. rcmd2 sv_alltalk 0
  3432. rcmd2 mp_friendlyfire 0
  3433. rcmd2 mp_freezetime 0
  3434. rcmd2 mp_buytime 2
  3435. rcmd2 mp_timelimit 0
  3436. rcmd2 sv_maxrate 25000
  3437. rcmd2 sv_minrate 4000
  3438. rcmd2 sv_maxupdaterate 101
  3439. rcmd2 sys_ticrate 10000
  3440. rcmd2 sv_restart 1
  3441. }
  3442. alias mr15-3 {
  3443. rcmd3 mp_autokick 0
  3444. rcmd3 mp_limitteams 0
  3445. rcmd3 mp_startmoney 800
  3446. rcmd3 mp_forcecamera 2
  3447. rcmd3 mp_roundtime 1.75
  3448. rcmd3 mp_c4timer 35
  3449. rcmd3 sv_alltalk 0
  3450. rcmd3 mp_friendlyfire 1
  3451. rcmd3 mp_freezetime 8
  3452. rcmd3 mp_buytime 0.15
  3453. rcmd3 mp_timelimit 0
  3454. rcmd3 sv_restart 1
  3455. }
  3456. alias prac-3 {
  3457. rcmd3 mp_autokick 0
  3458. rcmd3 mp_limitteams 0
  3459. rcmd3 mp_startmoney 16000
  3460. rcmd3 mp_forcecamera 2
  3461. rcmd3 mp_roundtime 1.75
  3462. rcmd3 mp_c4timer 35
  3463. rcmd3 sv_alltalk 0
  3464. rcmd3 mp_friendlyfire 0
  3465. rcmd3 mp_freezetime 0
  3466. rcmd3 mp_buytime 2
  3467. rcmd3 mp_timelimit 0
  3468. rcmd3 sv_restart 1
  3469. }
  3470. alias fun-3 {
  3471. rcmd3 mp_autokick 0
  3472. rcmd3 mp_limitteams 0
  3473. rcmd3 mp_startmoney 800
  3474. rcmd3 mp_forcecamera 2
  3475. rcmd3 mp_roundtime 1.75
  3476. rcmd3 mp_c4timer 35
  3477. rcmd3 sv_alltalk 0
  3478. rcmd3 mp_friendlyfire 1
  3479. rcmd3 mp_freezetime 0
  3480. rcmd3 mp_buytime 0.15
  3481. rcmd3 mp_timelimit 0
  3482. rcmd3 sv_restart 1
  3483. }
  3484. alias fun-2 {
  3485. rcmd2 mp_autokick 0
  3486. rcmd2 mp_limitteams 0
  3487. rcmd2 mp_startmoney 800
  3488. rcmd2 mp_forcecamera 2
  3489. rcmd2 mp_roundtime 1.75
  3490. rcmd2 mp_c4timer 35
  3491. rcmd2 sv_alltalk 0
  3492. rcmd2 mp_friendlyfire 1
  3493. rcmd2 mp_freezetime 0
  3494. rcmd2 mp_buytime 0.15
  3495. rcmd2 mp_timelimit 0
  3496. rcmd2 sv_restart 1
  3497. }
  3498. alias rate-3 {
  3499. rcmd3 mp_autokick 0
  3500. rcmd3 mp_limitteams 0
  3501. rcmd3 mp_startmoney 16000
  3502. rcmd3 mp_forcecamera 2
  3503. rcmd3 mp_roundtime 1.75
  3504. rcmd3 mp_c4timer 35
  3505. rcmd3 sv_alltalk 0
  3506. rcmd3 mp_friendlyfire 0
  3507. rcmd3 mp_freezetime 0
  3508. rcmd3 mp_buytime 2
  3509. rcmd3 mp_timelimit 0
  3510. rcmd3 sv_maxrate 25000
  3511. rcmd3 sv_minrate 4000
  3512. rcmd3 sv_maxupdaterate 101
  3513. rcmd3 sys_ticrate 10000
  3514. rcmd3 sv_restart 1
  3515. }
  3516. alias mr15-4 {
  3517. rcmd4 mp_autokick 0
  3518. rcmd4 mp_limitteams 0
  3519. rcmd4 mp_startmoney 800
  3520. rcmd4 mp_forcecamera 2
  3521. rcmd4 mp_roundtime 1.75
  3522. rcmd4 mp_c4timer 35
  3523. rcmd4 sv_alltalk 0
  3524. rcmd4 mp_friendlyfire 1
  3525. rcmd4 mp_freezetime 8
  3526. rcmd4 mp_buytime 0.15
  3527. rcmd4 mp_timelimit 0
  3528. rcmd4 sv_restart 1
  3529. }
  3530. alias prac-4 {
  3531. rcmd4 mp_autokick 0
  3532. rcmd4 mp_limitteams 0
  3533. rcmd4 mp_startmoney 16000
  3534. rcmd4 mp_forcecamera 2
  3535. rcmd4 mp_roundtime 1.75
  3536. rcmd4 mp_c4timer 35
  3537. rcmd4 sv_alltalk 0
  3538. rcmd4 mp_friendlyfire 0
  3539. rcmd4 mp_freezetime 0
  3540. rcmd4 mp_buytime 2
  3541. rcmd4 mp_timelimit 0
  3542. rcmd4 sv_restart 1
  3543. }
  3544. alias fun-4 {
  3545. rcmd4 mp_autokick 0
  3546. rcmd4 mp_limitteams 0
  3547. rcmd4 mp_startmoney 800
  3548. rcmd4 mp_forcecamera 2
  3549. rcmd4 mp_roundtime 1.75
  3550. rcmd4 mp_c4timer 35
  3551. rcmd4 sv_alltalk 0
  3552. rcmd4 mp_friendlyfire 1
  3553. rcmd4 mp_freezetime 0
  3554. rcmd4 mp_buytime 0.15
  3555. rcmd4 mp_timelimit 0
  3556. rcmd4 sv_restart 1
  3557. }
  3558. alias rate-4 {
  3559. rcmd mp_autokick 0
  3560. rcmd mp_limitteams 0
  3561. rcmd mp_startmoney 16000
  3562. rcmd mp_forcecamera 2
  3563. rcmd mp_roundtime 1.75
  3564. rcmd mp_c4timer 35
  3565. rcmd sv_alltalk 0
  3566. rcmd mp_friendlyfire 0
  3567. rcmd mp_freezetime 0
  3568. rcmd mp_buytime 2
  3569. rcmd mp_timelimit 0
  3570. rcmd sv_maxrate 25000
  3571. rcmd sv_minrate 4000
  3572. rcmd sv_maxupdaterate 101
  3573. rcmd sys_ticrate 10000
  3574. rcmd sv_restart 1
  3575. }
  3576.  
  3577. alias swap {
  3578. if (%gather1.live == A-B) teamer a t
  3579. else teamer a ct
  3580. }
  3581. alias swap2 {
  3582. if (%gather2.live == A-B) teamer2 a t
  3583. else teamer2 a ct
  3584. }
  3585. alias swap3 {
  3586. if (%gather3.live == A-B) teamer3 a t
  3587. else teamer3 a ct
  3588. }
  3589. alias swap4 {
  3590. if (%gather4.live == A-B) teamer4 a t
  3591. else teamer4 a ct
  3592. }
  3593. alias endfirst {
  3594. swap
  3595. msg %gather.channel 4G14ather 1: 12First half results: A - %Gather1.firstA , B - %Gather1.firstB 
  3596. tsay The First Half Has Finished. Score is - (Team-A): %Gather1.firstA (Team-B): %Gather1.firstB
  3597. }
  3598. alias endfirst-1 {
  3599. swap
  3600. msg %gather.channel 4G14ather 1: 12First half results: A - %Gather1.firstA , B - %Gather1.firstB 
  3601. tsay The First Half Has Finished. Score is - (Team-A): %Gather1.firstA (Team-B): %Gather1.firstB
  3602. }
  3603. alias endfirst-2 {
  3604. swap2
  3605. msg %gather.channel 4G14ather 2: 12First half results: A - $score2(a) , B - $score2(b) 
  3606. tsay2 The First Half Is Finished. Score is - (Team-A): $score2(a) (Team-B): $score2(b)
  3607. }
  3608. alias endfirst-3 {
  3609. swap3
  3610. msg %gather.channel 4G14ather 3: 12First half results: A - $score3(a) , B - $score3(b) 
  3611. tsay3 The First Half Is Finished. Score is - (Team-A): $score3(a) (Team-B): $score3(b)
  3612. }
  3613. alias endfirst-4 {
  3614. swap4
  3615. msg %gather.channel 4G14ather 4: 12First half results: A - $score4(a) , B - $score4(b) 
  3616. tsay4 The First Half Is Finished. Score is - (Team-A): $score4(a) (Team-B): $score4(b)
  3617. }
  3618. alias Gathers {
  3619. if ($readini(Gatherbot/Admins.ini,$1,Gathers)) { return $ifmatch | Halt }
  3620. elseif ($readini(Gatherbot/masters.ini,$1,Gathers)) { return $ifmatch | Halt }
  3621. elseif ($readini(Gatherbot/owners.ini,$1,Gathers)) { return $ifmatch | Halt }
  3622. elseif (!$readini(Gatherbot/Admins.ini,$1,Gathers)) || (!$readini(Gatherbot/masters.ini,$1,Gathers)) || (!$readini(Gatherbot/owners.ini,$1,Gathers)) { return 0 | Halt }
  3623. }
  3624. alias admin? {
  3625. var %x = 1
  3626. while ($ini(Gatherbot/Admins.ini,%x)) {
  3627. if ($1 isin $ini(Gatherbot/Admins.ini,%x)) || ($ini(Gatherbot/Admins.ini,%x) == $1) { return $ini(Gatherbot/Admins.ini,%x) | Halt }
  3628. inc %x
  3629. }
  3630. }
  3631. alias master? {
  3632. var %x = 1
  3633. while ($ini(Gatherbot/masters.ini,%x)) {
  3634. if ($1 isin $ini(Gatherbot/masters.ini,%x)) || ($ini(Gatherbot/masters.ini,%x) == $1) { return $ini(Gatherbot/masters.ini,%x) | Halt }
  3635. inc %x
  3636. }
  3637. }
  3638.  
  3639. ;alias showadmins {
  3640. ;var %x 1, %temp ,%S 1
  3641. ;while ($gettok(%admins,%x,32)) {
  3642. ;var %temp = %temp $ifmatch
  3643. ;if ($numtok(%temp,32) == 15) {
  3644. ;if (%S == 1) { msg %gather.Channel $stl($iif(%S == 1,Bot Admins Are (12 $+ $admins(ON).num $+ 14/ $+ $admins(ALL).num $+ ):,$chr(32))) %temp }
  3645. ;if (%S !== 1) { msg %gather.Channel $stl(%temp) }
  3646. ;var %temp
  3647. ;inc %S
  3648. ;}
  3649. ;inc %x
  3650. ;}
  3651. ;msg %gather.Channel $stl($iif(%S == 1,Bot Admins Are (12 $+ $admins(ON).num $+ 14/ $+ $admins(ALL).num $+ ):,$chr(32))) %temp
  3652. ;.timer 1 %S unset %admins
  3653. ;}
  3654.  
  3655. alias showadmins {
  3656. set %admins $admins-gtrs
  3657. msg %gather.channel 2» 2B14ot 14Admins Are2: $$gettok(%admins,1-10,32)
  3658. if ($gettok(%admins,11-20,32)) {
  3659. msg %gather.channel $stl($v1)
  3660. }
  3661. if ($gettok(%admins,21-30,32)) {
  3662. .timer 1 1 msg %gather.channel $stl($v1)
  3663. }
  3664. if ($gettok(%admins,31-40,32)) {
  3665. .timer 1 1 msg %gather.channel $stl($v1)
  3666. }
  3667. unset %admins
  3668. }
  3669.  
  3670. alias showmasters {
  3671. set %masters $masters-gtrs
  3672. msg %gather.channel $stl(2B14ot 14Masters Are2:) $$gettok(%masters,1-10,32)
  3673. if ($gettok(%masters,11-20,32)) {
  3674. msg %gather.channel $stl($v1)
  3675. }
  3676. if ($gettok(%masters,21-30,32)) {
  3677. msg %gather.channel $stl($v1)
  3678. }
  3679. unset %masters
  3680. showadmins
  3681. }
  3682. alias showmasters2 {
  3683. set %masters2 $masters-gtrs
  3684. msg %gather.channel $stl(2B14ot 14Masters Are2:) $$gettok(%masters2,1-10,32)
  3685. if ($gettok(%masters2,11-20,32)) {
  3686. msg %gather.channel $stl($v1)
  3687. }
  3688. if ($gettok(%masters2,21-30,32)) {
  3689. msg %gather.channel $stl($v1)
  3690. }
  3691. unset %masters2
  3692. }
  3693.  
  3694. alias showowners2 {
  3695. set %owners $owners-gtrs
  3696. msg %lala $stl(2B14ot 14Owners Are2:) $$gettok(%owners,1-10,32)
  3697. if ($gettok(%owners,11-20,32)) {
  3698. msg %lala $stl($v1)
  3699. }
  3700. if ($gettok(%owners,21-30,32)) {
  3701. msg %lala $stl($v1)
  3702. }
  3703. unset %owners
  3704. }
  3705.  
  3706. ;alias showmasters {
  3707. ;var %x 1, %temp ,%S 1
  3708. ;while ($gettok(%masters,%x,32)) {
  3709. ;var %temp = %temp $ifmatch
  3710. ;if ($numtok(%temp,32) == 15) {
  3711. ;if (%S == 1) { msg %gather.Channel $stl($iif(%S == 1,Bot Masters Are (12 $+ $masters(ON).num $+ 14/ $+ $masters(ALL).num $+ ):,$chr(32))) %temp }
  3712. ;if (%S !== 1) { .timer -m 1 $calc(%S *0.500) msg %gather.Channel $stl($iif(%S == 1,Bot Masters Are (12 $+ $masters(ON).num $+ 14/ $+ $masters(ALL).num $+ ):,$chr(32))) %temp }
  3713. ;var %temp
  3714. ;inc %S
  3715. ;}
  3716. ;inc %x
  3717. ;}
  3718. ;msg %gather.Channel $stl($iif(%S == 1,Bot Masters Are (12 $+ $masters(ON).num $+ 14/ $+ $masters(ALL).num $+ ):,$chr(32))) %temp
  3719. ;.timer 1 %S unset %masters
  3720. ;set %admins $admins-gtrs | showadmins
  3721. ;}
  3722.  
  3723. on !*:part:%Gather.channel: {
  3724. if ($admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  3725. var %o = $admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
  3726. .remini -n Gatherbot/Admins.ini %o Logged
  3727. .writeini -n Gatherbot/Admins.ini %o Status OFF
  3728. msg $Nick $stl(14You Had disconnected from 12Admin14 account (2 $+ %o $+ 14) (14Reason:2 Part14))
  3729. ;msg %Gather.channel $stl(2 $+ $nick 14Had disconnected from 12Admin14 account (2 $+ %o $+ 14) (14Reason:2 Part14))
  3730. }
  3731. if ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  3732. var %o = $owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
  3733. .remini -n Gatherbot/Owners.ini %o Logged
  3734. .writeini -n Gatherbot/Owners.ini %o Status OFF
  3735. msg $Nick $stl(14You Had disconnected from 12Owner14 account (2 $+ %o $+ 14) (14Reason:2 Part14))
  3736. ;msg %Gather.channel $stl(2 $+ $nick 14Had disconnected from 12Owner14 account (2 $+ %o $+ 14) (14Reason:2 Part14))
  3737. }
  3738. if ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  3739. var %o = $masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
  3740. .remini -n Gatherbot/masters.ini %o Logged
  3741. .writeini -n Gatherbot/masters.ini %o Status OFF
  3742. msg $Nick $stl(14You Had disconnected from 12Master14 account (2 $+ %o $+ 14) (14Reason:2 Part14))
  3743. ;msg %Gather.channel $stl(2 $+ $nick 14Had disconnected from 12Master14 account (2 $+ %o $+ 14) (14Reason:2 Part14))
  3744. }
  3745. if (%Gather1.Status == adding) && ($istok(%Gather1.Players,$nick,32)) { set %Gather1.Players $remtok(%Gather1.players,$nick,32) }
  3746. if (%Gather2.Status == adding) && ($istok(%Gather2.Players,$nick,32)) { set %Gather2.Players $remtok(%Gather2.players,$nick,32) }
  3747. if (%Gather3.Status == adding) && ($istok(%Gather3.Players,$nick,32)) { set %Gather3.Players $remtok(%Gather3.players,$nick,32) }
  3748. if (%Gather4.Status == adding) && ($istok(%Gather4.Players,$nick,32)) { set %Gather4.Players $remtok(%Gather4.players,$nick,32) }
  3749. if ($nick == %Gather1.Admin) gather end1
  3750. if ($nick == %Gather2.Admin) gather end2
  3751. if ($nick == %Gather3.Admin) gather end3
  3752. }
  3753. on !*:quit: {
  3754. if ($admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  3755. var %o = $admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
  3756. .remini -n Gatherbot/Admins.ini %o Logged
  3757. .writeini -n Gatherbot/Admins.ini %o Status OFF
  3758. ;msg %Gather.channel $stl(2 $+ $nick 14Had disconnected from 12Admin14 account (2 $+ %o $+ 14) (14Reason:2 Quit14) (12 $+ $1- $+ 14))
  3759. }
  3760. if ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  3761. var %o = $owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
  3762. .remini -n Gatherbot/Owners.ini %o Logged
  3763. .writeini -n Gatherbot/Owners.ini %o Status OFF
  3764. ;msg %Gather.channel $stl(2 $+ $nick 14Had disconnected from 12Owner14 account (2 $+ %o $+ 14) (14Reason:2 Quit14) (12 $+ $1- $+ 14))
  3765. }
  3766. if ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
  3767. var %o = $masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
  3768. .remini -n Gatherbot/masters.ini %o Logged
  3769. .writeini -n Gatherbot/masters.ini %o Status OFF
  3770. ;msg %Gather.channel $stl(2 $+ $nick 14Had disconnected from 12Master14 account (2 $+ %o $+ 14) (14Reason:2 Quit14) (12 $+ $1- $+ 14))
  3771. }
  3772. if (%Gather1.Status == adding) && ($istok(%Gather1.Players,$nick,32)) && ($nick !== %Gather1.Admin) { set %Gather1.Players $remtok(%Gather1.players,$nick,32) }
  3773. if (%Gather2.Status == adding) && ($istok(%Gather2.Players,$nick,32)) && ($nick !== %Gather2.Admin) { set %Gather2.Players $remtok(%Gather2.players,$nick,32) }
  3774. if (%Gather3.Status == adding) && ($istok(%Gather3.Players,$nick,32)) && ($nick !== %Gather3.Admin) { set %Gather3.Players $remtok(%Gather3.players,$nick,32) }
  3775. if (%Gather4.Status == adding) && ($istok(%Gather4.Players,$nick,32)) { set %Gather4.Players $remtok(%Gather4.players,$nick,32) }
  3776. }
  3777. on !*:kick:%Gather.channel: {
  3778. if ($admins($address($knick,2)).logged?) {
  3779. var %o = $admins($address($knick,2)).logged?
  3780. .remini -n Gatherbot/Admins.ini %o Logged
  3781. .writeini -n Gatherbot/Admins.ini %o Status OFF
  3782. msg $knick $stl(14You Had disconnected from 12Admin14 account (2 $+ %o $+ 14) (14Reason:2 You are kicked by $nick $+ 14))
  3783. ;msg %Gather.channel $stl(2 $+ $knick 14Had disconnected from 12Admin14 account (2 $+ %o $+ 14) (14Reason:2 Kicked by $nick $+ 14))
  3784. }
  3785. if ($masters($address($knick,2)).logged?) {
  3786. var %o = $masters($address($knick,2)).logged?
  3787. .remini -n Gatherbot/masters.ini %o Logged
  3788. .writeini -n Gatherbot/masters.ini %o Status OFF
  3789. msg $knick $stl(14You Had disconnected from 12Master14 account (2 $+ %o $+ 14) (14Reason:2 You are kicked by $nick $+ 14))
  3790. ;msg %Gather.channel $stl(2 $+ $knick 14Had disconnected from 12Master14 account (2 $+ %o $+ 14) (14Reason:2 Kicked by $nick $+ 14))
  3791. }
  3792. if ($owners($address($knick,2)).logged?) {
  3793. var %o = $owners($address($knick,2)).logged?
  3794. .remini -n Gatherbot/owners.ini %o Logged
  3795. .writeini -n Gatherbot/owners.ini %o Status OFF
  3796. msg $knick $stl(14You Had disconnected from 12Owner14 account (2 $+ %o $+ 14) (14Reason:2 You are kicked by $nick $+ 14))
  3797. ;msg %Gather.channel $stl(2 $+ $knick 14Had disconnected from 12Owner14 account (2 $+ %o $+ 14) (14Reason:2 Kicked by $nick $+ 14))
  3798. }
  3799. if (%Gather1.Status == adding) && ($istok(%Gather1.Players,$knick,32)) && ($knick !== %Gather1.Admin) { set %Gather1.Players $remtok(%Gather1.players,$knick,32) }
  3800. if (%Gather2.Status == adding) && ($istok(%Gather2.Players,$knick,32)) && ($knick !== %Gather2.Admin) { set %Gather2.Players $remtok(%Gather2.players,$knick,32) }
  3801. if (%Gather3.Status == adding) && ($istok(%Gather3.Players,$knick,32)) && ($knick !== %Gather3.Admin) { set %Gather3.Players $remtok(%Gather3.players,$knick,32) }
  3802. if (%Gather4.Status == adding) && ($istok(%Gather4.Players,$nick,32)) { set %Gather4.Players $remtok(%Gather4.players,$nick,32) }
  3803. }
  3804. on *:NICK: {
  3805. if (%gather1.status == adding) && ($istok(%Gather1.Players,$nick,32)) { set %gather1.players $reptok(%gather1.players,$nick,$newnick,32) }
  3806. if (%gather2.status == adding) && ($istok(%Gather2.Players,$nick,32)) { set %gather2.players $reptok(%gather2.players,$nick,$newnick,32) }
  3807. if (%gather3.status == adding) && ($istok(%Gather3.Players,$nick,32)) { set %gather3.players $reptok(%gather3.players,$nick,$newnick,32) }
  3808. if (%gather4.status == adding) && ($istok(%Gather4.Players,$nick,32)) { set %gather4.players $reptok(%gather4.players,$nick,$newnick,32) }
  3809. }
  3810. alias Sub-A-1 {
  3811. .msg %Gather.channel 1 4G14ather 1: 2» 2A14ttention2: 12Substitute Player is needed for team A. Plz write asap 2!Sub
  3812. mode %Gather.channel -N+m
  3813. .timer 1 2 notice %Gather.channel 4G14ather 1:sub is needed %Gather.channel
  3814. .timer 1 3 mode %Gather.channel +N-m
  3815. }
  3816. alias Sub-B-1 {
  3817. .msg %Gather.channel 1 4G14ather 1: 2» 2A14ttention2: 12Substitute Player is needed for team B. Plz write asap 2!Sub
  3818. mode %Gather.channel -N+m
  3819. .timer 1 2 notice %Gather.channel 4G14ather 1:sub is needed %Gather.channel
  3820. .timer 1 3 mode %Gather.channel +N-m
  3821. }
  3822. alias Sub-A-2 {
  3823. .msg %Gather.channel 1 4G14ather 2: 2» 2A14ttention2: 12Substitute Player is needed for team A. Plz write asap 2!Sub
  3824. mode %Gather.channel -N+m
  3825. .timer 1 1 notice %Gather.channel 4G14ather 2:sub is needed %Gather.channel
  3826. .timer 1 2 mode %Gather.channel +N-m
  3827. }
  3828. alias Sub-B-2 {
  3829. .msg %Gather.channel 1 4G14ather 2: 2» 2A14ttention2: 12Substitute Player is needed for team B. Plz write asap 2!Sub
  3830. mode %Gather.channel -N+m
  3831. .timer 1 1 notice %Gather.channel 4G14ather 2:sub is needed %Gather.channel
  3832. .timer 1 2 mode %Gather.channel +N-m
  3833. }
  3834. alias Sub-A-3 {
  3835. .msg %Gather.channel 1 4G14ather 3: 2» 2A14ttention2: 12Substitute Player is needed for team A. Plz write asap 2!Sub
  3836. mode %Gather.channel -N+m
  3837. .timer 1 1 notice %Gather.channel 4G14ather 3:sub is needed %Gather.channel
  3838. .timer 1 2 mode %Gather.channel +N-m
  3839. }
  3840. alias Sub-B-3 {
  3841. .msg %Gather.channel 1 4G14ather 3: 2» 2A14ttention2: 12Substitute Player is needed for team B. Plz write asap 2!Sub
  3842. mode %Gather.channel -N+m
  3843. .timer 1 1 notice %Gather.channel 4G14ather 3:sub is needed %Gather.channel
  3844. .timer 1 2 mode %Gather.channel +N-m
  3845. }
  3846. alias Sub-A-4 {
  3847. .msg %Gather.channel 1 4G14ather 4: 2» 2A14ttention2: 12Substitute Player is needed for team A. Plz write asap 2!Sub
  3848. mode %Gather.channel -N+m
  3849. .timer 1 1 notice %Gather.channel 4G14ather 4:sub is needed %Gather.channel
  3850. .timer 1 2 mode %Gather.channel +N-m
  3851. }
  3852. alias Sub-B-4 {
  3853. .msg %Gather.channel 1 4G14ather 4: 2» 2A14ttention2: 12Substitute Player is needed for team B. Plz write asap 2!Sub
  3854. mode %Gather.channel -N+m
  3855. .timer 1 1 notice %Gather.channel 4G14ather 4:sub is needed %Gather.channel
  3856. .timer 1 2 mode %Gather.channel +N-m
  3857. }
  3858. menu * {
  3859. Tray { Showmirc -t }
  3860. -
  3861. Help {
  3862. if ($window(@Help)) { window -c @Help }
  3863. window @Help ariel 8
  3864. font @Help 15
  3865. echo @Help $stl(12Welcome to 2Ventox12 CZ Gatherbot [4 3 Gatherbots on 1 Bot (mIRC) 12])
  3866. echo @Help $stl(12Fixing bugs by 2Ventox`)
  3867. echo @Help $stl(--------------------------------------------------------------------------------------------------------------)
  3868. echo @Help $stl(--------------------------------------->2Masters Commands On Pm:14<---------------------------------------)
  3869. echo @Help $stl(--------------------------------------------------------------------------------------------------------------)
  3870. echo @Help $stl(2Add Admin:14 %Gather.Sign-Pm $+ Set Admin <12User14> <12Password14> <12ServerNick14>)
  3871. echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set Admin Syren 123 Syren)
  3872. echo @Help 
  3873. echo @Help $stl(2Delete Admin:14 %Gather.Sign-Pm $+ Set Unadmin <12User14>)
  3874. echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set Unadmin Ventox)
  3875. echo @Help 
  3876. echo @Help $stl(2Change MasterPass:14 %Gather.Sign-Pm $+ Masterpass <12New MasterPass14>)
  3877. echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set Masterpass asd)
  3878. echo @Help 
  3879. echo @Help $stl(2Reset Gatherbot:14 %Gather.Sign-Pm $+ Set <12MasterPass14> Resetbot)
  3880. echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set ResetBot)
  3881. echo @Help 
  3882. echo @Help $stl(2Set Ventrilo:14 %Gather.Sign-Pm $+ Set Vent <12IP:PORT14>)
  3883. echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set Vent 1.1.1.1:1111)
  3884. echo @Help 
  3885. echo @Help $stl(2Set Servers:14 %Gather.Sign-Pm $+ Set Server-1/2/3 <12IP:PORT14>)
  3886. echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set Server-1 1.1.1.1:11111)
  3887. echo @Help 
  3888. echo @Help $stl(2Set Rcons:14 %Gather.Sign-Pm $+ Set Rconpass-1/2/3 <12The Rcon Password14>)
  3889. echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set Rconpass-1 123123)
  3890. echo @Help 
  3891. echo @Help $stl(--------------------------------------------------------------------------------------------------------------)
  3892. echo @Help $stl(--------------------------------------->2Admins Commands On Pm: 14<---------------------------------------)
  3893. echo @Help $stl(--------------------------------------------------------------------------------------------------------------)
  3894. echo @Help $stl(2Start Gather:14 %Gather.Sign-PM $+ Start1/2/3 <12Map14> <12Server Pass14> <12Room A Pass14> <12Room B Pass14>)
  3895. echo @Help $stl(2Stop Gather:14 %Gather.Sign-PM $+ Stop1/2/3 <12Reason14>)
  3896. echo @Help $stl(2End Gather:14 %Gather.Sign-PM $+ End1/2/3)
  3897. echo @Help $stl(2Sub For Gather:14 %Gather.Sign-PM $+ Needsub1/2/3 <12A/B/OFF14>)
  3898. echo @Help $stl(2Notice:14 %Gather.Sign-PM $+ Notice <12Message14>)
  3899. echo @Help $stl(2Ban Command:14 %Gather.Sign-PM $+ Ban <12Nick/Ip14>)
  3900. echo @Help $stl(2Unban Command:14 %Gather.Sign-PM $+ Unban <12Nick/Ip14>)
  3901. echo @Help 
  3902. echo @Help $stl(Need Help? ICQ:12 299442963 14Or in the mIRC nick:12 Ventox (And Omc הוא בן זונה))
  3903. }
  3904. -
  3905. Settings
  3906. .Refresh Settings {
  3907. .timers off
  3908. sockclose *
  3909. .timer 1 3 rconstart
  3910. .timer 1 6 rconstart2
  3911. .timer 1 9 rconstart3
  3912. .timer 1 12 rconstart4
  3913. }
  3914. .-
  3915. .Set Channel { part %Gather.Channel | set %Gather.Channel $input(Type Channel,e,Type Channel) | .timer 1 1 join %Gather.Channel }
  3916. .Set Ventrilo { set %Gather.Vent $input(Type Ventrilo IP:PORT,e,Type Ventrilo IP:PORT) }
  3917. .Set MasterPass { set %Gather.Masterpass $input(Type Masterpass,e,Type Masterpass) }
  3918. .Set Sign-PM { set %Gather.Sign-PM $input(Type Sign PM,e,Type Sign PM) }
  3919. .Set Servers
  3920. ..Set Server-1 { set %Gather1.Server $input(Type Server for Gatherbot 1,e,Type Server for Gatherbot 1) }
  3921. ..Set Server-2 { set %Gather2.Server $input(Type Server for Gatherbot 2,e,Type Server for Gatherbot 2) }
  3922. ..Set Server-3 { set %Gather3.Server $input(Type Server for Gatherbot 3,e,Type Server for Gatherbot 3) }
  3923. ..Set Server-4 { set %Gather4.Server $input(Type Server for Gatherbot 4,e,Type Server for Gatherbot 4) }
  3924. .Set Rcon Passwords
  3925. ..Set RconPassword-1 { set %Gather1.Rconpass $input(Type Rcon-Password for Gatherbot 1,e,Type Rcon-Password for Gatherbot 1) }
  3926. ..Set RconPassword-2 { set %Gather2.Rconpass $input(Type Rcon-Password for Gatherbot 2,e,Type Rcon-Password for Gatherbot 2) }
  3927. ..Set RconPassword-3 { set %Gather3.Rconpass $input(Type Rcon-Password for Gatherbot 3,e,Type Rcon-Password for Gatherbot 3) }
  3928. ..Set RconPassword-4 { set %Gather4.Rconpass $input(Type Rcon-Password for Gatherbot 4,e,Type Rcon-Password for Gatherbot 4) }
  3929. .Set Signs Channel
  3930. ..Set Sign Channel Main { set %Gather.Sign $input(Type Main Sign,e,Type Main Sign) }
  3931. ..Set Sign Channel Gatherbot-1 { set %Gather1.Sign $input(Type Sign,e,Type Sign) }
  3932. ..Set Sign Channel Gatherbot-2 { set %Gather2.Sign $input(Type Sign,e,Type Sign) }
  3933. ..Set Sign Channel Gatherbot-3 { set %Gather3.Sign $input(Type Sign,e,Type Sign) }
  3934. ..Set Sign Channel Gatherbot-4 { set %Gather4.Sign $input(Type Sign,e,Type Sign) }
  3935. .Set Signs Server
  3936. ..Set Sign Server Gatherbot-1 { set %Gather1.SignServer $input(Type SignServer,e,Type SignServer) }
  3937. ..Set Sign Server Gatherbot-2 { set %Gather2.SignServer $input(Type SignServer,e,Type SignServer) }
  3938. ..Set Sign Server Gatherbot-3 { set %Gather3.SignServer $input(Type SignServer,e,Type SignServer) }
  3939. ..Set Sign Server Gatherbot-4 { set %Gather4.SignServer $input(Type SignServer,e,Type SignServer) }
  3940.  
  3941. -
  3942. Reset Gatherbot {
  3943. Part %Gather.Channel
  3944. echo -a $stl(Restarting Gatherbot Please wait (Gatherbot By12 $+($chr(86),$chr(101),$chr(110),$chr(116),$chr(111),$chr(120)) $+ 14))
  3945. unset %Gather1.last*
  3946. unset %Gather2.Last*
  3947. unset %Gather.Flood
  3948. unset %Gather3.Last*
  3949. set %Gather1.Status off
  3950. set %Gather2.Status off
  3951. set %Gather3.Status off
  3952. set %Gather.num 0
  3953. .ignore -r
  3954. unset %gather.ignored
  3955. set %Gather.Sign !
  3956. set %Gather.Sign-Pm !
  3957. set %Gather1.Sign !
  3958. Set %Gather2.Sign @
  3959. Set %Gather3.Sign +
  3960. set %Gather1.SignServer !
  3961. set %Gather2.SignServer !
  3962. set %Gather3.SignServer !
  3963. set %Gather1.num 0
  3964. set %Gather2.num 0
  3965. set %Gather3.num 0
  3966. set %Gather1.Port 7141
  3967. set %Gather2.Port 7139
  3968. set %Gather3.Port 7825
  3969. set %Gather1.MaxPlayers 10
  3970. set %Gather2.MaxPlayers 10
  3971. set %Gather3.MaxPlayers 10
  3972. unset %Gather1.Team*
  3973. unset %Gather2.Team*
  3974. unset %Gather3.Team*
  3975. unset %Gather1.half
  3976. unset %Gather2.half
  3977. unset %Gather1.Players
  3978. unset %Gather2.Players
  3979. unset %Gather3.Players
  3980.  
  3981. unset %Gather3.half
  3982. unset %Gather1.Score*
  3983. unset %Gather2.Score*
  3984. unset %Gather3.Score*
  3985. unset %Gather1.Live
  3986. unset %Gather2.Live
  3987. unset %Gather3.Live
  3988. unset %Gather1.Map
  3989. unset %Gather2.Map
  3990. unset %Gather3.Map
  3991. unset %Gather1.Admin
  3992. unset %Gather2.Admin
  3993. unset %Gather3.Admin
  3994. unset %Gather1.Pas*
  3995. unset %Gather2.Pas*
  3996. unset %Gather3.Pas*
  3997. unset %Gather1.Sub*
  3998. unset %Gather2.Sub*
  3999. unset %Gather3.Sub*
  4000. unset %Gather1.Started
  4001. unset %Gather2.Started
  4002. unset %Gather3.Started
  4003. .remove Gatherbot/Admins.ini
  4004. .remove Gatherbot/Stats.ini
  4005. .timers off
  4006. sockclose *
  4007. .timer 1 3 join %Gather.channel
  4008. .timer 1 8 rconstart
  4009. .timer 1 12 rconstart2
  4010. .timer 1 15 rconstart3
  4011. }
  4012. }
  4013. alias isadmin {
  4014. var %y = 1
  4015. while ($ini(Gatherbot/admins.ini,%y)) {
  4016. if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%y),ServerNick) == $1) { return $readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%y),ServerNick) }
  4017. inc %y
  4018. }
  4019.  
  4020. var %y = 1
  4021. while ($ini(Gatherbot/masters.ini,%y)) {
  4022. if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%y),ServerNick) == $1) { return $readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%y),ServerNick) }
  4023. inc %y
  4024. }
  4025. var %y = 1
  4026. while ($ini(Gatherbot/owners.ini,%y)) {
  4027. if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%y),ServerNick) == $1) { return $readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%y),ServerNick) }
  4028. inc %y
  4029. }
  4030. }
  4031. alias admins-gtrs {
  4032. var %x 1, %temp
  4033. while ($gettok($admins,%x,32)) { var %temp = %temp $ifmatch $+ (4 $+ $Gathers($remove($strip($ifmatch),)) $+ 12) | inc %x }
  4034. return %temp
  4035. }
  4036. alias masters-gtrs {
  4037. var %x 1, %temp
  4038. while ($gettok($masters,%x,32)) { var %temp = %temp $ifmatch $+ (4 $+ $Gathers($remove($strip($ifmatch),)) $+ 12) | inc %x }
  4039. return %temp
  4040. }
  4041. alias owners-gtrs {
  4042. var %x 1, %temp
  4043. while ($gettok($owners,%x,32)) { var %temp = %temp $ifmatch $+ (4 $+ $Gathers($remove($strip($ifmatch),)) $+ 12) | inc %x }
  4044. return %temp
  4045. }
  4046. alias Status-1 {
  4047. if (%Gather1.Status == OFF) { msg %Gather.Channel 2» 2G14ather status 12: 12Gather is Currently off.2 « }
  4048. if (%Gather1.Status == adding) { msg %Gather.Channel $stl-status-1(Gather is3 ON 14Map:12 %Gather1.Map 14Admin:12 %Gather1.Admin 14Type:12 %Gather1.Sign $+ Add14.) }
  4049. if (%Gather1.Status == ON) { msg %Gather.Channel 2» 2G14ather status 12: 12Gather is currently on. 2P14lz wait for next Gather. 2D14etails2: 2A14dmin2: 12 $+ %Gather1.Admin $+ , 2D14ate2: 12 $+ %Gather1.started $+ , 2M14ap2: 12 $+ %Gather1.Map $+ 2. 2«  }
  4050. }
  4051. alias Status-2 {
  4052. if (%Gather2.Status == OFF) { msg %Gather.Channel 2» 2G14ather status 22: 12Gather is Currently off.2 « }
  4053. if (%Gather2.Status == adding) { msg %Gather.Channel $stl-status-2(Gather is3 ON 14Map:12 %Gather2.Map 14Admin:12 %Gather2.Admin 14Type:12 %Gather2.Sign $+ Add14.) }
  4054. if (%Gather2.Status == ON) { msg %Gather.Channel 2» 2G14ather status 22: 12Gather is currently on. 2P14lz wait for next Gather. 2D14etails2: 2A14dmin2: 12 $+ %Gather2.Admin $+ , 2D14ate2: 12 $+ %Gather2.started $+ , 2M14ap2: 12 $+ %Gather2.Map $+ 2. 2«  }
  4055. }
  4056. alias Status-3 {
  4057. if (%Gather3.Status == OFF) { msg %Gather.Channel 2» 2G14ather status 32: 12Gather is Currently off.2 « }
  4058. if (%Gather3.Status == adding) { msg %Gather.Channel $stl-status-3(Gather is3 ON 14Map:12 %Gather3.Map 14Admin:12 %Gather3.Admin 14Type:12 %Gather3.Sign $+ Add14.) }
  4059. if (%Gather3.Status == ON) { msg %Gather.Channel 2» 2G14ather status 32: 12Gather is currently on. 2P14lz wait for next Gather. 2D14etails2: 2A14dmin2: 12 $+ %Gather3.Admin $+ , 2D14ate2: 12 $+ %Gather3.started $+ , 2M14ap2: 12 $+ %Gather3.Map $+ 2. 2«  }
  4060. }
  4061. alias Status-4 {
  4062. if (%Gather4.Status == OFF) { msg %Gather.Channel 2» 2G14ather status 4 (Fun)2: 12Gather is Currently off.2 « }
  4063. if (%Gather4.Status == adding) { msg %Gather.Channel $stl-status-4(Gather is3 ON 14Map:12$chr(13) $+ %Gather4.Map $+ 14Admin:12 %Gather4.Admin 14Type:12 %Gather4.Sign $+ Add14.) }
  4064. if (%Gather4.Status == ON) { msg %Gather.Channel 2» 2G14ather status 4 (Fun)2: 12Gather is currently on. 2P14lz wait for next Gather. 2D14etails2: 2A14dmin2: 12 $+ %Gather4.Admin $+ , 2D14ate2: 12 $+ %Gather4.started $+ , 2M14ap2: 12 $+ %Gather4.Map $+ 2. 2«  }
  4065. }
  4066.  
  4067. alias players-1 {
  4068. msg %Gather.Channel 2P14layers2: 2[.12 %Gather1.Players 2.] 2(14 $+ $numtok(%Gather1.Players,32) $+ /14 $+ %Gather1.MaxPlayers $+ 2)
  4069. }
  4070. alias players-2 {
  4071. msg %Gather.Channel 2P14layers2: 2[.12 %Gather2.Players 2.] 2(14 $+ $numtok(%Gather2.Players,32) $+ /14 $+ %Gather2.MaxPlayers $+ 2)
  4072. }
  4073. alias players-3 {
  4074. msg %Gather.Channel 2P14layers2: 2[.12 %Gather3.Players 2.] 2(14 $+ $numtok(%Gather3.Players,32) $+ /14 $+ %Gather3.MaxPlayers $+ 2)
  4075. }
  4076. alias players-4 {
  4077. msg %Gather.Channel 2P14layers2: 2[.12 %Gather4.Players 2.] 2(14 $+ $numtok(%Gather4.Players,32) $+ /14 $+ %Gather4.MaxPlayers $+ 2)
  4078. }
  4079. ;on *:disconnect: { server }
  4080.  
  4081. alias Setmvps-1 {
  4082. var %s = $gettok($2,1,$asc(!))
  4083. .close -@ @Tops
  4084. .window -h @Tops
  4085. var %x = $ini(Gatherbot/mvps.ini,0)
  4086. var %z = %x
  4087. while (%x) {
  4088. echo @Tops $ini(Gatherbot/mvps.ini,%x) $readini(Gatherbot/mvps.ini,$ini(Gatherbot/mvps.ini,%x),kills)
  4089. dec %x
  4090. }
  4091. //filter -cwwteu 2 32 @Tops @Tops
  4092. var %o = 1
  4093. if ($ini(Gatherbot/mvps.ini,0) < 5) { var %z = $ini(Gatherbot/mvps.ini,0) }
  4094. elseif ($ini(Gatherbot/mvps.ini,0) >= 5) { var %z = 5 }
  4095. set -u20 %Gather.Flood ON Mvps
  4096. var %temp
  4097. while (%z) {
  4098. var %user = $gettok($line(@Tops,%o),1,32)
  4099. var %temp = %temp %user
  4100. inc %o
  4101. dec %z
  4102. }
  4103. if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,1,32) mvps 3 }
  4104. elseif ($readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,1,32) mvps $calc($readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps) +3) }
  4105. if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,2,32) mvps 2 }
  4106. elseif ($readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,2,32) mvps $calc($readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps) +2) }
  4107. if ($gettok(%temp,3,32)) {
  4108. if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,3,32) mvps 1 }
  4109. elseif ($readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,3,32) mvps $calc($readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps) +1) }
  4110. }
  4111. msg %Gather.Channel 4G14ather 1:  3» 2M14VP`S of the Gather are2:12 141st.12 $+ $gettok(%temp,1,32) 142nd.12 $+ $gettok(%temp,2,32) 143rd.12 $+ $gettok(%temp,3,32) 2«
  4112. ssay Gather Mvps are: 1st( $+ $gettok(%temp,1,32) $+ ) 2nd( $+ $gettok(%temp,2,32) $+ ) 3rd( $+ $gettok(%temp,3,32) $+ )
  4113. }
  4114.  
  4115.  
  4116.  
  4117. alias Setmvps-2 {
  4118. var %s = $gettok($2,1,$asc(!))
  4119. .close -@ @Tops
  4120. .window -h @Tops
  4121. var %x = $ini(Gatherbot/mvps2.ini,0)
  4122. var %z = %x
  4123. while (%x) {
  4124. echo @Tops $ini(Gatherbot/mvps2.ini,%x) $readini(Gatherbot/mvps2.ini,$ini(Gatherbot/mvps2.ini,%x),kills)
  4125. dec %x
  4126. }
  4127. //filter -cwwteu 2 32 @Tops @Tops
  4128. var %o = 1
  4129. if ($ini(Gatherbot/mvps2.ini,0) < 5) { var %z = $ini(Gatherbot/mvps2.ini,0) }
  4130. elseif ($ini(Gatherbot/mvps2.ini,0) >= 5) { var %z = 5 }
  4131. set -u20 %Gather.Flood ON Mvps
  4132. var %temp
  4133. while (%z) {
  4134. var %user = $gettok($line(@Tops,%o),1,32)
  4135. var %temp = %temp %user
  4136. inc %o
  4137. dec %z
  4138. }
  4139. if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,1,32) mvps 3 }
  4140. elseif ($readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,1,32) mvps $calc($readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps) +3) }
  4141. if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,2,32) mvps 2 }
  4142. elseif ($readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,2,32) mvps $calc($readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps) +2) }
  4143. if ($gettok(%temp,3,32)) {
  4144. if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,3,32) mvps 1 }
  4145. elseif ($readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,3,32) mvps $calc($readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps) +1) }
  4146. }
  4147. msg %Gather.Channel 4G14ather 2:  3» 2M14VP`S of the Gather are2:12 141st.12 $+ $gettok(%temp,1,32) 142nd.12 $+ $gettok(%temp,2,32) 143rd.12 $+ $gettok(%temp,3,32) 2«
  4148. ssay2 Gather Mvps are: 1st( $+ $gettok(%temp,1,32) $+ ) 2nd( $+ $gettok(%temp,2,32) $+ ) $iif($gettok(%temp,3,32),3rd( $+ $gettok(%temp,3,32) $+ ))
  4149. }
  4150.  
  4151. alias Setmvps-3 {
  4152. var %s = $gettok($2,1,$asc(!))
  4153. .close -@ @Tops
  4154. .window -h @Tops
  4155. var %x = $ini(Gatherbot/mvps3.ini,0)
  4156. var %z = %x
  4157. while (%x) {
  4158. echo @Tops $ini(Gatherbot/mvps3.ini,%x) $readini(Gatherbot/mvps3.ini,$ini(Gatherbot/mvps3.ini,%x),kills)
  4159. dec %x
  4160. }
  4161. //filter -cwwteu 2 32 @Tops @Tops
  4162. var %o = 1
  4163. if ($ini(Gatherbot/mvps3.ini,0) < 5) { var %z = $ini(Gatherbot/mvps3.ini,0) }
  4164. elseif ($ini(Gatherbot/mvps3.ini,0) >= 5) { var %z = 5 }
  4165. set -u20 %Gather.Flood ON Mvps
  4166. var %temp
  4167. while (%z) {
  4168. var %user = $gettok($line(@Tops,%o),1,32)
  4169. var %temp = %temp %user
  4170. inc %o
  4171. dec %z
  4172. }
  4173. if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,1,32) mvps 3 }
  4174. elseif ($readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,1,32) mvps $calc($readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps) +3) }
  4175. if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,2,32) mvps 2 }
  4176. elseif ($readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,2,32) mvps $calc($readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps) +2) }
  4177. if ($gettok(%temp,3,32)) {
  4178. if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,3,32) mvps 1 }
  4179. elseif ($readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,3,32) mvps $calc($readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps) +1) }
  4180. }
  4181. msg %Gather.Channel 4G14ather 3:  3» 2M14VP`S of the Gather are2:12 141st.12 $+ $gettok(%temp,1,32) 142nd.12 $+ $gettok(%temp,2,32) 143rd.12 $+ $gettok(%temp,3,32) 2«
  4182. ssay3 Gather Mvps are: 1st( $+ $gettok(%temp,1,32) $+ ) 2nd( $+ $gettok(%temp,2,32) $+ ) $iif($gettok(%temp,3,32),3rd( $+ $gettok(%temp,3,32) $+ ))
  4183. }
  4184.  
  4185. alias Setmvps-4 {
  4186. var %s = $gettok($2,1,$asc(!))
  4187. .close -@ @Tops
  4188. .window -h @Tops
  4189. var %x = $ini(Gatherbot/mvps4.ini,0)
  4190. var %z = %x
  4191. while (%x) {
  4192. echo @Tops $ini(Gatherbot/mvps4.ini,%x) $readini(Gatherbot/mvps4.ini,$ini(Gatherbot/mvps4.ini,%x),kills)
  4193. dec %x
  4194. }
  4195. //filter -cwwteu 2 32 @Tops @Tops
  4196. var %o = 1
  4197. if ($ini(Gatherbot/mvps4.ini,0) < 5) { var %z = $ini(Gatherbot/mvps4.ini,0) }
  4198. elseif ($ini(Gatherbot/mvps4.ini,0) >= 5) { var %z = 5 }
  4199. set -u20 %Gather.Flood ON Mvps
  4200. var %temp
  4201. while (%z) {
  4202. var %user = $gettok($line(@Tops,%o),1,32)
  4203. var %temp = %temp %user
  4204. inc %o
  4205. dec %z
  4206. }
  4207. if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,1,32) mvps 3 }
  4208. elseif ($readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,1,32) mvps $calc($readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps) +3) }
  4209. if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,2,32) mvps 2 }
  4210. elseif ($readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,2,32) mvps $calc($readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps) +2) }
  4211. if ($gettok(%temp,3,32)) {
  4212. if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,3,32) mvps 1 }
  4213. elseif ($readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,3,32) mvps $calc($readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps) +1) }
  4214. }
  4215. msg %Gather.Channel 4G14ather 4:  3» 2M14VP`S of the Gather are2:12 141st.12 $+ $gettok(%temp,1,32) 142nd.12 $+ $gettok(%temp,2,32) 143rd.12 $+ $gettok(%temp,3,32) 2«
  4216. ssay4 Gather Mvps are: 1st( $+ $gettok(%temp,1,32) $+ ) 2nd( $+ $gettok(%temp,2,32) $+ ) $iif($gettok(%temp,3,32),3rd( $+ $gettok(%temp,3,32) $+ ))
  4217. }
  4218.  
  4219.  
  4220. alias Setscore-1 {
  4221. set %Gather1.scoreStatus on
  4222. set %gather1.score-CT 0
  4223. set %gather1.score-T 0
  4224. }
  4225. alias Setscore-2 {
  4226. set %Gather2.scoreStatus on
  4227. set %gather2.score-CT 0
  4228. set %gather2.score-T 0
  4229. }
  4230. alias Setscore-3 {
  4231. set %Gather3.scoreStatus on
  4232. set %gather3.score-CT 0
  4233. set %gather3.score-T 0
  4234. }
  4235. alias Setscore-4 {
  4236. set %Gather4.scoreStatus on
  4237. set %gather4.score-CT 0
  4238. set %gather4.score-T 0
  4239. }
  4240.  
  4241. alias hlplayers { sockudp -k hlplayers $gettok($1,1,58) $gettok($1,2,58) $str($chr(255),4) $+ PLAYERS }
  4242. on *:UDPREAD:hlplayers:{ unset %hlplayers | sockread &hlplayers | breplace &hlplayers 0 190
  4243. set %hlnames $mid($bvar(&hlplayers,1,1000).text,7) | var %i = 1
  4244. while (%i <= $asc($mid($bvar(&hlplayers,1,1000).text,6))) {
  4245. set %hlplayers %hlplayers $+ $chr(32) $+ 2» $+ %i $+ «12 $gettok($right(%hlnames,-1),1,190)
  4246. set %hlnames $right(%hlnames,- $+ $calc($len($gettok(%hlnames,1,190)) + 9))
  4247. inc %i 1
  4248. }
  4249. msg %Gather.Channel $stl(2Players:12 %hlplayers)
  4250. unset %hl*
  4251. }
  4252.  
  4253. alias 2HL {
  4254. set %Servers $1-
  4255. unset %2HL.*
  4256. .timer2HL 1 1 Halt
  4257. if ($1 == TimedOutx) { msg %Gather.Channel $stl(12Server is not responding) | sockclose 2HL | unset %Servers | Halt }
  4258. Sockclose 2HL*
  4259. .timer -m 1 100 sockudp -k 2HL $gettok($1,1,58) $gettok($1,2,58) $str($chr(255),4) $+ TSource Engine Query
  4260. .timertimedout 1 2 2HL TimedOutx
  4261. :END
  4262. }
  4263.  
  4264.  
  4265.  
  4266. alias HLVAR { return $bvar(&HL,1,$bvar(&HL,0)).text }
  4267. on *:udpread:2hl:{
  4268. sockread &HL
  4269. breplace &HL 0 254
  4270. var %source $iif(Source isin $gettok($HLVAR,5,254),1,0),%pass $iif($asc($mid($gettok($HLVAR,6,254),6,1)) == 1,1,0)
  4271. var %2hl.hostname $iif(!%source,$gettok($HLVAR,2,254),$remove($gettok($HLVAR,1,254),????I))
  4272. var %2hl.map $iif(!%source,$gettok($HLVAR,3,254),$gettok($HLVAR,2,254))
  4273. var %2hl.password $iif(!%pass,no,yes)
  4274. var %2HL.IP %Servers
  4275. if (%source == 1) {
  4276. if (!$mid($gettok($HLVAR,6,254),2,1)) { var %2HL.Players 0/ $+ $asc($mid($gettok($HLVAR,6,254),1,1)) }
  4277. else { var %2HL.Players $asc($mid($gettok($HLVAR,6,254),1,1)) $+ / $+ $asc($mid($gettok($HLVAR,6,254),2,1)) }
  4278. }
  4279. else {
  4280. if ($asc($mid($gettok($HLVAR,6,254),2,1)) > 32) { var %2HL.Players 0/ $+ $asc($mid($gettok($HLVAR,6,254),1,1)) }
  4281. else { var %2HL.Players $asc($mid($gettok($HLVAR,6,254),1,1)) $+ / $+ $asc($mid($gettok($HLVAR,6,254),2,1)) }
  4282. }
  4283. if (%2HL.Players) {
  4284. msg %Gather.Channel 4»  2Host:1 %2HL.HOSTNAME 2Map:1 %2HL.MAP 2Players:1 %2HL.Players 2Pass:1 %2HL.Password 2Ip:1 %2HL.IP 4«
  4285. .timertimedout off
  4286. }
  4287. .timertimeout off
  4288. }
  4289.  
  4290.  
  4291. on *:udpread:2HL_PING:{ if ($sockerr > 0) return | unset %Temp.time | sockclose 2HL_PING }
  4292.  
  4293.  
  4294. alias details {
  4295. if ($1 isnum 1-4) {
  4296. if ($prop == a) || ($prop == b) {
  4297. return 2Y14ou are in team 2 [ $+ [ $prop ] $+ ] $+ 14 on Gather Server 2 $+ $1 $+ ,14 ipass:12 [ [ %Gather [ $+ [ $1 ] $+ ] .Server ] ] , 14Password:12 %Gather [ $+ [ $1 ] $+ ] .Pass 14Vent:12 %Gather.Vent 14Pass Vent:12 [ [ %Gather [ $+ [ $1 ] $+ ] .Pass [ $+ [ $prop ] ] ] ] 4GET IN NOW!
  4298. }
  4299. }
  4300. }
  4301.  
  4302. alias scorepergun {
  4303. if ($1 == usp) return 0.03
  4304. if ($1 == glock18) return 0.04
  4305. if ($1 == elite) return 0.04
  4306. if ($1 == famas) return 0.04
  4307. if ($1 == g3sg1) return 0.05
  4308. if ($1 == awp) return 0.07
  4309. if ($1 == deagle) return 0.03
  4310. if ($1 == m4a1) return 0.02
  4311. if ($1 == ak47) return 0.02
  4312. if ($1 == mp5navy) return 0.04
  4313. if ($1 == galil) return 0.04
  4314. if ($1 == grenade) return 0.05
  4315. if ($1 == knife) return 0.05
  4316. if ($1 == scout) return 0.06
  4317. if ($1 == p228) return 0.04
  4318. if ($1 == fiveseven) return 0.04
  4319. if ($1 == m3) return 0.06
  4320. if ($1 == xm1014) return 0.06
  4321. if ($1 == tmp) return 0.06
  4322. if ($1 == grenade) return 0.06
  4323. if ($1 == ump45) return 0.06
  4324. if ($1 == p90) return 0.06
  4325. if ($1 == aug) return 0.05
  4326. if ($1 == sg552) return 0.05
  4327. if ($1 == sg550) return 0.05
  4328. if ($1 == mac10) return 0.04
  4329. if ($1 == m249) return 0.04
  4330. }
  4331.  
  4332.  
  4333.  
  4334. alias Teamer {
  4335. if (!$1) || ($1 = X) Halt
  4336. if ($2 != CT) && ($2 != T) Halt
  4337. .timerTEAMer -m 1 3500 Teamer x $1-2
  4338. rcmd admin_quiet 2
  4339. rcmd allow_client_exec 1
  4340. rcmd admin_ignore_immunity 1
  4341. rcmd admin_command admin_execall setinfo "_vgui_menus" "0"
  4342. .timer -m 1 500 rcmd users
  4343. .timer 1 1 ssay Swap [Team Changer]
  4344. .timer 1 4 tsay Half results, A - $score1(a) $+ , B - $score1(b)
  4345. }
  4346. alias Teamer2 {
  4347. if (!$1) || ($1 = X) Halt
  4348. if ($2 != CT) && ($2 != T) Halt
  4349. .timerTEAMer2 -m 1 3500 Teamer2 x $1-2
  4350. rcmd2 admin_quiet 2
  4351. rcmd2 allow_client_exec 1
  4352. rcmd2 admin_ignore_immunity 1
  4353. rcmd2 admin_command admin_execall setinfo "_vgui_menus" "0"
  4354. .timer -m 1 500 rcmd2 users
  4355. .timer 1 1 ssay2 Swap [Team Changer]
  4356. .timer 1 14 tsay2 Half results, A - $score2(a) $+ , B - $score2(b)
  4357. }
  4358. alias Teamer3 {
  4359. if (!$1) || ($1 = X) Halt
  4360. if ($2 != CT) && ($2 != T) Halt
  4361. .timerTEAMer3 -m 1 3500 Teamer3 x $1-2
  4362. rcmd3 admin_quiet 2
  4363. rcmd3 allow_client_exec 1
  4364. rcmd3 admin_ignore_immunity 1
  4365. rcmd3 admin_command admin_execall setinfo "_vgui_menus" "0"
  4366. .timer -m 1 500 rcmd3 users
  4367. .timer 1 1 ssay3 Swap [Team Changer]
  4368. .timer 1 4 tsay3 Half results, A - $score3(a) $+ , B - $score3(b)
  4369. }
  4370.  
  4371.  
  4372.  
  4373.  
  4374. alias upload.admins.list {
  4375. write -c users.ini
  4376. set -u15 %upload.nick $$1
  4377. var %x 1
  4378. while ($ini(gatherbot/owners.ini,%x)) {
  4379. write users.ini iG| $+ $readini(gatherbot/owners.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/owners.ini,$v1,pass) $+ :131071
  4380. write users.ini A. $+ $readini(gatherbot/owners.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/owners.ini,$v1,pass) $+ :131071
  4381. write users.ini B. $+ $readini(gatherbot/owners.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/owners.ini,$v1,pass) $+ :131071
  4382. inc %x
  4383. }
  4384. var %x 1
  4385. while ($ini(gatherbot/masters.ini,%x)) {
  4386. write users.ini iG| $+ $readini(gatherbot/masters.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/masters.ini,$v1,pass) $+ :131071
  4387. write users.ini A. $+ $readini(gatherbot/masters.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/masters.ini,$v1,pass) $+ :131071
  4388. write users.ini B. $+ $readini(gatherbot/masters.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/masters.ini,$v1,pass) $+ :131071
  4389. inc %x
  4390. }
  4391. var %x 1
  4392. while ($ini(gatherbot/admins.ini,%x)) {
  4393. write users.ini iG| $+ $readini(gatherbot/admins.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/admins.ini,$v1,pass) $+ :131071
  4394. write users.ini A. $+ $readini(gatherbot/admins.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/admins.ini,$v1,pass) $+ :131071
  4395. write users.ini B. $+ $readini(gatherbot/admins.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/admins.ini,$v1,pass) $+ :131071
  4396. inc %x
  4397. }
  4398.  
  4399. FTP_put ftp://igamingcz: $+ %ftp $+ @212.150.176.86/1/czero/addons/adminmod/config/users.ini users.ini
  4400. FTP_put ftp://igamingcz: $+ %ftp $+ @212.150.176.86/2/czero/addons/adminmod/config/users.ini users.ini
  4401. FTP_put ftp://igamingcz: $+ %ftp $+ @212.150.176.86/3/czero/addons/adminmod/config/users.ini users.ini
  4402. FTP_put ftp://igamingcz: $+ %ftp $+ @212.150.176.86/4/czero/addons/adminmod/config/users.ini users.ini
  4403. }
  4404.  
  4405.  
  4406. alias upload.ventadmins.list {
  4407. write -c ventrilo_srv.usr
  4408. set -u15 %upload.nick $1
  4409. var %x 1
  4410. while ($ini(gatherbot/vent.ini,%x)) {
  4411. .write ventrilo_srv.usr $chr(91) $+ $readini(Gatherbot/vent.ini,$v1,User) $+ $chr(93)
  4412. .write ventrilo_srv.usr UserPassword= $+ $readini(gatherbot/vent.ini,$v1,Pass)
  4413. .write ventrilo_srv.usr ServerAdmin=1
  4414. inc %x
  4415. }
  4416.  
  4417. FTP_put ftp://roni: $+ %ftp $+ @195.189.140.100/home/roni/vent/ventrilo_srv.usr ventrilo_srv.usr
  4418. }
  4419.  
  4420.  
  4421.  
  4422.  
  4423.  
  4424. alias FTP_Put {
  4425. ; Usage: /FTP_Put <Full_FTP_Link> <source>
  4426. ; Example: /FTP_put ftp://user:password@server.co.il/site/file.rar file.rar
  4427.  
  4428. if (FTP://*:*@*.*/* !iswm $1) { .echo -a ERROR: FTP_Link not found or in wrong format, Please use: /FTP_Put <Full_FTP_Link> <source> | halt }
  4429. if (!$exists($qt($2-))) || (!$2) { .echo -a ERROR: Source file doesnt exist! ,Please use: /FTP_Put <Full_FTP_Link> <source> | halt }
  4430. var %link = $1
  4431. .tokenize 32 $mid($1,7) $remove($2-,")
  4432.  
  4433. var %x = $+(FTP_Put,$r(100000,999999))
  4434. var %server = $gettok($gettok($1,2,$asc(@)),1,$asc(/))
  4435. var %user = $gettok($1,1,$asc(:))
  4436. var %pass = $gettok($gettok($1,2,$asc(:)),1,$asc(@))
  4437. var %file = $+(/,$gettok($1,2-,$asc(/)))
  4438. if ($hget(%x)) .hfree %x
  4439. .hmake %x 100
  4440. .hadd %x link %link
  4441. .hadd %x server %server
  4442. .hadd %x user %user
  4443. .hadd %x pass %pass
  4444. .hadd %x file %file
  4445. .hadd %x source $qt($2-)
  4446. .hadd %x window $+(@,%x)
  4447. .hadd %x size 1
  4448. .hadd %x lastcmd
  4449. .sockopen %x %server 21
  4450. .window -e $+(@,%x)
  4451. .echo $+(@,%x) (FTP) Connecting to %server on port 21
  4452. .echo $+(@,%x) (FTP) User: %User ,Pass: %Pass ,File: %File
  4453. }
  4454.  
  4455. on 1:sockopen:FTP_put*:{
  4456. .echo $info(window) (FTP) Connected to $info(server) $+ !
  4457. .signal -n FTP_Put_Connected $sockname
  4458. }
  4459.  
  4460. on 1:sockopen:FTP_Upload*:{
  4461. var %mains = $+(FTP_put,$mid($sockname,11)) , %w = .sockwrite -n %mains
  4462. .echo $hget(%mains,window) (FTP) Opened data connection to $sock($sockname).ip $+ : $+ $sock($sockname).port
  4463. .echo $hget(%mains,window) (FTP) Sending: $hget(%mains,source) ,as: $hget(%mains,file)
  4464. %w STOR $hget(%mains,file)
  4465. }
  4466.  
  4467. on 1:sockwrite:FTP_Upload*:{
  4468. var %mains = $+(FTP_put,$mid($sockname,11)) , %w = .sockwrite -n %mains
  4469. if ($sock($sockname).sq < 8192) {
  4470. if ($fopen(%mains)) {
  4471. if (!$fopen(%mains).eof) {
  4472. .adc Sent: $fread(%mains, 1024, &data)
  4473. .sockwrite $sockname &data
  4474. var %find = (Uploading) Completed:
  4475. .rline $hget(%mains,window) $fline($hget(%mains,window),$+(%find,*),$fline($hget(%mains,window),$+(%find,*),0)) %find $round($calc($sock($sockname).sent / 1024),2) $+ / $+ $hget(%mains,size) $+ KB ( $+ $round($calc( $round($calc($sock($sockname).sent / 1024),2) * 100 / $hget(%mains,size) ),2) $+ % $+ )
  4476. }
  4477. else {
  4478. .fclose %mains
  4479. .sockclose $sockname
  4480. }
  4481. }
  4482. }
  4483. }
  4484.  
  4485. on 1:sockclose:FTP_put*:{
  4486. .echo $info(window) ERROR: Socket unexcpectedly closed.
  4487. .signal -n FTP_Put_Error Socket unexcpectedly closed.
  4488. .hfree $sockname
  4489. .sockclose $+(FTP_Data,$mid($sockname,8))
  4490. }
  4491. on 1:sockread:FTP_put*:{
  4492. var %r , %w = .sockwrite -n $sockname
  4493. sockread %r
  4494. tokenize 32 %r
  4495. if ($1 = 220) { %w USER $info(user) | .echo $info(window) (FTP) Sent user: $info(user) }
  4496. if ($1 = 331) { %w PASS $info(pass) | .echo $info(window) (FTP) Sent pass: $info(pass) }
  4497. if ($1 = 530) {
  4498. if (!%gather.flood) { msg %upload.nick $info(window) (FTP) ERROR: Wrong password for username | set -u4 %gather.flood }
  4499. %w QUIT | .echo $info(window) (FTP) ERROR: Wrong password ( $+ $info(pass) $+ ) for username $info(user) | .signal -n FTP_Put_Error Wrong password ( $+ $info(pass) $+ ) for username $info(user) | .hfree $sockname | .sockclose $+(FTP_Data,$mid($sockname,8)) | .sockclose $sockname
  4500. }
  4501. if ($1 = 230) { %w TYPE I | .echo $info(window) (FTP) User ok. }
  4502. if ($1 = 200) { %w PASV | .echo $info(window) (FTP) Binary mode ok. }
  4503. if ($1 = 227) {
  4504. .var %IPORT = $gettok($gettok($2-,2,40),1,41)
  4505. .sockopen $+(FTP_Upload,$mid($sockname,8)) $replace($gettok(%iport,1-4,44),$chr(44),.) $calc( ( $gettok(%iport,5,44) * 256 ) + $gettok(%iport,6,44) )
  4506. .echo $info(window) (FTP) Pasv mode ok.
  4507. ;.write -c $gettok($info(file),$numtok($info(file),$asc(/)),$asc(/))
  4508. }
  4509. if ($1 = 550) {
  4510. if (!%gather.flood) { msg %upload.nick $info(window) (FTP) ERROR: $1- | set -u4 %gather.flood }
  4511. %w QUIT | .echo $info(window) (FTP) ERROR: $1- | .signal -n FTP_Put_Error $1- | .hfree $sockname | .sockclose $+(FTP_Data,$mid($sockname,8)) | .sockclose $sockname
  4512. }
  4513. if ($1 = 226) {
  4514. .signal -n FTP_Put_Uploaded $sockname | %w QUIT | .echo $info(window) (FTP) Completed! uploaded: $info(source) as $info(file) | .hfree $sockname | .sockclose $+(FTP_Data,$mid($sockname,8)) | .sockclose $sockname
  4515. close -@ @ftp*
  4516. }
  4517. if ($1 = 150) {
  4518. .hadd $sockname size $round($calc( $file($info(source)).size / 1024),2)
  4519. .echo $info(window) (FTP) Server is waiting for data... Size: $info(size) KB
  4520. .fopen $sockname $info(source)
  4521. if (!$fopen($sockname)) { %w QUIT | .echo $info(window) (FTP) ERROR: Could not open $info(source) | .signal -n FTP_Put_Error Could not open $info(source) | .hfree $sockname | .sockclose $+(FTP_Data,$mid($sockname,8)) | .sockclose $sockname }
  4522. else {
  4523. .signal -n FTP_Put_Uploading $sockname
  4524. .adc Sent: $fread($sockname, 1024, &data) @ handle = $sockname
  4525. .sockwrite $+(FTP_Upload,$mid($sockname,8)) &data
  4526. .echo $info(window) (Uploading) Completed: $round($calc($sock($+(FTP_Upload,$mid($sockname,8))).sent / 1024),2) $+ / $+ $info(size) $+ KB ( $+ $round($calc( $round($calc($sock($+(FTP_Upload,$mid($sockname,8))).sent / 1024),2) * 100 / $info(size) ),2) $+ % $+ )
  4527. }
  4528. }
  4529. }
  4530.  
  4531. alias info { return $hget($sockname,$1) }
  4532. alias adc { var %x = 1 ;dont delete this! }
  4533.  
  4534. alias Set-Ventclose {
  4535. if ($exists(VentPlayers.txt)) { remove VentPlayers.txt }
  4536. write VentPlayers.txt /chan delete " $+ Team-A1"
  4537. write VentPlayers.txt /chan delete " $+ Team-B1"
  4538. timer 1 3 //run HIDERUN.EXE ventrcon.exe -n iGamingcz -w gogo4555 -a ig2mini3n32j4nj23k4nbhx -f VentPlayers.txt 80.179.153.12:11832
  4539. }
  4540.  
  4541. alias Set-Ventclose2 {
  4542. if ($exists(VentPlayers2.txt)) { remove VentPlayers2.txt }
  4543. write VentPlayers2.txt /chan delete " $+ Team-A2"
  4544. write VentPlayers2.txt /chan delete " $+ Team-B2"
  4545. timer 1 3 //run HIDERUN.EXE ventrcon.exe -n iGamingcz -w gogo4555 -a ig2mini3n32j4nj23k4nbhx -f VentPlayers2.txt 80.179.153.12:11832
  4546. }
  4547.  
  4548. alias Set-Ventclose3 {
  4549. if ($exists(VentPlayers3.txt)) { remove VentPlayers3.txt }
  4550. write VentPlayers3.txt /chan delete " $+ Team-A3"
  4551. write VentPlayers3.txt /chan delete " $+ Team-B3"
  4552. timer 1 3 //run HIDERUN.EXE ventrcon.exe -n iGamingcz -w gogo4555 -a ig2mini3n32j4nj23k4nbhx -f VentPlayers3.txt 80.179.153.12:11832
  4553. }
  4554.  
  4555. alias Set-Vent1 {
  4556. if ($exists(VentPlayers.txt)) { remove VentPlayers.txt }
  4557. write VentPlayers.txt /chan delete " $+ Team-A1"
  4558. write VentPlayers.txt /chan delete " $+ Team-B1"
  4559. timer 1 1 write VentPlayers.txt /subchan "#iGaming.cZ Gather #1" " $+ Team-A1" TeamA %Gather1.PassA asda1dd " $+ %Gather1.Team-A $+ "
  4560. timer 1 2 write VentPlayers.txt /subchan "#iGaming.cZ Gather #1" " $+ Team-B1" TeamB %Gather1.PassB asda1dd " $+ %Gather1.Team-B $+ "
  4561. timer 1 3 //run HIDERUN.EXE ventrcon.exe -n iGamingcz -w gogo4555 -a ig2mini3n32j4nj23k4nbhx -f VentPlayers.txt 80.179.153.12:11832
  4562. }
  4563.  
  4564. alias Set-Vent2 {
  4565. if ($exists(VentPlayers2.txt)) { remove VentPlayers2.txt }
  4566. write VentPlayers2.txt /chan delete " $+ Team-A2"
  4567. write VentPlayers2.txt /chan delete " $+ Team-B2"
  4568. timer 1 1 write VentPlayers2.txt /subchan "#iGaming.cZ Gather #2" " $+ Team-A2" TeamA %Gather2.PassA asda1dd " $+ %Gather2.Team-A $+ "
  4569. timer 1 2 write VentPlayers2.txt /subchan "#iGaming.cZ Gather #2" " $+ Team-B2" TeamB %Gather2.PassB asda1dd " $+ %Gather2.Team-B $+ "
  4570. timer 1 3 //run HIDERUN.EXE ventrcon.exe -n iGamingcz -w gogo4555 -a ig2mini3n32j4nj23k4nbhx -f VentPlayers2.txt 80.179.153.12:11832
  4571. }
  4572.  
  4573. alias Set-Vent3 {
  4574. if ($exists(VentPlayers3.txt)) { remove VentPlayers3.txt }
  4575. write VentPlayers3.txt /chan delete " $+ Team-A3"
  4576. write VentPlayers3.txt /chan delete " $+ Team-B3"
  4577. timer 1 1 write VentPlayers3.txt /subchan "#iGaming.cZ Gather #3" " $+ Team-A3" TeamA %Gather3.PassA asda1dd " $+ %Gather3.Team-A $+ "
  4578. timer 1 2 write VentPlayers3.txt /subchan "#iGaming.cZ Gather #3" " $+ Team-B3" TeamB %Gather3.PassB asda1dd " $+ %Gather3.Team-B $+ "
  4579. timer 1 3 //run HIDERUN.EXE ventrcon.exe -n iGamingcz -w gogo4555 -a ig2mini3n32j4nj23k4nbhx -f VentPlayers3.txt 80.179.153.12:11832
  4580. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement