99 lines
1.6 KiB
ArmAsm
99 lines
1.6 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 "../decompress_fast_v2.s"
|
|
.include "../gr_fast_clear.s"
|
|
.include "../gr_copy.s"
|
|
.include "../gr_putsprite.s"
|
|
.include "../gr_putsprite_crop.s"
|
|
.include "../gr_offsets.s"
|
|
.include "../gr_offsets_hl.s"
|
|
.include "../keyboard.s"
|
|
|
|
; room backgrounds
|
|
.include "graphics/l3_vent/ootw_c3_vent.inc"
|
|
; sprites
|
|
.include "../sprites/physicist_rolling.inc"
|
|
|