From e813c58973dbb01ee2cf7c6ba60dff06a5656e44 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?R=C3=A9my=20GIBERT?= Date: Wed, 27 Feb 2019 16:44:11 +0000 Subject: [PATCH] Kernel 0.92+ --- .Floppies/A2OSX.BUILD.po | Bin 33553920 -> 33553920 bytes BIN/CAT.S.txt | 54 ++++++++++++++++----------------------- SYS/KERNEL.S.GP.txt | 7 +++-- 3 files changed, 25 insertions(+), 36 deletions(-) diff --git a/.Floppies/A2OSX.BUILD.po b/.Floppies/A2OSX.BUILD.po index 3366855ceb9624af82cd5ed168b78137517dd223..111d1f9be8ff16b99eab295d2637531b8fd83c8f 100644 GIT binary patch delta 8202 zcmZXY30ze5_P~F4uEPwQcUVP19S0#rod8jhav6p}$N@%X+)F_i1w}x>!WMB9j{fyP zYSxX{vxw3jCO*`cv^XPWnR}xdnOT}k&(eJQ$}(H{pF4LPtLMkBcg}LpZ$H0tUGZy= zu!89LwwEFyWcRgR0;dQJdFD4|f+P<0+wIm=@$4yGiiWX^OglSXa_XKJOisHkmwx9Y zFU!|k_Hw5>e{AIh#llzHT)3TYZ0B1iwkfn}u8!jN*ZIazTtl?W<2tl$`x{TVT28iI zz_}M13ohUuS7WEEC8RB(H9^aqQ3cv=$*Eg%y7U*PAKQlBb;^rxb2pw4E4FZ{!@6B< z7dPK_scYK`npbqSO>DGvZLaOL`L>FF9&t4ubF~FF9(6SycO5_6d2$Ok@_qHEt^oSe z*ewPxR3zvRyM{y+3`s4>+Q}Mo;!Aeq#&7R-nR|L#liP2&OB2xkvFnEQ_{XjlLVMq?Z8?Wr8q?ZF`gcMbJATaN zj%h#P%I>0Z?Ktl`&$;==_+C4tfUdTQE0o8NyWE=V*IaJ?`gg7!M_oxakVO)v!b3&KdiZ}?dj3Z=)AF15jAVPK@r3>evA#)Hfaax zc%4=Ez3#T|H=RMpSPR>Err(A$t-ENJJ0{kjZ}@80`9mYzBU-qf=XYf4zR1*x<}Ve| zoLMY(D=Gs&AJmcDqTX;Osvt}3Sj0z(Ke-jbMZI-V1#K*~p#DPsj;V)& zZ)CRc^j7}%0owL~TB%R3UKYzvDB{KF*?eGh^or27;8vZ~VNF|r{6qEi~K|3*yc16=6Y!17|m$EqS~(kxXLmlZupQf8_&2^GU^SQTegr zmuECVp?gj#5{{{MIn4*1=9^;D%Y07VDHm>YHg0z|?QlBTR~q3MbKeNq*3R4yvM&0Y zrEPOIz3RLpOY38{x%-yfN&SZJ;0~Y3+P=-%zTLTFhx7U=ms#U%?V)EuOHW%*YtNJH z{P9z+tmn0c%lMwNalf;K)=V;!7Ee1HKXYnxTw1n|Pe1M4+RFDDqn+VeaanuQx#eu? zH_C>y4GmkqXnJTEW%YBX@;jMHM_5DvsXDCydH;HE!eOfQ)|3 za1~_H2pU(rO4L!q)v2|OFS(jFyYK~9$(_fqxVeK(tuA~;e0D28nmZ{T-O3N3$5jd> zM!v?+=F-Hf*LVx<_WiH%w|bNK)*e2W9_mj1QF_#M@{7s%T_-$?-1$j3wU~4o#$w9=*E;5(sHFWZQ zzK4c#@&mp*w71)JCthO-_E72e&ib8`N*|iH;+(W7cFlpuPFROR;RtC z>`Z&h&+nE-7r~aq4N=Fki(k%>u7Xa>4pmNo_z$;gn8lW#)TB?hI+9svD4S(TUpn7X zQ-!i7ER3ZutFc$-+Y5`=Nvb3k7Vc4HmlxY>y(%Gs&9drExfxA*Q^ra$?^C}fMgRWd zyZeH|#Pe_X`3DVP&H4<3BQ}vm4-}LBt?DOQPW6i1`nF0Du`b=(hlv}0<)g)d34Z?Kn!T#N+z7FCuSyrGXJ);@YRt~wD8={u zV*T$I&+Jvj)FsM66PY@RC3MA)U_r^uXw_%uX4{@)kt3NtNgSV@Yt&D27^)T+E0&hm zu+S9NJl;CfYBZS5l6D#k9L1XF6;(U*W0-O@Yi1#1BoEt6gJYJ3rYVUjQzdO0Yc4A; zbPSP|Ls{?xOx*n&A7)5l%5mfnG+uI8=7>#lu&@b#b{@Wrg&8DOts}3prnI8mTv}bj zlVOmMLeFpD>GN!kjVFknKnwHJXLb7L(>ghK+yNJ747W2ziCgxi??( z&SL7hthuJPkZB4$CaIYcGBIT#+a$icF*K_4!+ok!g<^h{nEamVdS~2z)dW7O?*(sj z4zoVTI!SM|<(rLJhI}#PvR{O_@qkLtMTqYnP=$4VazJI`VwN#=FRr<=q>w3ylu=S2`pTmS?B^RmXf)ScT|>LAGNZ7ja478` zb&TB6@cw`7ps}o?+Rl^%C`!OUPM<0kl@&3yHrdV zvN-#QDuo*j%mh9L-Q!Cd08Z<-IHxINPfU4n>_M^_vAbq*~fY0Iw_(lcM2)S z`y6OmNS@%6(@oT%F!7#jC9}aN+6?JrPWQ>?OcISgaT>KIWcb8P$!fYQ*6ED-Bxl~0 zb=Eu*C*2dXsi`cVm|-@NoPAF=CXxKmALL|`C;venNwWD5atg^gJ~_9}APqIwr?Ae< zB{|P0n`|^Tjm0M$4P+Ol_+(QKne%<3b*kiU^~olyk=$)QIg@5inCcTJSqG3j%_rwe z=IK6hs#W|+=#^CG$#|aYjqb8XIA4bI-esCO+&oL+(rUZsP9&GPBv+M|*BHvmye^>y z+&pt>xjlF3VsD(7LT;XQX=P=Vy}CNRtgw8MWL_!Xm!b1Gx=B3OrQ|)5uF&2^oRsm_ z%ML;@S0eS|X;}=hbKc+^B}Foeo-a=MNYyWF0hi%DMI~G_U9?PHDsu0KU)tkVO?;e6 z0K-FS!k-8r0*Rnb!$ZLh|J2;>%U+7(Lg@Ba&zc=ig+cev!JXYd_x^nOSS3=Dj%k#V zc9BD$(okOEuvb-8R5_L`Ev?b(^-S4B4k1rd$}X%0qjk7pT%uzFi(fDPSS!ToH!>+f z!UB7Z!(w!p^H|t3lBV{qCM&z1sW-7^DXk2CR?J=|#MV9My&>r05-GO&dHF(9Hj@zW zH>OV(D@$sb`UMIkW$(X}I(V~uedVVrjXE0?K4K?Cjnx3jcsk^?;G4*?L7b5nvNe^4}`4x+$ zUR#z{mt-1@EbM)6AhP7;NVN-7e!w;{;eb3*mDZZVqD4&op}Y=(2kAMl$Pqh=35Vz> z-6UR*L5IbzCk1WYkw3mi^BQtgcFWAmx8&MLp*%)C4L>eVeJnMqpJcL0T~UAJoh!FA zyWW1TEw=wGN%5DHG6JLsyd|WU3rn_Gvt!Ac+y@PqE8-PJCrFeQ-IX3#o*<_m|<6>ohz;E zVAB|bp+1wcmyLygBkusx8I$TW4H+3W7Wb`Kv0NCOaP_WfY)VqSId2l{bIqqo9aEo~ zGu3Rf(a?0?iO%K1Anv+&Zn+S_{YSh-lHUz#dcaLFrcUS|@!z}erKcy?XBzWzEUe%6 zVs4$#x8DzUO~w@JQ+DnuYfY7{B9q135*>9ybls14?WWX>dh3*Y7XFh@GnP7GnVxTB zp||hqG84zvn`T&8=pCQNWT-dNz7PGyr^!sJw`S+E&|kfp%*2s~dYgeXzxgy{P4xy_ zE~``j?%mlv(uSdPB5mxo(k`HpM=-h2nJgLf7DK)vhZ^FzzaBY-tdWjf5YI^m%=4uZ zK?R_+Ab)y2gsMUBiKSB)PsdJ8rJ<*UQ^_Slh??^q=XFvF8tpH3tq?}l1<1W2qvyQp zX+zRJRR?;DM5-7oODa7@qqKFxsA$w@Q35wMNIST29_=EkADKoYh4(~2kADb-rSzx_ zm8w0e8>{W5Oc_o>RD`cV(~N9epx#>esNFzKMn#Hs4x!HgDiy11mPyG+vU|)krIRDo zjf47%|8fXgKPns9;AruTLx`R3sS>GLq$;troIW9_GW2{x&>#j%s%1>6mD(L7&7rgg zcOyTPW1+Z_x<9ukX_HypV9~Zx80;5EZ;px=m#-9322gD%pISrCbXqje$(5?Yn(A5> zks!KP3gHumN%d^4L!L@$WY!$1KBP~BY8Em=9=Xw+Z!p_tS(rvo5v8ms50&L5im|JN z+zC|6N)7o=_{cxY$`tBU$S66O)kG;+3Z@?I?a3IiW0epdpZY&Np-n**q0|#~n!G6n zJ|KR(N*FNeL22>s&Gu@~N1c>x`i=XOWd>QiX{g_Laa_I7*Plwj%CbrpKT(`pFU0v9 zgmUg9_Okou=%nC0QGb%8J>r$>RJ5A%Xsra6^L-?nf0H)8&e< zHwc6LsW|g2ip4V(1E?1J%c9U!P(>z9#c-Rb0%6zys<>Dbm09#2EU0kIqr1gXQ{l)d zEG=gd(>;ruKI4Dl(BjUNpu`r_7_VE-J0`?0av&Ll=A0QU|?`k>wsub~#T~%+@u6B8y5H zZ_mOjytW!DK-bDc39t0%Xg>7iiFb8Ne7eMPuTEDbPFO1ps;icJ*sq35p#7Y0ueR5$ zyO$LyDTXfP5}uc?I?p`kFQqTtN9A`S9^(?ys}^MymKT@VtD2-!nZVSw-hj)bjc240 zo63tlZ4OR1nG#2k$K$d`+!I{FO7R?ZBIZe16ZjM*N-1HFX6og#YDk?Jvrf3re}yde zb%^G5Le!9zaz2kuZjiHv%{DW`G|f6LnFXzqlWkW}B8#sVah(vyHHf>`3Gx0Q$Iz@6 zzgj0m0t$c{z!1Ptz%amYzz9In_W_Io>dO-iGWFf$$%pPQvgQ+js_e9m#{oYAbOW9MJPG(Q z;3>dQ0J{M{1w0M-8Q>Yf&jHT@egXI;;5oqafL{S#0K5oz3Gg!D*MR>9yaM27=ZNQ%a?*RS+_$%OVfWHIwtVON~IYL43 zL@z=~_z@~XP52W5L?97F1QWdpfzS{kL?{tPgcA`&B+-Y6BKi{jh-e~)=uZqF1`=9g z5TPStiNQo15l`Gl3?YUR3B)jBI5C3I6ZaE|L=urqj3iQsQN(Cs43SEVCDMoohzE&r z#CT!?F_AD3>4cHUAWTFiF^R|`vWbU?$%L86A##a4!a__T@(C+pBc>A5i0Q-(VkR+* zm`yxPJVMMN<`M-&Au*3AB8mw+F`rmKln|xFLShk7Ml2@Ei3*~USVB}0)kF=klz5bQ zjHo4+5swp35Kj_M5zC1>Vg=zKRuZd-dZK{gTE z#3tfd;yFSjo+p}#zY#AGehR5w8>5iFRTK z@lT?I*h%anb`$?1-XQi6oy42OTg2PMJH%eXNw|o8L>KWc@gA|Cc%S%yI6!?$Jd`6rhJ}1r+Ul3ms=ZN#fSHuP4B5{eh zOngoJo47)JLwrkIC9V>qKIX2#W#`_e_0fK!j?y=rko`mza7%95p&q8i+P+XJ@~-ElE$=zw)vIIos5=j| zxSZ`LJ1;gby4X^DvH4|Z%RXm&P-kLCqMA8W#p*NE=nOTw{I^CwbtVinDvaxNwYY?u z9bCrf)6ULI+kbH?8aj*H*7S5vZ87(3Zy2=w7difU#M$z$v(vxjsI%pmv-fcK$sOF- zw-slce)wO@X(4c_BvEtN8Luji&nV8_%Ubf|Ds~sd?KMD-X;1Bpnl5 zk2qW3?Y1nHJj`*K-Pe~%{Cv1mf~-z*x#+M{>DP7A*=OoK>0HBi4e5C<|BzFu-`E0A z>14g{I$guMT+X~6+}G|4&I_DN+7dTtH+AUjoVrHVd(7!lUc2gaNw0nF+~MDx*$qWhy|F@7<8Oui81lBi`x(H|8>3x9xnWwhDVsNJa>oPDuPDnE$umOF{(S@zMZ4-&}F<3Y8!^DM=GvTRO;3n0iw3 zlI(WNg7H2XxxiBUC5n@>Ah&N$Qtr<(20I_;3E=QwwENC%}; zwYtx-<9x;!vZnJ*O*=knTGye(1?P4%SF6OCw6W*9da$#jUz`b=tBUUp62|Y8CXUlP zTb`4OT{8S*jr>9=4q@9)X*zd8 zIJQ%I3x2MmBO&Zr>Fr#mQ1`6Vh~0kRS?Q015x%-lT7Vx#xAac@G9mK(hilnuX~h3DoD_5|9at(Rp)^RE?jm z9^65uaJffX!+qRsepC9iB>b$i&-coe3%;%&JO3=+q1gVubBFKtvqIq8(tSMo4Cw4{ z*)8oj&?(12C*PL#<5o_-BRvy5__(w0x31$(wK{zB_g%+@eP^X3xZ}c^v(i%Tcz5Op z(%U5XUHPFjR2KiSL;db29iez!9qi>N4xZn7{>p_xt{+v!9ezn2gP%FS<0JbWO^dJ? zdoM^&OB5&QWSP3_w9tA<8b0fc)6pPLQ1oec|8^0F4(*JS&fZ?9E2Oi$rPtXp!qF4* zL{G@}3n538KXjdPDt)f?guJ3E-g)xRo{*$poJOA)&m<^aUt=`pz}?0)^*i40{`Hdd z9UofuFQwB%GM#Ib1FIe{;Z<4pgjaohepK4S*oxSAMGU)i?;Q)`Mg?{ocgyqrglDYsP>G5c zlrQ^)3%yo(i)46&@aF!25aGhhKE4VSYtv+FZ81WLLuTLknq0!!g^81WawNlJg)P5J zBZo)EF@q-GG)P;1iV_Ay#2`6^pXij9R#`0J%ft60cHDr&G5)>4~Qw|vo>o(2~#d`SJ5yPsA95()axBA@zI+WX%U4q zitWb!V`0TqIBYZd^ zYEO8mWSCsob4VUJMS)s{FV|LERl-92xf@$Gr?A#i&HMwnfz?n9MyrYv=C9=38#5-E zO%4*K9Fk8m2U8~@Vke4FuC1)9jQNFe8XWF;+KO<_{jNkraClc{&dM`y^*kK+s)eaA z1hyXPie?pPbcRBco`nq&f_{*OG)6|!HQw?K?k!%ClV{Mg;9=rCZrUru#hx@7Om+)R zX@qCSYVVALqqx6qFh#UD@6ec=Z(dhbQ*U9i#*yg8FP76}2y{=1IL^I)6{EyE3XZ4Q zWf$sa>kG^q-8($N(;`u9F>Ewvq*uaZEh$^J(Y-C^*lOJo8=Qm@J#SMg3m=2%rhQ^E zYjrcEEL0=xT`dcld#k74WU*hr6dGAykj)gSVu@-jM<<&5vP~N8d|UM7*xU)xY2GNqw+{DLzr?@o;E0xYtwAI z96U;rIYDSYDj(mdy3IWhoukd}aoibCG#fh6U2e!L&=<_gZ*^D2j?2arA}6_Pbmk(1 zE>~N$!Ckc=*0eC1DJF{}hfm?$C+<2^P#U7^0bSDy@)v#-_qt#9FScaiG9F7X?|~ z26}g_yAcF6ky@9P4pTRnOX2+Zs0rI?CEX^=lvphMo?C8 zrN)w#^_EsolS;(&&T6ZwJWYa^a;1jKYD>Y&<;~?{t6|HyQq#)X+B!>peO6UT^)jko zE7k>9(Xj3*dxjmnoTIaDvslkpa}_j;2gNX`hVyj3l?qZ>WUcT`uY7383c3^bJ6?yo z)8k#Q7qkxquHEO7PrVzNlyml z6DFNet4!F3OROXKSU-*==K!Edm(rS)~TX@weNT}^hOi3K>sl6*rR3wC<4Oaxl9)-Zzw z?5C8E^29_I)Z@KYn_5#pm&xA5s9|sYpZO>bc&73;ODv}}GVC2T&8R7=S*|Oosxq#u zugKBrSja(7ho~vcr~Hx0{>>g{{2_4(Jf9K8VR421kKnho%oa0_@khlp%F`n1UE%P( zygL5a&DUZ1f_lYfIfX^W0y7F^$1&qjmk@LxAL4t$vrH$2G52Aa-lHedzy_ZdmwaS) za&j^YJVQO;0c6nC@8jyAvv|OjR$CFKoK-Lbr617RpL1^v=KrC1OO(x>M>+oy!>5%V zVa&+Ii<$Cc@#2v>be`0}l%IHGgS$X>0T+dR`u~>n5_6{=ip!o9^E0ee(C74cmLg}4 z*Q6#jBrw^3aDB!VA#paBl&&AIP1aOcmshdyFKOe^V;qS>tvv@PoSB7wB|dJH=~C=D z+U#sIi@ho|tma3Cd_7Q=nU-QV6i#Ci*Mt{V^Woe#!ok&iR7BrEy*53|o|Bz7+dMjz zMSm;&iOQnyFo|2fA83)4I^J&5oAD6V#!thqR+qp+fAH33rP_0Jh51G{^ha-5PO5!o zUV(XSe9oB3h6Fa`Ct*b+ui}0dHa7B+jlT@E(`RJcO*4yF=&#v zBxl<7bB!$ccW;SaYu91#2mj$M$w{%B@(Nh+pPrJOZ%L-!t~D31Mg{IWL*>O>5@|X=@NvDP#H|!x!>~U+6uHs?n~L947o2;gi%n*WZ?)@ z5kjqvj~Id+mlgn5>F4H|HKvj~Epze8sD=pbsP-9(rcsfC!^W$9kk+!1!-Y#WJ|+QK zY;DylcOqL^jX%kd$h!aN!#5C#Y-RN-CPVtlR58M>Yx#%>WUKYoRo+pi=Nqx>V&jB` zYx$8rqtI|%ys&;PpVo*hReVXc`E&3D+%KwPG}mUWZ(w0aOKGm|+jGyTbd8H%(9^L!&yCZm7+(dM~bR+#EtFAc`pAWXQQpW2uvPQv@L zkNayZOUHzR#*1C!1rfVeWO!zYy!3Cg%x7T}{%4lh3%7~0R7@22!iY&U8U5U`_&Wq! zVO=ebTbt2VQ*FaNlr3XJCyVu-$24!f`)>|9o`y~llI;ADn5lnhphbfc@%&OCKdr5* zWpPzd6}xdRoJ25d!ld6C(~M&=1=O?-@Mx;PY4P`q<_bt`hW zmQ|Ir(fLA66Q3A~T(fj}rOi{N(W46{L&nLXjl#d0_^8{EUAmt=lFI*GRb-Zbd-hmW zq?h#UlV%Ibb^K@_WRFZWSJ1BGBjzAg{97m3Ku8z=)(JKcaz^(CLbCXm4J1Rl$b69` z;w82-*&;+^iiH=}@ku!)XiEQALaFBsFB5M(qMXwe7U?y!vkWF{iPf@RJTJm6VlmQz z{F-vh2C;O=Vj*fhugX~>R+=lzmKiN|DaqC*&s7ySDomC#&sE`-H%iggQ#x#^(6}C_ z?lQ5`P*QI-n)0&O()d5n8clWbKv})FEVxI`h@p0iB#2%Cn(7Z6GR*in9Em64k;NZyhzRf&Pf*=qKLO>`8 z1K}V7sK5{~6wo!pz;JL27y;BE3Pgh#FcQRqI4}ytg9MNWMuQ|U257*oAQ_~9R4^8# zfpH)mj0YJY6HEZNfr(%em<*J;(vmKrYAw)4>d20QsN*6apid35tLT zn87SC8_WT7!8|Y@EC9EIh2Rdb2o!@7PzuUGIk14mU4X}Z=;C^5SO<)~Z4>o`Yz(%kMG=mn<3LXTT z!4|L;JOmyFkAQ7J0FQz;@EG_9cpPj8Pk<*uJ9r9ofTzJTUX(rQv8X${FnT1&d0WG6L|){)keHjo}5 zZ6s|XHIrIMt)vG@n@L+pTS*U*9wt3P+C~yckCNI*kCFaCdYrVK^aSZiQakA>QU~d2 z(lewTq@AQ^N&h5ulAa?yPufN5BJC!yU^(ubt;q>o4+lRhC`Abm=@NV-J2O!|!UIq5&7E2J+-Uy{BeT_t@@x<>kj r)JOW3^d0GY(hsB`Nk5T(CjCPCm2{o-8|in_AEZCI{W$%&pI7`Bm>&nx diff --git a/BIN/CAT.S.txt b/BIN/CAT.S.txt index 0f8b35bc..bd153a92 100644 --- a/BIN/CAT.S.txt +++ b/BIN/CAT.S.txt @@ -11,8 +11,14 @@ AUTO 4,1 .INB INC/MLI.I .INB INC/MLI.E.I *-------------------------------------- -ZPPTR1 .EQ ZPBIN -ZPBufPtr .EQ ZPBIN+2 + .DUMMY + .OR ZPBIN +ZS.START +ZPPTR1 .BS 2 +ZPBufPtr .BS 2 +BytesRead .BS 1 +ByteIndex .BS 1 +ZS.END .ED *-------------------------------------- * File Header (16 Bytes) *-------------------------------------- @@ -25,7 +31,7 @@ CS.START cld .DA CS.END-CS.START CS .DA DS.END-DS.START DS .DA #16 SS - .DA #4 ZP + .DA #ZS.END-ZS.START Zero Page Size .DA 0 *-------------------------------------- * Relocation Table @@ -35,7 +41,6 @@ CS.START cld .DA CS.DOEVENT .DA CS.QUIT L.MSG.USAGE .DA MSG.USAGE -L.MSG.Init .DA MSG.Init L.MSG.LINENUM .DA MSG.LINENUM L.MSG.CTRLCHAR .DA MSG.CTRLCHAR L.ASCII .DA ASCII @@ -89,12 +94,7 @@ CS.INIT >STYA ZPBufPtr txa >STA.G hBuf - - -* >PUSHBI 0 -* >LDYA L.MSG.Init -* >SYSCALL printf - + clc .9 rts *-------------------------------------- @@ -144,7 +144,7 @@ CS.RUN bra .11 >PUSHWI 256 >PUSHW ZPBufPtr pla - >SYSCALL FRead + >SYSCALL fread bcc CS.RUN.PRINT @@ -162,7 +162,7 @@ CS.RUN bra .11 *-------------------------------------- CS.RUN.PRINT sty BytesRead Y,A = Bytes read stz ByteIndex - + * jsr PrintStack >INCW.G LineNum @@ -223,14 +223,14 @@ CS.RUN.PRINT sty BytesRead Y,A = Bytes read .3 >PUSHW ZPPtr1 >PUSHBI 2 - >LDYA L.MSG.CTRLCHAR + >LDYA L.MSG.CTRLCHAR >SYSCALL printf bcs .9 bra .7 .4 lda #13 - >SYSCALL PutChar + >SYSCALL PutChar bcs .9 lda #10 @@ -256,32 +256,26 @@ CS.RUN.PRINTNUM clc >SYSCALL printf .8 rts *-------------------------------------- -CS.RUN.OPEN pha +CS.RUN.OPEN phy + pha + + lda #0 + >STA.G bPrintedBlankLine Reset this flag for the new file >PUSHWI 0 Aux type >PUSHBI S.FI.T.TXT >PUSHBI O.RDONLY+O.TEXT pla - + ply >SYSCALL FOpen - bcs .9 - - pha - - lda #0 - >STA.G bPrintedBlankLine Reset this flag for the new file - - pla - clc -.9 rts + rts *-------------------------------------- CS.QUIT >LDA.G hBuf beq CS.RUN.CLOSE >SYSCALL FreeMem -CS.RUN.CLOSE ldy #hFILE - lda (pData),y +CS.RUN.CLOSE >LDA.G hFILE beq .8 pha @@ -312,7 +306,6 @@ MSG.USAGE .AS "Usage : CAT File1 [File2...]\r\n" .AS " -A : Show All non printable caracters\r\n" .AS " -N : Number all output lines\r\n" .AZ " -S : Suppress repeated empty output lines\r\n" -MSG.Init .AZ "\e[7l" MSG.LINENUM .AZ "%5D:" MSG.CTRLCHAR .AZ "[%S]" *-------------------------------------- @@ -348,9 +341,6 @@ ASCII >PSTR "NULL" >PSTR "GS" >PSTR "RS" >PSTR "US" -*-------------------------------------- -BytesRead .BS 1 -ByteIndex .BS 1 *-------------------------------------- .DUMMY .OR 0 diff --git a/SYS/KERNEL.S.GP.txt b/SYS/KERNEL.S.GP.txt index 3fe4f756..b78518fc 100644 --- a/SYS/KERNEL.S.GP.txt +++ b/SYS/KERNEL.S.GP.txt @@ -157,6 +157,7 @@ GP.SysCall dec IRQ.InKernel ldy .5+1 lda .6+1 ldx .7+1 + inc IRQ.InKernel jmp GP.Sleep .4 ldx #$FF Self Modified @@ -177,8 +178,7 @@ GP.LibCall dec IRQ.InKernel pla .1 jsr $FFFF SELF MODIFIED - inc IRQ.InKernel - +GP.LibCall.8 inc IRQ.InKernel rts *-------------------------------------- GP.AtkCall dec IRQ.InKernel @@ -190,8 +190,7 @@ GP.AtkCall dec IRQ.InKernel .1 .DA * jsr GO.A2osX - inc IRQ.InKernel - rts + bra GP.LibCall.8 *-------------------------------------- GP.RomCallPushFAC jsr GP.ROMCALL