49 lines
964 B
ArmAsm
Raw Normal View History

.include "../zp.inc"
which_disk_bcd:
.byte $01 ; BCD
which_disk_bin:
.byte 1
load_address_array:
2024-07-01 12:02:52 -04:00
.byte $40,$40,$40,$40 ; TITLE, ARRIVAL, ARRIVAL2, TELESCOPE
.byte $00,$00,$00,$00
track_array:
2024-07-17 13:59:02 -04:00
.byte 0, 2, 9,16 ; TITLE, ARRIVAL, ARRIVAL2, TELESCOPE
.byte 0,0,0,0
sector_array:
.byte 8, 0, 0, 0 ; TITLE, ARRIVAL, ARRIVAL2, TELESCOPE
.byte 0,0,0,0
length_array:
2024-07-17 13:59:02 -04:00
.byte 8, 112,112, 112 ; TITLE, ARRIVAL, ARRIVAL2, TELESCOPE
.byte 0,0,0,0
disk_exit_disk: ; note: not BCD anymore
.byte 39 ; zap to temple for now
.byte 0,0,0
disk_exit_disk_bcd:
2024-06-25 01:33:10 -04:00
.byte $39 ; zap to temple for now
.byte 0,0,0
disk_exit_dni_h:
2024-06-25 01:33:10 -04:00
.byte $01 ; 39 = 1*25 + 2*5 + 4
.byte 0,0,0
disk_exit_dni_l:
2024-06-25 01:33:10 -04:00
.byte $24
.byte 0,0,0
; want to go to disk39, LOAD_PROJECTOR, RIVEN_PROJECTOR, W
disk_exit_load:
2024-06-25 01:33:10 -04:00
.byte 2 ; LOAD_PROJECTOR
.byte 0,0,0
disk_exit_level:
2024-06-25 01:33:10 -04:00
.byte 0 ; RIVEN_PROJECTOR
.byte 0,0,0
disk_exit_direction:
2024-06-25 01:33:10 -04:00
.byte DIRECTION_W
.byte 0,0,0