Fix TOUPPER in COUT for Apple][

src/vmsrc/cmd.pla

@@ -349,8 +349,8 @@ asm memxcpy(dst,src,size)#0
         RTS
 end
 asm crout()#0
-        LDA     #$0D
+        LDA     #$8D
-        BNE     +
+        BNE     ++
 end
 //
 // CHAR OUT
@@ -358,12 +358,12 @@ end
 //
 asm cout(c)#0
         LDA     ESTKL,X
-        INX
         BIT     $BF98
         BMI     +
         JSR     TOUPR
 +       ORA     #$80
-        BIT     ROMEN
+        INX
+++      BIT     ROMEN
         JSR     $FDED
         BIT     LCRDEN+LCBNK2
         RTS