on *:join:#rshelp: {
  if (narf* iswm $nick) {
    set %idcheck 1
    set %nick $nick
    .timer 1 5 .whois $nick
  }
}

raw 307:*: {
  if (%idcheck != $null) && ($3-7 == has identified for this nick) {
    set %mode $address(%nick,2)
    unset %idcheck
    unset %nick
  }
}