From 46dc8b5e4d350bd7122574c4d72182b6adceb730 Mon Sep 17 00:00:00 2001
From: Vince Weaver <vince@deater.net>
Date: Wed, 25 Mar 2020 01:17:59 -0400
Subject: [PATCH] mist: add viewer room

---
 mist/Makefile                            |  19 ++-
 mist/common_defines.inc                  |  16 ++-
 mist/graphics_mist/Makefile              |   3 +-
 mist/graphics_mist/dock_w_open.png       | Bin 0 -> 13418 bytes
 mist/graphics_mist/mist_graphics.inc     |   1 +
 mist/graphics_viewer/Makefile            |  28 +++++
 mist/graphics_viewer/viewer_e.png        | Bin 0 -> 934 bytes
 mist/graphics_viewer/viewer_stairs_e.png | Bin 0 -> 839 bytes
 mist/graphics_viewer/viewer_stairs_w.png | Bin 0 -> 1122 bytes
 mist/graphics_viewer/viewer_w.png        | Bin 0 -> 1073 bytes
 mist/leveldata_mist.inc                  |  25 +++-
 mist/leveldata_viewer.inc                |  49 ++++++++
 mist/loader.s                            |  11 +-
 mist/mist.s                              |  14 +++
 mist/viewer.s                            | 151 +++++++++++++++++++++++
 15 files changed, 305 insertions(+), 12 deletions(-)
 create mode 100644 mist/graphics_mist/dock_w_open.png
 create mode 100644 mist/graphics_viewer/Makefile
 create mode 100644 mist/graphics_viewer/viewer_e.png
 create mode 100644 mist/graphics_viewer/viewer_stairs_e.png
 create mode 100644 mist/graphics_viewer/viewer_stairs_w.png
 create mode 100644 mist/graphics_viewer/viewer_w.png
 create mode 100644 mist/leveldata_viewer.inc
 create mode 100644 mist/viewer.s

diff --git a/mist/Makefile b/mist/Makefile
index afcb6d6e..08a1ea4f 100644
--- a/mist/Makefile
+++ b/mist/Makefile
@@ -8,7 +8,7 @@ B2D = ../bmp2dhr/b2d
 
 all:	mist.dsk
 
-mist.dsk:	HELLO LOADER MIST_TITLE MIST OCTAGON MECHE SELENA
+mist.dsk:	HELLO LOADER MIST_TITLE MIST OCTAGON MECHE SELENA VIEWER
 	cp empty.dsk mist.dsk
 	$(DOS33) -y mist.dsk SAVE A HELLO
 	$(DOS33) -y mist.dsk BSAVE -a 0x1000 LOADER
@@ -17,6 +17,7 @@ mist.dsk:	HELLO LOADER MIST_TITLE MIST OCTAGON MECHE SELENA
 	$(DOS33) -y mist.dsk BSAVE -a 0x1400 OCTAGON
 	$(DOS33) -y mist.dsk BSAVE -a 0x1400 MECHE
 	$(DOS33) -y mist.dsk BSAVE -a 0x1400 SELENA
+	$(DOS33) -y mist.dsk BSAVE -a 0x1400 VIEWER
 	$(DOS33) -y mist.dsk BSAVE -a 0x9000 ./audio/link_noise.btc LINK_NOISE.BTC
 
 ###
@@ -121,6 +122,22 @@ selena.o:	selena.s zp.inc hardware.inc common_defines.inc \
 	ca65 -o selena.o selena.s -l selena.lst
 
 
+####
+
+VIEWER:	viewer.o
+	ld65 -o VIEWER viewer.o -C ../linker_scripts/apple2_1400.inc
+
+viewer.o:	viewer.s zp.inc hardware.inc common_defines.inc \
+	graphics_viewer/viewer_graphics.inc \
+	common_sprites.inc \
+	page_sprites.inc \
+	leveldata_viewer.inc \
+	keyboard.s \
+	draw_pointer.s \
+	gr_copy.s audio.s text_print.s decompress_fast_v2.s
+	ca65 -o viewer.o viewer.s -l viewer.lst
+
+
 ####
 
 graphics_island/mist_graphics.inc:
diff --git a/mist/common_defines.inc b/mist/common_defines.inc
index f71942e4..b8d0eb13 100644
--- a/mist/common_defines.inc
+++ b/mist/common_defines.inc
@@ -51,9 +51,10 @@ LOAD_MIST	= $1
 LOAD_MECHE	= $2
 LOAD_SELENA	= $3
 LOAD_OCTAGON	= $4
-LOAD_STONEDSHIP	= $5
-LOAD_CHANNEL	= $6
-LOAD_ENDING	= $7
+LOAD_VIEWER	= $5
+LOAD_STONEDSHIP	= $6
+LOAD_CHANNEL	= $7
+LOAD_ENDING	= $8
 
 
 
@@ -106,7 +107,7 @@ MIST_TOWER1_TRAIL	=	36
 MIST_TOWER1_TRAIL2	=	37
 MIST_TOWER1_BOTTOM	=	38
 MIST_TOWER1_TOP		=	39
-
+MIST_VIEWER_DOOR	=	40
 
 ; Mist Octagon Building
 
@@ -178,3 +179,10 @@ SELENA_SUB_ROOM		=	7
 SELENA_BOOK_ROOM	=	8
 SELENA_BOOK_CLOSED	=	9
 SELENA_BOOK_OPEN	=	10
+
+
+; Viewer Room
+
+VIEWER_STEPS		=	0
+VIEWER_POOL		=	1
+
diff --git a/mist/graphics_mist/Makefile b/mist/graphics_mist/Makefile
index 73ffd408..3e80bd60 100644
--- a/mist/graphics_mist/Makefile
+++ b/mist/graphics_mist/Makefile
@@ -10,7 +10,7 @@ all:	mist_graphics.inc
 ####
 
 mist_graphics.inc:	\
-	dock_n.lzsa dock_s.lzsa dock_e.lzsa dock_w.lzsa \
+	dock_n.lzsa dock_s.lzsa dock_e.lzsa dock_w.lzsa dock_w_open.lzsa \
 	dock_switch_n.lzsa dock_switch_s.lzsa \
 	dock_steps_w.lzsa \
 	above_dock_e.lzsa above_dock_n.lzsa above_dock_s.lzsa \
@@ -53,6 +53,7 @@ mist_graphics.inc:	\
 	echo "dock_s_lzsa: .incbin \"dock_s.lzsa\"" >> mist_graphics.inc
 	echo "dock_e_lzsa: .incbin \"dock_e.lzsa\"" >> mist_graphics.inc
 	echo "dock_w_lzsa: .incbin \"dock_w.lzsa\"" >> mist_graphics.inc
+	echo "dock_w_open_lzsa: .incbin \"dock_w_open.lzsa\"" >> mist_graphics.inc
 	echo "dock_switch_n_lzsa: .incbin \"dock_switch_n.lzsa\"" >> mist_graphics.inc
 	echo "dock_switch_s_lzsa: .incbin \"dock_switch_s.lzsa\"" >> mist_graphics.inc
 	echo "dock_steps_w_lzsa: .incbin \"dock_steps_w.lzsa\"" >> mist_graphics.inc
diff --git a/mist/graphics_mist/dock_w_open.png b/mist/graphics_mist/dock_w_open.png
new file mode 100644
index 0000000000000000000000000000000000000000..8ccda540aa5618662779dd435e258f4c48430147
GIT binary patch
literal 13418
zcmeHuWmH^E)@}pA-5okua2kik-K}v;Xqv{IMgzem1PvbCAprsecZU!NF2NHdI3z(5
zg4|Bt_nUd=-nsMLS?hlPhPB{yRXzLJ`#iOG9qLd#)zwzP$DzRi008)Es)`WgRTudU
z!a_s-tdqbW1OR|j0R|=r2-Fwo?&)Uh;0y;M{N3R|xSxY90N}S&oo(ks-|7>22P0!Z
z^`s*BWR@2ied1OeOTwWSaC5EMq<VpG*n=$rXtBMU2xk2DC~(fI`f26tif2>cAVv1c
zwcgRUxf30`%^Uyj>7QhGciSGM(s`$nC3pUe6+eOkzqNcmzYPlPTG*4!leVllx_tWO
z{ORq(k%dc)lTAiZoa5F|%ah2f$Auf~62qVGh97@kar_|}dCnhxB@M|BR+h15mo7h4
z-?BSvN?rNh9zcuhVeVUSfSu^%R<*xyC(6io9{2WSBdk+qQ*iY3`rsP(`t1G}aG5tF
z$F*kf>UT4RQL4TPt`nDF#cvwU(ogO_zPnCw=-fVKU6r{Fc-IpsIkj{NPrCdWd#Z8q
zHF5pY<J$o#Z&3bm_KXfQ=a-vzGKqIBlV4nevk*5wPI3$<K1>`2jA@E@r(9(g30^YU
z;gk0UneVip@_q4bU5`IeZ`X8m{@{SQJ|p~D?Tg10&%!Fd>$*%?b{zlJ5pH*9zVym4
zXRG~_wN#a$_Dv0YXrwy7raJ3sh0JgV%;U1_Xw9u{G&f_jbj^c**!*_8`NspktL01a
zeb&#e&yoTzSr%X6Q%4Du=Xb=#wS2=6UIhdP2J?)F)`gOl(e8}iYp0)JRrZu|;#yI}
ze3<e5MyQ$Vz`vW9tku^V#G8bgZK=vDVcx;_o_It(tnJNQ^e!f~JI9YfU=ZH@6xtUd
z=Co`2D?!ydxBhggETkMZOZCqSwd<`lXLX*Y(d=`SWI{$OOJ11mi*MQQ*5+tXtXz<&
zb60Lb)Oo7UXdJ65cg!5Ct1ouU0rC39^yV(r=kKK?jE_Gc9<KY_d?!|>bJ)^Trgu40
z`!OaqGxlZ-ynOiXb?xqEnz5;O<6QG{>U4rcR<7>{@8(s)MxVZ?4{`%XE6a0lnVsB>
zf`8tM*6*xU{mAC%thpYcNlgEGEz<n3CB{>EC=g-O!H!1OVEo?Mn?C@qE&gVFhWxGI
zNXZJfUHd!f7evk9_F5QQe`d7?bGfk%ckhhf&5Ti(9?OiajAwt?(_ia)yF}tLkzH4g
zORi75+a)|C?RxyM$+w><baA*sF&-l0+Hl<4O)ZcqpAhB6wbTg#^YgtU90KFQzP6ue
zK7VS#IF-7;35+>T_4{f8u#s3vd|6cJBlf0dWnL{MgXds4&Zz|Ki3POJt;tXNsgCje
zS;}FRyU6C)o69z}1~l|<V;{cle(9)-)H<{_+Z3zmJFh=*AT6PIwp!LIZ#pJq79Td=
z$i$=i%Iy<IY{rV+F%RiYx-Zj3&=)fa!88-uu+eH4ud*mLewMPQ&#Aj?1UB@Ymw!sr
zc9I1Yu3fPS^HSP^b+BJZnwnj$Qk&H6lqlKW%qomGcE0-n6S!sOP7G@8=%?GPTBWDn
zmq_!+xb$E5fXqKC%m3g<IivoVecfB{aQGMz;OL~V_oastFNGi$TZ=f`{8f5^ti-1r
z-*3b0Xn2K1Xa`2XK=mzpvU1nfM;}_pm6MMk5I53F2y7`=WfWCT|NfJR1<m7*^A@+%
zM#g8HxLL_nf<~D<Wv#id(nbu`mo8G|Pm+o7YE;KDRr3;rA~HlDEC(HRHInaDLO53G
zafSKcKg_L7zSHg%q|}fl`xX?yp^GqxNEh@k)oMk@>}>z&CXI6wurJ0hfVkCgop^D)
z&T=qwQuO?&e0~PM^zpi6i&ojAy$ElC8D>K}*)=P*_f8~Cb<jeI5gGiJUEv{2EZz6_
zvTqTr`092Lw_(0fqFpAgSxgc*f4oISNZM6(9#-m6Tbtu(v|((1subn^TNQjJ@_f{B
zK}>v&r3%U-`R4gq<E{_D4~m?iG*EJCJY_n=Jd+6G4uNh}g)e!QhVkgyJ>^>57xe{p
zh^g$t*RhvyGk?$r*M<9v==a<oq|7+@INT%U7Gt0v4PjB4O3u0k(2D|hhFct;<j_#@
z#y)e(C=nRL?68~`9}?A2!fdB``t*&S6fQuQt;sI-Our1%k=uMkoD6owfv^E>&qo1b
zfSIiqlTyo-LJ-rSK5GdU1Fr%<WhE0m!i3o?^oB!}q6-wCDsmj#n6U0n4DYGtW)!s!
zoYM+eVg!b6^@9h7gTCzJ`dSPzXswvR+PImGx^LCW79vh=Q>Q{bU$&Y|w-(mUmvuJZ
zQ@9WQD$1Uwm5l-9h{C8LnB6&kV&k^6qM&5VnM?H|sT(ceUW1MyA(hg{Wq{(M!nvsw
zezRUMJ9M2|U!F@F?R0t{YLJwAd>n3cQAg3&^?3syer*2vjouInC*m}@-qkH*{6$)v
ztM<o*`uGS<E32!+o-4c<VhgLmBQf<+X4#6Ai-#T75X2<@)#V<lJ3Dpz2sy&I(rhVX
zLHoX+G|$uQp_~uIRUCLjnFTx@kEA9UKi7|!@w&}h<O8AF#BCa5cU7nr)z=an9@z~W
zGLu7S1aAO2*!=E~jPZ57{C*@@*bwr*w`fr|yXZRot|;)<TU(mPI00|_AwzvO`LvQX
z{{EF___gX2z%ZF3<45jZ${^@O5iR8P(@~np3i1l=hZBA7oj`~m%+j?;-S2(XPK)fx
zi(}a=pYCC-4W05#^MZ#e1<wYnsQoToKH14q%gZMl6Y5~rO40IJyPsvL%UWQy8}nOs
zQRky==x9(Wkf@R#$E0%GDrzK|BjN{EL1g71@`X27s2yh2r$BXi*O2>iQrM}Z(8(9e
zvFwFXp-R-*oC$Gxn)kw!hD9{ZKE)iP3A`oVQ(CdxLydQt(8jh>nEz3;=4fA#`I0o4
zl^vbw3!8$NLm_%LRn<5esIN3nz(xHF4b}5Gk<;2to`iM<4*CIB!jz)oSyX?a)B;+?
zES5zE3ylOUGUu$)b`g9JB8ld$kU1VH$|Sc4|3QYA8>xBdZR1}$fV~+b1SX-=mEi$r
z(N&Xk{ciyjvo&Wy1?Vm+q7#A(oa9Xr_X{?u@hcSDoz-6qmFu!k=46R_(aF6&ODh9l
zt5{#a!AVPOL}Z~^$%(Q)itRRNY+95(j#g>+o{z0WDN$>($t|34C>G!I*$@ayz!@yW
zfI1J=KUE}TAH=yVH)BFCI@W4niA)Yre5vT&Fe_kzreRL#J)QL?T)QAAXw!JZ6QUXC
zN7`!QYCLs^)ovPm*B}#2n7LM%v(rDCNM|*&yD48pJ;tBz$sEp9Rc1UlPS35Vp~x09
zl+EE<uo-uM|Ggmkl1=E))+E>uLp|?VC4b=}u!+r0^#Q)SH|&utm;7W3h$xo2xwV>Q
zDTaE;N#B1}IIOpn#z0^<<n7q58Lyhw1_KPfR0|BfKV-f-I%#i1=B9W-VQ*6ufW=`@
z+DiT6wfx#C>z4Q~%E$Cbr#|H-oI>J9vmAW|XqQ=WY3%ouAL|bRvbI+4D_<0QGSh3v
zr{M%1X#~VnVQQCe)CKx)zCIBQ4q(>C5f;)Fl~)?m(Bg<$!eaD^`Wi`Z&?U``&<Ew`
zr}*6Z`KXT4u>fuJB#foFm2_w`_|IsT2u#8zL|LjUp$~UD(FCF$!y|~;Pq}fDXW>6b
zWN6TA_FGwBtrfN=m%AsFN?}t`FnxSgBdNk`p$uRHm_F#*zNkFMHm9$!f!IGraFxmS
zuyA%e_iBfx;r9_YMkv3=BMlss5mp>bXiUKR`q5@MW;Z(KN66{kp-I-s`~j%!p*qI0
zqwZ9L@M}nGF>&VWH0s0XSFb<y7z_x*m0&|Ab_4R&EN9WyA*(EorJkC_)5-2W8!mJ-
z^MwO3G#CUEpX-3tDQ-CVQ*$i_W7tVnWQJC8Qc~B%IdV>rly1qFm>D2IPO40()>5D(
zaq}nEW}6BKx=?Ys$X>an9{VJxD_U51FHr!dbLf4J+ckxdWd1LU629a=0<Vc&!)lUW
zM<I$U@%oi+9ie!P=EE681Mewa1Y2##D}-h<4|$}cYVjfnGRvP7%PKZwR#-NnX>)z5
zEqA`wmNL7iRIu905Q0Sl5_9%f4Vqn26PKRRw`Mo|PNYHfDika5RBEoQR33Y2n`8;&
zZREFTPFWHT8!-c3!|l{!XO&m<fDZsoX%NXqVhD9=O^g2bcH!WCbgpDMyFj7L=B!0g
z>|P-I{bvz?MzVWYPuZ3Bt?(LX!ld6AtW{M^z~DSnpC9_=U{WX)%+ldacb?Z)jnC5}
zJ}2NLax*1ZwjJJ<k+u+tVGb5O*z4D{x0>l&mn&wKh!Ho*HhRrwxpB%+jUo&SpIuC^
z=`;+tXsG~TPq`d8rp?r~uqUWf67Xonfc2R1)G!8F1u)(;aYw2?w&g@M0uB_PVsHsQ
zL$wN{j@Dyy5tAAhAoa_jB_N@A>-Vg8JCKzm20t*}XhorsI6D04Fq<`(WV+U7&v3Fs
z8@ravBO9D=U{&gbP~MWft7^iPQ{|8TF@}DLjXS|Oeae0zPah6YYGBw)jOGL`6XOG?
zYs0OihbT^NiGXQ-Fgq2tM>09;KMoC!9S1vu$|}a+w~|%60e6K+3r55IMmks&5>V@c
zM%)$4BgOq^7ehwn<z`IL>knui$UBjZafcE5+kE84q1?9B=yt9eyRTVu>GSXaqTmEH
z6lQ>9@iw(R`+ypjee{|B@;q~w_uY}6{wZArVc)z*`?|(g3nuyfu&;$v9oRZfeAYj|
zdCuL$D}qbaMnqG`0UvbjSzYCagfh`<6CIq^2IF{@PpHRec^Nvx$_*C`9&e3QO1ITc
zw}dYBH1S9#RCT1}M95?8#J0V!A;D*PlVvXqKw;$oC*NzNihlR7;qzXTS|EerfYmOR
znQYSYl!JvNF40iEFeqoZcE7oV7=t}-iyDsyb4E%DhQIc6?mUet!;AF66AOEw!u8XX
zsPepK3U!cr9_Kw-0iPhKMZ?}k%)q?$Mr4-MaZl!O*Fha_HhIx5QK($9yw*(>=hJY+
z+l!qY8=XD#w+;SVeL5f93EsSm@s6|few9`Iqd1IXImSY6YfGqMFp|G&<Y~fUlG>1-
zqn_42CH5Y<;(*vrAut!K$bUap73#_wpX?y}?SwBH+)yQ-3S`%Hbh05u!AMCE%$AF2
zQrU*FV$coE##-<miZ$x~G%)S4T*J}W+9BTD<h2}4Ey8_v?=d*heLwxS@BX|IgUVa4
zG08_1DM7L3FbmV!XS^%lD?*lGs7{%YBl*6aAr`Cg<v0Nfb3|+<7&04+?UFfZ4$8@R
zvSDn)oakR_h?vbYDI&W(Y)37+v~W@@iNc+ypYH&z`HR3iBjgK2r&e?NH!bF6p}1TU
zyb91F>r)=HNESnoT{?aIbHYd=vVHo&+%7?npK?9}KSa)nQ;kZ!7!fhUmCOAELc8AT
zWRP$lpy-Wq58UOR&Jpe5o*pJ|R@_!$9{noDs`7`zE!svt=1lWKr|pX*IhaJU+?kod
zu%1mLwf^wOGZB0YT1}t2E!oBl3#*l<L0LGHM5j)~DLb#vS$WHzgc95#fXvry+TAof
zAo@$qSex>)xxUr<iO``D2>oKsJjvJLsmYO?el01cU}sJ0E7Au#aa6CH@k7;p6$=8s
zDaXzgkxmPSb!9&;@oMYD3?`AEzExi&&!2+@9whr?5*-DMrru7IsF5WVl>-f2KuMA|
z7}iB|CT~`2iN?Y#aa)#L@=A}enI1`ED*3lh=Fs*(LM-qCsUYMN@iP9qoIss&-}<^Q
z9=NhcE`(qCQvE`T4Y9BF7)aRFeZSD$lM&s0yFABBkP+U&%-e!BBTM1T6Qty%=|82<
z@KJisUPn{Ws~nqj!(b720kPHNCKDp5Ieg0UWdNoY8~B8I(_BELrPdA%q95fI{Tel^
z*y5<y_!3|84lmj4oL4O>G)}|4FCcJFy9<`k?DO2pB-1{pcbg%mMejRxc;tB4a&sgr
z0AtE|U0~4=cVZR|g60slnA~<kwph<TENxaAnK+QY#IoqHEA8F1zD0So_j!#zlZ+Ki
z=vR>bBHXCy)e>=JoIQ5P{jP%t?qQPwnb8YxX<W*rTwTzO75iGQT)HF}lW2{YIOYM;
zL&75Y%2Ud?kQk#=3|q5}+>1CpuQv`4tmGXxiYfd%n{xb=;uP8SFIJHIn-I0`)81^p
zXw1B_@Gh)Ml)C=!3b+e?yf&su2Rfh!Q&k%kHofeyA5Y2pwY_7|`{NFnQy#}ERSBiQ
z;)G#jNuJN2XQsrbJi1m23Cpi@9bnjvVsIKD&4|WQNYbwY#TQb*V$Bp3fC1Il9klqW
zY(H1uqjh69&$l;HZph}q8w2pR@!P<DRg48Dr_2<u#du^R>JCDPFVGWJ1{y8P=^Lnt
z&+G3Y3h1I#HnVE9__5yumx#jbao;&)(FKJ8cS(j8XG2ZrK8X<%powS-FxhW1H1&|;
z)(Nw;%-f+$hzc1$dkj5rM9-;+w|;X$fjhpDKTc%DZ<3ngSKmwr6XC4i`qCGdUfBNl
zIodhdK$Q~L%`8W?s05q#PYZT~QyT{kO#QLqg?9XK2h&=&iB}F&A<FCo8KGqg4U_kK
zwE}4kU7qS?+;yXKXBjm16{evNWKqKVZHPFT^8CgI$gF+*p19(doYQRpH`*@VUzZ+I
zwC$-c1Y%c7>q<2Ckgvj^`^EPDv?R*V@@oYYPZEOBK|vO%Mqyx!M#54*ZwO7p0{*zp
z1oMvqM%+3Vo&(#A`w}>eBn)O4#b@r9_Mt^{6GSL}EUu-~3Vrerv8Y$N#Hw8FSjyE)
z+&EazwtKRg+~GfHSmYxYF_-N7D&KIcXc+p+U}Top>(K&r7N`3&zw$1G#gC|Gr!OZ@
z_EMw)iwL{q(;JiQjW9BN=jJIc(1Id99kk>Kx07nZltaFns0?^g9Ld{?zB-`@ei?~2
z2U{>3q!F~ngE+Sc$&L{TY?Z`O7OU-T77%SNx9V)+-6k$UjkZH<f%gQk=<zBxZ<vJp
z0~>Ss>laW@C&k&X3XOr{_IC2`Sk7vf@<~t(N?6_6Py_;AOudc>Oag~X<3IewE5cxK
zvAVc0N@w~Sk>tbHP%5jD(QEu|_`zq6iQU5<)(5_ZLdP?EF>7C!94;cV$jYX)J%w4i
zxRqkGG?#?5zzlt2kXIA0>KbA%{SEVyL+AE!pL9RFzo%F|<8@N1peuB^>Zc@Ju)X8<
z?DfgXV!T@c-(bk1$CB~Ncl25CSwf^reD9c$M#}V8wdC#6iDg32{Eb(>qgDlNy0xT0
z{uyqVm)?YWfb^FdC4fdy7&MifU5WaBW_i^sBhf}CtS(+=3j!K4P8OhB!(w$Vxw8^a
zF<Z5)!nFBtiLMdRY1D;1&XtyV>Ib!6le(Be1Z=Ks{*ecrrIIujYnsjsxyR&cXTHq?
zxmk+jpl_&Hwqs;+K$<d9oCdkdc=;lQ14~+a-q%<|PSFMuvV%o)m_%6}!*n`U^wXs-
zbZFe;#Ll~kzNl0_vd?GRFD@wk^aO5Lb(bFk0+Wbk<wBzhE!s3pVuJTDF$V?v4o`XQ
z_9sISShB(6s~wNcGp13%l`#<I$~2=xE-PAESbM7WPns$_z1m$vNLdQGToxk&mX!6?
zyuAKpswlasDnEI=;dtd^_c#YNz%1OJD5jP(M(N>QfU+i)z0tm<$=oNP;~lL1<BTiX
zQQRU%=W?a8Ha>1T6$=whd(N>q-Ktr=;z5adGb0ayCJP?pgzt>#3z@LfOMZ~7K?=jl
zEx0Lk#N&jhVHYAZMAYKWUm&C)H{Ht-f?*o<sBit`c6EHbQ-T$u7wDkWfQ$7o^)SLT
z&J!P`&!%UJDNZX~?4_slE=!mW2d6*FJ&8W|aSV(JRuq149Zr#^+Z~A$Tas(w=Q8Of
zBjhuKAsW)|LylhLXuJ6RNmPq-;eHbV-If%*XZy+Yn|s3B{<f`lH2daHWL}*xm~u2y
z`Cm{&%_TsOR#lSZ@l3o+rW`F(P}Nn}TG>dcMI@b`)h|%(Ob_Ean`&^(DnkK=j~V5b
zf4;N!tBhKIsg5IJkN=6lR~o~GqQ0yVOm<!3+2O}A`hAmBerVID&G=cs7)B>kmz;VL
z*(9t&c&XV&Z5`ps&*j8d6C)fQ$BoJ`j`L{&;Gl)s%p_rUIGr-4j$37x?rugf05;f)
zA7G$dTE}b-Vq95XihRE54bh(7E+n%%O<hP&mu*o=&xtd4TErEP;a%5y*P@>-X7-9u
zCzVkBNSs*q=Ic&lJa`}b!(HdglNWa~CzaV;5FM6$iQa_C@}`cu)v~i;)QpqjFDeBo
zpROfM`<=Ngi<In_4owlfuU0=6lTo_Oc1j*=KC8!<_<r%d_^UL;=2kA@(<SK*Nix(`
zmTJpREL03(f;Lzl$WCvutse+K-^n1kgDb8+k$5Xg1?K#o{1ap7+2psx*6jBA4YmO8
zy^#_Et&5_5K>nwRRH22ds=%O8Sw9g%dNrZX`l!<D-<Z)}o=HgJ9}l!MhHB+?8&Ok&
z*E2rcUM4MXh+Is5VZDn<tFAu%atyg)BJ0|ZD4P*?A>6CE_xhu~<3RL97{`ReebLF<
z7IPLZh!$t}8hYVuyU#o#HZ(cfq&y*J)a+s@I`oLaDC0x7K`h1`q>f-f`4mfc`Z(bT
zA$*MXy|19R8ULeSB3fM441lc?GQ~e;ni-JS$n+sGPT`_~{Bk2!5R?8s?svB>H6L6o
zXMDP+c&=sk9Ry(|MKiRn_uHsd<U5?+b?$N>uK4!T-w-#JPK6GBEc4N>!vmYK;YLsM
zGh#F7guS~r(R-7ECLF<a6gTxw-hQr^9EIB3Ls(VSoh)nGth<{sAbl-QIM{`d9Qjg4
z@zPhyB;TdCZ_G|Geh)8bzE8t<!+^4eO1MZLL6$)orBJG2p0aHeH%tnc1rL(ACq=i}
zgUB-n(6{GL!pPp6JwUwLvt0IQ>vL)0j7VJSCbLbS$|q-C348CWSot-v^vXSBKRSJ1
z;kiT@-Y~i*OL4-wmYTP6UW3tv*GJ7^y1^y^HO6vawozl=LiYNa?5bmi7k)(Qyb5qb
z8Ln-HhAk!f>Bv4qd$xd;;D@^-%4x>wn(u4r&tWfvwaeAr9Fuu+?RZ3esw>Oe3mcEs
z1xb9Q>6tNv*NVTwBWN_$FFdS5D%KxtC_P4JtbCx<zHcAys?!>-q=qWiXGpfeS^a_@
z7w((LHh9gAwJSTpR=eZ@c^mOLwR*<3lU#K-6W6a`6HV@?VCtzrs!aUiF-l<>b9Ci?
zDpjUJe3$XGDQC^O#oH&rJm)kEoa$mC@UXtTXJ8)v9wYF^XC(~E2d@&+3}er;X?G2R
z$}=2?r;-*s-jttuis?))2O#7g$$M8zjXf_w^Za_ww$rIGwdW)HdCs?2yxQ`V;V6Hd
zRHFO+mg`JlS4#_H&OylL`%A^$eAIJ3dDpzmU`96aODCdsBjsBgh5YrM&uDR64pI^q
z5*)DvPv$+O?y5ejOEuYeJ*F6=|9U9CEZVoYW^&YB{j#5Mth1)NUtB_im%EV3uUwzZ
z>yxUtJ=(^_!6yMkRb&Wj?3TP8$|U@{?p1iYm%U1^ICI)EU-GjhPz_z%Gh8+c7n<{8
zZ50d;d;-oex{1QTHKVHl<BOD%<R+5y!Wh2{0@q#df^#e}{BuFvRj_151YrPS>SGtf
z4;mxBmv#}56EE}jJKFSz3sQUnF^Q%1%n%b##ylvhnaj|7>({y|TEo3lSsMA3;X^nC
zeE2Q`>WTYfIaZG_TYlIzfXejoR5fH8Y|=Dz&v0++FF!f@fNh8;#zWF45CXe-jl|zw
z_Y(r%p^bGh7AMV5Vhj%-4{eE{;NsWV@Eq@HF%FNec3}3PAQb7I&ibp``O%25nPn~$
z+bs--MTtapytgiLw|uVg*#)iEpw#K)LcG~sXR{M^;QEJ}OY|rMB*dvqDQL#*$3-4!
z#{a0mf-DUo7#ujdPsGru#qu%x++THctMkMwHulp|@AbBt%Q2}aaexP_aje;JM}B7&
zdh9{ZV9*0%k#{#g-YWHK9c?7(xO`j_G!p5yJF339UcSBxd7@DmV<h>0OFYMXgVz`_
zJ-tRO!&ok6`e3;K$opI6hep!U#6?}$jrdi@%_+E{Vd++G^Q(a*FpJ4-#;C+`KJW<I
z=>D85#n*aX@Syl{@%|!%m|&6#wbx6+rO8g4kjcSJV*fHBS@O(D{>+%m_au3#PxNl*
zmtPd4MfqxVa^)D}c3$KG_uuKYB^)OX>c@P)Dm_QAA5Y>xEO+Zp9&SGv<CvUJ8a6G5
z2Cu9IKEBgB@z15j+^u?_rP?zncwGM~0q82A%Yzkpc%JeQeGxTdZ;8>~%t7Zf?HB0~
z^@p8DlRGa(LO7x~aHyh2T}{#%^cpMT1J0;9O2QJgU%idVVK&FxKS(hj@U%+P^;CuD
zj>UrU!k-VTHy=ha%oSXiD*}KL;hp>*O%s(zeDux=_!?eK_avwNm$>o4QxcOwPUAmO
z(oyu4^ocu<jy;-38toJjEBcq<PY?E&C)7xUCX>!^Nm1x4N=kV~UN(+Ia2%95oan=u
z{Hu7J>xJhYkxXet`@SJ?EbJYf=72L+JKcAn_d3AhL{;tMpsmhvd~{+e158gnwEPy)
z<1Gt=%&Fx!6tCnY9PTaxVOmTX9oAV&OLS$qxuD_`Ro}VtcR1E>Bh@-80%K?zwc<9~
zRvRfRw4ShhSH@|ZeoJ8cQU;UjBjMZA_lpZ?E=T1ASDRk+_y-)iJ^mOFCz>YI^2W0-
zY}3(}Qyg{fgoaDCd?mV182fe!CjgDeIoNmYszkpNiRzYa)=Y$g=I%}f3@+{_;C&$Z
zov%3&u8G(|Mq|M@M`&7)8rTgxe1vo<S1(2-63=ax&bBqC%6T^))ha*02NykT-{KNU
zeIjioRMFT}p`CA-%0mxsd?(iWhJxy4<^>Qq-4k7*_VIINB0^t5u6(SQ_GHMfBe+#1
zvcWPhI@)lwHQK(`kDod?v2UMQshW@xaeVo+Svs4mZa-(!Ho}-jT|n02jd%F_&g?U+
zP|c6~0|t0Y^DrZ^+`7%-{eHP9sn9%3_Q*zrm1qeCFdw$otJQv7{%qf?_G{;MXW{PS
zyd6=k1(Fw2qYK5x-YjpY6Q3*f@7BWSR34F)#Aq_8zCh8l9_!HhcwD2)cx7|5L_Bto
zNwHtbFko_J_0Hbnb?_qNZJkbF1D^FQB}XbJW#qOp4f2eG?LR%-;NXsc{W{zrrOr<h
z0>WGRhLfKp?|3fW*%Y1~eka2p?v6rWy>NrKOj1XiD4WACHNYrKO&~I;J=xu#s*f{o
z5j|g8Q#%u{Wn}u5hfCx!$~hLLshfSg0{}p%=zu&<VWOo8hPk=$LT%iv;k<q>?#NI8
z07)4?cPPvWjsRN2?HpXCm`>WenSc&9QcT9eS|BZV1-QL~YJewPKS0|67T^REw_%cz
z#*y>`BMDsK2q@6c#o5&h>?g(an-`4y{HvRf3HTd=aFSv&(b5GfxOu{XLcBt}ARZ+@
z2Oj|@X&j)Wr;RNbqNw~Q1+pc@WRF0&gZcP;eSLX-1$o^(?fCe`#l`tR0(=4jJV*qO
zm%l3l>c`{i#r%un4-Q4R7t9l>pM#q#@E0f4+RYmw#l(ah2mVR^OI;;DWapm_ezkwo
zdm(K2)Q}A!<ozH4d;%bl7!OE*M?jqKulC4ME#zyZKdoK8{!|gEC!ZhGosXXv#OLDj
z4;EesC7-|h`==IO2FOz_d=R*oo3|$nuH*xEMKJ%>sk^hc*I#{ld%=Ho{f^t&#+DBm
z)Njv!wNX*i(*2vwFB$C|T-<+K{6hZ~X#@Kk&fVM7`8UP}#s_zXyC4JcLNfFJ10HGr
zH-mqAJHN?)3k6nmgL(gAQB#y+`V|1!#tr6R1OELHikwg}F}MhiARH#nBP3#N%OfUe
zEyyEkEhZu?0<snr1_}IyO3l>^0d<AJe^DXHc^!~E)&g)_8v!8^9&2kM7>|&+IGhIx
z5*6VQv4)92LE^$fAQ0>?6gr*`$kc{9|23*#R5nN|F_104jgT;mhhH27<q?7kBdKf!
zk<p05LBjmjg2Do}*1xHK2@96fRg+>8;067?N7osOuyylvkz&$xaP{{4`+$Li3tS%o
z{UsW|u$VAEzkryifPerpOyR$SjNqPL$gKUv$q(Y?7y3P70|P4~8KKDRad3g!!TH=>
z?S2m+V+JdD!l4K^PXjkMXDOy%F#&&>{;ma}<eym%)^vkGe^tY8Fx=)>q5N4Y@=!az
z-%Uxre+B+OnDp)4d|m(Fc>WIk8;hJL!q?5yNyk&i+7S*z{A-?n2L2lp1i46gAw2!n
z{+pZn-*A$Dq@^m-*3HxZFaGu69)Gm{SV^26eoF-e{;pmy6!uF+DJCzd58USW6d-l{
zV+dvsb+v;dm&reC<iGkI{z<y>^NZRDK?Q7ipf&;^9w9gknYcm%qC6rZa3~Z85)%-#
zh5sYFmzyoZ7wQR@vqKgUa-NYT^n0Fx?7y>&;~&w!_Hbm7JRl)32*mWq^a3UMeyxQ6
zb$gP()(R~x@LvUx{I!;V)qZ7|zPG!(vjg1oABFj^MESqq{$l@UQvP@5e}(;Ft>EVF
zk1S4mgpRN4zjXgkfPXM(I>6wrUT*&?^uI#>kmWBA3}noI^dTQa$mbg0-yUp#rp2$y
z`5*lHGu{3NJs_$7<K*Ac_djy|N3MTMfqx79pX~aNT>q8={}%W^+4cWTE}Xw_jp44y
zU-W#D8{f{)3I+fGN`!-gg033!Ps)G(djbH!o*a}crP?n`H~2`ul!;tUg3Mz?SHhHt
z++&uLtWds!+{_!)dWQRg>Ny#uN^j%F#<2BV@1UtMrm-B+HNe9Y0YM~_++~oN4fwgQ
zB>G-5_?`d?_24h&gfZ;fTx=m~{27mk6<%X8#i9%lWn{s})FCuon+FUiU2Cj<>36L%
zD*0x$R76Bi?J}WD0|x{8*-gFv`C@&e_3DAzl8)2pPZ?Wl{H}*ux9WQYnQcV`Rp{<h
zXwX+7KwQ~0Usyae=MbZmo(!*Yn#G*vXq;A4x<M9`85u3wUQ`_1R>UNV>=lJ!oX#xv
zb82--g*PRM!6WAyTaXb$6y{+`kpelNn~mVpcJo(a{Ku@3DYBQ(HUr}Tg_Z@TzBwnb
zVTU|Guib{a+fPxNp0fvg=S>t6s8`LQ&kmZ(4pA~BWY69vX?;iw6N<DZ_LC`g8$}Cm
zmOXj7VD7|NPAHq+roIlqjF#<C{NN;ga=dqVv@TeE`vj2U>Dj>T*qM)fi6N+~X`qC>
zZZcR|X?NZ!-T;cNa&mIWCT=GC@2ou0?i?j^b93(sCdtkvCs*S=?<Vi=?vVK0#HbMD
z1>0TK)C&M0LjVBeRw(Jl2hWk6m<Tm3CCn`}YIIB?g#><kWEV9;$poR`=JIQ23;1(y
z1@v`5*aLrU#Ee4;D3Q70qoyclpgMdse~=IkBtqZ7_CVEIIlXmjmtYu{i`Zrg7Wt6U
zV21k$lbCC;h4rbP^f1@nt)OCH#I*DBXV@+lmNxxok|ck+F(<EM7WA=bXHELltB&UV
zl`LF5l%(G7&^}@mMHj<U?Ri-|<DL`;!|!x~1UL|MbTsx}LiQ0!{Qa$!UeEZRHaRI@
zZ;<jyF6~RA&-xdba<(X02f&Ls`C)93R6fQix**Da&ShBO_C44k3cOAYZ%f4$=t_b!
zs+a45P8?!^r}hBdqi{q7{Y$l0wDu@4rdYg!-8d!mIR#Z81az;JjZKdFc0p$n@wx<U
zK>nV+C0MSL5~DrX@@@NBQiI{Q!&4k?;S-EY`qv~2Xk{)VF#@9Ks42cuhvf?X-if&9
z0V7E~qWYPsN(F|kbRBQ_qAb|F+?^uK@K56awc|J8!Q`pKO|Z0S0bMW5%A8xAn>uZp
z6)JmSl1|ju@J^~Nr46a?%hlzmQG1hSyb*5bXqMK9@>5LYGy&9<v=wXQt-}5n4IM?m

literal 0
HcmV?d00001

diff --git a/mist/graphics_mist/mist_graphics.inc b/mist/graphics_mist/mist_graphics.inc
index 9e77420a..9810d5fa 100644
--- a/mist/graphics_mist/mist_graphics.inc
+++ b/mist/graphics_mist/mist_graphics.inc
@@ -2,6 +2,7 @@ dock_n_lzsa: .incbin "dock_n.lzsa"
 dock_s_lzsa: .incbin "dock_s.lzsa"
 dock_e_lzsa: .incbin "dock_e.lzsa"
 dock_w_lzsa: .incbin "dock_w.lzsa"
+dock_w_open_lzsa: .incbin "dock_w_open.lzsa"
 dock_switch_n_lzsa: .incbin "dock_switch_n.lzsa"
 dock_switch_s_lzsa: .incbin "dock_switch_s.lzsa"
 dock_steps_w_lzsa: .incbin "dock_steps_w.lzsa"
diff --git a/mist/graphics_viewer/Makefile b/mist/graphics_viewer/Makefile
new file mode 100644
index 00000000..8bccd6f6
--- /dev/null
+++ b/mist/graphics_viewer/Makefile
@@ -0,0 +1,28 @@
+#include ../Makefile.inc
+
+PNG2RLE = ../../gr-utils/png2rle
+PNG2GR = ../../gr-utils/png2gr
+LZSA = ~/research/lzsa/lzsa/lzsa
+
+all:	viewer_graphics.inc
+
+####
+
+viewer_graphics.inc:	\
+	viewer_e.lzsa viewer_w.lzsa \
+	viewer_stairs_e.lzsa viewer_stairs_w.lzsa
+	echo "viewer_e_lzsa: .incbin \"viewer_e.lzsa\"" > viewer_graphics.inc
+	echo "viewer_w_lzsa: .incbin \"viewer_w.lzsa\"" >> viewer_graphics.inc
+	echo "viewer_stairs_e_lzsa: .incbin \"viewer_stairs_e.lzsa\"" >> viewer_graphics.inc
+	echo "viewer_stairs_w_lzsa: .incbin \"viewer_stairs_w.lzsa\"" >> viewer_graphics.inc
+
+%.gr: %.png
+	$(PNG2GR) $< $@
+
+%.lzsa: %.gr
+	$(LZSA) -r -f2 $< $@
+
+####
+
+clean:		
+		rm -f *~ *.o *.lst *.gr *.lzsa viewer_graphics.inc
diff --git a/mist/graphics_viewer/viewer_e.png b/mist/graphics_viewer/viewer_e.png
new file mode 100644
index 0000000000000000000000000000000000000000..1c63bf99aac1977c62fbdc324bf54709c73dbc1b
GIT binary patch
literal 934
zcmV;X16lluP)<h;3K|Lk000e1NJLTq002+`001xu0{{R3u{#aL0004mX+uL$Nkc;*
zaB^>EX>4Tx04R}tkv&MmKpe$iQ>7vmK|2(2$WS|35EXIMDionYs1;guFuC*#ni!H4
z7e~Rh;NZt%)xpJCR|i)?5c~jfa&%I3krMxx6k5c1aNLh~_a1le0HIN3n$<N1Xu54?
zQb{qFUlBvE2qKCB#1NO6Wz0%a8ouM}9s$1IC3u$qxj#prTCf-p5Q%4)VcNv&#8aEL
z!FiuJ!pgErd`>)S(glehxvqHp#<}FOz%wIeHZw;YAr?y=taLCdn;P*XaZJ^8$`^7T
ztDLtuYt<TS-IKpCT+o-7xK48zDJ)<S5=1Ddp@J%GBxu!1v5=wtq>q2d^-JVZ$W;L&
z$2>NmL3aJ%fAG6ot2i<4C54kf_lx6vi~ylspjmgE?_<Ylo&dpT;7V`%HyXh7C+YRJ
z7CQp^w}Ff6wx;X>mpef8$&gLim4Y;dVi9;hqi@OsgSSBMs@Gd<AEysMmbyyc00)Oa
zyhPb+KJV`7?Csw(t^R%hlX7yjENZ=<0000pP)t-s0002v9$;Wjz5hi00Ha`>oSYQT
z{m{ezU~&WhYCN5to&TWF6!kpN-Hmep(EtDc0001;kA{E%000SaNLh0L02Fip02N>X
zmRIYN00007bV*G`2jl}802U#8K{R*(000?uMObu0Z*6U5Zgc=ca%Ew3Wn>_CX>@2H
zM@dakSAh-}0003|Nkl<ZNXO0A*>b}m3<XfeGhp(-^#A|1ri7y9vdKvsJsHP7kys4w
zVBv1YC44maBkXW78bMBHru@1IvYvo>aZtap0Y0wKAg}4EAWnl{SB$}5=bylK<vo6`
z3-VTeeFW+p9m?+`Krzbde}-V2b)d8AP4v)l7{NATe42;w29VFa7&92cwB#NrCv#~P
z5RbFN+z!}!yaT2yN}KoK8^Jmkjo^bsAB1a}gWk_Fq{FfV7J_EjUw#9yw)1P}Dff+h
z=N6a}%`hbn(j^hXB1rQyf%Hq$%TRx}H$ar(2H3d#63?&Xh`|sRK{?72tU<u%h1lXp
z;CU{CEk-3H5cZ)4_3^0WYy$BCPOj$ZMlV5G@-isNG7C|Lxd%<4_a+dX2q~yb#-KiA
zxqBH-<K<u}FUBOIc7lQHfd;ZIGaPM)*#u`{DEdX%40V4Q-<a(mKebN~e*gdg07*qo
IM6N<$f@1EStpET3

literal 0
HcmV?d00001

diff --git a/mist/graphics_viewer/viewer_stairs_e.png b/mist/graphics_viewer/viewer_stairs_e.png
new file mode 100644
index 0000000000000000000000000000000000000000..4b67141dcbb28e22a483fc976336de415db965a3
GIT binary patch
literal 839
zcmV-N1GxN&P)<h;3K|Lk000e1NJLTq002+`001xu0{{R3u{#aL0004mX+uL$Nkc;*
zaB^>EX>4Tx04R}tkv&MmKpe$iQ>7vmK|2(2$WS|35EXIMDionYs1;guFuC*#ni!H4
z7e~Rh;NZt%)xpJCR|i)?5c~jfa&%I3krMxx6k5c1aNLh~_a1le0HIN3n$<N1Xu54?
zQb{qFUlBvE2qKCB#1NO6Wz0%a8ouM}9s$1IC3u$qxj#prTCf-p5Q%4)VcNv&#8aEL
z!FiuJ!pgErd`>)S(glehxvqHp#<}FOz%wIeHZw;YAr?y=taLCdn;P*XaZJ^8$`^7T
ztDLtuYt<TS-IKpCT+o-7xK48zDJ)<S5=1Ddp@J%GBxu!1v5=wtq>q2d^-JVZ$W;L&
z$2>NmL3aJ%fAG6ot2i<4C54kf_lx6vi~ylspjmgE?_<Ylo&dpT;7V`%HyXh7C+YRJ
z7CQp^w}Ff6wx;X>mpef8$&gLim4Y;dVi9;hqi@OsgSSBMs@Gd<AEysMmbyyc00)Oa
zyhPb+KJV`7?Csw(t^R%hlX7yjENZ=<0000pP)t-s0002v9$;Wjz5hi00Ha`>oSYQT
z{m{ezU~&WhYCN5to&TWF6!kpN-Hmep(EtDc0001;kA{E%000SaNLh0L02Fip02N>X
zmRIYN00007bV*G`2jl}77AF8vVw*Dn000?uMObu0Z*6U5Zgc=ca%Ew3Wn>_CX>@2H
zM@dakSAh-}0002;Nkl<ZNXPA#!3x755CtU=Ru8TJ|F`wAipDI-nrus;&cPIt4x?Bb
z=TwA*v*eX<lgZ?lED8LUaWxXgh--|7LS_oD^Uj!U9CM-1{E?6{X2Lb|)WWsFsLy-!
zVSJ_#+oq0}&S%{|RIVt5{iAZ>7lf*RnQ`HPly6Hyc@1v}Zx+@!Ye^Wo9ib}ZheBvo
zWenQFa=SiMg>?<9aQlrz;b`HhkPGoX<2}xp?U<B7QMfF9A#^MOMCDTvwuOSS6_!Gr
zFRY>lsqjR|`;aFLg)AH@tP`dk5VCTpkcC8&kQ*-*_A)LW7M8+&T`QEQ`~d-m5<lhB
Rb?pEE002ovPDHLkV1mVdZ^r-t

literal 0
HcmV?d00001

diff --git a/mist/graphics_viewer/viewer_stairs_w.png b/mist/graphics_viewer/viewer_stairs_w.png
new file mode 100644
index 0000000000000000000000000000000000000000..09083397d1cf5db0f7ebc7a4f3690cadc8abb72f
GIT binary patch
literal 1122
zcmV-o1fBbdP)<h;3K|Lk000e1NJLTq002+`001xu0{{R3u{#aL0004mX+uL$Nkc;*
zaB^>EX>4Tx04R}tkv&MmKpe$iQ>7vmK|2(2$WS|35EXIMDionYs1;guFuC*#ni!H4
z7e~Rh;NZt%)xpJCR|i)?5c~jfa&%I3krMxx6k5c1aNLh~_a1le0HIN3n$<N1Xu54?
zQb{qFUlBvE2qKCB#1NO6Wz0%a8ouM}9s$1IC3u$qxj#prTCf-p5Q%4)VcNv&#8aEL
z!FiuJ!pgErd`>)S(glehxvqHp#<}FOz%wIeHZw;YAr?y=taLCdn;P*XaZJ^8$`^7T
ztDLtuYt<TS-IKpCT+o-7xK48zDJ)<S5=1Ddp@J%GBxu!1v5=wtq>q2d^-JVZ$W;L&
z$2>NmL3aJ%fAG6ot2i<4C54kf_lx6vi~ylspjmgE?_<Ylo&dpT;7V`%HyXh7C+YRJ
z7CQp^w}Ff6wx;X>mpef8$&gLim4Y;dVi9;hqi@OsgSSBMs@Gd<AEysMmbyyc00)Oa
zyhPb+KJV`7?Csw(t^R%hlX7yjENZ=<0000pP)t-s0002v9$;Wjz5hi00Ha`>oSYQT
z{m{ezU~&WhYCN5to&TWF6!kpN-Hmep(EtDc0001;kA{E%000SaNLh0L02Fip02N>X
zmRIYN00007bV*G`2jl}779R;eA)jmj000?uMObu0Z*6U5Zgc=ca%Ew3Wn>_CX>@2H
zM@dakSAh-}0006FNkl<ZNXN~VNs_}L3`Gf5*kM6&|J$~epAV8SjvZ&wsvbN@4^0S%
z@KcFVelAHl#Jzx5kw>^U@E6D!4e%~9#sPQ_Nyf5-Ww{URxEJs)QsZ7B-$Qm7D8b%d
zMRx0E?^n2nw3epIT<5vTd7y>4wgGem=De;UtZUA0*M0^HQh;0Wm8>g(@^=KrcnFLU
zK#fdI+^#h{<Rh>bhgbRumplO!GclkKTjsW_QsfR<Y%P2R*n<KD`IBp8+UlJIvc_6$
z4!;5(jM9GtME=l=>g)&?fK0uH>Fss{sQ1g)Kn6{q_D`;F1HF$&U3eO(y*veUL$U#L
z*24^qJpv~adjty3itLtgFbqI@DrgTqkVEwXFeS_t4qJ=kaFh4Y-94oCfcUKyVM0o&
zmE+<7xGZ}>cvOl7mI5yc6zz{d8TA5`|11Qghy8p)^E6OQQnCR9S!+soOL0I{jgO#0
z0~;`d)*2qz4r>iWVD$501X=7cSfD!nI}nOA%7f^|fE<A6eGlC8PlW9aP0^hKaVBF`
z0{1+$z?^}Mv3;s=f661Y3(B$QAAIEZ1Qv8a?|~@R3Siz9c_VuU{VMm`IvBmD1<pK_
zS_?2G8cu;|1TmQT$8JPFvf2)aTzcSRDgZK%4k&J;?}+oO&OGFYp4j#LD`5W$1aR(Q
o8@3II^1Olevy#D|2hs|_KPK5P^u7fpHvj+t07*qoM6N<$f_4Szu>b%7

literal 0
HcmV?d00001

diff --git a/mist/graphics_viewer/viewer_w.png b/mist/graphics_viewer/viewer_w.png
new file mode 100644
index 0000000000000000000000000000000000000000..1ed354700d7b65122ef5547327e6360ccd63af20
GIT binary patch
literal 1073
zcmV-11kU@3P)<h;3K|Lk000e1NJLTq002+`001xu0{{R3u{#aL0004mX+uL$Nkc;*
zaB^>EX>4Tx04R}tkv&MmKpe$iQ>7vmK|2(2$WS|35EXIMDionYs1;guFuC*#ni!H4
z7e~Rh;NZt%)xpJCR|i)?5c~jfa&%I3krMxx6k5c1aNLh~_a1le0HIN3n$<N1Xu54?
zQb{qFUlBvE2qKCB#1NO6Wz0%a8ouM}9s$1IC3u$qxj#prTCf-p5Q%4)VcNv&#8aEL
z!FiuJ!pgErd`>)S(glehxvqHp#<}FOz%wIeHZw;YAr?y=taLCdn;P*XaZJ^8$`^7T
ztDLtuYt<TS-IKpCT+o-7xK48zDJ)<S5=1Ddp@J%GBxu!1v5=wtq>q2d^-JVZ$W;L&
z$2>NmL3aJ%fAG6ot2i<4C54kf_lx6vi~ylspjmgE?_<Ylo&dpT;7V`%HyXh7C+YRJ
z7CQp^w}Ff6wx;X>mpef8$&gLim4Y;dVi9;hqi@OsgSSBMs@Gd<AEysMmbyyc00)Oa
zyhPb+KJV`7?Csw(t^R%hlX7yjENZ=<0000pP)t-s0002v9$;Wjz5hi00Ha`>oSYQT
z{m{ezU~&WhYCN5to&TWF6!kpN-Hmep(EtDc0001;kA{E%000SaNLh0L02Fip02N>X
zmRIYN00007bV*G`2jl}8016jUjQqR+000?uMObu0Z*6U5Zgc=ca%Ew3Wn>_CX>@2H
zM@dakSAh-}0005pNkl<ZNXNaF(Xxaf2!^d0+q`gk|F=C$M1cHOyKRRXr^HWwR5Ybv
z<7)Ab|7*X!w;T8<P~BP}_sVxW{RJTMdlcw8>)Wif2pq>V$(HsZP!TtP(=?9LW)WyJ
zxUy>XNCdR@17LO5^LhZd^;<{eTI(%fJbGUM=eK<Z#3#Oqu;+RexcC1PFgnIurxXQ4
zU~9!#O1FV?V>f{>U?;%77#f^`Vd&1`CW={MFcyZ!#Oy$n8N$hM50f@V$<Tz;tnL_S
zr}WU&TMCOPg=A8m&ww3kfjB~|;}pm_l9+si)N*_u06Fd4#t1jL`4W&KQO6fF!Se3S
z`5>Dj&Ccz&wVg_i!y$56*zH&jr=yf*If#tfVOTe(k$b!cXy3sqz(6|OvNfeDqT-+x
zlY!mRHw?9EnTWSWEWoAIN~1b?w7~w`%lBH~hEz5M?;}K~6kQQb_A-=g<LFoGAlYiC
zE}Y<b&e<*(mK+Yhf0TH^R5y`m3BoPPz6-;n1OeMyn<Gr|Xi50!ezB5c2EPFIZfpfM
zg85T`enr*Q=812RF3@I#BD?~m2pQJ^b=WY-d|D!;)XFXG%Yt8&5T#AAUjDHjN}u2Y
r&@YMt(Tl?VZ-HT15Kv5B24}!O;pZ*J{UfKx00000NkvXXu0mjfoQ3JW

literal 0
HcmV?d00001

diff --git a/mist/leveldata_mist.inc b/mist/leveldata_mist.inc
index 16a0f093..eeb3d061 100644
--- a/mist/leveldata_mist.inc
+++ b/mist/leveldata_mist.inc
@@ -14,17 +14,18 @@ locations:
 	.word location28,location29,location30,location31
 	.word location32,location33,location34,location35
 	.word location36,location37,location38,location39
+	.word location40
 
 ; MIST_ARRIVAL_DOCK	-- dock
 location0:
 	.byte	MIST_DOCK_SWITCH	; north exit
 	.byte	$ff			; south exit
 	.byte	$ff			; east exit
-	.byte	$ff			; west exit
+	.byte	MIST_VIEWER_DOOR	; west exit
 	.byte	DIRECTION_N	; north exit_dir
 	.byte	DIRECTION_S	; south exit_dir
 	.byte	$ff		; east exit_dir
-	.byte	$ff		; west exit_dir
+	.byte	DIRECTION_W	; west exit_dir
 	.word	dock_n_lzsa	; north bg
 	.word	dock_s_lzsa	; south bg
 	.word	dock_e_lzsa	; east bg
@@ -755,3 +756,23 @@ location39:
 	.byte	10,18		; special y
 	.word	circuit_breaker-1	; special function
 
+; MIST_VIEWER_DOOR	-- viewer door
+location40:
+	.byte	MIST_DOCK_SWITCH	; north exit
+	.byte	$ff			; south exit
+	.byte	$ff			; east exit
+	.byte	$ff			; west exit
+	.byte	DIRECTION_N	; north exit_dir
+	.byte	DIRECTION_S	; south exit_dir
+	.byte	$ff		; east exit_dir
+	.byte	$ff		; west exit_dir
+	.word	dock_n_lzsa	; north bg
+	.word	dock_s_lzsa	; south bg
+	.word	dock_e_lzsa	; east bg
+	.word	dock_w_open_lzsa	; west bg
+	.byte	BG_EAST|BG_NORTH|BG_SOUTH|BG_WEST	; all bgs
+	.byte	DIRECTION_W	; special exit
+	.byte	9,29		; special x
+	.byte	2,46		; special y
+	.word	enter_viewer-1	; special function
+
diff --git a/mist/leveldata_viewer.inc b/mist/leveldata_viewer.inc
new file mode 100644
index 00000000..d29cddc6
--- /dev/null
+++ b/mist/leveldata_viewer.inc
@@ -0,0 +1,49 @@
+
+;===============================================
+; level data for Viewer Room
+;===============================================
+
+locations:
+	.word location0, location1
+
+; VIEWER_STEPS		-- steps
+location0:
+	.byte	$ff			; north exit
+	.byte	$ff			; south exit
+	.byte	$ff		; east exit
+	.byte	VIEWER_POOL	; west exit
+	.byte	$ff		; north exit_dir
+	.byte	$ff		; south exit_dir
+	.byte	DIRECTION_E	; east exit_dir
+	.byte	DIRECTION_W	; west exit_dir
+	.word	$0000				; north bg
+	.word	$0000				; south bg
+	.word	viewer_stairs_e_lzsa		; east bg
+	.word	viewer_stairs_w_lzsa		; west bg
+	.byte	BG_WEST | BG_EAST
+	.byte	DIRECTION_E		; special exit
+	.byte	9,29		; special x
+	.byte	2,46		; special y
+	.word	back_to_mist-1	; special function
+
+; VIEWER_POOL		-- the viewer pool
+location1:
+	.byte	$ff			; north exit
+	.byte	$ff			; south exit
+	.byte	VIEWER_STEPS		; east exit
+	.byte	VIEWER_POOL		; west exit
+	.byte	$ff		; north exit_dir
+	.byte	$ff		; south exit_dir
+	.byte	DIRECTION_E	; east exit_dir
+	.byte	DIRECTION_E	; west exit_dir
+	.word	$0000			; north bg
+	.word	$0000			; south bg
+	.word	viewer_e_lzsa		; east bg
+	.word	viewer_w_lzsa		; west bg
+	.byte	BG_EAST|BG_WEST
+;	.byte	DIRECTION_E	; special exit
+;	.byte	12,25		; special x
+;	.byte	26,46		; special y
+;	.word	controls_pressed-1		; special function
+
+
diff --git a/mist/loader.s b/mist/loader.s
index 9f98d166..7ade4b58 100644
--- a/mist/loader.s
+++ b/mist/loader.s
@@ -56,9 +56,10 @@ LOAD_MIST       = $1
 LOAD_MECHE      = $2
 LOAD_SELENA     = $3
 LOAD_OCTAGON    = $4
-LOAD_STONEDSHIP = $5
-LOAD_CHANNEL    = $6
-LOAD_ENDING     = $7
+LOAD_VIEWER	= $5
+LOAD_STONEDSHIP = $6
+LOAD_CHANNEL    = $7
+LOAD_ENDING     = $8
 
 
 loader_start:
@@ -156,7 +157,7 @@ copy_filename_done:
 filenames:
 	.word intro_filename
 	.word mist_filename,meche_filename,selena_filename,octagon_filename
-	.word ending_filename
+	.word viewer_filename,ending_filename
 
 intro_filename:
 	.byte "MIST_TITLE",0
@@ -168,6 +169,8 @@ selena_filename:
 	.byte "SELENA",0
 octagon_filename:
 	.byte "OCTAGON",0
+viewer_filename:
+	.byte "VIEWER",0
 ending_filename:
 	.byte "ENDING",0
 
diff --git a/mist/mist.s b/mist/mist.s
index 8c331dff..a9dfa6c8 100644
--- a/mist/mist.s
+++ b/mist/mist.s
@@ -219,6 +219,20 @@ enter_octagon:
 
 	rts
 
+enter_viewer:
+
+	lda	#VIEWER_STEPS
+	sta	LOCATION
+
+	lda	#LOAD_VIEWER
+	sta	WHICH_LOAD
+
+	lda	#$ff
+	sta	LEVEL_OVER
+
+	rts
+
+
 
 
 	;==========================
diff --git a/mist/viewer.s b/mist/viewer.s
new file mode 100644
index 00000000..15179688
--- /dev/null
+++ b/mist/viewer.s
@@ -0,0 +1,151 @@
+; Viewer in the room by the dock
+
+; by deater (Vince Weaver) <vince@deater.net>
+
+; Zero Page
+	.include "zp.inc"
+	.include "hardware.inc"
+	.include "common_defines.inc"
+
+viewer_start:
+	;===================
+	; init screen
+	jsr	TEXT
+	jsr	HOME
+	bit	KEYRESET
+
+	bit	SET_GR
+	bit	PAGE0
+	bit	LORES
+	bit	FULLGR
+
+	lda	#0
+	sta	DRAW_PAGE
+	sta	LEVEL_OVER
+
+	; init cursor
+
+	lda	#20
+	sta	CURSOR_X
+	sta	CURSOR_Y
+
+	; set up initial location
+
+	jsr	change_location
+
+	lda	#1
+	sta	CURSOR_VISIBLE		; visible at first
+
+	lda	#0
+	sta	ANIMATE_FRAME
+
+game_loop:
+	;=================
+	; reset things
+	;=================
+
+	lda	#0
+	sta	IN_SPECIAL
+	sta	IN_RIGHT
+	sta	IN_LEFT
+
+	;====================================
+	; copy background to current page
+	;====================================
+
+	jsr	gr_copy_to_current
+
+	;====================================
+	; handle special-case forground logic
+	;====================================
+
+	lda	LOCATION
+;	cmp	#MECHE_OPEN_BOOK
+
+nothing_special:
+
+	;====================================
+	; draw pointer
+	;====================================
+
+	jsr	draw_pointer
+
+	;====================================
+	; page flip
+	;====================================
+
+	jsr	page_flip
+
+	;====================================
+	; handle keypress/joystick
+	;====================================
+
+	jsr	handle_keypress
+
+
+	;====================================
+	; inc frame count
+	;====================================
+
+	inc	FRAMEL
+	bne	room_frame_no_oflo
+	inc	FRAMEH
+room_frame_no_oflo:
+
+	;====================================
+	; check level over
+	;====================================
+
+	lda	LEVEL_OVER
+	bne	really_exit
+	jmp	game_loop
+
+really_exit:
+	jmp	end_level
+
+
+
+back_to_mist:
+
+	lda	#$ff
+	sta	LEVEL_OVER
+
+	lda     #MIST_ARRIVAL_DOCK		; the dock
+	sta	LOCATION
+	lda	#DIRECTION_E
+	sta	DIRECTION
+
+	lda	#LOAD_MIST
+	sta	WHICH_LOAD
+
+	rts
+
+
+	rts
+
+
+	;==========================
+	; includes
+	;==========================
+
+	.include	"gr_copy.s"
+	.include	"gr_offsets.s"
+	.include	"gr_pageflip.s"
+	.include	"gr_putsprite_crop.s"
+	.include	"text_print.s"
+	.include	"gr_fast_clear.s"
+	.include	"decompress_fast_v2.s"
+	.include	"keyboard.s"
+	.include	"draw_pointer.s"
+	.include	"end_level.s"
+
+	.include	"graphics_viewer/viewer_graphics.inc"
+
+
+	; puzzles
+
+	.include	"common_sprites.inc"
+
+	.include	"page_sprites.inc"
+
+	.include	"leveldata_viewer.inc"