Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-12-27 02:31:00 +00:00
Code Issues Projects Releases Wiki Activity

peasant: intro more or less done

Browse Source
This commit is contained in:
Vince Weaver 2021-08-11 15:58:10 -04:00
parent 0d1f5cc0e6
commit 9d17167758
1 changed files with 63 additions and 47 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

110
games/peasant/intro.s
View File

@ -37,9 +37,9 @@ hgr_display:
; Y=0, A=0 after this called
; HGR_PAGE=$40
lda #$40
sta DISP_PAGE
lda #$20
sta DISP_PAGE
lda #$40
sta DRAW_PAGE
;************************
@ -105,11 +105,15 @@ done_page:
iny
jmp animation_loop
lda KEYPRESS
bpl animation_loop
; jmp animation_loop
done_loop:
jsr wait_until_keypress
; jsr wait_until_keypress
bit KEYRESET
rts
@ -117,111 +121,123 @@ done_loop:
; jmp forever
animation_low:
.byte <title_anim01_lzsa
.byte <videlectrix_lzsa
; .byte <title_anim01_lzsa
.byte <title_anim02_lzsa
.byte <title_anim03_lzsa
.byte <title_anim04_lzsa
; .byte <title_anim04_lzsa
.byte <title_anim05_lzsa
.byte <title_anim06_lzsa
; .byte <title_anim06_lzsa
.byte <title_anim07_lzsa
.byte <title_anim08_lzsa
; .byte <title_anim08_lzsa
.byte <title_anim09_lzsa
.byte <title_anim10_lzsa
; .byte <title_anim10_lzsa
.byte <title_anim11_lzsa
.byte <title_anim12_lzsa
; .byte <title_anim12_lzsa
.byte <title_anim13_lzsa
.byte <title_anim14_lzsa
; .byte <title_anim14_lzsa
.byte <title_anim15_lzsa
.byte <title_anim16_lzsa
; .byte <title_anim16_lzsa
.byte <title_anim17_lzsa
.byte <title_anim18_lzsa
; .byte <title_anim18_lzsa
.byte <title_anim19_lzsa
.byte <title_anim20_lzsa
; .byte <title_anim20_lzsa
.byte <title_anim21_lzsa
.byte <title_anim22_lzsa
; .byte <title_anim22_lzsa
.byte <title_anim23_lzsa
.byte <title_anim24_lzsa
; .byte <title_anim24_lzsa
.byte <title_anim25_lzsa
.byte <title_anim26_lzsa
; .byte <title_anim26_lzsa
.byte <title_anim27_lzsa
.byte <title_anim28_lzsa
; .byte <title_anim28_lzsa
.byte <title_anim29_lzsa
.byte <title_anim30_lzsa
.byte <title_anim31_lzsa
.byte <title_anim32_lzsa
.byte <title_anim33_lzsa
.byte <title_anim33_lzsa
.byte <title_anim33_lzsa
.byte <title_anim34_lzsa
.byte <title_anim34_lzsa
animation_high:
.byte >title_anim01_lzsa
.byte >videlectrix_lzsa
; .byte >title_anim01_lzsa
.byte >title_anim02_lzsa
.byte >title_anim03_lzsa
.byte >title_anim04_lzsa
; .byte >title_anim04_lzsa
.byte >title_anim05_lzsa
.byte >title_anim06_lzsa
; .byte >title_anim06_lzsa
.byte >title_anim07_lzsa
.byte >title_anim08_lzsa
; .byte >title_anim08_lzsa
.byte >title_anim09_lzsa
.byte >title_anim10_lzsa
; .byte >title_anim10_lzsa
.byte >title_anim11_lzsa
.byte >title_anim12_lzsa
; .byte >title_anim12_lzsa
.byte >title_anim13_lzsa
.byte >title_anim14_lzsa
; .byte >title_anim14_lzsa
.byte >title_anim15_lzsa
.byte >title_anim16_lzsa
; .byte >title_anim16_lzsa
.byte >title_anim17_lzsa
.byte >title_anim18_lzsa
; .byte >title_anim18_lzsa
.byte >title_anim19_lzsa
.byte >title_anim20_lzsa
; .byte >title_anim20_lzsa
.byte >title_anim21_lzsa
.byte >title_anim22_lzsa
; .byte >title_anim22_lzsa
.byte >title_anim23_lzsa
.byte >title_anim24_lzsa
; .byte >title_anim24_lzsa
.byte >title_anim25_lzsa
.byte >title_anim26_lzsa
; .byte >title_anim26_lzsa
.byte >title_anim27_lzsa
.byte >title_anim28_lzsa
; .byte >title_anim28_lzsa
.byte >title_anim29_lzsa
.byte >title_anim30_lzsa
.byte >title_anim31_lzsa
.byte >title_anim32_lzsa
.byte >title_anim33_lzsa
.byte >title_anim33_lzsa
.byte >title_anim33_lzsa
.byte >title_anim34_lzsa
.byte >title_anim34_lzsa
delays:
.byte 1 ; 1
.byte 1 ; title
; .byte 1 ; 1
.byte 1 ; 2
.byte 1 ; 3
.byte 1 ; 4
; .byte 1 ; 4
.byte 1 ; 5
.byte 1 ; 6
; .byte 1 ; 6
.byte 1 ; 7
.byte 1 ; 8
; .byte 1 ; 8
.byte 1 ; 9
.byte 1 ; 10
; .byte 1 ; 10
.byte 1 ; 11
.byte 1 ; 12
; .byte 1 ; 12
.byte 1 ; 13
.byte 1 ; 14
; .byte 1 ; 14
.byte 1 ; 15
.byte 1 ; 16
; .byte 1 ; 16
.byte 1 ; 17
.byte 1 ; 18
; .byte 1 ; 18
.byte 1 ; 19
.byte 1 ; 20
; .byte 1 ; 20
.byte 1 ; 21
.byte 1 ; 22
; .byte 1 ; 22
.byte 1 ; 23
.byte 1 ; 24
; .byte 1 ; 24
.byte 1 ; 25
.byte 1 ; 26
; .byte 1 ; 26
.byte 1 ; 27
.byte 1 ; 28
; .byte 1 ; 28
.byte 1 ; 29
.byte 1 ; 30
.byte 1 ; 31
.byte 1 ; 32
.byte 1 ; 33
.byte 1 ; 33
.byte 1 ; 33
.byte 1 ; 34
.byte 1 ; 34
.byte $FF
@ -231,6 +247,6 @@ delays:
;.include "decompress_overlay.s"
.include "hgr_overlay.s"
.include "wait_keypress.s"
;.include "wait_keypress.s"
.include "graphics_intro/intro_graphics.inc"