dos33fsprogs/games/duke/level_end.s
Vince Weaver b1238af49d re-arranged the entire directory structure
this will probably upset people
2021-01-05 15:29:31 -05:00

66 lines
771 B
ArmAsm

; Print bonuses
level_end:
bit KEYRESET ; clear keyboard
bit SET_TEXT
lda #12
sta drawbox_x1
lda #26
sta drawbox_x2
lda #19
sta drawbox_y1
lda #23
sta drawbox_y2
lda #21
sta bonus_text+1
scroll_bonus_loop:
lda #' '|$80
sta clear_all_color+1
jsr clear_all
jsr drawbox
jsr normal_text
lda #<bonus_text
sta OUTL
lda #>bonus_text
sta OUTH
jsr move_and_print_list
jsr page_flip
lda #220
jsr WAIT
lda #220
jsr WAIT
level_end_wait:
lda KEYPRESS
bmi really_end_level
dec drawbox_y1
dec drawbox_y2
dec bonus_text+1
lda drawbox_y1
bmi really_end_level
jmp scroll_bonus_loop
really_end_level:
bit KEYRESET
lda #NEXT_LEVEL
sta LEVEL_OVER
jsr clear_all
rts
bonus_text:
.byte 14,10,"BONUS: NONE",0
.byte 255