just load it into ur remotes and whois anyone
note: i tried this on IrCQ-net and donno abt other network maybe on specific networks u will find missing raws...plz let me know if so

RAW 310:*: { halt }
RAW 307:*: { halt }
RAW 312:*: { halt }
RAW 313:*: { halt }
RAW 319:*: {
  echo -a 7 $+ $2 14Is On Channels 4: 14=(7 $+ $replace($3-,^,4^7,*,4*7,@,4@7,%,4%7,+,4+7) $+ 14)=  
  halt
}
RAW 301:*: {
  echo -a 7 $+ $2 14Is Away Reason 4:7 14=(7 $+ $3- $+ 14)= 
  halt
}
RAW 311:*: {
  set -u1 %x 1
  echo -a 4==14=============7=14=========7=14=========4Whois Report14=========7=14=============7=14===========4==
  echo -a 7 $+ $2 14Is 4:14 =(7 $+ $mid($gettok($2-,2,42),2,99) $+ 14)=
  echo -a 7 $+ $2  $+ 14 Address Is 4:14 =(7 $+ $mid($address($2,1),4,99) $+ 14)=
  halt
}
RAW 317:*: { 
  echo -a 7 $+ $2 14Has Signed on 4:14 =(4   $replace($duration($calc($ctime - $4)),wk,7 Week4,min,7 Minute4,sec,7 Secound4,day,7 Day4,hr,7 Hour4) 14)=
  echo -a 7 $+ $2 14Has been idle for 4:14 =(4 $replace($duration($3),wk,7 Week4,min,7 Minute4,sec,7 Secound4,day,7 Day4,hr,7 Hour4) 14)=
  halt
}
RAW 318:*: if (%x) { 
  echo -a 4==14============7=14=========7=14=======4End Of Whois Report14=======7=14=======7=14===============4== 
  halt 
} 
else { halt }