Untitled

on *:START:{ timestamp -f 00(04(00hh04:00nn04:00ssTT04)00) }
alias stat {
  if ($1 !isreg $2) {
    return $+($iif($1 isop $2,15@,),$iif($1 ishop $2,07%,),$iif($1 isvoice $2,08+,))
  }
}
on ^*:TEXT:*:#:{
  haltdef
  echo -ltm $chan 04( $+ $stat($nick,$chan) $+ 00 $+ $nick $+ 04) $1-
}
on ^*:TEXT:*:?:{
  haltdef
  echo -ltm $nick 04(00 $+ $nick $+ 04) $1-
}
on ^*:ACTION:*:#:{
  haltdef
  echo -ltm $chan 04* $stat($nick,$chan) $+ $nick $1- 
}
on ^*:ACTION:*:?:{
  haltdef
  echo -ltm $nick 04* $nick $1-
}
on ^*:NICK:{
  var %x = 1
  while ($comchan($newnick,%x)) {
    echo -t $comchan($newnick,%x) 04*00*04*00 Nick 04(00 $+ $nick $+ 04/00 $+ $address $+ 04) 00is now known as 04(00 $+ $newnick $+ 04)
    inc %x
  }
  haltdef
}
on ^*:QUIT:{
  var %x = 1
  while ($comchan($nick,%x)) {
    echo -t $comchan($nick,%x) 04*00*04*00 Quit 04(00 $+ $nick $+ 04/00 $+ $address $+ 04) $iif($1,$+(04,$chr(40),00,$1-,04,$chr(41),),)
    inc %x 1  
  }
  haltdef
}
on *:INPUT:#:{
  if (!regex($1,/[+-]/Si)) && (/ != $left($1,1)) && (/me !isin $1) {
    echo -tm $chan 04( $+ $stat($me,$chan) $+ 00 $+ $nick $+ 04) $1-
    .msg $chan $1-
    halt
  }
  elseif ($regex($1,/^[-+]/Si)) && (/me !isin $1) && (/ != $left(1,1)) {
    mode $chan $1-
  }
  elseif (/me isin $1) {
    haltdef    
    echo -tm $chan 04* $stat($me,$chan) $+ $nick $2-
    .describe $chan $2-
  }
}
on *:INPUT:?:{
  if (/ != $left($1,1)) && (/me !isin $1) {
    echo -tm $target 04(00 $+ $nick $+ 04) $1-
    .msg $target $1-
    halt
  }
  elseif (/me isin $1) {
    echo -tm $chan 04* $me $2-
    .describe $target $2-
    halt
  }
}
on ^*:NOTICE:*:?:{
  echo -ta 04*00*04*00 Notice 04(00 $+ $nick $+ 04/00 $+ $address $+ 04) $1-
  haltdef
}
on ^*:JOIN:#:{ 
  echo -t $chan 04*00*04*00 Join 04(00 $+ $nick $+ 04/00 $+ $address $+ 04) 04( $chan )
  haltdef
}
on ^*:PART:#:{
  echo -t $chan 04*00*04*00 Part 04(00 $+ $nick $+ 04/00 $+ $address $+ 04) 04( $chan ) $iif($1-,04- $1- 04-)
  haltdef
}
on ^*:KICK:#:{
  echo -t $chan 04*00*04*00 Kick 04(00 $+ $nick $+ 04/00 $+ $address $+ 04) 04( $+ $knick $+ 04/00 $address $+ 04) from 04( $chan 04) $iif($1-,04- $1- 04-)
  haltdef
}
on ^*:INVITE:#:{
  echo -ta 04*00*04*00 Invite 04(00 $+ $nick $+ 04/00 $+ $address $+ 04) 04( $chan 04)
  haltdef
}
on ^*:RAWMODE:#:{
  echo -t $chan 04*00*04*00 Mode 04(00 $+ $nick $+ 04/00 $+ $address $+ 04) 04( $+ $replace($1,+,04+00,-,04-00) $+ 04) $iif($2-,04( $+ $2- $+ 04))
  haltdef
}
on ^*:USERMODE:{
  echo -ta 04*00*04* User mode 04( $+ $replace($1,+,04+00,-,04-00) $+ 04)
  haltdef
} 
raw 313:*:{
  echo -a $+(04[00,$str($chr(248),2),04]) $5-
  halt
}
raw 312:*:{
  echo -a $+(04[00,$str($chr(248),2),04]) $replace($3,.,04.) $+(04[,$4-,04])
  halt
}
raw 310:*:{
  echo -a $+(04[00,$str($chr(248),2),04]) HelpOp
  halt
}
raw 671:*:{
  echo -a $+(04[00,$str($chr(248),2),04]) SSL Connection
  halt
}
raw 335:*:{
  echo -a $+(04[00,$str($chr(248),2),04]) Bot
  halt
}
raw 378:*:{
  echo -a $+(04[00,$str($chr(248),2),04]) Connection from $6-
  halt
}
raw 317:*:{
  echo -a $+(04[00,$str($chr(248),2),04]) Idle04: $duration($3)
  halt
}
raw 401:*:{
  echo -a - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- -
  echo -a $+(04[00,$str($chr(248),2),04]) No such Nick/Channel 04- $2 $+(04[00,$str($chr(248),2),04])
  halt
} 
raw 311:*:{
  echo -a - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- -
  echo -a $+(04[00,$str($chr(248),2),04]) Whois $2 $+(04[00,$str($chr(248),2),04])
  echo -a $+(04[00,$str($chr(248),2),04]) $+($3,04@00,$4,) 04* $6-
  halt
} 
raw 307:*:{
  echo -a $+(04[00,$str($chr(248),2),04]) Registered 04& Identified
  halt
}
raw 312:*:{
  echo -a $+(04[00,$str($chr(248),2),04]) $3 $+(04[,$4-,04])
  halt
}
raw 318:*:{
  echo -a $+(04[00,$str($chr(248),2),04]) End of Whois $+(04[00,$str($chr(248),2),04])
  echo -a - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 04- - 
  halt
}
raw 301:*:{
  echo -a $+(04[00,$str($chr(248),2),04]) 04[Away Reason04] $3-
  halt
}
raw 319:*:{
  var %line = $3-
  var %xy = 1
  while ($gettok(%line,%xy,32)) {
    var %Thing = $left($gettok(%line,%xy,32),1)
    var %Chans = $addtok(%Chans,$replace(%Thing,@,15@,%,03%,+,06+) $+ $right($gettok(%line,%xy,32),-1),32) 
    inc %xy 1
  }
  echo -a $+(04[00,$str($chr(248),2),04]) %Chans
  halt
}
raw 536:*:{
  echo -a $+(04[00,$str($chr(248),2),04]) 04Filtering 04Messages
  halt
}