dos33fsprogs/games/ootw/ootw_c5/ootw_c5.s
2021-03-23 16:33:27 -04:00

115 lines
1.8 KiB
ArmAsm

; Ootw for Apple II Lores
; Checkpoint5 (accidentally in a coal mine it was found)
; by Vince "Deater" Weaver <vince@deater.net>
.include "../zp.inc"
.include "../hardware.inc"
ootw_c5:
; Initialize some variables
ootw_c5_restart:
jsr ootw_cave_init
;=========================
; c5_new_cave
;=========================
; enter new cave on level5
c5_new_cave:
lda #0
sta GAME_OVER
jsr ootw_cave
c5_check_done:
lda GAME_OVER
cmp #$ff
beq quit_level
lda WHICH_JAIL
cmp #$ff
bne c5_new_cave
; point to next level
; and exit to the level loader
lda #6
sta WHICH_LOAD
rts
;===========================
; quit_level
;===========================
quit_level:
jsr TEXT
jsr HOME
lda KEYRESET ; clear strobe
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
lda #0
sta GAME_OVER
jmp ootw_c5_restart
end_message:
.byte 8,10,"PRESS RETURN TO CONTINUE",0
.byte 11,20,"ACCESS CODE: CAVE",0
.include "ootw_c5_cave.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_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_hlin.s"
.include "../keyboard.s"
.include "../physicist.s"
.include "../alien.s"
.include "../dummy_friend.s"
.include "../gun.s"
.include "../laser.s"
.include "../alien_laser.s"
.include "../blast.s"
.include "../shield.s"
.include "../door.s"
.include "../collision.s"
; room backgrounds
.include "graphics/l5_cave/ootw_c5_cave.inc"
; sprites
.include "../sprites/physicist.inc"
.include "../sprites/alien.inc"