2 # --register-prefix-optional --bitwise-or
4 .macro ldarg arg, stacksz, reg
5 move.l (4 + \arg * 4 + \stacksz)(%sp), \reg
9 .global read_joy_responses /* u8 *rbuf */
59 0: /* wait for special code */
70 0: /* wait for special code to end */
75 move.l #8000000/50/18, d2
77 0: /* wait enough for teensy to setup it's stuff */
86 * when communicating with 3.3V teensy:
87 * - no nops: see old value on multiple pins randomly
88 * - 1 nop: only TR often shows old value
96 .global test_joy_read_log /* u8 *dest, int size, int do_sync */
102 movea.l #0xa10003, a0
129 /* broken on Mega-ED v9?? */
143 /* delay for teensy, 128 not enough.. */
155 .global test_joy_read_log_vsync /* u8 *dest, int size */
156 test_joy_read_log_vsync:
159 movem.l d2-d7/a2, -(sp)
160 movea.l #0xa10003, a0
161 movea.l #0xc00005, a2
179 /* wait for next vsync */
191 movem.l (sp)+, d2-d7/a2
195 .global test_byte_write /* u8 *dest, int size, int seed */
237 .global run_game /* u16 mapper, int tas_sync */
242 movea.l #0xa10000, a6
243 movea.l #0xc00000, a5
244 movea.l #0xc00005, a4
245 movea.l #0xc00004, a3
247 move.b #0x40, d1 /* d2 is tmp */
249 move.b d1, (0x09,a6) /* CtrlA */
250 move.b d0, (0x0b,a6) /* CtrlB */
251 move.b d0, (0x0d,a6) /* CtrlC */
252 move.b d0, (0x13,a6) /* S-CtrlA */
253 move.b d3, (0x0f,a6) /* TxDataA */
254 move.b d0, (0x19,a6) /* S-CtrlB */
255 move.b d3, (0x15,a6) /* TxDataB */
256 move.b d0, (0x1f,a6) /* S-CtrlC */
257 move.b d3, (0x1b,a6) /* TxDataC */
259 /* set up for vram write */
260 move.l #0x40000000, (a3)
263 move.l #0x10000/4/4-1, d2
271 lea (run_game_r,pc), a0
273 move.l #(run_game_r_end - run_game_r)/2-1, d2
281 movea.l #0xa10003, a0
283 bsr sync_with_teensy /* trashes d3 */
287 /* wait for active display */
290 btst d2, (a4) /* 8 */
296 /* flood the VDP FIFO */
302 movea.l #0xA13000, a1
304 move.b d0, (0x09,a6) /* CtrlA */
310 move.w #0x3210, (0x06,a1) /* 0xA13006 */
311 move.w d7, (0x10,a1) /* 0xA13010 */
312 move.w d0, (a1) /* 0xA13000 */
320 # vim:filetype=asmM68k:ts=4:sw=4:expandtab