2016-10-29 21:58:21 +02:00
|
|
|
|
PR#3
|
2017-03-29 17:48:15 +02:00
|
|
|
|
PREFIX /A2OSX.BUILD
|
2017-10-26 08:41:57 +02:00
|
|
|
|
LOMEM $A00
|
2016-10-29 21:58:21 +02:00
|
|
|
|
INC 1
|
|
|
|
|
AUTO 6
|
|
|
|
|
.LIST OFF
|
|
|
|
|
*--------------------------------------
|
2017-09-11 17:29:08 +02:00
|
|
|
|
IO.PrintErrMsg pha Save EC for PrintF
|
2016-10-29 21:58:21 +02: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 22:47:54 +01:00
|
|
|
|
.2 lda L.ERR.Messages
|
2016-10-29 21:58:21 +02:00
|
|
|
|
sta ZPPTR1
|
|
|
|
|
lda L.ERR.Messages+1
|
|
|
|
|
sta ZPPTR1+1
|
|
|
|
|
|
2017-03-19 22:47:54 +01:00
|
|
|
|
.3 dey
|
|
|
|
|
bmi .8
|
2016-10-29 21:58:21 +02:00
|
|
|
|
|
|
|
|
|
lda (ZPPTR1)
|
|
|
|
|
sec
|
|
|
|
|
adc ZPPTR1
|
|
|
|
|
sta ZPPTR1
|
2017-03-19 22:47:54 +01:00
|
|
|
|
bcc .3
|
2016-10-29 21:58:21 +02:00
|
|
|
|
inc ZPPTR1+1
|
|
|
|
|
bra .3
|
|
|
|
|
|
|
|
|
|
.8 >PUSHW ZPPTR1
|
2017-09-11 17:29:08 +02:00
|
|
|
|
pla
|
|
|
|
|
>PUSHA
|
2016-10-29 21:58:21 +02:00
|
|
|
|
>LDYA L.MSG.ERROR
|
2017-08-25 17:02:16 +02:00
|
|
|
|
>SYSCALL PrintF.YA
|
2016-10-29 21:58:21 +02:00
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
MAN
|
2017-08-22 08:37:03 +02:00
|
|
|
|
SAVE /A2OSX.SRC/SBIN/SHELL.S.IO
|
2017-03-29 17:48:15 +02:00
|
|
|
|
LOAD /A2OSX.SRC/SBIN/SHELL.S
|
2016-10-29 21:58:21 +02:00
|
|
|
|
ASM
|