A2osX/BIN/ASM.S.MAC.txt

NEW
  PREFIX
AUTO 4,1
*---------------------------------------
MAC.Init		>SYSCALL SListNew
				bcs .9

				>STA.G MAC.hMacroList
						
				>LDYAI 256
				>SYSCALL getmem
				bcs .9
				
				>STYA ZPMacroBuf
				txa
				>STA.G MAC.hMacroBuf

				>SYSCALL SListNew
				bcs .9

				>STA.G MAC.hCtxList
						
				>LDYAI 256
				>SYSCALL getmem
				bcs .9
				
				>STYA ZPCtxBuf
				txa
				>STA.G MAC.hCtxBuf
				
.9				rts					
*---------------------------------------
MAC.Reset		>STZ.G MAC.CtxID
				iny
				sta (pData),y
				rts
*---------------------------------------
MAC.Quit		>LDA.G MAC.hCtxBuf
				beq .1

				>SYSCALL FreeMem
				
.1				>LDA.G MAC.hCtxList
				beq .2
				>SYSCALL SListFree

.2				>LDA.G MAC.hMacroBuf
				beq .3

				>SYSCALL FreeMem
				
.3				>LDA.G MAC.hMacroList
				beq .8
				>SYSCALL SListFree

.8				clc
				rts			
*---------------------------------------
MAC.AddChar		tax
				
				>LDA.G ASM.PASS		If Pass#2, ignore
				bne .8
				
				>LDA.G MAC.BufPtr
				tay
				
				txa
				sta (ZPMacroBuf),y
				>INC.G MAC.BufPtr
				
				txa
				bne .8
				
				>LDA.G MAC.BufPtr
				tay
				lda #0
				
				>PUSHYA
				>PUSHW ZPMacroBuf
				>PUSHW.G MAC.MacroID
				>LDA.G MAC.hMacroList
				>SYSCALL SListAddData
				rts
				
.8				clc
				rts
*---------------------------------------
MAC.Lookup		>PUSHW ZPLinePtr
				>LDA.G MAC.hMacroList
				>SYSCALL SListLookup
				bcs .9
				txa
				adc ZPLinePtr
				sta ZPLinePtr
				bcc .8
				
				inc ZPLinePtr+1
				clc				
.8				rts

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