| Prev: 600A | Up: Map | Next: 6068 |
6039: Scan Sinclair joystick
|
Reads half-row $EF (keys 6-0) via port $FE. Maps Sinclair Interface 2 joystick 1 to game actions.
|
||||
| scan_sinclair | 6039 | LD A,$EF | Scan "0" (FIRE) | |
| 603B | IN A,($FE) | |||
| 603D | LD ($5EF1),A | |||
| 6040 | BIT 0,A | |||
| 6042 | CALL Z,handle_fire | |||
| 6045 | LD A,($5EF1) | Scan "9" (UP) | ||
| 6048 | BIT 1,A | |||
| 604A | CALL Z,handle_up | |||
| 604D | LD A,($5EF1) | Scan "8" (DOWN) | ||
| 6050 | BIT 2,A | |||
| 6052 | CALL Z,handle_down | |||
| 6055 | LD A,($5EF1) | Scan "7" (RIGHT) | ||
| 6058 | BIT 3,A | |||
| 605A | CALL Z,handle_right | |||
| 605D | LD A,($5EF1) | Scan "6" (LEFT) | ||
| 6060 | BIT 4,A | |||
| 6062 | CALL Z,handle_left | |||
| 6065 | JP main_loop | |||
| Prev: 600A | Up: Map | Next: 6068 |