From 81a2cdc7dfe8fb2e6e6ebc230454806f31c9df5a Mon Sep 17 00:00:00 2001 From: Bobbi Webber-Manners Date: Fri, 20 Aug 2021 19:11:58 -0400 Subject: [PATCH] Minor updates to OSCLI *RUN/*CAT handling --- applecorn.po | Bin 819200 -> 819200 bytes auxmem.oscli.s | 12 ++++++------ 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/applecorn.po b/applecorn.po index 78b448df84901df32fc06174e6f5b857f51b0ebd..dd0dc10fd35e441742a40007a4a0aee932f5f0cb 100644 GIT binary patch delta 1402 zcmZ8gYfMx}6uxt3?;;?w%A=sAOjB(^kpPm`)|%D`1={PQSjF1ZY?CIER?{Cg#Q2BX zth-ICYoKUG8)>d94+nWH2;E{=#b^y!Da*sx-W_%t)2d0`T?1*Cm)ltuZR0s}bIx}j z-q$gpFvkhmf?VX1Ie;LiMn znl|bAaC?8GWL#PvMo2%~UZh9y8`7ROpu`mmO%-}ag&r(>8#SSkfhz;&kn8ucG3585 zaX|Iv%TE9!ZcB9{Qb@=j4_2)?2vptRv zi$F(Q(p*!g^=ZAU_Y#iZ1Q1?V3exe;tsoJ)u3y6Yw}KqUg{>e-{Bb+DT9KwZ{1DpM zVISPLI%|7KPP{yC_hZ<4u!k>OGQRs8a3=?uRoBxK3cz0Fp(=C>TdY#g@!;3P1Hdsn zAf6o71=*nq$G%fA7e=?5-y}KawIql;8sK~AFsl{BYleSp(dUoR+Rwu-+B``5R2MRN zQ{*)`tr7MwnHpUh%1P}@aHUucJuO0yVX8#wTNsE!Q=?cq4NrnHN8@RD5dah3)dbIQ zm~aLj0C6U7c`-WSB@5JB$b{>f;RLVvp#>gXFwHVqA9Kwksp@T>daV@}O4H^egyFAR z;TvEZcD6#-vM5cdAid`A$Q^SHVt4EkD%F%vN&o*NEx5f6uHw7hKWRB~;HWCJAL)w= z#PkUPJ@SQml>njY9X>*5hh>XQUJ|V;yqILGZf=ZmIK2@jW0M`eBoRq&(=f5aPm+Lk zpXppdo51O+&@s0?wiakOy&XPRIpdDulJ?kb)obTN5g=$*NlP&bPXt}i&^EXIE%c4M zzRKzo>#MDP5q;^lzf9t)t9p5kXHcixp4K91)_~Ze*Q}33n@<%<2+@#{gskJD;zwm( z;~dqdCsdVBxz;|zwKB{VoaLGj{~M7U4o}a9XCfnn@Q5%s(G^GP8mj85%XhyZ62T_a z`o#Nekt=AN@JJNUD6SIM9GXir>8ms^-&-)cn5NUETptYf4^DehX)4XXJX!Crd(;rHOZ;d9tC8aQEMs~3PexQuZJ~_v zECt{0fUg5PUUU{_MEgA*lhpwu^5gYq;m$Rg?7$4V7vd{}09jDJwZ&)Y6@wl@r70lV z_`#V}%Ax`~a!958dh7k+*LPHjRie7Y7{25bBO1bv zPPiA8;T2tQ4;aG7yWo!bC%jF??{dkEM+AqupiVn7TK3v zz~X)x8X6cnrwXJ@WwOb;X-jEALFtBUf$W;Yh1&`@a#%47i?)<(Ecqauw#?zu!gU4N z!YY=}lDJ;Ho$X2R*l07oaHDbL#hoKdM&^&~9X8zJ|E|25$%Y}>$mB1WT*+h`m78(8 t1Fn>kSOM#HyzhW*x*CHhS)9<~)LER|(OaBR7Uw*RGuq;eX>i6~`4@Ipn(hDq delta 1307 zcmZWoeN0Kwm?T&$GDq#sWm7v^9*j&%Ol{r*Tjdq6}8*Ek$Sa{BG{KzjMy- z+?RLnRjUuG)dx)-61Fh5w5Zm5&>*(1z%zxpwLva^GO}R{4z-NaVMxWx-vf7I zK-5dd$Af-2t-eQ?t4x(%I({K=&N&aP&Uv=mDG7+5Y+27-f(KyKu;w|wKy#Q6U`ro7 ziaNwDhMiUZX^6VkC3L+TTB73%{0y-poiB+i#%V@4m&*7uf(6MlarPv=a(s{(S8kT8 zXCCoKAjXHKmti-kvl=hM>j3ER+x>8W(zpTG3=}$F{Snmd<73Do(&3&j;eA?haS*n| zfIHdZjA)PKlgVwGdU^g3o|zY#W01OsPlR$WLoN<(D)aNL(^W(Q%LZ zO@8j*kpXPJ0uRxz{a{1e*?gWb=FS;~Up~Y5WoRWht@iT*S)yA=Oz^c>osW+qYFfS3fiTJDuJ^{J5MLb}FZzKfWcSVVP-N4XhZRj(%X;)X!jnmEW(G#0)IkmJ0 zZoR~FEf6MKZawrQshGbFO?ptZ+w=lD=k9IOudu!C`c)Ra=Qi!*742=)G)FVY;x?rX zLXY0h4oYyV874N>`BXd7ivLLu|3{h^lCD#!M}MDv*fB8_ey|-5u!a@F@(dD!D)g{* zG;Q72*3-^Q8uqZEIL{cEt`+vK$i>>%Ra;)UAQPe~Tx4@UO7Cf5Gt9FlOqj$CE_ddT#N`I)o z5NW*cWbLp2T7^ythG15Gt_C|Tun3G|#W2i@TJu^q+WjiDhMymXCqX{$8iwh~IwFV> zehJ@B1bS}0tD$T41razMUL1yMpu)8yury&p=>NPxMwm91q^d&am!v|A*fIi7gF3u# z6rKW$xN{V~9^LKhKk^E-?A>SxZ;V29)0mF{b0BRV>3kJcl_e#WujVs+!wxS!QF@Hh54UMqRr#^<>QK66hgX)qSdz~aibY}y z#r4~Vyh&c8U>3%HFuKxDx>8-yuG3ECB7KxxjmRk-+*=~|zQ{F;oKfJ+IK>L{WGP~~ kIOemayWo&SYlB)FouyivOlynK+9I{KD6LK2XWMo2FVUl2oB#j- diff --git a/auxmem.oscli.s b/auxmem.oscli.s index 28ad10c..fbe36fc 100644 --- a/auxmem.oscli.s +++ b/auxmem.oscli.s @@ -183,6 +183,7 @@ STARHELP LDA #<:MSG LDA #<:MSG2 LDY #>:MSG2 JSR PRSTR +* TODO: Pass on to filing system RTS :MSG DB $0D ASC 'Applecorn MOS v0.01' @@ -193,7 +194,8 @@ STARHELP LDA #<:MSG STARQUIT >>> XF2MAIN,QUIT * Handle *CAT / *. command (list directory) -STARCAT JMP FSCCAT +STARCAT LDA #$05 + JMP JUMPFSCV ; Pass to filing system * Consume spaces in command line. Treat " as space! * Return C set if no space found, C clear otherwise @@ -388,16 +390,14 @@ STARSAVE JSR CLRCB * Handle *RUN command * On entry, ZP1 points to command line -STARRUN JSR CLRCB +STARRUN LDA #$04 +JUMPFSCV PHA JSR EATSPC ; Eat leading space - BCS SRERR JSR ADDZP1Y ; Advance ZP1 LDX ZP1+0 LDY ZP1+1 - LDA #$04 + PLA CALLFSCV JMP (FSCV) ; Hand on to filing system -SRERR JSR BEEP - RTS * Clear OSFILE control block to zeros CLRCB LDA #$00