Miscellany

raw 313:*: {
  if ($hget(PestInfoWHOIS,$2)) halt
  else halt
}
raw 671:*: {
  if ($hget(PestInfoWHOIS,$2)) halt
  else halt
}
raw 317:*: {
  if ($hget(PestInfoWHOIS,$2)) halt
  else halt
}
raw 335:*: {
  if ($hget(PestInfoWHOIS,$2)) halt
  else halt
}
raw 311:*: { 
  if ($hget(PestInfoWHOIS,$2)) halt
  else halt
}
raw 319:*: {
  if ($hget(PestInfoWHOIS,$2)) {
    hadd PestInfoWHOIS $+($2,Channels) $remove($3-,:)
    halt 
  }
  else halt
}
raw 312:*: {
  if ($hget(PestInfoWHOIS,$2)) halt
  else halt
}
raw 307:*: {
  if ($hget(PestInfoWHOIS,$2)) {
    hadd PestInfoWHOIS $+($2,Nick) 1
  halt }
  else halt
}
raw 536:*: {
  if ($hget(PestInfoWHOIS,$2)) halt
  else halt
}
raw 378:*: {
  if ($hget(PestInfoWHOIS,$2)) halt
  else halt
}
raw 318:*: { 
  if ($hget(PestInfoWHOIS,$2)) {
    var %c = $hget(PestInfoWHOIS,$+($2,Channels)), %tok = $numtok(%c,32), %s = 1
    while (%s <= %tok) {
      var %g = $gettok(%c,%s,32)
      if ((pest isin %g) || (pc isin %g) || (control isin %g)) && (#pestcontrol !isin %g) var %chan = %chan 04 $+ %g $+ 
      else var %chan = %chan 7 $+ %g
      inc %s
    }
    send INFO $2 has $iif(!$hget(PestINFOWHOIS,$+($2,Nick)),not) identified his/her nick, and is on: $chr(91) $+ %chan $+ 06 $+ $chr(93)
    hdel PestInfoWHOIS $+($2,*)
    halt
  }
  else halt
}