dos33fsprogs/ootw/ootw_c3.s
2019-08-17 18:12:04 -04:00

104 lines
1.7 KiB
ArmAsm

; Ootw for Apple II Lores -- Checkpoint3 -- The Ventilation System
; by Vince "Deater" Weaver <vince@deater.net>
.include "zp.inc"
.include "hardware.inc"
ootw_c3:
; Initialize some variables
lda #0
sta GAME_OVER
sta PHYSICIST_STATE
lda #22
sta PHYSICIST_Y
lda #20
sta PHYSICIST_X
lda #1
sta DIRECTION
;=======================
; Run the intro
;=======================
;=======================
; Enter the game
;=======================
jsr ootw_vent
;====================
; go to next level
; if appropriate
l3_defeated:
lda GAME_OVER
cmp #4
bne quit_level
lda #4
sta WHICH_LOAD
rts
;===========================
; quit_level
;===========================
quit_level:
jsr TEXT
jsr HOME
lda KEYRESET ; clear strobe
bit PAGE0
lda #0
sta DRAW_PAGE
lda #<end_message
sta OUTL
lda #>end_message
sta OUTH
jsr move_and_print
jsr move_and_print
wait_loop:
lda KEYPRESS
bpl wait_loop
lda KEYRESET ; clear strobe
jmp ootw_c3
end_message:
.byte 8,10,"PRESS RETURN TO CONTINUE",0
.byte 11,20,"ACCESS CODE: VENT",0
.include "ootw_c3_vent.s"
.include "text_print.s"
.include "gr_pageflip.s"
.include "gr_unrle.s"
.include "gr_fast_clear.s"
.include "gr_copy.s"
;.include "gr_copy_offset.s"
.include "gr_putsprite.s"
;.include "gr_putsprite_flipped.s"
.include "gr_putsprite_crop.s"
.include "gr_offsets.s"
.include "gr_offsets_hl.s"
;.include "gr_run_sequence.s"
;.include "gr_overlay.s"
;.include "random16.s"
.include "keyboard.s"
; room backgrounds
.include "ootw_graphics/l3vent/ootw_c3_vent.inc"
; sprites
.include "ootw_graphics/sprites/physicist_rolling.inc"