Miscellany

on *:JOIN:#rip:{
  if ($istok(%checkingyukno,$nick,32)) { set %checkingyukno $remove(%checkingyukno,$nick) | ban -ku60 please don't hop in this room to avoid being caught leaking (1min) }
  set %checkingyukno %checkingyukno $nick
  set %chan $chan
  whois $nick
}
raw *:*:{ 
  if ($istok(%checkingyukno,$2,32)) {
    haltdef
    if ($numeric == 319) {
      var %num = $numtok($3-,32)
      msg %chan $2 is currently on %num $iif(%num > 1,channels,channel) and $iif(%num > 1,they,it) $iif(%num > 1,are,is) $3-
    }
    if ($numeric == 318) set %checkingyukno $remove(%checkingyukno,$2)
  }
}