mist: make atrus viewer message closer to actual game

less sarcastic, but maybe less of a spoiler now
someone on twitter suggested this

mist/Makefile

@@ -65,8 +65,8 @@ mist.dsk:	QBOOT TEXT_TITLE QLOAD \
 	$(DOS33_RAW) mist.dsk 26  0 DENTIST    0  31
 	$(DOS33_RAW) mist.dsk 28  0 D\'NI      0  27
 	$(DOS33_RAW) mist.dsk 30  0 SHIP       0  20
-	$(DOS33_RAW) mist.dsk 31  8 VIEWER     0  19
+	$(DOS33_RAW) mist.dsk 31  8 VIEWER     0  20
-	$(DOS33_RAW) mist.dsk 32 12 GENERATOR 0  33
+	$(DOS33_RAW) mist.dsk 32 13 GENERATOR  0  33
 
 
 mist_side2.dsk:	WBOOT2 CHANNEL ARBOR NIBEL CABIN

mist/README

@@ -56,7 +56,7 @@ New disk1:
 		MIST_TITLE	21008	-> 21248 ->  83		6	5T3S
 		MIST		40653	-> 40704 -> 159		10	9T13S
 		OCTAGON		32610	-> 32768 -> 128		8	8T0S
-		VIEWER		 4834   ->  4864 ->  19		2	1T3S
+		VIEWER		 5036   ->  5120 ->  20		2	1T4S
 		DENTIST		 7879   ->  7936 ->  31		2	2T0S
 		D'NI		 6863   ->  6912 ->  27		2	1T11S
 		SAVE0		   88   ->   256 ->   1		1
@@ -96,8 +96,8 @@ NEW:
 	DENTIST		 7879	31	26_0		27_15	 31
 	D'NI		 6863	27	28_0		29_10	 27
 	SHIP		 5047   20	30_0		31_4	 20
-	VIEWER		 4834   19	31_8		32_11	 19
+	VIEWER		 5036   20	31_8		32_12	 20
-	GENERATOR	 8434	33	32_12		34_13	 33
+	GENERATOR	 8434	33	32_13		34_14	 33
 
 	disk2:
 

mist/TODO

@@ -1,3 +1,9 @@
+mockingboard on IIc?
+Need to set the values in detect so it's detected
+with that though it instantly blazes through the song, as if sei isn't
+working.  unclear why
+
+
 For release 1.0
 
 + QLOAD

mist/qload.s

@@ -207,14 +207,14 @@ sector_array:
         .byte  0, 0, 0, 0	; MIST_TITLE,MIST,MECHE,SELENA
 	.byte  0, 8, 0, 0	; OCTAGON,VIEWER,STONEY,CHANNEL
 	.byte  0, 0, 0, 0	; CABIN,DENTIST,ARBOR,NIBEL
-	.byte  0,12, 0, 1	; SHIP,GENERATOR,D'NI,SUB
+	.byte  0,13, 0, 1	; SHIP,GENERATOR,D'NI,SUB
 	.byte  6		; TEXT_TITLE
 	.byte 11,12,13,14,15	; SAVE1,SAVE2,SAVE3,SAVE4,SAVE5
 	.byte  0		; FIRST_SECTOR
 
 length_array:
         .byte  83,159,157,145	; MIST_TITLE,MIST,MECHE,SELENA
-	.byte 128, 19,158,135	; OCTAGON,VIEWER,STONEY,CHANNEL
+	.byte 128, 20,158,135	; OCTAGON,VIEWER,STONEY,CHANNEL
 	.byte  61, 31,159,109	; CABIN,DENTIST,ARBOR,NIBEL
 	.byte  20, 33, 27, 78	; SHIP,GENERATOR,D'NI,SUB
 	.byte   3		; TEXT_TITLE

mist/viewer_controls.s

@@ -163,36 +163,65 @@ done_marker:
 
 really_display_atrus:
 
-	bit	TEXTGR
+	; Y coming in is animate frame << 2
 
-	lda	atrus_animation,Y
+	bit	TEXTGR				; split screen
+
+	; less than 6, as typical
+	; otherwise special
+
+	cpy	#6
+	bcc	atrus_load_anim	; blt
+
+	tya			; xxxx xx00 / xxxx xx10
+	and	#$03
+	clc
+	adc	#$6
+	tay
+
+atrus_load_anim:
+
+	lda	atrus_animation,Y		; load animation
 	sta	INL
 	lda	atrus_animation+1,Y
 	sta	INH
 
-	lda	#12
+	lda	#12				; x, y pos
 	sta	XPOS
 	lda	#20
 	sta	YPOS
 
-	jsr	put_sprite_crop
+	jsr	put_sprite_crop			; put sprite
 
-	lda	FRAMEL
+	lda	FRAMEL				; only slowly increment
 	and	#$1f
 	bne	done_atrus
 
-	inc	ANIMATE_FRAME
+	inc	ANIMATE_FRAME			; animate, but loop
-	lda	ANIMATE_FRAME
+	lda	ANIMATE_FRAME			; the talking part
-	cmp	#5
+	cmp	#255
 	bne	done_atrus
+				; so we want 0,1,2,3,4,3,4,3,4
 
 	lda	#3
 	sta	ANIMATE_FRAME
 
 done_atrus:
-	lda	#<atrus_message
+	lda	ANIMATE_FRAME
+	and	#$10			; cycle every 32 animation steps
+	beq	do_atrus_message_1
+
+	lda	#<atrus_message2
 	sta	OUTL
-	lda	#>atrus_message
+	lda	#>atrus_message2
+	jmp	do_atrus_message
+
+do_atrus_message_1:
+	lda	#<atrus_message1
+	sta	OUTL
+	lda	#>atrus_message1
+
+do_atrus_message:
 	sta	OUTH
 
 	jsr	move_and_print
@@ -210,6 +239,9 @@ enter_viewer:
 
 	bit	FULLGR
 
+	lda	#0
+	sta	CURSOR_VISIBLE
+
 	lda	ANIMATE_FRAME
 	beq	start_animation
 
@@ -457,12 +489,27 @@ mountain_frame3:
 	.byte $AA,$55,$75,$00,$00,$00,$00,$07,$f5,$f5,$ff,$ff,$70
 	.byte $FA,$ff,$07,$00,$00,$00,$00,$00,$ff,$ff,$ff,$75,$77
 
-atrus_message:
+
-;      0123456789012345678901234567890123456789
+atrus_message1:
-.byte 0,20,"CATHERINE, SOMETHING IS UP WITH OUR SONS",0
+;           0123456789012345678901234567890123456789
-.byte 0,21,"THEY'VE BEEN MESSING WITH THE AGES.     ",0
+.byte 0,20,"     CATHERINE, I MUST LEAVE QUICKLY.   ",0
-.byte 0,22,"I'VE HIDDEN THE REMAINING LINKING BOOKS.",0
+.byte 0,21,"       MY BOOKS HAVE BEEN DESTROYED.    ",0
-.byte 0,23,"** HINT: REMEMBER THE TOWER ROTATION  **",0
+.byte 0,22,"IT'S ONE OF OUR SONS.  I SUSPECT ACHENAR",0
+.byte 0,23,"  BUT I SHOULDN'T LEAP TO CONCLUSIONS.  ",0
+
+atrus_message2:
+.byte 0,20,"  I'VE REMOVED THE REMAINING BOOKS AND  ",0
+.byte 0,21,"PLACED THEM IN THE PLACES OF PROTECTION.",0
+.byte 0,22,"      IF YOU'VE FORGOTTEN THE KEYS,     ",0
+.byte 0,23,"   ** REMEMBER THE TOWER ROTATION **    ",0
+
+
+;.byte 0,20,"CATHERINE, SOMETHING IS UP WITH OUR SONS",0
+;.byte 0,21,"THEY'VE BEEN MESSING WITH THE AGES.     ",0
+;.byte 0,22,"I'VE HIDDEN THE REMAINING LINKING BOOKS.",0
+;.byte 0,23,"** HINT: REMEMBER THE TOWER ROTATION  **",0
+
+
 
 wall_text:
 ;       0AAA035449E73 DD 49D5E39FE1C 9D1752 0AAA

monkey/TODO

@@ -0,0 +1,8 @@
++ animated flame
++ foreground rock piles
++ sprites for all dir
++ sprites for walking
++ print verb at top line
++ print noun also (center along with verb)
++ poster, dock, and bar backgrounds
+