All pastes #460236 Raw Edit

Unnamed

public text v1 · immutable
#460236 ·published 2007-04-26 23:00 UTC
rendered paste body
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
  }
}