From fe5e44dc5a22099d08c6b600ad57ac05bbd69a3d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?R=C3=A9my=20GIBERT?= Date: Mon, 24 Oct 2016 17:54:43 +0200 Subject: [PATCH] Kernel version 0.8 : BUGFIX in CD: not processing .. correctly, missing ending / when changing to another volume. BUGFIX in LS:File count missing one. Additional Kernel API Documentation LIBSTR deleted, now Kernel API --- A2OSX.BOOT.po | Bin 143360 -> 143360 bytes A2OSX.DEV.po | Bin 143360 -> 143360 bytes A2OSX.SRC.po | Bin 819200 -> 819200 bytes A2osX.S.QC.txt | 14 +- A2osX.S.txt | 34 +- BIN/ARP.S.txt | 28 +- BIN/ASM.S.DIR.txt | 4 +- BIN/ASM.S.FIO.txt | 30 +- BIN/ASM.S.SRC.txt | 16 +- BIN/ASM.S.SYM.txt | 8 +- BIN/ASM.S.txt | 44 +-- BIN/CHTYP.S.txt | 46 +-- BIN/CP.S.txt | 72 ++-- BIN/DEVDUMP.S.txt | 14 +- BIN/DNSINFO.S.txt | 26 +- BIN/EDIT.S.BUF.txt | 16 +- BIN/EDIT.S.CTRL.txt | 8 +- BIN/EDIT.S.SCRN.txt | 34 +- BIN/EDIT.S.txt | 118 +++--- BIN/IPCONFIG.S.txt | 86 ++--- BIN/LS.S.txt | 72 ++-- BIN/LSDEV.S.txt | 8 +- BIN/MD.S.txt | 10 +- BIN/MEM.S.txt | 26 +- BIN/MEMDUMP.S.txt | 44 +-- BIN/NETSTAT.S.txt | 48 +-- BIN/NFSMOUNT.S.txt | 10 +- BIN/NSCUTIL.S.txt | 44 +-- BIN/PING.S.txt | 44 +-- BIN/PS.S.txt | 10 +- BIN/RM.S.txt | 40 +- BIN/RPCDUMP.S.txt | 44 +-- BIN/X.CPLSMVRM.S.txt | 24 +- DRV/CONSOLE.DRV.S.txt | 10 +- DRV/DHGR.DRV.S.txt | 6 +- DRV/LANCEGS.DRV.S.txt | 18 +- DRV/MOUSE.DRV.S.txt | 14 +- DRV/PIC.DRV.S.txt | 14 +- DRV/SSC.DRV.S.txt | 14 +- DRV/SSC.I.DRV.S.txt | 14 +- DRV/UTHER2.AI.DRV.S.txt | 18 +- DRV/UTHERNET.DRV.S.txt | 16 +- DRV/UTHERNET2.DRV.S.txt | 18 +- INC/A2osX.I.txt | 3 +- INC/APPLESOFT.I.txt | 2 +- INC/IO.I.txt | 2 +- INC/LIBCRYPT.I.txt | 3 +- INC/LIBGFX.I.txt | 3 +- INC/LIBSTR.I.txt | 23 -- INC/LIBTCPIP.I.txt | 2 +- INC/MACROS.I.txt | 8 +- INC/MONITOR.I.txt | 2 +- INC/PRODOS.I.txt | 2 +- INC/ZP.I.txt | 2 +- LIB/LIBCRYPT.S.txt | 12 +- LIB/LIBGFX.S.txt | 2 +- LIB/LIBSTR.S.txt | 785 ---------------------------------------- LIB/LIBTCPIP.S.CFG.txt | 2 +- LIB/LIBTCPIP.S.DNS.txt | 10 +- LIB/LIBTCPIP.S.FRM.txt | 10 +- LIB/LIBTCPIP.S.TCP.txt | 4 +- README.md | 2 +- SBIN/DESKTOP.S.txt | 16 +- SBIN/DHCPCLNT.S.txt | 34 +- SBIN/GETTY.S.txt | 26 +- SBIN/HTTPD.S.txt | 34 +- SBIN/INSDRV.S.txt | 16 +- SBIN/LOGIN.S.txt | 24 +- SBIN/SHELL.S.CMD.txt | 203 ++++++----- SBIN/SHELL.S.HIS.txt | 10 +- SBIN/SHELL.S.TXT.txt | 8 +- SBIN/SHELL.S.txt | 68 ++-- SBIN/TCPIP.S.CFG.txt | 36 +- SBIN/TCPIP.S.txt | 44 +-- SBIN/TELNETD.S.txt | 6 +- SYS/KERNEL.S.ARG.txt | 24 +- SYS/KERNEL.S.BIN.txt | 6 +- SYS/KERNEL.S.CIO.txt | 60 +-- SYS/KERNEL.S.D01.txt | 2 +- SYS/KERNEL.S.DAT.txt | 4 +- SYS/KERNEL.S.DIR.txt | 68 ++-- SYS/KERNEL.S.DRV.txt | 2 +- SYS/KERNEL.S.FILE.txt | 153 ++++---- SYS/KERNEL.S.FIO.txt | 8 +- SYS/KERNEL.S.INIT2.txt | 32 +- SYS/KERNEL.S.INIT3.txt | 72 ++-- SYS/KERNEL.S.LIB.txt | 2 +- SYS/KERNEL.S.MEM.txt | 2 +- SYS/KERNEL.S.PS.txt | 2 +- SYS/KERNEL.S.RUN.txt | 4 +- SYS/KERNEL.S.STR.txt | 123 ++++--- SYS/KERNEL.S.txt | 8 +- SYS/KM.NSC.S.txt | 8 +- SYS/KM.RAMWORKS.S.txt | 16 +- _Docs/KERNEL.md | 32 ++ 95 files changed, 1230 insertions(+), 1966 deletions(-) delete mode 100644 INC/LIBSTR.I.txt delete mode 100644 LIB/LIBSTR.S.txt diff --git a/A2OSX.BOOT.po b/A2OSX.BOOT.po index b6a67bdfd6ae0b7e6c057faf8a6a91d9a9fddcdb..38639aa3678cb1ecf7492f99c2b39e1e0e4445e6 100644 GIT binary patch delta 1848 zcmYjSeQXow8GoO%;~3(6K%ra%MK6i5b2bHvVDct9LSS9mMcXK$wYCM_|!R*n#sCC6ni=5548r3uy%ih*eY;Enz+XH&3rD=Al$wZx}jw6Inh-A z@w|_p=l49n-}B!4-f>wYmoM z0x(?lO9`N(E=vKN^%s8)3^ecunh(L**zcM@q+pKU*7|Qa=r7E`7UO}mkmU040sr0% z>?%H(#<4rXjUZsdH77p654U*;ut)(K4)S~29jg~oUaGJU3WYD0F?0S?3Rp8u8O5x4k!Bm4=UuJv!s!uN__PhF%)aSt^> zJ<{E54VF4(KCD+7KucbP;N}MfN01<_WX3Znj;SA)H99qs@ zYLg$g%3`}bg9db$TIK%JauA5ZkDKKvrIwE}YC=^D5?OU6Z|~f2s6}2PO-e~kcWYFy zR%#F_58s*Mb|tcskvMp2iep4F?+kd`mYRFpfIsGd|vq~dQ=oDR=VUDVU= z7Cz9qeoc!!h%~`Org%yY)!e*~MgCUjP7~RRtz-|9(tmI*U);6U@KGwFzdFp@y0)%9 zo0>2O3w>r{xBJY&P53O|*kv*1HcpQ_{Mj{aUPy)sXqK~2;YBGY3LXQr2pH#&9 z%vfDU_$fx$!W%_b2B(&XSb=@0H=r9tBp4zMX=k;Tp1-$rZUd%B1+B3*DwB~4jrW)$ z?!UWCDE{E?5~X-t$%X0^(XD8qdJRRp>lCj`88s4|yI%1&@R?uM=hrK5ELMwk{ExbK z`#@>$H--q|~$AIEJ}wKDd0I_q#9Kh11$*obHd?d-k5I z41jJ9uGmg!@eq1%<}+DQ_}(gV$3LHy}q*2ev#pS6i`yWk@|#8>gy zcHFb?T$O;LRciSSmXV4^udvKlRg%FY&2{a-)6*BL98Fa{RRhYSecY5Ypo1$c|G;wr zLj3vj?*SW|IlpdA41T)^5EcT47>p3l6dg5gbV|nax%Wpk?!gc6=bH)`EAtBT4pYlW z6)eNrSbM8|C$pFNbA{bZTe>Z4t%cSC>)V_6Z7#KZVnIkaNi-%vT@wVMiMaUHig145 zTySx)jCSIet-Nbu{|nBFuoeGvQ?yLI9q>fTBprU8|Kr3t`{_CtwhmI(sOg{PuCAwR$sPnHwaF`=oIQSE3*76 zvzu0aj41JhEwN24=MT@8uORorinSB(n|-l6xa|_6GKf+Q!$8d>YK?=t9XHPI`6)QNxJ(l9cKvr@6oPBZ`Y< zL9HNc_8gmN%Pm1Fcjb`JEbPRn=vuf;4A~RKIq{tr*TuOmJ9XHOe|<=dy!<%tnwZ!w0lR(9xiTLrwW&nER*Fb$zvXb)OZGji#3ts?5#c3Z*5C0F^`ZM+b delta 794 zcmX9*Z%9*76o2Qgt(9wuOCVMzJMtUSS z;DLG^-rnw)skC3K8{-+(dOycAZ~Uq$q82Z0#M9G#e(yPd*x&u}^Y+k$AQ>RXi&K%i z&>=>nEx>2KM3>tjn7&;CSu%l=?k_?5zInBfGDj)hcHuCd!b7!RJ!Zzrc$o$!<>48g z<+(##CF5WQJ)HB8OQ4JN4E>ef;&QtFy4q=qlFt%_dC+VLkk1i_D?G|VsXbA;?yw7Z zmKKA0lUQ~!zkj6_4n{MMs=q^?N4v$n zBS)9#+;(BIOf}-L4k}e-7f4T2=Gn**x+2cin`D7Z6y#HSO!DH|ncB)^Gn-$pnv-rk zK;zJ5$(Um08=@3lMe8@~)S9t$VqY&X1J1Hbl2^89#cyW1 zX3zp97_$&Q>?C$SyBN0#Npc5FrOmffa}UMsqM5) z>8RD%P)Y+yc`a+fc!bp@?wk(T4@OzoMi&<-1_s-JLKzzrD8&?LX@KSbJ@?+{v1F&L zpZ{l{wi`)7zRx-5zMbdXd%ySGmnY9Ps|i~_`Zn*JMt4us(OvjgbbcZ&Eyv~t$XO) zu7Arfn*Yw-#V<51%<1Q^nk+uIYwps#?ZUZT69M|^oMscdCTqvL##0x@yD6tll+(u| zKZ=mZx$s2i`d#xs4l{lD+M+G7c+?k7=#_tG_D}fEq$d1_gG^Uzyw=}&%dh|CYoG4= z}$I1DxfAt@~`i)6&&Lo;N%>~;Yer)Xgbj#HGC+7d~lf3yCKfZ1M znLyKuIc<|hx3aN$V#k@zU1tJs-nDDOy>epr8UMuAk8gYI9q09*EBevaAMN~yRA1OK$E7uPd&Hr%n&hfae(e-$I z;mLB{-3z~Y?B4UmzhhVaUD1HhfQG%~wnh`ZCZB(gqLYv6i`KJA{>y&2bxl4iWaW9^ z2t~Y#0R3IJg5@!m&;ChYSyIn_$ao;1eZv!qH;BD!NQgCxx!z)?{cI(xUC-k{?B5Rvv2E^HEbLE21F{YmhmqQiYHIh()S9}Z zkx()kSCYGU3oBypTdSmYQ(9))?e@l_2}O!syc1$ws@SKbm@yPpMJVFMyP>5+E0xq9 z7!axP=l|KCA1*=c%iezx-oIvRy*tsJopIqxwweu=vOt}s49a8rKwVpzjx|Hflr%XV zW-FI2EQ9hcXd&j}VmzQ@+Z3_ALawk9NaVT|;I=Db?MO`(b6K2}T;XQSMM`xqE9RA{ zH6YXb3SL$$F2$OVX@D~AP%`a6rdzxH-M*ggm{Qw96KpfCVV!jwMNKK7W1BEz$`Lce z(%-`%R;h?pQfl#-H%H8h)K+SE;#_YO(kXep%76d$j$(ZZjq_*4mw3*f)~~7iT;20^ z_gkhcDeEoPw_878owPn|EwYwao2^~eHrqw}CA-0~)$x+;d)A+sw;5Uu+YJ_j%`k2F zgyAXt_kF_;3_mpd*zgm>y860$SAEB2|9fNo8|zQif4@H8SZ=H|x{Y3=-`Hsk8Sk_l ztv^Tf1n}zzYjNjs^P2nkFl8w{n>K;R9w$Ke{!>J%8b8rc?( z<-yNAlli9&`mZ(2HtGMuG;7pX8Xj#f(%siwzW;IKOqKpVBmPw4&soIR>NTIA9&_!V z%sXe8KRn6sdvsER-^R)BpEFcGZsgKUB2r^kq{;kq27Td{S(p9~TTVIV!t+<@f3}s! zG*is^g38l|^8Na+nUL955q(Qm^l9eWuYYT!zOrdHzkGjC|MkZHpv-Kmjpw;V{Mjtx z)@H@+=fyQm7JaRGzWGs8Q{I9R8Jp&7Q6|%zW?naaX)^D$VQlr>#(5o8DRha-f((DQ zb^dqyPnjlb&KVX8idL;&vvyta`VAXPUS-R>lHKb;15@wlh2(tOpi@Id)lzST>hu;GS2qTwA$9R*yd9+&9;-@Wi#7s<~=8$Vh?1G=!)q4JP+A#2ghma@|M`_ly+ECa_lRqUx zpFT@*=)dWwdF-E^GZa@(BeTgDrqH&7cRx}5(&R6uH2o+Bf{;6d#(|_)PiY=&wmtYe z`xC`4id+}gbeuNK7eXT4UwnINv42^vo9l=Fi@E)$l{zhKtnbZ2S zr}X-G>nSbO;g0+ClRtNjZJPXf`PhcZ=UiiJCZ8)G(@j3>8q-WZTfPfQrc?vyO=f*F zEPvsJx#k7a+*J$BP-qcpwhsR87xh)9h4MMmd?Pa%-?QHR#QY24l13^NRk;|7V5szI!!sA2*3SQi)HVr) znQNxUps?o`74|DtVc~ouX^ce0e-9XJ57gVJa4YqH*E+lQUG=sx?er{iXfQ3ji1HTc z?G0FMC~Vk2*F0Y=Qhl)5h8OW7i25Sa?8+x!wCNw&HhbgPkvZf13jL~<+3Us*%rzkR znU>kzV|(YeAed^I4UC27w$5*)dS9iFHt@e7Y#(!c(J)_1kH(@g$uP_r=F7&a_5a>F zyN=Sou3@%tYz;zC5$ZqvuxtN}!M0GKe{aL=&nfDUq3x&jv#qDTqkpn>_B-z~*n~w` zZB)`jMk?VKVe-P{=06JqT=H*yC)|gnNAFqdOlO(42hAI-teNfB4)^ zdiV3coh3n3_z0w=bC9)nkqrE zC+lq4(vKU@xM`$1vy+ck+r&WCoHbC$1|E@RKlSkG0O+E51|o? z;Hro2L3fZN6{1p6kscNz8%SjC;zGlmc7EIA#_2Vb^YkT@QzmxKz)Q=sSWQG4g~v40 zr(C+=OdZ~|(nKG4(I(=oe+agY>Q3kJv>5-*SHk+QZk;WdX7{svV25eJ)DRP`pa1E= z9}>D_=A!N77Te74Y$vzcW?r(nexfw+cE$Ah57lhvZiZ;(|SQ$*)jjC3-g~FL(8B3 z3)g;89Sy3psDi?W7c>fQp{{&@xLp52cqKjZQ2?4kKZll2$Y7PA)liR#n(h!ay;}U) zF8-MCN5N03W*ApnA^+v-%#J(dqxW8L&twfBP$r*7r>vX&Iet6Mg_FQs+*$;y_L*m2v@NXp z_H?TdnJpQ6X8Mg%es+bF-v0zT0Cjn_=-*c8uWp`Aj%}Q~2Ej=4Y-mhJ{Y|`i_S%`3?8Q#r^35|g{aGt@1+$ei zLB~6G&THS1x1gV5GZ*dp2hGnsT`>Qfu~ky2*gUJni~SgSsZXFEMc_Z9PS!al7ZCpKFAeiGlfOjhC4@FkK9A5vgo;kB2zQxz z1{h~&9Qw0%-eLWGN<%Uj1gUq%!^OvbXFqMAhv~7C7wsosvX}3lxmJJn8XDbZHFxaP zD}w=soKtz+hSV-)QhRP^d3xuB=fb(2Y4?N|c!NLt#IyfV&t%?u&qD9irDrfaUHF=3 z{;FqRvdurQ|4H*~;8g7+ZMKDqDfY}`Z8rIqo^7+uFUS`~bwvZ8FT5ZcI+jJthdmFU zaZl#m?0K7K!aFuO{c+d+2b{JC+H5owm7sesM)y9u=D9W-(tfbbHuht@N{m@+rt24J z-=GmA{m6^9cm3A(z+T(QUfXkfc>){tPqogj!owqbZ4d6Xjr|O783^0AVBI%$>74Jv zGf(Zc&DTDQpXYC%WXR#dXZG5jK{j6o=~wS+vxR@reESDoH~StMdt&Cdwv#W~$V@N{ zZ|397yyl7d-#&9sky$MYoDffV+X2b!+>?lL_=2-F`Js! z1@&%I|LmqC0A9_uQ~&ZDP}tX>191DwbFH@d3p8jTZzPU^Feh=J{#UKD*UF?VNV=Jl zZlI*~#4=84*EZWs+ia#5o2k_{Tl~cQFV^r(#=as_MAFMr4d^$RX5DI$m!=D*aV7nm z(yTOPr@r!u`RD#vx}G`9f_Bb4-_evOi%f{Ao{C&cMXr$il3h8;t{D60oU+nDLl)9R zZ{CRMlYDxr^;G4YX`yWHO$!^4ZYiZp7IbPA)$qdUo#*wZzKN7Rc;C+Q{X7xCF53f5 zWEDFXn!f^DF5frBELaZBTY~|*}=|-o@=t4X?q}c}S-+Z#wcG6;-ZJWx^v6!u} z7(_l|BFjYFBin6=ji^V=Hbh3uBNiLt(nJJZPsb$Css5AZ**pwTHVoG#^_=0P(Kczpp9UM{5IY%kh?0jKS=ET38r_chU*9uX z@U`H49eU0Sk99i`EF<#sGYv=sAPY%Zk=Z**Cks>f8GFGc@_M_OG(2fvZ&+9{%`hs> z8eqvm3RGM;UoijcbHRt{VKsIL(O>NoG-c4g-8`dr&~xETog@69c|Vo-p>u&C{iQB? zC6yfk{X5P5=yMnqgUT?brToPE{I(c1I>!SS_kVj|aMF$>`cDTwSh=v0%;5Hm=! zpZ5H4NE;3%lKI{4{Aesc8qbe)=Es8h$RO#?PX_Xnq5Pf%(|Ds1tv4D7XnGOoMIb*K z(cll$9UeF^GCFJ;a$AQ+dRx0w2Zx9B?vau7kpqX*!}`WVt5@F*AFAGFGV495k@TUa z>jry9Qa7gc9eSc)Ju-Yyf5X7x^fmf7j2=Il)+c+D`bMMK-lQKI)+73Mk2?WEz}+mx%hfxs+1A>;J=_2M zdhoJbDZ>>FygoHh$ZX8T3K~;QEq(ZH>21nOY49gMmC~m0mwx*42J(irjj2=1h3N-?Yy!$vWzJcf(y!6 z&BN@Q6i(={loh)uHz6Dg z>ogXG4G71(kcpX@5Zr@I93Xd47@4#o?9bD9!`@5z78i?A(03`{=VEW5VCYi5!^Li( z;GRqQ9vAx{f>=({_^9q)s=Jr!?xVVUdEI@y?mk|3FY5kRkc;)^Yy4Df|3Ols-#ow` zCvqR66WPnjUXXv7r}6o{Ad{wiq$zKjH08rDdybgBm-4-C_7VmAF6FyiY#Y*!##!m6 z^4F(fUMbb9q5+MAOwvv!X(y9(kV)FPNjkVmI=D&NVUodopdc8TpNuR(M&{>679b-_ z5EDk`cd<885Ju*8v77TXySigVS|{2alBL%7R*({LG(|HWX7e>+pBwFw3gMkV{a63~gH6AL28`(nwzbiCu>j3*TNuY_i?UWL=6F1rk zQsS+}jn-1C(S#FmRG2E_pfv1$l5pVnQoh~I^cqbh8bf8=SoPIJ<0zqpN@%7MnyG{q zDxsOH$->oS;UzSqgx6~{v7j62xL7|0k&fBLMi2~x>U6QUQV>+Di+x0+iAT}HS*av8 zDv6bs#Kucvb+hv%fTB7{pp68aT%e5$INj_^5J;lGv76bqD40MNW~S3>5+3x<0V=hh zO6{jo2dLD3uGaw9Yk-&9k5X?$3_p4^n~T*_5WQKz#hNIH)Z1Ka4}wW3qMed-QIal7 zvYnE2aYeLqMYJPHc7%lSmR$6f+Nszs6qt<@8L!4gucn<|jf+g;-C9l34cl?M*@q|y z+i|i{Nz#ai%=feEyP2?{tS02+Xatl*eH$1%aD6ih(T01VI) zC>nr)mViM42L^>&0tPFz1PpW<0tVmWz(7O5Kuf@&fCGcVMPTqBOzZK)%|%*sAT`XM z=TDX*t%aUg9`US2S}Q%R`1~H>P!h^SJJZuRI00L6d- z0L3dgD2`GX21uZIA26r{#c2u(P<)hv0u;Z6f&vsjiXaEY)cApn@kosy$XH9rxPT+$ zLMTmRKOupp_U-h3N1k-orWONkcJ=< z<^;$MFiA@=35DdjahP;F2?&@pK|ukNKCB^_w2H%|)!H^RP-K8#_6aZ&akN|lOaBho z!od=i35W?0hsp%Rq$R{uz!4LW&><=lAts%M5R+C*hzWAe)EYuekVAPOfnP`fF>N6U zs1Aq;DUtpNF(D^ZGA-t94?0BtGuJN{q+e#3*VfH+q4ka#HN4>q7MJQ(6 zctCNGH1ra{!+Q!PZlv-9JOceu`2ila1Re`Gcr4TscwC|7;PJy01FzKQVV|NPY!^6k z4dF;gLtE_2M25ivMS$C8&aw3 z$z_E9r^s!TfaByntGEAwkO(1TA$OS_1a*gb7-%DgYp) zgnd^A>l;0kkIA|LYq2{Hi0I2!-X3P?jNABbsUXdN8!Xej>h^C_U~TD z(bzo*hmy$OPWjs@f7llC$L|`B#@-K!?$A0u8c!h{@vq~f@goSw!t3~G{8@zK?sa@L z{vw6NX#8~whKsc>>+mr99v=3fG~}=PDTPrQ8k&ETrw+{wW2GFLYxQ-8`qzOSUMa$B zqk&aq3IdvyQBXj$Ap~=wnUC5M@R^qS{sQXr3kj*MAf%?_NDb2#-j)cdtt!BThT0Nl zGGyPtZEH1Nv?YRn(byV|8L;C%gk!yh1mtvDKW_)*;+!UOA5tf>my-#|J&{j94rFSD z0CC`<{UKA{3TsAo1({Wsf2_LTs z;ks1?mqdVvJ$6=u$mhlGwS6y2=q{WfCRNPUKh|f zT}YU41z|#+){UBAvdQa1m~d4ArlC|H%s;6cRjMA%Wr{ar{C8?`V+2M5vQ=0+@(Oah<3z@hw_S_nt_p)?r6g?xu%W zsn$*p?^y(p&n^Ry7OEmpq?SNj0f9I4##BY%N%Y3Nii9UuY6(xSD!{Cts)*@6l?>=| zt;UQhz64b0ck8qP%CMjS4fOAV35KQcY4&Ak{ZfP#{&HLItTFqaYGz!J?J?!tmX z1jBF_dRQ?91>76}hT@(>6>bJd`M{i7!gd9O>0tDve4tMlJy(8!E1%HkssgwxNcr$n zkn({=*J}Jw{wNZbfb>oZ3P5@f1qC2|9|fUHzm;(y2P1D+F=IOw0>DwL0bDI0m|92> zas@$19fy$cw(vp_gj`hsKMWND4wzJGt;U7?f&Ua#xoQQWN+dw04pfN*pe1G?GCCfh zN~BBn%~9pGMBWFT5*esc$5AD+qd2<&{iN%%hk^oC?nlsz3OYROCJI8e77x1xK_4cE zZ60QBV0#>HeX?i{Ip!z**BZ6K(CQtucfa_~BT>hWSwUAxI zuu$+y{J$^f`@MY`qJKrc-*bqTi`QR~@AvD7mcTswWqrTj!{F%k7I8HGQwk@FI2wNe zVgK$Tj>gL|cK&hSs1Xv~p(2jP%?L;QMI4P^jc_bn#L;*V;kdhqqwxfV1sZ=7f_qQ^ z0^m1M7zH2ze#;^N&rlE@1Qv|%rJw*{AE2NBU~uX#0bsAlH};>1b{XFoT)~&~jnx1q z8MkcxKWEcdD)h=V@JD^4jf;@lwg{=;3>Vb@58voJ^Zy&)==(_k!xfg0KT1K2XIMi1 zEY^#=V=FmeUX|?|{U-}w?>pcuk|xH`*$xCVaE%Qz65iTrX7L`Q)N^>$JaDue?uj$p0>@enAv4#Xj% z5Ds&*+YyxTZGwUVzMVqwHCoBOvi?h}!GF5zzm3h?T3-2RaYgd~ng*_{|6W=Dy|Vs$ zW&M{{Y+onqzYmkAZuz3`7l^!k(f4~qemTqrN221ML3^ zHd_Ccn2oRh3d~09zpoKy`=12|K$uHo^n)EyL|5bOj;Tpq`;a3@;c~ z)$8jWSSF+ka&WXtxk(4-dJXeFIz~Q!HL<=@SiaDPlVXPXRq}?O08V8QXX^b3(8xu> z_V|JQnQi*B%|Zf2EIhX}h$G9lt86;hyo7>#3W$w5^1qLYC#Zm^xOnJnrAQ81+c_Vh z1o*M&3Gbtxht7HC^rsAW&%cQK6ueZgGamYV6u&c@^=E5E%rVR4I;a9fTsb{cr$4Kg z^optXa-}F`uhE~amYG4h(D+>0{A!`xNk-@Tq1#q*f7}10NnJ_ne~|{xi5sM>{06BO z7^P``3v5@pK}w6mnI*VEY9%#txoO0|6(DZKJE|b zW63z4!u|+;akX5`oeXaGxsz_3*V8wcZHM#?2jpLRz)?RuIdCyV9fUg?>}EP`Sf5D7 zJKjLj*LO77tVFst=jvG24-XwojiwLjsf-;Bhj3PLXf$;gA@G9( zH}>m69~wSRrxQ^G5Cg;Mw7w@iaAaU~kr*DjHA_%RUN^{P7ZYgk={?6s(<5{w@qgDp zrT@pZb^KqYKCF-F@6|IlbrhWmZdGf*t!l#v^7}w$H%+vTx7;&Xbh>$p=_@`zyF!cw z`=>9FJ)n=wlNM#>7S+rxih4s+a4LvYrW>br;!i(1x&j`WZsLC^?o=UCEZ@(|apmXL z(SY*)cjSxfEnD=*^|#iYt=nPvg5gWJ$uDR)WVqFE((tfh(IOmjaNmFzd9tYfY*9Vl zoaXbhHFAJ2#eE^`&h32gi~PP21uSHZRMTH|?brWf9ft3$3tXg`sbec88$`0FwoV;J zM*1(+oqBSqOcoY!?MHIi_xd5aol14^Lt{f z1H~j{Ld- zb6Br$upZ)U{OxG)ft;74SAH{Z4rPOV&ux;B&+^_jiEuvtFM2!4_!IuKwvgR#qKhgr z{L+aPtoi(wR;I@_zL_q6JmL>$a6<(aT_VXu#^=X<7`X5_!gNJKu52aiGWjEWOo`Aw z|2-!E?u^ypWF@PJx+iJscK5!Mh`749WHo5GFE^XEaSdpJ@S>cHZCnddEJ0HDQcS0v z>DGz7HWpKv(!+!4!9^t&l1qt(pTZ(>J%snL`qSlNbhb~G`XI(XB&govFLSF)qwfdi++vy&B9 zAn-$lBomSXhwqY|n>c1sDI4TqLGo4-*rVa)5#rII&cNuLc zi~$57Vo?}u*wWPtNs|$ZFxuR$Mq40*CW4O_WjsK;H)W91z`=CJH#~4ldUzz$of;Tq zx&{#|v4vte{H;c>D--u8{P8`0U&d{Bwz=9nuEM<;*Y0$Cym-Z(!O*U*@Skv#_>-!- za?$w-GM4RVRGG$jv^(QX9X{NW863(CrqhQqqeGdITL(rD_Gb>DEpWTq7i(g=t-`d7 zjj&YQ(=JTcZ=SGOGY4ool(}JOIKyvmXSyaKTigsY6cZ<;bCl_}33^Qn;}_kS5~*9# ziSE031G1RSVnEHL=ZRHI_}pviT|2)i+=^cnz~z7TE!wsEsF@=u2ewqz{e`p_w&eBukIB zgyOqRCZt$zMHH0!E~OZ@fDZ|7kGs2N%VY+dB4P{psiY!Nq#zSzI=iS;wS)DH4112< zfPR&CrA9LbUtQV zz&sA7592buVhH293thWRwSzS`Q$G_hQ%4iXQ0aoH!9%!x2%5`)$#ho<*_NxNmbd{K z?Pl`?DrIcrs`6rxA3B`QBo0EOgKXQ599fr?^$4{d9~n&_QABmuNF`j$x`qdHl;BmB zuv5t3)P8q3n%bbbh{SMy(BQlx;W^=2>90>5*`(^C|3{qVGa`XuV0^^P5^V&dvQ)W@Sh|9Ki zk}Ni~h*tmuH;*@-FEB%}=V&I0mq4jAT~H+59%BAmM!RnuHu0O0$nftnTBup518j4G z54AJ^@32{$T{~bY2bgY`NT8#OVNh6_0GW_F8Y2N3mw5sfXS2mAQwYl}i=M|=c$bf=vPV7ZCuVj}kT-DEE5 zBZ!YiWVFCuTCXu$py9i^-J!^KcTewKjn>Rf-2H+sDK4V5CYXq{s5lXMJaKqvG-J*T zjHs`bRVEeT@DO6j?gcrqiXMeS4j=i>TxKh)+@mmp1KCmRtY)vm38zLzDYpr3TqwDd z>3T)+s`?b6Zl0xRvUn|KR<%!M@uUUI<0sY|6jtxDSl6kntXOCzXwcV-JY8>8Od+et z(4%{tU^e>(;1F>+~G{j-RWnB6l=cANae$O z!5`{8W5*609yo};jQU5WJ0L54Q0c|{64X$sW+Eo5IwV>2?T~Dija8*3OEzyc7PNVT zNVx1qf#Y@^IVu{U#}AZO+Ru?1h@y3aXk(=V9Ij;(ovifD9HeCv+nMerk$A&lQ9r+^ zA0Hf)`lW^kQn;`TRXieun+9cJ-3f2p?~f>j^BWN;#65)R(-2v#j$TU+HG;F834uJ zCKS+kTxbh}23Z5|)Fo!eIB>(jjRL7M-R<(#y+x)O+^4*{08I7{$^A1HGywvef_}Hp zA3sSA$;>Qo&7qnAnw^fjcq6lWeXbMq<&lnqhYz*9`N+{s>c9wd+?g8zMy5n)TNa@a zF>tj7bByIiLNWgPNLw~?~c1z!(F*jNP3wR+jv3>VX)w{3oEM_ zmn3i0=Qq*o=Tj~_+cY5=d;IZ4C>r6abg=TbWy`}K&k+P}`+7TTX4Q8~roY#3@`>*E z1St_sr}iCLytqGXO1eE^e};3Ntl%C*uX(2wf%fI=F-3Vz5x?r*EG92(beu=FvYL}i zStyr?hraV&S4!`}Vboh>0>=i?x_~n>p}|Ax+o(aF7Q&VHF$kIH z7Q;k3HGHsNf+#bqc@O7wrbh$E4j+!CM*I8Ry#7E~to*&4NjDl&RBm{b5X>K2h_YUk?eDeb^t9_Jg71- z<5U?Kd_K$>J%fi)KCs-PQWiU__=pPI0Q2$X5E1 z3AtJ2UvN%rDF=1TpKXq4eWiJP?ifBXTNiW(|M2NHoO-*=#uxJ(?cO1TZn6 zYbM#2hq8qBN+Ii_5ZyYNX0_8ice)R{1KmwfdYP7Fp~aoSf=k~C4VD`{%GJdw^pm4m3@ZO;{NXF9$9EO zAId%}sS$U#LbbAzzvWay%p$(c&enWRu?L%zReYWckQw+wamD^{r&Rgh$@JVlFx;Y; zIJ8-Dp3}K@i6M;N=4G3{z!}|LJRPAn8w~F6rNRA!h!;IJD$M~7lCpo~#6;p?YA_(8 z;E>arFDeDJqX9q8MPkDPgQI~ySq{6Cm0wVWT;sgQ!1(HQvrTg<-7V;y{-l>xJfV`k zs(7Lg@?TOJepNofbYGTj{VP2CNcz@TVsu#1kHgG1Jt@iss`uz|QFe!wZTjjWIW;QD zXy)@OxjThvxzHLsZxvrx89hfA(|56oZ>Ws$t&0r2fPYpQ0cz|rDKFdnO_gCqsocZE zspEZaJ_f*x#B|>hHLCv?E{5LbAYkOd^vDP*=O08rCWbv+MppB$OGT8P)@fx8|Hhf3 z?JY?`WCj=D=5H?-Qp)0VvdZsrHoEdy!gD<2ll>vCT3hp!@;aPuR{A|ImN=YF9~Di) ziSF$Csst+aw5ZgkA1DdBhi~)>wYT9V{d*Q!_62QLR{cXx_TP3Cvt#jI`DkZsL+kht zCHXcO*^jtj?ARz*kZ1(BTCMEIoSsM%UFPOy<gQS9(BKV2ZW$33c}}T_3&Y)l`T!mO zQhmU1_q_T5-Tq2_K;eEZ3Rm_UB@fJ-L}lB}to#K|rCAopvR$@gsCzL>ItDWom2J1P zs^4aDvMSl`WVIJ_SlN}tU2%24<6Iis6Ql5&Mi0ChbDlo8cxUZyw)yu;^en!#{B|^q zKX5h`HH$B7wH@{RFHz6(OI!>umCx10%XXVtHOr&^1;&bs!ndsE?1t|lFOR$5*W~9l zzbzTf_@bE(rqc*wsg_6V?uta^kON0SS%D-5LV>8zCb04s0ajlGzC`d#M7$(IxvdnrwXVt&j&>6XM!Ut-ArP2A zC!LAjpm_cGwa=_|b&haQ3i}md;c3bUVci;;!`eK|mEg+H$-)0JIjqYOmO1z@pM$A5 zOE~1^bJL8`@0$n>-jX^za46#)I&uWf8>$*ivn}hhq$APbUNIB$dnY18@R1E4x-~VN zX66l9Qocw)RMGF5kZ$@2P)1tJv~DPWiB zN~Bgw^OA`!RV%WhK2<9@s@z_dB^*h_M4@~>DtY1`dm7=;IUH zjL{pINE{y=P2DD?w^U?FVOc03^y2kTpbI0H3qftxTA3vk!sJIvEh-x{avdK@jk1=i zEa5=XBg*UbP7wZv!)z$y!K6|s&{Ul*t0>&-5wc6wt*a4LE3Sow!*Da$an$2YGTmlD zU$4)@I+VZL6yW{?Tm)RF5KQnoac5A2<@^fsiFo?vW9gC64DSvyqCa8H2349C&CI;u z4Q9*vLh}if{cr{j_5O^(Y+%*(sw6c}?tW@8L$bikHXBu5BuWU4>k3@3wdl?pRJJ=D z>J+b~0UUBHvTa*bZYa_t9mAr?jiJF&ETyFmXK43U6D!*)MX`U&8%gpqSXgQ-{X%6FOBkYv!bMFJyDI+p+@pXd&G-ufF;2o zlqj+*8OeB2whV+=^;K#lPdMuB61Iw3VisC?waW9No|s0gyL&O3fvN~NUYl_UU|7&&_j_x zl>0gOi#20|;1artio}QB23{n+cd0;cAD`4Wh|1LYmhvP1B!@p-z`_jvr2_ayu@vA+ zWEFudi9p!hnc!8ou$Im&29kwO988lt9>dCdIO_Igm9r&yS=rDMQT_s|LQ7=vIbr@5 ztgLp|5*E$OdJ=rtaIyNX%W_T8E(!R|tUi2sk$_K#U{Y1zeR&a!S$az>%ouq&5wn0r z@TfFIUsgsDvcc&u-hb_GbOoL1!Spb^$YM2H9robci3_RHgfd>ze3LgQ%#@P~5fe4u zY`8WsA?{Ha)GoL*X6$=ZBF*o)T7lE|DpaIFHpsg@%-MStIvTKe>u^i;Nt@lLFcbc; z-z!=xttY)f@D10YPFrCYTQlCn_}0c{>UF)4tbC)A5?N6KQ)#Y6q*eJQg#+h6DCP}x z^2)*SquVcYNl`Aa*_Y4dfRL;`sH8<-;YNC~P%n0Sa5tTu)gH>`LJe75Cw%hR++a8q z@eBW+i&fo_&Dx`~u)CuA#%vbuU+{#J+=k#!(e;Z`ts6l3V+nN(c(WiE-vsNy8c{&L z<;uhIS@hVVQ=+k$RUTR7gv4tWgD$HYR5-zC*r)Wre3Y#jQdo(w-yajnDPwHSQH9CP zNidZmw(@3`8QH^4LUy)n{jlJKd>lSl*oF~7z%a^3BJ3_16_kE&f>Ug4!!b$m2?{Lq z7D`o;4Jb||vthj8rQ!rv)p$9uF z7$Xpn;bcA!r=I^V@uDkF;QhmEt~U2YkM6jTD4oaypO7f^snQ-cy-gwZM2O5Q5372+ zh*NbpQcb2tZn{je?~uvfqu^pfYckoAcPhkqPlUf+xQ6dlXuc>n2wqV;D?O>uclXEy zP_1`~)Hl2v1>n-EWuFq9^{1f++AF1?%&Pkof+=Y+Ck2}4pp8|(CyRxX@>!6QdEcw@ z`T<(4lE+cx33$Z^XfymsCfT0?PURWWj{IPVPjLQ}GtGq6M-#e%i5(9e4ha{sP=EvWFg_Zodq)`pz zTPb@Wix!S@`?a#N2eYWb5U1K$*@v^Jdo7%bhW3$cs+Cg#SSQI=KPp%XV4V`L&iEG~ z(=wUK3v|{K?-M9x+|u4+HMdv+&`qrJV~R|l-yIh?XWWd1I97c|;dDnM$sqR+SjR0U z6ZP{SS9m^mACF`s4mP7y{iVVQMtekhcBE&r+E~p)3acA1HtFYGii4Prc2+a3Fkv^* zi0FZw#B^F%<--bduaaLI<=4gvK0zq$tYp83-U|TxjHv&bM_|-gI0EL#Fx_7XV(Bb| ziDc>qT<2v+&wnnPXzGpfvcU%d6j}Xf4sY)w51zHZ&f&!ud3IL)$sAs9r<$gVRevgn zw^!w%ORN5L4ll0qXoUKk9A0mak|uCa_5aJ^?Nxd3s#Sj`hZk3P0Nt$ivw7IxplZaF zNF=$<@{K%f^WQGvc7}Z1^sw55$eTa6gpF=ovT1ul_2+Z*^>=a;H1et8-{tVgKg8P= zHkcr0&G{UzHz+1;v}Fm*FXS*i;VzM^VE%m$6YhDzL~#-GA99%Ch>YnVX6--bFcX+) zh!Q!8Tk*KUMN8*)V;$ccjr&-|KPe1Uo-^!{aY11~X`JB{jLJEM5sC<>m}`7DPpkR~ zg%iOT*~J^3MaHWBlER~%C_FujYuv}vcIMMVu?Q@F8s6x%@gT!|xhhjrZ3 zm-MrSuP>2+=YkfFInHy~PVm|pzOh7z_5_Gz93q+ee_kTti--2eM4Uoo>o=E*U{?d5 zj);`nPVfS4{nm0ZZzK@*$_!mn>|d6P3H^xF+J#ubzoLIy|8G*3_fNEA_}ii{+WZ~f zK?OosyQZCpe0j1ZKx=mA3r$S-T_NUv3h_zE6vW1cuwNLodEC6CD;^2A)R}kC;M3Ai zu%r<`kwBsafB3$}^99)PSNc6A0aC5799HrDY@#VH+a{Lmp3Y$?4G0kG2RRI-+1Xgd zzvnQN#)@^IALcNW=H_6P|B=H`n;OcUQ(gumOXOYOlD-@_B7M|T)c(G=lIKl zI{3SyRbt=3a0@LG(_ie`97!XX$&e{{p(x~uP<31>Ra)fT%JG7`*S<1d|?SA=Has<2dj87mlN>v zD1aBgg?h?f%Hi_P#l_ZMRFsBFGTrY)tt)@8XbF&mD@rPe>HZ+~@?Rn~@J-~Hk$Ty9 z2@!KOU(NEl21$}yDwh;P6;>kh`AS4dK4fBnBsNth#o{&AYBZ82n+uNz0OHU}I^i)jk$OC_%nyFyPg-jU+g5sHLUqS7=J`bj*rqkvRFMo#dDdo=MLK|F1?!N|rs6D~ zPb7rN%ck|&WSJ5&*pN+@2oLwJZbV8YC5t>h2g3FNU8$(`tGfSuUH18p3|qSb$3dd8 zjML$T(?*A5Aaoq0s)(V(^TzvPfOS3xt#P^~Y_43H!wL-!jPgO<$*Nc7aC(m7-KY7S z!o~Efb9jLPc%so6h&4F81l<~u@rJe7>jM+;In;TRJPlG>%sAadhZf9ozP4e#LNrUW z->^YaJc43p8#YRcS5R=~q(oADfDQ2@+U@wyle{VAGh7W@?@bW4* zNd}I{z!kp_OGjkPRtGC6$9AdG3dyE1T+CT8JFFD7d{tlglFab_Kct@j;qU)L%in)R z5lWA3C#K-gXlw{uCwh4m0NPeAVf1kZHqEb+jK#iS+~T~=;>;Wv7#+#%Kr0s=11nuE zCGj!aF5YWkQ%Ug}LF63*R`_+W12V+ob)b8&B*Qy*V z1)iyLCisEjXX9gnlWi;)lB6Ks17KoRA!=DsNv(t2a@3sgSIly;Kdwq)U|HFFYbM&Shq4y8p*?s~ICVoMC-%HyAu1~7@NRcs^CKXhxhZD0V{ z{Mz?We^RgGRj=$T8viScSQjm1dEMTipC8l^>jZGO(*aOl1lw?zap(|eqASU_4)ZvC zK*aQ{l8%A~;@!Z5Jt8%+ih;=qKM)%4rZo@Dn3C~6!GV#|xlk+|A|5cU35$z@N5n>I>u97;vT z!ZV1@xP-`kkytd&@pC-Mi)3%NVB=m@X%-W;;kd`?aM&EIxeP2!9!=ee1TXHAinUtJ z^gmRrW|NfMOQ?Zk95p7>0annESY1KQmrq7%6$fRJ~BR#2p-mOvUpBb$A^pL z?nJU@&)(j?eQ&t#`ZvC5f9k-iZh==ad@VKLjltL>{=KFU?i&}ai+fmH%uvIcRm&m? zvRU5zxByVPp>~Nxk1t2U%IYwF8)#IFWu83M2A%eo<2z9QAQXO6t?Dek4iP&5T zwLT&dl(uoHh*}{og3Z@8&5ISH_}(zq4tSHs+_+|2E)%_IyiYK(DY7M(iQU$GHioU) z`qo?)`UBo+b2y3}+BMr3`P4TqW(wzbjX9UOm?<_`S6OnIN~YLut+(c~ax%rX>&^B> ze%!mqCtkfaNY@LWz7(6%z?phE?xeCLpHg*t1;cS>y#1NfRP_`p7TD zTOf8X*Lg1^fL9n70&q*TR_>}0SXZMR6@zegrxW7P?T1m_@JngM^DYt`t1<1m@U<6V->0`7?(p%R<|rGA7X z035WyiYFI=FKp9ZM%@SJpsrji4)_jxv&cbj%q#E;_UHHIG6XVkwy}zRi;P&eJ0|9x z77O;3h%%I4hj}C)^tltSN5nKU>-9_MH2vgu+;CoJ7N_zvJ%b1Nsk~#u=|jx&#-%Y5 zzEHx;8zY}pXXp`o5aWHB1h$+p+nbg~h$9cFLb2nDZWZyzan$Ev8hhGsRA>LvD2cd# zH@9@TaRPT!pm)K2Bs>dCYN>o2$K0j7n3`umSj@nEU}=PC7jI^K37v01J)T*tbf$3x zTd=Xq2+IRLyb$b!Jg6oRgxjCLISVU2q*Af{iW@(cY11l^;wIvIg!N#L#SJPa6ywrx zDs8$^C6YTpq>R(2{VKV0uSgkQ$N`lI^RaMQc$qf6Ih$-1Wb}78spMcZk)-A=x^*ll zZ?iZu2Wg{U4EtMI<6%`2M>uhSnj4_q1vy)`TmcTWvWav2HSS`rP@ttI4HqtcX*W=kpX zADTXvO%I7i1Lxf>*<`#&UU>kSf?LT&cUu-$yfZkSaGsTWKyL>VZ{l+Geamvz()!+U z8Ij!j{@GU*}Zop)w)lpRLn*pWP(#>V@Rk<^W8Q|M3z=im;e4)&)r zjdXHuVDQGwaQbE}VU>?%$5%87gUe*or6zHL^e$4^i7cLC{<7&904Ep za>TKRN(#WX>fW6r;E7{7ciPvr=p1mS2j=0UHI z&h%8gCyUElq8Npk{=G{XKy}#W=#wo~|Gs5>ft5Jl!s_0?jE}AV07PP~7V7)JPC?Vm3bfCqkW(!%S| z#`F(do^R!RygwYWRqd23kLw5;<|S-rbst_PK&$wBMG5hOD<>Ik@DQesyGNiNfw@`L zN3){Fy(Se^0jT5Ttr8~z76AoWqUyg`Wch&D)L6)?`eV5~H5$AHn{XBv$5U{D3T|^b zel(rgeJp(}&8j}W7$v-$AJyijhjpte9MDw?0anr-3JX>nE5oteMV4r6F4i!eO{Gh^ zxTRU_;}(0SKY_zk=}}hkFv>xNnZ_HCeHvFLZ2Bu&LmI^{{G8I%%r2&o*lp?$4I&nQ=g>^;xm+erFj1O(+yVG} zG>1#h8KF09fBowm7TsIGS!m}~pUh#Yb;R!1nos4h68_zho^Df}dWM+CC`sJCZ5eYJIErO5L@AEW@d_f5Dr5@`xC;mh6L+uxp6i|6?Jt6@+_;}BcE75bg4sh+v z@lTSA{pE3hlc?AODiUy>08rh*OVNT4bcXwQ81M4J(n#=R?iQxQYUVD(6dJ)6`6nb3 z=SldAkjTh&0!a8!dN_kOl3@*BQiNjJLKgd7QYsY7uq|JfLdl$zEUvqfso@*bqcW+l zC{j5|S?!7xB~|bw-ccEjA(NK*I})WLEI2Q0?5eMU3s1-%Qz#h5RT7vH`MnWdV>HNxt?E}|x*Nq3mMx}C`&b%S@wOjzSLgh0rLZZ#CZ1yA%E zC~YZ%_ei_l>i=2DVV>66O&c2c;fpLe?CSrf%qtn@twd^<)qG3Pu?Zv@^+v-SsR$-^ zY5q$tllzv)!tcTa@n4tlFc;*7$66dtHIqt|G)bdx>)h*vD9b1oF|3@PF#Qsg~C6-XD> zDi23j{|ro;n?t)ae9G6&RZ;z{Ppo%i z>P&a2u!3KpfF%nef^1Ksd^kqU{rS&>M_z@?mG4)QcbW2S{98?4zHAq z^@KCiNWwE@W-xJxzU(#JM#9s&2|EZFxM!|UbzKW@a!iJ9v+}m zksX;~Y&07>k{LX9|&TYH)zBQ&@cL$gVYJam6`IlPB);!bio;n4deU zU9SjuLxk96x5AZ%=CeWJ_ATQAg=|!~iKSeaLT!n{?Oeu%@s%oE9EHry7ejPSnZiww zvmmQZaL(6kQkb;)Rrb)lz?j!=E?1b|XtXONwh;>DT4^<*LSf4$FS|Vcb}?gZz!`7F zZh4o$AAAEN2ZwMqE!P|7=Q!KFTqt_O4N}6&j5yJ~TtYc-P1?6HW6kAcd}&y~V4CNI zX=d%^WZVaD;_bn~^qViokE8_O$&7RsTsFhS>crEB)2R`WM;oiJyPOQ&qA@IH4tO1O zCOjt@as+axEZ{`_Qf8-E(}0`WxReD~lvq4q`i5mZ?%3na$KqhMTbA;%puywfMmScm zl{W7-N)b6;DlbvjBs!t;X5wQ_DCCo{gCyXj+$QOP?1-$oMIoDZi)){_@6`miGplb^ zdC?dF15=1kmcH|3pyjvc{hC3=db2#pZ*ak@rtRkqeyl`Bh35hu*)^9>W3$Nwk zKl0WU3fS3-o8OhIV$}O?_r)?{`ic&&*2~bvw}BRivz2aqk^6!hir8M9mxbwyq`_PgKdz zwnPS;WVD;<*D!DJ12j4qt@a7*TTS5R8_a4#`{12*hgt1f=G`Ot4uy|pEi6BPt6#@D zJ@~{t9}taJ=R_FuA>6R;PWUt7=w3hp&R4E-Ys=;bL!CiZyPi>e-tic%u8Ab}3NJ?A zyn(nu$!*W#^2l2^G7mav$@a>`<48A|0X-AU(BWRTwS?_KZKaq`DFd%R*4#3Cgjh`} z!;Cg64hrH@c`3(f%vQ!ik%Q?QUSkWqlKpF`fjxn6C*N6Sv{@!1(RjBzygd}5dqn-2 z?Eu1wV5Tt;XlV>(?ZxSEw8dx_Z%f-MNK!TiTieS>@`lk|$+{L3bxq*AVoTGMi8fb}q>^a+ zvsZ$k^sYG8^iczc-fX6t`6vahsUQzyfaJ<}tSW?#A7}Zc7XNbGQKs zcWP&1Ni1)Bd%AnV?qn3pxAi2A-ISf;j#s1G`cCl%dhnSwEVlVF#A92H%pLFKV9n@u z@KoDdGUDj38_V}79Fk=v4J4MGoSU_7VJM$B78h3G_PkTL(xR~#Pdh^;L*4LFO{`@r zFAq96e}pcc3ohfPMHf01#_fboU9J-E7hif&9(Tfcsm=aG3r5J!EgWI~I# zet-@icC}08IpINBHi%TVIiG+P|^g}g70_|+$W}=d!q~MJMZ@%g9k-?#( zuP39tQkGXu18#WIcS3-CFgkp>F`(fBRKlICM&^+bcgce~?V zWMsG#5LXHti3(%Sq6S!LgOtVX!=lCba7q6bDY{5R+uAB6u_I4PqHQ)x$wi_~{i+Oh z%!Ms+M!c>Rki?bCBcb1 zaXXUH?5172Sy}*>1_W76FRR;;%@qR!MdxlqquI~uu30WXDF^}bgIr7Nr#rKx#GDOl zDmu3qFgJQwGuDwatr^_GDQ>c?#7AhL0FXQ>+&!AYb&(O_z^=t^T)bS#iKS?h10W_w z>0{WDx!Dh{)d4QQ-*NcZ(NWxcgxd%C#z$5XAa)zEw?}1GwVgzBfri}Wy@eR^2XQAZ z_G?xKiR%HEU&Kxx0{T=4IOQSY;Oj*hcy({eB>4BCK(E>bI>vM=g19=B?$#efG1=BG zVp+lJPTe+en3@&M5&(PsxM-WS8VRJB8PO$j>p^J=Kd~e2RC)N0l9mU5>=q7j}LM1QT zOZpZYQ#bAEqb)Y9bPvh+Amd3NAEK*dqXE{mmx%Og zcn#bK=~`~_x?2PZUY(opuBv+>=%9Bc1P^1A%%S7rEo|u{9+}``<*goxf<~3HPAJ!-KoLjQhOt;<~m~0Yasi^mz~Jv?>=-0U(y<3Ro4?U z_f-hBv${7DixkTXyu3Wh$7-tf(`Z501mlxf*l!mO%Z>-0zf=xOp6#X%v+97#0Xn5# zSVY1hZtMzH(hEh!Kxf6~>_aLQmooeJh<*d>F8FATBEC1Cq+I|qB@ZshQ(3+Q=BXit zrfA?tUwM68^(^PEMHHIpsXw)_CyV;EZQNC`_d!}${12vd!pg2vg6vh zqbduAD`uQ_FVo#DddBs`#179WKfmFCmC;LBqzFM#Kn<@+ZbLZT*3*n&mvy7CxE`Z{J285WYKXY z-0ce8nnlOQ2Hv93ZCP}n_&XH3J&TU*%zviP9a(hT1piir?#!ZlS^1p`y)BFGr_H=- z`K?O%fmO;g3f|Aaz!WYJOnw<&aI79Hh( zyFzcvqWf9N-9(2MMtOHQ6IJpKqTy;{m4=0ldx#cJEYhsv<4FNqfc3spGR<(CDoU{9 zJ52ca*R3gBdUxoM__ARdcWa|ZI}BG%hBjIq5;rsB6Ja-Gu&wcs`1BI(oF)<0d@s4c zFfsNv+ekR7Xb)HJ zm%Nuzo5`YKYW+SI#x;e~_w5Pbp8bvQXPzEhbRpc~AURmc2N-XJ7Bw~G@Ii(J{a{Gk z$Or}Cru~}xC2eufQ3HLvj^995^`UI0DHP(cme#FU?Vm4U9p&#&-s4&Gz!Gj+aQP}7 zw)2W&@GOz)LCM4wV?5j14=)i2NdbPTbJa%_E_S8!8q+2fe%1Eo$t)Hw>2rzlD(sq% zX0x3_`N|HL+No@&-NoMwm|}MeHvGymbFK14dS%;6)yEVbeD*H0o z=|TZ5O1=TOL1rbP&K{FFxE`O_ zz!xHfIvZ9oa!+H)LA)%BQ#zN4N{(fGXPRwWjULRWSewH?fzN(q_%~b+90!WTrTN1{ z$40qZ(Y%IXX|5+MP2FkbpB;5NTX2Ys$g~oMC5&XIIfE6z?M%Ox+|>e4wEMWQ+mdN? zh^uItSjoC&?scXwCLg(o<93KR?b&hGFZZFhY!DJ#H*znBSujOHtPZ)0GL$>Nd&0@>T%lDw$2VVkkq-_#K(Xz7}^AA!j!LR+SLn zP<=Cov@8Gqgf$RI^mqjJ^|!g(m=34@`Q{9)YULQtHeoneU7 z=k$q#&z6Uyvc34*;lfuwTfPZr@N-h+PwMx{H*R48EOSYm;cst4FO1XlyewEb%89vM zltq40dP6e{_(FSRCERpf)HV@uYYQUcz!y4roG1PN+B?tSHj*okKbcq?6c|^Dio2o` zMKNFi5(Fh{rNLl^gawi?K#HVn*+)xSNnWnR5~W+o={#%5KBvofK3>i_=bUq_%Q+|K zoa6mphrs~S*7}28V`6^cRgg90Q(^qHRGIpcmsVvln{lk!% z%au92fMFU9vchtxs~ZiDa0W{7DOHo0pW^rXLEu zlj*P&zzKM&gjqAZ;%HP3!OK)PExtGAQZi#MVC3%kRdd157o+2#w_y7aL&6VVq$%V~ zoC%&KQ1w72c?#2BaPg#$n+qr498j|taQ0^s$2hAP81;(s6$E&MkC+Rm z2raaZfln{QIBhPtn3^@%S^if_-7%dh)Gp>Ot*(TiYNeb!V_r3J$Y4 z!YHiTUN-r5E$Mnk+eWli9BqAPTcL_qC(q2n;hb>V`mVOh+@g=~7u~;S1AJV*+lKKh zuQDIhqY>PM&ATf z*}GMLI4)dtt1~qGk+$inYDTv^LAIE`>sBgdtWgfoOz@T++=xtLvaJ?oXy~IXHdQC< zXP#Q?(AdY?3TLKf&87+Xm>sJ(Qq~Fb^3W;F!NVg+nIh-oZPUuFM-vWmINQB7lDZBr z06w0AhCb0YU74%hdgAt-m%aQIul&L;rINeP7XiH{?jQy)oO{X(ibsjPooV2cC@a_# zT7LirW8)L|YH^tke5#FQrbb}-U7i2Jkw!Vt@ySAT@Y8MTybzOA-kGc`&padI$!a?C znKpHBh}C5Bb?(90J1;I9qJ&qj!sE~s`Fu80*Y%Fa7>!b&!%ah*SQ~j428C?SXc0Ej zqJ36ks(`M&tWT^s805z$>M_Qf;Z66vlEpnJR0>`WCt-? zl^bFy#%#DW61uf;+FzoP=RjM)4$;Q)B=&qT+H8n%2h5m;XG<=xDLGT4;iOXQ zjWao6*NT_ILfM@?qs8pURilyi1a`MB)+#1xw>VM9a;Hk!T@JCo_!)ldf`E77sn+Q5 zW+aUpG7q=l`1<~);7EZJ<%`&WJ6xipsRW_kwRE_pS)*74cxbgYY&a5%L| zj}??ud&%kKwWBMxpkrxev1*G<0V8}TdJ^bXV&$mdId^U0@pXI%{E*jeV8S}e`LC zmP-x^yVYt5iJ`XOI1!A7Sk5%CH&G5EWv}TK5jeUfo&e0HxapH$0`jM zcF?Bbhj4TLoEhy6yh$&f>BbGJr;>g+!TU1U8+7w^9z70=K38+DL1^IOu8Pk7M74;+ zTuePLroB1_Iq=EV?6%2mj&4Sd^(P=N*$%1b6!6xCh7S!{sNQ5kTrSMHI1(a#0BN&3 zskzN!c3dS6LCBC}Pc(Fg0~$S;z?YimTP#Hdn**XWRnfx}#h#Nib|`_YmS@k|}6<+ybCh?bh+^Prduv=%4jDLk0toii@Alpa7C zL0yc*`GR>!cyKyP$XcW2K5|s+Z9ek8ZMlt1!_EwH10TJR2XKn8I@Ni)$O-ow>J?VC z^66uUfe@RppS2O-6d&HJA0A3zS%@t!ML1-b?xx`e+<5jQ!%Dnr6A#k1#c8M;wc*G} zf@`NKihjn^EsFB};0lRZmpMGfW1|T)1f^ivJVqaVz79YihIf&ebR?bNolk6v<34v_ zSgzsEV9jor!N>b7#s_dZDEfSKc#cxrHrLN(b|w4C^>`nG4A43B9`)d4LOH6La^ic% zy86$>)Z^zhKM$N}#cAL;UP@duKo$7-8q$qPt8U~3iZ!NxO^QLLXi)bfu%FY7L8K$k zRlTh#CqXuWXtRQQ~)A+dknF4(62)6vmFQJf`KXh(;el1fEba4FZP=bgoaKhfE&YBk#4fC`1>HGS{Zj?9vg8D|LIEN7>F4cO#$}PqMmj-?z{yX_rtrBk7`P7 zrj3`Zt%k=P>PpcDyugq;BoeYj0OZAv!ux);Ci-iXp z7PiDKbZn*L8TBGGi1RXxH8TeSmuw8WI;1 zseQmEd^E0YIKESAupvHX#M_2w<5jN?pL|XI?rZNU7!vS|AkZkV+Pjrf!=|82Q2U4} zDBDNlrOLb?P%7OhtBx&FnYdCfkDyf62vGyZj1XJ<#wrWCBfBtyQn^M3CagLiSEE0P z)E$#H6KQHcZsgle#N~Qz1*M+b$i+z`?0Y0GL@xBY3QC=_sZ#rCt99dA{VPeE%sm-_R`>-S)F_9XPV*KcyCp63>0fDwpF*P}ItE z4dn}ra@z~zN~FoIt*P@3;ft*B#c?5$RKhQ52v@A|C2=8Ag!dJtE;NJ}t?*J@h!mCZ z(T4D{5k7E*Hh8brSl3~C26P=Sg@`-D$MjTK&no_-PsJ|Ks_RHS>DjcR?N3_$NA} z^Kk3B9#74RlWQh1;~BZ{2Ku@p@A!-Fn94$JdKCL(m!nQ^U7PH>sZFxLrS4m_aq-fH za1B#D7apVDFV!9Efc}4!l1~^Lw@vIjHg>t}Qt!+3?ML$Nm(#}8Yf*B^SD4rsz2cd_ z?pN8^wdrLT|FUM|uWmIS(#Fj@E7bjDv+gymy1FrQ*O+;&HB&CbOz-PjbNS`XxqLm$ ztlXjAH?->B*sOb#G4p0)<}0ijkX)kVSJKAXl@&^U6_UG+Tz_?QuD_-=*Ix_$Ds*4h zto!;_-8UGsZ!u=S(VE30SfbvI)?9y6bFRNxXRG&HT6N#rtot^maGR3fuCtZ=4rBH^ zjoI(AW^2=h5_NxfQ?5I{N2h)OCAar`TkqieOj6&klj{0`SW?vagZRgWp>&LKDi(zsL!5wt9c5C0^>6Z9MA!m8MAT zzlumITffG!k*!}h;C}=ERkmu=iva(dO?TSyTiU`Xga7T8TkZaxX6^54t$Ikm*P>1S zzA^g;hQ=Sp%u@FsHKo+~$2z6+*h-pu|D+|U?mul3r~b@}srS!Yq}VS|-|Sx)tAA;& zmdlIO`&T+<)V`$tTF1xDcK=NizTUrWk#_!_l_HDXf8Qid{)4glkJ@U-KN+joPon#u zbwZ{^O#TaPTv)w8seh%7m5Ud+W$ykrow8N@yGiUnbYh496V33{rE8aNtgP}^eGx72 zwX18lR`s44_8a8C%nkpyHeD_*yCv%QA2xmmjXpYn|J51cC!72~W8cL}lH zu9Yg*JNWnQP{n$uiS;fWtMlD97Fxy5_u!8$-#zcuDe&{;n%4C`{?Gjo|J(e2PKV2L z=LZ@(N`26ZsQp7wsKWbUmZI=}#F+dj{&NRcL{ruIG5m>4ew<_9h6!Wx6Epakm}DbSM5R(|osG_!F7#ZY0GG)USeZ zDdQ2LdX;vi2oq)bv>N18F7;}xsJ_U@ec@HR^@_t+uuo69${#aWUK+*0vEQ_-i{rFj z$>PfHZjPhAY!FG0Ya$Cc5}bDTaHM-KjpI^ZFURth;NYZu?>TQc_M7(&K$Pb22@Z!- zZn^4~=g;Z016ZHu@U5(G4xi+3?6ZUPv+?v@4&ScQZwfCUeCH0<=hHk*ZXA`;m>|Q2 zK910G0fXGUfq>2tPl!aUe7>^FfalmfO2t7i)?FQunYhU!t69#oN2;R95!KO0W(&}Wn(m#X? zw!+y$iQV9l(!;o->Q$7|I0x@Xu&O>$aE^ofS4?)WlY1|}W4}-Mha>9oZI#XKm?RFPwr@+BS5X{r|X0Zv>9tRH~SozmQ z*(f4-=TQVB(_FuzY`|-U`UY`9*VPCkCVH?hBHUyvJ|>QAIvK8Y8EiD5{WsJy9^?@l zaxD&pH?Lp5jD^ALYnN6Y!!p>5S69}qU={G=Aw7b<2UP8~?c7-UZgnWUtX?>=KzU?5 zyj2TVuRjsul@l9Lo(`w5S~*<9TD9?z3ZvxDEbt_+&Bhp7g(?!zYq_uUg6f-Ba9jYN zAs#|o#=;5yc@}#XVb3?(;c%nFRBa05d?P!s?*PxV#e%sx@5{1U(Y83oxiRm?kFM%Vc9MB%CtpJ2UuK2f-8#IchAcAjNN%P5>1@f>yr zKw~|dR=ZOI_jsOhsFAl0)Mf(ykKW{Gw7(U9znu zJWnY1%p+E%^X7}tHCKAXVm0!+HyytU4|0<2wJMH#+%_3=wL zC^utbnWc5e)A&=za%`+w6Dw*CbGfIEm9eqrOss5_!-=Pkl{K*jDpV+^A&w=YZOI385{61wZ!pWmbdlwNtH?wH2 z>4S;9bRNY4y~mQe*c6Ei!`@|;*gcU@DiGg$ptJVSpRHaMMNhAgn$qb0zyCt2mv7=1cZPP5CTF#2nYcoAOwVf5D)@FKnMr{ zAs_^VfDjM@LO=)z0U;m+gn$qb0zyCt2mv7=1cZPP5CTF#2nYcoAOwVf5D)@FKnMr{ zAs_^VfDjM@LO=)z0U;m+gn$qb0zyCt2mv7=1cZPP5CTF#2nYcoAOwVf5D)@FKnMr{ zAs_^VfDjM@LO=)z0U;m+gn$qb0zyCt2mv7=1cZPP5CTF#2nYcoAOwVf5D)@FKnMr{ zAs_^VfDjM@LO=)z0U;m+gn$qb0zyCt2mv7=1cZPP5CTF#2nYcoAOwVf5D)@FKnMr{ zAs_^VfDjM@LO=)z0U;m+gn$qb0zyCt2mv7=1cZPP5CTF#2nYcoAOwVf5D)@FKnMr{ zAs_^VfDjM@LO=)z0U;m+gn$qb0zyCt2mv7=1cZPP5CTF#2nYcoAOwVf5D)@FKnMr{ zAs_^VfDjM@LO=)z0U;m+gn$qb0zyCt2mv7=1cZPP5CTF#2nYcoAOwVf5D)@FKnMr{ zAs_^VfDjM@LO=)z0U;m+gn$qb0zyCt2mv7=1cZPP5CTF#2nYcoAOwWK=a|6%18t#g AJOBUy delta 60 zcmZp8z|ru4V*?ux5C4Az*et{&%*4jPz{J3$zL}BfCgWxnfj{Bx4N{ET8>E;TM1dq@ G!zKV$BpC7l diff --git a/A2OSX.SRC.po b/A2OSX.SRC.po index b730ab14a25babe8fb33ab61b7ed686d6d09b609..c908fe69fcd614ab35f9bce5ebc84d0090cc5a44 100644 GIT binary patch delta 21485 zcmaic2Yggj_W!+aGGUTC6H=z9klsiplR^jx$fQ9e&CJkL&`C0oXh`BD!Nhe90|Z$` zMWVR`E9z!WQw3--b)>aMzWcXiiwb@`w3?wgqh>;Lo9k7nMv_nuqcy{CN7 zxo^{^vQ3-H_T@xT{djKF#grV}8`UwRbmn`6TtdjDgk1K`%pZvQpG|}uCPWt|%{l@9 z{KQY(Kuz@U_}4MXG3SZ06F-ep$!?*W!d3I(mqt9M^PdK(HQI`0^xz@=%T)hf3OgL~rEX-C~lR|Xm#uC^s^Vt#;5E^@DS*SH!R1C4#&&id{iAJIQZC)+y)0*-m} zNczKA!?W5IIIFeQ(^j@+V6e~c3#@~BfgWEk(fyH5_IC{v-6M2zaM(+%hg2Mw_y(JN z8(IhbE|TzQh|j3ZsFWlerjAnH)9F<>6ZRN%+v^KB%1FZFbTU#hyOgjepv-q+z)?;T zo}`nVz7C}olqEbx9c4U1A_>ok*7>5R0+RHsYEYv!EklDYGV?h)+1;zKfexNmItPA# zQkP)oN1)8_4LC|k?2FV<&ii}3#Qc(qXT9I&gPFRB?qxdJ(bGY6N9m-0aDZrEp_9b^ zDs{}On!pKVxmS-D9XHgyMkfb+9fZ9OCG#e*rtS?|csRG1B)my$Hgr1bhJ785wmMfW z(Y>Xxd|R;8y(227y*qyC@l@k6G1si@Dkn+&Gq4@>26mZqX2cPRMCXx%Mdo&iMTa-R zkK>cp>9_~p;f5LCZhL^$F#L&|=aKPc_7qm1 z8G3$b+;6XmKN1ysuIR&G<4@UrbJxryeY1>-(CD^KBpOK3vbwhBx<-fF(b!N8lpo(F zQREIS79#Hzz4&9?n`~j{XX8&KPK<9!?uxUL?jn+!F$c%RmmK_e@{Ihx{Qg?+ptqoC zgy`N=mgaqBX^xAfN%9+`PKT6<8Q(b$ONs@>|`WwgM8zqUQ4f`BYT)O!Y^L!OJFSwL@W4>4B`d)~CeI)62bMX+;U~;W z6k$TNHmGm5kN3Z29JMAB*s8-&4>viC%;o5Uxf5*)xt^F)iG2Lw0G~P3-Ejd(kg@_| zP9u{Y8~OuTrDH81COW#j{=n%ZZ5HrHsWEq~xvwa&q%Y71%NXeF_8*RN5PdqC9Q2NC zTfMN9STiDAch#B?ns=R6Ihw)9q@$s^I#A*&YjLk~)Yh#iX=tt~X>!%HwYVJ(Bwhc@ z6-4z0l4|(n@`e^@oDuiSg{^HZwKDgEw?FHow>~e8zxG_wfg`VJCydNKZhvK=!3N!i zCG&XKE59?CVId=w^j9+sW>~`rrR~+z3}%>agmTlXr)8OQRFqbKckf_5>@QPp=q=T4 z9NhJW@z&QQSlmU8wX0nXfhPA7M}4D*m^Bz}%nQ|&3*XE(q%KxdrrxYdGuNsp;bCg)V8dAJ$wa&4y!EZBnt#pm1an3u-1LVjojP?BfyfAVe%^7nu#H7FiZQ zrHI(4QN)fa>O_cGP$ej0RT2XfiQE`8h}`&3iV!*y>E(Zf&ON6$Rh0(?S~6y4<~VDuqhH zs5JUel%dS6uJTeQEv4MKPKt`sddUq_*))YOSWF8H)<;#<_{PPwXw>|;iWGiBx+jQO z_$T2_r9DN$s;j29bo;>I#ewAm{_3H1WpgUY%%{ciL&F1{&R^sOd|I_Bmj>_<3wL!s{2)IPP)LtkFQf-?y%Nn8g1{InVvA1E>wGM^qzJ znI8HVfR5_`8{hn*@_S{2YG|gHR4rTGgZ`TS5u$w=dM`Liz(|o>hm0oPQ$sDIulypP zS5M{R9VFVABI%}$aqsMMtHS~hPTx9c6Rr!4?qKua_lW-RmzC= zZQwVW^A5^SZ-mF}(xTzby&wU-ot=TcUZ2C^Ac^l1*~SU8CE8=qc+Q^*7)&^VEazB1 zta_k(ATZFk!8h22J@#~8-~;_o0wT1u#NoidWhEs2eFBz`tVo?>{!!n6Z%~Nfj=rJZ zK_5u&obJi4M`V)!_+D+v2UX*h>i zKE*a8+fe8)g#V5DXP0JVWDxc@sDh?h1<`&6yzQS8#~eO5;@#%$9Z`+%bdvFf!mMHp zR|(e64->$#!<=!kv|mE|l&_%welQlw#ya}~7x@BR-i^LM$?$N=>15W|zyUQ)`B?8c z$l`+T{s1i50BF|>z!Wxo8+yl%Jd*zRQ{HGXzMqnjk&EE4Fb)uF& zX(&oi?InKUUQKfFn_3!Aqflo~)#Hg?N`InJsB5RrfJaRu{h4a+r<2po^fsL#X{NgU zeJkieLy}rw@ZptoyH2*G2rHOcMbj2GuOQ|XDyuep%GpXVfMth(%v>!bm+%IN?kpi? zGtcJl?$l(Ao+CtA$i!cxu8fxSS~}_N?0|ho63$gu#j^9lR<_m)Vm!8;I;uE|LDm5x zoP%uLO0=C&V(~>JtGmv#!qql5=p80A*U>oHY(NPEdntcC|IIa;yw)z@ivk6XPB-#B zAN`I_-!QRWpp?K1?F%df1dM>4+U`Pb5P z`gh)NEuA&vA5=E(_|8dckutvL+o3G;pCMgVR=RaVUuOXJl&@qEThIDeq`r0Z2c@Hb zpVE~G?Vu?9Xo@PL0G?y2Uv?M8W(%ah^$jWxsZ(R>U z8(sHa?*_$vH%ee15A&nDX=;Vm48vj;WCJe(-hdUJlWjOmd;=#jE*jZFQtZ+sKkopu zj1pZkt_yf%Dar&=VFKcO=+cx4%n}o@q@OYYW%wCl;Z?m<6cA&kyx!`iCM-+g4X-0x zF6Lur(wWBCobU_C6~akr2_Qu&N1~kQ zwMuEJlW3#ih^5ZpSA0QJMq$EeP&nqmUQUh?XIjntjHcG5sG(!S^~#8jA^I~yX6h-Z zUG)314@a$oZ4Bg|5u%TSzGUFUNmx9Jb2uI#auS3j$WH`G5Sl5^{gS4Db6N8x&80@Z z|4W*rb-9SeB>#-6CRVfjORBEsqhC^UR4uVuMcLA&#LD-5NsZcu24bde(O!ZPSm zgs{=2Dl428USaJlU~EmNUA(3X{tUEqK@+uB$<%sLzJ}+hvVe zki!>zMe|d0#TZZFpv{9`?fE?L6}3v~h1~EpwWpz7V=WS_!ELVZ^9K~O(n*qw`O9BX zJ9Y5SzoIG0CD6RusTR%Pl$Va-!JqzyF1E675NDL3nfTx`ofJ*k8ZFtEKEn*q%x(Of z80maAY9l|SOL0I5@S`zOiB6FLrNI+1(mcsva;XnhgI-!;NIFAJ+NYP&3`tFD())U8 znZfKDu4ZWq5bll;08GjxiT8vFt*+&6Y;$jz0M2_VmF^il8jyUpj-{-utTY_D93$HZzf53K$Nt# zwX|KK6rG*ZwFb*F9;Ee69tSQ(Xz6lXMS+~^Ku%{MXLTkid`PZ01Q53W_G<)EsY*+fraW53*fFa9z({_l0n63d+e?agJ?lMZfbmFjP>9kpj zi%UBNH*5A?gi-|DyIF{v@#1W$fNth1v!%Io3%@#BvcjL=XG?iD8R!DMTNq_v{&)IF zOd^0@!B4U!3#Dz#t$r z>k+M6-r8E%R^xKlmGtyo5Dki<+XRLD>`p zxxYfnk9&Z~5?=ct(992U*B!COc-_M?sz$VbM6L7);V-u_%W}&h;m3r#gbAWL0xUtc zp2~>r@c-68zZIZ=tOF5;GGYLn!3T0GE4$1|tWWT3lBsz#_DS?uW#jHC#cu+g2!I07 z0gQmEMhCC~!ty%634YY4S4w#? z1#jWwQh1y(7x)*vjgJlR=)gzkJNUQ(9+%IR@^Vw(#m6S#-_+eZH0TTDJDtUI<`o3y z%n6XJV_4V^b#Iz0*>h9>jE@KhyL}yfU?yVS%F=>>vn)Usy@!PtLEU%eN^@fJ-^a%h zcr;hRtTK+{<7#+ZP$k(~KLA`AL6(&OCA<9{0SFcaJcv5WeuVzR$SzI(2paYxL=o`z zT;v@A>;XY*U#Ek_{6*Qh*?;9zRZ><0zyUH0fNBVw#*$C@(IsF3eOVZYz-benlCATC;Z&UncWCZ zIc_HQ9WZiE0E|G)-}7tcNv5oShPR#WUkc>)19tgu+?aC3ALWXr|53UCu;VA};%6DS zAVvQbm`_&3;_*4aq-rdlo-Zv6_}O3AZ?)MnUF| z@J_Flx(ud8YEsF$(oys$gPQXsKox3T%ek{%I^SS!Rn-dK*)A=o6B}8@woYlfQ*&nG zivJT%&j4Kem+6;ro zyTZUXf9(>@c?Q!G)lhleuQmTQm{+SvLC>X{S~}C@ml3{D5Hxt_sHQf0YMUmy95=HX zB}_DdLJrkKUz9K~Ar)LCUA7!2u8Ov6Y&Ob|uVv=-Ry!1f6BGtT>)P7ftDA`yY)WEH z0ejdvp?z`n$gt2Q0jm@@zh?}{?c&lFZ(z5<4t!JrJY z35O@OU`-NT4qE44q6I^enDaz?XTGp=L+!N%ShG;z(6O@>0EXy_go@5B=9lcyj^h+~oQhE}(u z3(OG`zv$#8w4P2UN5gBV0+bULFG9EswkkG%{Odvu$FRrrltSRh=U~uuJoe0poe$wc>;0njN|^UvJ;g`mVs#wHhg? zo6!8A(Y3U#cC>liTPF5s`e`n|aF50symF6bfEx8VWb%cVUjD<9rd#%&`Si07pH~%| z$rE~{Z#lhDbAm_Rq@OOnkIuu9X$*F__-!sGFUrRQw+}j zO4C6N=1nRZzxiv;c0B!L=@kX--NJYg_{ri+kF|I!>QFasVCCWTRD zEuaG=ai($(Yx;U>`gU!$aoZ1?kvxlmpxaj4wqjSvBWqicNi10iHd;4`eqs;ebM7>XSJw4Fb zww}&uDeC@0Rv3$F6Y~(>2p%qqT3j=Fk}A;cMiJUi*d$72*ixm$ya)Ob22i6TNZ^!1I4n74)2l@g{^I!gQHtxmh)6G~ny?vKghl1(wXbm+#%gl17Q?R;Z;2 zOZkL?$3@JyshfrZzPj5L0sUJcH0@Inp^0uGWJoAdll@MS3iC+f?^RP0g7^=S9_L58 zyyF+U1aDfl#KDP1-Jk{Enb__@O~SwZLStMEjxs_rI&hC=-LYR8+JVT>JmC07hNcIP zSQeM_s)*%22wbk9Ch2|(r=F%u)0CIqOieQqgYuxK{87gzw#P^dJnV+bA51;)_&;{4BTj((J@vt4OjzpuZGFjFLG8N3^FC zEQ0K99_^GTdVVnbs_1fRFzr&c;$2rq7aC00sY$n89ld5^Pju1L&gfWPv?sdWVA`uL z-?AtAPJ`)gHR<&0qdkTU@arNw{aZlMEV}!ItvYKO&D2QYtJg;tPb{VjxbBANttYQe z@WvaWJ3;7NrD7ILyg7QaWH8^aqVeDEjXoPrp0T93Oo?nktPmqx-z%naIY|Vo8Nsfs ziZKi%ZaJN#|BLX99U9~4=I)*z-+FHk(V`ix`!|^J5SFn0DAF|sFzV(5ccgD!09z6r znANyh%wSW?a9H`6-?yO;YGG*%7}*$VAzF|d(qj3E+E1gX!otd#5TD%gMzKf(OMZ!MJT(HXaP^)r+mJs0d50AOVZ9k5pnkLqI;(J>e1#pq?k z1R(3&(h1C(39}_y5Us=pl2k~UF}EDogoW|TF-?%JBu++N<@ZoJMhX(J%f)DPILAT( zP7E@y@56X$?|NS-zOGG##)(NP86fX*GeD_}TBmN0PO-KQVZ01L4BbZMj9&yz%7*#V z8zHe^g#WM+!u8gRRnlR3FT{WY`+G(NmdF0zwg2!-@u@+GXOC?qP-NDC5>Xp zDkSA(A!Od9Vkkm(Fa#EWdEwCm$7?e*v}_RrFNU!HSpU#KS74*JXUIoVwhDSU337{E zi2gURjqw*RqLwoAHdPN1eRUbIjol7ryBw8_{Y}UywqHSc{F*51=nh4qU8zX4tAs=| zT^*5Vh^AeJJ9#F+mx#j5bB=)qA*NlCI;a9JlSSt^TKfGY;aV7vBIt$AxK1@d)C{ly zW)7Q4RwGl7M-K)^D`#v*%{Y1)t(pP<>4LN>=0pLn`I;8dQr`bHO-})PoFtS(;wEHB z$w#iS4!jev$Vu89e%IGDl~(fSzosd6u*zk@3kD>Z;v{_@>|}JRv+E|>W6a+9N-;!O z!R97~U|?ei-tSvK)B{Oc03-(h(LqzJD1afTc5lZ80l6=*!bt|$-6BF&Ki1K=p&ucO zlY&%Pr}MG)m`n$l-6S4NZ8?Ih#Oso(#WJeEEU>mGNpUTIy*;ML1{U@ySeLdQiffi| zdq>RN>CTv|Qdpmc{5L%fedud~lbd4JHwASs#=IM4uuZGvUGTeCV)QY3$c`H$MU}L= zq1iEYEau{%ensqeR9{MrZ6Q;8YE^6@U$8mWHfnoZ20UT@yA-UmB&W2>ok@zH2o=<= z@?0J%o8#WR0A$D_z>;M`srx)tkJy2 zL(mSX9oo=ex6#)-C=hV|ft@WeJD1C4%i5Y7TV2f!HA4!Dv&>DBkH|a?RV4j| zFvkfGGe<*87D;=Vr+8Ru^ilY2d4-=2^vYKSzN?3 zv!6%IZxZf0&XOeCTl^Lev+CatTPT_D@+UnkgC64_d)Ta!KSM_e@4-q5WB?AXqn=pb zM*`+7*))C#+?2qqA{Ya`@L@Xw24JVIRfj5s@lGwE4Jz1^kk=ER`1WJ!{!)I-9$0inY=r z{yx0z#A0O?z?#-NpmKHzKRPI7Q711xm*qqJ|KvnoeVMWquzoqzUsNGy0`sfSWw|kP zgaMaQ$q${&l6h%?WSOC@f?B3|{P2)uOq{Q3eHzen7T{n^{69ldT$Ftw;fek)y??3=jm^PpV3qsI8LSj4$l5ShhuktdheFeln!m;Hp zxU6uwquL#Sby&#{ds#AF#gD-s`)YNyx|)V+rJDIHUeeA?qi3H~-nc_Bv7U1hxwZNV zLAR_qiC!aDhqQsU;v}S>i^a;?UXJMlt)Mk(x_liM$g6EVPaN#X$aNx1+~nmS)WLx^ zx61)5O9yO#1b|6SKDR!8Aq0<#tbqH-_QfgZm#q&S0HW=}9RyicxCt%ve7T`yy?|fZ z!7R?6&|wa*AHHzy254jG#q%ah2PaAGlQ+_~=}u;n63;$Y);W8&K#kZXj-_V_Q-SN&Gl!|HQ*I}Z)6ud_^bu@c&k9+5R=jLr)U+-a2F&>WiX@N^ zH~X212mS2X(GmG1EYvCfmIt4ftd!L_l?4c7R?dM3QJSKZwy8_uL6oK{rB$Vs zp}2JA9C(mR3)AG%n%2_g4tHx^U2V&Bw=Gbq1QcE|#n2&yuU2Rpk^j;I2Vt zO)5?gQDMfy{^EUu%$}5+5iVHPA_{^x53+W&q)T|kM%EM~C*z?7#jo7RK8}I-fiS3o zqZhG%%`jk|X;}U7%SPFw1`Bw%5z@*{Y}{Z}D@p#JO)TF4%0N}CBESj^W^e%`4SRuf zt{GgtFe&VR#m)@*BD#3tbEGEF1_wfDaw0&;(vmMNWRl86r4UmgE?2BD{Jn5uH%m#( zO;U;hXS+f!<)yos@yuMKLIQfandXNYC+J}(&8C| z%(scnY*z9B93#^ptPnal4VVn4B#b8y$@(R#jF>mV%@bp-1tA#KC7YJ!#)jrPq8~=p zf*>4ZG>rf^?ZxC;qWhJQ>iSDUQhkhM{F?AM@Mog7lC(?t3!7Q0G)nlvE!i#r0!b9G`cQg8tEovK!xOUe#usrH)A&p zAZ3#9wRbS9me}`z#M^%dvm{=R9SGb?djr(5-pIe%$}D*|sV1erS(#K-7104Ag@%sy zR;WDxHtrZ>^XTpJ`?7(P2(UBJO$n1g_d8*~ru<&Env)EFP|PVzg-^Kyb@TK#Mx&zJ z>gvh-Px%qBjZprPxWB>cMntu`AprTp5a~VXVv!y~zM(N&zu={pGfVWB&~M&X!YuJ! z&Sp9x;7fFXQKM~*(O!(y+W$@pcY}Kk=5k=2zi-3lkd;Pq{=sj*oMqGR_;Z)DV){M* z7yPmP6L~<;7h`4&&?+T?+4*n2@CsH!f8-nBkLf>9YbKym$~K-;T1Jw8#*vtUbO$@3 z4eED+=aK|z7Y_Wl6#i>+&#oY)|K&%nU`|Xy6te;A3ScWzLMfklEi0BJ%J*kblO|U~ z`HE{WwTXuYp{_WC~2* zlhXtB;J_;xvxq0vgOI_yk?M9en{mTJ)E=`_>S_Ql>+lW@_%KHvs`d5i(d zJfu}*`FJ+KX6t?BYvyASD&AtNsM&U=qBefs%~InFZ8Ei~u1TR5Pcr*?1wsebt$+}; zaL+;S%Fbw@$=eHj5sE{mc|swAQ>?0pw_Z>Vz!eImTE5VX9``b(mwl7WTA3*{Vyk@j zB?K9Wr}+XWs1;gKMgWKU6%`*^O4^V4JcXrFPP0aHa8l z6{`z?RbdY=yNeYVHwg5R!KsrWa)?Rw@xHs5sh}TfSuYe=xOxrc3{$^S-ARfD_}zDb zn>fhdzKdmL4?(Lm0CvOYOQh3+7zm}DCtt+V?`HPw5yAT86*Bb0TKP>p;3csy8_0i+W}k4 zIYDM$$=Bb*3Nrxb-HmcqwEz_bn?oUeQn!;IxQEqRt_iKBDwn{#i}EwGs4)?sUcvz9 zRm6Dmb+Y(3#e#I#PC!{5=WX}0TDqHiSH@a0An+(laELm}5**`@l|>&#Us!z(LMpqmiX!AidlSPU~JOw5;KA;{UTu}z;W`9t5KV@SffO=sj_+Obs_mKGfLH5H` zT#4YPA7HUbe-tZ~l?OM%w2#1o&pyP@Ilu~Sk1DV2u(GpYV?Bni>Tx_!wi((d@Zm}R z=mBO=h0CbBalKW$s~j<+Sx-X&PpE->xHu1+kr(p}JYxjO_U!+sMaFaL7SX)*Ad8B5 zUc8Z%Kk+pO0S7pO7lTX)G8*WM{Dy;&68{pCQgo>=!(c&%@t2`OEPUZWPOQv-h5vAn z<GL#$=BWoFwa|*d(We$TGQKDbtDk3iP@lu z?}#HDx)%e6%Dc*X9aFYBgvhyTWL0p_Lo9RY95|DTlNY}B;e-70)x=Wy3&(XcF+to(fpp}%Fe|aH zwTd5l2(~6O@nsJ)d->_V*ok@Z$(=N{G<%j3 zIi+h!HQ)U(s~?4c5+<42YL!<#Z>&K?ua%ghwhqQ(s>l2e5X#&9augL%7f5Vg65dSa zrP$9&#~3a+p}~aUqwx%(%pz*3f*6;Hb6`^wF}q86yTshYH=RjM`CvfF>Jx-W3k<~2 ziU}q1x;aT~8^%xNoLDy>UB*m|=sXxzgsj))eC^{bd31%4(dL!Hno)@v7#{@};S~}$<7HlVR0ZzLXhjA_nTSc82z;43HXXTxqM`n4UWS(NT zxAF~-u*6I-m{5=DI}~>C=^0(8&_=Sol(CNQeT1b)qh;jx@>>owo0QeXKYWB`^2Z)w z4qkQ$K(`Ah|DalDuI^C`GjPHfm_^EZ>BE*$8A)pa zqrqkh_m<=5e>udm`4flOEGcu47d*-`q#@Dal8vekFA8^P7!J+4KaV7hgg0p@?SAIP zI0&&WUT}uNNP;Zn*=QvR;szl8S{}ox!^GPWB|;BjWc8%FZ!xl8nFy&K6%CeY@(dlcL2UeR6VK3?(! zGeg|A3G(v2BbmeqmXCtfc_2+frkTM6QfMoEoxKXxgw~G;@_M?4{Gw{oePLp~zguo? zx<5>Edk2U7GBIg7LLBNHm1&SXAg@6d8by&k0HShC>E{e@?~vCIqclAjZeH(e_X}bo zm`6&*Cd|czi&GDWDK1Es?SV-0AH$R;oNfZxON&}ZpppG-479;P)zzKp17dLm2&K>)-&Y_5A! zOyBm@Nz;b_`k07wTOi#j!1A%;(fBnGOYYK=SEH-fsC_rrRv60Z% zfjn&vYzQ4fS`*P9k!#8Kf)ZbVS|@!TDEUPS_lNdB#Vjjcf?sl63T^oKm$9b!JP-z+ ztYGE+;-#rqsQ6Nl=~ZP()DtzoM#nFFD@iJPotHn&W{cTpnBsGn;Ui93dGBa8t4`BYcnJ(RSvE0750ALPW3$yqEI-6F>0NEty& zx({!oI2v2v^Az%771fZow1JpE1P`o=Ce@n3@Iy(ZI>C^modPx>xJ{6m0-uUN3~B%_ zw_vsxtT6*SFr*wmfzfAw%017pEczKAeuky!KUd~hLCjz9Tb_Ztr(g2vX8>RPn!gL> zx!)+|kXZIDv^M=6dK&SLK_6atk?=_gKoWBQ!Bd}QInm!i1;_V%>9edj=AXi3DEt?{ z^jTJr@q>_{5hDSV-oJ5W0BV^-%s&cDB>F$VA@?W#A#f}H8H!~z0y5@+oN|If#vB+4 zV<7m&S2JKEiLY8%34iQ4a52)COHt8qlb)o)*RP&qDOAII;ZHQ&mnRuozVkVjo&cBQ zL(4G($POJgEw;qK&2BJp3gI3+`s<;APCw74X4sq>TI<``wBGN4oB@ZY!P8i`RYs?R zj~``=q~Oo5GL0_Sag5!FcvD9dUbvlpkNrgXj%UGLVLSsO`+7a}jPnHy$iNpLXQre$ z7=U3W-Uydfsgo4M<7kZh5&($O5}?!y7v@3qkF5`7Bq^K5agKeTFt{&LLmFH$~R;3WED z`1BYa5|A)u4oS{CnE05@jwunB;4_@O;$xN$IbX{^W;L{oPkzkGXgNRfF{@k`Qz3!G z%7HJC&5=N;)b#WX_(Y()5})y|VSvQVl~jRleU)4y3zn35P=Z&v;IlI)U*!srnE4Wj z2w;XWwr^xnTK~rORfcC|0jo4z7S=pO zy9&0gZ8emIzc6TCB*{W2Z!zEX3CopS;B5hJ9>=PcU0F(OHR8){vj7^aJ>`RKm>NK| zb+9ke>UsQU5E@z{7_4SX6$WJ_sUbA@FvOuf1De>DNwUf9Rly~4szOqucp=Li;Rd=U z<-IiXyFX*;Qj5f0Ly|eFl%%)vzkLRV+nK8G%jLOhYU;ohOKlU|0DMYJ1Z!xnZ*gFD zwER)GJa?qU%s7(iQPt&+FWBV<3)t7;Weh&|1^W)tdBMbr&|dtSNm4Ofy>00q?C$Gr z>>d~lMFtxo?<@0BrC0dNhht#ALjlQegbg_zr`=T-A_I WN9jupR<0ri{~4u^{S}BL=l=ufskgQO delta 20646 zcmZ{M2Yj2w`TyN3$(DWckgY9w?G*%LdNEIfGhnC3;Sai$^mpB(hwu~kQ}P28YTv(NXM z+g+3D#I$jO1f(h`Y;(H0Iz0AfRtNt%orB^~TcY$ES|0VYU-2k+U1yktm7Fd`N)%AC zpR9wuL+nR9DsVbFJZmD9r|Xd!O_sAtMz*Suv^b+2ZbMcejQ~Pp?NYC{da%Bm3v3 zzKq(GcvRTg)zJ{1>Nv350%J+nhS>_6vFivgM7DH96fWC{VtD&Sljwx;HLp%*q3H zCZO|p!=0kj7XiDbFuVI?cEv#Eb#*p}w&V0TPC;T8W5&3RcOA-H0Nl`iLtbnW>~Ks$ z;n7kTk;e`b zfRfXH0Rg&872?%3*pOvTob*|ZWOHt)aB^~&wJ*_#J}yCNSv722hNh$6Sz`;Qj>MS9 zr|oS{vB6!xayd$lLyIbDcmJrE>#C@zK(L9^-NOUoqDquV(DcZtk5yDwAhiZf+udzQ zoq&pu=a-@6MEDM|>2RXNBxuOl)K(&rEVFT-WbM2jQpO`)q(*n4(V;~SYIm;?i;-F{ zcW2<;>5ZsZ^sM!`oUN@RVw?b512PTG90RBLUIr z7#dk)mngh;wD)N;DpqCsUj9qp7>x&W3v6-GWGgOk9QH3PYTWqG?xm zHGADMadCvWL?+gka^mdVy!?W~qAw)52>st=qVUg2)xF;xRW^N3lIsKwsV>23$Awa&d%Ttjs9r8QWmbf7Bj znsL=|VhtZ&uP|(sOCIJS!Y6eeM<2)G1uL|E1MJnuaF7DHtaQUOFgP zOp`a?YM#t~*(g}7@Y6Ke@v?)SxDHz;>B|nmlE=yt^dKsHw(c#Xx4a@0v~3JD5B86u zc#st~>td7&60)?lVXd=SZ1XI)H@13_rC4HE@G9^rmwpbt>K1G@RBMg3Og{H&fnZrk zE3d=m$@tfRWQj!5^_o?iwG4R4=ZT#=`{aeM)lp}DjDdEZ#>!Zg8y48qc=X5DaEy{| z!jZSX$C-@*zaMtOiPZPw>7Iceq<#QT2S!Jb>Onk>EDudypf|f8#?vGI9z-6&_Js?l zSgraPmUN2tICgFBwY#_Zd!(&G>PKZZk8w8Y$2np86O%9M)5f2~{QTwCRiKoofGudN z!r=zrsIRDWJ5v8qZv3>|_!-{V_H3jV_nKz!#RI+D#hh;T6D9m9#Imswr9Af&me0#9 zUtlchVxJH{8GGlcBk#6h?IMucxhuBry<3j_{mEKwF(|`1HNlrGxERmau%KiTKAVmo zPztpk`uQe>DR?3q7vh;*Y@<(H7qfV387>lR$E5wD&Sf}Dusp^#iEdkl6UMDiqVR&b z8Y(Yg+Q`|p+*1OQ`c#yBHjcsh?evZIor%aFL0mw@?UhLNH0+`F8Cht=Ry%8otj_{L zz$ZpAw!8X#gB$%w^(Sa>#&gJCNu@QT?=8dSsVMn*u7C=MJ4e{U+g^}{o2YpaShESP zbt1zF+Udl)ar4P}YtiW$4Y-E4Bh^d5JLzT4NuGo5mCzjQ1-rBD_G~zltB~qd zXkvJc(@0GmAu84DP(}VClP*L{-eiooi{mRt0`+4X95uB&1OClJTm0gHZ)8;L?GK1O zLz{<(2K|GhV*jA%>lq#M4T!@5|Azi;NOcOh#lMB@4%+MAj`H3HzWxh9&rA#sjrR2q zZe(hY^D7lcwh#IPpj`e6ZFKMO`Gk922+Nc3x6rK03lMo%9-{-P-h&n?e`mUCyBKbP zRR4ft{rhy^k0dqQ`T>yte>Uespfi6&_w9`_>eU|u8#rX@Pmpx}iata3D!R*w^YG`= zM)aA#__>YnjUw_TbRlceuh@wG$>y*vYDDS(;tAq@C081s+% zdqrS?RGWZv>Hvm4loWjEtXekD;|Vt*=ST)&qCF$oqP-5OhM=`^7)beHoERP(=@Ym3 z2FCozb^-n2c#PE=fLeBS0B3f0bapkjd)@7;kYxlpBbIld&e&}(n&XmIaB>W{fXHhhAku4ZR%ueX1* zA7yAl;Arwuq($M-g_Rhi!rZ3shWzQ{C}` zV6UUnwWkoIYtNt*qUP@!2zW-}9HyuQ>D)!lB1V8A#R@QsnJFx^j*MOyp2{|)RtqqP zZHUA{pL`DLctJY-YQj4*Yoa@Xg>G#34uLvEh6H-kHCSJeC`|hXd&QjGipJd={iEWB z{sI4>Z!>5~{~%H)31A0pL$+jk>Kbe{Xkj!Yg$)vx8Wt=SzO6c%FpVwrO&};!8-(fp zLAZ#G^2kguGJf@_&GN`Bd}Kx|9h%051vY_S;!%rOgmh_)PmdT?h)BB33syFRudF^k zGrY1{oUJ8Wpy^j*Q(lfBnIpPfm>}#~gi{q#=do#RM}~Zw^*+(37jTlC3Zy9%LPrKU ziiGL&!9bk37VCoAyKn*)j6c#7V`@FEyc@4o7}c1b98>G)4R_<7IC+|t2((`o%{qjS zYb)j(0TfiAmBt;$|C%`hYOveh*EV|({$4SAAAZq>z4XK@*q~@`Umkq_6>L<^yn%&a z=_&jQp861%&b*D|gQXwB7ho2pGaqB2gx#Z!?BLkXYU^w*Yq3WPyxjxr3}6swi@NMPNe_O84a$0CGD#)M`g&xf zCq4sjqXC&LQkkl$37M?yr!m`x!O?SyIW0ybtj_QppTXS;Y|QlSJBU$ZfjM-;*{?uF zR%-kLEH)cm_60V?fHQ?G>GbR`uxUYB2Ae6I(TLySb~(EIqhol@46c^C4?zl`_ zA+*pIVaaD1@qvlc>TXA>Vkk{7q5a))X$wmE&gbMdR_tCiG%yASywC6J^)sJ`l!dkz zsqD}uvphuXp8XOpGm&o!Lm&eQwy1>|OnOx4P-d(FK!zLW*>S@8WS1Fzn<*qh!A10B zoKPN&ix=tyt=T#6wxaDCVU@yomV9)A8o{J6w#i@bY6Q2!;=z;R22*fpf^bNoFkU6q z>8YR}qT9TooyIHDn{* z?d(PjQ8qZeZYaAWy3Flr>VUF4=ahk)kd5?rMVECtSB`sF>${^%nX{RVQV&I!dEC(0 ze0WZg*V*L--_`}~k3?5^o7))AqjSpEc0w7s2gJ0=BLZHdzLy^bbKNXv7x(fmx7!O- z_guWx#ivHsqzW11X+f!)&FJz_jhMYO&vW)*Hp;kKHrpPQ`eADxH3&Y2 zoQHUwY9z z2`V9p>lfyrXbXU0P+KT$#QNl=fPz4GtS=Yb)y6Yf-DO3>yV#iGi`2FGMtk~Dem5J+ z&Jy89yeF7dDp+ETDYr+6Rt~fAX5GPv)>R4C29$DVq_%adRC^cHx`qa~_yeQj$S7Ed zlFuWK2#-?#2-b)XEXfH za1Z^eO3)YI3qTQwlEXE@&^urE2r|q9K*MGxb-h;t(j3STl)#i&)qUU-6x~l-s)fSD z2au$_RS!a$;UOwk3;M)|CA0*o9)U8;F`7|Gj0$8tP9Lcj44OxoZvpm@1DPMA?^FvW z^W(C&;XnybplLs-!kk=31u{KJwKam#^;F2|n(w!&!Ea?(gc{t{;Q=2~gKsJ!4$pCq zNBum9o2)O;O*MkW_97}SXY)=u5m{U5zC<}E>A@NyD=Fb6c?lV|mGv@xp+?BWuh1`Q zgxuJIKcnJZc|K~Z6*6P{BNBj9Q;c$0lJi%mmg0p@~MI{L&7LxIh{QL(V1 zvaHfkBvv?p!6`PD63gmB-Yfx1m0#=Rl4$_PB7#}9r|uhh1-lJ~Lr9agnfTh*1>&IN*={$qh) zip~EUtJzLt>R{>_@3N1z)Lti;@q28c4D{SOA+{>v?;*JZAkq2{Sh_**tnH$2V5@KY zh&VFV)8qH|+ELv5vM}a;Kxv(jqh&5E`AGIID^U5z^yG4qO5d&%tQp|RBK4=TaD4_J z@t-pwf*F`5@MR@bt}p?dSB}c%fo~1&t7ON3Zw*c?QiI>hj1Ak@h;}|kEaTsB5hDKv zMio<|+kMFJAKtz&Vj((;5cw7u$%gB9T)b4L*$Dp2q*H45{m-`hK^_43VE@*2*$&pB5% z2eY0TY1VRj`&9}{c?G@19{budh;M#nteUXV=p7 zeTuAt1fe1tiZA-3%T1nvsWQl!T!}Qilzqw)fq6Lti@E^r^qZ{66#n) zs-;k#b|$lC7^*LKu&Xl)i&#ca>{D2+^^tX-i$%CFJ^Y4X%4qv$Mjqe6+z)ockWK)unFGHY zsa8OZv1`s2170)1+~gz=PJ~_MfGqeug$1<&Z&watCem{!cc-3zkgnS9A-ec!sd*>DYe7$AZnuKCE=xq+-X+0fnHR@DC1+ zZR`_grxf2Rrmj^C<6?TjwF;Ax;rPK{U#l3wNzcD{;fqG-iu3X0Xa7i5___yXK2!+QA_%3l zd@;@qZunSHjfG4HQwr&H_7jDh9zLuz2a`Wlm;}MrD*?^HWuGh7V6A1x{2~7C3&kaZ z@p8#c4=(#su>uRW-$_mAZC@$UwbonbwFtiQmEv(MSe~MyE6yCe>tBi%_)l1bmd zI#~YBln~wjjpA~__@(Us|6B2}VELa^q56;Fr6fxNJEJ^S2`1*$w~GB`mITDylZLKU z`=fl0u2tE{k|@PUdDvV~? zBiegfF{m)+%3sOQFBY^Brimnznv`CWoUoL00BU=X25~n=0mpMOL}iy zdn;ShD7~k>Eu`io)#O0r55S9E(x9}!vtwiAHS92hTPIlpRY(ioT(6%&K%g5PPzPX+ zgzJZjkQO{P);g>{jfc6TxgrVtGY&*as+WLkCYuFX@W>)HtVg&wW%UssWS9%HQ7!k) z5e$!gCZK!=a3R?wF6)ybD^p#nTETWcm(%txm0fGwJWo#Pue($i=a|Rl6-(|2xGL%` z+$OHv%8sy+)_YW23Jn*{qh=5&()@~b&tj&q18{%_diQu$Gv1g*^pr=HJG(cg3Jd1_ z>>4)F<||{ewC1blv7uY9j5%lKs+f5C%9SytQ`g2cYRxy#r}11HbGz1j=lo)FU5r=A zJ4y#W6LRQ|>tfWYIkU{9iaI?WJEhmfl&L$q*4n$go?TPd$Ly9@#~Qrh`j|DK2KGt{ zFqn8SW{V(L?v?Zwz4qpquJM{$hG&7DC*xU$fAfTcaCoJp5(rYj>SMbXE=4M^_>l2C zWUuCcdvkOhGyM$zjgGv90%Te+1H)1}8mMeTDlh?23K)O#t=B3+(kKNi!N@%bl*j-! z;hbqp+e0vj5x?p(6}0?vMY>xJ=p3^&%mB@CcL~5+2xt3yMu!618G^&GI(85s3=UWw z(gH}w?HG`G)|E95(=Pyy&xj8*R}mmoYxvnyf&M~bP2D6C6flCtE0RTVb1aK_hO!wAw?c2qL?IfEf!8 zWSU@lX%30ho9<$!X2RuCne~#W5wHQU1I(RL)vxii5*aR)Mxw))(VK^rsR{_DFgQ$m zg{+|W$_n~QdTLl{PQMC9A;l$8%D$*!a^rQs%wkevk$Zq|iTY~JN;L)RZ>DV3neJmr zA8pHL9*Y@OG9Zm!Hccv8>=_b71JQ}V=-9A35ZDs|X&QZS=l6o={C~MJYE+XcQL`L{ zDtkvu6rcmCIJ32}JMqQ1E*Ac$4&u7FAB)B-c0(9emf{E;Ss~8}%%w^gVl|ku?5O@6 zrV25$jbj6lxdE^!b9$K>a$IRgswyUf)o`JJhnH3ZHlGyZXq=c6;)r1}j+|Or-4mB> z2O}6IgXtR`;7J9`cOF!t0^=8zok4f^#Fd&C|Fjy+U*uX!pXrHPpy$CT2n8bbGQRd! zC#L1Qi5b^3$k&qKlBH|`N^8J$csH>wbpr!KBepM)b|uOwl}ueG-i9VV%IF1YMLNmy zo$Za=Ya`NBePeSgV2+V~J@!0cR{LbQ61eS^>+y1W#m@Ma@yw^O?4Uv( zrFV_@;)qcOUx3;^!_H3#8-_K2qGzLvJY|5_rv53qsNMTAa`drDmsCg(y&9c05GAwk;=T@vb^rHyzOEhLt6pu zJ_&>~yW_o@N~G%wxizz|vpswxzL@SiU(g5Rl;jgU8$+Jfnb&&}bF&)8HV?bEK>kAn zIeyzhmYb_qO4Ti0?X8{8_GVY4`V1>MHe(~Xbp1PmF-Vq?k8nZ{3z9mdERfp}ed`)* zu2=toqaNzp5sxL^0oO6RpQ@1xECOV`E0oz3PS0}5F;Lar?5aHk8Ctp}#v^FjH!?8M z(AB)k%>Xi&FA&&{)JGYp;{!}Q3>&HM1&n5B0I6rCYaQhV5q;q(vC~XmuNlE&N)Bs~b5mG-S{|iti`_6fUw~zI-c6gEPINj_bR^d@zXacEcSM^E{ z(uA-~NJpx8f;R6A^0g)V@#++nUIRZt%a7^269u3)**mYfH1HG zL@DVic;{K9BaU8ml<3q*1&Aj~f0nNHlC*I^JCPAGaq8-(xTPBkP=gcvJV!z`FTjGa z0Ci<8(!I#-o@foCIU!q~bqhgexCInd4@Ru{CFo$`6f>8j)r$)e4J7JFdsv0C|4e`M zk}Uix&00w^${`&GXga1nLh7;h4a0X)21VMx`K$V&jekE#^f@i8$7=Ebb3Ub!1t zmeMQN6SLt=E+=Y8^^m-b~hB257OvIJ5QB{oCMf<;;SpgGc<1r>7QXju!3X0XIjmSD=NAse*xXR=7$ z?Ow5gtsujz`+y+QN7wdh4n<~LhVxh-! zAHSQRyuQ7~5jG;};SI#NAg^1hbwh2G0l*lsBALaq9*L-FUC0JlPQTkg?53LD$graA z)8OKbq?ic#$&)u#=bEduk{RLZTxs`oy4?+t+wWk2JUyOak*aHJDjZQGV4u?Pv#fHp zt0FRWF}t<~zBz$SCg_?+0NY6gX!}Nw{+f`7|TYTs4Xg zAoUp6v6?L*9Xo-tw$cxFl1#jfs&|nzVLPG~e}MZb?Lz9@MQoM7fVPHTLbLfPCrEV> zR1rXWq)QpP8HaDn4!U<2F{g`QCCE8n;OKIl0Di1$7toaKrcdr7#c31p+qj1xe@GjX zJS%XQM6eOEFQ%H^aQ$CG?YoIZ__Z`Bv*uEHQVx`M86Db9Y^9gO6(4^^C}5`ED;p_S zMvN5oRXn;^xQ_;RlY-d&(5r0{(S+NHNr5Z}rY4BF^J>PJ<5j9DATUvu*~*NIxiPzh zYog|*nU?2OSBKQsar;7bJ+xkQ1MQ!Hkj9O$Rq#webr8zbH}QK|4Ja14n#gtwH)N9& zej{5kkmrhQzm-ZYxxa%ZWJX?F2!H$@zAd*hXL#6RkrA^fF< zWZyY27&QNg%+B;a+sZi^NPX;;g9=iBQNf3j*>KaPB&h=8rI1R=tzee#%e-96r>OWE za1X(}6*mNiHt!5SlF0jv{`FFl3;C4F%OKb13+jM>%wIAdU&)s7Kjkd}EB0S>+hwF2 ze@$Jx>^*@r3SEI^rY3u<~q5KYJFmpMH(Nx+U@_#Gsv-`={ zI4NZJF#N3izlff700!_qyNnEq{2vhAcYx&P15}2R03DM=HMep@NfjahjY(Mukn#<9 z7+NG?dgU%+pkEyz*;qlZ_#7Jx02N~yoIgoe11OdytTAw=8d>7#m4}Gg395n_ePE1- z3>Xz)UnnhsVKh;et89C@TiGZ;k;tQPCezN>!NBr;4oS>fss9Clg-QJb7A7Uk>7Y}V zg$ZK@NDP?_Sdxf2`w6dNW~PWhZxxBnQe9|3BNbJo|Z5rT{2BfXXNqwvQtXjkGjTq0i+@^t73V&G#+VK$b#+qB?W7*BpdGi9LOuBCVV}SQ)fHY`d<|_mKuT2R zmF(xqje>4 z37h(dQ3AvgWdN)KSH4=RgDIk}m)N^IV8>OV6spHZ(k%vLnrTK*NsF0&rc{ zL-%PuYQ2Nl;=4m_tLPWNOECA+v+p3L6n_-`2B0tANcY@9igbPQ;p>NgSq>$Ds^?RD zCrJetcN5T=26&F;X1Trsl@7A{5v?i>bSaWz|Kn zJ@egj$TtSqSpx3He-^mg0kf9E?;%-&j9Y-AB@1D}LS)=YhwmbWn%%(rXFPLwAgY-N zjTmHb4~#|)$a7uA6e_udK6n=?#=oZT-$gP2QjWQsG#D=r%_+*uHe3O*yJ|sKxfhy~ zE5mxv3IOx}M?0zja7OO^bOv||lhC|KFk}J7Ea^nRm?fPE7_+1kL4YWbgJkC%B1N&& z@Y{MVrdO;a=A7$T;wpIm5Lx_*_piDEC@nWiI^2Aai;?;!84JIe+i-?k=%a^-e%)`_ zP$AVn$`fR_XXhJ%MmeD>`j#cG-@F1G}@8n9(h|F6QL~qCD{&U$wNx0gd^n6Vg|sO(nMymu_WMxAYYW6 z0(${cK`;`P+)oc3A;sPY9GX;E7lh7{>Je5C5BIL&H?^Z?_vp~5 zZ{WOcfOb)k*cO_E4&PQST%bcAHkJ9=EJ>y<5m*3>Pt5m08Y~(F@Y!%4x zHn4(xOn8Y=xw|tk1ds2H}aE{~?Q2v(L1T*utgG%n~6f z5|^^KAyXR9nr~}E#&n)k-wE$xd7;OHjG4S}H8N)LUu%&mTl$r-b}drp@RcdZrB~la z@^K#Z-4Doy(>ZlNkrMR_qynC(UwJ=~67`EXQBxB=7pPRt&B$27igXHODrG;6xQsW0 zq1dHgDmIjIUI;^};J;ufmC`S1C=Nc9+A8|*`$>%jB1Ce0r=F+6LV`~XzLo`r+z*g! z+XC<;`SaSys{=nIvaLnNI(DX0%{!4Ef<&^4lpbTOX4R%e^zH{>v(A7Ou2@W;dw`Ui zm(1^sCrA~ZNp%l`*e;`sA0!s+l=x=sM27mgeBlo*c$<(4LPltL1O4@bq;cHMG$$Od zMp+CNPBae;_&35cM*h@G1<6rJ-^7F*wDO(+d(tTaN&*3Lh!)9mWdO4#;esvL2 zw{T^v1Dj^<`TTQ?pT5KO`TA}%m+A#D_|fAT{vWGLmr@) ziJg?nx$7=cDn~sw zy+MwgZUi=2eQ?gh(OY{1e^bmO%94a+g0%zFr~8hBg_LtXefeRM9Rt=*q-=m19sze| zGyUo~F_dZsWrGBKEHVUid@(g(`*5Sl!Av07N|`~b(ur~cbU(0&8Hr+>H%kBf2+55Z z3zu2&7HT;L9{X0QrzQy2^u#O~-cte?GJGwD3sCAW!qOVb5>NUi*OqLxeBcgW z#P-FaO91PJH`@$_VB)ax9Xtj&VBQY;*JCgeX3X$~us|+;?s1Y8vnyO=7V>w~4aZ3y zo?!g+H0cC1&#^pUa$`g|?;x^dPWadNmjP`PEV= zT@40~Wb<4Db7Ph@h&{7&)YmfWuNUQCPrrVY0hvFqb) zll!)3BjZufm*E(ycg#N`6`R3ui4?E)_YTSxrhB6+ynPU2mKqplqstou{Zgq3Y?%lf zj}IPI^^UV{4Pe(qRgCe$z#k-#0!R4|%#jvQqZ1M0vwVYNz5wtrfgKbnZuEBtc)1>o zqDXlg%W#CZKo5rs$Jvu3=Ww8Z0HVH+gi2Xq8ylJKSai`@V}pJuJ3hB;fX(31=raCt z0A39}7G3J`50Cmccl!gd&X0#Gmb0!pAP-0?H$4$5XT|OC*qzgxo{TPs!y=cfpW;ho z{v&<#2{5>xrf)n!^2Xt>CP)t_OwYpGWckgD1M*ayfq-v2WXr&xOyDn1ARvRxV14bJ z``19E$0{h{d5KC20HKr@fJ%!0NKXO4YO}uhGwq}v)}X`_P$vb7m;s-BlC@>wApS<% z^b&mk%v+wgmob0nqJKr+@#sMt{tVBWUr!ZEUu8NZl{%jS317LH-gx zz3Mku(Ke)d6HamBDW?1+AkPT{e2Xn;7}R?^WHW~x0cN#vMZM$fxpTtC8U|n&kmsCGT^3 z_>Uyl^`(486o>`8Hb8g1qE8$d_VxH#y4hE9vs!p%0bS|;1;g6zn}7(t4-Cvr027~y z^1r60r%7JyH$Y(jH>M9iLu_>Y({v3Nx<|HN9b1e9!DDasv)3-zML) zhrG(EbD>=E4ly-p_&ex1%a8!WV9Nl26TH*@8NdnNXQPB<_6AzIf#GecmiD|u3S;1r zHZrBseeV#XStr1yv0X}i>h|?)3W=OSPal1U==Jbqn}HMHxbbi}JfScNM-O|G@zlGd zH@QTE7<%Xl^Z-b*)_Do77*kp4W$%*fwFWZ)!_mnLwE8{r#LV9T-}JsuO5%$7lkBV# zddd3`#3-e=y-!?Vwtx0MaX`#G^8->_qAuq|q(TTskt>C$D6-libE%>aeE?jl>02KV zld%RKXG@S3KXOv4fT329j(9;G&H9++3kzYheORAJ7RlQQ0pT+Qx?)7oB>@Dr7~Xn^ zf;04u|0?olKZMLIh2<0I^riIR#}J1(lQZro%Vfq5lY<6*B}hiEFUob5{uEJa!%rHh-Fz$5jq+3Z;Q)m{bb4)NOD^ccI zwC@v=A++$>&|{|*B+lt_xxocWYo&)jAvU2cQkN8uvfJ6SeK02`Z~D@tL}eY3S~7Y2 zmvOlwGImBS2%9({0A4pzuaHO6B}^XnTJ2o%!8KrA4N5S2`@{AYQmui5XkH8TQ=gJc zwN|jQ=THXer{rr$+&#cjOM^FmLB7KV+atJRn7vhN?H?HphuY|!UlGg9KZ!=217U)) zTx6g9ANeiTT9?k3y~96}4Z<0XQfTq&V$Ge)%$@T{*!ZMBJhK8=X}jd82FnYVa%4U8 z$b(5(qk_i(8(DU-nU)BeCj{FV<8Ps{3e7oM^M&(T&h(=RH1oaYn_~5 Ue5q1XF4(BVF?dp``SHU42OqgfTL1t6 diff --git a/A2osX.S.QC.txt b/A2osX.S.QC.txt index e6fb4b37..3a67155a 100644 --- a/A2osX.S.QC.txt +++ b/A2osX.S.QC.txt @@ -162,14 +162,14 @@ MLIREAD00 .DA #4 MLICLOSE00 .DA #1 .BS 1 *-------------------------------------- -SYSKERNEL >PSTRING "SYS/KERNEL" +SYSKERNEL >PSTR "SYS/KERNEL" *-------------------------------------- -MSG.INIT1 >PSTRING "A2osX[Stage1]:Init" -MSG.SETPREFIXOK >PSTRING "Set Prefix OK" -MSG.SETPREFIXKO >PSTRING "Insert Vol:" -MSG.KLOADING >PSTRING "Loading Kernel..." -MSG.KLOADING.KO >PSTRING "Error While Loading Kernel." -MSG.INIT1OK >PSTRING "A2osX[Stage1]:Complete." +MSG.INIT1 >PSTR "A2osX[Stage1]:Init" +MSG.SETPREFIXOK >PSTR "Set Prefix OK" +MSG.SETPREFIXKO >PSTR "Insert Vol:" +MSG.KLOADING >PSTR "Loading Kernel..." +MSG.KLOADING.KO >PSTR "Error While Loading Kernel." +MSG.INIT1OK >PSTR "A2osX[Stage1]:Complete." *-------------------------------------- .BS $1300-* .EP diff --git a/A2osX.S.txt b/A2osX.S.txt index 33650cec..b99a4c7f 100644 --- a/A2osX.S.txt +++ b/A2osX.S.txt @@ -361,25 +361,25 @@ LoadKM ldx Boot.Prefix *-------------------------------------- .INB X.PRINTF.S *-------------------------------------- -MSG.INIT0 >CSTRING "A2osX[Stage0]:Init\n" -MSG.SYSMEM >CSTRING "Checking System Memory..." -MSG.SYSMEM.OK >CSTRING "128k Detected.\n" -MSG.SYSMEM.KO >CSTRING "A2osX Requires At Least 128k Memory.\n" +MSG.INIT0 >CSTR "A2osX[Stage0]:Init\n" +MSG.SYSMEM >CSTR "Checking System Memory..." +MSG.SYSMEM.OK >CSTR "128k Detected.\n" +MSG.SYSMEM.KO >CSTR "A2osX Requires At Least 128k Memory.\n" -MSG.CPU >CSTRING "Checking CPU..." -MSG.CPU.OK >CSTRING "65C02 CPU (or higher) Detected.\n" -MSG.CPU.KO >CSTRING "A2osX Requires At Least A 65C02 CPU.\n" +MSG.CPU >CSTR "Checking CPU..." +MSG.CPU.OK >CSTR "65C02 CPU (or higher) Detected.\n" +MSG.CPU.KO >CSTR "A2osX Requires At Least A 65C02 CPU.\n" -MSG.RAMDRV >CSTRING "Checking ProDOS RamDrive..." -MSG.RAMDRV.OK >CSTRING "Successfully Disabled.\n" -MSG.RAMDRV.KO0 >CSTRING "Not Detected.\n" -MSG.RAMDRV.KO1 >CSTRING "Uninstall Failed !!!\n" +MSG.RAMDRV >CSTR "Checking ProDOS RamDrive..." +MSG.RAMDRV.OK >CSTR "Successfully Disabled.\n" +MSG.RAMDRV.KO0 >CSTR "Not Detected.\n" +MSG.RAMDRV.KO1 >CSTR "Uninstall Failed !!!\n" -MSG.BOOTPREFIX >CSTRING "Boot Prefix:" +MSG.BOOTPREFIX >CSTR "Boot Prefix:" -MSG.KMENUM >CSTRING "Looking For Kernel Modules...\n" -MSG.KMLOAD >CSTRING "***Loading KM : " -MSG.INIT0OK >CSTRING "A2osX[Stage0]:Complete.\n" +MSG.KMENUM >CSTR "Looking For Kernel Modules...\n" +MSG.KMLOAD >CSTR "***Loading KM : " +MSG.INIT0OK >CSTR "A2osX[Stage0]:Complete.\n" *-------------------------------------- MLIGETPREFIX01 .DA #1 .DA Boot.Prefix @@ -415,8 +415,8 @@ MLIQUIT01 .DA #4 .DA #0 .DA 0 *-------------------------------------- -SYS >PSTRING "SYS/" -KM.PREFIX >PSTRING "KM." +SYS >PSTR "SYS/" +KM.PREFIX >PSTR "KM." *-------------------------------------- .EP *-------------------------------------- diff --git a/BIN/ARP.S.txt b/BIN/ARP.S.txt index 8c6fdc6e..c0e4c05d 100644 --- a/BIN/ARP.S.txt +++ b/BIN/ARP.S.txt @@ -44,19 +44,19 @@ L.MSG2 .DA MSG2 .DA 0 *-------------------------------------- CS.INIT >LDYA L.LIBTCPIP - >SYSCALL SYS.LoadLibYA + >SYSCALL LoadLibYA sta hLIBTCPIP - >SYSCALL SYS.GetArgC + >SYSCALL GetArgC cmp #1 beq CS.INIT.DUMP >PUSHW L.DST.IP >PUSHW L.SSCANF.IP lda #1 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA >PUSHYA - >SYSCALL SYS.SSCANF + >SYSCALL SSCANF bcs .9 @@ -75,7 +75,7 @@ CS.INIT >LDYA L.LIBTCPIP CS.INIT.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.ARP.GETCACHE >STYA ZPPTR1 >LDYA L.MSG0 - >SYSCALL SYS.PRINTFYA + >SYSCALL PRINTFYA ldx #K.ARPCACHE.SIZE @@ -103,7 +103,7 @@ CS.INIT.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.ARP.GETCACHE >LDYA L.MSG1 phx - >SYSCALL SYS.PRINTFYA + >SYSCALL PRINTFYA plx .4 lda ZPPTR1 @@ -132,7 +132,7 @@ CS.RUN jsr Init.Timeout jsr Wait.TimeOut bcs .9 - >SYSCALL SYS.Sleep + >SYSCALL Sleep bra .1 .2 ldx #5 @@ -146,7 +146,7 @@ CS.RUN jsr Init.Timeout bpl .4 >LDYA L.MSG2 - >SYSCALL SYS.PRINTFYA + >SYSCALL PRINTFYA lda #0 @@ -189,7 +189,7 @@ CS.DOEVENT lda (pEvent) rts *-------------------------------------- CS.QUIT lda hLIBTCPIP - >SYSCALL SYS.UnloadLibA + >SYSCALL UnloadLibA clc rts *-------------------------------------- @@ -209,11 +209,11 @@ Wait.TimeOut sec .9 rts *-------------------------------------- CS.END -LIBTCPIP >PSTRING "libtcpip.o" -SSCANF.IP >PSTRING "%d.%d.%d.%d" -MSG0 >CSTRING "STS TTL MAC Address IP Address\n" -MSG1 >CSTRING "$%h %5D %h:%h:%h:%h:%h:%h %d.%d.%d.%d\n" -MSG2 >CSTRING "%d.%d.%d.%d is at %h:%h:%h:%h:%h:%h\n" +LIBTCPIP >PSTR "libtcpip.o" +SSCANF.IP >PSTR "%d.%d.%d.%d" +MSG0 >CSTR "STS TTL MAC Address IP Address\n" +MSG1 >CSTR "$%h %5D %h:%h:%h:%h:%h:%h %d.%d.%d.%d\n" +MSG2 >CSTR "%d.%d.%d.%d is at %h:%h:%h:%h:%h:%h\n" *-------------------------------------- DS.START hLIBTCPIP .BS 1 diff --git a/BIN/ASM.S.DIR.txt b/BIN/ASM.S.DIR.txt index 349389af..d94595d3 100644 --- a/BIN/ASM.S.DIR.txt +++ b/BIN/ASM.S.DIR.txt @@ -212,7 +212,7 @@ DIR.IN jsr SRC.GetArg bcs .9 >LDYA L.SRC.BUFFER - >SYSCALL SYS.NewPStrYA + >SYSCALL NewPStrYA phx @@ -222,7 +222,7 @@ DIR.IN jsr SRC.GetArg pha txa - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA pla plp diff --git a/BIN/ASM.S.FIO.txt b/BIN/ASM.S.FIO.txt index 92ebd3d5..df562a4c 100644 --- a/BIN/ASM.S.FIO.txt +++ b/BIN/ASM.S.FIO.txt @@ -7,7 +7,7 @@ AUTO 6 *--------------------------------------- FIO.Init ldy #S.PS.hCMDLINE lda (pPS),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA bcs .99 >STYA ZPPtr1 lda (ZPPtr1) @@ -35,7 +35,7 @@ FIO.Init ldy #S.PS.hCMDLINE .99 rts *--------------------------------------- FIO.OpenFileA sta FIO.hFileName - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr1 stz FIO.hFullPath @@ -49,11 +49,11 @@ FIO.OpenFileA sta FIO.hFileName ldy #S.PS.hPREFIX lda (pPs),y >PUSHA - >SYSCALL SYS.PStrCat + >SYSCALL PStrCat sta FIO.hFullPath sta FIO.hFileName - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr1 .1 >PUSHW ZPPtr1 @@ -70,8 +70,8 @@ FIO.OpenFileA sta FIO.hFileName bra FIO.OpenFileA.Exit .10 lda FIO.hFileName - >SYSCALL SYS.GetMemPtrA - >SYSCALL SYS.MLIOpenYA + >SYSCALL GetMemPtrA + >SYSCALL MLIOpenYA bcs .99 pha @@ -92,8 +92,8 @@ FIO.OpenFileA sta FIO.hFileName sta (pData),y lda FIO.hFileName - >SYSCALL SYS.GetMemPtrA - >SYSCALL SYS.MLIGetFileInfoYA + >SYSCALL GetMemPtrA + >SYSCALL MLIGetFileInfoYA bcs .99 >STYA ZPPtr1 @@ -127,7 +127,7 @@ FIO.OpenFileA sta FIO.hFileName tay lda (pData),y >PUSHA - >SYSCALL SYS.MLINewLine + >SYSCALL MLINewLine bcs .99 .8 ldy #SRC.COUNT @@ -144,7 +144,7 @@ FIO.OpenFileA.Exit php pha lda FIO.hFullPath beq .1 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .1 pla plp rts @@ -249,7 +249,7 @@ FIO.ReadFromFile ldy #SRC.COUNT tay lda (pData),y >PUSHA - >SYSCALL SYS.MLIRead + >SYSCALL MLIRead bcs .9 tax $100 byte transfered ? beq .9 @@ -265,7 +265,7 @@ FIO.FileClose ldy #SRC.COUNT adc #SRC.hREFNUMS-1 tay lda (pData),y - >SYSCALL SYS.MLICloseA + >SYSCALL MLICloseA ldy #SRC.COUNT lda (pData),y @@ -273,7 +273,7 @@ FIO.FileClose ldy #SRC.COUNT adc #SRC.hBUFFERS-1 tay lda (pData),y - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA ldy #SRC.COUNT lda (pData),y @@ -286,7 +286,7 @@ FIO.FileClose ldy #SRC.COUNT FIO.LOAD.ASM.T ldy #ASM.T.hMem lda (pData),y beq .1 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA ldy #ASM.T.hMem lda #0 sta (pData),y @@ -299,7 +299,7 @@ FIO.LOAD.ASM.T ldy #ASM.T.hMem >PUSHBI 6 S.FILEINFO.TYPE.BIN >PUSHBI SYS.FOPEN.R >PUSHW L.ASM.T.FILENAME - >SYSCALL SYS.LoadFile + >SYSCALL LoadFile bcs .9 txa diff --git a/BIN/ASM.S.SRC.txt b/BIN/ASM.S.SRC.txt index 1e3b224b..4529768e 100644 --- a/BIN/ASM.S.SRC.txt +++ b/BIN/ASM.S.SRC.txt @@ -32,14 +32,14 @@ SRC.PrintLineErr ldx #0 .1 lda UsrBuf256,x beq .2 phx - >SYSCALL SYS.COutA + >SYSCALL COutA plx inx bcc .1 rts .2 lda #13 - >SYSCALL SYS.COutA + >SYSCALL COutA bcs .9 ldx #0 @@ -50,19 +50,19 @@ SRC.PrintLineErr ldx #0 beq .4 phx lda #'-' - >SYSCALL SYS.COutA + >SYSCALL COutA plx bcs .9 bra .3 .4 lda #'^' phx - >SYSCALL SYS.COutA + >SYSCALL COutA plx bcs .9 .5 lda #13 - >SYSCALL SYS.COutA + >SYSCALL COutA .9 rts *--------------------------------------- SRC.ParseLine ldx UsrBuf256 @@ -264,7 +264,7 @@ SRC.ParseLine.OpCode .11 ldy #ASM.T.hMem lda (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr1 ldy #ASM.T.O setup Ptr to Opcodes @@ -326,12 +326,12 @@ SRC.ParseLine.OpCode .21 inx lda SRC.AM.StrBuf,x phx - >SYSCALL SYS.COutA + >SYSCALL COutA plx cpx SRC.AM.StrBuf bne .21 lda #13 - >SYSCALL SYS.COutA + >SYSCALL COutA .20 ldy #ASM.PC diff --git a/BIN/ASM.S.SYM.txt b/BIN/ASM.S.SYM.txt index 7dd18921..f2addace 100644 --- a/BIN/ASM.S.SYM.txt +++ b/BIN/ASM.S.SYM.txt @@ -52,7 +52,7 @@ SYM.Quit ldy #SYM.pLastGBlock adc #SYM.hGBlocks tay lda (pData),y - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA ldy #SYM.pLastGBlock lda (pData),y dec @@ -121,7 +121,7 @@ SYM.Dump >PUSHW L.MSG.SYMBOLS rts .5 lda #13 - >SYSCALL SYS.COutA + >SYSCALL COutA ldy #SYM.DumpCount lda (pData),y @@ -303,7 +303,7 @@ SYM.GetGBlockA clc tay lda (pData),y phx - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPBlockPtr plx rts @@ -333,7 +333,7 @@ SYM.NewGBlock phx phy SYM.NewGBlock2 >PUSHWI 256 >PUSHBI S.MEM.F.INIT0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs .9 >STYA ZPBlockPtr diff --git a/BIN/ASM.S.txt b/BIN/ASM.S.txt index c4b63b11..78a44539 100644 --- a/BIN/ASM.S.txt +++ b/BIN/ASM.S.txt @@ -152,16 +152,16 @@ J.EXP.OP .DA EXP.OP.EOR ^!|&<=>+-*/ .DA 0 *--------------------------------------- CS.INIT >LDYA L.LIBSTR - >SYSCALL SYS.LoadLibYA + >SYSCALL LoadLibYA sta hLIBSTR - >SYSCALL SYS.GetArgC + >SYSCALL GetArgC cmp #1 beq .99 No arg, new file.... lda #1 - >SYSCALL SYS.GetArgA - >SYSCALL SYS.GetFullPathYA + >SYSCALL GetArgA + >SYSCALL GetFullPathYA txa ldy #SRC.hFILENAME @@ -305,16 +305,16 @@ CS.QUIT jsr FIO.FileClose ldy #ASM.T.hMem lda (pData),y beq .1 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .1 ldy #SRC.hFILENAME lda (pData),y beq .8 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .8 lda hLIBSTR - >SYSCALL SYS.UnloadLibA + >SYSCALL UnloadLibA clc rts *--------------------------------------- @@ -422,21 +422,21 @@ T.LI .HS 03 .AS "OFF" .HS 00 *--------------------------------------- -LIBSTR >PSTRING "libstr.o" -MSG.HELP >CSTRING "A2osX-Macro Assembler (S-C MASM 3.0 Based)\nUsage : ASM [type TXT ($04) or S-C/BAS ($FA)]\n" -MSG.PASS >CSTRING "Pass:#%d\n" -MSG.SRC.FILE >CSTRING "Reading SRC File:%S\n" -MSG.OBJ.FILE >CSTRING "Writing OBJ File:%S, Type=%02x\n" -MSG.T.FILE >CSTRING "Loading CPU File:%S\n" -MSG.SRCLINE >CSTRING "%H: %05D-%s\n" -MSG.ERROR >CSTRING "%05D-Error:$%h\n" -MSG.SYMBOLS >CSTRING "Symbol Table:\n" -MSG.GSYMBOL >CSTRING "$%H%H:%S" -MSG.LSYMBOL >CSTRING " .%d:+$%h" -MSG.SUMMARY >CSTRING "\nEnd Of Assembly.\n" -SRC.AM.RESERVED >PSTRING "[]()," -SRC.MOD.RESERVED >PSTRING "#/<>" -SRC.EXP.RESERVED >PSTRING "^!|&<=>+-*/" +LIBSTR >PSTR "libstr.o" +MSG.HELP >CSTR "A2osX-Macro Assembler (S-C MASM 3.0 Based)\nUsage : ASM [type TXT ($04) or S-C/BAS ($FA)]\n" +MSG.PASS >CSTR "Pass:#%d\n" +MSG.SRC.FILE >CSTR "Reading SRC File:%S\n" +MSG.OBJ.FILE >CSTR "Writing OBJ File:%S, Type=%02x\n" +MSG.T.FILE >CSTR "Loading CPU File:%S\n" +MSG.SRCLINE >CSTR "%H: %05D-%s\n" +MSG.ERROR >CSTR "%05D-Error:$%h\n" +MSG.SYMBOLS >CSTR "Symbol Table:\n" +MSG.GSYMBOL >CSTR "$%H%H:%S" +MSG.LSYMBOL >CSTR " .%d:+$%h" +MSG.SUMMARY >CSTR "\nEnd Of Assembly.\n" +SRC.AM.RESERVED >PSTR "[]()," +SRC.MOD.RESERVED >PSTR "#/<>" +SRC.EXP.RESERVED >PSTR "^!|&<=>+-*/" ASM.T.DEFAULT .AS ".T.6502" ASM.T.FILENAMELEN .BS 1 ASM.T.FILENAME .BS 65 diff --git a/BIN/CHTYP.S.txt b/BIN/CHTYP.S.txt index dba42f77..0f779e7c 100644 --- a/BIN/CHTYP.S.txt +++ b/BIN/CHTYP.S.txt @@ -47,7 +47,7 @@ CS.INIT ldy #S.PS.hARGS >PUSHA >PUSHBI $20 Push SEP=' ' >PUSHBI 0 Push 0 for getting CMD & ARGS - >SYSCALL SYS.PStrGetTkn + >SYSCALL PStrGetTkn bcs .99 ldy #hArg1 @@ -62,7 +62,7 @@ CS.INIT ldy #S.PS.hARGS ldy #hArg1 lda (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr1 lda (ZPPtr1) beq .98 @@ -81,11 +81,11 @@ CS.INIT ldy #S.PS.hARGS ldy #S.PS.hPREFIX lda (pPs),y >PUSHA - >SYSCALL SYS.PStrCat + >SYSCALL PStrCat sta hDIRPATH -.3 >SYSCALL SYS.GetMemPtrA - >SYSCALL SYS.ListDirInitYA +.3 >SYSCALL GetMemPtrA + >SYSCALL ListDirInitYA bcs .99 ldy #hS.LISTDIR sta (pData),y @@ -97,7 +97,7 @@ CS.INIT ldy #S.PS.hARGS rts .98 >LDYA L.MSG.USAGE - >SYSCALL SYS.PStrOutYA + >SYSCALL PStrOutYA .99 lda #SYSMGR.ERRSYN sec rts @@ -117,11 +117,11 @@ CS.RUN ldy #bCANCEL .1 ldy #hS.LISTDIR lda (pData),y - >SYSCALL SYS.ListDirNextA + >SYSCALL ListDirNextA bcs .99 pha - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr1 lda (ZPPtr1) pha @@ -135,12 +135,12 @@ CS.RUN ldy #bCANCEL ldy #hS.LISTDIR lda (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr2 ldy #S.LISTDIR.hPATH lda (ZPPtr2),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr2 lda (ZPPtr2) @@ -164,24 +164,24 @@ CS.RUN ldy #bCANCEL stx FullPath >LDYA L.FullPath - >SYSCALL SYS.PStrOutYA + >SYSCALL PStrOutYA >LDYA L.FullPath - >SYSCALL SYS.MLIGetFileInfoYA + >SYSCALL MLIGetFileInfoYA bcs .5 >STYA ZPPtr3 >LDYA L.MSG.OK - >SYSCALL SYS.PStrOutYA + >SYSCALL PStrOutYA bra .8 .5 >PUSHA >LDYA L.MSG.ERR - >SYSCALL SYS.PStrOutYA + >SYSCALL PStrOutYA .8 pla - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA clc rts *-------------------------------------- @@ -226,27 +226,27 @@ CS.DOEVENT ldy #S.EVT.hDEV is Event from active IN device? CS.QUIT ldy #hS.LISTDIR lda (pData),y beq .1 - >SYSCALL SYS.ListDirCloseA + >SYSCALL ListDirCloseA .1 ldy #hDIRPATH lda (pData),y beq .2 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .2 ldy #hArg2 lda (pData),y beq .3 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .3 ldy #hArg1 lda (pData),y beq .8 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .8 clc rts *-------------------------------------- -GetHexFileTypeA >SYSCALL SYS.GetMemPtrA +GetHexFileTypeA >SYSCALL GetMemPtrA >STYA ZPPtr1 lda (ZPPtr1) cmp #3 @@ -319,9 +319,9 @@ GetHexFileTypeA >SYSCALL SYS.GetMemPtrA rts *-------------------------------------- CS.END -MSG.USAGE >PSTRING "Usage : CHTYP [File *,? wildcards allowed] [File type : $xx or SYS,TXT....]\n" -MSG.OK >PSTRING " [Ok]\n" -MSG.ERR >PSTRING " [%h]\n" +MSG.USAGE >PSTR "Usage : CHTYP [File *,? wildcards allowed] [File type : $xx or SYS,TXT....]\n" +MSG.OK >PSTR " [Ok]\n" +MSG.ERR >PSTR " [%h]\n" FullPath .BS 64 Tmp .BS 1 *-------------------------------------- diff --git a/BIN/CP.S.txt b/BIN/CP.S.txt index 258961df..771b0419 100644 --- a/BIN/CP.S.txt +++ b/BIN/CP.S.txt @@ -58,7 +58,7 @@ CS.INIT ldy #hS.LISTDIR.IDX bne .1 >LDYA L.MSG.USAGE - >SYSCALL SYS.PStrOutYA + >SYSCALL PStrOutYA lda #SYSMGR.ERRSYN sec .99 rts @@ -66,13 +66,13 @@ CS.INIT ldy #hS.LISTDIR.IDX .1 >PUSHA >PUSHBI $20 Push SEP=' ' >PUSHBI 0 - >SYSCALL SYS.PStrGetTkn + >SYSCALL PStrGetTkn bcs .99 sta hSrcPath stx hDstPath - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr1 stz FullSrcPath @@ -106,7 +106,7 @@ CS.INIT ldy #hS.LISTDIR.IDX jsr CS.INIT.DstPfx bra .7 -.4 >SYSCALL SYS.GetMemPtrA +.4 >SYSCALL GetMemPtrA >STYA ZPPtr1 stz FullDstPath @@ -132,7 +132,7 @@ CS.INIT ldy #hS.LISTDIR.IDX bne .6 .7 >LDYA L.FullDstPath - >SYSCALL SYS.MLIGetFileInfoYA + >SYSCALL MLIGetFileInfoYA bcs .71 File not found....must be /path/file >STYA ZPPtr3 ldy #S.FINFO.TYPE @@ -167,7 +167,7 @@ CS.INIT ldy #hS.LISTDIR.IDX *-------------------------------------- CS.INIT.SrcPfx ldy #S.PS.hPREFIX lda (pPs),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr2 lda (ZPPtr2) @@ -182,7 +182,7 @@ CS.INIT.SrcPfx ldy #S.PS.hPREFIX *-------------------------------------- CS.INIT.DstPfx ldy #S.PS.hPREFIX lda (pPs),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr2 lda (ZPPtr2) @@ -210,14 +210,14 @@ CS.RUN ldy #bCANCEL .1 jsr GetDirList bcs .99 - >SYSCALL SYS.ListDirNextA + >SYSCALL ListDirNextA bcc .15 jsr CloseDirList rts if not back to first level, CC, if CS, quit! .15 pha - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr1 lda (ZPPtr1) get File type/len @@ -232,12 +232,12 @@ CS.RUN ldy #bCANCEL sta (ZPPtr1) Adjust Filename len jsr GetDirList - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr2 ldy #S.LISTDIR.hPATH get Src path lda (ZPPtr2),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr2 lda (ZPPtr2) @@ -286,7 +286,7 @@ CS.RUN ldy #bCANCEL >PUSHW L.FullSrcPath >LDYA L.MSG.CP - >SYSCALL SYS.PStrOutYA + >SYSCALL PStrOutYA jsr CS.RUN.COPY bcs .5 @@ -296,15 +296,15 @@ CS.RUN ldy #bCANCEL .5 >PUSHA >LDYA L.MSG.ERR -.7 >SYSCALL SYS.PStrOutYA +.7 >SYSCALL PStrOutYA .8 pla - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA clc rts *-------------------------------------- CS.RUN.COPY >LDYA L.FullSrcPath - >SYSCALL SYS.MLIGetFileInfoYA + >SYSCALL MLIGetFileInfoYA bcs .9 >STYA ZPPtr1 @@ -327,11 +327,11 @@ CS.RUN.COPY >LDYA L.FullSrcPath .3 >PUSHW L.FullDstPath >PUSHW L.FINFO - >SYSCALL SYS.MLISetFileInfo + >SYSCALL MLISetFileInfo .9 rts *-------------------------------------- CS.RUN.COPY.DIR >LDYA L.FullDstPath - >SYSCALL SYS.MLICreateDirYA + >SYSCALL MLICreateDirYA bcc .10 cmp #$47 bne CS.RUN.COPY.ERR CS @@ -370,26 +370,26 @@ CS.RUN.COPY.FILE >PUSHB FINFO+S.FINFO.TYPE >PUSHBI $C3 R/W, we will setup attrs later >PUSHW L.FullDstPath - >SYSCALL SYS.MLICreateFile + >SYSCALL MLICreateFile bcc .10 cmp #$47 bne CS.RUN.COPY.ERR .10 >LDYA L.FullSrcPath - >SYSCALL SYS.MLIOpenYA + >SYSCALL MLIOpenYA bcs CS.RUN.COPY.RTS sta hSrcFile stx hSrcBuf >LDYA L.FullDstPath - >SYSCALL SYS.MLIOpenYA + >SYSCALL MLIOpenYA bcs .19 sta hDstFile stx hDstBuf >PUSHWI COPY.BUF.SIZE >PUSHBI 0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem .19 bcs .98 >STYA ZPPtr2 stx hCopyBuf @@ -397,14 +397,14 @@ CS.RUN.COPY.FILE .2 >PUSHWI COPY.BUF.SIZE >PUSHW ZPPtr2 >PUSHB hSrcFile - >SYSCALL SYS.MLIRead + >SYSCALL MLIRead bcs .97 >STYA ZPPtr3 Bytes Read >PUSHYA >PUSHW ZPPtr2 >PUSHB hDstFile - >SYSCALL SYS.MLIWrite + >SYSCALL MLIWrite lda ZPPtr3 cmp #COPY.BUF.SIZE @@ -418,21 +418,21 @@ CS.RUN.COPY.FILE .97 pha lda hCopyBuf - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA pla .98 pha lda hSrcFile - >SYSCALL SYS.MLICloseA + >SYSCALL MLICloseA lda hSrcBuf - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA pla .99 pha lda hDstFile - >SYSCALL SYS.MLICloseA + >SYSCALL MLICloseA lda hDstBuf - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA pla sec rts @@ -480,18 +480,18 @@ CS.QUIT jsr CloseDirList lda hSrcPath beq .1 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .1 lda hDstPath beq .8 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .8 clc rts *-------------------------------------- * PRIVATE *-------------------------------------- -NewDirListYA >SYSCALL SYS.ListDirInitYA +NewDirListYA >SYSCALL ListDirInitYA bcs .9 tax ldy #hS.LISTDIR.IDX @@ -510,7 +510,7 @@ NewDirListYA >SYSCALL SYS.ListDirInitYA CloseDirList jsr GetDirList bcs .9 - >SYSCALL SYS.ListDirCloseA + >SYSCALL ListDirCloseA ldy #hS.LISTDIR.IDX lda (pData),y tay @@ -547,10 +547,10 @@ GetDirList ldy #hS.LISTDIR.IDX .9 rts *-------------------------------------- CS.END -MSG.USAGE >PSTRING "Usage : CP [-R -C] [Dest Dir]\n -R recurse subdirs\n -C resume on error\n" -MSG.CP >PSTRING "cp: %S to %S " -MSG.OK >PSTRING "[Ok]\n" -MSG.ERR >PSTRING "[%h]\n" +MSG.USAGE >PSTR "Usage : CP [-R -C] [Dest Dir]\n -R recurse subdirs\n -C resume on error\n" +MSG.CP >PSTR "cp: %S to %S " +MSG.OK >PSTR "[Ok]\n" +MSG.ERR >PSTR "[%h]\n" hSrcPath .BS 1 hDstPath .BS 1 FullSrcPath .BS 64 diff --git a/BIN/DEVDUMP.S.txt b/BIN/DEVDUMP.S.txt index e611e2e6..fdd6d225 100644 --- a/BIN/DEVDUMP.S.txt +++ b/BIN/DEVDUMP.S.txt @@ -35,14 +35,14 @@ CS.START cld .DA CS.QUIT .DA 0 *-------------------------------------- -CS.INIT >SYSCALL SYS.GetArgC +CS.INIT >SYSCALL GetArgC cmp #1 beq .9 lda #1 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA - >SYSCALL SYS.GetDevByNameYA + >SYSCALL GetDevByNameYA bcs .9 >STYA pDev @@ -90,15 +90,15 @@ CS.DOEVENT ldy #S.EVT.hDEV ldy #S.EVT.DATALO lda (pEvent),y pha - >SYSCALL SYS.HexOutA + >SYSCALL HexOutA lda #'(' - >SYSCALL SYS.COutA + >SYSCALL COutA pla cmp #$20 bcc .1 - >SYSCALL SYS.COutA + >SYSCALL COutA .1 lda #')' - >SYSCALL SYS.COutA + >SYSCALL COutA clc rts diff --git a/BIN/DNSINFO.S.txt b/BIN/DNSINFO.S.txt index 556d967c..f753672f 100644 --- a/BIN/DNSINFO.S.txt +++ b/BIN/DNSINFO.S.txt @@ -41,10 +41,10 @@ L.MSG1 .DA MSG1 .DA 0 *-------------------------------------- CS.INIT >LDYA L.LIBTCPIP - >SYSCALL SYS.LoadLibYA + >SYSCALL LoadLibYA sta hLIBTCPIP - >SYSCALL SYS.GetArgC + >SYSCALL GetArgC cmp #1 beq CS.INIT.DUMP *-------------------------------------- @@ -54,14 +54,14 @@ CS.INIT.ADD cmp #3 >PUSHW L.IP >PUSHW L.SSCANF.IP lda #3 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA >PUSHYA - >SYSCALL SYS.SSCANF + >SYSCALL SSCANF bcs .9 >PUSHW L.IP lda #2 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA >PUSHYA >LIBCALL hLIBTCPIP,LIBTCPIP.DNS.ADD bcs .99 @@ -77,7 +77,7 @@ CS.INIT.ADD cmp #3 CS.INIT.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.DNS.GETCACHE >STYA ZPPTR1 >LDYA L.MSG0 - >SYSCALL SYS.PRINTFYA + >SYSCALL PRINTFYA lda #K.DNSCACHE.SIZE sta EntryCount @@ -101,7 +101,7 @@ CS.INIT.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.DNS.GETCACHE ldy #S.DNSCACHE.hNAME lda (ZPPTR1),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >PUSHYA ldy #S.DNSCACHE.ID @@ -112,7 +112,7 @@ CS.INIT.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.DNS.GETCACHE >PUSHB (ZPPTR1) Entry Status >LDYA L.MSG1 - >SYSCALL SYS.PRINTFYA + >SYSCALL PRINTFYA .2 lda ZPPTR1 clc @@ -133,15 +133,15 @@ CS.EVENT clc rts *-------------------------------------- CS.QUIT lda hLIBTCPIP - >SYSCALL SYS.UnloadLibA + >SYSCALL UnloadLibA clc rts *-------------------------------------- CS.END -LIBTCPIP >PSTRING "libtcpip.o" -SSCANF.IP >PSTRING "%d.%d.%d.%d" -MSG0 >CSTRING "STS TR.ID Hostname IP Address TTL\n" -MSG1 >CSTRING "$%h $%H %32S %03d.%03d.%03d.%03d %L\n" +LIBTCPIP >PSTR "libtcpip.o" +SSCANF.IP >PSTR "%d.%d.%d.%d" +MSG0 >CSTR "STS TR.ID Hostname IP Address TTL\n" +MSG1 >CSTR "$%h $%H %32S %03d.%03d.%03d.%03d %L\n" hLIBTCPIP .BS 1 IP .BS 4 diff --git a/BIN/EDIT.S.BUF.txt b/BIN/EDIT.S.BUF.txt index 07f898fc..97028823 100644 --- a/BIN/EDIT.S.BUF.txt +++ b/BIN/EDIT.S.BUF.txt @@ -10,7 +10,7 @@ BUF.InsertClipboard lda (pData),y beq .8 - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ClipboardPtr jsr BUF.ComputeCOffset @@ -252,11 +252,11 @@ BUF.SelToClipboard lda (pData),y beq .1 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .1 >PUSHW TmpCount >PUSHB 0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs .9 >STYA ClipboardPtr @@ -273,7 +273,7 @@ BUF.SelToClipboard ldy #hBuffer lda (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA BufPtr lda BufPtr @@ -373,7 +373,7 @@ BUF.GetLineAX >STAX BUF.TmpLine1 ldy #hBuffer lda (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA BufPtr stz BUF.TmpLine2 @@ -444,18 +444,18 @@ BUF.GetNewYA >STYA TmpLen ldy #hBufferBackup lda (pData),y beq .1 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .1 ldy #hBuffer lda (pData),y ldy #hBufferBackup sta (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA BufPtrBackup >PUSHW TmpLen >PUSHBI S.MEM.F.INIT0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs .9 >STYA BufPtr diff --git a/BIN/EDIT.S.CTRL.txt b/BIN/EDIT.S.CTRL.txt index 23ef08b7..4ff17a34 100644 --- a/BIN/EDIT.S.CTRL.txt +++ b/BIN/EDIT.S.CTRL.txt @@ -52,7 +52,7 @@ Ctrl.A ldy #PromptMode >PUSHW L.SEQ.CEOL >PUSHW ZPPTR1 >LDYA L.MSG.HELPLINE - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 sec @@ -308,7 +308,7 @@ Ctrl.S lda #PromptModeSave lda (pData),y beq .2 - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPTR1 lda (ZPPTR1) @@ -544,10 +544,10 @@ Prompt.Save cmp #3 ldy #hFileName lda (pData),y beq .11 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .11 >LDYA pData - >SYSCALL SYS.NewPStrYA + >SYSCALL NewPStrYA txa ldy #hFileName diff --git a/BIN/EDIT.S.SCRN.txt b/BIN/EDIT.S.SCRN.txt index dce67727..263d43f9 100644 --- a/BIN/EDIT.S.SCRN.txt +++ b/BIN/EDIT.S.SCRN.txt @@ -10,10 +10,10 @@ SCRN.Init ldy #ScreenH dec >PUSHA >LDYA L.SEQ.INIT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 lda #12 - >SYSCALL SYS.COutA + >SYSCALL COutA bcs .9 lda #0 @@ -45,7 +45,7 @@ SCRN.UpdateTopBar ldy #hFileName lda (pData),y beq .1 - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA bra .2 .1 >LDYA L.MSG.NEWFILE @@ -53,7 +53,7 @@ SCRN.UpdateTopBar .2 >PUSHYA >LDYA L.MSG.TOPBAR - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 @@ -99,7 +99,7 @@ SCRN.UpdateMain ldy #ScreenY bcs .9 >LDYA L.SEQ.CEOL - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 inc TmpByte @@ -162,7 +162,7 @@ SCRN.UpdateLineAtALenY pla bcs .11 - >SYSCALL SYS.COutA + >SYSCALL COutA .11 ply plx bcs .9 @@ -176,7 +176,7 @@ SCRN.UpdateLineAtALenY bcs .9 >LDYA L.SEQ.CEOL - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 rts .9 jmp Ctrl.Q @@ -189,7 +189,7 @@ SCRN.UpdateAttrC bpl .8 >LDYA L.SEQ.NORM - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 stz bSelected rts @@ -198,7 +198,7 @@ SCRN.UpdateAttrC bmi .8 >LDYA L.SEQ.INV - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 lda #$ff sta bSelected @@ -237,7 +237,7 @@ SCRN.UpdateStatusBar lda (pData),y >PUSHA >LDYA L.MSG.STATUSBAR - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 jmp SCRN.GotoCurXCurY @@ -248,7 +248,7 @@ SCRN.UpdateStatusBar lda (pData),y >PUSHA >LDYA L.MSG.STATUSBAR,x - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 rts .9 jmp Ctrl.Q @@ -259,7 +259,7 @@ SCRN.UpdateStatusBarErrA lda (pData),y >PUSHA >LDYA L.MSG.STATUSBAR.E - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 rts .9 jmp Ctrl.Q @@ -281,7 +281,7 @@ GotoXY txa >PUSHA >LDYA L.MSG.GOTOXY - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 rts .9 jmp Ctrl.Q @@ -413,10 +413,10 @@ SCRN.UpdateViewPort .9 jmp Ctrl.Q *-------------------------------------- SCRN.scrollUp lda #$1B - >SYSCALL SYS.COutA + >SYSCALL COutA bcs .9 lda #'M' - >SYSCALL SYS.COutA + >SYSCALL COutA bcs .9 ldy #ScreenY+1 @@ -438,10 +438,10 @@ SCRN.scrollUp lda #$1B .9 jmp Ctrl.Q *-------------------------------------- SCRN.scrollDn lda #$1B - >SYSCALL SYS.COutA + >SYSCALL COutA bcs .9 lda #'D' - >SYSCALL SYS.COutA + >SYSCALL COutA bcs .9 ldy #ScreenY+1 diff --git a/BIN/EDIT.S.txt b/BIN/EDIT.S.txt index c4425672..95ad4990 100644 --- a/BIN/EDIT.S.txt +++ b/BIN/EDIT.S.txt @@ -101,14 +101,14 @@ CS.INIT lda #$ff ldy #bSaved sta (pData),y - >SYSCALL SYS.GetArgC + >SYSCALL GetArgC cmp #1 beq .1 No arg, new file.... lda #1 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA - >SYSCALL SYS.GetFullPathYA + >SYSCALL GetFullPathYA txa ldy #hFileName sta (pData),y @@ -118,7 +118,7 @@ CS.INIT lda #$ff .1 >PUSHWI 1 buffer size = 0 (+ 1 for ending 0) >PUSHBI S.MEM.F.INIT0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs .9 txa @@ -140,14 +140,14 @@ CS.RUN ldy #bCancel bne .8 >LDYA L.SEQ.DETECT - >SYSCALL SYS.PrintFYA Send Query for term W & H + >SYSCALL PrintFYA Send Query for term W & H bcs .9 .1 ldy #bCancel lda (pData),y bne .9 - >SYSCALL SYS.Sleep + >SYSCALL Sleep ldy #ScreenW Wait for Response from terminal lda (pData),y for W & H @@ -315,28 +315,28 @@ CS.DOEVENT.Esc ldy #bEscMode CS.QUIT ldy #hBuffer lda (pData),y beq .1 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .1 ldy #hBufferBackup lda (pData),y beq .2 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .2 ldy #hClipBoard lda (pData),y beq .3 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .3 ldy #hFileName lda (pData),y beq .8 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .8 >LDYA L.SEQ.RESET - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 lda #12 - >SYSCALL SYS.COutA + >SYSCALL COutA .9 rts *-------------------------------------- LoadFile >PUSHWI 0 Aux type @@ -345,10 +345,10 @@ LoadFile >PUSHWI 0 Aux type ldy #hFileName lda (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >PUSHYA - >SYSCALL SYS.LoadFile + >SYSCALL LoadFile bcs .9 stx hMem @@ -359,7 +359,7 @@ LoadFile >PUSHWI 0 Aux type .2 >PUSHYA >PUSHBI S.MEM.F.INIT0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs .98 >STYA ZPPTR2 @@ -369,7 +369,7 @@ LoadFile >PUSHWI 0 Aux type lda hMem - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPTR1 >LDYA TmpLen @@ -400,14 +400,14 @@ LoadFile >PUSHWI 0 Aux type .98 pha lda hMem - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA pla sec .9 rts *-------------------------------------- SaveFile ldy #hBuffer lda (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >PUSHYA ldy #FileLen+1 @@ -421,11 +421,11 @@ SaveFile ldy #hBuffer ldy #hFileName lda (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >PUSHYA - >SYSCALL SYS.SaveFile + >SYSCALL SaveFile rts *-------------------------------------- DecTmpCount lda TmpCount @@ -442,47 +442,47 @@ DecTmpCount lda TmpCount .INB BIN/EDIT.S.SCRN *-------------------------------------- CS.END -SEQ.DETECT >CSTRING "Querying terminal capabilities...\e[999;999H\e[6n" -SEQ.INIT >CSTRING "\ec\e[2;%dr" -SEQ.RESET >CSTRING "\ec" -SEQ.INV >CSTRING "\e[7m" -SEQ.NORM >CSTRING "\e[0m" -SEQ.CEOL >CSTRING "\e[K" -MSG.TOPBAR >CSTRING "\e[1;1H\e[7mA2osX Edit:%S\e[K\e[0m" -MSG.STATUSBAR >CSTRING "\e[%d;1H\e[7mPress Ctrl-A For Help Length:%D Col:%d Line:%D\e[K\e[0m" -MSG.STATUSBAR.H >CSTRING "\e[%d;1H\e[7mPress any key to exit this screen:\e[K\e[0m" -MSG.STATUSBAR.F >CSTRING "\e[%d;1H\e[7mFind:%S\e[K\e[0m" -MSG.STATUSBAR.R >CSTRING "\e[%d;1H\e[7mReplace:%S\e[K\e[0m" -MSG.STATUSBAR.S >CSTRING "\e[%d;1H\e[7mSave:%S\e[K\e[0m" -MSG.STATUSBAR.E >CSTRING "\e[%d;1H\e[7mError:%h\e[K\e[0m" -MSG.GOTOXY >CSTRING "\e[%d;%dH" -MSG.HELPLINE >CSTRING "%S%s\n" -MSG.HELP >PSTRING "All commands: (* = Not yet implemented)" - >PSTRING "------------" - >PSTRING " Ctrl-A : This help screen" - >PSTRING " Ctrl-B : Mark beginning of selection" - >PSTRING " Ctrl-C : Copy selection to clipboard" - >PSTRING " Ctrl-D : Delete selection" - >PSTRING " Ctrl-E : Mark end of selection" - >PSTRING " Ctrl-F : * Find a string..." - >PSTRING " Ctrl-G : Go to start of current line" - >PSTRING " Ctrl-L : Go to end of current line" - >PSTRING " Ctrl-N : * Find next" - >PSTRING " Ctrl-O : * Page up" - >PSTRING " Ctrl-P : * Page down" - >PSTRING " Ctrl-Q : Quit" - >PSTRING " Ctrl-R : * Replace found string with..." - >PSTRING " Ctrl-S : Save file to disk..." - >PSTRING " Ctrl-T : Go to top of file" - >PSTRING " Ctrl-V : Past clipboard at cursor position" - >PSTRING " Ctrl-W : * Erase current line" - >PSTRING " Ctrl-X : Cut block to clipboard" - >PSTRING " Ctrl-Y : * Go to bottom of file" - >PSTRING " Ctrl-Z : * Undo previous change" +SEQ.DETECT >CSTR "Querying terminal capabilities...\e[999;999H\e[6n" +SEQ.INIT >CSTR "\ec\e[2;%dr" +SEQ.RESET >CSTR "\ec" +SEQ.INV >CSTR "\e[7m" +SEQ.NORM >CSTR "\e[0m" +SEQ.CEOL >CSTR "\e[K" +MSG.TOPBAR >CSTR "\e[1;1H\e[7mA2osX Edit:%S\e[K\e[0m" +MSG.STATUSBAR >CSTR "\e[%d;1H\e[7mPress Ctrl-A For Help Length:%D Col:%d Line:%D\e[K\e[0m" +MSG.STATUSBAR.H >CSTR "\e[%d;1H\e[7mPress any key to exit this screen:\e[K\e[0m" +MSG.STATUSBAR.F >CSTR "\e[%d;1H\e[7mFind:%S\e[K\e[0m" +MSG.STATUSBAR.R >CSTR "\e[%d;1H\e[7mReplace:%S\e[K\e[0m" +MSG.STATUSBAR.S >CSTR "\e[%d;1H\e[7mSave:%S\e[K\e[0m" +MSG.STATUSBAR.E >CSTR "\e[%d;1H\e[7mError:%h\e[K\e[0m" +MSG.GOTOXY >CSTR "\e[%d;%dH" +MSG.HELPLINE >CSTR "%S%s\n" +MSG.HELP >PSTR "All commands: (* = Not yet implemented)" + >PSTR "------------" + >PSTR " Ctrl-A : This help screen" + >PSTR " Ctrl-B : Mark beginning of selection" + >PSTR " Ctrl-C : Copy selection to clipboard" + >PSTR " Ctrl-D : Delete selection" + >PSTR " Ctrl-E : Mark end of selection" + >PSTR " Ctrl-F : * Find a string..." + >PSTR " Ctrl-G : Go to start of current line" + >PSTR " Ctrl-L : Go to end of current line" + >PSTR " Ctrl-N : * Find next" + >PSTR " Ctrl-O : * Page up" + >PSTR " Ctrl-P : * Page down" + >PSTR " Ctrl-Q : Quit" + >PSTR " Ctrl-R : * Replace found string with..." + >PSTR " Ctrl-S : Save file to disk..." + >PSTR " Ctrl-T : Go to top of file" + >PSTR " Ctrl-V : Past clipboard at cursor position" + >PSTR " Ctrl-W : * Erase current line" + >PSTR " Ctrl-X : Cut block to clipboard" + >PSTR " Ctrl-Y : * Go to bottom of file" + >PSTR " Ctrl-Z : * Undo previous change" .HS 00 *-------------------------------------- -MSG.NEWFILE >PSTRING "(new file)" -EscChars >PSTRING "DBAC" +MSG.NEWFILE >PSTR "(new file)" +EscChars >PSTR "DBAC" EscAscii .HS 04080A0B15 hMem .BS 1 TmpFilename .BS 1 diff --git a/BIN/IPCONFIG.S.txt b/BIN/IPCONFIG.S.txt index 1bfde405..2d387e02 100644 --- a/BIN/IPCONFIG.S.txt +++ b/BIN/IPCONFIG.S.txt @@ -58,11 +58,11 @@ L.MSG2.HOSTNAME .DA MSG2.HOSTNAME .DA 0 *-------------------------------------- CS.INIT >LDYA L.LIBTCPIP - >SYSCALL SYS.LoadLibYA + >SYSCALL LoadLibYA sta hLIBTCPIP >LDYA L.MSG0 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG >STYA ZPIPCfgPtr @@ -72,19 +72,19 @@ CS.INIT >LDYA L.LIBTCPIP bne CS.INIT.DUMPDEV >LDYA L.MSG0.NL - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA jmp CS.INIT.DONE CS.INIT.DUMPDEV sta DevID - >SYSCALL SYS.GetDevByIDA + >SYSCALL GetDevByIDA >STYA ZPDevPtr lda DevID - >SYSCALL SYS.GetDevInfoA + >SYSCALL GetDevInfoA >STYA ZPDevInfoPtr >LDYA L.MSG0.L - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldy #S.DEVINFO.NET.MAC+6 .1 dey @@ -103,7 +103,7 @@ CS.INIT.DUMPDEV sta DevID >PUSHB DevID >LDYA L.MSG1.DEV - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldy #S.DEVINFO.FLAGS lda (ZPDevInfoPtr),y @@ -112,7 +112,7 @@ CS.INIT.DUMPDEV sta DevID lda #1 .2 >PUSHA >LDYA L.MSG1.DEV.ARP - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldy #S.DEVINFO.FLAGS lda (ZPDevInfoPtr),y @@ -121,7 +121,7 @@ CS.INIT.DUMPDEV sta DevID lda #1 .3 >PUSHA >LDYA L.MSG1.DEV.IP - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldy #S.DEVINFO.NET.STATUS lda (ZPDevInfoPtr),y @@ -129,15 +129,15 @@ CS.INIT.DUMPDEV sta DevID bne CS.INIT.LINK >PUSHW L.MSG1.LINK.KO >LDYA L.MSG1.LINK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bra CS.INIT.DUMPIP CS.INIT.LINK >PUSHW L.MSG1.LINK.OK >LDYA L.MSG1.LINK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA >LDYA L.MSG1.LINKSPEED - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldy #S.DEVINFO.NET.STATUS lda (ZPDevInfoPtr),y @@ -146,7 +146,7 @@ CS.INIT.LINK >PUSHW L.MSG1.LINK.OK .4 phx lda #'0' - >SYSCALL SYS.COutA + >SYSCALL COutA plx dex bne .4 @@ -158,10 +158,10 @@ CS.INIT.LINK >PUSHW L.MSG1.LINK.OK >LDYA L.MSG1.DPLX.HD bra .6 .5 >LDYA L.MSG1.DPLX.FD -.6 >SYSCALL SYS.PrintFYA +.6 >SYSCALL PrintFYA CS.INIT.DUMPIP >LDYA L.MSG2 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda (ZPIPCfgPtr) and #S.IPCFG.STATUS.OK beq .11 @@ -169,7 +169,7 @@ CS.INIT.DUMPIP >LDYA L.MSG2 bra .10 .11 >LDYA L.MSG2.U -.10 >SYSCALL SYS.PrintFYA +.10 >SYSCALL PrintFYA ldy #S.IPCFG.DHCPSRVR+3 ldx #4 @@ -178,7 +178,7 @@ CS.INIT.DUMPIP >LDYA L.MSG2 dex bne .2 >LDYA L.MSG2.DHCPSRVR - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldy #S.IPCFG.IP+7 IP/MASK ldx #8 @@ -187,7 +187,7 @@ CS.INIT.DUMPIP >LDYA L.MSG2 dex bne .3 >LDYA L.MSG2.IP - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldy #S.IPCFG.GW+3 ldx #4 @@ -196,7 +196,7 @@ CS.INIT.DUMPIP >LDYA L.MSG2 dex bne .4 >LDYA L.MSG2.GW - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldy #S.IPCFG.DNS1+7 ldx #8 @@ -205,7 +205,7 @@ CS.INIT.DUMPIP >LDYA L.MSG2 dex bne .5 >LDYA L.MSG2.DNS - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda ZPIPCfgPtr clc @@ -224,7 +224,7 @@ CS.INIT.DUMPIP >LDYA L.MSG2 >PUSHYA >LDYA L.MSG2.HOSTNAME - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA CS.INIT.DONE lda #0 tell TSKMGR that all done ok, but sec we do not want to stay in memory @@ -235,35 +235,35 @@ CS.DOEVENT clc rts *-------------------------------------- CS.QUIT lda hLIBTCPIP - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA clc rts *-------------------------------------- CS.END -LIBTCPIP >PSTRING "libtcpip.o" +LIBTCPIP >PSTR "libtcpip.o" *-------------------------------------- -MSG0 >CSTRING "TCP/IP Status : " -MSG0.L >CSTRING "Loaded\n" -MSG0.NL >CSTRING "Not Loaded\n" +MSG0 >CSTR "TCP/IP Status : " +MSG0.L >CSTR "Loaded\n" +MSG0.NL >CSTR "Not Loaded\n" *-------------------------------------- -MSG1.DEV >CSTRING "\nDevice Configuration :\n DevID : $%h\n Device Name : %s\n HW Address : %02h:%02h:%02h:%02h:%02h:%02h\n" -MSG1.DEV.ARP >CSTRING " ARP Offload : %d\n" -MSG1.DEV.IP >CSTRING " IP Offload : %d\n" -MSG1.LINK >CSTRING " Link Status : %s\n" -MSG1.LINK.OK >CSTRING "OK" -MSG1.LINK.KO >CSTRING "Media Disconnected" -MSG1.LINKSPEED >CSTRING " Link Speed : 1" -MSG1.DPLX.FD >CSTRING " Mbit/s,Full Duplex\n" -MSG1.DPLX.HD >CSTRING " Mbit/s,Half Duplex\n" +MSG1.DEV >CSTR "\nDevice Configuration :\n DevID : $%h\n Device Name : %s\n HW Address : %02h:%02h:%02h:%02h:%02h:%02h\n" +MSG1.DEV.ARP >CSTR " ARP Offload : %d\n" +MSG1.DEV.IP >CSTR " IP Offload : %d\n" +MSG1.LINK >CSTR " Link Status : %s\n" +MSG1.LINK.OK >CSTR "OK" +MSG1.LINK.KO >CSTR "Media Disconnected" +MSG1.LINKSPEED >CSTR " Link Speed : 1" +MSG1.DPLX.FD >CSTR " Mbit/s,Full Duplex\n" +MSG1.DPLX.HD >CSTR " Mbit/s,Half Duplex\n" *-------------------------------------- -MSG2 >CSTRING "\nIP Configuration : " -MSG2.C >CSTRING "Configured\n" -MSG2.U >CSTRING "Not Configured\n" -MSG2.DHCPSRVR >CSTRING " DHCP Server : %d.%d.%d.%d\n" -MSG2.IP >CSTRING " IP/Mask : %d.%d.%d.%d/%d.%d.%d.%d\n" -MSG2.GW >CSTRING " Gateway : %d.%d.%d.%d\n" -MSG2.DNS >CSTRING " DNS : %d.%d.%d.%d,%d.%d.%d.%d\n" -MSG2.HOSTNAME >CSTRING " Hostname : %s.%s\n" +MSG2 >CSTR "\nIP Configuration : " +MSG2.C >CSTR "Configured\n" +MSG2.U >CSTR "Not Configured\n" +MSG2.DHCPSRVR >CSTR " DHCP Server : %d.%d.%d.%d\n" +MSG2.IP >CSTR " IP/Mask : %d.%d.%d.%d/%d.%d.%d.%d\n" +MSG2.GW >CSTR " Gateway : %d.%d.%d.%d\n" +MSG2.DNS >CSTR " DNS : %d.%d.%d.%d,%d.%d.%d.%d\n" +MSG2.HOSTNAME >CSTR " Hostname : %s.%s\n" hLIBTCPIP .BS 1 DevID .BS 1 MAN diff --git a/BIN/LS.S.txt b/BIN/LS.S.txt index 31e3e730..9402a4f7 100644 --- a/BIN/LS.S.txt +++ b/BIN/LS.S.txt @@ -8,8 +8,8 @@ AUTO 6 .OR $2000 .TF /A2OSX.BOOT/BIN/LS *-------------------------------------- - .INB INC/MACROS.I - .INB INC/A2OSX.I + .INB /A2OSX.DEV/INC/MACROS.I + .INB /A2OSX.DEV/INC/A2OSX.I *-------------------------------------- MAX.COL .EQ 4 MAX.RECURSE .EQ 8 @@ -47,14 +47,14 @@ L.TIME.Create .DA TIME.Create L.TIME.Mod .DA TIME.Mod .DA 0 *-------------------------------------- -CS.INIT >SYSCALL SYS.GetArgC +CS.INIT >SYSCALL GetArgC sta ArgCount .1 dec ArgCount beq .5 lda ArgCount - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA >STYA ZPPtr1 lda (ZPPtr1) @@ -97,7 +97,7 @@ CS.INIT >SYSCALL SYS.GetArgC ldy #S.PS.hPREFIX lda (pPs),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA jsr InitSrcDirYA bcs .9 @@ -125,7 +125,7 @@ CS.RUN ldy #bCANCEL tay lda (pData),y - >SYSCALL SYS.READDIRA + >SYSCALL READDIRA bcc .20 ldy #bLong @@ -137,7 +137,7 @@ CS.RUN ldy #bCANCEL beq .89 lda #13 - >SYSCALL SYS.COutA + >SYSCALL COutA .89 lda #0 sec @@ -162,10 +162,10 @@ CS.RUN ldy #bCANCEL lda (pData),y beq .4 No filter.... - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >PUSHYA >PUSHW ZPPtr1 - >SYSCALL SYS.PStrMatch + >SYSCALL PStrMatch bcs .7 no match, skip.... .4 ldy #S.STAT.PRODOS.DRIVE @@ -195,7 +195,7 @@ CS.RUN ldy #bCANCEL bra .3 .8 pla Discard hDIRENT - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA clc rts @@ -216,7 +216,7 @@ CS.RUN.DEV ldy #S.STAT.PRODOS.DEVBLOCKS+1 >PUSHW ZPPtr1 >LDYA L.MSG.DEV - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA rts *-------------------------------------- CS.RUN.DIR ldy #bLong @@ -225,7 +225,7 @@ CS.RUN.DIR ldy #bLong >PUSHW ZPPtr1 >LDYA L.MSG.DIR - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldy #ColCount lda (pData),y @@ -237,7 +237,7 @@ CS.RUN.DIR ldy #bLong lda #0 sta (pData),y lda #13 - >SYSCALL SYS.COutA + >SYSCALL COutA .7 rts .8 jsr CS.RUN.PUSHEXTRA @@ -251,7 +251,7 @@ CS.RUN.DIR ldy #bLong >PUSHW ZPPtr1 >LDYA L.MSG.DIREXT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA rts *-------------------------------------- @@ -266,7 +266,7 @@ CS.RUN.FILE ldy #bLong >PUSHW ZPPtr1 >LDYA L.MSG.FILE - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldy #ColCount lda (pData),y @@ -278,7 +278,7 @@ CS.RUN.FILE ldy #bLong lda #0 sta (pData),y lda #13 - >SYSCALL SYS.COutA + >SYSCALL COutA rts .7 lda #80/MAX.COL-5 @@ -289,7 +289,7 @@ CS.RUN.FILE ldy #bLong .70 lda #' ' phx - >SYSCALL SYS.COutA + >SYSCALL COutA plx dex bne .70 @@ -327,7 +327,7 @@ CS.RUN.FILE ldy #bLong >PUSHW ZPPtr1 >LDYA L.MSG.FILEEXT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA rts *-------------------------------------- CS.RUN.PUSHEXTRA @@ -340,7 +340,7 @@ CS.RUN.PUSHEXTRA lda ZPPtr2+1 adc #0 >PUSHYA - >SYSCALL SYS.PStrFTime + >SYSCALL PStrFTime >PUSHW L.TIME.Create >PUSHW L.TIME.Format @@ -351,7 +351,7 @@ CS.RUN.PUSHEXTRA lda ZPPtr2+1 adc #0 >PUSHYA - >SYSCALL SYS.PStrFTime + >SYSCALL PStrFTime >PUSHW L.TIME.Mod ModTime >PUSHW L.TIME.Create Create Time @@ -401,7 +401,7 @@ CS.QUIT jsr LeaveSubDir ldy #hFilter lda (pData),y beq .3 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .3 clc rts @@ -443,25 +443,25 @@ FileType2PSTR ldy #0 *-------------------------------------- CS.END *-------------------------------------- -OptionList >PSTRING "LR" +OptionList >PSTR "LR" OptionVars .DA #bLong,bRecurse *-------------------------------------- -MSG.DEV >CSTRING "%15S S%d,D%d Blocks Used:%5D,Total:%5D\n" -MSG.DIR >CSTRING "/%18S" -MSG.DIREXT >CSTRING "/%15S %a %S %S\n" -MSG.FILE >CSTRING "%S.%S" -MSG.FILEEXT >CSTRING "%15S %S $%H %a %10u %S %S\n" +MSG.DEV >CSTR "%15S S%d,D%d Blocks Used:%5D,Total:%5D\n" +MSG.DIR >CSTR "/%18S" +MSG.DIREXT >CSTR "/%15S %a %S %S\n" +MSG.FILE >CSTR "%S.%S" +MSG.FILEEXT >CSTR "%15S %S $%H %a %10u %S %S\n" *-------------------------------------- PRODOS.FT.HEX .HS 0406FAFCFDE2FF -PRODOS.FT.TXT >PSTRING "TXT" - >PSTRING "BIN" - >PSTRING "S-C" - >PSTRING "BAS" - >PSTRING "VAR" - >PSTRING "ATK" - >PSTRING "SYS" -PRODOS.FT.DFLT >PSTRING "$ " -TIME.Format >PSTRING "%d-%b-%y %H:%M" +PRODOS.FT.TXT >PSTR "TXT" + >PSTR "BIN" + >PSTR "S-C" + >PSTR "BAS" + >PSTR "VAR" + >PSTR "ATK" + >PSTR "SYS" +PRODOS.FT.DFLT >PSTR "$ " +TIME.Format >PSTR "%d-%b-%y %H:%M" TIME.Create .BS 20 TIME.Mod .BS 20 HEXDIGIT .AS '0123456789ABCDEF' diff --git a/BIN/LSDEV.S.txt b/BIN/LSDEV.S.txt index 0cb60181..47b6c236 100644 --- a/BIN/LSDEV.S.txt +++ b/BIN/LSDEV.S.txt @@ -42,7 +42,7 @@ CS.INIT >LDYAI DevMgr.Table stz DEV.ID >LDYA L.MSG0 - >SYSCALL SYS.PrintfYA + >SYSCALL PrintfYA .2 lda (ZPPTR1) cmp #$D8 @@ -66,7 +66,7 @@ CS.INIT >LDYAI DevMgr.Table ldy #S.DEV.ID >PUSHB (ZPPTR1),y >LDYA L.MSG1 - >SYSCALL SYS.PrintfYA + >SYSCALL PrintfYA lda ZPPTR1 clc @@ -90,8 +90,8 @@ CS.QUIT clc rts *-------------------------------------- CS.END -MSG0 >CSTRING "ID Flags Name Address\n" -MSG1 >CSTRING "%03d %b %4S $%H\n" +MSG0 >CSTR "ID Flags Name Address\n" +MSG1 >CSTR "%03d %b %4S $%H\n" DEV.ID .BS 1 MAN SAVE BIN/LSDEV.S diff --git a/BIN/MD.S.txt b/BIN/MD.S.txt index 906c35fb..dc4629f6 100644 --- a/BIN/MD.S.txt +++ b/BIN/MD.S.txt @@ -33,15 +33,15 @@ CS.START cld .DA CS.QUIT .DA 0 *-------------------------------------- -CS.INIT >SYSCALL SYS.GetArgC +CS.INIT >SYSCALL GetArgC cmp #1 beq .99 lda #1 - >SYSCALL SYS.GetArgA - >SYSCALL SYS.GetFullPathYA + >SYSCALL GetArgA + >SYSCALL GetFullPathYA stx hFullPath - >SYSCALL SYS.MKDIRYA + >SYSCALL MKDIRYA pha save error code jsr .98 @@ -50,7 +50,7 @@ CS.INIT >SYSCALL SYS.GetArgC rts .98 lda hFullPath - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .99 lda #SYSMGR.ERRSYN sec rts diff --git a/BIN/MEM.S.txt b/BIN/MEM.S.txt index 0bad0018..d554c3ee 100644 --- a/BIN/MEM.S.txt +++ b/BIN/MEM.S.txt @@ -44,10 +44,10 @@ L.MemStat .DA MemStat .DA 0 *-------------------------------------- CS.INIT >LDYA L.MemStat - >SYSCALL SYS.GetMemStatYA + >SYSCALL GetMemStatYA >LDYA L.MSG.Main - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda MemStat+S.MEMSTAT.MF sec @@ -62,10 +62,10 @@ CS.INIT >LDYA L.MemStat >PUSHW MemStat+S.MEMSTAT.ML >LDYA L.MSG.Stat - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA *-------------------------------------- >LDYA L.MSG.Aux - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda MemStat+S.MEMSTAT.XF sec @@ -80,10 +80,10 @@ CS.INIT >LDYA L.MemStat >PUSHW MemStat+S.MEMSTAT.XL >LDYA L.MSG.Stat - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA *-------------------------------------- >LDYA L.MSG.Kernel - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda MemStat+S.MEMSTAT.DH sec @@ -98,10 +98,10 @@ CS.INIT >LDYA L.MemStat >PUSHW MemStat+S.MEMSTAT.DL >LDYA L.MSG.Stat - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA >LDYA L.MSG.End - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #0 sec rts @@ -112,11 +112,11 @@ CS.QUIT clc rts *-------------------------------------- CS.END -MSG.Main >CSTRING "--- Main Memory ---------------\n" -MSG.Aux >CSTRING "--- Aux Memory ----------------\n" -MSG.Kernel >CSTRING "--- Kernel (Drivers) Memory ---\n" -MSG.Stat >CSTRING " Low : $%H\n Free Ptr : $%H\n High : $%H\n Available Memory : %05D Bytes\n" -MSG.End >CSTRING "-------------------------------\n" +MSG.Main >CSTR "--- Main Memory ---------------\n" +MSG.Aux >CSTR "--- Aux Memory ----------------\n" +MSG.Kernel >CSTR "--- Kernel (Drivers) Memory ---\n" +MSG.Stat >CSTR " Low : $%H\n Free Ptr : $%H\n High : $%H\n Available Memory : %05D Bytes\n" +MSG.End >CSTR "-------------------------------\n" MemStat .BS S.MEMSTAT *-------------------------------------- .DUMMY diff --git a/BIN/MEMDUMP.S.txt b/BIN/MEMDUMP.S.txt index 703dd147..bd0eff93 100644 --- a/BIN/MEMDUMP.S.txt +++ b/BIN/MEMDUMP.S.txt @@ -76,11 +76,11 @@ CS.RUN ldy #bCANCEL bne .1 >LDYA L.MSG0 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA .1 ldy #MEM.COUNT lda (pData),y - >SYSCALL SYS.GetMemByIDA + >SYSCALL GetMemByIDA >STYA ZPPTR1 lda (ZPPTR1) bpl .2 @@ -126,19 +126,19 @@ CS.RUN ldy #bCANCEL ldy #USED.COUNT >PUSHB (pData),y >LDYA L.MSG2 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA >PUSHW MemMgr.HiMem >LDYA L.MSG3 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA >PUSHW MemMgr.Free >LDYA L.MSG4 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA >PUSHW MemMgr.LoMem >LDYA L.MSG5 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda MemMgr.Free sec @@ -149,7 +149,7 @@ CS.RUN ldy #bCANCEL >PUSHYA >LDYA L.MSG6 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA sec rts *-------------------------------------- @@ -185,7 +185,7 @@ CS.RUN.PRINTMEM ldy #S.MEM.LEN >PUSHA >LDYA L.MSG1 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldy #S.MEM.BIN lda (ZPPTR1),y @@ -210,7 +210,7 @@ CS.RUN.PRINTMEM ldy #S.MEM.LEN >PUSHW ZPPTR2 String >PUSHB (ZPPTR2) Len >LDYA L.MSG1.STR - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bra .8 .2 ldy #15 @@ -220,14 +220,14 @@ CS.RUN.PRINTMEM ldy #S.MEM.LEN bpl .3 >LDYA L.MSG1.HEX - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bra .8 ****** BIN -.7 >SYSCALL SYS.GetMemPtrA +.7 >SYSCALL GetMemPtrA >PUSHYA >LDYA L.MSG1.BIN - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA .8 ldy #LINE.COUNT lda (pData),y @@ -293,16 +293,16 @@ CS.QUIT clc rts *-------------------------------------- CS.END -MSG0 >CSTRING "hMem Flags PID REF PTR LEN BINPATH/DATA\n" -MSG1 >CSTRING " %03d %b %03d %03d $%H %05D " -MSG1.BIN >CSTRING "!BIN:%40S\n" -MSG1.STR >CSTRING "#STR:[%03d]:%32S\n" -MSG1.HEX >CSTRING "?HEX:%h%h%h%h.%h%h%h%h.%h%h%h%h.%h%h%h%h\n" -MSG2 >CSTRING "\nAllocated hMem:%d, Total:%d\n" -MSG3 >CSTRING "High Memory: $%H\n" -MSG4 >CSTRING "Free ULimit: $%H\n" -MSG5 >CSTRING "Low Memory: $%H\n" -MSG6 >CSTRING "\nFree Memory: %D Bytes.\n" +MSG0 >CSTR "hMem Flags PID REF PTR LEN BINPATH/DATA\n" +MSG1 >CSTR " %03d %b %03d %03d $%H %05D " +MSG1.BIN >CSTR "!BIN:%40S\n" +MSG1.STR >CSTR "#STR:[%03d]:%32S\n" +MSG1.HEX >CSTR "?HEX:%h%h%h%h.%h%h%h%h.%h%h%h%h.%h%h%h%h\n" +MSG2 >CSTR "\nAllocated hMem:%d, Total:%d\n" +MSG3 >CSTR "High Memory: $%H\n" +MSG4 >CSTR "Free ULimit: $%H\n" +MSG5 >CSTR "Low Memory: $%H\n" +MSG6 >CSTR "\nFree Memory: %D Bytes.\n" *-------------------------------------- .DUMMY .OR 0 diff --git a/BIN/NETSTAT.S.txt b/BIN/NETSTAT.S.txt index 42101a74..a50985c8 100644 --- a/BIN/NETSTAT.S.txt +++ b/BIN/NETSTAT.S.txt @@ -55,11 +55,11 @@ L.MSG1.S .DA MSG1.S.0 .DA 0 *-------------------------------------- CS.INIT >LDYA L.LIBTCPIP - >SYSCALL SYS.LoadLibYA + >SYSCALL LoadLibYA sta hLIBTCPIP >LDYA L.MSG0 - >SYSCALL SYS.PRINTFYA + >SYSCALL PRINTFYA >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.GETTABLE >STYA ZPPTR1 @@ -95,7 +95,7 @@ CS.INIT >LDYA L.LIBTCPIP >PUSHB L.MSG1+1,x >PUSHB L.MSG1,x >LDYA L.MSG1 - >SYSCALL SYS.PRINTFYA + >SYSCALL PRINTFYA .7 clc lda ZPPTR1 @@ -116,31 +116,31 @@ CS.DOEVENT clc rts *-------------------------------------- CS.QUIT lda hLIBTCPIP - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA clc rts *-------------------------------------- CS.END -LIBTCPIP >PSTRING "libtcpip.o" -MSG0 >CSTRING "Proto Local Remote Options Status\n" -MSG1 >CSTRING "%s %03d.%03d.%03d.%03d:%05D %03d.%03d.%03d.%03d:%05D %b %s\n" -MSG1.UDP >CSTRING "UDP" -MSG1.TCP >CSTRING "TCP" -MSG1.RAW >CSTRING "RAW" -MSG1.RDM >CSTRING "RDM" -MSG1.SEQ >CSTRING "SEQ" -MSG1.INV >CSTRING "???" -MSG1.S.0 >CSTRING "*" -MSG1.S.1 >CSTRING "LISTENING" -MSG1.S.2 >CSTRING "SYN-SENT" -MSG1.S.3 >CSTRING "SYN-RECEIVED" -MSG1.S.4 >CSTRING "ESTABLISHED" -MSG1.S.5 >CSTRING "CLOSE-WAIT" -MSG1.S.6 >CSTRING "LAST-ACK" -MSG1.S.7 >CSTRING "FIN-WAIT-1" -MSG1.S.8 >CSTRING "FIN-WAIT-2" -MSG1.S.9 >CSTRING "CLOSING" -MSG1.S.10 >CSTRING "TIME-WAIT" +LIBTCPIP >PSTR "libtcpip.o" +MSG0 >CSTR "Proto Local Remote Options Status\n" +MSG1 >CSTR "%s %03d.%03d.%03d.%03d:%05D %03d.%03d.%03d.%03d:%05D %b %s\n" +MSG1.UDP >CSTR "UDP" +MSG1.TCP >CSTR "TCP" +MSG1.RAW >CSTR "RAW" +MSG1.RDM >CSTR "RDM" +MSG1.SEQ >CSTR "SEQ" +MSG1.INV >CSTR "???" +MSG1.S.0 >CSTR "*" +MSG1.S.1 >CSTR "LISTENING" +MSG1.S.2 >CSTR "SYN-SENT" +MSG1.S.3 >CSTR "SYN-RECEIVED" +MSG1.S.4 >CSTR "ESTABLISHED" +MSG1.S.5 >CSTR "CLOSE-WAIT" +MSG1.S.6 >CSTR "LAST-ACK" +MSG1.S.7 >CSTR "FIN-WAIT-1" +MSG1.S.8 >CSTR "FIN-WAIT-2" +MSG1.S.9 >CSTR "CLOSING" +MSG1.S.10 >CSTR "TIME-WAIT" hLIBTCPIP .BS 1 SocketCount .BS 1 MAN diff --git a/BIN/NFSMOUNT.S.txt b/BIN/NFSMOUNT.S.txt index 9108fd9f..f59a2db5 100644 --- a/BIN/NFSMOUNT.S.txt +++ b/BIN/NFSMOUNT.S.txt @@ -37,7 +37,7 @@ L.LIBTCPIP .DA LIBTCPIP L.MSG.USAGE .DA MSG.USAGE .DA 0 *-------------------------------------- -CS.INIT >SYSCALL SYS.GetArgC +CS.INIT >SYSCALL GetArgC cmp #1 beq .99 @@ -64,7 +64,7 @@ CS.INIT >SYSCALL SYS.GetArgC rts .99 >LDYA L.MSG.USAGE - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #SYSMGR.ERRSYN sec rts @@ -81,13 +81,13 @@ CS.DOEVENT rts *-------------------------------------- CS.QUIT lda hLIBTCPIP - >SYSCALL SYS.UnloadLibA + >SYSCALL UnloadLibA clc rts *-------------------------------------- CS.END -MSG.USAGE >CSTRING "Usage : NFSMOUNT [HOST | IP]/export /mountvol\n" -LIBTCPIP >PSTRING "libtcpip.o" +MSG.USAGE >CSTR "Usage : NFSMOUNT [HOST | IP]/export /mountvol\n" +LIBTCPIP >PSTR "libtcpip.o" hLIBTCPIP .BS 1 Socket .DA #S.SOCKET.SOCK.DGRAM .BS 3 diff --git a/BIN/NSCUTIL.S.txt b/BIN/NSCUTIL.S.txt index d874b8e1..5582a2d8 100644 --- a/BIN/NSCUTIL.S.txt +++ b/BIN/NSCUTIL.S.txt @@ -40,7 +40,7 @@ L.MSG.READ.OK4 .DA MSG.READ.OK4 L.MSG.USAGE .DA MSG.USAGE .DA 0 *-------------------------------------- -CS.INIT >SYSCALL SYS.GetArgC +CS.INIT >SYSCALL GetArgC cmp #1 bne CS.INIT.SET @@ -56,7 +56,7 @@ CS.INIT.READ jsr NSC.Init bpl .1 >LDYA L.MSG.READ.KO - >SYSCALL SYS.PrintfYA + >SYSCALL PrintfYA lda #DEVMGR.ERRNOHW sec @@ -65,14 +65,14 @@ CS.INIT.READ jsr NSC.Init .8 jsr NSC.Dump >LDYA L.MSG.USAGE - >SYSCALL SYS.PrintfYA + >SYSCALL PrintfYA lda #0 tell TSKMGR that all done ok, but sec we do not want to stay in memory rts CS.INIT.SET lda #1 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA >STYA ZPPtr1 lda (ZPPtr1) @@ -273,30 +273,30 @@ NSC.Dump ldx #1 >PUSHA >LDYA L.MSG.READ.OK1 - >SYSCALL SYS.PrintfYA + >SYSCALL PrintfYA >LDYA L.MSG.READ.OK2.24 bit DS1216E.DATA+4 bpl .3 >LDYA L.MSG.READ.OK2.12 -.3 >SYSCALL SYS.PrintfYA +.3 >SYSCALL PrintfYA >LDYA L.MSG.READ.OK3 - >SYSCALL SYS.PrintfYA + >SYSCALL PrintfYA lda DS1216E.DATA+2 jsr PrintBCD lda #'/' - >SYSCALL SYS.COutA + >SYSCALL COutA lda DS1216E.DATA+1 jsr PrintBCD lda #'/' - >SYSCALL SYS.COutA + >SYSCALL COutA lda DS1216E.DATA jsr PrintBCD >LDYA L.MSG.READ.OK4 - >SYSCALL SYS.PrintfYA + >SYSCALL PrintfYA lda DS1216E.DATA+4 bpl .4 @@ -304,15 +304,15 @@ NSC.Dump ldx #1 .4 and #$3F jsr PrintBCD lda #':' - >SYSCALL SYS.COutA + >SYSCALL COutA lda DS1216E.DATA+5 jsr PrintBCD lda #':' - >SYSCALL SYS.COutA + >SYSCALL COutA lda DS1216E.DATA+6 jsr PrintBCD lda #'.' - >SYSCALL SYS.COutA + >SYSCALL COutA lda DS1216E.DATA+7 jsr PrintBCD rts @@ -323,12 +323,12 @@ PrintBCD pha lsr lsr ora #$30 - >SYSCALL SYS.COutA + >SYSCALL COutA bcs .9 pla and #$0f ora #$30 - >SYSCALL SYS.COutA + >SYSCALL COutA .9 rts *-------------------------------------- GetBCD lda (ZPPtr1),y @@ -358,13 +358,13 @@ IsDigit cmp #'0' rts *-------------------------------------- CS.END -MSG.READ.KO >CSTRING "DS1216E Not Detected.\n" -MSG.READ.OK1 >CSTRING "DS1216E Detected:/OSC=%d,/RST=%d,mode=" -MSG.READ.OK2.12 >CSTRING "am/pm" -MSG.READ.OK2.24 >CSTRING "24h" -MSG.READ.OK3 >CSTRING "\nDate:" -MSG.READ.OK4 >CSTRING "\nTime:" -MSG.USAGE >CSTRING "\n\nTo Reset the chip and set clock, type:\nNSCUTIL DD/MM/YY hh:mm:ss\n" +MSG.READ.KO >CSTR "DS1216E Not Detected.\n" +MSG.READ.OK1 >CSTR "DS1216E Detected:/OSC=%d,/RST=%d,mode=" +MSG.READ.OK2.12 >CSTR "am/pm" +MSG.READ.OK2.24 >CSTR "24h" +MSG.READ.OK3 >CSTR "\nDate:" +MSG.READ.OK4 >CSTR "\nTime:" +MSG.USAGE >CSTR "\n\nTo Reset the chip and set clock, type:\nNSCUTIL DD/MM/YY hh:mm:ss\n" TmpByte .BS 1 DS1216E.PATTERN .HS 5CA33AC55CA33AC5 Reverted 7->0 DS1216E.DETECT .BS 8 diff --git a/BIN/PING.S.txt b/BIN/PING.S.txt index ccad3e65..3a2a15c7 100644 --- a/BIN/PING.S.txt +++ b/BIN/PING.S.txt @@ -42,7 +42,7 @@ L.MSG2 .DA MSG2 L.MSG3 .DA MSG3 .DA 0 *-------------------------------------- -CS.INIT >SYSCALL SYS.GetArgC +CS.INIT >SYSCALL GetArgC cmp #1 bne .1 @@ -51,7 +51,7 @@ CS.INIT >SYSCALL SYS.GetArgC rts .1 >LDYA L.LIBTCPIP - >SYSCALL SYS.LoadLibYA + >SYSCALL LoadLibYA sta hLIBTCPIP >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG is TCPIP loaded ? @@ -89,25 +89,25 @@ CS.RUN jsr Init.Timeout .1 >PUSHW pData DST.IP lda #1 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA >PUSHYA >LIBCALL hLIBTCPIP,LIBTCPIP.HST.GETBYNAME bcc .2 - >SYSCALL SYS.Sleep + >SYSCALL Sleep jsr Wait.Timeout bcc .1 lda #1 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA >PUSHYA >LDYA L.MSG0 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #1 sec rts .2 lda #1 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA >PUSHYA ldy #3 @@ -118,7 +118,7 @@ CS.RUN jsr Init.Timeout >PUSHB (pData),y DST.IP+1 >PUSHB (pData) DST.IP >LDYA L.MSG1 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA CS.RUN.ECHO >LIBCALL hLIBTCPIP,LIBTCPIP.NEW.ICMP.FRAME >STYA ZPFrameBase1 @@ -198,18 +198,18 @@ CS.RUN.ECHO >LIBCALL hLIBTCPIP,LIBTCPIP.NEW.ICMP.FRAME .3 ldy #hFrame lda (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >PUSHYA >LIBCALL hLIBTCPIP,LIBTCPIP.SEND.ICMP.FRAME bcc .4 - >SYSCALL SYS.Sleep + >SYSCALL Sleep jsr Wait.Timeout bcc .3 .4 ldy #hFrame lda (pData),y - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA ldy #bReply lda #0 @@ -217,7 +217,7 @@ CS.RUN.ECHO >LIBCALL hLIBTCPIP,LIBTCPIP.NEW.ICMP.FRAME jsr Init.Timeout -CS.RUN.WAIT >SYSCALL SYS.Sleep +CS.RUN.WAIT >SYSCALL Sleep ldy #bReply lda (pData),y bne .1 @@ -237,7 +237,7 @@ CS.RUN.WAIT >SYSCALL SYS.Sleep >PUSHB (pData),y DST.IP+1 >PUSHB (pData) DST.IP >LDYA L.MSG2 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA .1 ldy #bCTRLC lda (pData),y @@ -246,7 +246,7 @@ CS.RUN.WAIT >SYSCALL SYS.Sleep lda (pData),y beq .2 - >SYSCALL SYS.Sleep + >SYSCALL Sleep bra .1 .2 jmp CS.RUN.ECHO @@ -301,7 +301,7 @@ CS.DOEVENT lda (pEvent) ldy #S.EVT.DATALO Get Frame hMem lda (pEvent),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPFrameBase1 ldy #S.IP.PROTOCOL @@ -374,7 +374,7 @@ CS.EVENT.REPLY lda #TIMEOUT.MAX >PUSHB (ZPFrameBase1),y >LDYA L.MSG3 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldy #bReply lda (pData),y @@ -383,7 +383,7 @@ CS.EVENT.REPLY lda #TIMEOUT.MAX rts *-------------------------------------- CS.QUIT lda hLIBTCPIP - >SYSCALL SYS.UnloadLibA + >SYSCALL UnloadLibA clc rts *-------------------------------------- @@ -403,11 +403,11 @@ Wait.TimeOut sec .9 rts *-------------------------------------- CS.END -LIBTCPIP >PSTRING "libtcpip.o" -MSG0 >CSTRING "%S: Unknown host\n" -MSG1 >CSTRING "PING %d.%d.%d.%d (%S)\n" -MSG2 >CSTRING "%d.%d.%d.%d: TimeOut/Host unreachable\n" -MSG3 >CSTRING "32 bytes from %d.%d.%d.%d, icmp_seq=%D, ttl=%d, time=%D ms\n" +LIBTCPIP >PSTR "libtcpip.o" +MSG0 >CSTR "%S: Unknown host\n" +MSG1 >CSTR "PING %d.%d.%d.%d (%S)\n" +MSG2 >CSTR "%d.%d.%d.%d: TimeOut/Host unreachable\n" +MSG3 >CSTR "32 bytes from %d.%d.%d.%d, icmp_seq=%D, ttl=%d, time=%D ms\n" hLIBTCPIP .BS 1 hDev .BS 1 TimeOut.ms .BS 2 diff --git a/BIN/PS.S.txt b/BIN/PS.S.txt index c0d6112f..65cc0bc8 100644 --- a/BIN/PS.S.txt +++ b/BIN/PS.S.txt @@ -42,14 +42,14 @@ CS.INIT >LDYAI TSKMGR.TABLE+S.PS stz PS.COUNT >LDYA L.MSG0 - >SYSCALL SYS.PrintfYA + >SYSCALL PrintfYA .1 lda (ZPPTR1) bpl .4 ldy #S.PS.hCMDLINE lda (ZPPTR1),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >PUSHYA ldy #S.PS.PID @@ -63,7 +63,7 @@ CS.INIT >LDYAI TSKMGR.TABLE+S.PS lda (ZPPTR1),y >PUSHA PID >LDYA L.MSG1 - >SYSCALL SYS.PrintfYA + >SYSCALL PrintfYA .4 lda ZPPTR1 clc @@ -88,8 +88,8 @@ CS.QUIT clc *-------------------------------------- CS.END PS.COUNT .BS 1 -MSG0 >CSTRING "ID Flags PID Command Line\n" -MSG1 >CSTRING "%03d %b %03d %S\n" +MSG0 >CSTR "ID Flags PID Command Line\n" +MSG1 >CSTR "%03d %b %03d %S\n" MAN SAVE BIN/PS.S ASM diff --git a/BIN/RM.S.txt b/BIN/RM.S.txt index a50f4a43..a06a3d69 100644 --- a/BIN/RM.S.txt +++ b/BIN/RM.S.txt @@ -38,16 +38,16 @@ L.MSG.ERR .DA MSG.ERR L.FullPath .DA FullPath .DA 0 *-------------------------------------- -CS.INIT >SYSCALL SYS.GetArgC +CS.INIT >SYSCALL GetArgC cmp #1 bne .99 lda #1 - >SYSCALL SYS.GetArgA - >SYSCALL SYS.GetFullPathYA + >SYSCALL GetArgA + >SYSCALL GetFullPathYA stx hFullPath - >SYSCALL SYS.ListDirInitYA + >SYSCALL ListDirInitYA bcs .98 ldy #hS.LISTDIR sta (pData),y @@ -62,13 +62,13 @@ CS.INIT >SYSCALL SYS.GetArgC .98 pha lda hFullPath - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA pla sec rts .99 >LDYA L.MSG.USAGE - >SYSCALL SYS.PStrOutYA + >SYSCALL PStrOutYA lda #SYSMGR.ERRSYN sec rts @@ -88,11 +88,11 @@ CS.RUN ldy #bCANCEL .1 ldy #hS.LISTDIR lda (pData),y - >SYSCALL SYS.ListDirNextA + >SYSCALL ListDirNextA bcs .99 pha - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr1 lda (ZPPtr1) pha @@ -109,12 +109,12 @@ CS.RUN ldy #bCANCEL ldy #hS.LISTDIR lda (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr2 ldy #S.LISTDIR.hPATH lda (ZPPtr2),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr2 lda (ZPPtr2) @@ -138,21 +138,21 @@ CS.RUN ldy #bCANCEL stx FullPath >LDYA L.FullPath - >SYSCALL SYS.PStrOutYA + >SYSCALL PStrOutYA >LDYA L.FullPath - >SYSCALL SYS.MLIDestroyYA + >SYSCALL MLIDestroyYA bcs .5 >LDYA L.MSG.OK - >SYSCALL SYS.PStrOutYA + >SYSCALL PStrOutYA bra .8 .5 >PUSHA >LDYA L.MSG.ERR - >SYSCALL SYS.PStrOutYA + >SYSCALL PStrOutYA .8 pla - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA clc rts *-------------------------------------- @@ -198,20 +198,20 @@ CS.QUIT ldy #hS.LISTDIR lda (pData),y beq .1 - >SYSCALL SYS.ListDirCloseA + >SYSCALL ListDirCloseA .1 ldy #hDirPath lda (pData),y beq .2 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .2 clc rts *-------------------------------------- CS.END -MSG.USAGE >PSTRING "Usage : RM [file/Dir, *,? wildcards allowed]\n" -MSG.OK >PSTRING " [Ok]\n" -MSG.ERR >PSTRING " [%h]\n" +MSG.USAGE >PSTR "Usage : RM [file/Dir, *,? wildcards allowed]\n" +MSG.OK >PSTR " [Ok]\n" +MSG.ERR >PSTR " [%h]\n" hFullPath .BS 1 FullPath .BS 64 *-------------------------------------- diff --git a/BIN/RPCDUMP.S.txt b/BIN/RPCDUMP.S.txt index da343c64..03018e64 100644 --- a/BIN/RPCDUMP.S.txt +++ b/BIN/RPCDUMP.S.txt @@ -44,12 +44,12 @@ L.MSG.DUMP0 .DA MSG.DUMP0 L.MSG.DUMP1 .DA MSG.DUMP1 .DA 0 *-------------------------------------- -CS.INIT >SYSCALL SYS.GetArgC +CS.INIT >SYSCALL GetArgC cmp #1 beq .99 >LDYA L.LIBTCPIP - >SYSCALL SYS.LoadLibYA + >SYSCALL LoadLibYA sta hLIBTCPIP >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG is TCPIP loaded ? @@ -74,7 +74,7 @@ CS.INIT >SYSCALL SYS.GetArgC rts .99 >LDYA L.MSG.USAGE - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #SYSMGR.ERRSYN sec rts @@ -83,20 +83,20 @@ CS.RUN jsr Init.Timeout .1 >PUSHW L.Socket.Dst.Addr lda #1 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA >PUSHYA >LIBCALL hLIBTCPIP,LIBTCPIP.HST.GETBYNAME bcc .2 - >SYSCALL SYS.Sleep + >SYSCALL Sleep jsr Wait.Timeout bcc .1 lda #1 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA >PUSHYA >LDYA L.MSG.UNKNOWN - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA sec rts @@ -115,7 +115,7 @@ CS.RUN jsr Init.Timeout >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.SEND bcc .4 - >SYSCALL SYS.Sleep + >SYSCALL Sleep jsr Wait.Timeout bcc .3 bra .99 @@ -127,31 +127,31 @@ CS.RUN jsr Init.Timeout >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.RCVDA bcc .6 - >SYSCALL SYS.Sleep + >SYSCALL Sleep jsr Wait.Timeout bcc .5 bra .99 .6 ldy #hFrame sta (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPFrameBase jsr DumpRPCFrame ldy #hFrame lda (pData),y - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA lda #0 sec rts .99 lda #1 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA >PUSHYA >LDYA L.MSG.TIMEOUT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA sec rts *-------------------------------------- @@ -198,7 +198,7 @@ CS.QUIT ldy #hSocket lda hLIBTCPIP beq .8 - >SYSCALL SYS.UnloadLibA + >SYSCALL UnloadLibA .8 clc rts @@ -227,7 +227,7 @@ DumpRPCFrame lda #S.UDP+24 sta ZPFrameBase+1 >LDYA L.MSG.DUMP0 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA .1 ldy #3 lda (ZPFrameBase),y Value follows? @@ -251,7 +251,7 @@ DumpRPCFrame lda #S.UDP+24 bne .7 >LDYA L.MSG.DUMP1 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #20 clc @@ -264,12 +264,12 @@ DumpRPCFrame lda #S.UDP+24 .9 rts *-------------------------------------- CS.END -LIBTCPIP >PSTRING "libtcpip.o" -MSG.USAGE >CSTRING "Usage : RPCDUMP \n" -MSG.UNKNOWN >CSTRING "%S: Unknown host\n" -MSG.TIMEOUT >CSTRING "No response from %S\n" -MSG.DUMP0 >CSTRING "Program Ver Proto:Port\n" -MSG.DUMP1 >CSTRING "%10L %2d %2d:%D\n" +LIBTCPIP >PSTR "libtcpip.o" +MSG.USAGE >CSTR "Usage : RPCDUMP \n" +MSG.UNKNOWN >CSTR "%S: Unknown host\n" +MSG.TIMEOUT >CSTR "No response from %S\n" +MSG.DUMP0 >CSTR "Program Ver Proto:Port\n" +MSG.DUMP1 >CSTR "%10L %2d %2d:%D\n" Socket .DA #S.SOCKET.SOCK.DGRAM .BS 3 Socket.Src.Addr .BS 4 diff --git a/BIN/X.CPLSMVRM.S.txt b/BIN/X.CPLSMVRM.S.txt index 2bd61464..5d19cfc5 100644 --- a/BIN/X.CPLSMVRM.S.txt +++ b/BIN/X.CPLSMVRM.S.txt @@ -9,7 +9,7 @@ AUTO 6 * hDIRs .BS MAX.RECURSE+1 * hBasePath .BS 1 *-------------------------------------- -InitSrcDirYA >SYSCALL SYS.GetFullPathYA +InitSrcDirYA >SYSCALL GetFullPathYA bcc .10 rts @@ -22,7 +22,7 @@ InitSrcDirYA >SYSCALL SYS.GetFullPathYA >PUSHW L.STAT >PUSHW ZPPtr1 - >SYSCALL SYS.STAT + >SYSCALL STAT bcs .1 File/DIR does not exists, go extract wildcard @@ -59,7 +59,7 @@ InitSrcDirYA >SYSCALL SYS.GetFullPathYA stx UsrBuf256 >LDYAI UsrBuf256 - >SYSCALL SYS.NewPstrYA + >SYSCALL NewPstrYA bcs .9 txa ldy #hFilter @@ -67,7 +67,7 @@ InitSrcDirYA >SYSCALL SYS.GetFullPathYA .5 >PUSHWI 256 >PUSHBI 0 - >SYSCALL SYS.GetMem Get a 256 buffer to store BasePath + >SYSCALL GetMem Get a 256 buffer to store BasePath bcs .9 >STYA ZPPtr2 @@ -77,10 +77,10 @@ InitSrcDirYA >SYSCALL SYS.GetFullPathYA >PUSHW ZPPtr1 Push Src >PUSHW ZPPtr2 Push Dst - >SYSCALL SYS.PStrCpy + >SYSCALL PStrCpy >LDYA ZPPtr1 - >SYSCALL SYS.OPENDIRYA + >SYSCALL OPENDIRYA bcs .9 pha @@ -100,7 +100,7 @@ InitSrcDirYA >SYSCALL SYS.GetFullPathYA .9 pha .90 lda #$ff self modified - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA pla sec rts @@ -114,15 +114,15 @@ EnterSubDirYA >STYA ZPPtr2 save SUBDIR for StrCat ldy #hBasePath lda (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr1 save full path >PUSHW ZPPtr1 push Src for StrCat >PUSHW ZPPtr2 - >SYSCALL SYS.PStrCat + >SYSCALL PStrCat >LDYA ZPPtr1 - >SYSCALL SYS.OPENDIRYA + >SYSCALL OPENDIRYA bcs .99 pha @@ -144,11 +144,11 @@ LeaveSubDir ldy #hDIRs lda (pData),y tay lda (pData),y - >SYSCALL SYS.CLOSEDIRA + >SYSCALL CLOSEDIRA ldy #hBasePath lda (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPtr1 save full path diff --git a/DRV/CONSOLE.DRV.S.txt b/DRV/CONSOLE.DRV.S.txt index 4c4cc1a9..72cca011 100644 --- a/DRV/CONSOLE.DRV.S.txt +++ b/DRV/CONSOLE.DRV.S.txt @@ -37,12 +37,12 @@ L.MSG.DETECT .DA MSG.DETECT .DA 0 End Of Reloc Table *-------------------------------------- Dev.Detect >LDYA L.MSG.DETECT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA clc rts CS.END -MSG.DETECT >CSTRING "Apple IIe/IIc 80 Col Driver.\n" +MSG.DETECT >CSTR "Apple IIe/IIc 80 Col Driver.\n" *-------------------------------------- * Device Header (16 Bytes) *-------------------------------------- @@ -50,7 +50,7 @@ DEV.HEADER cld jmp (DRV.CS.START,x) .HS 00 DevID .DA #S.DEV.F.EVENT+S.DEV.F.COUT+S.DEV.F.CHAR - >PSTRING "CON" NAME + >PSTR "CON" NAME .HS 00 NAME must Be 5 bytes long .HS 00 .HS 00.00.00.00 @@ -774,8 +774,8 @@ Char.Out.Get sec .9 rts *-------------------------------------- DRV.CS.END -EscCodes >PSTRING "DMc" -EscSeqCmds >PSTRING "mnrKH" +EscCodes >PSTR "DMc" +EscSeqCmds >PSTR "mnrKH" BASEL .HS 00.80.00.80.00.80.00.80.28.A8.28.A8.28.A8.28.A8.50.D0.50.D0.50.D0.50.D0 BASEH .HS 04.04.05.05.06.06.07.07.04.04.05.05.06.06.07.07.04.04.05.05.06.06.07.07 CH .BS 1 diff --git a/DRV/DHGR.DRV.S.txt b/DRV/DHGR.DRV.S.txt index 28583118..b5121057 100644 --- a/DRV/DHGR.DRV.S.txt +++ b/DRV/DHGR.DRV.S.txt @@ -36,7 +36,7 @@ L.MSG.DETECT .DA MSG.DETECT .DA 0 End Of Reloc Table *-------------------------------------- Dev.Detect >LDYA L.MSG.DETECT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldx #0 .1 txa @@ -123,7 +123,7 @@ Dev.Detect >LDYA L.MSG.DETECT clc rts CS.END -MSG.DETECT >CSTRING "\nApple IIe/IIc DHGR Driver.\n" +MSG.DETECT >CSTR "\nApple IIe/IIc DHGR Driver.\n" *-------------------------------------- * Device Header (16 Bytes) *-------------------------------------- @@ -131,7 +131,7 @@ DEV.HEADER cld jmp (DRV.CS.START,x) .HS 00 DevID .DA #0 No Flag - >PSTRING "GFX" NAME + >PSTR "GFX" NAME .HS 00 NAME must Be 5 bytes long .HS 00 .HS 00.00.00.00 diff --git a/DRV/LANCEGS.DRV.S.txt b/DRV/LANCEGS.DRV.S.txt index 06a14f5f..772ab07a 100644 --- a/DRV/LANCEGS.DRV.S.txt +++ b/DRV/LANCEGS.DRV.S.txt @@ -38,7 +38,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME *-------------------------------------- Dev.Detect >STYA Args >LDYA L.MSG.DETECT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldx #$10 .1 lda L91C96.BSR+1,x @@ -53,7 +53,7 @@ Dev.Detect >STYA Args bpl .1 not yat at $80 >LDYA L.MSG.DETECT.KO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #DEVMGR.ERRNOHW Not Found in any slot, exiting sec @@ -68,7 +68,7 @@ Dev.Detect >STYA Args sec ror USERMAC - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPTmpPTR jsr DecodeMac bcc .4 @@ -78,16 +78,16 @@ Dev.Detect >STYA Args .4 >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA clc rts *-------------------------------------- .INB DRV/X.NET.DRV.S *-------------------------------------- CS.END -MSG.DETECT >CSTRING "LanCeGS/SMSC91C96 Driver.\n" -MSG.DETECT.OK >CSTRING "LanCeGS/SMSC91C96 Installed As Device : %S\n" -MSG.DETECT.KO >CSTRING "Hardware Not Found.\n" +MSG.DETECT >CSTR "LanCeGS/SMSC91C96 Driver.\n" +MSG.DETECT.OK >CSTR "LanCeGS/SMSC91C96 Installed As Device : %S\n" +MSG.DETECT.KO >CSTR "Hardware Not Found.\n" Args .BS 2 *-------------------------------------- * Device Header (16 Bytes) @@ -95,7 +95,7 @@ Args .BS 2 DEV.HEADER cld jmp (DRV.CS.START,x) .DA #S.DEV.F.SHARE+S.DEV.F.EVENT -DEV.HEADER.NAME >PSTRING "ETH1" NAME +DEV.HEADER.NAME >PSTR "ETH1" NAME .HS 00.00 .HS 00.00.00.00 *-------------------------------------- @@ -215,7 +215,7 @@ GETEVENT.RxOK lda #L91C96.2.PTR.RCVD+L91C96.2.PTR.AUTOI+L91C96.2.PTR.READ inc .11 >PUSHYA FRAMLEN+2 >PUSHBI 0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs .99 >STYA ZPTmpPTR txa diff --git a/DRV/MOUSE.DRV.S.txt b/DRV/MOUSE.DRV.S.txt index 1149eb13..52a0262f 100644 --- a/DRV/MOUSE.DRV.S.txt +++ b/DRV/MOUSE.DRV.S.txt @@ -64,7 +64,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME .DA 0 End Of Reloc Table *-------------------------------------- Dev.Detect >LDYA L.MSG.DETECT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA stz ZPTmpPtr1 lda #$C1 @@ -86,7 +86,7 @@ Dev.Detect >LDYA L.MSG.DETECT bne .1 >LDYA L.MSG.DETECT.KO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #DEVMGR.ERRNOHW Not Found in any slot, exiting sec @@ -106,14 +106,14 @@ Dev.Detect >LDYA L.MSG.DETECT >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA clc rts *-------------------------------------- CS.END -MSG.DETECT >CSTRING "Apple Mouse Card/IIc Mouse Driver.\n" -MSG.DETECT.OK >CSTRING "Mouse Installed As Device : %S\n" -MSG.DETECT.KO >CSTRING "No Mouse Found.\n" +MSG.DETECT >CSTR "Apple Mouse Card/IIc Mouse Driver.\n" +MSG.DETECT.OK >CSTR "Mouse Installed As Device : %S\n" +MSG.DETECT.KO >CSTR "No Mouse Found.\n" DEVSIG.Offset .HS 05070B0CFB DEVSIG.Value .HS 38180120D6 DEVSIG.Length .EQ DEVSIG.Value-DEVSIG.Offset @@ -124,7 +124,7 @@ DEV.HEADER cld jmp (DRV.CS.START,x) .HS 00 DevID .DA #S.DEV.F.EVENT -DEV.HEADER.NAME >PSTRING "MOU1" NAME +DEV.HEADER.NAME >PSTR "MOU1" NAME .HS 00 .HS 00.00.00.00 *-------------------------------------- diff --git a/DRV/PIC.DRV.S.txt b/DRV/PIC.DRV.S.txt index 67130036..5eb7fd49 100644 --- a/DRV/PIC.DRV.S.txt +++ b/DRV/PIC.DRV.S.txt @@ -37,7 +37,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME .DA 0 End Of Reloc Table *-------------------------------------- Dev.Detect >LDYA L.MSG.DETECT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA stz ZPTmpPtr1 lda #$C1 @@ -58,7 +58,7 @@ Dev.Detect >LDYA L.MSG.DETECT bne .1 >LDYA L.MSG.DETECT.KO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #DEVMGR.ERRNOHW Not Found in any slot, exiting sec @@ -78,21 +78,21 @@ Dev.Detect >LDYA L.MSG.DETECT >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA clc rts *-------------------------------------- CS.END -MSG.DETECT >CSTRING "Apple PIC (Parallel Interface Card).\n" -MSG.DETECT.OK >CSTRING "PIC Installed As Device : %S\n" -MSG.DETECT.KO >CSTRING "No PIC Found.\n" +MSG.DETECT >CSTR "Apple PIC (Parallel Interface Card).\n" +MSG.DETECT.OK >CSTR "PIC Installed As Device : %S\n" +MSG.DETECT.KO >CSTR "No PIC Found.\n" *-------------------------------------- * Device Header (16 Bytes) *-------------------------------------- DEV.HEADER cld jmp (DRV.CS.START,x) .DA #S.DEV.F.EVENT+S.DEV.F.COUT+S.DEV.F.CHAR -DEV.HEADER.NAME >PSTRING "LPT1" NAME +DEV.HEADER.NAME >PSTR "LPT1" NAME .HS 00.00 .HS 00.00.00.00 *-------------------------------------- diff --git a/DRV/SSC.DRV.S.txt b/DRV/SSC.DRV.S.txt index 6190a56b..af1d5d27 100644 --- a/DRV/SSC.DRV.S.txt +++ b/DRV/SSC.DRV.S.txt @@ -63,7 +63,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME *-------------------------------------- Dev.Detect sta hArgs >LDYA L.MSG.DETECT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA stz ZPTmpPtr1 lda #$C1 @@ -85,7 +85,7 @@ Dev.Detect sta hArgs bne .1 >LDYA L.MSG.DETECT.KO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #DEVMGR.ERRNOHW Not Found in any slot, exiting sec @@ -105,7 +105,7 @@ Dev.Detect sta hArgs >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA clc rts *-------------------------------------- @@ -113,9 +113,9 @@ CS.END DEVSIG.Offset .HS 05070B0C DEVSIG.Value .HS 38180131 DEVSIG.Length .EQ DEVSIG.Value-DEVSIG.Offset -MSG.DETECT >CSTRING "Apple SSC (Super Serial Card,//c Serial Port) Driver.\n" -MSG.DETECT.OK >CSTRING "SSC Installed As Device : %S\n" -MSG.DETECT.KO >CSTRING "No SSC Found.\n" +MSG.DETECT >CSTR "Apple SSC (Super Serial Card,//c Serial Port) Driver.\n" +MSG.DETECT.OK >CSTR "SSC Installed As Device : %S\n" +MSG.DETECT.KO >CSTR "No SSC Found.\n" hArgs .BS 1 *-------------------------------------- * Device Header (16 Bytes) @@ -123,7 +123,7 @@ hArgs .BS 1 DEV.HEADER cld jmp (DRV.CS.START,x) .DA #S.DEV.F.EVENT+S.DEV.F.COUT+S.DEV.F.CHAR -DEV.HEADER.NAME >PSTRING "COM1" NAME +DEV.HEADER.NAME >PSTR "COM1" NAME .HS 00.00 .HS 00.00.00.00 *-------------------------------------- diff --git a/DRV/SSC.I.DRV.S.txt b/DRV/SSC.I.DRV.S.txt index 64deec50..71252494 100644 --- a/DRV/SSC.I.DRV.S.txt +++ b/DRV/SSC.I.DRV.S.txt @@ -95,7 +95,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME *-------------------------------------- Dev.Detect sta hArgs >LDYA L.MSG.DETECT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA stz ZPTmpPtr1 lda #$C1 @@ -117,7 +117,7 @@ Dev.Detect sta hArgs bne .1 >LDYA L.MSG.DETECT.KO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #DEVMGR.ERRNOHW Not Found in any slot, exiting sec @@ -140,7 +140,7 @@ Dev.Detect sta hArgs >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA clc rts *-------------------------------------- @@ -148,9 +148,9 @@ CS.END DEVSIG.Offset .HS 05070B0C DEVSIG.Value .HS 38180131 DEVSIG.Length .EQ DEVSIG.Value-DEVSIG.Offset -MSG.DETECT >CSTRING "Apple SSC (Super Serial Card,//c Serial Port) Driver (IRQ Enabled).\n" -MSG.DETECT.OK >CSTRING "SSC Installed As Device : %S\n" -MSG.DETECT.KO >CSTRING "No SSC Found.\n" +MSG.DETECT >CSTR "Apple SSC (Super Serial Card,//c Serial Port) Driver (IRQ Enabled).\n" +MSG.DETECT.OK >CSTR "SSC Installed As Device : %S\n" +MSG.DETECT.KO >CSTR "No SSC Found.\n" hArgs .BS 1 *-------------------------------------- * Device Header (16 Bytes) @@ -158,7 +158,7 @@ hArgs .BS 1 DEV.HEADER cld jmp (DRV.CS.START,x) .DA #S.DEV.F.IRQ+S.DEV.F.EVENT+S.DEV.F.COUT+S.DEV.F.CHAR -DEV.HEADER.NAME >PSTRING "COM1" NAME +DEV.HEADER.NAME >PSTR "COM1" NAME .HS 00.00 .HS 00.00.00.00 *-------------------------------------- diff --git a/DRV/UTHER2.AI.DRV.S.txt b/DRV/UTHER2.AI.DRV.S.txt index 1fa877c8..045fa29f 100644 --- a/DRV/UTHER2.AI.DRV.S.txt +++ b/DRV/UTHER2.AI.DRV.S.txt @@ -38,7 +38,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME *-------------------------------------- Dev.Detect >STYA Args >LDYA L.MSG.DETECT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldx #$10+$88 .1 lda #W5100.MR.RST @@ -68,7 +68,7 @@ Dev.Detect >STYA Args bcc .1 #$108 ? >LDYA L.MSG.DETECT.KO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #DEVMGR.ERRNOHW sec @@ -96,7 +96,7 @@ Dev.Detect >STYA Args sta MAC+5 bra .8 -.4 >SYSCALL SYS.GetMemPtrA +.4 >SYSCALL GetMemPtrA >STYA ZPTmpPTR jsr DecodeMac bcc .8 @@ -106,16 +106,16 @@ Dev.Detect >STYA Args .8 >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA clc rts *-------------------------------------- .INB DRV/X.NET.DRV.S *-------------------------------------- CS.END -MSG.DETECT >CSTRING "UtherNet2/W5100 Driver (ARP OffLoad).\n" -MSG.DETECT.OK >CSTRING "UtherNet2/W5100 Installed As Device : %S\n" -MSG.DETECT.KO >CSTRING "Hardware Not Found.\n" +MSG.DETECT >CSTR "UtherNet2/W5100 Driver (ARP OffLoad).\n" +MSG.DETECT.OK >CSTR "UtherNet2/W5100 Installed As Device : %S\n" +MSG.DETECT.KO >CSTR "Hardware Not Found.\n" Args .BS 2 *-------------------------------------- * Device Header (16 Bytes) @@ -124,7 +124,7 @@ DEV.HEADER cld jmp (DRV.CS.START,x) .HS 00 .DA #S.DEV.F.SHARE+S.DEV.F.EVENT -DEV.HEADER.NAME >PSTRING "ETH1" NAME +DEV.HEADER.NAME >PSTR "ETH1" NAME .HS 00 .HS 00.00.00.00 *-------------------------------------- @@ -223,7 +223,7 @@ GETEVENT.RxOK >AR.SELECT S0.RX.RD >PUSHYA >PUSHBI 0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs GETEVENT.Err >STYA ZPTmpPTR txa diff --git a/DRV/UTHERNET.DRV.S.txt b/DRV/UTHERNET.DRV.S.txt index bca86090..e888f63c 100644 --- a/DRV/UTHERNET.DRV.S.txt +++ b/DRV/UTHERNET.DRV.S.txt @@ -38,7 +38,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME *-------------------------------------- Dev.Detect >STYA ARGS >LDYA L.MSG.DETECT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldx #$10 .1 >LDYAI PP.ID @@ -58,7 +58,7 @@ Dev.Detect >STYA ARGS bne .1 >LDYA L.MSG.DETECT.KO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #DEVMGR.ERRNOHW sec @@ -94,16 +94,16 @@ Dev.Detect >STYA ARGS .8 >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA clc rts *-------------------------------------- .INB DRV/X.NET.DRV.S *-------------------------------------- CS.END -MSG.DETECT >CSTRING "UtherNet/CS8900A Driver.\n" -MSG.DETECT.OK >CSTRING "UtherNet/CS8900A Installed As Device : " -MSG.DETECT.KO >CSTRING "Hardware Not Found.\n" +MSG.DETECT >CSTR "UtherNet/CS8900A Driver.\n" +MSG.DETECT.OK >CSTR "UtherNet/CS8900A Installed As Device : " +MSG.DETECT.KO >CSTR "Hardware Not Found.\n" ARGS .BS 2 *-------------------------------------- * Device Header (16 Bytes) @@ -112,7 +112,7 @@ DEV.HEADER cld jmp (DRV.CS.START,x) .HS 00 .DA #S.DEV.F.SHARE+S.DEV.F.EVENT -DEV.HEADER.NAME >PSTRING "ETH1" NAME +DEV.HEADER.NAME >PSTR "ETH1" NAME .HS 00 .HS 00.00.00.00 *-------------------------------------- @@ -189,7 +189,7 @@ GETEVENT.RxOK and /PP.RxEvent.Brdcast .11 >PUSHYA Size+2 >PUSHBI 0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs GETEVENT.Err >STYA ZPTmpPTR txa diff --git a/DRV/UTHERNET2.DRV.S.txt b/DRV/UTHERNET2.DRV.S.txt index 94b34d7b..4cb2f6f0 100644 --- a/DRV/UTHERNET2.DRV.S.txt +++ b/DRV/UTHERNET2.DRV.S.txt @@ -45,7 +45,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME *-------------------------------------- Dev.Detect >STYA Args >LDYA L.MSG.DETECT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldx #$10+$88 .1 lda #W5100.MR.RST @@ -75,7 +75,7 @@ Dev.Detect >STYA Args bcc .1 #$108 ? >LDYA L.MSG.DETECT.KO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #DEVMGR.ERRNOHW sec @@ -103,7 +103,7 @@ Dev.Detect >STYA Args sta MAC+5 bra .8 -.4 >SYSCALL SYS.GetMemPtrA +.4 >SYSCALL GetMemPtrA >STYA ZPTmpPTR jsr DecodeMac bcc .8 @@ -113,16 +113,16 @@ Dev.Detect >STYA Args .8 >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA clc rts *-------------------------------------- .INB DRV/X.NET.DRV.S *-------------------------------------- CS.END -MSG.DETECT >CSTRING "UtherNet2/W5100 Driver.\n" -MSG.DETECT.OK >CSTRING "UtherNet2/W5100 Installed As Device : %S\n" -MSG.DETECT.KO >CSTRING "Hardware Not Found.\n" +MSG.DETECT >CSTR "UtherNet2/W5100 Driver.\n" +MSG.DETECT.OK >CSTR "UtherNet2/W5100 Installed As Device : %S\n" +MSG.DETECT.KO >CSTR "Hardware Not Found.\n" Args .BS 2 *-------------------------------------- * Device Header (16 Bytes) @@ -131,7 +131,7 @@ DEV.HEADER cld jmp (DRV.CS.START,x) .HS 00 .DA #S.DEV.F.SHARE+S.DEV.F.EVENT -DEV.HEADER.NAME >PSTRING "ETH1" NAME +DEV.HEADER.NAME >PSTR "ETH1" NAME .HS 00 .HS 00.00.00.00 *-------------------------------------- @@ -219,7 +219,7 @@ GETEVENT.RxOK >AR.SELECT S0.RX.RD * >PUSHYA Already pushed.... >PUSHBI 0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs GETEVENT.Err >STYA ZPTmpPTR txa diff --git a/INC/A2osX.I.txt b/INC/A2osX.I.txt index 42f7d09a..7c0ba33d 100644 --- a/INC/A2osX.I.txt +++ b/INC/A2osX.I.txt @@ -532,5 +532,4 @@ S.MEMSTAT.DH .EQ 20 S.MEMSTAT .EQ 24 *-------------------------------------- MAN -SAVE INC/A2OSX.I - +SAVE /A2OSX.DEV/INC/A2OSX.I diff --git a/INC/APPLESOFT.I.txt b/INC/APPLESOFT.I.txt index 1b4637fd..ef56ec5c 100644 --- a/INC/APPLESOFT.I.txt +++ b/INC/APPLESOFT.I.txt @@ -67,4 +67,4 @@ ATN .EQ $F09E *-------------------------------------- MAN -SAVE INC/APPLESOFT.I +SAVE /A2OSX.DEV/INC/APPLESOFT.I diff --git a/INC/IO.I.txt b/INC/IO.I.txt index 248ce1b5..b0a94ee1 100644 --- a/INC/IO.I.txt +++ b/INC/IO.I.txt @@ -94,4 +94,4 @@ RRAMWRAMBNK1 .EQ $C08B RR *-------------------------------------- CLRC8ROM .EQ $CFFF R, Release C800-CFFF Rom Space for all cards MAN -SAVE INC/IO.I +SAVE /A2OSX.DEV/INC/IO.I diff --git a/INC/LIBCRYPT.I.txt b/INC/LIBCRYPT.I.txt index d32d9751..00235cfd 100644 --- a/INC/LIBCRYPT.I.txt +++ b/INC/LIBCRYPT.I.txt @@ -25,5 +25,4 @@ S.MD5.FINALIZED .EQ 25 S.MD5.SIZE .EQ 26 *-------------------------------------- MAN -SAVE INC/LIBCRYPT.I - +SAVE /A2OSX.DEV/INC/LIBCRYPT.I diff --git a/INC/LIBGFX.I.txt b/INC/LIBGFX.I.txt index 17d5a832..be65d6db 100644 --- a/INC/LIBGFX.I.txt +++ b/INC/LIBGFX.I.txt @@ -30,5 +30,4 @@ LIBGFX.HideCursor .EQ 10 LIBGFX.ShowCursor .EQ 12 *-------------------------------------- MAN -SAVE INC/LIBGFX.I - +SAVE /A2OSX.DEV/INC/LIBGFX.I diff --git a/INC/LIBSTR.I.txt b/INC/LIBSTR.I.txt deleted file mode 100644 index d8cd8411..00000000 --- a/INC/LIBSTR.I.txt +++ /dev/null @@ -1,23 +0,0 @@ -PR#3 -PREFIX /A2OSX.SRC -NEW -INC 1 -AUTO 6 - .LIST OFF - .OP 65C02 -*-------------------------------------- -*LIBSTR.PRINTF .EQ 4 -*LIBSTR.PRINTC .EQ 6 -*LIBSTR.PRINTP .EQ 8 -*LIBSTR.STRMATCHP .EQ 10 -*LIBSTR.STRCPYP .EQ 12 -*LIBSTR.STRCATP .EQ 14 -*LIBSTR.UCASEP .EQ 16 -*LIBSTR.LCASEP .EQ 18 -*LIBSTR.PRINTDATE .EQ 20 -*LIBSTR.PRINTTIME .EQ 22 -LIBSTR.SSCANF .EQ 24 -*-------------------------------------- -MAN -SAVE INC/LIBSTR.I - diff --git a/INC/LIBTCPIP.I.txt b/INC/LIBTCPIP.I.txt index 5a8d707b..596acd40 100644 --- a/INC/LIBTCPIP.I.txt +++ b/INC/LIBTCPIP.I.txt @@ -328,4 +328,4 @@ S.DNS.QTYPE.ANY .EQ 255 S.DNS.QCLASS.IN .EQ 1 *-------------------------------------- MAN -SAVE INC/LIBTCPIP.I +SAVE /A2OSX.DEV/INC/LIBTCPIP.I diff --git a/INC/MACROS.I.txt b/INC/MACROS.I.txt index e101eb81..e84a18e3 100644 --- a/INC/MACROS.I.txt +++ b/INC/MACROS.I.txt @@ -23,7 +23,7 @@ AUTO 6 * SYSCALLs Macros *-------------------------------------- .MA SYSCALL - ldx #]1 + ldx #SYS.]1 jsr A2osX.SYSCALL .EM *-------------------------------------- @@ -279,15 +279,15 @@ AUTO 6 *-------------------------------------- * General Strings Macros *-------------------------------------- - .MA CSTRING + .MA CSTR .AS "]1" .HS 00 .EM *-------------------------------------- - .MA PSTRING + .MA PSTR .DA #:1-*-1 .AS "]1" :1 .EQ * .EM MAN -SAVE INC/MACROS.I +SAVE /A2OSX.DEV/INC/MACROS.I diff --git a/INC/MONITOR.I.txt b/INC/MONITOR.I.txt index 09f3997b..1d9ff9f1 100644 --- a/INC/MONITOR.I.txt +++ b/INC/MONITOR.I.txt @@ -97,4 +97,4 @@ MONZ .EQ $FF69 ENTER MONITOR QUIETLY GETNUM .EQ $FFA7 ASCII TO HEX IN 3E & 3F *-------------------------------------- MAN -SAVE INC/MONITOR.I +SAVE /A2OSX.DEV/INC/MONITOR.I diff --git a/INC/PRODOS.I.txt b/INC/PRODOS.I.txt index d68193a0..aa00d044 100644 --- a/INC/PRODOS.I.txt +++ b/INC/PRODOS.I.txt @@ -181,4 +181,4 @@ KBAKVER .EQ $BFFE KVERSION .EQ $BFFF *-------------------------------------- MAN -SAVE INC/PRODOS.I +SAVE /A2OSX.DEV/INC/PRODOS.I diff --git a/INC/ZP.I.txt b/INC/ZP.I.txt index d2161c96..0df1ae6f 100644 --- a/INC/ZP.I.txt +++ b/INC/ZP.I.txt @@ -39,4 +39,4 @@ SGNCPR .EQ $AB FLAGS OPP SIGN IN FP ROUT. FAC.EXTENSION .EQ $AC FAC EXTENSION BYTE *-------------------------------------- MAN -SAVE INC/ZP.I +SAVE /A2OSX.DEV/INC/ZP.I diff --git a/LIB/LIBCRYPT.S.txt b/LIB/LIBCRYPT.S.txt index d5e33d77..62b699a2 100644 --- a/LIB/LIBCRYPT.S.txt +++ b/LIB/LIBCRYPT.S.txt @@ -121,7 +121,7 @@ LIB.UNLOAD clc * out : * A = hMem To MessageDigest *-------------------------------------- -MD5PStrA >SYSCALL SYS.GetMemPtrA +MD5PStrA >SYSCALL GetMemPtrA >STYA ZPTmpPtr3 1 and 2 used by other MD5 functions ldy #0 lda (ZPTmpPtr3),y get PStr len @@ -145,7 +145,7 @@ MD5PStrA >SYSCALL SYS.GetMemPtrA plx get back MD5 Context hMem pha save MessageDigest hMem txa - >SYSCALL SYS.FreeMemA Free MD5 Context + >SYSCALL FreeMemA Free MD5 Context pla get back MessageDigest hMem clc .9 rts @@ -157,7 +157,7 @@ MD5PStrA >SYSCALL SYS.GetMemPtrA *-------------------------------------- MD5Init >PUSHWI S.MD5.SIZE >PUSHBI 0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs .9 >STYA ZPTmpPtr1 ldy #0 @@ -182,7 +182,7 @@ MD5Init >PUSHWI S.MD5.SIZE * PULLW DATA LEN *-------------------------------------- MD5Update >PULLA get MD5 Context - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPTmpPtr1 get MD5 Context >PULLW ZPDataPtr get DATA >PULLW ZPDataLen get LEN @@ -248,7 +248,7 @@ MD5Update >PULLA get MD5 Context * Out: * A = MessageDigest (PSTR, 16 Bytes, 32 Chars) *-------------------------------------- -MD5FinalizeA >SYSCALL SYS.GetMemPtrA +MD5FinalizeA >SYSCALL GetMemPtrA >STYA ZPTmpPtr1 get MD5 Context ldy #S.MD5.FINALIZED lda (ZPTmpPtr1),y @@ -256,7 +256,7 @@ MD5FinalizeA >SYSCALL SYS.GetMemPtrA jsr MD5ExtraChunk .11 >PUSHWI 33 Len + 32 Digits >PUSHBI 0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs .9 >STYA ZPTmpPtr2 phx save hMem for return diff --git a/LIB/LIBGFX.S.txt b/LIB/LIBGFX.S.txt index 4d9c3a99..f26e4666 100644 --- a/LIB/LIBGFX.S.txt +++ b/LIB/LIBGFX.S.txt @@ -43,7 +43,7 @@ LIB.UNLOAD clc *-------------------------------------- InitGFXA sta hDev - >SYSCALL SYS.GetDevInfoA + >SYSCALL GetDevInfoA bcs .9 >STYA ZPPtr1 diff --git a/LIB/LIBSTR.S.txt b/LIB/LIBSTR.S.txt deleted file mode 100644 index d5fd5a4f..00000000 --- a/LIB/LIBSTR.S.txt +++ /dev/null @@ -1,785 +0,0 @@ -PR#3 -PREFIX /A2OSX.SRC -NEW -INC 1 -AUTO 6 - .LIST OFF - .OP 65C02 - .OR $2000 - .TF /A2OSX.BOOT/LIB/LIBSTR.O -*-------------------------------------- - .INB INC/MACROS.I - .INB INC/A2OSX.I -*-------------------------------------- -ZPTmpPtr1 .EQ ZPLIB -ZPTmpPtr2 .EQ ZPLIB+2 -ZPTmpPtr3 .EQ ZPLIB+4 -*-------------------------------------- -* File Header (16 Bytes) -*-------------------------------------- -CS.START cld - jmp (.1,x) - .DA #$61 6502,Level 1 (65c02) - .DA #1 BIN Layout Version 1 - .DA 0 - .DA CS.END-CS.START - .DA 0 - .DA 0 - .DA 0 -*-------------------------------------- -* Relocation Table -*-------------------------------------- -.1 .DA LIB.LOAD - .DA LIB.UNLOAD - .DA PrintF - .DA PrintC - .DA PrintP - .DA STRMATCHP - .DA STRCPYP - .DA STRCATP - .DA UCASEP - .DA LCASEP - .DA PrintDATE - .DA PrintTIME - .DA SSCANF -*-------------------------------------- -PrintFJMP1 .DA PrintFA - .DA PrintFB,PrintFBB - .DA PrintFD,PrintFDD,PrintFL - .DA PrintFE,PrintFEE - .DA PrintFH,PrintFHH - .DA PrintFI,PrintFII - .DA PrintFSC,PrintFSP - .DA PrintFT,PrintFTT -PrintFJMP2 .DA PrintFESC,PrintFCR,PrintFBKSLH,PrintFPERCENT -*-------------------------------------- - .DA 0 -*-------------------------------------- -LIB.LOAD -LIB.UNLOAD clc - rts -*-------------------------------------- -* PrintF : -* Prints C-Style String -* PULLW Pointer to Sting,Last Byte negative -* %a pull 1 byte to Print ATTRIB String -* %b pull 1 byte to Print BIN -* %B pull 2 byte to Print BIN -* %d pull 1 byte to Print unsigned DEC -* %D pull 2 bytes to Print unsigned DEC -* %L pull 4 bytes to Print unsigned DEC -* %n pull 1 byte to Print low Nibble HEX -* %N pull 1 byte to Print high Nibble HEX -* %h pull 1 byte to Print HEX -* %H pull 2 bytes to Print HEX -* %i pull 1 byte to Print signed DEC -* %I pull 2 bytes to Print signed DEC -* %s pull 2 bytes ptr to C-Style String -* %S pull 2 bytes ptr to P-Style String -* \e Print 'ESC' ($1B,27) -* \n Print CR=13 -* \\ Print \ -* \% Print % -* padding : -* %d '9' '12' -* %2d ' 9' '12' -* %02d '09' '12' -* %16s 'ABCDEFGHIjkl ' -* %011s 'ABCDEFGH000' -*-------------------------------------- -PrintF >PULLW ZPTmpPtr1 - ldy #0 -PrintFCOUT lda (ZPTmpPtr1),y - beq .1 - cmp #'%' - beq PrintFESC1 - cmp #'\' - beq PrintFESC2 - jsr COUT - iny - bne PrintFCOUT -.1 rts -PrintFEXIT ply - iny - bne PrintFCOUT - rts -*-------------------------------------- -PrintFESC1 stz PADLEN - lda #' ' - sta PADCHAR -.1 ldx #PrintFTBL1.END-PrintFTBL1-1 - iny - lda (ZPTmpPtr1),y - beq .9 -.2 cmp PrintFTBL1,x do we have a %x command? - beq .8 yes, jmp to it! - dex - bpl .2 no valid letter... - cmp #'0' ...a 0...mmm... padding char!! - beq .4 - bcc .9 - cmp #'9' - bcs .9 -.3 and #$0F we have a digit - pha save it... - lda PADLEN starts PADLEN * 10 - asl times 2 - pha save times 2 - asl times 4 - asl times 8 - sta PADLEN - pla get back times 2 - clc - adc PADLEN times 8 + times 2 = times 10 - sta PADLEN - pla get back current digit - adc PADLEN - sta PADLEN - bra .5 -.4 lda PADLEN do we already had met digits to build PADLEN ? - bne .3 yes, continue to build PADLEN - lda #'0' - sta PADCHAR no, this is the first 0, so make it PADCHAR -.5 bra .1 -.8 phy - txa - asl - tax - jmp (PrintFJMP1,x) -.9 rts -*-------------------------------------- -PrintFESC2 ldx #PrintFTBL2.END-PrintFTBL2-1 - iny - lda (ZPTmpPtr1),y - beq .9 -.2 cmp PrintFTBL2,x - beq .3 - dex - bpl .2 - rts -.3 phy - txa - asl - tax - jmp (PrintFJMP2,x) -.9 rts -*-------------------------------------- -PrintFA >PULLA - ldx #0 -.1 asl - pha - lda #'-' - bcc .2 - lda PrintF.ATTRIB,x -.2 jsr COUT - pla - inx - cpx #8 - bne .1 - jmp PrintFEXIT -PrintFB ldx #8 - >PULLA -.1 asl - pha - lda #'0' - bcc .2 - inc -.2 jsr COUT - pla - dex - bne .1 - jmp PrintFEXIT -PrintFBB >PULLA - >PULLA - jmp PrintFEXIT -PrintFD >PULLA - sta HEXBUF - stz HEXBUF+1 - stz HEXBUF+2 - stz HEXBUF+3 - jsr HEX2DEC - jmp PrintFEXIT -PrintFDD >PULLA - sta HEXBUF - >PULLA - sta HEXBUF+1 - stz HEXBUF+2 - stz HEXBUF+3 - jsr HEX2DEC - jmp PrintFEXIT -PrintFL >PULLA - sta HEXBUF - >PULLA - sta HEXBUF+1 - >PULLA - sta HEXBUF+2 - >PULLA - sta HEXBUF+3 - jsr HEX2DEC - jmp PrintFEXIT -PrintFE >PULLA - jsr PRHEX - jmp PrintFEXIT -PrintFEE >PULLA - lsr - lsr - lsr - lsr - jsr PRHEX - jmp PrintFEXIT -PrintFH >PULLA - jsr PRBYTE - jmp PrintFEXIT -PrintFHH >PULLA - pha - >PULLA - jsr PRBYTE - pla - jsr PRBYTE - jmp PrintFEXIT -PrintFI >PULLA - jmp PrintFEXIT -PrintFII >PULLA - >PULLA - jmp PrintFEXIT -PrintFSC >PULLYA - jsr PrintYA - jmp PrintFEXIT -PrintFSP >PULLYA - jsr PrintYAP - jmp PrintFEXIT -PrintFT jsr PrintTIME - jmp PrintFEXIT -PrintFTT jsr PrintDATE - jmp PrintFEXIT -*-------------------------------------- -PrintFESC lda #$1B ESC - jsr COUT - jmp PrintFEXIT -PrintFCR jsr CROUT - jmp PrintFEXIT -PrintFBKSLH lda #'\' - jsr COUT - jmp PrintFEXIT -PrintFPERCENT lda #'%' - jsr COUT - jmp PrintFEXIT -*-------------------------------------- -PrintC >PULLW ZPTmpPtr2 - ldy #0 -.1 lda (ZPTmpPtr2),y - beq .8 - jsr COUT - iny - bne .1 -.8 rts -*-------------------------------------- -PrintP >PULLW ZPTmpPtr2 - ldy #0 - lda (ZPTmpPtr2),y - tax - beq .8 -.1 iny - lda (ZPTmpPtr2),y - jsr COUT - dex - bne .1 -.8 rts -*-------------------------------------- -* STRMATCHP : (P-Style Strings) -* pull PTR to Dest String -* pull PTR to Src string -* works with wildcards : -* Dest Str Src str -* message = m?ss* -* = me*ge -* = *ge -* = * -* message = me?sage != me?age -*-------------------------------------- -STRMATCHP >PULLW ZPTmpPtr1 - >PULLW ZPTmpPtr2 - rts -*-------------------------------------- -* STRCPYP : (P-Style Strings) -* pull PTR to Dest String -* pull PTR to Src string -*-------------------------------------- -STRCPYP >PULLW ZPTmpPtr1 - >PULLW ZPTmpPtr2 - lda (ZPTmpPtr2) - sta (ZPTmpPtr1) - tay - beq .2 -.1 lda (ZPTmpPtr2),y - sta (ZPTmpPtr1),y - dey - bne .1 -.2 rts -*-------------------------------------- -* STRCATP : (P-Style Strings) -* pull PTR to Dest String -* pull PTR to Src string -*-------------------------------------- -STRCATP >PULLW ZPTmpPtr1 - >PULLW ZPTmpPtr2 - lda (ZPTmpPtr1) - tay - iny - lda (ZPTmpPtr2) - tax - beq .3 -.1 inc ZPTmpPtr2 - bne .2 - inc ZPTmpPtr2+1 -.2 lda (ZPTmpPtr2) - sta (ZPTmpPtr1),y - iny - dex - bne .1 - dey - tya - sta (ZPTmpPtr1) -.3 rts -*-------------------------------------- -UCASEP phx - >PULLW ZPTmpPtr2 - ldy #0 - lda (ZPTmpPtr2),y - tax - beq .9 -.1 iny - lda (ZPTmpPtr2),y - cmp #'a' - bmi .2 - cmp #'z'+1 - bpl .2 - sec - sbc #$20 - sta (ZPTmpPtr2),y -.2 dex - bne .1 -.9 plx - rts -*-------------------------------------- -LCASEP phx - >PULLW ZPTmpPtr2 - ldy #0 - lda (ZPTmpPtr2),y - tax - beq .9 -.1 iny - lda (ZPTmpPtr2),y - cmp #'A' - bmi .2 - cmp #'Z'+1 - bpl .2 - clc - adc #$20 - sta (ZPTmpPtr2),y -.2 dex - bne .1 -.9 plx - rts -*-------------------------------------- -* PULLW = DATE in ProDOS Format -* A = year, Y = month/day -*-------------------------------------- -PrintDATE stz HEXBUF+1 - stz HEXBUF+2 - stz HEXBUF+3 - ldx #'0' - stx PADCHAR - ldx #2 - stx PADLEN - >PULLYA - pha save year to get high bit of month later - lsr - pha - cmp #70 are we in the 70s ? - bcc .1 - lda #$19 - bra .2 -.1 lda #$20 -.2 jsr PRBYTE - pla - sta HEXBUF - jsr HEX2DEC - lda #'/' - jsr COUT - ldx #'0' - stx PADCHAR - ldx #2 - stx PADLEN - pla get back year - lsr get high bit of month in carry - tya get month/day - pha save it for day - ror pick high bit from carry - lsr - lsr - lsr - lsr - sta HEXBUF - jsr HEX2DEC - lda #'/' - jsr COUT - ldx #'0' - stx PADCHAR - ldx #2 - stx PADLEN - pla get back month/day - and #$1F - sta HEXBUF - jmp HEX2DEC -*-------------------------------------- -* PULLW = TIME in ProDOS Format -* A = hours, Y = minutes -*-------------------------------------- -PrintTIME stz HEXBUF+1 - stz HEXBUF+2 - stz HEXBUF+3 - ldx #'0' - stx PADCHAR - ldx #2 - stx PADLEN - >PULLYA - and #$1F - sta HEXBUF - jsr HEX2DEC - lda #':' - jsr COUT - ldx #'0' - stx PADCHAR - ldx #2 - stx PADLEN - tya get minutes - and #$3F - sta HEXBUF - jmp HEX2DEC -*-------------------------------------- -* -*-------------------------------------- -SSCANF >PULLW ZPTmpPtr1 get PString to scan (ex: "192.168.1.5") - >PULLW ZPTmpPtr2 get PString pattern (ex: "%d.%d.%d.%d") - >PULLW ZPTmpPtr3 get target buffer - - ldy #0 Y = PTR in pattern - - lda (ZPTmpPtr1) - beq .9 - tax X = COUNT to scan - inc ZPTmpPtr1 - bne .1 - inc ZPTmpPtr1+1 - -.1 txa End Of String? - beq .8 - tya - cmp (ZPTmpPtr2) End of pattern? - beq .8 - iny - lda (ZPTmpPtr2),y - cmp #'%' Escape? - beq .2 - cmp (ZPTmpPtr1) Same char? - bne .9 - jsr SSCANF.IncPtr1 - bne .1 - clc - rts - -.2 tya - cmp (ZPTmpPtr2) unexpected End of pattern after "%" ? - beq .9 - - iny - lda (ZPTmpPtr2),y - cmp #'d' BYTE ? - bne .3 - - stz ASCBUF -.20 lda (ZPTmpPtr1) - jsr SSCANF.IsDigit - bcs .21 - phx - inc ASCBUF - ldx ASCBUF - sta ASCBUF,x - plx - jsr SSCANF.IncPtr1 - bne .20 end of string ? - -.21 jsr DEC2HEX - lda HEXBUF - sta (ZPTmpPtr3) - inc ZPTmpPtr3 - bne .1 - inc ZPTmpPtr3+1 - bra .1 - -.3 cmp #'D' WORD ? - bne .4 - - bra .1 - -.4 cmp #'s' STRING ? - bne .9 - - bra .1 - -.8 clc - rts - -.9 sec - rts - -*-------------------------------------- -SSCANF.IncPtr1 dex - beq .1 - inc ZPTmpPtr1 - bne .1 - inc ZPTmpPtr1+1 never Zero -.1 rts -*-------------------------------------- -SSCANF.IsDigit cmp #'0' - bcc .1 - cmp #'9'+1 - bcs .1 - rts -.1 sec - rts -*-------------------------------------- -********** PRIVATE FUNCTIONS ********** -*-------------------------------------- -* PrintYAC : -* Prints C-Style String -* Y,A=Pointer to Sting, Last Byte 0 -*-------------------------------------- -PrintYA >STYA ZPTmpPtr2 - ldy #0 -.1 lda (ZPTmpPtr2),y - beq .2 - jsr COUT - iny - bne .1 -.2 rts -*-------------------------------------- -* PrintYAP : -* Prints Pascal-Style String -* Y,A=Pointer to Sting, LEN=1st Byte -*-------------------------------------- -PrintYAP phx - >STYA ZPTmpPtr2 - ldy #0 - lda (ZPTmpPtr2),y - tax - beq .8 -.1 iny - lda (ZPTmpPtr2),y - jsr COUT - lda PADLEN - beq .2 - cpy PADLEN - beq .8 -.2 dex - bne .1 - lda PADLEN - beq .8 -.3 lda PADCHAR - jsr COUT - iny - cpy PADLEN - bne .3 -.8 plx - rts -*-------------------------------------- -* Convert HEXBUF to ASCBUF decimal padded with 0 -*-------------------------------------- -HEX2DEC phx - phy - ldx #4 -.1 stz BCDBUF,x Clear all 5 bytes - dex - bpl .1 - ldx #32 let's roll 32 bits - sed -.2 asl HEXBUF - rol HEXBUF+1 - rol HEXBUF+2 - rol HEXBUF+3 - php cpy will disturb carry while BCD adc - ldy #0 -.3 plp - lda BCDBUF,y - adc BCDBUF,y - sta BCDBUF,y - php - iny - cpy #5 Last byte of BCDBUF? - bne .3 - plp - dex - bne .2 - cld - ldy #0 - ldx #9 -.4 lda BCDBUF,y - pha - and #$0F - ora #$30 - sta ASCBUF,x - dex - pla - lsr - lsr - lsr - lsr - ora #$30 - sta ASCBUF,x - iny - dex - bpl .4 - lda PADLEN any Len format ? - beq .5 no - lda #10 - sec yes, Print only digits starting at pos 10-padlen - sbc PADLEN -.5 tax x=0 if no padlen, or x=10-padlen -.6 lda ASCBUF,x - cmp #'0' a zero? - beq .7 - inc PADLEN found a non zero, Print all digits, even if 0, next time - ldy #'0' - sty PADCHAR - bra .8 -.7 cpx #9 last digit ? - beq .8 Print always - ldy PADLEN no pad to fill, do not Print 0 - beq .9 - lda PADCHAR fill with PADCHAR -.8 jsr COUT -.9 inx - cpx #10 - bne .6 - ply - plx - rts -*-------------------------------------- -* Convert ASCBUF decimal to HEXBUF -*-------------------------------------- -DEC2HEX phx - phy - stz HEXBUF - stz HEXBUF+1 - stz HEXBUF+2 - stz HEXBUF+3 - - ldx #0 -.1 asl HEXBUF HEXBUF * 2 -> HEXBUF - rol HEXBUF+1 - rol HEXBUF+2 - rol HEXBUF+3 - - lda HEXBUF HEXBUF * 2 -> HEXBUFTMP - asl - sta HEXBUFTMP - lda HEXBUF+1 - rol - sta HEXBUFTMP+1 - lda HEXBUF+2 - rol - sta HEXBUFTMP+2 - lda HEXBUF+3 - rol - sta HEXBUFTMP+3 - - asl HEXBUFTMP HEXBUFTMP * 2 -> HEXBUFTMP - rol HEXBUFTMP+1 - rol HEXBUFTMP+2 - rol HEXBUFTMP+3 - - lda HEXBUF HEXBUF + HEXBUFTMP -> HEXBUF - clc - adc HEXBUFTMP - sta HEXBUF - lda HEXBUF+1 - adc HEXBUFTMP+1 - sta HEXBUF+1 - lda HEXBUF+2 - adc HEXBUFTMP+2 - sta HEXBUF+2 - lda HEXBUF+3 - adc HEXBUFTMP+3 - sta HEXBUF+3 - - inx - lda ASCBUF,x - and #$0F - clc - adc HEXBUF - sta HEXBUF - bcc .2 - inc HEXBUF+1 - bne .2 - inc HEXBUF+2 - bne .2 - inc HEXBUF+3 -.2 cpx ASCBUF - bne .1 - ply - plx - rts -*-------------------------------------- -PRBYTE pha - lsr - lsr - lsr - lsr - ora #$30 - cmp #'9'+1 - bcc .1 - adc #6 -.1 jsr COUT - pla -PRHEX and #$0F - ora #$30 - cmp #'9'+1 - bcc COUT - adc #6 - bra COUT -*-------------------------------------- -CROUT lda #13 -*-------------------------------------- -COUT phx - phy - cmp #13 - bne .1 - ldx #DEVMGR.COUT - jsr pDevJmp - bcs .9 - lda #10 - -.1 ldx #DEVMGR.COUT - jsr pDevJmp - ply - plx -.9 rts -*-------------------------------------- -CS.END -PrintFTBL1 .AS "abBdDLnNhHiIsStT" -PrintFTBL1.END -PrintFTBL2 .AS "en\%" -PrintFTBL2.END -PrintF.ATTRIB .AS "dnb+++wr" -*-------------------------------------- -PADCHAR .BS 1 -PADLEN .BS 1 -HEXBUF .BS 4 32 bits max -HEXBUFTMP .BS 4 -BCDBUF .BS 5 5, enough to handle 32bits -ASCBUF .BS 11 LEN + 10 digits ($FFFFFFFF=4.294.967.295) -*-------------------------------------- -MAN -SAVE LIB/LIBSTR.S -ASM diff --git a/LIB/LIBTCPIP.S.CFG.txt b/LIB/LIBTCPIP.S.CFG.txt index 2431dc45..087c3229 100644 --- a/LIB/LIBTCPIP.S.CFG.txt +++ b/LIB/LIBTCPIP.S.CFG.txt @@ -34,7 +34,7 @@ SET.IPCFG >PULLW ZPTmpPtr1 lda IPCFG+S.IPCFG.HDEV - >SYSCALL SYS.GetDevByIDA + >SYSCALL GetDevByIDA >STYA NetDevJmp+1 ldx #DEVMGR.GETINFO diff --git a/LIB/LIBTCPIP.S.DNS.txt b/LIB/LIBTCPIP.S.DNS.txt index b349f015..b122d67d 100644 --- a/LIB/LIBTCPIP.S.DNS.txt +++ b/LIB/LIBTCPIP.S.DNS.txt @@ -149,7 +149,7 @@ DNS.ADD.I sta DNS.TmpCache jsr DNS.FIND.FREE >LDYA ZPPtrDNS - >SYSCALL SYS.NewPStrYA + >SYSCALL NewPStrYA bcs .9 ldy #S.DNSCACHE.hNAME @@ -184,7 +184,7 @@ DNS.FIND.BY.NAME ldy #S.DNSCACHE.hNAME lda (ZPCachePtr),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA bcs * >STYA ZPTmpPtr1 @@ -348,7 +348,7 @@ DNS.EXPIRE >LDYA L.DNS.CACHE DNS.FREE ldy #S.DNSCACHE.hNAME lda (ZPCachePtr),y beq .1 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .1 lda #0 sta (ZPCachePtr) rts @@ -369,7 +369,7 @@ DNS.POLL lda hDNSSocket1 rts *-------------------------------------- DNS.DecodeMsg sta hFrame1 - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPFrameBase1 ldy #S.DNS.F+1 @@ -477,7 +477,7 @@ DNS.DecodeMsg sta hFrame1 jsr DNS.UPDATE.BY.ID .9 lda hFrame1 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA rts *-------------------------------------- DNS.PSTR2DNS lda (ZPPtrDNS) diff --git a/LIB/LIBTCPIP.S.FRM.txt b/LIB/LIBTCPIP.S.FRM.txt index c07df8a5..78b4eb0c 100644 --- a/LIB/LIBTCPIP.S.FRM.txt +++ b/LIB/LIBTCPIP.S.FRM.txt @@ -6,7 +6,7 @@ AUTO 6 .LIST OFF *-------------------------------------- RCVD.FRAMEA sta hFrame1 - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPFrameBase1 jsr FRM.GetLen1 @@ -78,7 +78,7 @@ NEW.UDP.FRAME jsr NEW.IP.FRAME *-------------------------------------- NEW.IP.FRAME >PUSHWI K.ETH.FRAME.LEN >PUSHBI S.MEM.F.INIT0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs .9 >STYA ZPFrameBase1 @@ -251,7 +251,7 @@ SEND.IP.FRAME.I ldx #3 Copy SRC.IP even if IP offload bcs FRM.Queue lda hFrame1 beq .9 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA clc .9 rts @@ -285,7 +285,7 @@ FRM.Retry ldx FRM.QUEUE.Tail .10 cpx FRM.QUEUE.Head beq .8 Queue is empty, exit.... lda FRM.QUEUE.hMem,x - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPFrameBase1 ldx FRM.QUEUE.Tail @@ -307,7 +307,7 @@ FRM.Retry ldx FRM.QUEUE.Tail .3 ldx FRM.QUEUE.Tail Success,or max retry, discard entry lda FRM.QUEUE.hMem,x - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .4 ldx FRM.QUEUE.Tail inx diff --git a/LIB/LIBTCPIP.S.TCP.txt b/LIB/LIBTCPIP.S.TCP.txt index 47e8fb58..088b6c94 100644 --- a/LIB/LIBTCPIP.S.TCP.txt +++ b/LIB/LIBTCPIP.S.TCP.txt @@ -188,7 +188,7 @@ TCP.IN.ESTABLISHED >PUSHW K.TCP.WSIZE >PUSHBI 0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs * txa @@ -197,7 +197,7 @@ TCP.IN.ESTABLISHED >PUSHW K.TCP.WSIZE >PUSHBI 0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs * txa diff --git a/README.md b/README.md index 8f33d76e..24666312 100644 --- a/README.md +++ b/README.md @@ -47,7 +47,7 @@ In Progress : moving TCPIP to socket API ## Internal Shell commands: | Name | Status | Comment | | ---- | ------ | ------- | -| CD | Working | | +| CD | Working | Improved syntax : now, 'CD ../BIN' works | | DATE | Working | | | ECHO | Working | | | EXIT | Working | | diff --git a/SBIN/DESKTOP.S.txt b/SBIN/DESKTOP.S.txt index ecd3a9c5..993ee34e 100644 --- a/SBIN/DESKTOP.S.txt +++ b/SBIN/DESKTOP.S.txt @@ -40,14 +40,14 @@ L.DrawLine.X1 .DA DrawLine.X1 .DA 0 *-------------------------------------- CS.INIT >LDYA L.MSG.INIT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA >LDYA L.LIBGFX - >SYSCALL SYS.LoadLibYA + >SYSCALL LoadLibYA sta hLIBGFX >LDYA L.DEVNAME.GFX - >SYSCALL SYS.GetDevByNameYA + >SYSCALL GetDevByNameYA bcc .10 rts @@ -65,7 +65,7 @@ CS.INIT >LDYA L.MSG.INIT jsr GoDevGFX .11 >LDYA L.DEVNAME.MOUSE - >SYSCALL SYS.GetDevByNameYA + >SYSCALL GetDevByNameYA bcc .20 inc DEVNAME.MOUSE+4 @@ -210,10 +210,10 @@ GoDevGFX jmp $ffff GoDevMouse jmp $ffff *-------------------------------------- CS.END -DEVNAME.GFX >PSTRING "GFX" -DEVNAME.MOUSE >PSTRING "MOU1" -LIBGFX >PSTRING "libgfx.o" -MSG.INIT >CSTRING "DESKTOP:Init...\n" +DEVNAME.GFX >PSTR "GFX" +DEVNAME.MOUSE >PSTR "MOU1" +LIBGFX >PSTR "libgfx.o" +MSG.INIT >CSTR "DESKTOP:Init...\n" hLibGFX .BS 1 hDevGFX .BS 1 hDevMouse .BS 1 diff --git a/SBIN/DHCPCLNT.S.txt b/SBIN/DHCPCLNT.S.txt index 59c62274..81d1a4e0 100644 --- a/SBIN/DHCPCLNT.S.txt +++ b/SBIN/DHCPCLNT.S.txt @@ -50,7 +50,7 @@ L.DHCP.REQ .DA DHCP.REQ .DA 0 *-------------------------------------- CS.INIT >LDYA L.LIBTCPIP - >SYSCALL SYS.LoadLibYA + >SYSCALL LoadLibYA sta hLIBTCPIP >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG @@ -97,7 +97,7 @@ CS.INIT >LDYA L.LIBTCPIP .98 >LDYA L.MSG.CFG.ND bra .90 .99 >LDYA L.MSG.CFG.NA -.90 >SYSCALL SYS.PrintFYA +.90 >SYSCALL PrintFYA lda #0 sec rts @@ -113,7 +113,7 @@ CS.RUN >PUSHW L.Socket sta (pData),y >LDYA L.MSG.CFG1 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA jsr Init.Timeout @@ -127,7 +127,7 @@ CS.RUN.SDISC >PUSHWI DHCP.DISC.LEN .1 lda #S.IPCFG.STATUS.SDISC sta IPCFG -CS.RUN.ROFFER >SYSCALL SYS.Sleep +CS.RUN.ROFFER >SYSCALL Sleep jsr CS.RUN.SKT.RCVD bcc .1 @@ -151,7 +151,7 @@ CS.RUN.SREQ ldx #3 bpl .1 >LDYA L.MSG.CFG2 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA >PUSHWI DHCP.REQ.LEN >PUSHW L.DHCP.REQ @@ -161,7 +161,7 @@ CS.RUN.SREQ ldx #3 lda #S.IPCFG.STATUS.SREQ sta IPCFG -CS.RUN.RACK >SYSCALL SYS.Sleep +CS.RUN.RACK >SYSCALL Sleep jsr CS.RUN.SKT.RCVD bcc .1 @@ -192,7 +192,7 @@ CS.RUN.OK lda #S.IPCFG.STATUS.OK bpl .2 >LDYA L.MSG.CFG.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #0 Leave with NO ERROR sec rts @@ -200,7 +200,7 @@ CS.RUN.OK lda #S.IPCFG.STATUS.OK CS.RUN.KO pha >PUSHA >LDYA L.MSG.CFG.KO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA pla sec rts @@ -216,7 +216,7 @@ CS.RUN.SKT.RCVD ldy #hSocket bcs .9 ldy #hFrame sta (pData),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPFrameBase .9 rts *-------------------------------------- @@ -263,7 +263,7 @@ CS.QUIT ldy #hSocket >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.CLOSEA .1 lda hLIBTCPIP - >SYSCALL SYS.UnloadLibA + >SYSCALL UnloadLibA clc rts *-------------------------------------- @@ -440,13 +440,13 @@ Wait.TimeOut sec .9 rts *-------------------------------------- CS.END -LIBTCPIP >PSTRING "libtcpip.o" -MSG.CFG1 >CSTRING "DHCPCLNT:Searching for DHCP servers...\n" -MSG.CFG2 >CSTRING "DHCPCLNT:Reply from DHCP Server at %d.%d.%d.%d, requesting...\n" -MSG.CFG.KO >CSTRING "DHCPCLNT:Time Out [%h].\n" -MSG.CFG.OK >CSTRING "DHCPCLNT:Success:[IP=%d.%d.%d.%d/%d.%d.%d.%d]\n" -MSG.CFG.ND >CSTRING "DHCPCLNT:No Device, exiting.\n" -MSG.CFG.NA >CSTRING "DHCPCLNT:TCPIP Already configured, exiting.\n" +LIBTCPIP >PSTR "libtcpip.o" +MSG.CFG1 >CSTR "DHCPCLNT:Searching for DHCP servers...\n" +MSG.CFG2 >CSTR "DHCPCLNT:Reply from DHCP Server at %d.%d.%d.%d, requesting...\n" +MSG.CFG.KO >CSTR "DHCPCLNT:Time Out [%h].\n" +MSG.CFG.OK >CSTR "DHCPCLNT:Success:[IP=%d.%d.%d.%d/%d.%d.%d.%d]\n" +MSG.CFG.ND >CSTR "DHCPCLNT:No Device, exiting.\n" +MSG.CFG.NA >CSTR "DHCPCLNT:TCPIP Already configured, exiting.\n" hLIBTCPIP .BS 1 IPCFG .BS S.IPCFG FrameLen .BS 2 diff --git a/SBIN/GETTY.S.txt b/SBIN/GETTY.S.txt index e1f52113..7fbb5916 100644 --- a/SBIN/GETTY.S.txt +++ b/SBIN/GETTY.S.txt @@ -35,19 +35,19 @@ L.MSG.USAGE .DA MSG.USAGE L.MSG.GREETINGS .DA MSG.GREETINGS .DA 0 End Of Reloc Table *-------------------------------------- -CS.INIT >SYSCALL SYS.GetArgC +CS.INIT >SYSCALL GetArgC cmp #1 bne .1 >LDYA L.MSG.USAGE - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #0 sec rts .1 lda #1 - >SYSCALL SYS.GetArgA - >SYSCALL SYS.GetDevByNameYA + >SYSCALL GetArgA + >SYSCALL GetDevByNameYA bcs .98 >STYA pDev @@ -65,10 +65,10 @@ CS.INIT >SYSCALL SYS.GetArgC bcs .99 lda #2 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA bcs .99 - >SYSCALL SYS.NewPStrYA + >SYSCALL NewPStrYA bcs .99 txa @@ -81,7 +81,7 @@ CS.INIT >SYSCALL SYS.GetArgC .99 rts *-------------------------------------- CS.RUN lda #13 try send a CR... - >SYSCALL SYS.COutA Device Is Ready ? + >SYSCALL COutA Device Is Ready ? bcs .8 no..loop... @@ -93,14 +93,14 @@ CS.RUN lda #13 try send a CR... adc /S.DEV.NAME >PUSHYA >LDYA L.MSG.GREETINGS - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .8 unable to send greetings...loop.. ldy #hBinName lda (pData),y - >SYSCALL SYS.GetMemPtrA - >SYSCALL SYS.ExecProcessNewEnvYA + >SYSCALL GetMemPtrA + >SYSCALL ExecProcessNewEnvYA .9 rts .8 clc @@ -112,7 +112,7 @@ CS.DOEVENT sec CS.QUIT ldy #hBinName lda (pData),y beq .1 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .1 ldx #DEVMGR.CLOSE * jsr pDevJmp @@ -121,8 +121,8 @@ CS.QUIT ldy #hBinName rts *-------------------------------------- CS.END -MSG.USAGE >CSTRING "GETTY " -MSG.GREETINGS >CSTRING "\e[12h\nA2osX-GeTTY on Dev=%S\n" +MSG.USAGE >CSTR "GETTY " +MSG.GREETINGS >CSTR "\e[12h\nA2osX-GeTTY on Dev=%S\n" *-------------------------------------- .DUMMY .OR 0 diff --git a/SBIN/HTTPD.S.txt b/SBIN/HTTPD.S.txt index 115dafa2..e7c937b0 100644 --- a/SBIN/HTTPD.S.txt +++ b/SBIN/HTTPD.S.txt @@ -46,7 +46,7 @@ L.MSG.INCOMING .DA MSG.INCOMING .DA 0 *-------------------------------------- CS.INIT >LDYA L.LIBTCPIP - >SYSCALL SYS.LoadLibYA + >SYSCALL LoadLibYA sta hLIBTCPIP lda (pPs) @@ -58,7 +58,7 @@ CS.INIT >LDYA L.LIBTCPIP CS.RUN jsr Init.Timeout >LDYA L.MSG.TCPWAIT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA .1 >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG is TCPIP loaded ? bcs .99 @@ -67,12 +67,12 @@ CS.RUN jsr Init.Timeout lda (ZPIPCfgPtr) Configured ? bmi CS.RUN.INIT - >SYSCALL SYS.Sleep + >SYSCALL Sleep jsr Wait.Timeout bcc .1 .99 >LDYA L.MSG.TCPIPERR - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #SYSMGR.ERRSYN sec rts @@ -93,9 +93,9 @@ CS.RUN.INIT ldx #3 sta (pData),y >LDYA L.MSG.INITOK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA -.11 >SYSCALL SYS.Sleep +.11 >SYSCALL Sleep ldy #bCTRLC lda (pData),y bmi .99 @@ -118,17 +118,17 @@ CS.RUN.INIT ldx #3 bpl .2 >LDYA L.MSG.INCOMING - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bra .11 .9 >LDYA L.MSG.SKTERR - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #SYSMGR.ERRSYN sec rts .99 >LDYA L.MSG.ABORT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #0 sec rts @@ -174,7 +174,7 @@ CS.QUIT ldy #hSocket >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.CLOSEA lda hLIBTCPIP - >SYSCALL SYS.UnloadLibA + >SYSCALL UnloadLibA clc rts *-------------------------------------- @@ -195,13 +195,13 @@ Wait.TimeOut sec *-------------------------------------- CS.END *-------------------------------------- -LIBTCPIP >PSTRING "libtcpip.o" -MSG.TCPWAIT >CSTRING "HTTPD:Waiting for TCP/IP initializing...\n" -MSG.INITOK >CSTRING "HTTPD:Init Ok, Listening.\n" -MSG.TCPIPERR >CSTRING "HTTPD:TCP/IP Not initialized properly\n" -MSG.SKTERR >CSTRING "HTTPD:Listen Error\n" -MSG.ABORT >CSTRING "HTTPD:User Aborted\n" -MSG.INCOMING >CSTRING "HTTPD:Incoming Connection From : %d.%d.%d.%d\n" +LIBTCPIP >PSTR "libtcpip.o" +MSG.TCPWAIT >CSTR "HTTPD:Waiting for TCP/IP initializing...\n" +MSG.INITOK >CSTR "HTTPD:Init Ok, Listening.\n" +MSG.TCPIPERR >CSTR "HTTPD:TCP/IP Not initialized properly\n" +MSG.SKTERR >CSTR "HTTPD:Listen Error\n" +MSG.ABORT >CSTR "HTTPD:User Aborted\n" +MSG.INCOMING >CSTR "HTTPD:Incoming Connection From : %d.%d.%d.%d\n" hLIBTCPIP .BS 1 *-------------------------------------- Socket .DA #S.SOCKET.SOCK.STREAM diff --git a/SBIN/INSDRV.S.txt b/SBIN/INSDRV.S.txt index 0aea378e..725cd817 100644 --- a/SBIN/INSDRV.S.txt +++ b/SBIN/INSDRV.S.txt @@ -37,27 +37,27 @@ L.MSG.HELP .DA MSG.HELP L.MSG.LOAD .DA MSG.LOAD .DA 0 *-------------------------------------- -CS.INIT >SYSCALL SYS.GetArgC +CS.INIT >SYSCALL GetArgC cmp #1 bne .1 >LDYA L.MSG.HELP - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #0 tell TSKMGR that all done ok, but sec we do not want to stay in memory rts .1 lda #1 get PTR to ARG[1] (Driver name) - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA >PUSHYA >LDYA L.MSG.LOAD - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #1 get PTR to ARG[1] (Driver name) - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA - >SYSCALL SYS.LoadDrvYA YA = PTR to ARG[1...n] + >SYSCALL LoadDrvYA YA = PTR to ARG[1...n] bcs .99 lda #0 success, but.... @@ -70,8 +70,8 @@ CS.QUIT clc rts *-------------------------------------- CS.END -MSG.HELP >CSTRING "Usage: insdrv file.drv \n" -MSG.LOAD >CSTRING "INSDRV:Loading %S...\n" +MSG.HELP >CSTR "Usage: insdrv file.drv \n" +MSG.LOAD >CSTR "INSDRV:Loading %S...\n" *-------------------------------------- MAN SAVE SBIN/INSDRV.S diff --git a/SBIN/LOGIN.S.txt b/SBIN/LOGIN.S.txt index 8df81214..12fe573b 100644 --- a/SBIN/LOGIN.S.txt +++ b/SBIN/LOGIN.S.txt @@ -51,39 +51,39 @@ CS.RUN lda #0 sta (pData),y lda #13 - >SYSCALL SYS.COutA + >SYSCALL COutA bcs .9 >LDYA L.MSG.LOGIN - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 lda #0 Echo all caracters jsr INPUT.RESET -.1 >SYSCALL SYS.Sleep +.1 >SYSCALL Sleep jsr INPUT.LINEIN bcc .1 lda #13 - >SYSCALL SYS.COutA + >SYSCALL COutA bcs .9 >LDYA L.MSG.PASSWORD - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #'*' jsr INPUT.RESET -.2 >SYSCALL SYS.Sleep +.2 >SYSCALL Sleep jsr INPUT.LINEIN bcc .2 lda #13 - >SYSCALL SYS.COutA + >SYSCALL COutA bcs .9 >LDYA L.SHELL - >SYSCALL SYS.ExecProcessNewEnvYA + >SYSCALL ExecProcessNewEnvYA bcs .9 @@ -161,7 +161,7 @@ INPUT.CHARIN tax saver char... lda (pData),y bne .1 txa -.1 >SYSCALL SYS.COutA +.1 >SYSCALL COutA rts .2 cpx #13 CR @@ -196,9 +196,9 @@ INPUT.LINEIN ldy #INPUT.Status rts *-------------------------------------- CS.END -MSG.LOGIN >CSTRING "login:" -MSG.PASSWORD >CSTRING "password:" -SHELL >PSTRING "${A2OSX}SBIN/SHELL" +MSG.LOGIN >CSTR "login:" +MSG.PASSWORD >CSTR "password:" +SHELL >PSTR "${A2OSX}SBIN/SHELL" .DUMMY .OR 0 DS.START diff --git a/SBIN/SHELL.S.CMD.txt b/SBIN/SHELL.S.CMD.txt index 4f4744dc..e24ecd08 100644 --- a/SBIN/SHELL.S.CMD.txt +++ b/SBIN/SHELL.S.CMD.txt @@ -8,7 +8,7 @@ AUTO 6 * Y,A -> Command line (formatted & not empty) *-------------------------------------- Cmd.ExecYA stz Cmd.Exec.Mode -Cmd.ExecYA.1 >SYSCALL SYS.ExpandPStrYA +Cmd.ExecYA.1 >SYSCALL ExpandPStrYA bcs .99 stx hCmdLine @@ -49,7 +49,7 @@ Cmd.ExecYA.1 >SYSCALL SYS.ExpandPStrYA .13 stx ARGS update ARGS len lda hCmdLine Discard Expanded Cmd Line - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA >LDYA L.CMDS >STYA ZPPtr2 @@ -92,21 +92,21 @@ Cmd.Exec.EXT ldy #1 jmp .3 .10 >LDYA L.ENV.PATH push ENVNAME=PATH for search - >SYSCALL SYS.GetEnvYA get value for ENV=PATH + >SYSCALL GetEnvYA get value for ENV=PATH bcs .1 No PATH, try in CD >PUSHYA push search list >PUSHW L.CMD - >SYSCALL SYS.FileSearch + >SYSCALL FileSearch bcc .2 .1 ldy #S.PS.hPREFIX not found, try in CD lda (pPs),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >PUSHYA push search list >PUSHW L.CMD - >SYSCALL SYS.FileSearch + >SYSCALL FileSearch bcs .99 .2 phx save X=hMem, Y,A = Filename @@ -114,15 +114,15 @@ Cmd.Exec.EXT ldy #1 >PUSHW L.CMD replace CMD in TmpBuffer with full path - >SYSCALL SYS.PStrCpy + >SYSCALL PStrCpy pla - >SYSCALL SYS.FreeMemA Discard this string... + >SYSCALL FreeMemA Discard this string... .3 stz UsrBuf256 reset UsrBuf256 for final CMDLINE >PUSHW L.STAT >PUSHW L.CMD - >SYSCALL SYS.STAT + >SYSCALL STAT bcs .99 lda STAT+S.STAT.PRODOS.TYPE @@ -143,10 +143,10 @@ Cmd.Exec.EXT ldy #1 *-------------------------------------- Cmd.Exec.EXT.TXT lda #0 Get arg[0] = /PATH/SHELL - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA >PUSHYA >PUSHWI UsrBuf256 - >SYSCALL SYS.PStrCpy + >SYSCALL PStrCpy inc UsrBuf256 Add a space.... ldy UsrBuf256 @@ -158,7 +158,7 @@ Cmd.Exec.EXT.TXT Cmd.Exec.EXT.BIN >PUSHW L.CMD >PUSHWI UsrBuf256 - >SYSCALL SYS.PStrCat + >SYSCALL PStrCat lda ARGS beq .1 @@ -170,16 +170,16 @@ Cmd.Exec.EXT.BIN >PUSHW L.ARGS >PUSHWI UsrBuf256 - >SYSCALL SYS.PStrCat + >SYSCALL PStrCat .1 >LDYAI UsrBuf256 bit Cmd.Exec.Mode bmi .2 startproc - >SYSCALL SYS.ExecProcessNewEnvYA + >SYSCALL ExecProcessNewEnvYA rts -.2 >SYSCALL SYS.CreateProcessYA +.2 >SYSCALL CreateProcessYA rts *-------------------------------------- * Internal Commands @@ -188,88 +188,107 @@ Cmd.Exec.CD lda ARGS bne Cmd.Exec.CD1 ldy #S.PS.hPREFIX lda (pPs),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >PUSHYA >LDYA L.MSG.PSTR - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA rts -Cmd.Exec.CD1 lda ARGS+1 +Cmd.Exec.CD1 stz UsrBuf256 + lda ARGS+1 cmp #'/' Full Path? - bne .1 + beq .1 - >LDYA L.ARGS - bra Cmd.Exec.CD.Change - -.1 ldy #S.PS.hPREFIX no, init target prefix with actual + ldy #S.PS.hPREFIX no, init target prefix with actual prefix lda (pPs),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >PUSHYA >PUSHWI UsrBuf256 - >SYSCALL SYS.PStrCpy + >SYSCALL PStrCpy - lda ARGS+1 - cmp #'.' ".." ? - bne .3 - - cmp ARGS+2 ".." ? - - bne .9 - - ldy UsrBuf256 remove last dir component in actual prefix - -.2 dey - beq .9 nothing to remove, synerr - - lda UsrBuf256,y - cmp #'/' - bne .2 - - sty UsrBuf256 - - >LDYAI UsrBuf256 - bra Cmd.Exec.CD.Change - -.9 lda #SYSMGR.ERRSYN - sec - rts - -.3 >PUSHW L.ARGS Append ARG to buffer +.1 >PUSHW L.ARGS Append ARG to buffer >PUSHWI UsrBuf256 - >SYSCALL SYS.PStrCat - bcs .9 + >SYSCALL PStrCat + lda #'/' ldx UsrBuf256 - lda #'/' Ending with '/'? - cmp UsrBuf256,x - beq .4 - sta UsrBuf256+1,x + cmp UsrBuf256,x Ending '/' ? + beq .2 + + sta UsrBuf256+1,x no, add one... inc UsrBuf256 -.4 >LDYAI UsrBuf256 +.2 ldx #0 path is something like : /dir1/../dir2/ + +.3 ldy #0 reset char counter -Cmd.Exec.CD.Change - >STYA ZPPtr1 +.4 cpx UsrBuf256 + beq .8 + + inx + lda UsrBuf256,x + cmp #'/' + beq .5 + iny char=char+1!!! + bra .4 + +.5 tya any char count? + beq .4 no, start counting... + + cpy #2 do we have /xx/? + bne .3 no, skip this token + + lda #'.' + cmp UsrBuf256-1,x /yy/x./ ? + bne .3 + cmp UsrBuf256-2,x /yy/../ ? + bne .3 + cpx #4 /../ ? + beq Cmd.Exec.ERRSYN illegal + + txa + tay save end of /../ + sec + sbc #3 remove ../ + tax + +.6 dex + lda UsrBuf256,x Found beginning of dir before /../ + cmp #'/' + bne .6 + +.7 lda UsrBuf256,y strip dir/../ + sta UsrBuf256,x + cpy UsrBuf256 + beq .71 + iny + inx + bra .7 + +.71 stx UsrBuf256 + + bra .2 Start over... + +.8 cpx #1 + beq .80 we have '/' go change prefix >PUSHW L.STAT - >PUSHW ZPPtr1 - >SYSCALL SYS.STAT + >PUSHWI UsrBuf256 + >SYSCALL STAT bcs .9 lda STAT+S.STAT.PRODOS.TYPE - sec - eor #$0F Directory ? - bne .9 + cmp #$0F Directory ? + bne Cmd.Exec.ERRSYN - >LDYA ZPPtr1 - >SYSCALL SYS.NewPStrYA +.80 >LDYAI UsrBuf256 + >SYSCALL NewPStrYA bcs .9 - phx ldy #S.PS.hPREFIX lda (pPs),y - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA pla @@ -279,6 +298,10 @@ Cmd.Exec.CD.Change clc .9 rts *-------------------------------------- +Cmd.Exec.ERRSYN lda #SYSMGR.ERRSYN + sec + rts +*-------------------------------------- Cmd.Exec.STARTPROC lda ARGS beq Cmd.Exec.ERRSYN @@ -287,17 +310,13 @@ Cmd.Exec.STARTPROC >LDYA L.ARGS jmp Cmd.ExecYA.1 - -Cmd.Exec.ERRSYN lda #SYSMGR.ERRSYN - sec - rts *-------------------------------------- Cmd.Exec.SET lda ARGS bne Cmd.Exec.SETVAR ldy #S.PS.hENV lda (pPs),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPTR1 * No arg, print all ENV @@ -320,7 +339,7 @@ Cmd.Exec.SET lda ARGS >PUSHW ZPPTR1 Push name >LDYA L.MSG.PRINTENV - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bcs .9 lda ZPPTR2 @@ -348,30 +367,34 @@ Cmd.Exec.SETVAR tax bne .1 cpx #1 string is '=value' ? - beq Cmd.Exec.ERRSYN syntax error + beq .99 syntax error >LDYA L.ARGS String is VAR=VALUE... - >SYSCALL SYS.PutEnvYA + >SYSCALL PutEnvYA rts .2 dec ARGS String is "VAR=", Remove endig '=' >LDYA L.ARGS String is "VAR"... - >SYSCALL SYS.UnsetEnvYA + >SYSCALL UnsetEnvYA rts -* Print requeted VAR +* Print requested VAR .3 >LDYA L.ARGS - >SYSCALL SYS.GetEnvYA + >SYSCALL GetEnvYA bcs .8 >PUSHYA push value >PUSHW L.ARGS push name >LDYA L.MSG.PRINTENV - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA .8 clc .9 rts + +.99 lda #SYSMGR.ERRSYN + sec + rts *-------------------------------------- Cmd.Exec.DATE sec .HS 90 bcc @@ -379,7 +402,7 @@ Cmd.Exec.DATE sec Cmd.Exec.TIME clc php >LDYA L.TIME - >SYSCALL SYS.TimeYA + >SYSCALL TimeYA >PUSHWI UsrBuf256 plp @@ -389,18 +412,18 @@ Cmd.Exec.TIME clc .1 >PUSHW L.FMT.TIME .2 >PUSHW L.TIME - >SYSCALL SYS.PStrFTime + >SYSCALL PStrFTime >PUSHWI UsrBuf256 >LDYA L.MSG.PSTR - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA rts *-------------------------------------- Cmd.Exec.ECHO lda ARGS beq .9 >PUSHW L.ARGS >LDYA L.MSG.PSTR - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA clc rts @@ -414,13 +437,13 @@ Cmd.Exec.TYPE lda ARGS >PUSHBI 4 S.FILEINFO.TYPE.TXT >PUSHBI SYS.FOPEN.R >PUSHW L.ARGS - >SYSCALL SYS.LoadFile + >SYSCALL LoadFile bcs .99 >STYA ZPPTR2 store file len phx txa - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPTR1 .1 lda ZPPTR2 bne .2 @@ -430,14 +453,14 @@ Cmd.Exec.TYPE lda ARGS .2 dec ZPPTR2 lda (ZPPTR1) - >SYSCALL SYS.COutA + >SYSCALL COutA inc ZPPTR1 bne .1 inc ZPPTR1+1 bra .1 .3 pla - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA clc rts diff --git a/SBIN/SHELL.S.HIS.txt b/SBIN/SHELL.S.HIS.txt index 11ed8055..6f850732 100644 --- a/SBIN/SHELL.S.HIS.txt +++ b/SBIN/SHELL.S.HIS.txt @@ -7,7 +7,7 @@ AUTO 6 *-------------------------------------- HIS.Init >PUSHWI 256 Get a buffer for History >PUSHBI S.MEM.F.INIT0 - >SYSCALL SYS.GetMem + >SYSCALL GetMem bcs .9 txa @@ -24,7 +24,7 @@ HIS.Init >PUSHWI 256 Get a buffer for History HIS.Add ldy #hCmdHistory lda (pData),y beq .9 - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPTR1 .10 ldy #CmdHistory.END @@ -103,7 +103,7 @@ HIS.GetPrev ldy #hCmdHistory txa - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPTR1 lda #0 @@ -139,7 +139,7 @@ HIS.GetNext ldy #hCmdHistory txa - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPPTR1 ldy #CmdHistory.IDX @@ -178,7 +178,7 @@ HIS.SetBuf jsr CmdBuffer.CLR HIS.Quit ldy #hCmdHistory lda (pData),y beq .9 - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA .9 rts *-------------------------------------- MAN diff --git a/SBIN/SHELL.S.TXT.txt b/SBIN/SHELL.S.TXT.txt index c776193c..9ac96ece 100644 --- a/SBIN/SHELL.S.TXT.txt +++ b/SBIN/SHELL.S.TXT.txt @@ -12,7 +12,7 @@ TXT.OpenFileYA pha pla >PUSHYA - >SYSCALL SYS.FOPEN + >SYSCALL FOPEN bcs .9 ldy #hInputFile @@ -24,7 +24,7 @@ TXT.ReadFile >PUSHWI UsrBuf256+1 ldy #hInputFile lda (pData),y >PUSHA - >SYSCALL SYS.FREAD + >SYSCALL FREAD bcs .9 tya @@ -51,7 +51,7 @@ TXT.ReadFile >PUSHWI UsrBuf256+1 >PUSHW pData >LDYA L.MSG.ECHO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA .8 clc .9 rts *-------------------------------------- @@ -59,7 +59,7 @@ TXT.CloseFile ldy #hInputFile lda (pData),y beq .9 - >SYSCALL SYS.FCLOSEA + >SYSCALL FCLOSEA .9 lda #0 ldy #hInputFile diff --git a/SBIN/SHELL.S.txt b/SBIN/SHELL.S.txt index 216ba854..22c847c4 100644 --- a/SBIN/SHELL.S.txt +++ b/SBIN/SHELL.S.txt @@ -8,9 +8,9 @@ AUTO 6 .OR $2000 .TF /A2OSX.BOOT/SBIN/SHELL *-------------------------------------- - .INB INC/MACROS.I - .INB INC/PRODOS.I - .INB INC/A2OSX.I + .INB /A2OSX.DEV/INC/MACROS.I + .INB /A2OSX.DEV/INC/PRODOS.I + .INB /A2OSX.DEV/INC/A2OSX.I *-------------------------------------- ZPPTR1 .EQ ZPBIN ZPPTR2 .EQ ZPBIN+2 @@ -62,13 +62,13 @@ J.INTCMDS .DA Cmd.Exec.CD .DA Cmd.Exec.TYPE .DA 0 *-------------------------------------- -CS.INIT >SYSCALL SYS.GetArgC +CS.INIT >SYSCALL GetArgC cmp #1 beq CS.INIT.INTERACTIVE no arg, continue starting interactive lda #1 - >SYSCALL SYS.GetArgA + >SYSCALL GetArgA jsr TXT.OpenFileYA bcs .9 @@ -86,7 +86,7 @@ CS.INIT.INTERACTIVE lda (pPs),y >PUSHA >LDYA L.MSG.GREETINGS - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda (pPs) ora #S.PS.F.EVENT Now accept events @@ -111,7 +111,7 @@ CS.RUN lda #0 jsr PrintPrompt bcs .99 -.1 >SYSCALL SYS.Sleep +.1 >SYSCALL Sleep lda (pData) bpl .1 @@ -252,7 +252,7 @@ CS.DOEVENT ldy #S.EVT.hDEV is Event from active IN device? txa sta (pData),y - >SYSCALL SYS.COutA + >SYSCALL COutA .8 clc rts @@ -261,7 +261,7 @@ CS.EVENT.CTRL.CHAR cpx #13 CR bne .10 txa - >SYSCALL SYS.COutA + >SYSCALL COutA lda (pData) CmdBuffer ora #$80 sta (pData) @@ -318,7 +318,7 @@ CS.QUIT jsr HIS.Quit ldy #hInputFile lda (pData),y beq .1 - >SYSCALL SYS.FCLOSEA + >SYSCALL FCLOSEA .1 .8 clc @@ -327,16 +327,16 @@ CS.QUIT jsr HIS.Quit * PRIVATE *-------------------------------------- PrintPrompt lda #'$' - >SYSCALL SYS.COutA + >SYSCALL COutA bcs .9 lda #' ' - >SYSCALL SYS.COutA + >SYSCALL COutA .9 rts *-------------------------------------- PrintError pha >PUSHA >LDYA L.MSG.ERROR - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA pla rts *-------------------------------------- @@ -397,7 +397,7 @@ CmdBuffer.Normalize.Next CmdBuffer.PRINT ldy #0 .1 iny lda (pData),y - >SYSCALL SYS.COutA + >SYSCALL COutA tya cmp (pData) bne .1 @@ -410,7 +410,7 @@ CmdBuffer.CLR jsr CmdBuffer.DEL CmdBuffer.DEL lda (pData) beq .9 lda #8 - >SYSCALL SYS.COutA + >SYSCALL COutA lda (pData) dec sta (pData) @@ -422,28 +422,28 @@ CmdBuffer.DEL lda (pData) *-------------------------------------- CS.END *-------------------------------------- -ENV.PATH >PSTRING "PATH" -CMDS >PSTRING "CD" - >PSTRING "DATE" - >PSTRING "ECHO" - >PSTRING "EXIT" - >PSTRING "PAUSE" - >PSTRING "READ" - >PSTRING "SET" - >PSTRING "STARTPROC" - >PSTRING "TIME" - >PSTRING "TYPE" +ENV.PATH >PSTR "PATH" +CMDS >PSTR "CD" + >PSTR "DATE" + >PSTR "ECHO" + >PSTR "EXIT" + >PSTR "PAUSE" + >PSTR "READ" + >PSTR "SET" + >PSTR "STARTPROC" + >PSTR "TIME" + >PSTR "TYPE" .HS 00 *-------------------------------------- -MSG.GREETINGS >CSTRING "\nA2osX-Shell on Dev=%h\n\n" -MSG.ECHO >CSTRING ">%S\n" -MSG.ERROR >CSTRING "[%h]\n" -FMT.DATE >PSTRING "%A, %B %d %Y" -FMT.TIME >PSTRING "%H:%M:%S (%I:%M:%S%p)" -MSG.PSTR >CSTRING "%S\n" -MSG.PRINTENV >CSTRING "%S=%S\n" +MSG.GREETINGS >CSTR "\nA2osX-Shell on Dev=%h\n\n" +MSG.ECHO >CSTR ">%S\n" +MSG.ERROR >CSTR "[%h]\n" +FMT.DATE >PSTR "%A, %B %d %Y" +FMT.TIME >PSTR "%H:%M:%S (%I:%M:%S%p)" +MSG.PSTR >CSTR "%S\n" +MSG.PRINTENV >CSTR "%S=%S\n" *-------------------------------------- -EscChars >PSTRING "DBAC" +EscChars >PSTR "DBAC" EscAscii .HS 04080A0B15 CMD .BS 256 ARGS .BS 256 diff --git a/SBIN/TCPIP.S.CFG.txt b/SBIN/TCPIP.S.CFG.txt index 80d071dd..58aab10f 100644 --- a/SBIN/TCPIP.S.CFG.txt +++ b/SBIN/TCPIP.S.CFG.txt @@ -7,42 +7,42 @@ AUTO 6 *-------------------------------------- CFG.Read >PUSHW L.HOSTNAME >LDYA L.MSG.CFG - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA jsr CFG.Read.HOSTNAME bcc .1 >PUSHA >LDYA L.MSG.CFG.KO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bra .2 .1 >LDYA L.MSG.CFG.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA .2 >PUSHW L.TCPIP.CONF >LDYA L.MSG.CFG - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA jsr CFG.Read.TCPIP.CONF bcc .3 >PUSHA >LDYA L.MSG.CFG.KO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bra .4 .3 >LDYA L.MSG.CFG.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA .4 >PUSHW L.HOSTS >LDYA L.MSG.CFG - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA jsr CFG.Read.HOSTS bcc .5 >PUSHA >LDYA L.MSG.CFG.KO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bra .6 .5 >LDYA L.MSG.CFG.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA .6 rts *-------------------------------------- CFG.Read.HOSTNAME @@ -50,13 +50,13 @@ CFG.Read.HOSTNAME >PUSHBI 4 S.FILEINFO.TYPE.TXT >PUSHBI SYS.FOPEN.R >PUSHW L.HOSTNAME - >SYSCALL SYS.LoadFile + >SYSCALL LoadFile bcs .99 stx CFG.hCfgFile >STYA CFG.FileLen txa - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPIPCfgPtr lda CFG.FileLen+1 @@ -79,7 +79,7 @@ CFG.Read.HOSTNAME rts .89 lda CFG.hCfgFile - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA clc .99 rts @@ -89,12 +89,12 @@ CFG.Read.TCPIP.CONF >PUSHBI 4 S.FILEINFO.TYPE.TXT >PUSHBI SYS.FOPEN.R >PUSHW L.TCPIP.CONF - >SYSCALL SYS.LoadFile + >SYSCALL LoadFile bcs .99 stx CFG.hCfgFile >STYA CFG.FileLen txa - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPIPCfgPtr .1 jsr CFG.GetLine @@ -145,7 +145,7 @@ CFG.Read.TCPIP.CONF bra .1 .89 lda CFG.hCfgFile - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA clc .99 rts @@ -154,17 +154,17 @@ CFG.Read.HOSTS >PUSHWI 0 Aux type >PUSHBI 4 S.FILEINFO.TYPE.TXT >PUSHBI SYS.FOPEN.R >PUSHW L.HOSTS - >SYSCALL SYS.LoadFile + >SYSCALL LoadFile bcs .99 stx CFG.hCfgFile >STYA CFG.FileLen txa - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >STYA ZPIPCfgPtr .89 lda CFG.hCfgFile - >SYSCALL SYS.FreeMemA + >SYSCALL FreeMemA clc .99 rts *-------------------------------------- diff --git a/SBIN/TCPIP.S.txt b/SBIN/TCPIP.S.txt index 3c201202..649940e9 100644 --- a/SBIN/TCPIP.S.txt +++ b/SBIN/TCPIP.S.txt @@ -47,7 +47,7 @@ L.IPCFG .DA IPCFG .DA 0 *-------------------------------------- CS.INIT >LDYA L.LIBTCPIP - >SYSCALL SYS.LoadLibYA + >SYSCALL LoadLibYA bcs .99 sta hLIBTCPIP @@ -96,7 +96,7 @@ CS.INIT >LDYA L.LIBTCPIP .99 rts *-------------------------------------- CS.INIT.DEV >LDYA L.DEVNAME - >SYSCALL SYS.GetDevByNameYA + >SYSCALL GetDevByNameYA bcc .1 inc DEVNAME+4 lda DEVNAME+4 @@ -104,7 +104,7 @@ CS.INIT.DEV >LDYA L.DEVNAME bne CS.INIT.DEV >LDYA L.MSG.DEV.KO - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA lda #DEVMGR.ERRDNF sec rts @@ -116,7 +116,7 @@ CS.INIT.DEV >LDYA L.DEVNAME >PUSHW L.DEVNAME >LDYA L.MSG.DEV.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA ldx #DEVMGR.OPEN jsr pNetDevJmp @@ -174,7 +174,7 @@ CS.QUIT lda IPCFG+S.IPCFG.HDEV jsr pNetDevJmp .1 lda hLIBTCPIP - >SYSCALL SYS.UnloadLibA + >SYSCALL UnloadLibA clc rts *-------------------------------------- @@ -203,24 +203,24 @@ pNetDevJmp jmp * *-------------------------------------- CS.END *-------------------------------------- -LIBTCPIP >PSTRING "libtcpip.o" -DEVNAME >PSTRING "ETH1" -MSG.DEV.KO >CSTRING "TCPIP:No Device Found, exiting.\n" -MSG.DEV.OK >CSTRING "TCPIP:Bound To Device : %S\n" -MSG.CFG >CSTRING "TCPIP:Reading %S..." -MSG.CFG.KO >CSTRING "Failed!!! [%h]\n" -MSG.CFG.OK >CSTRING "OK.\n" +LIBTCPIP >PSTR "libtcpip.o" +DEVNAME >PSTR "ETH1" +MSG.DEV.KO >CSTR "TCPIP:No Device Found, exiting.\n" +MSG.DEV.OK >CSTR "TCPIP:Bound To Device : %S\n" +MSG.CFG >CSTR "TCPIP:Reading %S..." +MSG.CFG.KO >CSTR "Failed!!! [%h]\n" +MSG.CFG.OK >CSTR "OK.\n" *-------------------------------------- -HOSTNAME >PSTRING "${A2OSX}ETC/HOSTNAME" -TCPIP.CONF >PSTRING "${A2OSX}ETC/TCPIP.CONF" -HOSTS >PSTRING "${A2OSX}ETC/HOSTS" -DefaultHostName >CSTRING "a2osx-" -CFG.Keywords >PSTRING "DOMAIN" - >PSTRING "IP" - >PSTRING "MASK" - >PSTRING "GW" - >PSTRING "DNS1" - >PSTRING "DNS2" +HOSTNAME >PSTR "${A2OSX}ETC/HOSTNAME" +TCPIP.CONF >PSTR "${A2OSX}ETC/TCPIP.CONF" +HOSTS >PSTR "${A2OSX}ETC/HOSTS" +DefaultHostName >CSTR "a2osx-" +CFG.Keywords >PSTR "DOMAIN" + >PSTR "IP" + >PSTR "MASK" + >PSTR "GW" + >PSTR "DNS1" + >PSTR "DNS2" CFG.Keyword.Map .DA #0 End Of Keyword table and NA Keyword .DA #S.IPCFG.IP .DA #S.IPCFG.MASK diff --git a/SBIN/TELNETD.S.txt b/SBIN/TELNETD.S.txt index ac547a91..793d46c7 100644 --- a/SBIN/TELNETD.S.txt +++ b/SBIN/TELNETD.S.txt @@ -34,7 +34,7 @@ L.LIBTCPIP .DA LIBTCPIP .DA 0 *-------------------------------------- CS.INIT >LDYA L.LIBTCPIP - >SYSCALL SYS.LoadLibYA + >SYSCALL LoadLibYA bcs .99 sta hLIBTCPIP @@ -68,13 +68,13 @@ CS.QUIT >PUSHB hSrvSocket lda hLIBTCPIP - >SYSCALL SYS.UnloadLibA + >SYSCALL UnloadLibA clc rts *-------------------------------------- CS.END *-------------------------------------- -LIBTCPIP >PSTRING "libtcpip.o" +LIBTCPIP >PSTR "libtcpip.o" hLIBTCPIP .BS 1 hSrvSocket .BS 1 *-------------------------------------- diff --git a/SYS/KERNEL.S.ARG.txt b/SYS/KERNEL.S.ARG.txt index b89b0ffc..72dd5aee 100644 --- a/SYS/KERNEL.S.ARG.txt +++ b/SYS/KERNEL.S.ARG.txt @@ -4,9 +4,13 @@ NEW INC 1 AUTO 6 .LIST OFF -*-------------------------------------- -* Out : A = Command line Arg Count -*-------------------------------------- +*/-------------------------------------- +* #GetArgC +* ##In: +* none. +* ##Out: +* A = Command line Arg Count (Including /path/cmd) +*\-------------------------------------- K.GetArgC jsr ARG.InitArgPtr1 ldx #0 @@ -21,13 +25,15 @@ K.GetArgC jsr ARG.InitArgPtr1 .8 txa clc rts -*-------------------------------------- -* In : -* A = Arg Index -* Out : -* CC : Y,A = PStr To Arg[A] +*/-------------------------------------- +* #GetArgA +* ##In: +* none. +* ##Out: +* CC : success +* Y,A = PStr To Arg[A] * CS : Out Of Bound -*-------------------------------------- +*\-------------------------------------- K.GetArgA sta .2+1 jsr ARG.InitArgPtr1 diff --git a/SYS/KERNEL.S.BIN.txt b/SYS/KERNEL.S.BIN.txt index 2f151a53..a90a384d 100644 --- a/SYS/KERNEL.S.BIN.txt +++ b/SYS/KERNEL.S.BIN.txt @@ -13,7 +13,7 @@ AUTO 6 * X = hMem of Code Segment *-------------------------------------- K.LoadEXEYA >STYA K.LoadEXEYA.Filename - >SYSCALL SYS.PStrUprYA Y,A unmodified + >SYSCALL PStrUprYA Y,A unmodified jsr K.GetMemByNameYA bcs K.LoadEXEYA.1 not already loaded @@ -80,7 +80,7 @@ K.LoadEXEYA.1 >PUSHWI KrnBuf256 jsr BIN.RelocateEXE >LDYA K.LoadEXEYA.Filename get back bin path - >SYSCALL SYS.NewPStrYA make a copy of this string + >SYSCALL NewPStrYA make a copy of this string bcs .98 lda K.LoadEXEYA.hMem Keep X=hMem @@ -179,7 +179,7 @@ BIN.InstallDRV ldy #H.BIN.DRV.CODE.O .10 sta DevMgr.LastDevID - >SYSCALL SYS.GetDevByIDA + >SYSCALL GetDevByIDA >STYA ZPQuickPtr2 setup Ptr2 to dest HEADER ldy #H.BIN.DRV.HEADER.O diff --git a/SYS/KERNEL.S.CIO.txt b/SYS/KERNEL.S.CIO.txt index a9bb2ae5..45035701 100644 --- a/SYS/KERNEL.S.CIO.txt +++ b/SYS/KERNEL.S.CIO.txt @@ -96,40 +96,40 @@ K.SScanF.IsDigit cmp #'0' rts .1 sec rts -*-------------------------------------- -* K.PrintFYA : +*/-------------------------------------- +* #PrintFYA : * Prints C-Style String -* Y,A = PTR to Sting,Last Byte negative -*-------------------------------------- -* %a pull 2 bytes to Print Access right String drwxrwxrwx -* %b pull 1 byte to Print BIN -* %B pull 2 bytes to Print BIN -* %d pull 1 byte unsigned DEC 0..255 -* %D pull 2 bytes unsigned DEC 0..65535 -* %u pull 2 bytes PTR to 4 bytes long unsigned DEC 0..4294967295 -* %e pull 2 bytes PTR to 6 Bytes Real +1.23456789e+12 -* %f pull 2 bytes PTR to 6 Bytes Real 3.1415 -* %h pull 1 byte to Print HEX -* %H pull 2 bytes to Print HEX -* %i pull 1 byte to Print signed DEC -128..127 -* %I pull 2 bytes to Print signed DEC -32768..32767 -* %L pull 2 bytes PTR to 4 bytes signed DEC -2147483648..2147483647 -* %n pull 1 byte to Print low Nibble HEX -* %N pull 1 byte to Print high Nibble HEX -* %s pull 2 bytes ptr to C-Style String -* %S pull 2 bytes ptr to P-Style String -* \e Print 'ESC' ($1B,27) -* \n Print CR=13 -* \\ Print \ -* \% Print % -* len/padding : +* ##In: +* Y,A = PTR to CStr +* %a : pull 2 bytes to Print Access right String 'drwxrwxrwx' +* %b : pull 1 byte to Print BIN +* %B : pull 2 bytes to Print BIN +* %d : pull 1 byte unsigned DEC 0..255 +* %D : pull 2 bytes unsigned DEC 0..65535 +* %u : pull 2 bytes PTR to 4 bytes long unsigned DEC 0..4294967295 +* %e : pull 2 bytes PTR to 6 Bytes Real +1.23456789e+12 +* %f : pull 2 bytes PTR to 6 Bytes Real 3.1415 +* %h : pull 1 byte to Print HEX +* %H : pull 2 bytes to Print HEX +* %i : pull 1 byte to Print signed DEC -128..127 +* %I : pull 2 bytes to Print signed DEC -32768..32767 +* %L : pull 2 bytes PTR to 4 bytes signed DEC -2147483648..2147483647 +* %n : pull 1 byte to Print low Nibble HEX +* %N : pull 1 byte to Print high Nibble HEX +* %s : pull 2 bytes ptr to C-Style String +* %S : pull 2 bytes ptr to P-Style String +* \e Print 'ESC' ($1B,27) +* \n Print CR=13 +* \\ Print \ +* \% Print % +* Modifiers for len and padding : * %d '9' '12' * %2d ' 9' '12' -* %02d '09' '12' -* %11s 'ABCDEFGH ' -* %011s 'ABCDEFGH000' +* %02d '09' '12' +* %11s 'ABCDEFGH ' +* %011s 'ABCDEFGH000' * %2f '3.14' -*-------------------------------------- +*\-------------------------------------- K.PrintFYA >STYA ZPQuickPtr1 ldy #0 diff --git a/SYS/KERNEL.S.D01.txt b/SYS/KERNEL.S.D01.txt index fe6ae3b9..2fec1913 100644 --- a/SYS/KERNEL.S.D01.txt +++ b/SYS/KERNEL.S.D01.txt @@ -256,7 +256,7 @@ DevMgr.SYS.CV .BS 1 DevMgr.SYS.CPULOADI .BS 1 DevMgr.SYS.CPULOADC .AS -"|/-\" *-------------------------------------- -DevMgr.SYS.TITLE >CSTRING "A2osX System Screen" +DevMgr.SYS.TITLE >CSTR "A2osX System Screen" DevMgr.SYS.BASEL .HS 00.80.00.80.00.80.00.80.28.A8.28.A8.28.A8.28.A8.50.D0.50.D0.50.D0.50.D0 DevMgr.SYS.BASEH .HS 08.08.09.09.0A.0A.0B.0B.08.08.09.09.0A.0A.0B.0B.08.08.09.09.0A.0A.0B.0B *-------------------------------------- diff --git a/SYS/KERNEL.S.DAT.txt b/SYS/KERNEL.S.DAT.txt index 68bfc677..af1e2a4b 100644 --- a/SYS/KERNEL.S.DAT.txt +++ b/SYS/KERNEL.S.DAT.txt @@ -10,8 +10,8 @@ DevMgr.LastDevID .DA #DevMgr.Count-1 TSKMGR.SIZE .BS 1 TSKMGR.LASTID .BS 1 *-------------------------------------- -ENV.DRV >PSTRING "DRV" -ENV.LIB >PSTRING "LIB" +ENV.DRV >PSTR "DRV" +ENV.LIB >PSTR "LIB" *-------------------------------------- MAN SAVE SYS/KERNEL.S.DAT diff --git a/SYS/KERNEL.S.DIR.txt b/SYS/KERNEL.S.DIR.txt index 4de6b0c6..753eedd5 100644 --- a/SYS/KERNEL.S.DIR.txt +++ b/SYS/KERNEL.S.DIR.txt @@ -4,15 +4,17 @@ NEW INC 1 AUTO 6 .LIST OFF -*-------------------------------------- -* In : -* X = #SYSCall +*/-------------------------------------- +* #OpenDirYA +* ##In: * Y,A = PATH (PSTR) -* Out : -* CC : Y,A = PTR to S.DIR -* CS : A = EC -*-------------------------------------- -K.OPENDIRYA jsr PFT.CheckPathYA +* ##Out : +* CC : success +* Y,A = PTR to S.DIR +* CS : error +* A = EC +*\-------------------------------------- +K.OpenDirYA jsr PFT.CheckPathYA >STYA ZPQuickPtr2 >STYA MLICALL.PARAMS+1 For GETFILEINFO,MLIOPEN @@ -68,25 +70,29 @@ K.OPENDIRYA jsr PFT.CheckPathYA pla get back MLI error sec .99 rts -*-------------------------------------- -* In : +*/-------------------------------------- +* #ReadDirA +* ##In: * A = hDIR -* Out : -* CC : X = hDIREND, Y,A = PTR to S.DIRENT -* CS : A = EC, A = 0 : no more entry -*-------------------------------------- +* ##Out : +* CC : success +* X = hDIRENT +* Y,A = PTR to S.DIRENT +* CS : error +* A = EC +* note : A = 0 means no more entry +*\-------------------------------------- K.READDIRA.hDir .BS 1 K.READDIRA.hMem .BS 1 K.READDIRA.hDIRENT .BS 1 K.READDIRA.BufSize .BS 2 K.READDIRA.ECIB .BS 1 -K.READDIRA.EC2Return .BS 1 *--S.DIR Cache ------------------------ K.READDIRA.EL .BS 1 K.READDIRA.EPB .BS 1 K.READDIRA.EC .BS 2 *-------------------------------------- -K.READDIRA jsr PFT.CheckDirA +K.ReadDirA jsr PFT.CheckDirA sta K.READDIRA.hDir jsr K.GetMemPtrA >STYA ZPQuickPtr1 @@ -260,6 +266,10 @@ K.READDIRA.DIR sta MLICALL.PARAMS+1 A=#S.DIR.PRODOS.REF dey dex bpl .1 + + inc K.READDIRA.EC Add one to EC because we include VOL/DIR Header + bne .4 + inc K.READDIRA.EC+1 ...and ProDOS does NOT include header entry in EC bra .4 .98 jsr K.READDIRA.CLN @@ -284,13 +294,13 @@ K.READDIRA.DIR sta MLICALL.PARAMS+1 A=#S.DIR.PRODOS.REF ldx K.READDIRA.EPB .5 stx K.READDIRA.ECIB - stz K.READDIRA.EC2Return + +* pass #1 compute BufSize... lda #1 For Ending 0 sta K.READDIRA.BufSize stz K.READDIRA.BufSize+1 -* pass #1 compute BufSize..... K.READDIRA.DIR1 lda (ZPQuickPtr2) X = EntryCount In This Block beq .7 Free slot....goto next @@ -303,10 +313,9 @@ K.READDIRA.DIR1 lda (ZPQuickPtr2) X = EntryCount In This Block cmp #$E0 directory header ? beq .2 - inc K.READDIRA.EC2Return regular DIR or File.... + tya regular DIR or File, get back LEN - tya - and #$F get filename len + and #$F compute filename len sec add "#" + S.STAT adc #S.STAT @@ -337,10 +346,6 @@ K.READDIRA.DIR1 lda (ZPQuickPtr2) X = EntryCount In This Block K.READDIRA.DIR2 jsr K.READDIRA.GetBuf bcs .98 -* ldy #S.DIR.PRODOS.EL Check if first run.... -* lda (ZPQuickPtr1),y -* bne .73 - .71 lda (ZPQuickPtr3) beq .78 Empty slot, skip @@ -556,10 +561,13 @@ ADDF.SRC .HS 1013141516171f20 ADDF.DST .DA #S.STAT.PRODOS.TYPE,#S.STAT.BLOCKS,#S.STAT.BLOCKS+1 .DA #S.STAT.SIZE,#S.STAT.SIZE+1,#S.STAT.SIZE+2 .DA #S.STAT.PRODOS.AUXTYPE,#S.STAT.PRODOS.AUXTYPE+1 -*-------------------------------------- -* In : +*/------------------------------------- +* #CloseDirA +* ##In: * A = hDIR -*-------------------------------------- +* ##Out: +* none, always succeed. +*\------------------------------------- K.CLOSEDIRA jsr PFT.CheckDirA sta K.READDIRA.hDir jsr K.GetMemPtrA @@ -577,9 +585,7 @@ K.CLOSEDIRA.1 ldy #S.DIR.PRODOS.REF jsr K.FreeMemA .2 ldaK.READDIRA.hDir - jsr K.FreeMemA - clc - rts + jmp K.FreeMemA *-------------------------------------- K.MKDIRYA jsr PFT.CheckPathYA >STYA MLICALL.PARAMS+1 diff --git a/SYS/KERNEL.S.DRV.txt b/SYS/KERNEL.S.DRV.txt index e1276a14..8e82137e 100644 --- a/SYS/KERNEL.S.DRV.txt +++ b/SYS/KERNEL.S.DRV.txt @@ -14,7 +14,7 @@ AUTO 6 K.LoadDrvYA >STYA K.LoadDrv.CmdArray >LDYAI ENV.DRV push ENVNAME=DRV - >SYSCALL SYS.GetEnvYA get value for ENV=DRV + >SYSCALL GetEnvYA get value for ENV=DRV bcs .99 >PUSHYA Push $DRV value diff --git a/SYS/KERNEL.S.FILE.txt b/SYS/KERNEL.S.FILE.txt index 140938d6..3bb7d64c 100644 --- a/SYS/KERNEL.S.FILE.txt +++ b/SYS/KERNEL.S.FILE.txt @@ -7,23 +7,24 @@ AUTO 6 *-------------------------------------- * For All SYS.xxxx calls, X = #SYSCall * Must be kept in X before calling -* PFT.Check* -*-------------------------------------- -* K.FOPEN -* In : -* PULLW = PATH (PSTR) -* PULLB = MODE -* SYS.FOPEN.R .EQ $01 if R and !exists -> ERROR -* SYS.FOPEN.W .EQ $02 if W and !exists -> CREATE -* SYS.FOPEN.A .EQ $04 Append -* SYS.FOPEN.T .EQ $08 Open/Append in Text mode -* SYS.FOPEN.X .EQ $80 Create if not exists -* PULLB = TYPE -* PULLW = AUXTYPE -* Out : +* PFT.Check +*/-------------------------------------- +* #FOpen +* Open a file +* ##In : +* PUSHW = AUXTYPE +* PUSHB = TYPE +* PUSHB = MODE +* SYS.FOPEN.R : if R and !exists -> ERROR +* SYS.FOPEN.W : if W and !exists -> CREATE +* SYS.FOPEN.A : Append +* SYS.FOPEN.T : Open/Append in Text mode +* SYS.FOPEN.X : Create if not exists +* PUSHW = PATH (PSTR) +* ##Out : * CC : A = hFILE * CS : A = EC -*-------------------------------------- +*\-------------------------------------- K.FOPEN jsr PFT.CheckPathSTK >PULLW MLICALL.PARAMS+1 >PULLB K.FOPEN.MODE @@ -56,6 +57,7 @@ K.FOPEN jsr PFT.CheckPathSTK >STYA ZPQuickPtr1 stx hFILE + >PUSHWI 1024 get a ProDOS IOBUF >PUSHBI S.MEM.F.ALIGN+S.MEM.F.NOMOVE jsr K.GetMem @@ -109,11 +111,13 @@ K.FOPEN.MODE .BS 1 K.FOPEN.TYPE .BS 1 K.FOPEN.AUXTYPE .BS 2 hFILE .BS 1 -*-------------------------------------- -* K.FCLOSEA -* In : +*/-------------------------------------- +* #FCloseA +* Close a file +* ##In : * A = hFILE -*-------------------------------------- +* ##Out : +*\-------------------------------------- K.FCLOSEA jsr PFT.CheckFileA sta hFILE jsr K.GetMemPtrA @@ -133,27 +137,28 @@ K.FCLOSEA.1 ldy #S.FILE.PRODOS.REF .2 lda hFILE jsr K.FreeMemA rts -*-------------------------------------- -* K.FREAD -* In : +*/-------------------------------------- +* #FRead +* Read bytes from file +* ##In : * PULLB = hFILE * PULLW = Bytes To Read * PULLW = Dest Ptr -* Out : -* Y,A = Bytes Read -*-------------------------------------- +* ##Out : +* Y,A = Bytes Read +*\-------------------------------------- K.FREAD jsr PFT.CheckFileSTK ldx #MLIREAD bra K.FREAD.1 -*-------------------------------------- -* K.FWRITE -* In : +*/-------------------------------------- +* #FWrite +* ##In: * PULLB = hFILE * PULLW = Bytes To Write * PULLW = Src Ptr -* Out : -* Y,A = Bytes Written -*-------------------------------------- +* #Out: +* Y,A = Bytes Written +*\-------------------------------------- K.FWRITE jsr PFT.CheckFileSTK ldx #MLIWRITE K.FREAD.1 >PULLA @@ -168,23 +173,23 @@ K.FREAD.1 >PULLA bcs .9 >LDYA MLICALL.PARAMS+6 .9 rts -*-------------------------------------- -* K.FFLUSHA -* In : +*/-------------------------------------- +* #FFLUSHA +* ##In: * A = hFILE -*-------------------------------------- +*\-------------------------------------- K.FFLUSHA jsr PFT.CheckFileA jsr FILE.SetupPrt1A >MLICALL MLIFLUSH rts -*-------------------------------------- -* K.FSEEK -* In : -* PULLB = hFILE -* PULLB = From -* PULLW = OffsetLo -* PULLW = OffsetHi -*-------------------------------------- +*/------------------------------------- +* #FSEEK +* ##In: +* PUSHW = OffsetHi +* PUSHW = OffsetLo +* PUSHB = From +* PUSHB = hFILE +*\------------------------------------- K.FSEEK jsr PFT.CheckFileSTK >PULLA jsr FILE.SetupPrt1A @@ -236,13 +241,13 @@ K.FSEEK jsr PFT.CheckFileSTK *-------------------------------------- K.FSEEK.FROM .BS 1 K.FSEEK.OFFSET .BS 4 -*-------------------------------------- -* K.FTELLA -* In : +*/-------------------------------------- +* #FTELLA +* ##In: * A = hFILE -* Out : +* ##Out: * Y,A,X = Offset -*-------------------------------------- +*\-------------------------------------- K.FTELLA jsr PFT.CheckFileA K.FTELLA.1 jsr FILE.SetupPrt1A >MLICALL MLIGETMARK @@ -250,16 +255,16 @@ K.FTELLA.1 jsr FILE.SetupPrt1A >LDYA MLICALL.PARAMS+2 ldx MLICALL.PARAMS+4 .9 rts -*-------------------------------------- -* K.FEOFA -* In : +*/-------------------------------------- +* #FEOFA +* ##In: * A = hFILE -* Out : -* CC : -* A=0 EOF -* A !=0 NOT EOF -* CS : -*-------------------------------------- +* ##Out: +* CC : +* A=0 EOF +* A !=0 NOT EOF +* CS : +*\-------------------------------------- K.FEOFA jsr PFT.CheckFileA jsr FILE.SetupPrt1A jsr K.FTELLA.1 @@ -282,30 +287,34 @@ K.FEOFA jsr PFT.CheckFileA .8 clc .9 rts K.FEOFA.MARK .BS 3 -*-------------------------------------- -* K.REMOVEYA -*-------------------------------------- +*/-------------------------------------- +* #REMOVEYA +*\-------------------------------------- K.REMOVEYA jsr PFT.CheckPathYA >STYA MLICALL.PARAMS+1 >MLICALL MLIDESTROY rts -*-------------------------------------- -* K.RENAME -* In : -* PULLW = Old Name -* PULLW = New Name -*-------------------------------------- +*/-------------------------------------- +* #RENAME +* Rename a file +* ##In : +* PUSHW = New Name +* PUSHW = Old Name +* ##Out : +*\-------------------------------------- K.RENAME jsr PFT.CheckPathSTK >PULLW MLICALL.PARAMS+1 >PULLW MLICALL.PARAMS+3 >MLICALL MLIRENAME rts -*-------------------------------------- -* K.STAT -* In : -* PULLW = PTR to Filename -* PULLW = PTR to S.STAT buffer -*-------------------------------------- +*/-------------------------------------- +* #STAT +* Return information about a file +* ##In : +* PUSHW = PTR to S.STAT buffer +* PUSHW = PTR to Filename (PSTR) +* ##Out : +*\-------------------------------------- K.STAT jsr PFT.CheckPathSTK >PULLW MLICALL.PARAMS+1 >PULLW ZPQuickPtr2 diff --git a/SYS/KERNEL.S.FIO.txt b/SYS/KERNEL.S.FIO.txt index 66c635bd..48e2f025 100644 --- a/SYS/KERNEL.S.FIO.txt +++ b/SYS/KERNEL.S.FIO.txt @@ -15,7 +15,7 @@ AUTO 6 *-------------------------------------- K.FileSearch >PULLW ZPQuickPtr4 ZPQuickPtr1 trashed by ExpandPStrYA >PULLYA Get Search list - >SYSCALL SYS.ExpandPStrYA Expand it (SYSCALL to BNK1) + >SYSCALL ExpandPStrYA Expand it (SYSCALL to BNK1) bcs .99 stx K.FileSearch.hSrch @@ -98,14 +98,14 @@ K.GetFullPathYA >STYA ZPQuickPtr3 Ptr1 & 2 used by StrCpy jsr K.GetMemPtrA >PUSHYA >PUSHWI KrnBuf256 - >SYSCALL SYS.PStrCpy + >SYSCALL PStrCpy .1 >PUSHW ZPQuickPtr3 >PUSHWI KrnBuf256 - >SYSCALL SYS.PStrCat + >SYSCALL PStrCat K.GetFullPathYA.NewStr >LDYAI KrnBuf256 - >SYSCALL SYS.NewPStrYA + >SYSCALL NewPStrYA rts K.GetFullPathYA.9 diff --git a/SYS/KERNEL.S.INIT2.txt b/SYS/KERNEL.S.INIT2.txt index 5d8b77ce..d258fcee 100644 --- a/SYS/KERNEL.S.INIT2.txt +++ b/SYS/KERNEL.S.INIT2.txt @@ -92,12 +92,12 @@ Kernel.Init2 sei jsr PrintCStrAX rts Do NOT replace this JSR/RTS with a JMP *-------------------------------------- -MSG.Init2 >CSTRING "A2osX[Stage2]:Init\nInstalling KERNEL...\n - $BE00 (Global Page)...\n" -MSG.D000BNK1 >CSTRING " - $D000 Bank1...\n" -MSG.D000BNK2 >CSTRING " - $D000 Bank2...\n" -MSG.E000 >CSTRING " - $E000...\n" -MSG.HZ >CSTRING "Kernel SYS Timer Set For %d0 hz Machine.\n" -MSG.Init2.OK >CSTRING "A2osX[Stage2]:Complete.\n" +MSG.Init2 >CSTR "A2osX[Stage2]:Init\nInstalling KERNEL...\n - $BE00 (Global Page)...\n" +MSG.D000BNK1 >CSTR " - $D000 Bank1...\n" +MSG.D000BNK2 >CSTR " - $D000 Bank2...\n" +MSG.E000 >CSTR " - $E000...\n" +MSG.HZ >CSTR "Kernel SYS Timer Set For %d0 hz Machine.\n" +MSG.Init2.OK >CSTR "A2osX[Stage2]:Complete.\n" *-------------------------------------- CPU.Init >LDAXI MSG.CPU jsr PrintCStrAX @@ -269,8 +269,8 @@ Z80Code.Start .HS 31FFFF START: LD SP,0FFFFH Init Stack Z80Code.End .EQ * Z80Code.Size .EQ Z80Code.End-Z80Code.Start *-------------------------------------- -MSG.CPU >CSTRING "Checking CPU..." -MSG.CPU.SPEED >CSTRING "Detecting CPU Speed..." +MSG.CPU >CSTR "Checking CPU..." +MSG.CPU.SPEED >CSTR "Detecting CPU Speed..." MSG.CPUTYPEL .DA #MSG.6502 .DA #MSG.65C02 .DA #MSG.65R02 @@ -279,14 +279,14 @@ MSG.CPUTYPEH .DA /MSG.6502 .DA /MSG.65C02 .DA /MSG.65R02 .DA /MSG.65816 -MSG.6502 >CSTRING "6502.\n" -MSG.65C02 >CSTRING "65C02.\n" -MSG.65R02 >CSTRING "65R02.\n" -MSG.65816 >CSTRING "65816.\n" -MSG.CPU.SPEEDOK >CSTRING "%d.%02d Mhz.\n" -MSG.Z80 >CSTRING "Detecting Z80 CPU..." -MSG.Z80.OK >CSTRING "Detected In Slot %d.\n" -MSG.Z80.KO >CSTRING "Not Detected.\n" +MSG.6502 >CSTR "6502.\n" +MSG.65C02 >CSTR "65C02.\n" +MSG.65R02 >CSTR "65R02.\n" +MSG.65816 >CSTR "65816.\n" +MSG.CPU.SPEEDOK >CSTR "%d.%02d Mhz.\n" +MSG.Z80 >CSTR "Detecting Z80 CPU..." +MSG.Z80.OK >CSTR "Detected In Slot %d.\n" +MSG.Z80.KO >CSTR "Not Detected.\n" *-------------------------------------- Kernel.Move ldy #0 .1 inc ZPQuickPtr3 diff --git a/SYS/KERNEL.S.INIT3.txt b/SYS/KERNEL.S.INIT3.txt index e496df42..55ed8c49 100644 --- a/SYS/KERNEL.S.INIT3.txt +++ b/SYS/KERNEL.S.INIT3.txt @@ -9,7 +9,7 @@ Kernel.Init3 jsr K.DevMgrInit bcs * lda #1 SYS device - >SYSCALL SYS.GetDevByIDA + >SYSCALL GetDevByIDA >STYA pDev ldx #DEVMGR.OPEN jsr pDevJmp @@ -21,51 +21,51 @@ Kernel.Init3 jsr K.DevMgrInit sta A2osX.ASCREEN >LDYAI MSG.Init3 - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA >LDYAI MSG.IRQ - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA jsr K.IrqMgrInit bcs * >LDYAI MSG.MEM - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA jsr K.MemMgrInit bcs * >LDYAI MSG.EVT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA jsr K.EvtMgrInit bcs * >LDYAI MSG.FLT - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA jsr K.FltMgrInit bcs * >LDYAI MSG.TSK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA jsr K.TskMgrInit bcs * ldy #S.PS.hPREFIX lda (pPs),y - >SYSCALL SYS.GetMemPtrA + >SYSCALL GetMemPtrA >PUSHYA >LDYAI MSG.Prefix - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA >PUSHWI STARTUP.CMDLINE >LDYAI MSG.Startup - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA >LDYAI STARTUP.CMDLINE - >SYSCALL SYS.CreateProcessYA + >SYSCALL CreateProcessYA bcs .9 >LDYAI MSG.Init3.OK - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA >LDYAI TskMgr.Table >STYA pPs @@ -77,7 +77,7 @@ Kernel.Init3 jsr K.DevMgrInit .9 >PUSHA >LDYAI MSG.StartupErr - >SYSCALL SYS.PrintFYA + >SYSCALL PrintFYA bra * *-------------------------------------- * K.DevMgrInit @@ -102,7 +102,7 @@ DevMgr.NUL cld jmp (DevMgr.NUL.Code,x) .DA #0 DevID=0 .DA #S.DEV.F.INUSE+S.DEV.F.SHARE+S.DEV.F.COUT+S.DEV.F.CHAR - >PSTRING "NUL" NAME + >PSTR "NUL" NAME .HS 00 NAME must Be 5 bytes long .HS 00 .HS 00.00.00.00 @@ -111,7 +111,7 @@ DevMgr.SYS cld jmp (DevMgr.SYS.Code,x) .DA #1 DevID=1 .DA #S.DEV.F.INUSE+S.DEV.F.EVENT+S.DEV.F.SHARE+S.DEV.F.COUT+S.DEV.F.CHAR - >PSTRING "SYS" NAME + >PSTR "SYS" NAME .HS 00 NAME must Be 5 bytes long .HS 00 .HS 00.00.00.00 @@ -233,7 +233,7 @@ K.TskMgrInit stz TSKMGR.LASTID >PUSHWI K.ENV.SIZE get a buffer for ENV >PUSHBI S.MEM.F.INIT0 make sure blank - >SYSCALL SYS.GetMem create it... + >SYSCALL GetMem create it... bcs .9 txa @@ -246,7 +246,7 @@ K.TskMgrInit stz TSKMGR.LASTID bcs .9 >LDYAI UsrBuf256 - >SYSCALL SYS.NewPStrYA + >SYSCALL NewPStrYA bcs .9 txa @@ -255,37 +255,37 @@ K.TskMgrInit stz TSKMGR.LASTID >PUSHWI UsrBuf256 push ENV value >PUSHWI I.ENV.A2osX push ENV name - >SYSCALL SYS.SetEnv + >SYSCALL SetEnv bcs .9 >LDYAI I.ENV.PATH - >SYSCALL SYS.PutEnvYA + >SYSCALL PutEnvYA bcs .9 >LDYAI I.ENV.LIB - >SYSCALL SYS.PutEnvYA + >SYSCALL PutEnvYA bcs .9 >LDYAI I.ENV.DRV - >SYSCALL SYS.PutEnvYA + >SYSCALL PutEnvYA .9 rts *-------------------------------------- -I.ENV.A2osX >PSTRING "A2OSX" -I.ENV.PATH >PSTRING "PATH=${A2OSX}SBIN/;${A2OSX}BIN/" -I.ENV.LIB >PSTRING "LIB=${A2OSX}LIB/" -I.ENV.DRV >PSTRING "DRV=${A2OSX}DRV/" -STARTUP.CMDLINE >PSTRING "${A2OSX}SBIN/SHELL ${A2OSX}A2osX.STARTUP" +I.ENV.A2osX >PSTR "A2OSX" +I.ENV.PATH >PSTR "PATH=${A2OSX}SBIN/;${A2OSX}BIN/" +I.ENV.LIB >PSTR "LIB=${A2OSX}LIB/" +I.ENV.DRV >PSTR "DRV=${A2OSX}DRV/" +STARTUP.CMDLINE >PSTR "${A2OSX}SBIN/SHELL ${A2OSX}A2osX.STARTUP" *-------------------------------------- -MSG.Init3 >CSTRING "A2osX[Stage3]:Init\n" -MSG.IRQ >CSTRING " - Interrupt Manager...\n" -MSG.MEM >CSTRING " - Memory Manager...\n" -MSG.EVT >CSTRING " - Event Manager...\n" -MSG.FLT >CSTRING " - Path Filter...\n" -MSG.TSK >CSTRING " - Task Manager...\n" -MSG.Prefix >CSTRING "Prefix:%S\n" -MSG.Startup >CSTRING "Executing Kernel Startup Script...\nCmd:%S\n" -MSG.StartupErr >CSTRING "Failed : [$%h]\n" -MSG.Init3.OK >CSTRING "A2osX[Stage3]:Complete.\n" +MSG.Init3 >CSTR "A2osX[Stage3]:Init\n" +MSG.IRQ >CSTR " - Interrupt Manager...\n" +MSG.MEM >CSTR " - Memory Manager...\n" +MSG.EVT >CSTR " - Event Manager...\n" +MSG.FLT >CSTR " - Path Filter...\n" +MSG.TSK >CSTR " - Task Manager...\n" +MSG.Prefix >CSTR "Prefix:%S\n" +MSG.Startup >CSTR "Executing Kernel Startup Script...\nCmd:%S\n" +MSG.StartupErr >CSTR "Failed : [$%h]\n" +MSG.Init3.OK >CSTR "A2osX[Stage3]:Complete.\n" *-------------------------------------- MAN SAVE SYS/KERNEL.S.INIT3 diff --git a/SYS/KERNEL.S.LIB.txt b/SYS/KERNEL.S.LIB.txt index fd65740b..8be5af09 100644 --- a/SYS/KERNEL.S.LIB.txt +++ b/SYS/KERNEL.S.LIB.txt @@ -13,7 +13,7 @@ AUTO 6 *-------------------------------------- K.LoadLibYA >STYA K.LoadLib.Name save libname for K.FileSearch >LDYAI ENV.LIB push ENVNAME=LIB - >SYSCALL SYS.GetEnvYA get value for ENV=LIB + >SYSCALL GetEnvYA get value for ENV=LIB bcs .99 >PUSHYA Push $LIB value diff --git a/SYS/KERNEL.S.MEM.txt b/SYS/KERNEL.S.MEM.txt index 6ec08f38..ab141fb9 100644 --- a/SYS/KERNEL.S.MEM.txt +++ b/SYS/KERNEL.S.MEM.txt @@ -327,7 +327,7 @@ K.FreeMemA phy bit $C000,x bra * *-------------------------------------- -K.FreeMemA.ERR >CSTRING "***MemMgr:Attempt to Free an already freed hMem at $%H" +K.FreeMemA.ERR >CSTR "***MemMgr:Attempt to Free an already freed hMem at $%H" *-------------------------------------- * K.GetMemPtrA * In: diff --git a/SYS/KERNEL.S.PS.txt b/SYS/KERNEL.S.PS.txt index 2c7d7b42..c6cca8f2 100644 --- a/SYS/KERNEL.S.PS.txt +++ b/SYS/KERNEL.S.PS.txt @@ -255,7 +255,7 @@ PS.Init >LDYA K.CreateProcess.CmdLine pla Restore PTR... ply - >SYSCALL SYS.LoadExeYA Y,A=filename full path + >SYSCALL LoadExeYA Y,A=filename full path bcs .9 >STYA ZPQuickPtr4 save PTR to Code Segment diff --git a/SYS/KERNEL.S.RUN.txt b/SYS/KERNEL.S.RUN.txt index 98ddb50c..de3c2d10 100644 --- a/SYS/KERNEL.S.RUN.txt +++ b/SYS/KERNEL.S.RUN.txt @@ -81,8 +81,8 @@ K.KernelRun jsr TSK.TskMgrRun jsr K.PrintFYA bra * *-------------------------------------- -MSG.DumpEvent >CSTRING "!Unhandled Evt:F=%b,DevID=$%h,DATALO=$%h,DATAHI=$%h,W1=$%H,W2=$%H\n" -MSG.KRNLPANIC >CSTRING "\n!!!Kernel Panic!!!\n" +MSG.DumpEvent >CSTR "!Unhandled Evt:F=%b,DevID=$%h,DATALO=$%h,DATAHI=$%h,W1=$%H,W2=$%H\n" +MSG.KRNLPANIC >CSTR "\n!!!Kernel Panic!!!\n" *-------------------------------------- MAN SAVE SYS/KERNEL.S.RUN diff --git a/SYS/KERNEL.S.STR.txt b/SYS/KERNEL.S.STR.txt index cc3d877c..e07c55b3 100644 --- a/SYS/KERNEL.S.STR.txt +++ b/SYS/KERNEL.S.STR.txt @@ -4,18 +4,18 @@ NEW INC 1 AUTO 6 .LIST OFF -*-------------------------------------- -* #K.NewPStrYA -* Create a new copy of PSTR +*/-------------------------------------- +* #NewPStrYA +* Create a new copy of PSTR * ##In: -* Y,A = PTR to buffer +* Y,A = PTR to buffer * ##Out: * CC : success -* Y,A = PTR to String -* X = hMem (PSTRING) +* Y,A = PTR to String +* X = hMem (PSTRING) * CS : error -* A = SYS error code -*-------------------------------------- +* A = SYS error code +*\-------------------------------------- K.NewPStrYA >STYA ZPQuickPtr2 lda (ZPQuickPtr2) inc @@ -35,8 +35,8 @@ K.NewPStrYA >STYA ZPQuickPtr2 clc .9 rts *-------------------------------------- -* #K.PStrCpy -* Copy string +* #PStrCpy +* Copy string * ##In: * PUSHW = PSTR to SRC (PSTRING) * PUSHW = PSTR to DST (PSTRING) @@ -59,8 +59,8 @@ K.PStrCpyPtr2Ptr1 .2 clc rts *-------------------------------------- -* #K.PStrCat -* Append SRC to DST +* #PStrCat +* Append SRC to DST * ##In: * PUSHW = PSTR to SRC (PSTRING) * PUSHW = PSTR to DST (PSTRING) @@ -94,14 +94,14 @@ K.PStrCat jsr PullPtr1Ptr2 clc rts */-------------------------------------- -* #K.PStrMatch -* Compare a String against pattern +* #PStrMatch +* Compare a String against pattern * ##In: * PUSHW = PTR to Pattern (e.g. '*test?.txt') * PUSHW = PTR to Src String * ##Out: * CC : match -* CS : no match +* CS : no match *\-------------------------------------- K.PStrMatch jsr PullPtr1Ptr2 @@ -168,12 +168,10 @@ K.PStrMatch jsr PullPtr1Ptr2 .9 sec rts */-------------------------------------- -* #K.PStrUprYA -* Convert string to UPPERCASE -* #K.PStrLwrYA -* Convert string to lowercase +* #PStrUprYA/PStrLwrYA +* Convert string to UPPERCASE/lowercase * ##In: -* Y,A = PTR to String (PSTRING) +* Y,A = PTR to String (PSTRING) * ##Out: * Uppercased/lowercased String in Buffer *\-------------------------------------- @@ -205,27 +203,27 @@ K.PStrLwrYA ldx #2 *-------------------------------------- K.PStrUprLwr .AS "azAZ" */-------------------------------------- -* #K.PStrFTime +* #PStrFTime * Convert S.TIME struct to PSTR -* ##In : +* ##In: * PUSHW = Dst PTR To PSTR Buf * PUSHW = Src PTR To Format String -* %a Abbreviated weekday name : Thu -* %A Full weekday name : Thursday -* %b Abbreviated month name : Aug -* %B Full month name : August -* %d Day of the month, zero-padded (01-31) -* %H Hour in 24h format (00-23) 14 -* %I Hour in 12h format (01-12) 02 -* %m Month as a decimal number (01-12) 08 -* %M Minute (00-59) 55 -* %p AM or PM designation PM -* %S Second (00-61) 02 -* %w Weekday as a decimal number with Sunday as 0 (0-6) -* %y Year, last two digits (00-99) -* %Y Year four digits 2001 +* %a : Abbreviated weekday name : Thu +* %A : Full weekday name : Thursday +* %b : Abbreviated month name : Aug +* %B : Full month name : August +* %d : Day of the month, zero-padded (01-31) +* %H : Hour in 24h format (00-23) 14 +* %I : Hour in 12h format (01-12) 02 +* %m : Month as a decimal number (01-12) 08 +* %M : Minute (00-59) 55 +* %p : AM or PM designation PM +* %S : Second (00-61) 02 +* %w : Weekday as a decimal number with Sunday as 0 (0-6) +* %y : Year, last two digits (00-99) +* %Y : Year four digits 2001 * PUSHW = Src PTR To S.Time -* ##Out : +* ##Out: * none. always succeed. *\-------------------------------------- K.PStrFTime jsr PullPtr1Ptr2Ptr3 @@ -431,39 +429,40 @@ K.PStrFTime.addChar sta (ZPQuickPtr3),y rts *-------------------------------------- -K.PStrFTime.DAY >PSTRING "Monday" - >PSTRING "Tuesday" - >PSTRING "Wednesday" - >PSTRING "Thursday" - >PSTRING "Friday" - >PSTRING "Saturday" - >PSTRING "Sunday" +K.PStrFTime.DAY >PSTR "Monday" + >PSTR "Tuesday" + >PSTR "Wednesday" + >PSTR "Thursday" + >PSTR "Friday" + >PSTR "Saturday" + >PSTR "Sunday" *-------------------------------------- -K.PStrFTime.MON >PSTRING "January" - >PSTRING "February" - >PSTRING "March" - >PSTRING "April" - >PSTRING "May" - >PSTRING "June" - >PSTRING "July" - >PSTRING "August" - >PSTRING "September" - >PSTRING "October" - >PSTRING "November" - >PSTRING "December" +K.PStrFTime.MON >PSTR "January" + >PSTR "February" + >PSTR "March" + >PSTR "April" + >PSTR "May" + >PSTR "June" + >PSTR "July" + >PSTR "August" + >PSTR "September" + >PSTR "October" + >PSTR "November" + >PSTR "December" *-------------------------------------- K.PStrFTime.BIN .BS 1 K.PStrFTime.DEC .BS 1 always < 100 */-------------------------------------- -* #K.PStr2StrArrayYA -* ##In : +* #PStr2StrArrayYA +* Convert a PSTR (e.g. : command Line) to a Array of PSTRs (Args[]) +* ##In: * Y,A = PTR to String -* ##Out : +* ##Out: * CC : success -* Y,A = PTR to StrArray -* X = hMem +* Y,A = PTR to StrArray +* X = hMem * CS : error -* A = SYS error code +* A = SYS error code *\-------------------------------------- K.PStr2StrArrayYA >STYA ZPQuickPtr1 diff --git a/SYS/KERNEL.S.txt b/SYS/KERNEL.S.txt index 9284b798..8739f7af 100644 --- a/SYS/KERNEL.S.txt +++ b/SYS/KERNEL.S.txt @@ -8,10 +8,10 @@ AUTO 6 .OR $2000 .TF /A2OSX.BOOT/SYS/KERNEL *-------------------------------------- - .INB INC/MACROS.I - .INB INC/A2OSX.I - .INB INC/IO.I - .INB INC/PRODOS.I + .INB /A2OSX.DEV/INC/MACROS.I + .INB /A2OSX.DEV/INC/A2OSX.I + .INB /A2OSX.DEV/INC/IO.I + .INB /A2OSX.DEV/INC/PRODOS.I *-------------------------------------- TmpPtr1 .EQ $0 for X.PRINTF.S ZPQuickPtr1 .EQ ZPKERNEL Temp Ptrs for use in very limited scope diff --git a/SYS/KM.NSC.S.txt b/SYS/KM.NSC.S.txt index fc991307..90afd5ff 100644 --- a/SYS/KM.NSC.S.txt +++ b/SYS/KM.NSC.S.txt @@ -196,10 +196,10 @@ NSC.Print >STAX TmpPtr1 bne .1 .9 jmp CROUT *-------------------------------------- -NSC.MSG0 >CSTRING "NSC ('No-Slot-Clock'/DS1216E) Driver For A2osX" -NSC.MSG1 >CSTRING "A Clock Driver Is Already Installed." -NSC.MSG2 >CSTRING "DS1216E Chip Not Detected." -NSC.MSG3 >CSTRING "DS1216E Driver Successfully Installed." +NSC.MSG0 >CSTR "NSC ('No-Slot-Clock'/DS1216E) Driver For A2osX" +NSC.MSG1 >CSTR "A Clock Driver Is Already Installed." +NSC.MSG2 >CSTR "DS1216E Chip Not Detected." +NSC.MSG3 >CSTR "DS1216E Driver Successfully Installed." *-------------------------------------- * Driver For DS1216E *-------------------------------------- diff --git a/SYS/KM.RAMWORKS.S.txt b/SYS/KM.RAMWORKS.S.txt index e17fe5a4..206a42ba 100644 --- a/SYS/KM.RAMWORKS.S.txt +++ b/SYS/KM.RAMWORKS.S.txt @@ -380,14 +380,14 @@ RW.Print >STAX TmpPtr1 bne .1 .9 jmp CROUT *-------------------------------------- -RW.MSG >CSTRING "RAMWorks (I,II,III,z-Ram) Driver For A2osX" -RW.MSG.OK >CSTRING "/RAM31 Device Already Installed." -RW.MSG.OK1 >CSTRING " Pages Detected." -RW.MSG.KO1 >CSTRING "Not Detected." -RW.MSG.OK2 >CSTRING "RamWorks Driver Installed." -RW.MSG.KO2 >CSTRING "RamWorks Driver Install Error." -RW.MSG.OK3 >CSTRING "RamWorks Drive Formatted." -RW.MSG.KO3 >CSTRING "RamWorks Drive Format Error." +RW.MSG >CSTR "RAMWorks (I,II,III,z-Ram) Driver For A2osX" +RW.MSG.OK >CSTR "/RAM31 Device Already Installed." +RW.MSG.OK1 >CSTR " Pages Detected." +RW.MSG.KO1 >CSTR "Not Detected." +RW.MSG.OK2 >CSTR "RamWorks Driver Installed." +RW.MSG.KO2 >CSTR "RamWorks Driver Install Error." +RW.MSG.OK3 >CSTR "RamWorks Drive Formatted." +RW.MSG.KO3 >CSTR "RamWorks Drive Format Error." *-------------------------------------- * Driver for Ramworks in main LC * $FF00 -> $FF9A (Inclusive) diff --git a/_Docs/KERNEL.md b/_Docs/KERNEL.md index 94c410a7..be49f5a1 100644 --- a/_Docs/KERNEL.md +++ b/_Docs/KERNEL.md @@ -52,6 +52,38 @@ Prints C-Style String + %011s 'ABCDEFGH000' + %2f '3.14' +#OpenDirYA + +##In: ++ Y,A = PATH (PSTR) + +##Out : ++ CC : success + + Y,A = PTR to S.DIR ++ CS : error + + A = EC + +#ReadDirA + +##In: ++ A = hDIR + +##Out : ++ CC : success + + X = hDIRENT + + Y,A = PTR to S.DIRENT ++ CS : error + + A = EC + + note : A = 0 means no more entry + +#CloseDirA + +##In: ++ A = hDIR + +##Out: ++ none, always succeed. + #FOpen Open a file