menu * {
  SAS
  .Change
  ..Nickname:/set %SASNickname $$?="Put your ingame username here."
  ..Rank:/set %SASRank $$?="Put your rank for SAS in here."
  .Edit Colour's
  ..Colour One:/set %SASColour $$?="Change the Colour of Rank,Name & On Duty."
  ..Colour Two:/set %SASColor $$?="Change the Colour of SAS"
}

on *:TEXT:*[IRCPM]* /OFF*:*:{
  if ($bob_getnick($remove($strip($2),:)) == %SASNickname) {
    if ($nick != Robo-Cop && $nick != Robo-Thief) msg #Economy !say %SASColour $+ %SASRank %SASNickname of the %SASColor Special Air Services %SASolour $+ off duty.
  }
}

on *:TEXT:*[IRCPM]* /ON*:*:{
  if ($bob_getnick($remove($strip($2),:)) == %SASNickname) {
    if ($nick != Robo-Cop && $nick != Robo-Thief) msg #Economy !say %SASColour $+ %SASRank %SASNickname of the %SASColor $+ Special Air Services %SASColour $+ on %SASColour $+ duty.
  }
}

alias -l bob_getnick { return $iif($pos($1,$chr(41),0) == 0,$strip($$1),$strip($left($$1,$calc($pos($$1,$chr(40),$pos($$1,$chr(40),0)) -1)))) }