mist_hgr: calling the proof-of-concept good for now

This commit is contained in:
Vince Weaver 2021-07-14 20:59:48 -04:00
parent 1d2022e616
commit c634f10f9c
12 changed files with 213 additions and 39 deletions

View File

@ -18,7 +18,9 @@ title_graphics.inc: \
starfield.lzsa \
falling_left_top.lzsa falling_left_center.lzsa falling_left_bottom.lzsa \
falling_right_top.lzsa falling_right_bottom.lzsa \
erase_left_bottom.lzsa erase_right_bottom.lzsa
erase_left_bottom.lzsa erase_right_bottom.lzsa \
book_ground_stars.lzsa book_air.lzsa book_air2.lzsa book_air3.lzsa \
book_sparks.lzsa book_glow.lzsa book_ground.lzsa
echo "cyan1_lzsa: .incbin \"cyan1.lzsa\"" > title_graphics.inc
echo "cyan2_lzsa: .incbin \"cyan2.lzsa\"" >> title_graphics.inc
echo "m_link_book_lzsa: .incbin \"m_link_book.lzsa\"" >> title_graphics.inc
@ -32,10 +34,12 @@ title_graphics.inc: \
echo "fissure2_lzsa: .incbin \"fissure2.lzsa\"" >> title_graphics.inc
echo "fissure_book_small_lzsa: .incbin \"fissure_book_small.lzsa\"" >> title_graphics.inc
echo "fissure_book_big_lzsa: .incbin \"fissure_book_big.lzsa\"" >> title_graphics.inc
echo "book_air_lzsa: .incbin \"fissure_stars.lzsa\"" >> title_graphics.inc
echo "book_sparks_lzsa: .incbin \"fissure_stars.lzsa\"" >> title_graphics.inc
echo "book_glow_lzsa: .incbin \"fissure_stars.lzsa\"" >> title_graphics.inc
echo "book_ground_lzsa: .incbin \"fissure_stars.lzsa\"" >> title_graphics.inc
echo "book_air_lzsa: .incbin \"book_air.lzsa\"" >> title_graphics.inc
echo "book_air2_lzsa: .incbin \"book_air2.lzsa\"" >> title_graphics.inc
echo "book_air3_lzsa: .incbin \"book_air3.lzsa\"" >> title_graphics.inc
echo "book_sparks_lzsa: .incbin \"book_sparks.lzsa\"" >> title_graphics.inc
echo "book_glow_lzsa: .incbin \"book_glow.lzsa\"" >> title_graphics.inc
echo "book_ground_lzsa: .incbin \"book_ground.lzsa\"" >> title_graphics.inc
echo "book_ground_n_lzsa: .incbin \"book_ground_n.lzsa\"" >> title_graphics.inc
echo "book_closed_n_lzsa: .incbin \"book_closed_n.lzsa\"" >> title_graphics.inc
echo "starfield_lzsa: .incbin \"starfield.lzsa\"" >> title_graphics.inc
@ -46,6 +50,7 @@ title_graphics.inc: \
echo "falling_right_top_lzsa: .incbin \"falling_right_top.lzsa\"" >> title_graphics.inc
echo "falling_right_bottom_lzsa: .incbin \"falling_right_bottom.lzsa\"" >> title_graphics.inc
echo "erase_right_bottom_lzsa: .incbin \"erase_right_bottom.lzsa\"" >> title_graphics.inc
echo "book_ground_stars_lzsa: .incbin \"book_ground_stars.lzsa\"" >> title_graphics.inc
####

View File

@ -0,0 +1,6 @@
; MYST Book falling, up in air
; book
HTRI 5 131 39 39 48 145
HTRI 5 159 49 39 48 145
LINE 5 140 59 157 60
END

View File

@ -0,0 +1,6 @@
; MYST Book falling, up in air, step 2
RECT 4 4 126 35 162 66 ; erase old
HTRI 5 130 66 67 78 144 ; cover
HTRI 5 158 77 67 78 144 ; cover
LINE 5 141 89 158 88 ; base line
END

View File

@ -0,0 +1,15 @@
; MYST Book almost on the ground
; book
RECT 4 4 122 63 164 94 ; erase old
DRECT 0xa3 0xae 128 102 156 119 ; cover
HTRI 4 144 102 102 112 157 ; make isometric tr
HTRI 4 144 102 102 104 128 ; tl
VTRI 4 128 105 129 142 119 ; bottom left
HTRI 4 144 119 115 119 157 ; bottom right
LINE 7 124 105 138 121 ; spine
LINE 7 137 130 141 130
LINETO 158 124
;LINE 7 136 123 137 130 ; spine
;LINE 7 136 133 122 117
;LINETO 124 108
END

View File

@ -0,0 +1,12 @@
; MYST Book on ground glowing
FCIRC 7 135 135 18
FCIRC 7 147 135 18
; book
DRECT 0xa3 0xae 132 119 154 135 ; cover
VTRI 4 155 135 151 156 119 ; make isometric
RECT 4 7 132 137 154 143 ; pages
VTRI 4 132 118 132 136 137 ; left edge
VTRI 4 131 137 127 132 138 ; upper spine
VTRI 4 154 131 148 155 136 ; lower triangle
LINE 4 135 136 155 136 ; cover edge
END

View File

@ -0,0 +1,19 @@
; MYST Book on the Floor
; erase all
RECT 4 4 93 106 199 172
; book
DRECT 0xa3 0xae 132 119 154 135 ; cover
VTRI 4 155 135 151 156 119 ; make isometric
RECT 4 7 132 137 154 143 ; pages
VTRI 4 132 118 132 136 137 ; left edge
VTRI 4 131 137 127 132 138 ; upper spine
VTRI 4 154 131 148 155 136 ; lower triangle
LINE 4 135 136 155 136 ; cover edge
; erase glow
;VTRI 4 121 119 103 135 156 ; erase left
;HTRI 4 110 156 139 156 166 ; erase right
;RECT 4 4 158 125 165 143 ; erase top
; hilight
LINE 7 127 123 129 145
LINE 7 129 145 154 144
END

View File

@ -25,7 +25,7 @@ DRECT 0xa3 0xae 132 119 154 135 ; cover
VTRI 4 155 135 151 156 119 ; make isometric
RECT 4 7 132 137 154 143 ; pages
VTRI 4 132 118 132 136 137 ; left edge
VTRI 4 131 137 127 132 18 ; upper spine
VTRI 4 131 137 127 132 138 ; upper spine
VTRI 4 154 131 148 155 136 ; lower triangle
LINE 4 135 136 155 136 ; cover edge
; hilight

View File

@ -0,0 +1,23 @@
; MYST Book on the Floor
CLS 0x80
; stars
POINT 7 16 12
POINT 7 23 37
POINT 7 7 63
POINT 7 55 34
POINT 7 71 51
POINT 7 87 13
POINT 7 114 27
POINT 7 117 44
POINT 7 164 21
POINT 7 170 32
POINT 7 213 3
POINT 7 228 2
POINT 7 210 13
POINT 7 220 31
POINT 7 240 31
POINT 7 258 43
POINT 7 256 48
POINT 7 266 61
POINT 7 279 59
END

View File

@ -0,0 +1,44 @@
; MYST Book on ground sparking
RECT 4 4 120 99 163 134 ; erase old
DRECT 0xa3 0xae 128 117 156 134 ; cover
HTRI 4 144 117 117 127 157 ; make isometric tr
HTRI 4 144 117 117 121 128 ; tl
VTRI 4 128 120 129 142 134 ; bottom left
HTRI 4 144 134 130 134 157 ; bottom right
LINE 7 124 120 138 136 ; spine
LINE 7 137 145 141 145
LINETO 158 139
; delay
RECT 4 4 0 160 129 191
; sparks left
LINE 6 131 140 135 144
LINE 6 130 140 126 144
LINE 6 134 145 132 148
; sparks right
LINE 6 153 144 155 147
; 2nd level
LINE 6 124 126 120 124
LINE 6 125 129 119 129
LINE 6 129 133 122 134
LINETO 118 133
LINE 6 124 136 114 137
LINE 6 128 143 120 143
LINETO 118 150
LINE 6 127 143 127 155
LINE 6 133 143 132 149
LINETO 127 151
LINE 6 133 149 143 158
LINE 6 137 154 135 157
LINE 6 139 145 139 151
LINE 6 144 146 151 153
LINE 6 149 142 149 151
LINE 6 152 143 159 151
LINETO 158 157
LINE 6 158 152 162 153
LINE 6 155 146 165 150
LINE 6 155 146 163 145
LINE 6 153 140 161 142
LINE 6 158 138 168 139
LINE 6 158 130 163 131
LINE 6 159 128 163 126
END

View File

@ -1,3 +1,3 @@
; ERASE left, bottom
RECT 4 4 71 122 109 169 ; erase old
RECT 4 4 179 102 222 127 ; erase old
END

View File

@ -1,16 +1,20 @@
; Falling left, bottom
RECT 4 4 74 63 107 102 ; erase old
DRECT 0xa3 0xae 72 124 107 168 ; cover
VTRI 4 72 137 72 84 124 ; upper left
VTRI 4 72 132 72 95 168 ; bottom left
VTRI 7 108 158 84 108 124 ; pages
VTRI 4 108 153 89 108 168 ; bottom right
VTRI 4 108 152 91 108 124 ; upper right
LINE 7 73 138 84 125 ; outline
LINETO 104 154
LINETO 91 167
LINETO 73 138
LINE 7 106 154 108 150 ; pages
LINETO 90 124
LINETO 85 126
; Falling right, bottom
RECT 4 4 176 41 224 80 ; erase old
LINE 5 182 111 203 104 ; spine
LINETO 203 113
LINETO 180 121
LINETO 182 111
LINE 5 183 119 183 110 ; spine decoration
RECT 5 5 190 109 191 115 ; spine decoration
HTRI 5 195 115 106 111 199
HTRI 5 199 106 108 112 195 ; spine decor
LINE 7 187 120 200 123 ; shiny cover
LINETO 218 118
LINETO 206 114
LINETO 187 120
LINE 5 218 109 204 104 ; pages edge
LINETO 204 113
LINETO 218 117
LINE 7 206 106 217 112 ; pages
LINE 7 206 110 216 114
END

View File

@ -359,14 +359,18 @@ reload_everything:
; "FLEETING GLIMPSE.",0
jsr clear_bottom
ldx #<fissure_book_small_lzsa
ldy #>fissure_book_small_lzsa
lda #1
jsr draw_and_wait
jsr move_and_print
jsr move_and_print
jsr move_and_print
ldx #<fissure_book_small_lzsa
ldy #>fissure_book_small_lzsa
lda #25
jsr draw_and_wait
lda #24
jsr wait_a_bit
ldx #<fissure_book_big_lzsa
ldy #>fissure_book_big_lzsa
@ -384,12 +388,14 @@ reload_everything:
; "HAVE LANDED, BUT I MUST ADMIT,"
; "HOWEVER-- SUCH CONJECTURE IS FUTILE."
jsr clear_bottom
ldx #<starfield_lzsa
ldy #>starfield_lzsa
lda #1
jsr draw_and_wait
jsr clear_bottom
jsr move_and_print
jsr move_and_print
jsr move_and_print
@ -421,12 +427,13 @@ reload_everything:
; "MIGHT SOMEDAY HOLD MY MYST BOOK ARE"
; "UNSETTLING TO ME."
jsr clear_bottom
ldx #<starfield_lzsa
ldy #>starfield_lzsa
lda #1
jsr draw_and_wait
jsr clear_bottom
jsr move_and_print
jsr move_and_print
jsr move_and_print
@ -454,16 +461,20 @@ reload_everything:
; "REALIZING THAT PERHAPS,"
jsr clear_bottom
jsr move_and_print
jsr move_and_print
jsr move_and_print
ldx #<falling_left_top_lzsa
ldy #>falling_left_top_lzsa
lda #15
lda #1
jsr draw_and_wait
jsr move_and_print
jsr move_and_print
jsr move_and_print
lda #14
jsr wait_a_bit
ldx #<falling_left_center_lzsa
ldy #>falling_left_center_lzsa
lda #15
@ -483,20 +494,41 @@ reload_everything:
; BOOK_AIR : The ending...
;===================================
ldx #<book_ground_stars_lzsa
ldy #>book_ground_stars_lzsa
lda #1
jsr draw_and_wait
; the ending
jsr clear_bottom
jsr move_and_print
ldx #<book_air_lzsa
ldy #>book_air_lzsa
lda #15
lda #10
jsr draw_and_wait
; has not yet
jsr move_and_print
ldx #<book_air2_lzsa
ldy #>book_air2_lzsa
lda #10
jsr draw_and_wait
; been written
jsr move_and_print
ldx #<book_air3_lzsa
ldy #>book_air3_lzsa
lda #10
jsr draw_and_wait
;===================================
; BOOK_SPARKS : has not yet...
;===================================
jsr move_and_print
ldx #<book_sparks_lzsa
ldy #>book_sparks_lzsa
lda #15
@ -506,8 +538,6 @@ reload_everything:
; BOOK_GLOW : been written...
;===================================
jsr move_and_print
ldx #<book_glow_lzsa
ldy #>book_glow_lzsa
lda #15
@ -519,9 +549,18 @@ reload_everything:
ldx #<book_ground_lzsa
ldy #>book_ground_lzsa
lda #50
lda #15
jsr draw_and_wait
; jmp done_intro
skip_intro:
; ldx #<book_ground_n_lzsa
; ldy #>book_ground_n_lzsa
; lda #1
; jsr draw_and_wait
done_intro:
@ -540,6 +579,7 @@ done_intro:
lda #0
sta LEVEL_OVER
;============================
; init vars
@ -750,7 +790,7 @@ draw_and_wait:
pla
pla ; get return value off stack
jmp done_intro
jmp skip_intro
no_escape: