Apple-2-SW
/
A2osX
mirror of https://github.com/A2osX/A2osX.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

SEQ:bugfix

This commit is contained in:
burniouf 2023-01-11 19:40:46 +01:00
parent 35a1581a70
commit b5e7bafb21
2 changed files with 0 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

15
BIN/SEQ.S.txt
View File

@ -234,21 +234,6 @@ CS.RUN
.82 jsr CS.RUN.Seq ; everything is set, go 'seq' fame and fortune
jmp .99
*--- Display usage and error out ------
.9
>LDYA L.MSG.USAGE ; push address for usage text
>SYSCALL PutS ; print usage message
lda #E.SYN ; set OS return code as Syntax Error
sec ; indicate we don't want CS.RUN called again
rts ; return to OS
*--- Successful exit ------------------
.99
lda #0 ; set OS return code to success
sec ; indicate we don't want CS.RUN called again
rts ; return to OS
*--------------------------------------
* Called if option S.PS.F.EVENT enabled in Header
* Timer Event : every 10th seconds