on *:INPUT:#: { if ($1 == .minv) { set %nicks 1 while ( %nicks <= $nick($chan,0) ) { invite $nick($chan,%nicks) $2 inc %nicks } unset %nicks halt } if ($1 == .amsg) { var %x = 1 while (%x <= $chan(0)) { if (($chan(%x) != #svclan)) && (($me isop $chan(%x)) || ($me ishop $chan(%x))) msg $chan(%x) 4>2>4>2amsg4<2<4<12 $2- inc %x } } if ($1 == .akick) { cs akick # add $2 $3- cs akick # enforce } if ($1 = .delakick) { cs akick # del $2- } if ($1 == .akicklist) { cs akick # list } if ($1 == .enforce) { cs akick # enforce $2- } if ($1 == .entrymsg) { cs set # entrymsg $2- } if ($1 == .eI) && (!$2) { mode $chan +eeeIII $address($me,9) $me $address($me,2) $address($me,9) $me $address($me,2) } if ($1 == .language) { ns set language $2 } if ($2) && ($1 == .eI) { mode $chan +eeeIII $address($2,9) $2 $address($2,2) $address($2,9) $2 $address($2,2) } if ($2) && ($1 == ,eI) { mode $chan -eeeIII $address($2,9) $2 $address($2,2) $address($2,9) $2 $address($2,2) } if ($1 == .add) || ($1 == .del) || ($1 == .list) { cs access $chan $remove($1,.) $2- } if ($1 == .add) && ($$3 isnum) { $iif($3 > 2, mode $chan $iif($3 == 3,+v-oha) $iif($3 == 4,+h-voa) $iif($3 isnum 5-9,+o-hva) $iif($3 > 9,+ao-hv) $str($2 $+ $chr(32),5)) } if ($1 == .del) && ($2 ison $chan) { mode # -aohv $2 $2 $2 $2 } if ($left($1,1) == +) || ($left($1,1) == -) { $iif($remove($1,-,+) isalpha,mode $chan $eval($1-,2)) } if ($1 == .secureops) { cs set # secureops $2 } if ($1 == .update) { ns update } if ($1 == .inv) { mode $chan -V invite $2 $chan } if ($1 == .v) { mode $chan +v $2 } if ($1 == .k) { inc %noobcount kick $chan $2 11,1 Another Noob down, %noobcount Noobs down } if ($1 == .op) { mode $chan +o $2 } if ($1 == .kb) { inc %noobcount mode # -eeeeeeeeeee $2 $address($2,0) $address($2,1) $address($2,2) $address($2,3) $address($2,4) $address($2,5) $address($2,6) $address($2,7) $address($2,8) $address($2,9) mode # +bbbbbbbbbbb $2 $address($2,0) $address($2,1) $address($2,2) $address($2,3) $address($2,4) $address($2,5) $address($2,6) $address($2,7) $address($2,8) $address($2,9) kick # $2 11,1 Another Noob down, %noobcount Noobs down } if ($1 == .unban) { mode $chan -b $2 mode # -bbbbbbbbbbb $2 $address($2,0) $address($2,1) $address($2,2) $address($2,3) $address($2,4) $address($2,5) $address($2,6) $address($2,7) $address($2,8) $address($2,9) ban -r $chan $2 } if ($1 == .ban) { mode # +bbbbbbbbbbb $2 $address($2,0) $address($2,1) $address($2,2) $address($2,3) $address($2,4) $address($2,5) $address($2,6) $address($2,7) $address($2,8) $address($2,9) } if ($1 == .deop) { mode $chan -o $2 } if ($1 == .topic) { msg $chan The topic is: $chan($chan).topic } if ($1 == .mlock) { cs set # mlock $2- } if ($1 == .assign) { bs assign # $2 } if ($1 == .unassign) { bs unassign # } if ($1 == .topiclock) { cs set # topiclock $2 } if ($1 == .cs) { cs $2 # $3- } if ($1 == .ns) { ns $2 # $3- } if ($1 == .bs) { bs $2 # $3- } if ($1 == .sp) { mode # +RntjfmV 2:99 [8j#i10]:10 } if ($1 == .spoff) { mode # -RjfmV 2:99 [8j#i10]:10 } if ($1 == .Qkb) { inc %noobcount mode # -eeeeeeeeeeeQ $2 $address($2,0) $address($2,1) $address($2,2) $address($2,3) $address($2,4) $address($2,5) $address($2,6) $address($2,7) $address($2,8) $address($2,9) mode # -Q+bbbb $2 $address($2,1) $address($2,3) $address($2,4) kick # $2 11,1 Another Noob down, %noobcount Noobs down cs kick $chan $2 Another Noob down, %noobcount Noobs down } if ($1 == .Qk) { inc %noobcount mode # -Q kick # $2 11,1 Another Noob down, %noobcount Noobs down } if ($1 == .levels) { cs levels # set $$2-3 } if ($1 == .ucount) { say The user count for $iif($2,$2,#) is $nick($iif($2,$2,#),0) } if ($1 == .bops) { mode # +bbbbbbbbbbbbb strider3282 fx antidrone katlyn marius sephiroth clorith allen vivec slaapkamer tarball scott tim mode # +bbbbbbbb chrono pancakes gic woodruff *!*@127.0.0.1 ~c:#irchelp ~c:#support ~c:#vivec mode # +bbbbbb Slaapkamer@Swift-F1829477 ~Scott@Scott.Slaapkamer.us ~fx@staff.darklite.be loverboy Awong@Awong.users.SwiftIRC.net gic@Swift-F1829477 } if ($1 == .badword) { bs badwords # add $2 } if ($1 == .delword) { bs badwords # del $2 } }