mist: stoneship: add the half-page in the drawer

mist/TODO

@@ -53,10 +53,9 @@ Stoneship age:
 + Implement floating chest puzzle
 + Implement compass rose light puzzle
 + Implement raising/lowering water
-+ Implement spinning generator/battery level
 + Implement telescope
-+ Hook up the blue room
-+ Animate mist book rising from table
++ Implement the half-letter
++ Hook up tunnels into compass room properly
 
 Ending:
 + Turning

mist/books/left_page.book

@@ -0,0 +1,25 @@
+#0         1         2        3
+#12345678901234567890123457890123456789
+
+
+
+
+|||||||||||||||||||||
+                    |
+         MARKER SWIT|
+                   |
+               ISL|
+                   |
+   THE VAULT IS LOC|
+     THE ISLAND OF M|
+       ACHIEVED VERY |
+  INSTRUCTIONS ARE |
+ EACH OF THE MARKER|
+  TURN EVERY ONE OF T|
+ "ON" POSITION.  TH|
+ AS A FINAL STEP, TU|
+         THERE TO TH|
+                    |
+|||||||||||||||||||||
+                    |
+                    |

mist/graphics_stoney/Makefile

@@ -48,7 +48,9 @@ stoney_graphics.inc:	\
 	compass_rose_w.lzsa \
 	crawlway_e.lzsa crawlway_w.lzsa \
 	blue_room_n.lzsa blue_room_s.lzsa blue_room_e.lzsa blue_room_w.lzsa \
-	map_case_open_e.lzsa map_case_closed_e.lzsa
+	map_case_open_e.lzsa map_case_closed_e.lzsa \
+	right_airlock_open_n.lzsa \
+	left_letter.lzsa
 	echo "ship_entry_n_lzsa: .incbin \"ship_entry_n.lzsa\"" > stoney_graphics.inc
 	echo "ship_entry_s_lzsa: .incbin \"ship_entry_s.lzsa\"" >> stoney_graphics.inc
 	echo "ship_bow_s_lzsa: .incbin \"ship_bow_s.lzsa\"" >> stoney_graphics.inc
@@ -136,6 +138,10 @@ stoney_graphics.inc:	\
 	echo "blue_room_w_lzsa: .incbin \"blue_room_w.lzsa\"" >> stoney_graphics.inc
 	echo "map_case_open_e_lzsa: .incbin \"map_case_open_e.lzsa\"" >> stoney_graphics.inc
 	echo "map_case_closed_e_lzsa: .incbin \"map_case_closed_e.lzsa\"" >> stoney_graphics.inc
+	echo "right_airlock_open_n_lzsa: .incbin \"right_airlock_open_n.lzsa\"" >> stoney_graphics.inc
+	echo "left_letter_lzsa: .incbin \"left_letter.lzsa\"" >> stoney_graphics.inc
+
+
 
 
 

mist/keyboard.s

@@ -176,6 +176,8 @@ done_split:
 	; change location
 	;=============================
 change_location:
+	; reset graphics
+	bit	SET_GR
 
 	; reset pointer to not visible, centered
 	lda	#0

mist/leveldata_stoney.inc

@@ -837,7 +837,7 @@ location46:
 	.byte	DIRECTION_S	; south exit_dir
 	.byte	$ff		; east exit_dir
 	.byte	$ff		; west exit_dir
-	.word	left_airlock_open_n_lzsa	; north bg
+	.word	right_airlock_open_n_lzsa	; north bg
 	.word	left_airlock_s_lzsa		; south bg
 	.word	$0000				; east bg
 	.word	$0000				; west bg
@@ -861,7 +861,7 @@ location47:
 	.byte	BG_NORTH|BG_SOUTH|BG_EAST|BG_WEST
 	.byte   DIRECTION_W
         .byte   17,24		; special x
-        .byte   32,42		; special y
+        .byte   34,44		; special y
         .word   stoney_take_blue_page-1 ; special function
 
 ; STONEY_BLUE_MAPCASE	-- blue room mapcase
@@ -898,7 +898,7 @@ location49:
 	.byte	BG_EAST
 	.byte   DIRECTION_E
         .byte   14,21		; special x
-        .byte   36,46		; special y
+        .byte   32,42		; special y
         .word   stoney_half_message-1 ; special function
 
 ; STONEY_BLUE_HALFMESSAGE	-- blue room halfmessag
@@ -913,7 +913,7 @@ location50:
 	.byte	$ff		; west exit_dir
 	.word	$0000			; north bg
 	.word	$0000			; south bg
-	.word	map_case_open_e_lzsa	; east bg
+	.word	left_letter_lzsa	; east bg
 	.word	$0000			; west bg
 	.byte	BG_EAST
 	.byte	$ff

mist/stoney.s

@@ -268,8 +268,11 @@ stoney_half_message:
 	lda	#STONEY_BLUE_HALFMESSAGE
 	sta	LOCATION
 
-	jmp	change_location
+	jsr	change_location
 
+	bit	SET_TEXT		; set text mode
+
+	rts
 
 	;======================
 	; handle umbrella pump buttons