on *:TEXT:.set*:#:{ if ($ulevel >= 200) { if ($2 == dod) { set %dod $3- notice $nick Complete } elseif ($2 == cz) { set %cz $3- notice $nick Complete } elseif ($2 == bf) { set %bf $3- notice $nick Complete } elseif ($2 == cod2) { set %cod2 $3- notice $nick Complete } elseif ($2 == cs) { set %cs $3- notice $nick Complete } elseif ($2 == css) { set %css $3- notice $nick Complete } } if ($ulevel >= 300) { if ($2 == chi) { set %chi $3- notice $nick Complete } elseif ($2 == sd) { set %sd $3- notice $nick Complete } elseif ($2 == ny) { set %ny $3- notice $nick Complete } elseif ($2 == dal) { set %dal $3- notice $nick Complete } elseif ($2 == atl) { set %atl $3- notice $nick Complete } elseif ($2 == sf) { set %sf $3- notice $nick Complete } } if ($ulevel >= 400) { if ($2 == website) { set %website $3- notice $nick Complete } elseif ($2 == staff) { set %staff $3- notice $nick Complete } elseif ($2 == specials) { set %specials $3- notice $nick Complete } elseif ($2 == news) { set %news $3- notice $nick Complete } if ($2 == timer1) { set %timer1 $3- notice $nick Complete } elseif ($2 == timer2) { set %timer2 $3- notice $nick Complete } elseif ($2 == timer3) { set %timer3 $3- notice $nick Complete } elseif ($2 == timer1int) { set %timer1int $3- notice $nick Complete } elseif ($2 == timer2int) { set %timer1int $3- notice $nick Complete } elseif ($2 == timer3int) { set %timer3int $3- notice $nick Complete } if ($2 == bantime) { set %bantime $3- notice $nick Complete } elseif ($2 == banmsg) { set %banmsg $3- notice $nick Complete } } } ;; ----- User Commands | Access Level 500 ----- ;; on *:TEXT:.auser*:#:{ if ($ulevel >= 500) { auser $3 $address($2,2) | notice $nick USERLIST has been updated | notice $nick $2 has been added to the userlist with $3 access } } on *:TEXT:.ruser*:#:{ if ($ulevel >= 500) { ruser $3 $address($2,2) | notice $nick USERLIST has been updated | notice $nick $2 has been removed from the userlist } } on *:TEXT:.clvl*:#:{ if ($ulevel >= 500) { ruser $3 $address($2,2) } | { auser $3 $address($2,2) | notice $nick USERLIST has been updated | notice $nick $2 now has $3 access } } on *:TEXT:.lusers*:#:{ if ($ulevel >= 500) { var %x = 1,%users | while ($ulist(*,%x)) { %users = %users $v1 ( $+ $level($v1) $+ ) | inc %x } | notice $nick %users } } ;; ----- Timer Commands | Access Level 400 ----- ;; on *:TEXT:.timer1*:#: { if ($ulevel >= 400) { if ($2 == on) { timer1 0 %timer1int msg $chan %timer1 notice $nick Complete } elseif ($2 == off) { timer1 off notice $nick Complete } elseif ($2 == view) { notice $nick %timer1 } } } on *:TEXT:.timer2*:#: { if ($ulevel >= 400) { if ($2 == on) { timer2 0 %timer2int msg $chan %timer2 notice $nick Complete } elseif ($2 == off) { timer2 off notice $nick Complete } elseif ($2 == view) { notice $nick %timer2 } } } on *:TEXT:.timer3*:#: { if ($ulevel >= 400) { if ($2 == on) { timer3 0 %timer3int msg $chan %timer3 notice $nick Complete } elseif ($2 == off) { timer3 off notice $nick Complete } elseif ($2 == view) { notice $nick %timer3 } } } ;; PUB IPS ;; on *:TEXT:*.pub:#:{ msg $chan 4,1x .0Pubs 0,1- 4.0cs - 4.0dod - 4.0cz - 4.0css - 4.0bf - 4.0cod2 4,1x } on *:TEXT:*.cs:#:{ msg $chan 4,1x .0CS 0,1- %cs 4,1x } on *:TEXT:*.dod:#:{ msg $chan 4,1x .0dod 0,1- %dod 4,1x } on *:TEXT:*.cz:#:{ msg $chan 4,1x .0cz 0,1- %cz 4,1x } on *:TEXT:*.css:#:{ msg $chan 4,1x .0css 0,1- %css 4,1x } on *:TEXT:*.bf:#:{ msg $chan 4,1x .0BF 0,1- %bf 4,1x } on *:TEXT:*.cod2:#:{ msg $chan 4,1x .0Cod2 0,1- %cod2 4,1x } ;; ----- Anti-Advertising ----- ;; on *:TEXT:*#*:#:{ var %x = 1 while (%x <= $numtok($1-,32)) { if ($left($strip($gettok($1-,%x,32)),1) == $chr(35)) { ban -u [ $+ [ %bantime ] ] $chan $wildsite kick $chan $nick %banmsg } inc %x } } on *:TEXT:*www.*:#:{ if (*www.*.* iswm $1-) { ban -u [ $+ [ %bantime ] ] $chan $wildsite kick $chan $nick %banmsg } } on *:NOTICE:*#*:#:{ var %x = 1 while (%x <= $numtok($1-,32)) { if ($left($strip($gettok($1-,%x,32)),1) == $chr(35)) { ban -u [ $+ [ %bantime ] ] $chan $wildsite kick $chan $nick %banmsg } inc %x } } on *:NOTICE:*www.*:#:{ if (*www.*.* iswm $1-) { ban -u [ $+ [ %bantime ] ] $chan $wildsite kick $chan $nick %banmsg } } on *:ACTION:*#*:#:{ var %x = 1 while (%x <= $numtok($1-,32)) { if ($left($strip($gettok($1-,%x,32)),1) == $chr(35)) { ban -u [ $+ [ %bantime ] ] $chan $wildsite kick $chan $nick %banmsg } inc %x } } on *:ACTION:*www.*:#:{ if (*www.*.* iswm $1-) { ban -u [ $+ [ %bantime ] ] $chan $wildsite kick $chan $nick %banmsg } }