From 7bfae9c0b0f3a4bfb78eae4f89079ec17259e087 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?R=C3=A9my=20GIBERT?= Date: Wed, 22 Feb 2017 08:31:16 +0100 Subject: [PATCH] Kernel version 0.9 : CP/MV/RM.... --- A2OSX.BOOT.po | Bin 143360 -> 143360 bytes A2OSX.SRC.po | Bin 819200 -> 819200 bytes BIN/X.CPMV.S.txt | 28 +++++++++++++++++----------- README.md | 5 ++++- SYS/KM.NSC.S.txt | 22 +++++++++++----------- 5 files changed, 32 insertions(+), 23 deletions(-) diff --git a/A2OSX.BOOT.po b/A2OSX.BOOT.po index 92f81f78bf63e5ec82de4c91c60966e98ea56710..a081e5ce2dc6755bde8a5eb204d425b465336392 100644 GIT binary patch delta 653 zcmZ`$L1+^}6rCT_*tE7rXe1J$liAr_ng&r62^7*K6cQnzr&$@S8w+{04fg5B1@%*2wXgpu zsP%%%;`0#f$|_&73e)DnKYCj+bBiSRnxh8U>Zv4_{&5Z?hj&Q6)2 zj(-bT{U!?FDaje1*^mQTr(u{wBi=q?OL!$@VNUQPi6hfx#2lq5Nq4tXHu_7^u$be) z3b8;FsK)eV7+`Nrh*h6~i?vJ$vIke8_YOb1NgK%$y|*9unfyMg6-3A0KSbRhK`r0jg0Ge4v_TAl5nHOk5lFG;H8^%~dM+^=FQ(YX z8mQjxc4lkTM7a_6s|I1Oubz^Ol2B))4%c9v&DCKnIHc%%ToP~J)xiRq;c^V7i(`}x zRv<}|G@zx;-yQTuR5NlB0~IG}r%eZ~cvNQT6*vhqWxE+=-z$)E4anu`)+=Vc05|M1 oy9!F*uB-{W&Yud0RSSAp-z;2o6MR`ITknpqU3mj}sIJ4UKM5@J!~g&Q delta 602 zcmZXQL1+^}6o&V$P100bQfM*QLT7g;I}n4hv_epbNl~Z}Eb5^>g{cw{ytGl!o5AWq zs9}=`gIHl$lGrIp*gzp7O09?3f=KZq6fB-R${qv{7Ik+Ey*LaEZ~pK7@8=c1^%k7F z4yie~-AT{EhnYmyACugpqYc#6wzQo7OYbKdiIQ<5N#+8Q-ac6*+h9+u8quyDU`s5pj>t8&tAQ&8PBMz+wZ;K z0q$={&8N-?w9D34;bc&#C=judT&ryS#O#=W(C~95lTb3Z6f~$?M|rfZhK`^l8y7&X zepjpkA%)Sb=Gtd!kudcD!l9koK4p)gHN_g`Dq7OGBxEz`PMX!M;2}#7wDp z4SSdYwD<=z+Je)NW2F|{hyBXJyN)l$6|~3fI_UCVq%yOq)h%Zy=UzfuzNlBM&C$-? P*YFrBAvs)s19$!bhtJ!3 diff --git a/A2OSX.SRC.po b/A2OSX.SRC.po index c4d378744866e001512806d67f0aa065c07daf04..b1bc30ae8208c7999fcfbfcd7133f1a2bd1222f9 100644 GIT binary patch delta 2919 zcmZuzX>=3U6~51tF(b_w%8rFp)_JhJuM!qhKRN!Vr^$MA$=YA`3+tTAZb} zViJ_t{|_k3^nxZ8LHI8$I5c+=H2+WEZRh;b|1o55v7{^m-#7XpJLlc< z?f8!H9mDt@F{T4quwRKJN~bB2XlHa?R7oegQ{m{!R`3!$+FC4>!f7Sdy;g~++1Nl< z1*r!28M>XL?vzm@PcRvMx4=1Np_Z6g3R8%g)v5r7Y>2f zu8;i9=3XF)#Ar`;r&l9cULpp_b!=lpxib7z+;-RN!4;g-DNmb#)L|16`a> z+%QYrsdS|~lt?@U9v9i$+VARevot+cnociaRFj2)oMw`B`)H)0lD|Jv)Iyn}n#^eZ zAU95kKb*1Y(~KoAbOydb9&valbnNhv3}D|!Ffyy+$T`NE^?wSh9sZBFQG*^iRi)E zHI6jD6#sLyAws$*9S(MOmSTy#ngekeDeIVDjwbSt%iTy9dd>dGD~M6lDmBHgM8g^F zCb{L5+^WeE6HX>ZAJTFMCp-0o%B;eZ9XCfzR{G#duD&Kp^apL6lf)RY4oYmbMQoUl zQ(~t~B({bUGv|ibiKmfhsJjD%E@I^SGa#>>Kr>M-6IZelG@RX5RD&R#iU8RR2q~XVjg!38M@1#N1I=um9I#A zG4Ms2s>V_&Pq^Bq!G!?|5@v8CX zW2~tcSm{}na$l%_c@pOw<}bpdx}UMk=PC2RFh+7Gzxr)>;m~>+GSHl zR2-==$fMPY;CCYIv`f%1u#ZlAe{&!Jo=Y(!yaU;MrOvg{Tpzf1nYq}7%Pi5%x?FGR z;AW<;u(CRGQ@DO!ky?z&o&N>77UV0-bsC=uS55H#B{BAFY9DJ~&HdxA;>Zl3KYsYj z$gU-ej={y_s>L-0mw?NL%Z^JNTe3)cO&&fnmdcTTg(T~Dv&hz$BJHulB4LpCR+mM% z+WJtY?PE^m0_xStdiNhyE4+(_b6T`e0Kq^|{Hld(tYX=&CDv;~xX#+}TwfmZ<^_g6 zm(Xz{+(5@l9>g1&ELy>F6PB~$R!pn`@n$@w!fgZo7OIR}P2tj8xhV+F+m3d?2M+MJ zqnYo(-r0|Nhwos}%Rso3&Y(O80xkH3Z^Xp z!hOWZ6tf`SPY__AIn*AoW*Pq=hP6LLm6*@&0O4Vb=c0c+!tTIFt!gwrre}hZ&-S?W zuYXJ*4N7ySJV6ZlsL}r%k{mVeC-vuplB?k<=K8c{+x(3F_aI)t&(fLRNS-r|{0EuQ zAXg# z;Z+vvw+#9<{cuQfIeu4NH1F%?YoT6xgW=-~%KfH=y!x$bWSr;1+YI>~3t4`bY9^A1 zu8*!=cZDgh_n5`+EsN=Y&FEz$Jj*!@n24ubK`zkT#JRd-y}@KSo&@%v5gX=T1@u1*T5ul9_Hu4tY8B`9GF+K?|sCuM$s#@bAe|hE_^g$5NKOiAbW%&`9DqbCR%~ zrHb^Ekr-(Yr%Gb(a57vvrx)@W;Ur6$OS6zz?Qag&;lybT5<$l*FIJ|jL~HSDQ?`J# zlulYdLp)0L*$cP&I5Utae0Pp2*E2H}hO=ab zmSQw?9lO3Rn7B86N)N`+&01mkT|FLVo$ zm`JL{LodRH*2Pkym0+qKj~25;PSmt?yj`;s3HC{pA>ULp-gc2o%1PL{n94zJA_c>Q z0*{iGm!wrIr`1Q-k+kYF)4H6b)t2HMKrh24Oal^Q9bwQlW~A3NRvSj28qO8zPVi1( z{1_k-24*>~29JkBfM}#I0frFb9D-ajcS4r0t~sM*D=>+il}hkdq8G?sB}cXutzQqi zma#6(Y9x{|q`3m6C(o6N9@nIGmq&nhB$8Y3xU*tdkr?dup@ zTw`aNh-&ueH>mh{1AMq0*lR}GWsD$^?~bQzjScmjClKH~J}rJIF>I~v&6SBF0AoV)Aflo)pXB{Nnw|lGPL%n$*qicCV5~t zjTDQ%7NcixRvK5#6@$K4<>2p0x}1=;MVcQ2KwpQpf$n~@TLG7lH^AsQ`UZ@Y z+lTk;d&q3I71`}z?w9ja-5{Q5JD5|#*?E*+n*!!WSpw4sgdMfiH2t8=WOT3_w+bg} zDMQ&!Xg}z-rIQ>v%Qt7(-y+$EwqrIqw<`9sKDD>W#+VuCZqJbCPFbG0yA&rmIndoP z5@Pq->f!1->gOL=>r^0rHu(O>ZF9>f;zi>%39rd`F?eO+rNN6Go?EUxrOQg+Q@e%k zrCM{}5DrgH-JNp!S$84%W@q-uFU&&vNJy86Cm!EQjytoL9QzosqS8SJ==b4%sct6U zGGO=P-FP^~RRVoC>F)taUF2SLg5e%)Z&Ep6O#*!{HnSWYDm<3ocW6W$%zb1=#6WvL zd4-2hB@Xw%XicNZ&S(!0x(7!pq-2?WSkZh@r5%`ukQh!xfPENYfIZUCc|^XD=tpr_ z&0|DQvB+j%9>?+KlOIng7uJ(lhB!U-8u_tw}l z=f5po`cvLf@Ntf&cV*SYSCALL MKDirYA jsr CS.RUN.PrintErr - bcs .9 + bcc .1 + cmp #MLI.ERR.DUPFILE + beq .1 .FIN - >LDYA ZPPtr1 +.1 >LDYA ZPPtr1 jmp EnterSubDirYA .8 clc @@ -294,11 +296,10 @@ CS.RUN.PrintFile *-------------------------------------- .DO X.COPY.TO.DEST=1 *-------------------------------------- -*-------------------------------------- CS.RUN.CopyStart - ldy #S.STAT.P.AUXTYPE + ldy #S.STAT.P.AUXTYPE+1 >PUSHB (ZPPtr2),y - iny + dey >PUSHB (ZPPtr2),y ldy #S.STAT.P.TYPE >PUSHB (ZPPtr2),y @@ -314,9 +315,9 @@ CS.RUN.CopyStart ldy #hSrcFile sta (pData),y - ldy #S.STAT.P.AUXTYPE + ldy #S.STAT.P.AUXTYPE+1 >PUSHB (ZPPtr2),y - iny + dey >PUSHB (ZPPtr2),y ldy #S.STAT.P.TYPE >PUSHB (ZPPtr2),y @@ -328,7 +329,7 @@ CS.RUN.CopyStart >SYSCALL FOpen bcc .1 - + >DEBUG pha ldy #hSrcFile lda (pData),y @@ -361,8 +362,10 @@ CS.RUN.Copy stz .90+1 >PUSHB (pData),y >SYSCALL FRead bcc .1 - eor #MLI.ERR.EOF - beq .9 + cmp #MLI.ERR.EOF + bne .9 + lda #0 + bra .9 .1 >STYA ZPPtr2 @@ -373,6 +376,9 @@ CS.RUN.Copy stz .90+1 >SYSCALL FWrite bcs .9 + lda .90+1 + >SYSCALL FreeMemA + lda #'.' >SYSCALL PutCA rts @@ -382,7 +388,7 @@ CS.RUN.Copy stz .90+1 .90 lda #$00 beq CS.RUN.CopyEnd - >SYSCALL FreeMemA + >SYSCALL FreeMemA *-------------------------------------- CS.RUN.CopyEnd ldy #hDstFile lda (pData),y diff --git a/README.md b/README.md index e9937eb6..8264780b 100644 --- a/README.md +++ b/README.md @@ -85,7 +85,8 @@ In Progress : moving TCPIP to socket API ## Internal Shell commands: | Name | Status | Comment | | ---- | ------ | ------- | -| CD/PWD | Working | Improved syntax : now, 'CD ../BIN' works | +| CD | Working | Improved syntax : now, 'CD ../BIN' works | +| PWD | Working | | | DATE | Working | | | ECHO | Working | \b,\e,\f,\n,\\ and \% supported | | EXIT | Working | | @@ -120,6 +121,7 @@ note : '$VAR' does NOT expand Variable | PIC.DRV | In Progress | Apple "Parallel Interface Card" Driver, renamed from PPIC.DRV | 0.8 | | Mouse.DRV | Working | Apple Mouse Card,//c Mouse Port | 0.9 | | DHGR.DRV | In Progress | except bitblt... | 0.8 | +| ---- | ------ | ------- | ----- | | Uthernet.DRV | Working | | 0.9 | | Uthernet2.DRV | Working | | 0.9 | | Uther2.AI.DRV | In Progress | With ARP/IP Offloading | 0.8 | @@ -148,6 +150,7 @@ note : '$VAR' does NOT expand Variable | | | -S : Suppress repeated empty output lines | | | EDIT | Working | still missing : find/replace | 0.9 | | NSCUTIL | Working | Tool for setting time in NSC/DL1216E | 0.9 | +| ---- | ------ | ------- | ----- | | ARP | Working | dump ARP cache, setup a static ARP entry | 0.9 | | PING | Working | | 0.9 | | DNSINFO | Working | dump DNS cache, setup a static DNS entry | 0.9 | diff --git a/SYS/KM.NSC.S.txt b/SYS/KM.NSC.S.txt index 1f9cfcc9..5b9e2679 100644 --- a/SYS/KM.NSC.S.txt +++ b/SYS/KM.NSC.S.txt @@ -211,36 +211,36 @@ NSCDRV php lda $C304 Reset DS1216E comparison register with READ A2=1 ldy #7 Read 8 bytes... - + NSCDRV.1 NSCDRV.R1 lda DS1216E.PATTERN,y phy ldy #8 ....of 8 bits - + NSCDRV.2 ldx #0 lsr bcc NSCDRV.21 inx - + NSCDRV.21 bit $C300,x Write Pattern bit in A0, with A2=0 dey bne NSCDRV.2 - + ply dey bpl NSCDRV.1 - + ldx #7 - + NSCDRV.4 ldy #8 NSCDRV.5 lda $C304 Read Byte... - + lsr NSCDRV.R2 ror DS1216E.DATA,x - + dey bne NSCDRV.5 - + NSCDRV.R3 lda DS1216E.DATA,x pha lsr @@ -272,7 +272,7 @@ NSCDRV.R6 lda DS1216E.DATA+5 Get mm NSCDRV.R7 lda DS1216E.DATA+1 Get MM asl - asl + asl asl asl asl @@ -281,7 +281,7 @@ NSCDRV.R8 ora DS1216E.DATA+2 Get DD NSCDRV.R9 lda DS1216E.DATA Get YY rol sta DATELO+1 - + plp rts *--------------------------------------