Unnamed

ON *:JOIN:#: {
  writeini nicks.ini $address($nick,2) $nick On
  set -u1 %whois.chan #
  set -u1 %whois.nick Notice Hugo
  .whois $nick
  echo $chan 12Nick:7 $nick 12Has also used the nicks:7 $regsubex($regsubex($str($chr(32) $+ ~,$ini(nicks.ini,$address($nick,2),0)),/~/g,$ini(nicks.ini,$address($nick,2),\n)),/(^~|~$)/gsi,$chr($calc((\n *2-2)+91)))
}
raw *:*: if (%whois.chan) { haltdef | if ($numeric = 319) %whois.nick 12Nick:7 %whois.chan 12Is on:7 $3- }
on $*:TEXT:/^[!@.~]hotmask/Si:#: {
  var %read $readini(hotmask.ini,hotmask,$2),%return $iif($left($1,1) = @,msg #,notice $nick),%x 1
  if (!%read) { %return De nick $2 bestaat niet/heb ik nog niet gezien. | halt }
  %return 12Results found for7 $2 $+ 12:7 $readini(hotmask.ini,hotmask,$2)
  set -u1 %whois.chan $2  
  set -u1 %whois.nick %return
  .whois $2
  while %x <= $ini(nicks.ini,0) {
    var %y 1
    while $ini(nicks.ini,%x,%y) {
      if $v1 == $2 {
        %return 12Results found for7 $2 $+ 12:7 $regsubex($str(~,$ini(nicks.ini,%x,0)),/~/g,$chr(32) $+ $ini(nicks.ini,%x,\n))
        halt
      }
      inc %y
    }
    inc %x
  }
}