Refix ProDOS clock input buffer

src/vmsrc/apple/cmd.pla

@@ -1328,6 +1328,7 @@ end
 // Command line processor
 //
 def docmds#0
+    strcpy(getlnbuf, @cmdln)
     while 1
         if ^getlnbuf
             strcpy(@cmdln, getlnbuf)
@@ -1406,7 +1407,7 @@ syscmdln = @cmdln
 //
 autorun = open(@autorun)
 if autorun
-    ^getlnbuf = read(autorun, getlnbuf + 1, 128)
+    cmdln = read(autorun, @cmdln+1, 81)
     close(0)
 else
     //

src/vmsrc/apple/cmdjit.pla

@@ -1399,6 +1399,7 @@ def docmds#0
     loadmod(jitmod)  // Cannot do this in init code - it will overwrite it!
     xheap    = $0400 // Reset heap to point at low memory
     xheaptop = $A000 // Top below JITC
+    strcpy(getlnbuf, @cmdln)
     while 1
         if ^getlnbuf
             strcpy(@cmdln, getlnbuf)
@@ -1477,7 +1478,7 @@ syscmdln = @cmdln
 //
 autorun = open(@autorun)
 if autorun
-    ^getlnbuf = read(autorun, getlnbuf + 1, 128)
+    cmdln = read(autorun, @cmdln+1, 81)
     close(0)
 else
     //

src/vmsrc/apple/cmdjitstub.s

@@ -8,10 +8,16 @@ LCBNK1  =       $08
 JITCOMP =       $03E2
 JITCODE =       $03E4
 !SOURCE "vmsrc/plvmzp.inc"
+        JMP     CMDMOVE
+_CMDBEGIN   =   *
+!PSEUDOPC   $1000 {
+!SOURCE "vmsrc/apple/cmdjit.a"
+_CMDEND     =   *
+}
 ;*
 ;* MOVE CMD DOWN TO $1000-$2000
 ;*
-        LDA     #<_CMDBEGIN
+CMDMOVE LDA     #<_CMDBEGIN
         STA     SRCL
         LDA     #>_CMDBEGIN
         STA     SRCH
@@ -19,6 +25,7 @@ JITCODE =       $03E4
         STY     DSTL
         LDX     #$10
         STX     DSTH
+        INX
 -       LDA     (SRC),Y
         STA     (DST),Y
         INY
@@ -44,8 +51,3 @@ JITCODE =       $03E4
         TXS
         LDX     #ESTKSZ/2   ; INIT EVAL STACK INDEX
         JMP     $1000
-_CMDBEGIN   =   *
-!PSEUDOPC   $1000 {
-!SOURCE "vmsrc/apple/cmdjit.a"
-_CMDEND     =   *
-}