31 | 31 |
|
32 | 32 |
vector dispatch_game_state
|
33 | 33 |
inputs joy2, pos
|
34 | |
outputs delta, pos, screen, vic_border, vic_bg, screen1
|
|
34 |
outputs delta, pos, screen, screen1
|
35 | 35 |
trashes a, x, y, c, z, n, v, ptr
|
36 | 36 |
|
37 | 37 |
//
|
|
48 | 48 |
|
49 | 49 |
vector cinv
|
50 | 50 |
inputs joy2, pos
|
51 | |
outputs delta, pos, screen, vic_border, vic_bg, screen1
|
|
51 |
outputs delta, pos, screen, screen1
|
52 | 52 |
trashes a, x, y, c, z, n, v, ptr
|
53 | 53 |
@ 788
|
54 | 54 |
|
55 | 55 |
vector save_cinv
|
56 | 56 |
inputs joy2, pos
|
57 | |
outputs delta, pos, screen, vic_border, vic_bg, screen1
|
|
57 |
outputs delta, pos, screen, screen1
|
58 | 58 |
trashes a, x, y, c, z, n, v, ptr
|
59 | 59 |
|
60 | 60 |
|
|
124 | 124 |
|
125 | 125 |
routine game_state_play
|
126 | 126 |
inputs joy2, pos
|
127 | |
outputs delta, pos, screen, vic_border, vic_bg, screen1
|
|
127 |
outputs delta, pos, screen, screen1
|
128 | 128 |
trashes a, x, y, c, z, n, v, ptr
|
129 | 129 |
{
|
130 | 130 |
call read_stick
|
|
144 | 144 |
|
145 | 145 |
routine game_state_title_screen
|
146 | 146 |
inputs joy2, pos
|
147 | |
outputs delta, pos, screen, vic_border, vic_bg, screen1
|
148 | |
trashes a, x, y, c, z, n, v, ptr
|
149 | |
{
|
150 | |
ld a, 5
|
151 | |
st a, vic_border
|
152 | |
ld a, 0
|
153 | |
st a, vic_bg
|
154 | |
ld y, 0
|
155 | |
|
|
147 |
outputs delta, pos, screen, screen1
|
|
148 |
trashes a, x, y, c, z, n, v, ptr
|
|
149 |
{
|
|
150 |
ld y, 0
|
156 | 151 |
repeat {
|
157 | 152 |
ld a, 82
|
158 | 153 |
st a, screen1 + y
|
|
181 | 176 |
|
182 | 177 |
routine our_cinv
|
183 | 178 |
inputs joy2, pos
|
184 | |
outputs delta, pos, screen, vic_border, vic_bg, screen1
|
|
179 |
outputs delta, pos, screen, screen1
|
185 | 180 |
trashes a, x, y, c, z, n, v, ptr
|
186 | 181 |
{
|
187 | 182 |
goto dispatch_game_state
|
|
193 | 188 |
screen1, screen2, screen3, screen4, colormap1, colormap2, colormap3, colormap4
|
194 | 189 |
trashes a, y, n, c, z, vic_border, vic_bg
|
195 | 190 |
{
|
|
191 |
ld a, 5
|
|
192 |
st a, vic_border
|
|
193 |
ld a, 0
|
|
194 |
st a, vic_bg
|
|
195 |
ld y, 0
|
|
196 |
|
196 | 197 |
call clear_screen
|
197 | |
copy game_state_title_screen, dispatch_game_state
|
|
198 |
|
|
199 |
copy game_state_play, dispatch_game_state
|
|
200 |
// copy game_state_title_screen, dispatch_game_state
|
198 | 201 |
|
199 | 202 |
copy word 0, pos
|
200 | 203 |
with interrupts off {
|