2018-01-18 06:49:41 +00:00
|
|
|
|
NEW
|
2017-03-29 15:48:15 +00:00
|
|
|
|
PREFIX /A2OSX.BUILD
|
2018-01-18 06:49:41 +00:00
|
|
|
|
AUTO 4,1
|
2016-10-29 19:58:21 +00:00
|
|
|
|
.LIST OFF
|
|
|
|
|
*--------------------------------------
|
2017-09-11 15:29:08 +00:00
|
|
|
|
IO.PrintErrMsg pha Save EC for PrintF
|
2016-10-29 19:58:21 +00:00
|
|
|
|
|
|
|
|
|
ldx L.ERR.Codes
|
|
|
|
|
stx ZPPTR1
|
|
|
|
|
ldx L.ERR.Codes+1
|
|
|
|
|
stx ZPPTR1+1
|
|
|
|
|
|
|
|
|
|
ldy #0
|
|
|
|
|
|
|
|
|
|
.1 cmp (ZPPTR1),y
|
|
|
|
|
beq .2
|
|
|
|
|
iny
|
|
|
|
|
cpy #ERR.Count
|
|
|
|
|
bne .1
|
|
|
|
|
|
2017-03-19 21:47:54 +00:00
|
|
|
|
.2 lda L.ERR.Messages
|
2016-10-29 19:58:21 +00:00
|
|
|
|
sta ZPPTR1
|
|
|
|
|
lda L.ERR.Messages+1
|
|
|
|
|
sta ZPPTR1+1
|
|
|
|
|
|
2017-03-19 21:47:54 +00:00
|
|
|
|
.3 dey
|
|
|
|
|
bmi .8
|
2016-10-29 19:58:21 +00:00
|
|
|
|
|
|
|
|
|
lda (ZPPTR1)
|
|
|
|
|
sec
|
|
|
|
|
adc ZPPTR1
|
|
|
|
|
sta ZPPTR1
|
2017-03-19 21:47:54 +00:00
|
|
|
|
bcc .3
|
2016-10-29 19:58:21 +00:00
|
|
|
|
inc ZPPTR1+1
|
|
|
|
|
bra .3
|
|
|
|
|
|
|
|
|
|
.8 >PUSHW ZPPTR1
|
2017-09-11 15:29:08 +00:00
|
|
|
|
pla
|
|
|
|
|
>PUSHA
|
2016-10-29 19:58:21 +00:00
|
|
|
|
>LDYA L.MSG.ERROR
|
2017-08-25 15:02:16 +00:00
|
|
|
|
>SYSCALL PrintF.YA
|
2016-10-29 19:58:21 +00:00
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
MAN
|
2017-08-22 06:37:03 +00:00
|
|
|
|
SAVE /A2OSX.SRC/SBIN/SHELL.S.IO
|
2017-03-29 15:48:15 +00:00
|
|
|
|
LOAD /A2OSX.SRC/SBIN/SHELL.S
|
2016-10-29 19:58:21 +00:00
|
|
|
|
ASM
|