132 lines
1.7 KiB
ArmAsm
132 lines
1.7 KiB
ArmAsm
; Zero Wing Into
|
|
;
|
|
; by deater (Vince Weaver) <vince@deater.net>
|
|
|
|
.include "zp.inc"
|
|
.include "hardware.inc"
|
|
|
|
hires_start:
|
|
|
|
;===================
|
|
; set graphics mode
|
|
;===================
|
|
jsr HOME
|
|
|
|
jsr HGR
|
|
|
|
;===================
|
|
; Load graphics
|
|
;===================
|
|
load_loop:
|
|
|
|
;=============================
|
|
; OPERATOR
|
|
;=============================
|
|
|
|
jsr HOME
|
|
|
|
lda #<operator_data
|
|
sta zx_src_l+1
|
|
|
|
lda #>operator_data
|
|
sta zx_src_h+1
|
|
|
|
lda #$20
|
|
|
|
jsr zx02_full_decomp
|
|
|
|
lda #<operator_text
|
|
sta OUTL
|
|
lda #>operator_text
|
|
sta OUTH
|
|
|
|
jsr move_and_print
|
|
jsr move_and_print
|
|
|
|
jsr wait_until_keypress
|
|
|
|
|
|
;=============================
|
|
; CATS
|
|
;=============================
|
|
|
|
jsr HOME
|
|
|
|
lda #<cats_data
|
|
sta zx_src_l+1
|
|
|
|
lda #>cats_data
|
|
sta zx_src_h+1
|
|
|
|
lda #$20
|
|
|
|
jsr zx02_full_decomp
|
|
|
|
lda #<cats_text
|
|
sta OUTL
|
|
lda #>cats_text
|
|
sta OUTH
|
|
|
|
jsr move_and_print
|
|
|
|
jsr wait_until_keypress
|
|
|
|
;=============================
|
|
; CAPTAIN
|
|
;=============================
|
|
|
|
jsr HOME
|
|
|
|
lda #<captain_data
|
|
sta zx_src_l+1
|
|
|
|
lda #>captain_data
|
|
sta zx_src_h+1
|
|
|
|
lda #$20
|
|
|
|
jsr zx02_full_decomp
|
|
|
|
lda #<captain_text
|
|
sta OUTL
|
|
lda #>captain_text
|
|
sta OUTH
|
|
|
|
jsr move_and_print
|
|
|
|
jsr wait_until_keypress
|
|
|
|
|
|
|
|
|
|
|
|
jmp load_loop
|
|
|
|
|
|
|
|
|
|
.align $100
|
|
.include "wait_keypress.s"
|
|
.include "zx02_optim.s"
|
|
.include "text_print.s"
|
|
.include "gr_offsets.s"
|
|
|
|
cats_data:
|
|
.incbin "graphics/cats.hgr.zx02"
|
|
|
|
cats_text:
|
|
.byte 0,21,"CATS: HOW ARE YOU GENTLEMEN !!",0
|
|
|
|
captain_data:
|
|
.incbin "graphics/captain.hgr.zx02"
|
|
|
|
captain_text:
|
|
.byte 0,21,"CAPTAIN: WHAT YOU SAY !!",0
|
|
|
|
operator_data:
|
|
.incbin "graphics/operator.hgr.zx02"
|
|
|
|
operator_text:
|
|
.byte 0,20,"OPERATOR: WE GET SIGNAL.",0
|
|
.byte 1,22,"CAPTAIN: WHAT !",0
|