Forums Scripts & Popups Bug in old script - can't find it

;Nickchange
on ^*:NICK: {
  var %chan = 1
  while ($comchan($newnick, %chan)) {
    /echo -ti2 $ifmatch 10.:Nickchange:. $bold($nick) is now known as  $bold($newnick)
    /inc %chan
  }
  /haltdef
}

;Quit
on ^*:QUIT: {
  var %chan = 1
  while ($comchan($nick, %chan)) {
    /echo -ti2 $ifmatch 12.:Quits:. $bold($nick) ( $+ $address $+ ) ( $+ $1- $+ )
    /inc %chan
  }
  /haltdef
}

;Part
on ^*:PART:#: {
  /echo -ti2 $chan 12.:Parts:. $bold($nick) has parted ( $+ $address $+ )
  /haltdef
}

;Action jemand anderes
on ^*:ACTION:*:#: {
  echo -t $chan 8.:Action:. »» $bold($nick) $1-
  haltdef
}

;Action /me
on ^*:ACTION:*:?: {
  echo -t $nick 8.:Action:. »» $bold($nick) $1-
  haltdef
}

;Channel Join
on ^*:JOIN:#: {
  /echo -ti2 $chan 10.:Joins:. $bold($nick) ( $+ $address $+ )
  /haltdef
}


;Topicchange
on ^*:TOPIC:#: {
  /echo -ti2 $chan 7.:Topic:. $1-
  /echo -ti2 $chan Set by: $bold($nick)
  /haltdef
}

;Mode event
on ^*:MODE:#: {
  /echo -ti2 $chan 14.:Mode:. $bold($nick) changed mode to $1-
  /haltdef
}

;Voice
on ^*:VOICE:#: {
  /echo -ti2 $chan 3.:Voice:. $nick sets +v $bold($vnick)
  /haltdef
}

;Devoice
on ^*:DEVOICE:#: {
  /echo -ti2 $chan 7.:Devoice:. $nick sets -v $bold($vnick)
  /haltdef
}

;Halfop
on ^*:HELP:#: {
  /echo -ti2 $chan 3.:HOP:. $nick sets +h $bold($hnick)
  /haltdef
}

;De Halfop
on ^*:DEHELP:#: {
  /echo -ti2 $chan 7.:DeHOP:. $nick sets -h $bold($hnick)

  /haltdef
}

;Op
on ^*:OP:#: {
  /echo -ti2 $chan 3.:OP:. $nick sets +o $bold($opnick)
  /haltdef
}

;DeOP
on ^*:DEOP:#: {
  /echo -ti2 $chan 7.:DeOP:. $nick sets -o $bold($opnick)
  /haltdef
}

;Kick
on ^*:KICK:#: {
  /echo -ti2 $chan 4.:Kick:. $bold($knick) was kicked by $nick ( $+ $1- $+ )
  /haltdef
}

;Ban
on ^*:BAN:#: {
  /echo -ti2 $chan 4.:Banned:. $bold($bnick) $banmask banned by $nick
  /haltdef
}

;Unban
on ^*:UNBAN:#: {
  /echo -ti2 $chan 3.:Unbanned:. $bold($bnick) $banmask unbanned by $nick
  /haltdef
}

;Notice
on ^*:notice:*:*: {
  if ($nick == operserv) { echo -a $timestamp 7.:Operserv:. $1- | haltdef }
  if ($nick == chanserv) { echo -a $timestamp 7.:Chanserv:. $1- | haltdef }
  if ($nick == nickserv) { echo -a $timestamp 7.:Nickserv:. $1- | haltdef }
  if ($nick == memoserv) { echo -a $timestamp 7.:Memoserv:. $1- | haltdef }
  if ($nick == hostserv) { echo -a $timestamp 7.:Hostserv:. $1- | haltdef }
  if ($nick == botserv) { echo -a $timestamp 7.:Botserv:. $1- | haltdef }
  if ($nick == helpserv) { echo -a $timestamp 7.:Helpserv:. $1- | haltdef }
  if ($nick == nightowl.dyn.ee) { echo -a $timestamp .:Server:. $1- | haltdef }
  if ($+(*,$nick,*) !iswm operservchanservnickservmemoservhostservbotserv) { echo -a $timestamp 7.:Notice:.  $+ $nick $+  $1- | haltdef }
  splay -cw sounds/notice.wav
}

;Servernotice
on ^*:snotice:*:*: {
  if ($nick == operserv) { echo -a $timestamp 7.:Operserv:. $1- | haltdef }
  if ($nick == chanserv) { echo -a $timestamp 7.:Chanserv:. $1- | haltdef }
  if ($nick == nickserv) { echo -a $timestamp 7.:Nickserv:. $1- | haltdef }
  if ($nick == memoserv) { echo -a $timestamp 7.:Memoserv:. $1- | haltdef }
  if ($nick == hostserv) { echo -a $timestamp 7.:Hostserv:. $1- | haltdef }
  if ($nick == botserv) { echo -a $timestamp 7.:Botserv:. Botserv: $1- | haltdef }
  if ($nick == helpserv) { echo -a $timestamp 7.:Helpserv:. $1- | haltdef }
  if ($nick == nightowl.dyn.ee) { echo -a $timestamp .:Server:. $1- | haltdef }
  if ($+(*,$nick,*) !iswm operservchanservnickservmemoservhostservbotserv) { echo -a $timestamp 7.:Notice:.  $+ $nick $+  $1- | haltdef }
}

;Whois
raw 311:*:echo -a $timestamp 4.:Whois:. $2- | haltdef
raw 378:*:echo -a $timestamp 4.:Whois:. $2- | haltdef
raw 307:*:echo -a $timestamp 4.:Whois:. $2- | haltdef
raw 319:*:echo -a $timestamp 4.:Whois:. $2- | haltdef
raw 312:*:echo -a $timestamp 4.:Whois:. $2- | haltdef
raw 301:*:echo -a $timestamp 4.:Away:.  $2- | haltdef
raw 313:*:echo -a $timestamp 4.:Whois:. $2- | haltdef
raw 320:*:echo -a $timestamp 4.:Whois:. $2- | haltdef
raw 317:*: { 
  echo -a $timestamp 4.:Idle Time:. $duration($3) | haltdef
  echo -a $timestamp 4.:Signed On:. $asctime($4) | haltdef
  echo -a $timestamp 4.:Duration:. $duration($calc($ctime - $4)) | haltdef
}
raw 310:*:echo -a $timestamp 4.:Help:. $2- | haltdef
raw 318:*:echo -a $timestamp 4.:Whois:. $2- | haltdef

;Whowas
raw 406:*:echo -a $timestamp 4.:Whowas:. $2- | haltdef
raw 314:*:echo -a $timestamp 4.:Whowas:. $2- | haltdef
raw 312:*:echo -a $timestamp 4.:Whowas:. $2- | haltdef
raw 369:*:echo -a $timestamp 4.:Whowas:. $2- | haltdef

;Who
raw 352:*:echo  $timestamp 4.:Who:. $2- | haltdef

;Topic 32 ist Topic 33 der Setzer
raw 333:*:echo -a $timestamp 4.:Topic:. Set by $3 on $asctime($4) | haltdef
raw 332:*:echo -a $timestamp 4.:Topic:.  $3-  | haltdef

;aliases
alias me echo -ta 8.:Action:. »» $bold($me) $1- | .me $1-
alias bold { return $chr(2) $+ $1- $+ $chr(2) }



; <Nick> common
on ^*:TEXT:*:#:{
  echo -tml # 0«0 $+ $nick(#,$nick).pnick $+ 0» $1-
  haltdef
}

;own Nick 
on ^*:TEXT:*:*:{
  var %nick = $iif($chan,$left($remove($nick($chan,$nick).pnick,$nick),1) $+ $nick,$nick)
  var %window = $iif($chan,$chan,$nick)
  echo -tmi2 %window 0«0 $+ %nick $+ 0» $1-
  haltdef
}

;own nick in query
on *:INPUT:*: {
  if (($left($1,1) == / || $left($1,1) == $readini($mircini,text,commandchar)) && (!$ctrlenter)) return
  .msg $active $1-
  var %nick = $iif($chan,$left($remove($nick($chan,$nick).pnick,$nick),1) $+ $nick,$nick)
  echo $color(own) -atmi2 0«0 $+ %nick $+ 0» $1-
  halt
}

$utfencode($chr(2))

alias bold { return $chr(2) $+ $1- $+ $chr(2) }

alias bold { return $utfencode($chr(2)) $+ $1- $+ $utfencode($chr(2)) }

alias me echo -ta 8.:Action:. »» $bold($me) $1- | .me $1-
alias bold { return $utfencode($chr(2)) $+ $1- $+ $utfencode($chr(2)) }

on ^*:TEXT:*:#:{
  echo -tml # 0«0 $+ $nick(#,$nick).pnick $+ 0» $utfencode($1-)
  haltdef
}

raw 319:*:{ echo -a $timestamp 4.:Whois:. $utfencode($2-) | haltdef }