acme/examples/me/macros.a

78 lines
758 B
Plaintext
Raw Normal View History

;ACME 0.94.4
!macro cmp16bit .data1, .data2 {
ldx #.data1
ldy #.data2
jsr cmp16bit
}
a = 0
x = 1
y = 2
!macro bank .r, .v {
!if .r = a {
lda #.v
sta conreg
}
!if .r = x {
ldx #.v
stx conreg
}
!if .r = y {
ldy #.v
sty conreg
}
}
CR_BANK15 = 0
CR_RAM0_IO = $3e
CR_RAM0 = $3f
!macro bank15 {
+bank a, CR_BANK15
}
!macro xbank15 {
+bank x, CR_BANK15
}
!macro ybank15 {
+bank y, CR_BANK15
}
!macro ram0io {
+bank a, CR_RAM0_IO
}
!macro yram0io {
+bank y, CR_RAM0_IO
}
!macro xram0 {
+bank x, CR_RAM0
}
!macro inc16x .a {
inc .a, x
bne +
inc .a + 1, x
+
}
!macro ldax .a {
lda .a + 1
ldx .a
}
!macro cp16 .s, .t {
ldx .s
lda .s + 1
stx .t
sta .t + 1
}
!macro wait_for_vdc {
- bit vdc
bpl -
}