[script]
n0=on $*:TEXT:/^[!@.]whois/Si:#:{
n1=  if (%whois) { notice $nick Someone is already being whoised }
n2=  elseif ($2) {
n3=    set %whois $iif($1eft($1,1) == @,msg $chan,notice $nick)
n4=    whois $2
n5=  }
n6=}
n7=raw:319:*:{
n8=  if (%whois) {
n9=    %whois 12 $2 14is currently on channel(s):12 $3-
n10=  }
n11=}