rendered paste bodyon *: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
}
}