All pastes #953342 Raw Edit

Something

public text v1 · immutable
#953342 ·published 2008-03-23 00:22 UTC
rendered paste body
; ––––––––––––––––––––––––––––––––––––––––
; NoNameScript v4.11 - dynamic theme file - coded by greeny & mute
; Don't edit anything in here unless you REALLY know what you're doing!
; File dynamically generated by NoNameScript 4.2 theme engine 1.03 at 17/03/2008 22:00:08 in 0.39 second(s).
; ––––––––––––––––––––––––––––––––––––––––
alias msg {
  if (!$isid) && ($remove($2-,$chr(32)) != $null) {
    !.msg $$1-
    if ($show) {
      if ($1 ischan) || ($query($1)) || (=* iswm $1) {
        if ($1 ischan) {
          echo -ti12c own $1   4 $+ $cmod($1,$me) $+  $+ $colnick($1,$me) $+ : $2-
        }
        else {
          echo -ti12c own $1   10 $me $+ : $2-
        }
      }
      else {
        echo $actcid(ti12c) normal — $+ > · $+ $1 $+ · $2-
      }
    }
  }
}
alias amsg {
  var %t = $$1-
  if (!$isid) && ($remove(%t,$chr(32)) != $null) {
    !.amsg %t
    if ($show) {
      if ($chan(0)) {
        var %c = $v1
        while (%c) {
          tokenize 32 $chan(%c) %t
          echo -ti12c own $1   4 $+ $cmod($1,$me) $+  $+ $colnick($1,$me) $+ : $2-
          dec %c
        }
      }
    }
  }
}
alias describe {
  if (!$isid) {
    !.describe $1-
    if (!$show) { return }
    if ($1 ischan) || ($query($1)) || (=* iswm $1) {
      if ($1 ischan) {
        echo -ti12c action $1   10 ×12 $cmod($1,$me) $+  $+ $me $+  $2-
      }
      else {
        echo -ti12c action $1   10 × $me $+  $2-
      }
    }
    else {
      echo $actcid(ti12c) action — $+ > · $+ $1 $2-
    }
  }
}
alias ame {
  var %t = $$1-
  if (!$isid) && ($remove(%t,$chr(32)) != $null) {
    !.ame %t
    if ($show) {
      if ($chan(0)) {
        var %c = $v1
        while (%c) {
          tokenize 32 $chan(%c) %t
          echo -ti12c action $1   10 ×12 $cmod($1,$me) $+  $+ $me $+  $2-
          dec %c
        }
      }
    }
  }
}
alias notice {
  if (!$isid) {
    .!notice $1-
    if (!$show) { return }
    echo $actcid(ti12c) notice — $+ > —10 $+ $1 $+ — $2-
  }
}
alias dns {
  if (!$isid) {
    if ($1) {
      !.dns $1-
      if ($show) {
        var %h = $1,%f
        if ($istok(-h -c,$1,32)) { var %f = $1,%h = $2 }
        if (%f != -h) && (. !isin %h) && ($address(%h,5)) { %h = $gettok($v1,2,64) }
        echo -ati12c info Resolving11 %h
      }
    }
  }
}
alias ctcp {
  if (!$isid) {
    !.ctcp $1-
    if ($2 == PING) { set -u100 $+(%,pingticks.,$cid,.,$1) $nnticks }
    if ($show) && ($2 != DCC) {
      echo $actcid(ti12c) ctcp CTCP sent to10 $1 $+ : $2 $3-
    }
  }
}
alias ctcpreply {
  if (!$isid) {
    !.ctcpreply $1-
    if ($show) {
      echo $actcid(ti12c) ctcp CTCP reply sent to10 $1 $+ : $2 $3-
    }
  }
}
on ^&*:notify:{
  haltdef
  echo $actcid(ti12c) info 10 $+ $nick is now online!
}
on ^&*:unotify:{
  haltdef
  echo $actcid(ti12c) info 10 $+ $nick is now offline!
}
alias thmecho {
  if ($1 == -s) { var %e = -sti12c info }
  elseif ($1 == -a) { var %e = $actcid(ti12c info) }
  else { var %e = -ti12c info $1 }
  echo %e $2-
}
alias thmerror {
  if ($1 == -s) { var %e = -sti12c info }
  elseif ($1 == -a) { var %e = $actcid(ti12c info) }
  else { var %e = -ti12c info $1 }
  echo %e Error: $2-
}
alias thmls {
  if ($1 == -s) { var %e = -sti12c info }
  elseif ($1 == -a) {
    if (@* iswm $active) || ($cid != $activecid) { var %e = -sti12c info }
    else { var %e = -ati12c info }
  }
  else { var %e = -ti12c info $1 }
  echo %e · ·-———-· ·
}
alias thmhl {
  if ($1- != $null) {
    return 11 $+ $1- $+ 
  }
}
alias thmbr {
  if ($1- != $null) {
    return 10( $+ $1- $+ 10)
  }
}
on &^*:join:#:{
  haltdef
  playmircsound join
  if ($chan !ischan) { return }
  if ($nick != $me) {
    var %e = $thmev($chan)
    if (%e isnum 0-1) { %e = -ti12c join $chan }
    elseif (%e == 2) { %e = -sti12c join }
    elseif (%e == 3) { goto skip }
    echo %e 11 $+ $nick ( $+ $address $+ ) has joined11 $chan
    :skip
    if (%qryevent) && ($query($nick)) && (j isin %qrytypes) {
      echo -ti12c join $nick 11 $+ $+($nick,:,$chan) ( $+ $address $+ ) has joined11 $chan
    }
  }
  else { set -u100 %joinprog. [ $+ [ $chan ] $+ ] . [ $+ [ $cid ] ] $nnticks }
}
on &!^*:part:#:{
  haltdef
  playmircsound part
  if ($chan !ischan) { return }
  var %e = $thmev($chan)
  if (%e isnum 0-1) { %e = -ti12c part $chan }
  elseif (%e == 2) { %e = -sti12c part }
  elseif (%e == 3) { goto skip }
  echo %e 11 $+ $nick ( $+ $address $+ ) has left11 $chan $thmbr($1-)
  :skip
  if (%qryevent) && ($query($nick)) && (p isin %qrytypes) {
    echo -ti12c part $nick 11 $+ $+($nick,:,$chan) ( $+ $address $+ ) has left11 $chan $thmbr($1-)
  }
}
on &^*:kick:#:{
  haltdef
  playmircsound kick
  if ($chan !ischan) { return }
  if ($knick == $me) {
    echo -sti12c kick You were kicked from11 $chan by11 $nick $thmbr($1-)
  }
  var %e = $thmev($chan)
  if (%e isnum 0-1) { %e = -ti12c kick $chan }
  elseif (%e == 2) { %e = -sti12c kick }
  elseif (%e == 3) { goto skip }
  echo %e 11 $+ $knick was kicked by11 $nick $+ 3 ( $+ $1- $+ )
  if ($away.chklog($null).event) && ($ccontrol($chan)) {
    echo -ti12c kick $specialcidwin(Awaylog) 11 $+ $knick was kicked by11 $+($nick,:,$chan) $+ 3 ( $+ $1- $+ )
  }
  :skip
  if (%qryevent) && (k isin %qrytypes) {
    if ($query($knick)) {
      echo -ti12c kick $knick 11 $+ $knick was kicked by11 $+($nick,:,$chan) $+ 3 ( $+ $1- $+ )
    }
    if ($query($nick)) {
      echo -ti12c kick $nick 11 $+ $knick was kicked by11 $+($nick,:,$chan) $+ 3 ( $+ $1- $+ )
    }
  }
}
on &^*:quit:{
  haltdef
  var %c = $comchan($nick,0)
  while (%c) {
    var %e = $thmev($comchan($nick,%c))
    if (%e isnum 0-1) { %e = -ti12c quit $comchan($nick,%c) }
    elseif (%e == 2) { %e = -sti12c quit }
    elseif (%e == 3) {
      %e = -sti12c quit
      echo %e 11 $+ $nick ( $+ $address $+ ) has quit IRC ( $+ $1- $+ )
      %e = -ti12c quit $comchan($nick,%c)
    }
    elseif (%e == 4) { goto skip }
    echo %e 11 $+ $nick ( $+ $address $+ ) has quit IRC ( $+ $1- $+ )
    :skip
    dec %c
  }
  if (%qryevent) && ($query($nick)) && (q isin %qrytypes) {
    echo -ti12c quit $nick 11 $+ $nick ( $+ $address $+ ) has quit IRC ( $+ $1- $+ )
  }
}
on &^*:nick:{
  haltdef
  if ($nick === $newnick) { return }
  var %c = $comchan($newnick,0),%q = $query(0)
  while (%c) {
    var %e = $thmev($comchan($newnick,%c))
    if (%e isnum 0-1) { %e = -ti12c nick $comchan($newnick,%c) }
    elseif (%e == 2) { goto skip }
    echo %e 11 $+ $nick is now known as11 $newnick
    :skip
    dec %c
  }
  if ($nick == $me) {
    echo -sti12c nick Your nick is now11 $newnick
  }
  if (%qryevent) {
    if ($query($newnick)) && (n isin %qrytypes) {
      echo -ti12c nick $newnick 11 $+ $nick is now known as11 $newnick
    }
    elseif ($nick == $me) && (o isin %qrytypes) {
      while (%q) {
        echo -ti12c nick $query(%q) 11 $+ $nick is now known as11 $newnick
        dec %q
      }
    }
  }
}
on &^*:topic:#:{
  haltdef
  if ($chan !ischan) { return }
  var %e = $thmev($chan)
  if (%e isnum 0-1) { %e = -ti12c topic $chan }
  elseif (%e == 2) { %e = -sti12c topic }
  elseif (%e == 3) { goto skip }
  echo %e 11 $+ $nick changes topic to:11 $1-
  if ($away.chklog($null).event) && ($ccontrol($chan)) {
    echo -ti12c topic $specialcidwin(Awaylog) 11 $+ $+($nick,:,$chan) changes topic to:11 $1-
  }
  :skip
}
ctcp &*:*:*:{
  if (!$istok(dcc version,$1,32)) {
    haltdef
    if ($1 == ping) { .ctcpreply $nick PING $ctime }
    if ($chan) {
      if ($chan !ischan) { return }
      var %e = $thmev($chan)
      if (%e isnum 0-1) { %e = -ti12c ctcp $chan }
      elseif (%e == 2) { %e = -sti12c ctcp }
      echo %e CTCP from10 $nick $+ @10 $+ $chan $+ : $1 $2-
    }
    else {
      var %e = $thm.active(ctcp,ti12c ctcp)
      echo %e CTCP from10 $nick $+ : $1 $2-
    }
  }
}
on &^*:rawmode:#:{
  haltdef
  if ($chan !ischan) { return }
  var %e = $thmev($chan)
  if (%e isnum 0-1) { %e = -ti12c mode $chan }
  elseif (%e == 2) { %e = -sti12c mode }
  elseif (%e == 3) { goto skip }
  echo %e 11 $+ $nick sets mode: $1-
  :skip
}
on &^*:invite:#:{
  haltdef
  playmircsound invite
  var %e = $thm.active(invite,ti12c invite)
  echo %e 11 $+ $nick invites you to join11 $chan
}
on &^*:usermode:{
  haltdef
  echo -sti12c mode 11 $+ $me sets mode: $1-
}
on &^*:text:*:#:{
  haltdef
  playmircsound channeltext
  if ($chan !ischan) { return }
  echo -lbfmti12c normal $chan   4 $+ $cmod($chan,$nick) $+  $+ $colnick($chan,$nick) $+ : $strip($1-,mo)
  if (%hlown) && ($isachl($1-)) {
    chkhlwin
    echo -mti12c normal $specialcidwin(Highlight)   4 $+ $cmod($chan,$nick) $+  $+ $colnick($chan,$nick).chan $+ : $strip($1-,mo)
  }
  if ($away.chklog($strip($1-))) {
    echo -mti12c normal $specialcidwin(Awaylog)   4 $+ $cmod($chan,$nick) $+  $+ $colnick($chan,$nick).chan $+ : $strip($1-,mo)
  }
}
on &^*:text:*:?:{
  haltdef
  playmircsound querytext
  if ($query($nick)) {
    echo -lbfmti12c normal $nick   10 $nick $+ : $strip($1-,mo)
  }
  elseif (%thm.singlemsg) {
    echo -lbfmdti12c normal · $+ $nick $+ · $1-
  }
  else {
    echo $thm.active(query,lbfmti12c) normal · $+ $nick $+ · $strip($1-,mo)
  }
  if (%hlown) && ($isachl($1-)) {
    chkhlwin
    echo -mti12c normal $specialcidwin(Highlight)   10 $nick $+ : $strip($1-,mo)
  }
}
on &^*:chat:*:{
  haltdef
  playmircsound chattext
  if (ACTION ?* iswm $1-) {
    echo -lbfmti12c normal =$nick   10 × $nick $+  $strip($mid($1-,9,-1),mo)
    if (%hlown) && ($isachl($1-)) {
      chkhlwin
      echo -mti12c normal $specialcidwin(Highlight)   10 × $nick $+  $strip($mid($1-,9,-1),mo)
    }
  }
  else {
    echo -lbfmti12c normal =$nick   10 $nick $+ : $strip($1-,mo)
    if (%hlown) && ($isachl($1-)) {
      chkhlwin
      echo -mti12c normal $specialcidwin(Highlight)   10 $nick $+ : $strip($1-,mo)
    }
  }
}
on &^*:action:*:#:{
  haltdef
  if ($chan !ischan) { return }
  echo -lbfmti12c action $chan   10 ×12  $+ $cmod($chan,$nick) $+  $+ $nick $+  $strip($1-,mo)
  if (%hlown) && ($isachl($1-)) {
    chkhlwin
    echo -mti12c action $specialcidwin(Highlight)   10 ×12  $+ $cmod($chan) $+  $+ $+($nick,:,$chan) $+  $strip($1-,mo)
  }
  if ($away.chklog($strip($1-))) {
    echo -mti12c action $specialcidwin(Awaylog)   10 ×12  $+ $cmod($chan) $+  $+ $+($nick,:,$chan) $+  $strip($1-,mo)
  }
}
on &^*:action:*:?:{
  haltdef
  if (%thm.singlemsg) {
    echo -dti12c action · $+ $nick $1-
  }
  elseif ($query($nick)) {
    echo -lbfmti12c action $nick   10 × $nick $+  $strip($1-,mo)
  }
  else {
    echo $thm.active(query,lbfmti12c) action · $+ $nick $strip($1-,mo)
  }
  if (%hlown) && ($isachl($1-)) {
    chkhlwin
    echo -mti12c action $specialcidwin(Highlight)   10 × $nick $+  $strip($1-,mo)
  }
}
on &^*:notice:*:#:{
  haltdef
  playmircsound notice
  if ($chan !ischan) { return }
  if (%notice.sepwin) {
    notice.chkwin
    var %e = -mti12c notice $specialcidwin(Notices)
  }
  else { var %e = -mti12c notice $chan }
  echo %e —10 $+ $nick $+ @10 $+ $chan $+ — $1-
}
on &^*:notice:*:?:{
  haltdef
  playmircsound notice
  if (%notice.sepwin) {
    notice.chkwin
    var %e = -mti12c notice $specialcidwin(Notices)
  }
  else {
    if ($qnetchkwlc($fulladdress,$1-)) { var %e = -mti12c notice $v1 }
    else { var %e = $thm.active(notice,mti12c notice) }
  }
  echo %e —10 $+ $nick $+ — $1-
}
on &^*:snotice:*:{
  haltdef
  playmircsound notice
  if (%notice.sepwin) {
    notice.chkwin
    var %e = -mti12c notice $specialcidwin(Notices)
  }
  else { var %e = -msti12c notice }
  echo %e —10 $+ $nick $+ — $1-
}
on &*:dns:{
  haltdef
  if ($dns(0)) {
    var %i = 1,%t = $dns(0)
    while (%i <= %t) {
      echo -ati12c info Resolved11 $dns(%i) to11 $remtok($dns(%i).ip $dns(%i).addr,$dns(%i),1,32)
      inc %i
    }
  }
  else {
    echo -ati12c info Unable to resolve11 $iif($address,$v1,$nick)
  }
}
on &*:ctcpreply:*:{
  haltdef
  if ($1 == PING) {
    if ($($+(%,pingticks.,$cid,.,$nick),2)) {
      %rpl = $round($calc($nnticks - $v1),3) second(s)
      unset $+(%,pingticks.,$cid,.,$nick)
    }
    else { %rpl = $duration($calc($ctime - $2)) }
    tokenize 32 PING %rpl
  }
  var %e = $thm.active(ctcp,ti12c ctcp)
  echo %e CTCP reply from10 $nick $+ : $1 $2-
}
on ^&*:wallops:*:{
  haltdef
  if ($1 == *) { var %w = $specialcidwin(Wallusers),%t = $2- }
  elseif ($1 == $) { var %w = $specialcidwin(Wallops),%t = $2- }
  else { var %w = $specialcidwin(Wallops),%t = $1- }
  if (!$window(%w)) {
    window -nk0g1e %w
    thmecho %w Wall message window for $thmhl($curconserv) opened on $thmhl($longtime) $+ .
    echo %w 
  }
  echo -lmti12c wallops %w   12 Ø10 $+ $nick $+ : $strip(%t,mo)
}
raw 324:*:{
  if ($halted) { return }
  haltdef
  echo -ti12c info $2 Modes on11 $2 are $3-
}
raw 329:*:{
  if ($halted) { return }
  haltdef
  echo -ti12c info $2 11 $+ $2 was created on $longtime($3)
}
raw 367:*:{
  if ($halted) { return }
  haltdef
  echo -ti12c info $2 11 $+ $3 set by11 $4 on11 $2 $thmbr($longtime($5))
}
raw 368:*:{
  if ($halted) { return }
  haltdef
  echo -ti12c info $2 End of11 $2 ban list
}
raw 404:*:{
  if ($halted) { return }
  haltdef
  echo -ti12c info $2 Unable to message11 $2
}
raw 482:*:{
  if ($halted) { return }
  haltdef
  echo -ti12c info $2 You're not channel operator on11 $2
}
raw 396:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info 11 $+ $2 is now your hidden host
}
raw 451:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info You have to register first!
}
raw 311:*:{
  if ($halted) { return }
  haltdef
  if (%whois. [ $+ [ $cid ] ]) {
    echo $thm.active(whois,ti12c) whois    · ·-—— whois end ——-· ·
  }
  else {
    set %whois. $+ $cid 1
  }
  echo $thm.active(whois,ti12c) whois    · ·-——11 $2 whois ——-· ·
  echo $thm.active(whois,ti12c) whois                   11 address: $+($3,@,$4) $thmbr($6-)
}
raw 319:*:{
  if ($halted) { return }
  haltdef
  echo $thm.active(whois,ti12c) whois                   11 channels: $replace( $+ $thm.hlcomchan($sorttok($3-,32,c)) $+ ,$chr(35),11#)
}
raw 312:*:{
  if ($halted) { return }
  haltdef
  if (%whois. [ $+ [ $cid ] ]) {
    echo $thm.active(whois,ti12c) whois                   11 server: $3 $thmbr($4-)
  }
  else {
    echo $thm.active(whois,ti12c) whois                   11 server: $3 $thmbr($4-)
  }
}
raw 313:*:{
  if ($halted) { return }
  haltdef
  echo $thm.active(whois,ti12c) whois                   11 status: $5-
}
raw 314:*:{
  if ($halted) { return }
  haltdef
  set %whowas. $+ $cid 1
  echo $thm.active(whois,ti12c) whois    · ·-——11 $2 whowas ——-· ·
  echo $thm.active(whois,ti12c) whois                   11 address: $+($3,@,$4) $thmbr($6-)
}
raw 301:*:{
  if ($halted) { return }
  haltdef
  if (%whois. [ $+ [ $cid ] ]) {
    echo $thm.active(whois,ti12c) whois                   11 away: $3-
  }
  elseif (%whowas. [ $+ [ $cid ] ]) {
    echo $thm.active(whois,ti12c) whois                   11 away: $3-
  }
  elseif ($2 != $me) && (!%away.seen. [ $+ [ $2 ] $+ ] . [ $+ [ $cid ] ]) {
    set -u300 %away.seen. [ $+ [ $2 ] $+ ] . [ $+ [ $cid ] ] 1
    echo $thm.active(away,ti12c) info 11 $+ $2 is marked as being away: $3-
  }
}
raw 369:*:{
  if ($halted) { return }
  haltdef
  if (%whowas. [ $+ [ $cid ] ]) {
    echo $thm.active(whois,ti12c) whois    · ·-—— whowas end ——-· ·
    unset %whowas. $+ $cid
  }
}
raw 330:*:{
  if ($halted) { return }
  haltdef
  echo $thm.active(whois,ti12c) whois                   11 auth: $3
}
raw 338:*:{
  if ($halted) { return }
  haltdef
  echo $thm.active(whois,ti12c) whois                   11 real address: $3 $thmbr($4-)
}
raw 317:*:{
  if ($halted) { return }
  haltdef
  echo $thm.active(whois,ti12c) whois                   11 idle: $duration($3)
  echo $thm.active(whois,ti12c) whois                   11 signon: $duration($calc($ctime - $4)) ago $thmbr($asctime($4))
}
raw 318:*:{
  if ($halted) { return }
  haltdef
  if (%whois. [ $+ [ $cid ] ]) {
    echo $thm.active(whois,ti12c) whois    · ·-—— whois end ——-· ·
    unset %whois. $+ $cid
  }
}
raw 331:*:{
  if ($halted) { return }
  haltdef
  if ($me ison $2) { var %e = -ti12c topic $2 }
  else { var %e = $actcid(ti12c) topic }
  echo %e No topic in11 $2 set
}
raw 332:*:{
  if ($halted) { return }
  haltdef
  if (%joinprog. [ $+ [ $2 ] $+ ] . [ $+ [ $cid ] ]) { return }
  if ($me ison $2) { var %e = -ti12c topic $2 }
  else { var %e = $actcid(ti12c) topic }
  echo %e    · ·-——11 $2 topic ——-· ·
  echo %e                   11 topic: $3-
}
raw 333:*:{
  if ($halted) { return }
  haltdef
  if (%joinprog. [ $+ [ $2 ] $+ ] . [ $+ [ $cid ] ]) {
    set -u100 $+(%,topicset.,$2,.,$cid) $3-
    return
  }
  if ($me ison $2) { var %e = -ti12c topic $2 }
  else { var %e = $actcid(ti12c) topic }
  echo %e                   11 set by: $3 $thmbr($asctime($4))
  echo %e    · ·-—— topic end ——-· ·
}
raw 341:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) invite 11 $+ $2 has been invited to11 $3
}
raw 443:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) invite 11 $+ $2 is already on11 $3
}
raw 353:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hnames) || (%names.show. [ $+ [ $cid ] ]) {
    echo -sti12c info Users on11 $3 $+ : $4-
  }
}
raw 355:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hnames) || (%names.show. [ $+ [ $cid ] ]) {
    echo -sti12c info Users on11 $3 $+ : $4-
  }
}
raw 366:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hnames) || (%names.show. [ $+ [ $cid ] ]) {
    echo -sti12c info End of names list
  }
  if (%joinprog. [ $+ [ $2 ] $+ ] . [ $+ [ $cid ] ]) {
    var %nt = $v1,%s = $iif($round($calc($nnticks - %nt),2) isnum 0-1000,$v1,<unknown>),%g = %topicset. [ $+ [ $2 ] $+ ] . [ $+ [ $cid ] ],%n = $iif($wd(%g,1,32),$v1,<unknown>),%d = $iif($wd(%g,2,32),$longtime($v1),<unknown>),%a = $iif($wd(%g,2,32),$duration($calc($ctime - $v1)),<unknown>)
    if ($me ison $2) {
      haltdef
      echo -ti12c join $2    · ·-——11 $2 join ——-· ·
      if ($thmif($chan($2).topic)) { echo -ti12c join $2                   11 topic: $chan($2).topic }
      if ($thmif($chan($2).topic)) { echo -ti12c join $2                   11 set by: %n $thmbr(%d) }
      echo -ti12c join $2                   11 users:11 $nick($2,0) users,11 $nick($2,0,o) opped,11 $nick($2,0,v) voiced,11 $nick($2,0,r) regulars
      echo -ti12c join $2                   11 sync:11 %s seconds
      echo -ti12c join $2    · ·-—— join end ——-· ·
    }
  }
  unset %names.show. $+ $cid %joinprog. $+ $2 $+ . $+ $cid %topicset. $+ $2 $+ . $+ $cid
}
raw 421:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info Unknown command:11 $2
}
raw 352:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) whois Who list for11 $6 $+ : channel11 $2 $+ , status11 $7 $+ , address11 $+($3,@,$4) $+ , real name11 $9-
}
raw 315:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) whois End of who list
}
raw 433:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info The nickname11 $2 is already in use
}
raw 471:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info Unable to join11 $2 (full)
}
raw 473:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info Unable to join11 $2 (invite only)
}
raw 474:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info Unable to join11 $2 (you're banned)
}
raw 475:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info Unable to join11 $2 (correct key required)
}
raw 477:*:{
  if ($halted) { return }
  if ($left($2,1) isin $chantypes) {
    haltdef
    echo $actcid(ti12c) info Unable to join11 $2 (registered only)
  }
}
raw 401:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info No such nickname:11 $2
  unset $+(%,whois.,$2,.,$cid)
}
raw 406:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info No such nickname:11 $2
}
raw 403:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info No such channel:11 $2
}
raw 251:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info There are11 $4 users and11 $7 invisible on11 $10 servers
}
raw 252:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info There are11 $2 operator(s) online
}
raw 253:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info There are11 $2 unknown connection(s)
}
raw 254:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info There are11 $2 channels formed
}
raw 255:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info I have11 $4 clients and11 $7 servers
}
raw 001:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info Welcome to the Internet Relay Network,11 $8
}
raw 002:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hwmsg) {
    echo -sti12c info Your host is11 $left($5,-1) $+ , running version11 $8
  }
}
raw 003:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hwmsg) {
    echo -sti12c info This server was created11 $6-
  }
}
raw 004:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hwmsg) {
    echo -sti12c info Server11 $2 $+ , version11 $3 $thmbr($4) $thmbr($5)
  }
}
raw 005:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hwmsg) {
    echo -sti12c info Supported by this server:11 $deltok($2-,-5-,32)
  }
}
raw *:*:{
  if ($halted) { return }
  if (!$istok(321 322 323,$numeric,32)) {
    haltdef
    echo $whois.echo $+ ti12c info Raw11 $numeric $+ : $2-
  }
}
; ––––––––––––––––––––––––––––––––––––––––
; End of file
; ––––––––––––––––––––––––––––––––––––––––