dos33fsprogs/games/peasant/ending.s

75 lines
1.0 KiB
ArmAsm
Raw Normal View History

2021-08-11 23:29:47 +00:00
; o/~ Bread is a good time for me o/~
2021-08-12 02:16:15 +00:00
; by Vince `deater` Weaver vince@deater.net
.include "hardware.inc"
.include "zp.inc"
2021-08-11 23:29:47 +00:00
;************************
; Ending
;************************
2021-08-12 02:16:15 +00:00
2021-08-11 23:29:47 +00:00
ending:
2021-08-12 02:16:15 +00:00
jsr hgr_make_tables
jsr HGR2 ; Hi-res graphics, no text at bottom
; Y=0, A=0 after this called
trogdor_question:
2021-08-11 23:29:47 +00:00
lda #<(trogdor_lzsa)
sta getsrc_smc+1
lda #>(trogdor_lzsa)
sta getsrc_smc+2
lda #$40
jsr decompress_lzsa2_fast
jsr wait_until_keypress
2021-08-12 02:16:15 +00:00
game_over:
2021-08-11 23:29:47 +00:00
lda #<(game_over_lzsa)
sta getsrc_smc+1
lda #>(game_over_lzsa)
sta getsrc_smc+2
lda #$40
jsr decompress_lzsa2_fast
lda #<peasant_text
sta OUTL
lda #>peasant_text
sta OUTH
jsr hgr_put_string
2021-08-12 02:16:15 +00:00
jsr hgr_put_string
2021-08-11 23:29:47 +00:00
jsr wait_until_keypress
2021-08-12 02:16:15 +00:00
forever:
jmp forever
.include "decompress_fast_v2.s"
.include "wait_keypress.s"
.include "hgr_font.s"
.include "draw_box.s"
.include "hgr_rectangle.s"
2021-08-11 23:29:47 +00:00
2021-08-12 02:16:15 +00:00
.include "graphics_end/end_graphics.inc"
2021-08-11 23:29:47 +00:00
2021-08-12 02:16:15 +00:00
peasant_text:
.byte 25,2,"Peasant's Quest",0
2021-08-11 23:29:47 +00:00
2021-08-12 02:16:15 +00:00
score_text:
.byte 0,2,"Score: 0 of 150",0