Irssi Theme (v2)

By Spoofing on Nov 27, 2010

Irssi theme for mIRC, new version :)

alias say {
  var %target = $active, %string = $$1-
  if (%target ischan) msg $v1 %string
  elseif ($query(%target)) msg $v1 %string
  elseif (=* iswm %target) msg $v2 %string
}
alias me {
  var %target = $active, %string = $$1-
  if (%target ischan) describe $v1 %string
  elseif ($query(%target)) describe $v1 %string
  elseif (=* iswm %target) describe $v2 %string
}
alias msg {
  if ($isid) return
  !.msg $$1-
  if ($show) {
    if ($1 ischan) {
      var %prefix = $chr(32)
      if ($me isowner $1) var %prefix = ~
      elseif ($me isop $1) var %prefix = @
      elseif ($me ishelp $1) var %prefix = %
      elseif ($me isvo $1) var %prefix = +
      echo -ti $+ $calc($indent + $len($me) + 5) $1 $+(14<15,%prefix,00,$me,14>) $+(15,$2-,)
    }
    elseif ($query($1)) {
      echo -ti $+ $calc($indent + $len($me) + 4) $1 $+(14<00,$me,14>) $+(15,$2-,)
    }
    elseif (=* iswm $1) {
      echo -ti $+ $calc($indent + $len($me) + 4) $1 $+(14<00,$me,14>) $+(15,$2-,)
    }
    else {
      echo -ti $+ $calc($indent + 5) 14[05message14(04 $+ $1 $+ 14)14] $+(15,$2-,)
    }
  }
}
alias describe {
  if ($isid) return
  !.describe $$1-
  if ($show) {
    if ($1 ischan) {
      echo -ti $+ $calc($indent + 5) $1 00 * $me $+  $+(15,$2-,)
    }
    elseif ($query($1)) {
      echo -ti $+ $calc($indent + 5) $1 00 * $me $+  $+(15,$2-,)
    }
    elseif (=* iswm $1) {
      echo -ti $+ $calc($indent + 5) $1 00 * $me $+  $+(15,$2-,)
    }
    else {
      echo -ti $+ $calc($indent + 5) 14[05action14(04 $+ $1 $+ 14)14] $+(15,$2-,)
    }
  }
}
alias notice {
  if ($isid) return
  !.notice $$1-
  if ($show) {
    echo -ti $+ $calc($indent + 5) 14[05notice14(04 $+ $1 $+ 14)14] $+(15,$2-,)
  }
}
alias ctcp {
  if ($isid) return
  !.ctcp $$1-
  if ($show) {
    echo -ti $+ $calc($indent + 5) 14[05ctcp14(04 $+ $1 $+ 14)14] $+(15,$2,) $+(15,$3-,)
  }
}
alias ctcpreply {
  if ($isid) return
  !.ctcpreply $$1-
  if ($show) {
    echo -ti $+ $calc($indent + 5) 14[05notice14(04 $+ $1 $+ 14)14] $+(15,$2,) $+(15,$3-,)
  }
}
alias query {
  if ($isid) return
  !.query $$1-
  if ($show) {
    var %query = $window(*,$window(*,0))
    echo -nti $+ $calc($indent + 5) %query 12-15!12- 00Irssi: 15Starting query in $+(00,$network,) 15with $+(00,%query,)
  }
}
alias indent {
  if ($gettok($readini($mircini,options,n4),12,44)) return $len($timestamp)
  return 0
}
on *:START: {
  scid -a clearall
}
on *:EXIT: {
  var %i = $scid(0)
  while (%i) {
    unset %sync. [ $+ [ $scid(%i) ] $+ ] .*
    unset %names. [ $+ [ $scid(%i) ] $+ ] .*
    unset %whois. [ $+ [ $scid(%i) ] $+ ] .*
    unset %whowas. [ $+ [ $scid(%i) ] $+ ] .*
    dec %i
  }
}
on *:CONNECT: {

}
on *:DISCONNECT: {
  unset %sync. [ $+ [ $cid ] $+ ] .*
  unset %names. [ $+ [ $cid ] $+ ] .*
  unset %whois. [ $+ [ $cid ] $+ ] .*
  unset %whowas. [ $+ [ $cid ] $+ ] .*
}
on *:INPUT:*: {
  if ($mid($1,1,1) === $readini($mircini,text,commandchar)) {
    if ($ctrlenter) { }
    else {
      return
    }
  }
  if ($halted) return
  haltdef
  var %target = $active, %string = $1-
  if (%target ischan) msg $v1 %string
  elseif ($query(%target)) msg $v1 %string
  elseif (=* iswm %target) msg $v2 %string
}
on *:OPEN:?:*: {
  echo -mti $+ $calc($indent + 5) $nick 12-15!12- 00Irssi: 15Starting query in $+(00,$network,) 15with $+(00,$nick,)
}
on *:OPEN:=: {
  echo -nti $+ $calc($indent + 5) =$nick 12-15!12- 00Irssi: 15Starting query in $+(00,$network,) 15with $+(00,=$nick,)
}
on *:CLOSE:=: {
  echo -nti $+ $calc($indent + 5) =$nick 12-15!12- 00Irssi: 15Closing query with $+(00,=$nick,)
}
on ^&*:TEXT:*:*: {
  if ($halted) return
  haltdef
  if (# ischan) {
    var %prefix = $chr(32)
    if ($nick isowner #) var %prefix = ~
    elseif ($nick isop #) var %prefix = @
    elseif ($nick ishelp #) var %prefix = %
    elseif ($nick isvo #) var %prefix = +
    if ($highlight($1-)) {
      echo -lbfmti $+ $calc($indent + $len($nick) + 5) # $+(14<15,%prefix,08,$nick,14>) $+(15,$1-,)
    }
    else {
      echo -lbfmti $+ $calc($indent + $len($nick) + 5) # $+(14<15,%prefix,15,$nick,14>) $+(15,$1-,)
    }
  }
  else {
    echo -lbfmti $+ $calc($indent + $len($nick) + 4) $nick $+(14<04,$nick,14>) $+(15,$1-,)
  }
}
on ^&*:ACTION:*:*: {
  if ($halted) return
  haltdef
  if (# ischan) {
    echo -lbfmti $+ $calc($indent + 5) # 00 * $nick $+  $+(15,$1-,)
  }
  else {
    echo -lbfmti $+ $calc($indent + 5) $nick 00 * $nick $+  $+(15,$1-,)
  }
}
on ^&*:NOTICE:*:*: {
  if ($halted) return
  haltdef
  if (# ischan) {
    echo -lbfmti $+ $calc($indent + 5) $+(14-13,$nick,14:06,#,14-) $+(15,$1-,)
  }
  else {
    echo -lbfmti $+ $calc($indent + 5) 14-13 $+ $nick $+ 14(06 $+ $address $+ 14)14- $+(15,$1-,)
  }
}
on ^&*:CHAT:*: {
  if ($halted) return
  haltdef
  if (CTCP_MESSAGE ACTION ?* iswm $1-) {
    echo -lbfmti $+ $calc($indent + $len($nick) + 11) =$nick 00 (*dcc*) $nick $+  $+(15,$mid($1-,22,-1),)
  }
  elseif (ACTION ?* iswm $1-) {
    echo -lbfmti $+ $calc($indent + $len($nick) + 11) =$nick 00 (*dcc*) $nick $+  $+(15,$mid($1-,9,-1),)
  }
  else {
    echo -lbfmti $+ $calc($indent + $len($nick) + 4) =$nick $+(14<04,$nick,14>) $+(15,$1-,)
  }
}
on ^&*:JOIN:#: {
  if ($halted) return
  haltdef
  if ($nick == $me) {
    inc %sync. [ $+ [ $cid ] $+ . $+ [ # ] ]
    set %sync. [ $+ [ $cid ] $+ . $+ [ # ] $+ ] .ticks $ticks
    set %sync. [ $+ [ $cid ] $+ . $+ [ # ] $+ ] .mode $true
    set %sync. [ $+ [ $cid ] $+ . $+ [ # ] $+ ] .ial $true
    set %sync. [ $+ [ $cid ] $+ . $+ [ # ] $+ ] .ibl $true
    ;set %sync. [ $+ [ $cid ] $+ . $+ [ # ] $+ ] .iel $true
    ;set %sync. [ $+ [ $cid ] $+ . $+ [ # ] $+ ] .iil $true
    who #
    mode # b
    ;mode # e
    ;mode # I
  }
  echo -ti $+ $calc($indent + 5) # 12-15!12- $+(11,$nick,) $+(14[10,$address,14]) 15has joined $+(00,#,)
}
on ^&*:PART:#: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) # 12-15!12- $+(10,$nick,) $+(14[15,$address,14]) 15has left $+(00,#,) $+(14[15,$1-,14])
}
on ^&*:KICK:#: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) # 12-15!12- $+(10,$knick,) 15was kicked from $+(00,#,) 15by $+(00,$nick,) $+(14[15,$1-,14])
}
on ^&*:NICK: {
  if ($halted) return
  haltdef
  if ($nick == $me) {
    var %c = $comchan($newnick,0)
    while (%c) {
      echo -ti $+ $calc($indent + 5) $comchan($newnick,%c) 12-15!12- 15You're is now known as $+(00,$newnick,)
      dec %c
    }
  }
  else {
    var %c = $comchan($newnick,0)
    while (%c) {
      echo -ti $+ $calc($indent + 5) $comchan($newnick,%c) 12-15!12- $+(10,$nick,) 15is now known as $+(11,$newnick,)
      dec %c
    }
  }
}
on ^&*:QUIT: {
  if ($halted) return
  haltdef
  var %c = $comchan($nick,0)
  while (%c) {
    echo -ti $+ $calc($indent + 5) $comchan($nick,%c) 12-15!12- $+(10,$nick,) $+(14[15,$address,14]) 15has quit $+(14[15,$1-,14])
    dec %c
  }
  if ($query($nick)) {
    echo -ti $+ $calc($indent + 5) $nick 12-15!12- $+(10,$nick,) $+(14[15,$address,14]) 15has quit $+(14[15,$1-,14])
  }
  if ($chat($nick)) {
    echo -ti $+ $calc($indent + 5) =$nick 12-15!12- $+(10,$nick,) $+(14[15,$address,14]) 15has quit $+(14[15,$1-,14])
  }
}
on ^&*:TOPIC:#: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) # 12-15!12- $+(00,$nick,) 15changed topic of $+(00,#,) 15to: $+(15,$1-,)
}
on ^&*:RAWMODE:#: {
  if ($halted) return
  haltdef
  if (. isin $nick) {
    echo -ti $+ $calc($indent + 5) # 12-15!12- $+(04ServerMode15/10,#,) $+(14[15,$1-,14]) 15by $+(00,$nick,)
  }
  else {
    echo -ti $+ $calc($indent + 5) # 12-15!12- $+(15mode/10,#,) $+(14[15,$1-,14]) 15by $+(00,$nick,)
  }
}
on ^&*:SNOTICE:*: {
  if ($halted) return
  haltdef
  echo -mti $+ $calc($indent + 5) 12-15!12- $+(03!,$nick,) $+(15,$1-,)
}
on ^&*:INVITE:#: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(00,$nick,) 15invites you to $+(00,#,)
}
on ^&*:USERMODE: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15Mode change $+(14[15,$1-,14]) 15for user $+(00,$nick,)
}
on ^&*:NOTIFY: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(00,$nick,) 15is now online
}
on ^&*:UNOTIFY: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(00,$nick,) 15is now offline
}
on &*:CTCPREPLY:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 15CTCP $+(00,$1,) 15reply from $+(00,$nick,) $+ 15: $+(15,$2-,)
}
CTCP &*:*:*: {
  if ($1 == DCC) return
  if ($halted) return
  haltdef
  if (# ischan) {
    echo -ti $+ $calc($indent + 5) $+(09,$nick,) $+(14[03,$address,14]) 03requested CTCP $+(09,$1,) 03from $+(09,#,) $+ 15: $+(15,$2-,)
  }
  else {
    echo -ti $+ $calc($indent + 5) $+(09,$nick,) $+(14[03,$address,14]) 03requested CTCP $+(09,$1,) 03from $+(09,$me,) $+ 15: $+(15,$2-,)
  }
}
RAW 311:*: {
  if ($halted) return
  haltdef
  if (%whois. [ $+ [ $cid ] ]) {
    echo -ti $+ $calc($indent + 5) 12-15!12- 15End of WHOIS
    dec %whois. [ $+ [ $cid ] ]
    if (%whois. [ $+ [ $cid ] ] = 0) unset %whois. [ $+ [ $cid ] ]
  }
  inc %whois. [ $+ [ $cid ] ]
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(00,$2,) $+(14[15,$3,@,$4,14])
  echo -ti $+ $calc($indent + 17) 12-15!12-  15ircname  15: $+(15,$6-,)
}
RAW 319:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 17) 12-15!12-  15channels 15: $+(15,$sorttok($3-,32,c),)
}
RAW 312:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 17) 12-15!12-  15server   15: $+(15,$3,) $+(14[15,$4-,14])
}
RAW 330:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 17) 12-15!12-  15auth     15: $+(15,$3,)
}
RAW 338:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 17) 12-15!12-  15realip   15: $+(15,$4-,) $+(14[15,$3,14])
}
RAW 313:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 17) 12-15!12-           15: $+(00,$5-,)
}
RAW 317:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 17) 12-15!12-  15idle     15: $+(15,$duration($3),) 14[15signon: $+(15,$asctime($4),) $+ 14]
}
RAW 318:*: {
  if ($halted) return
  haltdef
  if (%whois. [ $+ [ $cid ] ]) {
    echo -ti $+ $calc($indent + 5) 12-15!12- 15End of WHOIS
    dec %whois. [ $+ [ $cid ] ]
    if (%whois. [ $+ [ $cid ] ] = 0) unset %whois. [ $+ [ $cid ] ]
  }
}
RAW 301:*: {
  if ($halted) return
  haltdef
  if (%whowas. [ $+ [ $cid ] ]) {
    echo -ti $+ $calc($indent + 17) 12-15!12-  15away     15: $+(15,$3-,)
  }
  else {
    echo -ti $+ $calc($indent + 5) 12-15!12- $+(00,$2,) 15is away: $+(15,$3-,)
  }
}
RAW 314:*: {
  if ($halted) return
  haltdef
  inc %whowas. [ $+ [ $cid ] ]
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(00,$2,) $+(14[15,$3,@,$4,14])
  echo -ti $+ $calc($indent + 17) 12-15!12-  15was      15: $+(15,$6-,)
}
RAW 369:*: {
  if ($halted) return
  haltdef
  if (%whowas. [ $+ [ $cid ] ]) {
    echo -ti $+ $calc($indent + 5) 12-15!12- 15End of WHOWAS
    dec %whowas. [ $+ [ $cid ] ]
    if (%whowas. [ $+ [ $cid ] ] = 0) unset %whowas. [ $+ [ $cid ] ]
  }
}
RAW 352:*: {
  if ($halted) return
  haltdef
  if (%sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ial) {
    return
  }
  else {
    echo -ti $+ $calc($indent + 5) 12-15!12- $+(10,$str($chr(160),$calc(10 - $len($2))),$mid($2,1,10),) $+(00,$6,$str($chr(160),$calc(9 - $len($6))),) $+(15,$7,$str($chr(160),$calc(3 - $len($7))),) $+(15,$8,$str($chr(160),$calc(2 - $len($8))),) $+(15,$3,@,$4,) $+(14[00,$9-,14])
  }
}
RAW 315:*: {
  if ($halted) return
  haltdef
  if (%sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ial) {
    var %sync = 0, %ial = $false, %ibl = $false, %iel = $false, %iil = $false
    if ($chan($2).ial) var %ial = $true, %sync = %sync + 1
    if ($chan($2).ibl) var %ibl = $true, %sync = %sync + 1
    ;if ($chan($2).iel) var %iel = $true, %sync = %sync + 1
    ;if ($chan($2).iil) var %iil = $true, %sync = %sync + 1
    if (%sync == 2) {
      var %ms = $ticks - %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ticks
      echo -nti $+ $calc($indent + 5) $2 12-15!12- 00Irssi: 15Join to $+(00,$2,) 15was synced in $+(00,$int($calc(%ms / 1000)),) 15secs
      dec %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] ]
      if (%sync. [ $+ [ $cid ] $+ . $+ [ $2 ] ] = 0) unset %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] ]
      unset %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ticks
    }
    unset %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ial
  }
  else {
    echo -ti $+ $calc($indent + 5) 12-15!12- 15End of /WHO list
  }
}
RAW 367:*: {
  if ($halted) return
  haltdef
  if (%sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ibl) {
    return
  }
  else {
    var %#, %ibl = 0
    if ($2 ischan) var %# = $v1
    if ($ibl($2,0)) var %ibl = $v1
    echo -ti $+ $calc($indent + 5) %# 12-15!12- $+(15,%ibl,) 15- $+(00,$2,) $+ 15: 15ban $+(10,$3,)
  }
}
RAW 368:*: {
  if ($halted) return
  haltdef
  if (%sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ibl) {
    var %sync = 0, %ial = $false, %ibl = $false, %iel = $false, %iil = $false
    if ($chan($2).ial) var %ial = $true, %sync = %sync + 1
    if ($chan($2).ibl) var %ibl = $true, %sync = %sync + 1
    ;if ($chan($2).iel) var %iel = $true, %sync = %sync + 1
    ;if ($chan($2).iil) var %iil = $true, %sync = %sync + 1
    if (%sync == 2) {
      var %ms = $ticks - %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ticks
      echo -nti $+ $calc($indent + 5) $2 12-15!12- 00Irssi: 15Join to $+(00,$2,) 15was synced in $+(00,$int($calc(%ms / 1000)),) 15secs
      dec %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] ]
      if (%sync. [ $+ [ $cid ] $+ . $+ [ $2 ] ] = 0) unset %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] ]
      unset %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ticks
    }
    unset %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ibl
  }
  else {
    var %#
    if ($2 ischan) var %# = $v1
    echo -ti $+ $calc($indent + 5) %# 12-15!12- 15End of Channel Ban list
  }
}
RAW 348:*: {
  if ($halted) return
  haltdef
  if (%sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .iel) {
    return
  }
  else {
    var %#, %iel = 0
    if ($2 ischan) var %# = $v1
    if ($iel($2,0)) var %iel = $v1
    echo -ti $+ $calc($indent + 5) %# 12-15!12- $+(15,%iel,) 15- $+(00,$2,) $+ 15: 15ban exception $+(10,$3,)
  }
}
RAW 349:*: {
  if ($halted) return
  haltdef
  if (%sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .iel) {
    var %sync = 0, %ial = $false, %ibl = $false, %iel = $false, %iil = $false
    if ($chan($2).ial) var %ial = $true, %sync = %sync + 1
    if ($chan($2).ibl) var %ibl = $true, %sync = %sync + 1
    ;if ($chan($2).iel) var %iel = $true, %sync = %sync + 1
    ;if ($chan($2).iil) var %iil = $true, %sync = %sync + 1
    if (%sync == 2) {
      var %ms = $ticks - %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ticks
      echo -nti $+ $calc($indent + 5) $2 12-15!12- 00Irssi: 15Join to $+(00,$2,) 15was synced in $+(00,$int($calc(%ms / 1000)),) 15secs
      dec %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] ]
      if (%sync. [ $+ [ $cid ] $+ . $+ [ $2 ] ] = 0) unset %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] ]
      unset %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ticks
    }
    unset %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .iel
  }
  else {
    var %#
    if ($2 ischan) var %# = $v1
    echo -ti $+ $calc($indent + 5) %# 12-15!12- 15End of Channel Exception list
  }
}
RAW 346:*: {
  if ($halted) return
  haltdef
  if (%sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .iil) {
    return
  }
  else {
    var %#, %iil = 0
    if ($2 ischan) var %# = $v1
    if ($iil($2,0)) var %iil = $v1
    echo -ti $+ $calc($indent + 5) %# 12-15!12- $+(15,%iil,) 15- $+(00,$2,) $+ 15: 15invite $+(10,$3,)
  }
}
RAW 347:*: {
  if ($halted) return
  haltdef
  if (%sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .iil) {
    var %sync = 0, %ial = $false, %ibl = $false, %iel = $false, %iil = $false
    if ($chan($2).ial) var %ial = $true, %sync = %sync + 1
    if ($chan($2).ibl) var %ibl = $true, %sync = %sync + 1
    ;if ($chan($2).iel) var %iel = $true, %sync = %sync + 1
    ;if ($chan($2).iil) var %iil = $true, %sync = %sync + 1
    if (%sync == 2) {
      var %ms = $ticks - %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ticks
      echo -nti $+ $calc($indent + 5) $2 12-15!12- 00Irssi: 15Join to $+(00,$2,) 15was synced in $+(00,$int($calc(%ms / 1000)),) 15secs
      dec %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] ]
      if (%sync. [ $+ [ $cid ] $+ . $+ [ $2 ] ] = 0) unset %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] ]
      unset %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .ticks
    }
    unset %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .iil
  }
  else {
    var %#
    if ($2 ischan) var %# = $v1
    echo -ti $+ $calc($indent + 5) %# 12-15!12- 15End of Channel Invite list
  }
}
RAW 324:*: {
  if ($halted) return
  haltdef
  if (%sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .mode) {
    unset %sync. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ ] .mode
  }
  else {
    var %#
    if ($2 ischan) var %# = $v1
    echo -nti $+ $calc($indent + 5) %# 12-15!12- $+(15mode/10,$2,) $+(14[15,$3-,14])
  }
}
RAW 329:*: {
  if ($halted) return
  haltdef
  var %#
  if ($2 ischan) var %# = $v1
  echo -nti $+ $calc($indent + 5) %# 12-15!12- 15Channel $+(10,$2,) 15created $asctime($3) $+ 
}
RAW 353:*: {
  if ($halted) return
  haltdef
  if (%sync. [ $+ [ $cid ] $+ . $+ [ $3 ] ]) {
    return
  }
  elseif ($3 ischan) {
    return
  }
  else {
    echo -nti $+ $calc($indent + 5) 12-15!12- 15Names on $+(00,$3,) $+ 15: $+(15,$4-,)
  }
}
RAW 355:*: {
  if ($halted) return
  haltdef
  if (%sync. [ $+ [ $cid ] $+ . $+ [ $3 ] ]) {
    return
  }
  elseif ($3 ischan) {
    return
  }
  else {
    echo -nti $+ $calc($indent + 5) 12-15!12- 15Names on $+(00,$3,) $+ 15: $+(15,$4-,)
  }
}
RAW 366:*: {
  if ($halted) return
  haltdef
  if ($2 ischan) {
    echo -ti $+ $calc($indent + 5) $2 12-15!12- 14[03Users $+(09,$2,) $+ 14]
    var %i = $nick($2,0), %long = 0, %0 = $nick($2,0)
    while (%i) {
      var %nickname = $nick($2,%i), %i = %i - 1
      if ($len(%nickname) > %long) var %long = $v1
    }
    var %i = 1, %c = 1, %column = $floor($calc(($window($2).dw / $width(*,$window($2).font,$window($2).fontsize,$window($2).fontbold) - $indent - 4) / (%long + 4))), %row = $ceil($calc(%0 / %column))
    while (%c <= %column) {
      var %r = 1, %c = %c + 1
      while (%r <= %row) {
        var %n = %r, %r = %r + 1
        if (%i <= %0) {
          var %prefix = $chr(32), %nick = $nick($2,%i), %i = %i + 1
          if (%nick isowner $2) var %prefix = ~
          elseif (%nick isop $2) var %prefix = @
          elseif (%nick ishelp $2) var %prefix = %
          elseif (%nick isvoice $2) var %prefix = +
          set %names. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ . $+ [ %n ] ] %names. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ . $+ [ %n ] ] $+(14[00,%prefix,15,%nick,,$str( ,$calc(%long - $len(%nick))),14])
        }
      }
    }
    var %n = 1
    while (%n <= %row) {
      echo -t $2 %names. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ . $+ [ %n ] ]
      unset %names. [ $+ [ $cid ] $+ . $+ [ $2 ] $+ . $+ [ %n ] ]
      inc %n
    }
    echo -ti $+ $calc($indent + 5) $2 12-15!12- 00Irssi: $+(00,$2,) $+ 15: 15Total of $+(00,%0,) 15nicks 14[ $+ $+(00,$nick($2,0,o),) 15ops, $+(00,$nick($2,0,h),) 15halfops, $+(00,$nick($2,0,v),) 15voices, $+(00,$nick($2,0,r),) 15normal14]
  }
  else {
    echo -nti $+ $calc($indent + 5) 12-15!12- 15End of /NAMES list
  }
}
RAW 331:*: {
  if ($halted) return
  haltdef
  var %#
  if ($2 ischan) var %# = $v1
  echo -ti $+ $calc($indent + 5) %# 12-15!12- $+(00,$2,) $+ 15: 15No topic set
}
RAW 332:*: {
  if ($halted) return
  haltdef
  var %#
  if ($2 ischan) var %# = $v1
  echo -ti $+ $calc($indent + 5) %# 12-15!12- 15Topic for $+(10,$2,) $+ 15: $+(15,$3-,)
}
RAW 333:*: {
  if ($halted) return
  haltdef
  var %#
  if ($2 ischan) var %# = $v1
  echo -ti $+ $calc($indent + 5) %# 12-15!12- 15Topic set by $+(00,$3,) $+(14[15,$asctime($4),14])
}
RAW 404:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15Unable to message $+(00,$2,)
}
RAW 482:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(00,$2,) 15You're not channel operator
}
RAW 396:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(00,$2,) 15is now your hidden host
}
RAW 451:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15Register first!
}
RAW 441:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 14[05invite14(04 $+ $2 $+ 14)14] $+(15,$3,)
}
RAW 443:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(00,$2,) 15is already on $+(00,$3,)
}
RAW 421:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(15,$2,) 15Unknown command
}
RAW 433:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15Nick $+(00,$2,) 15is already in use
}
RAW 471:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15Cannot join to channel $+(00,$2,) 15(Channel is full)
}
RAW 473:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15Cannot join to channel $+(00,$2,) 15(You must be invited)
}
RAW 474:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15Cannot join to channel $+(00,$2,) 15(You are banned)
}
RAW 475:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15Cannot join to channel $+(00,$2,) 15(You need a key)
}
RAW 477:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15Cannot join to channel $+(00,$2,) 15(Registered only)
}
RAW 401:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15There is no such nick $+(15,$2,)
}
RAW 406:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15There is no such nick $+(15,$2,)
}
RAW 403:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(00,$2,) $+ 15: 15No such channel
}
RAW 251:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15There are $+(15,$4,) 15users and $+(15,$7,) 15invisible on $+(15,$10,) 15servers
}
RAW 252:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(15,$2,) 15operator(s) online
}
RAW 253:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(15,$2,) 15unknown connection(s)
}
RAW 254:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(15,$2,) 15channels formed
}
RAW 255:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15I have $+(15,$4,) 15clients and $+(15,$7,) 15servers
}
RAW 001:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15Welcome to the Internet Relay Network, $+(15,$($+($,$0),2),)
}
RAW 002:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15Your host is $+(15,$left($5,-1),) $+ 15, running version $+(15,$8,)
}
RAW 003:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- 15This server was created $+(15,$6-,)
}
RAW 004:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(15,$2,) $+(15,$3,) $+(15,$4,) $+(15,$5,)
}
RAW 005:*: {
  if ($halted) return
  haltdef
  echo -ti $+ $calc($indent + 5) 12-15!12- $+(15,$deltok($2-,-5-,32),) 15are supported by this server
}
RAW *:*: {
  if ($numeric == 321) || ($numeric == 322) || ($numeric == 323) return
  if ($halted) return
  haltdef
  if ($0 > 1) {
    echo -ti $+ $calc($indent + 5) 12-15!12- $+(15,$2-,)
  }
}
Sign in to comment.
verbat1m   -  Dec 02, 2010

hello spoofing, thank you for update irssi theme, can you show us what is fixed in this version, what is new?

do you remove away feature in this version? please take a look for that suggestion i've told you of shorten nickname eg: --> [ MyNick....] on my channel a lot of user use very long nickname, and looks very bad when i join the channel.

Please let us know what do you have change in theme and what is new. Thank you for update, still my fav theme so far.

 Respond  
blackvenomm666   -  Nov 27, 2010

you unload it and delete it while praying that it didnt mess up your scripts and saying what a p.o.s

 Respond  
Dark|   -  Nov 27, 2010

Spoofing, it dosent work {for me} Only the colors on join and parts and the modes What do i do?

 Respond  
napa182   -  Nov 27, 2010

Spoofing Said:

Teen: about black "on CONNECT" event - this my perfectionism. I'm mIRC geek and try to do everything perfectly, so if I exists on DISCONNECT - I add on CONNECT.

um OCD much?

 Respond  
blackvenomm666   -  Nov 27, 2010

spoofing the on connect event shouldnt be there it has no use and is just taking up space

 Respond  
Spoofing   -  Nov 27, 2010

s/black/blank/

 Respond  
Spoofing   -  Nov 27, 2010

Teen: about black "on CONNECT" event - this my perfectionism. I'm mIRC geek and try to do everything perfectly, so if I exists on DISCONNECT - I add on CONNECT.

 Respond  
Dark|   -  Nov 27, 2010

Screenshot ?

 Respond  
jaytea   -  Nov 27, 2010

the & event prefix works for raw events too :P

 Respond  
_Teen_   -  Nov 27, 2010

look there is an event for nothing

on *:CONNECT: {

}
 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.