All pastes #289183 Raw Edit

Divers

public text v1 · immutable
#289183 ·published 2006-12-22 22:59 UTC
rendered paste body
; ––––––––––––––––––––––––––––––––––––––––
; NoNameScript v4.03 - dynamic theme file - coded by greeny
; Don't edit anything in here unless you REALLY know what you're doing!
; File dynamically generated by NoNameScript 4.03 theme engine 1.01 at 22/12/2006 23:30:21
; ––––––––––––––––––––––––––––––––––––––––
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 02( $+ $cmod($1,$me) $+  $+ $me $+ 02) $2-
        }
        else {
          echo -ti12c own $1 02( $+ $me $+ 02) $2-
        }
      }
      else {
        echo $actcid(ti12c) normal  02 —›12 • $+ $1 $+ 12• $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 02( $+ $cmod($1,$me) $+  $+ $me $+ 02) $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 • $cmod($1,$me) $+ $me $2-
      }
      else {
        echo -ti12c action $1 • $me $2-
      }
    }
    else {
      echo $actcid(ti12c) action  02 —›12 • $+ $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 • $cmod($1,$me) $+ $me $2-
          dec %c
        }
      }
    }
  }
}
alias notice {
  if (!$isid) {
    .!notice $1-
    if (!$show) { return }
    echo $actcid(ti12c) notice     02 —›12 - $+ $1 $+ 12- $2-
  }
}
alias dns {
  if (!$isid) {
    !.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     02 —›12 dns: resolving $thmbr(%h) $+ ...
    }
  }
}
alias ctcp {
  if (!$isid) {
    !.ctcp $1-
    if ($2 == PING) { set -u100 $+(%,pingticks.,$cid,.,$1) $nn.ticks }
    if ($show) && ($2 != DCC) {
      echo $actcid(ti12c) ctcp  02 —› 02? $+ $1 $+ 02? $2 $3-
    }
  }
}
alias ctcpreply {
  if (!$isid) {
    !.ctcpreply $1-
    if ($show) {
      echo $actcid(ti12c) ctcp  02 —› 02! $+ $1 $+ 02! $2 $3-
    }
  }
}
on ^&*:notify:{
  haltdef
  echo $actcid(ti12c) info     02 —›12 notify: $thmbr($nick) is now online!
}
on ^&*:unotify:{
  haltdef
  echo $actcid(ti12c) info     02 —›12 unnotify: $thmbr($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     02 —› 12 $+ $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     02 —› 12error: $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 02((
}
alias thmhl {
  if ($1- != $null) {
    return 02(12 $+ $1- $+ 02)12
  }
}
alias thmbr {
  if ($1- != $null) {
    return 02(12 $+ $1- $+ 02)12
  }
}
on &^*:join:#:{
  haltdef
  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     02 —›12 join: $thmbr($nick) $thmbr($address)
    :skip
    if (%qryevent) && ($query($nick)) && (j isin %qrytypes) {
      echo -ti12c join $nick     02 —›12 join: $thmbr($+($nick,:,$chan)) $thmbr($address)
    }
  }
  else { set -u100 %joinprog. [ $+ [ $chan ] $+ ] . [ $+ [ $cid ] ] $nn.ticks }
}
on &!^*:part:#:{
  haltdef
  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     02 —›12 part: $thmbr($nick) $thmbr($address) $thmbr($1-)
  :skip
  if (%qryevent) && ($query($nick)) && (p isin %qrytypes) {
    echo -ti12c part $nick     02 —›12 part: $thmbr($+($nick,:,$chan)) $thmbr($address) $thmbr($1-)
  }
}
on &^*:kick:#:{
  haltdef
  if ($chan !ischan) { return }
  if ($knick == $me) {
    echo -sti12c kick     02 —›12 kick: you were kicked out of $thmbr($chan) by $thmbr($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     02 —›12 kick: $thmbr($knick) was kicked by $thmbr($nick) $thmbr($1-)
  if ($away.chklog($null).event) && ($ccontrol($chan)) {
    echo -ti12c kick $away.logwin     02 —›12 kick: $thmbr($knick) was kicked by $thmbr($+($nick,:,$chan)) $thmbr($1-)
  }
  :skip
  if (%qryevent) && (k isin %qrytypes) {
    if ($query($knick)) {
      echo -ti12c kick $knick     02 —›12 kick: $thmbr($knick) was kicked by $thmbr($+($nick,:,$chan)) $thmbr($1-)
    }
    if ($query($nick)) {
      echo -ti12c kick $nick     02 —›12 kick: $thmbr($knick) was kicked by $thmbr($+($nick,:,$chan)) $thmbr($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     02 —›12 quit: $thmbr($nick) $thmbr($address) $thmbr($1-)
      %e = -ti12c quit $comchan($nick,%c)
    }
    elseif (%e == 4) { goto skip }
    echo %e     02 —›12 quit: $thmbr($nick) $thmbr($address) $thmbr($1-)
    :skip
    dec %c
  }
  if (%qryevent) && ($query($nick)) && (q isin %qrytypes) {
    echo -ti12c quit $nick     02 —›12 quit: $thmbr($nick) $thmbr($address) $thmbr($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     02 —›12 nick: $thmbr($nick) is now known as $thmbr($newnick)
    :skip
    dec %c
  }
  if ($nick == $me) {
    echo -sti12c nick     02 —›12 nick: you are now known as $thmbr($newnick)
  }
  if (%qryevent) {
    if ($query($newnick)) && (n isin %qrytypes) {
      echo -ti12c nick $newnick     02 —›12 nick: $thmbr($nick) is now known as $thmbr($newnick)
    }
    elseif ($nick == $me) && (o isin %qrytypes) {
      while (%q) {
        echo -ti12c nick $query(%q)     02 —›12 nick: $thmbr($nick) is now known as $thmbr($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     02 —›12 topic: $thmbr($nick) changes topic to 02( $+ $1- $+ 02)
  if ($away.chklog($null).event) && ($ccontrol($chan)) {
    echo -ti12c topic $away.logwin     02 —›12 topic: $thmbr($+($nick,:,$chan)) changes topic to 02( $+ $1- $+ 02)
  }
  :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 02? $+ $nick $+ 02@ $+ $chan $+ 02? $1 $2-
    }
    else {
      var %e = $thm.active(ctcp,ti12c ctcp)
      echo %e 02? $+ $nick $+ 02? $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     02 —›12 mode: $thmbr($nick) sets mode $thmbr($1-)
  :skip
}
on &^*:invite:#:{
  haltdef
  var %e = $thm.active(invite,ti12c invite)
  echo %e     02 —›12 invite: $thmbr($nick) invites you to join $thmbr($chan)
}
on &^*:usermode:{
  haltdef
  echo -sti12c mode     02 —›12 your usermode is now: $thmbr($1-)
}
on &^*:text:*:#:{
  haltdef
  if ($chan !ischan) { return }
  echo -lbfmti12c normal $chan 02( $+ $cmod($chan,$nick) $+  $+ $nick $+ 02) $strip($1-,mo)
  if (%hlown) && ($isachl($1-)) {
    chkhlwin
    echo -mti12c normal $hlwin 02( $+ $cmod($chan,$nick) $+  $+ $+($nick,:,$chan) $+ 02) $strip($1-,mo)
  }
  if ($away.chklog($strip($1-))) {
    echo -mti12c normal $away.logwin 02( $+ $cmod($chan,$nick) $+  $+ $+($nick,:,$chan) $+ 02) $strip($1-,mo)
  }
}
on &^*:text:*:?:{
  haltdef
  if ($query($nick)) {
    echo -lbfmti12c normal $nick 02( $+ $nick $+ 02) $strip($1-,mo)
  }
  elseif (%thm.singlemsg) {
    echo -lbfmdti12c normal 12• $+ $nick $+ ! $+ $address $+ 12• $1-
  }
  else {
    echo $thm.active(query,lbfmti12c) normal 12• $+ $nick $+ ! $+ $address $+ 12• $strip($1-,mo)
  }
  if (%hlown) && ($isachl($1-)) {
    chkhlwin
    echo -mti12c normal $hlwin 02( $+ $nick $+ 02) $strip($1-,mo)
  }
}
on &^*:chat:*:{
  haltdef
  if (ACTION ?* iswm $1-) {
    echo -lbfmti12c normal =$nick • $nick $strip($mid($1-,9,-1),mo)
    if (%hlown) && ($isachl($1-)) {
      chkhlwin
      echo -mti12c normal $hlwin • $nick $strip($mid($1-,9,-1),mo)
    }
  }
  else {
    echo -lbfmti12c normal =$nick 02( $+ $nick $+ 02) $strip($1-,mo)
    if (%hlown) && ($isachl($1-)) {
      chkhlwin
      echo -mti12c normal $hlwin 02( $+ $nick $+ 02) $strip($1-,mo)
    }
  }
}
on &^*:action:*:#:{
  haltdef
  if ($chan !ischan) { return }
  echo -lbfmti12c action $chan • $cmod($chan,$nick) $+ $nick $strip($1-,mo)
  if (%hlown) && ($isachl($1-)) {
    chkhlwin
    echo -mti12c action $hlwin • $cmod($chan) $+ $+($nick,:,$chan) $strip($1-,mo)
  }
  if ($away.chklog($strip($1-))) {
    echo -mti12c action $away.logwin • $cmod($chan) $+ $+($nick,:,$chan) $strip($1-,mo)
  }
}
on &^*:action:*:?:{
  haltdef
  if (%thm.singlemsg) {
    echo -dti12c action • 12• $+ $nick $+ ! $+ $address $1-
  }
  elseif ($query($nick)) {
    echo -lbfmti12c action $nick • $nick $strip($1-,mo)
  }
  else {
    echo $thm.active(query,lbfmti12c) action • 12• $+ $nick $+ ! $+ $address $strip($1-,mo)
  }
  if (%hlown) && ($isachl($1-)) {
    chkhlwin
    echo -mti12c action $hlwin • $nick $strip($1-,mo)
  }
}
on &^*:notice:*:#:{
  haltdef
  if ($chan !ischan) { return }
  if (%notice.sepwin) {
    notice.chkwin
    var %e = -mti12c notice $notice.win
  }
  else { var %e = -mti12c notice $chan }
  echo %e 12- $+ $cmod($chan,$nick) $+  $+ $nick $+ 12@ $+ $chan $+ 12- $1-
}
on &^*:notice:*:?:{
  haltdef
  if (%notice.sepwin) {
    notice.chkwin
    var %e = -mti12c notice $notice.win
  }
  else { var %e = $thm.active(notice,mti12c notice) }
  echo %e 12- $+ $nick $+ 12- $1-
}
on &^*:snotice:*:{
  haltdef
  if (%notice.sepwin) {
    notice.chkwin
    var %e = -mti12c notice $notice.win
  }
  else { var %e = -msti12c notice }
  echo %e 12- $+ $nick $+ 12- $1-
}
on &*:dns:{
  haltdef
  if ($dns(0)) {
    var %i = 1,%t = $dns(0)
    while (%i <= %t) {
      echo -ati12c info     02 —›12 dns: resolved $thmbr($dns(%i)) to $thmbr($remtok($dns(%i).ip $dns(%i).addr,$dns(%i),1,32))
      inc %i
    }
  }
  else {
    echo -ati12c info     02 —›12 dns: unable to resolve $thmbr($iif($address,$v1,$nick))
  }
}
on &*:ctcpreply:*:{
  haltdef
  if ($1 == PING) {
    if ($($+(%,pingticks.,$cid,.,$nick),2)) {
      %rpl = $calc(($nn.ticks - $v1)/1000) 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 02! $+ $nick $+ 02! $1 $2-
}
on ^&*:wallops:*:{
  haltdef
  if ($1 == *) { var %w = $wusrs.win,%t = $2- }
  elseif ($1 == $) { var %w = $wops.win,%t = $2- }
  else { var %w = $wops.win,%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 02( $+ $nick $+ 02) $strip(%t,mo)
}
raw 324:*:{
  if ($halted) { return }
  haltdef
  echo -ti12c info $2     02 —›12 modes on $2 $+ : 02(12 $+ $3- $+ 02)
}
raw 329:*:{
  if ($halted) { return }
  haltdef
  echo -ti12c info $2     02 —›12 $2 creation time: $thmbr($longtime($3))
}
raw 367:*:{
  if ($halted) { return }
  haltdef
  echo -ti12c info $2     02 —›12 $thmbr($3) set on $thmbr($longtime($5)) by $thmbr($4)
}
raw 368:*:{
  if ($halted) { return }
  haltdef
  echo -ti12c info $2     02 —›12 end of $thmbr($2) ban list!
}
raw 404:*:{
  if ($halted) { return }
  haltdef
  echo -ti12c info $2     02 —›12 unable to send message to $thmbr($2) $+ !
}
raw 482:*:{
  if ($halted) { return }
  haltdef
  echo -ti12c info $2     02 —›12 you're not opped on $thmbr($2) $+ !
}
raw 396:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info     02 —›12 $thmbr($2) is now your hidden host!
}
raw 451:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info     02 —›12 register first!
}
raw 311:*:{
  if ($halted) { return }
  haltdef
  if (%whois. [ $+ [ $cid ] ]) {
    echo $thm.active(whois,ti12c) whois 02((12 /whois end 02))
  }
  else {
    set %whois. $+ $cid 1
  }
  echo $thm.active(whois,ti12c) whois 02((12 /whois start 02))
  echo $thm.active(whois,ti12c) whois 02 —› 01 $+ $2 $+  12is " $+ $6- $+ 12" $thmbr($+($3,@,$4))
}
raw 319:*:{
  if ($halted) { return }
  haltdef
  if ($thmif($thmwchans($sorttok($3-,32,c),@))) { echo $thm.active(whois,ti12c) whois 11 —›  $+ $2 $+  12opped in $thm.hlcomchan($thmwchans($sorttok($3-,32,c),@)) }
  if ($thmif($thmwchans($sorttok($3-,32,c),%))) { echo $thm.active(whois,ti12c) whois 11 —›  $+ $2 $+  12helpopped in $thm.hlcomchan($thmwchans($sorttok($3-,32,c),%)) }
  if ($thmif($thmwchans($sorttok($3-,32,c),+))) { echo $thm.active(whois,ti12c) whois 11 —›  $+ $2 $+  12voiced in $thm.hlcomchan($thmwchans($sorttok($3-,32,c),+)) }
  if ($thmif($thmwchans($sorttok($3-,32,c)))) { echo $thm.active(whois,ti12c) whois 11 —›  $+ $2 $+  12reg in $thm.hlcomchan($thmwchans($sorttok($3-,32,c))) }
}
raw 312:*:{
  if ($halted) { return }
  haltdef
  if (%whois. [ $+ [ $cid ] ]) {
    echo $thm.active(whois,ti12c) whois 11 —›  $+ $2 $+  12using $3 $thmbr($4-)
  }
  else {
    echo $thm.active(whois,ti12c) whois 11 —›  $+ $2 $+  12used $3 $thmbr($4-)
  }
}
raw 313:*:{
  if ($halted) { return }
  haltdef
  echo $thm.active(whois,ti12c) whois 11 —›  $+ $2 $+  12is $5-
}
raw 314:*:{
  if ($halted) { return }
  haltdef
  set %whowas. $+ $cid 1
  echo $thm.active(whois,ti12c) whois 02((12 /whowas start 02))
  echo $thm.active(whois,ti12c) whois 02 —› 01 $+ $2 $+  12was " $+ $6- $+ 12" $thmbr($+($3,@,$4))
}
raw 301:*:{
  if ($halted) { return }
  haltdef
  if (%whois. [ $+ [ $cid ] ]) {
    echo $thm.active(whois,ti12c) whois 11 —›  $+ $2 $+  12is away $3-
  }
  elseif (%whowas. [ $+ [ $cid ] ]) {
    echo $thm.active(whois,ti12c) whois 11 —›  $+ $2 $+  12was away $3-
  }
  elseif ($2 != $me) && (!%away.seen. [ $+ [ $2 ] $+ ] . [ $+ [ $cid ] ]) {
    set -u300 %away.seen. [ $+ [ $2 ] $+ ] . [ $+ [ $cid ] ] 1
    echo $thm.active(away,ti12c) info     02 —›12 away: $thmbr($2) is marked as being away as $thmbr($3-)
  }
}
raw 369:*:{
  if ($halted) { return }
  haltdef
  if (%whowas. [ $+ [ $cid ] ]) {
    echo $thm.active(whois,ti12c) whois 02((12 /whowas end 02))
    unset %whowas. $+ $cid
  }
}
raw 330:*:{
  if ($halted) { return }
  haltdef
  echo $thm.active(whois,ti12c) whois 11 —›  $+ $2 $+  12authed as " $+ $3 $+ 12"
}
raw 338:*:{
  if ($halted) { return }
  haltdef
  echo $thm.active(whois,ti12c) whois 11 —›  $+ $2 $+  12real host $3 $thmbr($4)
}
raw 317:*:{
  if ($halted) { return }
  haltdef
  echo $thm.active(whois,ti12c) whois 11 —›  $+ $2 $+  12has been idle for $duration($3)
  echo $thm.active(whois,ti12c) whois 11 —›  $+ $2 $+  12signed on $duration($calc($ctime - $4)) ago
}
raw 318:*:{
  if ($halted) { return }
  haltdef
  if (%whois. [ $+ [ $cid ] ]) {
    echo $thm.active(whois,ti12c) whois 02((12 /whois end 02))
    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     02 —›12 no topic set: $thmbr($2)
}
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     02 —›12 topic: $thmbr($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     02 —›12 set by: $thmbr($3) on $thmbr($asctime($4))
}
raw 341:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) invite     02 —›12 invite: $thmbr($2) has been invited to join $thmbr($3)
}
raw 443:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) invite     02 —›12 invite: $thmbr($2) is already on $thmbr($3)
}
raw 353:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hnames) || (%names.show. [ $+ [ $cid ] ]) {
    echo -sti12c info     02 —›12 names: $thmbr($3) $4-
  }
}
raw 355:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hnames) || (%names.show. [ $+ [ $cid ] ]) {
    echo -sti12c info     02 —›12 names: $thmbr($3) $4-
  }
}
raw 366:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hnames) || (%names.show. [ $+ [ $cid ] ]) {
    echo -sti12c info     02 —›12 end of /names list for $thmbr($2)
  }
  if (%joinprog. [ $+ [ $2 ] $+ ] . [ $+ [ $cid ] ]) {
    var %s = $iif($round($calc(($nn.ticks - $v1)/1000),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 02((
      echo -ti12c join $2     02 —›12 now talking in $thmbr($2)
      echo -ti12c join $2 02((
      if ($thmif($chan($2).topic)) { echo -ti12c join $2     02 —›12 topic: $chan($2).topic }
      if ($thmif($chan($2).topic)) { echo -ti12c join $2     02 —›12 set by: %n $thmbr(%d) }
      echo -ti12c join $2     02 —›12 users: $nick($2,0) users, $nick($2,0,o) ops $thmbr($percent($nick($2,0,o),$nick($2,0),0)) $+ , $nick($2,0,v) voiced $thmbr($percent($nick($2,0,v),$nick($2,0),0)) $+ , $nick($2,0,r) regulars $thmbr($percent($nick($2,0,r),$nick($2,0),0))
      echo -ti12c join $2     02 —›12 join synced in: $thmbr(%s) second(s)
      echo -ti12c join $2 02((
    }
  }
  unset %names.show. $+ $cid %joinprog. $+ $2 $+ . $+ $cid %topicset. $+ $2 $+ . $+ $cid
}
raw 421:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info     02 —›12 error: unknown command $thmbr($2)
}
raw 352:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) whois     02 —›12 who: 02(12 $+ $6 $+ ! $+ $+($3,@,$4) $+ 02)12 on $thmbr($2) using $thmbr($5) $+ . real name: $thmbr($9-)
}
raw 315:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) whois     02 —›12 end of /who request for $thmbr($2)
}
raw 433:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info     02 —›12 error: nickname $thmbr($2) is already in use! Press Control+F1 to retry!
}
raw 471:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info     02 —›12 can't join $2 02(12full (+l)02)12! Press Control+F2 to retry!
}
raw 473:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info     02 —›12 can't join $2 02(12invite only (+i)02)12! Press Control+F2 to retry!
}
raw 474:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info     02 —›12 can't join $2 02(12you're banned (+b)02)12! Press Control+F2 to retry!
}
raw 475:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info     02 —›12 can't join $2 02(12requires key (+k)02)12! Press Control+F2 to retry!
}
raw 477:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info     02 —›12 can't join $2 02(12auth'ed only (+r)02)12!
}
raw 401:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info     02 —›12 no such nickname: $thmbr($2)
  unset $+(%,whois.,$2,.,$cid)
}
raw 406:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info     02 —›12 no such nickname: $thmbr($2)
}
raw 403:*:{
  if ($halted) { return }
  haltdef
  echo $actcid(ti12c) info     02 —›12 no such channel: $thmbr($2)
}
raw 251:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info     02 —›12 there are $thmbr($4) users and $thmbr($7) invisible on $thmbr($10) servers
}
raw 252:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info     02 —›12 there are $thmbr($2) operator(s) online
}
raw 253:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info     02 —›12 there are $thmbr($2) unknown connection(s)
}
raw 254:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info     02 —›12 there are $thmbr($2) channels formed
}
raw 255:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info     02 —›12 i have $thmbr($4) clients and $thmbr($7) servers
}
raw 001:*:{
  if ($halted) { return }
  haltdef
  echo -sti12c info     02 —›12 welcome to the internet relay network, $thmbr($8)
}
raw 002:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hwmsg) {
    echo -sti12c info     02 —›12 your host is $thmbr($left($5,-1)) $+ , running version $thmbr($8)
  }
}
raw 003:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hwmsg) {
    echo -sti12c info     02 —›12 this server was created $thmbr($6-)
  }
}
raw 004:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hwmsg) {
    echo -sti12c info     02 —›12 server: $thmbr($2) $+ , version: $thmbr($3) $+ , usermodes: $thmbr($4) $+ , channelmodes: $thmbr($5)
  }
}
raw 005:*:{
  if ($halted) { return }
  haltdef
  if (!%thm.hwmsg) {
    echo -sti12c info     02 —›12 supported by this server: $thmbr($deltok($2-,-5-,32))
  }
}
raw *:*:{
  if ($halted) { return }
  if (!$istok(321 322 323,$numeric,32)) {
    haltdef
    echo $whois.echo $+ ti12c info     02 —›12 raw $numeric $+ : $2-
  }
}
; ––––––––––––––––––––––––––––––––––––––––
; End of file
; ––––––––––––––––––––––––––––––––––––––––