blob: beda2b827fe271e915d69f885c32883e45729504 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
.segment "HEADER"
.byte 'N', 'E', 'S', $1A
.byte $02
.byte $01
.byte $12 ; let's fake working RAM
.byte $00
.segment "CODE"
zp_good = $00
zp_bad = $0300
m_good = $0200
m_bad = $02
wr_bad = $01
wr_good = $6001
wr_out = $0400
;; Just so we don't get "unused" warnings
lda zp_bad
lda zp_good
lda m_bad
lda m_good
lda wr_bad
lda wr_good
lda wr_out
.macro INC_MOVEMENT_X ADDR
.ifdef PAL
lda ADDR, x
clc
adc Enemies::zp_movement_arg
sta ADDR, x
.else
inc ADDR, x
.endif
.endmacro
INC_MOVEMENT_X zp_good + 1
|
