Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-11-30 23:49:37 +00:00
Code Issues Projects Releases Wiki Activity

HTTPGET : many bug fixing, many remaining....?

Browse Source
This commit is contained in:
burniouf 2023-12-15 19:01:07 +01:00
parent 4f27e8c3b0
commit 27a14a992b
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
BIN/HTTPGET.S.txt
View File

@ -310,7 +310,8 @@ CS.RUN.GET jsr CS.RUN.ENCODE
>PUSHBI 0 TYPE >PUSHBI 0 TYPE
>PUSHWZ AUXTYPE >PUSHWZ AUXTYPE
>SYSCALL FOpen >SYSCALL FOpen
bcs .9 bcs .99
sta hFile sta hFile
.1 jsr CS.RUN.RESPONSE .1 jsr CS.RUN.RESPONSE
@ -547,14 +548,17 @@ CS.RUN.RESPONSE jsr Init.TimeOut
inc Received+3 inc Received+3
.70 >PUSHW L.MSG.Progress .70 lda hFile
beq .71
>PUSHW L.MSG.Progress
>PUSHL Received >PUSHL Received
>PUSHBI 4 >PUSHBI 4
>SYSCALL PrintF >SYSCALL PrintF
bcs .9 bcs .9
jmp CS.RUN.RESPONSE .71 jmp CS.RUN.RESPONSE
.8 bit bHeader .8 bit bHeader
bpl .99 bpl .99