Forums Scripts & Popups What's wrong with this?

menu menubar {
  channel
  .{=Away=} --- ( $+ %Away $+ )
  ..Set Away:set %Away AWAY | write Reason.txt $?="Reason for being gone" | write Reason.txt $me | .timer1999 0 300 /me is not currently here, reason being:13 $read(Reason.txt, 1)  | ame Is Away, Reason:13 $read(Reason.txt, 1)  | echo turning notify window on... | load -rs NoticeW.txt | window -an @Notice | load -rs awayON.txt | nick $me $+ { $+ $read(Reason.txt, 1)
    ..Set Here:set %Away HERE | .timer1999 off | nick $read(Reason.txt, 2) | ame is Back! Reason for being away:13 $read(Reason.txt, 1) | unload -rs NoticeW.txt | close -@ | window -an @Join | unload -rs AwayON.txt | write -c Reason.txt
  } 

  menu menubar {
    channel
    .ViewPic : WINDOW -pdo @ $+ $?="Enter window name" 100 100 761 419 | DRAWPIC -s @ $+ $?="Enter window name" 1 1 750 400 $?="Enter file path" $crlf $+ "NOTE: this path must be leading FROM the Mirc directory"
  }

  menu menubar { 
    Accessories 
    .{=PVMSG=} ---- ( $+ %PVMSG $+ )
    ..Private Messages ON:set %PVMSG ENABLED | .timer1999 off | echo Private Messages are ENABLED
    ..Private Messages OFF:set %PVMSG HALTED | .timer1999 0 1 /close -m | echo Private Messages are DISABLED
  }

menu menubar,channel {
  {=Away=}	( $+ $iif(%Away,Away,Here) $+ )
  .$iif(!%away,Set Away):{
    set %away $$input(Reason for being gone,e)
    .timer1999 0 300 ame is not currently here, reason being:13 %away
    ame Is Away, Reason:13 %away
    .load -rs NoticeW.txt | .load -rs awayON.txt
    window -an @Notice | nick $+($me,$chr(123),%away,$chr(125))
  }
  .$iif(%away,Set Back):{
    .timer1999 off
    nick $gettok($me,1,123)
    ame is Back! Reason for being away:13 %away
    .unload -rs NoticeW.txt | .unload -rs AwayON.txt
    unset %Away | close -@ | window -an @Join
  }
  -
  ViewPic:var %a = @Picview,%b = $+(",$$sfile(Select an image),"),%c = $pic(%b).width $pic(%b).height | WINDOW -pdo %a 100 100 %c | DRAWPIC -c %a 0 0 %b
  -
  {=PVMSG=}	( $+ $group(#PVMSG).status $+ )
  .Private Messages $iif($group(#PVMSG).status == on,Off,On):{
    $iif($group(#PVMSG).status == on,.disable,.enable) #PVMSG
    echo -at Private Messages are $iif($group(#PVMSG).status == on,DISABLED,ENABLED)
  }
}
#PVMSG off
on *^:open:?:halt
#PVMSG end