2023-03-06 01:54:41 +00:00
|
|
|
; Yet Another HR project
|
|
|
|
|
;
|
|
|
|
|
; by deater (Vince Weaver) <vince@deater.net>
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.include "zp.inc"
|
|
|
|
|
.include "hardware.inc"
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
hires_start:
|
|
|
|
|
|
|
|
|
|
;===================
|
|
|
|
|
; set graphics mode
|
|
|
|
|
;===================
|
|
|
|
|
jsr HOME
|
|
|
|
|
|
|
|
|
|
bit HIRES
|
|
|
|
|
bit FULLGR
|
|
|
|
|
bit SET_GR
|
2023-03-13 19:29:05 +00:00
|
|
|
bit PAGE1
|
2023-03-06 01:54:41 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
;===================
|
|
|
|
|
; Load graphics
|
|
|
|
|
;===================
|
|
|
|
|
load_loop:
|
|
|
|
|
|
|
|
|
|
;=============================
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
;==========================
|
|
|
|
|
; Load Image
|
|
|
|
|
;===========================
|
|
|
|
|
|
|
|
|
|
load_image:
|
|
|
|
|
|
|
|
|
|
; size in ldsizeh:ldsizel (f1/f0)
|
|
|
|
|
|
2023-03-07 05:28:45 +00:00
|
|
|
lda #<comp_data
|
|
|
|
|
sta ZX0_src
|
|
|
|
|
lda #>comp_data
|
|
|
|
|
sta ZX0_src+1
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
lda #$20
|
2023-03-06 01:54:41 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
jsr full_decomp
|
|
|
|
|
|
2023-03-07 05:28:45 +00:00
|
|
|
; rts
|
2023-03-06 01:54:41 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
wait_until_keypress:
|
|
|
|
|
lda KEYPRESS ; 4
|
|
|
|
|
bpl wait_until_keypress ; 3
|
|
|
|
|
bit KEYRESET ; clear the keyboard buffer
|
|
|
|
|
|
|
|
|
|
which_ok:
|
2023-05-26 04:18:33 +00:00
|
|
|
lda #0
|
|
|
|
|
sta WHICH_LOAD
|
|
|
|
|
rts
|
|
|
|
|
|
2023-03-06 01:54:41 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.include "zx02_optim.s"
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
comp_data:
|
2023-06-02 03:25:42 +00:00
|
|
|
.incbin "roof_graphics/strongbad_sample.hgr.zx02"
|
