2014-08-29 19:19:19 +00:00
|
|
|
;
|
|
|
|
|
; macros.s
|
|
|
|
|
; Generally useful macros for 6502 code
|
|
|
|
|
;
|
|
|
|
|
; Created by Quinn Dunki on 8/15/14.
|
|
|
|
|
; Copyright (c) 2014 One Girl, One Laptop Productions. All rights reserved.
|
|
|
|
|
;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
; Macros
|
|
|
|
|
|
|
|
|
|
.macro SETSWITCH name ; Sets the named softswitch (assumes write method)
|
|
|
|
|
sta name
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro SAVE_AXY ; Saves all registers
|
|
|
|
|
pha
|
|
|
|
|
txa
|
|
|
|
|
pha
|
|
|
|
|
tya
|
|
|
|
|
pha
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro RESTORE_AXY ; Restores all registers
|
|
|
|
|
pla
|
|
|
|
|
tay
|
|
|
|
|
pla
|
|
|
|
|
tax
|
|
|
|
|
pla
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro SAVE_AY ; Saves accumulator and Y index
|
|
|
|
|
pha
|
|
|
|
|
tya
|
|
|
|
|
pha
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro RESTORE_AY ; Restores accumulator and Y index
|
|
|
|
|
pla
|
|
|
|
|
tay
|
|
|
|
|
pla
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro SAVE_AX ; Saves accumulator and X index
|
|
|
|
|
pha
|
|
|
|
|
txa
|
|
|
|
|
pha
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro RESTORE_AX ; Restores accumulator and X index
|
|
|
|
|
pla
|
|
|
|
|
tax
|
|
|
|
|
pla
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro SAVE_ZPP ; Saves Zero Page locations we use for parameters
|
|
|
|
|
lda PARAM0
|
|
|
|
|
pha
|
|
|
|
|
lda PARAM1
|
|
|
|
|
pha
|
|
|
|
|
lda PARAM2
|
|
|
|
|
pha
|
|
|
|
|
lda PARAM3
|
|
|
|
|
pha
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro RESTORE_ZPP ; Restores Zero Page locations we use for parameters
|
|
|
|
|
pla
|
|
|
|
|
sta PARAM3
|
|
|
|
|
pla
|
|
|
|
|
sta PARAM2
|
|
|
|
|
pla
|
|
|
|
|
sta PARAM1
|
|
|
|
|
pla
|
|
|
|
|
sta PARAM0
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro SAVE_ZPS ; Saves Zero Page locations we use for scratch
|
|
|
|
|
lda SCRATCH0
|
|
|
|
|
pha
|
|
|
|
|
lda SCRATCH1
|
|
|
|
|
pha
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro RESTORE_ZPS ; Restores Zero Page locations we use for scratch
|
|
|
|
|
pla
|
|
|
|
|
sta SCRATCH1
|
|
|
|
|
pla
|
|
|
|
|
sta SCRATCH0
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
2014-09-21 20:08:41 +00:00
|
|
|
.macro PARAM16 addr
|
|
|
|
|
lda #<addr
|
|
|
|
|
sta PARAM0
|
|
|
|
|
lda #>addr
|
|
|
|
|
sta PARAM1
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro CALL16 func,addr
|
|
|
|
|
PARAM16 addr
|
|
|
|
|
jsr func
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro PARAMQUAD p0,p1,p2,p3
|
|
|
|
|
lda #p0
|
|
|
|
|
sta PARAM0
|
|
|
|
|
lda #p1
|
|
|
|
|
sta PARAM1
|
|
|
|
|
lda #p2
|
|
|
|
|
sta PARAM2
|
|
|
|
|
lda #p3
|
|
|
|
|
sta PARAM3
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
.macro CALLQUAD func,p0,p1,p2,p3
|
|
|
|
|
PARAMQUAD p0,p1,p2,p3
|
|
|
|
|
jsr func
|
|
|
|
|
.endmacro
|
|
|
|
|
|
2014-08-29 19:19:19 +00:00
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
; Rendering macros
|
|
|
|
|
;
|
|
|
|
|
|
|
|
|
|
.macro LDY_ACTIVEVIEW
|
|
|
|
|
lda WG_ACTIVEVIEW ; Find our new view record
|
2014-09-01 18:18:36 +00:00
|
|
|
asl
|
|
|
|
|
asl
|
|
|
|
|
asl
|
|
|
|
|
asl ; Records are 16 bytes wide
|
2014-08-29 19:19:19 +00:00
|
|
|
tay
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro LDX_ACTIVEVIEW
|
|
|
|
|
lda WG_ACTIVEVIEW ; Find our new view record
|
|
|
|
|
asl
|
|
|
|
|
asl
|
2014-09-01 18:18:36 +00:00
|
|
|
asl
|
2014-09-06 03:32:16 +00:00
|
|
|
asl ; Records are 16 bytes wide
|
|
|
|
|
tax
|
|
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro LDY_FOCUSVIEW
|
|
|
|
|
lda WG_FOCUSVIEW ; Find our new view record
|
2014-09-01 18:18:36 +00:00
|
|
|
asl
|
|
|
|
|
asl
|
|
|
|
|
asl
|
|
|
|
|
asl ; Records are 16 bytes wide
|
2014-09-06 03:32:16 +00:00
|
|
|
tay
|
2014-08-29 19:19:19 +00:00
|
|
|
.endmacro
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.macro VBL_SYNC ; Synchronize with vertical blanking
|
|
|
|
|
lda #$80
|
|
|
|
|
macroWaitVBLToFinish:
|
|
|
|
|
bit RDVBLBAR
|
2014-09-03 00:43:09 +00:00
|
|
|
bmi macroWaitVBLToFinish
|
2014-08-29 19:19:19 +00:00
|
|
|
macroWaitVBLToStart:
|
|
|
|
|
bit RDVBLBAR
|
2014-09-03 00:43:09 +00:00
|
|
|
bpl macroWaitVBLToStart
|
2014-08-29 19:19:19 +00:00
|
|
|
.endmacro
|
