2018-01-29 07:41:05 +00:00
|
|
|
|
NEW
|
2019-03-18 16:48:16 +00:00
|
|
|
|
PREFIX
|
2018-01-29 07:41:05 +00:00
|
|
|
|
AUTO 4,1
|
|
|
|
|
*---------------------------------------
|
2018-03-28 15:23:32 +00:00
|
|
|
|
MAC.Init >SYSCALL SListNew
|
|
|
|
|
bcs .9
|
2018-01-29 07:41:05 +00:00
|
|
|
|
|
2018-04-06 15:10:02 +00:00
|
|
|
|
>STA.G MAC.hMacroList
|
2018-03-28 15:23:32 +00:00
|
|
|
|
|
|
|
|
|
>LDYAI 256
|
2018-07-20 11:51:08 +00:00
|
|
|
|
>SYSCALL getmem
|
2018-03-28 15:23:32 +00:00
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
>STYA ZPMacroBuf
|
|
|
|
|
txa
|
2018-04-06 15:10:02 +00:00
|
|
|
|
>STA.G MAC.hMacroBuf
|
|
|
|
|
|
|
|
|
|
>SYSCALL SListNew
|
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
>STA.G MAC.hCtxList
|
|
|
|
|
|
|
|
|
|
>LDYAI 256
|
2018-07-20 11:51:08 +00:00
|
|
|
|
>SYSCALL getmem
|
2018-04-06 15:10:02 +00:00
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
>STYA ZPCtxBuf
|
|
|
|
|
txa
|
|
|
|
|
>STA.G MAC.hCtxBuf
|
2018-03-28 15:23:32 +00:00
|
|
|
|
|
|
|
|
|
.9 rts
|
2018-01-29 07:41:05 +00:00
|
|
|
|
*---------------------------------------
|
2018-04-06 15:10:02 +00:00
|
|
|
|
MAC.Reset >STZ.G MAC.CtxID
|
|
|
|
|
iny
|
|
|
|
|
sta (pData),y
|
|
|
|
|
rts
|
|
|
|
|
*---------------------------------------
|
|
|
|
|
MAC.Quit >LDA.G MAC.hCtxBuf
|
2018-03-28 15:23:32 +00:00
|
|
|
|
beq .1
|
2018-01-29 16:48:07 +00:00
|
|
|
|
|
2018-07-18 15:30:42 +00:00
|
|
|
|
>SYSCALL FreeMem
|
2018-03-28 15:23:32 +00:00
|
|
|
|
|
2018-04-06 15:10:02 +00:00
|
|
|
|
.1 >LDA.G MAC.hCtxList
|
|
|
|
|
beq .2
|
2018-07-24 16:00:24 +00:00
|
|
|
|
>SYSCALL SListFree
|
2018-04-06 15:10:02 +00:00
|
|
|
|
|
|
|
|
|
.2 >LDA.G MAC.hMacroBuf
|
|
|
|
|
beq .3
|
|
|
|
|
|
2018-07-18 15:30:42 +00:00
|
|
|
|
>SYSCALL FreeMem
|
2018-04-06 15:10:02 +00:00
|
|
|
|
|
|
|
|
|
.3 >LDA.G MAC.hMacroList
|
2018-03-28 15:23:32 +00:00
|
|
|
|
beq .8
|
2018-07-24 16:00:24 +00:00
|
|
|
|
>SYSCALL SListFree
|
2018-01-29 07:41:05 +00:00
|
|
|
|
|
2018-03-28 15:23:32 +00:00
|
|
|
|
.8 clc
|
|
|
|
|
rts
|
2018-01-29 07:41:05 +00:00
|
|
|
|
*---------------------------------------
|
2019-03-18 16:48:16 +00:00
|
|
|
|
MAC.AddChar tax
|
2018-03-28 15:23:32 +00:00
|
|
|
|
|
2019-03-22 16:47:33 +00:00
|
|
|
|
>LDA.G ASM.PASS If Pass#2, ignore
|
|
|
|
|
bne .8
|
2018-03-28 15:23:32 +00:00
|
|
|
|
|
2019-03-18 16:48:16 +00:00
|
|
|
|
>LDA.G MAC.BufPtr
|
2018-03-28 15:23:32 +00:00
|
|
|
|
tay
|
|
|
|
|
|
2019-03-18 16:48:16 +00:00
|
|
|
|
txa
|
2018-03-28 15:23:32 +00:00
|
|
|
|
sta (ZPMacroBuf),y
|
2019-03-18 16:48:16 +00:00
|
|
|
|
>INC.G MAC.BufPtr
|
2018-03-28 15:23:32 +00:00
|
|
|
|
|
2019-03-18 16:48:16 +00:00
|
|
|
|
txa
|
2018-03-28 15:23:32 +00:00
|
|
|
|
bne .8
|
2018-04-06 15:10:02 +00:00
|
|
|
|
|
2019-03-18 16:48:16 +00:00
|
|
|
|
>LDA.G MAC.BufPtr
|
|
|
|
|
tay
|
|
|
|
|
lda #0
|
|
|
|
|
|
|
|
|
|
>PUSHYA
|
2018-04-06 15:10:02 +00:00
|
|
|
|
>PUSHW ZPMacroBuf
|
2019-03-18 16:48:16 +00:00
|
|
|
|
>PUSHW.G MAC.MacroID
|
|
|
|
|
>LDA.G MAC.hMacroList
|
|
|
|
|
>SYSCALL SListAddData
|
2018-04-06 15:10:02 +00:00
|
|
|
|
rts
|
|
|
|
|
|
2018-03-28 15:23:32 +00:00
|
|
|
|
.8 clc
|
|
|
|
|
rts
|
2018-01-29 16:48:07 +00:00
|
|
|
|
*---------------------------------------
|
2019-03-18 16:48:16 +00:00
|
|
|
|
MAC.Lookup >PUSHW ZPMacroBuf
|
2018-04-06 15:10:02 +00:00
|
|
|
|
>PUSHW ZPLinePtr
|
2019-03-18 16:48:16 +00:00
|
|
|
|
>LDA.G MAC.hMacroList
|
2018-04-06 15:10:02 +00:00
|
|
|
|
>SYSCALL SListLookup
|
|
|
|
|
bcs .9
|
2019-03-18 16:48:16 +00:00
|
|
|
|
txa
|
2018-04-06 15:10:02 +00:00
|
|
|
|
adc ZPLinePtr
|
|
|
|
|
sta ZPLinePtr
|
|
|
|
|
bcc .8
|
2018-03-28 15:23:32 +00:00
|
|
|
|
|
2018-04-06 15:10:02 +00:00
|
|
|
|
inc ZPLinePtr+1
|
|
|
|
|
clc
|
|
|
|
|
.8
|
|
|
|
|
.9 rts
|
|
|
|
|
*---------------------------------------
|
2019-03-18 16:48:16 +00:00
|
|
|
|
MAC.NewOrGetCtx sec
|
|
|
|
|
rts
|
2018-04-06 15:10:02 +00:00
|
|
|
|
*---------------------------------------
|
|
|
|
|
*---------------------------------------
|
2018-01-29 07:41:05 +00:00
|
|
|
|
MAN
|
2019-01-28 07:44:37 +00:00
|
|
|
|
SAVE USR/SRC/BIN/ASM.S.MAC
|
|
|
|
|
LOAD USR/SRC/BIN/ASM.S
|
2018-01-29 07:41:05 +00:00
|
|
|
|
ASM
|