Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- on *:text:*:*: {
- if ($target ischan) && ($target == %Gather.Channel) {
- 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 }
- 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 }
- 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- }
- 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- }
- if ($1 == %Gather.Sign $+ Clubs) && (!%Gather.Flood) {
- mode %Gather.Channel +m
- var %x 1
- while (%x <= $numtok(%Gather.clubs,32)) {
- timer -m 1 $calc(%x *1500) 2hl $gettok(%Gather.clubs,%x,32)
- inc %x
- }
- timer -m 1 $calc(%x *1500 +1) mode %Gather.Channel -m
- }
- if ($1- == %Gather.Sign $+ Status) && (!%Gather.Flood) {
- status-1
- status-2
- status-3
- set -u10 %Gather.Flood ON Status ALL
- halt
- }
- if ($1 == %Gather.Sign $+ admin) && (!%Gather.Flood) {
- if (%Gather1.Status == ON) || (%Gather1.Status == adding) {
- msg %Gather.Channel $stl-1(2A14dmin Is:2 %gather1.admin)
- }
- if (%Gather2.Status == ON) || (%Gather2.Status == adding) {
- msg %Gather.Channel $stl-2(2A14dmin Is:2 %gather2.admin)
- }
- if (%Gather3.Status == ON) || (%Gather3.Status == adding) {
- msg %Gather.Channel $stl-3(2A14dmin Is:2 %gather3.admin)
- }
- set -u3 %Gather.Flood ON admin
- halt
- }
- if ($1 == %Gather.Sign $+ map) && (!$2) && (!%Gather.Flood) {
- if (%Gather1.Status == ON) || (%Gather1.Status == adding) {
- msg %Gather.Channel $stl-1(2M14ap Is:2 $+ %gather1.map $+)
- }
- if (%Gather2.Status == ON) || (%Gather2.Status == adding) {
- msg %Gather.Channel $stl-2(2M14ap Is:2 $+ %gather2.map $+)
- }
- if (%Gather3.Status == ON) || (%Gather3.Status == adding) {
- msg %Gather.Channel $stl-3(2M14ap Is:2 $+ %gather3.map $+)
- }
- set -u3 %Gather.Flood ON map
- halt
- }
- 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
- 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
- ;if ($istok($bvar(&score,1-).text,$1,32)) { msg %gather.channel $bvar(&rcon,1-).text | halt }
- if ($1- == %Gather.Sign $+ Score) && (!%Gather.Flood) {
- if (%Gather1.Status == ON) {
- if (!%Gather1.Live) { msg %Gather.Channel $stl-1(12Match Is not Live Yet.) }
- 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.]) }
- 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.]) }
- }
- if (%Gather2.Status == ON) {
- if (!%Gather2.Live) { msg %Gather.Channel $stl-2(12Match Is not Live Yet.) }
- 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.]) }
- 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.]) }
- }
- if (%Gather3.Status == ON) {
- if (!%Gather3.Live) { msg %Gather.Channel $stl-3(12Match Is not Live Yet.) }
- 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.]) }
- 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.]) }
- }
- set -u6 %Gather.Flood ON Status
- }
- if ($1- == %Gather1.Sign $+ Sub) && (%Gather1.Sub == A) && (!%Gather.Flood) && (%Gather1.Status == ON) && (!$istok(%Gather2.Subs,$nick,32)) && (!$istok(%Gather3.Subs,$nick,32)) {
- msg %Gather.Channel 4G14ather 1: 2» 2A14ttention2: 12Substitute player was found For 2T14eam-A ,2 $nick .
- tsay Substitute player was found for Team-A - $nick
- .timerSubA-1 off
- unset %Gather1.Sub
- set %Gather1.Subs $addtok(%Gather1.Subs,$nick,32)
- msg $nick $details(1).A
- set -u5 %Gather.Flood Sub Found
- set -u5 %Gather.Flood ON subsearching1
- halt
- }
- if ($1- == %Gather1.Sign $+ Sub) && (%Gather1.Sub == B) && (!%Gather.Flood) && (%Gather1.Status == ON) && (!$istok(%Gather2.Subs,$nick,32)) && (!$istok(%Gather3.Subs,$nick,32)) {
- msg %Gather.Channel 4G14ather 1: 2» 2A14ttention2: 12Substitute player was found For 4T14eam-B ,2 $nick .
- tsay Substitute player was found for Team-B - $nick
- .timerSubB-1 off
- unset %Gather1.Sub
- set %Gather1.Subs $addtok(%Gather1.Subs,$nick,32)
- msg $nick $details(1).B
- set -u5 %Gather.Flood Sub Found
- set -u5 %Gather.Flood ON subsearching1
- halt
- }
- if ($1- == %Gather2.Sign $+ Sub) && (%Gather2.Sub == A) && (!%Gather.Flood) && (%Gather2.Status == ON) && (!$istok(%Gather1.Subs,$nick,32)) && (!$istok(%Gather3.Subs,$nick,32)) {
- msg %Gather.Channel 4G14ather 2: 2» 2A14ttention2: 12Substitute player was found for 2T14eam-A ,2 $nick .
- tsay2 Substitute player was found for Team-A - $nick
- .timerSubA-2 off
- unset %Gather2.Sub
- set %Gather2.Subs $addtok(%Gather2.Subs,$nick,32)
- msg $nick $details(2).A
- set -u5 %Gather.Flood Sub Found
- set -u5 %Gather.Flood ON subsearching2
- halt
- }
- if ($1- == %Gather2.Sign $+ Sub) && (%Gather2.Sub == B) && (!%Gather.Flood) && (%Gather2.Status == ON) && (!$istok(%Gather1.Subs,$nick,32)) && (!$istok(%Gather3.Subs,$nick,32)) {
- msg %Gather.Channel 4G14ather 2: 2» 2A14ttention2: 12Substitute player was found for 4T14eam-B ,2 $nick .
- tsay2 Substitute player was found for Team-B - $nick
- .timerSubB-2 off
- unset %Gather2.Sub
- set %Gather2.Subs $addtok(%Gather2.Subs,$nick,32)
- msg $nick $details(2).B
- set -u5 %Gather.Flood Sub Found
- set -u5 %Gather.Flood ON subsearching2
- halt
- }
- if ($1- == %Gather3.Sign $+ Sub) && (%Gather3.Sub == A) && (!%Gather.Flood) && (%Gather3.Status == ON) && (!$istok(%Gather1.Subs,$nick,32)) && (!$istok(%Gather2.Subs,$nick,32)) {
- msg %Gather.Channel 4G14ather 3: 2» 2A14ttention2: 12Substitute player was found for 2T14eam-A ,2 $nick .
- tsay3 Substitute player was found for Team-A - $nick
- .timerSubA-3 off
- unset %Gather3.Sub
- set %Gather3.Subs $addtok(%Gather3.Subs,$nick,32)
- msg $nick $details(3).A
- set -u5 %Gather.Flood Sub Found
- set -u5 %Gather.Flood ON subsearching3
- halt
- }
- if ($1- == %Gather3.Sign $+ Sub) && (%Gather3.Sub == B) && (!%Gather.Flood) && (%Gather3.Status == ON) && (!$istok(%Gather1.Subs,$nick,32)) && (!$istok(%Gather2.Subs,$nick,32)) {
- msg %Gather.Channel 4G14ather 3: 2» 2A14ttention2: 12Substitute player was found For 4T14eam-B ,2 $nick .
- tsay3 Substitute player was found for Team-B - $nick
- .timerSubB-3 off
- unset %Gather3.Sub
- set %Gather3.Subs $addtok(%Gather3.Subs,$nick,32)
- msg $nick $details(3).B
- set -u5 %Gather.Flood Sub Found
- set -u5 %Gather.Flood ON subsearching3
- halt
- }
- if ($1- == %Gather.Sign $+ Server) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) {
- set -u6 %Gather.Flood ON Server
- 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 $+ )
- halt
- }
- if ($1 == %Gather.Sign $+ Server) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) && ($2) && ($2 == 1) {
- set -u7 %Gather.Flood ON Server $2
- 2hl %Gather1.server
- .timer -m 1 500 hlplayers %Gather1.server
- halt
- }
- if ($1 == %Gather.Sign $+ Server) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) && ($2) && ($2 == 2) {
- set -u7 %Gather.Flood ON Server $2
- 2hl %Gather2.server
- .timer -m 1 500 hlplayers %Gather2.server
- halt
- }
- if ($1 == %Gather.Sign $+ Server) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) && ($2) && ($2 == 3) {
- set -u7 %Gather.Flood ON Server $2
- 2hl %Gather3.server
- .timer -m 1 500 hlplayers %Gather3.server
- halt
- }
- 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) {
- 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! }
- 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! }
- 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! }
- 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! }
- 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! }
- 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! }
- set -u3 %gather.flood ON Pass
- }
- if ($1 == %Gather.Sign $+ Server) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && ($2) && ($2 > 3) {
- set -u7 %Gather.Flood ON Server $2
- 2hl $$gettok(%gather.clubs,$calc($2 -3),32)
- .timer -m 1 500 hlplayers $$gettok(%gather.clubs,$calc($2 -3),32)
- halt
- }
- if ($1- == %Gather.Sign $+ Servers) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) {
- set -u9 %Gather.Flood ON Server
- 2hl %Gather1.Server
- .timer 1 2 2hl %Gather2.Server
- .timer 1 4 2hl %Gather3.Server
- halt
- }
- if ($1- == %Gather.Sign $+ Top-Players) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top players | halt }
- if ($1- == %Gather.Sign $+ TopPlayers) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top players | halt }
- if ($1- == %Gather.Sign $+ ToPlayers) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top players | halt }
- if ($1- == %Gather.Sign $+ Top-10) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top 10 | halt }
- if ($1- == %Gather.Sign $+ Top10) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top 10 | halt }
- if ($1- == %Gather.Sign $+ Top-Aces) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) { top Aces | halt }
- if ($1- == %Gather.Sign $+ TopAces) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) { top Aces | halt }
- if ($1- == %Gather.Sign $+ Top-Mvps) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top mvps | halt }
- if ($1- == %Gather.Sign $+ TopMvps) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top mvps | halt }
- if ($1- == %Gather.Sign $+ Top-Admins) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top admins | halt }
- if ($1- == %Gather.Sign $+ TopAdmins) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) { top admins | halt }
- if ($1 == %Gather.Sign $+ Rank) && ($2) && ($stats($2-).score) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) {
- var %steam = $stats($2-).nick
- set -u5 %Gather.Flood ON rank
- 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 .
- halt
- }
- 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) {
- var %steam = $stats($2-).nick
- set -u10 %Gather.Flood ON rank
- top gunplayer %steam
- }
- 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) {
- var %steam = $stats($2-).nick
- set -u3 %Gather.Flood ON rank
- msg %Gather.Channel $stl(12 $+ %steam $+ 12M14vp`s:2 $stats(%steam).mvps - 12R14ank:2 $rank(%steam) $+ 12/ $+ $ini(Gatherbot/stats.ini,0) )
- }
- if ($1 == %Gather.Sign $+ Aces) && ($2) && ($stats($2-).score) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) {
- var %steam = $stats($2-).nick
- set -u3 %Gather.Flood ON rank
- msg %Gather.Channel $stl(12 $+ %steam $+ 12A14ce`s:2 $stats(%steam).Aces - 12R14ank:2 $rank(%steam) $+ 12/ $+ $ini(Gatherbot/stats.ini,0) )
- }
- if ($1- == %Gather1.Sign $+ Last) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) {
- if (%Gather1.last-map) {
- msg %Gather.Channel 2» 2L14ast G14ather W14as2: 14in12 %Gather1.Last-Started $+ , 14at12 %Gather1.Last-Map $+ , 14by12 %Gather1.Last-Admin .
- }
- else { msg %Gather.channel $stl-1(12There is no last gather yet.14) }
- if (%Gather2.last-map) {
- msg %Gather.Channel 2» 2L14ast G14ather W14as2: 14in12 %Gather2.Last-Started $+ , 14at12 %Gather2.Last-Map $+ , 14by12 %Gather2.Last-Admin .
- }
- else { msg %Gather.channel $stl-2(12There is no last gather yet.14) }
- if (%Gather3.last-map) {
- msg %Gather.Channel 2» 2L14ast G14ather W14as2: 14in12 %Gather3.Last-Started $+ , 14at12 %Gather3.Last-Map $+ , 14by12 %Gather3.Last-Admin .
- }
- else { msg %Gather.channel $stl-3(12There is no last gather yet.14) }
- halt
- }
- if ($1- == %Gather1.Sign $+ Add) && (%Gather1.Status == adding) {
- set %Gather1.Players $addtok(%Gather1.Players,$nick,32)
- set %Gather2.Players $addtok(%Gather2.Players,$nick,32)
- set %Gather3.Players $addtok(%Gather3.Players,$nick,32)
- if (!%Gather.Flood) {
- players-1
- set -u3 %Gather.Flood ON - Players
- }
- halt
- }
- if ($1- == %Gather2.Sign $+ Add) && (%Gather2.Status == adding) {
- set %Gather1.Players $addtok(%Gather1.Players,$nick,32)
- set %Gather2.Players $addtok(%Gather2.Players,$nick,32)
- set %Gather3.Players $addtok(%Gather3.Players,$nick,32)
- if (!%Gather.Flood) {
- players-2
- set -u3 %Gather.Flood ON - Players
- }
- halt
- }
- if ($1- == %Gather3.Sign $+ Add) && (%Gather3.Status == adding) {
- set %Gather1.Players $addtok(%Gather1.Players,$nick,32)
- set %Gather2.Players $addtok(%Gather2.Players,$nick,32)
- set %Gather3.Players $addtok(%Gather3.Players,$nick,32)
- if (!%Gather.Flood) {
- players-3
- set -u3 %Gather.Flood ON - Players
- }
- halt
- }
- if ($1- == %Gather4.Sign $+ Add) && (%Gather4.Status == adding) {
- set %Gather4.Players $addtok(%Gather4.Players,$nick,32)
- if (!%Gather.Flood) {
- players-4
- set -u3 %Gather.Flood ON - Players
- }
- halt
- }
- if (($1- == %Gather1.Sign $+ Remove) || ($1 == !Del)) && (%Gather1.Status == adding) && ($istok(%Gather1.players,$nick,32)) && ($nick !== %Gather1.Admin) {
- set %Gather1.players $remtok(%Gather1.players,$nick,1,32)
- if (!%Gather.Flood) {
- players-1
- set -u3 %Gather.Flood ON - Players
- }
- halt
- }
- if (($1- == %Gather1.Sign $+ Remove) || ($1 == !Del)) && (%Gather1.Status == adding) && ($istok(%Gather1.players,$nick,32)) && ($nick !== %Gather1.Admin) {
- set %Gather1.players $remtok(%Gather1.players,$nick,1,32)
- if (!%Gather.Flood) {
- players-1
- set -u3 %Gather.Flood ON - Players
- }
- halt
- }
- if (($1- == %Gather2.Sign $+ Remove) || ($1 == !Del)) && (%Gather2.Status == adding) && ($istok(%Gather2.players,$nick,32)) && ($nick !== %Gather2.Admin) {
- set %Gather2.players $remtok(%Gather2.players,$nick,1,32)
- if (!%Gather.Flood) {
- players-2
- set -u3 %Gather.Flood ON - Players
- }
- halt
- }
- if (($1- == %Gather3.Sign $+ Remove) || ($1 == !Del)) && (%Gather3.Status == adding) && ($istok(%Gather3.players,$nick,32)) && ($nick !== %Gather3.Admin) {
- set %Gather3.players $remtok(%Gather3.players,$nick,1,32)
- if (!%Gather.Flood) {
- players-3
- set -u3 %Gather.Flood ON - Players
- }
- halt
- }
- if (($1- == %Gather4.Sign $+ Remove) || ($1 == !Del)) && (%Gather4.Status == adding) && ($istok(%Gather4.players,$nick,32)) && ($nick !== %Gather4.Admin) {
- set %Gather4.players $remtok(%Gather3.players,$nick,1,32)
- if (!%Gather.Flood) {
- players-4
- set -u3 %Gather.Flood ON - Players
- }
- halt
- }
- if ($1- == %Gather.Sign $+ Players) && (!%Gather.Flood) {
- fteams1 | fteams2 | fteams3
- if (%Gather1.Status == adding) players-1
- if (%Gather2.Status == adding) players-2
- if (%Gather3.Status == adding) players-3
- set -u7 %Gather.Flood ON
- halt
- }
- if ($1- == %Gather.Sign $+ Teams) && (!%Gather.Flood) { set -u8 %Gather.Flood ON | fteams1 | fteams2 | fteams3 | halt }
- if ($1- == %Gather.Sign $+ Vent) && (!%Gather.Flood) {
- 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«)))
- set -u2 %Gather.Flood Vent
- halt
- }
- if ($1 == %Gather.Sign $+ Gathers) && ($admin?($2-)) && ($2) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) {
- set -u7 %Gather.Flood Vent
- msg %Gather.Channel $stl(2 $+ $+ $admin?($2-) 14Has done12 $Gathers($admin?($2-)) 14Gathers so far.)
- halt
- }
- if ($1 == %Gather.Sign $+ Gathers) && ($master?($2-)) && ($2) && (!%Gather.Flood) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) {
- set -u7 %Gather.Flood Vent
- msg %Gather.Channel $stl(2 $+ $+ $master?($2-) 14Has done12 $Gathers($master?($2-)) 14Gathers so far.)
- halt
- }
- 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 }
- if ($1- == %Gather.Sign $+ Admins) && (%Gather1.Status !== adding) && (%Gather2.Status !== adding) && (%Gather3.Status !== adding) && (%Gather4.Status !== adding) && (!%Gather.Flood) {
- set -u15 %Gather.Flood AdminsMasters
- if (!$masters) showadmins
- if ($masters) showmasters
- halt
- }
- 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 }
- 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 }
- 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) {
- 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
- set -u4 %Gather.Flood Vent
- halt
- }
- if ($admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) || ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) || ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && (!%Gather.Floodmode) {
- var %o = $admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
- if ($1 == !rstart) && (%gather1.status == adding) && ($numtok(%gather1.players,32) >= 10) && ($nick == %Gather1.Admin) {
- if (!%Gather.Flood) {
- mixteams1 %gather1.players
- .timer 1 20 mode %Gather.channel -m
- set -u35 %Gather.Flood ON $nick
- set -u35 %Gather.Floodmode ON $nick
- mode %Gather.channel +m
- set %Gather1.Status ON
- set -u10 %Gather.Flood rstart
- .timer 1 3 teams1
- .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.
- .timer 1 5 send1
- .timer 1 6 Set-Vent1
- .timer 1 15 rconstart
- .timer 1 16 rconstart2
- .timer 1 17 rconstart3
- }
- halt
- }
- if ($1 == !rstart) && (%gather2.status == adding) && ($numtok(%gather2.players,32) >= 10) && ($nick == %Gather2.Admin) {
- if (!%Gather.Flood) {
- mixteams2 %gather2.players
- .timer 1 20 mode %Gather.channel -m
- set -u35 %Gather.Flood ON $nick
- set -u35 %Gather.Floodmode ON $nick
- mode %Gather.channel +m
- set %Gather2.Status ON
- set -u10 %Gather.Flood rstart
- .timer 1 3 teams2
- .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.
- .timer 1 5 send2
- .timer 1 6 Set-Vent2
- .timer 1 15 rconstart
- .timer 1 16 rconstart2
- .timer 1 17 rconstart3
- }
- halt
- }
- if ($1 == !rstart) && (%gather3.status == adding) && ($numtok(%gather3.players,32) >= 10) && ($nick == %Gather3.Admin) {
- if (!%Gather.Flood) {
- mixteams3 %gather3.players
- .timer 1 20 mode %Gather.channel -m
- set -u35 %Gather.Flood ON $nick
- set -u35 %Gather.Floodmode ON $nick
- mode %Gather.channel +m
- set %Gather3.Status ON
- set -u10 %Gather.Flood rstart
- .timer 1 3 teams3
- .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.
- .timer 1 5 send3
- .timer 1 6 Set-Vent3
- .timer 1 15 rconstart
- .timer 1 16 rconstart2
- .timer 1 17 rconstart3
- }
- halt
- }
- 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 }
- 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 }
- 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 }
- if ($1- == %Gather.Sign $+ Notice) && (!%FS) {
- if (%Gather4.status == adding) {
- Set -u10 %FS ON
- mode %Gather.channel -N
- .notice %Gather.channel $stl(Gather[4] is 9ON14 Players: (12 $+ $numtok(%Gather4.Players,32) $+ 14/12 $+ %Gather4.Maxplayers $+ 14) Type 12!Add14 to Join)
- .notice %Gather.channel $stl(Admin:12 %Gather4.Admin 14- Map:12 %Gather4.Map 14- Commands: 12!14Add - 12!14Remove - 12!14Status)
- .timer 1 2 mode %Gather.Channel +N
- halt
- }
- if (%Gather3.status == adding) {
- Set -u10 %FS ON
- mode %Gather.channel -N
- .notice %Gather.channel $stl(Gather[3] is 9ON14 Players: (12 $+ $numtok(%Gather3.Players,32) $+ 14/12 $+ %Gather3.Maxplayers $+ 14) Type 12!Add14 to Join)
- .notice %Gather.channel $stl(Admin:12 %Gather3.Admin 14- Map:12 %Gather3.Map 14- Commands: 12!14Add - 12!14Remove - 12!14Status)
- .timer 1 2 mode %Gather.Channel +N
- halt
- }
- if (%Gather2.status == adding) {
- Set -u10 %FS ON
- mode %Gather.channel -N
- .notice %Gather.channel $stl(Gather[2] is 9ON14 Players: (12 $+ $numtok(%Gather2.Players,32) $+ 14/12 $+ %Gather2.Maxplayers $+ 14) Type 12!Add14 to Join)
- .notice %Gather.channel $stl(Admin:12 %Gather2.Admin 14- Map:12 %Gather2.Map 14- Commands: 12!14Add - 12!14Remove - 12!14Status)
- .timer 1 2 mode %Gather.Channel +N
- halt
- }
- if (%Gather1.status == adding) {
- Set -u10 %FS ON
- mode %Gather.channel -N
- .notice %Gather.channel $stl(Gather[1] is 9ON14 Players: (12 $+ $numtok(%Gather1.Players,32) $+ 14/12 $+ %Gather1.Maxplayers $+ 14) Type 12!Add14 to Join)
- .notice %Gather.channel $stl(Admin:12 %Gather1.Admin 14- Map:12 %Gather1.Map 14- Commands: 12!14Add - 12!14Remove - 12!14Status)
- .timer 1 2 mode %Gather.Channel +N
- halt
- }
- }
- if ($1- == +m) && (!%Gather.Floodmode) { mode # +m | set -u3 %Gather.Floodmode ON | halt }
- if ($1- == -m) && (!%Gather.Floodmode) { mode # -m | set -u3 %Gather.Floodmode ON | halt }
- if ($1- == +r) && (!%Gather.Floodmode) { mode # +r | set -u3 %Gather.Floodmode ON | halt }
- if ($1- == -r) && (!%Gather.Floodmode) { mode # -r | set -u3 %Gather.Floodmode ON | halt }
- if ($1 == !End) { gather end1 $nick | Set-Ventclose | set -u3 %Gather.Floodmode ON | halt }
- if ($1 == !End1) { gather end1 $nick | Set-Ventclose2 | set -u3 %Gather.Floodmode ON | halt }
- if ($1 == !End2) { gather end2 $nick | Set-Ventclose3 | set -u3 %Gather.Floodmode ON | halt }
- if ($1 == !End3) { gather end3 $nick | set -u3 %Gather.Floodmode ON | halt }
- if ($1 == !Stop) { gather stop1 $nick | set -u3 %Gather.Floodmode ON | halt }
- if ($1 == !Stop1) { gather stop1 $nick | set -u3 %Gather.Floodmode ON | halt }
- if ($1 == !Stop2) { gather stop2 $nick | set -u3 %Gather.Floodmode ON | halt }
- if ($1 == !Stop3) { gather stop3 $nick | set -u3 %Gather.Floodmode ON | halt }
- if ($1 == !nosub) { Gather SubSearch1 off | set -u3 %Gather.Floodmode ON | halt }
- if ($1 == .noSub) { Gather SubSearch2 off | set -u3 %Gather.Floodmode ON | halt }
- if ($1 == @noSub) { Gather SubSearch3 off | set -u3 %Gather.Floodmode ON | halt }
- if ($1 == !needSub) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch1 $2 | halt }
- if ($1 == .needSub) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch2 $2 | halt }
- if ($1 == @needSub) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch3 $2 | halt }
- if ($1 == !map) {
- if (%Gather1.Status == adding) {
- rcmd admin_command admin_map $2-
- msg %Gather.channel $stl-1(Map Changed To $2-)
- }
- if (%Gather2.Status == adding) {
- rcmd2 admin_command admin_map $2-
- msg %Gather.channel $stl-2(Map Changed To $2-)
- }
- if (%Gather3.Status == adding) {
- rcmd3 admin_command admin_map $2-
- msg %Gather.channel $stl-3(Map Changed To $2-)
- }
- halt
- }
- 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 }
- }
- }
- if ($target !ischan) {
- if ($1 == %Gather.Sign-PM $+ Login) && ($3) && (!$admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($readini(Gatherbot/Admins.ini,$2,Pass) == $3) {
- set -u3 %Gather.Flood Login $nick
- whois $Nick
- msg $Nick $stl(14You Has been connected to 12Admin14 account (2 $+ $2 $+ 14)) 12 %vent.adminpass
- ;msg %Gather.channel $stl(2 $+ $nick 14Has connected to 12Admin14 account (2 $+ $2 $+ 14))
- mode %Gather.channel +v $nick
- msg $nick admin_password $3 על מנת להתחבר לאדמין בשרת הפקודה
- msg $nick #IGaming #iGaming.crew חובה כניסה לערוץ
- .writeini -n Gatherbot/Admins.ini $2 Logged *!*@ $+ $gettok($address,2-,$asC(@))
- .writeini -n Gatherbot/Admins.ini $2 Last-Login $date $time
- .writeini -n Gatherbot/Admins.ini $2 User $nick
- }
- if ($1 == %Gather.Sign-PM $+ Login) && ($3) && (!$owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($readini(Gatherbot/owners.ini,$2,Pass) == $3) {
- set -u3 %Gather.Flood Login $nick
- whois $Nick
- msg $Nick $stl(14You Has been connected to 12Owner14 account (2 $+ $2 $+ 14))
- ;msg %Gather.channel $stl(2 $+ $nick 14Has connected to 12Owner14 account (2 $+ $2 $+ 14))
- msg $nick admin_password $3 על מנת להתחבר לאדמין בשרת הפקודה
- .writeini -n Gatherbot/Owners.ini $2 Logged *!*@ $+ $gettok($address,2-,$asC(@))
- .writeini -n Gatherbot/Owners.ini $2 Last-Login $date $time
- .writeini -n Gatherbot/Owners.ini $2 User $nick
- }
- if ($1 == %Gather.Sign-PM $+ Login) && ($3) && (!$masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($readini(Gatherbot/masters.ini,$2,Pass) == $3) {
- set -u3 %Gather.Flood Login $nick
- whois $Nick
- msg $Nick $stl(2You 14Has connected to 12Master14 account (2 $+ $2 $+ 14))
- ;msg %Gather.channel $stl(2 $+ $nick 14Has connected to 12Master14 account (2 $+ $2 $+ 14))
- ;mode %Gather.channel +v $nick
- msg $nick admin_password $3 על מנת להתחבר לאדמין בשרת הפקודה
- msg $nick #IGaming #iGaming.crew חובה כניסה לערוץ
- .writeini -n Gatherbot/Masters.ini $2 Logged *!*@ $+ $gettok($address,2-,$asC(@))
- .writeini -n Gatherbot/Masters.ini $2 Last-Login $date $time
- .writeini -n Gatherbot/Masters.ini $2 User $nick
- }
- if ($admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) || ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) || ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- if ($admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) var %o $v1 admins
- if ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) var %o $v1 masters
- if ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) var %o $v1 owners
- if ($1 == %Gather.Sign $+ Ignore2010) && ($2) { .ignore $2- | set %Gather.Ignored $addtok(%Gather.Ignored,$2-,32) | halt }
- if ($1 == %Gather.Sign $+ UnIgnore) && ($2) { .ignore -r $2- | set %Gather.Ignored $remtok(%Gather.Ignored,$2-,32) | halt }
- ;if ($1 == %Gather1.Sign $+ Kick) { kick $$2 $iif($3,Reason: $3-) | halt }
- if ($1 == %Gather.Sign $+ Ban) && ($2) { rcmd admin_command admin_ban $2 | ssay $2 Banned by %rcon.nick }
- if ($1 == %Gather.Sign $+ unBan) && ($2) { rcmd admin_command admin_unban $2 | ssay $2 Unanned by %rcon.nick }
- if ($1 == %Gather1.Sign $+ Sub) && ($2) && ( ($2 == A) || ($2 == B) || ($2 == OFF) ) { Gather SubSearch1 $2 }
- if ($1 == %Gather2.Sign $+ Sub) && ($2) && ( ($2 == A) || ($2 == B) || ($2 == OFF) ) { Gather SubSearch2 $2 }
- if ($1 == %Gather3.Sign $+ Sub) && ($2) && ( ($2 == A) || ($2 == B) || ($2 == OFF) ) { Gather SubSearch3 $2 }
- 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 }
- 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 }
- 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 }
- 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 }
- if ($1 == !recon) && ($target !ischan) { .msg $nick Done | rconstart | .timer 1 2 rconstart2 | .timer 1 4 rconstart3 }
- }
- if ($1 == %Gather.Sign-PM $+ Owners) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- set %lala $nick
- showowners2
- .timer 1 4 unset %lala
- }
- if ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) || ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- 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)) }
- if ($1 == %Gather.Sign-PM $+ Set) {
- if ($2 == R-Runs) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- var %x 1
- while ($ini(gatherbot/admins.ini,%x)) {
- writeini -n gatherbot/admins.ini $v1 gathers 0
- inc %x
- }
- var %x 1
- while ($ini(gatherbot/masters.ini,%x)) {
- writeini -n gatherbot/masters.ini $v1 gathers 0
- inc %x
- }
- var %x 1
- while ($ini(gatherbot/owners.ini,%x)) {
- writeini -n gatherbot/owners.ini $v1 gathers 0
- inc %x
- }
- msg $nick $stl(Done... all the runs now is 0)
- }
- 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)) }
- if ($2 == ResetRRds) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- Part %Gather.Channel
- msg $nick $stl(Restarting Gatherbot Please wait (Gatherbot By12 $+($chr(86),$chr(101),$chr(110),$chr(116),$chr(111),$chr(120)) $+ 14))
- unset %Gather*.Players
- unset %Gather.Flood
- unset %Gather*.Last*
- set %Gather1.Status off
- set %Gather2.Status off
- set %Gather3.Status off
- set %Gather4.Status off
- set %Gather.num 0
- .ignore -r
- unset %gather.ignored
- set %Gather.Sign !
- set %Gather.Sign-Pm !
- set %Gather1.Sign !
- Set %Gather2.Sign !
- Set %Gather3.Sign !
- Set %Gather4.Sign !
- set %Gather1.SignServer !
- set %Gather2.SignServer !
- set %Gather3.SignServer !
- set %Gather4.SignServer !
- set %Gather1.num 0
- set %Gather2.num 0
- set %Gather3.num 0
- set %Gather4.num 0
- set %Gather1.Port 7575
- set %Gather2.Port 7676
- set %Gather3.Port 7777
- set %Gather4.Port 7878
- set %Gather1.MaxPlayers 10
- set %Gather2.MaxPlayers 10
- set %Gather3.MaxPlayers 10
- set %Gather4.MaxPlayers 10
- unset %Gather*.Team*
- unset %Gather*.half
- unset %Gather*.Score*
- unset %Gather*.Live
- unset %Gather*.Map
- unset %Gather*.Admin
- unset %Gather*.Pas*
- unset %Gather*.Sub*
- unset %Gather*.Started
- .remove Gatherbot/Admins.ini
- .remove Gatherbot/Owners.ini
- .remove Gatherbot/Masters.ini
- set %new-- $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
- var %x $+($r(1,9),$r(1,9),$r(1,9),$r(1,9))
- msg $nick The Master Accont is Admin, To login he needs to use: /msg $me !login GatherBot %new--
- msg $nick You can delete him if you do new master (command: !set master <NICK> <PASS> <SERVERNICK>)
- .writeini -n Gatherbot/owners.ini GatherBot User GatherBot
- .writeini -n Gatherbot/owners.ini GatherBot Pass %new--
- .writeini -n Gatherbot/owners.ini GatherBot ServerNick GatherBot
- .writeini -n Gatherbot/owners.ini GatherBot Gathers 0
- .writeini -n Gatherbot/owners.ini GatherBot Status OFF
- .remove Gatherbot/Stats.ini
- .timers off
- sockclose *
- .timer 1 3 join %Gather.channel
- .timer 1 8 rconstart
- .timer 1 12 rconstart2
- .timer 1 15 rconstart3
- .timer 1 18 rconstart4
- }
- if ($2 == ResetStats) { .msg $nick Restarting Stats. | .remove Gatherbot/stats.ini }
- if ( ($1 == %Gather.Sign-PM $+ Join) || ($1 == %Gather.Sign-PM $+ J) ) && ($2) { join $2- | msg $nick 2» 2J14oining 2T14o:12 $2 2« }
- if ($2 == Retryrcon) { .msg $nick Retry Rcons... | rconstart | .timer 1 2 rconstart2 | .timer 1 4 rconstart3 }
- 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 }
- if ($1- == %Gather.Sign-PM $+ set Closeall) { //close -m | msg $nick 12All The Pms Closed.1 }
- if ($1- == %Gather.Sign-PM $+ set Reconnect) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) { msg $nick 12Reconnecting...1 | .timer 1 2 server }
- if ($1- == %Gather.Sign-PM $+ set Reconnect) && ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) { msg $nick 12Reconnecting...1 | .timer 1 2 server }
- if ($2 == Channel) {
- 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 }
- else { msg $nick the correct usage is: %Gather.Sign-PM $+ Set $2 channel <Channel> | Halt }
- }
- if ($2 == Gather-Vent) {
- if (!$3-) || (*:* !iswm $3-) || ($4) { /msg $nick The correct usage is: %Gather.Sign-PM $+ Set Vent <IP:PORT> | Halt }
- set %gather.vent $3-
- /msg $nick Gathers Vent is now $3-
- HALT
- }
- if ($2 == Sxe) {
- if (!$3-) || (*:* !iswm $3-) || ($4) { /msg $nick The correct usage is: %Gather.Sign-PM $+ Set Sxe <LINK> | Halt }
- set %sxe $3-
- /msg $nick Sxe Link is Now $3-
- HALT
- }
- if ($2 == Server-1) {
- if (!$3-) || (*:* !iswm $3-) || ($4) { /msg $nick The correct usage is: %Gather.Sign-PM $+ Set Server-1 <IP:PORT> | Halt }
- /set %gather1.server $3-
- /msg $nick Server-1 is now $3-
- HALT
- }
- if ($2 == Server-2) {
- if (!$3-) || (*:* !iswm $3-) || ($4) { /msg $nick The correct usage is: %Gather.Sign-PM $+ Set Server-2 <IP:PORT> | Halt }
- /set %gather2.server $3-
- /msg $nick Server-2 is now $3-
- HALT
- }
- if ($2 == Server-3) {
- if (!$3-) || (*:* !iswm $3-) || ($4) { /msg $nick The correct usage is: %Gather.Sign-PM $+ Set Server-3 <IP:PORT> | Halt }
- /set %gather3.server $3-
- /msg $nick Server-3 is now $3-
- HALT
- }
- if ($1- == %Gather.Sign-PM $+ Set P-Servers) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- .timer 1 1 msg $nick 2S14erver Password 1:12 %Gather1.pass 1 2M14ap:12 %Gather1.map
- .timer 1 2 msg $nick 2S14erver Password 2:12 %Gather2.pass 1 2M14ap:12 %Gather2.map
- .timer 1 3 msg $nick 2S14erver Password 3:12 %Gather3.pass 1 2M14ap:12 %Gather3.map
- set -u5 %Bot.HelpFlood ON
- }
- if ($1- == %Gather.Sign-PM $+ Set P-Servers) && ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- .timer 1 1 msg $nick 2S14erver Password 1:12 %Gather1.pass 1 2M14ap:12 %Gather1.map
- .timer 1 2 msg $nick 2S14erver Password 2:12 %Gather2.pass 1 2M14ap:12 %Gather2.map
- .timer 1 3 msg $nick 2S14erver Password 3:12 %Gather3.pass 1 2M14ap:12 %Gather3.map
- set -u5 %Bot.HelpFlood ON
- }
- if ($2 == P-FTP) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %ftp $3 | .msg $nick FTP Password is Now $3 | Halt }
- if ($2 == Rconpass-1) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %Gather1.Rconpass $3 | .msg $nick RconPassword-1 is now $3 | Halt }
- if ($2 == Rconpass-2) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %Gather2.Rconpass $3 | .msg $nick RconPassword-2 is now $3 | Halt }
- if ($2 == Rconpass-3) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) && ($3) { set %Gather3.Rconpass $3 | .msg $nick RconPassword-3 is now $3 | Halt }
- 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 }
- 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 }
- 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 }
- 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 }
- 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 }
- 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 }
- if ($2 == Rcon-1) && ($3) { set %Gather1.Rconpass $3 | .msg $nick RconPassword-1 is now $3 | Halt }
- if ($2 == Rcon-2) && ($3) { set %Gather2.Rconpass $3 | .msg $nick RconPassword-2 is now $3 | Halt }
- if ($2 == Rcon-3) && ($3) { set %Gather3.Rconpass $3 | .msg $nick RconPassword-3 is now $3 | Halt }
- if ($2 == PassRoom) && ($3) { set %vent.adminpass $3 | .msg $nick The Channel Password to the Gathers Rooms is: $3 | Halt }
- if ($2 == dis) {
- if ($3 == admin) {
- if ($4 == all) {
- var %x 1
- while ($ini(gatherbot/admins.ini,%x)) {
- writeini -n gatherbot/admins.ini $v1 status off
- remini -n gatherbot/admins.ini $v1 logged
- inc %x
- }
- }
- else {
- writeini -n gatherbot/admins.ini $2 status off
- remini -n gatherbot/admins.ini $2 logged
- }
- }
- if ($3 == master) && ($Owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- if ($4 == all) {
- var %x 1
- while ($ini(gatherbot/masters.ini,%x)) {
- writeini -n gatherbot/masters.ini $v1 status off
- remini -n gatherbot/masters.ini $v1 logged
- inc %x
- }
- }
- else {
- writeini -n gatherbot/masters.ini $2 status off
- remini -n gatherbot/masters.ini $2 logged
- }
- }
- if ($3 == all) && ($Owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- var %x 1
- while ($ini(gatherbot/masters.ini,%x)) {
- writeini -n gatherbot/masters.ini $v1 status off
- remini -n gatherbot/masters.ini $v1 logged
- inc %x
- }
- var %x 1
- while ($ini(gatherbot/admins.ini,%x)) {
- writeini -n gatherbot/admins.ini $v1 status off
- remini -n gatherbot/admins.ini $v1 logged
- inc %x
- }
- }
- msg $nick $stl(-DONE-)
- }
- if ($2 == admin) {
- if (!$5) { /msg $nick The syntex is: %Gather.Sign-PM $+ Set admin <USER> <PASS> <NICKSERVER> | Halt }
- if ($readini(Gatherbot/Admins.ini,$3,User)) { /msg $nick $3 is already admin }
- else {
- .writeini -n Gatherbot/Admins.ini $3 User $3
- .writeini -n Gatherbot/Admins.ini $3 Pass $4
- .writeini -n Gatherbot/Admins.ini $3 ServerNick $5
- .writeini -n Gatherbot/Admins.ini $3 Gathers 0
- .writeini -n Gatherbot/Admins.ini $3 Status OFF
- .msg $nick $3 is now admin , To login he needs to use: /msg $me !login $3 $4
- upload.admins.list $nick
- }
- HALT
- }
- if ($2 == unadmin) {
- if (!$3) { /msg $nick Correct Usage is: /msg $me %Gather.Sign-PM $+ Set Unadmin <USER> | Halt }
- if ($readini(Gatherbot/Admins.ini,$3,User)) {
- .remini -n Gatherbot/Admins.ini $3
- /msg $nick $3 is no longer Admin!
- upload.admins.list $nick
- }
- else /msg $nick Cannot find User - $3
- HALT
- }
- }
- if ($2 == master) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- if (!$5) { /msg $nick The syntex is: %Gather.Sign-PM $+ Set master <USER> <PASS> <NICKSERVER> | Halt }
- if ($readini(Gatherbot/masters.ini,$3,User)) { /msg $nick $3 is already master }
- else {
- msg $nick $3 is now master , To login he needs to use: /msg $me !login $3 $4
- .writeini -n Gatherbot/masters.ini $3 User $3
- .writeini -n Gatherbot/masters.ini $3 Pass $4
- .writeini -n Gatherbot/masters.ini $3 ServerNick $5
- .writeini -n Gatherbot/masters.ini $3 Gathers 0
- .writeini -n Gatherbot/masters.ini $3 Status OFF
- upload.admins.list $nick
- }
- HALT
- }
- if ($2 == unmaster) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- if (!$3) { /msg $nick Correct Usage is: /msg $me %Gather.Sign-PM $+ Set Unmaster <USER> | Halt }
- if ($readini(Gatherbot/masters.ini,$3,User)) {
- .remini -n Gatherbot/masters.ini $3
- /msg $nick $3 is no longer Master!
- upload.admins.list $nick
- }
- else /msg $nick Cannot find User - $3
- HALT
- }
- if ($2 == owner) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- if (!$5) { /msg $nick The syntex is: %Gather.Sign-PM $+ Set owner <USER> <PASS> <NICKSERVER> | Halt }
- if ($readini(Gatherbot/owners.ini,$3,User)) { /msg $nick $3 is already owner }
- else {
- msg $nick $3 is now owner , To login he needs to use: /msg $me !login $3 $4
- .writeini -n Gatherbot/owners.ini $3 User $3
- .writeini -n Gatherbot/owners.ini $3 Pass $4
- .writeini -n Gatherbot/owners.ini $3 ServerNick $5
- .writeini -n Gatherbot/owners.ini $3 Gathers 0
- .writeini -n Gatherbot/owners.ini $3 Status OFF
- upload.admins.list $nick
- }
- HALT
- }
- if ($2 == unowner) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- if (!$3) { /msg $nick Correct Usage is: /msg $me %Gather.Sign-PM $+ Set Unowner <USER> | Halt }
- if ($readini(Gatherbot/owners.ini,$3,User)) {
- .remini -n Gatherbot/owners.ini $3
- /msg $nick $3 is no longer Owner!
- upload.admins.list $nick
- }
- else /msg $nick Cannot find User - $3
- HALT
- }
- if ($2 == AdminVent) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- if (!$4) { /msg $nick The syntex is: %Gather.Sign-PM $+ Set AdminVent <USER> <PASS> | Halt }
- if ($readini(Gatherbot\vent.ini,$3,User)) { /msg $nick $3 is already admin }
- else {
- .writeini -n Gatherbot\vent.ini $3 User $3
- .writeini -n Gatherbot\vent.ini $3 Pass $4
- .msg $nick $3 is now admin , Now Diconnect From Vent To Be Admin In Vent.
- upload.ventadmins.list $nick
- }
- HALT
- }
- if ($2 == UnAdminVent) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- if (!$3) { /msg $nick Correct Usage is: /msg $me %Gather.Sign-PM $+ Set UnAdminVent <USER> | Halt }
- if ($readini(Gatherbot\vent.ini,$3,User)) {
- .remini -n Gatherbot\vent.ini $3
- /msg $nick $3 is no longer admin Vent!
- upload.ventadmins.list $nick
- }
- else /msg $nick Cannot find This Admin In Vent - $3
- HALT
- }
- if ($2 == add-server) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- 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 }
- }
- if ($2 == del-server) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- set %gather.clubs $deltok(%gather.clubs,$3,32)
- msg $nick -Done- $3 deleted from the clubs list. clubs now are: %gather.clubs
- }
- if ($1- == %Gather.Sign-PM $+ Help) && ($target !ischan) && (!%Bot.HelpFlood) && ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- msg $nick 2O14wner 2c14ommands:1
- msg $nick %Gather.Sign-PM $+ Set PassRoom <12PASSWORD1> <12הסיסמא לחדרי ההרצה1> !Set Gather-Vent <12IP:PORT1> !Set Adv-Vent <12IP:PORT1> !Set ResetStat <12מאפס את כל הראנק1>
- 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>
- 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>
- .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>
- .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>
- .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>
- set -u5 %Bot.HelpFlood ON
- }
- if ($1- == %Gather.Sign-PM $+ Help) && ($target !ischan) && (!%Bot.HelpFlood) && ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- msg $nick 2M14aster 2c14ommands:1
- msg $nick %Gather.Sign-PM $+ Set Recon <12מהתחל את הריקון לעשות רק כשהגאטר בוט לא מגיב בשרתים1>
- msg $nick %Gather.Sign-PM $+ Set Admin <12USER1> <12PASS1> <12SERVER-NICK1>
- msg $nick %Gather.Sign-PM $+ Set Unadmin <12USER1>
- .timer 1 1 msg $nick %Gather.Sign-PM $+ Set status <12Nick1>
- .timer 1 1 msg $nick %Gather.Sign-PM $+ Set Dis <12Nick1> Or <12Admins1>
- .timer 1 1 msg $nick %Gather.Sign-PM $+ Set P-Servers <12מציג את הסיסמאות של הסרברים1>
- .timer 1 1 msg $nick %Gather.Sign-PM $+ Set Reconnect <12מתנתק ומתחבר מחדש1>
- .timer 1 1 msg $nick %Gather.Sign-PM $+ Set PassRoom <12PASSWORD1> <12הסיסמא לחדרי ההרצה1>
- set -u5 %Bot.HelpFlood ON
- }
- }
- if ($1- == %Gather.Sign-PM $+ Help) && ($target !ischan) && (!%Bot.HelpFlood) && ($admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- msg $nick 2A14dmin 2c14ommands:1
- msg $nick %Gather.Sign-PM $+ Recon <12פקודה מיוחדת למריצים במקרה שהבוט לא מגיב בשרתים 1>
- msg $nick %Gather.Sign-PM $+ Start <12Map1> <12Server-Pass1> <12Pass-A1> <12Pass-B1>
- msg $nick %Gather.Sign-PM $+ Start2 <12Map1> <12Server-Pass1> <12Pass-A1> <12Pass-B1>
- .timer 1 1 msg $nick %Gather.Sign-PM $+ Start3 <12Map1> <12Server-Pass1> <12Pass-A1> <12Pass-B1>
- set -u5 %Bot.HelpFlood ON
- }
- }
- alias stl { return 2» 14 $+ $1- }
- alias stl-1 { return 2» 2G14ather 12: 14 $1- }
- alias stl-2 { return 2» 2G14ather 22: 14 $1- }
- alias stl-3 { return 2» 2G14ather 32: 14 $1- }
- alias stl-4 { return 2» 2G14ather 42: 14 $1- }
- alias stl-5 { return 4G14ather 1 14 : $1- }
- alias stl-status-1 { return 2» 2G14ather Status 12: 14 $1- }
- alias stl-status-2 { return 2» 2G14ather Status 22: 14 $1- }
- alias stl-status-3 { return 2» 2G14ather Status 32: 14 $1- }
- alias stl-status-4 { return 2» 2G14ather Status 42: 14 $1- }
- on *:connect: { sockclose * | .timer 1 3 join %Gather.channel | .timer 1 1 rconstart | .timer 1 3 rconstart2 | .timer 1 5 rconstart3 }
- alias admins {
- if ($prop == logged?) && ($1) {
- var %x = 1
- while ($ini(Gatherbot/admins.ini,%x)) {
- if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),logged) == $1) { return $ini(Gatherbot/admins.ini,%x) | halt }
- inc %x
- set %admins 1
- }
- }
- if ($prop == logged.nick) && ($1) {
- if ($readini(Gatherbot/Admins.ini,$1,Logged)) { return $ial($readini(Gatherbot/Admins.ini,$1,Logged)).nick }
- elseif (!$readini(Gatherbot/Admins.ini,$1,Logged)) { return No Suck NickName }
- }
- if ($prop == steamid) && ($1) {
- var %x = $ini(Gatherbot/admins.ini,0)
- while (%x) { if ($1- == $readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),Steamid)) return $true | dec %x }
- return $false
- }
- if ($prop == status) && ($1) {
- if ($readini(Gatherbot/admins.ini,$1,Status) == ON) { return ON }
- elseif ($readini(Gatherbot/admins.ini,$1,Status) == OFF) { return OFF }
- }
- if (!$prop) && ($1 == ALL) {
- var %x = 1
- while ($ini(Gatherbot/admins.ini,%x)) { var %temp = %temp $ini(Gatherbot/admins.ini,%x) | inc %x }
- if (!$ini(Gatherbot/admins.ini,%x)) { return %temp }
- }
- if ($prop == NUM) && ($1 == ALL) { return $ini(Gatherbot/admins.ini,0) }
- if (!$prop) && ($1 == ON) {
- var %x = 1
- while ($ini(Gatherbot/admins.ini,%x)) {
- if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),status) == ON) { var %temp = %temp $ini(Gatherbot/admins.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/admins.ini,%x)) { return %temp }
- }
- if (!$prop) && ($1 == OFF) {
- var %x = 1
- while ($ini(Gatherbot/admins.ini,%x)) {
- if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),status) == OFF) { var %temp = %temp $ini(Gatherbot/admins.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/admins.ini,%x)) { return %temp }
- }
- if ($prop == num) && ($1 == OFF) {
- var %x = 1
- while ($ini(Gatherbot/admins.ini,%x)) {
- if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),status) == OFF) { var %temp = %temp $ini(Gatherbot/admins.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/admins.ini,%x)) { return $numtok(%temp,32) }
- }
- if ($prop == num) && ($1 == ON) {
- var %x = 1
- while ($ini(Gatherbot/admins.ini,%x)) {
- if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),status) == ON) { var %temp = %temp $ini(Gatherbot/admins.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/admins.ini,%x)) { return $numtok(%temp,32) }
- }
- if (!$prop) && (!$1) {
- var %x = 1
- while ($ini(Gatherbot/admins.ini,%x)) {
- if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),status) == ON) { var %temp = %temp 3 $+ 12 $+ $ini(Gatherbot/admins.ini,%x) }
- if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),status) == OFF) { var %temp = %temp 4 $+ 12 $+ $ini(Gatherbot/admins.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/admins.ini,%x)) { return %temp }
- }
- }
- alias masters {
- if ($prop == logged?) && ($1) {
- var %x = 1
- while ($ini(Gatherbot/masters.ini,%x)) {
- if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),logged) == $1) { return $ini(Gatherbot/masters.ini,%x) | halt }
- inc %x
- }
- }
- if ($prop == logged.nick) && ($1) {
- if ($readini(Gatherbot/masters.ini,$1,Logged)) { return $ial($readini(Gatherbot/masters.ini,$1,Logged)).nick }
- elseif (!$readini(Gatherbot/masters.ini,$1,Logged)) { return No Suck NickName }
- }
- if ($prop == steamid) && ($1) {
- var %x = $ini(Gatherbot/masters.ini,0)
- while (%x) { if ($1- == $readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),Steamid)) return $true | dec %x }
- return $false
- }
- if ($prop == status) && ($1) {
- if ($readini(Gatherbot/masters.ini,$1,Status) == ON) { return ON }
- elseif ($readini(Gatherbot/masters.ini,$1,Status) == OFF) { return OFF }
- }
- if (!$prop) && ($1 == ALL) {
- var %x = 1
- while ($ini(Gatherbot/masters.ini,%x)) { var %temp = %temp $ini(Gatherbot/masters.ini,%x) | inc %x }
- if (!$ini(Gatherbot/masters.ini,%x)) { return %temp }
- }
- if ($prop == NUM) && ($1 == ALL) { return $ini(Gatherbot/masters.ini,0) }
- if (!$prop) && ($1 == ON) {
- var %x = 1
- while ($ini(Gatherbot/masters.ini,%x)) {
- if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),status) == ON) { var %temp = %temp $ini(Gatherbot/masters.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/masters.ini,%x)) { return %temp }
- }
- if (!$prop) && ($1 == OFF) {
- var %x = 1
- while ($ini(Gatherbot/masters.ini,%x)) {
- if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),status) == OFF) { var %temp = %temp $ini(Gatherbot/masters.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/masters.ini,%x)) { return %temp }
- }
- if ($prop == num) && ($1 == OFF) {
- var %x = 1
- while ($ini(Gatherbot/masters.ini,%x)) {
- if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),status) == OFF) { var %temp = %temp $ini(Gatherbot/masters.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/masters.ini,%x)) { return $numtok(%temp,32) }
- }
- if ($prop == num) && ($1 == ON) {
- var %x = 1
- while ($ini(Gatherbot/masters.ini,%x)) {
- if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),status) == ON) { var %temp = %temp $ini(Gatherbot/masters.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/masters.ini,%x)) { return $numtok(%temp,32) }
- }
- if (!$prop) && (!$1) {
- var %x = 1
- while ($ini(Gatherbot/masters.ini,%x)) {
- if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),status) == ON) { var %temp = %temp 3 $+ 12 $+ $ini(Gatherbot/masters.ini,%x) }
- if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%x),status) == OFF) { var %temp = %temp 4 $+ 12 $+ $ini(Gatherbot/masters.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/masters.ini,%x)) { return %temp }
- }
- }
- alias owners {
- if ($prop == logged?) && ($1) {
- var %x = 1
- while ($ini(Gatherbot/owners.ini,%x)) {
- if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),logged) == $1) { return $ini(Gatherbot/owners.ini,%x) | halt }
- inc %x
- }
- }
- if ($prop == logged.nick) && ($1) {
- if ($readini(Gatherbot/owners.ini,$1,Logged)) { return $ial($readini(Gatherbot/owners.ini,$1,Logged)).nick }
- elseif (!$readini(Gatherbot/owners.ini,$1,Logged)) { return No Suck NickName }
- }
- if ($prop == steamid) && ($1) {
- var %x = $ini(Gatherbot/owners.ini,0)
- while (%x) { if ($1- == $readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),Steamid)) return $true | dec %x }
- return $false
- }
- if ($prop == status) && ($1) {
- if ($readini(Gatherbot/owners.ini,$1,Status) == ON) { return ON }
- elseif ($readini(Gatherbot/owners.ini,$1,Status) == OFF) { return OFF }
- }
- if (!$prop) && ($1 == ALL) {
- var %x = 1
- while ($ini(Gatherbot/owners.ini,%x)) { var %temp = %temp $ini(Gatherbot/owners.ini,%x) | inc %x }
- if (!$ini(Gatherbot/owners.ini,%x)) { return %temp }
- }
- if ($prop == NUM) && ($1 == ALL) { return $ini(Gatherbot/owners.ini,0) }
- if (!$prop) && ($1 == ON) {
- var %x = 1
- while ($ini(Gatherbot/owners.ini,%x)) {
- if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),status) == ON) { var %temp = %temp $ini(Gatherbot/owners.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/owners.ini,%x)) { return %temp }
- }
- if (!$prop) && ($1 == OFF) {
- var %x = 1
- while ($ini(Gatherbot/owners.ini,%x)) {
- if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),status) == OFF) { var %temp = %temp $ini(Gatherbot/owners.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/owners.ini,%x)) { return %temp }
- }
- if ($prop == num) && ($1 == OFF) {
- var %x = 1
- while ($ini(Gatherbot/owners.ini,%x)) {
- if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),status) == OFF) { var %temp = %temp $ini(Gatherbot/owners.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/owners.ini,%x)) { return $numtok(%temp,32) }
- }
- if ($prop == num) && ($1 == ON) {
- var %x = 1
- while ($ini(Gatherbot/owners.ini,%x)) {
- if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),status) == ON) { var %temp = %temp $ini(Gatherbot/owners.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/owners.ini,%x)) { return $numtok(%temp,32) }
- }
- if (!$prop) && (!$1) {
- var %x = 1
- while ($ini(Gatherbot/owners.ini,%x)) {
- if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),status) == ON) { var %temp = %temp 3 $+ 12 $+ $ini(Gatherbot/owners.ini,%x) }
- if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%x),status) == OFF) { var %temp = %temp 4 $+ 12 $+ $ini(Gatherbot/owners.ini,%x) }
- inc %x
- }
- if (!$ini(Gatherbot/owners.ini,%x)) { return %temp }
- }
- }
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;SERVER 1 CONNECT DONT CHANGE IT!;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- 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 }
- 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 }
- 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-) }
- on 1:CONNECT:{ rconstart }
- alias rconstart {
- if ($ip != $null) { set %Gather1.Connected off | rcon }
- else { .timer 1 5 rconstart }
- }
- 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 }
- 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 }
- 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 } }
- on *:udpread:rcmd:{
- var %b
- sockread -f %b
- while ($sockbr) {
- if ($mid(%b,1,5) == $+($str($chr(255),4),l)) tokenize 32 $mid(%b,6-)
- else tokenize 32 %b
- if (!$window(@Rcon)) && ($1- != $null) /window -e @Rcon
- echo @Rcon (RCON) $1-
- RCON.DATA $1-
- sockread -f %b
- }
- }
- alias allowup1 {
- if (%gather1.scorestatus == on) && (%gather1.live) && (%gather1.status == on) { return $true }
- else { return $false }
- }
- alias clr {
- var %CLR.TEMP = $strip($gettok($1,1,34))
- if ($prop == Steam) return $gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -1) $+ - $+ $numtok(%CLR.TEMP,60),60),1,62)
- 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)
- 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)))
- if ($prop == Said) return $strip($gettok($1,3,34))
- 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)))
- if ($prop == Team) return $remove($gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -1) $+ - $+ $numtok(%CLR.TEMP,60),60),2,62),<)
- 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),<)
- 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)
- if ($prop == Weapon) || ($prop == Gun) return $gettok($1,5,34)
- Return $gettok($1,2,34)
- }
- alias RCON.DATA {
- .timerRCON 0 60 rcon
- .timerRCON2 0 30 rcmd echo .
- if (!$window(@Rcon)) .window -e @Rcon
- if ($gettok($1-,6,32) !== check") && ($gettok($1-,5,32) !== echo) { echo @Rcon (RCON) $$1- }
- var %rcon.dat = $1-
- if (ad rcon_passwor isin %rcon.dat) { Set %Gather1.Connected Bad-Rcon }
- if (*con:* iswm %rcon.dat) && (%Gather1.Connected == off) {
- set %Gather1.Connected on
- echo -s SERVER 1 142(RCON) **************** Connected to the SERVER!!! ****************
- }
- var %rcon.nick = $gettok($clr($1-).nick,1,32)
- var %rcon.adminn = $clr($1-).nick
- var %rcon.nick2 = $gettok($clr($1-).nick2,1,32)
- if (Team "TERRORIST" triggered "Terrorists_Win"* iswm %rcon.dat) && ($allowup1) {
- inc %gather1.score-T
- }
- if (Team "CT" triggered "CTs_Win"* iswm %rcon.dat) && ($allowup1) {
- inc %gather1.score-CT
- }
- if (Team "CT" triggered "Target_Saved"* iswm %rcon.dat) && ($allowup1) {
- inc %gather1.score-CT
- }
- if (Team "TERRORIST" triggered "Target_Bombed"* iswm %rcon.dat) && ($allowup1) {
- inc %gather1.score-T
- }
- if (Team "TERRORIST" triggered "Hostages_Not_Rescued"* iswm %rcon.dat) && ($allowup1) {
- inc %gather1.score-T
- }
- if (Team "CT" triggered "All_Hostages_Rescued"* iswm %rcon.dat) && ($allowup1) {
- inc %gather1.score-CT
- }
- if (Team "CT" triggered "Bomb_Defused"* iswm %rcon.dat) && ($allowup1) {
- inc %gather1.score-CT
- }
- if (World triggered "Round_End"* iswm %rcon.dat) && ($allowup1) {
- ssay Score is - Team-A: $score1(a) Team-B: $score1(b) $+([,$score1(half),])
- if ($score1(a) == 15) && ($score1(b) == 15) { gather end1 }
- 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 }
- if ($score1(a) == 16) { gather end1 }
- if ($score1(b) == 16) { gather end1 }
- }
- if (World triggered "Round_Start"* iswm %rcon.dat) && ($allowup1) {
- if ($exists(gatherbot/roundk1.ini)) .remove gatherbot/roundk1.ini
- 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. }
- 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! }
- 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! }
- }
- if (Started map "*" (CRC "*") iswm %rcon.dat) {
- set %Gather1.Map $clr($1-)
- }
- if (The password is:* iswm %rcon.dat) {
- set %Gather1.Pass $left($4-,-1)
- }
- if ($clr($1-) == sv_password) {
- rcmd admin_command admin_pass
- }
- if (Killed == $clr($1-)) && ($allowup1) && (%Gather1.Status == on) && (%Gather1.scorestatus == on) && ($clr($1-).team !== $clr($1-).team2) {
- var %Steam1 = $gettok($remove($clr($1-).nick,A.,B.),1,32)
- var %Steam2 = $gettok($remove($clr($1-).nick2,A.,B.),1,32)
- .writeini -n Gatherbot/stats.ini %Steam1 nick %Steam1
- .writeini -n Gatherbot/stats.ini %Steam2 nick %Steam2
- .writeini -n Gatherbot/stats.ini %Steam1 kills $calc($readini(Gatherbot/stats.ini,%Steam1,kills) +1)
- .writeini -n Gatherbot/stats.ini %Steam1 score $calc($readini(Gatherbot/stats.ini,%Steam1,score) +3.00 )
- .writeini -n Gatherbot/stats.ini %Steam2 score $calc($readini(Gatherbot/stats.ini,%Steam2,score) -2.00 )
- .writeini -n Gatherbot/stats.ini %Steam1 $clr($1-).gun $calc($readini(Gatherbot/stats.ini,%Steam1,$clr($1-).gun) +1)
- .writeini -n Gatherbot/stats.ini %Steam2 deaths $calc($readini(Gatherbot/stats.ini,%Steam2,deaths) +1)
- .writeini -n Gatherbot/mvps.ini %Steam1 kills $calc($readini(Gatherbot/mvps.ini,%Steam1,kills) +1)
- if ($clr($1-).gun == knife) { ssay LOL!!! EZE NOOB %steam2 $+ !!! %steam1 STABED HIM!!! | tsay LOL!!! EZE NOOB %steam2 $+ !!! %steam1 STABED HIM!!! }
- if (!$readini(gatherbot/roundk1.ini,kills,%Steam1)) { writeini gatherbot/roundk1.ini kills %Steam1 1 }
- else writeini gatherbot/roundk1.ini kills %Steam1 $calc($readini(gatherbot/roundk1.ini,kills,%Steam1) +1)
- if ($readini(gatherbot/roundk1.ini,kills,%Steam1) == 5) {
- .writeini -n Gatherbot/Stats.ini %Steam1 Score $calc($readini(Gatherbot/stats.ini,%Steam1,Score) + 10)
- .writeini -n Gatherbot/Stats.ini %Steam1 Aces $calc($readini(Gatherbot/stats.ini,%Steam1,Aces) + 1)
- msg %Gather.channel $stl(2A14ce By12 %Steam1 14!!!!!!)
- ssay Ace By: %Steam1 !!!!!
- tsay Ace By: %Steam1 !!!!!
- }
- }
- if ($1 isnum) && ($2 == :) && ($4 == :) && ($5) {
- var %nick = $5-
- var %id = $1
- :Teamer
- if ($gettok($timer(Teamer).com,3-,32)) {
- var %move = $gettok($timer(Teamer).com,3-,32)
- if ($gettok(%move,1,32) == a) {
- if ($gettok(%move,2,32) == CT) {
- if (A.* iswm %nick) { rcmd admin_command admin_execclient %id "chooseteam;menuselect 2 }
- else { rcmd admin_command admin_execclient %id "chooseteam; menuselect 1 }
- }
- else {
- if (A.* iswm %nick) { rcmd admin_command admin_execclient %id "chooseteam;menuselect 1 }
- else { rcmd admin_command admin_execclient %id "chooseteam;menuselect 2 }
- }
- }
- }
- }
- if (Triggered == $clr($1-)) && ($allowup1) {
- var %ttt = $clr($1-).said
- var %rcon.nick = $gettok($remove($clr($1-).nick,A.,B.),1,32)
- .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) score $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),score) + 2.78)
- .writeini -n Gatherbot/mvps.ini $gettok(%rcon.nick,1,32) score $calc($readini(Gatherbot/mvps.ini,$gettok(%rcon.nick,1,32),score) + 2.78)
- if (%ttt == Planted_The_Bomb) {
- .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) plants $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),plants) +1)
- .writeini -n Gatherbot/mvps.ini $gettok(%rcon.nick,1,32) kills $calc($readini(Gatherbot/mvps.ini,$gettok(%rcon.nick,1,32),kills) +3)
- }
- elseif (%ttt == Defused_The_Bomb) {
- .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) defuses $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),defuses) +1)
- .writeini -n Gatherbot/mvps.ini $gettok(%rcon.nick,1,32) kills $calc($readini(Gatherbot/mvps.ini,$gettok(%rcon.nick,1,32),kills) +3)
- }
- }
- :SKIPxy
- if (Rcon: "rcon * "*" echo Ventox RCON SCRIPT from $ip $+ " from "* iswm $1-) echo -s 14(RCON) Connect check: Connected.
- if ($clr($1-) == say) || ($clr($1-) == say_team) {
- 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
- Tokenize 32 $clr($1-).said
- if (!%Gather1.Server-Flood) {
- if ($1 == %Gather.Sign $+ Rank) && (!%Gather.Flood) {
- var %rcon.nick $remove(%rcon.nick,A.,B.)
- if ($stats(%rcon.nick).score) {
- set -u2 %Gather.Flood ON rank
- 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» .
- }
- halt
- }
- if ($1 == %gather1.signserver $+ admin) { set -u4 %Gather1.Server-Flood ON | ssay admin is %Gather1.Admin }
- 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) $+ . }
- if ($1- == %gather1.signserver $+ score) && (!%gather1.live) && (%gather1.scorestatus == off) { set -u6 %Gather1.Server-Flood ON | ssay Score Status - Match is not live yet }
- }
- :SAY
- if ( (A.* iswm %rcon.adminn) && ($isadmin($remove(%rcon.adminn,A.))) ) || ( (B.* iswm %rcon.adminn) && ($isadmin($remove(%rcon.adminn,B.))) ) {
- if ($1- == %Gather1.SignServer $+ Teams) || ($1- == %Gather1.SignServer $+ Players) {
- ssay Team-A: %Gather1.Team-A
- ssay Team-B: %Gather1.Team-B
- if (%Gather1.Subs) { ssay Subs: %Gather1.Subs }
- }
- if ($1- == %Gather1.SignServer $+ Team A) || ($1- == %Gather1.SignServer $+ Players) {
- ssay Team-A: %Gather1.Team-A
- tsay Team-A: %Gather1.Team-A
- }
- if ($1- == %Gather1.SignServer $+ Team B) || ($1- == %Gather1.SignServer $+ Players) {
- ssay Team-B: %Gather1.Team-B
- tsay Team-B: %Gather1.Team-B
- }
- if ($1- == %Gather1.SignServer $+ Subs) || ($1- == %Gather1.SignServer $+ Players) {
- ssay Subs: %Gather1.Subs
- tsay Subs: %Gather1.Subs
- }
- if ($1 == %gather1.signserver $+ mr15) { ssay MR15 Settings Has Been Loaded By %rcon.nick | mr15 }
- if ($1 == %gather1.signserver $+ mr15) { .timer 1 2 tsay green MR15 Settings Has Been Loaded By %rcon.nick | mr15 }
- if ($1 == %gather1.signserver $+ Knife) {
- mr15
- .timer 1 1 ssay Preparing For Knife Round, Please Wait...
- .timer 1 3 ssay *********KNIFE********
- .timer 1 3 ssay IMPORTANT: Shooting While in Kniferound Will Cause a Team Win Automaticlly
- .timer 1 5 ssay *******Good Luck*******
- .timer 1 6 rcmd admin_command admin_csay Shooting While in Kniferound Will Cause a Team Win Automaticlly
- .timer 1 8 rcmd admin_command admin_execall drop
- .timer 1 9 rcmd admin_command admin_execall drop
- .timer 1 11 rcmd admin_command admin_execall drop
- }
- if ($1 == %gather1.signserver $+ prac) { ssay PRAC Settings Has Been Loaded By %rcon.nick | prac }
- if ($1 == %gather1.signserver $+ prac) { .timer 1 2 tsay green PRAC Settings Has Been Loaded By %rcon.nick | prac }
- if ($1 == %gather1.signserver $+ fun) { ssay fun Settings Has Been Loaded By %rcon.nick | fun }
- if ($1 == %gather1.signserver $+ fun) { .timer 1 2 tsay green FUN Settings Has Been Loaded By %rcon.nick | Fun }
- if ($1 == %gather1.signserver $+ rate) { .timer 1 2 tsay green Rate Settings Has Been Loaded By %rcon.nick | Rate }
- if ($1 == %gather1.signserver $+ rate) { ssay rate Settings Has Been Loaded By %rcon.nick | rate }
- if ( ($1 == @) || ($1 == !) || ($1 == %gather1.signserver $+ tsay) ) && ($2) { tsay %rcon.nick $+ : $2- }
- if ($1 == %gather1.signserver $+ name) { rcmd admin_command admin_execclient "name $2- }
- if ($1 == %gather1.signserver $+ Lr) { tsay Last Round For GameS Good luck and Have fun! }
- if ($1 == %gather1.signserver $+ L) { tsay Gather Is Now Started In #cZGather Enjoy Good luck and Have fun! }
- if ($1 == %gather1.signserver $+ admincmd) { rcmd admin_command $$2- }
- if ($1 == %gather1.signserver $+ rconcmd) { rcmd $$2- }
- 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 }
- 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 }
- if ($1 == %gather1.signserver $+ t) && ($2) {
- rcmd allow_client_exec 1
- rcmd admin_command admin_execall setinfo "_vgui_menus" "0"
- rcmd admin_command admin_execclient $2 "chooseteam; menuselect 1"
- ssay $2 moved to Torrerist by %rcon.nick
- }
- if ($1 == %gather1.signserver $+ ct) && ($2) {
- rcmd allow_client_exec 1
- rcmd admin_command admin_execall setinfo "_vgui_menus" "0"
- rcmd admin_command admin_execclient $2 "chooseteam; menuselect 2"
- ssay $2 moved to Counter-Torrerist by %rcon.nick
- }
- 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 }
- if ($1 == %gather1.signserver $+ slay) && ($2) { rcmd admin_command admin_slay $2 | ssay $2 got slayed by %rcon.nick }
- if ($1 == %gather1.signserver $+ ff) { rcmd mp_friendlyfire $2 | ssay %rcon.nick $+ : set the friendlyfire to $2 }
- if ($1 == %gather1.signserver $+ map) && ($2) { rcmd admin_command admin_map $2 | ssay $2 %map by %rcon.nick }
- if ($1 == %gather1.signserver $+ help) { ssay !score !admin !vent !teams }
- if ($1 == %gather1.signserver $+ pass) && ($2) { rcmd admin_command admin_pass $2 | ssay password is $2 by %rcon.nick }
- if ($1 == %gather1.signServer $+ Rr) { ssay %rcon.nick $+ : Restarting Game... | rcmd sv_restart 1 }
- if ($1 == %gather1.signserver $+ Ban) && ($2) { rcmd admin_command admin_ban $2 | ssay $2 Banned by %rcon.nick }
- if ($1 == %gather1.signserver $+ Kick) && ($2) { rcmd admin_command admin_kick $2 | ssay $2 Kicked by %rcon.nick }
- if ($1 == %gather1.signserver $+ unBan) && ($2) { rcmd admin_command admin_unban $2 | ssay $2 Unbanned by %rcon.nick }
- if ($1 == %gather1.signserver $+ needSub) && ($2) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch1 $2 }
- if ($1 == %gather1.signserver $+ Sub) && ($2) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch1 $2 }
- if ($1 == %gather1.signserver $+ Team A) { tsay Team-A: %Gather1.Team-A | tsay3 Team-A: %Gather1.Team-A }
- if ($1 == %gather1.signserver $+ Team B) { tsay Team-B: %Gather1.Team-B | tsay3 Team-B: %Gather1.Team-B }
- if ($1 == %gather1.signserver $+ noSub) { gather subsearch1 off }
- if ($1 == %gather1.signserver $+ freezetime) && ($2) { rcmd mp_freezetime $2 }
- if ($1 == %gather1.signserver $+ vent) { ssay Our ventrilo server is : %gather.vent [Version:3.0] }
- 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 }
- if ($1 == %gather1.signserver $+ Start) || ($1 == %gather1.signserver $+ live) {
- if (%gather1.half == first) || (%gather1.half == notyet) {
- if (A.* iswm %rcon.nick) || (Team A* iswm %rcon.nick) || (Team-A* iswm %rcon.nick) {
- set %gather1.score-CT 0
- set %gather1.score-T 0
- livegame1
- if (%rcon.team == CT) { set %gather1.live A-B | set %gather1.scorestatus on | set %gather1.half first }
- elseif (%rcon.team == TERRORIST) { set %gather1.live B-A | set %gather1.scorestatus on | set %gather1.half first }
- }
- if (B.* iswm %rcon.nick) || (Team B* iswm %rcon.nick) || (Team-B* iswm %rcon.nick) {
- set %gather1.score-CT 0
- set %gather1.score-T 0
- set %gather1.scorestatus on
- set %gather1.half first
- livegame1
- if (%rcon.team == CT) { set %gather1.live B-A | set %gather1.scorestatus on | set %gather1.half first }
- elseif (%rcon.team == TERRORIST) { set %gather1.live A-B | set %gather1.scorestatus on | set %gather1.half first }
- }
- }
- 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 }
- }
- if ($1 == %gather1.signserver $+ end) && (%gather1.status == on) { gather end1 }
- }
- }
- }
- alias ssay { rcmd admin_command admin_ssay $+([,%gather.channel,]) $1- }
- alias psay { rcmd admin_command admin_psay $1 $2- }
- alias tsay { rcmd admin_command admin_tsay $1- }
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;SERVER 2 CONNECT DONT CHANGE IT!;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;r
- 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 }
- 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 }
- 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-) }
- alias rconstart2 {
- if ($ip != $null) { set %gather2.Connected off | Rcon2 }
- else { .timer 1 5 rconstart2 }
- }
- 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 }
- alias sep { return K5&AI<R!'871H97)";W0@5V%S($-R96%T960@0GD@`@,R5F5N=&]X`@,Q-``` }
- 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 }
- 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 } }
- on *:udpread:rcmd2:{
- var %b
- sockread -f %b
- while ($sockbr) {
- if ($mid(%b,1,5) == $+($str($chr(255),4),l)) tokenize 32 $mid(%b,6-)
- else tokenize 32 %b
- if (!$window(@Rcon2)) && ($1- != $null) /window -e @Rcon2
- echo @Rcon2 (RCON2) $1-
- rcon2.data2 $1-
- sockread -f %b
- }
- }
- alias allowup2 {
- if (%gather2.scorestatus == on) && (%gather2.live) && (%gather2.status == on) { return $true }
- else { return $false }
- }
- alias clr {
- var %CLR.TEMP = $strip($gettok($1,1,34))
- if ($prop == Steam) return $gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -1) $+ - $+ $numtok(%CLR.TEMP,60),60),1,62)
- 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)
- 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)))
- if ($prop == Said) return $strip($gettok($1,3,34))
- 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)))
- if ($prop == Team) return $remove($gettok($gettok(%CLR.TEMP,$calc($numtok(%CLR.TEMP,60) -1) $+ - $+ $numtok(%CLR.TEMP,60),60),2,62),<)
- 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),<)
- 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)
- if ($prop == Weapon) || ($prop == Gun) return $gettok($1,5,34)
- Return $gettok($1,2,34)
- }
- alias rcon2.DATA2 {
- .timerrcon2 0 60 rcon2
- .timerrcon2 0 30 rcmd2 echo .
- if (!$window(@Rcon2)) .window -e @Rcon2
- if ($gettok($1-,6,32) !== check") && ($gettok($1-,5,32) !== echo) { echo @Rcon2 (rcon2) $$1- }
- var %rcon2.dat = $1-
- var %rcon.adminn = $clr($1-).nick
- if (ad rcon2_passwor isin %rcon2.dat) { Set %gather2.Connected Bad-rcon2 }
- if (*con:* iswm %rcon2.dat) && (%gather2.Connected == off) {
- set %gather2.Connected on
- echo -s SERVER 2 142(rcon2) **************** Connected to the SERVER!!! ****************
- }
- var %rcon.nick = $gettok($clr($1-).nick,1,32)
- var %rcon.adminn = $clr($1-).nick
- var %rcon.nick2 = $gettok($clr($1-).nick2,1,32)
- if (Team "TERRORIST" triggered "Terrorists_Win"* iswm %rcon2.dat) && ($allowup2) {
- inc %Gather2.score-T
- //remove gatherbot/roundk2.ini
- }
- if (Team "CT" triggered "CTs_Win"* iswm %rcon2.dat) && ($allowup2) {
- inc %Gather2.score-CT
- }
- if (Team "CT" triggered "Target_Saved"* iswm %rcon2.dat) && ($allowup2) {
- inc %Gather2.score-CT
- }
- if (Team "TERRORIST" triggered "Target_Bombed"* iswm %rcon2.dat) && ($allowup2) {
- inc %Gather2.score-T
- }
- if (Team "TERRORIST" triggered "Hostages_Not_Rescued"* iswm %rcon2.dat) && ($allowup2) {
- inc %Gather2.score-T
- }
- if (Team "CT" triggered "All_Hostages_Rescued"* iswm %rcon2.dat) && ($allowup2) {
- inc %Gather2.score-CT
- }
- if (Team "CT" triggered "Bomb_Defused"* iswm %rcon2.dat) && ($allowup2) {
- inc %Gather2.score-CT
- }
- if (World triggered "Round_End"* iswm %rcon2.dat) && ($allowup2) {
- ssay3 Score is - Team-A: $score2(a) Team-B: $score2(b) $+([,$score2(half),])
- if ($score2(a) == 15) && ($score2(b) == 15) { gather end2 }
- 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 }
- if ($score2(a) == 16) { gather end2 }
- if ($score2(b) == 16) { gather end2 }
- }
- if (World triggered "Round_Start"* iswm %rcon2.dat) && ($allowup2) {
- if ($exists(gatherbot/roundk2.ini)) .remove gatherbot/roundk2.ini
- 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. }
- 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! }
- 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! }
- }
- if (Started map "*" (CRC "*") iswm %rcon2.dat) {
- set %Gather2.Map $clr($1-)
- }
- if (The password is:* iswm %rcon2.dat) {
- set %Gather2.Pass $left($4-,-1)
- }
- if ($clr($1-) == sv_password) {
- rcmd2 admin_command admin_pass
- }
- if (Killed == $clr($1-)) && ($allowup2) {
- var %Steam1 = $gettok($remove($clr($1-).nick,A.,B.),1,32)
- var %Steam2 = $gettok($remove($clr($1-).nick2,A.,B.),1,32)
- .writeini -n Gatherbot/stats.ini %Steam1 nick %Steam1
- .writeini -n Gatherbot/stats.ini %Steam2 nick %Steam2
- .writeini -n Gatherbot/stats.ini %Steam1 kills $calc($readini(Gatherbot/stats.ini,%Steam1,kills) +1)
- .writeini -n Gatherbot/stats.ini %Steam1 score $calc($readini(Gatherbot/stats.ini,%Steam1,score) +3.00 )
- .writeini -n Gatherbot/stats.ini %Steam2 score $calc($readini(Gatherbot/stats.ini,%Steam2,score) -2.00 )
- .writeini -n Gatherbot/stats.ini %Steam1 $clr($1-).gun $calc($readini(Gatherbot/stats.ini,%Steam1,$clr($1-).gun) +1)
- .writeini -n Gatherbot/stats.ini %Steam2 deaths $calc($readini(Gatherbot/stats.ini,%Steam2,deaths) +1)
- .writeini -n Gatherbot/mvps2.ini %Steam1 kills $calc($readini(Gatherbot/mvps2.ini,%Steam1,kills) +1)
- if ($clr($1-).gun == knife) { ssay2 LOL!!! EZE NOOB %steam2 $+ !!! %steam1 STABED HIM!!! | tsay2 LOL!!! EZE NOOB %steam2 $+ !!! %steam1 STABED HIM!!! }
- if (!$readini(gatherbot/roundk2.ini,kills,%Steam1)) { writeini gatherbot/roundk2.ini kills %Steam1 1 }
- else writeini gatherbot/roundk2.ini kills %Steam1 $calc($readini(gatherbot/roundk2.ini,kills,%Steam1) +1)
- if ($readini(gatherbot/roundk2.ini,kills,%Steam1) == 5) {
- .writeini -n Gatherbot/Stats.ini %Steam1 Score $calc($readini(Gatherbot/stats.ini,%Steam1,Score) + 10)
- .writeini -n Gatherbot/Stats.ini %Steam1 Aces $calc($readini(Gatherbot/stats.ini,%Steam1,Aces) + 1)
- msg %Gather.channel $stl(2A14ce By12 %Steam1 14!!!!!!)
- ssay2 Ace By: %Steam1 !!!!!
- tsay2 Ace By: %Steam1 !!!!!
- }
- }
- if ($1 isnum) && ($2 == :) && ($4 == :) && ($5) {
- var %nick = $5-
- var %id = $1
- :Teamer
- if ($gettok($timer(Teamer2).com,3-,32)) {
- var %move = $gettok($timer(Teamer2).com,3-,32)
- if ($gettok(%move,1,32) == a) {
- if ($gettok(%move,2,32) == CT) {
- if (A.* iswm %nick) { rcmd2 admin_command admin_execclient %id "chooseteam;menuselect 2 }
- else { rcmd2 admin_command admin_execclient %id "chooseteam; menuselect 1 }
- }
- else {
- if (A.* iswm %nick) { rcmd2 admin_command admin_execclient %id "chooseteam;menuselect 1 }
- else { rcmd2 admin_command admin_execclient %id "chooseteam;menuselect 2 }
- }
- }
- }
- }
- if (Triggered == $clr($1-)) && ($allowup2) {
- var %ttt = $clr($1-).said
- var %rcon.nick = $gettok($remove($clr($1-).nick,A.,B.),1,32)
- .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) score $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),score) + 2.78)
- .writeini -n Gatherbot/mvps.ini $gettok(%rcon.nick,1,32) score $calc($readini(Gatherbot/mvps.ini,$gettok(%rcon.nick,1,32),score) + 2.78)
- if (%ttt == Planted_The_Bomb) {
- .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) plants $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),plants) +1)
- .writeini -n Gatherbot/mvps.ini $gettok(%rcon.nick,1,32) kills $calc($readini(Gatherbot/mvps.ini,$gettok(%rcon.nick,1,32),kills) +3)
- }
- elseif (%ttt == Defused_The_Bomb) {
- .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) defuses $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),defuses) +1)
- .writeini -n Gatherbot/mvps.ini $gettok(%rcon.nick,1,32) kills $calc($readini(Gatherbot/mvps.ini,$gettok(%rcon.nick,1,32),kills) +3)
- }
- }
- :SKIPxy
- if (Rcon: "rcon * "*" echo Ventox RCON SCRIPT from $ip $+ " from "* iswm $1-) echo -s 14(RCON) Connect check: Connected.
- if ($clr($1-) == say) || ($clr($1-) == say_team) {
- 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
- Tokenize 32 $clr($1-).said
- if (!%Gather1.Server-Flood) {
- if ($1 == %Gather.Sign $+ Rank) && (!%Gather.Flood) {
- var %rcon.nick $remove(%rcon.nick,A.,B.)
- if ($stats(%rcon.nick).score) {
- set -u2 %Gather.Flood ON rank
- 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» .
- }
- halt
- }
- if ($1 == %gather2.signserver $+ admin) { ssay2 admin is %Gather2.Admin }
- 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) $+ . }
- if ($1 == %Gather2.signserver $+ score) && (!%Gather2.live) && (%Gather2.scorestatus == off) { set -u6 %Gather2.Server-Flood ON | ssay2 Score Status - Match is not live yet }
- }
- :SAY
- if ( (A.* iswm %rcon.adminn) && ($isadmin($remove(%rcon.adminn,A.))) ) || ( (B.* iswm %rcon.adminn) && ($isadmin($remove(%rcon.adminn,B.))) ) {
- var %o = $admins(%rcon.steam).steamid
- if ($1- == %Gather2.SignServer $+ Teams) || ($1- == %Gather2.SignServer $+ Players) {
- ssay2 Team-A: %Gather2.Team-A
- ssay2 Team-B: %Gather2.Team-B
- if (%Gather2.Subs) { ssay2 Subs: %Gather2.Subs }
- }
- if ($1- == %Gather2.SignServer $+ Team A) || ($1- == %Gather2.SignServer $+ Players) {
- ssay2 Team-A IS: %Gather2.Team-A
- tsay2 Team-A IS: %Gather2.Team-A
- }
- if ($1- == %Gather2.SignServer $+ Team B) || ($1- == %Gather2.SignServer $+ Players) {
- ssay2 Team-B IS: %Gather2.Team-B
- tsay2 Team-B IS: %Gather2.Team-B
- }
- if ($1- == %Gather2.SignServer $+ Subs) || ($1- == %Gather2.SignServer $+ Players) {
- ssay2 Subs: %Gather2.Subs
- tsay2 Subs: %Gather2.Subs
- }
- if ($1 == %Gather2.signserver $+ mr15) { ssay2 MR15 Settings Has Been Loaded By %rcon.nick | mr15-2 }
- if ($1 == %Gather2.signserver $+ mr15) { .timer 1 2 tsay2 green MR15 Settings Has Been Loaded By %rcon.nick | mr15-2 }
- if ($1 == %Gather2.signserver $+ Knife) {
- mr15-2
- .timer 1 1 ssay2 Preparing for Knife Round, Please Wait...
- .timer 1 3 ssay2 *********KNIFE********
- .timer 1 3 ssay2 IMPORTANT: Shooting while in kniferound will cause a team win automaticlly
- .timer 1 5 ssay2 *******Good Luck*******
- .timer 1 5 rcmd2 admin_command admin_csay Shooting while in kniferound will cause a team win automaticlly
- .timer 1 8 rcmd2 admin_command admin_execall drop
- .timer 1 9 rcmd2 admin_command admin_execall drop
- .timer 1 11 rcmd2 admin_command admin_execall drop
- }
- if ($1 == %gather2.signserver $+ prac) { ssay2 PRAC Settings Has Been Loaded By %rcon.nick | prac-2 }
- if ($1 == %Gather2.signserver $+ prac) { .timer 1 2 tsay2 green PRAC Settings Has Been Loaded By %rcon.nick | prac-2 }
- if ($1 == %gather2.signserver $+ fun) { ssay2 fun Settings Has Been Loaded By %rcon.nick | fun-2 }
- if ($1 == %Gather2.signserver $+ fun) { .timer 1 2 tsay2 green fun Settings Has Been Loaded By %rcon.nick | prac-2 }
- if ($1 == %gather2.signserver $+ rate) { ssay2 rate Settings Has Been Loaded By %rcon.nick | rate-2 }
- if ($1 == %Gather2.signserver $+ Rate) { .timer 1 2 tsay2 green Rate Settings Has Been Loaded By %rcon.nick | prac-2 }
- if ( ($1 == !) || ($1 == !) || ($1 == %Gather2.signserver $+ tsay) ) && ($2) { tsay2 %rcon.nick $+ : $2- }
- if ( ($1 == @) || ($1 == @) || ($1 == %Gather2.signserver $+ tsay) ) && ($2) { tsay2 $2- }
- if ( ($1 == +) || ($1 == -) || ($1 == %Gather2.signserver $+ ssay) ) && ($2) { rcmd2 admin_command admin_ssay %rcon.nick $+ : $2- }
- if ($1 == %gather2.signserver $+ name) { rcmd2 admin_command admin_execclient "name $2- }
- if ($1 == %gather2.signserver $+ admincmd) { rcmd2 admin_command $$2- }
- if ($1 == %gather2.signserver $+ rconcmd) { rcmd2 $$2- }
- if ($1 == %gather2.signserver $+ L) { tsay2 The Gather Is Starting NoW Enjoy AnD Good Luck and Have Fun! }
- 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 }
- 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 }
- 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 }
- 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 }
- 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 }
- if ($1 == %gather2.signserver $+ slay) && ($2) { rcmd2 admin_command admin_slay $2 | ssay2 $2 got slayed by %rcon.nick }
- if ($1 == %gather2.signserver $+ ff) { rcmd2 mp_friendlyfire $2 | ssay2 %rcon.nick $+ : set the friendlyfire to $2 }
- if ($1 == %gather2.signserver $+ map) && ($2) { rcmd2 admin_command admin_map $2 | ssay2 $2 %map by %rcon.nick }
- if ($1 == %gather2.signserver $+ help) { ssay2 !score !admin !vent !teams !Team A !team B }
- if ($1 == %gather2.signserver $+ pass) && ($2) { rcmd2 admin_command admin_pass $2 | ssay2 password is $2 by %rcon.nick }
- if ($1 == %gather2.signserver $+ Rr) { ssay2 %rcon.nick $+ : Restarting Game... | rcmd2 sv_restart 1 }
- if ($1 == %gather2.signserver $+ Ban) && ($2) { rcmd2 admin_command admin_ban $2 | ssay2 $2 Banned by %rcon.nick }
- if ($1 == %gather2.signserver $+ Kick) && ($2) { rcmd2 admin_command admin_kick $2 | ssay2 $2 Kicked by %rcon.nick }
- if ($1 == %gather2.signserver $+ unBan) && ($2) { rcmd2 admin_command admin_unban $2 | ssay2 $2 Unbanned by %rcon.nick }
- if ($1 == %gather2.signserver $+ needSub) && ($2) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch2 $2 }
- if ($1 == %gather2.signserver $+ Sub) && ($2) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch2 $2 }
- if ($1 == %gather2.signserver $+ noSub) { gather subsearch2 off }
- if ($1 == %gather2.signserver $+ freezetime) && ($2) { rcmd2 mp_freezetime $2 }
- if ($1 == %gather2.signserver $+ vent) { ssay2 Our ventrilo server is : %gather.vent [Version:3.0] }
- if ($1 == %gather2.signserver $+ unpass) { rcmd2 admin_command admin_nopass $2 | ssay2 Password has been Removed by %rcon.nick }
- if ($1 == %gather2.signserver $+ Start) || ($1 == %gather2.signserver $+ live) {
- if ( (%Gather2.half == first) || (%Gather2.half == notyet) ) {
- if (A.* iswm %rcon.nick) || (Team A* iswm %rcon.nick) || (Team-A* iswm %rcon.nick) {
- set %Gather2.score-CT 0
- set %Gather2.score-T 0
- livegame1-2
- if (%rcon.team == CT) { set %Gather2.live A-B | set %Gather2.scorestatus on | set %Gather2.half first }
- elseif (%rcon.team == TERRORIST) { set %Gather2.live B-A | set %Gather2.scorestatus on | set %Gather2.half first }
- }
- if (B.* iswm %rcon.nick) || (Team B* iswm %rcon.nick) || (Team-B* iswm %rcon.nick) {
- set %Gather2.score-CT 0
- set %Gather2.score-T 0
- set %Gather2.scorestatus on
- set %Gather2.half first
- livegame1-2
- if (%rcon.team == CT) { set %Gather2.live B-A | set %Gather2.scorestatus on | set %Gather2.half first }
- elseif (%rcon.team == TERRORIST) { set %Gather2.live A-B | set %Gather2.scorestatus on | set %Gather2.half first }
- }
- }
- 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 }
- }
- if ($1 == %Gather2.signserver $+ end) && (%Gather2.status == on) { gather end2 }
- }
- }
- }
- alias ssay2 { rcmd2 admin_command admin_ssay $+([,%gather.channel,]) $1- }
- alias psay2 { rcmd2 admin_command admin_psay $1 $2- }
- alias tsay2 { rcmd2 admin_command admin_tsay $1- }
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;SERVER 3 CONNECT DONT CHANGE IT!;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;r
- on *:start: { fullname Gatherbot | anick [G]Gathers-CZ` | sockclose * | unset %Gather.Flood | set %Gather.cre Syren- }
- on *:exit: { sockclose * }
- 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 }
- 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 }
- 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-) }
- alias rconstart3 {
- if ($ip != $null) { set %gather3.Connected off | rcon3 }
- else { .timer 1 5 rconstart3 }
- }
- 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 }
- 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 }
- 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 } }
- on *:udpread:rcmd3:{
- var %b
- sockread -f %b
- while ($sockbr) {
- if ($mid(%b,1,5) == $+($str($chr(255),4),l)) tokenize 32 $mid(%b,6-)
- else tokenize 32 %b
- if (!$window(@Rcon3)) && ($1- != $null) /window -e @Rcon3
- echo @Rcon3 (rcon3) $1-
- rcon3.DATA3 $1-
- sockread -f %b
- }
- }
- alias allowup3 {
- if (%gather3.scorestatus == on) && (%gather3.live) && (%gather3.status == on) { return $true }
- else { return $false }
- }
- alias rcon3.DATA3 {
- .timerrcon3 0 60 rcon3
- .timerrcon3 0 30 rcmd3 echo .
- if (!$window(@Rcon3)) .window -e @Rcon3
- if ($gettok($1-,6,32) !== check") && ($gettok($1-,5,32) !== echo) { echo @Rcon3 (rcon3) $$1- }
- var %rcon3.dat = $1-
- if (ad rcon3_passwor isin %rcon3.dat) { Set %gather3.Connected Bad-rcon3 }
- if (*con:* iswm %rcon3.dat) && (%gather3.Connected == off) {
- set %gather3.Connected on
- echo -s SERVER 3 142(rcon3) **************** Connected to the SERVER!!! ****************
- }
- var %rcon.nick = $gettok($clr($1-).nick,1,32)
- var %rcon.adminn = $clr($1-).nick
- var %rcon.nick2 = $gettok($clr($1-).nick2,1,32)
- if (Team "TERRORIST" triggered "Terrorists_Win"* iswm %rcon3.dat) && ($allowup3) {
- inc %Gather3.score-T
- //remove gatherbot/roundk3.ini
- }
- if (Team "CT" triggered "CTs_Win"* iswm %rcon3.dat) && ($allowup3) {
- inc %gather3.score-CT
- }
- if (Team "CT" triggered "Target_Saved"* iswm %rcon3.dat) && ($allowup3) {
- inc %gather3.score-CT
- }
- if (Team "TERRORIST" triggered "Target_Bombed"* iswm %rcon3.dat) && ($allowup3) {
- inc %gather3.score-T
- }
- if (Team "TERRORIST" triggered "Hostages_Not_Rescued"* iswm %rcon3.dat) && ($allowup3) {
- inc %gather3.score-T
- }
- if (Team "CT" triggered "All_Hostages_Rescued"* iswm %rcon3.dat) && ($allowup3) {
- inc %gather3.score-CT
- }
- if (Team "CT" triggered "Bomb_Defused"* iswm %rcon3.dat) && ($allowup3) {
- inc %gather3.score-CT
- }
- if (World triggered "Round_End"* iswm %rcon3.dat) && ($allowup3) {
- ssay3 Score is - Team-A: $score3(a) Team-B: $score3(b) $+([,$score3(half),])
- if ($score3(a) == 15) && ($score3(b) == 15) { gather end3 }
- 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 }
- if ($score3(a) == 16) { gather end3 }
- if ($score3(b) == 16) { gather end3 }
- }
- if (World triggered "Round_Start"* iswm %rcon3.dat) && ($allowup3) {
- if ($exists(gatherbot/roundk3.ini)) .remove gatherbot/roundk3.ini
- 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. }
- 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! }
- 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! }
- }
- if (Killed == $clr($1-)) && ($allowup3) {
- var %Steam1 = $gettok($remove($clr($1-).nick,A.,B.),1,32)
- var %steam2 = $gettok($remove($clr($1-).nick2,A.,B.),1,32)
- .writeini -n Gatherbot/stats.ini %Steam1 nick %Steam1
- .writeini -n Gatherbot/stats.ini %Steam2 nick %Steam2
- .writeini -n Gatherbot/stats.ini %Steam1 kills $calc($readini(Gatherbot/stats.ini,%Steam1,kills) +1)
- .writeini -n Gatherbot/stats.ini %Steam1 score $calc($readini(Gatherbot/stats.ini,%Steam1,score) +3.00 )
- .writeini -n Gatherbot/stats.ini %Steam2 score $calc($readini(Gatherbot/stats.ini,%Steam2,score) -2.00 )
- .writeini -n Gatherbot/stats.ini %Steam1 $clr($1-).gun $calc($readini(Gatherbot/stats.ini,%Steam1,$clr($1-).gun) +1)
- .writeini -n Gatherbot/stats.ini %Steam2 deaths $calc($readini(Gatherbot/stats.ini,%Steam2,deaths) +1)
- .writeini -n Gatherbot/mvps3.ini %Steam1 kills $calc($readini(Gatherbot/mvps3.ini,%Steam1,kills) +1)
- if ($clr($1-).gun == knife) { ssay3 LOL!!! EZE NOOB %steam2 $+ !!! %steam1 STABED HIM!!! | tsay3 LOL!!! EZE NOOB %steam2 $+ !!! %steam1 STABED HIM!!! }
- if (!$readini(gatherbot/roundk3.ini,kills,%Steam1)) { writeini gatherbot/roundk3.ini kills %Steam1 1 }
- else writeini gatherbot/roundk3.ini kills %Steam1 $calc($readini(gatherbot/roundk3.ini,kills,%Steam1) +1)
- if ($readini(gatherbot/roundk3.ini,kills,%Steam1) == 5) {
- .writeini -n Gatherbot/Stats.ini %Steam1 Score $calc($readini(Gatherbot/stats.ini,%Steam1,Score) + 10)
- .writeini -n Gatherbot/Stats.ini %Steam1 Aces $calc($readini(Gatherbot/stats.ini,%Steam1,Aces) + 1)
- msg %Gather.channel $stl(2A14ce By12 %Steam1 14!!!!!!)
- ssay3 Ace By: %Steam1 !!!!!
- tsay3 Ace By: %Steam1 !!!!!
- }
- }
- if (Started map "*" (CRC "*") iswm %rcon3.dat) {
- set %Gather3.Map $clr($1-)
- }
- if (The password is:* iswm %rcon3.dat) {
- set %Gather3.Pass $left($4-,-1)
- }
- if ($clr($1-) == sv_password) {
- rcmd3 admin_command admin_pass
- }
- if ($1 isnum) && ($2 == :) && ($4 == :) && ($5) {
- var %nick = $5-
- var %id = $1
- :Teamer
- if ($gettok($timer(Teamer3).com,3-,32)) {
- var %move = $gettok($timer(Teamer3).com,3-,32)
- if ($gettok(%move,1,32) == a) {
- if ($gettok(%move,2,32) == CT) {
- if (A.* iswm %nick) { rcmd3 admin_command admin_execclient %id "chooseteam;menuselect 2 }
- else { rcmd3 admin_command admin_execclient %id "chooseteam; menuselect 1 }
- }
- else {
- if (A.* iswm %nick) { rcmd3 admin_command admin_execclient %id "chooseteam;menuselect 1 }
- else { rcmd3 admin_command admin_execclient %id "chooseteam;menuselect 2 }
- }
- }
- }
- }
- if (Triggered == $clr($1-)) && ($allowup3) {
- var %ttt = $clr($1-).said
- var %rcon.nick = $gettok($remove($clr($1-).nick,A.,B.),1,32)
- .writeini -n Gatherbot/mvpss.ini $gettok(%rcon.nick,1,32) score $calc($readini(Gatherbot/mvps3.ini,$gettok(%rcon.nick,1,32),score) + 2.78)
- .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) score $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),score) + 2.78)
- if (%ttt == Planted_The_Bomb) {
- .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) plants $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),plants) +1)
- .writeini -n Gatherbot/mvps3.ini $gettok(%rcon.nick,1,32) plants $calc($readini(Gatherbot/mvps3.ini,$gettok(%rcon.nick,1,32),kills) +3)
- }
- elseif (%ttt == Defused_The_Bomb) {
- .writeini -n Gatherbot/stats.ini $gettok(%rcon.nick,1,32) defuses $calc($readini(Gatherbot/stats.ini,$gettok(%rcon.nick,1,32),defuses) +1)
- .writeini -n Gatherbot/mvps3.ini $gettok(%rcon.nick,1,32) defuses $calc($readini(Gatherbot/mvps3.ini,$gettok(%rcon.nick,1,32),kills) +3)
- }
- }
- :SKIPxy
- if (Rcon: "rcon * "*" echo Ventox RCON SCRIPT from $ip $+ " from "* iswm $1-) echo -s 14(RCON) Connect check: Connected.
- if ($clr($1-) == say) || ($clr($1-) == say_team) {
- 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
- Tokenize 32 $clr($1-).said
- if (!%Gather1.Server-Flood) {
- if ($1 == %Gather.Sign $+ Rank) && (!%Gather.Flood) {
- var %rcon.nick $remove(%rcon.nick,A.,B.)
- if ($stats(%rcon.nick).score) {
- set -u2 %Gather.Flood ON rank
- 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» .
- }
- halt
- }
- if ($1- == %gather3.signserver $+ admin) { ssay3 admin is %Gather3.Admin }
- 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) $+ . }
- if ($1- == %Gather3.signserver $+ score) && (!%Gather3.live) && (%Gather3.scorestatus == off) { set -u6 %Gather3.Server-Flood ON | ssay3 Score Status - Match is not live yet }
- }
- :SAY
- if ( (A.* iswm %rcon.adminn) && ($isadmin($remove(%rcon.adminn,A.))) ) || ( (B.* iswm %rcon.adminn) && ($isadmin($remove(%rcon.adminn,B.))) ) {
- var %o = $admins(%rcon.steam).steamid
- if ($1- == %Gather3.SignServer $+ Teams) || ($1- == %Gather3.SignServer $+ Players) {
- ssay3 Team-A: %Gather3.Team-A
- ssay3 Team-B: %Gather3.Team-B
- if (%Gather3.Subs) { ssay3 Subs: %Gather3.Subs }
- }
- if ($1- == %Gather3.SignServer $+ Team A) || ($1- == %Gather3.SignServer $+ Players) {
- ssay3 Team-A: %Gather3.Team-A
- tsay3 Team-A: %Gather3.Team-A
- }
- if ($1- == %Gather3.SignServer $+ Team B) || ($1- == %Gather3.SignServer $+ Players) {
- ssay3 Team-B: %Gather3.Team-B
- tsay3 Team-B: %Gather3.Team-B
- }
- if ($1- == %Gather3.SignServer $+ Subs) || ($1- == %Gather3.SignServer $+ Players) {
- ssay3 Subs: %Gather3.Subs
- tsay3 Subs: %Gather3.Subs
- }
- if ($1 == %gather3.signserver $+ mr15) { ssay3 MR15 Settings Has Been Loaded By %rcon.nick | mr15-3 }
- if ($1 == %gather3.signserver $+ Knife) {
- mr15-3
- .timer 1 1 ssay3 Preparing for Knife Round, Please Wait...
- .timer 1 3 ssay3 *********KNIFE********
- .timer 1 3 ssay3 IMPORTANT: Shooting while in kniferound will cause a team win automaticlly
- .timer 1 5 ssay3 *******Good Luck*******
- .timer 1 5 rcmd3 admin_command admin_csay Shooting while in kniferound will cause a team win automaticlly
- .timer 1 7 rcmd3 admin_command admin_execall drop
- .timer 1 8 rcmd3 admin_command admin_execall drop
- .timer 1 11 rcmd3 admin_command admin_execall drop
- }
- if ($1 == %gather3.signserver $+ prac) { ssay3 PRAC Settings Has Been Loaded By %rcon.nick | prac-3 }
- if ($1 == %gather3.signserver $+ Fun) { ssay3 Fun Settings Has Been Loaded By %rcon.nick | fun-3 }
- if ($1 == %gather3.signserver $+ rate) { ssay3 Rate Settings Has Been Loaded By %rcon.nick | rate-3 }
- if ( ($1 == !) || ($1 == !) || ($1 == %Gather3.signserver $+ tsay) ) && ($2) { tsay3 %rcon.nick $+ : $2- }
- if ( ($1 == @) || ($1 == @) || ($1 == %Gather3.signserver $+ tsay) ) && ($2) { tsay3 $2- }
- if ( ($1 == +) || ($1 == -) || ($1 == %Gather3.signserver $+ ssay) ) && ($2) { rcmd3 admin_command admin_ssay %rcon.nick $+ : $2- }
- if ($1 == %gather3.signserver $+ name) { rcmd3 admin_command admin_execclient "name $2- }
- if ($1 == %gather3.signserver $+ Lr) { tsay3 Last Round For GameS Good luck and Have fun! }
- if ($1 == %gather3.signserver $+ L) { tsay3 Gather Is Now Started In #cZGather Enjoy Good luck and Have fun! }
- if ($1 == %gather3.signserver $+ admincmd) { rcmd3 admin_command $$2- }
- if ($1 == %gather3.signserver $+ rconcmd) { rcmd3 $$2- }
- 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 }
- 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 }
- 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 }
- 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 }
- 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 }
- if ($1 == %gather3.signserver $+ slay) && ($2) { rcmd3 admin_command admin_slay $2 | ssay3 $2 got slayed by %rcon.nick }
- if ($1 == %gather3.signserver $+ ff) { rcmd3 mp_friendlyfire $2 | ssay3 %rcon.nick $+ : set the friendlyfire to $2 }
- if ($1 == %gather3.signserver $+ map) && ($2) { rcmd3 admin_command admin_map $2 | ssay3 $2 %map by %rcon.nick }
- if ($1 == %gather3.signserver $+ help) { ssay3 !score !admin !vent !teams }
- if ($1 == %gather3.signserver $+ pass) && ($2) { rcmd3 admin_command admin_pass $2 | ssay3 password is $2 by %rcon.nick }
- if ($1 == %gather3.signServer $+ Rr) { ssay3 %rcon.nick $+ : Restarting Game... | rcmd3 sv_restart 1 }
- if ($1 == %gather3.signserver $+ Ban) && ($2) { rcmd3 admin_command admin_ban $2 | ssay3 $2 Banned by %rcon.nick }
- if ($1 == %gather3.signserver $+ Kick) && ($2) { rcmd3 admin_command admin_kick $2 | ssay3 $2 Kicked by %rcon.nick }
- if ($1 == %gather3.signserver $+ unBan) && ($2) { rcmd3 admin_command admin_unban $2 | ssay3 $2 Unbanned by %rcon.nick }
- if ($1 == %gather3.signserver $+ needSub) && ($2) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch3 $2 }
- if ($1 == %gather3.signserver $+ Sub) && ($2) && ( ($2 == A) || ($2 == B) ) { Gather SubSearch3 $2 }
- if ($1 == %gather3.signserver $+ noSub) { gather subsearch3 off }
- if ($1 == %gather3.signserver $+ freezetime) && ($2) { rcmd3 mp_freezetime $2 }
- if ($1 == %gather3.signserver $+ vent) { ssay3 Our ventrilo server is %gather.vent [Version:3.0] }
- if ($1 == %gather3.signserver $+ unpass) { rcmd3 admin_command admin_nopass $2 | ssay3 Password has been Removed by %rcon.nick }
- if ($1 == %gather3.signserver $+ Start) || ($1 == %gather3.signserver $+ live) {
- if (%Gather3.half == first) || (%Gather3.half == notyet) {
- if (A.* iswm %rcon.nick) || (Team A* iswm %rcon.nick) || (Team-A* iswm %rcon.nick) {
- set %Gather3.score-CT 0
- set %Gather3.score-T 0
- livegame1-3
- if (%rcon.team == CT) { set %Gather3.live A-B | set %Gather3.scorestatus on | set %Gather3.half first }
- elseif (%rcon.team == TERRORIST) { set %Gather3.live B-A | set %Gather3.scorestatus on | set %Gather3.half first }
- }
- if (B.* iswm %rcon.nick) || (Team B* iswm %rcon.nick) || (Team-B* iswm %rcon.nick) {
- set %Gather3.score-CT 0
- set %Gather3.score-T 0
- set %Gather3.scorestatus on
- set %Gather3.half first
- livegame1-3
- if (%rcon.team == CT) { set %Gather3.live B-A | set %Gather3.scorestatus on | set %Gather3.half first }
- elseif (%rcon.team == TERRORIST) { set %Gather3.live A-B | set %Gather3.scorestatus on | set %Gather3.half first }
- }
- }
- 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 }
- }
- if ($1 == %Gather3.signserver $+ end) && (%Gather3.status == on) { gather end3 }
- }
- }
- }
- alias ssay3 { rcmd3 admin_command admin_ssay $+([,%gather.channel,]) $1- }
- alias psay3 { rcmd3 admin_command admin_psay $1 $2- }
- alias tsay3 { rcmd3 admin_command admin_tsay $1- }
- ::::::::::::::::::::::::::::::::::::::::::::::::::::::::
- ::::::::::::::::::::::::::::::::::::::::::::::::::::::::
- ::::::::::::::::::::alias Gather::::::::::::::::::::::::
- ::::::::::::::::::::::::::::::::::::::::::::::::::::::::
- alias Gather {
- if ($isid) { scid -a $1- }
- if ($1 == subSearch1) && (%Gather1.Status == on) {
- if ($2 == a) {
- .timerSuba-1 off
- .timerSubb-1 off
- unset %Gather1.Sub
- Set %Gather1.Sub A
- msg %Gather.channel 1 4G14ather 1: 2» 2A14ttention2: 12Substitute Player is needed for 2T14eam-A.12 Plz write asap 2!Sub
- mode %Gather.channel -N
- notice %Gather.channel 4G14ather 1:sub is needed %Gather.channel
- .timer 1 1 mode %Gather.channel +N
- .timerSuba-1 0 65 Sub-A-1
- set %subsearching1 1
- }
- if ($2 == b) {
- .timerSuba-1 off
- .timerSubb-1 off
- unset %Gather1.Sub
- Set %Gather1.Sub B
- msg %Gather.channel 1 4G14ather 1: 2» 2A14ttention2: 12Substitute Player is needed for 4T14eam-B.12 Plz write asap 2!Sub
- mode %Gather.channel -N
- notice %Gather.channel 4G14ather 1:sub is needed %Gather.channel
- .timer 1 1 mode %Gather.channel +N
- .timerSubb-1 0 65 Sub-B-1
- set %subsearching1 1
- }
- if ($2 == off) {
- .timerSuba-1 off
- .timerSubb-1 off
- unset %Gather1.Sub
- msg %Gather.channel 1 4G14ather 1: 2» 2A14ttention2: 12Substitute Player is NO MORE needed.
- ssay Sub Searching Had Finished.
- tsay Sub Searching Had Finished.
- }
- }
- if ($1 == subSearch2) && (%Gather2.Status == on) {
- if ($2 == a) {
- .timerSuba-2 off
- .timerSubb-2 off
- unset %Gather2.Sub
- Set %Gather2.Sub A
- msg %Gather.channel 1 4G14ather 2:2» 2A14ttention2: 12Substitute Player is needed for 2T14eam-A.12 Plz write asap 2!Sub
- mode %Gather.channel -N
- notice %Gather.channel 4G14ather 2:sub is needed %Gather.channel
- .timer 1 1 mode %Gather.channel +N
- .timerSuba-2 0 65 Sub-A-2
- set %subsearching2 1
- }
- if ($2 == b) {
- .timerSuba-1 off
- .timerSubb-1 off
- unset %Gather2.Sub
- Set %Gather2.Sub B
- msg %Gather.channel 1 4G14ather 2:2» 2A14ttention2: 12Substitute Player is needed for 4T14eam-B.12 Plz write asap 2!Sub
- mode %Gather.channel -N
- notice %Gather.channel 4G14ather 2:sub is needed %Gather.channel
- .timer 1 1 mode %Gather.channel +N
- .timerSubb-2 0 65 Sub-B-2
- set %subsearching2 1
- }
- if ($2 == off) {
- .timerSuba-2 off
- .timerSubb-2 off
- unset %Gather2.Sub
- msg %Gather.channel 1 4G14ather 2:2» 2A14ttention2: 12Substitute Player is NO MORE needed.
- ssay2 Sub Searching Had Finished.
- tsay2 Sub Searching Had Finished.
- }
- }
- if ($1 == subSearch3) && (%Gather3.Status == on) {
- if ($2 == a) {
- .timerSuba-3 off
- .timerSubb-3 off
- unset %Gather3.Sub
- Set %Gather3.Sub A
- msg %Gather.channel 1 4G14ather 3:2» 2A14ttention2: 12Substitute Player is needed for 2T14eam-A.12 Plz write asap 2!Sub
- mode %Gather.channel -N
- notice %Gather.channel 4G14ather 3:sub is needed %Gather.channel
- .timer 1 1 mode %Gather.channel +N
- .timerSuba-3 0 65 Sub-A-3
- set %subsearching3 1
- }
- if ($2 == b) {
- .timerSuba-3 off
- .timerSubb-3 off
- unset %Gather3.Sub
- Set %Gather3.Sub B
- msg %Gather.channel 1 4G14ather 3:2» 2A14ttention2: 12Substitute Player is needed for 4T14eam-B.12 Plz write asap 2!Sub
- mode %Gather.channel -N
- notice %Gather.channel 4G14ather 3:sub is needed %Gather.channel
- .timer 1 1 mode %Gather.channel +N
- .timerSubb-3 0 65 Sub-B-3
- set %subsearching3 1
- }
- if ($2 == off) {
- .timerSuba-3 off
- .timerSubb-3 off
- unset %Gather3.Sub
- msg %Gather.channel 1 4G14ather 3: 2» 2A14ttention2: 12Substitute Player is NO MORE needed.
- ssay3 Sub Searching Had Finished.
- tsay3 Sub Searching Had Finished.
- }
- }
- if ($1 == subSearch4) && (%gather4.Status == on) {
- if ($2 == a) {
- .timerSuba-4 off
- .timerSubb-4 off
- unset %gather4.Sub
- Set %gather4.Sub A
- .msg %Gather.channel 1 4G14ather 4:2» 2A14ttention2: 12Substitute Player is needed for 2T14eam-A.12 Plz write asap 2!Sub
- mode %Gather.channel -N
- .timer 1 1 notice %Gather.channel 4G14ather 4:sub is needed %Gather.channel
- .timer 1 2 mode %Gather.channel +N
- .timerSuba-4 0 65 Sub-A-4
- set %subsearching4 1
- }
- if ($2 == b) {
- .timerSuba-4 off
- .timerSubb-4 off
- unset %gather4.Sub
- Set %gather4.Sub B
- .msg %Gather.channel 1 4G14ather 4:2» 2A14ttention2: 12Substitute Player is needed for 4T14eam-B.12 Plz write asap 2!Sub
- mode %Gather.channel -N
- .timer 1 1 notice %Gather.channel 4G14ather 4:sub is needed %Gather.channel
- .timer 1 2 mode %Gather.channel +N
- .timerSubb-4 0 65 Sub-B-4
- set %subsearching4 1
- }
- if ($2 == off) {
- .timerSuba-4 off
- .timerSubb-4 off
- unset %gather4.Sub
- msg %Gather.channel 1 4G14ather 4: 2» 2A14ttention2: 12Substitute Player is NO MORE needed.
- ssay4 Sub Searching Had Finished.
- tsay4 Sub Searching Had Finished.
- }
- }
- if ($1 == Start) {
- if (%Gather1.Status == OFF) {
- .remove gatherbot/mvps.ini
- var %userr $gettok(%gather1.user,1,32)
- var %userrr $gettok(%gather1.user,2,32)
- .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Last-gather $date $time
- .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Gathers $calc($readini(Gatherbot/ [ $+ [ %userrr ] $+ ] .ini,%userr,Gathers) +1)
- if (%userrr == admins) set %gather1.uadmin $readini(Gatherbot/admins.ini,%userr,servernick)
- unset %Gather1.Score*
- unset %Gather1.team*
- unset %Gather1.live
- inc %Gather1.num
- set %Gather1.ScoreStatus off
- unset %Gather1.first*
- rcmd mp_logdetail 2
- set %Gather1.half notyet
- inc %Gather.num
- set %Gather1.Status adding
- set %rstart.flood1 1
- mode %Gather.channel +m-N
- set %Gather1.Admin $2
- set %Gather1.Map $3
- set %Gather1.Pass $4
- set %Gather1.PassA $5
- set %Gather1.PassB $6
- if ($readini(Gatherbot\SSH-1.ini,SSH,SSH) == 1) { changepass-1 %Gather1.PassA %Gather1.PassB }
- set %Gather1.Started $date $time
- set %Gather1.Players $2
- 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.
- mode %gather.channel -N+m
- 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.
- .timer 1 4 mode %Gather.Channel -m+N
- rcmd sv_password %gather1.pass
- rcmd admin_command admin_map %gather1.map
- rcmd sv_password %gather1.pass
- .timer 1 3 rcmd admin_command admin_execall disconnect
- .timer 1 3 rcmd admin_command admin_execall disconnect
- Halt
- }
- }
- if ($1 == Start2) {
- if (%Gather2.Status == OFF) {
- .remove gatherbot/mvps2.ini
- var %userr $gettok(%gather2.user,1,32)
- var %userrr $gettok(%gather2.user,2,32)
- .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Last-gather $date $time
- .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Gathers $calc($readini(Gatherbot/ [ $+ [ %userrr ] $+ ] .ini,%userr,Gathers) +1)
- if (%userrr == admins) set %gather2.uadmin $readini(Gatherbot/admins.ini,%userr,servernick)
- unset %Gather2.Score*
- unset %Gather2.team*
- unset %Gather2.live
- set %Gather2.ScoreStatus off
- unset %Gather2.first*
- rcmd2 mp_logdetail 2
- set %Gather2.half notyet
- inc %Gather.num
- inc %Gather2.num
- set %Gather2.Status adding
- set %rstart.flood2 1
- mode %Gather.channel +m-N
- set %Gather2.Admin $2
- set %Gather2.Map $3
- set %Gather2.Pass $4
- set %Gather2.Players $2
- set %Gather2.PassA $5
- set %Gather2.PassB $6
- if ($readini(Gatherbot\SSH-2.ini,SSH,SSH) == 1) { changepass-2 %Gather2.PassA %Gather2.PassB }
- set %Gather2.Started $date $time
- 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.
- mode %gather.channel -N+m
- .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.
- .timer 1 4 mode %Gather.Channel -m+N
- rcmd2 sv_password %gather2.pass
- rcmd2 admin_command admin_map %gather2.map
- rcmd2 sv_password %gather2.pass
- .timer 1 3 rcmd2 admin_command admin_execall disconnect
- .timer 1 3 rcmd2 admin_command admin_execall disconnect
- Halt
- }
- }
- if ($1 == Start3) {
- if (%Gather3.Status == OFF) {
- .remove gatherbot/mvps3.ini
- var %userr $gettok(%gather3.user,1,32)
- var %userrr $gettok(%gather3.user,2,32)
- .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Last-gather $date $time
- .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Gathers $calc($readini(Gatherbot/ [ $+ [ %userrr ] $+ ] .ini,%userr,Gathers) +1)
- if (%userrr == admins) set %gather3.uadmin $readini(Gatherbot/admins.ini,%userr,servernick)
- unset %Gather3.Score*
- unset %Gather3.team*
- unset %Gather3.live
- set %Gather3.ScoreStatus off
- inc %Gather3.num
- unset %Gather3.first*
- rcmd3 mp_logdetail 2
- set %Gather3.half notyet
- inc %Gather.num
- set %Gather3.Status adding
- set %rstart.flood3 1
- mode %Gather.channel +m-N
- set %Gather3.Admin $2
- set %Gather3.Map $3
- set %Gather3.Pass $4
- set %Gather3.Players $2
- set %Gather3.PassA $5
- set %Gather3.PassB $6
- if ($readini(Gatherbot\SSH-3.ini,SSH,SSH) == 1) { changepass-3 %Gather3.PassA %Gather3.PassB }
- set %Gather3.Started $date $time
- 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.
- mode %gather.channel -N+m
- 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.
- .timer 1 4 mode %Gather.Channel -m+N
- rcmd3 sv_password %gather3.pass
- rcmd3 admin_command admin_map %gather3.map
- rcmd3 sv_password %gather3.pass
- .timer 1 3 rcmd3 admin_command admin_execall disconnect
- .timer 1 3 rcmd3 admin_command admin_execall disconnect
- Halt
- }
- }
- if ($1 == Stop1) {
- if (%Gather1.status == adding) {
- set %Gather1.Status OFF | .timerSuba-1 off | .timerSubb-1 off
- unset %Gather1.Players
- unset %Gather1.Subs
- unset %Gather1.Map
- unset %Gather1.Admin
- unset %Gather1.Score*
- unset %Gather1.First*
- unset %Gather1.Live
- unset %Gather1.Pas*
- unset %Gather1.Started
- rcmd sv_password $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
- var %userr $gettok(%gather1.user,1,32)
- var %userrr $gettok(%gather1.user,2,32)
- .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Gathers $calc($readini(Gatherbot/ [ $+ [ %userrr ] $+ ] .ini,%userr,Gathers) -1)
- unset %gather1.user
- unset %gather1.uadmin
- if (!$4) { msg %Gather.Channel 2» 2G14ather status 12: 12The $ord(%Gather1.num) 12Gather STOPED! and ready for next Gather2. | Halt }
- elseif ($4) { msg %Gather.Channel $stl-1(Gather Number <12 $+ %Gather1.num $+ 14> Was Stopped By12 $2 14<Reason:12 $3- $+ 14>) | Halt }
- }
- }
- if ($1 == Stop2) {
- if (%Gather2.status == adding) {
- set %Gather2.Status OFF | .timerSuba-2 off | .timerSubb-2 off
- unset %Gather2.Subs
- unset %Gather2.Players
- unset %Gather2.Map
- unset %Gather2.Score*
- unset %Gather2.First*
- unset %Gather2.Live
- unset %Gather2.Admin
- unset %Gather2.Pas*
- unset %Gather2.Started
- rcmd2 sv_password $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
- var %userr $gettok(%gather2.user,1,32)
- var %userrr $gettok(%gather2.user,2,32)
- .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Gathers $calc($readini(Gatherbot/ [ $+ [ %userrr ] $+ ] .ini,%userr,Gathers) -1)
- unset %gather2.user
- unset %gather2.admin
- if (!$4) { msg %Gather.Channel 2» 2G14ather status 22: 12The $ord(%Gather2.num) 12Gather STOPED! and ready for next Gather2. | Halt }
- elseif ($4) { msg %Gather.Channel $stl-2(Gather2 Number <12 $+ %Gather2.num $+ 14> Was Stopped By12 $2 14<Reason:12 $3- $+ 14>) | Halt }
- }
- }
- if ($1 == Stop3) {
- if (%Gather3.status == adding) {
- set %Gather3.Status OFF | .timerSuba-3 off | .timerSubb-3 off
- unset %Gather3.Subs
- unset %Gather3.Players
- unset %Gather3.Map
- unset %Gather3.Admin
- unset %Gather3.Pas*
- unset %Gather3.Started
- unset %Gather3.Score*
- unset %Gather3.First*
- unset %Gather3.Live
- rcmd3 sv_password $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
- var %userr $gettok(%gather3.user,1,32)
- var %userrr $gettok(%gather3.user,2,32)
- .writeini -n Gatherbot/ [ $+ [ %userrr ] $+ ] .ini %userr Gathers $calc($readini(Gatherbot/ [ $+ [ %userrr ] $+ ] .ini,%userr,Gathers) -1)
- unset %gather3.user
- unset %gather3.uadmin
- if (!$4) { msg %Gather.Channel 2» 2G14ather status 32: 12The $ord(%Gather3.num) 12Gather STOPED! and ready for next Gather2. | Halt }
- elseif ($4) { msg %Gather.Channel $stl-3(Gather3 Number <12 $+ %Gather3.num $+ 14> Was Stopped By12 $2 14<Reason:12 $3- $+ 14>) | Halt }
- }
- }
- if ($1 == End1) {
- if (%Gather1.status == ON) {
- .timerSuba-1 off
- .timerSubb-1 off
- .timer 1 2 Set-Ventclose
- if (%Gather1.Live) && (%Gather1.Half !== first) && (%Gather1.Half !== notyet) { Setmvps-1 }
- if (!$2) { msg %Gather.Channel $stl-1(1 2» 2G14ather1 status2: 12The2 $ord(%gather1.num) 12Gather finished and ready for next Gather2.) }
- 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.) }
- ssay Gather Number < $+ %Gather1.num $+ > Had Finished.
- tsay Gather Number < $+ %Gather1.num $+ > Had Finished.
- set %Gather1.Status OFF
- set %Gather1.Last-Map %Gather1.Map
- set %Gather1.Last-Admin %Gather1.Admin
- set %Gather1.Last-Started %Gather1.started
- unset %Gather1.Score*
- unset %Gather1.First*
- unset %Gather1.Live
- .timer 1 1 unset %Gather1.Players
- .timer 1 1 unset %Gather1.Team
- .timer 1 1 unset %Gather1.Map
- .timer 1 1 unset %Gather1.Admin
- .timer 1 1 unset %Gather1.Pas*
- .timer 1 1 unset %Gather1.Started
- ssay Ready for the next Match.!
- .timer 1 4 rcmd admin_command admin_execall disconnect
- .timer 1 4 rcmd admin_command admin_execall disconnect
- rcmd sv_password $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
- unset %Gather1.Subs
- Halt
- .timerSuba-1 off
- .timerSubb-1 off
- unset %Gather1.Sub
- unset %gather1.uadmin
- }
- }
- if ($1 == End2) {
- if (%Gather2.status == ON) {
- .timerSuba-2 off
- .timerSubb-2 off
- .timer 1 2 Set-Ventclose2
- if (%Gather2.Live) && (%Gather2.Half !== first) && (%Gather2.Half !== notyet) { Setmvps-2 }
- if (!$2) { msg %Gather.Channel $stl-2(1 2» 2G14ather2 status2: 12The2 $ord(%gather2.num) 12Gather finished and ready for next Gather2.) }
- 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.) }
- ssay2 Gather Number <12 $+ %Gather2.num $+ 14> Had Finished.
- tsay2 Gather Number <12 $+ %Gather2.num $+ 14> Had Finished.
- set %Gather2.Status OFF
- set %Gather2.Last-Map %Gather2.Map
- set %Gather2.Last-Admin %Gather2.Admin
- set %Gather2.Last-Started %Gather2.started
- unset %Gather2.Score*
- unset %Gather2.First*
- unset %Gather2.Live
- .timer 1 1 unset %Gather2.Players
- .timer 1 1 unset %Gather2.Team
- .timer 1 1 unset %Gather2.Map
- .timer 1 1 unset %Gather2.Admin
- .timer 1 1 unset %Gather2.Pas*
- .timer 1 1 unset %Gather2.Started
- ssay2 Ready for the next Match.!
- .timer 1 4 rcmd2 admin_command admin_execall disconnect
- .timer 1 4 rcmd2 admin_command admin_execall disconnect
- rcmd2 sv_password $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
- unset %Gather2.Subs
- Halt
- .timerSuba-2 off
- .timerSubb-2 off
- unset %Gather2.Sub
- unset %gather2.admin
- }
- }
- if ($1 == End3) {
- if (%Gather3.status == ON) {
- .timerSuba-3 off
- .timerSubb-3 off
- .timer 1 2 Set-Ventclose3
- if (%Gather3.Live) && (%Gather3.Half !== first) && (%Gather3.Half !== notyet) { Setmvps-3 }
- if (!$2) { msg %Gather.Channel $stl-3(1 2» 2G14ather3 status2: 12The2 $ord(%gather3.num) 12Gather finished and ready for next Gather2.) }
- 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.) }
- ssay3 Gather Number <12 $+ %Gather3.num $+ 14> Had Finished.
- tsay3 Gather Number <12 $+ %Gather3.num $+ 14> Had Finished.
- set %Gather3.Status OFF
- set %Gather3.Last-Map %Gather3.Map
- set %Gather3.Last-Admin %Gather3.Admin
- set %Gather3.Last-Started %Gather3.started
- unset %Gather3.Score*
- unset %Gather3.First*
- unset %Gather3.Live
- .timer 1 1 unset %Gather3.Players
- .timer 1 1 unset %Gather3.Team
- .timer 1 1 unset %Gather3.Map
- .timer 1 1 unset %Gather3.Admin
- .timer 1 1 unset %Gather3.Pas*
- .timer 1 1 unset %Gather3.Started
- ssay3 Ready for the next Match.!
- .timer 1 4 //rcmd3 admin_command admin_execall disconnect
- .timer 1 4 //rcmd3 admin_command admin_execall disconnect
- rcmd3 sv_password $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9)
- unset %Gather3.Subs
- Halt
- .timerSuba-3 off
- .timerSubb-3 off
- unset %Gather3.Sub
- unset %gather3.uadmin
- }
- }
- }
- alias mixteams1 {
- set %a.x 1
- var %a.p $2-
- while (%a.x <= 9) {
- set %a.num $gettok(%a.p,0,32)
- set %a.y $rand(1,%a.num)
- set %a.rndpl %a.rndpl $gettok(%a.p,%a.y,32)
- set %a.p $deltok(%a.p,%a.y,32)
- inc %a.x
- }
- set %Gather1.Team-A $1 $gettok(%a.rndpl,1-4,32)
- set %Gather1.Team-B $gettok(%a.rndpl,5-,32)
- set %gather1.players %Gather1.Team-A %Gather1.Team-B
- unset %a.*
- }
- alias mixteams2 {
- set %a.x 1
- var %a.p $2-
- while (%a.x <= 9) {
- set %a.num $gettok(%a.p,0,32)
- set %a.y $rand(1,%a.num)
- set %a.rndpl %a.rndpl $gettok(%a.p,%a.y,32)
- set %a.p $deltok(%a.p,%a.y,32)
- inc %a.x
- }
- set %Gather2.Team-A $1 $gettok(%a.rndpl,1-4,32)
- set %Gather2.Team-B $gettok(%a.rndpl,5-,32)
- set %gather2.players %Gather2.Team-A %Gather2.Team-B
- unset %a.*
- }
- alias mixteams3 {
- set %a.x 1
- var %a.p $2-
- while (%a.x <= 9) {
- set %a.num $gettok(%a.p,0,32)
- set %a.y $rand(1,%a.num)
- set %a.rndpl %a.rndpl $gettok(%a.p,%a.y,32)
- set %a.p $deltok(%a.p,%a.y,32)
- inc %a.x
- }
- set %Gather3.Team-A $1 $gettok(%a.rndpl,1-4,32)
- set %Gather3.Team-B $gettok(%a.rndpl,5-,32)
- set %gather3.players %Gather3.Team-A %Gather3.Team-B
- unset %a.*
- }
- alias teams1 {
- if (%Gather1.Status == ON) {
- 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.]
- }
- }
- alias fteams1 {
- if (%Gather1.Status == ON) {
- 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.])
- }
- }
- alias teams2 {
- if (%Gather2.Status == ON) {
- 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.]
- }
- }
- alias fteams2 {
- if (%Gather2.Status == ON) {
- 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.])
- }
- }
- alias teams3 {
- if (%Gather3.Status == ON) {
- 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.]
- }
- }
- alias fteams3 {
- if (%Gather3.Status == ON) {
- 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.])
- }
- }
- alias send1 {
- msg $replace(%Gather1.Team-A,$chr(32),$chr(44)) $details(1).A
- .timer 1 10 msg $replace(%Gather1.Team-B,$chr(32),$chr(44)) $details(1).B
- }
- alias send2 {
- msg $replace(%Gather2.Team-A,$chr(32),$chr(44)) $details(2).A
- .timer 1 10 msg $replace(%Gather2.Team-B,$chr(32),$chr(44)) $details(2).B
- }
- alias send3 {
- msg $replace(%Gather3.Team-A,$chr(32),$chr(44)) $details(3).A
- .timer 1 10 msg $replace(%Gather3.Team-B,$chr(32),$chr(44)) $details(3).B
- }
- alias top {
- if ($1 == admins) {
- var %s = $gettok($2,1,$asc(!))
- .close -@ @top-admins
- .window -h @top-admins
- var %x = $ini(Gatherbot/admins.ini,0)
- if ($ini(Gatherbot/admins.ini,0) == 0) { msg %Gather.channel $stl($getini(no-admins).msg) | set -u4 %Gather.flood ON No-top-admins | halt }
- var %z = %x
- while (%x) {
- echo @top-admins $ini(Gatherbot/admins.ini,%x) $readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%x),Gathers)
- dec %x
- }
- //filter -cwwteu 2 32 @top-admins @top-admins
- var %o = 1
- if ($ini(Gatherbot/admins.ini,0) < 5) { var %z = $ini(Gatherbot/admins.ini,0) }
- elseif ($ini(Gatherbot/admins.ini,0) >= 5) { var %z = 5 }
- set -u20 %Gather.Flood ON Top-admins
- while (%z) {
- var %user = $gettok($line(@top-admins,%o),1,32)
- msg %Gather.channel 2» $+ %o $+ «12 %user 14With12 $Gathers(%user) 14Gathers
- inc %o
- dec %z
- }
- }
- if ($1 == 10) {
- var %s = $gettok($2,1,$asc(!))
- .close -@ @Tops
- .window -h @Tops
- var %x = $ini(Gatherbot/stats.ini,0)
- if ($ini(Gatherbot/stats.ini,0) == 0) { msg %Gather.channel $stl($no-rank) | set -u4 %Gather.flood ON No-stats | halt }
- var %z = %x
- while (%x) {
- echo @Tops $ini(Gatherbot/stats.ini,%x) $readini(Gatherbot/stats.ini,$ini(Gatherbot/stats.ini,%x),score)
- dec %x
- }
- //filter -cwwteu 2 32 @Tops @Tops
- var %o = 1
- if ($ini(Gatherbot/stats.ini,0) < 5) { var %z = $ini(Gatherbot/stats.ini,0) }
- elseif ($ini(Gatherbot/stats.ini,0) >= 5) { var %z = 10 }
- var %temp
- set -u18 %Gather.Flood ON Top-10
- while (%z) {
- var %temp = %temp 2» $+ %o $+ «12 $gettok($line(@Tops,%o),1,32) 1(14 $+ $stats($gettok($line(@Tops,%o),1,32)).score $+ 1)
- if (%o == 5) { msg %Gather.channel %temp | var %temp }
- inc %o
- dec %z
- }
- if (%temp) { .timer 1 1 msg %Gather.channel %temp }
- }
- if ($1 == gunplayer) {
- var %s = $gettok($2,1,$asc(!))
- .close -@ @T
- .window -h @T
- var %x = $ini(Gatherbot/stats.ini,$2,0)
- if ($ini(Gatherbot/stats.ini,$2,0) == 3) { msg %Gather.channel $stl($no-rank) | set -u4 %Gather.flood ON No-stats | halt }
- var %z = %x
- var %guns? = 0
- while (%x) {
- 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? }
- dec %x
- }
- //filter -cwwteu 2 32 @T @T
- var %o = 1
- if (%guns? < 3) { var %z = %guns? }
- elseif (%guns? >= 3) { var %z = 3 }
- set -u20 %Gather.Flood ON Top
- var %guns
- while (%z) {
- var %g = $gettok($line(@T,%o),1,32)
- var %kills = $gettok($line(@T,%o),2,32)
- var %guns = %guns $ord(%o) $+ (12 $+ %g 14- %kills 14Kills $+ 2)
- inc %o
- dec %z
- }
- msg %Gather.channel 2» T14op-Gunz of $+ $2 $+ 2:2 %guns
- }
- if ($1 == players) {
- var %s = $gettok($2,1,$asc(!))
- .close -@ @Tops
- .window -h @Tops
- var %x = $ini(Gatherbot/stats.ini,0)
- if ($ini(Gatherbot/stats.ini,0) == 0) { msg %Gather.channel $stl($no-rank) | set -u4 %Gather.flood ON No-stats | halt }
- var %z = %x
- while (%x) {
- echo @Tops $ini(Gatherbot/stats.ini,%x) $readini(Gatherbot/stats.ini,$ini(Gatherbot/stats.ini,%x),Score)
- dec %x
- }
- //filter -cwwteu 2 32 @Tops @Tops
- var %o = 1
- if ($ini(Gatherbot/stats.ini,0) < 5) { var %z = $ini(Gatherbot/stats.ini,0) }
- elseif ($ini(Gatherbot/stats.ini,0) >= 5) { var %z = 5 }
- set -u20 %Gather.Flood ON Top-Players
- while (%z) {
- var %user = $gettok($line(@Tops,%o),1,32)
- msg %Gather.channel 2» $+ %o $+ «12 %user 14With12 $stats(%user).score 14Points.
- inc %o
- dec %z
- }
- }
- if ($1 == mvps) {
- var %s = $gettok($2,1,$asc(!))
- .close -@ @Tops
- .window -h @Tops
- var %x = $ini(Gatherbot/stats.ini,0)
- if ($ini(Gatherbot/stats.ini,0) == 0) { msg %Gather.channel $stl($no-rank) | set -u4 %Gather.flood ON No-stats | halt }
- var %z = %x
- while (%x) {
- echo @Tops $ini(Gatherbot/stats.ini,%x) $readini(Gatherbot/stats.ini,$ini(Gatherbot/stats.ini,%x),mvps)
- dec %x
- }
- //filter -cwwteu 2 32 @Tops @Tops
- var %o = 1
- if ($ini(Gatherbot/stats.ini,0) < 5) { var %z = $ini(Gatherbot/stats.ini,0) }
- elseif ($ini(Gatherbot/stats.ini,0) >= 5) { var %z = 5 }
- set -u20 %Gather.Flood ON Top-Players
- while (%z) {
- var %user = $gettok($line(@Tops,%o),1,32)
- msg %Gather.channel 2» $+ %o $+ «12 %user 14With12 $stats(%user).mvps 14Mvps.
- inc %o
- dec %z
- }
- }
- if ($1 == Aces) {
- var %s = $gettok($2,1,$asc(!))
- .close -@ @Tops
- .window -h @Tops
- var %x = $ini(Gatherbot/stats.ini,0)
- if ($ini(Gatherbot/stats.ini,0) == 0) { msg %Gather.channel $stl($no-rank) | set -u4 %Gather.flood ON No-stats | halt }
- var %z = %x
- while (%x) {
- echo @Tops $ini(Gatherbot/stats.ini,%x) $readini(Gatherbot/stats.ini,$ini(Gatherbot/stats.ini,%x),Aces)
- dec %x
- }
- //filter -cwwteu 2 32 @Tops @Tops
- var %o = 1
- if ($ini(Gatherbot/stats.ini,0) < 5) { var %z = $ini(Gatherbot/stats.ini,0) }
- elseif ($ini(Gatherbot/stats.ini,0) >= 5) { var %z = 5 }
- set -u20 %Gather.Flood ON Top-Players
- while (%z) {
- var %user = $gettok($line(@Tops,%o),1,32)
- msg %Gather.channel 2» $+ %o $+ «12 %user 14With12 $stats(%user).Aces 14Aces.
- inc %o
- dec %z
- }
- }
- }
- alias lol {
- window @T
- var %x = $ini(Gatherbot/stats.ini,$1,0)
- if ($ini(Gatherbot/stats.ini,$1,0) == 0) { msg %Gather.channel $stl($no-rank) | set -u4 %Gather.flood ON No-stats | halt }
- var %z = %x
- var %guns? = 0
- while (%x) {
- 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? }
- dec %x
- }
- //filter -cwwteu 2 32 @T @T
- var %o = 1
- if (%guns? < 5) { var %z = %guns? }
- elseif (%guns? >= 5) { var %z = 5 }
- set -u20 %Gather.Flood ON Top
- while (%z) {
- var %user = $line(@T,%o)
- echo -s %user
- inc %o
- dec %z
- }
- }
- alias no-rank { return 12There is not ranking yet.1 }
- alias rank {
- var %z = $ini(Gatherbot/stats.ini,0)
- var %o = %z
- var %s = $calc($readini(Gatherbot/stats.ini,$1,score) + 0)
- var %l = 0
- while (%o) {
- if ($ini(Gatherbot/stats.ini,%o) == $1) goto SKIP
- if (%s > $readini(Gatherbot/stats.ini,$ini(Gatherbot/stats.ini,%o),score)) inc %l
- :SKIP
- dec %o
- }
- return $calc(%z - %l )
- }
- alias rank2 {
- var %x = 1
- var %rank = 0
- var %points = $calc($readini(Gatherbot/stats.ini,$1,Score) +0)
- while ($ini(Gatherbot/stats.ini,%x)) {
- if ($ini(Gatherbot/stats.ini,%x) == $1) { GOTO GO }
- elseif (%points > $calc($readini(Gatherbot/stats.ini,$ini(Stats.ini,%x),Score) +0)) { inc %rank }
- :GO
- inc %x
- }
- return $calc($ini(Gatherbot/stats.ini,0) - %rank)
- }
- alias stats {
- if (STEAM_*:*:* !iswm $1) && ($1) {
- var %rcon.steam = $null
- var %x = $ini(Gatherbot\stats.ini,0)
- var %? = $1-
- while (%x) {
- if (%? iswm $ini(Gatherbot\stats.ini,%x)) { var %rcon.steam = $ini(Gatherbot\stats.ini,%x) | break }
- dec %x
- }
- }
- else var %rcon.steam $1
- if ($prop == exist3) || ($prop == exists3) {
- if (%rcon.steam == $null) return $false
- else return $true
- }
- if ($prop == exist) || ($prop == exists) || ($prop == exist2) || ($prop == exists2) {
- if (!$readini(Gatherbot\Stats.ini,%rcon.steam,Nick)) return $false
- else return $true
- }
- if ($prop == steam) return %rcon.steam
- if (%rcon.steam == $null) goto END
- 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) ) {
- if ($readini(Gatherbot\stats.ini,%rcon.steam,$prop)) { return $readini(Gatherbot\stats.ini,%rcon.steam,$prop) }
- if (!$readini(Gatherbot\stats.ini,%rcon.steam,$prop)) { return 0 }
- }
- if ($prop == gathers) {
- if ($readini(Gatherbot\stats.ini,%rcon.steam,gathers) == 0) { return 0 }
- if ($readini(Gatherbot\stats.ini,%rcon.steam,gathers) > 0) { return $readini(Gatherbot\stats.ini,%rcon.steam,gathers) }
- }
- if ($prop == nick) return %rcon.steam
- :END
- }
- alias score1 {
- if ($1- == notlive) { return Match is not live yet }
- if ($1- == a) {
- if (%Gather1.half == notyet) { return NotSet }
- if (%Gather1.live == A-B) || (%Gather1.live == B-A) {
- if (%Gather1.live == A-B) && (%Gather1.half == first) { return %Gather1.score-CT }
- if (%Gather1.live == B-A) && (%Gather1.half == first) { return %Gather1.score-T }
- if (%Gather1.live == A-B) && (%Gather1.half == first-second) { return %Gather1.firstA }
- if (%Gather1.live == B-A) && (%Gather1.half == first-second) { return %Gather1.firstA }
- if (%Gather1.live == A-B) && (%Gather1.half == second) { return $calc(%Gather1.score-T + %Gather1.firstA) }
- if (%Gather1.live == B-A) && (%Gather1.half == second) { return $calc(%Gather1.score-CT + %Gather1.firstA) }
- }
- }
- if ($1- == anow) {
- if (%Gather1.half == notyet) { return NotSet }
- if (%Gather1.live == A-B) || (%Gather1.live == B-A) {
- if (%Gather1.live == A-B) && (%Gather1.half == first) { return %Gather1.score-CT }
- if (%Gather1.live == B-A) && (%Gather1.half == first) { return %Gather1.score-T }
- if (%Gather1.live == A-B) && (%Gather1.half == first-second) { return %Gather1.firstA }
- if (%Gather1.live == B-A) && (%Gather1.half == first-second) { return %Gather1.firstA }
- if (%Gather1.live == A-B) && (%Gather1.half == second) { return %Gather1.score-T }
- if (%Gather1.live == B-A) && (%Gather1.half == second) { return %Gather1.score-CT }
- }
- }
- if ($1- == b) {
- if (%Gather1.half == notyet) { return NotSet }
- if (%Gather1.live == A-B) || (%Gather1.live == B-A) {
- if (%Gather1.live == A-B) && (%Gather1.half == first) { return %Gather1.score-T }
- if (%Gather1.live == B-A) && (%Gather1.half == first) { return %Gather1.score-CT }
- if (%Gather1.live == A-B) && (%Gather1.half == first-second) { return %Gather1.firstB }
- if (%Gather1.live == B-A) && (%Gather1.half == first-second) { return %Gather1.firstB }
- if (%Gather1.live == A-B) && (%Gather1.half == second) { return $calc(%Gather1.score-CT + %Gather1.firstB) }
- if (%Gather1.live == B-A) && (%Gather1.half == second) { return $calc(%Gather1.score-T + %Gather1.firstB) }
- }
- }
- if ($1- == bnow) {
- if (%Gather1.half == notyet) { return NotSet }
- if (%Gather1.live == A-B) || (%Gather1.live == B-A) {
- if (%Gather1.live == A-B) && (%Gather1.half == first) { return %Gather1.score-T }
- if (%Gather1.live == B-A) && (%Gather1.half == first) { return %Gather1.score-CT }
- if (%Gather1.live == A-B) && (%Gather1.half == first-second) { return %Gather1.firstB }
- if (%Gather1.live == B-A) && (%Gather1.half == first-second) { return %Gather1.firstB }
- if (%Gather1.live == A-B) && (%Gather1.half == second) { return %Gather1.score-CT }
- if (%Gather1.live == B-A) && (%Gather1.half == second) { return %Gather1.score-T }
- }
- }
- if ($1 == half) {
- if (%Gather1.half == notyet) { return NotSet }
- if (%Gather1.live == A-B) || (%Gather1.live == B-A) {
- if (%Gather1.half == first) && ($calc(%Gather1.score-CT + %Gather1.score-T) == 14) { return 1st half }
- if (%Gather1.half == first) && ($calc(%Gather1.score-CT + %Gather1.score-T) !== 14) { return 1st half }
- if (%Gather1.half == first-second) { return 2nd half }
- if (%Gather1.half == second) { return 2nd half }
- }
- }
- }
- alias score2 {
- if ($1- == notlive) { return Match is not live yet }
- if ($1- == a) {
- if (%Gather2.half == notyet) { return NotSet }
- if (%Gather2.live == A-B) || (%Gather2.live == B-A) {
- if (%Gather2.live == A-B) && (%Gather2.half == first) { return %Gather2.score-CT }
- if (%Gather2.live == B-A) && (%Gather2.half == first) { return %Gather2.score-T }
- if (%Gather2.live == A-B) && (%Gather2.half == first-second) { return %Gather2.firstA }
- if (%Gather2.live == B-A) && (%Gather2.half == first-second) { return %Gather2.firstA }
- if (%Gather2.live == A-B) && (%Gather2.half == second) { return $calc(%Gather2.score-T + %Gather2.firstA) }
- if (%Gather2.live == B-A) && (%Gather2.half == second) { return $calc(%Gather2.score-CT + %Gather2.firstA) }
- }
- }
- if ($1- == anow) {
- if (%Gather2.half == notyet) { return NotSet }
- if (%Gather2.live == A-B) || (%Gather2.live == B-A) {
- if (%Gather2.live == A-B) && (%Gather2.half == first) { return %Gather2.score-CT }
- if (%Gather2.live == B-A) && (%Gather2.half == first) { return %Gather2.score-T }
- if (%Gather2.live == A-B) && (%Gather2.half == first-second) { return %Gather2.firstA }
- if (%Gather2.live == B-A) && (%Gather2.half == first-second) { return %Gather2.firstA }
- if (%Gather2.live == A-B) && (%Gather2.half == second) { return %Gather2.score-T }
- if (%Gather2.live == B-A) && (%Gather2.half == second) { return %Gather2.score-CT }
- }
- }
- if ($1- == b) {
- if (%Gather2.half == notyet) { return NotSet }
- if (%Gather2.live == A-B) || (%Gather2.live == B-A) {
- if (%Gather2.live == A-B) && (%Gather2.half == first) { return %Gather2.score-T }
- if (%Gather2.live == B-A) && (%Gather2.half == first) { return %Gather2.score-CT }
- if (%Gather2.live == A-B) && (%Gather2.half == first-second) { return %Gather2.firstB }
- if (%Gather2.live == B-A) && (%Gather2.half == first-second) { return %Gather2.firstB }
- if (%Gather2.live == A-B) && (%Gather2.half == second) { return $calc(%Gather2.score-CT + %Gather2.firstB) }
- if (%Gather2.live == B-A) && (%Gather2.half == second) { return $calc(%Gather2.score-T + %Gather2.firstB) }
- }
- }
- if ($1- == bnow) {
- if (%Gather2.half == notyet) { return NotSet }
- if (%Gather2.live == A-B) || (%Gather2.live == B-A) {
- if (%Gather2.live == A-B) && (%Gather2.half == first) { return %Gather2.score-T }
- if (%Gather2.live == B-A) && (%Gather2.half == first) { return %Gather2.score-CT }
- if (%Gather2.live == A-B) && (%Gather2.half == first-second) { return %Gather2.firstB }
- if (%Gather2.live == B-A) && (%Gather2.half == first-second) { return %Gather2.firstB }
- if (%Gather2.live == A-B) && (%Gather2.half == second) { return %Gather2.score-CT }
- if (%Gather2.live == B-A) && (%Gather2.half == second) { return %Gather2.score-T }
- }
- }
- if ($1 == half) {
- if (%Gather2.half == notyet) { return NotSet }
- if (%Gather2.live == A-B) || (%Gather2.live == B-A) {
- if (%Gather2.half == first) && ($calc(%Gather2.score-CT + %Gather2.score-T) == 14) { return 1st half }
- if (%Gather2.half == first) && ($calc(%Gather2.score-CT + %Gather2.score-T) !== 14) { return 1st half }
- if (%Gather2.half == first-second) { return 2nd half }
- if (%Gather2.half == second) { return 2nd half }
- }
- }
- }
- alias score3 {
- if ($1- == notlive) { return Match is not live yet }
- if ($1- == a) {
- if (%Gather3.half == notyet) { return NotSet }
- if (%Gather3.live == A-B) || (%Gather3.live == B-A) {
- if (%Gather3.live == A-B) && (%Gather3.half == first) { return %Gather3.score-CT }
- if (%Gather3.live == B-A) && (%Gather3.half == first) { return %Gather3.score-T }
- if (%Gather3.live == A-B) && (%Gather3.half == first-second) { return %Gather3.firstA }
- if (%Gather3.live == B-A) && (%Gather3.half == first-second) { return %Gather3.firstA }
- if (%Gather3.live == A-B) && (%Gather3.half == second) { return $calc(%Gather3.score-T + %Gather3.firstA) }
- if (%Gather3.live == B-A) && (%Gather3.half == second) { return $calc(%Gather3.score-CT + %Gather3.firstA) }
- }
- }
- if ($1- == anow) {
- if (%Gather3.half == notyet) { return NotSet }
- if (%Gather3.live == A-B) || (%Gather3.live == B-A) {
- if (%Gather3.live == A-B) && (%Gather3.half == first) { return %Gather3.score-CT }
- if (%Gather3.live == B-A) && (%Gather3.half == first) { return %Gather3.score-T }
- if (%Gather3.live == A-B) && (%Gather3.half == first-second) { return %Gather3.firstA }
- if (%Gather3.live == B-A) && (%Gather3.half == first-second) { return %Gather3.firstA }
- if (%Gather3.live == A-B) && (%Gather3.half == second) { return %Gather3.score-T }
- if (%Gather3.live == B-A) && (%Gather3.half == second) { return %Gather3.score-CT }
- }
- }
- if ($1- == b) {
- if (%Gather3.half == notyet) { return NotSet }
- if (%Gather3.live == A-B) || (%Gather3.live == B-A) {
- if (%Gather3.live == A-B) && (%Gather3.half == first) { return %Gather3.score-T }
- if (%Gather3.live == B-A) && (%Gather3.half == first) { return %Gather3.score-CT }
- if (%Gather3.live == A-B) && (%Gather3.half == first-second) { return %Gather3.firstB }
- if (%Gather3.live == B-A) && (%Gather3.half == first-second) { return %Gather3.firstB }
- if (%Gather3.live == A-B) && (%Gather3.half == second) { return $calc(%Gather3.score-CT + %Gather3.firstB) }
- if (%Gather3.live == B-A) && (%Gather3.half == second) { return $calc(%Gather3.score-T + %Gather3.firstB) }
- }
- }
- if ($1- == bnow) {
- if (%Gather3.half == notyet) { return NotSet }
- if (%Gather3.live == A-B) || (%Gather3.live == B-A) {
- if (%Gather3.live == A-B) && (%Gather3.half == first) { return %Gather3.score-T }
- if (%Gather3.live == B-A) && (%Gather3.half == first) { return %Gather3.score-CT }
- if (%Gather3.live == A-B) && (%Gather3.half == first-second) { return %Gather3.firstB }
- if (%Gather3.live == B-A) && (%Gather3.half == first-second) { return %Gather3.firstB }
- if (%Gather3.live == A-B) && (%Gather3.half == second) { return %Gather3.score-CT }
- if (%Gather3.live == B-A) && (%Gather3.half == second) { return %Gather3.score-T }
- }
- }
- if ($1 == half) {
- if (%Gather3.half == notyet) { return NotSet }
- if (%Gather3.live == A-B) || (%Gather3.live == B-A) {
- if (%Gather3.half == first) && ($calc(%Gather3.score-CT + %Gather3.score-T) == 14) { return 1st half }
- if (%Gather3.half == first) && ($calc(%Gather3.score-CT + %Gather3.score-T) !== 14) { return 1st half }
- if (%Gather3.half == first-second) { return 2nd half }
- if (%Gather3.half == second) { return 2nd half }
- }
- }
- }
- alias score4 {
- if ($1- == notlive) { return Match is not live yet }
- if ($1- == a) {
- if (%gather4.half == notyet) { return NotSet }
- if (%gather4.live == A-B) || (%gather4.live == B-A) {
- if (%gather4.live == A-B) && (%gather4.half == first) { return %gather4.score-CT }
- if (%gather4.live == B-A) && (%gather4.half == first) { return %gather4.score-T }
- if (%gather4.live == A-B) && (%gather4.half == first-second) { return %gather4.firstA }
- if (%gather4.live == B-A) && (%gather4.half == first-second) { return %gather4.firstA }
- if (%gather4.live == A-B) && (%gather4.half == second) { return $calc(%gather4.score-T + %gather4.firstA) }
- if (%gather4.live == B-A) && (%gather4.half == second) { return $calc(%gather4.score-CT + %gather4.firstA) }
- }
- }
- if ($1- == anow) {
- if (%gather4.half == notyet) { return NotSet }
- if (%gather4.live == A-B) || (%gather4.live == B-A) {
- if (%gather4.live == A-B) && (%gather4.half == first) { return %gather4.score-CT }
- if (%gather4.live == B-A) && (%gather4.half == first) { return %gather4.score-T }
- if (%gather4.live == A-B) && (%gather4.half == first-second) { return %gather4.firstA }
- if (%gather4.live == B-A) && (%gather4.half == first-second) { return %gather4.firstA }
- if (%gather4.live == A-B) && (%gather4.half == second) { return %gather4.score-T }
- if (%gather4.live == B-A) && (%gather4.half == second) { return %gather4.score-CT }
- }
- }
- if ($1- == b) {
- if (%gather4.half == notyet) { return NotSet }
- if (%gather4.live == A-B) || (%gather4.live == B-A) {
- if (%gather4.live == A-B) && (%gather4.half == first) { return %gather4.score-T }
- if (%gather4.live == B-A) && (%gather4.half == first) { return %gather4.score-CT }
- if (%gather4.live == A-B) && (%gather4.half == first-second) { return %gather4.firstB }
- if (%gather4.live == B-A) && (%gather4.half == first-second) { return %gather4.firstB }
- if (%gather4.live == A-B) && (%gather4.half == second) { return $calc(%gather4.score-CT + %gather4.firstB) }
- if (%gather4.live == B-A) && (%gather4.half == second) { return $calc(%gather4.score-T + %gather4.firstB) }
- }
- }
- if ($1- == bnow) {
- if (%gather4.half == notyet) { return NotSet }
- if (%gather4.live == A-B) || (%gather4.live == B-A) {
- if (%gather4.live == A-B) && (%gather4.half == first) { return %gather4.score-T }
- if (%gather4.live == B-A) && (%gather4.half == first) { return %gather4.score-CT }
- if (%gather4.live == A-B) && (%gather4.half == first-second) { return %gather4.firstB }
- if (%gather4.live == B-A) && (%gather4.half == first-second) { return %gather4.firstB }
- if (%gather4.live == A-B) && (%gather4.half == second) { return %gather4.score-CT }
- if (%gather4.live == B-A) && (%gather4.half == second) { return %gather4.score-T }
- }
- }
- if ($1 == half) {
- if (%gather4.half == notyet) { return NotSet }
- if (%gather4.live == A-B) || (%gather4.live == B-A) {
- if (%gather4.half == first) && ($calc(%gather4.score-CT + %gather4.score-T) == 14) { return 1st half }
- if (%gather4.half == first) && ($calc(%gather4.score-CT + %gather4.score-T) !== 14) { return 1st half }
- if (%gather4.half == first-second) { return 2nd half }
- if (%gather4.half == second) { return 2nd half }
- }
- }
- }
- alias scoreside1 {
- if ($1- == a) {
- if (%Gather1.half == first) {
- if (%Gather1.live == A-B) { return 2C14ounter terrorists }
- if (%Gather1.live == B-A) { return 4T14errorists }
- }
- elseif (%Gather1.half == first-second) || (%Gather1.half == second) {
- if (%Gather1.live == A-B) { return 4T14errorists }
- if (%Gather1.live == B-A) { return 2C14ounter terrorists }
- }
- }
- if ($1- == b) {
- if (%Gather1.half == first) {
- if (%Gather1.live == A-B) { return 4T14errorists }
- if (%Gather1.live == B-A) { return 2C14ounter terrorists }
- }
- elseif (%Gather1.half == first-second) || (%Gather1.half == second) {
- if (%Gather1.live == A-B) { return 2C14ounter terrorists }
- if (%Gather1.live == B-A) { return 4T14errorists }
- }
- }
- }
- alias scorecolor1 {
- if ($1- == a) {
- if (%Gather1.half == first) {
- if (%Gather1.live == A-B) { return 12 }
- if (%Gather1.live == B-A) { return 4 }
- }
- elseif (%Gather1.half == first-second) || (%Gather1.half == second) {
- if (%Gather1.live == A-B) { return 4 }
- if (%Gather1.live == B-A) { return 12 }
- }
- }
- if ($1- == b) {
- if (%Gather1.half == first) {
- if (%Gather1.live == A-B) { return 4 }
- if (%Gather1.live == B-A) { return 12 }
- }
- elseif (%Gather1.half == first-second) || (%Gather1.half == second) {
- if (%Gather1.live == A-B) { return 12 }
- if (%Gather1.live == B-A) { return 4 }
- }
- }
- }
- alias scoreside2 {
- if ($1- == a) {
- if (%Gather2.half == first) {
- if (%Gather2.live == A-B) { return 2C14ounter terrorists }
- if (%Gather2.live == B-A) { return 4T14errorists }
- }
- elseif (%Gather2.half == first-second) || (%Gather2.half == second) {
- if (%Gather2.live == A-B) { return 4T14errorists }
- if (%Gather2.live == B-A) { return 2C14ounter terrorists }
- }
- }
- if ($1- == b) {
- if (%Gather2.half == first) {
- if (%Gather2.live == A-B) { return 4T14errorists }
- if (%Gather2.live == B-A) { return 2C14ounter terrorists }
- }
- elseif (%Gather2.half == first-second) || (%Gather2.half == second) {
- if (%Gather2.live == A-B) { return 2C14ounter terrorists }
- if (%Gather2.live == B-A) { return 4T14errorists }
- }
- }
- }
- alias scorecolor2 {
- if ($1- == a) {
- if (%Gather2.half == first) {
- if (%Gather2.live == A-B) { return 12 }
- if (%Gather2.live == B-A) { return 4 }
- }
- elseif (%Gather2.half == first-second) || (%Gather2.half == second) {
- if (%Gather2.live == A-B) { return 4 }
- if (%Gather2.live == B-A) { return 12 }
- }
- }
- if ($1- == b) {
- if (%Gather2.half == first) {
- if (%Gather2.live == A-B) { return 4 }
- if (%Gather2.live == B-A) { return 12 }
- }
- elseif (%Gather2.half == first-second) || (%Gather2.half == second) {
- if (%Gather2.live == A-B) { return 12 }
- if (%Gather2.live == B-A) { return 4 }
- }
- }
- }
- alias scoreside3 {
- if ($1- == a) {
- if (%Gather3.half == first) {
- if (%Gather3.live == A-B) { return 2C14ounter terrorists }
- if (%Gather3.live == B-A) { return 4T14errorists }
- }
- elseif (%Gather3.half == first-second) || (%Gather3.half == second) {
- if (%Gather3.live == A-B) { return 4T14errorists }
- if (%Gather3.live == B-A) { return 2C14ounter terrorists }
- }
- }
- if ($1- == b) {
- if (%Gather3.half == first) {
- if (%Gather3.live == A-B) { return 4T14errorists }
- if (%Gather3.live == B-A) { return 2C14ounter terrorists }
- }
- elseif (%Gather3.half == first-second) || (%Gather3.half == second) {
- if (%Gather3.live == A-B) { return 2C14ounter terrorists }
- if (%Gather3.live == B-A) { return 4T14errorists }
- }
- }
- }
- alias scorecolor3 {
- if ($1- == a) {
- if (%Gather3.half == first) {
- if (%Gather3.live == A-B) { return 12 }
- if (%Gather3.live == B-A) { return 4 }
- }
- elseif (%Gather3.half == first-second) || (%Gather3.half == second) {
- if (%Gather3.live == A-B) { return 4 }
- if (%Gather3.live == B-A) { return 12 }
- }
- }
- if ($1- == b) {
- if (%Gather3.half == first) {
- if (%Gather3.live == A-B) { return 4 }
- if (%Gather3.live == B-A) { return 12 }
- }
- elseif (%Gather3.half == first-second) || (%Gather3.half == second) {
- if (%Gather3.live == A-B) { return 12 }
- if (%Gather3.live == B-A) { return 4 }
- }
- }
- }
- alias scoreside4 {
- if ($1- == a) {
- if (%gather4.half == first) {
- if (%gather4.live == A-B) { return 2C14ounter terrorists }
- if (%gather4.live == B-A) { return 4T14errorists }
- }
- elseif (%gather4.half == first-second) || (%gather4.half == second) {
- if (%gather4.live == A-B) { return 4T14errorists }
- if (%gather4.live == B-A) { return 2C14ounter terrorists }
- }
- }
- if ($1- == b) {
- if (%gather4.half == first) {
- if (%gather4.live == A-B) { return 4T14errorists }
- if (%gather4.live == B-A) { return 2C14ounter terrorists }
- }
- elseif (%gather4.half == first-second) || (%gather4.half == second) {
- if (%gather4.live == A-B) { return 2C14ounter terrorists }
- if (%gather4.live == B-A) { return 4T14errorists }
- }
- }
- }
- alias scorecolor4 {
- if ($1- == a) {
- if (%gather4.half == first) {
- if (%gather4.live == A-B) { return 12 }
- if (%gather4.live == B-A) { return 4 }
- }
- elseif (%gather4.half == first-second) || (%gather4.half == second) {
- if (%gather4.live == A-B) { return 4 }
- if (%gather4.live == B-A) { return 12 }
- }
- }
- if ($1- == b) {
- if (%gather4.half == first) {
- if (%gather4.live == A-B) { return 4 }
- if (%gather4.live == B-A) { return 12 }
- }
- elseif (%gather4.half == first-second) || (%gather4.half == second) {
- if (%gather4.live == A-B) { return 12 }
- if (%gather4.live == B-A) { return 4 }
- }
- }
- }
- alias livegame1 {
- set %gather1.scorestatus on
- msg %gather.channel $stl-1(12The First Half Is Starting Now...)
- .timer 1 1 rcmd sv_restart 1
- .timer 1 1 ssay Preparing for Starting Game, Please Wait.
- .timer 1 2 ssay Game Started After 3 Restarts [Good Luck]
- .timer 1 3 rcmd sv_restart 1
- .timer 1 4 rcmd sv_restart 1
- .timer 1 4 ssay LIVE. Gather Started! -> TEAM KILL = BAN
- .timer 1 4 ssay Good Luck and Have Fun
- .timer 1 6 Setscore-1
- .timer 1 6 tsay Match is Live! First half Started Now, Score is - Team-A: 0 Team-B: 0
- .timer 1 9 rcmd admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
- }
- alias livegame2 {
- msg %gather.channel $stl-1(12The Second Half Is Starting Now...)
- .timer 1 1 rcmd sv_restart 1
- .timer 1 1 ssay Preparing for Starting Game, Please Wait.
- .timer 1 2 ssay Game Started After 3 Restarts [Good Luck]
- .timer 1 3 rcmd sv_restart 1
- .timer 1 4 rcmd sv_restart 1
- .timer 1 4 ssay LIVE. Gather Started! -> TEAM KILL = BAN
- .timer 1 4 ssay Good Luck and Have Fun
- .timer 1 6 Setscore-1
- .timer 1 6 tsay Match is Live! Second half Started Now, Score is - Team-A: $score1(a) Team-B: $score1(b)
- .timer 1 9 rcmd admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
- }
- alias livegame1-2 {
- set %gather2.scorestatus on
- msg %gather.channel $stl-2(12The First Half Is Now Starting...)
- .timer 1 1 rcmd2 sv_restart 1
- .timer 1 1 ssay2 Preparing for Starting Game, Please Wait.
- .timer 1 2 ssay2 Game Started After 3 Restarts [Good Luck]
- .timer 1 3 rcmd2 sv_restart 1
- .timer 1 4 rcmd2 sv_restart 1
- .timer 1 4 ssay2 LIVE. Gather Started! -> TEAM KILL = BAN
- .timer 1 4 ssay2 Good Luck and Have Fun
- .timer 1 6 Setscore-2
- .timer 1 6 tsay2 Match is Live! First half Started Now, Score is - Team-A: 0 Team-B: 0
- .timer 1 9 rcmd2 admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
- }
- alias livegame2-2 {
- msg %gather.channel $stl-2(12The Second Half Is Now Starting... )
- .timer 1 1 rcmd2 sv_restart 1
- .timer 1 1 ssay2 Preparing for Starting Game, Please Wait.
- .timer 1 2 ssay2 Game Started After 3 Restarts [Good Luck]
- .timer 1 3 rcmd2 sv_restart 1
- .timer 1 4 rcmd2 sv_restart 1
- .timer 1 4 ssay2 LIVE. Gather Started! -> TEAM KILL = BAN
- .timer 1 4 ssay2 Good Luck and Have Fun
- .timer 1 6 Setscore-2
- .timer 1 6 tsay2 Match is Live! Second half Started Now, Score is - Team-A: $score2(a) Team-B: $score2(b)
- .timer 1 9 rcmd2 admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
- }
- alias livegame1-3 {
- set %gather3.scorestatus on
- msg %gather.channel $stl-3(12The First Half Is Now Starting...)
- .timer 1 1 rcmd3 sv_restart 1
- .timer 1 1 ssay3 Preparing for Starting Game, Please Wait.
- .timer 1 2 ssay3 Game Started After 3 Restarts [Good Luck]
- .timer 1 3 rcmd3 sv_restart 1
- .timer 1 4 rcmd3 sv_restart 1
- .timer 1 4 ssay3 LIVE. Gather Started! -> TEAM KILL = BAN
- .timer 1 4 ssay3 Good Luck and Have Fun
- .timer 1 6 Setscore-3
- .timer 1 6 tsay3 Match is Live! First half Started Now, Score is - Team-A: 0 Team-B: 0
- .timer 1 9 rcmd3 admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
- }
- alias livegame2-3 {
- msg %gather.channel $stl-3(12The Second Half Is Now Starting...)
- .timer 1 1 rcmd3 sv_restart 1
- .timer 1 1 ssay3 Preparing for Starting Game, Please Wait.
- .timer 1 2 ssay3 Game Started After 3 Restarts [Good Luck]
- .timer 1 3 rcmd3 sv_restart 1
- .timer 1 4 rcmd3 sv_restart 1
- .timer 1 4 ssay3 LIVE. Gather Started! -> TEAM KILL = BAN
- .timer 1 4 ssay3 Good Luck and Have Fun
- .timer 1 6 Setscore-3
- .timer 1 6 tsay3 Match is Live! Second half Started Now, Score is - Team-A: $score3(a) Team-B: $score3(b)
- .timer 1 9 rcmd3 admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
- }
- alias livegame1-4 {
- set %gather4.scorestatus on
- msg %gather.channel $stl-4(12The First Half Is Now Starting...)
- .timer 1 1 rcmd4 sv_restart 1
- .timer 1 1 ssay4 Preparing for Starting Game, Please Wait.
- .timer 1 2 ssay4 Game Started After 3 Restarts [Good Luck]
- .timer 1 3 rcmd4 sv_restart 1
- .timer 1 4 rcmd4 sv_restart 1
- .timer 1 4 ssay4 LIVE. Gather Started! -> TEAM KILL = BAN
- .timer 1 4 ssay4 Good Luck and Have Fun
- .timer 1 6 Setscore-4
- .timer 1 6 tsay4 Match is Live! First half Started Now, Score is - Team-A: 0 Team-B: 0
- .timer 1 9 rcmd4 admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
- }
- alias livegame2-4 {
- msg %gather.channel $stl-4(12The Second Half Is Now Starting...)
- .timer 1 1 rcmd4 sv_restart 1
- .timer 1 1 ssay4 Preparing for Starting Game, Please Wait.
- .timer 1 2 ssay4 Game Started After 3 Restarts [Good Luck]
- .timer 1 3 rcmd4 sv_restart 1
- .timer 1 4 rcmd4 sv_restart 1
- .timer 1 4 ssay4 LIVE. Gather Started! -> TEAM KILL = BAN
- .timer 1 4 ssay4 Good Luck and Have Fun
- .timer 1 6 Setscore-4
- .timer 1 6 tsay4 Match is Live! Second half Started Now, Score is - Team-A: $score4(a) Team-B: $score4(b)
- .timer 1 9 rcmd4 admin_command admin_csay LIVE. Gather Started! -> TEAM KILL = BAN
- }
- alias mr15 {
- rcmd mp_autokick 0
- rcmd mp_limitteams 0
- rcmd mp_startmoney 800
- rcmd mp_forcecamera 2
- rcmd mp_roundtime 1.75
- rcmd mp_c4timer 35
- rcmd sv_alltalk 0
- rcmd mp_friendlyfire 1
- rcmd mp_freezetime 8
- rcmd mp_buytime 0.15
- rcmd mp_timelimit 0
- rcmd sv_restart 1
- }
- alias prac {
- rcmd mp_autokick 0
- rcmd mp_limitteams 0
- rcmd mp_startmoney 16000
- rcmd mp_forcecamera 2
- rcmd mp_roundtime 1.75
- rcmd mp_c4timer 35
- rcmd sv_alltalk 0
- rcmd mp_friendlyfire 0
- rcmd mp_freezetime 0
- rcmd mp_buytime 2
- rcmd mp_timelimit 0
- rcmd sv_restart 1
- }
- alias fun {
- rcmd mp_autokick 0
- rcmd mp_limitteams 0
- rcmd mp_startmoney 800
- rcmd mp_forcecamera 2
- rcmd mp_roundtime 1.75
- rcmd mp_c4timer 35
- rcmd sv_alltalk 0
- rcmd mp_friendlyfire 1
- rcmd mp_freezetime 0
- rcmd mp_buytime 0.15
- rcmd mp_timelimit 0
- rcmd sv_restart 1
- }
- alias rate {
- rcmd mp_autokick 0
- rcmd mp_limitteams 0
- rcmd mp_startmoney 16000
- rcmd mp_forcecamera 2
- rcmd mp_roundtime 1.75
- rcmd mp_c4timer 35
- rcmd sv_alltalk 0
- rcmd mp_friendlyfire 0
- rcmd mp_freezetime 0
- rcmd mp_buytime 2
- rcmd mp_timelimit 0
- rcmd sv_maxrate 25000
- rcmd sv_minrate 4000
- rcmd sv_maxupdaterate 101
- rcmd sys_ticrate 10000
- rcmd sv_restart 1
- }
- alias mr15-2 {
- rcmd2 mp_autokick 0
- rcmd2 mp_limitteams 0
- rcmd2 mp_startmoney 800
- rcmd2 mp_forcecamera 2
- rcmd2 mp_roundtime 1.75
- rcmd2 mp_c4timer 35
- rcmd2 sv_alltalk 0
- rcmd2 mp_friendlyfire 1
- rcmd2 mp_freezetime 8
- rcmd2 mp_buytime 0.15
- rcmd2 mp_timelimit 0
- rcmd2 sv_restart 1
- }
- alias prac-2 {
- rcmd2 mp_autokick 0
- rcmd2 mp_limitteams 0
- rcmd2 mp_startmoney 16000
- rcmd2 mp_forcecamera 2
- rcmd2 mp_roundtime 1.75
- rcmd2 mp_c4timer 35
- rcmd2 sv_alltalk 0
- rcmd2 mp_friendlyfire 0
- rcmd2 mp_freezetime 0
- rcmd2 mp_buytime 2
- rcmd2 mp_timelimit 0
- rcmd2 sv_restart 1
- }
- alias fan-2 {
- rcmd2 mp_autokick 0
- rcmd2 mp_limitteams 0
- rcmd2 mp_startmoney 800
- rcmd2 mp_forcecamera 2
- rcmd2 mp_roundtime 1.75
- rcmd2 mp_c4timer 35
- rcmd2 sv_alltalk 0
- rcmd2 mp_friendlyfire 1
- rcmd2 mp_freezetime 0
- rcmd2 mp_buytime 0.15
- rcmd2 mp_timelimit 0
- rcmd2 sv_restart 1
- }
- alias rate-2 {
- rcmd2 mp_autokick 0
- rcmd2 mp_limitteams 0
- rcmd2 mp_startmoney 16000
- rcmd2 mp_forcecamera 2
- rcmd2 mp_roundtime 1.75
- rcmd2 mp_c4timer 35
- rcmd2 sv_alltalk 0
- rcmd2 mp_friendlyfire 0
- rcmd2 mp_freezetime 0
- rcmd2 mp_buytime 2
- rcmd2 mp_timelimit 0
- rcmd2 sv_maxrate 25000
- rcmd2 sv_minrate 4000
- rcmd2 sv_maxupdaterate 101
- rcmd2 sys_ticrate 10000
- rcmd2 sv_restart 1
- }
- alias mr15-3 {
- rcmd3 mp_autokick 0
- rcmd3 mp_limitteams 0
- rcmd3 mp_startmoney 800
- rcmd3 mp_forcecamera 2
- rcmd3 mp_roundtime 1.75
- rcmd3 mp_c4timer 35
- rcmd3 sv_alltalk 0
- rcmd3 mp_friendlyfire 1
- rcmd3 mp_freezetime 8
- rcmd3 mp_buytime 0.15
- rcmd3 mp_timelimit 0
- rcmd3 sv_restart 1
- }
- alias prac-3 {
- rcmd3 mp_autokick 0
- rcmd3 mp_limitteams 0
- rcmd3 mp_startmoney 16000
- rcmd3 mp_forcecamera 2
- rcmd3 mp_roundtime 1.75
- rcmd3 mp_c4timer 35
- rcmd3 sv_alltalk 0
- rcmd3 mp_friendlyfire 0
- rcmd3 mp_freezetime 0
- rcmd3 mp_buytime 2
- rcmd3 mp_timelimit 0
- rcmd3 sv_restart 1
- }
- alias fun-3 {
- rcmd3 mp_autokick 0
- rcmd3 mp_limitteams 0
- rcmd3 mp_startmoney 800
- rcmd3 mp_forcecamera 2
- rcmd3 mp_roundtime 1.75
- rcmd3 mp_c4timer 35
- rcmd3 sv_alltalk 0
- rcmd3 mp_friendlyfire 1
- rcmd3 mp_freezetime 0
- rcmd3 mp_buytime 0.15
- rcmd3 mp_timelimit 0
- rcmd3 sv_restart 1
- }
- alias fun-2 {
- rcmd2 mp_autokick 0
- rcmd2 mp_limitteams 0
- rcmd2 mp_startmoney 800
- rcmd2 mp_forcecamera 2
- rcmd2 mp_roundtime 1.75
- rcmd2 mp_c4timer 35
- rcmd2 sv_alltalk 0
- rcmd2 mp_friendlyfire 1
- rcmd2 mp_freezetime 0
- rcmd2 mp_buytime 0.15
- rcmd2 mp_timelimit 0
- rcmd2 sv_restart 1
- }
- alias rate-3 {
- rcmd3 mp_autokick 0
- rcmd3 mp_limitteams 0
- rcmd3 mp_startmoney 16000
- rcmd3 mp_forcecamera 2
- rcmd3 mp_roundtime 1.75
- rcmd3 mp_c4timer 35
- rcmd3 sv_alltalk 0
- rcmd3 mp_friendlyfire 0
- rcmd3 mp_freezetime 0
- rcmd3 mp_buytime 2
- rcmd3 mp_timelimit 0
- rcmd3 sv_maxrate 25000
- rcmd3 sv_minrate 4000
- rcmd3 sv_maxupdaterate 101
- rcmd3 sys_ticrate 10000
- rcmd3 sv_restart 1
- }
- alias mr15-4 {
- rcmd4 mp_autokick 0
- rcmd4 mp_limitteams 0
- rcmd4 mp_startmoney 800
- rcmd4 mp_forcecamera 2
- rcmd4 mp_roundtime 1.75
- rcmd4 mp_c4timer 35
- rcmd4 sv_alltalk 0
- rcmd4 mp_friendlyfire 1
- rcmd4 mp_freezetime 8
- rcmd4 mp_buytime 0.15
- rcmd4 mp_timelimit 0
- rcmd4 sv_restart 1
- }
- alias prac-4 {
- rcmd4 mp_autokick 0
- rcmd4 mp_limitteams 0
- rcmd4 mp_startmoney 16000
- rcmd4 mp_forcecamera 2
- rcmd4 mp_roundtime 1.75
- rcmd4 mp_c4timer 35
- rcmd4 sv_alltalk 0
- rcmd4 mp_friendlyfire 0
- rcmd4 mp_freezetime 0
- rcmd4 mp_buytime 2
- rcmd4 mp_timelimit 0
- rcmd4 sv_restart 1
- }
- alias fun-4 {
- rcmd4 mp_autokick 0
- rcmd4 mp_limitteams 0
- rcmd4 mp_startmoney 800
- rcmd4 mp_forcecamera 2
- rcmd4 mp_roundtime 1.75
- rcmd4 mp_c4timer 35
- rcmd4 sv_alltalk 0
- rcmd4 mp_friendlyfire 1
- rcmd4 mp_freezetime 0
- rcmd4 mp_buytime 0.15
- rcmd4 mp_timelimit 0
- rcmd4 sv_restart 1
- }
- alias rate-4 {
- rcmd mp_autokick 0
- rcmd mp_limitteams 0
- rcmd mp_startmoney 16000
- rcmd mp_forcecamera 2
- rcmd mp_roundtime 1.75
- rcmd mp_c4timer 35
- rcmd sv_alltalk 0
- rcmd mp_friendlyfire 0
- rcmd mp_freezetime 0
- rcmd mp_buytime 2
- rcmd mp_timelimit 0
- rcmd sv_maxrate 25000
- rcmd sv_minrate 4000
- rcmd sv_maxupdaterate 101
- rcmd sys_ticrate 10000
- rcmd sv_restart 1
- }
- alias swap {
- if (%gather1.live == A-B) teamer a t
- else teamer a ct
- }
- alias swap2 {
- if (%gather2.live == A-B) teamer2 a t
- else teamer2 a ct
- }
- alias swap3 {
- if (%gather3.live == A-B) teamer3 a t
- else teamer3 a ct
- }
- alias swap4 {
- if (%gather4.live == A-B) teamer4 a t
- else teamer4 a ct
- }
- alias endfirst {
- swap
- msg %gather.channel 4G14ather 1: 12First half results: A - %Gather1.firstA , B - %Gather1.firstB
- tsay The First Half Has Finished. Score is - (Team-A): %Gather1.firstA (Team-B): %Gather1.firstB
- }
- alias endfirst-1 {
- swap
- msg %gather.channel 4G14ather 1: 12First half results: A - %Gather1.firstA , B - %Gather1.firstB
- tsay The First Half Has Finished. Score is - (Team-A): %Gather1.firstA (Team-B): %Gather1.firstB
- }
- alias endfirst-2 {
- swap2
- msg %gather.channel 4G14ather 2: 12First half results: A - $score2(a) , B - $score2(b)
- tsay2 The First Half Is Finished. Score is - (Team-A): $score2(a) (Team-B): $score2(b)
- }
- alias endfirst-3 {
- swap3
- msg %gather.channel 4G14ather 3: 12First half results: A - $score3(a) , B - $score3(b)
- tsay3 The First Half Is Finished. Score is - (Team-A): $score3(a) (Team-B): $score3(b)
- }
- alias endfirst-4 {
- swap4
- msg %gather.channel 4G14ather 4: 12First half results: A - $score4(a) , B - $score4(b)
- tsay4 The First Half Is Finished. Score is - (Team-A): $score4(a) (Team-B): $score4(b)
- }
- alias Gathers {
- if ($readini(Gatherbot/Admins.ini,$1,Gathers)) { return $ifmatch | Halt }
- elseif ($readini(Gatherbot/masters.ini,$1,Gathers)) { return $ifmatch | Halt }
- elseif ($readini(Gatherbot/owners.ini,$1,Gathers)) { return $ifmatch | Halt }
- elseif (!$readini(Gatherbot/Admins.ini,$1,Gathers)) || (!$readini(Gatherbot/masters.ini,$1,Gathers)) || (!$readini(Gatherbot/owners.ini,$1,Gathers)) { return 0 | Halt }
- }
- alias admin? {
- var %x = 1
- while ($ini(Gatherbot/Admins.ini,%x)) {
- if ($1 isin $ini(Gatherbot/Admins.ini,%x)) || ($ini(Gatherbot/Admins.ini,%x) == $1) { return $ini(Gatherbot/Admins.ini,%x) | Halt }
- inc %x
- }
- }
- alias master? {
- var %x = 1
- while ($ini(Gatherbot/masters.ini,%x)) {
- if ($1 isin $ini(Gatherbot/masters.ini,%x)) || ($ini(Gatherbot/masters.ini,%x) == $1) { return $ini(Gatherbot/masters.ini,%x) | Halt }
- inc %x
- }
- }
- ;alias showadmins {
- ;var %x 1, %temp ,%S 1
- ;while ($gettok(%admins,%x,32)) {
- ;var %temp = %temp $ifmatch
- ;if ($numtok(%temp,32) == 15) {
- ;if (%S == 1) { msg %gather.Channel $stl($iif(%S == 1,Bot Admins Are (12 $+ $admins(ON).num $+ 14/ $+ $admins(ALL).num $+ ):,$chr(32))) %temp }
- ;if (%S !== 1) { msg %gather.Channel $stl(%temp) }
- ;var %temp
- ;inc %S
- ;}
- ;inc %x
- ;}
- ;msg %gather.Channel $stl($iif(%S == 1,Bot Admins Are (12 $+ $admins(ON).num $+ 14/ $+ $admins(ALL).num $+ ):,$chr(32))) %temp
- ;.timer 1 %S unset %admins
- ;}
- alias showadmins {
- set %admins $admins-gtrs
- msg %gather.channel 2» 2B14ot 14Admins Are2: $$gettok(%admins,1-10,32)
- if ($gettok(%admins,11-20,32)) {
- msg %gather.channel $stl($v1)
- }
- if ($gettok(%admins,21-30,32)) {
- .timer 1 1 msg %gather.channel $stl($v1)
- }
- if ($gettok(%admins,31-40,32)) {
- .timer 1 1 msg %gather.channel $stl($v1)
- }
- unset %admins
- }
- alias showmasters {
- set %masters $masters-gtrs
- msg %gather.channel $stl(2B14ot 14Masters Are2:) $$gettok(%masters,1-10,32)
- if ($gettok(%masters,11-20,32)) {
- msg %gather.channel $stl($v1)
- }
- if ($gettok(%masters,21-30,32)) {
- msg %gather.channel $stl($v1)
- }
- unset %masters
- showadmins
- }
- alias showmasters2 {
- set %masters2 $masters-gtrs
- msg %gather.channel $stl(2B14ot 14Masters Are2:) $$gettok(%masters2,1-10,32)
- if ($gettok(%masters2,11-20,32)) {
- msg %gather.channel $stl($v1)
- }
- if ($gettok(%masters2,21-30,32)) {
- msg %gather.channel $stl($v1)
- }
- unset %masters2
- }
- alias showowners2 {
- set %owners $owners-gtrs
- msg %lala $stl(2B14ot 14Owners Are2:) $$gettok(%owners,1-10,32)
- if ($gettok(%owners,11-20,32)) {
- msg %lala $stl($v1)
- }
- if ($gettok(%owners,21-30,32)) {
- msg %lala $stl($v1)
- }
- unset %owners
- }
- ;alias showmasters {
- ;var %x 1, %temp ,%S 1
- ;while ($gettok(%masters,%x,32)) {
- ;var %temp = %temp $ifmatch
- ;if ($numtok(%temp,32) == 15) {
- ;if (%S == 1) { msg %gather.Channel $stl($iif(%S == 1,Bot Masters Are (12 $+ $masters(ON).num $+ 14/ $+ $masters(ALL).num $+ ):,$chr(32))) %temp }
- ;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 }
- ;var %temp
- ;inc %S
- ;}
- ;inc %x
- ;}
- ;msg %gather.Channel $stl($iif(%S == 1,Bot Masters Are (12 $+ $masters(ON).num $+ 14/ $+ $masters(ALL).num $+ ):,$chr(32))) %temp
- ;.timer 1 %S unset %masters
- ;set %admins $admins-gtrs | showadmins
- ;}
- on !*:part:%Gather.channel: {
- if ($admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- var %o = $admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
- .remini -n Gatherbot/Admins.ini %o Logged
- .writeini -n Gatherbot/Admins.ini %o Status OFF
- msg $Nick $stl(14You Had disconnected from 12Admin14 account (2 $+ %o $+ 14) (14Reason:2 Part14))
- ;msg %Gather.channel $stl(2 $+ $nick 14Had disconnected from 12Admin14 account (2 $+ %o $+ 14) (14Reason:2 Part14))
- }
- if ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- var %o = $owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
- .remini -n Gatherbot/Owners.ini %o Logged
- .writeini -n Gatherbot/Owners.ini %o Status OFF
- msg $Nick $stl(14You Had disconnected from 12Owner14 account (2 $+ %o $+ 14) (14Reason:2 Part14))
- ;msg %Gather.channel $stl(2 $+ $nick 14Had disconnected from 12Owner14 account (2 $+ %o $+ 14) (14Reason:2 Part14))
- }
- if ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- var %o = $masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
- .remini -n Gatherbot/masters.ini %o Logged
- .writeini -n Gatherbot/masters.ini %o Status OFF
- msg $Nick $stl(14You Had disconnected from 12Master14 account (2 $+ %o $+ 14) (14Reason:2 Part14))
- ;msg %Gather.channel $stl(2 $+ $nick 14Had disconnected from 12Master14 account (2 $+ %o $+ 14) (14Reason:2 Part14))
- }
- if (%Gather1.Status == adding) && ($istok(%Gather1.Players,$nick,32)) { set %Gather1.Players $remtok(%Gather1.players,$nick,32) }
- if (%Gather2.Status == adding) && ($istok(%Gather2.Players,$nick,32)) { set %Gather2.Players $remtok(%Gather2.players,$nick,32) }
- if (%Gather3.Status == adding) && ($istok(%Gather3.Players,$nick,32)) { set %Gather3.Players $remtok(%Gather3.players,$nick,32) }
- if (%Gather4.Status == adding) && ($istok(%Gather4.Players,$nick,32)) { set %Gather4.Players $remtok(%Gather4.players,$nick,32) }
- if ($nick == %Gather1.Admin) gather end1
- if ($nick == %Gather2.Admin) gather end2
- if ($nick == %Gather3.Admin) gather end3
- }
- on !*:quit: {
- if ($admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- var %o = $admins(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
- .remini -n Gatherbot/Admins.ini %o Logged
- .writeini -n Gatherbot/Admins.ini %o Status OFF
- ;msg %Gather.channel $stl(2 $+ $nick 14Had disconnected from 12Admin14 account (2 $+ %o $+ 14) (14Reason:2 Quit14) (12 $+ $1- $+ 14))
- }
- if ($owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- var %o = $owners(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
- .remini -n Gatherbot/Owners.ini %o Logged
- .writeini -n Gatherbot/Owners.ini %o Status OFF
- ;msg %Gather.channel $stl(2 $+ $nick 14Had disconnected from 12Owner14 account (2 $+ %o $+ 14) (14Reason:2 Quit14) (12 $+ $1- $+ 14))
- }
- if ($masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?) {
- var %o = $masters(*!*@ $+ $gettok($address,2-,$asC(@))).logged?
- .remini -n Gatherbot/masters.ini %o Logged
- .writeini -n Gatherbot/masters.ini %o Status OFF
- ;msg %Gather.channel $stl(2 $+ $nick 14Had disconnected from 12Master14 account (2 $+ %o $+ 14) (14Reason:2 Quit14) (12 $+ $1- $+ 14))
- }
- if (%Gather1.Status == adding) && ($istok(%Gather1.Players,$nick,32)) && ($nick !== %Gather1.Admin) { set %Gather1.Players $remtok(%Gather1.players,$nick,32) }
- if (%Gather2.Status == adding) && ($istok(%Gather2.Players,$nick,32)) && ($nick !== %Gather2.Admin) { set %Gather2.Players $remtok(%Gather2.players,$nick,32) }
- if (%Gather3.Status == adding) && ($istok(%Gather3.Players,$nick,32)) && ($nick !== %Gather3.Admin) { set %Gather3.Players $remtok(%Gather3.players,$nick,32) }
- if (%Gather4.Status == adding) && ($istok(%Gather4.Players,$nick,32)) { set %Gather4.Players $remtok(%Gather4.players,$nick,32) }
- }
- on !*:kick:%Gather.channel: {
- if ($admins($address($knick,2)).logged?) {
- var %o = $admins($address($knick,2)).logged?
- .remini -n Gatherbot/Admins.ini %o Logged
- .writeini -n Gatherbot/Admins.ini %o Status OFF
- msg $knick $stl(14You Had disconnected from 12Admin14 account (2 $+ %o $+ 14) (14Reason:2 You are kicked by $nick $+ 14))
- ;msg %Gather.channel $stl(2 $+ $knick 14Had disconnected from 12Admin14 account (2 $+ %o $+ 14) (14Reason:2 Kicked by $nick $+ 14))
- }
- if ($masters($address($knick,2)).logged?) {
- var %o = $masters($address($knick,2)).logged?
- .remini -n Gatherbot/masters.ini %o Logged
- .writeini -n Gatherbot/masters.ini %o Status OFF
- msg $knick $stl(14You Had disconnected from 12Master14 account (2 $+ %o $+ 14) (14Reason:2 You are kicked by $nick $+ 14))
- ;msg %Gather.channel $stl(2 $+ $knick 14Had disconnected from 12Master14 account (2 $+ %o $+ 14) (14Reason:2 Kicked by $nick $+ 14))
- }
- if ($owners($address($knick,2)).logged?) {
- var %o = $owners($address($knick,2)).logged?
- .remini -n Gatherbot/owners.ini %o Logged
- .writeini -n Gatherbot/owners.ini %o Status OFF
- msg $knick $stl(14You Had disconnected from 12Owner14 account (2 $+ %o $+ 14) (14Reason:2 You are kicked by $nick $+ 14))
- ;msg %Gather.channel $stl(2 $+ $knick 14Had disconnected from 12Owner14 account (2 $+ %o $+ 14) (14Reason:2 Kicked by $nick $+ 14))
- }
- if (%Gather1.Status == adding) && ($istok(%Gather1.Players,$knick,32)) && ($knick !== %Gather1.Admin) { set %Gather1.Players $remtok(%Gather1.players,$knick,32) }
- if (%Gather2.Status == adding) && ($istok(%Gather2.Players,$knick,32)) && ($knick !== %Gather2.Admin) { set %Gather2.Players $remtok(%Gather2.players,$knick,32) }
- if (%Gather3.Status == adding) && ($istok(%Gather3.Players,$knick,32)) && ($knick !== %Gather3.Admin) { set %Gather3.Players $remtok(%Gather3.players,$knick,32) }
- if (%Gather4.Status == adding) && ($istok(%Gather4.Players,$nick,32)) { set %Gather4.Players $remtok(%Gather4.players,$nick,32) }
- }
- on *:NICK: {
- if (%gather1.status == adding) && ($istok(%Gather1.Players,$nick,32)) { set %gather1.players $reptok(%gather1.players,$nick,$newnick,32) }
- if (%gather2.status == adding) && ($istok(%Gather2.Players,$nick,32)) { set %gather2.players $reptok(%gather2.players,$nick,$newnick,32) }
- if (%gather3.status == adding) && ($istok(%Gather3.Players,$nick,32)) { set %gather3.players $reptok(%gather3.players,$nick,$newnick,32) }
- if (%gather4.status == adding) && ($istok(%Gather4.Players,$nick,32)) { set %gather4.players $reptok(%gather4.players,$nick,$newnick,32) }
- }
- alias Sub-A-1 {
- .msg %Gather.channel 1 4G14ather 1: 2» 2A14ttention2: 12Substitute Player is needed for team A. Plz write asap 2!Sub
- mode %Gather.channel -N+m
- .timer 1 2 notice %Gather.channel 4G14ather 1:sub is needed %Gather.channel
- .timer 1 3 mode %Gather.channel +N-m
- }
- alias Sub-B-1 {
- .msg %Gather.channel 1 4G14ather 1: 2» 2A14ttention2: 12Substitute Player is needed for team B. Plz write asap 2!Sub
- mode %Gather.channel -N+m
- .timer 1 2 notice %Gather.channel 4G14ather 1:sub is needed %Gather.channel
- .timer 1 3 mode %Gather.channel +N-m
- }
- alias Sub-A-2 {
- .msg %Gather.channel 1 4G14ather 2: 2» 2A14ttention2: 12Substitute Player is needed for team A. Plz write asap 2!Sub
- mode %Gather.channel -N+m
- .timer 1 1 notice %Gather.channel 4G14ather 2:sub is needed %Gather.channel
- .timer 1 2 mode %Gather.channel +N-m
- }
- alias Sub-B-2 {
- .msg %Gather.channel 1 4G14ather 2: 2» 2A14ttention2: 12Substitute Player is needed for team B. Plz write asap 2!Sub
- mode %Gather.channel -N+m
- .timer 1 1 notice %Gather.channel 4G14ather 2:sub is needed %Gather.channel
- .timer 1 2 mode %Gather.channel +N-m
- }
- alias Sub-A-3 {
- .msg %Gather.channel 1 4G14ather 3: 2» 2A14ttention2: 12Substitute Player is needed for team A. Plz write asap 2!Sub
- mode %Gather.channel -N+m
- .timer 1 1 notice %Gather.channel 4G14ather 3:sub is needed %Gather.channel
- .timer 1 2 mode %Gather.channel +N-m
- }
- alias Sub-B-3 {
- .msg %Gather.channel 1 4G14ather 3: 2» 2A14ttention2: 12Substitute Player is needed for team B. Plz write asap 2!Sub
- mode %Gather.channel -N+m
- .timer 1 1 notice %Gather.channel 4G14ather 3:sub is needed %Gather.channel
- .timer 1 2 mode %Gather.channel +N-m
- }
- alias Sub-A-4 {
- .msg %Gather.channel 1 4G14ather 4: 2» 2A14ttention2: 12Substitute Player is needed for team A. Plz write asap 2!Sub
- mode %Gather.channel -N+m
- .timer 1 1 notice %Gather.channel 4G14ather 4:sub is needed %Gather.channel
- .timer 1 2 mode %Gather.channel +N-m
- }
- alias Sub-B-4 {
- .msg %Gather.channel 1 4G14ather 4: 2» 2A14ttention2: 12Substitute Player is needed for team B. Plz write asap 2!Sub
- mode %Gather.channel -N+m
- .timer 1 1 notice %Gather.channel 4G14ather 4:sub is needed %Gather.channel
- .timer 1 2 mode %Gather.channel +N-m
- }
- menu * {
- Tray { Showmirc -t }
- -
- Help {
- if ($window(@Help)) { window -c @Help }
- window @Help ariel 8
- font @Help 15
- echo @Help $stl(12Welcome to 2Ventox12 CZ Gatherbot [4 3 Gatherbots on 1 Bot (mIRC) 12])
- echo @Help $stl(12Fixing bugs by 2Ventox`)
- echo @Help $stl(--------------------------------------------------------------------------------------------------------------)
- echo @Help $stl(--------------------------------------->2Masters Commands On Pm:14<---------------------------------------)
- echo @Help $stl(--------------------------------------------------------------------------------------------------------------)
- echo @Help $stl(2Add Admin:14 %Gather.Sign-Pm $+ Set Admin <12User14> <12Password14> <12ServerNick14>)
- echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set Admin Syren 123 Syren)
- echo @Help
- echo @Help $stl(2Delete Admin:14 %Gather.Sign-Pm $+ Set Unadmin <12User14>)
- echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set Unadmin Ventox)
- echo @Help
- echo @Help $stl(2Change MasterPass:14 %Gather.Sign-Pm $+ Masterpass <12New MasterPass14>)
- echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set Masterpass asd)
- echo @Help
- echo @Help $stl(2Reset Gatherbot:14 %Gather.Sign-Pm $+ Set <12MasterPass14> Resetbot)
- echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set ResetBot)
- echo @Help
- echo @Help $stl(2Set Ventrilo:14 %Gather.Sign-Pm $+ Set Vent <12IP:PORT14>)
- echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set Vent 1.1.1.1:1111)
- echo @Help
- echo @Help $stl(2Set Servers:14 %Gather.Sign-Pm $+ Set Server-1/2/3 <12IP:PORT14>)
- echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set Server-1 1.1.1.1:11111)
- echo @Help
- echo @Help $stl(2Set Rcons:14 %Gather.Sign-Pm $+ Set Rconpass-1/2/3 <12The Rcon Password14>)
- echo @Help $stl(2Example:14 %Gather.Sign-Pm $+ Set Rconpass-1 123123)
- echo @Help
- echo @Help $stl(--------------------------------------------------------------------------------------------------------------)
- echo @Help $stl(--------------------------------------->2Admins Commands On Pm: 14<---------------------------------------)
- echo @Help $stl(--------------------------------------------------------------------------------------------------------------)
- echo @Help $stl(2Start Gather:14 %Gather.Sign-PM $+ Start1/2/3 <12Map14> <12Server Pass14> <12Room A Pass14> <12Room B Pass14>)
- echo @Help $stl(2Stop Gather:14 %Gather.Sign-PM $+ Stop1/2/3 <12Reason14>)
- echo @Help $stl(2End Gather:14 %Gather.Sign-PM $+ End1/2/3)
- echo @Help $stl(2Sub For Gather:14 %Gather.Sign-PM $+ Needsub1/2/3 <12A/B/OFF14>)
- echo @Help $stl(2Notice:14 %Gather.Sign-PM $+ Notice <12Message14>)
- echo @Help $stl(2Ban Command:14 %Gather.Sign-PM $+ Ban <12Nick/Ip14>)
- echo @Help $stl(2Unban Command:14 %Gather.Sign-PM $+ Unban <12Nick/Ip14>)
- echo @Help
- echo @Help $stl(Need Help? ICQ:12 299442963 14Or in the mIRC nick:12 Ventox (And Omc הוא בן זונה))
- }
- -
- Settings
- .Refresh Settings {
- .timers off
- sockclose *
- .timer 1 3 rconstart
- .timer 1 6 rconstart2
- .timer 1 9 rconstart3
- .timer 1 12 rconstart4
- }
- .-
- .Set Channel { part %Gather.Channel | set %Gather.Channel $input(Type Channel,e,Type Channel) | .timer 1 1 join %Gather.Channel }
- .Set Ventrilo { set %Gather.Vent $input(Type Ventrilo IP:PORT,e,Type Ventrilo IP:PORT) }
- .Set MasterPass { set %Gather.Masterpass $input(Type Masterpass,e,Type Masterpass) }
- .Set Sign-PM { set %Gather.Sign-PM $input(Type Sign PM,e,Type Sign PM) }
- .Set Servers
- ..Set Server-1 { set %Gather1.Server $input(Type Server for Gatherbot 1,e,Type Server for Gatherbot 1) }
- ..Set Server-2 { set %Gather2.Server $input(Type Server for Gatherbot 2,e,Type Server for Gatherbot 2) }
- ..Set Server-3 { set %Gather3.Server $input(Type Server for Gatherbot 3,e,Type Server for Gatherbot 3) }
- ..Set Server-4 { set %Gather4.Server $input(Type Server for Gatherbot 4,e,Type Server for Gatherbot 4) }
- .Set Rcon Passwords
- ..Set RconPassword-1 { set %Gather1.Rconpass $input(Type Rcon-Password for Gatherbot 1,e,Type Rcon-Password for Gatherbot 1) }
- ..Set RconPassword-2 { set %Gather2.Rconpass $input(Type Rcon-Password for Gatherbot 2,e,Type Rcon-Password for Gatherbot 2) }
- ..Set RconPassword-3 { set %Gather3.Rconpass $input(Type Rcon-Password for Gatherbot 3,e,Type Rcon-Password for Gatherbot 3) }
- ..Set RconPassword-4 { set %Gather4.Rconpass $input(Type Rcon-Password for Gatherbot 4,e,Type Rcon-Password for Gatherbot 4) }
- .Set Signs Channel
- ..Set Sign Channel Main { set %Gather.Sign $input(Type Main Sign,e,Type Main Sign) }
- ..Set Sign Channel Gatherbot-1 { set %Gather1.Sign $input(Type Sign,e,Type Sign) }
- ..Set Sign Channel Gatherbot-2 { set %Gather2.Sign $input(Type Sign,e,Type Sign) }
- ..Set Sign Channel Gatherbot-3 { set %Gather3.Sign $input(Type Sign,e,Type Sign) }
- ..Set Sign Channel Gatherbot-4 { set %Gather4.Sign $input(Type Sign,e,Type Sign) }
- .Set Signs Server
- ..Set Sign Server Gatherbot-1 { set %Gather1.SignServer $input(Type SignServer,e,Type SignServer) }
- ..Set Sign Server Gatherbot-2 { set %Gather2.SignServer $input(Type SignServer,e,Type SignServer) }
- ..Set Sign Server Gatherbot-3 { set %Gather3.SignServer $input(Type SignServer,e,Type SignServer) }
- ..Set Sign Server Gatherbot-4 { set %Gather4.SignServer $input(Type SignServer,e,Type SignServer) }
- -
- Reset Gatherbot {
- Part %Gather.Channel
- echo -a $stl(Restarting Gatherbot Please wait (Gatherbot By12 $+($chr(86),$chr(101),$chr(110),$chr(116),$chr(111),$chr(120)) $+ 14))
- unset %Gather1.last*
- unset %Gather2.Last*
- unset %Gather.Flood
- unset %Gather3.Last*
- set %Gather1.Status off
- set %Gather2.Status off
- set %Gather3.Status off
- set %Gather.num 0
- .ignore -r
- unset %gather.ignored
- set %Gather.Sign !
- set %Gather.Sign-Pm !
- set %Gather1.Sign !
- Set %Gather2.Sign @
- Set %Gather3.Sign +
- set %Gather1.SignServer !
- set %Gather2.SignServer !
- set %Gather3.SignServer !
- set %Gather1.num 0
- set %Gather2.num 0
- set %Gather3.num 0
- set %Gather1.Port 7141
- set %Gather2.Port 7139
- set %Gather3.Port 7825
- set %Gather1.MaxPlayers 10
- set %Gather2.MaxPlayers 10
- set %Gather3.MaxPlayers 10
- unset %Gather1.Team*
- unset %Gather2.Team*
- unset %Gather3.Team*
- unset %Gather1.half
- unset %Gather2.half
- unset %Gather1.Players
- unset %Gather2.Players
- unset %Gather3.Players
- unset %Gather3.half
- unset %Gather1.Score*
- unset %Gather2.Score*
- unset %Gather3.Score*
- unset %Gather1.Live
- unset %Gather2.Live
- unset %Gather3.Live
- unset %Gather1.Map
- unset %Gather2.Map
- unset %Gather3.Map
- unset %Gather1.Admin
- unset %Gather2.Admin
- unset %Gather3.Admin
- unset %Gather1.Pas*
- unset %Gather2.Pas*
- unset %Gather3.Pas*
- unset %Gather1.Sub*
- unset %Gather2.Sub*
- unset %Gather3.Sub*
- unset %Gather1.Started
- unset %Gather2.Started
- unset %Gather3.Started
- .remove Gatherbot/Admins.ini
- .remove Gatherbot/Stats.ini
- .timers off
- sockclose *
- .timer 1 3 join %Gather.channel
- .timer 1 8 rconstart
- .timer 1 12 rconstart2
- .timer 1 15 rconstart3
- }
- }
- alias isadmin {
- var %y = 1
- while ($ini(Gatherbot/admins.ini,%y)) {
- if ($readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%y),ServerNick) == $1) { return $readini(Gatherbot/admins.ini,$ini(Gatherbot/admins.ini,%y),ServerNick) }
- inc %y
- }
- var %y = 1
- while ($ini(Gatherbot/masters.ini,%y)) {
- if ($readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%y),ServerNick) == $1) { return $readini(Gatherbot/masters.ini,$ini(Gatherbot/masters.ini,%y),ServerNick) }
- inc %y
- }
- var %y = 1
- while ($ini(Gatherbot/owners.ini,%y)) {
- if ($readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%y),ServerNick) == $1) { return $readini(Gatherbot/owners.ini,$ini(Gatherbot/owners.ini,%y),ServerNick) }
- inc %y
- }
- }
- alias admins-gtrs {
- var %x 1, %temp
- while ($gettok($admins,%x,32)) { var %temp = %temp $ifmatch $+ (4 $+ $Gathers($remove($strip($ifmatch),)) $+ 12) | inc %x }
- return %temp
- }
- alias masters-gtrs {
- var %x 1, %temp
- while ($gettok($masters,%x,32)) { var %temp = %temp $ifmatch $+ (4 $+ $Gathers($remove($strip($ifmatch),)) $+ 12) | inc %x }
- return %temp
- }
- alias owners-gtrs {
- var %x 1, %temp
- while ($gettok($owners,%x,32)) { var %temp = %temp $ifmatch $+ (4 $+ $Gathers($remove($strip($ifmatch),)) $+ 12) | inc %x }
- return %temp
- }
- alias Status-1 {
- if (%Gather1.Status == OFF) { msg %Gather.Channel 2» 2G14ather status 12: 12Gather is Currently off.2 « }
- 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.) }
- 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« }
- }
- alias Status-2 {
- if (%Gather2.Status == OFF) { msg %Gather.Channel 2» 2G14ather status 22: 12Gather is Currently off.2 « }
- 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.) }
- 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« }
- }
- alias Status-3 {
- if (%Gather3.Status == OFF) { msg %Gather.Channel 2» 2G14ather status 32: 12Gather is Currently off.2 « }
- 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.) }
- 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« }
- }
- alias Status-4 {
- if (%Gather4.Status == OFF) { msg %Gather.Channel 2» 2G14ather status 4 (Fun)2: 12Gather is Currently off.2 « }
- 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.) }
- 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« }
- }
- alias players-1 {
- msg %Gather.Channel 2P14layers2: 2[.12 %Gather1.Players 2.] 2(14 $+ $numtok(%Gather1.Players,32) $+ /14 $+ %Gather1.MaxPlayers $+ 2)
- }
- alias players-2 {
- msg %Gather.Channel 2P14layers2: 2[.12 %Gather2.Players 2.] 2(14 $+ $numtok(%Gather2.Players,32) $+ /14 $+ %Gather2.MaxPlayers $+ 2)
- }
- alias players-3 {
- msg %Gather.Channel 2P14layers2: 2[.12 %Gather3.Players 2.] 2(14 $+ $numtok(%Gather3.Players,32) $+ /14 $+ %Gather3.MaxPlayers $+ 2)
- }
- alias players-4 {
- msg %Gather.Channel 2P14layers2: 2[.12 %Gather4.Players 2.] 2(14 $+ $numtok(%Gather4.Players,32) $+ /14 $+ %Gather4.MaxPlayers $+ 2)
- }
- ;on *:disconnect: { server }
- alias Setmvps-1 {
- var %s = $gettok($2,1,$asc(!))
- .close -@ @Tops
- .window -h @Tops
- var %x = $ini(Gatherbot/mvps.ini,0)
- var %z = %x
- while (%x) {
- echo @Tops $ini(Gatherbot/mvps.ini,%x) $readini(Gatherbot/mvps.ini,$ini(Gatherbot/mvps.ini,%x),kills)
- dec %x
- }
- //filter -cwwteu 2 32 @Tops @Tops
- var %o = 1
- if ($ini(Gatherbot/mvps.ini,0) < 5) { var %z = $ini(Gatherbot/mvps.ini,0) }
- elseif ($ini(Gatherbot/mvps.ini,0) >= 5) { var %z = 5 }
- set -u20 %Gather.Flood ON Mvps
- var %temp
- while (%z) {
- var %user = $gettok($line(@Tops,%o),1,32)
- var %temp = %temp %user
- inc %o
- dec %z
- }
- if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,1,32) mvps 3 }
- 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) }
- if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,2,32) mvps 2 }
- 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) }
- if ($gettok(%temp,3,32)) {
- if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,3,32) mvps 1 }
- 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) }
- }
- 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«
- ssay Gather Mvps are: 1st( $+ $gettok(%temp,1,32) $+ ) 2nd( $+ $gettok(%temp,2,32) $+ ) 3rd( $+ $gettok(%temp,3,32) $+ )
- }
- alias Setmvps-2 {
- var %s = $gettok($2,1,$asc(!))
- .close -@ @Tops
- .window -h @Tops
- var %x = $ini(Gatherbot/mvps2.ini,0)
- var %z = %x
- while (%x) {
- echo @Tops $ini(Gatherbot/mvps2.ini,%x) $readini(Gatherbot/mvps2.ini,$ini(Gatherbot/mvps2.ini,%x),kills)
- dec %x
- }
- //filter -cwwteu 2 32 @Tops @Tops
- var %o = 1
- if ($ini(Gatherbot/mvps2.ini,0) < 5) { var %z = $ini(Gatherbot/mvps2.ini,0) }
- elseif ($ini(Gatherbot/mvps2.ini,0) >= 5) { var %z = 5 }
- set -u20 %Gather.Flood ON Mvps
- var %temp
- while (%z) {
- var %user = $gettok($line(@Tops,%o),1,32)
- var %temp = %temp %user
- inc %o
- dec %z
- }
- if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,1,32) mvps 3 }
- 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) }
- if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,2,32) mvps 2 }
- 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) }
- if ($gettok(%temp,3,32)) {
- if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,3,32) mvps 1 }
- 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) }
- }
- 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«
- ssay2 Gather Mvps are: 1st( $+ $gettok(%temp,1,32) $+ ) 2nd( $+ $gettok(%temp,2,32) $+ ) $iif($gettok(%temp,3,32),3rd( $+ $gettok(%temp,3,32) $+ ))
- }
- alias Setmvps-3 {
- var %s = $gettok($2,1,$asc(!))
- .close -@ @Tops
- .window -h @Tops
- var %x = $ini(Gatherbot/mvps3.ini,0)
- var %z = %x
- while (%x) {
- echo @Tops $ini(Gatherbot/mvps3.ini,%x) $readini(Gatherbot/mvps3.ini,$ini(Gatherbot/mvps3.ini,%x),kills)
- dec %x
- }
- //filter -cwwteu 2 32 @Tops @Tops
- var %o = 1
- if ($ini(Gatherbot/mvps3.ini,0) < 5) { var %z = $ini(Gatherbot/mvps3.ini,0) }
- elseif ($ini(Gatherbot/mvps3.ini,0) >= 5) { var %z = 5 }
- set -u20 %Gather.Flood ON Mvps
- var %temp
- while (%z) {
- var %user = $gettok($line(@Tops,%o),1,32)
- var %temp = %temp %user
- inc %o
- dec %z
- }
- if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,1,32) mvps 3 }
- 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) }
- if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,2,32) mvps 2 }
- 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) }
- if ($gettok(%temp,3,32)) {
- if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,3,32) mvps 1 }
- 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) }
- }
- 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«
- ssay3 Gather Mvps are: 1st( $+ $gettok(%temp,1,32) $+ ) 2nd( $+ $gettok(%temp,2,32) $+ ) $iif($gettok(%temp,3,32),3rd( $+ $gettok(%temp,3,32) $+ ))
- }
- alias Setmvps-4 {
- var %s = $gettok($2,1,$asc(!))
- .close -@ @Tops
- .window -h @Tops
- var %x = $ini(Gatherbot/mvps4.ini,0)
- var %z = %x
- while (%x) {
- echo @Tops $ini(Gatherbot/mvps4.ini,%x) $readini(Gatherbot/mvps4.ini,$ini(Gatherbot/mvps4.ini,%x),kills)
- dec %x
- }
- //filter -cwwteu 2 32 @Tops @Tops
- var %o = 1
- if ($ini(Gatherbot/mvps4.ini,0) < 5) { var %z = $ini(Gatherbot/mvps4.ini,0) }
- elseif ($ini(Gatherbot/mvps4.ini,0) >= 5) { var %z = 5 }
- set -u20 %Gather.Flood ON Mvps
- var %temp
- while (%z) {
- var %user = $gettok($line(@Tops,%o),1,32)
- var %temp = %temp %user
- inc %o
- dec %z
- }
- if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,1,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,1,32) mvps 3 }
- 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) }
- if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,2,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,2,32) mvps 2 }
- 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) }
- if ($gettok(%temp,3,32)) {
- if (!$readini(Gatherbot/Stats.ini,$gettok(%temp,3,32),Mvps)) { .writeini -n Gatherbot/Stats.ini $gettok(%temp,3,32) mvps 1 }
- 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) }
- }
- 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«
- ssay4 Gather Mvps are: 1st( $+ $gettok(%temp,1,32) $+ ) 2nd( $+ $gettok(%temp,2,32) $+ ) $iif($gettok(%temp,3,32),3rd( $+ $gettok(%temp,3,32) $+ ))
- }
- alias Setscore-1 {
- set %Gather1.scoreStatus on
- set %gather1.score-CT 0
- set %gather1.score-T 0
- }
- alias Setscore-2 {
- set %Gather2.scoreStatus on
- set %gather2.score-CT 0
- set %gather2.score-T 0
- }
- alias Setscore-3 {
- set %Gather3.scoreStatus on
- set %gather3.score-CT 0
- set %gather3.score-T 0
- }
- alias Setscore-4 {
- set %Gather4.scoreStatus on
- set %gather4.score-CT 0
- set %gather4.score-T 0
- }
- alias hlplayers { sockudp -k hlplayers $gettok($1,1,58) $gettok($1,2,58) $str($chr(255),4) $+ PLAYERS }
- on *:UDPREAD:hlplayers:{ unset %hlplayers | sockread &hlplayers | breplace &hlplayers 0 190
- set %hlnames $mid($bvar(&hlplayers,1,1000).text,7) | var %i = 1
- while (%i <= $asc($mid($bvar(&hlplayers,1,1000).text,6))) {
- set %hlplayers %hlplayers $+ $chr(32) $+ 2» $+ %i $+ «12 $gettok($right(%hlnames,-1),1,190)
- set %hlnames $right(%hlnames,- $+ $calc($len($gettok(%hlnames,1,190)) + 9))
- inc %i 1
- }
- msg %Gather.Channel $stl(2Players:12 %hlplayers)
- unset %hl*
- }
- alias 2HL {
- set %Servers $1-
- unset %2HL.*
- .timer2HL 1 1 Halt
- if ($1 == TimedOutx) { msg %Gather.Channel $stl(12Server is not responding) | sockclose 2HL | unset %Servers | Halt }
- Sockclose 2HL*
- .timer -m 1 100 sockudp -k 2HL $gettok($1,1,58) $gettok($1,2,58) $str($chr(255),4) $+ TSource Engine Query
- .timertimedout 1 2 2HL TimedOutx
- :END
- }
- alias HLVAR { return $bvar(&HL,1,$bvar(&HL,0)).text }
- on *:udpread:2hl:{
- sockread &HL
- breplace &HL 0 254
- var %source $iif(Source isin $gettok($HLVAR,5,254),1,0),%pass $iif($asc($mid($gettok($HLVAR,6,254),6,1)) == 1,1,0)
- var %2hl.hostname $iif(!%source,$gettok($HLVAR,2,254),$remove($gettok($HLVAR,1,254),????I))
- var %2hl.map $iif(!%source,$gettok($HLVAR,3,254),$gettok($HLVAR,2,254))
- var %2hl.password $iif(!%pass,no,yes)
- var %2HL.IP %Servers
- if (%source == 1) {
- if (!$mid($gettok($HLVAR,6,254),2,1)) { var %2HL.Players 0/ $+ $asc($mid($gettok($HLVAR,6,254),1,1)) }
- else { var %2HL.Players $asc($mid($gettok($HLVAR,6,254),1,1)) $+ / $+ $asc($mid($gettok($HLVAR,6,254),2,1)) }
- }
- else {
- if ($asc($mid($gettok($HLVAR,6,254),2,1)) > 32) { var %2HL.Players 0/ $+ $asc($mid($gettok($HLVAR,6,254),1,1)) }
- else { var %2HL.Players $asc($mid($gettok($HLVAR,6,254),1,1)) $+ / $+ $asc($mid($gettok($HLVAR,6,254),2,1)) }
- }
- if (%2HL.Players) {
- 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«
- .timertimedout off
- }
- .timertimeout off
- }
- on *:udpread:2HL_PING:{ if ($sockerr > 0) return | unset %Temp.time | sockclose 2HL_PING }
- alias details {
- if ($1 isnum 1-4) {
- if ($prop == a) || ($prop == b) {
- 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!
- }
- }
- }
- alias scorepergun {
- if ($1 == usp) return 0.03
- if ($1 == glock18) return 0.04
- if ($1 == elite) return 0.04
- if ($1 == famas) return 0.04
- if ($1 == g3sg1) return 0.05
- if ($1 == awp) return 0.07
- if ($1 == deagle) return 0.03
- if ($1 == m4a1) return 0.02
- if ($1 == ak47) return 0.02
- if ($1 == mp5navy) return 0.04
- if ($1 == galil) return 0.04
- if ($1 == grenade) return 0.05
- if ($1 == knife) return 0.05
- if ($1 == scout) return 0.06
- if ($1 == p228) return 0.04
- if ($1 == fiveseven) return 0.04
- if ($1 == m3) return 0.06
- if ($1 == xm1014) return 0.06
- if ($1 == tmp) return 0.06
- if ($1 == grenade) return 0.06
- if ($1 == ump45) return 0.06
- if ($1 == p90) return 0.06
- if ($1 == aug) return 0.05
- if ($1 == sg552) return 0.05
- if ($1 == sg550) return 0.05
- if ($1 == mac10) return 0.04
- if ($1 == m249) return 0.04
- }
- alias Teamer {
- if (!$1) || ($1 = X) Halt
- if ($2 != CT) && ($2 != T) Halt
- .timerTEAMer -m 1 3500 Teamer x $1-2
- rcmd admin_quiet 2
- rcmd allow_client_exec 1
- rcmd admin_ignore_immunity 1
- rcmd admin_command admin_execall setinfo "_vgui_menus" "0"
- .timer -m 1 500 rcmd users
- .timer 1 1 ssay Swap [Team Changer]
- .timer 1 4 tsay Half results, A - $score1(a) $+ , B - $score1(b)
- }
- alias Teamer2 {
- if (!$1) || ($1 = X) Halt
- if ($2 != CT) && ($2 != T) Halt
- .timerTEAMer2 -m 1 3500 Teamer2 x $1-2
- rcmd2 admin_quiet 2
- rcmd2 allow_client_exec 1
- rcmd2 admin_ignore_immunity 1
- rcmd2 admin_command admin_execall setinfo "_vgui_menus" "0"
- .timer -m 1 500 rcmd2 users
- .timer 1 1 ssay2 Swap [Team Changer]
- .timer 1 14 tsay2 Half results, A - $score2(a) $+ , B - $score2(b)
- }
- alias Teamer3 {
- if (!$1) || ($1 = X) Halt
- if ($2 != CT) && ($2 != T) Halt
- .timerTEAMer3 -m 1 3500 Teamer3 x $1-2
- rcmd3 admin_quiet 2
- rcmd3 allow_client_exec 1
- rcmd3 admin_ignore_immunity 1
- rcmd3 admin_command admin_execall setinfo "_vgui_menus" "0"
- .timer -m 1 500 rcmd3 users
- .timer 1 1 ssay3 Swap [Team Changer]
- .timer 1 4 tsay3 Half results, A - $score3(a) $+ , B - $score3(b)
- }
- alias upload.admins.list {
- write -c users.ini
- set -u15 %upload.nick $$1
- var %x 1
- while ($ini(gatherbot/owners.ini,%x)) {
- write users.ini iG| $+ $readini(gatherbot/owners.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/owners.ini,$v1,pass) $+ :131071
- write users.ini A. $+ $readini(gatherbot/owners.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/owners.ini,$v1,pass) $+ :131071
- write users.ini B. $+ $readini(gatherbot/owners.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/owners.ini,$v1,pass) $+ :131071
- inc %x
- }
- var %x 1
- while ($ini(gatherbot/masters.ini,%x)) {
- write users.ini iG| $+ $readini(gatherbot/masters.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/masters.ini,$v1,pass) $+ :131071
- write users.ini A. $+ $readini(gatherbot/masters.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/masters.ini,$v1,pass) $+ :131071
- write users.ini B. $+ $readini(gatherbot/masters.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/masters.ini,$v1,pass) $+ :131071
- inc %x
- }
- var %x 1
- while ($ini(gatherbot/admins.ini,%x)) {
- write users.ini iG| $+ $readini(gatherbot/admins.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/admins.ini,$v1,pass) $+ :131071
- write users.ini A. $+ $readini(gatherbot/admins.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/admins.ini,$v1,pass) $+ :131071
- write users.ini B. $+ $readini(gatherbot/admins.ini,$v1,ServerNick) $+ : $+ $readini(gatherbot/admins.ini,$v1,pass) $+ :131071
- inc %x
- }
- FTP_put ftp://igamingcz: $+ %ftp $+ @212.150.176.86/1/czero/addons/adminmod/config/users.ini users.ini
- FTP_put ftp://igamingcz: $+ %ftp $+ @212.150.176.86/2/czero/addons/adminmod/config/users.ini users.ini
- FTP_put ftp://igamingcz: $+ %ftp $+ @212.150.176.86/3/czero/addons/adminmod/config/users.ini users.ini
- FTP_put ftp://igamingcz: $+ %ftp $+ @212.150.176.86/4/czero/addons/adminmod/config/users.ini users.ini
- }
- alias upload.ventadmins.list {
- write -c ventrilo_srv.usr
- set -u15 %upload.nick $1
- var %x 1
- while ($ini(gatherbot/vent.ini,%x)) {
- .write ventrilo_srv.usr $chr(91) $+ $readini(Gatherbot/vent.ini,$v1,User) $+ $chr(93)
- .write ventrilo_srv.usr UserPassword= $+ $readini(gatherbot/vent.ini,$v1,Pass)
- .write ventrilo_srv.usr ServerAdmin=1
- inc %x
- }
- FTP_put ftp://roni: $+ %ftp $+ @195.189.140.100/home/roni/vent/ventrilo_srv.usr ventrilo_srv.usr
- }
- alias FTP_Put {
- ; Usage: /FTP_Put <Full_FTP_Link> <source>
- ; Example: /FTP_put ftp://user:password@server.co.il/site/file.rar file.rar
- if (FTP://*:*@*.*/* !iswm $1) { .echo -a ERROR: FTP_Link not found or in wrong format, Please use: /FTP_Put <Full_FTP_Link> <source> | halt }
- if (!$exists($qt($2-))) || (!$2) { .echo -a ERROR: Source file doesnt exist! ,Please use: /FTP_Put <Full_FTP_Link> <source> | halt }
- var %link = $1
- .tokenize 32 $mid($1,7) $remove($2-,")
- var %x = $+(FTP_Put,$r(100000,999999))
- var %server = $gettok($gettok($1,2,$asc(@)),1,$asc(/))
- var %user = $gettok($1,1,$asc(:))
- var %pass = $gettok($gettok($1,2,$asc(:)),1,$asc(@))
- var %file = $+(/,$gettok($1,2-,$asc(/)))
- if ($hget(%x)) .hfree %x
- .hmake %x 100
- .hadd %x link %link
- .hadd %x server %server
- .hadd %x user %user
- .hadd %x pass %pass
- .hadd %x file %file
- .hadd %x source $qt($2-)
- .hadd %x window $+(@,%x)
- .hadd %x size 1
- .hadd %x lastcmd
- .sockopen %x %server 21
- .window -e $+(@,%x)
- .echo $+(@,%x) (FTP) Connecting to %server on port 21
- .echo $+(@,%x) (FTP) User: %User ,Pass: %Pass ,File: %File
- }
- on 1:sockopen:FTP_put*:{
- .echo $info(window) (FTP) Connected to $info(server) $+ !
- .signal -n FTP_Put_Connected $sockname
- }
- on 1:sockopen:FTP_Upload*:{
- var %mains = $+(FTP_put,$mid($sockname,11)) , %w = .sockwrite -n %mains
- .echo $hget(%mains,window) (FTP) Opened data connection to $sock($sockname).ip $+ : $+ $sock($sockname).port
- .echo $hget(%mains,window) (FTP) Sending: $hget(%mains,source) ,as: $hget(%mains,file)
- %w STOR $hget(%mains,file)
- }
- on 1:sockwrite:FTP_Upload*:{
- var %mains = $+(FTP_put,$mid($sockname,11)) , %w = .sockwrite -n %mains
- if ($sock($sockname).sq < 8192) {
- if ($fopen(%mains)) {
- if (!$fopen(%mains).eof) {
- .adc Sent: $fread(%mains, 1024, &data)
- .sockwrite $sockname &data
- var %find = (Uploading) Completed:
- .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) $+ % $+ )
- }
- else {
- .fclose %mains
- .sockclose $sockname
- }
- }
- }
- }
- on 1:sockclose:FTP_put*:{
- .echo $info(window) ERROR: Socket unexcpectedly closed.
- .signal -n FTP_Put_Error Socket unexcpectedly closed.
- .hfree $sockname
- .sockclose $+(FTP_Data,$mid($sockname,8))
- }
- on 1:sockread:FTP_put*:{
- var %r , %w = .sockwrite -n $sockname
- sockread %r
- tokenize 32 %r
- if ($1 = 220) { %w USER $info(user) | .echo $info(window) (FTP) Sent user: $info(user) }
- if ($1 = 331) { %w PASS $info(pass) | .echo $info(window) (FTP) Sent pass: $info(pass) }
- if ($1 = 530) {
- if (!%gather.flood) { msg %upload.nick $info(window) (FTP) ERROR: Wrong password for username | set -u4 %gather.flood }
- %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
- }
- if ($1 = 230) { %w TYPE I | .echo $info(window) (FTP) User ok. }
- if ($1 = 200) { %w PASV | .echo $info(window) (FTP) Binary mode ok. }
- if ($1 = 227) {
- .var %IPORT = $gettok($gettok($2-,2,40),1,41)
- .sockopen $+(FTP_Upload,$mid($sockname,8)) $replace($gettok(%iport,1-4,44),$chr(44),.) $calc( ( $gettok(%iport,5,44) * 256 ) + $gettok(%iport,6,44) )
- .echo $info(window) (FTP) Pasv mode ok.
- ;.write -c $gettok($info(file),$numtok($info(file),$asc(/)),$asc(/))
- }
- if ($1 = 550) {
- if (!%gather.flood) { msg %upload.nick $info(window) (FTP) ERROR: $1- | set -u4 %gather.flood }
- %w QUIT | .echo $info(window) (FTP) ERROR: $1- | .signal -n FTP_Put_Error $1- | .hfree $sockname | .sockclose $+(FTP_Data,$mid($sockname,8)) | .sockclose $sockname
- }
- if ($1 = 226) {
- .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
- close -@ @ftp*
- }
- if ($1 = 150) {
- .hadd $sockname size $round($calc( $file($info(source)).size / 1024),2)
- .echo $info(window) (FTP) Server is waiting for data... Size: $info(size) KB
- .fopen $sockname $info(source)
- 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 }
- else {
- .signal -n FTP_Put_Uploading $sockname
- .adc Sent: $fread($sockname, 1024, &data) @ handle = $sockname
- .sockwrite $+(FTP_Upload,$mid($sockname,8)) &data
- .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) $+ % $+ )
- }
- }
- }
- alias info { return $hget($sockname,$1) }
- alias adc { var %x = 1 ;dont delete this! }
- alias Set-Ventclose {
- if ($exists(VentPlayers.txt)) { remove VentPlayers.txt }
- write VentPlayers.txt /chan delete " $+ Team-A1"
- write VentPlayers.txt /chan delete " $+ Team-B1"
- timer 1 3 //run HIDERUN.EXE ventrcon.exe -n iGamingcz -w gogo4555 -a ig2mini3n32j4nj23k4nbhx -f VentPlayers.txt 80.179.153.12:11832
- }
- alias Set-Ventclose2 {
- if ($exists(VentPlayers2.txt)) { remove VentPlayers2.txt }
- write VentPlayers2.txt /chan delete " $+ Team-A2"
- write VentPlayers2.txt /chan delete " $+ Team-B2"
- timer 1 3 //run HIDERUN.EXE ventrcon.exe -n iGamingcz -w gogo4555 -a ig2mini3n32j4nj23k4nbhx -f VentPlayers2.txt 80.179.153.12:11832
- }
- alias Set-Ventclose3 {
- if ($exists(VentPlayers3.txt)) { remove VentPlayers3.txt }
- write VentPlayers3.txt /chan delete " $+ Team-A3"
- write VentPlayers3.txt /chan delete " $+ Team-B3"
- timer 1 3 //run HIDERUN.EXE ventrcon.exe -n iGamingcz -w gogo4555 -a ig2mini3n32j4nj23k4nbhx -f VentPlayers3.txt 80.179.153.12:11832
- }
- alias Set-Vent1 {
- if ($exists(VentPlayers.txt)) { remove VentPlayers.txt }
- write VentPlayers.txt /chan delete " $+ Team-A1"
- write VentPlayers.txt /chan delete " $+ Team-B1"
- timer 1 1 write VentPlayers.txt /subchan "#iGaming.cZ Gather #1" " $+ Team-A1" TeamA %Gather1.PassA asda1dd " $+ %Gather1.Team-A $+ "
- timer 1 2 write VentPlayers.txt /subchan "#iGaming.cZ Gather #1" " $+ Team-B1" TeamB %Gather1.PassB asda1dd " $+ %Gather1.Team-B $+ "
- timer 1 3 //run HIDERUN.EXE ventrcon.exe -n iGamingcz -w gogo4555 -a ig2mini3n32j4nj23k4nbhx -f VentPlayers.txt 80.179.153.12:11832
- }
- alias Set-Vent2 {
- if ($exists(VentPlayers2.txt)) { remove VentPlayers2.txt }
- write VentPlayers2.txt /chan delete " $+ Team-A2"
- write VentPlayers2.txt /chan delete " $+ Team-B2"
- timer 1 1 write VentPlayers2.txt /subchan "#iGaming.cZ Gather #2" " $+ Team-A2" TeamA %Gather2.PassA asda1dd " $+ %Gather2.Team-A $+ "
- timer 1 2 write VentPlayers2.txt /subchan "#iGaming.cZ Gather #2" " $+ Team-B2" TeamB %Gather2.PassB asda1dd " $+ %Gather2.Team-B $+ "
- timer 1 3 //run HIDERUN.EXE ventrcon.exe -n iGamingcz -w gogo4555 -a ig2mini3n32j4nj23k4nbhx -f VentPlayers2.txt 80.179.153.12:11832
- }
- alias Set-Vent3 {
- if ($exists(VentPlayers3.txt)) { remove VentPlayers3.txt }
- write VentPlayers3.txt /chan delete " $+ Team-A3"
- write VentPlayers3.txt /chan delete " $+ Team-B3"
- timer 1 1 write VentPlayers3.txt /subchan "#iGaming.cZ Gather #3" " $+ Team-A3" TeamA %Gather3.PassA asda1dd " $+ %Gather3.Team-A $+ "
- timer 1 2 write VentPlayers3.txt /subchan "#iGaming.cZ Gather #3" " $+ Team-B3" TeamB %Gather3.PassB asda1dd " $+ %Gather3.Team-B $+ "
- timer 1 3 //run HIDERUN.EXE ventrcon.exe -n iGamingcz -w gogo4555 -a ig2mini3n32j4nj23k4nbhx -f VentPlayers3.txt 80.179.153.12:11832
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement