From eb9443dce43fd739a485bc3cad61ee85c79be4dc Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?R=C3=A9my=20GIBERT?= Date: Tue, 1 Sep 2020 08:23:13 +0200 Subject: [PATCH] Kernel 0.94 --- .Floppies/A2OSX.BUILD.po | Bin 33553920 -> 33553920 bytes BIN/HTTPGET.S.txt | 60 +++++++++++++++++++++++++++++---------- 2 files changed, 45 insertions(+), 15 deletions(-) diff --git a/.Floppies/A2OSX.BUILD.po b/.Floppies/A2OSX.BUILD.po index 9258f051b2fe5e04df71e77291b1e46054e93279..3babe06597a85d90e0883e2cf62d6dc32bfebe35 100644 GIT binary patch delta 9315 zcma)>3tW`N`p4&8SzK5y%kHwvO;}h~6m?nf2Bs)-Q4#^UWSW%-D3}5PmX^uvNk%g> zZ!yvBB!%Tk4AaEQO1o=iR9c}kk-&4MOA|*-MWC(au z8o*~^nc>q|z@-6x19e<_D)>*99<((*xFyDC z`|kKQn{B|p&Zy?o9g(&-KHvCxM}+*-etP?E9vu`CCT-=m<*v|lNXA2QeZawe-S4(v z>i%roKKlChL|ex&TU(-y?6Vp6+5U*@oM2mH?@WFCeET0gi9+4|;@>vLyW1qIzYB7m z1Dns;w0wO~$b6}ozrEb$YAUv`*V=Bh)1Pf_JN+SSZd=e7-HslgLx%HVbEj@|Ahl}h z)%f#s9UQk_Q|&7fh6a1yHhy>fyKc?#@8{aK#y?87`Ly+jS{AMRz4{rxmxBK3rnaAHJ8RqXQE*}>pYU0!PCu`@CaJ2iv2H`hvkc|2TxiuA)OV^5&WD;T{RmHXCH&r%nR1;!JRngYf2G&IORSgmL!k~$Pj&E~` zq4j&RdkjYQBptOawk-};Y&(O0D}QM|)qYC0)GzY?bKO3V2JHNxZH%yUNb3BH^x1<6 z-MaRR22I%9Z3(G!pE+XiZNJo`dE-**-1gHwI#EF)Dro<;M+@7MeSG)|mw)U9^{xFJ z9#W9pu{$1558w%U-fF(Y^H;cX`S6gC;UPBlZ$yEuU`b=$l15$_64J?+HMwlVGm71D zQ?g6kNsb2h)RL0Iq-1Au95GMTv^ujg-1baoX3=o`&&wh4x!iooWN*6quUV#PNE4dG z2##|*8lWNXuVPWtRk6(4nwrY;#_HOdaqjX(wGEY!&;P5ux!|v9`piN#(M5DKG>Q8M zk0AOYkyJW;`YhsKjK_i^w~GXnXtIi(#U&X=Na3nmi0k? zU4F)pb1(DOCf9;phJaRS&ykRjYq%8TcdBKWF+@!FQ%$nVsZJ0YN2>ZfOZK;9VvL8Y zRMrSzQ=P}+fRm|7a8}jHf)hwpPW7Tn*`bq(c?g8Wdw$vC$~CGVCc?=oW#?2?nT8D` z^F&f@O+%$TGvJ%UNlEqMN{pr2te_EOUTIP8dVV-7aEoTpSRT9AH%gyMlreM>7vGQ_ z7{=%B_4VOzrz|vSlE-oB9c>)nKEfEp-^>o2%FkLOvNe&JylhoHndloKP37+Y#71gjbNR!%MKPM#tGOe|Xp^S#anD28k;luEjPcTR z{>_xYL3xAnNuG0h@f2rnL3UBmI^k2jZzQq+nZoIu@W3@9&+|h33zf!;K_>DbM-}lc zkNHMo+1v24$?Pg2t@Fwo+|D#&EG4ZCjb-ktyxhqpnT5H9#D6Anrt$j52BN!GDLio& zpW!m5OSAcUm(eU;$2Yv-8=E!!h&fe^aj$Jo|iQ%!>u;Ea9RN| z-iXBFS;d(dd3o-_C5^@W@)MvKW-dKqjJ25mf&BV1kHYNYS@|S|%5q{{?ty zy3R|#Y|(&wmA*QYUBt2h=389nX=Y(Tk?6N+6G3K+$JUtC#IRY>J4D{4hLXVhNNYI? z+7m`35Pb_YR^BXzc&y=m)F=CtEJ=*5-u0K%<`UBbqW%U?o#+6Ge~3>XWwbXv+}}SQ z>ED}wdTW#Y<55MMGnE+HM5f{&a+@FP*XGB)+H7t|ISinep-EHV6X-Z!RI$u$$4d9) ze-$6Tj0A4;C@4!H0sj&em!s3kB={*$#%&41l1adJwN1#Q$jK zjbBqul12jFK&F_Dvod(bgEv_;*0=bUjTVdLpqf5&_R5SUOWlpj>MBY2A-;cJL0HP$ zy~Qo>{$0ZjhsCgRn*zJQX@FZ(*;*%^uU zE94CRnx~I7Is(2CO0mYe$k1cFcC2wo%y*(*tf}9_-|CPvis+9+tMHp-;yA%WE~nck zT7L8xvTwP&lW0#ubI?y}7S^6rV*c5yk%h|IGvpWUzMP&Qo#K;HjS*6hSR@^T^rw5< zZum{zfs}xeSbpbq`GIDm;jCf;HIO8ZbMpEcHMzQ`g6PkS@?x?O{|mxX>#E9#X!y&pqNo(DrGNQYz44D23ilnuOWzH%|JR{8*I(mQv7gZN$t5))??|IJR z3};dH^n#LXV(^vZ-Nno~PHS}SU>g-PnlB%%ee!+92}{LF%^Y!VPI+Al(aG-8e9>&6)^fl+-) zq0zkTgw_{p>abqu2Yc!yK?#x)nFwDd+99YdVyJ}W)T{AD*~Ntg`Ne2{qNiM16A2tH z!6W2d4iV4@sKE}WcOp?4b6t`o2SuSSk4<25SbmjoqOfF7Q`I0w$s@WHN%5hP_=TK) zlq#1&f<~*4=x{R8n8)y&w+%G;j+G1W=!N?5Ys^=9s**#w)k1@He7~CHETWsBR+O$* zG_kLuN!}HiGvs<=C#&+AN=J2Bk{np+vXx%ib9nH0V_eb{l=a%oOu4Y7t3_DJvj^+1 zRtI+!3CrUd6O5r|qMwd5WjTl_kmP7xT78*P6Ti|_m z#0G%P%P<2KZ4hCavVjK_c{C!gL{TZ{KsNFk$R@XVjc`dpw(6iW#R!WT?;;Vic+Yra zxOukJTD}NFd!5u;R#EP@r;xBYe9#1=HSl^b;TuI)!kgwINlYb_kD4brN2znEUxSIc zT-ZsCpQcncPOn@{^c6y#94|-A?=xfHSw@Zy7WCzacXO5SU+f@?*g$c@Az=&o*J$7T zo1jokBdnQ=JtpWqo)diyvW3yd5KG-(vSFu)ddWG)dm{9jN#7uv3NwvG(8{krZj8M4 z7Nm%dk0udICFfYa@RQ{RTbZOGPx%lsDVmT`wrtxC@eAXhir?>e%W=r@Z2X7uX^wnH zgJX^3KF4;)R}Mn9huJ#9ZEg39gZF@YcE``fH=1cDjPYTwI94AroIBpr-qW^FWX@Xo zZSygl@A-j}0TIFC{2e6@_|wFB{}SJRB)CZ0%dZ>>w)z})-18ofI2xRxopUg!JDblv z8a!!2>ij>c>0m);Tc1Y0@_h3j9SO=ul)>^(8+q}NLwpf9@wHF)nU445=Z?et^B;}& zuAZNahQzMI6@fj{R*Px=_`bC+BP*+|K(!YkPkk0C{t(H z3jX?WW1>WP&v9c|l^cb`prtiuVo$kKQjQ}lk*XX=bWHI_|5d$;Rx66EcX_5inlO1* zNw(4q-5OIJ znCmbze;-Q{(IJkJ}dD9DMnM%9#sT;z$l{ag5uD< zNb;;C#cDVd@SLZWE@FK_Ei)^ldGfNxN_TnflA1=u%wDy5HDCK8lp0>baAVE(#2}8B zA&j#-@7i1)o`mlx2&o~aKL8hWwbWJB5#1|_1BJZmDXDyIA)&AF_doVC4|!d6v^T_W z9nrpt^8Ro2y6{0|B;pUXP?O8AqW0FBMYUxWwyxwknl~lxUSYCFzaw19bFe+^sYd?( zM;z}dLDJVNOukLsswX1sc^|dtK9E`)%a#%ShrKSLJt8`JRMF8JE`6lt zyI9gvT_pHZ5xB{leL`#k3H{8===fMyUR734tY0XJoS%&fo^Ab7yeY>z^>dN%OYK+C z9QHNxJSTha%x{nx^sU-8IU>;?QyYa-%y-DOd@u2xw=Og{9ap4=)D;#F#Uan~gB-Yd z93f|BeRX3c(VswR#aneJm5tl@6E<#fjPQK0B4Ix({ZvD>-e|}6i@auu2|hh9*O`s) zLw6!fac7FJfj0LMQ6d?w@}<)1tAQnEl;)Of^qvCx zff`RtI@C|YGuD}+dH3dOUA$4Rkx$>4E$S&wAE1iD0RvG}Xb?YL6mA+~F=$jL^7=rD z=v$S>2pfg8NtU*mLNy4*GC&YGN>R3{HP zXL8M)Q$MFBj#!iMp;&yfUOl4JU0T0LPIZ$AS8sBTNEZE83JgjXIkQE90=M!Ry)QE{ zMFW%hCTPZu#O~iQqt&O; zl{4O#Zw_pZF*nDAHpf_+W311{gazzy5cMX9sDHj!{Cvm{S`ssKK(KuK7Be)!xT
QCEy>8wv{_V}%!MM&q+iZKM&UVz!Hw1-LN_ORL%`WcNlEmHG4A0%#TJO8H z8U63pknneRYxDls-P%J+==Y%f)BcycwPEOi*WH?O`7}?xd_tal`Q(4_N_S%WMSk=S zm&1O6zA9fSUFh+?Qo4vMrHks7QXL<(!WAC&hkA$9QTJb0M;HHJS4S0$x)@DnG=lnS4(e;dOV00s+n;6~9=zWZ~Fv=OdpV3xEA7J!BMjvAIVMZTe^q-7A%IFqG z+ZcU}(Z?BWXLKv0PcZrBj?w2CeSy(^jK0X|ON_qE=zc~IF!~CkuQK`?qpvgi2BU8>`WB-H89l`4+l;=$ z=(~&_X7oKqyBU3-(GM8?kkKQI9%b|+Mn7is6Gs2d=%WAr;lzi0F~qdzcug3%utJ;~@#jQ-5%e;ECR(Nm1}FnXHNUm5+4(KC$x&gfZ2 z&oO$Q(LWfy!01IrFERQjqn8=IvW80Qs01`%0Pq1?;0p!<9qjV?ioN1LMF|U_6)r(!oS931ooDAQNPPY>)${fTQ!oCi8PtOY&1Gj_a;0~|?GyyUGZtxFqCs+xZ0RyYRYH$}=1MUWE z!98FdxEHJk8^A`e32X-Uffm5Q{h$>*03HMnfrr5(;Gf`8um!Y%$H3#D9c%?pfG5E= z@GtNb*bX|t4)8SS1UtbqU>Dd8o&|eA7uXA)1J8pOz&`LIcnQ1=_Jaf974Rx}4ZIHC z0B?e~z(H^bybay~?}EeNJ&dhhd^PPES z=#^{16ttc6_m55t4qbQFe~iC5k(k#FSD*2ZN$hP{m#DGhM}Xnw0?m0%yP-OLuf&Jn z8x_CKpx^xRf#9qA%sH<7ye#5BM3TsALbOgt@Q*JaJ5;IjmVde6#6d~QSR8+HY5Ym4 zJ^rLBz1}cNLmHhCI&$qOv59Jz-ZRw?__yCPRekVwZ@HxfJJdh}dI2ry4FZ6!yoEE%()YtbLY^9Ql zz!%bb%P_c%Ux{Or&>?M|07+qu9=$X2VZHQd(xxQ*;= z^Lu!bW7^h9eAG#k!+N`O**?P`Cpua>nrDg3$xDtj9<_~e@ZH6J5y4w0Ihvzvemhr> zwHbD{T;^L(nhK>2{Mt!VnEy=Y!<9VZlqp@EwKr$~Dn9L$X{56?!M5kSwcoYIdmqi@ z%`&HWKl!8o{)?@Z-rub=`QcM0yVYMPw?TPZRO5x#NV!~uZO?081}C*8hGtW5WZxkrY~=M%^b-0T+v3yS%V>%J3hlx zRb4i)x}x4CG`OmW)O)(0()YF|*;@PAnv*d88^{*_<__Tq zJD2>@cz*c?zcq)T$aXlcEzmaC-lnxh^Q{MhXEY4AuRhaq)>@@%JiGeHiF5S(O=nxq z$t4q(oNhd`R2n_N;V|-A&v> z`P@GYvHZ@|z(6UPdtx*We(JKHJ}5Xvkr_Iqv8ageiqYK6kAGu{Raw&b#`EE3;|MuF zv&c1}B)6DEj^w3Ft0JUy?zxy2A!YDnrzTS6&g8FOOmnFsv-rjlng}VId(Op1s$z3^ z%s`V(8pTJ7$7o(U&=e)*@SU;# zQ{_Rw3rohkatrdul91aWpO*!BrNsqf^NDGyP%^nFGd(ZQQ!u~2hiW=X3eYf*479qGI$>ceki7FFU({7#4`OmwJ3P=oX?tb%n<@ zh=kwAf63H@jSIQ|A8HADKuOHV#cE+$BozAWQ&&}8pF=DS&{S9It2(=A@^}*N;k(}& zX|+GtRoG1|i*GC((a1{&o5GVA2D+k*n3fV{j0%g3mWyGIe#n<1_h~6Vvb&eNLBCS& zuPfP2LRZ0pb83AJD9A4qeK)Tr$XxGp3E>TfHL?x*dRM$e61bK$m7$?B_U=m>YwMU6RjnVCjRlC0dWn+CrA@kWRGuABgQA? zYC985Pj%NK8~834D<>Rn*jZ z?2bWhqTY%WLn~@ZUN76Q1UB4;t}9+;Z0l);?LE!#Qcp94z9MFKH@kYBDfG22i*#;H zh^3uhxXEOW+|e@=8xCT9ow!mspF7NCZg@jXCAo zU5a&5iT)jAirG0iorJur{Kj<2cNJ#kkLRoJGxH9UtI_R6Oo~01WAyMb`fuQeq-1B!@f^?Wak~ce4J+_!6d@n+jvybkF&b}Fb zQbM}C%yfoDmVmu~WTv>^U^SC#-MP*b~mlNFyQCv7F2{7X!6gY9clbkH6Uz)6h%uMl#rlg!PuZYmqMoXHO`}E-EJafG!cMzK2Lr zLH_unY@!eBk_il!Fi2vxfx~GHk~g&Lj7XG+L2Ht{A1EPaDYHmkl3^rtbg39vs|D?p z7dv@nmh*@+M!W6l55@c0=V%8-SOE{mqrI)!OLXnS@8=#Gnn!Fo_K634r zXw)w62gGJ&na~*))1z+hK89#*imF(p>bS0|?blW9z?(8H_uTP$l0x?xP~NAt}E!9`%7Z+5+?L5R=NQ&uvnjl5bHq6yTWw;{t^*F=Z1(_)00WW zpnnuWST_uT>NR44k{37qO(+!ZErrZszG4U=5ROdcBTtwj8itF(6%)`+B5o00CtB9C zdhM-JQ`zh?qDzySO3TYU_Cdrt0^P<2uBWJeWH*HwzB;@1*yxQ|fifW_d|i!tqq6z; zCrptIIb9a^jH;*~S22g^MhR`+9b-gpmm#~#rYW}IYc)ZV!|pnk%-$R z*DyY7{rzT3->IFc0e4DR{KQBE{7XzkuhUPH{jDE%viF;l8p_}V-bJybFxORFBio?= z0uodXHKM1fjhP6gGbDLCI}@q$c2-*@4|2e)PStnGs>5dc=F@e})y|RUOklO--GJH? zoC&1CTGO+Ga_6+Q%6yqCm(tdu)Vw;Pou@qOmFIl<8F;tUR0Ct!9fRE@@E){H?B^VV z(}`{Y+AJ>`x_cFe97-bY7agC)%O5bC$NJ8gj`?fINFyOBwp`mv$CHj@jvt*Tou{3@ z;B;xSv)Z}N`GWIR=f}=#PXBm!e9v>Hb2w)@=RIeNJmNiP+CaSDxbjic6z@^f0r{xO zBtB`qM@@O+ya7iO2l%#=rmTkUMOORewa1E+g_n-)9ng`u=~&D0<~s55{LRW=oDZLO zc9(4%<`dk%V}rE)*xu6Bn!We6sd8<5OZNAO9BRIZ%0=NDj=fHIJN7y+AA9}cJ@%3`?Hy-KhNSj_ zMS&gC=1}vD2JHj#zy>bDSX7r|jNCaSu%Y|t(Qcz>^~j^AL}+-F;{1y{hf>=p`&|s{ z=67DHMiFv+aWiPCm~z8>;ZC;WR!zlz;ZEfyt8G65}jA_0gKFW?o|jK z;(GwAi+j)zVtM2rV$f>QU~dcxTf-X`nL~%IRRWB1BtX>bu-ndP%n^yaGpp;1FX(Y45zE{VqHcn^kSDmY!E71(q_1}D%%2j~Jl$1| z_21oeb)8QT^)nDOY`{c9Fz?)WZRFb@t%@0llMSM7hJfx_Omz49+R9p@-6T&+V~ekh zeEvZ~HuKNE>TT)!oHBWz7tdOv-h%Q0FLVZq7iFtDwyuBBY>(b1W}@%ww9Ti{dk{mM z+j;tfX2%^b$zFhuRQ1cyWqL(%k!!s#Eo*c|E?`nJTk-!sc{=Pp@$-`awr zM0`qFc8jvgE;wgmT~&Pr(Y+(uEFWLICp%c@X%Er8-`ND)2i_qy67ZQA7V*uk{ao3Sd?61{{r)Y zR`<29QlkC_`Nl(Httj&yFf1nOZ;|T!PU0KaRoP94l}f&sD+&8S;@5sRhve(S*$S-8*Q) zxPK@ex+Hff_OjId1ZSCOzr8qjTy}m*v1?rVBx3ke-U|6VQ~Q^q;EJpu;Hn5?+2gZF zy9~?YSMNhPCtSJvmjgEAE(D zH?=yBgsD_buJj^L+_C{Bo|3xR-c%2X^b^TbL~@Qu7A2IdB!9l~FLR=#<{$lKPPJ%M z;@l2SI5vNUw?s~9)#giPRoLu`a!-AYC%?9$+9Q9$x#CD%FFx>!Iabp030KTXs@^Id zy-(xNX#-T=eSU&Y#cQwVoq9d0&k!g45rHbc@rpjoFCs|A`f-e3$1 ziGV_Je46RXEbNc}c{#)p$@?3O_FJNE%rf^unlPX^Z5!@!&Wj_K=o`hNV)zP!F|xsS zV-`+bZ>TUPuCrCHyzKGIT-g&mNdtThC0e`Oc%4HOEg3g%G6`_vXMUl_P4w}qtRh!Y zae84f2}%&Z;VY|L_|(((<=ZdXe%*Y{EN%YVEa9rp^w@YyU}KD>F(#xjCbTgo?9~{n zew#Bv)Fc)eux()5C%tg1&~gEHbK(vsXUsp`;UH7F!_kX7oR-V`zr_{K z``xZ^#P(^sxUR_%*EMh2dFz4T3Q5P!2ZP!fbi93M7b z=K3;qvbfx^2HKR#ZWB|NZ(HOZAnrRp+3fYAwz7BX7IXfdNDjNZoRL`EkuI+@WajNZ=ZR7US$^iD?q#ppCfOBtQcXc?pB zj8-r@gVC9cRx(<}=qyI>Vstj6a~Q2=w1&}IM&~kG$LKsp>lvNT=-rIo!{`D=7czP; zqxUg-Kcf#Yx`@#RMk%8nMjvE!F{4WuZDf=&x|Gpnj6THZazMqg+2{}_FP z(VdLG$>>{*zRl<^Mt3v%4x{ff`W~b2GrEV-4;cNB(Y=iBWAr0NKW6k3Mn7frzl`o@ z^fN|3XY>n34={R=(JvYOiqWqb{f5y)jDE}LcZ?op^m|5sVDv{ue`53qqemG%#^`ZI zPcZs3qbC_X#pr29&oFwH(Q}Oc!svNMI~cvd=>Hh~mC=ig{>JF{J8%FehzALvFGvJQpdaWD1^^cr2;3kU3<86}5O5P13Wk9c zkP3!_o53yMR*(ipfRP{_WPnVN1+qa77zIXyTrdWV1$kf`7!UG60hj;^K@lhhCEzwN z5ljM;!4z;im3Lw%m#BnHK+l#U@oWw^FTeA z5AFu{fCXS7xEI_9?gtNmMW6wQ@%MlS!D6rkGy(>ef@R<#upF!aE5XBH6?g=!25Z1t zuns&59s}zE2akg$@C0}gJO!Qx{|3*14PYZ^2G4>`papCO&w=N`7VrXi5o`smU>o=k zXan29OW&``@l!w zWAF+16#N(L2cLn@!582FI0(K3UxBZ|H{cNX7JLT|gYUr);79NiI0BA>W8gSA0e%K2 y!6|SWoB?OSIq(ZO4?4gF@IUY?xCnj&zk@%(C2$%13H}0Cz*X?Kw2fYq7X3f*+6)W; diff --git a/BIN/HTTPGET.S.txt b/BIN/HTTPGET.S.txt index 246c13c1..5929f028 100644 --- a/BIN/HTTPGET.S.txt +++ b/BIN/HTTPGET.S.txt @@ -3,8 +3,7 @@ NEW .LIST OFF .OP 65C02 .OR $2000 -* .TF bin/httpget - .TF root/httpget + .TF bin/httpget *-------------------------------------- .INB inc/macros.i .INB inc/a2osx.i @@ -37,6 +36,7 @@ hEncodedBuf .BS 1 hSendBuf .BS 1 ZPSendBufPtr .BS 2 +hFile .BS 1 ZPFileName .BS 2 hRespBuf .BS 1 @@ -283,7 +283,18 @@ CS.RUN.GET jsr CS.RUN.ENCODE jsr CS.RUN.REQUEST bcs .99 - jsr CS.RUN.RESPONSE + >LDYA ZPFileName + beq .1 + + >PUSHYA + >PUSHBI O.CREATE+O.WRONLY+O.TRUNC + >PUSHBI 0 TYPE + >PUSHWI 0 AUXTYPE + >SYSCALL FOpen + bcs .9 + sta hFile + +.1 jsr CS.RUN.RESPONSE bcs .99 .9 lda #0 @@ -416,19 +427,20 @@ CS.RUN.REQUEST jsr Init.TimeOut >LDYAI 1024 >SYSCALL GetMem bcs .9 + >STYA ZPSendBufPtr stx hSendBuf >PUSHYA - >PUSHW HTTP.GET + >PUSHW L.HTTP.GET >PUSHW ZPEncodedBufPtr >PUSHW ZPHostPtr >PUSHBI 4 >SYSCALL SPrintF bcs .90 - - >PUSHYA + + >PUSHYA Byte count >PUSHW ZPSendBufPtr lda hSocket @@ -447,6 +459,9 @@ CS.RUN.RESPONSE jsr Init.TimeOut .1 >SLEEP + lda #'?' + >SYSCALL putchar + lda hSocket >LIBCALL hLIBTCPIP,LIBTCPIP.Recv bcc .2 @@ -455,26 +470,35 @@ CS.RUN.RESPONSE jsr Init.TimeOut bne .8 lda TimeOut - bne .80 - bra .1 + bne .1 + + bra .80 -.2 >SYSCALL GetMemPtr +.2 lda #'!' + >SYSCALL putchar + + >SYSCALL GetMemPtr >STYA ZPRespBufPtr >PUSHW ZPRespBufPtr + + lda hFile + bne .3 + ldy #S.PS.hStdOut lda (pPS),y - >SYSCALL FWrite +.3 >SYSCALL FWrite bcs .9 - inc bResponse - bra .1 + sec + ror bResponse + bra CS.RUN.RESPONSE .8 cmp #MLI.E.IO SKT Close ? bne .9 .80 lda bResponse - beq .99 + bpl .99 .81 clc rts @@ -498,6 +522,7 @@ CS.QUIT lda hSocket beq .1 >LIBCALL hLIBTCPIP,LIBTCPIP.Shutdown + .1 lda hReqBuf beq .2 @@ -513,7 +538,12 @@ CS.QUIT lda hSocket >SYSCALL FreeMem -.4 lda hLIBTCPIP +.4 lda hFile + beq .5 + + >SYSCALL FClose + +.5 lda hLIBTCPIP beq .8 >SYSCALL UnloadLib @@ -562,7 +592,7 @@ HTTP.GET .AS "GET /%s HTTP/1.1" .AS "Connection: close" .DA #C.CR,#C.LF .DA #C.CR,#C.LF -HTTP.GET.LEN .EQ *-HTTP.GET + .DA #0 *-------------------------------------- .DUMMY .OR 0