All pastes #502471 Raw Edit

Someone

public text v1 · immutable
·published 2007-05-22 15:07 UTC
rendered paste body
on $*:TEXT:/^[!.](cw|world)/Si:#:{ if ($chan == #PC) { HALT }
notice $nick The CW is currently $readini(cw.ini,worlds,$chan) set by $readini(cws.ini,Chansetter,$chan) approximately $duration($calc($ctime - %cwTime $chan)) ago. 
}
on $*:TEXT:/^[!@.]set(world|cw)/Si:#:{ if ($nick !isreg $chan) {
    writeini cw.ini Worlds $chan $2-
    set %cwTime $ctime $chan
    writeini cws.ini ChanSetter $chan $nick
    msg $chan The CW has been changed to  $2-  by  $nick .
  }
}
on *:TEXT:@*:#:{  
    if ($nick !isreg $chan) { HALT }
    mode $chan +m
    ban -ku600 $chan $nick Don't use public commands or "@". 10 minute ban.
    mode $chan -m
  }

on *:TEXT:*#*:#:{ 
    if ($nick !isreg $chan) { HALT }
    ban -ku3600 $chan $nick Do not advertise or use "#". 1 hour ban.
  }

on *:TEXT:.tb*:#:{ if ($nick !isreg $chan) {
    if ($2 == $me) {
      ban -ku600 $chan $nick hey $nick $+ ...what does this button do... $+ $nick $+ ? (10 min ban)
      halt
    }
    if ($nick ishop $chan) && ($2 isop $chan) { notice $nick No } { HALT }
    if ($nick ishop $chan) && ($2 ishop $chan) { notice $nick No } { HALT }  
    ban -ku $+ $calc($3 * 60) $chan $2 $4- (Requested( $+ $nick $+ )
  }
}
on *:TEXT:!curseon*:#:{ if ($nick !isreg $chan) {
set %curseon on $chan | msg $chan Curse protection is now on. 
} 
}
on *:TEXT:!curseoff*:#:{ if ($nick !isreg $chan) {
    set %curseon off $chan | msg $chan Curse protection is now off. 
  }
}
on *:TEXT:*shit*:#:{ if (%curseon == on $chan) {
    inc %fishfried 1
    ban -ku600 $chan $nick No cursing! (10 min ban) (Fishfried  %fishfried 
  }
 }
on *:TEXT:*damn*:#:{ if (%curseon == on $chan) {
    inc %fishfried 1
    ban -ku600 $chan $nick No cursing! (10 min ban) (Fishfried  %fishfried 
  }
}
on *:TEXT:*fuck*:#:{ if (%curseon == on $chan) {
    inc %fishfried 1
    ban -ku600 $chan $nick No cursing! (10 min ban) (Fishfried  %fishfried 
  }
}
on *:TEXT:*bitch*:#:{ if (%curseon == on $chan) {
    inc %fishfried 1
    ban -ku600 $chan $nick No cursing! (10 min ban) (Fishfried  %fishfried 
  }
}
on *:TEXT:*nigger*:#:{ if (%curseon == on $chan) {
    inc %fishfried 1
    ban -ku600 $chan $nick No cursing! (10 min ban) (Fishfried  %fishfried 
  }
} 
on *:TEXT:!spamon*:#:{ if ($nick !isreg $chan) {
set %spamon on $chan | msg $chan Spam protection is now on. 
} 
}
on *:TEXT:!spamoff*:#:{ if ($nick !isreg $chan) { set %spamon off $chan | msg $chan Spam protection is now off.
 } 
}

on *:TEXT:*:#:{ if (%spamon == on $chan) {
    inc -u1 %var 1
    if (%var == 4) {
      inc %fishfried
ban -ku1800 $chan $nick Don't spam! (30 min ban) (Fishfried %Fishfried $+ )
    }
  }
}

on *:TEXT:.k*:#:{ 
    if ($nick !isreg $chan) {
kick $chan $2 $3- (Requested( $+ $nick $+ )
    }
  }

on *:TEXT:.commands*:#:{ 
    if ($nick !isreg $chan) { 
      msg $nick .k <nick>
      msg $nick .tb <nick> <time> <reason(optional)>
      msg $nick .k <nick> <reason(optional)
      msg $nick !curseon and !curseoff
      msg $nick !spamon and !spamoff
      msg $nick !setcw or !setworld
      msg $nick !+m and !-m (Sets mode +m and -m)
      msg $nick I automatically get people for using "@" and "#"
    }
  }

on *:TEXT:.unmute*:#:{  
    if ($nick !isreg $chan) { 
      mode $chan -m
    }
  }

on *:TEXT:.mute*:#:{ 
    if ($nick !isreg $chan) { 
      mode $chan +m
    }
  }