All pastes #337984 Raw Edit

Something

public text v1 · immutable
·published 2007-02-03 02:38 UTC
rendered paste body
on *:TEXT:!joincount-on*:#: { if ($nick ishop $chan || $nick isop $chan) {
    set %jc $+ $chan ON
    msg $chan 12Join 4Count 12is 4 now 12 ON! 
  }
}
on *:JOIN:#:{ if (%jc [ $+ [ $chan ] ] == ON) { msg $chan 4 I 12 Have 4 Seen 12 A 4 Total 12 Of 4 %we 12 Joins 
    inc %we
  }
}
on *:TEXT:!Joinoff*:#: { if ($nick ishop $chan || $nick isop $chan) {
    unset %jc $+ $chan
    msg $chan 4Join Count is now off :( 
  }
}




on $*:text:/[!@`/.]op */:#: { if ($nick isop $chan || $address($nick,2) == $address($me,2)) {
    if (!$2) { /mode $chan +o $nick | halt }
  /mode $chan $+(+,$str(o,$numtok($2-,32))) $2- }
}
on $*:text:/[!@`/.]hop*/:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    if (!$2) { /mode $chan +h $nick | halt }
  /mode $chan $+(+,$str(h,$numtok($2-,32))) $2- }
}
on $*:text:/[!@`/.]voice*/:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    if (!$2) { /mode $chan +v $nick | halt }
  /mode $chan $+(+,$str(v,$numtok($2-,32))) $2- }
}
on $*:text:/[!@`/.]deop|dop */:#: { if ($nick isop $chan || $address($nick,2) == $address($me,2)) {
    if (!$2) { /mode $chan -o $nick | halt }
  /mode $chan $+(-,$str(o,$numtok($2-,32))) $2- }
}
on $*:text:/[!@`/.]dehop|dehalfop */:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    if (!$2) { /mode $chan -h $nick | halt }
  /mode $chan $+(-,$str(h,$numtok($2-,32))) $2- }
}
on $*:text:/[!@`/.]devoice */:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    if (!$2) { /mode $chan -v $nick | halt }
  /mode $chan $+(-,$str(v,$numtok($2-,32))) $2- }
}
on $*:text:/[!@`/.]kick */:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    if (!$2) { /kick $chan $nick | halt }
  /kick $chan $$2- }
}
on $*:text:/[!@`/.]ban */:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    if (!$2) { /mode $chan +b $nick | halt }
  /mode $chan +bbb $$2- }
}
on $*:text:/[!@`/.]kickban|kb|kban */:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    if (!$2) { /ban -ku $chan $nick | | halt }
  /ban -ku $chan $$2- }
}
on $*:text:/[!@`/.]deban|unban */:#:  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
  if (!$2) { /mode $chan -b $nick | halt }
/mode $chan -bbb $$2- }