From 9c249dafab61013b7301aad0f9bd5cc089ed17c5 Mon Sep 17 00:00:00 2001
From: Elliot Nunn <elliotnunn@me.com>
Date: Sun, 8 Oct 2017 23:26:23 +0800
Subject: [PATCH] Reverse 68k Color QuickDraw

The ROM now round-trips with QuickDraw mostly built from source.
(~30% of the ROM is now built from source.)
---
 BuildResults/RISC/Lib/CQD.lib     |  Bin 155760 -> 0 bytes
 BuildResults/RISC/Lib/MoreCQD.lib |  Bin 0 -> 15874 bytes
 Interfaces/AIncludes/Processes.a  |    3 +-
 Internal/Asm/ColorEqu.a           |    4 +-
 Internal/Asm/fontPrivate.a        |   78 +-
 QuickDraw/BitMaps.a               |  171 ++-
 QuickDraw/CCrsrCore.a             | 1828 ++---------------------------
 QuickDraw/CQD.a                   |    2 +
 QuickDraw/CheckDevicesINIT.a      |  810 +------------
 QuickDraw/ColorMgr.a              |    2 +-
 QuickDraw/ColorQD.make            |    5 +-
 QuickDraw/DeviceLoop.a            |  184 ++-
 QuickDraw/DrawText.a              |    2 +-
 QuickDraw/FastTraps.a             |    3 +-
 QuickDraw/GDevice.a               |  912 ++++++--------
 QuickDraw/GWorld.a                |   32 +-
 QuickDraw/GrafAsm.a               |    3 +-
 QuickDraw/LCursor.a               |   60 +-
 QuickDraw/PaletteMgr.a            |  350 +++---
 QuickDraw/Patterns.a              |   51 +-
 QuickDraw/Pictures.a              |  161 +--
 QuickDraw/QDExtensions2.a         |   44 +
 QuickDraw/QDUtil.a                |   21 +-
 QuickDraw/ScaleBlt.a              |    2 +-
 QuickDraw/Stretch.a               |   97 +-
 Tools/ToolSource/Vectorize.c      |    1 +
 26 files changed, 1240 insertions(+), 3586 deletions(-)
 delete mode 100644 BuildResults/RISC/Lib/CQD.lib
 create mode 100644 BuildResults/RISC/Lib/MoreCQD.lib
 create mode 100644 QuickDraw/QDExtensions2.a

diff --git a/BuildResults/RISC/Lib/CQD.lib b/BuildResults/RISC/Lib/CQD.lib
deleted file mode 100644
index b970d22bb0cbc9f6676aca7583924af1c9b95e35..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 155760
zcmd?Sdwf&Zl`p>auq=eIh3h!R1^b}5j&N*Q*uJjg8mxyOvM{o+4H$;ThlEN7jI7}j
zt|#S}if1ULj6)fQaJd;zhF?N+GmJ|ahSCgIU_u${0YP0#C_@M(U>vUF0WNikt@Hb?
zeI!2!X*+l3^O-+>hI7__uD$l!Yp=b|eo3KVN;P8>nL<5x>2g1Vdn!BgRJm<IMSY#k
zU0yqPL3MdWZGFT1%F4K{><m-HGsaXFEmIYWjD_3_q?$ZkrboX5!D?^ip&?1~sfB7$
zC#+y8f=6g(*&Q?Tw1UUcFRimLXX=7xrePXeFVh;g+WMu?%sQ4ja~)H$wCUAs>RW1|
zsUthH$^C-+Wy0;e%`BOotZK?_{N9-K>R9@kkMt~-nkYfa7UTPpBt?+A<{2l`kI9uB
z%@sFN!W!poX;5g>9>`xONlTezL9LYbck)VoOIIzm`wr;yp8nxZ(B#T=W+9bnj;X<t
zTxk{B6jOzOnh73*iJA0_C4NgM%t8KFyiQR>iCZUI*-U#g%g0kNc^y+Q3$LXKZw1Td
z?;OMx2A=Bhd(HZ0gqnR>NNHvH0ZoVBmnOJ6W*9w$HS!SdY+;T}V`RIK!_u>?UM8(Z
z_%on*@BCWx-!Y~2Gp5dCf%s4!)6QotTDDHfl<OWzLWcY0_y3eJZ}RaUF{L-5U^ioP
z9!cHLe4i=ZFE`eTOi`JqwLN09jj4xzIN_K#i^JpI^!(IA%O{-lrW7oga11&2J~Ma1
z`_K59W<p44a=$Dz@w__gZMH6+Swm%vS>st{$o-S=paI-}>i$!-pC%K$dUJ>s+a5`m
zOATfdQ@+CHK9a5yKeOsBU#YYjSF4$Eo@t(C22*Pp)A*F82BCKHa%N&P@t(o*@y=%j
zffVqHu>;^zJh-HQFF`OMhtj9fe#*2g*;pgYV9EMm`RauWd;&qw0$(cN^8Xq@P7$$L
z`rx;koOQk&(PJr9UIBM+SxQw~0k2s~)t3P;SxPk)z;l*TZ8zX)F%vP1;d<Xv8n+Gb
zFjCwDd=JkVOQ|j$u%oU*c#fs}v{}}ydXY({+Rs>V%|{}u`6xpo2}R#}p8eB=y4tx-
zU$<C_Es5pT^`6@Ls&XefT1`d0&Rwyvs=Q)BwWDHEEQ<SB+*bBaa?eu~YMG+gy?`<5
z8TNxLA+K1GI(<<2wjwn!y8|-8)&*w&jj>|}<h3rK{2L=eRy^xu8t#4pu6*ulfU79b
zh#W5aJ4+?Tj$V6qA$n|6#|**DwE7?#Q1VS(%2=V7c+1#RWoD+&LtLKD-MRkbl%vx>
zQl#d(SVFW1u3;L)9AkULTh80T5L!H6s9jWRthG;`>1TT0%QdlH>s7lZi^>24kBVwO
zQYqXoqlA$^V^iMKOOu4A9}P}A<<(3d)b5{js^b~=g}e#IR_Kj+c{4!i49JOEuy#BH
zSN@2rDC)}aY4aGT(_m~e|CRe?jh3B70fT@)r-A^x0j{G}X0U&bw#v+xEc&X71~h`F
zx^b?}GqKuT-4JaPYK4E6TOodjmc{RMFNhR7ZySn*Hsujxvtr0KgZ;f%ZEset75q%w
zv3!<QI)rxckR~*Ga_310cvxr0j4V%XoBoXSo~u}U-<zP#W|LU5PearuI_LFEI|~mo
z16o1fc~qzIF%~8bW<S96_GXp>UK&^`wA^9Rm!0pjY+t1ZdA??4+4dF80=WpGr3`2(
zeO@+8ajsx$_c6^4aG62tC|Md|&JWs`GmZU+O!<}?p>ZtjEwv?^L9;2XOpz2s7~1MB
zbyTmLg_Weo1rKt4QG<`w-jpsIxs*)pOUZkVWrGGyK>c5=Ojjni$4w!y{)X}h_+?^$
z?_)|Qm5V++3GPxr9bloW4sWx|EbRo$%3Z;X(k{HSq&=KxOmQ@KuC!%NzqH|ND?zCd
zZyn3ZZPR8(%8h2}z@eksOs^q|c_MhInf?oHrqeII%DH^h>5n+M>-{|CYPLop6l)Lo
zas=y-`WeP5uTI+w4U_Cm5)-s0a{08{0|YnNf8!ENEM2^qnNg-#^yh?QvY7XD-qTLd
z!F}s&{SjxLiKXT}&HcOhdzs}qrf*-#wE1Rf?@qt8yWMufI?Ea<LAVa#8iemb_^xPp
zF~YTBf21TAaniO~sGqb064j16Y%|VxE|&%fuVEL`X^^fMDfCi1QtWs_3SB!=02AQ=
z4bpa`+xCQXdZa5s3M$bmZGSvPeugidb1GG^3Z5I)%c6X8*?bz#m0KfxeK5U0Qm)PX
z8ft{r@k@JHR<>W-Ql^yc0*i^MmDcY_`6i~@35(z&(xLWyZrDO65T-|%7Gb*)w)cju
z(8L72ooW3EKEn;$Z|vk=^-xsbvY$NZJP}@hp}jD}_9@di`j|1=<~pD9M78m<@v<y0
ztlwBX$qPBSRkt4R>yR^&ic_fJe&S<dn6!-kjHzvs*VIsyEUuGXrZt7iJUvg*O>(8p
zffQ(bPE!lR7<Fiux54y-=U2jPQqNe)(pfs*MrOo2i)8`#K9Y>Qr!jg=diO276Zt!V
zzYXucC8ivD596_6Mm<yJKL?K3z9T(vW14wCmp0^?qm=P-xjd^$hKUMc{-FcX7O#4G
zy|g8&JvfaiYdEDfOJ|c#nrT(8)gL82KIsg!AvAYD`R-fO`=$5vXQ&k{W~sAd1?eid
z4t1=k`Dm&Z<J20a6N>d`z@4qeV(tFUpjX4&yp7u22-)}fjW**vXkBAxGt2ZBtx9!T
z;WGLQSCLlEg4?tz-=8cNMZ@z)LQOm*Yn33T$#J7O{CYXguMS`|FwS7<-aRB!-mL*9
zj}EX0bDX!Q7Te8IE~wUXZF-tCti?>4>l3RHmPQur9AkZTzhs8ie06#an>uqjOXZ`F
zj-_!edVnR_p-JD0^RCWCJ4z?<)=I~-X0UAJX+YlDGcaO8Pa2-LGPUWTbaDijpCxl#
zNngN~Mfs+|x|4FV%+m2^94y-i-kNe)LjES?KLefJAihAZFSBeEnM4DX3+s_vfnKIC
zn3|c|UJjc_9kqGX#jv3Wcm5`XDi9jS?V?*o&!yKhyU2=S)*vekW!{1Hb%*H+@2~{>
zV*6gWQ}Cq0pI$P9356fPWyF(-&@31D>eWxLX6nGx9e!|5tuJQ^UpC&%yUhMhSsY1M
ziYR12Hd^u+{v}aJS~3rB7Z-pUC8)^)HQ_}Eph-=5>N+xw9;&tQ-9UVYUzqHJb%AdP
zsa3bAmgnp+{uPxbrckR29_WV5P%ksmw*$T)f<m3(nYj*G)Qv9tUP=RbJ<a8{n9FMd
ztk7PJ=jRxU3jm&H_`|sV6&BVzoE45avQbq}BY0RI!I=^oK*Mda9qdAM^nd>AmI))H
zzYebG$gis(aZZxsVWQPk*Ef)FuC3Y~HQL~FS2U9KfcUR8RMbbEwuXkfYWw_#iX<SC
zV@HC>+?Z=?ltV$^g(!Uy*m+8!$$V6Q#vP{m(4WvW{iE@I^HJ@AvGMTlAL}<Z8RwaQ
z$kOF7W0NIAXtF;oc%WmG6$+oS?rHZ088^L+O@@qoq!2vNxXCW&RjW3LO4Z4kc9u-(
z&;tiy@fcut>en)|--UWtGfQ4!wm(by#R)9{tv5)mYB=D^@TCa#XhnPnqD_TPN2{iY
z<<3DH*F!Ss3no<akrq0K>@zA~fK|l58IglqY!?wYfEN7)#RB#K7yy3>C;(mpv;h7J
z&<c1N&;$4(U;yw6U^^ti$9^4c<E6zGO?h1dnrWh~rl!{6m|s_4Tc;yCPj*f~8$|=j
z6?HoC6&wq7)-IHtlWOhta780Xx_&LUo+Vw&EJpVumVoj{{zO>Wf4*bH%Y^yPW{Fz|
ziRDPE<nd#22(9><GcjvfDKj`d;H?1bS|8&TK4yS#M`RRVULIL`OczVR@y#BMe-b@A
z{=M;Uj^fAoka*KNKeS9azt+8Ac$3n~l(29_L5pwfw%l522sYcRrukV7G&(^pnyFt)
z5mqy;nVBP=>4W++lTJB4Wy*^F$U3fBw7E9PJIx;Xrqe#nKK!x891-ol+_kWDO7PZ7
zMfpW6xlA$37I^_riLjO#a-G9{d0HpZ;L$=FXWIrRABH@&kCv)8F^SdqlF<ul2<NQz
zEIEdwq1KoqHJDl?4_Q`9Ye=ET<IQy5z8=E7z;jF~ltQ^Aa{AT?8M)TTI@s3np8nyF
zXZa)hhPT-d4qrC5P0TjVbIni}`B>UIPk+QQuYY(uo=bSXk7vLAptRP0Fp_15C5opJ
zPYWKG-5mKdJoU4n*&~5z%hg{WzMctwWv*b&nRS`jEY-(y(=zS3u1H#D65I)JuV6L9
zmuIbDIT1JBmPifWh0^g?*jnZSH9kG8B2#z;D@J>`1pja!YW+gJHO-J>VQgB(@Kw8c
z_+NO+(oFyGWmmq3`SK}^9$y15VNR%`Pr>X~gNZ3z`P7}5Zkl!YUqr?d(n^_vFu=W7
zuvhf51|h$J`BR`@)4i3-U>WQWuXZV$V(=A<IpGb0HNXrg%_j&Jbu3-_Xu8y1pFvbp
zI_L~-i~0iiLX>%nOH@LBA@iql%-PW#I!oMAmU`Hi7R@uWkQE`{rDm3}+uEw0<%qb@
zD(>NSylaMc%<>QKh!o=89w|cmI+a%Gx8TWQ8Vwe7`LwXzFXuX?wbLAtSMbb7cpT;r
z{Ai1PUW4sX&Jsv<ya8OJT$#@?ORinoJ<BdVblQdag(k^0%O3Ia^otkvM;f#TnI`fl
zKCR0i;r;+~L8?}0QMTS0x)T)UhYv`0SJ0<k%5q-FwMwtJV12K!7Cy%kfT<ZX3Z5c!
zWS`!_6kdJj|6~n5!4>r8h-nBhtkNN;0BLCu(|DY^E_my}f{>`yK8J6*`URmAi0fJJ
zw7YWHWVBj(fQ56I#u;3zK9a*GwrW%G#wg$jJ9?~W@0JUG>0u9~5H)&KXqI;G0`K5{
z(Bqem0}kf;r3cboya%NLWhqM(=KrEua&el~zgWo<oHo=f|AOu7uwM{rU&XThWoGH#
ztabknlkTB6-o+Qf27FCU6-c8g;YyWV&~j?T_watT$;YybW;IFoj1)gl@4;7Ldfo(z
zFDu2&5?LMleR^Owpx=F8WM4fEo1mv1)U|36vi)_mFhT|qa#;?!fR-QE`ex~2r(e3%
zq9zPT`v|@(t=#7_4`27Puda51dp`En6*9d6U8e`3OQ>~+w^5r8Z-*aql+X;%=1t^!
z;VZIUz}R<J)(Vktll(;tDB%IVt~TVGBSEtBPn-xJjI7JG4j-Onlg=W|CMksSzKK>c
zP(Aa^l9zBLHh`LsF_KQqvLdf2n1}n2t1qCKW{oV7X%I5=%~Gh?EbZB2bC&bg&=i{^
z&7!)vGzc9a_#<h8A)5)-D(aumO(u^KTA-A)KxMXn`0#AAbQWJ0uSDyX07|}%8lwJQ
zrqtvmh_mY|a~2kvhqo+c$(=b)Q2Dkf_rxT-BWGcXdH5<~cJr9+mk$@R%j-q;<@Z>y
zzH$|2FkBl~9$(8+rsOP~<`|=G3ZaWGyDS#cDA}&cR%n{~O6Zv>wq6Bup_d^%rfGC3
zq-l^_uVR94zfe%fTAB1}cykUkim=dNf=<y3MQRFdrqGIhHZ@c2wD-VLM)?|<Dq$|Z
z7IY_mb|F+`W(m}b{7Wp#UT4@E4k_&{@sgc~84;UO@35rZY+mmP{|sMb59gheN`MEm
zu{lj5d&VWF5R&ZHn+Mjnhkw@KLaKX6mCRFxd8$l{vX5{BJMaqrWhf(qmm&D0We90<
zez}auC7ydH<u=~RQ^=*{moj0eeNmN=gtU8vwBPU&kz=5-%9t_lT%?2NTEcU6I&YUV
zXQiC8)Xb9JtSr&ooLgT}T0y1DxW;0d_s`P3k_2AMzH61v%9@Wb9eXZP!*Oak&Lyuh
zi+Ok(#se*86!jRLRKxwy`Ildn5T^9z(|9%9Z+kQ$J=YmwfJGRIhXB2RgMd2$9{~0N
z4j|{7$fxG{l$0-_M9!D6M9!D+rkpR~s+=!zaWtP7`3znQ%2QLm#B*}K#M5#<Lz<k=
zkR<0bQ27I*8R_FFz2S_U-Vl=0PfnK8Pu9!nCySJx`h!?h2Og5dPd*Mg+=W?k%)Vk&
zgG?gqU4#X>OdXV78I|?v`F2OjlyOpS8IkfV$avZxDd7jXgzpG%9vLz9G-5)!*HIWo
zT3NcAxpZq|lwkBDxy8K7iJ!r~NpQWkimBh%+aTvm@uKs#j<qEUb1#GfOqTjm^Kk$F
zZkA>LqFqkM_J)V>l?B<)XD7>j8sj&Tog3SGo!qB|uVmu^X{gtkM6u-0hJUcvNp5vI
z+z+@c!MbN2$k70oqr)N-QkeV)%N75bB*_48IPuV%f_MZ4%E7XOe0dWbkEHiO-Bh{X
zMd_QF%*N11K2BehUfD0xH&ab<51iI<aRVcDlhfXP%-_rFCg;5w?dd^dQ?z~ts^4&r
z$TEt+KYXAn?mBNzw2tyw)&OHToxwSclx(l#QRFVK546C4PHmt?Hr0Hj49`0^T*+&q
z6IptTtR<Ybd}XErG&+e!brlmxZ~SM_3HvJTlLNM1Cj94=&Lvtc^JyrZ`1JV=kxeUi
z-cEG3B|0nf(T_?@ENPwk=G@=-yFYldvc96YBG%Jn3HXiN&!QSQ#@ive{r`W;SByQH
z5<PJ@61j$vCuv~bxktx|zmGP+uDeP6<yy%S<0XyNWBO8JRBLIC{s<Fk*3v&b1Q_If
zu_Tu3OZ%V(=?6v6Sb0at19A5MeVZcxfctg1F2B1+b@|;9)Fl<l4HI8j3rl1cR=`SG
z84Iy4tV5k=1MEH<Vv>rfR4TnHQDspTs7h63s*tKn)vY?O8c^L=4XGqO)2sA)eWKo?
zFVL6j%k&|Am%dwnUO%9}uOHG&i7Zi-s838xv?LZJmL`@Zh7!9HyA#hR4kX@B97>cd
z%%ZaBEr}M3rNB~ZDYJwuU6yXkdCP$1zGcWF6|e$TfxaNIz*109P+Cw{5Gv>@=q@;4
zFi>#6V5mSUWu>Z8eQ9E;rL>^5w6v@=RN7VAU3$KBp!9y}P^nbL%2Z|gvcxh=SwUH8
zSy@@AtgEcM?0nfk+5NJiGAYDDs*paE7_x*4LZzXyP$<+D>JFU`4TSE8hC)&o>r!>;
zyAr!BT?JjGU1eRNuCA``uJc_3UH7|&x}<K_t?JfyCw5!93%X0Y%eq6|UEST?=eq~G
z?{^P%OXt~n)p`B-#PgQ(1?Nl8mz@ut?>gUo{`~oY^Y_mWotFmKfNDTLkT_r&C>SUm
zC>sb3bPaS5oF5n%xIZv7Al+y8RrmGx6YpE@7u+wsUv@uqzw3VY{qy$+?%%&ZbYB``
zL#iSDP~wnfs9>mcsB9=S)HT#Sbbe@H=>E_UHb0;VB{YKsR!U%pgeplOO9E;M(T+#M
zkv2vnYbv|$6lN;1Ex^vmdW074bHCiikm73NR(W)zG)AP!N1Bc8PU|>7M!4um)Dz9O
zANeqfj7#;zTqx^uG*6&$>pX5%{-Ip5{`ENja5`R>gHikjs>>gy$!YgENx%PL?9dmT
zvc8ZGkgYnha-4|1HGl`^1344%N`yZVehMCde*lgFGA}3@{168+HF$Eo6Ok|xkvuD2
ziO8Rb{2UGPCnA3$@)OEL>T1ZJi2NKq&kgZHeqI#vL(K5NPsJh-LWT!^A_@5iNE}II
zIMq}#<;FiE4f!SHhbYNpBEN+E5F{cQ5B$gvn@A>~Q%xnq&;L;c;3q<<S_4E75kVQL
znp6NGB?o1O(%^~U=N<s$NBw0skQ4b)f6fvLM*Z;+mBb=SMm2_?mkdAu2S2fmvf_pM
za~2XB)E^Jk5L6;RagJ(FHQ?xxpM0FnR21@~{={-B77zTy1hA8nfC{4iytbSiUNZdr
zACX5506%9mkxC3DCZJ%>EEGUY;fz4xoN6MHDn|dP0#qmwO2iRCgoFyF!l(cWgo9_M
z4Dj;^%1wXpBR{c$oT$Gn4#>}gk)K+OvxkyUjXBj+GG)O(BqX*|(PR{J@gWu>m?VQ*
zm$Q>lf<P`-AcRV#oFrnzW-2NwKr+jzSXm%s_9K6^fq88?IaD&w%^QXq1LOe{3gTqS
z3?(KK<A_<Hk~2jnpQz>~^NLYrr~*VZ5lY0N08WHlMY#ZE;)p0SWuQcOxQBG+=R=KK
zWvz;@m6_$xme=WPM7G$WC!z6f$QtSMi}Y<1)2~lTO?sB{0t>!s#^AwM4gbbJ6~(lb
zW8xb3---wHoQYzw6Bbz323b%3+c1q-#Rky)gqnYOU7U8#mF+SWkLa5UTp>;UZ^Z+f
z+#u`je``+Y@*PoKzD3sM^o7x551(9(F|ti@!MaRoS&z4Rrj041P#uMuDAY!wE(-Ng
zm_T&R>&Dk2wf-Tj^;I#ej9W-+Q(Xvh+`%Yr8LAOVWoe>N8-=<k)JNeLaL4fa7W_wH
z25$~UdGoIOWz@xrkdA1`9=SH3xW;ly;GCLnW1K^PoHKx&BY+0t3}A8;rbgjZ`l@=2
zQ$ZPbj8ni3&LA)65FqCaAm<36AsU|?g{e{a1>7;bF;4yaF@J$m!SS4O-o9>KR6ENt
zyhUCMndTq9I=lt%e;Ix)uXtj%(?7h4&v#ChXIc&B$Px=?qYpF$6j%-E6m*$ZQ74Cx
zAF1|ZzhM{45Y^g^EJL189bH|*%2q1on8wVwy8a5^jqx;ZB$$WarnwjQ%g);&Hml-E
zG}$qCjc3QA+8A|m*-t3Jlc}W@7kRa*u@>_YDk=dpQyN-9alec?ebMfh3dIuc^2zIE
ztt{zsY`rTF^T|(IEgM}2i>*}6!zxxL_Df{eVYTQI=9fiF66V9S3;KtD2{>Uvf27{0
zFD$a^53jXqzlpW3n@%NGOBS5OT1n$t#m6hL8WX^N6~+`u+a@4o=MgLNW5vrKS%Ebx
zZKP#IK4#1MutsDk%x1b3$~DYshs$8Qmu;|EluU2MdXmy&xbDPyme#KZ?iIA>r<`_E
z(YjX>Ujs|Pdc_Ks5Lp{r<v|PAW9I?Zv%JaxrTxO159%;(t>@(qqCU3Pb6V*$3CpqL
z*MN1RbefaH99wEQm}`~ZMgPI9qjV6fM`vTJM_W)Htswo!t`Q}bpgehv$TW71h_C)=
z>w-mCE20%3UfZcItQU#Nv9%zX1Mo4naN*-CLw0Z+dz+ku!CmhNb@f_lrKmjz>r_u%
zEt1oR`dD(W^>wr!<ZA`39{n*ZN1)`-AfwArmM9ciu=B@mt-;2cHLS46qI247?8!{P
z>J#d^H@w!8Fv}`+IIVE$;d(O~^A`L%_z&<HEnIKQ>r2vGfO~1}WODBxw?>tC_Wy2;
zDsd;RQQ7*a^@lrGvwW=1f)9-!|M24aT-)$_San0MS7ZZf0FAB|rUOi)`U55bVtq-W
z8@s;5h5`z#^ECdZxf83&&>45JCS!=~_3E*nI3N9Fv4~msG3#QfkFSfZVhN8hvv?SK
z@As}tVcqZ*^zGHOa)$Mz%k5Y_^J)%ZZO>;wT-!8jWbIC@L`}0r{@cHE^~wmX)QMFq
zu1jep3;yUT7WV8np`;}uQyqnd`8G;=*pAgOrB%8f21L7tz*(%%?X(supmiGW{IKu4
z4L0!3;af0vMGst_=*z*3{f_yLBUtTiQA56Jp!atmtbGB6xmz^ww~HEiO_;)=lMK6|
zZClx-Q*{pb@<rs6j-Nh}>yWygCoZl3q?%UfO0bH#*Dv+=&26Z##5qHkf|r7KnlA;<
z_DA+PKe)8{(q>Tfim#~8)nLD9=hSH+3&4gN9S=bVN=rVWb=Ad}g3gndHX!sKINsmq
zBwUo<o5gFOy>u{I?)Nksp<b~oCT^Fz{YbEtDKLl5dLjSa4V2>*pN?~8Nq9Z{RQrT5
z@`6`qX;)-J@RO}sOb;9Z=ASBK$y8}JV5@D?;h<mlS6#Wak!)bxDnP4uEJrI?JFq(-
zlE&S3xXqC)p8<QUvjtU0rZ2VQ8QQTRsPgpKF|K?$VrufaG16s`q%EqYaga`W<eAj0
z3^gw^sdF%L#UE&(@lO@+HFhlPm?0RjV<MYMG?-By_8&&l;IenD03|)6;hcjmPyg_C
zv|`b2f28on9AGU3Pm9_eWo(vpcn9b&t;7C_X>AjVBX!UErQOUT%%ACxc%y65ny>pK
z*a;xA;kU8YDO!re<k{>-tyf!5V<MY)(FN$$$@$Sjg<p<i)@x$2X@2fOsYKM{T_kEJ
z_ebg`6uTb{zWpjA?6ZL#ty*}T_8kPp<c|&x_leyBM*VkqTZ<ce02+Nx_>_^wJ}c^1
z?=`@e4`064%;K<5Ap4uOd3<L{O0)ePC-(o47E1w+)k2{;68NMe_?J8F{z2@T*FiVZ
z`n1DW3Jzuqw3>Ao`wqM79YUynqidso5F=4oppoDeUy^+fe1{;{OX?l=J+Oy|&~9ci
zU(S)oa%-h<9^>J)!-w;joGY6C9s4_SjC9EU4lh$LuRAN=6WPaGNdI9pgp?c2!|#Po
zTmUW728_u%r*#GP_`_vz+|wCytEDY)tDz;8us&9|+b{~RSzv`lpuj#uW!P%_S0zK<
zZ6ry82Nddan^{oW35gB?{~qXr7RrTP%+$v1@=7<{%~Jahu$GVKiV@a>m{VeotigE<
z>^Ls6)G@sSHUndoVlvjacmCp_w1e8e-XD3PmBnp%g{4i=$6-zR1~{oVSsK`7tmy6a
zM^+#6N7lS}cq|s*+t=q@@=H5D1P+96K>q{&LQ9=;m#y_(?AUm*#{mwt`E-cgHY-ra
zB5UFQwy*dI?KMa}jCU*b{Y&kRi`Gk4_^-4kiwQDBnky|#Jy2+tu2_`q4)EtiC(d|C
z4b%LQ`H_X5{>XwNzjU^yzmN^Thn~>*@$!#Xe7tgYDU+_5BmZqBPMy&1n#fv{u7+9F
zAD$|ncqa7gQzBCakXj_(P=DinFh#J!ZfO9QlScU+<Fw3W&R?y}U+7Hi!5rnYm|lXl
zQS{j$=bf5(MqH7(s?H%R*?X0EJ8pkb5v)6`_+x(&V>##%FSJgj9ACEPAKP6NYZ<^K
z0WE~_?Fj6(bngb|ZGo)&CtA`m`<b^uGPmv%z?~86Uev@a>xtR9o``;=l#%^uqqaP>
zR!XK7vd%fiEqXOhV5u>Zz5UCON&YVQ*rz95DCkXA(s)><*frZcybt5d&TRAzu`$yh
zN%>`n+6cQ95`=udo?9%3R`;=~rRW>8acZL|DI2{86mR!sLdG;Z@lDXG2flUz;U_~M
zo;ZRri$=KN9kVrWI_j&iFQE;+d56<+33f4Z?)PeAZ36o_A+rKwr(sW}ETgNbhkx5w
z!lg2eOC^g`{(iYsHvS>Gq@5&|i6>6|IuyvrR+OsxDvLFrxUZZpRrXcxD~F}?Lb>C#
z)r$i%2(Q_7YWJ!7%8QORVJCfmE%eSlWo=X3*mraPZ#ETbER{KNR~-RiU+_-PgqK7$
z-of?%qp@b*S?S@O9<4RBY5iY(c=p#nFVxOEFI~gh{O)4q8SAXd$g)CBj#*lL=QMi;
zI?@lA2}t&70B!+&%D+z7=MXBwUF}0mxbw>if75wT@_SuW&S&ubd~4%eF#)6O>dwFL
zHX_uT9pdHo|9q>f+?RCcmn;)GR(QRjW7%i$aXQSAWuW8`D1i*Tz-kUMRm6X%r+R5;
zxljGsFRTCh%KEFe-8Mh=1+iDey#awzt)p~0p6;bXa=O2{vhk{;-4RX4B%Dx;rZZ7G
z?YE9t3EzbO_u}TO6?-a1(yhZd`6BqZz(;$38t<&+Jk82imfKERFWE+UOZAL#4;0@+
zA6{Il><;d8-02sdkybnVv9<ICOI(=r&obZ&+&O8;<b2xTOGoZyhhz%&UoF2<4js8{
zRbLIyBWhzjB#r=gH)wG9VCO;_+2>*E>3;V4Em0rSzkaOp;ate8NcU|Y>|*S6Qd19w
z|C`YhQ8gk{XAASQJf>#J6aD_QC&Qu^lc7rvL!)=MTLr_7_Vs(_{gX5Z`RH3i((Uk;
zB2~Pv$mo~CMX-r>cHNv)?<mDMRbSc0#I(yBvemucFW)RwFLLIq?t~{;7df9{z(G5G
zZo;0zNhB7aGRUIhHA%o8n0A+S6?($(4iV=jB5sV!H8kcKote&yC-inH;xF;3drtJ6
zc=JTw#44P~yjfjuD^!5S)ZiPzy;(s}`rlE?J)s(5&-|u6_=C#e`o9L<53-uDOGPKS
za<NZLs=<4U<l*I(b4@TCblfdeP^qwxi@Z9QnRf5h+eGC>D{NHS%Uak8%h!wkPcidp
z$C!JkwZ{g#llI`dFuGO(W*MDAKl*Bav|iYqMmUGt!+z<3B?Ozb9}uU`c<HceMq&rC
zV%RS|64gS#G>Cn=m-&7-+9~!5xYa^mz=%17G>c<6C?&UjYVsyxTn?;Je7d6EF1JIG
zUs^nS;%%IQ<ZbDf4i#d2%a32n+8A2oYhim|^Jf>dCoWgiIl#023uiC>eBL?fdR7z1
zSc0)B5E<m}A@J*MNeNE<(rc7QG{K}cV-}^<`_h^h<<n=$L7ZMtLmw!yONT6GrXbzp
z@D)S%o4J*A8l&W4va#!fM&`5$AI>`?4UuHo_dq|Mt+&E{LI^l{(!NJDMZ?~K1$7d3
z5@L8>E5`qDp1@PqN~i7bC>=O5twQK&l30_%Sw2o`yQK$^fE$?<@0U&r)zG!s?I#6c
z{a^p+tbY*p7e;PKyX)df%Acul+DW2rwEyT0qK%{{*Ck~&`XvkBqj{6>(d>o47p|Mq
zRlIwp>uCF{^^NjB)cenTN%&U2if7C>GkjTjW@)WYZT>s#$y|vedcY8Uu9lf2i^1bd
zJ~dm&tb9lGRP2gQMSP{*$E9H(*$pchTLZaSOfxQg-bDoq?8RKvLCRVLD(%?+ti#SR
z=$OS$f8;Wi7%l4oaM5%3_mzd6v}8f!v=GjbD&^Kq+h_JmL%cm1YlDQ)K1I>&kCe`8
z!k1pt@DB8c5}Nq}Wqj8+=^oSk=x%S!R>`}8zx*pew)vsQoQ($~r6T)Rw+mlHIIHcC
zWOZbBJR{OR&qDOh7wBuk&+gyS4zl<OI0u|AfgaKQf=}5{i!)XU8ZEoZuwn!FFMtg2
z8h`-!5ug?DIv|~5_!zJq@CINf;BNrKIMtBOZpx<`3YNZTndGq5I2=w}9ga5C*>D!&
zX7nV<3$T-36tTwgk{S7;f6m)tXkKj|zAYyjXeLXY;Izu;WfME*)s_`c*okL1wPxb}
zMda_q^PcSI?+*D*Rt`U@@d*$cKvNdG6{YFLe9NS|imDo09nQhffs6Pk1Z}ru+Tvc-
z!u}TK3m%+*pUIp)wfj+A0H;j$<5Y=ealf=5_Wu&852v=4IBy#S$V5MtYY@w@7nHj)
zU1n*&HyJTE$)B<eu4~-Y%;VeU*Wxs6GES!$a&dA<I*9m#aA~D?;iBg_rJH;><}&1<
zfAvF~9xcka=m31*3GKZL=`Q-E5cKE~gdLMlE@7|WLg^549^p9Fxj+j>tz+zvXofr=
za=yaq?D%@3*l8xDlWFw8CDYhIb^jG^382&*$1>DxCb<lm6gS;3^|2*2AE|Ll2D8SH
z8}#6AoFuy`d}#Slz-j3DwK(kne0aJorTQuFzU9jBs+XF@bP6F%DV`Vyzy*GS+kH%}
zL#)ipWx%TcVhU9+KcCXeX;}lRCURE*`FL#&TVpHlXs;pX?f6veG)-=0s&suNlUmiK
z_$F~5Qyp%)-O7}gO)J?FQ^V}%So!f5I>Es9V=nAPz%BUV-!5q3S|@lKo%yN98yEhQ
zG~{bJvDN5l|8D2&t5P*qw#*pBDKezQnF^~<qn^i>iLN(?6s#;BU&%_MZ1Paj)4qH;
zO=ET4Jj;}V*OV-f0~)LWRrqOWh-0eCvUu)SgrCk!<RRs?pD9>Ch0rt}mnl>Fd=*Pg
ze~wii&tYl4lmO1vC?6RpZ!~^N6-z^HoT$xIU#Y$YU$8HFleO`fK~7LsvH0|F1Oy%@
z1mckQIN?^F8NoeO#045kg#r(-xR5d(rA$JaT|DKRBPr9(&#{{0@8Rn-B>>4%uE`@z
z2j%z~SS{mxoGr}HHc57~Nvb^d9&7h%kYkt66v#zdJK9bQ=*lBX<oy0<{tDI(9J@FU
zySA9cO(<UQ!N=c+OD((7iYGq!`1@(ax|e`=k1su7b{|s=03$e}7~~j@Be?dMAz#@z
z2Zqu!y&B{&`GkN0DUTD?a(czR5!y3nRN(Fm&O2Wz_>iEl3Nl|(;3=ftPJB@8meV3m
z4;}@;gA{}Yc-$*;99k-njdK`#TbS8dfp?CxLWolaC9HA#3;`3;TQNRa0NccTia`YP
zY6CM6k|n0O;^5APJ5AIFo&!uWfKQ52X9b6a25?=0-pmYT<VucGzY;sRa?rmI;wdHh
zOY1<t(?@B-NeH(3f8eZWYXUZT8p7C{%nTwMx)vJ^Qm@M=7ljPmb-?m)-gY|fI>6~S
zP-+Z5gPqZ_zB;c~sLh*T_mydg2ArAD<I(16xy&E7<Y7C0D>L}Cp<e|*V}{v53ou^5
z*?vpL>+>ubaH%m{r03@bUzTyiFuRXEQghvXn=wTQ<4P|L4$$FK*d1Ai7g}DlXfdwT
zkou<cZFiz$N)ThpCK^*Z&qW6m0P?>x<~$hp8^*`KefTl|!N>fOQNPfX2QAMOI6<u?
zT_~7vVyw-er5he_o+}KB`;b}$#TVG8QHp04VkE4cJGa(7w{}5Ag}Yo!v{%|3725JT
z+d>*3C(vtQb$NqRj;nPyaL3%*@(S*#uU=fCtM?!eA4_$Vu^vY_-Blb1KRhV=IhF|&
zAiHRUYn)qQtDi_O91Y}Yam2F{g;cvMYkAomD~*OV)$R%ny&7uO+)Xq$)DovZl{u|B
zu4S5&RQt)8s=^GG5q(bqorm5bT@jP*zPv=vrFgELQ_Gr|MreYC5gz3ujEHhEIp7ox
z!prOD(a5?2w^T5Fz~z4QCqYWbM;gpFvKlc9V~QHHF{xz?GImT_i?1w<GU3mdrYsLq
zNntOV|0;IIP%g#Tgj1!+lc$B8vb+fx5eDp#d-$LYTI<jU^x=M{Lp$;oh5h{i&j7{}
zvhxTI##&fDt>@FAjd70L-JYKTi|Qe);d`BSpZa8I!^v4#ZRWiPLMZ>CJnR$Il1&L{
z(3<884HzQ_@_Si19#>K?tMq)BAEv%&q_^G}#{4QuCaxu^jZHJEB@a%KG`LLsbQW$P
zc>HwMpbHe=MP9AF9rlQNHR?I$lwY|Kb4JGHteKyTPxa*(t*+O7S;l#mJ1iMbDxRs9
zA7c0N3}(8xoE0yy<t}G6(oJKNm}TE%-vgL#Y{JR#Nlbxv0#o6g$l?q$(CdRUt!P(J
zFZ_@t5&eKEqwB%?W;#Xb)fpRb_B+27UxSNnP8-fn_GT$?!V+g4ktbQE7GD@Qvs_i5
zDp;YJrHW2!Hy8MZ5!e_#+n46Dx5ApMx7*88Q(XmC2FqPzK+ApNy!a!=mNS-?g;S9%
z=+j+1DBXo$m!-fL$PqEM&R$OEZBj>R!`8(bqiW|tsdt7=YH-@ndTBKu8ML@HMsCF<
zey;d>?mFu0(#<Hmo)_=DosO9?rq2S;ahAo<#;9FM3;66tEAA99IdHPG^L1b0I`#^K
z9i)T2spWoPdAhT*MR}z%Tu~G%eY&pvsH63ILv4{+x`k6xH$=uBK1n`|u&eM~A1fO|
z6HZhl<HUXH@0X8<*(4t_k0FP>{Oo7eC?7y~Do$}>rh-;fOwFt&tA<)3w?^uv7DY|9
ztEo*4us2UQZP9k=MY|Na3i(MWv&#-&CfcPc9qkgJIn)%nO{g8@e5hN>Xj}1CQd2D2
z=fF{iFPX}rQY=ZKuHdP{5W*kg=7%<OhJ5z}^(geG!Du@SMd2XXvFI^F)K@WrjA-P?
z`>U%7JsC4KbUy*ki(>Vd#vs(jgs*K)-8}e|_(C4S4B8;>7ZR4HTPBD4r3mIW9^I&>
zb*mue7xF_(HS)P|9y^5C!I9X({7}sHBx<3*VtTC*U;DWG3M=z2Z!$DpxmRN;o_N5k
zH55;H4eS1Vr8$osm@8!T1}PW%l^*slhLEv;^8HHjsU%BjrLC{ppQRg;{$|Omf;_&{
zDBbxUvv`$tRj_(>`>Yn6sqC!uCY69Qdtn=3g)rDz;Z-(NmBmxuzkc&Z)3<bFhmf!1
z9(>#q=f0bwAw$DmJ2T=q+!nPmz(d^V^9pm}k?&gQsQHL&2hzVn6Z9_1GXm=&t6zD-
zhOVl-xRMnWU<Z@a>a@wB`9XvgB24WLQ_JyMVQ<K2jj?7%bNjB5F%~v9*T2X?sYc_$
z+58Kwur5r@0*LQ5=@jCdjPnaP2IIVEnwZ4}`(uTMLRbPHr|&|6(3k7~CTxKH0D8dB
z0Mh`mgOGpm{wrWP{PzHzfcF7Kzz2XWfd2>ZRltXU9e}?DB)o&LU<AP5F{Zo@_y~4P
z0Pu5c>7ei-K=KcxbP*6%h9(Gzw$OB-@eK;5rm+{V+68f26+jmc)NCq-7(u|T3HceL
zHG~9Peu4YQ#2)vbYP1R@CaXztL!pe?AjO5U)r6Y?8Z_m#G_uFj1p=N5cYHl=4*;A9
zn*gA`!PZbQ5%&zl+!{GNp8T*v2$ET%0rc1!CIGl=>*m^O;yv>l2roBCxTDfm&qF4V
zqrS%GZqU?Kx$QL#6YFes)eX*>MGZE4)LoDdx311vT~pmq0jCBi>*rWxFjEHkGAM|z
zbMVM0oEe1$a&)l_o{#4kW?G^Usc?N({hZ<`d|oU2XIf&8nc6yAc{x~K7f%jPwOd<P
zKi@6~z<~fYa5myaF57~t_$a*->*{N27s|Bj>oC{hhN)Ip;pX!T#Bv=hE8M41Q(Nna
z1Dfgvt!I9{6D8TTmDM#hlw<-q9I~s<Hn)PiJh;iDfx9Z|Z1p@$SM5eV9tf#W%2JW@
zP|I>2Id7{{=`I5^EbtukK<u?y<|{F_NG}NUFr#9C=GA$%)3<0@qxD<D^w$Vlf}JhW
zl5ZtxS`<uLk~g6&M_NMted9in_UeeZF-wydpO+)GI9sF@c=#Mf+A<2|z1H+>6-uHL
z;+n7X-UV$Cl5Meogn2LpSy307nH|~zE}Z|<*n06rfu2ftA?06o*;Z=FMR|<v=<gnv
z$ERh>(fcD}A1p47;1RFI@;Z>0>_MJ)k8;s>B$sVP$OUU-g)YxP6s4HN!}7O?VU74M
z^@P|T;o#*Sz|t^jEBL1a7lt@~+eZK^=k>c|sbPE|j?$2Qx>66SON0-F4=FA7w=}a7
zUjK5jUzqRcl?H%|+Y77^H<f8wao*G7=}}zda^B7;F3e*^#d$3MD2<yBu%cSNLRoIj
z&tru<TbTuJTc@p6X;IW!ouS)Xvszh>sg;?q-j*C*uMaY)iB-CpL(-~Aei8d=z=_OG
z&r6t(z^RR3-o!FygT7gR!~N5(gH%#hJ=#6_S0Tb*l*cSbY+hZ_iK3H5T}7wF7Qed7
z@j-d10{7^s|6*a8>IVy{Mv42)8Tm?_1S<_PA^t}2Vvt+N%=Owz?eSns!o}A_o&Ggg
zaI8gnF<63>$80`b(dnWON)+_QmrUiw*N#+rZym!)ObWqs3Y6yjWw`iz7}p1dCVc-T
zyTiDx4m*ORb=Wg;HFs|06l|31!u;H3>D9>5EDvM~XZ6)baSK&(fZy*ojcHFXRluNC
zU`|7evs5KMZGgrZrrwDeu;$!3k&rP_sbE89n|x=7#P6U=!<`+G!_(}M_ic{?rLf&|
zR<k4v?n|&q+i*u$3Fgh0kp%w<RtPeRC*U@xh<u*kF!`ei#o2Q*SK(Z1UDhg=npKar
zv2><A<Y-lPIS!Y%DnBT{yowcFTEz;nDxMy>j(KA|QWEaCQ#vtEP4g1)Z|AbI$;VW^
z+5X5W%m=^kOQ7&PbL24RdIQ2kDEYX)4!v}>z8-5msd>447JK{X4Fju~YPY|E_GU=S
zy|AG{xmj9_bz9zVyd`pf5mGz%c+HithAV^KEFBmmHDjgzcpyIHmzoXVVEUCz<;Hw)
zvxwnDp;Thyx?D5JrRIpu|H7(9(0JTu(Elxi4NNyKx(C*OJT>54#gwqR@FwcH{k7ea
z%ZioOAxRrzsxpSS63{)BXh-diQhj5y@FM2jNaif6FgVr;445iAeaJ7hWAhDebBOfN
zihkr0)=hdMVc;!7{M)#1BV3xx3gO<n$G+R<?0S{WRy(U|9BuKrRgv!Oc+Br9d>ZHJ
z8ck!|Uz{bWy>KwngC`8BP5<w3>t91Hm|ySHegt2gOBCu{m@^NHsfZ2B^1O=T!u2ju
zU5E0CAJX<iXir~?MS=PA>&{Sid<|=i`!z7&33CojJ?xL%@TVO0M{ccpoLg(KLu=bE
zzm)7e`RTjL4Pf$hqw>~wA$NhkcY6?yx!Ze$1z$7nJ$8%QdFs>m>NoXmpH(gm^f~LS
zpEhG{hp*sZEe9vo6?-A8!Q3`g8g8yVC~d;?fb*I7T?!S$XQ0yxVViE>2`PlE8|Y3u
zwDhK~5NvKeeYMII;XL`a&)&VY?cxUXjx)${?+2(go-p>T?7*{=*KYxG$U5Ir)h}%~
zo562?<c!HIiP_k@gEh1EeQ3w}N`CtTZ01N0)*r)0+-V?f<5Hh<rC-`aTqo|%J4Y+y
z?A)tRx>B=N$uQTY-N2MSW#wxmDLh95s9EhzS(mt44PLFDg_Hf#8obN!?Vqp?JDa4n
zb(P!urPcM7-6*^JL~f<DVua3JG9|MRBMptEm1uV#S-(`eNj0%OT>dqwEyplQaVEYa
zMybY%{feu8X*Eh%OZdmuq7GjjNI3)vZeR7D!5oPY?cmq@u@z!@Rt@VsS8G0+O?R!X
z!CiNXGDUvIG;1UR?x~@Rv14Q@Q{W2S>jy#oPPtufzZ=L1ZCEQ^|DTl`yEmQQ)VB>g
zvJ_JDDy{DY;<%{BTij*yS&eZgw^VNF-nD(b>2$r_mtMKamn0<rG#J|S)1ZmIq8^Ak
z(+8#xutjswH+Xhq<;K&ywrn<S6fq4BSz+B9&&v5Xo3Lv}Dgn;af7}O5dQth4eLvYJ
z=lh3Uh)eI@_>TnnY5AqEu92?4D=5)QIX4be22TY~ZGyXfC&__rgj&-mwb&6B2W^yf
zc0=WcETv4v<)2}d@PWu8C;xsIcRzyr2+_59)c-d5D>r;F8nTNqlV76y*0#4p!Xd>5
zWfkr&`PqlGA8QA~lAX9m19wSw-9BJsec!Eqkj#`;mO)<^WEd-;`4!E0I`D)UQzA@>
zFr|oR4<3Z65T-(y>N@Ob6P~u%gG-#re+JgO0T1%X4~4tTlHZr?a^Zf^hoGgo&I*f5
ziQ7tgImOT+QW9j>psWPFr;92-4Dqz*cH7oTR~^~tIhk=zyDSA%gWK<#lzrPi+4kW{
zWjV``rP}q{3Uzr^WreHCtFEjniHF?K>W~<~{T7lC<-NwIL)elF1BJ{ThD!}ss+)9S
z@@G9$j355|O4WzKdFP1x!{v;{!rq95q2~05^ivV1{P5?Q>`K)ygO@j4-hf>F$dy3x
zW8?O0*b|K#x);r-j^+DgTP)wurD(n}aU=PT-P(?vNmJHa*;opP-in39=o@M$EZBC+
z(?7r7K0f{GSjb3vktb(;JpGLI<>S-aV<98yN9&*5*E3-pzlM?-i-nD(m(g>6A?^wM
z`kdBLDc?xkD8D{GN&G_G7@oxV^*NXS@o_PJeZEcR*N+Rw^Xv1~v5**jpNleqGQWPj
zW<0+>x5q+8(nsqr^Xtcl$Mfs+q*%yEdKo<v+3yTAUiu#%@keg18h~6!t~xAA$gI+$
z9_^XDUvB+m>xUtwjb&uV!|L6fS)t#|6k4|Gn7zVTar<xe6-;P3xW_)*9JzS=z00<e
za+88&fA5LCC*+<0%N9Bl<8lx9NBdsFC}GF#18W%d2iv0|`;&Tu+!JJikuMW6EPVL$
z%Rx)rHP;1_;DNoTER!fyWRK9(>2FU^PBoh53ew1-NQL^1;t`aDCmalK2CloKxPFI~
z^%$P<X~yFE9oK(f#CQ9^7w~O=9A7NWIDB5BpYTD3o={H;MXOmU72%UpJzmdfs<g3q
z#@B)BDW@95yhses_%t$I(NyQCyf5O5)nN?2{g2~|r5T6sRl=8BJA5D?W5CW;xMlCe
zogXS~()HdSUW5-;#62!8wtPl0_3Qh{3gb4`o#w_dHda6)I|8@)3g2R^4$!)cskZ}K
zR+;h6_m$vX;>C#If^Fc<5&Tjc$y*@t(4K|ZY2!_UonnApos2t5)h!7~Ev(Ywo#)5C
zW6Z}sz<ieuPXeAKZnN>V;<Q4{0&l~-@>H^0hL7RhK7152otVZMKAa27WVn+k%U1%I
z!J8?xP2GB7pd5RChI=sv=G^JGJR9k~(=R?7xoZbyB2(<AvQZ1V-|6eHvD98SXi}|m
z5oN2=fMJtYjdxIubiU*Z1DV+AJlrd;usu@O!B#33Z(&ASW0}&q$a|x6p7&avRcVzX
zdTWq*FM90aIgh=^j=Ux@8zoE(s6zH0E6UWiB;l?0CF3haJDlUwYmkPx<x_g>w!yD9
z=LU>yxR*-6mz>I1g4(r3=oaeLzVs(qcg{-GaE-{=#a9#0fjc=xFT-+!|0HIPGpqX}
zdxT`#7isxQ`zqX8owTzBr-W>)oc=7Fv{E8WOZ&SKs>Qc;KHM7F-I7)AA3iJ!cpoW0
z7%4A@Ma}tstlrOCVEgb<xQ><r%RZ8+({~QWFp(7PTOY{i4wi4h4!mRS_2D{v#Axz!
z<U5m3oDdo=$QB8{0>k(kM64DoI0xFd^x+f)?MRP6Yau7moI8?hel!=Ahtz%0lld&X
z6?=Ud=b`Ro6@5RHDx8%h4<>V@mn6cMgB6np-ZbojKfHqW{0}%oDCJ;;T{t-035fNI
z;lr>yxz&y{D#xTDvc543(aTS4<iP&8ix8D>F)ycZ8fG)FL#c9j19lQ=X}vh2wc~b!
z+goxghc^`|>K&C1l(YJ_wcZ-SzD%@`*^a%4RS&6k@GY*LRW-a}9i!Cf6B&q4z}bm*
z*^h6bHFSr{D#I;~517{6vJ#fr3X)gUDbuIM-n@Ho<$E=E`aO{EwzxfhX<I;Xrx|B0
zUMa+mysUWq-~`oKSH7{_)+X$+UfndSe0bd~+i)9kq0SmQSx<NeqV^MUX{!7ckcE1|
zZihX|`_=$XQuewp$|2GN@aV9#6*7!3ZJ)LnKJ?Hv;LWBLsdcdbWgOTwIwaCbuOX_j
z9G0)-uovYIWtyc;RE~@rr&r3UEySs?0|U;=*!P8~ud7m4u|!$2u@<q3T8{FEA)AD~
z6LN^X-A=QA_<;N6V)O9295bB}9d7rftvo<u;qZpP4299lLik?!RS5jqKxaROH&Cx-
ziB%8d&?*#4bc*{J{*1aYILu#yBkf5zMD?$5mpXCk*ZtBa%-xL8N_6^|w7A~Z$|8M4
zxm<I`o`ntlYzLmhcy{AS$AeMqS<KNrixWT;KiP>xo3QS*R!qjjo!p3%L7iC48^E-E
zFDAudnHaVq9-~ZrH!e(n4{6j$11nay4r%Zto?;9Oc;lbT2*7xQ^GuGF#_}!28d%iv
z-h^9~yH8g<!itxRT7IptyRzaDb`cEVoi6rK-Kd__26DY38+g5vGUpm=ggKd0R$lEn
z89wQ>L%SyUrrrrx2g6<eYg6`=Gn*?npWV52bLOU=E_{deiaoKoXvjVBB;&k$48M`^
z4<C9Wek1nN44G1I|E*bl_wROW&Yp6Pm$GAX=FhU#DCL%TZhVSp_<+c*3Y2$pd}+gn
zd1>WxX<1WNUhC-!cR3w6L7d=AHl@buv29c42iWa7AYN@tJmV-Y@15iR+#xVy=H=i2
z4|%SM2cA^V;Swr&=<E~gnH=NQnK!<>lk*QH$HJl^_r$YL!aH<><6ZrS@c!frc%va-
zhIbpsoAyM!DKXm4yivL7pJdGa;+0tFNZ3GZKA3cgnEBI9G5L!1b6LiQ(y6S^5Awb<
z*XWlX2y=eA39@!>jI5>K2|phUcmJ=Ar#Jm{qmcBYji=xE(Z<Y;J>6UmE{=_jhW3l^
zKe@cm5AyP6N6VAtx@UY@i%70FpM9fpvyk+YU}*DCf|)_yGPgvOCC7dtu2(!_imP}e
zy(jlB^r>C^3t0_Uz8prq5@wdH`wG@TLWvi3R^mhp`#hN_d$d1BSvJ08A*JD-5g8RU
zCZgvJPEm-<=(T7V(MTcp#O|^9W4Iq3<+z>HqQH4|6lb=^H0A83%1vi>j>!GB$K?KW
z=I{N-<sMpXOu5h`BPGwKl7DxOO2+6QqV!86rKe<T&c0!aqtefAfc`iIT>awJY)$3n
z?hU56Gds6#;b9MR;wra@&~%UUFILL$F7r~FzfeCtmGINOz&j}38egw}-240g@p>JC
zwYEeO(XQ5!c0D@Mu0><pb^I7NzHNV3O!N(&k=s_7)5eN57fv}VjWy9$KH1ZC)zMuQ
z)kbN8MP!YY-BpjZcc0iZE+*FMcg6P^%@d9pV}E@z#+$+SdD%6YbA>stuoBIM52#$U
z!@2QgX2;4LFApd)b3mpB9C;|7eyp4^Z9P~=CH?jWwKJ6#J{>Kodt6CVV<nBYeN^^(
z#fub25^;9JnVrOeXiT4Y^s#bB>i65LywsL)C0-m?ViI9J`v&3TvTzSF7OgG!KM*mx
zj<hsx_NMU>cHkha^flc!oT+)%XSwr>3GY-4Xc*4nJnI0oq=grK+A;R+v>J*OS&;`!
zgVRCJUfp<kBlOcrk^R<6ax2W?+O3p*=R4oYT*rdJAXc4#-)V!kW4~SIv|TxQ)!uD$
z+RelR-I>?U1+$;Z(w*LXHhAT=pKSbx&Doo;bYHFMwgKxk@r;bmQabCi!gY27$02YG
ze&CeH=yKN^E0Y`MHdHQ6r#I$y*C6j*@#4~i#<}2z?7u3WoQ)ETb!V#1SxcTO(w(k2
zYrRtS6URSPlx%jtyz~agaCHoZei2p+@rN*Q?vy;voz+U>%(t|iYri5$nwK<|B7&cG
zU>3CZiF`UDvWKa}C;SRp3VoU3wqmoSb2^I5k`^wFT;EKau~?NxwS8#ewJn$V1-_J@
zTQ9_CKXn!}WZ{Z$sXHAnDJ?2Pd^iqn)k{i)%3cxP+_~{3;B;CoD(ug2WCyR%7!nc>
z@^Yt+mV0ZWT=K0sRQ9cjU*z`xIrJE}Uj(<4IIq$;ugZbBU+h_`=e#E0b@4RTa=`0r
zRiFO(t=e0O=#NibsrdB!x8~lObZxT`59*YH$`T)=U8eiC_O|ox){-FFBE<0@8^J$-
zS?V>!HMu>0ue?raUkrI2^L}DGKwcl9bz}0HX~TLbB-U6;5=(r4aCEfZB&k`7)35z_
zBgv{saR#!wZT;TY{$bNkV$v$h*k$olto=x0^Gjukeb6$Bi(8e>KUQLk6vW5VRX=u+
z%oZ!oKxVhu_E!Bv`A=l2y~a6pnR7~}p<jgk{YS_xI24oHWq*|1-WLh)A1k-_+hTG{
zI*8=<?0WN4B)gtaJC|GBiv+oC=W@G@%WXU4w&ly^*7)UeiyI8kZZY1Ew&J~eF)BFU
zmpxH-FO8GkGmutL9Ftc_@>4N6zPA2NF1^d5(ks`XQ$^H|k>2CHO^%M2-pBN;^>IyN
zN$Z>ke3KihN!xzW{V8rHd4k?OgtI|ss9mCUhveR4u{x9766dp@65=|mUQ}D+4ROcf
zUsM|6omKc1B-v$+YKI>BdKru7U*#SE&BJ*o{xQ7!@_vtAzZrasL$9wuJ>v}VopIn>
z+!(%{<a~R79N*gh7`{ORj_~bq_m}f+U~K;f-v-V+nQt#e`3Bt@<r{Z>Dc=TyF+BfK
ze1o>+d_&zh-%$P^=9^<=)T-mM_AvfykwHGHb5}r#bG-L1Iqbgtw38227_~~KoF&LE
zZg$!*M>Ej3{PyyV3wQe?_i(!KswHEb^liPo6`KCdEUm~s!#90QZe%TrabKZOkQV)H
zO^g>YS;R>H+KoRaJ$iccjqjfgUfX<aWA<x&e7Z*V$=DG{J)Pqi838#zt$&OhX6a<T
zd83x}=IM$XbI)3@Ra|qFy!O~gPvg~qxQDU)43YJpmP;>FRA7$Om}W`BT$DPq98_HA
z^?-&Q8HeG{e(Lx}ulm?FUmZsAc&F|3i8huRS8h9VqTF_QqqDrQyeR(q911UvyIwOI
z{&7vuskO{ml@fnC)W)0@$YVVdDz{$VSgdnaWL7w<vf{Hhah~iFF^e+F-zQMUq{>m+
zIENTJ^d;j<_%VwpB==VupN~6G6PIswOxMNq-;-;W`6V^`^h;}IFTcC}vJ0y~lWxzw
z`+ch8?Zn%)cmF&qzGM^Hgh^|8?`M*q_kVdT>!Vd_x&9b;vPu7A-mRBrHN`ag@*VqS
zdG}boGhf@v?m8`WcgGOElJK34w!735o6Tu3B^}%3O%|pYC!P#e217eH1T#-S0{X<u
zN5AJ)|NML6&DFxrDpN)Flsg}2eZG`Cr?kG#EndxMr;2@|wiB)W*{NpV&Z-sHGf!pf
zk+V~LljGE8{v5uCVtW+N0O9%4+_&((cUC%s+P#Q+<?wM$y8gY9x}`o|w@<H;_5Z1V
zT)nPPy-cbzJ5eXO{0Cxhto+7pDB-4fS&thZR~c^apcz`Sn{LxBLu*i~hDxQ7JN*pn
z3q~ux0ATxfewUxUf7X{ux&l6Z=Vq^7m_W9^i2DE*#Vr1dBKy>h`L~TLby$<rN;y9E
zm4vZ)Eq=`A`iI-@e88UN*y;O1Pi6c##BUaeVY&rO>e2D*Q|se8<JfCHWmHGtyLoJX
zApP*EA(oy?e?DYC6}?}1tjeeUMio=?uL<hsy<(WO0>YIg&^R<QBJ`qojC2#qFvM~=
zs~$^pUBuj`{3q|(R-~qzv7=kwx1F4UQ!;JE0ZX_lgJA^-XIIv~fSuG?<91UA`F;@%
zoy5XEeA*q^j+^uNPH9)XSK#|H>HMg6+`i0XnkzU(xkluB<<dl)3@jhJqnhubzd}2P
z=(nY@tMLF%_%Q`8@4>nMIh?*F*j;o@Fd%-v(SwsCDaLu7uj5uQ|1{iYg!9_iMUHc*
zI7ud5$t%`&&>1o8A76$?6qYl(AIBs0A(cnEg?EE=BahCS(OJ;JoCWUooF<$U9YjyN
zhLaK+I?4Wn#%BHtrD=_?kGP%`Mid)8*u$N?0zV5r{S3~gozZrH+6OlLS|C=b2GLKa
zV0U>VPKjKL!b`AQ8e6c}C<;$c#!2%D#n0lDX>`XbenI2wxZj2)jQy22?4UzU1ViUR
zsn53>D|UU~thK*`{q<V<HCE0yz0X*PvlC_b9XY1Nnu%h;ukdC*eVGa8fY8#ZOT;86
zc8|)xx0<qy!csi0r;#F0J{y`Uj!VIJSfw=3ElS{+J}*J$m!}_XW0oHHX4|nB7tb=R
zH$E_Wz(3sg=Ve&yLwi2k#6&#H=tSN0kF*`A;VtID`vz;kdc{58d-851c^6VlI?*3#
z*Q|Ety6;4!i2G&iw^tGzjTf5Aa86Sn&lIhtc&k<=`%<y5(!_WBs^OZAb5&vNaunR*
zhJ}v1(g2U?%hTpfz{y~e`0YZIcnPa;#p@R$UCCo-z!={jj57n2Lrx!1iwOZH>Trf0
zzYmRg6`d(SUzsrO#9c6Y8bC{X`4uW$+;a&KD*@O&uT{hWv;%4YcLCDI`3^uW;8nm0
z*!d#>>HsZ(69KJ&dO#20B)~R6>~c|1zC`Q_>I5`k)q(tzu}TpH#4<x71N;hBAwq!3
zfHwi3!cS9c0aE}4z^8El<`5vh=AYI9P62!oFb(hk;8z(-wF6EC+zB`h@J&FBXHyOW
zX5dIdGN1tH1)L7J7SPDpSN8%wgJS^(z)V1*|7(CEU>1H!EeQB5V;K~0g3VM6ID@h2
zX8^Mqdxil%ha)@`o`Y2wqB|FRtgL`$zz)DX{2+BZpanmPBmm9?zb%0IfK*-qU?*T9
z;9<c30!a9a0J{Od4j2Y32JAs2B`TihrvzwcJHsya=b3!Ap#crlNLo{vZ}eoEa0knB
z>;W!y;(QKvn&J(emw@{n@Xm)$Ww`S-wlla)!S&$`?1P+veW%LUj#Do4I+U59D2cDE
zn@dHa#1gqg1%59|F_q5hMfZ7Q$FV|fgwD!cgmYhuq+aNjo9OFBIK_s0A*4vyPU9+0
z%xN$-KHO=?`%$N@Wi8SaS|%gz0Z(xcDQNHFU7lh9DH^b{9FcC}{YdJ=`+;;5?|V}3
z(o!BqF%Nmn0K!c04e`_iJl$P{B_mA6FvQc{!<g-+{mL<Jjq(W^_a@()dlPgNkLMFo
zm4HW&@riai!?x;-X$soq4zB%I#W&;=BwsIDW}y=v#J_l)4v`Nf%$skM4=+^A^)xJ^
zFkNjWeq}_Cu69RV+Iqxr&exG^!hCmit(#-=G~^T1dT<n#93&0jklRM-(n3|D_h-;J
zXbc%okoMqXV$+YedUbd->F+b#wPAl6_e4bX7Dmh_OKN^9G{5#xV~g7Uw5X<3vELLG
zns9m(_<phI!XkRcYb4+w6aRxnuYVz)q!W^6z@vwDB#G26O<2&6+g@?k0GBqsJnpwy
z9sNvinbKM!EUMYV((A3FQCLJY<(s6)VL<#gU*t$*tGWpAC}1)9ZLPYa_ErtPqk2TG
z-DbDj9rkh>MJ*>RC-KV|r|?^0`cIrotVe9P!8hIgg3xp=G+GPnv)AL?g4UASxu{ib
znIT0mvp3?-Pd&5<<x{9_)J^9pgphDTG?NSGw-az)KzGR6g7aH5txQR`Pa{;1P^}zl
z2_j6*_wnmT%Z7HvIX&=@sEzhfJ9u@dah0L7ag`o**P>mpxn%UTY&5-I@A>?*m$cE7
z4Q}dz0Yli+Iq#)3%{(<uP8bB@df8<6vHEhldxAzuq%s)!$(CP)G#+L^Sh6vkAI|T^
zj*4E~>etJZMnK*w2I!ws==1A<vxri_*#Hz?2514a0(t;#fB`@|;Qz<m+rUM2o%_OT
zHp4KCBMt-!p+vTm2^lHEgb;$3$b5kVl40aS(PQJrm>GkLbGXEKeSMR`uh1NCO1!Bt
zIo8meoW$hhq}JqE54Gt?2(hUrMPse;cnq=BuXqi$)KEnB`+wHn0|T10z3+X0zZZUc
zp0(FrpU?V!zE&Hc3y|hDH{w&c62L~lQoy|!C6_gGC(W-dbImKMBE{^<&L|b2!pYGJ
zL4^s`711AKolqkxjCDezh<+V)g?gu=Y6OR(gj5($KBR>Nm#Uyt7)$C$_~r3PDXEa_
zDnYjhj!3+S_EKSdM6sz*2Q@521fZA%5H-HKLd_E{HL`*G@m%2?&9+rDR~elK*t#=x
zWO^J!LdbJoW31Ozd}aeZb_0WyMAITSEQ2m1{=~V`)AmJfzlCHc&bg1ct&sKk^orbI
z&6k*=6zU!CO3)eA6p%X;-+qg4xtb>SB(r*8=j-Z1cTc|)y0nlr7);ZY{b>P9i<^gE
zZ(D@MQ0|l<!_xioXb$%gZzjtS&~?8A>6VjOiRCc?>prbt|6Z(Lo5rN{BrT;@_NNp!
zEq30Y)*`Jml}llY?fr+|ZM{GI|6Pn9nm<@8S34V-oCfKNWbfm3Wzv;g4X|_@PJ)A0
z59A-OF0}Xb3v7K%wpKE|r}Z0?*yk^Pz6+Me2c-0A+Oj{cWmy&8wj{N#qDK9CqTJ~h
zx?di}*jrhN#!ZmVk^RPlTl~5#4e+}$I~F)eQBncckk%O1djGL^7suKESKpDk`GcxW
ze!(28VgWXaWv_w-reo7s0i;*bd%k<VRsBuwsXgE7fkvs~f06s+7ycKc{J-G-_=W!$
z+@E?h(?P-+*4)%|?`&IwbfbRNbm4;(qkhNyks|yfzvLfDclbEcb+RXway_cs+bA1A
zH3VNrDLePkb00l?P%iGH<376RIz`7->K7eXscUrH=z2%TRd5g;SHVYg-0`>>HjUN+
zwN%nt9;rjbN6&qz4iO(6_Zh20#NVLARdA`4Lx~&ZqsASr!-TjBrlaFV`KWQn*Wr2v
z>R@AwsU7y#g33I#<{@f<Te~AYDe{%@eQWo`kc8bx$noyzUNQ7ubZJ1l9WBkR++%qt
zUzO6_$~`fpQUWF9c=x!{*if1Tw%Bt%$eLp$9f#T=%S-RPA{z?s?7kvvPqcVkwwT|y
zb3Z-z6UO=JxF3u7d0>4Mn%B5v0BOcb`yij~$<<pb&Xt-UYLeHI)NOyAv#-3`DK6wR
zqNc`Fl5Sg>Bw{|N)nV^DSSbwTs%L*bBk2{_&@joco!g3bgsdBvhf7^4k;L7YG#p92
z{WdI_ZY2qa)Ag-o?R1Ky9nRZ*-Zo0l3~4vWvh4*W&NnK@7j_I?KM9`#)W-^#1K0<c
z=@`1v4miy*G?EFJ0{9jns9x87x%wY`bgneB!u(Jstg)JNZft|?#_bK-W+oYrH{N&#
zPiqZu@r{^Bp!(;=*R#Q6u+w3pH_v(I18y!=d}d&(WS~>Q%T2hrrDULj$zxaKt&n<c
zhqU1`U#0i)6Wu4S+<0XJlg>GYhAyKHPSl|Ya5mr|U>@p>Rb0+Ooo54@0mFc4Xh*Hw
z)acJPt&`J0hwae$1*aBk#qMu*iH1OeaWh|m6s<$XSEv^F3*9euZx(f7(q(#XYsmaQ
zUk}a&aFb4Cw-MO~M0OKuZ%VeR{pbMoBPOrn_=_X@u#$QtUJk<5m4e1szE19lQ%n5v
zH@ikl7B`_}Zw6k26^qB|d)+fwvoGDM$N%O2F4sxC=Zo{|*~q@AzCLZ`Dy7wK+2d1`
zZ~w>oJy~Dp@~cX^QpaD{kH4XQqrG@!EqZZMq!&{?Z+!HBt{>Np>&Mu+dmt}LCx9|g
za`FJnAyYaHa2{X^U<F_T;6s2qKv1vaMgS`TuL1f1uK>;mr1({US%B4mX22RiSdq}w
z0ww|CR1`;)pM`(|U>(jMvjG=Df9zwx#ejCezk_bsKENf=J)`u$3rOic%wR?Xa4AkA
zPzeyqHIi~JFU)_`ruS7=)hw*6a&t#TrFX8*Syn@K7Mx>t7Ie;vlF}MmoD*mATAwY}
z2}4vi9gZAjUghOp<>g-fB~N+D<1hCqF90rz6z7Eb1;kQbRo{D6-}_XE)TkhZYJND}
zAnGh7AppF<@Pbm7dyx{oBMC~EV4WHl78~f8;;f^{@TOOSYIOb%3lECNy?Q0Uz4uOz
z)SK6pAEdYy2lYh7k64O_YSw{HURpYYY3V!`=TuBN7@RQcpjvf^KGGShJ!K^oZdYwp
zb!F8gGUwo`g2{>s*v3$(7=~(Bl^0F$ki$25z8ki+$aF@fw>od~g0gCuz<{+c@7xkM
zwUW28hJeG%-|8x>V)0g4rN=LFDdit)syRSqD5$HVN(T!Q?#hSaODjP$sjR51!okor
zkGu5z7r_i_CCJ2vf(~wCLq*Mfc^oyMwn)l(E_Jq^rOt6&xj`0Xw~;o3Ed<xIZL0PH
z(E%(T(whY}SKC$%tBRdiSKAAq-)>7H%?G@_rf6Wm^(yHmaBYGd@Qs@M3DDfA9@X2}
zGeOIv`p6+w!{b@5$$`_%jn^Op`fB5x)tRu*&vhqY2S6ar9?;UPNS(B0pFM7W*Rdwe
z?UGUuqrKXGv=Mh1A)fnfMVsT+nj1JP&G~#xdxJDKpd)?g%8l2oHJ^sJZ@tuV4F8`V
zisVST9?(UPgnBir_CLd-=2FY=zxSVqxUPhWPPHc?+gGGHGWWq!Ihdtwh7RvKx%Vxk
zq1z4|LU$cD3T}ivhrW2@SZKZ6)e_M5{cGtKXd<=1f4fCPd5W64kj+)@YS6nw|9R-s
zL%%F}uyLgH#w*V?-gu<|HwWwpqfJ)$vlY!6zXcNQVxCTLK$blf7P6A_bmtr=51H3}
zOF|l2z~$bfMmuQ%X?8%T{<6FTZ_sEGbbz+iR{Z7#%=m>yljbVb#h(mW#U*Q}fJ?LP
z-4_?)Rt7&~{h-Un1S){_ra+dW7vd=;&5$U45a=M0M#y<*wX@3wz4m6<5X1hhjBA73
zqzPgmO^^p+2TX1j?CgPN5!_{@u=&FWoi|$XtY6D=q1o{uZjjhJ%owygUU0WSKHqtI
zlf^N!<i<A0dJK?u2=aI?54)#oSn;~CeWj`M%8gd;ex}-qbhcwB(>l|2V*}N<F%=w6
z{VH#dJ&#@FoJ`#M5+gD8wiwe?q-dDnt({7u<^hc=(mN>`Wa9H5Dsj-CpE0jXzwpT)
zl7|s`y<mq$?^M3VW&2+(e_>_2Ye<v)$se@Ltd$mneyq#8W8WhGnSJy9r>Y##NgFXb
zph5Mq&n|t0xRdf2eq)Z=p$$WtQ=qFwX-+v<D(_)}&w*WvR_9=%YcMTr{`(|0(|zOl
zOvsg5NhjQR5__~$zoLCxz=|E^^R%P%9;Nnqu{)w=@+tLD&}5Wwe%!aJN+@%ED%H2s
z`#9e_iVZqSQ?dmiM|)#qbSl*HQZlf<k?O;y0P`Emu1zIvdhEriMQ{VbhErqv$RMr1
zvOIJQ&yXx%PXNR{i9_$=Ifr*G;AuR^pviGy?16@gmg*rUpFA9HDQ)TeL8t{1NQa@J
zp1kw$ONS-l+m>%z6fO0Whff_g$4(46h7~{UP)(@GD|03_O{sDkVNX<(%XRwntF1O;
z!Q_w&Z2q~_7XH)%;rFmT)Z;oacdNbI;n!yxcl?iT2X68af~;!uZ|zlEerp$F148iB
z-0K=qGtE42p=)JBr_1edUB69ar!LHsmIUPjqubT#>MMKRQMLIK`zmcy%p&L7m~Q9u
zE{eZOyB6<m*WBy(iR^UwmVkE0Fw3;e>njf=RXYoWbMpizi*q|muHP*($y}Zfo7HZo
z>-t?H%M;7WHwUz!RG6waS8qXkx97!p|K8gprdy`|8}$GGEtD0;`_Zh^^bgmuYnC4N
zO%J3{&v-vk!hij5bSO2iEtJ>E?o%J;#dsXmjsUyyCRR6;MM-7cmp0`K6!*5^E~@8U
zLoA_ut6vLP;5}-Nh1_iD<l$e0Cbadr)$E2j@=a;~#(t?sY3-XrUs%nC2dE$XBBX}B
zDjmNmKlAwfT7Gcqa1+tjE(b2aChEImX^(!n5`cus@Jo#U{iXDNGCsZKW9f~4QPRV{
zlm2c>&oaJzrJ+NS6fXtNp&UtLDMo$crN4eHlHR{>0%kXsZw(j$omeXf)4H*g!<+s+
zlrxnu7{OJbZ#BEVU%@qfRWW!)IudCeNW$D4>nvi?ofv36<+~d1vZRhl<bhb(Q-6-U
zey*m<^D0+bYJ6TW*{xMDA_<vP=6uv4XMEXz5wcE2KMDPG^I<%YfKuA;Yyj3ph6W<o
zxn-EXKrh1daJ;`Q(|slFw0@TiG_yL~#?ZMXO9Sn$JDL;rzPR8c*nOT|x+O5}NQ*c%
zyd|_1HT#u1Yvwo8?L_D=LkF^6iun2kO9g!U;rj|KS8NF+hg&RDyS8i&Wo<n5D|{Ki
zmsUyzZdkk++Cb$fC(99T%;wt8O*Aq-+9U~`TSN`)dxXL?>xIoR=$+^@H_zAsHdGjy
z@uefA3%a@>GP~I(7fcGd1e(*#1(R$-mHqdg6L!JHrubpAQ(k8^1*aU?xd3|0pp@?_
z5UiTg7PA931YKmW!-9KJs$7JdvVmquHa@BOd=2K~_G(Z7SXH$PwvVTTU2eOhUl_)W
zr+-qjbC}t))6MY#gQyE{=JR#f7K6E<`<ws4?K*=qvOfHSBZTAdsb8I$yAakpfqzg<
z{#;i$uRy4FSv7Q~&%UjhB#WDa+Mb6{vnhR^fU!xt-M+)&b~yTz7_^JlH^+3jFmqlt
z;~rl2aNj)WCZn7#tjT@zY*Q$f4*Q@vkgMAr4#s6xW_D+GqYOj18K=E^ZhlN=r5TL-
zcQBK_Lo=ybewtCQ-GzBH>dCBxT+n4`jq)0bI`dS-+Cs4)llN<Rzh~~55513fZt2`A
zYCs!M*0Au{Tr>D2!{5z)Fgxu?%g=u>p;v+WGKiBY!lR`u)Gk+VY8MaMC3#%C=$_PA
z%d^u(w8&3>NUibnAAa*cwZ@SxKmVcH3f*Xh_n@<Z)mg2_=9}yB)qW~hC&rTvyGZO5
z*HWFTU3K$lJe}-Tb|M%L={fll`&b!GPt!O!?K$GaSitQ1RWJ*y^r#O;%2yBbk-=E&
z#IZsABhp?Gr~YK~;g+9l&g!BO5;(VdTD7xu)7V#NhtWJn)^IMDZj#h;+<He8VArmU
zj-=gGpK50oN<sM`{xuqrVU&>G$6?@PpzoV@T1a=tXu1bEp0;$V>D<&SK+A&O2j~;@
zcQY;{m=sa}a0^zG2>vkRT(hBl)O6qZA@5`T0rZ(a4UPFDzwxcd^ZV0DCBO284f<U#
z;8$pS0rbwna%W=#%V9A$p2N6r?R@*jHZCcAsPLXZ_Qm6~UN8AW0knS#@0kl&kaptl
zzWAr;Uym!rW`pKW;XS8c=y?Gc>}rzrR~WnToFDdHZ#=W|RcSBYH8-9MV9zW+gOYCj
zo6F(5RXHBj?dN=z0`OIoGI1a9Rp6tK@&R83KDsad>87%_Pbh0h+NPG3$s17G<<JT_
z`Tq)E-`cSlC5igIsSJM+Ujv{k(cj-tj+^m?5-9juPPia^MSQ@+QSlY=0Wal$A76jm
z^EZ^U=;n6aU%gx?xUFU$wcpL|TeRW36WZ{3sa<WuHniY+iTyF<Z^qv(%k@Z9xhA^*
zcgl5@uL^%tyLu<$E0+ZY;-H^&I|Bu2-HP1)w-mYk6I(nkF1Nq(;>xEN?rc=#_6s0s
zGhxKOG691drDsP+!IQwDA37yi7pk2rlj^~{S!p=%1AkK1VT|>`CYk1oddyRQSpJjW
z1jKB^#ox?&9dgl_5f;5J>GyAeg!FIXU*9#i;T&!^J94qhch4_dFLtqer1vtl-7VQu
zkF*@z<WI=dck{E~#!Xp=ypJQ5L$h9owDs4e)m!(F_i?QHNf*29_bB}hZ<x<;_7`#Q
z*VoTzxJPW(>jySb+J*NV;N`5lCsIyNWDYwv0VDgQ_f(9$EwTP?r9UCZG*AMJM#!;{
zwDT7SB+RRSWjTygj-S3ya?hhPXI~ZUGVXez?FH%Dg#0_CZZ-e?$iLM3$PCdD46b@q
zbgfw(e7yP5Cb6vXk(_Mt-dTnB&BV_vrG(0_=R9r(%w_53T*%C^T#dJbCGh)mV6Bcq
zNHWv3j6}tdSctW2Bu$WoS+9oS>}%h<f(fg%u)Zw7rCUvQn03{5$lUr?;ZAJ$X}O=4
z{J;sxWm-rX>FW=ROMR6&q4Cl~R34PUpxoi3<R5x(EdN`6|9I@X7bnWGHzoeIX=6UO
z`X0iH6#2W=_s8c%zCya`7U@6r7vit^3*}q;<XHN->+}}LE2*+<4AO2Siw&!_OY^KO
zbNdQr&THXrE8Ld67Lp1di#-+|GR!Fy3-)zW1;<lz-XXG=J25nDY}lD$8Dn|g>skSI
zbK>#hS&YYzrwPxKc%H$t1J5gX-p11*E`_dW__MIBNdEZV@Z`owDX71M&Wx3a_n#>I
z(EG*-@0$|Fhu^$={QH(?C%jMm{`Q3LBjew<J~`oi+SvOTrWHSNY3U1)d>qB8xKzvt
zzbsh@nls)BNonK?y(}e>oFJ&Q4l(2G9!V=^{B95R<$BS)RC8}CTku==?RZPV+aFRH
zTza^ELM}7p6U`Ym&AFCRyZ5MAYb$cRp3lM;<jrR0#0?2u7vzn{Tg<|-7J3sxjLEV#
z^b`oC!bZlPl0DAjEj=3>bUN-g-7atB_Lu~xz1SYzbCmi7eX3lmuEAZ*F!prl8G`6L
z+xn=M*;(%;j{xc=`q*AiP$wAIFdwW$ack@;K8Z`_r__+NB<OcXgEi7Vl%8xRzl@P^
zG+3v+-OJy=o2rM@at<ImRH_L02$cbFIXG4!z()Z|n$8c{3y349ZUx{9z(&Bw08auo
z0G<I{30|2Ma1|h>yBcsEU?bp@fNKCr$~Xx4G2q{WSJw*I1o#Z#e*@eO*bGQg;22f<
ze!#Wh`B6Ggz<x{};5xv?fd3tk{MQ5S0sOx(K14vA(2c~?`@d<t0HQw`Dcz?)saydV
z0&D<m0i^n&ohEkzZUQ_BxEb&i;1<9kz^xEQW`IuvQh8e;5KU5r-vc}V_zZ*+CBT0G
z90c43yEv5Y|A0-KLO_g%q{D#UXY4i)U>hLS>p4iDQ+c-oE(83ZkUkFsJ`YIWe*h_T
zf;%8}PWit8Xad{`m<sqJAk`BzuG@*{_>X{gz+He|z#jtE0qzD20;1h-?*VK_d#3~b
z2rwJ)6}7$pNrkUcy|p;BYW`W_S<YI1A9!}e9;==gUsX2O!(DpfPm-4b2ImQaa|Qm?
zKP&tx_6!!JXL0VgdLI{Xe($l{zJpti#@wbTH`jX!F)UFq<39*f`y)(da!3x#y>h=i
z2+8UZS$;|`mNVoja-19^Yw(#p#fn)51p1-rfLRQ~Lu4i_gW$F@4Pz5LP|w#G?z;ng
z9WV)S4<PZ1-vC4`wovnCq`r^Zrf{jx3fR`q%de@tFHhmq5rfcC;qy4$Ww01u<MJ4B
ziBE~+p_)pL8z92vE2}H1(31^*a*%xVn+itamg&LvVYsi0?(CvG=?^x>ZI)U~6?W+>
zva^^kCyUkO#Rx9>tDicIE?6TqDiYp)EjV|1`WRRMqZ_|9a<*SDxL91ucWiHObv)>j
zS2#hFqVE{4WR>L^*Pj`CF5Pu~=b(76mO(E@KRZS!VKK1O2<yE;89v(b2H1gTY&*hd
z8||P(F}Bs31<e`Uks!LwKK%?}H#HEv^D#D4ZrnW#3wV0y$t3U_<8Wsb?mp&sjo-;?
zD&gk3G~^aDtQnM#Ul8f0OjcK!mC=kFi*ZLTG(^xdKpWruw#>F|es&AqSU`(6{Y<B<
zE#0`_irk3XhU?bJ>zOS^A3}-2%Y@8n3ZM=!p<Dy2t%?=xMtM1Oe_(+gwZ6t{Qwr<|
za(3gx?``!j#$C%6*Cmz(*>mkXo<KQxGNt7A-AZ#M*|Jw}N<Y4+lC*!g*3Xgbj3t$l
zSnkAh_Nu>1!8PvojH_pwXL4}4BH+esvY$m5LrJW<EO5TI+t)OI{?_OJ+Pd|br=_cB
zpM7!j+3)}37D>|U81oD3818jrfvWYg<R#ixAdT0_*@%fMR^y*-Kub$Db6jbQ)DN0e
zTr3Nu#A*WOwYVe20bBKC@q9k4ol8c9)~+>57Z5{Btv=H&OEXL4CA?=ac9wWyxc9k+
zaIw-V#?~`-Jd2eKPHu-SaaXlHpoeArA$D1UgcE*E{MR5hwbV0x3FNSw1aQEN;2Y~~
zsc0+BeavltfNr$C`rS(0jKX!*QjT=I;GgFDl4-?q!s00Ij*q&Ih{2Z6jfc%aq?-bF
zJ)?c57B_WXZ8B}gO|v8Yq8>K#2F!ntZ&|L3(4&gS`=BM(dOPV?t}%T1=H@M5zSa7I
zbake4<nm1S$OY22!ks^Z-p9{+Ca#CMHl4QErX#(R(Uug^l93$)Nhi@9LjQc=sXw%n
zk{EO1DaBKxx_y9ccn;#(hUWmDUWsXRc%H@cCZ29QS0yG)!!x^h1BNtqf=!|%G-cMO
z<A$*x;~n?HG+E%2Rc{DrZHkXDy2e{^qmMpd7NMo4x6(-So3N{AL9SbMCv+P`U(X?5
z*!#E>J8>oD(YR?mZt_^%fWGHYF7^WmP5C^o<onIxi<R(%vByc50Oh#A%aKZN!JK+F
zW1Hy1O$s92FNOa)s?lhgW?qK$iDkBFdOZSY*ok&FQ*aE+kv3rXqqBq=X;W_~Z-W(a
z@OGi`po!M#!`@jWTY~`|SxS*~<|1mf(w1<G`H(q`63~>P{yEn$1KlbX<W@QFr28!~
z;>P|)zw^<3%kRe8O5BSG?YBFbEraT93sEV>gKHmKzGi%G=qS+FKzP3A`fJ0BPoR(M
zaRY@&Hw*EcsAuq6P<o@^GjIM*KFu23WQ6d|TwB9)KEXzsoYV@GR@#!n9H!rivm9;?
zGQ6~c=`A>eSgI@yEX7h~HtpNK@O-AnzoIy{SWAxx?MU3R_B!<WQG$Qz&Cc*uW<p=n
zQjIwyxgi<zrTM_3)y9rRtMvz<eFA6{v)HsuyZ^KV$@1yHG9IQdI~TpQC=+>zw`JO)
zu_MD;x{#kCB|xW8+o0D&`U6~xbC9Rd(ut<C%Uu1*p(YLgs)euk(V>e+%j%(Hsm&5B
zvACBiA(w6}<ZDO@?EK@(0~4F(*OhNx*d=Mp-3z+h?mOMgSe_9u<mym*SX%v;Ueck&
zoDfv*Gr~UiajfY7f*qy=_!jyB?U??Rv6wc%w;{DfJE<RI;kN<q1uVkK|1Hf=l1nP8
z%b*8^t6;_!eOkSLqV8t|AWKI&R+?nZK4qU!e}93^Sm`an*2u->i41fnjN+lMuBk08
z^_0}bK}HBkI=KQJIpRo(gYLCa;4HlYAzr0A?uA3S`X=I-1w9Y$bFXdGb+4lPL1Iw|
zrf7k{OI1CAmm(?^ONrLeZ<!arke0$HMMi4!IMo(P#7P$g8Q~bc?I-fWWs!{Py+Aye
z!By#71pctQq6Aplr(h}Ztez#FqcLR02+Cc^AmNsrDmd9lz*KKaV)e$0@yA%wp<1WE
z-}|^J)yUYaHChbVcmbQ~$UNcc^1P3=^j}16+om-}V+gG%HtH_*=zB4%W!PfEj`ecy
zzuL56*kSK|yL9WNO_w(BbXB{5Kd<NgpY4={(w*~<$iqKxi=?*?@;uO@LXUhGw}!0I
z=0nD3pL127=a8rK^EYstLf_}G;ooUrE1&(Bu(L_-eWSDml9PRxHeL!nZ|}kXvGDP5
zxzl^x`#9u}wVk2vkZ3P=O3B?VBD7Y<WJojh3Qt<exi}81adQy^_ab;?ZbZIyTncGO
z;XZ{!aZ@^=^v~f|@Vj3ErLIU+rD#K&%;C&5_+*i+v#~87vtwX^WXMblSoa?==mPoC
zAwk)@kV&~j#U?!r#D~BC<GM1U{Yj_IxRGGxiOe)g!T+AQ8@>Zlcga-?t{(=EQolOQ
zCY<wB+s)nM|G|5@g7%Fw;PGBJ3*)~^o6&ZxyQO<;_e)|7I2n)vrt)(sU~tAEyW*6t
z8Mo5f>>q$040L58;eYxf4>b@#PoY#I{zzxb&FRqhTjLu!d<~W(vdDyG?DMp8bK}9>
zxE{2YV8<#4e%(=MH)Y!(dy4lQz;!Zji#cKxHvePpO|9{;q(^IH?cW?2*J}SkT&bH{
zgXE3t%Kl?6@ZX0P`H0*IcTGBB?&iK9qg6Kh_tP71mG^GhDjx##qfd0Ja7}mNKjx~f
zGa81{1HN(k{#v}HqvhU-^v;{wuP@N6^v|!2pA;QmZBOvTl~{j6zT?|_G+(aAwhZlC
z)!lOXY0l|-A9g4TE*^_myDKAWcSqyznMc;{pl<~GOHsd3R+kXw<kL1S+C9VnF7Fp_
z2i{aP<k0GjB-b`T$BlN^nI7I(n%1OdV~!B0@AiW47d+h>8R5I0Cd)>oI{`hrPLyx$
zxbiLL<*OlU857H==;kQ;MM_x}9T`QxD9T6GFB)e7DY_1AybjL<wnplJ;eoRz$^-fT
zzZzrE+CiRCzkeOZlzc`$`m1X`Q9Fp|IZiuh%qOB9)c!SPxkb&@^2|ngmW^wPQr;5W
zUf1}R7}Wqmf4SNHwOD_ZV|{nvB?aqBzBi}`{MGrYx;{MLiSEB8-&_qO@;%5I=a}x7
zqee%N*SX>5-WP_hP~M%LS7dEZixaee%Iyp33#k|*2jBGkn-Kl2Wg-8f<6qd=m(bFP
zuIHE0eUi!RIeswbkUqy)&s6X<{1TVlyv(IGFYxu%Ij*%bdC5g8`Q9zCVS}_`zeX?W
zDHln<7iau0k1iS;$6Y+P_W~V}oYZ{slzf1joN?(V@$|VB8>El4qUMB?JgsAak0WW(
zc*+G$fE8gU3hRO*w})B&QXtKIpTu(XAGdUdvJ$}y+wxK9RLd`5`_jCn?t67xxm}u5
zH0Ki+j&xYm{ee3&dti?-x4v(p?MONaA@xGic7ZfTTvp=WVkOcX8qND)jy|%UA|LR^
zmGYapbwuPajdB>Zh?qFuBBEM{Ms9`kcqApBPX5=GI1A~0)RL1(rT**f1Kz5{(53kp
zCA1KRvl7MFy$;yD)4=YX26pc>9tU_>ipw4qyN4`LjqDg75A!LH2Wx9;JnothuWX2A
z!UB%2Aa#G8KW)FypHk%lWp2dif;_MRUw2}3fm%!bU?iVHnp17KV>nYQx{=>9!emw=
zw<Fg2b#}yTUt?|S^NOCYvm>U*?eyG^n0YgARi!oBls-lM5+nb$(OwB_Z72)xmBg7n
z`#tKHihZ_YTaIlqw~Y3TQ;~jw_<pWu^%CwSLLE9<0zy={OObG>cRty|w8467`QkuY
z9>UJif9&YA&rU4Ra~rIVU%&=y-j<s0)kO9D-#G)eYNy+A92^t+B|B5q&YJR?c{OD<
z_FIpM?v{o#Zr5>_)XVXGQ0Z+GZJeSMMOdX#j)<)@*gs2**gN}6_DS<Xqvbq6*raxq
zYa-S@k@hr7xj>`Z>`WYQvs0~QWNbv@C*QiH%6L1`f>h^xeTh%O5-IxmCT^87cCU+D
zrHqZXN*Pt={gEEP`{OR8Jp1cY{$`tvQK@!BQdRr8`!A>a^)?M}oo-~D%}(vWIP0Ks
zRw9&OoRz5KjHqw#D*4~&nlR252Ow>x)RWqp+q(1owYKiWuNi$`eC_Dtw(dL;TX!@L
zBew4HHuK)2w0{F(4dW<986Vo|z#1PP7#EJSWi&z*%Z0~Ej=Az$M*AHfgY|6q3?F}s
z0|pvXxUW-)3Nt$XaPFdeVqya;@T(1IoAtQq6E-&F>{Y;ta)*bySG9W1+aR^5=zNe~
z$e7*--h$_$dm#s*@k<gA6yM{c+n68=u{wXg6YcZxrvnzyR*)m4?YWF!QrS@dfSS6t
zZ0HZLaiG2lb<VQEbY^X)7y*NIUHYIB8?FIzA;)HYC)1GD3C$(4{A&ZAJUpd%tg`%Z
zGvG8lMR<~Bc@SZ4K;vN82<?OC0ilTi?HKt+Hrxn%W3w!OMH&e{gguNWD9e9dhp-;N
zUOYB@OGOxHD==8+2DK?wjDf7~bKRTiJX-5qZ7`GFzF|q|+$1V8ch7}dKy5_%0;Zq7
zh!DEc7b(O$FG4<a6a89aqtEgI%Y+nDGWDgK#6(4+(X8C>$5W?#J2yvC2XRBCDWFtp
zPCuED6P21V!am2nuz=b`zjMG046~2eZuT+T%;vDIN;nZT!+;f(VbDbbqS@a5SO#k^
zZ@=5j4wZR3rcOIlX3A)9fV{zcQS(X;$#slz&?yDtc?VOy9mxZtuSp{w5)V1+g0dL4
zg*^_qcY2S4cJ>aqoMAwW%S5sn^=}jta6f<@@TY)8a|6b?jjn%3`HAM%0ayX}Gr&eb
z$X5zvtL5jQ(d`9%53nEb7a*rw0mFbR01tt7rw8l=+zI$Ta-;mZ04bjjK=Y&T-GCv$
z55YaA{0;+B_+Ns+MCp74l3)$suK?Ep9zpquOZp#xAuVHbH6JU~y=4y+*b=z1AZhGz
za$Y<sZW6E07Y~|Wwc@J8joL2y5YGdXi|B?QD-<zJCM;HE)p&3xv9`eoDt`ivRN`4h
zR#D(-^mcSmd&ve}$L%I>N7@41^9!CI+M$`~(bJbQ!MO*N_&sbko;i463l8Yf<r*yb
z&beRc+=#tDnwoCLT}I~l;LfGyodjKA7(AQ~w!^ZNEJjh@^rxiYd>xeGDYyw&<aA|s
z=?kSlMtR6by*rt^=O|x&mHalW>GU?GmAj{L_qMyife(S{Uj8Q2`;&q>-j3UP?)HG9
zu5uR?ZWD16MDV3-gOguXN`qGTH44)X*h8fPJPIHH9s?8sKLLCgtu#w>Ty3SoS++QD
z$wDH)#=9yit4pW>=stAbCSbxExG#UBb~&!nbN7Ot`!3<z+i}NhM6raVMSA;Psw-7-
zq1AK^3xYCiFNy(Ol|9$WM7U?G?%8n9QQdRO?JHBorRBkv`F>+DQ*N|Q5p5a3`6V?~
zVKjYx`(2>uk8x6T(@_E@kRNI|`p0_!Mq<*b+@-{$0S119kA$HU6bSIQ03pDW^p41R
znom{C%(~xZpw0;#pvM}CWnEdV5US&eQ(aSCQsM?iK2<Ry0VB&X_A}5w?I<7Np5?*<
z-DI&Uv@*dM!pM{xiSiCOJv><yGji8W7O7kmQu&MY*`)Q(*S#I`D`JMYG}nWg`lj1i
z7O%l6gtVi?|4A_bPXm~E$^R=-@<(jAHoc5k=rq>QyyNPiyrAU&rI!3jlzb!4?=sPx
z(Z8E;ibC54Qq6YEax+*~Ko6T^=&31f)E4b`MfZLx2fEif@Kk)NBo@M$=fmn+7AzyG
z<Ho%7uB9xC?m1`LyEZTnqNLmfo0}|+(n3AXz=!Jf86efG7l7)OqxoE|SN;7q$PxG!
z`A{oPKUXWLOeT0iojzCRjV8<+Yf)B=8Z$3VFj*PDcVQ;Ms5Ip!@^P3PJ%2Yd*uB#>
zqyZlZ0n`BhuzV*L>Mdj!l)WVxqu$G#RjwOmB|S?H2+gumd&|lEll$JFyXP&3EQfrp
zQo5MhgVUAALBE!;nCh`d-YsFXM_L9ha<gYWvxte7@S!qra}(-3wp7y64PV5?PWBMX
z57XU4QsLd@xEJ{n(^^{1OT9zG>Ea@kRTF@W6QFRYHIUFOJDrjq^+@oa74NWw^FOuR
z@;|!Q5ynUVsAcFuy8NFzBR?7@z!{^yqIJgoaqiGrc#+)C@8}a?AAk)Z?V8`K?YL~Y
zEfF)!+$u-u0tXapDj#~N(i_j`91{ANr0`d`W_Mhrk3+QV@73PghMGPP8-^D=uxv_g
zXp-Q%z<cL%aKKb~F8*a5-nlJWQw91rh4qYv^^L|~KG9MrnM0GZy?;+NQ2v6<0=Y2p
z@s{~~PBU_zyuK$aerkJ8baJbl=Mb_9^*v89051SYfENLSsDF;;l3M>q9)Jx42Nd2N
zRV5_-<5E=XX;wie#uwD~lG=}R(2w(AjZSMWdZg*UH8o4#A&nSaGRjT)9t_quH^aIk
zQ7TP^nS%3eW`N8A%)L>~lSAN#lVr+CdYif#{rTfePx}l@wOD@i5)*=X+<zPV_gg*Y
z8s{4@epzlV{{-KRj}b31kaP4R%L3;aGkJIzyeY^;j>g$&uDQ#@vJ@<*v|}cCITD-Z
zkG40N4!LkX@l?vA3M(2cp8m)TcPZQkNb5)eV=#sL<ip2wcLfu~dF@$ZjJG4<P5SOP
zjiz6X^?Zq>yMKc$vxJ%RNU|Ya&)bpKyDxwglFhnI*a7@s03zBz(p*v7VEHne!H15f
zAY7dzfqHeGSG*1Alf;vRf4s61z-1ug1IqWw>Y|{uA6gCC9dXD?^BP+1O+J^WpzMpe
zD;+MMT7ILrko#e-O(?>?Apn?<9+pA&9&^huYt6@eFHCnZ-E=22pspsd=*`+UYvG%W
zC)EZUkN5JrkBwtKW3MpV#l*lev%NTRr4Ck#O;|G@V><q8Xuk_{GUxQCm@qf$ELca&
zm#)k=ubb@09_J1zQ(VOR_q2DhO8d1={K6%2mk8G!?wW%&`Q*(j0L`;pwgFNyx$#&<
zUX#*!Y6-dV;NGkI9!U>*2&?$1`02#eIyk#&wqyv-X|hV%px7iv<Rnl&K7$+QGa-<G
z*)iGCZ(@{!G{+1pshFi7V_D|;u=JVb37VL<Bd1HUm~A+DB#RC%-9$SIepfv0C@9_O
zKc>ZAU3tDlixr@k^sBw)4}d|uUj?MS^dIq^_QC^zMSy>z?}+|0%{8?*`3r0&EVBwf
zcVU&o=PRj-hw;xEPj%Vi64(P(9EPgVK#}ze9cof#g&Uv-obQG4aFk#Q@VX6fxhlQj
zPuCb9a?C5Kb~!3aVC95DxXWrhB~=FUuA1wF2MNr%$`Cx>S5c|BCaHasd=tviWveT_
zzDn@dUGr!kcTMT3#(jEb+#lpJ>XDTaa$TvpcSIiLjpV6mtfwVU{7o6Rf)WNHMZo7E
zW)pD+7EJ+trrlg!K0jbldw)9je>u}<u69z}p#^EL;O+QovAOy_-m9t4qCBvAN$qT@
zhBSs?smd&e?d>er(DjGC9oOG}U<1}CEv!WA?%9A97zP^e!43n`3~b_jUJhwDSbRW9
zgZ4bg_APX*5q`H~cX(!{ybe3f8oAeVep)_c(pKPXoebSOZe?ILLV}CA91>kkf}Q;_
zV8qH3>(`NP9;lSHkO*5T*9B5$_~iZ>b@CwK0G?q7EJOE%kFS&$Z;0zEEidsWWmdzA
z$YLYx=?3O-$u*;8UD|=)T&-c=?NW_%k@H3Ke5c)%`V02^!VGpnpLCshpwpNEXwSPS
zkC-pY!}CAJ?LpRChRs&PS}3gZMT9(C@mcmd?-I-nF~%vj`-+Og?;rVf{~w1TkFJe1
zB_>a`JKQC{`8BnXy3eSTFK5=ym?!tmcu4N0TB~w_bFil|L}6`@x5MzPXo6HC?jMnt
z!%8*IVhDrQA}Kp>$H=~!OXcM`t8mK{I2KAu7M~frLq1MnV;wenMP<Z_iCGQIlvTU0
z0lO6=WR~=eX?y<_Qi{pnwlm%R4wjIs&srt-@;+A)DOJ`AiX+-u>Y0Jc@nEgo^x$ep
zEjHs<E3Ym2U(8^x#!WGea<aeRy_fuXwr|UIdl&n&02c$Au{#0`u#r;;YqWfrxk~P{
zd?DAFtMf0i#VEJaHq|c#wPr|<qrB(`=RE~5EPQs=C6DuUIt5Zcp%%6Y&#z{N??A7h
z+TG<2?EPKCET?>7mP@{r3A|-iZxGj;%4-A5X3v0Z5&HC6CM~d37G%qp^0Va&a|F+a
zJLZBT6F#$bN9jtfB`jSv>yEj8ci_uoY`WWZ@e_8}m&f#v)RjN)T9a_`6Mgu^*5}o5
zmP#8^skUG8WS*iD!S3ZAlpM1jjXyc;IiGO={d>3`4A!}}BAmQD-Byf8bB!%=Wg4vv
zqR)vkQh)RtautjHK66bb#-mt0hr)k|wO&iRP}q6C>V&;!JOd>cn6WUaz`S$Wj%7Az
zx!~K7Er!EETVjLmT*cvTsnmk>EmeoRgJP(w+P*R!p{_Zr)@g&L(EG?yv)b4l=5Yoj
z?YWBl&6JV=OVjtGG>}YrzuFF$mRw>D^+0cjo?A0%lyYywsb1tgqR?DpA^AtcdWLe7
zO9vX=All~II)+vo0%q?KAJDQdkHz~>K7DE{<S?&*2Gw^0cIKgjdlI+V4m5P-!1i>-
zXLk-NGEh7}ntQ6vt%SRh0gV4}<P-zyX}5Ey?QMCmst&(HRdr6_4A?aA{vT%U5PQ%q
zcZt=xw{eTqVXS;Q>@>USaRwj}j9qm=t6Ru$3%6LC3#;F`x98sOJI`yhD^eqH%7?1v
ze%viIJ|)XtRIByO8b>uFOC+cnYJ^&4p4`f7brrR`bo`1;_a~kdIZhC&3*iT=oSmJ0
z->Y`OJ%Dq8#=@x>2!9Q|MMu2_Tcf4<*muyl3~GM2B9B$ub0HNY%jj2wkXSySA%Zrn
z!My+hOIc9Ph2S{tS-8C;$asPbB;c$FDP7MKc1HC`Sz&Oa){(d6iZm<VGp86=00W}m
zUm%pf;7=~c%I;4H%6oszbbj4lNFxR+NM<kcEc*VKJSul5@br)5$A}qwUxq}h(Vs5f
z&SM*B7tB*IAdaHVaol>lKdlh{{$wk(L8{z-Bi;;vTF`uB%;g(o5i1XN#TP90!n~F$
zraOQexC&#d-39cfg<Nm~cBngG!AZ;OTPIc(XtAr&uGALTO7%8dsUeT$Bki!W)RBLC
zr!(XzwzCA$R%$de3u+SHSlR+8bZ!i_<k}f_uqa)UQVUQ3LisjGTfHUu$ERByEHz;E
z3zizcCdM%-pUOnB5EhI0O)<D6V7g~Cj}y*ylN+nH?%Lws+NdYYNjUYJE777taZ!jB
z-$AWyE-(42rl`6!V8u-n*q`IB?9}axYCl{qxWR3zC^c!y;{t-aC0B#ceV}+38egHF
z;vX!=SsSH5d$NS$g=(o4X~ZL9h9!isaXp)kZ9cxmbH0~hjXI1nq{6oKb?@VtuTH?4
zBU!oDTYSbU%t(x#5V7X-wFUQ6(4G-D4-Hu^Fd=^r(>dRkPvD{ZJ<h;?pgtMDXX_L2
zd!=5F-wXAE<i%(`fzdnE1UojiJ9^s0u*Y6*4`@B%(vZiVAI5xe;k)Hya@neUb`Qnl
zanjr&iiL0k-p4IeI+6>;P6WSMma39VOz&K5LH_wyFz*aA4cuqpJ_ok|_XW5w!yN<n
z6}Ycfe1`q$!()4P3_kot_Dg)fGaq|<LD}1n-}7Td!OV==Fe_-oZ6{cHM^8g9V<y+$
zy8*b@5vHi5wqfkXPuX4)=hNyO1VvOh0c;i}CjRVauzt?}E!DYMw4b_~;O)5ju%-HL
z?4R!6fFr)viSruhkbGCgeMJ6ixz+9}QvTFJ^~729$YYN*7Uw7@@zHbVM(XoZH(PP$
z%&aN=HZ$ymG-1gXtO|Rhf^gUIFrb@Yq*fN3AYlzH>a>~3XBU2c%)bYxO`KfcM=ZWZ
zg}ZqAbhb>zH?LTMlcS;SAH)i8hvxLm3VuRNRZfWLZ*6o&#+*FFN8)n02DocQaJoY2
zn$jAarn<J#x{35q?gEs12g>b0xseNY7AX7sN5gR2#g)w4K11|nw$cg1g`SFj_!^~}
z2K(@G_j88}pohU)Az!@5Tvh%C-ABW)Lt;ks(cRc#_Yf50adtwSDd9T1ntvGm@p<g7
z+R!r$Vijhe<c6U09+Y`ERu?ni4vJyg1KHj>gxw+P75eFvuF*8Q#47XyXh~vC7ZIin
z_nFvn--I@xqaDB+!8{MAw3RFmslA4iln(AfqMp>VidV{A0VCpD*)-TlVe*r_rdfnx
zgjO&})D#7SHKQkSY?qZkP)-(#K2U$NPzEo~qDz%0a!WxFJQG_6c3i?gnf=<FR%qMZ
z@y0LTknwhnY+BP-#Ig7<c#q;2)=zN?`wArT5a1x-TY!HC+zmJcNF0mnlsDiofDiBn
zU@zbZ=vO^}GQQ$F(X;eON6;v@oCxqR*zq0%h|`~dgPu_Wj0N0*mr6mWocbPlB%jmH
ziDEt(XSW*M3Za|;BX3T~Fqc#%DkrfL`mXrsi8@Q<FPy{#opKTrBs~+BlfB?f(2PwR
z_8u@5`E@}i+NBim6=FQ=1Q9!*JNJAaG+{d^eld!LVH7{=Z+!d!C=cUf21xIjscB6^
zT1zA85ch)CTI4Zx&-XJk>MF}Otx200-yha)0$G+dp5rC!0!7J)9fDFeanJW}J+p~c
z8bMjxoQ3*7^1kiC8L7Z^8S_ltPk!kinuU{`ysYf992AX(!^~hE4rxLf>oDmpn2px3
z^-xe_4d)v7+*fv)B?QwzFMZ3(_c5TR>)1vI_#o}`Nq0DMR}yHpdqsPrbx|ei^AzQo
zA_eXLJPr3K?KLkn&-axDr-+}@zL|e(1Ah)Q5Xe9opb612(lGt-WIyfxirPU7t94zJ
zx0+ApLlPUh#o0`>37&B1P+mB4Do$yhK4?5Vna@CpgS>_n6`v*JCI*E{VrLQyLJpE-
zAfIASg*LENtP};0!9QbR)_arQ-U$1W{hB=;iVMYrXvg@(e<}a1X62t~LG+Iz^1nzI
zQ0C4=DFQ*|F@k!Ojwe;2b_j8d3Dm#&=md;MTzWSE?gg9#*n@sPQ!uLi{87-#sK;`G
zrCZOLBIxtH7pwd_!Kn0Nb{xr`B)$;w;Xsw`h{?${5GKF#7IE32`5=&fN(7sunCvlM
z04Jn_y@U{=^F`;2K^b?Tgz+|8g+4Ql<mvo(+IapO=G$j*pA(bIomJ5H+J;yrGfxq8
z3{DSD+@S8YvsgN{Pht>ZY&dsg%?5!L)J(iP>2wXZh9KVSs2s{a%{anj<R1h~0Azqu
z01|+yqk>7rlz)~D22#N&s;a3dtLA*P>KeDNs?t?$1Q7^s7k`-yGK{05rgCmYrPEO{
zSphX*l)^Wblo4uTN&kRfJwu7b5os9EK$C{MWI>s$gm`r1Ma+*lPLc!}h&+hmWOxXQ
z4fIk|Np$r}Xq}dM^{$FCAKf}b7ut}UQY9EmN!7%a(DgPx;=T$dbxvB0ISDteK(l_(
zq{m~&6T)*4&q+K3=E1~dJZ?O1;pxKjE}jE;!V#`G^#+dfJ(LpYclqYQJ9~q%pj6QK
z>%o37+^msccO4MC+=yNdsD7zft#s%wdb)2TCQh<}$FFtU-443Vh9rc0?XV(FG40J7
zgipp9AQktvq}89mZ832<FH@fvYn8r18fDTI+#ZBk&fF&TQ7h6P?(P~o@|xnNUn&81
zQ3BuP)9o@^Q29ZH5<gW^14R)#s+9(W5$UVcM>Qn<B&ubaTRJ(GRwO;tBdG_cl6&ne
z1#T1ETDX%VDbjb;lkb<)mb9&4`Zk2#j(oNwWX{V=JfGAZt)qwPgMA!w+`9)lUOA|-
z4&jqfYc0Z?u*#+uvtkX(qo!8hDK4!K^A-q2@<XU}I%9F)4bp|^5~G!BIYlmAO2GP%
z5qZPPq4y5WcXGd_X6XMbvFLs8%L};;0P?|_Q8?Kj6msd5NNY-JP^;`@riQR~VV)Iz
zRX!>S#!w<=BO726#RR+!fM%m)KnZXvAmk2&6u_4NZwGt@FcmNicn2V~;e|B7Uchew
z_5-GaR+|8LCm^La4Up2y0Bi#k0eb+a15$W1;4t7_D31xy0!SQ#B;oE!?ve@`OEjV}
zHttqux+2VUcBMAuKD0wBv^&rS`*towul7%qbkji#tZSuH6@@bUs_E{Y#NT^r?Cln+
zJyL&6$W&&I<$3qp!0S?2LNrZ)CsyLEiHDPhewmA0xQ`01$#4-@3<NyPD+c(efsKkN
zMVYInwyI>3!n)>e8qt|bsbdE9EM{0aZ^ZDP4j%lHfU^kq7tO(LuaR_;+acw0rC5jG
z2FZ%|AHj8ozb`JveU4LW=$zI*BiBT4$wT}NbXOLR&|S$|1o#-xz7?%<g}8#KiATed
zkaQ9!sbM<racTNgYpu1W{4M0a%({v#G1uhGfaJ}B%=x%YN$&~wJbjlP`|fI6Xzv?L
zyT+;up-mY4a3f~B#at6e0gnndqR|^d4a+j=SW2KUn&*G=AxdSSba<|4k&4e!L%e*t
z$ay7(Wf!5<*~{GsXIQE4_4L?1VaWiB7Ymd_>Y^hD*Cf5S6?R?Xa;Jcc)^Xdp-CG+k
z8yk(-8v3oqh4P5sj5C|bfzvcbFpWduK4pY!+k9{((+=UY?or$zBK`3ZY-KCNb%|Z-
z&3=~1Xrk{ppPYGcg8(5d!Yyu@ygC!-JNX)Z^|*0z1vAQ5ke|tKf=yxEkp{Zl1)PM3
zBopXt=N`mtAYVYJWO)d(QCH2N8i7uFW~M_vyWO6zAx`vmd(hJv79Cw-j}vEn!RbWE
zO94xT-J*f(N+69+){rpkYi4G>$C0nWI%Q85aL3zOa3Bv*DaZbl@?sCCl(!Cf`Q)=W
z&5SsIL^Z(4LF=^N#Q=32n$$OeU{Jn`IF_k6JsL?mBK9=#05#?9cUfyQYjFGL61)}B
zOl7L$H!kW_+#oD#|B>11xu=3H8Qt;lHvN&=?3r1{jMf_KFG0b@o)TxCGt?T^VQO>w
z#Xj>h=Pvrko>Svo;@pMYu^YgCGfckLF#PpFncgFQ@cn|Bc<kx?cUmFUa+h-nLWjvG
z#ORG4$nyas0p<Qk^IF0A`ip-AjdBUqBqd#3`YC_2LTbY41KsXyumPoBiE%LhE)Uxl
z!1+GdAcmc7=;ic0f7b?F<Q`%>gSZte$%_-^2vJh~7^jJ_)I$9;vBOpb?ng(G4X3el
z*!e>CC2=u&J~*T5e0vYZ(00skR%$)K82~gdW&wr(zfITy%m$?QnSkwpIf&=eLcUAL
zRcEY%0voZNYMqN}N{ou=kUI6uBbKS^rVGMUw;r$zhoF0DKFU?*Bhz+0Gwtx4k1=J|
zW>)8X8*{-Dlv_p}vc$QfFWZVff%TtczA(y5!LP*WyFsLHSbsy{QsJLtl&`)i>MwoA
zS#ulCnRDCk0*{De-L$0QGd*MyaUR79G;;dn<IM&tXCd`B5wl=`2}?vfI9E)lX@Bfa
zyKHMOpSen|lV{_1xm<wX3OSE@c4XAU-gy?r-f6sJ<l~Jf-ls4Ej!~aONTaf+7z?i%
zLWtf-c+F+Jok94Ic=&m6l?U%vBv!=QnJZ+c?8I-WT<Y8d0gpX$slJfK#uqNQB0J#H
za+m$ib(03<;yc$F9+Brb-;(QQAYXa;j16d8gIs|Tu%Bz8b6s@YSeuTSgG)suO5oX?
zwH1MOZI`JeSEw)2eX{}3wW$}{4q|py!-C6}4*CbzX(zcx^wFJ=$HvGJ4}t2WC!ZP*
zsN^)N>YO`88f(+}?=(;q^3gXx!gGx8J$k7<SK^jSWmKRX{ZbOzOT;r9&z#&z-i}_3
zc#Ne>gva*Bidp*%PW{+Vane_qGW`AY#YR$@jq+KvIcO0|Pg!Zq#Z5a(|B$AEd#Lsg
zxVTJSiU=3yOs9yTYCwVwSOVq?_~|kuM|K1`-*}1-Zo6{(CU+N8nhE5~V<+^8wbL7^
zmGFyJn$alFCj83<z<;BhCs&wqWa5V!+Z#Y10j~kvZ)_lxKktH(?bQEfR*r1PygNYs
zkZ5?$9HPG%Kc2&2%}oxl$rX><#BbBOac6J9sLX}vrz?O{=$_+AFODnDV)@>-JAp5v
z@J>!sT!=3|T4ah7?67VRi!bOmuLyHl+&K^I%ILh;A>+|+?AK=LcId*ot8wXZRdKuG
z&P^&H-<T^g7h*0TbjF#vw(mgKpF(#sJ3FXJ(l|90nkAa$!fbYeofB3G&*CnSYZ|R)
ztB@)T$LL~AF=9-Cv6KFVE}=KZ6H^t_9MgtciBv<h&M;_@*@Vr+V8ka<8}55K;)`%L
zw3c#yYm=BUWrJQ~lNM~y;@7u9z;8M4O#*Ze6e%DPyXB=p{qAt?l-%37RN;{E6|}Qh
zf1>^zr9P$KR~f<8q$~I`yZ&JP5&B|kmiq8Mr~a+_gE%2{{BD<Y+}mNyj8F%q!*~NV
zg{QJj>X`clbJw#;=cu&iEXXyciVo3N=gCW5nXngd;V<POKkPQhBLyLpbR)u-ZqP^|
zCt^%^B;2Y9pK|bI3IQts!4IEw;2t~L7Gs7|9fy@(q%kKGz6iA)p)7#U09rwzw1B!Q
zg1VaSae3T$x8gk&@5%Ly&3?dzs|H>8wctx8zL@c4ni?_-?`e2XK}ZwAWbu%hDCIHe
zjdxL~?k+RixJlBT{fD!yXTN9F2#_6zo<YCIRRC#faEH5TRSFo3*ymon9Z1I>ipu!_
zYJzm0A-W>`-{UQnjMaTbAOQm*7VIQDi!*(P8E~U1Fl3OJYU>A~_fq}uwlfoOKo9Th
zymtT(h603mmO>oG7d)v)F;{!+aHZf$!`ou&W0Co5=0bTGH{LyqSasQGSwkLrhEBC*
z<Ae1Y7T*WoBK|EU>RS!}b{I9FSwqB)*61%ZlSq2Ftb8WvFdabrSG^tar}_BQQ@Oy)
zEQBv|jPK^YSAh+T&iD=b11v6{zBS?7N0ejyt2{&k`W|)w(?KS}IT6T+_i_Iu)qmaO
zc6?bk`BnZcAMv*F*nS?$sDu)?A}&TpJlXqs1=27Y34DO~Ww<lFBfiLECq2b_eAf?P
z1s>fE=Rj^|{JuB7k@mgnJ{I>S$glVrYsH)r)3~4N2m2QKvr8WZ{U%<AK4`;kb2s?|
zE4Fd1)rU~T%k8BQlBu4>y?V4!ZU@{2$m84%h?qp%j&A2Z%oMxDbtXH_f9jr@O0GpI
z$f{8rU@V{nsKvdJVt}z@9QO@i+!x%xA;efA=CGK6`Rvl=MwDS1eMSFBz<V0r6V!L3
zL|^C7+udj-Z%5of5%V;T?4}cte)&BOxQW?DUyTizWAg*~9OF5dcMI?&a9&y#?ldR4
zZ>67hOkMlHQf9Md;5QFX0`EB!FjEXJ@d(EN`l<zw6}8p#+CrXK^hqo(m2%~C3mdVE
z4zmyENyw{K!NNk1eTjYVbF0&IcIGpOuv2Pab8v$^B(b#f8RCwZGCin?r`BGCJ{Cu|
zz||VXZ6_Duo5oWTZoiOs2a?|_4VcW;b!AnM3L`t>c^~F&m6+}b;%aH988;2<on3aq
zmCRkGC`-otP$Q!o<8<i%y3-U+cOZjBR#3dXi8pQoX^IbTyE6FfnLzF~)!jqsETVK)
zAe|-Dnrj#{1oce}V|I21bjo5k0yCkget=aVc6dTa6AxKO7y~X%h;c9~2F70ON8@7*
zpW!hw5%OeINE1S~kA{Thb=*eqE``(%dplwWsgAK%VQX-mX&@?AGGaBTu}pltXi@GQ
z_&x)eNvj@}Y_x~a>ertUNB%eyCP$@|ia3^uDQWxQYeyMQ-!i4kqba$gQc9PY_7qZz
zX=K9!pk@umYwQ9%dD!voZ_*dB2B9e%J>ftxEThJ*$Eh-0UfNKQog<&duH-cK4H~}{
zwtG4*iP#&S#v0oZ--R13lCj@94Zdx|yh>;+K-Q2#Bb~ltvT4>4%SQ{|FORG51^Dcv
zQ1r#yp?!;_3Xlg2SWq+EG<^#kUCw!19-i3<i*|$Prw4bTth04E3GF8-m5;(=ESDaA
z6Qvt&pF!zU8I#HO|1eIZ`+(cGI7U_+Y6bO73@pKIGy5AB&<I}Xqx~^@Un-?_zBPos
zJ4Vx#3$1~o9^7p$?@{Re$bFyuDy5Bw;DOxRodI=i*^4w@g}gq^-Yc*#6TNLb2LsO3
zrxm>bUPBfGDWe#l7)xU=El4|UDzlaC-Li_w9!Q?;7fN9L@`E2O%hVr$6_-qHMTsrO
zpN&|vX?M%xt)smn`3JyY7Go=77^C{fq$>3%3;{O>dR%B<a`kc71*G0z7`qc#hYYH=
znDBStxrLPClviPSj#b3iaSshz%jt9;-|QjXwtkN@f<r5CsDGMea6DFFX0kGI@3w%)
zYUeezb6n2Wf5<Yv7N2b7^352HV2-yMwLRvRq`LB_8&bax*Pve}L>}0%GLhT+yv6Wa
zv<aSrc;3YGHl98_7anYcHN?wfH9CkejcpH>$o;s(>L8xC@$g<reGez+Q{R-k_j$~!
zmU6xp4(_Az)W`<k1h2WTn3dyxD(VwN--#N57Kv$U5TX-39eYKMh4Q&Yn0(NvVHp>D
z#b>B5g4>nQlxp62jN}l8B=9d`Uhv{E=6)lMHNUaLl>A1Lt@+Di61?qCG`s3b7JfMV
zL~Z3rX-(x|NpmHnTBr0s(fs9LZO!*bo@oB{NR9jHgEe!1mrCh8QS#f7lGU~4CAGh4
zEGd~<@kGg;>&ZWN60LTcwGy~F&U--p!ubyGep7}gL^md32f)`$PZhpkjA<%pKATx3
zU!K_jN>xAFY{F=V4P6@NJrqt|Ia3t+ARU7On2Xppk{PBwB-`kHd>#03Y-bkr=u)LW
zgLl2<CATMNXT`Djc8YprJ9J{aZBiZ{9o`3V>cf}-w|aDpNGUwrT~b0$BTiR1QQ_A0
zHIo~aQy5W2K(QXJA=~V<n=&|M8j^G-qJZ2>_yEiU2m;;*NdEbZ#V}Ar5`_DSkwO;|
zg06ADN*y+#R>{r)#~jsUxeclE&;=BlF8o92f^nf==b;G`Zcz!HC_F$40wA2Y9W@T3
zn>?V#$U*vfQFO!u>YgYYqd<qzp!c?kwV2I7kv_UduE1$ihujl|LW4p@j-*$prk8^B
z(xTD}tLfRi#0$Jfn59sC9(|x5a`T)HO?010DovW)RJvJeYN<#K6s`<#3{;*ndXIb#
z`dt~MD}mD@Pzv}RK*C|7P^6|xXrz?T->?*b{*IJV)HHxc`5@9*%FC1}JgCMYWKx_5
z)i@mYY8+rw-lbC86NNcy4B~=Oj5%ryH*)b1cPhwC8Mvo6(Tsf+$Hoe_MD)G8hn4${
z`}Q!eU+1&KB6KFC^2?_?m^U|G>HjPl`IPb&o+%WoxGF5L#Vfd~^yTRzu6Pw^l|Cv#
zv08$Bl%P;t%Fn1BZ1-5+L4hnqa;dpxer-@wRfasV>yU9yB1`~_cHqeX=l~?FIspl*
zCc&lVk4qSlmrKoy^qZ!MYnZkj(ki+7Vyw|4C;5ApiYb%eR%7}c)T`ZU%uK}08Y`Pp
zsz4HGZ9W@eodqDVfYf$#Oqhg{(Nu_YQlh3pa?~c&6*C8Mltwo29#E>b4J6*3gqcz`
zbU#85jByMyYpkG=T5G1|U>?DaWOaF91t8Wy*0EZQoWne;m@_w<g^-5<4_ZgFTw-h|
zzVovizMJs972hEJ26?;=jaym=`eXikZ(&cL5(H;s1lFwZyFkfr#$1*^=i99Cy;ZC*
zkY`+lz5g<QGFJ20K!N~D%CzqU-T0P{xR?(|Lc|-nF|5R$HJ244XMR>h&a;v8X5>nJ
z=QfP?k4AYDLgdWLTW@ZBtq<e01OooR2UZw9B3=VN-c<0RV|=wGx>9OZYPJc`)UngA
zJJ<$nkYtfb{6O4F+zpgv1kyaz()*-`&7ea;-y;zrl0~1<$Cy9a$>qdEAEkp6JoAU8
zy#xbEm>qLiGS{T)V8_cd{L@C?v1drJ5SIn%?^Z%+Q^4(zIDIP_wU{D!^a^9y!AG1&
zt;H_XqFt#4OLd}TT*iuIeRXDE``s1>nt_o^yXo5RemCUzpKYziDd-)Ke+f8hLt?eL
z25ujAA4%X2CHYIuR+h34`h@->>W#z$dZ!h<t0aWV;xR^j;gf1h-Mh%21iQ8gcntV{
z?M|YYna~m>p9k6;%AO>YO;ToGZk`ZrP^OmNi_%v?2Vu7{1o}8zZBXf#?U1%a|G&O9
zm*vCqTNhD71)m*b3+Kq*B{bf^0sTx2W7J_byS{7Os7n&cCn>W;B)@VsKV{sFj##21
zM|7}gF1WsJTspT2^NdQlp{4{~Ng7S_)RdHYCXx~)vYb0nmLiseR0>fxd{J~wsUDCd
zqmYqV;WnYdsFZIk-3m2b8!(d3L!*x1J(C;}rD;)8L_1{#bUe-N<I?<=@X%OU(b40O
z0fZbDQJEi7($-*h)_8&jqT*3)hq{alnE(pJGvBSOXG809LinwM)UB3}hGn4j;f{xT
zl5xf9jlBXMz20_5c(~$7-W{F8FBp1S2&P-f;?nt@*j*(#`f+<DY6_W=HfnnksrfJY
z30ba{Yp>M)j7!?I)|zWunVHca(od%Kh4#!T`AaH!z9~o{3D)C3Gk>O@I%n5gB{OQ9
zfZ6e7NZ=&nNmV2}G3Er|BNw;3b6chgmU68Oy<+4e<;@IkqM46MNM;+hLne<-`?Mnr
zAM$pbS*3)c5z{`y>=}I%a-n@i+*#7W(hq^tkwp*crN!FdMe%2&Z{H?Vj<qH5PWY}=
z+p-sJ*_UfTis15Ee4r&j4!0O{<exvrSsHWcpZfs8Tl({9E~`t_hH;X*#ps_(UH;sG
zP&*~q#a8s_i)SzsBtxMQ=4@mMMraAZMyVOH#wK7ygL_5ENA&A#2U!fPaS)cYaBGnt
zFmq!VIZ<tqA0!mwMN=-PfDlfKnVK3|nC_Rb?h9|4mp%w;%YCFhNAa?Fjj|NkA>bfI
z@J&H?bC=O}!1oYsiGT%^gXUSyLG-#XIGdLh%DhZ;=mgA42C^5sK|d#p8FnL8^AthD
zhI1UVv(Pp;vvriNW*VG@nLzfyHKhTj(cvuyvKr`%yFY+V#=!0mY_Yu_&}~9o2dTeq
z-VRuV1(wzaHIR5UW2VFYwIH?+_w!ljRn04kF&(d~fXws|W~%-mqtG~q4&d~FGYxjf
zgV<XS;~A`Sb>mxc4E4;!BAna@Da5W;SQ8&=)MsE%|J5}~M|=ChRGdEg$@Nv|i7wpT
z2Ko*Q@BV<7uwU}boOg5T#j&8}bl9{(cFUA^DJg&T-e}4zc*^^cvR|orQEZ>Lx>T|T
z={~msD{dXFsz^Rf|1<{&*$=MB1Bg9Pj1}vvEFSxWWL4sNK9JIa8Z+XF^TgO!a)OM9
z#981g#zXc&ljHIzcg27fHVO0j4kXgH^VJ^y7JB$zv~9oV{1h8nr2p1!8`Y+(BJHeV
zXh14gF+?Z#QT%fZaomsMXdoK<*ETCSy7n3`JFtJv$IJe%lz=lA>T=D_-v>~aen?yQ
z^VNvzg6j;GeWm~2LYp4bdMR{;YxFKp38|yH;<$n!1jq0NzpX-*QrDOQNPNsD`fh}q
z4z8xbxKfsx6G~G|*`X-=8T8QIG?z7ix~ou-b4<`2(qd24j9tYlwk{wBGf>9uv@^Pv
zO}*!uesq7-JgbzgQ{!O<KuiN-uIDkI4CKFeU~;=Z;UH+%etmEnVpd2=!8-xnl-i%T
zgvp;eMpIjl)Sd)y6ZCP&!9siXS~~V;3Kd+0%Yxgkt?E83r&yO8XRfS=Oz-R6Ic!NK
z@?9Ko2NRI)Ii7lGG~LBgHoh+BrCNddfcE>RP9A0n)#p!zqal~01S^nJ4aW)PnT0%a
zZjon|n&-pFa|+UE;^`SjQ+k-^*}(H`M4sP57%znxxIlRhbd82=K%R}D8JPCI#TEpz
zvExkIy^7U+hQ~7(ZzjAgz}tc#b`*ay@HAdkVq>2M?ilu#Mn3wtVW*ZJ@u6`$aGKr_
zi*qa!gVx%hhD)a41gz}D`l0y;$w}<IXa%cJs`0?0Sb4pn;<LCZydN41umbIvkNX9*
z&sXht!X{J9*)q=|o2gOjghiHcXHQG$eLw8p+dw72Bs%)1q(A)i=@%>M=O^+UoP|j=
z_Fi(^Ol{5%S0Gi%Cm$3_w>|s;<x=h>caK}iNlBkH7o*ExH&%XGN#By_bY`LsPS=i&
z)+DDp3%NK;UfL|0+BSA<3g|0hjk*e#QP;CsL=CWBRzvQg7qEt^0$7W85fBngLI|VM
zDlAk-W&R_!DcE&IuO@LAi?p_2G%i$Em0>-`9M*kf<ROcqbw4I<kW4Zd{0}qJg{V~r
z)C{K2^o^}KQS%bhJdf2y%S;e9c{orIS!py$w%G88eXTjHC)D$F?xfFNpuLx{U7Tm0
z_sNIORMV&QU;Xs50nntDfR1>f{ZY>c9U&ZRQkB^jQbDm-%4!_?7BEt_v_HBpv>N;)
zqA#**prz8PbD@2Pq}zRn=1*P*Gx|ep=ZAgYgN%`5EfeQSg7`i(&4!6?rL1v<v3(VX
zX{}qrS0wcPKV;Hc{f9ZUW)NqNc6fhyb|z-|s99B!AGH_I+UTOS(H7eWYs!3W1Zz`W
z8*vXUt&Ar=z-smiD6SVUpM}U4i^SNv$jXLUdr-=b<leuBa_<k1%iR=NO=&)!@fuP)
zCKVLL9{CVf)oC3?sr!RGUMuEol(+v3!kiQ5Ia8~*E*p{zAAOiRDHm}yW@@={tCAjl
zrw)xweP|IiHt$1=)jm|P+%_3~$XPa5CHZih5RuhuvATK<Vf7kOR<DG}>NVO&3b8NQ
ziG4{_A8CMXBUm*-8_{kn2@ofp0Q5A-?z?wLer4j?#&MJrsq2>qsIFi3(25mlp?)z6
zN3`DAp~cpNns+HR2h~KWIjv!oOO&(&)moAN%Y?+Pbqy{yF$NQQe;h~wHjC`Q=a-#x
zzp%5N!**8vwEq%(G1q<hHa{gJ9boS7kU$u438e%KepmReiopjSg^d^o<c}&V7R8aw
zBw&1LmE$3ZL&N2BlzAaG4OdB(gNz+jEP`k|DcO@#&y79MS8~ASQ3XGTd{-U2I_wAy
z!26)*d|cs^3={}H)20=zNy)%mel;@~?3s(+@GwroI1%@UJ?ohpPZG_?Y3<mV^m0t-
zAXB>(mVtmFMJfm~KW(1Ju-^jx!EG;Q9y|R~EYqus-We#$da^tvSfm263g;^U>uf4N
zX^|^kapBArL%Tqp-)3lLa9&%QM0}dad>q8(>OqY(Ehu0&6(gnK9rHEOzUbV*V{U^z
z0K9{G7oSTqoOH@2S;b_PCYZ{pP7ee1=g<aAsSN-n0BVzZz%IaLfQJDe0Xzb@9FVA0
zj{+V?o0STFwap6sHeG2IZvaKN01coBlu?^-X)-trm8GRz<{b@7dmMOSUWI5N->pNA
zOrvN))p5%j&v-jNNk*N@{vY1n1}>`W%pX5<XBftD0wZC~gc7}(OetYuoB*ZNj50F}
za6y6yXoz*wYieeU0c8Cdf2=>(48EeVDKR!{jCE}{n;M&Ssj=2t*N%Y3SQ?43hFaGk
zA)sgotFCn^%>93#b7uhG`nJ1&_}n??o_k)N^PK0L^PF>@=Q&u<&VIO1c^cYr8x`#3
z)oLDg!A=vG2_)J62wngcq!1??l4pw*uzRr}xk`Cjte9>gi798aE}t2@OZ-#QEt#4u
zOSTp~Y$Em$+*Q~XZt^U~W-#7ztFWQl<XtRelYV2DSmC}1;pQWb7DuzAb&830gidYY
ztqM6bGb~(NZ<9lV<ili=oVCu%d~mj>8#hdnoI6I)K~*|bo#iyyn4L`|Qz6DRz3MZH
zn8TWW1Wm4V?4g*GE3m^POff=kiu&cnTI2Ni9j@+~9YJuIponmIH^$79#9=0?Qn6ez
zRn1>(Q1@b{n{@@K^-O;X)^ePZ%*88W$_wO)le5QVixpEGWZRrmjBCOt<Fb+8Mbs;(
z-ncX(afm^fOJFY~45R&@gX4k=CX?%%JP()XrV4H+=ps(29$yY|>p7S>VK@$LjAazH
zG24l8?@bj(OE#^<vc?Oz!wI|G=x>Wx^fn~V_)T!ursP=Yl0vi8!mKlF#p3w(O<j$G
zOSu`y6<v_A7c$MVP`Y8?teU}UBX*30nya!fYvaDMYK-iAv2Lrr`tFGui#Wl$*%p9y
zu<j9>Uv*!`{zB=7SsULy@vYW(+ZO0hhLl|N)3#@~{i4;k8F*B63u%`<PN*5r2O6~s
zr~xKtszFqPfkkbCwAY~`?7aC|RGm7@hYn!|?i6Pymlk2)vYJJerDJSSPs$%+h9gW{
zYc^;|Mg}$#ruq%Fj=ioL7L^KV+=Vzds}mcLei6=VmrcVima-%=o<qY*fDWQMN*Qod
zL)$~1P`i8Z7w2*2m%0So6^tQ|jcK4IWdX|8e*?E9dF&yDx2oBO{Y+ThsA86+a*Sy)
z7+d0ShAT+85dve44)2?I%r$<d+kteaupeObEisitkJ|!Hl+Nxp<v0~Jzc*o?p{}OF
zU}sUvb3Sg*p-8=l3VU<7gK8@6Wni?iG;Q_S^8<cke!!Pxq?-j6miC8E)kX(vl!cHG
zGCj|94xDK&gvuP#2#}LjitM3wKf$+YiapduFvV7o{SKUCzPtr?Af)EYyM<MV*eMD<
z4M<ztxBE20akhCCX-|QxDFaS6H+pcN&XLP+m)G}g0A>dIuu8wYu-v6ueE_F((><u&
z1>Pr+R;Nu+Rsip7@LZ?5;z{Io{J6wmLT0*M*|ZrLL%wF(p^$=UE@e$i@YEi~1h}rM
za6!|5;}^SoHlA9A_Bn?%S6{7BUdFQ-aTXG6ezpA^X~m&VdEQF0|G5xqi%~uUbl7nh
zS^j$71{FxV#D_cTm*@cb5>SE`7BN<^9A%jtLw!V9R^|%8mPxq_c-#~`0%#UdUOe>{
z%Dq<ekSi4O><Jym6WsZ%HFk4A5B|@<09&hQXA_fL+4sY~!B7@<gkL%S>if_PWo+O;
zIq=tKs|g(!jlPMv=Pcef^C$hG)~XnswbkBNBQv2ktt@mLeI^L)5NPc37JAb*8CpFo
z9XE>rPgf;(x--B;p(}7Iz$LL+(W>VS`vO%lr&eJv2(8Chm2fKXW!MS%vWJ<LXh`>W
z5!VN5_d>=Bk`^q^51n;b4v7;DJ`-7>@@$4KvrhIT7h;?=U{z(PnwVULy*`ugs;%MS
zBJltCE*8n+&))aP!RC}sj8EQZ3naT9#W&e#-S}n9A)d|FqSBYjb0Jw2|LXh6HKCwr
zg4~0_U;Hq>`t)g1C@8zE4YCvEnjcleiV>D--6SWAsVI3D#wfi_63b+rtvI=iaz(l#
z#1X6;DS!E$18A3O)B^NqBrKQgub;1UQ)#epQJg&M0CvYPOtxYlFwQ>_mSuEKXiS`S
z`Q{?T(3D>jBbOR+%HkiOaM{cAo1U)E#LPCS4tq9>+&7;4vQn3dHD2hP4V(gQDuZ@&
zs1ww&F&TDmQtS$sluk$`dMN&6QXNJ>L;Ksz^oR@E@6Q2mM*o5)Sf;Fc+V%?gfmwt>
zXu~7i7Y_;uqAqV^v_$RF3Q@Ogid%hNEVDK|f|!IY+Xn24A}3%<pEir?FCr(~EZF?g
zSwVY9cibugzf3Xl8d$)~FKVw*mVj=T5!K>-&4+tJ=gPc<CB$j0iYWrc`q*$)Q7(Rc
zW_u_EJhuDwoYIQbISD7gheq~?;xJOj3XA#0LJ>}HahRJ}4sK#4aeCsi`uQxzVZlkr
zB%cXq3>KUM8hlG+(wa{2EvgktC1`r<B-gvrlSkTFqXusCD#2e0zaY7=tJNd9axW^^
zZ~N|`@0fI7hyFEo$9$xd4O<)HCG2j!t=z;ODI}M%2FH-K6mmlh>%l~kcroanc`#+3
z2KN{P`eW<_ohqb(BUEnUSFa3Zn{{5y+r{Yfy0SoT;QQ7h7y9RR8#M2iF|6)mtg}u*
zBO>L&OkMdZ(4&|fmGYpdvqo)(JRs?Y_+y^eiLGdtqh+}gY}SGUIiDP*rcA+J^uaa$
z#6J|DVB488B@X+L2mi}RZfP&Z=8;-qk9(6?g#B3Pc!2-J$vwq~Er@K+AJcBv-wU;z
zJIr>Zf6XzDIQlYLN#kB9FZaZ7p1y46>=G}9$ME@f^p$h>Bd@V4i$C&yAF=l%Z!w(N
zA9=+r4RaAHS7`(t#Duvn3;2Ciqt3ZFllcAKt>C=DQDR)A-d*N5gR?A~!fGM0{@Ecs
zm9?(+0&vl^PB{444y*){#;yj!`bb7v4FCfsS_ROZ#T4K36>$8vq94H~UIM)nElf#O
zs-!Aq5gv8SUWj|cH1vg!;IhY`<J72MY-73FKbhkP9GvIZjOF^xhr(RHiF5sb3pR$h
z{v~i3-2VfIxVNQniR-6bAL9C#!6mN$|H37%zYZ>O{SOO&7jD;#uR9E+RXlT!yEvNE
zMBHV$g!{i!aUXrqz@iU>S8__dN*yHQ&taY&!z1Z2S2FV-<B|0H|7;$~2_9*id+?{P
zVNAT0M}jWJALWsV<GCk~q)!HqbmEWkNP6Kf=8;Z}<&mNe-pV7PY#(vT;5&CNGJXjD
z+3T8yQQhRyEc~1PkRN+L;DMM?3f2#47LuiuMLIpcA&#-VMvYgk)A5kd0#K|az4R2u
zK5<-E05?-Ula4V6@A~k&OsABj5r=P2!w<a}_@JkiV-G!zhtD&yZ`vnQNO*lQAmR;r
zrqO)V-kJ8z5Uu9yp#}7AzVmB^(;kwgd{6##<kvORVGqp>zK44-OW~_L^4^Cvp;A%b
zxF=K^4x7Wj7UOFL|606#PpCL8KZFo&32R@KUgv@ZF#Kv_2s@!7#9e@~{?0EF;gY`8
zBvg~#_qojYWPivfn~<U?P!p2o;*GGB+aIa|t;S`7XM&vLMWl=Ca<$ils*pc4R+y!I
zAz`PnhQ%Rd;j|SmDxvM*WhVL|b%&KqBa2N=WtpeEuX*?8R@o(QyLXGX$x~&M_ORGc
zo4Y^MhBCHO8JoSEy;P2b7+bt3Z8>JaZ6lnqljHTz;fzoGS)8%+e~mLfJ(e?mwI&1(
zIkXwiVLZ)vO7RqjIpz~%IOdN3RgSqs<(NTzRnrQTp~E$yMb&!zF08iXL_4Aj(DJZ=
zP~vz1zU}aNr%%S$XM8eR#qXc%tqB$3ks>{Fl$ta#SVx($H`^1TCT!ZBCI2+U$FD0S
z;f}r1G}M|?cQM{7@m7IfSE%AJagt245#{)>MY0I)31|v(ev-=e#RHD*bUq0eM+%zh
zD9e^^54~Ijm=+oL0;9O|4<$@<hw?M+q0I=F78&=UJlp_i4;4@IguH4V?3kJdI}G>^
ztMQt6JiHeJQV-l_HD81yU%b;;;KD6}=oKN){5dGe1)o=jJu!SO3Q}o|?M1)Z2fmrH
zT`1Y((<9Dd87rz#K5}yTj7Zl^>E_47_cG6m!YHrJa_wy#@97A~dndPB^1@zEwQHp0
z>~Ogb%60w${Bj(~lftDOp8qC%RPyHe+hi({%HBNx<$G|dr>S+ov4U3!RlqGSD^Tf0
zX{=_$C(J6hy6p~b^&B{G_2h!|;qjN=n1Qi^33U45@f5l7>yC`G`&@h<ijTB=;ZJ9X
zt7l1`=U6g)0<*$rgT)Q#eRMT^_%^e?@-|B%joSceRi_{%saDhIhTgKyp@IH&pge$Z
zJ@|Pe9_Z-h;Eqy0g1kB90oVxQ`<k)au|k;GPBACJ7xy9g68PB(BuS&qnEU@9LC(4D
z6$a1jCrW9?r<opm6|^hDJXpr(H+`ep+4PO7Y{&f--zfelIwYGuI`PVhGi!gn=Ir|4
ztlL*#Js_K2J@Mg*ZR=lO_uAU;uGv>#Gf)P7?au<60}|qMiL<W>e;?*9o_WSGt^hjn
zbBbrqETxTLvXe2Me!^kgk~qB+B!90$GQQKm#&?77H`2Zg)f9WXOlMK~JXPB5N!;@V
zPIw~OPMZ6kGx}w_V#FTHULM=v9{kt6psrK6wFY}D;8-e(1YcZ{9)0ji5n@6bpj&2a
zC%8M<Gr;H`2g&jUr1J^BVFB4#qerz>Yu@SclC3CP8TRkv7fqTy6J3I=JuSe)XHRbN
z30CdWij*v@Zpk{+DHCM%YNlJEd1!?+lyz3}gi+{l+cin8A3(Viv8Tt^M&_OF!9Af-
zm@y8}taA%o6d!xQdN0-o^x!Os=Hs2*!XclVCvJz`dnR0=n{^)!!V)}WwXmB5dsC=i
zAYwhygPo0V-s`Lu>k-jn4Nhg-+|toyBr}bhwf8K=7`}6&Lu9@GvNZPWs*7u(OZ(c{
zJV<G;$&NxCJ*x>YWewd{)#wf$O<^9pGXDEk|D@7>WxN<A)+OvKX@nGg4Bc#t-G{&B
zyAKtZmnyJMGGp}^!2ZKLXqL|Vo0(yquLYwvzknUWPyk$Y9Le=#uS(DE^XsM`B72Qg
z>j_Pxnqts|ok!(h?G`{i_eSbT{-jyik3u5E`=UZM#yKYBcNQBy#BZ?m;~?=vP0ul7
zl@7hlh&KV>4U5fEuy<Ea;NxI#L(fjcRrQPEO2MZCy}M`^vu9^J-jUYC)0$ve)C9|-
z2I*+;ztqN_4G_jO3(n?c<e|$w7eL1Y)`KfZ#;dVt54b;}?8$@qRR-(~X_RJJD18!G
zeTL!y^X<5+)a<KZPcq|t_M0BQo29@v9W`tYOXy&aSvhs5gbwECLz_WcCyoGr`%xNh
zzwX#Bm$9%GA98uE)(-1|u-L$@TJGoZ7-B601SukENI;)*K0DVVCt_6Kf6yr5f6{WL
zA9+H4u|uM^$$^wl2hI$kZ$&=X?!|o>)W6~k0W3?f)jFb27|5YAp5}FjzA4t!>^Ipc
z(SkAFthD>gs2lV|aLS~c&n_@I=9c#+z*PYWR~K?0?^jn^buw<EfMtT`u~%z_CbR(R
zT9JnH7{!9$L?s^m-i(Lu+a=bG?l{0g)h_f4*irMj0Let0sG0Gspc=uYRbC9O{Dmi#
z-+>RdD<q>sl9$*i5og<XDJx+qoJOVXB`;tvG6i&&l~$<O>Fx#VanI}Ur=z#$TTggi
z$8L&1Hy4OC$_k!FhdmYaW7Thyni`)x*7VAg?=96Q=ubrZ?XbL)g}shAaO?&v`C>K`
zow*ka6&~6ZK)4<udJ4e}MT6Sw9oI!x1l>Ef2jgKJu(niu{o$vu9!P;y6qDSqRxact
zOhV-=Bfh(Z(HQ6Phwa)WbItChIN_p^u7aTDqa3wT1;#A8xq&2lH6!-uj@fV{_Yzzz
zVs#glK5z1y_ilhT!4}-PCgJ=gM()GAzVyQ><K%O|Svn{XlET1546s*a-TFu+ARfUH
zjdC3Jr$%5O@x40Ydu7CT7uc)*hhaAW_D7i@p9S=G8egYm8+MMpZ3E*hEM($LJ_*!U
zs#x(`p-g(HZd|sKh&s|qYz&RGc8m4B9kjz!u){@T5{1zyEESx0?Qly4)XL-omxPlf
zP*no#%wgVo_#zVwJFSWSzK4&Pj`J2DDvI*g>^)%E>0by<m7P|)BgCr0)U=S<YO<<v
z#|3=Wn#}5n_?85Ja&>x5ynG-W?idM8;vq@ZljQB{H^>=;Q`8vMZ#9A(5Em&!^CZA*
zY1*Se8fotyrOv-3+>Z0O)dbXu+(zsYVx+B6e0ZM5JW-=8<?jpdJ`ZEm@<oP^YLrEI
zp22QcjZ(+o7vfzmTJN6(N?Sm93(v~))ZPi*A{zZKPUu$>$7P45q+Y(W9YizWOY$$l
zOp^qQxj)32uEC#5^I_30SeCG6l6@x3jKHbDG;==2FY}uqG0FFqEc2in3YG)b(@@$(
zb#5)iE$^nBDUg6fm_@!N2H)?QSOHmABj6kvQP6jA7lvYjJMT{$QJ~E<>ETZdJ83@q
zN{wP=rTCr1Dk3|l&_{m(2LV%=jgbvWBW57|;u!c$@EI0ECJ>eyH6<?~M2`?-)zy)2
z7v-*z6l5VooxM)UZ6k4yjf5VO_p6c(kEqr-YQRgP)(JYBl#0>J9(Q=1FNU`WMj84N
zOV)_OqZ&rI@qUs-W|&WA@O1O66ZSS@Ojzf$h}puPrbb#-vA3w7LvEZ#uWg6d;diOj
z>vB<h-HH7%A!D!&`(nc0b^fV<g{&lU+_O0D8#{)la{JCSg6r(>jE>*nvh0+SI7wcc
z@W>B8X;VFo?=k5qINe~Zi)alyzGp#63jygVD>U$qYyk8k-dd*^aNZJ!y<SbPgcM@n
z$kN#MRTl$TGwp15kyNx5n6g1CWD0JRn1b6Rz&m-ixP#4*<yk?xir|Y%?G01@09Qni
z0t+hM|0J#mGT3}hQ|B|P6+w?)z;z-aha0o=5zuU$_)Xb{GwHj<MJ>ZSkI<q-tA}^;
zF`KsXUE+zHF~AS##RPtxVfI@A%PcD~3)Al%voKSwZp2|lvXZg!O>keNJm3bvCe4Lg
z&)B#CRw@q)tH#kyL;Ow!zEXI?T~7BV2&=+tmH?=1jV!!!T-_a>oQ;-@7wybq#r)0f
zccA5ypv8(aLF`i!2A~Zl6gBt-djlvoUZrZQlsw*_M9Ky}QS_=5n`}PtiZ3o16nX#@
zid%#rwU-174pahYqkV**umIxKr~sKLeMDHJu6!QL&cJ^86OmQU4Ade5`x+H?%|7gE
z9{|>dfHm0ch1`jq+oBy1U3`rrVr|k*y$U5#52w8;tajRG)x=Ye1t&n<s=ggAsO;cV
zGk05(!2Po(tWY3_jM-U`FcweIqBqrHc6DO3V?TN*d$LbogwlMplDRD&#>tUbQ?$En
zMP8o_&TGg&H_0_?CiOsi5C;e7KY9ow+YnD-V0wCk{R*5&!zGIhX41Ueb!GNUP_%#)
zI;Q#2LlrZzh7)!^npTQcYB(3vE`e%}7K^*3#jMDQdL{42a1B1ez6$sVk3@fFn?b%5
zx@A-sBV>LE9^H=~8fn8xM1k~2RLm*ZrI=x<%arB;9p@^XP7>=l#S`VOWsKXeTSsZo
z?oSHq!|nccAGFPI&j)GHm5-lYGUCVeBY9pr;~>GPTp|Wzd2Si50^tWL6pfa_Mm0rb
zMZ8|66+JZh^w8uZtM9Twbuq>n0PP@A4|tNnsi1GHIa12=%F*iBQxd_Ao7-{I28-Y9
z!v1>*@+y{E1!u-_nNhI14T-?hM_}>lI&tmQmS8`64q|*5#CuFS>v83~wN1Fd2bfQf
z%F&a}IDAi}TuR@Atj2qgz>l-ewCb~>(&KzFs+6kaMvhlyTc)M?sZ|~syC0&at0CwP
zc$(b4t9#4*Lg{;%M|i9@p3>?w&6Z{t@{sFDCpOQIr2BO1m~=X%tLL#kXzynePXk(O
z(PsQY;%%iDy#!Bu<O|jn3|vJ1q6Dmmc)itH=g%FjHRJ&YN7|oj;R2hTkkE!byrhcA
zILucUOtS;)7TBZGyf*7QQ(_%X-F>@%5cb9F{=vO&5S%rWMv@6KZc*iK>f|Y~EueB3
z6IQ^F(L~*2pU}wP634vpadtv2ETW)wc=`aaZ%)GvCwOSAFoBO6#1n#z6`bnf8A2}l
zDQe2b(Nzw{gqNjWofxsak}?^6jyU;Fb)_JcQvR`YM}kiE5kH+=hEtaKMJ~P)=!7&A
ztpvCYC%zI$4nuGi<=)^B48V6?tfJipl^3?cvIq+#m*L!<_C)rGc{?A$=^|+d3b<_n
zm_Uv<F&?WBV?__lns@)8RK;;D`A~|%A5Uiys2Shyn6Q;&qm(R)ktH%YhQ~34zb>WS
z07xALd0#bwFWx26ZDH}4!}qCsAu4p>M;QA7_zl&D_kcJnykfXW`SUtL!JFG{AE}YL
z50nIpHc914&$E=Ia`ArfGK`6{zQge}!1so5e?laW((mAFc6e8aZvDL&#&+unwp*t}
z0S~-XP=$U<R2Uyyi$94GP(IeFR-7CwQ^%er(zqk_f|<gN=a|O<p%r>h)>&Con7KT+
zdb!ymo6O0IvPC-MDf7gyTJqw4FQnwOnFd>-=fNhkFTN=mb|hltY_kP#dV2H6#gT6N
zz!u4i6t8&~9hB3H-2OhwBY#XDHl9aZu*ot9V}f5-?ylNWE^U!`nswlT00Y7FVWSN&
z**2ifai=8l#wG0thb=R}s)uyl6wD{hr#Hw3sa~~7`EK)q_&Cd=0k7t{>r%bh!r>W`
zFNy}9j%unGH^_Ub_V=!T7xZ<iq3h(Z$e1^k&=#r7b5|^s0t=Wufdwbz21|hjy!qqP
zN3hVP;$gp>4Ln>_^SKif>A|MT5lp;18<+^EgN^pT3>&aG2h84z4Tpupbr)=4K5D>L
z3+?f4fO`t=M#2x=m*9}3?k3DvGTd)twxW11!)?X9HCy<OI&Y;r(jC$Ke7~SXPpA6@
zB?k3uA0G8oA0G8Qzn}z{#FDTsB1Q8ve2Pq>x(Fcd>^ouZtOwj#Us#&)R!Ln8o!r0Q
z1I^F?$?6^_?hG9F@s&84PaS(YpQ!d@E~|_2Z;YgF_>A5_JuN}Th;QZR^u#gTc}9=(
zA8_-KpJpd+??r#|x%{1yxZW^loXF4Q8-eR%!0jtx+;4`v6YsCWeG~2$xVzwf7cMO2
z3$MW??)M+y?n7I|2wV99Jdg++ZVlsbA#hlQnF$(X*gv>M!em4a#bcE?7UoSc5LduQ
z)gRI?=6(}{oL1y~K8MRGU>_q94|cV1nh@E^BH3_~_%I2tN9C8PFuWdyVHsdp9+AJ`
z`b*ezdw#A85%wdEJ`+YWfuv++L&hsI&)6qZ3E?@dmd|jR1m}b`YIyj|)+x~uIUDG@
zuA*_B%a}(X`k}BbOrz<KIikHY0o%+{JuLmhV+<ShhZlBx^Ge{tzBca9r2twwz$Fvi
zu=!s>e!5DK_$~SzcE_m#%?N=U1brqt4@XyZrYUl{n#eG_q;Mvc674O_&xfn8oJq(c
zs^6w!OWO}kudB7j?_24{SjhZfyn_u!BS|oi(%$Vd$FRJLm9|*H<)UQ|<V$eQ<J7RP
zKM5(5gKzJ9^qWc*pHnKqvlw7)V-Dv1a2o7r$o^7DOUpdQJlsgN$W*6P-&aF77d#fc
zucljq3_=L^YgOUiCO(TMY@KpHC?v$`#)4f}@JZBj_`3vKzGwrK6SkaBd@&}u8c4^W
z559ZcpGCUe4s+8i|0JomQKXclf$_G8v3^`69>wXF7U<JEAX~>RIr2Ff#Du)QNmi-J
z?f`c7@uyOkSwvd1wY1iVoa3MojXZa?sbT4dnDG%nzy$n)9fqtO?cE!yjPMEY>8lMm
z9~1DvO1VzGg%Uzt>K~V^e~{auA5_p2anI6Zy3Il?tr)TCja8RXx#5o|``#Z`no3_(
zd^aj2?p_(SQmW>s!aF&exMRN^lG>)Eis@g1{TZXr3f&9N(U{+aWTeo9eS<24<9@ih
zYMti|&l~dG^95*KjDSBpm-Nl~dMSUtfL`N=T(}7>5sj6bAx9s+iz+a6vRIxTCF@1A
z<l=YW+(a9y7K^qbcGMJAE>$XdA>3-}`kG@oQhUNT$+P3M5PHca1K@8CjD8~@W>y_$
zWolci+P3MeyRh8-ZUfD1zBs`J+YW|z4L(D;%Xbr+3lPql47+TRdwVg88f$ej?kd6;
zJ&jkiF2Obx+7mM3CSb_0Qh;t;MDiVaasGr81wN96SNYpoxiaj-^{S9mEI(LKBUMxD
zs_lG+#u%zWPBe{eoKn|dEt}^*E+3@$ki>L=a!P$EO|yJSQ)t(X$C|K0t{BOskyg@}
z=MB|5+YEVCwz*?ghZn7Zx#6vnq;H}Xz?b5omeA!ydHj)fa85>uK7#FAaBadU{suMx
zLU6YeHsOAckP3GPTnF5LgiAB<PPpxGzmFN2zW)F&egCKMit<gkJMsR{a693?g?t;~
z{t#{x++A=7;Jyv_I^5lGZ^Hc%+#!tL^MrT8qh;1(4n5YKGiI04(sPD)=94ASr4@xV
zdX1y8kNXT2Wra`Bo1T>9@C7SR)fY`tVF<y{mp210M!0v>5iYt6GGTM52TajohKYfs
zi^&6hFq)nBVhvH9iC;sNeIMGZIvKzEDl4BQbosfm#eI<(_f=M#Nt*LT#ecoYU2`4b
z177VzxuBKFkud@^bPh6SE3me`?m?T-$OCP2l*MU)?`}k>z+Z}6Nsaz|u@F1P=WvQT
zNb9~#KGG#t(AgZqRElYUJ+2|hy&4=*MO){<BDv2D+Atq-Emr$cgWOey(y%(bUi`^)
z_0*sDCAG&ZD^O2kaXWLQ>ZE*7c1%)v=KVOY!<jPcD!2^pwk~Q*Nuw?R#*0bKO{=QR
znNeH3QuAjU_XQT~WJp$YZG^-)6KDQob26TknM>Jp-1BBFmUT_&59#X<eWTiAE4DuI
z{uAj5jxRNV^Q_jVA4yM;uS2WFaL~25FFh#tlzFh9`z3@J54-#+2)!!n`FkHmAtsl-
z+LkpAxAp4KhxCF6y#B@1C@FvTj6>h3IS#!CoMl03JV`zUyc!(>VhYuk8nOw)e8!9l
zCde@v^I%84g6U=0yJ>apbJ?X4j2QV&3HBcD&jvo!S)swFd$&Q=ei18pdncQA1vCK-
zIBcV77u_O*o!&U=#k_yn)!AmkMR}<@*G+@oVadUN+Kpa_nTf_inxXIv@xERK8U0ZA
zOlP#MT#n<rm0TW^zD?+^+&Jq4<qAedF0)3n8zeghk(S?!l%URVgSYkG<LVj_RmLCa
z4YyHEc48;)x(A~c)yqb<9plnmN;gp-&h#2NBnD7fBkUY#u=i_lIF%}y32UZdZ%!HD
zXQ~6XM;Xmerbf?VCe%p5WY)1}-kOdzIQj2fDF)t4Vp8rB1^9>kkR7>Sd>=baH@RNI
z&}RYMw#0-ioMm255~N(@Vr<MsF3Fg|uO`o$4of;D?WCN?$Z8VfY_1ts>zEZ*<u<R!
zSxje@6?<IW?eG!QX1j8p-l;CQv59HUW8^-TEv$eXdkXqN5~v)vqH1BQp(3q-?h0ks
z#RskT|F|Bj);&05(oJn$0f7T1R?fh;jyc|`t!3VPeaQ<I@Xb#u^QyiIuiQ7^GJj$P
z-sj&a$K4zAal4;<e!gywS8gvu+>#d%|Hd4Ahue?%`{DM?@0Jh3JwN{(LUv7UrCjBM
zJcrk&wo+;Gc3G4g<VJa`yhDCd-X*^y@0SnB&GK=%T|Oh9o!XkOuSBj%!Ij!tcH#9R
z4VUwXDfP;@$33_QTBf*-)2#V7+~?ZvD)~9vOMbz{V)@&f(3WZ|&x1aJ(cf;rZ^y>N
zdz34FCsvQ|sI{+HKR>f9H(TiFR|d+V9Z|zVjn%1PyoOtgHK4UFCPSwUr#Fjce|z?N
zoT;EkPYqVAFL{B-#rl5dBc}C?VVsyZzl(f|Qj_oQgB=UROxI;X=OW82TddOF%Eh{L
ztXdCL`iAx`REDZ_naRo!)~8-y7p(hgvL8jC@Ma4<w?w~1wonNUXUGHz(J<96!!1WE
zjhXM+T5M~?Xtnimx(aLD#h*CAA4Fztz%%j(35d81H;d2kU^l@aLW?3}1^R9bmsv8?
zsQn1|S@D~jJ>~AcLc}yd8wb3>BQw#D+p&}(tq2LfG1V*6F{0v*1GWWk``pz+CQhVi
z%tg4#vz6~8&QkML%ZTL8^U&cI8dysB$LvgIL!T;y-96}0#7%z`u+3#LSqY|G%p1Dw
z1bOMcvZ^av%DkS8GG->d2Jo!^g_35aCo`eRUA+mpI5XJ{z>ZwZkz6R(*+tpbEGy4R
zkW)ot1<6b4GQ7;3ZT-ow78}%WzN-j{+2^fp+u|+r0C&j!K>lLa{(>s!{(R^e>JJn^
z&oKHm$oOo<Q#(0b+w5Adbp1=vyF}@HJHNhf25xdSIJBQhXM%mjTXSpl&1>I%wdC~A
z-;j0rZ{)u*+go$9TF8Hc!Z3^f3wVcZaQDD{8t%VR^T5SEEax7643}nq?0^Uq{w~~h
zxcji~C-*0aZN^sn1H%3=7qB4PVZ@cznAYi@lJQ>n%drHi$d$&2U3@Axc!~=va-oWA
zEXQ@%#nAh6dvMnYnE-+hG0XEH7cRk%2rzL`Lh@XQP%^W;0z21`?4k{AN7#KV?52m^
z48+8BO1KQE44MOUu~K0Pf^fG|IEZdpDlCbjTq^08``vR2aLGzVnHx7bxyx`33)14M
zc-&oJLMCOneEYF102F!2NaruO3ZXPyv8cRC+|-TT3*6-m53SMms~k+mSp&;BUovM1
zTq<!Gq0F>8jd_Unw{5xo!{)R?W(%KXi+DHS9d~8%8w7BcKa4XjmPqg5eiEP&sP&C#
z2~KmfgtR9@j)&?@dr5~&>GbRwE{<pda=EOVhMkZTsbP-1{t(~GOfb-CFGA>UO_d9Q
zmf-NAhdjeU_u#jeLmu*gD#<o2H#FS=dH6b9$poE2ud>lo6LN}nmg>*6x{#l`4*>bM
zZ+nqy;c}LMcs{y;B|&hpulZw4QP5D;O?9%UX?Y<h=HW!lk+95)GeEKzCBTPWhOiGS
zSMp&!LOYb3RF2!vCRC+izg<}{4QDaXjayd#3<FQibrzu=WY`1km*?j6E8l?BmWGX+
z(;v}egk;mgT85K$EoQh5t~;lLq`U{Ra#$G|f=o;N3is(?4+^)s3QVqK28~7|XtXR_
zvsSZCvmWn1)$G^&gjqBhnsm)$IKJoK1+)5HW7hnG<~7ZCHI174VHtk{HYINP<9rB0
zAPM`{^Cs-;r}~ZX&sjteL=jYez2F-99d4iz*v%!{X0}EH{Y2V_(ZVtkAgnT=W;mks
z8xQ3A^u_=<b%R)2e*sb%BwK*FgL2}vVq9C6^n<qE5@VxOGn|A+oaP!%CA>~t$bT0&
z?8B*)(r<@es2y?K_)Wf0h~E@&2{I2Ad8n0#+7LQV&Q@bzrg+JhH&E;z(wvm>Jfo)J
z->m$bjenbmZ%?CEI)4oK2RRKg3iw5C2qTEC2&Fq;;^?b;FmzyVlb7LL5L_WeW^9n-
zB9ox4ipPl};<6r!TSnZ&Ie8_*WcW@|K1g4urf1Fa0;)A|s2fi68wm@94eSDkaWWPk
zREB@5Xdf0k8!kv@`>-v|H7w#iDg2&-_awqv(VpQX-vZMfOsvYV=$k9JhJPnlfPX{U
z%MJLo@?YEK2FZo;3G-I|HHn8O^WT*4*Cc#R9?3Pvw1=n$x#}p_F!a&GX>;Bye9t{N
zyyF94CaoZpEhnrb`i@d{Lg_1o@_tiMWFHPjGysMVQCMt6Aw~e=6r>>TGt@N)px^0*
z9)X1UOMP?Az=)8ZroJg_!1LKeV;b%mz{(?091mY2#)E|yE1}LGAW4PIWzgS*q`_wB
z2Rk%$xA*XA($8!xmt1i5jW~OuvJ+*Ze6(iw-T?81nZTgn8UAEn%`k<2fY#9tr=j)s
zfyTiLaw)wOe}WD2)}W0YqDL&Xf!lz@Yw12Z0ofF$_ZWf)6cmMAe7F?~s|&FdYjUQk
zRL7R4QhyT09j+xjRwvmMf_iqQwI<}S&PsbuS&4Cok4lKoG&-b+qcP}~6m5W{594MW
z#v>zs3z-pgIRFdD3sD}*4mofZ#qWv3>CXa;KdB^HSzT#^^b69KQ7sI~ESg#T-lAki
z^*tSlMRir=3)>($%-CW0=Y{=yWea^lJICV7oAf2@->PD9Na0v4E-LUz94o1yVr`8x
ztuAq%65!acBwaw0NyW0Cg<6d@8pCiZ_{W2Y3;IDituJ40<McmWZk4C1Iu1ku)b^aF
zn9Rl>S94WYo!t#Oj79<j@2^T5u0V{p(8BS&-D0S|OEqXOoyV?xV_NR8RN6mWL~R?|
z4}7dELMWH+clzt5t)NioIUE=+f?vcO6h-q7#&=MLztYgp#to-Ry+K_H@cgIs=0Dbt
zi$4+h9N;rxM0WaxWl`weH!&CDW&~J-1l=Yyrb)xypz8CmnS{Hlh7%#n-|Pp!N>asm
z<E!tncv!^u;u7b1?89@=qp>GGj6H`cFJZQN`n>+(Ik2%~AHHGJoL+Uh9=On<WFxu5
zl3(cBIL$L$@!dVjijjP<Z%L=fX)}jQ(Wi@^CoKiDlHzmVZH_O6Aotm()eIMf4rJMf
zCBhkD88h{M;0`$R>w!Dq5YTsEmImfEZ<)Zm``EZaTP>eQb~BSte;^kY#id$Z3WMz>
zVL5DC_yjONyfm~{H>5LYS0tHa;Gfr*=7IJ%mE~EN)XxV8{~SxPI_hVM^rpvIX9{-w
zQ((VOkJ}OW>Ey)jBHTpo#|AcTrdX$ztHz!u0mn=KMw*7boZ)BG{L<()`;_4YILS2m
zYHBr*pVNJ|i~e&540=EyEQ*;|m{vGkTbfs!+|=kVBU<toSLE?AcJR_JJt&h+zPQT}
z1<HnWCoCe>cQw3nJ7%#X1I$uuJt@afX?_FRwaRdm=^Rl#l6xR(XW~w=RLEn|9}ZM7
zK-z)Tw^e3_!x;F7u-SH%v9F@L|23ZM6O3hTRl`%?VeGM&@uV|m$KF*Mq>s|q;K5+!
zSc<)@D)_H6mT?j3JCNoOV_z>~>}!B~s*T<`r7ZxZm5O}i3%5i*#<xbF3*)2{G^Oz+
zskl_}X2Pn7to_iu=u4!Tu*{A2ULu>x?=w<350Q&<eTF5Py#ciB5Hwj1)M`FmI2JoA
zaV;QZ#Z!GG52UuaX{82dWt*vAOuR_F5Y|mFj`Mz!O?m9CLHuIMDV=>*Snd*MwjXKQ
z$#=c7i28u()}jK;!OK}OrFy_Y^Gy+-8Q2Httv8$Y3}446*KD_Ac4LEyl!C`mQ*nvE
z2OMHu;yY?fu&s=heu13{>?PN-CCp*Aa%&%_0<`aX3N{70H=No4KP(84-->-_&nrdl
z=Y_IYZ~|q3=D<7Zm^m_!SOwa9Cfw<uU7qdNVU{F$DOf{L3?B}7ljTX_aa4~tQ8x4R
z<TuDV{Bj!MRCuFzS9zeX0Xk3dV=+r75zr6^-Gx%|B;&EERNGWDe8ZnKk}BpNsdx(D
za{$j3&W&R^jM+=1d3-Z&qlQbjhzhsQ#5Agbx(6`AT^SkOIx)II<A_<7GR!CaXh)|X
zb75!+AK@%ZqCVYSzN!!7QYh~3<5I|iJ=0EJgR7`Pzu)?4q~7Mc*Ffn6_tfD}QEOcu
zxU`F7$#i?{5j;Vjoh8yLdvi52TzXq@E1eg=e+qu^lvgPi*zj;;$7+D=cwFLkJj&|P
zN@Q__>|$_>9+z&RZ)$}|{*ZCub0zJ?+3kRiW&<6qroab~oMH^|16=Ngb2AB<*uCnE
zP>f%~XzIcMPWC0S*3i8P3VOg004Hgfjd@qMrPRgyZfcdT(j}+(;y}M!>HCMUKnps)
zD2oW$E?*(4N4S9eqLJS`_suW0rPb=#@Wm{9Xu5k)ck{!6OiBTI9CqNzq`re53=Q9q
z6W=?+IcD-2Oaz1*pLESV5_IF+>F_rP@^aGJ4Rf?BOf>@dH-mJf_wD7APt>R74IhW*
z$|9ye(%imz^V**J_IhX+VpsMd*a@LIhE|eD?FHv&L`wZM_wX6yWaBM#YfkNV$;prn
zxWLD(p;n!S`%)t<OKrDea$CK3U0VKdo2b9I6PyL@uWy3F96|HlzWUELaA?%Mc3Qt&
z2hH7F97ip`s(<*V<SugibmcBt=#og6ceojkeHkoEhYZ-IC)+GTi*d${(bWZ=JRQ~J
z<L0tl<OGSLVLQ#)aGMvyTF&rw^oT2ENby~Kc?F^6?#190hMTK{@<nnNTPgiNG*fP`
zAh&YL=O(3!q^Rjgn-QWkXRxcf5o27Y-zmCQD&PUmP?==~<?d=dmAv?R9m}?d;!^Cx
z$DLSB!>)z}Q0tOwhAkLvT_ugkNw-o#3gm{9stBb0JY77}wIkgD@C8NB>zw#S4yjac
z<dBFQykgC8HqV7tl*AcW(c8&>M`|)wI7#+l(H3VHT36?<|6t9_t8DL)bWW;$xQ*x%
zr491&30gNH8Xr=vHKF9Z|Iq2O?ZfA%qFh*xGy8Bl6LNy<#kv}+ele+LxEnI!uOhWN
zHei(#!fY0TT&vO<PJIrk7b3L=TnDAVSW@yTFy-*uL>Fq+=3R?gBu@tflnU^&WUK^|
zp$D#{mNZ5nwAwMIq=UK-U|ux)XqAm#oCPRAZ>cCV84%l0zKP0Basw-^R8o>%kzoa8
zo;qImC#_`I`A=OgZhQ|oyNRA_1AlM0)X%;Wx{~4oH4Zh^K+kp_U>Gw}s9LsZ#Y!h&
zwIu^a8_om4-46ik7sGj5lI<bfBuhDBSHvE=x(xD;!)@Ew{|xisv)PbWQf-_tqPcKM
z;BA1tE1*82&Fe&k&>n5#yfagD*l(`ETt&P+Mmv98?sW&-yWv~=%018TJ-7bMdbuC=
zpmYfN0YY|GZmfK%a+7?;176Gw{ZrJC_{iWLI;feze=+V3bMbki?&1ESA&vRr{$b~M
zSmX<zQ>B8#!XMV%D;DjSdIvha0a^)QY%lhC((1<V8FtpfMhefN*2esHj9kUKRdiC-
zz3SIU^?ah|fW~Z_DV82-csMwI&xgT>VZ$5eKBr)L^abegJx_Xk$~-LZ^0DjDHTvKV
z2SyLh=OK}e@cc`s#`(_X*D>sE>#}t5f6X*;nR?@9&%{Te2rZQ5wzOO*I_1g6jkd7m
zronds-%b3xF#5f-&@viBix@FHhIVX>3!5yOq}Iwp?B#F5?k_Atr99{}R=!lR5g|89
zUdT@P@llM)8y&jT`w5;bKqTeI<J>))^%o0Xc5|YxZ+wGxt4GS47)3ctdGEJ$uIX4M
zdDHcsg_&Tr1rK5gedE_?x45&SI%gDd2#&T~C_L@X7Ci1OO`JZS_1+Rs%}b5bS!5BC
z$iA}=`WdhYBe+&D$<^OLK5ggcl36E!JMP6|RPGq90Zz4e4U(w_3&b$|gij8?OUkz(
zm%GEA$vO)=i|!6BVVvOI;=U`4Yk<WW)}nOXrS@^IO36y{a5p~wRe8Z8-07I5&xWO7
z`tCH<F^XZGa4GocBbSc+-6Q+fFV=l=<k3eua)H&!zKckE1m|++KK_+`GHMc*y~4Vf
zu~k;wA8pEq#ndu?QPC!UB60$~*gzwl8!r^aqor-lD7Q~$tW5ou#g-bj<S*8LzA%t0
z-^gc6Sv-?G@eHvUk9$^5f;50oA@PwWo^toaSc}TMpKbbe>&L$;8BE<}<C1mozX0CU
zJ`Amu;Zj)E0r!^^P4Ph|J+>&+4&hlkgphW}JiwQ7son6_>3l2TliZz!A3df15=Fu`
zAnpzR_*bamF+f|YLYqDct(%|~Tuk}!Df&n3^E~!e*}4R^Sk6RC9P4a|$CJQ*`_!+=
z+TbshD?HB9>66O}tVIMT;3;5&--h+7Wz~CT&4q?LeQ2v+DxE}Q>6WfSigT;WzjyQY
zMUGQ-R6cCPTA&D}Ws~~=19m;(#xX&|CVvE2K7Q&-!yo!O>sLxMhjh<aNHMBA!8Pfs
zFdA^Ey(+8@&E+uEfib?%BVq2leU)4s>R`zWsLMFYfm}+jx}V?n9tjVpYlDSH>3<3a
zIqNTjf!fbn)C)Q+8BDP<{&%-NHtQs0uy5&o^{=bF57gDC%8y~D!MYtg<SBAIe)BQY
zVDHEmgFE2NMeBVg;$TZ)Uywa5U&pUg?oYwm>C#8z0+lm<5wOO;8whR-u6;L<OgaF4
zKU*!c|4I<QMBzyZ!PP&mPbN!K0|*VLNlFN(ihM(#ym?X0&x&s;EVw#<?TIykwZZ!Q
z`sOWxdY*G9Vl`7mM@miz)>~Qg>ij@35~l}oc0|4hxBYlKO1_G)jdw}6=C*XcbL%gi
zGW7Z#NdH6kf9lz#(}vz$xDHGEQ<ry+{gqtiEKO4AI@5oFIA_+Qlvb2tqf)R{t>#m4
zw|t(}gSRk#ONY7NsOHH-3_QdzCPdFe^p|(urL3JY`yJ%1?g{UMjg`o0%<o<D0KC7$
zF2x^&7dfc#E{MPz2{G^xf;SSP=OOoo7fYuwyskU((ll#<;FwTRNcF$de^(srli3ZN
zQjUTDuK9jzOuo1K@0l<7kumv}+z#&&fjGOfc^<#R61;K0sOYmFJWeiaUn9A|;SXF~
zczI#{liO-SSJBtbIVRshEpN%}KW_jZ=tBnrn5&5HOjOR#gMQrzO@ZS7v%PYLK9`AG
z@~Tb|4~vk)ms(w4xzu0!mC(g7Mki6qrZxVFM6pefVf*5AWv^^#TI)kzl1iUvkP>_p
z{mo}=Iy9DEeDOtb1q%cMMce!d)(n~14Ik7u2T~>^8IG+z5jb1_i`73}Yh7Epp>iGQ
z`yA4H)%4cl70?PrJ~wcR2s(xofn71cr?+Nn6OdcB9l3o_FGi<KI8pCm?Rn4YnsR}C
ztvR|q3V!Xk1hdwY*S@xC^|z23Cka|;Dd$=P;j#|P?0N_Ce@%tb3aM@m<s`~CNpo!d
zyQ@C{oXMKwfOBL0w)H<<^RrP%v43}cn_5q0&b=T^K~5*??Gp&f(qJQp5Htt~8##mv
zIE0OWu<BkAX3b}z8>p>~aF;ScjB0W}0}CtWsDqkkaCk_zESglGYounUWOgltbcb(E
zhrZ6!0WaZn+;?lbV;Fl=X)K1;hd#@)ztWeuztm?b%N25!kSRC7$kGPeLNR3Q+@h39
zifOet%yleDCwfulGlapE35QqvbO#&!Wx!6f<UV!;=f6>2_wgfMcgJeU>+ohpcg~>j
z?5NJ-(eMk!?XAn0R4_66Sg?*sc}U|r9`w38R%aWeJTXryNQ$<u3Af=E)HGhDm-%e?
zgAsbe;VR(Z^aeVs@7h2VcWiCfw@(C4tv$8cT0cr}S5J?me>nx~Dx@<Kt`FA33P2>@
z6`5UqCmb)!;hgq`V}-|DG#57O5p%lX19!7)>Vz!AvAh$mv+iHy{xmOrZN-L)FhyTo
zLMe%!v3_s!3$tf%y6#u0rf0lL**!CewtL1SS0~nv$oG7~<?r;&?1^2@rcOAUclp~r
zPxRb(eytb{dKN^jBRWFuDy8=tdZjB3>49*$2W9pjgH-PPbp&s^lfyfS^3Bp5D|k2e
z13;XuISz<7y0;bl)cdnhm_ghBaTs?Cl-wOcwWpk^2c**h8*+?52e>Chpgv!}gTuNY
z4691_O<JP)+h9F_@=8ES=aJ*od)FN`UyIzLQ1d+G7G;iZib8Htx8-&Sxlz3t>{0#E
z{D4WGAI1%yA9}=H@*8Mk>`&?!`@;R=9h6SGYGeDwTt99`QENvndN>!oL-H?);46Z|
zyZ09H9=+xAJ$sACdu3CHB<1zq*ZahkZ&SbNjqROz<vU5y>1)C?f>rSsXV7naDn;ua
z2EI5&gOc4{g+$ZG^17Zl;X0LfDmT4;l%l`bN%$SM^Zqi|Z=_yu(CrsS;-J5Lv4Y`H
zJJg1A?L-`LoQ8V{=Mm=+mJ0tGxGNOpzYzBOMg^C$!H@Hc!64!`APnz=0l1Y2$L>61
zIa>GN7mY<O?7D3$a^rW4dr*@JIa92WA^Em33!)Z~$keEs0(2X#d(gbJ=t<uqSY7Tm
zxdO}&c>w()lgq{YbKHX_(c}`DzZkw{CYPD{J?_E#ye5}{`LmJ2YI5z~?YFxJqXtZ_
z*|YsN_n;ByT`9Z$2~x|t)^x3~8a9QaeFlfdJs4w>A^Q<Cr($Nw3xI*)4rH85s4&Ft
z1PndyL18B^?;Lz64=|hp{3Z_9anROTlPk#lhXF&U46ciTJJ4og$D)<7@t9G^cVm;{
z5FU(H_W`pEOB8J}zMsQ4%wqRV!h`dn`!E{bhj3PbosE5JdL!bFr?iO(XWxBaG<M@Y
zys&P=3z2;*t8w!NlAX6%QiS|fCswzvS+mwkYuN#nfA>7)dEGh-8hU!Or76mvn81F)
zKFf|{7dFJfet_gAomp_y_04Nm1*}INakIo(A1G%^URb8>enYe@jcyNoRNub(qx#;4
zkLrnE{^CQkWlrI{C!Xz6^G`Cqwt?=fvN>ntFU83eT*Pj%vaSuQ0?n&LO@Bk6KDbtL
zSsrJZ7mB%?DtYe_BQ6}nXl=#H@*qmkm?sF@xckM29gkTbNzc$l#s8H)dg24NFK2!=
z=_^@ZbGb`rd2-9j<@vRL`^>kN{2wnQvhoY&Jh|Z6r7!sW%l@xnoaI5|_=GPdKbrmZ
zl)s+(xaq#chhkzUO-@a7PP0#$o+A}jK2<bh?l%@bSNC^|o?rg|il3PGHzhNl{$^G6
ziodT}yz<3Bed8;uR&RcF=l7d_{DXhm`|g^xTfVz){cHd5=0ETI$y-0%|I^@+_79s|
zPJPsQVc<WyKD~Oa_2}teAA9f2$K9V@|IeP@8^3GVu=VwgFKv5c*V_kvw);m1f4=G4
z+rRhncXs^aJO6U%-}e0L;a?nozvDM2etGt{7cbrXufEHJzi<21xqtuQ<oQpod_FYX
z|3ye)EXg^5*5@sOR=CuFHn<sg1o*!a#=jGh=)0C$=>q?L>l=@KUX9I|*^<sKj*EZX
zoc;Mm0g|clk2Cw{8%IK|BcYb=jglv>S@NU{olnIbiEBog&B(=MPL!)^R|GaSZtuJ@
zFr?BK?ohSJID;EYW9cmY@wf%I(-<gB<oh(IRfs$;q9D?u1Ps3yGSTk1B?0vg@5_2z
zMB!baaI+=zaUp(`%F~I;RV-++6Bx@JEQ2{&4hymt*2Ye<0d|cIF-6O?TCGVNt958I
zv`%e~HmGgUwrNjl2ej9;Lt4eeOj?u46l-#rGE7cWjwxtrF}0aang&eQOhYCmmc?pg
zO|h}Dj@XP?XKYSvFt#POE%s#WK<u^Hp;*Pi99oCT5$kX`G8|4vjw6WMAKDxz9RrSQ
zjv<GV!7{WNri|DOM@B}5Gb1M>n9-8amT@v;AmdubP=?}UPOa1AjCDGk8BV7&#~F0C
zINO{jodeEm&LJmmxy#Y!m~vus961>|&YYZ_U`|U;Th7Uxft+hOLpe&21+_s_FgEB2
zW(1wVoM1565^M{e3=RaZ1&4x43v1D~m|9|694#3w&X$~(U`tC&Tg%CoftG76LoG@h
zYty!w+G5)rZ5eIOww$(LTT5G8+sU?pwrg!eZOTb@QhU;LGWMk7WX4J7$()nHlPxFP
zPM$nDaPr#8AzUcI2DAgFf!G1ZK*oS`AZH*r&@#|AaB^T^;M%~@fO3sp(_S-Oi@oN!
zmT}E_E$3SBTFbSzYbUP_T)TE{=o*gEhqObcq1YkEP{xpRC}$`*)H2jIbaH55=-SZG
z5Qb|7jidn43Xr9s!U}*^P_Tl;_{{%^f-_m4G4A(bLiaeq&0^zzZ?=HKqvL+hM9?nv
z0Bz#r&QFIF7+Q&~{afnYFMns?KhVpfvvY#)-Q+oa_kF9edjnCM_4m4kpfFC2qx3lX
z-S)Un8l^@)=7JjU(jVg0G1vMyG?VWfYtO0u0F{WvL!BLPkT(`Tv3QTgI|UEmeE^;T
zyc4J(Oa|mLV1P%*Z!99l;v-LrpID@iMS7kM(#IlwEYee!u|(KNAB*%nd!8DNiS)cE
zq(`IT!8;X;Kr|^Hyc0-BKR}I74aA|Qk|{O*2{fcvkRA=Ef{FAB(xcf3WIT9BdN3C%
z_#A2~8Sng`Du8zal&UpA01*(Bkg7=qP^RRe#OR_t65ja>9HdA6RWy(n=}~`<5(-BB
z@eq`RB8o;e#yc+=@BAO{gf>cwAJm_tkg`Gj@lXu`CDIe-sP<F?o;}jj8%Hx0h4iRD
zp`41vgLgs#(8)nS1yO%qTMiB{8Sng`z@rAhJ4ZBuN(dz+pkR(H6hKJfh(O^SY66lf
zM*ma+DwF^v;0PefgbJp@r~nFthbN{4c;_D|HT~fo=?M+wMg3KBKzbgG^weS;Jrsp%
z%%P@|DGB}&k<d;>qy8%S5DF1YltHb_(MeeXKu%Twgi589L}G+yDk@AsD$1!?l^|5~
zBYn7md2Km3R5DM^8-^MK;2|dz#KBY%N=PKc5wZX!M~VtQLCs6%6{E^f1qf&Ylz>A4
z90;|FY5_>ZGor+lfFj`ur&i}>j9Q%+$EE+?ET%K~on7R&aewqFH~iTc$H1F`Tw*bM
z(a1?K5c;$<)A5-iG9zH*M=6NJztgNm)uYjq;<NN2Xh;k(9iAMUR2v-^ck#i!36R#g
z>C=0jQwC+HbrxiKEx*uw_VuY6Kr_%?XnoxL^w<#$a#69?$194)hJky;$%}Q?EgV6D
zIsytV<RV!g$1PTOj)Q8w2sFYbIRKx(5whr&1I~Ta`r!bIMPI_7Ie!y|_V?x{!379^
zuiFK@^{C@4%@gW(+vDa&`Yt}MYZyC@r?C9MiPb^uFk6F2_W|^M!n}x#9p<I6qNP3X
zYCRse6?|9)c;aWVR}MUy@tE+u$nlwwpy_(>-6)?4=RMaA$Jk`TDske(e=mt{XU|Sd
zZ!KE4NDr-#Nl&^l)AR#(;HuMGcxY}ov;(0yRY1NXo<uxK$~fyRwTxeAd<JXlBVLv$
z8_S@LWNmpQ7aTlpps?mqd1#5eTgo(nv&Ni;JTX^UTZn^#A7?mAC#&@e*XhQy{VKjP
zoi8fHp<Q`Hj;lkQ`~cOw*^_<*ws3CH$&n}bGFA%t0ogF}<(G64inhZaaL2GWX^;&O
zERMxsiYCAQ#A>WP)`rWy_$*+#N4hYCcci)UEY6s0*j*$z`^Umr-@FRE=H1{_zl?#i
zr?}kfa0Xbr%cpZ#K6K4KlBtVB`<CG*u5Y1zJ#PA%$+C1^GumAXjIf4^SPO(zo-^JB
z{atex^rav1xIr)Bb<u6{VR?whPmpzIywCQp@*u^Ha0*}=VP_F?GaQ1o8*J$Cv+S-J
zBw69F!$lH#vfkS9?uiAyGoEK}h?WF4HLp|3hIPjTmX%kh5iMoj1a|glr_>Rouro)`
zcoy_QK24~$`x9U-b9|tc)_tNW?A}MN9A_Q>MWJZwlK8j#$fdS;b{phl#gZ46Llr2U
zN*$<WDEGPp<qA=3^3=RON%dvJC*V9e%T=dwa2V+O*`tx~9q`fjGeN*}p5PgU<}!z7
z6@v?CRxx>^bv%0K^h+EfHM~n&#nK5PSU8cHvWSxvBdk=h&{?|WHp@$`vXrf0D<?}w
zMavTQdfTO-^v?%2eM|qvk-~pY_MTqbTHq5z%b6Jqdd{tFEAXAS9$CVW=b6ZDsCUbU
z@}TrQg`Tjoz=RyG@Z7p&k_rxTtJgopO1%;qQ3r4l*e19?BN*WxWDxL$`*SF8kj4~N
z^Wz5K{u@;D%y185Ag_S?3#99S8)VFK0PYc(qgx0U<IRH&a9iN+gxd-?2=^$1DiGXb
zaBJbd2ba<vXY5NN-1p(u!94+&%KasS=sw&wxRmd&u&+s0K|X*>-%rB53AY_a<+|a1
z$e7KhgGj4zO4aPjdhBbC30`PH<&{D8X=Y)GH?K0!`&az_;qc2yC^Vl=shUrkB3PX(
zA<WXr@5;%t{#0%=+9Abq>8RmbVy2FLam?`MX)oHQ$9fE{f!l`&qiPFBevv*N(mL~&
zvJ@dzunYN+*7ZRXc(`(@xW)T7#iBU>>1C`dFMI88bG!0!m#*;dxm^WcFJQV)a<_P^
z&My_etU=zV(~5`Z$#&5)-@#)arP$fWC~o$9pX8qQLh53&uandMS&EB2LD;`Y20Ujg
z&Q&qtd==ASmyey#?Uc@;*G*(+bFm+8AAY7NZ*I%M+^1WQMXl383rc(8M@9K_TX3GQ
zAWXkbw}K^7SOLNccv$p0o!3?B!hMq3&L2tMTF9pjFEwXmvoDSq-h_X_jB7E*q=!0R
zGHbWv>|<N5`Jo*yPH7(jD=xGU_LD$cAQ$1+;dX(3TBKdj0>2KoKq^|maXSW=vD<Oz
z__J{6_;2A*@=j#E<1N}g(>mSx+&-N5N8Zle@^+S_>He2+D?YRg@(&Z)cAPIwWZQBb
zf7K~XWIJ-XMftxH&cuw;dI8iDNt^GCicxkRhm~D~QM6O-jLRBGqYcl4R7I3E$`-}(
zDiduk7q@w57bl7F+Rm5aw4F1|+B5Dmung5b<BSVFclV6*x#uh9HXrspedGh-WldbP
zIm3+pFmAzgP25+_YzJ=B1!b=PBzK#)YX5Ta%X-l8JDi5+CRzTQxq{x$dcnO-_U+^S
zZqKds4!U|k_}Dy(188l+P6J`#<1iME0ShOnXWvnKXx{uKwVxZLy63a$njJ2xH)?%2
zT<d+j)@6TAt#8Ziy>M+0@!IYmtu2i<sO?_~9pM(IUKDBZj&L7>odS)STAbua@6qPV
zMr)lV_P!Lay<8Np?JMd-+d~&l+gI3!zI<6SYx|@u_TQj{onf53#&J@cW%*wzYm`2A
zaExso#Tbo;oIZXNrVql{D1H1UOdr=lAJBKzLf+>N3aR;@#MNyrO?0y>jH4YKM+^V^
zIJ&Kj2sORMakFz2H(_deKsXDtc<$o7F;gY=owH%wz@iD8L-e$ikNc1XerB0rx^{;<
z1-tYqmY*N>C#FD?B`ZqGGe>>8i)MjOcagt;mpOxl=S)6Zo#GI*sk0PXC0_XLeIq3k
z8KczS-dd^<znqb-1TVWb2_+_3e%|62Q*!S;rkFDvd}Ipuq7Qhf$5ATgB$PT)I2Suo
zs!9qd_guK#64bU#>K#+=pHya%R>k@~%8VEOU9D-P!=l8050}WTnB7t$dTka;&9WS9
z@n=oV{d4=wZS_CE>%VtQ{m-lQAMFZ&=6o2M1*reRvC#Z?Ah``Iw?lHj@QF!Po+r}F
zNGGcMBn-zIz|kP}Y7&#Bq(YMXtz~wjt$=Gn_)`)m=P@0gsLpTWSHPp~{Pv`^a5ZT)
z!&SozArZU~)|#M?lvX;t5cVe_(2mCh`<A+rM%Y(6FHT{4*^G7n1CS`1!USm0PGP#F
z;7?CHyR%k978#2_$qsOeu?U?LM&S%Ikbt!_4C_U}dPVAGoj75GmgaDkb(R%+XL*C}
zxSzc5gEX2ZSvKVjx(4xv6FiL#yjq87DE=gxl?;q)MBlotmMhsE_59vQJ-_$o)ia6e
znSwEFDfQfh2QD4eKm6&g1l0J_(X599tGQpN`X|CN`4`8&-hJLH6kxUuBpm}bn6i8X
zAL?j2Nw@&Rae3ZcGHjTUKAw#Ba;v==>A=c`Fjl<4inN5u!V)FLXv6&vwldtpnUIvw
z`O<|M6XR@oBG$llEX8snuz&5GBVRN>s44Su+1M)|)xTQ*?kX#t;dF97vWwV9^xZh&
z)A1vH_pvOL_G!4Z6DaKiE@z$%dlq_(ave6~mJQt-%RNch6TlrOmYxRn3?H(OmYxm0
z<9Z9PY;a&_2NIMgXeYx1PW|?@wb~#;lOET}WpJ@7#jOGD+Sx~Ft%uV=)+t5aIw(}v
zvtg>{!W&ZFpBB@4^uik`dw0nTQ5qf7Mhm!`IZ7kwwb7{S{X+Mc-tkx#^^WdvZMUMf
z+wavo<Y##QFo0slbrRj^@kDbU?=$!8A$s%>^DRBZNYb*@FTe|cjxIOg*U-}dOE%l5
zLwaWZYtvcMd!Uhl5eiXz%mcz_>YPGjOt`}k{GWy45080c=aiAzBt0eX(or`5(_NR2
zKK6a0&r3(sF9cT8Typ8?()pkM>!qV#{r=0V$<4a(^6E($wc$DDi(_?Io$;AwKOgg&
zMrIm|&=c;#V*mm?Jt{mJGkB)>yY=8{KM42WQtH9eHimm}@t@j*rzZA(+Z+YFjXeDg
zIWDH_yIZJmXXy06JzMLx@$Ap*=QJ;m^mC@n4fpi2k#>yq^xn~){#e#%Pv?EFH{6=V
zpvKZWdwNzv*No3!%1XHWQdV5&OFb{y@@kbXm|LG}IpNx$_eXmC#gQI=N$v5}aD05Z
z6fSieO5Krc+`6G>Q@QtfpGrRm1O5^*Y8gw9>MxwAx%|>ZP47$TQQaf{xTxN7YIxsE
zQr=P?FJ5zbW4xw!BgKpOd+&>nLTFUqMr$+n9ov+*(DDK-G(q!_@{Yv2N19c9-nd`r
z3-@3Zc<KRtVd!@Q`aSpR!T<kJ4W9*L?lK25WyJ_BsD1i=;qsW;sN>P)aBW&q8{D0J
z_t{#8+{`^{WVn;!(L3~a4b|PVC)_q}p(osX++xZyK5{`5DLi&vxvicb2v^iyq^~{p
zEr+49AP)w9@@5$LwBsqR7+0R_EhHO2kB#`!M|_zhzHC^q568<I@n%p=42R*=s&6!m
zQmbK<IvkHut6t2sxMX-{ZrSV-&+Po@2w(-}2q0rV1?72_rSOa^C?|;F1HD~QTPV?H
zV2RMh9o`kO8gOrG0MJh$y?aOvk>0)bWzU}Bc~f=0PjGt+I>S*Ws9N064TEk!B%_Y~
zC3^MREH#%uu2=tuH0q&4Pa5?en)&_CvRgIk16-qC<I|^OpS<1OCEc#Gt7<l@8ucR@
z^v7@4pl64s>OOm7WA2}$dEW0J*{naHd7gb&&2y`2K|<9#|D5YRt9s|8)d)MH&_KCW
z%lz}>RL%nqM^v|}|KG%+*GBaJN3D#YoyfKbY|7kfDMYiU1~v*uEQ`Q02!oZQds!mU
z1ZrT7c}#q0SCV}s#J7>&@g2FB-jaJ9v|3*#y=c;&y}M?#m8m+>TobyXEO2|9jp{+y
zDrqj|I@Jl!9a_)O?3?H3)*KQ`F<ZML8o{CI5j!C^(h4ScVE5$|Y{G1=3GE!CSKJQ0
zhE0v-?PZO)e-!$>dqP`B^ovKdg2&cpR2!I5PID<kcWMG-CBvX^Nq5`nlm^JxAD9aL
zO=w;=ZXsP?F-uT&Gt-5=xws!w%ik_yAIEE}8SW@KRjaYr4DTv=0r$C1M`$Zn9EoW&
zhP}j($mZYnD{Fq!AM%zVFKGYng1%<ESZsR&nyA;49(=y@bW8V)FP=Y_o2BoY;f8j$
zluLWt<KDDg)3I}2A)ift@|ViMoL?$^{`RLNxs6J|35dqm2>anW-$qD2<KVLCRbL>P
zBvli5sd2ZJ%9Qlm$~{lzp2=Sk+m?HAMte(pi<G-Gwk)?5Z{@kqKXbW#Tw{gg&&&__
z)0b=8UH=G;UfX;3a-mao9_M&%&=7qS*6DP%;2-`++?|NalsYOW-*wJYmLJI*y!Q>9
z(L4?P<7ZYHcI0E#*wz*JO%U~7iu&0`FiTc#*8H}aDCRfKgk8xE{4(5d8^$gq6P-*8
z9G^MeqGHytn#K6N;7W}2CB<@Jtv_)o%f>EAeAMT=J2%DaKHp9L{@uw@@fjk!&|nsD
zzS)uTU~nxohBgP*+DKomRetNw&x5D@05z+sW2rj3ZcM#u|CD+S*WRsOpP}ufTwX6}
z6sCP^{h}=@5i4;^ROb_uqRx8H=AX^)e&TEaeBSOSCS{aT-J(&q)3?<vDF5Iu%ZJzR
z1nNh2i`1UOhI(%AJ2=6;K5Ydg3L3yUV5Cs{5^k(PDD}SE`_@x4BX~+H4jG6BQgF6W
zN0gp9LJ2Q}FCF<Ks`&LDXitMK;2L<pdoulj#Y|ZU9c}|@e^cL^Ua#&drbgMLpc(#*
zRKR!MbymOynmKT~<xFk|p7xdwVED6_x@Q#8sgZ5IbL$XuG~z7Xpv9@GQGBp908OvW
zYXY`aPZfbWI_2Pe%N^gE@ug3GYl&8Jixvx`lc4k7xvhu2*t_?>?8bQz&WFyq=C&R}
zNSk*Pv^y;9Y{gl`If#%G-i>ZC8evfv-m&QMMAPX{=R0v361xCSS^VlmV;#;TENr`1
za&2>2zB(~xhqsQ-w2uDP%TKAi{FKUzJ89mBwWSxJg~u&s>E9v^@~(B~_6)bzv4X*~
z8wszGk))*k_K{@pqF7A$vpoSUb)9a(S$2d1lP<SEMWaRxQQcG+xs>vz!aS!K_v5uE
zUjOl0+fm@)ynOubvG~^>dG`ohF$7mPhij!$FnDfX7_LMb;ckUX?fHWx5y&LB#|`Mt
z(HJ)Z-4a>%RPOT^!7*v8r(SA*D&V&qUhB)Olu{miY1`OG?x3*zwZBB@?Z5INN?E77
z@V&SwF#~$MaX$$JU;jzK7A%v>y%?!4Vx-<7uR=*UYvyHTQ;JH-pLBSw-wHhz^vbv>
z8<bb#82w6lwrdqka;b0fG22n~e{4w<FP#5X<i8ue%o@RyuE!2M^{hXS_A40dd@YQn
zNh+2Y8{2*=p8hK-f~Qny=U^m^1+F?yw?IoOcrGC2)+&5FspI(S=5=t^DyT)H-_n%l
z%dEH)V`nJrc3i0;@<B=|<<;pfeeZ-@gn{N!oK>zH!Pz#{X*tK*QniJ`RFd43=eJ3D
zl$P*xFIR3I!P_n6QJQcmggNNNDY$P9_zKuC5BIEUU&Ut@nzQYZ@uZH4_fKLMzB7qA
zqNRfA>{eQ%Ip%lW5e!160&{qK%jrlTaEcaa+`(X50yAe+XfJHNmupAAutooPRqOx9
z-rGP&bzO)4XFeE)VGx5X%d#S)%P^6J0%(vGMdo2MGm>B=WHF2c2FEo6#xs}?p-@73
zF3%YVv9UvA*>Mx>`o)UtXA_(f1yhF-{;42@s4jJ7!lT5GWn+vn5UMCxB|Jr8-fy3K
z^#T4!`d_R6^?z$sF!$Vh?z!iCf1G{x+54FvZss)jKV~`;d;a)uv90lsnWKr#(w2|3
z#29Ev1H19V$6wdI_}aP)ZLEOn&|{vnq+n`xK>a<n`g^lhJ&CuLxHWF?OLQ4Gr0gwY
zA07z>%iH@%s=OGR1o^I04F$I?bDVB?Go4S1Pv7-s`r~8G6ZH>`eO;a3njXQ^{%d%q
z@dLF^e1v<sypA>=Ik)-OFPL1+bT>PXj+CqQXCK^kvgTxDmCMD+_eERTFE3o<TDVoX
zra=yCx8SI2IV@=_XZkBmPU~cK;5Mg{Z$z&k8WHZR{5GfkWOej#;Go5UonZDHO|`>;
zegBicI$15>f$ywQwZ1*dx7hy6tmA9exKJ^ZgHsv1=Hb-UKDapb72)F4)$U4#z2r~f
z<^C-xnDLy(i~~G@3BjVlQtmjp*&Iz;`1HDw!qc4<p6))2rwhT;-T9DB_$_|32l%=_
zbPtdB26JwIBKM>G9q}(}e(oX7&!wXWPi{WBx#^MNWx&^QQaZD++<`Q3<hLT9l(HoI
z$B(}8%#R;shI87RoV)nS|FGjb&6&sFZoYaa5D9lKeMm3Cac?I+D)g#oaQ=uT#A`Xj
zsxpVn{octHwrG{~UiBj~HbLeueCAQ3-kMR_=8XF2JPO>ra_4k=YVxt4MQ8tdHC}J4
z>#A2e&o587s;kc}uda?(KO2gKPS#9!Nxm2E3S;Xn8mX{rsLEcFPpg;{KQ>|NQlcH0
z5}5Bxyi|s?U1prY9Q^e`ck1YDw3iA~9+US^o=KcC?^5<fQLN2;nRAb=F#PCbe(LWe
z??3IgpZA~kdye<Re!ZO9y8L)1^KbW=zsyG7f7<U}-hayPY8j`%tl#hIGMV45<Jmv-
z`)xn>*+akoox{D|{Pi`^bgbtM|6RJ6$qfAlnL%zM*okSlylF`$9Vo=61NL;9#A@P*
z%;R`NvK`%YG=2K91)IJpHfZcij=%rd^9PK%3!@D^lUmJOkX$)u|F+zV4gEurYHZc?
z4y|A_y{zT$*DLKPRLh>q)n010MNBV6FRtF43L1?@EM9#=R<%#T8H=?sTWjQkDfhs4
zcxD+Z({G5xprGlgewD|p_&%kaN>#?Iv6y^S)_TorKk;j9$qszoqKxLuk%YF|rR#~$
z6UiZ2K>U>o(tQhy@YphX3YfVhCFbu)<YCz}OEl_|Sy<G)!uKvEcKfc9@8eh%+h$t*
z%A6a>@yX74U-vgsAN*Bp31i7}LqV&R<|6k`d&6qv8mBX?Ja6{oU~4RMMtspYHnLgd
z<#&jaY0H!v`7~C1&?OUnG|?$@u({&kl$rxP=xCzn4StjPt>U*qDcecwM>-qU=f9E}
z(D90XP=M?sbHtdMIYq6yO7I9T?JaK3T%3ay^~s@i>ilu+!ZdU|({K#l7e5&-mFuwZ
zPR{(vxYE}ChQ61ur=@K(9b1*#-kdqQI$w{&G09zWPUJ{hyx{aDE?ReI6Q`xzq!Im~
z(mSkFH-6D?)}`UIF<2nFm<32>25W__t<1?!ubI?EN?CHxOgrKCm&D5ocSoA-<+cFz
zp-y|GPLd}zxR|_0*TZY%cRZuL?p)IPpLVkxtNqUoysLjFWJnKa`}OMO62h$2>gBw0
z?BG8gqSaegxJ_&L@rdLzBMXdrDw$UtqDMWnjZ$>$uF#h=8osRKb9Gsf!QQ4co#v9H
z8S3xBc5SxW1>dLdo(2|L2HH3f7SUGPyNC8ZCvBz8ZMwY}xzsJrGCqTK5VOr_45RaU
zZJYmU@NLgPs|VYYuj}olJvt9v+sngRly_Z=bY40Yc@4D5=xF$#GLK5f%<225h6wh3
zDnE}e_)w0jAQUS(obr|!^u)NY)^DqgpBjfs7R#6G;SqC`@w?9&|9lMC?=^E9h(A{+
zZyfin8+$0E@0v(+PJcJHEB%+7`9%z&Btzd7O1zG{BI%^pq95ER*2H>|YxS(nY_Q4c
zNo=2OUBO;^aK!uRH#>@yVRRi%*w?GNbgH6#Q>xlux3DhZHGEx%Q#m~Qj&Fer{HIKh
z`=|JK{A!}a3f~C)H1WEmO1^%47Vj@7eDc)3DS7tz7M^?Y>97f%%!dZx&8*K?@XKn}
zr?&4%o>`}o>J4Kzs$d>ia%)B8bYw+dQ;oeQb5-itMIF1+MJi~_k0#KetP7>0oB&=x
zEgw&KgTAhVsUn{J$N!>0-C4ereb9Fo4&1>>AfLLf-utQdUimJ$_xK#M-tvUk*R#j}
zVyNDgSFfvg-cY^Y@SF9<@UT_qGm#a!3#HEeQs*~2-rrip=53={W0jiTZc9bY8vCTi
zc|7MF-%_9gy~`A3Uc9c3uT#gvk}`RCppNp?Zo9T`^K>1tBE5B`Qcs!v`!I5jf&R6P
zKYbT9wMVNrs=y3oQ`EP}UZ+wa%CFb;@%ZvmexAllZO%1FeUJ=>ta_cX>Q!Wg2dURj
ze0j-^SQWLtlE~uBrY(6vkN0JBynPQ}+i%0`qrP!%ZHnwM>9Z>pBTgf2`Cv|C&7!K)
zclnHj{UfzB25LD_yMfwLkB_gVk?fc^P)p;JYbobM_>U;n47kc!5ttYqYrT+2Guph7
zC$qm9L#w|9x>{_fx35=S>1A&G$LGD7ejuBBm+tAw3#B$^6YILt53JBJ<z}z0R|%^H
z+{H+L4v6cQf)kt;S=OC&Nlweo^4$q}BlVD+tT71$e#&>-^>qj7d#v>5xHm`UBJVPR
zuL6seGB)A9%q;N(BlBhj-df?HUGjW=dt7MAGdexeF7(NMdWJDNug8d1Zq+R`PPaag
z&ArvaMP>`1I=%IQRiD_xIO%l@r5%Ypo}`83wCpV3=@v@chqX{;BD!_o($|;xLfR-_
zoa275jR}>>7kqquJFXiSzaEzYJsLfUe4Xbd`s%XPZ{2z}_gvd&k}v)C(qO+m`zgI<
z&}*j#dhIN|_N(E&=9ij3P@wy&C-JOVKJAe5rA>q7)1HUX*8W$e#w7^5r4EF@28zoG
zdk97UAHx^Eb%a=x_B~DbA>kgvUczI9|3=tLc$s{hguf-sA-qBuApGBi<%C!c8COmC
zJHi!&%)oJNguh48=M3Rh!hS+V?S>qfu|IJrb7!`4Su!ZD!t3WQ2-o9C1@|f8`cc{^
ztG?4tS@m5_9LFtk=P})~%B}Xts^4nIta8WByaQ%$B<;1i&;{|}@e1Gbw!HCEl~;4G
zGuGgjRlIoKo7WQSnq8>ab8^e`Ju|QnUBoY2r)wMZ&pGIq6>li5*rtSk!fyxGj$5&I
zd<Q-!xyNrkcm1Vqe6$9%kJh|WxA=}Pot#+}#nUA}?foKuc_G*|VaH3L@Q=bzCn71l
zV480O0~k<7O#c4gdv5ieV675D3&<y)TOD9<b(YXBxf0S%s)LZ>P=^Rd5Oxx}2#*j-
z7s_`i1gK*qn(r88jaf2ideOyMj(E`}Fumx?jUF($(c{I9<wch}?L}8!>A~Vg#%h$M
zchE;MSIw~+C1d5Y#%i)TR$p|tB&@OW%2+L$Jd@o*xm(!IogTl1FMVYETD9*pk5Pyx
zQoMr=8$a(SjbG$eM$kEazp@RDkCY{)=sFD>p+9<TD4%&Ys?=8MHs)hly;v<bHu!q2
z@yXHS<Ds9A)8C^BWqiB@?Sx|p_Yh_ga@NMdnOn7=&_^iaH;(WS<MXN`+Z><UgLsgQ
z&yJMMt*`bp;^ioY;#O0mr)qwEy?N`3%@?PK-uba=+y=#J7oueExhp)UrWSpM`Wmm?
ziWaXtj*`n=;ijsn&-9rTt!<cHh8{!B!qGayy4NvfI%c#9q59rSMP|*#_oDb)l7|SM
zl=Op)ezrOKp7Czw@teK}^D6QD;HemGN8%1YM6a(|_5Rl4Ilt^!R9`$6&8|G)Qu*fu
z>W$G|+fKLIfx2{+q3y4i`x5qrwR`3@_pNsA##(>#rG$M^-JbaBzGl~M_JvnpdiC{Y
zw=vFtG>~3Y_v-8ScfERKnUg%D#dSYA^1#l&Ka_j{?^=0!*5Kb$yl-n?i0+_o4f>$?
zKdp_zpZ!b6qB$j_0<{V6!rFw}xVinw)a5|OtN*yVx7i-}rQvD)+L@@v5$QpzwM=g_
zKU*bULd9Ds7Ld_mZN$Ql@9jrvY4+P`?J-TQ_F#h+zqScT9A&zHGVlIe*KC_Adlbv}
z8gotWHX7w?f0KOoiw^CFFsCW%?<zYH%=7#3qu5o};Xjbb7oTHO^ZY-*Q~$iP@%DO2
z`+B|b&12>GEH6mww#r;WN+j2zKcMk!RD1<uwf9cO!Mhi5%Xm9e<wlG4->?fmu&yb~
zl}mZ*b|D+}`dc<FQMps_%Am5af9k!nm=yMhop;RUYpi;%adCC&_AQh4If}|gqCK%g
z{@p89d@s7vtn6L%ou{rf<!lQi>}|KEq(7ERdi!PGpwl3*TXhaknKuV+-V;vdL?c|Y
z&;jWY2rXDe$|HEJ8lSuvY0g}jS?RfF+7-`2&pnIgmd;rH;JPnGQakYJI_(|LJ-}jc
zU2hTAiR^ol%Dw|D-r~1HWiCLi&$dlM>o}U}fAgm$(T%oW?<#RM%`#jahdT~;No{-h
z>S4ZGVSQ!OU-cTXqNv~0RGpDlX;ta!JiL8YWA*8JY_J~5^v~Z~Iij(;$kkZI^FL<#
z10xzE#sT<P<gKj2i9v?hL&~><2jtrm>~{=&TkN{KdcFHw%!-F>AFOVynd*Auuradh
zk$6Zn>y5iw``s!KEgFF>kORSkO;K{Y+%@~?taya{E)+Ls`kU(g>lr1_FS<EFJ1>HE
zGe5f_aaj+kC3(~7+a=k>Bj#7HPCR5=;*QtwWnZGn9aOFb?qr?l@cV)bJY{7r3B5<x
zy6l8mgwFEY^3}?$8-8fGVy+v$X1L<>68SfLE#~^d*Yeemk0h}vj#pBfj4@(#^b%R0
z_cuNEkS&2XsqlySs?tX(BkxhE>}gx>8TLij*D5=zzxK)R<jo5G)r#R?J;GOyeDXVa
z^N{}Pq2XUW%2$tC?{cPXx&GZ+^<#9urRJ~FBGHvByEzG$DRUNYLAoD}qrq;xJg{y)
zjpZca@dNR)d~X<!es-VO;q8Ub>}4;G8Iv-p$_8foL}Jep%j_E-YkD(mz;iip@E~w-
z!V1rpG8Xuf*wfJ3{_WIwO`SHZwHY`44}Z#MRNC^|_u5}V)^^i({Yj*H3+L8_&;rh^
zomr|%6*8^9$Qs+#JNIKZX%MQ=iG;OLE*CzKbAm3<%uRkpeJ}dwR-Ly~TKLz>{%YqM
zU){nLSEemTmVC7-8at4<I6wOLovX6y5-Y9*cPRUOiR%U`-T;4jI5Vz$#sAc8%v<G@
zndd%_sRerwEtJ{kZLaJu*ljm#Qm&hJ=RySqj_3Z`uJoM552)#dr7;99b5)&JuF4s9
zb!OG{8Kcyh)y^8bnlWR9I@9c&HA?;E>tc(gLfz>(H`n)@7IjRlIrSd<8Sr%R*kM}C
zd2N|{<{$X&a;YZ*uVL!1U8nn221K}aw~uN~6~M`rs9`>3EPXef!ayJCT0b#UYBQI$
zub8Ryt2f+bo_Y!9mF1QDjIc<Kk8b8C;nvfSoq8;Ln$ML`>IKO~Xw3OHmH+)6=g<56
z%AVe2-8s{nvKbfV-R0e+Ppy@_&3Xj1FC2X>LD%XkzrH&*eg#o?uq@Zp8e3tn4waYX
zdY^_{<v!9LS!EB}iOC|yITV9*qyPzK|0=g|vXYb3Y&YIzldmB`yGn^@dl{Q<*@!g2
z7g($*hj541pKx!HmnGHAyeU!fj3P5KZ|juB${Vc2PrFBd;gocx9;@yvpn;xLu@Mi%
z=Fb&QJSsSXdg-$rXMmypDIr>FmgY1mkC&F<=ORaVX!8q=_p9p)6D1}M!Uv~#?-0vS
zzV~+cij`eooz>x3c#Zuux|5my#0vv8H$yaN-P%LArfz=m1(a)gw!xaF_6$U>uJ&+q
zR`7>eo(W&d^5SI-Z!SP%3aIQ|>wfA%6-Y%sz^*hN=mvk?k4+1sC;oA<_K(H}HzjtC
zL$93Qh*MFnc79kQ^`!}IiEj+md7uxC5;RJR10f^SHi;fVXBMiad(fzBE2%4FZ5TIv
ziIeo<I^`6fHM17-FP4DL4gYJ2tqu6skOB^sO(RtYWnbxP*r(!&S=yJF;g9&|A??Md
zwTeL}H^ZPfx!P`vs64)OPk7R&rhQL2eNOx^*=LShG?#M-P8plrBSzu9bMZu<mO8Mb
za`Vwm1HUMKLX-ziCYUWe$OPLnw)wVk>YvnOsz!}(X<A#7Knn*>_XbX}Um(npS`*$#
z&`Ov~c#7~Q)_iHgJVJ@TnOy^_>0o8=Y9ag#I|v<w1%&4aZ(%n<(qjv6RFJTcP@WA=
z$>+jRA8<^tIO-+kL3edcJq|f%N4%)(4so<R405zM9OwLuFuI<`nkIaC#%pUDv*NfS
zg#or6M>mES4BUHhR@#JDa(T7LOS+o4`EC)a`b|~!wY;dU9u=;xHqR`L<gRM&U9nMA
z#fsrhVn&M!@%)J9-bc=>u8GIz#)ZG0VDi^4+&{T0hL5j|?Fyg2-KTDA!Idf=Zx_yG
zT^p1m#t%4ENS(rVLP(7?Hn`ivJuW+5Ku;vz(qplo-qwG>abIMr^1@XCh2|&&z1kOb
zZkGwET*0D(+0I{9e(v#T;qzzuc88Kvb<9#If?db;6PG_2=hSgmiF0Xu<27-|K-m&f
z{)y-ZKEo`DGVI_5HjD6zmt9xs{xInd%y(Z<j?7YBi(D`c-o5Z<il20qwX&is+`dA&
zn#a4#)JW)^gwVZ|YfqVLRMOWNf?k|WU>q%zO0dErOcL%FtP=FuLn@=cK4pC^;n3Gd
zV^O|->kjB@<|J2d=ItqbmpKvH1=j@*2TS2e^Nx9$D`>DeGJWjToPcihV*~Wm3r=>|
z;<_B_D!%7e=2TtEb;oP74;JN>{Zw0G>`i1><lVTrV$|oiS9m_Vy+W+L^h93PqtF(3
ze!>-xYjl16J5INWrK$Y`(>lOX7wIAE&+5OR@b{WRYwz>r<IMgX=u7pM*?an0QY4hz
z`=id38;;+be5i<XVP*Ds_`UFV4g~EpcO&Bw`h6v6ub5`HzqXS8RjTdtUv;^O?H*{o
zSpq(Itk%=&6T)YQFDN(R33UC~hsGc2+h%{HoKp9o{qsK(f54Le+Xt}Ah{vK#CY9YT
zrIg&dyU6WwbM?Bs(EHQ6exgr|?{byBlXacf><h1juiqkkfF3z(K3|)AqQhLT!5`2&
z<mF>ORF9d}FB{BWG3QjmHN5|V_IRiRD@U;qW9S{WjuA>B>zE=V7HN%up{GTZOWL7l
zQr-l5ugJ~STO=(wXVE<GZTmABzul~*uC3JiG!}tIF3A;a%9|uHE;9w5?k-53&Dxr^
z)Yp<Al%XBCZ$4fJrAv87fb)_ENA$SxAU2}i<;E6|Ysn$rIa9te-kEcB-1n5jHELjH
z8P7|J<^(cJm<EQ|bkMHnQK7#uHNM3S$5~+5%pCmq!=4z0&c`M|*NjcFOHN&-Cwi~@
z=G?Gve0<{@{tfimY32wQ=nafZ<%*}r_8rvMRn-;nCAyK$McO6~)bN`0zCWBEc)$ar
z&tSCOsn~auG9zXFl)91qXxX9ZO)&Y8Sqs*=uFRE*@GJ0Tnp=>SZ>D!5P>)|i%`qTr
z0Ae!z{xowTt8G#sRskmoU0hpX`X@ZnH23q*SGeI*FX|K}y7cj83FLicAaCw_6{kNl
z{o>!;f@_f(4gSq!)LG4OHMv|<-q6t@vryy+L9F60gBL8j`6&s*yF(A)J+*AyQ?a3^
zJ3`7=|Bl09Vhw1a9~#OGaZHqA2m=HW!p{=M2#W~22ya!&?jtN_Cq76xiBRH8K*)Z=
z&k@E5*`0SL2&WJ}O*oaXgRqpahY$)h!XTVRc#4U(&QWI4;3dJzpt})j$?=_rQS%#W
z=QhZlySjGPEFA?2tkMK9E8H-<zGhZ@?p=-bb7M7G`YMk)epIZfX|BE-i4;sk#v@~h
zq!5RV;5Ro0)hsiqrW?;{?)FS({(Pj_B4y(bC(Kyxl5>A+)q;@iKx~s?`>sFbj{HEm
zn0Izy%vsf!dA)3!U6tFSk#d_qhWB?G7YW-AG=}jg?}B@BtaiFW*dt9dlijSyRM~-e
z*xyms(YkqAZvt*cmx5Hn<}}2IYnMN^Xs(Id{m)Aou-&#)S=E&>ZQ0{?!)qnoT%DwR
z$sZ%nY=6I;lr7`hRO=^I+1@cPlJ8c&vy&=aK7+F#$f0T7+~|feZP70kc^dX*T*1QK
zq5C0aXn5Mu`-~({dBZ_<e?v4}^_yIeQAx^B*SyoQvNR!bgVV9wLbSSa%!@oZ^^?=e
zabCl|tFL(%2i4NfM3(dq%TDK#GTP%VjSlq|y%Ak{iMl9TuFaN`6WAlrXOlC5F2XB`
z<6_MLe32Rb9g*MMzv|2D$SFs9BPTtzFcm2ssqdqcM;f#Jv;Fg4y<*?>fR^FkxMi~2
zn9aI+R^211eD4}ZMrGfhGl<J(O?ZCOytcZ8{Yh*JU_*iNV+V*@e(@lyqO>zjoq9_d
zYxq;|+Dtqg#A0-!oD}Z%=bL+=D|=eQb*!m^wyDp{oM`y6u{c;5?by_>_C!N<p%pU9
zd+ywyR<!b-HSWmWPM)hnJWW}h6Th1<wAx$v=L!n~E1c>k^_8yB%s)qZW_N#EjZE3A
zzunM<Cu;K#W3mpX(>Y><YovSB=&TzGZf7^exxxLLF)PP?kekduSGZ<kU-7mnfoVUj
zSn*%-XCABGUc0=Zx^e2lqCc6kv?kTOYUh`J_h*TXCpWij9sd^}eDj~4Ir{u>UkZKy
zZ(a@mU8duFr~RKBj{o!9kDuMt{dd3p0-W&8*^d^?EBeZ`n`ZcD?`-_L#1~ip)t^81
z_~)Pb!OpB7FaM|G@BZ24X79U!t9SN)@#g>f{IehY{TDxY=!W-d7Hs_akC)pIHvO+X
zOFwIS<(IK}w`>i3_|?B@zN!A-a{iwe{-rJ`J9oqXOf2QVTO8t~$;#Q)bUGwF+EXE(
zTwUn5pAI2?%=%6U-)iAC3#Hc+O<2tyIbbz=a$)3U`LeZXrjl=3`DVzfcjV<#SE*i!
zj%_mvBPsKKoG(~dH+zLw#>X47El=7bA@HO-h{V>{p|PLH-}!?oU~fiCf%D+fj+ReV
zxzsO5_8yY$cYu{MN4Q?eybf2Hb2`+84iM{S*(1v9g2uPTT9Ne<^9C|sUr}RVj^N|t
zUH&>L?<l_WGDp#{II={khY4R_vVMParfao}>l>@9vER@#n^J==UEcQkcd|mH>fMKi
zODbzgo&K`gtOfU1h<}~<GM&?8vtIF8<aKQI4xKhnzsdgg>r#v0*9Ya(IY0V`)uC^{
z{>|54W$&(Et@i%Q>%Vv%s6!6j@a3xWPLYJ;Q;r^b44UYhIZEnNw5|S~u^A-MzCc{k
z|LFCUZ{JFE$2|L2X8M!PMR+c#I9&0w>!dDdmSi?C-dXgBdj@0eZ=62PXnNQKe|Uvo
zKbn-z=B(8lrobU0U-q(AUnSgP89Y8-y^x%)&NlM!Z|p2niA(K~HQnVZaY4&HBFH~P
zF4g~#<E>fm-&Hz#<_M|jXHOeV{>Gy}Z=8i32H9-F)4nj}E;|q`Mxn5yOl%$YAT>W=
zG=8)5&QV5V@aIN1I#S)4{(bm>B^NDs|Lk-1?~Kpr*)d3YnIAiml2=Zdo7q{@o!K4k
zR(as<y*Rb+W|k=1uHq;*-0_u(m)`>JTIPpRIfVBS;v2)hj}Q!F?}XpjWuE19rdgRP
zFIUyM%EgQ?PGo^oMl5#*XM8#6CjL7el-IAXSM;@4UwiabI0-l>@;hy3W~wal)TpxF
zJVeaf!a)?n6MrQWOmlywggH;xJJ}3-rn>L=V&=jf_h!y{869|hCv*24`d1f_4V_CF
z&BaUXi5bkS3z@U{cB&4{ZrEqLTojeB{$X~*m%SmRoY1W$ta~!&NK@~x(P@qrM<v&P
zt}&`51~?Lrys}5S3%ohoKP%9jxkz3+|9KYmxrn6eG%;@@0Xmy-v#Ze|KkP^})J=sy
zqYM0Q+L`xlfwY`w<m&ro*I#zkT(B`$Po08m)BA%H&taWoq@?^8o${AD<uAJaXV;WE
zau4g>kT%v{r;#$``(yrj-g)d=R2q+mFJ$@xoq_Yrx$iOW>9O{E@bS3<9mWn~T!T;N
zm9rc=PHcxi8a^*)mL)%Gep+hP+Il7mUsW)*IkS@;mn(YyXc-3Mt0Iv|Rl*&KB<$-l
z>od&Go7=;y^P2G|KtC4msY=?*Y5A;3+0C=65@+hFQr2_gL|ugY13LalIh0=PYdCIW
z<|GKq3E7Eve4bEbAQjNES%hGAoA6ncFalEvZ--Bl^wXgwitxWceuYni9=i;uQa;BW
z?BF7f5FQKO=nj)NQVHnuvbxCXJn6qwxkxv=B2Ptt$!_}LK;m54#<UHs(t-HeX6Jk;
zt-LEU`}~YqXWdS$J4(A#msY!^MTuT%bE2E_%N=)G{NL^O2S?tus0x`$6=9=<qXuo4
zj2g6DLLKik>u9^k{(lefd0H?Ql8MWjgSr>HEibiX61nn5#s{o^S>zkU?`vW16jYWd
z187Y;r?6__yL0-xW!e+(1i2r(mDtldcDat#viGsu;4JppP8Bbnf{m0+_k<(fPNNA)
zTyEQ>qL{ylwd`fqH2G72E4{KX*A(c^AU#9lr&4VXM-QzVdt&psEo<0=KT#e2m2w8R
zsD)`|956b>cTa1$v%_$%9ow~u6_!#v{IPS}3@3I_erEn-ujVrA<4ZvLB}#3j<wogf
zu6d<5MN%f`Gp?Ny3-E*x0;2M`&k5ue`HJbIZ$(^HYV5hHHPP+ir^6>AXCp@sQfdS(
z#OiNF)|8pC(dwUd{NiBg4W*;XKBt^^b~VI{MyUg@gq~6@?aMlo(EjMNP65f6+9p!I
zZtG3K3Ei1)Z)d65@{Ym2jSco^6A)6VA*5ifYO&4Sh}weov+bu({bG$L|JAKY*Q?Q_
z{XkfxwOXR+UTb47{wVWyCiD9&VTf=aVHgmTc^x6hXFlaPs>ZNVXsWp@R$a58wyK8t
zQf1BQ7<0O*)QiQQRB5G0w;*?a@nWOCt;8Hh*6qvH_-P{lHuN>X=#~&`$z6<ZlTJ&#
zjOR=1mAiPcwjMFnQEkoP`^$o3tW9^!bWw}3;i{(E1+ocmK2sYsw?|T0dlQ1Og{((|
zfem9i{}y>ps@xwp;Id^lRZId0794+2c@o+F8&Y1whMYE#be7t7els>lR+CoR5-s-_
z-1SJ{CMEYp=@au07}$n??#lJH2y|CU5}KS?I212&d*Hso>HCd%5Z{ruJ(A`%_yq2E
zOqrAEuR{W}!e^{RejY1=Udy{=PSJ)jM~u-)uMw9xV>GEBLLxoMn8P<$+9nmp@mt$%
zaHg?s5|sYz9Zkr4E~-lA?gb4&`>E5R;zm;SR_36SekszN*~{;>hJA%mwB`5R^f+3_
zUC@H<wHK8S9ra6z@-jF;_I~XtSDe%dgM0KPjT|2wB3i1Rcv`=CE#Y!sWDm+EUjj97
zZ<)Pm@+P-BIagy>e=QKUnc5tp&O%M`F9lBT8l_Ts(6+sqJzQVQ?51XC8usNCrSPd5
zuigvIT6uzbz8~msrhV{$M$8X|4YGS+58+NA=yD>vkavute`@B~tW6!8Qcha+u(T?7
zPs6@jqOA9iDQr~?<iQ+7n$J_Odxsi>+{nj%m@najCvw@tGiS2L;OfE_w8+_vIXdN`
zb{Qk~74d!P7}RTU0u42cJ{{ngMYsW|80VPniQT1bQZN@qay;9Di8f&3MP^74jlVtg
zO)I+9c#IZ*nl-<o{D*>g<6hZJDtl_VyF@wE=u~-y^Kf%!UuxlNa*dzsb|1)WOV)Mk
z5M8Gdu))63UFC(z;7muuzA^rCM<Q=9elPKP^XD#6V=BuFQ#mv3q`;S~QMW`n&LYnp
zt31bOCq3P`dNZ>-Ps3QgBYFcKZL8+c2otcY>gP8#(vqmvk_zfLotE^-jFx#=6tB3U
zv1)^2-|4oB%7%TOp1Q>;`$*X{?0)POI4JrX{?^R@W=Czd&L7dgke-^x#=B-~8GEgj
zzlZ#@j1BhJ>XzGzb)CjK>fA9>)hw)Sl0L1oQocya9YELx;ZvUMZ1J|eC_KuP4Wo`{
zE@;X1MpM^fOlN9sWbc?G4f|Z%jrq9EMV6gPEZLQc+yP$9bhFZigKNo@s+lv??K_^R
zTbwKgW_qS<WL)i;Uh_R^diZsd=8hdtG|jD>n(0pEv)XTx*_P9`M5#O3o7?x9sS~ca
zU-Wh|cQ1@O4i45f_8fD@4z#;&{%iy*aauCRYDqpV8D9!-wBw2I&eGxY-<|ctckb?}
z?J!K-m*c1(BicXl>LCnQZ+(4;uRG24pHH-6+(WoVJ*TmTlU*TrehrC_`<o_0kNt7r
z$djD0UI`8~9IlY^tz7lNR_1&lxy+bj#N=dRi!b4fY>#XQ8v5c@Mx(^}<F{>;*^@BH
z!HvAa16(vF+<wku$D;8n(q2yZ8;OrUNY2|LNEVGI(KWG$PN_#i)2i4;0&JiM6I*O`
ztP~4OiLw(2DtFvv;`pW0J|FZ{)rV{E(i%~ohMK#rmJ8h(dZHKaGW)@{3qEDH)elBw
zm&&ey7SnP^Jam35ZGSirEfwj^(d4=*bt)Sy{8j2^4?0+f;-{CZ8(fe}%{B>6pdD9a
zA9=Sxf5<;i@J>9mroxB|emL5%Jg<e=0d}CfFy44_+&pC)ha^Wira@cSca-ah*kcwh
zIn|;*UfL-2MLNDqd01i3Xj!#x9a2)g3zU;a23#2kmujz8IZ@!Kjvb96BVIP6LyzYQ
zXIH393C5CkUF}PHXqP7tkL+X)m^;08Fy;yWydkNV`<#s3#MUCuZH!A%7TA54`!~u}
z<R;}QJKVAgCDd){fE`SJ=G|yI;_gsm!H(W(>>s0xAQ-pT98KIXm}ym_;I>Txb^bt+
z`}~2NpS@dqG(v9ONBeD+x1|g0d~tR-=8m_xoKmjlv>V_seBjWzz?veA5wtTCZg9-=
zR@K*p<JPbX<kQC^CD}G+e5*Oqm6g!P&ew#pHWxLDd^Ru-T&gJqloXorYL81Ln<}6d
zk#>IcjUl_`u^?W=&qNb;J-ho^5ljtc3r4K{m8v{W%@g^^n7u39a0F`~d*$kh$O^`Y
zFC`6g<BW`GL4oG6Waef&;-hta8=K<chH7dXw`x0s+J^9c{nMPEo&RZ(+gO*Y^v-gw
zzQXtHVK-r^d)j`VDsnpxN$-U}EKn7`NNZiy%1(_xZg4buwJPYa-e|P){|5O#W%h;&
z3QrMelok$9EdzX*7_WCKbNtJpl=GmM-u7KAXq=Jn(G$y6tKm+*{i7>m(8LiuInaND
zc%%run-Zif^gw%fMV@~J!svNF`VIZ+jr`E1;>0(uP}pzus=@y7Ihsa+ui`cJkV1N+
z$%4{_K<T}#^o0`chL^$q8SB&DnhT=MmpK9cnN-xcUfszUx<|ruEaU1(-DlCl1)3Jd
zELs>fX`xWRk>kPA@#vpc=+)}4)^Uc38r^S%Kdf+1h%5Uv>P(JZYQz966g{u!zNUmy
zy5>19t$t*nHV<?34JpsQI$Fosj%`q78`4C0nHls2tNIC<-K)KBC+9_7-dRp{e-Zl;
zalM*3GPTgG&3av%3upH)URHgsdld9LrD?M3J9ieQW|=X`?wKQ@O!tL9T>t4cJ){b|
zbsj^tMPq6y&~-v6tQSv5%)^@<^RugK8)I|X+K$Dn>C!0BGvAso3z#qWL_g@!6kKz}
zP%ewl9pH%rnkUYOC(eNu@7%rh0q^eCWo{D}<<)E6_>A>UiOd-&{8(Lnj$^?XIESH~
zdrDqlm0V8Am8G82N^D=ouzi`UEnt=e;-%RWI=!8mcX34-H{FZ<?7zN4N|OTK>bTpY
z3>8a*V(Uv76RbY#mJWl8yRCT!A7RTfu`7}__a4FG*@7qgPb57O{{A2sb)tnQ={Wso
zvx_442$#(t2~-!m;V$~<sgCbr*#~`^4fdDXKEp~6{v1fk)il9C`fN*i;3}{~4euIa
z-{S9l?7JZE=`(~!iWx1=0>3-ugF?DwEu2`|HWBRF$7zOVut?8d&7!%?VOGSs31hLO
zfZoJjdoo!(D5-Z8$*w1|dr6hGF~Aw+DG^||s%>Jz$+gxjNphXAOL?7g>a@S@GweZ)
zH6aqrx{w-%2p369X=SP79;-*cuq-%Eb0-$dC%PAn-r9!Rrs4DF9<yid8(C4M$-=>J
ztm2%A`~e&K&%{G{mF#hJdeia-J%Y008DRNJ!}&660o(qf=!DKOo$FO`W90kF$1jJ~
zL#4I)doi#$0gZ#g<S<*tq;lg`#gCK58LM|~k$QWpl(E7cU<GM-lE;f1E590aB<c6}
zqqm2YJ+ex<Z{MhV%40Y+FXL_TeGq+FH2LPVO`Jd<W-?<s6UtUm+&C!;eE{DSH?m$T
zXmOd8An15E8omhrw<tp?8h{h7*k7{c$%<C`KQB57U94nrxbJFTOP<8sxUI;IEPaNu
zm%5P;n5n8Im5dN;GZP!5bF1mEi))s0O?bzaNBJcU`z|l!Th^YVUl3SIpmjLrh^(=a
zSPGPwx(%$BWK~01IkAeu*W@{OX5}a?k<a1egMPC=SeRTmz(<&I%$3DxhLtnp<=f~d
zaSy+JG3lG|IxEdMb@M70oRM3X;x=byPNHGoIOMiktDAMOInJkgA`yYEqBv_;XL2Dl
zHOC%G`%(?eT!FDe=qknFrab<Y0x!rNN=!~lcI@2a*qbVFzo{I4-|p|R`{seqaPDS5
zIOQVNxh@ln#%iIpC+=XbgJDJv&gCyESS{xAy-d11=JHs_pKu<cp}M}dVUFOsKd~?l
ztADkyp-Cn?GsDBahWmU+j)Qa3&SW{KvPF*D-6hmMkNBUR?<jKbZqA%Z`Gg7wg9U0u
z7V8)!r}l`-+#XS$qQZuIWrvG0$2sovgd4*3i|(lbZlu)vEZma~?#V?07DST0O{khs
zG)mhSsb-acw2ZUsto_iv_9gPm;KNsDvA%Ys+~w*}RrgW%CVIyg54Fc0I1S&_Av`Af
zqz-l_?dNVjchrrpcKL0&)G48o9@2+z!xMMBnx1+KZuZ)g+3wqvE7yHpx|5=xY_AzB
zC+KwhKk{7>Cqd7=TbE<AM+!6L!GKETtn8KheUa3)Wp=W1Z;v!{O4<b#;(S}n$jEEX
zZPcc(yPLhyZ6=l0)FI2Ucw`JC$>G_;6D+ny2`kI0Tt+GS!FE-_7$Ji=^KN~fV<wV%
zr*r2E)ba%Kp_U4G40ZFc5lDDu*WPtkjb0<j2msicL*yic@<+np!|x++Z%492Kb8gU
zDo#CTGWxnU;~h&Z40!+NgRHNr<KerjYZ~V?>HTXq9dur^$g7T=&PZSR!ArIS6T<AA
z4oZUr@tIu3xJ1$2CZvtq2po<Un9B~D;kad*-(5;#L(iW3Jz@`YkqBQkeZK#i-e6r|
z;q+qRQyW7j-2pn0TEMfx!J7DLkmCwEmJPJ#f#4{C26O2IDYnqK2eN71(pSsO^6Yl-
zxjv;)>hMFac55k>Izf3^?c67uG&agHupJJS12?eqZ0e-elg0xsKLVE^m<^o96={&f
zC%ncyT~FC%c)Zlj33HL`N{_TA)@puqE%ITH$&(hrlTKuXfpm_wmiv1;FVSvx>3xdv
zD{|53&eB5o?@26AW02js(151Y*V3sX&WwFEm0t=k*wblL4XdlBta<fPa$XGhy$|^1
zJeydjU>!Wr;uh&&%`+!;t0Pl3j5z|9UkJbaAieEQHAoIOZea~pEp46xo#q@;3{2@o
zmPEfa?E7$hs#x%~<ZSWWdGrCPq$lJH^vGjYYN-bk!Tdv_qQIWsLF^Qj(U+Q}?lfW*
zzEmaHqB7wr#?I{Cy__C#ftPv{{z{+5Ub%zVt7;hTaw3sCml!X&D`+>6{9e26XlLEA
z+AixDg>(jN`T$fqO$gc1YcU2+^-#rZ$MVryyV5+Q#N1hK&K(<DTQ;qU%;}%tw0>n9
z(@fh%!=aOp-xeKMJ<>`YHTwa&jiz!E`{&Ra4{7$Xf7A~rHYpHitv;18h%aMT>U?_k
zCATl~a<tLSI!$)*<KLG4&pm=3wALmw+hg)!=oj0S(VT}QU8I)Ilrs|Itc6XDNM*HT
z64QmQq@0c6Wc470nl5S05=m#ruE@Sj3A)?<M1jV|`CM(u9BMtdPV1n*ri5sn@K(Zc
zo2wn61v!of$7pCPvlLY6qX#W`-T?mCXwu6<gC6mv5>Q7If)*NusklH^r4Lwer)Hsj
z{9vwXLuM9ab>9?<cC-aV-{~PWc`9=%8%_~v&dwM1Kc95PYd*gvt{7w4sdO77y3$SQ
zwt&ykwgOqh20hQQpRSfTR+xC<{^0GwEH<DJn8!^{uW@wju0bVS?gw>nz2SyhPOE7Z
z+eK&s=?4pShyX^<hQae^E6kQUE8WUDqlHtM=&Ubb2bnXSa7DCBYHSqNp;MKN$eb`?
zzErUWyqe0L5K=LHrojg^vx12(SAj$hu}wNQmsp#QEzvWeOScRi6Z4OfF3E1wpd0|c
zpZ)-MY00|Xnty$tF#k@AG#>g&@9qvU^Nyact?9}0vD%Yar_@2+w>~u8FQ3|eBOE4{
zB+_uFvY*>`Y9TRBkrS}GH@ONV6T(w!$$NjGae8*`1yy+r4kPGDB+qx0!(+@s22i17
z#RK+OuI$6-m`GOItJjnx$-gvVSLX68&$L~czFAo_osm?uWtO!v`Y0?LyE2#FopZc8
zST;l5^G})WNFV#jAMR4iDa^efz1vQIt&e^%zOoqnvRC7J+j`oVZS~g*v%hRhKfb?g
zbx0Vp^e#jw5D#Xvg0B?bMx<d7l*vVn?2&u-vXik?*~Yh4O&6?&+^n^FU+8}ObhVF}
zdcSizbHd*g97i8su05|R!`+$n1N^o~jn03)=2E3^_J_0F3HozzEYdlzDEp0Yn)>Qu
zS5JC=fS*gC19G`>)<7Rio<>W#l6ED>OOIdE+r_FxQcOsfD}g_&-+j}bqQ`eC`z$Y4
z=d3K<r_<=uH!?d!@)P?yr{Y`8(UtPx@YW|vitf?-IL3ry^m(J`Td<a8B$>$rBi6_W
zU5RZ&L*ke@HhNr4D9sv}%MuEv7@WTbH5;0p+2<b%GdD%b<!`-hIsE`GFzMM)4ko7A
zxYy(!ii<hbpwzQaDc@r|R89qM2x_1tBSp(Cy=ZRH+6o1KvhTxn#fyuZ0<seG6g3vX
zt?O$^QKR5Vc2M1s8n+J~)gG77nes+r6Pl2#u<xW?@agqvYM&}5w|$KLnyjMDdaut#
zpSLDFLo$~->YhUO+pzC97olJe)xUGgohCd(cM!8Ug#N6O))1~HkbRbB!WP0c(5E)S
z7Se^lY&SW+WMQ`Q2ZAp69E%VCl0}`g7X$Yw&uBJ3$22sFUTQ%QK3q7t3r5QT3^L=<
zc2{r9n$s?;7n539c%PL&yr;|$X6wFqi0etiM-IL2Vt5c&G7Ct78*6VbXD3f>m%K$z
zPH1t~tS6zO<Z}ux8Qm0t`wA(G9a9tbk1tmS(txJiU=SLZxg@!Z3_6hm<#LU*rJU{q
zYAljoPnRiuyug}~y@&Jb;C3p(qPt|@>+&OfM_tX@fn&Y?dD7a6%yF4*@aFewI=`0w
zL~w=ufIqeRuOf*30Fk!NZKxSz$!->D{62{7=QqN%55Ch+UeOdSv&e$i3d<x?c=10q
zN5TFb_{$frnbnoo%<7V%S#3ONO3&$8!M^Trm+yr9W9K_-iMqUPXtrDVnOG|@n4b?E
zo;#SIw`_;vte0{V$~h|GxGY#Rp(L+z5YpBU<{@-o`T56$3V>f+P;WbXabUO~h3ui3
z-c+%c3;Rv@ntjezSqnUEP!0S36?<GF?*YzyA}NNOk=-mi?Ko<-<MScq`aJa!eI04h
zzo98HxT83z3&rSI>uYwco0V6~u8=$G{r`Oz<H_~lV4ub~tNgOEl%0txqt1|>ju87d
z3raoYeV^=b$b9iP#vU8m<3RJ0wKn|>{)ETLPGz%KVb{ACxLo1hrADy6aY30p{JfGw
z>@i^Vbv=hH?SHfXhSe`NxSKu8h*KvYwMkq1N##b|-xzc>h9Xa*=Zb$~q&c-Rzu7y<
zDcdwLrtBJ<>7CcuWAQMhT^Lpxohap%!g--VRII!Mbz^LuHP8=DGpzNyvG!x->&{3^
zkz32we^a1>B3lowJTf5t1E;KGphARtRY$m<K@bg|KO<}<+yL$g68=}hE?{Sp;~@)n
zDwhT=696Vt#d-eNA`2J<4j!`LAPF3-5WWare;D;uCm7=_YmBiluCn#WDuw4I@Ch?S
zxMEOWdy(p5Hemm4+*6?y_TynAUg?uL)>Q?^5Uf;2oi+YSZ875Iaz4!WbU3(0<P7J-
zzc_$?)HCKk&P7}%_j^l6FHs+U!{4aO@SIN@@o<lf3b}gEr>lMg1}c~SPT@aKb#Q(&
z2QGOsQblDvIYIApF^`zd1LGlcg`F|qz-+N>01TsVCb!npV^W0d)}li8RJHw%v0btj
zLpnrj17C7g8g&i(E*>`GP%FP+W+uVtRJKv+DPT1p;yj4fEXh8J<vrFCem8hnL!V${
zq^%wkXWK&^B8k1!u<vXrnNzCmPs{|vB5(WbjwcfIauNF@djCkF5z8(;XEZMb(d+)v
zPw^y-ecrmysb<DutJcoQHMKLOjCSEKp>Kkr(YQ`RBZb#=u3*ne%e-8{?5<e*N|m#!
zjvDlWOYB{6d&K0fswCzzF;1Prx2BlqD}rsT6xnNXiRm*X2V;-WN4>)PX176^TV;MA
z`Cqt1{bu`sb&at{1YVHA3y!lhPyd{GDl~K>^A{4$3gy39Ix`mQ&&>R9=FC(f`W7A8
zj<mU7KI(XCvUTUfXPEBQASb!}j6y0KP9lf)y3h^YmpO=(2b+F2hb7&4c;wyDu*ew5
z{b4KjspMWJI!5%4YlZALx#=NhRZ`12lOAi_h(Sx-EvsVcJJ#_Pv1n68ZMAgdD^_k@
z<aSK<kLJw{FmmhJr5TVaOfF>n+UiPFvq&G29F1VrvG|AG_(TUHI2C1%53GfZ5H)c5
zIrI5cC>n}}&FhqKrjxjw!MHFnM}(43_chkc2G1LRx<L5I6r7!(QR$4XL6*SC_;#T6
zkU#pTl)fgFz5nr~>(<8?a75#8KV0BU+D9LPYdp-3M=NVz?CWE5{n(W1OjqoQ!F`(>
z9BJ?ThUnb6bIkD(%#pU*Y^@+g$Eebf-qLb`dqplFQUN~@(^$3phZW36An!^d^6s2K
zSnsV2?yyvHMm*O!(_zZfSTmy4z;4dIe@#;F>=t!u&d82U&@EFA{af~PoI`t?H#s)>
z<~LX;E3N4x_1k3CZxv(G68&I9WewD@Y}{<5mm5@~z8rbRipcqc<v$y#Qo)gj(68XE
zx|Zh^7PnMXo<CUOE^aDbrE>MPq`2v|RjeCax3d#k;ns4;vVdColi6s<z+LVZx(c-%
zujkrW$7c6E;g|?~_59%c>_}$1Z59%VI+HqGIb~v$@OfKh0Bps2g`Tp93NvNuRIUF@
zxs_TXEpq8esw9=;5Buju!r4kB&`VwJABx<xBIp#Z?qX%oX^*r!6+5zitk15nR~2R&
z*H$<UI9@!AY{5Zx=KQuuOSFJF_!CmB3pxgNe1+;%^%N*P#oH^!t;il8UxAEyW%tMD
zHZ4tVE$0s*mp)|DF3F|rtCf==B(dS~mB9l0%I?IB;c;f#;br}CbwG#4l#!WojjtjX
zZLGa#m}cEqtx<1f)StHaD1+S`2h`bPxY@OEGDnYaMvLCA%zmvpl~`IXGK`?}e6;2g
zCbFOqcx%_Y^hguMQ;CQ5t(FbuZFsFZiBw*BkbpR%9p|^Y(hRE)t|mVaEC1@=s%6>V
z+H$@=d@1C6A4?y|K(X|}Y|Yb{PvjkWjxFP?)57Llm7PLn>lUltMbx{b?gzs2|9)-h
zXrt1-Bau}U5?c8CrA3X#=dgIvQ>0IMliQ7suVtZb60NPT<&d%LjLFRZnw8gd^19Ps
ziL|RsW)C~-0ZuV}k5luZwux5EWF0eEVjA|n^Emr5`+AQz?EBpcJ&*GokGSP9vxs5z
zjmTgq;Ss9@_RH11=*!q!Y<|(x9FVA$fQ{X$fDtxgwqkX2D!*($6F-!4!%5{Td%{KN
z(<cg@k$F)#Jb9<(C(9ETbhs>W8v5`ky({>3ykqNVtJkC|1NT;KwqDa-!R3pR-sn7?
zPfRfO%yDv`cW>g7)RMOz>upowl=Uu=5W7r|QQmmU%XU0Y87w&(YwBwoWqcmD%BZ8o
z4Rw3z(-54J5fC4I77c=Dtc+Co*+1Uh4z_d0t6mE|(3{A4cTQz~Fh5rf!*5tVWlos1
zWSryc9+8LNHMhE^wpzyT>sDFFzLDF?zWG?kHqOPdf{ZmqCB-%?#Wqr)Ya%v$3WA)d
zeM4p6g63-GvgVn*$c6gRbA_8n-ai!^X=sumwQSD(HaNqZ{mQS<C95{3X0DKnEjb;2
zHA{0i9y=$W%hbVUtO$fU9#lE$Fr0DDKu&y*4G7NT%<znR<yUtsR@r*>rX|<9u7Ba?
zSlM7*|H7*4dP;eSx}J%^MG9xwLH>56aL~VdhSj&36uUBKS&d#GyvVP|ESYl8Sgq*Q
zrGKbfP|)%fQ$p6hX|+dqL-tg9lP>f&&tT<kpjO$AZy-XP&EflaBgYEq!*5vi(mH)J
zH`>|3ieNj17UVge!2jUDW`wEBD_Vw6SYJ%0B|*V08mGhrZ@(M;*QjuF!f&Cenb{l?
z&8LR@Sl6vnCfv7<8`|I)%CptVQ|}2`dBTCnivCpeqMRw<RJ_hb;2_KKq-YnI-gg~O
zTHn4!ecqOyMOSO8$}#0XoH1obe?qtNc{|}a=obwS!mViwO1WJ+)`U8VH8tnEkUL#Q
zTfPU`(S^14U|!dv)3KHIrcikYRPGX5B#g^oPG|I8mnk#SnuwQWlp6LOG4&EfCsCfx
z>US5crxU@#vcmGh)3vAT+QZ9o+at^LtW`Pmr<=0R7{3huQdU2@-Co+A?RaXm)&bBs
zPR8OXtL>*~`x)BaEnJt`a$_njcTVW=b_y(ztCnea;ck%(t%t)Kl$jg8wZ*&BDYR5X
zM#4UCI<;VJfNP97n)9%Xuea?%c-`)SQ@yFl52;vPi?bu1^u)imWO_TaU};`Vyt`aP
zH$LkdKl=%7SZdlckoK_7=Ia$^4{3hNY85@X0t~2k4d@rE_pLsZH~ao^KTuKlc3RKL
zDUNTNE4pRn%YtJu|FE!0)Jw!>TTR?6Gkf4s@WVH)-Z@F{ocfjVs~vr3``Y_*FTbIh
z%zyv*!tYA{*Sg<r|J@6}yYRbS)zn|t-~anZe*f(6PhQQ+^jz)ZU|jyP{8Be^pM!!8
zg6vLqvBnZkS@71WsImC%j+RVA7t*Vcx@qaMhTl2u4Sge`4SnM-HS}c%2)8u!xnjgU
z&F?62&HSp(ciAn3+xZ>hccr242A*%&+t8P5@LRxl{KhTi{yu)Wyt~}cm*Y1U!wq-5
z(}AUfH^f?iwyF0tI6DFE{!7Ag=8Dhptx?d#*>}&4*Ndjxx6Hn99&#%uny8tB%#=#T
zcRZt$&l&w)nalhx@e|txf^*LDJFV@`=o6^Ey}rVva^~sT^;XNOwh&L*Evw{ohSP)O
z>~z~CLuBx88zI)3t|IUOry287l~_VEmMX__!aQuG8Q`>|l$wJK_TUs&W0}M3o7+-Z
z%vf(qIbI`=w-U4D<RkE^%g%j{Js9P9&InP?TcTsGa?tg(x3UYtygVv;pRLeO?mM}6
zw$9`3F!etumX$JZamE}AH+N1F37+F6Eae1S)Jo;3Ce>9i<Uvj`b2jna2km$kIQ1ZN
z^-yb=cSoi)XAWoH;JLH4Iddr5L8`0o?a<uL_zPRnXE8aSv38|;NZ-f%!%vZ4#{pVo
zXC<sHR@J4GS&Y?#31vSmy=6a1D=xP!BaP^+*P3;_16dAsk;_B_*uIYxmpGxts8D*J
z3Z)ga$BCx=>&nIT4duCQBaocMHL7y;HUBpHnLhTde)taFWsVW+Q{%Zhl)pu+(iwOs
z89_b)-QRw*Tz!fo7kp4cnceyf|D}mhg(VuBm$kK9*XO!-Myw^z%5SWZZgJ`~=uM%8
zfn`U=_ZadcDcPp{)Jp6V`JOrQ$CawOkw539@?`CvEYf>ZT7O6MuIje3OQ1)zm>D)y
zbHN`sZb5HJ&M*vXgHg{H6`JaIH|(>!bq+;leQgV*zEIL`v3g+2H*(Kt>rKiwJ&`q-
z=Tu22bx+1y?v$3=@UVnzIyOztEjTBjIjdaUqir0V0il}BTo$`BHneebcza3Za(!L-
zxxS%_CTtY_CVCqRl6gx*({b?PTS%Pem-?vB+Zr1xxX9;;Kkn_+{U$oSZ!=1!?X*jN
zo){(39e$hna8UWU9#%P6Bg%u5)HX%OZIo|H;XzwQNuIZey!&n4Yi{cDmdbCj>Acws
z92dg=kZ7gYnIkry3MH*#51D=jL$EXQHWYq*v_misE4(Y3r^todx?hb?cs18GKEaNg
zU=(JzSa{<+6xVKjy`ZmW+a^xstYB)7F?&e%<Aq~Lx=VGPbM-0q#M3CNWpHPaaY$$J
z=QM-C>j;sT+~oMS&(xt1ex^p7L=e3HZ42+4QjI?Y_MOPvH@J7yZRIpdjQwqwKaM3!
z5B)iw8FKM2UoWj2lxp}K+eZm^F@QO@Te*pJD^F}n`R5x?>hoB8y`4}2k<$Ad&u~I-
z=$mJ(Zz}j^IwSc5zLJ#zUkgtIk7T3OHsmUTncV*6D!=YAZ0&7uzc}F^26N4EJUhnH
zo*b;rvsTV}JukJmCcgz5)7cHtgwKK^A=l<=OFF+>O#e#_ba}pFH9jR;5BWd5;_Xbj
z%+nC1CKuF!T`kj+m8Ns@rNyJ?I{s?xV9%KAHhTN7tQwWj)~VOm2t5?|4&_dG&5}zg
zbFimxa6D&8WzFWv*ga?F=7DB=PC=)hjeamvP8@eccB%1T^m9-Nw>|v?GXcD+Jj={y
z6f~7LE!ULt#3YW|j7KWqwGYHj*A{*9;WAG0JHg2(w;CaEk-v`gUS<Y+jJlS&;9^7N
zL7R|038m6>%p(|YsTy@SaWD1gqTf034%R;=BLF25>T~>hnl<W>rdj*_F+<x;k(@Jc
z=u%3cf3HjKd~b((2_@@HR1@2!sp2v4XeSnx@<=bdoJZ;>-*Bn}y2`lvl5%2tY{J96
zp(UYt(GIBR>v#ZqBi#4<@)k8-Q@T;CG%}sPUTz1jyO&Ej#-B3p?9v7~Pe9D!h@9d5
zobt8PHgqb`66Ee!(xX>Wr@`y%*(J_xU8%$$>T#&tQ7l&Fh^_{4KH`oM*R?y8s;8{u
zt-OzR{Q4SNDW#a@vOaLiX-dw)y45bmfw3~j(Z?-T+-4Yrn;7xIdb%m0vpQ^j0mv~M
zI1MrQ-e?EAru^gvF&@Y*#BC}IY8c9#QoH1dHv$1AhP3l_UAj$T88>uTm=jJl#+nm_
z^yHbrSiNq@Uq>&!H!SVgfwW13l371y&Jju@#_N82PoGaBpG3AX6$|{VWObQ3rLMc%
z2Q0GfAYa?DHeZacy7}bPbA5cO%$t@RQ)Sv-j&jH|bxvm02__Y~?p%$A53%%0Dwt3X
zpPW=oDA!>|;us^*)zO_f?AIf1%xk+fsa$<+%d9jne6%(G#RK2b=Z8BE6xaT;!|dl7
z(30v|&oM8fhkw0mHTD}vr8%j7WHnwboR81~<NUEv=}Agr%rBseUCKp%N2y0A6j3P8
zG3B{c;(c6?L9;#w&0-EoUyj=-_0n~9`z8qlyOg#sls^%yt^8a)s>rlKq+?t<#*<JZ
zPH0+sLcTASwz^A4M_$%Yu6H5w*8%k}A=@0Y^9Am{!(A4#=c$=<_O$eUY5}W6FDG_y
z6Udl3Lm7H(E71(j_k%B91y4?4C6hTZfG2@n@1!WS(ZU*L4^y8KRRZNc;T0WbWvnB=
ze9hhM<_jOVV~^%=3N(i^`Fai~rA9O-49(^22M@S1drX`Jw${2e!sm>b4hOOq+PY_u
zzuDWc?|-*h{Ea?EHX@fad*CPbYW`-ov}S<68BsaJ-#EJ^o!Mh%T`9>0wb1ouwDt^e
zTHNoYWfxWcM|;U^ug=9zkCn7doTO8?*aR2-dbw!FzF&)m<lHw8w6`tj%=D)?+VpXA
z&zv^{7y=CC0k^u$S-4THEi4&_H?WtDFW?P~@Z{_x;bgb}XUw>>*7%Mc9ADqg7l4M2
z0f-zLYtGQ@Vux~9W*0E@9{2`&kqi{CL^s^4ae!Wt=CAWN70-)2Y1FrU7F@84a3Z@3
zaC+!V<;mKF9~>KdBFrMb%S9-r=?OaC%Asu#-@X#9Loe4Xygh$T6_id^1$v&hnC%?E
zz`D2X1Fil9ya@jx-wUinS6T3KF#*&`EPB(~f}OQx7@y!|(=yDsG`QS=5@ulwcd|LF
za|4rBs(_Mfu`1>|Sxx2|R6(xgs+{^(vXAmPHGS~A>3aSIh`Vzz?oKm~UA0KnMHOku
z!MX?|YqrcU^GEiKeekBsRkq6JnyYfT<^waFpq8&?HrrSEIS~LP$)3|F|GWvDd{_DG
zT8;->Bax*}%hht7t6RfDzRue{h!^N#ay845y!C3&#1WrV{vU%I<b3?c;E!wOm!3b$
z=9d|So>e~U<pDaP&jjYL^A$#J1ycJ<q4Iie4aSrHIcAPnk`-RW!cwM;eOzM7-I-^l
zhsI(x0huN3(@z&o`~*hoFP$bmOz-<d7hP%qeYquhFFZo;lzEwpGPhb|=&n1TnzuW&
z+Fr(<dRG`Kd?h$ehdrdwoC|4OPqBWsQc+X=z7H<ayt@?c&h#Ray2$?WC{|0StXj5H
zf3ub%lhk+PmR-|Y3zCrG&q2$+pPjywSeuxGevaluH4h4|<m|l0*<ieU&6}Y&CGE{$
zCtpdQlK&aqPkLpRzmDgV{7gR1>O1gjzVY=4I*jzj_!ZigBDP36Sg)Ki*DJywv0m9V
zMOI<5ayhD3eCL9db|ZOu=!`~Un@+*{AhB8By}{i}=GU}uuU^gUX`7h9Kb?Onx;-!5
zsSKOh22I1+=@x6%@Tl(K$i!CG{aZ}>;NQwKp1mQ~V;uk8HLtoFeIDU_|GULUYe{UO
ztepq;S;slP<EfupH3#<vm_wDc-?7q`G2#_wTEAZB4DkK<)tP7bDBTq)h5PpS(|R?I
zT|SGKzrpc5dzshf`n;8EF}Y5@CO^@#oySU`#EkWCB{!rGR$keTw$U-XFH}XbHdiCk
zrZy`lCpitYBFFLFF|<Gn>ju(&*GlIjU5;L##HKMa!*YIMwCE}g<@|#6MJ`|Do3k(%
zYgdN3%F{M?>De0{f1Nek+F3FyCB637A5*KF954FB8o=GL`SID}Aj0b57p=4g<pj)D
zf9$HN*6M>C$Nw0EO}(K^DDQv#k$KcvdEDrDDNCf|x)O~|mVJVktX%Y{M1H_((QNDW
zYdkmO^Wd=E`5PTCXNmm&+T32Ya$82bmK&_}2wiAhFiSLcviMx6O7>u!J|n>@$xJ;m
zIrPSY?nEwQ=LYwgc?@DW+9j*w8y!2Wc174q!nCj6pW9*8Bt#9W2ik<aJh#l@l*|Y;
z7!2P)iwrlb;~o0E0&Dp8*3<=Ko*&-XA5LCKyhSP5j_-}8u{ij+tt?V2yH($_N~j~R
z2D5|+^)&Nm&E!nFhTzN?XXcM}T}z|9y*24}+u;n}O1wQ-*4v4rl$Gn)IkXZs3#GiB
zR(aZ1fPb;EIPz^%p8{PuPC%rbQ+FWIev|J@9IuQ;I@?$!){-OhXU(dK-@vojY8f6!
zp0AjB+K#Yi-W9<LwQmNe&=zE{6<An#i>x@CRW6*2SQBGE2yR5%12iS3SRoOKX^)ne
zW(zilmy&hnIqnA}rf+j^N=#3Z#|h1O_6(Pp_7t>O5>uO>Z$)ByLi>_DH%wysmX?^F
zp2F%na|V9@Ed2iIYb2(H7q-67PEMwuRmGX7Si5x`fO;PPsFYM45h<xUOwF&fE#qv7
zPo$)#WK^{i+p8s`S16@_m}K;nmW-bHRLN)oc<U2nqF8RcR%R)3#vYTGfV+UFhq}0t
zgW=IYc?o-1h38%;4`ZzfRmn}{Xn9yJa<LFkt~;Pe?6<J*sOd&8bmJhh`tK`qUpL?J
zH#b;vp6f>cZ>$-m_rnKZMCLEEcR;q|0q(VIXHZUalVg`}uGk8d*=23@3I5w<<)$f2
zDOyLiAXHZN`fhjpz}#1P;QnB6bXB}Dz951P@Wwe~=2b72BUe@P<M`Lf;z=KIHy<U>
zADDUG{w=q<{aM+$EA<v{aEl$;EPkTPmCG+1ZQ|BqC^=Mk*qJQmF&6S1+9C!#U?mt9
z=wsH*Nc#?kQtPHpRtqLiR`;-?h#Mo<&Z@V$)$AU(LeI<BykK~2O^>@Q{^<Tkm)ajz
zlV+<0aKpZ6M<6X+akS&Jz<P^~t9z}wH4NvEewQ)t3o(`Vg^lVam49m;ocSnY&Wld}
z;`;7_4tDEwJ^w)c)_!XJn*N>jQ&PWM5g`AuwF9YL*MFZ{pZ{<AOUvs5KuBZ+77oP1
z(RZ|^Bxb+x_r<Xm#aaqStr_f#%R8(c{sak)C({9sd4}`{3150)#0-TUi$*P{xrnS%
zR?b)oNg&KL?}IMx?<rcr%ov?4fp#fd-d~R|ifTJdX6mO&QTf?9ic?GU?Si$=&xX}K
zlw|``BBPcX!7Gd1MXZzwhfC=vKB0cOx_&35er8K_t4grJ<cuCDpOIFF!YMQmTiord
zl(G6@v5r%`+;)mNkj*#G8q2+b;@F}mrXn+*vN-bsoa=Yw<a~>*IL)b7r_p#jt6b%J
z7&{${p1>t$%fp_Xw?)@+E$3bP!|sRO#>n`i%x71$Bc5)5bm<BD?^!=>KsRdMMDkZ9
z<obf-s(a9h2t)TdmZj&QO*1R$5BK$d<Fiq*^7{KCLiRO({}V#5eJ9-T?^WJIHtAd6
z*U(e!E;yChd@Z!<`Np}F!b+X*a^O{V=uLQ4z$?bbhu+ZYHn@9ewX8z~roWOo7-BEi
z#`wQT-G|;9T52h_+C(}I+>%1pCO|HCy)Ck<c#_|#wF+IobNnu14XbBWJ}dg3>NIbj
zdvX^k@PV5-r^l~{Hz&JDBjvEFE@q61aTj#(sm;67d`B$#7gH;VJ<z(Tm9$a{`S$93
zdk6D9rSrY0^X(<yQ{*dNZ6x0!ov;78e2a9xek<QzskyWb`N=807bbTvs>$Tl-pHv)
ze#+4>pR22N5!X>i=W!k5b*7;YoOJNjCDgc><UsEgt9tU=(PHQN{h?l5>p0l@!DGLm
z6>AF*a$T1>y>m(=)8(fhj>>c4p-pQuXTCRU6TNqA?I}qU;N3C8^`{PRer;1yB$UTG
zb|HPnrmJr4v6e!f%^c6QZX*7~YS(1eTnV>aTa1%w`sQS21J|C+MxA=&TH~oSIc;d&
zMA;iCd!v-yx|y%ftnu>Z%mo>-GYL-iNoe&<mkL^U$5gp>cSaQtwXmhXqm>+Ate@&r
znckyPM$g%F*QT}o2h+4^kM+$SWyl>nDg~t2Q9o6w%*C!9aG1zw&f<%Pe555v&%j5V
zJswOEy)FfM2c)|K4tW8}wI{%;uL!I)HOK$+DfeVLr+hJUgxPXpb#*b4>5Jbl!Lsee
zzahu2S?P{P{Uc^=3XD9o$?yEzP4siup-o%TQ|&EAtLv6f=FjAdcfaqOn)x&N>fOId
z+;{C8BcGBxFYefy9!g_;hPWdacRVgF|CBQ1i|g|*{<&^Te<CWiAIg1Lo+D<Z{UZ;i
z4d<)rsfzTUP*ck8kMBapLx=?Z%<5hA!LihRlCSQK@{i4(ne{Qfa?I?N1hW56dtdx0
z?_Ycqxhdfe!o7swC)`hXh1!UR?<>^i)M|BgK|*B(WNe4Qij$tZ4p!dRu)>J<y!Y4u
zY%q%k;bkb+gcvL3DMr+SsP`TNZZ^HP`QzY*`t-cF6-bn^I``gIN=QGonfyN<eguko
zGFwQSes3%JZ?Q@@p4zOTC=C=@asM%Jbmrd)M`!*Z91TnHpK$as5YJfu{~nG!C$EDe
z_ebIAy+Js7|6}23D0T>rh#Lk+@BaZfdVdg(-v2{zv{l2=Hu`q!`vOPXtkMVIXe)4J
z#r?;?(dmCD9EoqVPp3!2Qv4?z{a*@4BcHwwj)b4Rjvfi;CN$=QkA<S4*dZt)ZWt7O
z@CTsigFz_z;15AjtA?VdfuhzA1d5)vN*{otR-nj=`;UR5e;-fxhahP1{eQyG|E2Kb
zY`PA9jE}<4=|MVl{$n9%D0T>fh#Lk$=l=i%ogajt^M43}wrdD_4hY(QULfc>tMmZ~
z+71L+asM$8^xoEg9}K<s2kFqT6#ofF|Chp%&8y)kgVh$j)?TYPLtf76^km~^c{3p*
z>uu#;r;wG@BR$yB5)w!w1*>F(b@Z_vDq6&f=KZf9-^}?)k>FWU9MZ5dCr$6MR#Nm>
zDL!UZPD)ngR&Le9a@))L=t|<=;cIPc)jD2Qm&N%dpD|davbJ{qaMM&<@z1a0p--+p
zLChbwPJ9;m)|JeHkCAU(j3VC>3(ZLGu9t5mi&m+E0P?*ltJLJoMXrHN5Ax~az+?n7
zlU4b8m6%anSCV7cspr@H_Je=5IbD1JnVzfoe~I*N|D(;9>$aqPq;TpKPBX>-WM`eT
z_+NbuE@1Ufblr|f-7I-JwZV_TzRXg&Uff6zS#osbza3KFBH5A9GS2{-8&g)I?{<hC
zl-|fLGzi)8z;BOS-<bbI6g_r)q-wd`%wlEm+}Wbg4Dqb>l-iJ@qQmmaEz_}=8XS>O
zt^n`P@iTYcN4#=NDZ25JUhl-aUb$t_6B46$4sUwp7GrVSr0ZjfWAmT5E>5)UY^1j8
zflLbtU{_i^W2M#R^zC8JAjz4h=1dR!D4EP9eeKm(IazaYXAaj(J8z`ybNtNOQJbc@
zi$1Qbv9H{M%(ctEQbmnX$zmk^l;l+39q(W4mzdnrQG=~;zH*CyaSM{;5ykXl0h$R@
zho=__aZ>gQYTF9^cYpLN=OuL74ylmVZ>zqwRz<lxfh_8}wtgX`>IK#q38dn;##BSN
z@4^eWnzGr42$9WRwG(>PD@XzDXdX*y&O}p#lk}LDsHR2gy0&!G^`m6gZ1_0&@4jvf
z3fZ3w6~}bTPonjN91k567kWj=<z}k2s?@gQ;{U1b>|^7qvIBl+{4##)Ji^3lrC!H4
zkEt2P#$SzSWRS^DOg<*V)OKw{O@+uKuw%qJ&X9&GiXu7*kVt3+*(Iu0tB9HpQE#Bg
z<s)RRC^8V(lqRg3jZoMkuoe^C5M^Dj8+o&a*WbDC&G;)&_K!Ns%$xgh-nr+Td+s^+
z<6I4A4uvC|m=Bwn-I@;Kaq&OJ-9DVcyHh?t{%bx1HAY-!F9SQM!EBrRQM4`A>kiXL
zmN7T8d|S9$eflr*^msP*jz~Xq=Z|b2rSwnclx}ETPGl|OX>)CqSJz;DNLn6zeD9~J
z(I=#5Wx~vekNR-Jz<Cci$vJSEJUHVXoJ!t22hP|N$-U{K*gNtrDU*l#fyPZ>9&?mp
z)nHaje3<Unz#N$cQ_6e|%xCAoT<zic4^*JN(HT6`y1kk3$jdXBN~t{5GkHvpI!M<n
zJnI^l1B)I0xi+WG*tCR&b%;(B8~QYrhw)J!#z}{0_wK!p3d$KFEvc-Qj9h{DNzMBo
zY2KgJysz|mpM?v<U@}tK7TxG`zAVrAvd6R0xtwSHAYZnjvFzLO-G`Fn`+c*ZG<i_I
znd{O2gX@9fg%H1)=N`mw;Q3GvqTeS{9-i!d5w5dyJI5(c%6+bv(o&hJWi5r(l<cbq
zg+fv%&%bx`{CnB?+j;MR7Qn8V1v`{+qeBj{1)@Wd5@xK4K;XK^cgOa8n(CU7iTCp`
zk2&l(M<$A7v<V+o0liW*<@V**OOMNbeOdjgW%bKF{!CeALRP(kFEBO`m)SkeYMbGn
z;ItPbPqJTP{&DL?e|e*MYU#8Jn5T#lxA~1}(2%IarOl1z>E<2gFnhXEnXbNgrt7(g
zUgIlX`mTA3n1stS-~0K${oHkwafnE2RhgB2@jIV9RKQ&}7VC$^6JAhm5BoT)?2c<w
zDwtuXtmxBpS-o{g;tVe=-APG$5_@2qWX$M`d*8a=NSd_<_akoo`MTP&=0Bp}#y6|r
zx9^`;@A1a*jbrL=*&A-IbtfNI+t*TVvYmCM@Im3^Yx{aHax>e}EVni^-_Hq>4p#8m
z^k?U_|9;hGX4+4rqnY*3RRHTmdI2p8o(A4=@IJxHBA=8x$;~tdYqE>e#?F9aW(o$L
z>JIJ<Bo}o*kjbr^E`)POrXZT#7G%v_;G6^t)()3l2Hu5qR8knfj6OLlL~Il6N@G5?
z3rffnOfD$PVMjJm)Tg^z8Cfk(8K}Uhyc=l4aDco*dv1Mh_*KEvdMveaoMj|G<CP9g
zT%q*yyzdMYXQZ)NnV8G9XN23Me(l$;P@A=7cNlC(b$drOoY4pnS!3OwS)#dq)~~<)
z3iX91XT7%r<t(cZHZp7L_m27XnikdzT=d^NCU%@VrXh^+Uhak9rr$YIL;e|k4rEH+
z#VT~0uG_<jvoMk*5~<fjW+X{cmwn{Rm5g81=T0Zi0ejEQjQjZ~GoLT<xpQU18ZX|K
zug9}r&wG-3UcOf^_blx>9%KJ+b0Iy_cvxi57&y=!d^nJl*o_B;Lss>36|n^Q3nWmT
z$r!Qhwm=mUn2A3VsY+Po^y^gLin&x|WImKpRdLG}cqXS7DM>sEyT>YLcg(`_JINtx
zr><jCuVh=WYK>Le++*PbA+ae{j2@|qZ9+H3ou+7~oOIDUQ?NYJA@+(_I8kgWEb^;w
z=5E$y+|4?;WF)D&TGK_hKPkViZtrZBa<pqmutmNzqOtVa`b(aD?|v-ydv3SDvb+|=
z`!J+$A+H}--VgQL8GFyMqe6BpoNpG+ott9?26wP_@1Bdb)#3|qFA}E<qw;LJ6YyVF
zIxlu{w%3kVhX)UIhjs*F?>Iqpe4RT%`h*>?2_Jn*(xdN^ew!~XCu$$SZ@2`UV)rsO
z7M@41i7#=rJM9z^({8%QXy#MrT=sJ=>zvCv=W>Ir%uymuOak{3PnWyR9f9lkW?9=v
zn@is|Pr<uKp^fz1b9wnX=S!D-i)=}bCt2Q;$kq9L>GOVR`Igd><CXTFr1Zx~q3Kxl
zmP9=dyb$YbYlSo8f<epRq7Ss!bqucL<Im~+4)}uwnm<w5%|TpCpDP#8r&g?k6yeCY
zzCCBgCdXdT)_P3cHSi)4nTWILrCfi%x=WSJjCSb5m%N(`W{r}a{;m#oWb6K~Vb!xM
zn{j55-B};@V39&R<B}fQHeQJqkT)`}+$jCMt+ixUkCz<Y+$pEo-0?is#(k>Ew@^)T
zJgRw57J53&txLl9D{@!oO!<7D(tMxNe4j#RPwBT^$WtBtj+dOHy6z8#!&~JJ1le<S
zR@0u%XfuEKx0e#12ef~yeRAxI2z($?P_g!UTyFfM2aZp*{*H)Zn^voCgWc8T$!aUc
zo>uXT{1X3}_DX1bCF`Ec*(-X#8k9@Eq$Fk;{(avH(Fv-Yl!Q)6_$die;@nSBqr?Va
zfBK8p=#p{L+jYryzht}U8|=DyyWK>dB!0STWPg-NWaaW0{n@di+{A}>zdd$amzGGq
zTgikb%%*sF<|yLVFU8+CiSOzpU*z0kJ37V!2TS8%abuI<FDa%@G5r*2BQZfmv-l}S
z@&M;EOAd(-kVTR$!C!Wu$yn@mcD1H1mMT|H`ucnJ;K#J!FTAL%BWhtCnhBod`UaZH
zu&r(*nsQdLGs|=ufZ7;qW7kq7F*LBJw}K~j#|-S*TEbH$PrG|1;y*iacnT5OXK|XF
z^tdgS+g><R60twz-(pRR@fkd3=pp!68lM<va;iC#^C#jZ*zDdacnJ<3UV`gmJ%X2D
z_~@2AUf|Kd9htM~F`oGRyCzYSQ)&EWhdXH4do|8&<!d$O&<XiBYIm3o>{93<zBuPN
z+-Y>-WyTVs2_)XEQ3rR6mejwe6K~e3r{(u0-n_RL&Nz*BXj^!A_l;=k#9Oarw@6wg
zB_=7cPnTF0Dcl}Dy=PS&x1YUzc=ugzuPykSp|$Mc3ZHQ0+(UlHCH&L#Te<Ou`K)5@
zwlkB5Eba;7)AC!v%pNyJ<S-u>+0d9z^4@Wc>15)~YV|Y0bVC2W<h3NaC=>o58w;Jy
zZa7_8ZK>u$r*7k~p(MI-;4w|-khBc`Gnx)O(qoYq<mu5KEP@SRAWy-LJ=|VsU>&?G
z7~Na5@w{bxTL|Gocr@ke*|Yrq$kLpQW`aXE=s5{{Mg!A(4Cr7;AN*>hLM8Dwx>^Zq
zJH`EUr_)M}i~r$sFh>XB;8#CJEAl<f_mtHBazc;(#1<nJ{tDOXB~~oF^`A)1rPLGe
zl?da5UpB?!=%x~97xK{<C611JnbTX9H(}37U7jO67efyd{9hu52IuzmcM<b8VBWI7
zt5wNf;(#iRb<+P<e!KSz&eO-dw=)uEwf}WeEEW3w&}=!M+us8D@zAH|`ii{W0?kf#
zuS8x9(FIz+mD@F{lpXl0JFM|FTlSlR?eeZx!8SdDk9TtEFXgS}S?)!iE3XpKX8!wB
z;78Z&Fi*Lz=P?QgnU&QX{IX(Mo`V5LIHz0L<#C2ln3%6xk|&_i<d1um*d-Hun-ae$
zF%*-ynnj5r?!`5Pf3?Jbv=`~`%epn(R_pO8-zsAl(bStm&4o#B2k|*nhqWl0<<YH`
zJc(v`Y-<@$qFG*cFZC?pS#-<G?q!ktWT?9V{?^F5XLzs79Pc&Vtd{*bF5?$9Q)dA^
zfl>X9Fp!lQ7@GQoxbpb!G-%#c{|P+1=(?I~Q||j7*YtdK;fyqB$fuF<6T;s*`pRtX
zdgEdJtnv+w=5R;+FNVxv>Ks^D#~c3w`Th*&i<320Rl0HJouZ4oElzc%1kzP0r$nH(
zYpBw<w;D31Ky0^BPv%OqGo$Q${AbTTFe2`mj}iKm{p(kkG9Fr@&xqh_`g&1oH679S
z&6xV>Zcl%C`C7y4eY{@2i~#ka`oemneo@Qd@X?%hmX@Fy!du%JQ>Jobis%F_PsT0l
zILW6q4RU61!;98N<n8M*ZrPwmnXmY@mtX7MuhuXo-3lBTmz;8`D>bCt{9K`((Cezy
zjFyZ_|H3Nx!xHI9GH3J0NncZp>oJCtK3d-rzgw@L<n4k8JleobLaR#tkzUpaU4BZh
zySYXgKjU{3bU4UwY_)gmLy33l7bT9@8;Q5&j*wryBCU^XD#>e?x*Is^xla^b&uToB
z?DcVrnJ+uOX8dtwo1bOZ{oYiR2@_=~=;w#8+n~&iryC!+iO7yOty9KL>s81}Bwu7?
zsowa7WgPD82{t}*q=#duhLjnkrCSXtd6c>Et);qrv6P$(qa6tJT+w${;&VHW55XO+
zL1XD#=BZku@aS>q4Dzli<7rUjg~-Ay8nIJ|L+#m3BEuUlD09a5`yM;gt*ZWxW+XfL
zSURMAq}~{9zqc(D7<jBZx$)O^MsvtnHHeLuuCa{{O^M{bt!1{g%^Kcq$0MmoVda{2
z6Ngl!=(F8+;MuyC!KsN|fsM?=*o7VY^ava3J|^&pBp}o<JNTs3NqL{f{$q{(EQ{Rh
ze}!UaY5Zk}JCads|IjLrwbk5U*~~9mg9p=`ws4BXhvY=YxY*pKBXc!-o*vWq%0R<X
zpU$Wis-bDo3LVeRtR;mxBdn@gEK&~>=r>A#)AUOh=`%JKGt8Ukdr+l$i4iK>V2K|+
z#)woLd%!BMskZEBCz#$b_*6P&hdS6ze{Zq9xGM|YZj;~p_kEUqwyxulWqTez8Yi@E
z#qjRWvIGCLxsqF&NBwkVuh<sfzZ)-Rw6D@B^89An`~oRs;wk#x;-q*%dM2R=o;7uw
z(UjJ{6O4Z)P+$@5hfccv_KRP1wvxV!S-x>1wUIMxpS_%mAyS(=DYF8Z&AE9KQt+de
z9yd=xl>^W%RkcnvaRz^!+x)c0JMmgF-quQ#6MT~er7N(xjp&aY@d78WO~Ktfyk>M8
z(lG9xm@f@VIfUu?!QCD&<rDts@tS*3xXmiZA9Z?0wrBBUBFB$v&5vdSjx0I)RNB~q
z?0A$M+_(86vjof_%P8*t#9kyE_(7fArtPOaEF3`MCC*Ug?N6>g610hyYl#f|lxUB3
zUcdJ))ebi)H6a{{h;2etY>y*H=W&G7CPIw^j`8Q6th|0l-u>SnbUhi_Bv5^Ncw-(h
z;AUFyk7ru*NzYK|I!<j5{?E>wFQ~_td_K1U3<PV`mnu9vpZSJTq2Fx%kgTy{-7<F;
z#LC#KZDW%)pk<8r#r!t4#)vrv8Y6b-8g0Faw=@qs4?q03`Qv8{yCpy`GyUF%?>X1+
z%eB$#{{?c-O}Kf3U8k&$Y`Q|nC9#lVW+SHWUcJIu;yr&k!E^B8_ix#tN>UfqkoF|E
zv!a>*^WX(c#!oX3uMB+v)&6)uk2LiESe7}%0H1kS;p{?K0u=ev{;AL|r<-KtVpUv^
zUcXlwW}UWiDm`1RyDV?XEwHC_A3cloE22eWmjZuG_%n+)2D<>l>;(`HZ;a9SB6B6@
z(-QCS0#9Si`~(>zew8k|_M&^ij5$h8@cR^g#d%hbFA$Y%vxYFPA&7r9LA^^F!Z=Tp
z%#jY!k0(`_5+8UY{`xrQDD~W$ewreuhP&x|nO$pSKZ2PFM?xdd01Gd&F7R|VxvwW=
z7p~3Li8q1|f`w4Q6V}1D@TdLE7MRYGxxaxmrD1V5qYn#za{(-|L_Ap2d03W)HS4#Q
zN15Fb`r$9LufiYueE&fOWDY~y@XR!t#9^-!?^b(Cv>@jx{ccY*ZZDR3oOFU4d&E1s
z#A&NwPv{mtb)-D`9U}fIRz-)<NTTOW4s>DxakGeiMjCX!q4Ou<%A{GNKVu$!`TULN
zp}z?qsPol-c;8d}78uj~{u&G~j{HAi*nlPazF4DZrZW2m)i`j(Jc#|z6SHd7*M6ZI
z&4XRUH^r76oOn-WZjf0y#fT2zr0D>cy4rmID@Tvzri53Nx?u#>wY=a}eeUz7m4A5;
zcX{hWo*nCM)pxkR>Yo<v$FO_J@2UPSgw^5o8=^Y`<%wU~f457;+QKq>lI?pCPW#rh
zl-F+;$B#cakB=<<+?Lr*?pbrEYd5-6o)-VZgssOURy?MjtwS5moA<h+=F<M&#Us}s
zy)*iXw!Oydvb1e!!RtlMM1-C>tNOa%A{{$GFvPF&HAPMXQ}4S4hlz|Zx8~t*RkOI@
zjm4bb|Eo0{TjU5Wr(@sn>q%q|%cqH)w=FI>vY4~^Qflp*&NY-g@--!w7W|^f3uKUL
zZEceix4-a85|dgLJPuul6Efp*hLg&_4IU0mCu8dM?k03|NjK3`SSh-nzA?#X2)_Z!
z_GkE<>d!dg+Fe<dWsb3Sm#ijxxy}FFf4kjiorpA=&%Yv3!il^sP*|yzXln1r;+3~o
zwgX*S6ii21A1HOF?`-Wqd)+2gD&MgcNZ~X(yhMHx#bmgDbf@}zLQ_(IAliA43XJfy
zGY><e+87$MPw;>^+f-kzO8ZBnoy;O|dXSh?c4B=Kt1pb))plE5F4772E2z*ttRP`g
z-wf2#-w!6%<3|yV2OF35X>G%vskx(N|BWjMl+u{`<gTe`Cz__B{Z>c0nffKz0YsMn
zK5;?W3su4{D8HuEso6vnrd&IhX`DV3?D{{fH~K%k4*Q64bT-X{{T<#LTkf_uiRaQX
zocO%BG`PMm5V_5JtERz6%=dl=ynhqf1Rahu6HpS2_XUm;PgNcE+H8js@c|;mk@CEc
zLx2b=y8XxYllp{xn_Z<Ml&S1pwWU;-j`ZHRWf`eaQe#_I_LewlKfNKJ8r3P$Efr4E
z%iB_t%j+%j@_K_#UB2BBte?5OG5Sa05*(`kv;NPcosmt2@8l^ONqth9XnCk`Q9ACo
zN?Gwfm0rm@LIgScp^Ex4_@I`-2lMYK))9XvMQZy0D~Z)W%;Sf)E0MnLUE7pM;48Ow
z%e`kM58M~&{1$Cr<+puRu6<i-{I*v*Wq#Ysa(TUBzwIXXJ{EEh$6M`dY>CUZx8<Q^
dGyO>LC>1Pzo4l{c9FsDnhjf{-mWP7se*vuA;Y$Dj

diff --git a/BuildResults/RISC/Lib/MoreCQD.lib b/BuildResults/RISC/Lib/MoreCQD.lib
new file mode 100644
index 0000000000000000000000000000000000000000..c2f65e0e62c3d9b7f1dce0b1bfb50d52f180cc7c
GIT binary patch
literal 15874
zcmeHOe{fXQz5niVv$=)~E@>W3LkO33T`n=%jg)F|g587!Hp?~%Nx<lH%obmFQ9{_4
zM=j$pyiG(wpHot0I*yO=MRXhrl*wy-J|@F30Z~&6Hbv@7TdJu9h?q(DrFl$BBlms2
z=idF1kbwT-o7Wj(a?iQve9!lM&-d3k-|x9=v5-|Fnn@PvJKueznIy9OfqHJKt^Q79
z@%J7sDw?^Xwyt(vS)jhOZuPBe%Bw2wYb*@}s#kEc`CeC1zhZ4|U3IP9=;wE%Vb+@R
z#`4<I`;52Qc&n%_t*bCzzh*#Jm(}6jY%?+VD$6G})cLASBql^<Ri!!U*G)9_zKYs9
zUu8w0+(4hbro5t|zM`tGvbw5nNn>3_pkhURb!}tObRBn2*Rf=}j&Dxav2?nQZ%x;6
z*K{3sPuEfWjcFEm=d>$aMrpgKhb-wtwCu++Eqk$Q9g#=Tw#xFi-83728Tgxvzf3hy
z)vh(`<5dq;eIMZFzp8cmnD5ezVy&5EM-vsRYl<|=@^vpMiP}$i!&}@1w636l9#EU8
zR!whN8L-H-DkhVEBiWnRrM6bY<R!H`kM3M=-A;>F(Ym4nvirK7QIwg!?%Ta2MJ#yA
zEwreVl(LO9S6y>=4Q1cGjlNDfi~N-9xkX+5s^n-44Ci+10|uQpp|9nJ^wobs`iSXU
z<o*2A5lyD=hV=a3@ask2rSxKFGggtNK1#)fKK&)N#<c<bhK$u3ttLW+Uj1if&H7Qb
znfsR4=*O0CqYS;fbXXq%{0Wq=?Mo}6&|I}nwRaxYhr-zyZ7;J&C`gu&Q7^Kg{($RI
zXvWM?zFI<L$$llz<-?m|Lhk`Y@$IXrHp0AJ*CO3sN)KQzi$03^uP{Z0HTqcL29ou0
z%sPtM`=+69uAr}v>Em%~jaXIwk^+)^$Cs8w>11h`Xjeq;Y$A2jc6F=u4Q+#^A3BhU
zF)ykc6sJ~m|8DmYrKhk_-{*1bFD?8?>4{jhXjv0UYTdF8WFy;l3g+IwTdng&wr3pp
zrf&<LOVQW4UEVIM>9sqd&o*CoZM1Xe`abaQMF(5X8poR3fS>Y#bsu9D9F$5ZPU*tc
zl<!{|a+F>j|KaUEl1i_B=0Yi>Jcd%S9?*6DGs=G4!kn`|86j9fzuq>{T7|wn=DW0@
zSm50Nd#y>>E5TkV^FXo(tL{))?hGTbP5-lg!W*F?3*`SQXixU4zHYR2@>syaZt)gF
z4VH`AXvB`^IsEmvP+_S)h`%BKVLjHAqq_B2c@#Z+e{>iS&H7$_P{=Qao^!o`;dz#5
zq(Md+IejOdYx`Lg<IoEH8mQvd<L#~OfaO_$cU0gVP2lYpc!vbuQQ++d-cb{;OW<`(
z!s`-v9VXsUrkvNduvzaXr&)WI3V^G#E*f^>k7iV@#naY)Kc2UoS%c>+MT){r+QVe`
z2Wd_Xj|2BK3IN~!h!xL6NiMd`IMIIT>G!dUmIWv9+@gPcps-Bub$}0N_<h02))sx>
zCo5aQy|XR-4C6%KS(K0UzuopmYbX=+ob5iW_X2aTSnb)!0=yd-2isfG-nYqC;MV(s
zGCw2gxhQyZPTz`WOy4G;x3#FxMS*E+dn@MNin+J(-0f``J+N6p&%kAt*g()G<`^*f
z(Mv^U?JO-dYXhVuR~Q-ZZU@F!18zI%qi1-I*u`jXYs>hFDAx44Ip%dzx#rkFxq#Ro
za1-f6z5A&gV+SujeI^P#ypkgf1&Bil2;U@#qk_IM_>g_rxn6fR>qlJhTJ9{zJB1JE
zJ%xX-pMtjZZ7SE?de6|Ie7AmT=%>KgyE59n(~-8a)tP>>)gk>yEBM@dvUNw)ZH=hy
zw)tND2R!1BhwN_s2R!PJKMg)Ku}94Tg*`+2cSVyh>O8ca8ruI1ulxpc@QBIywRgl?
z#)CelK8ZaAXWGiBBmG2Fm3|&|6X2(z6myT)9@fXXgl8VubQnB18-9rK3T`Z&5<4_&
z3a*?rxDw0*wj1<oJJJ8@uMb1UkSNL{C=a1LigFCpjByES`Zv+FbwQdfY%IlAByet$
zty~bc0*S}YKOMIXXi>smlC6ftn2`ODsA*B>pN8GEzR@<7-GH9h`CYI?met_-U6>*I
zTpRFDZ9i;9F?|PMqvv-4{|<9@^|>}-MNwFh+4kkw(ZCn9qk)^+Q3}LYb~J^>L)QQA
z?I`0M`^XeKlCQU;^9eh;Fr^(OTa$K#wiG+Ma1%Sakg%f*H?yN%!j7H=Z+Bf_J9^ff
zJ#I(4U`J-#mt#jCe?dF?_@;K00`Zj{{f*jD`kqO4#OK*b`w^eqc#pX>r4=PxlU9Vb
z6f3%P6Dzuuu%b&hv!ZrkMSEaH?U&e!_L#HBt*9MVWVU@dR`kWrbT>QECHlXzpTAN2
zk?JSek9xiRe4N;aKAF;jlC4P#LR*RjeR2~E`XpgNpWMuXUJw?v7Z&uwCu~7`&DrA?
z^a3o%Z2NL7==`oPW<%$1x(}s5d}T*}qjqHByqFx(7kZ6YyM-2((o#gH=jz(HXJHw~
z+azxx<Vpg_9_){J+0p=kC|N}ueRe<jT!?5c{L2Szg)2k`&&=Wg29Y^nM$fhbB4$EN
z5tRcHQMrk&JO$ek#7ASn2UBBhGiuG_=u*qcpQj>9MQknod#l@`y))?yeQr}9T0UQ#
z_#*OKWBR%&@>@eb<hM8<jm+KT{8q@-M7d7n_X?Y+Kp(=>smG9?)|>@M%oNbl$0%5$
z`SY_>E9iXEVLkD$ZBgwwa(XuH_nf^uy0iI;e@EC32uVOl2E=cM^&xde?Gta{6tL--
zpzRdXX6DmDjYp~K(%18IXd5_W=FyS=?Phvi$hSgr$dEcWBIml1y!y!y(P-IWy$AVD
zyM9VM-&?!e*Q}pZYmL0zw>47n-V-4Yc`{luJQie8=Mo*9f6s!jttc%>HYfTA@i%}T
znbHo<_qg?w3@_eo2j}0vn_KWE(bo^oR~tJPPj1m_*6yCv#?Tf(n{*(jg$!VC)PWps
zl-i=pN=X9cLuJi+Z22~1CP&0`R6MVMnxO+(c#a(SJIp<ZKZ80@Q(t}mRCC>Wa6WRb
zy^f9KQ*Q}r$n;|-iC)fgG&;CtuIHA-Dx`z+9gPuWj?*;oF<0*kxl`deLmc9}g368s
zj{B}3C5<cshsld)FO@H<Bp+&h$VE+B>)l=ou&qH7$R#hTp{mlWm-j6)a<h-4L~iz)
z6{SK4kp;98XTU|)85EoY$3#Xo%30SI&n=UsWKfnWC&zu0WU#=|sCu;;vGQ{sXper*
zhYYl@iIA83Hnot)vVTb6nZRL3Bl2M*sjI2;h8_3|to0)Q-F`nmKU{;Sr9kp>_R_Ky
zBam&=&$((ea0NCp7cu3$7JELO|0&m=iE3}L_9J)x#QFh1KQ{rosCeGvR8Z0lHo%g2
ztc3d^Ub*#|r_Kike#n*;u_GfsVB)a@&%40mpMa;tz!Nj@I49#7{GtD;P=@vv&&4na
ztRD#480WDd5pE4qR$}7Rr@`5uf|FsU!MSe&&U+0y{}}_YURRRNkXUcT-hVhrDMKZ&
zo=s4CGzjfVq0?PF54iGDaLL*@!L))>gtYGSfdr0o2^^<_a#4x?aFDEdaZSZ-N&ghG
z_Y2uSD`ej%WbZU(AB7ZpK}o-}##L!bJ|`jhoM)o0iIT_tK?1g@IOp@q-NX`?`#+>$
zDKW6zSn95uNZpcoJ;oc$+`xDPnRmxAnl=$I=+q6VFHK6y&~j7i*;pxOYH^o>+mz_f
z_cDigOhSHdC**fH_`sw&zzb+WK?-hLM0a%uGb7~cc4Q%AUBWtXvQ=w4A81JG#Cr*x
z$AUJY6B)eQ*pHG$+!T%J9f|wWlYIZjw_k<0{nAgqoa6NIt(WyR><#lk&q>_2NqSFs
zHtIe8{Un8@s;*i4bBpEEbH>RcpLT7Xwf;ZHL53c}jb2%?e5P!x+*`JFRv^;Q;f*xB
z;t+RynRDKjPpkfpd694Y<QG5DgCreLS9dIqEa~vxzx%)ptx;8Qf4I8iw(H>9)Ii5#
zwQga6tP$%g4)&*^9FKB9ni9Gmkgz1O8GA;D*C@rf{t)gO^m84zO*<O5o_fES4JB^D
z*S3$-yO=RnIY<u`ZX=S*_0jFLr5tdhwYXQZ?`288zO#8)tt&bjCAF?>1Kk4}R#T05
z)-U|!to6vW_k>)Lm9OLhS5N3VUd(t2_)dcE9^5SA38+)JgOzY6J2NCbZVAef8J*9E
zt&dy$Y2imB@q5$j@vMu?a7A0JxHD%wr$7bn4(DD4zM+tdTd;pg9SgV?A)G6v$=sfi
zg+8Wah?Jo0nOW6k8*iw_&Z_9WknaG`4Q#!T0Q%C^iQ^lp;eF1Cy;O-y7CZS_1KKt+
z1@x<!?<_cuokqpY#6+pR%+ek(N54MBXxuI9y`XkLtam`*8E^n2?pWI+vxU_A%<)^M
z7|%TEGiC>tKAg5y=&UN{9W=+4TtCh-Y|cB#=Qw>(U>L-_eLU|(twH};wTADlc`n>S
z*NCxAgxwaJ#2P8?M3S1st#i+rdd2$}#^1ROX9|`n>SfsX6E!)}Zzou}32PU0VYb9L
z)Xi~5jmH`N#<+N$*K<<aK$&Ifut;e;>z>rPCv4qr@u%agu$LvI<iC=q`Otrz2GZGx
zq(xgSi=lxL@5_$GJ|!1+9q3pvk&D=w4@79OS5X<CEWg5#&QOlpq~vzoHU<3S=yAed
z@E93?SuNJZrAl^LlY$rs8XKTY_>sk0BYdMbSmLTLy2Jc31t*V?P1{I$K^M+cIFa9a
zk9$FQt|z^!Yj(e%8mdDXYj^Y8t+n;l42N}fGqup~2zxAXw|>Yt-|HXp`91!%z}$ov
zMD!uCZ9!i@bZ!9mYa#KA_@aWpSh!rqlDjzJ6lmRwyL<hjR#S*rKxcir?Bcqtk3jx>
z(>dI5813GCd)J<@ZL39lD`<s}ck3f)A5pyp_M^{pyX$SVuQs)%r|?lk4_AOEQ@@Hc
z79x*k8L`Bz`gkzIkGCeN3{TN>)$F+{dajC|t3`Y>2Z&GxYFALZ8kV<OZbyl0Z7C$r
zc~d?O+3f&t*m5r>^y{LjU0kwmagU){Mve9Aasv9Y3C$%#bB_US)EN3hXrUZbJc=iy
zs>|}4R$o&M$;6m~s;;yTMAUT*QrSYYaa0rk5MLo4oFU}n;;%V2CZsY1f2wG8Xkm%O
z)cOh1z<EKO)-`&t^B`s66l|QKY8Gvv2PrGL+rb|mdN~JD9#7dN>&>q^9wDo+e}T)R
zkrn$)np*F%8`#letLn;X!rEd^cmbXf`^r+b_nPXg6pQB`%v?_xsmBsri<w;GlDWn`
z2G@+50zYln$EKIA=ovHRJ|^ToCgeT_pFJjK8%l5;{vA<roa@3Kq#$M;7Z%a2_X*zP
z<H6)V@c)YMl10R~A|}VV!T~urAE8VU_2{0NY=N<{>OYa<XuOxgQc-#^*PpLwp{!Jh
z--iqcabAh)7vtv@@x2;2=RZWbVFgx~+p&Os0_CE`Ct7@Fiw`Z{aHgk#_zWNsB1Hk|
zMSHD)tTiEP+27z?H|c9P{(gqYcZvA>C|S)2=W4L$pyH|*(ft-}b%W4I@wJi+eMC0J
zpfk=9b9^@9eOa9u4*Cz060U`hQ9y$tXiz$C6I5}FELvo<h1V#F7RhXp{CmQ(C+h&m
z08wbN!u0bOXuKEe^$pd5;cU{!k~Bab<4ixx!s#Zv!wt^_nZ#`ao=Q@cu;dB^@4}Z^
za<B+ki?tejwdC-1ceXX>p@y$xI@>m9q2@%bwK)Sde2Iga%~gl<$tkQ%DZNbg6+`4u
ze~bS!1utSrI+FZgdK5vA=BDg?H)VZ6x|o{Q%}f{5V9>?1KH0={F@-xeCFlYjMfzZp
z4)7!9yYw~LkJD)gadVL9S$umHTQN4PTu=@^LI0(~t#T3e>n2hPH^8FC;R~<g8zHxT
z&3C+j_O`N@6z}7{<8FG1->+cir<x&|V6kdzvG=wvg{StNcs;s_+nj(H1;kDPG1rm4
z#eSykE;p!o^NrRA-z=YTUw1ja;j;JW{Yh%Y_gf;r72j`=&&sU$6xx44p^$>7Vy*(;
z=8?=NMnQRubwf}-ig{y#(ox^>e0q^79TD$WjFq_3BK8lWnyoLo>WnjAp|bR#yYhW-
z68VbGCk3BvyfVli-+6XE(WIcyirS7QoCsEZ3VpKHwfUoA38#a%nWBdaDlaS2=fz-8
z7k*r1&l2B9X2*3jV(q>|<RsLj2Zr@X;Df|Ac&$H={D?Lhsy7jh`4M}Bh+-Unm=cWh
zfhBnDN7%(sj-wpo(VvZo-Jj?fS|MMSnukz_Y|R>4<1HTI{0v5wXkPfHtl&22N3pAh
z$F^@I=Q5n<cr5A;)HA^k8T22b>`+d`BFYTpZ9sWddqXuHf=yT`TdRltE%|)&GtJ}2
zjM=dhMn(K}icc!A`|eadpJ;EE#C~Y<b7fxQ+yb7R3NL}aNbC!Qf6G-1C|d@KuwBqA
zSGCJb?YxF+rZ&`%81K}acX-y^s6I4FUx(x8Bla-~`8_*-t9)A5jfjyYh^(xT;AeSr
z6B4upS#n~P4TfZ}3qNXV@(6e|`lDvzbIAxwxyVhjuUmt>D8tvCPpZW7EA-+!(KJzB
z6{{gSWymS9DruV~Xf3mqrTb?jB;>|vkv+?f%}&(Vvpl&u2Q~IAhxIE>vr%W?a#+90
zdhfS|iy+?uo;xXflH;-$d{e60<5EUkRE9Cv@e?@mZ-@iBlEfjnPx=x=?!h7<yZkR8
zvteBqQXA9XGo&W+)#*uX5SY(E$9q`5ZrDnybdCMclLB8<Ece!V@9dU)F=o&8V~qXJ
zlCWn;KGR>IEDjYX=VV_TR*H&e1sKz;KroB3)(Wg_+nXiMDO7d+b->WM>}YbAolJjf
z_5nL$+hmI1|MC6$t=ZTQ74~OKSceS1D7+fpGknK2dZE?uUq-+1@ZvjOqn~#GkIj?r
zkvwTtUA;%+-kDbd&tTtNi#=s5zNfHH5c(u7uh7Q~ONX9G%gYUKgub0k((+Yem$`<w
zr|`B?zgCJpX$A1`z7)*mu{?s|CigP$m|wF3NiXSQ`@*T<FSFT_IA`<MQPWez#2&K+
z_XGSr`Y78g^CRwa9gxwgPe{Hi>&LLNV({gKX3DsyfTS1kUIISs#XHVwZ+mRMw>)XS
zlOD<Ure{V~*ROuYt9LYJCA^FK4uzDR?C6^AMT8Pv<W-RQQoW_IXGoPVL@WL*6JYEi
z>vpTzZ@+yN$(3h{pIBB-)@2nWEn7*ppwE90J4=4$r;7AOeUr8Li6c#9ZIT$K3oG3$
zG2~I?!Z&9N_)LbJh@%!5V7ct?6yGJ)ix{FU@R3!Tb3#5{xQgszA36(t7o0IXDEM=Y
z`Ga$c9On<~@Twt_ld<17@P)dvcz<0PG~54V$R=W>W({k9xF%xhd@}5>eBUjV*@Aa<
z;fxn5P^CJ-3IEQ`IjYj4^tP&AN5GNpEUg$hK#q(Ht*T|8yQ*t!WSgZDc^EalZl~B`
zZQ)~#FEm?lL$1S$0CkGz6V!hws82bO8}^sZ=PW@#f8h?z$W%8fxmr!Z9g2$lqSCcD
zgkM_(GdPCCFEV0$=FaY)=-Cte7)PuOY`DP~kI(`tDoI;#@Kb+dNG?PRaz;2+72-r{
zPy+r9z}^J^LK(OZdJhm}SwA^~%1&qub6EwIh_D8+BV}rjD!B#uit4HdrR%z$4+T_P
z9loZ2I8&Y35Cz{>^LzWw3(<Y<x&w-8MELMHww49Gtrw!5|F+&)7|;jIc2XC#c-vbM
z#SC;fgBeELj5WW8mO+l+%@}@^qacw<$bigB!m=wMyzdD1zbtSd4eJM=#QN2PpVn8S
zeH*fTvG8LYm!*7X&%cXVkG4_H3Pje&^CoCP95v^pd>UNY1Fi%XS5V1fjHO~D;vIS2
z@2#m0i`>a|(0Mp>ORi^w90iUp3_!XGd}Xj@XhTfznXC;&L7gn$d&rO_KOrBnUl%~4
zN%_#3q;99kV<aw*d?AlA2@;uo^!bpq6}n?^vTNu1VPpxALFQdte@;zf34G5D2@IQU
z+gSq8_-1{$!?||%y+^F7zcH+^4x5~)b=5C=>Orc7Gyyfj5^?a^<dL{Uj!u#Yer>|s
z*b|g)tH;gjEj;&sf6%bo(a2a$ei(b+7Q}%m|HS?wJRe&I!Pk+!s_TCqkH>-&`>VRH
zbXp7OGqR`lBj1qC{7dx@*yFS?=gzD+WjrO$#xm}J=3>9k#Jem!h8C3IF|-5o#p#Ws
zrAgEo`z_+P$@`~<bBhI5CY#oV*mGjs7hj@b|1${m*~?a`Zc^%^p*;U#jx?dg$VQAm
zbnk-TY@`0!2<q1D?=4?NS%G2d7Lnu@+-N5L8Tc$R_6s?IF9-erT>I-DvD3i*wJ36i
z7CaNU?9uCSF;eKCh)<b!ao@x{7jDJH?)7I9INjom<1|jw;he-t?z;1ou+ctfKj|X+
z1pYymPl{|Ld<9^~w*VaB4PrMQMvm)pNI`7~wLxTltk@%d70OsRtPjarkZ1(&rx90N
z#_jP?RhM<Wzz`D{IKCRexGMrf47E|@NV{Rjqhtrf2gZ)S(!1O%cKb0=8$(ZlK8}3c
z)o?MsN01|Shpqo*;6fDXw!9Se?`*QE>E%&3M<a+qa6-sK4X1+^`}zIIcF4im6W@Vr
zOyE)yxDan%hl@`l2Cnf0E=Ax<c^CS~*&Te(!0|G^t1xp0iSs<?FvJ-inMPS>E?_nh
zDPaZiNa;^)F0VS1^Ee@2CGrD+x`JO@S(|Lj@zk%F@3u`Gx!dZPN8C2rS&tJ?y@3_*
zlIWL2|0tv~Di?^SX7Cr!-x(45amWGVul?F6$MDXSjpKb93Wxi@Bnpdg5`B+Pqwq{Q
z>K#<vc|_ie^FM0Hs^u^Il#1oO4b{-7(W<VIcR6zdo#kIK!Ux!7`UQdMDBmT@Bb2`+
zx~&N1DI#Yt%F{&o?I_<Px}zWEuZY|X*Nc+jevLAS@(jvul<%XAp*%}e#BjeMx>H5@
z0nrkM|1Xpb-$%5R`+rOHEiQkDlHq=j(u?vO$_|u&K-rJ-L!!Hi;8NZ6k@(H<vL)a8
zZc&Eu3tarrw?5PSNpQ*!bJKRwN5*eZX+MsjhfJShelKyaedQ|GR!gq$9rd5Kkyc~p
zJWsUaAEA@xxu4+$pEyLtKj<i;dG<&u=V2Aj%@$VbW5#~-ml2h3yT)-hGq%qSzdb2K
zH>Hmik?HV}`LMI3XT@s!F<lhpA5rqE=g`L)Wr6rFk@?rPADb(i3*vH^QbdBLZ;S64
z822?gudJ<_IP(1G8ktE0GgnpAf2XvvihqHP83)X9GG<gv-h3Z(WYUG1{7Y;=m6z6+
L0`kICkXHI%q6iC7

literal 0
HcmV?d00001

diff --git a/Interfaces/AIncludes/Processes.a b/Interfaces/AIncludes/Processes.a
index ac3e08a..b31d444 100644
--- a/Interfaces/AIncludes/Processes.a
+++ b/Interfaces/AIncludes/Processes.a
@@ -202,7 +202,8 @@ processAppSpec			EQU			56
 
 	MACRO
 	_GetFrontProcess
-	PEA			$FFFFFFFF
+	MOVEQ.L		#$FFFFFFFF,D0
+	MOVE.L		D0,-(SP)
 	MOVE.W		#$39,-(SP)
 	_OSDispatch
 	ENDM
diff --git a/Internal/Asm/ColorEqu.a b/Internal/Asm/ColorEqu.a
index f85f05a..23e6656 100644
--- a/Internal/Asm/ColorEqu.a
+++ b/Internal/Asm/ColorEqu.a
@@ -266,7 +266,7 @@ PMFlag		EQU		$8000			; flag to say it's a new pixMap
 cPortFlag	EQU		$C000			; isPixMap+isCPort
 pixVersion	EQU		$0000			; isPixMap
 
-qdStackXtra	EQU		$0640			; stack space left for interrupts		<1.4> BAL
+qdStackXtra	EQU		$0800			; stack space left for interrupts		<1.4> BAL
 
 isPixMap	EQU		15				; for testing high bit of pRowbytes
 isCPort		EQU		14				; indicates that "bitmap" belongs to port
@@ -376,7 +376,7 @@ CCSTATEREGS     EQU     CCDEPTH+2       ;[16 BYTES] STATE INFO OF SAVED DATA
 CCBYTES			EQU		CCSTATEREGS+16	;[WORD] ROWBYTES OF EXPANDED DATA
 CCMAXDEPTH		EQU		CCBYTES+2		;[WORD] MAXIMUM SCREEN DEPTH
 
-CCSAVEREC		EQU		CCMAXDEPTH+2	;SIZE OF CURSOR SAVE AREA
+CCSAVEREC		EQU		CCMAXDEPTH+2+8	;SIZE OF CURSOR SAVE AREA
 
 ;	Font Manager low mem
 ;
diff --git a/Internal/Asm/fontPrivate.a b/Internal/Asm/fontPrivate.a
index 405a0b4..a2b1f90 100644
--- a/Internal/Asm/fontPrivate.a
+++ b/Internal/Asm/fontPrivate.a
@@ -265,70 +265,110 @@ selectInitializediskCache		equ		$0010									; <24>
 		MACRO		
 		_sbIsOutline
 		IMPORT		SplineMgr
-		MOVEQ		#sbIsOutline,D0
+		LCLC		&OLDOPT
+&OLDOPT	SETC		&Setting('OPT')
+		OPT			NONE
+		MOVE		#sbIsOutline,D0
+		OPT	&OLDOPT
 		_SplineMgr
 		ENDM
 		
 		MACRO		
 		_sbRetrieveGlyph
 		IMPORT		SplineMgr
-		MOVEQ		#sbRetrieveGlyph,D0
+		LCLC		&OLDOPT
+&OLDOPT	SETC		&Setting('OPT')
+		OPT			NONE
+		MOVE		#sbRetrieveGlyph,D0
+		OPT	&OLDOPT
 		_SplineMgr
 		ENDM
 		
 		MACRO
 		_sbKillSomeCaches
 		IMPORT		SplineMgr
-		MOVEQ		#sbKillSomeCaches,D0
+		LCLC		&OLDOPT
+&OLDOPT	SETC		&Setting('OPT')
+		OPT			NONE
+		MOVE		#sbKillSomeCaches,D0
+		OPT	&OLDOPT
 		_SplineMgr
 		ENDM				
 
 		MACRO
 		_sbFillWidthTab
 		IMPORT		SplineMgr
-		MOVEQ		#sbFillWidthTab,D0
+		LCLC		&OLDOPT
+&OLDOPT	SETC		&Setting('OPT')
+		OPT			NONE
+		MOVE		#sbFillWidthTab,D0
+		OPT	&OLDOPT
 		_SplineMgr
 		ENDM				
 
 		MACRO
 		_sbResetWorkSpace
 		IMPORT		SplineMgr
-		MOVEQ		#sbResetWorkSpace,D0
+		LCLC		&OLDOPT
+&OLDOPT	SETC		&Setting('OPT')
+		OPT			NONE
+		MOVE		#sbResetWorkSpace,D0
+		OPT	&OLDOPT
 		_SplineMgr
 		ENDM				
 
 		MACRO
 		_sbInitMemory
 		IMPORT		SplineMgr
-		MOVEQ		#sbInitMemory,D0
+		LCLC		&OLDOPT
+&OLDOPT	SETC		&Setting('OPT')
+		OPT			NONE
+		MOVE		#sbInitMemory,D0
+		OPT	&OLDOPT
 		_SplineMgr
 		ENDM				
 
 		MACRO
 		_sbSetFontState
 		IMPORT		SplineMgr
-		MOVEQ		#sbSetFontState,D0
+		LCLC		&OLDOPT
+&OLDOPT	SETC		&Setting('OPT')
+		OPT			NONE
+		MOVE		#sbSetFontState,D0
+		OPT	&OLDOPT
 		_SplineMgr
 		ENDM				
 
 		MACRO
 		_sbSearchForCache
 		IMPORT		SplineMgr
-		MOVEQ		#sbSearchForCache,D0
+		LCLC		&OLDOPT
+&OLDOPT	SETC		&Setting('OPT')
+		OPT			NONE
+		MOVE		#sbSearchForCache,D0
+		OPT	&OLDOPT
 		_SplineMgr
 		ENDM				
 
 		MACRO
 		_sbPreFlightFontMem
 		IMPORT		SplineMgr
-		MOVEQ		#sbPreFlightFontMem,D0
+		LCLC		&OLDOPT
+&OLDOPT	SETC		&Setting('OPT')
+		OPT			NONE
+		MOVE		#sbPreFlightFontMem,D0
+		OPT	&OLDOPT
 		_SplineMgr
 		ENDM				
 
 		MACRO
 		_fsLowestPPEM
 		IMPORT		SplineMgr
-		MOVEQ		#fsLowestPPEM,D0
+		LCLC		&OLDOPT
+&OLDOPT	SETC		&Setting('OPT')
+		OPT			NONE
+		MOVE		#fsLowestPPEM,D0
+		OPT	&OLDOPT
 		_SplineMgr
 		ENDM				
 
@@ -341,19 +381,31 @@ selectInitializediskCache		equ		$0010									; <24>
 		MACRO		
 		_sbFlushFonts
 		IMPORT		SplineMgr
-		MOVEQ		#sbFlushFonts,D0
+		LCLC		&OLDOPT
+&OLDOPT	SETC		&Setting('OPT')
+		OPT			NONE
+		MOVE		#sbFlushFonts,D0
+		OPT	&OLDOPT
 		_SplineMgr
 		ENDM
 		
 		Macro																; <24>
 		_InitializePartialFonts												; <24>
-		moveq		#selectInitializePartialFonts,d0						; <24>
+		LCLC		&OLDOPT
+&OLDOPT	SETC		&Setting('OPT')
+		OPT			NONE
+		MOVE		#selectInitializePartialFonts,d0						; <24>
+		OPT	&OLDOPT
 		_SplineMgr															; <24>
 		EndM																; <24>
 		
 		Macro																; <24>
 		_InitializeDiskCache												; <24>
-		moveq		#selectInitializeDiskCache,d0							; <24>
+		LCLC		&OLDOPT
+&OLDOPT	SETC		&Setting('OPT')
+		OPT			NONE
+		MOVE		#selectInitializeDiskCache,d0							; <24>
+		OPT	&OLDOPT
 		_SplineMgr															; <24>
 		EndM																; <24>
 		
diff --git a/QuickDraw/BitMaps.a b/QuickDraw/BitMaps.a
index 2283875..eab2aba 100644
--- a/QuickDraw/BitMaps.a
+++ b/QuickDraw/BitMaps.a
@@ -1071,12 +1071,42 @@ NXTDST	MOVE.L	(A4)+,D1					;GET NEXT DST DEVICE
 		MOVE.L	srcDevice,A1				;handle to source gDevice
 		move.l	(a1),a1						;pointer to source gDevice
 		move.l	gdRect(a1),d0				;get rect top.left
-		move.l	theGDevice,a1				;handle to destination gDevice
-		move.l	(a1),a1						;pointer to destination gDevice
-		cmp.l	gdRect(a1),d0				;dest and src gDevice have same top-left?
-		beq.s	nxtdst						;devices overlap, skip drawing
-		
-		
+		move.l	theGDevice,a0				;handle to destination gDevice
+		move.l	(a0),a0						;pointer to destination gDevice
+
+		CMP		$24(A0), D0
+		BGT.S	@L5
+		BLT.S	@L2
+		SWAP	D0
+		CMP		gdRect+0(A0), D0
+		BGT.S	@L6
+		BLT.S	@L3
+		MOVE.L	gdRect+4(A1), D0
+		CMP		gdRect+6(A0), D0
+		BLT.S	@L7
+		BGT.S	@L4
+		BRA.S	nxtdst
+@L2		SWAP	D0
+		CMP		gdRect+0(A0), D0
+		BGT.S	@cont
+@L3		MOVE.L	gdRect+4(A1), D0
+		CMP		gdRect+6(A0), D0
+		BLT.S	@cont
+@L4		SWAP	D0
+		CMP		gdRect+4(A0), D0
+		BLT.S	@cont
+		BRA.S	nxtdst
+@L5		SWAP	D0
+		CMP		gdRect+0(A0), D0
+		BLT.S	@cont
+@L6		MOVE.L	gdRect+4(A1), D0
+		CMP		gdRect+6(A0), D0
+		BGT.S	@cont
+@L7		SWAP	D0
+		CMP		gdRect+4(A0), D0
+		BGT.S	@cont
+		BRA.S	nxtdst
+
 @cont
 ;
 ; End of <KON 2/19/90>
@@ -1711,11 +1741,91 @@ DSTRECT		EQU		MASKRECT-4		 	;long, addr of Rect
 MODE		EQU 	DSTRECT-2			;WORD
 MASKRGN 	EQU 	MODE-4				;LONG, RGNHANDLE
 
-VARSIZE		EQU		0
+VARSIZE		EQU		-4
 
 share	LINK	A6,#VARSIZE					;ALLOCATE STACK FRAME
 		MOVEM.L	D3-D7/A2-A4,-(SP)			;SAVE WORK REGISTERS FOR DEVLOOP
-		
+
+		CLR.L	-4(A6)
+		MOVE.L	MASKBITS(A6), D0
+		BEQ		@skip
+		MOVEA.L	D0, A0
+		CMPI	#$1, $20(A0)
+		BNE		@skip
+		MOVEA.L	$16(A6), A0
+		MOVEA.L	$E(A6), A1
+		MOVE	$4(A0), D0
+		SUB		(A0), D0
+		SUB		$4(A1), D0
+		ADD		(A1), D0
+		BGT.B	@L0
+		MOVE	$6(A0), D0
+		SUB		$2(A0), D0
+		SUB		$6(A1), D0
+		ADD		$2(A0), D0
+		BLE		@skip
+@L0		SUBQ	#$4, SP
+		DC.W	$AA18						;_GetCTable
+		MOVE.L	(SP)+, D3
+		BEQ		@skip
+		SUBQ	#$2, SP
+		PEA.L	-4(A6)
+		MOVE	#$2, -(SP)
+		PEA.L	MASKRECT(A6)
+		MOVE.L	D3, -(SP)
+		CLR.L	-(SP)
+		PEA		4
+		MOVE.L	#$160000,D0					;_QDExtensions -> _NewGWorld
+		DC.W	$AB1D
+		MOVE	(SP)+, D4
+		BNE.B	@L1
+		TST.L	-4(A6)
+		BNE.B	@L2
+@L1		SUBQ	#$2, SP
+		PEA.L	-4(A6)
+		MOVE	#$2, -(SP)
+		PEA.L	MASKRECT(A6)
+		MOVE.L	D3, -(SP)
+		CLR.L	-(SP)
+		CLR.L	-(SP)
+		MOVE.L	#$160000,D0					;_QDExtensions -> _NewGWorld
+		DC.W	$AB1D
+		MOVE	(SP)+, D4
+@L2		MOVE.L	D3, -(SP)
+		DC.W	$AA24						;_DisposCTable
+		TST		D4
+		BNE.B	@skip
+		MOVE.L	-4(A6), D0
+		BEQ.B	@skip
+		MOVEA.L	D0, A3
+		SUBQ	#$8, SP
+		PEA.L	$4(SP)
+		PEA.L	$4(SP)
+		MOVE.L	#$80005,D0					;_QDExtensions -> _GetGWorld
+		DC.W	$AB1D
+		MOVE.L	-4(A6), -(SP)
+		CLR.L	-(SP)
+		MOVE.L	#$80006,D0					;_QDExtensions -> _SetGWorld
+		DC.W	$AB1D
+		MOVE.L	MASKBITS(A6), -(SP)
+		PEA.L	$2(A3)
+		MOVE.L	MASKRECT(A6), -(SP)
+		PEA.L	$10(A3)
+		CLR		-(SP)
+		CLR.L	-(SP)
+		DC.W	$A8EC						;_CopyBits
+		SUBQ	#$2, SP
+		MOVE.L	$2(A3), -(SP)
+		MOVE.L	#$40001,D0					;_QDExtensions -> _LockPixels
+		DC.W	$AB1D
+		ADDQ	#$2, SP
+		MOVEA.L	$2(A3), A0
+		_HLock
+		MOVE.L	(A0), MASKBITS(A6)
+		MOVE.L	#$80005,D0					;_QDExtensions -> _GetGWorld
+		DC.W	$AB1D
+@skip
+
 ; SET UP REGISTERS FOR CALLING CMDEVLOOP
 		
 		MOVE.L	DSTBITS(A6),A1				;GET DST BIT/PIXMAP
@@ -1763,7 +1873,15 @@ SRCOK	MOVE.L	DSTBITS(A6),A0				;POINT TO DSTBITS
 		
 NOTPORT	MOVE.L	DSTBITS(A6),A1				;Pass DSTBITS (not derefed)		<BAL 28May89>
 		JSR		CMDevLoop					;AND DRAW THE IMAGE
-		
+
+		MOVE.L	-4(A6),D0
+		BEQ.S	@skipQDCall
+
+		MOVE.L	D0,-(SP)
+		MOVE.L	#$40004,D0					;_QDExtensions -> _DisposeGWorld
+		DC.W	$AB1D
+@skipQDCall
+
 		MOVEM.L	(SP)+,D3-D7/A2-A4			;RESTORE WORK REGISTERS
 		UNLINK	PARAMSIZE,'KopyMask'
 
@@ -2296,9 +2414,9 @@ cutOutDevices
 		move.l	pmTable(a0),a0				;get handle to source color table
 		move.l	(a0),a0						;deref it
 		cmp.l	ctSeed(a0),d1				;do the color tables seeds match ?
-		beq.s	@next
+		beq		@next
 
-		movem.l	d1/a1,-(sp)					;save our scratch registers
+		movem.l	d1/a1-a3,-(sp)					;save our scratch registers
 
 		clr.b	-(sp)						;make space for boolean result
 		pea		tempRect1(a6)				;pointer to the SrcRect in global coordinates
@@ -2307,7 +2425,34 @@ cutOutDevices
 		pea		tempRect2(a6)				;pointer to the result
 		_SectRect							;get the intersection
 		tst.b	(sp)+						;if they didn't intersect at all, then skip to
-		beq.s	@skip						;..the next device
+		beq		@skip						;..the next device
+
+		move.l	(a1),a0
+		move.l	GDPMap(a0),a0
+		move.l	(a0),a0
+		move.l	pmTable(a0),a0
+		move.l	(a0),a0
+		move.l	(DeviceList),a2
+@again	move.l	(a2),a2
+		move.l	GDPMap(a2),a3
+		move.l	(a3),a3
+		move.l	pmTable(a3),a3
+		move.l	(a3),a3
+		move.l	(a3),d0
+		cmp.l	(a0),d0
+		bne		@done
+		sub.l	#8,sp
+		clr.b	-(sp)
+		pea.l	tempRect1(a6)
+		pea.l	$22(a2)
+		pea.l	$a(sp)
+		_SectRect
+		tst.b	(sp)+
+		add.l	#8,sp
+		bne		@skip
+@done	move.l	GDNextGD(a2),d0
+		move.l	d0,a2
+		bne.s	@again
 
 		lea		tempRect2(a6),a0			;point to our temp rect
 		pea		topleft(a0)					;convert the temp rect back to local coordinates
@@ -2323,7 +2468,7 @@ cutOutDevices
 		move.l	d6,-(sp)
 		_DiffRgn
 
-@skip	movem.l	(sp)+,d1/a1					;restore our scratch registers
+@skip	movem.l	(sp)+,d1/a1-a3				;restore our scratch registers
 
 @next	move.l	(a1),a0						;deref the current device list handle
 		move.l	GDNextGD(a0),d0				;get the next device handle into D0
diff --git a/QuickDraw/CCrsrCore.a b/QuickDraw/CCrsrCore.a
index 914e811..3fa53e7 100644
--- a/QuickDraw/CCrsrCore.a
+++ b/QuickDraw/CCrsrCore.a
@@ -102,330 +102,60 @@
 
 cursorShadow	EQU		0
 
-CRSRCORE	PROC	EXPORT
-			EXPORT	CrsrVBLTask
 
+ShieldCursor PROC  EXPORT		
+;---------------------------------------------------------
+;
+;  PROCEDURE ShieldCursor(shieldRect: Rect; offset: Point);
+;
+;  ALL REGS PRESERVED.
+;
+;  Lifted from LCursor.a
+;
+		IMPORT	QDNew_OtherShieldCursor
+
+		MOVEM.L D0-D2/A0-A1,-(SP)			;SAVE REGS
+		MOVE.L	28(SP),D0
+		MOVE.L 	24(SP),D1
+		MOVE.L	D0,-(SP)					;PUSH GLOBAL TOP
+		MOVE.L	D1,-(SP)					;PUSH GLOBAL LEFT
+		JSR 	QDNew_OtherShieldCursor
+		MOVEM.L (SP)+,D0-D2/A0-A1			;RESTORE REGS
+		RTD		#8
+
+
+CRSRCORE	PROC	EXPORT
 			EXPORT	InitCrTable
 			EXPORT	PinRect
 
-			IMPORT	ScrnAddress
-			IMPORT	ScrnSize
-			IMPORT	ScrnBitMap
-			IMPORT	PATCONVERT						; expand routine for color cursors/patterns
-			IMPORT	AllocCrsr						; proc at end of file
-			IMPORT	SETCRSRDATA						; PROC AT END OF FILE
-			IMPORT	SHFTTBL							; TO CONVERT DEPTH TO SHIFT
-			IMPORT	RGetHSize
+			IMPORT	_HideCursor
+			IMPORT	_ShowCursor
+			IMPORT	_ShieldCursor
+			IMPORT	_ScrnAddress
+			IMPORT	_ScrnSize
+			IMPORT	_InitCursor
+			IMPORT	_SetCursor
+			IMPORT	_ObscureCursor
+			IMPORT	AllocCrsr
+			IMPORT	_SetCCursor
 
-			IMPORT	BLITCURSOR,UNBLITCURSOR			; Cursor Pixelling		<dvb 19sep88>
-			EXPORT	DRAWCURSOR,ERASECURSOR			; Cursor Displaying		<dvb 19sep88>
-			EXPORT	CursorSect
-			EXPORT	GETMAINCRSR						;JUST USED INTERNALLY
 ;
 ; offset table for jump table initialization
 ;
 InitCrTable
-				DC.W	HideCursor-InitCrTable
-				DC.W	ShowCursor-InitCrTable
-				DC.W	ShieldCursor-InitCrTable
-				DC.W	ScrnAddress-InitCrTable
-				DC.W	ScrnSize-InitCrTable
-				DC.W	InitCursor-InitCrTable
-				DC.W	SetCursor-InitCrTable
-				DC.W	ObscureCursor-InitCrTable
+				DC.W	_HideCursor-InitCrTable
+				DC.W	_ShowCursor-InitCrTable
+				DC.W	_ShieldCursor-InitCrTable
+				DC.W	_ScrnAddress-InitCrTable
+				DC.W	_ScrnSize-InitCrTable
+				DC.W	_InitCursor-InitCrTable
+				DC.W	_SetCursor-InitCrTable
+				DC.W	_ObscureCursor-InitCrTable
 				DC.W	AllocCrsr-InitCrTable
-				DC.W	SetCCursor-InitCrTable
+				DC.W	_SetCCursor-InitCrTable
 
 
 ;_______________________________________________________________________
-;
-; CrsrVBLTask - executed once each vertical retrace
-;
-
-; ugly equs - stay here for now!
-adbCount	EQU	0						; word: number of valid error deltas
-MaxCnt		EQU	adbCount+2				; word: limit on number of error deltas
-Err7		EQU	MaxCnt+2				; word: time-7 error magnitude
-Err6		EQU	Err7+2					; word: time-6 error magnitude
-Err5		EQU	Err6+2					; word: time-5 error magnitude
-Err4		EQU	Err5+2					; word: time-4 error magnitude
-Err3		EQU	Err4+2					; word: time-3 error magnitude
-Err2		EQU	Err3+2					; word: time-2 error magnitude
-Err1		EQU	Err2+2					; word: time-1 error magnitude
-Error		EQU	Err1+2					; word: accumulated error
-GSize		EQU	Error+2
-
-CrsrVBLTask 							;COME HERE ON VERTICAL RETRACE
-
-	If	Not forRom	Then ; <H2>
-		TST.B	CrsrNew					; Mouse changed?
-		BEQ		TrackDone				; No É return
-		TST.B	CrsrBusy				; Cursor locked?
-		BNE		TrackDone				; Yes É return
-
-		TST.B	CrsrCouple				; Cursor coupled to mouse?
-		BEQ		NoComp					; No É skip computation	<DSV>
-
-		MOVE.W	MTemp+H,D0				; Find ÆMx
-		SUB.W	RawMouse+H,D0
-
-		MOVE.W	MTemp+V,D1				; Find ÆMy
-		SUB.W	RawMouse+V,D1
-
-		MOVE.W	D0,D2					; x := |ÆMx|
-		BGE.S	AbslXl
-		NEG.W	D2
-AbslXl
-
-		MOVE.W	D1,D3					; y := |ÆMy|
-		BGE.S	AbslYl
-		NEG.W	D3
-AbslYl
-
-		move.l	MickeyBytes,a0			; <10/7/86 SMH> get globals			<c856/26May87>
-		CMP.W	D2,D3					; D3 := magnitude(x,y)
-		BLS.S	MagDone
-		EXG	D2,D3
-MagDone	ASR.W	#1,D3
-		ADD.W	D2,D3
-
-		BNE.S		DoComp				; Zero magnitude É donÕt compute	<c856/26May87>
-		MOVE.W		#1,adbCount(A0)		; No hits							<c856/26May87>
-		CLR.W		Error(A0)			; No errors							<c856/26May87>
-		BRA			DoPin				; Update the cursor					<c856/26May87>
-DoComp
-;
-		MOVEM.L	D4-D5,-(A7)				; Save off registers
-		MOVE.W	adbCount(A0),D4			; D4 is the number of samples
-		CMP.W	MaxCnt(A0),D4			; Is Count less than MaxCnt
-		BGE.S	CountOK
-		ADD.W	#1,adbCount(A0)			; Yes É we will have one more error
-CountOK
-
-		MOVE.W	D3,D5					; Magnitude at current time
-
-		MOVE.W	D4,D2					; Get Count
-		SUB.W	#1,D2					; Index into JTab
-		ASL.W	#1,D2					; REQUIRES BRA.SÕs IN JUMP TABLES
-		JMP	JTab(PC,D2.W)				; Jump to the right code per Count
-
-JTab	BRA.S	E1						; Count = 1
-		BRA.S	E2						; Count = 2
-		BRA.S	E3						; Count = 3
-		BRA.S	E4						; Count = 4
-		BRA.S	E5						; Count = 5
-		BRA.S	E6						; Count = 6
-		BRA.S	E7						; Count = 7
-
-E8		ADD.W	Err7(A0),D5				; Accumulate time-7 magnitude
-
-E7		ADD.W	Err6(A0),D5				; Accumulate time-6 magnitude
-		MOVE.W	Err6(A0),Err7(A0)		; Shift out  time-6 magnitude
-
-E6		ADD.W	Err5(A0),D5				; Accumulate time-5 magnitude
-		MOVE.W	Err5(A0),Err6(A0)		; Shift out  time-5 magnitude
-
-E5		ADD.W	Err4(A0),D5				; Accumulate time-4 magnitude
-		MOVE.W	Err4(A0),Err5(A0)		; Shift out  time-4 magnitude
-
-E4		ADD.W	Err3(A0),D5				; Accumulate time-3 magnitude
-		MOVE.W	Err3(A0),Err4(A0)		; Shift out  time-3 magnitude
-
-E3		ADD.W	Err2(A0),D5				; Accumulate time-2 magnitude
-		MOVE.W	Err2(A0),Err3(A0)		; Shift out  time-2 magnitude
-
-E2		ADD.W	Err1(A0),D5				; Accumulate time-1 magnitude
-		MOVE.W	Err1(A0),Err2(A0)		; Shift out  time-1 magnitude
-
-E1		MOVE.W	D3,Err1(A0)				; Shift out current magnitude
-
-		MOVE.W	D4,D2					; Round up the divide
-		ASR.W	#1,D2					;   by half the denominator
-		ADD.W	D2,D5
-		EXT.L	D5						; Set up for the divide
-		DIVU	D4,D5					; Find the average magnitude
-
-		MOVE.W	D3,D4					; Get the original magnitude
-		SUB.W	D5,D3					; Find distance to average magnitude
-		ADD.W	Error(A0),D3			; Add on the accumulated error
-		CMP.W	#-1,D3					; Define -1 div 2 = 0
-		BNE.S	DivOK
-		CLR.W	D3
-DivOK	ASR.W	#1,D3					; Get half of it
-		MOVE.W	D3,Error(A0)			; Update it
-		ADD.W	D5,D3					; Desired mag is average+Error
-
-		CMP.W	#255,D5					; mag := MAX(mag,255)
-		BLS.S	MaxDone
-		MOVE.B	#255,D5
-MaxDone
-
-		move.l	MickeyBytes,a0			; <10/7/86 SMH> get at globals
-		add	#GSize,a0					; <10/24/86 SMH> point to table
-
-		CLR.W	D2						; i := 0
-
-Search	ADD.B	#1,D2					; repeat
-		CMP.B	(A0)+,D5				;   i := i+1
-		BHI.S	Search					; until mag ² Table[i]
-
-		MULS	D2,D3					; D4 := i*(Mag(ÆM)+Error)
-
-		MULS	D3,D0					; ÆCx := (ÆMx*i*(Mag(ÆM)+Error))/Mag(ÆM)
-		DIVS	D4,D0					;             <<<<<< D3 >>>>>>>
-		BMI.S	@1						; branch if minus
-		ANDI.W	#$007F,D0				; control max displacement (fix mouse jump)
-		BRA.S	@3
-@1
-		ORI.W	#$FF80,D0				; control max displacement (fix mouse jump)
-@3
-		MULS	D3,D1					; ÆCy := (ÆMy*i*(Mag(ÆM)+Error))/Mag(ÆM)
-		DIVS	D4,D1					;             <<<<<< D3 >>>>>>>
-		BMI.S	@5						; branch if minus
-		ANDI.W	#$007F,D1				; control max displacement (fix mouse jump)
-		BRA.S	@7
-@5
-		ORI.W	#$FF80,D1				; control max displacement (fix mouse jump)
-@7
-		MOVEM.L	(A7)+,D4-D5				; Restore registers
-		ADD.W	D0,RawMouse+H			; Update raw mouse location
-		ADD.W	D1,RawMouse+V
-;
-DoPin									;							<c456/26May87>
-		LEA		CrsrPin,A0				; Bounding rect for cursor
-		MOVE.L	RawMouse,D0				; Pin mouse inside rect
-
-	Endif	; Not forRom <H2>
-
-		BSR.S	ScrnPin					; return to SHOWIT if screen changes
-
-		MOVE.L	D0,RawMOUSE 			; update cursor loc with clipped pt
-		MOVE.L	D0,MTEMP				; Update real mouse location with ""
-
-		AND.L	MOUSEMASK,D0			; do jerky masking to drop low order bits
-		MOVE.L	MOUSEOffset,D1			; Get the offset
-		BEQ.S	skipPin 				; and skip 2nd pin if not
-		ADD.L	D1,D0					; do jerky offset
-		BSR.S	ScrnPin 				; return to SHOWIT if screen changes
-
-skipPin	MOVE.L	D0,MOUSE
-
-NotCup	BSR		ERASECURSOR				; HIDE THE CURSOR					<dvb 19sep88>
-SHOWIT	CLR.B	CRSRNEW 				; RESET THE CURSOR CHANGED FLAG
-		CLR.B	CRSROBSCURE				; it's no longer obscured
-		BSR 	DRAWCURSOR				; AND SHOW CURSOR IN NEW POSITION	<dvb 19sep88>
-
-CRSRDONE								;AND RETURN
-		RTS
-
-TrackDone
-		move.l	MickeyBytes,a0			; <10/7/86 SMH> get globals
-		MOVE.W	#1,adbCount(A0)			; No hits
-		CLR.W	Error(A0)				; No errors
-		RTS								; Goodbye
-
-NoComp	move.l	MickeyBytes,a0			; <10/7/86 SMH> get globals
-		MOVE.W	#1,adbCount(A0)			; No hits
-		CLR.W	Error(A0)				; No errors
-		BRA.S	NotCup					; Update the cursor
-
-
-; --------end of ugly jcrsrcoreTask
-
-
-
-ScrnPin			CMP 	LEFT(A0),D0 			;less than left?
-				BGE.S	LEFTOK					;if not, no problem
-				BSR.S	FindScreen				;=>look for new screen
-				MOVE	LEFT(A0),D0 			;pin to the left
-
-LEFTOK			CMP 	RIGHT(A0),D0			;greater than right?
-				BLT.S	RIGHTOK					;if not, no problem  WAS BLE!!			<05Apr85>
-				BSR.S	FindScreen				;=>look for new screen
-				MOVE	RIGHT(A0),D0			;pin to the right
-				SUBQ	#1,D0					;really want one less
-
-RIGHTOK			SWAP	D0						;consider y
-				CMP 	TOP(A0),D0				;less than top?
-				BGE.S	TOPOK					;if not, no problem
-				SWAP	D0
-				BSR.S	FindScreen				;=>look for new screen
-				SWAP	D0
-				MOVE	TOP(A0),D0				;pin to the top
-
-TOPOK			CMP 	BOTTOM(A0),D0			;greater than bottom?
-				BLT.S	BOTOK					;if not, no problem  WAS BLE!!			<05Apr85>
-				SWAP	D0
-				BSR.S	FindScreen				;=>look for new screen
-				SWAP	D0
-				MOVE	BOTTOM(A0),D0			;pin to the bottom
-				SUBQ	#1,D0					;really want one less
-
-BOTOK			SWAP	D0
-				RTS								;and return
-
-;  Check to see if cursor has moved to another screen.
-;  If not, returns with D0 unchanged.
-;  If so, hides the cursor, updates cursor globals and does messy return.
-;
-;  Clobbers D1-D3/A0-A3 which are preserved by interrupt handler
-
-FindScreen		MOVE	D0,D3					;pt.h in D3
-				MOVE.L	D0,D1					;pt.v in D1
-				SWAP	D1						;pt.v in D1
-				MOVE.L	DeviceList,D2			;get the first GDevice
-				BMI.S	NoDev					;=>just in case no GDevice
-DoDev			MOVE.L	D2,A3					;get device handle
-				MOVE.L	(A3),A3					;get device pointer
-				TST		GDFlags(A3)				;is screen active?
-				BPL.S	NxtDev					;=>no, try next device
-				LEA		GDRect(A3),A1			;point to rect
-				CMP		(A1)+,D1				;above top?
-				BLT.S	NxtDev					;=>yes, check next device
-				CMP		(A1)+,D3				;to left of screen?
-				BLT.S	NxtDev					;=>yes, check next device
-				CMP		(A1)+,D1				;to bottom of screen?
-				BGE.S	NxtDev					;=>yes, check next device
-				CMP		(A1)+,D3				;to right of screen?
-				BLT.S	GotDev					;=>no, cursor is on this screen
-NxtDev			MOVE.L	GDNextGD(A3),D2			;get next device in chain
-				BNE.S	DoDev					;=>there is one, check it
-NoDev			RTS								;else return and pin to current screen
-
-; cursor has changed devices, update depth and rowbytes for current device
-
-GotDev			MOVE.L	CRSRPTR,A0				;get handle to cursor data
-				MOVE.L	(A0),A0					;get pointer to cursor data
-				MOVE.L	CrsrDevice,A1			;get handle to current device
-				MOVE.L	(A1),A1					;point to current device
-				MOVE	CCDEPTH(A0),GDCCDEPTH(A1)	;copy depth
-				MOVE	CCBYTES(A0),GDCCBYTES(A1)	;copy expanded rowbytes
-
-; now get the data, depth and rowbytes for the new device
-
-				BSR		ERASECURSOR				;else erase the cursor
-@0				SWAP	D3						;get pt.h in high word
-				MOVE	D1,D3					;get pt.v in low word
-				SWAP	D3						;now get them in the right order
-				MOVE.L	D3,MTEMP				;update real mouse location with ""
-				MOVE.L	D3,RawMOUSE 			;update cursor loc with clipped pt
-				MOVE.L	D3,MOUSE				;update mouse position
-				MOVE.L	D2,CrsrDevice			;set the current cursor device
-				MOVE.L	A3,A1					;get pointer to grafDevice
-				JSR		SetCrsrData				;and set up low-memory stuff for cursor
-
-				MOVE	GDREFNUM(A3),D0			;get the refNum
-				NOT		D0						;refNum -> unitnum
-				ASL		#2,D0					;get offset in unitTable
-				MOVE.L	UTableBase,A0			;get the base of the unit table
-				MOVE.L	(A0,D0),A3				;A3 = handle to the DCE
-				MOVE.L	(A3),A0					;get pointer to the DCE
-				MOVEQ	#0,D0					;clear out D0
-				MOVE.B	dCtlSlot(A0),D0			;get the slot number
-				_ATTACHVBL						;attach vbl to this slot
-
-				ADDQ	#8,SP					;strip 2 RTS's from stack
-				BRA		SHOWIT					;=>and go display cursor on new screen
 
 
 ; This routine is used by the pinrect routine below and is also called directly
@@ -473,68 +203,6 @@ PinRect
 				JMP 	(A0)					;return to caller
 
 
-;_______________________________________________________________________	;<dvb 19Sep88>
-;																			;<dvb 19Sep88>
-;	 PROCEDURE CursorSect -- called by shieldcursor, showcursor				;<dvb 19Sep88>
-;																			;<dvb 19Sep88>
-;	Does a sectrect of CrsrRect and ShieldRect, all global-cošrd like.		;<dvb 19Sep88>
-;	CLEAR the z-flag if they DO intersect: BNE YesTheyIntersect.
-;	This code is was moved out of ShieldCursor.								;<dvb 19Sep88>
-;
-;	Since CrsrRect is in local screen cošrds, and ShieldRect is in globals,
-;	the CrsrDevice's GDRect is used as an offset.
-;_______________________________________________________________________	;<dvb 19Sep88>
-CursorSect	MOVEM.L	A0/A1/D0,-(SP)					;save the approprate regs  <dvb 19Sep88>
-
-			TST		ShieldDepth						;Any shielding?
-			BEQ.s	@NoSect
-
-			LEA 	CrsrRect,A0 					;point to crsr rect		;<dvb 19Sep88>
-			MOVE.L	CrsrDevice,A1					;GET CURSOR DEVICE		;<dvb 19Sep88>
-			MOVE.L	(A1),A1							;POINT TO CURSOR DEVICE	;<dvb 19Sep88>
-			ADD		#GDRECT,A1						;POINT TO DEVICE'S RECT	;<dvb 19Sep88>
-
-			MOVE	ShieldRect+Bottom,D0 			;GET SHIELD BOTTOM		;<dvb 19Sep88>
-			SUB		TOP(A1),D0						;CONVERT TO SCREEN LOCAL;<dvb 19Sep88>
-			CMP 	(A0)+,D0						;IS SHIELDBOTTOM < SAVETOP ?	;<dvb 19Sep88>
-			BLT.S	@NOSECT							;YES, NO INTERSECTION	;<dvb 19Sep88>
-
-			MOVE	ShieldRect+Right,D0				;GET SHIELD RIGHT			<dvb 19Sep88>
-			SUB		LEFT(A1),D0						;CONVERT TO SCREEN LOCAL	<dvb 19Sep88>
-			CMP 	(A0)+,D0						;IS SHIELDRIGHT <= SAVELEFT ? <dvb 19Sep88>
-			BLE.S	@NOSECT							;YES, NO INTERSECTION		<dvb 19Sep88>
-
-			MOVE	ShieldRect+Top,D0				;GET SHIELD TOP				<dvb 19Sep88>
-			SUB		TOP(A1),D0						;CONVERT TO SCREEN LOCAL	<dvb 19Sep88>
-			CMP 	(A0)+,D0						;IS SHIELDTOP >= SAVEBOTTOM ? <dvb 19Sep88>
-			BGE.S	@NOSECT							;YES, NO INTERSECTION		<dvb 19Sep88>
-
-			MOVE	ShieldRect+Left,D0				;GET SHIELD LEFT			<dvb 19Sep88>
-			SUB		LEFT(A1),D0						;CONVERT TO SCREEN LOCAL	<dvb 19Sep88>
-			CMP 	(A0),D0 						;IS SHIELDLEFT >= SAVERIGHT ? <dvb 19Sep88>
-			BGE.S	@NOSECT							;YES, NO INTERSECTION		<dvb 19Sep88>
-
-@SECT		MOVEQ	#1,D0							;Clear the Z-flag			<dvb 19Sep88>
-			BRA.S	@out														;<dvb 19Sep88>
-
-@NOSECT		CLR		D0								;Set the Z-flag				<dvb 19Sep88>
-@out		MOVEM.L	(SP)+,A0/A1/D0					;Restore regs				<dvb 19Sep88>
-			RTS										;bye.
-
-;_______________________________________________________________________
-;
-;	 PROCEDURE ObscureCursor -- called via the jump table
-;
-;	 Removes the cursor from the screen without hiding it, so the next
-;	 time the mouse moves, it will show up again.
-;
-;_______________________________________________________________________
-
-ObscureCursor
-		MOVE.B	#1,CrsrBusy						;"Occupado"			<dvb 19sep88>
-		MOVE.B	#1,CrsrObscure					;Mark it as obscure	<dvb 19sep88>
-		BRA.S	EraseCursor						;and erase it
-
 ;_______________________________________________________________________
 ;
 ;  HIDECURSOR - is called from CrsrVBLTask, and via jump table.
@@ -542,44 +210,13 @@ ObscureCursor
 ;  Subtracts 1 from crsrstate and hides the cursor if visible.
 ;
 ;
-HideCursor
-		MOVE.B	#1,CrsrBusy 					;MARK CHANGE IN PROGRESS
-		SUB 	#1,CRSRSTATE					;CURSOR HIDDEN ONE DEEPER
-
-		;Fall into EraseCursor
-
-;________________________________________________________________________
-;	<SM5> CSS Horror vectorized this vector.  We are supporting this to be
-;   compatible with Horror.
-;	EraseCursor calls a vectorized version of the routine via lomem.
-;	EraseCursor is vectorized to gain access to low level cursor blit routines.
-;	(NOTE: Vector is initialized in StartInit.a to routine named VEraseCursor.)
-
-; EraseCursor is much like HideCursor, but doesn't decrement the CrsrState	<dvb 19sep88>
-
-EraseCursor
-		move.l	EraseCrsrVector,-(sp)			;<SM5> CSS
-		rts										;jump to the vectored routine <SM5> CSS
-DoneHid	CLR.B	CRSRBUSY						;CHANGE COMPLETE
+_HideCursor	PROC	EXPORT
+		MOVEM.L	D0-D2/A0-A1,-(SP)
+		IMPORT	QDNEW_HIDECURSOR
+		JSR		QDNEW_HIDECURSOR
+		MOVEM.L	(SP)+,D0-D2/A0-A1
 		RTS
 
-
-;_______________________________________________________________________
-;
-;  PROCEDURE InitCursor;
-;
-;  Definitely redisplay the cursor, independent of previous calls to
-;  HideCursor, ShieldCursor and ObscureCursor.	It falls into showCursor.
-;
-InitCursor
-		MOVE.B	#1,CrsrBusy 			;mark it busy
-		CLR.B	CrsrObscure				;we wont be obscure no more
-		CLR 	CrsrState				;reset state to 0
-		CLR		ShieldDepth
-;
-; fall into ShowCursor
-;
-
 ;_______________________________________________________________________
 ;
 ;  SHOWCURSOR  - Called from CrsrVBLTask and via Jump Table.
@@ -587,39 +224,12 @@ InitCursor
 ;  Adds 1 to CRSRSTATE and paints cursor if zero and cursor is
 ;  not already visible.
 ;
-;Êthis reflects the fix from QDciPatchROM.a where obscure/show/hide left		<sm 6/9/92>stb
-; the cursor hidden only, and obscure/hide/show left the cursor obscured only.	<sm 6/9/92>stb
 
-ShowCursor
-		MOVE.B	#1,CRSRBUSY 					;MARK CHANGE IN PROGRESS
-
-		TST		ShieldDepth						;Any shielding?
-		BEQ.s	@2
-
-@1		SUBQ	#1,ShieldDepth					;If so, this ShowCursor unshields,
-		BRA.s	DrawCursor						;but doesn't up the cursor level.
-
-@2		ADDQ	#1,CRSRSTATE					;CURSOR HIDDEN ONE LESS DEEP
-		bmi.s	DoneSho
-		beq.s	DrawCursor						;<KON 25JUN90>
-		clr.b	CrsrObscure						;unobscure cursor if level went past zero	<KON 25JUN90>
-
-		;fall into DrawCursor
-
-;________________________________________________________________________
-;	<SM5> CSS Horror vectorized this vector.  We are supporting this to be
-;   compatible with Horror.
-;   DrawCursor calls a vectorized version of the routine via lomem.
-;	DrawCursor is vectorized to gain access to low level cursor blit routines.
-;	(NOTE: Vector is initialized in StartInit.a to routine named VDrawCursor.)
-
-; DrawCursor is much like ShowCursor, but doesn't increment the CrsrState	<dvb 19sep88>
-
-DrawCursor
-		move.l	DrawCrsrVector,-(sp)			; <SM5> CSS
-		rts										;jump to the vectored routine <SM5> CSS
-
-DoneSho	CLR.B	CRSRBUSY						;CHANGE COMPLETE
+_ShowCursor	PROC	EXPORT
+		MOVEM.L	D0-D2/A0-A1,-(SP)
+		IMPORT	QDNEW_SHOWCURSOR
+		JSR		QDNEW_SHOWCURSOR
+		MOVEM.L	(SP)+,D0-D2/A0-A1
 		RTS
 
 ;_______________________________________________________________________
@@ -634,207 +244,21 @@ DoneSho	CLR.B	CRSRBUSY						;CHANGE COMPLETE
 ;  ALL REGISTERS RESTORED.
 ;
 
-ShieldVars	RECORD	{return},DECREMENT					;<dvb 19Sep99>
-ShieldLeft	DS.W	1									;<dvb 19Sep99>
-ShieldTop	DS.W	1									;<dvb 19Sep99>
-ShieldRight	DS.W	1									;<dvb 19Sep99>
-ShieldBot	DS.W	1									;<dvb 19Sep99>
-return		DS.L	1									;<dvb 19Sep99>
-			ENDR
-
-			WITH	ShieldVars
-ShieldCursor
-			TST		ShieldDepth							;Any shielding already?	;<dvb 19Sep88>
-			BEQ.s	@2									;No=>don't unionrect
-
-			MOVEM.L	D0/A0,-(SP)							;Save some regs (and +8 our vars below*)
-			LEA		ShieldRect+right,A0					;A0->ShieldRect.right
-
-			MOVE.L	ShieldBot+8(SP),D0					;D0 = New shield bot,right (*)
-			CMP		(A0),D0								;Compare to ShieldRect.right
-			BLE.s	@u1									;Is the new right bigger?
-			MOVE	D0,(A0)
-
-@u1			SWAP	D0									;D0 = New shield bottom
-			CMP		-(A0),D0							;Compare to ShieldRect.bottom
-			BLE.s	@u2									;Is the new bottom bigger?
-			MOVE	D0,(A0)								;If so, replace with it.
-
-@u2			MOVE.L	ShieldTop+8(SP),D0					;D0 = New shield top,left (*)
-			CMP		-(A0),D0							;Compare to ShieldRect.left
-			BGE.s	@u3									;Is the new left smaller?
-			MOVE	D0,(A0)
-
-@u3			SWAP	D0									;D0 = New shield top
-			CMP		-(A0),D0							;Compare to ShieldRect.top
-			BGE.s	@u4									;Is the new top smaller?
-			MOVE	D0,(A0)
-
-@u4			MOVEM.L	(SP)+,D0/A0
-			BRA.s	@3
-
-@2			MOVE.L	ShieldBot(SP),ShieldRect+botRight	;save shieldrect		;<dvb 19Sep88>
-			MOVE.L	ShieldTop(SP),ShieldRect+topLeft							;<dvb 19Sep88>
-@3			ADDQ	#1,ShieldDepth						;Shielding officially on
-			MOVE.B	#1,CrsrBusy
-			BSR		CursorSect													;<dvb 19Sep88>
-			BEQ.s	@1															;<dvb 19Sep88>
-
-			BSR 	EraseCursor							;IT DOES INTERSECT, REMOVE IT
-
-@1			CLR.B	CrsrBusy
-			MOVE.L	(SP)+,(SP)							;STRIP 8 bytes of PARAMETERS, MOVING
-			MOVE.L	(SP)+,(SP)							;RETURN ADDR UP ON STACK
-			RTS
-
-			ENDWITH
-
-			IMPORT	CopyHandle,PatConvert
-;_______________________________________________________________________
-;
-; PROCEDURE SetCCursor(cCrsr: CCrsrHandle);
-;
-; This procedure copies the data in the specified color cursor into the
-; system's cursor save area.  If the depth > 2, it expands it.
-
-; this routine was taken from QDciPatchROM.a because A2 was getting trashed <sm 6/9/92>stb
-; when setting CCursor on multiple device systems							<sm 6/9/92>stb
-
-SetCCursor	MOVEM.L	D3-D4/A2-A4,-(SP)			;save work registers
-			move.l	24(sp),a2					;get ccrsrHandle			<BAL 21Jun88>
-			move.l	a2,a0						;make a copy
-			_HGetState
-			move	d0,-(sp)					;save state for later
-			move.l	a2,a0						;make a copy
-			_HLock
-			MOVE.L	(a2),A2						;GET POINTER TO NEW CURSOR
-
-			MOVE.L	([CRSRPTR]),A3				;point to current cursor (LOCKED)
-			MOVE.L	crsrID(A2),D0				;and get ID of new cursor
-			CMP		#CCrsrPat,ccType(A3)		;is current cursor a color cursor?
-			BNE.S	NotCC						;=>no, it has definitely changed
-			CMP.L	ccID(A3),D0					;same as current one?
-			BEQ		SCCDONE						;=>yes, just return
-
-NotCC		MOVE.B	#1,CRSRBUSY					;flag the cursor as busy
-			MOVE.L	D0,ccID(A3)					;set new ID
-			LEA		crsr1Data(A2),A0			;point to old-cursor data
-			LEA		THECRSR,A1					;put it here
-			MOVEQ	#16,D0						;data+mask+hotspot = 17 longs
-@0			MOVE.L	(A0)+,(A1)+					;copy data
-			DBRA	D0,@0						;until done
-
-			LEA		crsr1Data(A2),A0			;point to old-cursor data
-			LEA		CCLASTCRSR(A3),A1			;save here to indicate cursor changed
-			MOVEQ	#7,D0						;move 8 longs
-@1			MOVE.L	(A0)+,(A1)+					;copy data
-			DBRA	D0,@1						;=>loop until done
-
-			MOVE	crsrType(A2),ccType(A3)		;copy the type
-
-; NOTE:  ALL THE DST HANDLES ARE LOCKED, BUT THEY HAVE BEEN SET TO THE PROPER SIZE
-
-			MOVE.L	crsrMap(A2),-(SP)			;push src pixMap handle
-			MOVE.L	ccMap(A3),-(SP)				;push dst pixMap handle
-			_CopyPixMap							;copy the pixMap
-
-			MOVE.L	crsrData(A2),-(SP)			;push src data handle
-			MOVE.L	ccData(A3),-(SP)			;push dst data handle
-			_CopyHandle							;copy the cursor data
-
-; FOR EACH ACTIVE SCREEN DEVICE, EXPAND CURSOR, IF NECESSARY
-
-			MOVE.L	DEVICELIST,D4				;D4 = CURRENT DEVICE
-			MOVE.L	D4,A4						;GET HANDLE TO CURRENT DEVICE
-NXTSCR		MOVE.L	(A4),A4						;A4 = POINTER TO CURRENT DEVICE
-			TST.W	GDFLAGS(A4)					;IS THE DEVICE ACTIVE?
-			BPL		CHKNXT						;=>NO, CHECK NEXT DEVICE
-												;ACTIVE DEVICES ARE LOCKED DOWN
-			MOVE.L	GDPMAP(A4),A0				;GET HANDLE TO DEVICE'S PIXMAP
-			MOVE.L	(A0),A0						;POINT TO DEVICE'S PIXMAP
-			MOVE	PIXELSIZE(A0),D3			;GET DEVICE'S PIXELSIZE
-
-; IF THE PATTERN IS PRE-EXPANDED TO THE RIGHT DEPTH, JUST COPY THAT DATA
-
-			CLR		GDCCDEPTH(A4)				;flag to expand one-bit data
-			MOVE	CRSRXVALID(A2),D0			;is there pre-expanded data?
-			BEQ.S	GOEXP						;=>no, do expansion
-			CMP		D3,D0						;is the expanded data the right depth?
-			BNE.S	GOEXP						;=>no, expand from the source
-			MOVE	D0,GDCCDEPTH(A4)			;else copy the expanded depth
-			MOVE.L	crsrXData(A2),-(SP)			;push the src xdata handle
-			MOVE.L	CCXDATA(A3),-(SP)			;push the dst xdata handle
-			_CopyHandle							;and copy it
-			BRA.S	CHKNXT						;=>data already expanded, just exit
-
-GOEXP		CMP		#CCRSRPAT,CCTYPE(A3)		;IS IT A COLOR CURSOR?
-			BNE.S	DONEONE						;=>NO, EXIT WITH DEPTH = 0
-			CMP		#2,D3						;IS DEPTH GREATER THAN 2?
-			BLE.S	DONEONE						;=>NO, EXIT WITH DEPTH = 0
-
-			MOVE	D3,GDCCDEPTH(A4)			;RECORD THE EXPANDED DEPTH
-			MOVE.L	GDCCXDATA(A4),CCXDATA(A3)	;GET DEVICE'S EXPANDED DATA FOR PATCONVERT
-			MOVE.L	THEGDEVICE,-(SP)			;SAVE GRAFDEVICE (USED BY PATCONVERT)
-			MOVE.L	D4,THEGDEVICE				;SET IT TO CURRENT DEVICE
-			MOVE.L	CRSRPTR,-(SP)				;PUSH HANDLE TO CURSOR (LOCKED)
-			_PATCONVERT							;AND EXPAND TO CURRENT DEPTH
-			MOVE.L	(SP)+,THEGDEVICE			;RESTORE GRAFDEVICE
-
-;  EXPAND THE MASK TO THE CURRENT DEPTH
-
-			MOVE	D3,D0						;GET DEPTH
-			MOVEQ	#0,D1						;DEFAULT SHIFT = 0
-NXTSHFT1	LSR		#1,D0						;CHECK NEXT DEPTH BIT
-			BCS.S	GOTSHFT1					;=>GOT SHIFT
-			ADDQ	#1,D1						;ELSE ADD ONE TO SHIFT
-			BRA.S	NXTSHFT1					;LOOP UNTIL WE HIT A ONE
-
-GOTSHFT1	LEA		THECRSR+MASK,A0				;SRC = CURSOR MASK
-			MOVE.L	([GDCCXMASK,A4]),A1			;POINT TO EXPANDED MASK (LOCKED)
-
-			move.l	a2,d4						;save pointer to new cursor			<25APR91 KON>
-			MOVE.L	A1,A2						;GET START OF DST BUFFER			<27May87 EHB>
-			MOVE	#32,D0						;GET #BYTES OF SOURCE				<27May87 EHB>
-			LSL		D1,D0						;MULTIPLY BY DEPTH					<27May87 EHB>
-			ADD		D0,A2						;POINT TO END OF BUFFER				<27May87 EHB>
-
-			move.l	ExTblPtr,A3					;POINT TO ROUTINE TABLE
-			add.l	0(A3,D1*4),A3				;USE DEPTH TO SELECT ROUTINE
-			MOVEQ	#0,D0						;CLEAR HIGH PART OF D0
-			JSR		(A3)						;EXPAND 32*DEPTH BYTES
-			MOVE.L	([CRSRPTR]),A3				;GET BACK POINTER TO CURSOR (LOCKED)
-			move.l	d4,a2						;restore pointer to new cursor		<25APR91 KON>
-
-DONEONE		MOVE	GDCCDEPTH(A4),D0			;GET EXPANDED DEPTH
-			ADD		D0,D0						;DOUBLE IT
-			MOVE	D0,GDCCBYTES(A4)			;AND SAVE AS CURSOR'S ROWBYTES
-
-CHKNXT		MOVE.L	GDNEXTGD(A4),D4				;IS THERE A NEXT DEVICE?
-			MOVE.L	D4,A4						;GET HANDLE TO NEXT DEVICE
-			BNE		NXTSCR						;=>THERE IS ONE, PREPARE ITS CURSOR
-
-			BSR.S	GETMAINCRSR					;RESTORE EXPAND DATA FOR MAIN CURSOR
-			BSR		ERASECURSOR					;HIDE THE OLD CURSOR
-			BSR		DRAWCURSOR					;DISPLAY THE NEW CURSOR
-SCCDONE		CLR.B	CRSRBUSY					;CURSOR NOT BUSY ANYMORE
-			move	(sp)+,d0					;get ccrsrhandle state
-			move.l	24(sp),a0					;get ccrsrHandle
-			_HSetState
-			MOVEM.L	(SP)+,D3-D4/A2-A4			;restore work registers
-			MOVE.L	(SP)+,(SP)					;strip parameter
-			RTS									;and return
+_ShieldCursor	PROC	EXPORT
+		IMPORT	QDNEW_SHIELDCURSOR
+		JMP		QDNEW_SHIELDCURSOR
 
 ;_______________________________________________________________________
+;
+;  PROCEDURE InitCursor;
+;
+;  Definitely redisplay the cursor, independent of previous calls to
+;  HideCursor, ShieldCursor and ObscureCursor.	It falls into showCursor.
+;
 
-GETMAINCRSR	MOVE.L	CRSRDEVICE,A0				;GET HANDLE TO CURSOR DEVICE
-			MOVE.L	(A0),A0						;GET POINTER TO CURSOR DEVICE
-			MOVE.L	CRSRPTR,A1					;GET HANDLE TO CURSOR SAVE AREA
-			MOVE.L	(A1),A1						;GET POINTER TO CURSOR SAVE
-			MOVE.L	GDCCXDATA(A0),CCXDATA(A1) 	;GET CURRENT EXPANDED DATA
-			MOVE.L	GDCCXMASK(A0),CCXMASK(A1)	;GET CURRENT EXPANDED MASK
-			MOVE	GDCCDEPTH(A0),CCDEPTH(A1)	;GET EXPANDED DEPTH
-			MOVE	GDCCBYTES(A0),CCBYTES(A1)	;GET EXPANDED ROWBYTES
-			RTS									;AND RETURN
+_InitCursor	PROC	EXPORT
+		IMPORT	QDNEW_INITCURSOR
+		JMP		QDNEW_INITCURSOR
 
 ;_______________________________________________________________________
 ;
@@ -847,1127 +271,45 @@ GETMAINCRSR	MOVE.L	CRSRDEVICE,A0				;GET HANDLE TO CURSOR DEVICE
 ;  It ignores the height and mask parameters.  It assumes that the mask immediately
 ;  follows the data (as it does when called from LisaGraf)
 ;
-SetCursor	MOVE.L	([CRSRPTR]),A0			;point to crsr data structure (LOCKED)
-			move.b	#1,crsrBusy				;don't allow vbl drawing until we're done <09Aug88>
-			MOVE	#oldCrsrPat,ccType(A0)	;say that it's an old cursor
 
-			MOVE.L	8(SP),A0				;get address of data mask
-			LEA 	THECRSR,A1				;point to system cursor buffer
-			MOVEQ	#15,D2					;have 16 longs to move
-			MOVEQ	#0,D1					;flag that its not different
+_SetCursor	PROC	EXPORT
+		IMPORT	QDNEW_SETCURSOR
+		JMP		QDNEW_SETCURSOR
 
-SetCurLoop	MOVE.L	(A0)+,D0				;get next longWord of new cursor
-			CMP.L	(A1),D0 				;is it the same as what's there
-			BEQ.S	@1						;if so, skip
-			ADDQ	#1,D1					;flag that its different
-@1			MOVE.L	D0,(A1)+				;move it into the cursor buffer
-			DBRA	D2,SetCurLoop			;move all 64 bytes
-
-			MOVE.L	14(SP),D0				;get the alleged hotspot				<23Apr85>
-
-; Clean up the two coordinates to lie between 0 and 16. 							<23Apr85>
-
-			MOVEQ	#16,D2					; VERY handy temp, from loop above		<23Apr85>
-			CMP.W	D2,D0					;										<23Apr85>
-			BLS.S	@31 					; D0 LowerorSame as 16 is ok			<23Apr85>
-			MOVE.W	D2,D0					;pin it at 16							<23Apr85>
-
-@31			SWAP	D0						;align the high-order coord 			<23Apr85>
-			CMP.W	D2,D0					;										<23Apr85>
-			BLS.S	@33 					; D0 LowerorSame as 16 is ok			<23Apr85>
-			MOVE.W	D2,D0					;										<23Apr85>
-
-@33			SWAP	D0						;realign coords 						<23Apr85>
-			CMP.L	TheCrsr+HotSpot,D0		;is it new? 							<05Apr85>
-			BEQ.S	@3						;										<05Apr85>
-			ADDQ	#1,D1					;flag it's different                    <05Apr85>
-			MOVE.L	D0,TheCrsr+HotSpot		;move in the hotSpot					<05Apr85>
-@3
-
-; DID THE CURSOR CHANGE?
-
-			clr.b	crsrBusy				;re-allow vbl drawing					<09Aug88>
-			TST 	D1						;did it change?
-			BEQ.S	@6						;skip if it didn't
-
-; IF SO, FORCE THE CURSOR TO BE REDISPLAYED BY HIDING AND THEN SHOWING IT
-
-			BSR 	EraseCursor				;hide it
-			BSR 	DrawCursor				;then show it again to redraw it
-
-@6			MOVE.L	(SP)+,A0				;get return address
-			ADD 	#14,SP					;strip parameters
-			JMP 	(A0)					;return to caller
-
-
-
-SetCrsrData		PROC	EXPORT
-;------------------------------------------------
-;  UTILITY SetCrsrData
+;_______________________________________________________________________
 ;
-;  This routine is called to initialize low-memory locations
-;  to the necessary values for the grafDevice pointer in A1.
+;	 PROCEDURE ObscureCursor -- called via the jump table
+;
+;	 Removes the cursor from the screen without hiding it, so the next
+;	 time the mouse moves, it will show up again.
 ;
-				IMPORT	SetCrsrDelay			;<SM5> CSS
-				bsr.l	SetCrsrDelay			;<SM5> CSS
-				MOVE.L	CRSRPTR,A0				;get handle to cursor data
-				MOVE.L	(A0),A0					;get pointer to cursor data
 
-;  initialize the grafDevice's cursor variables
+_ObscureCursor	PROC	EXPORT
+		IMPORT	QDNEW_OBSCURECURSOR
+		JMP		QDNEW_OBSCURECURSOR
 
-				MOVE.L	GDCCXDATA(A1),CCXDATA(A0)	;copy handle to expanded data
-				MOVE.L	GDCCXMASK(A1),CCXMASK(A0)	;copy handle to expanded mask
-				MOVE	GDCCDEPTH(A1),CCDEPTH(A0)	;copy depth
-				MOVE	GDCCBYTES(A1),CCBYTES(A0)	;copy expanded rowbytes
-
-;  set the pinning rectangle to the current screen
-
-				LEA		GDRect(A1),A0			;get rect for current device
-				MOVE.L	(A0)+,crsrPin			;and set pinning rectangle
-				MOVE.L	(A0),crsrPin+4			;from device's rectangle
-
-;  set the depth, rowbytes, height, and width of the current screen
-
-				MOVE.L	GDPMap(A1),A0			;get pixMap of current device
-				MOVE.L	(A0),A0					;point at pixmap
-				MOVE	PixelSize(A0),chunkyDepth ;set depth of cursor's screen
-				MOVE.L	(A0)+,crsrBase			;update base address for cursor
-				MOVE	(A0)+,D0				;get rowbytes
-				AND		#nuRBMask,D0				;clear flag bits
-				MOVE	D0,crsrRow				;set cursor rowbytes
-				MOVE	bottom(A0),D0			;get bottom of cursor's screen
-				SUB		top(A0),D0				;calc height of cursor's screen
-				MOVE	D0,ColLines				;save height of cursor's screen
-				MOVE	right(A0),D0			;get right of cursor's screen
-				SUB		left(A0),D0				;calc width of cursor's screen
-				MOVE	D0,RowBits				;save width of cursor's screen
-				RTS
-
-
-ALLOCCRSR		PROC	EXPORT
-				IMPORT	PatConvert,GETMAINCRSR,SetCrsrData
-				IMPORT	RNEWHANDLE,ERASECURSOR,DRAWCURSOR
 ;--------------------------------------------------
 ;
 ;  PROCEDURE AllocCrsr;
 ;
 ;  Allocates all global cursor data structures.  A maximum depth of 8 is assumed.
 ;
-; CRSRPTR IS USED AS A HANDLE TO AN EXTENDED PATTERN WHICH CONTAINS THESE FIELDS:
-;
-; CCTYPE		EQU		0				;[WORD] CURSOR TYPE
-; CCMAP			EQU		CCTYPE+2		;[LONG] HANDLE TO CURSOR'S PIXMAP
-; CCDATA		EQU		CCMAP+4			;[LONG] HANDLE TO CURSOR'S COLOR DATA
-; CCXDATA		EQU		CCDATA+4		;[LONG] HANDLE TO EXPANDED DATA
-; CCXMASK		EQU		CCXDATA+4		;[LONG] HANDLE TO EXPANDED MASK
-; CCSAVE		EQU		CCXMASK+4		;[LONG] HANDLE TO SAVE BITS UNDER CURSOR
-; CCLASTCRSR	EQU		CCSAVE+4		;[32 BYTES] DATA FOR LAST B/W CURSOR DRAWN
-; CCID			EQU		CCLASTCRSR		;[LONG] ID FOR LAST COLOR CURSOR DRAWN
-; CCTABLE		EQU		CCID+4			;[LONG] TABLE ID FOR LAST COLOR CURSOR
-; CCDEPTH		EQU		CCLASTCRSR+32	;[WORD] DEPTH FOR LAST CURSOR DRAWN
-; CCSTATEREGS	EQU		CCDEPTH+2		;[20 BYTES] STATE INFO OF SAVED DATA
-; CCBYTES		EQU		CCSTATEREGS+16	;[WORD] ROWBYTES OF EXPANDED DATA
-; CCMAXDEPTH	EQU		CCBYTES+2		;[WORD] MAXIMUM CURSOR DEPTH
 
-
-			MOVEM.L	D0-D6/A0-A4/A6,-(SP)		;PRESERVE ALL REGS
-			MOVE.L	THEZONE,-(SP)				;SAVE THE CURRENT HEAP ZONE
-			MOVE.L	SYSZONE,THEZONE				;SET CURRENT ZONE TO SYS ZONE
-
-; ALLOCATE MAIN CURSOR STRUCTURE AND DATA AREAS IF NECESSARY
-
-			BSR		ERASECURSOR					;HIDE THE CURSOR
-			MOVE.B	#1,CRSRBUSY 				;MARK CHANGE IN PROGRESS
-
-			MOVE.L	CRSRPTR,D0					;GET CRSRPTR (REALLY HANDLE)
-			CMP.L	MINUSONE,D0					;IS IT ALLOCATED?
-			BNE.S	MAINOK						;=>ALREADY ALLOCATED, CONTINUE
-
-; RESERVE MEMORY FOR AND ALLOCATE CURSOR STRUCTURE.
-; THE CURSOR SAVE RECORD CONTAINS A PIXMAP, A DATA HANDLE, AND A SAVE HANDLE.
-
-			clr.b	CrsrObscure					;we wont be obscure no more
-			clr 	CrsrState					;reset state to 0
-			clr		ShieldDepth					;no more shielding
-
-			MOVEQ	#CCSAVEREC,D1				;GET SIZE OF CURSOR SAVE RECORD
-			BSR		GETLOWHANDLE				;ALLOCATE RECORD DOWN LOW AND LOCK
-			MOVE.L	A0,CRSRPTR					;SAVE HANDLE TO CURSOR
-			MOVE.L	(A0),A4						;KEEP POINTER IN A4
-
-			MOVEQ	#PMREC,D0					;WE'RE GOING TO LOCK THIS
-			_RESRVMEM							;SO RESERVE SPACE DOWN LOW
-			CLR.L	-(SP)						;MAKE ROOM FOR FUNCTION RESULT
-			_NEWPIXMAP							;ALLOCATE A PIXMAP
-			MOVE.L	(SP)+,A0					;GET HANDLE TO PIXMAP
-			MOVE.L	A0,CCMAP(A4)				;SAVE PIXMAP IN CURSOR RECORD
-			_HLOCK								;LOCK IT DOWN
-
-			MOVEQ	#2,D0						;DEFAULT SIZE OF DATA HANDLE
-			JSR		RNEWHANDLE					;ALLOCATE IT
-			MOVE.L	A0,CCDATA(A4)				;AND SAVE FOR CURSOR DATA
-
-; RESERVE AND ALLOCATE MEMORY IN WHICH TO SAVE THE BITS BEHIND THE CURSOR.
-; MAGIC AMOUNT OF MEMORY RESERVED IS FOR 32 BIT DEEP, LONG ALIGNED CURSOR.
-
-	if cursorShadow then
-			MOVE.L	#$400*4,D1					;GET REQUIRED SIZE 32*32*4
-	else
-			MOVE.L	#$400,D1					;GET REQUIRED SIZE 16*16*4
-	endif
-			BSR		GETLOWHANDLE				;GET LOW,LOCKED HANDLE
-			MOVE.L	A0,CCSAVE(A4)				;SAVE INTO RECORD
-
-; INITIALIZE THE CURSOR TO THE ARROW CURSOR.
-
-			MOVE	#OLDCRSRPAT,CCTYPE(A4)		;SAY THAT IT'S AN OLD CURSOR
-			CLR		CCDEPTH(A4)					;CLEAR DEPTH TO SAY NOT EXPANDED
-
-			MOVE.L	GRAFGLOBALS(A5),A0			;POINT TO GRAFGLOBALS
-			LEA		ARROW(A0),A0				;POINT TO ARROW CURSOR
-			LEA		THECRSR,A1					;PUT IT HERE
-			MOVEQ	#16,D0						;DATA+MASK+HOTSPOT = 17 LONGS
-@2			MOVE.L	(A0)+,(A1)+					;COPY DATA
-			DBRA	D0,@2						;UNTIL DONE
-
-
-; FOR EACH ACTIVE SCREEN DEVICE, ALLOCATE EXPANDED CURSOR MEMORY IF NECESSARY
-; ALL DEVICES ARE GUARANTEED TO BE LOCKED.
-
-MAINOK		MOVE.L	CRSRPTR,A4					;GET HANDLE TO CURSOR STUFF
-			MOVE.L	(A4),A4						;GET POINTER (LOCKED)
-			MOVE.L	DEVICELIST,D4				;D4 = CURRENT DEVICE
-			MOVE.L	D4,A6						;GET HANDLE TO CURRENT DEVICE
-NXTDEVICE	MOVE.L	(A6),A6						;A6 = POINTER TO CURRENT DEVICE
-			TST.W	GDFLAGS(A6)					;IS THE DEVICE ACTIVE?
-			BPL		CHKNEXT						;=>NO, CHECK NEXT DEVICE
-
-			TST		GDCCDEPTH(A6)				;HAS MEMORY BEEN ALLOCATED?
-			BNE.S	DOEXPAND					;=>YES, EXPAND CURSOR IF NECESSARY
-
-			MOVE.L	GDCCXDATA(A6),A0			;GET HANDLE TO EXPANDED DATA
-			_DISPOSHANDLE						;DISPOSE THE CURRENT HANDLE
-			MOVE.L	#$400,D1					;GET SIZE OF EXPANDED HANDLE @@@@ used to be $100
-			BSR		GETLOWHANDLE				;GET A LOW, LOCKED HANDLE
-			MOVE.L	A0,GDCCXDATA(A6)			;AND SAVE IT
-
-			MOVE.L	GDCCXMASK(A6),A0			;GET HANDLE TO EXPANDED DATA
-			_DISPOSHANDLE						;DISPOSE THE CURRENT HANDLE
-			BSR		GETLOWHANDLE				;GET A LOW, LOCKED HANDLE
-			MOVE.L	A0,GDCCXMASK(A6)			;AND SAVE IT
-
-DOEXPAND
-; MAKE SURE ALL THE HANDLES ARE THE RIGHT SIZE FOR THE CURRENT DEPTH.
-; IF COLOR CURSOR AND DEPTH IS > 2 BITS PER PIXEL, THEN EXPAND TO CURRENT DEPTH.
-; BLACK AND WHITE (AND 2 BIT) CURSORS ARE EXPANDED BY SHOWCURSOR.
-
-			MOVE.L	GDPMAP(A6),A0				;GET HANDLE TO DEVICE'S PIXMAP
-			MOVE.L	(A0),A0						;POINT TO DEVICE'S PIXMAP
-			MOVE	PIXELSIZE(A0),D3			;GET DEVICE'S PIXELSIZE
-			CMP		GDCCDEPTH(A6),D3			;HAS DEPTH CHANGED?
-			BEQ.S	CHKNEXT						;=>NO, THIS DEVICE IS OK
-
-;  CONVERT DEPTH TO SHIFT AMOUNT IN D6
-
-			MOVE	D3,D0						;GET DEPTH
-			MOVEQ	#0,D6						;DEFAULT SHIFT = 0
-NXTSHFT		LSR		#1,D0						;CHECK NEXT DEPTH BIT
-			BCS.S	GOTSHFT						;=>GOT SHIFT
-			ADDQ	#1,D6						;ELSE ADD ONE TO SHIFT
-			BRA.S	NXTSHFT						;LOOP UNTIL WE HIT A ONE
-
-GOTSHFT		CMP		#CCRSRPAT,CCTYPE(A4)		;IS IT A COLOR CURSOR?
-			BNE.S	CHKNEXT						;=>NO
-			CMP		#2,D3						;IS DEPTH GREATER THAN 2?
-			BLE.S	CHKNEXT						;=>NO
-
-			MOVE.L	GDCCXDATA(A6),CCXDATA(A4)	;GET EXPAND HANDLE FOR PATCONVERT
-			MOVE.L	THEGDEVICE,-(SP)			;SAVE GRAFDEVICE
-			MOVE.L	D4,THEGDEVICE				;SET IT TO CURRENT DEVICE
-			MOVE.L	CRSRPTR,-(SP)				;PUSH HANDLE TO CURSOR
-			_PATCONVERT							;AND EXPAND TO CURRENT DEPTH
-			MOVE.L	(SP)+,THEGDEVICE			;RESTORE GRAFDEVICE
-
-;  EXPAND THE MASK TO THE CURRENT DEPTH
-
-			LEA		THECRSR+MASK,A0				;SRC = CURSOR MASK
-			MOVE.L	([GDCCXMASK,A6]),A1			;POINT TO EXPANDED MASK (LOCKED)
-			MOVE.L	A1,A2						;GET START OF DST BUFFER
-			MOVE	#32,D0						;GET #BYTES OF SOURCE
-			LSL		D6,D0						;MULTIPLY BY DEPTH
-			ADD		D0,A2						;POINT TO END OF BUFFER
-
-			move.l	ExTblPtr,A3					;POINT TO ROUTINE TABLE
-			add.l	0(A3,D6*4),A3				;USE DEPTH TO SELECT ROUTINE
-			MOVEQ	#0,D0						;CLEAR HIGH PART OF D0
-			JSR		(A3)						;EXPAND 32*DEPTH BYTES
-
-			MOVE	D3,GDCCDEPTH(A6)			;SAVE DEPTH OF EXPANDED CURSOR
-			ADD		D3,D3						;GET 2*DEPTH
-			MOVE	D3,GDCCBYTES(A6)			;SAVE ROWBYTES FOR EXPANDED CURSOR
-
-CHKNEXT		MOVE.L	GDNEXTGD(A6),D4				;IS THERE A NEXT DEVICE?
-			MOVE.L	D4,A6						;GET HANDLE TO NEXT DEVICE
-			BNE		NXTDEVICE					;=>THERE IS ONE, PREPARE ITS CURSOR
-
-			BSR		GETMAINCRSR					;SET UP FIELDS FOR MAIN CURSOR
-			MOVE.L	CRSRDEVICE,A1				;GET HANDLE TO CURSOR DEVICE
-			MOVE.L	(A1),A1						;GET POINTER TO CURSOR DEVICE
-			JSR		SetCrsrData					;AND SET UP LOW-MEM FOR THIS DEVICE
-
-			MOVE.L	(SP)+,THEZONE				;RESTORE THE ZONE
-			CLR.B	CRSRBUSY					;CHANGE COMPLETE
-			BSR		DRAWCURSOR
-			MOVEM.L	(SP)+,D0-D6/A0-A4/A6		;RESTORE ALL REGS
-			RTS
-
-
-GETLOWHANDLE
-;--------------------------------------------------
-; UTILITY GETLOWHANDLE
-;
-; THIS ROUTINE RESERVES MEMORY FOR A HANDLE, ALLOCATES THE HANDLE
-; AND THEN LOCKS IT DOWN.  THE DESIRED SIZE IS IN D1.  THE RETURNED HANDLE IS IN A0
-; ONLY D0 IS TRASHED
-
-			MOVE.L	D1,D0						;GET THE DESIRED SIZE
-			_RESRVMEM							;RESERVE SPACE FOR THE HANDLE DOWN LOW
-			BNE.S	MEMFULL						;=>ON ERROR, JUST BOMB
-			MOVE.L	D1,D0						;GET THE DESIRED SIZE
-			_NEWHANDLE	,CLEAR					;ALLOCATE THE HANDLE
-			_HLOCK								;LOCK IT
-			RTS									;AND RETURN
-
-MEMFULL		MOVEQ	#25,D0						;MEM FULL ERROR
-			_SYSERROR							;FLAG IT
-			DC.W	$A9FF						;JUST IN CASE WE RETURN
+AllocCrsr	PROC	EXPORT
+		IMPORT	QDNEW_ALLOCCRSR
+		JMP		QDNEW_ALLOCCRSR
 
 ;_______________________________________________________________________
 ;
-;	BLITCURSOR																<dvb 19sep88>
+; PROCEDURE SetCCursor(cCrsr: CCrsrHandle);
 ;
-; The only thing that will stop this routine from blitting the cursor
-; to the screen is ShieldRect. Since the new CrsrRect isn't known
-; until pretty far through the process, it's checked here, not
-; DrawCursor. CrsrState and CrsrObscure are _not_ checked here.
-; It seems likely that patching this routine will have use on accelerator
-; cards etc.
-
-BLITCURSOR		PROC	EXPORT
-		IMPORT	CursorSect, SHFTTBL
-
-		TST.L	CRSRPTR							;CURSOR ALLOCATED?
-		BMI		NoBlit							;=>NO, JUST RETURN
-		MOVEM.L D0-D7/A0-A6,-(SP)				;SAVE REGISTERS
-		LEA		THECRSR+DATA,A2					;POINT TO THE CURSOR
-
-
-;-----------------------------------------------
+; This procedure copies the data in the specified color cursor into the
+; system's cursor save area.  If the depth > 2, it expands it.
 ;
-;  CONVERT CHUNKY DEPTH TO SHIFT AMOUNT IN D7
-;
-		LEA		SHFTTBL,A0					;TO CONVERT DEPTH TO SHIFT
-		MOVE	CHUNKYDEPTH,D1				;GET DEPTH
-		MOVEQ	#0,D7						;DEFAULT SHIFT = 0
-		MOVE.B	0(A0,D1),D7					;GET SHIFT AMOUNT IN D7
-
-
-;-----------------------------------------------
-;
-;  CHECK THE CURSOR TO SEE IF IT HAS CHANGED
-;	 OLD CURSORS: CHECK CURSOR DATA AND DEPTH
-;    NEW CURSORS: CHECK DEPTH
-;
-GOTSHFT	MOVE.L	([CRSRPTR]),A4				;GET POINTER TO CURSOR DATA (LOCKED)
-		CMP		#CCRSRPAT,CCTYPE(A4)		;IS IT A COLOR CURSOR?
-		BNE.S	OLDCUR						;=>NO, JUST AN OLD ONE
-		CMP		CCDEPTH(A4),D1				;HAS DEPTH CHANGED?
-		BEQ		NOEXPAND					;=>NO, DON'T EXPAND
-		CMP		#2,D1						;IS DEPTH 2 or 1?
-		BGT		EXPMASK						;=>NO, JUST EXPAND MASK
-		BRA.S	CPYDATA						;=>ELSE JUST COPY DATA
-
-OLDCUR	LEA		CCLASTCRSR(A4),A0			;POINT TO SAVED DATA
-		MOVE.L	A2,A1						;GET POINTER TO CURSOR
-		MOVEQ	#7,D0						;CHECK 8 LONGS
-@0		CMP.L	(A0)+,(A1)+					;ARE THEY THE SAME?
-		BNE.S	GOEXPAND					;=>NO, EXPAND IT
-		DBRA	D0,@0						;=>LOOP UNTIL DONE
-
-		CMP		CCDEPTH(A4),D1				;HAS DEPTH CHANGED?
-		BEQ		NOEXPAND					;=>NO, DON'T EXPAND
-
-GOEXPAND
-;-----------------------------------------------
-;
-;  INVALIDATE EXPANDED DATA FOR EACH DEVICE BY CLEARING DEPTH
-;  THIS MUST BE DONE SO THAT ALL EXPANDED CURSOR IMAGES ARE RENDERED INVALID AFTER
-;  AN OLD CURSOR HAS BEEN SET.  IF THE CURSOR IS NEW, SETCCURSOR ALREADY DID THIS.
-
-		MOVE.L	DEVICELIST,A0				;GET FIRST HANDLE IN DEVICE LIST
-NXTGD	MOVE.L	(A0),A0						;POINT TO FIRST DEVICE
-		TST		GDFLAGS(A0)					;IS IT ACTIVE?
-		BPL.S	NOTACT						;=>NO, SKIP TO NEXT
-		CLR		GDCCDEPTH(A0)				;ELSE INVALIDATE EXPANDED DATA
-NOTACT	MOVE.L	GDNEXTGD(A0),D0				;GET NEXT GRAFDEVICE
-		MOVE.L	D0,A0						;GET INTO A0
-		BNE.S	NXTGD						;=>REPEAT FOR ALL DEVICES
-
-;  COPY THE CURSOR DATA TO IDENTIFY THIS CURSOR
-
-CPYDATA	LEA		CCLASTCRSR(A4),A0			;POINT TO SAVED DATA
-		MOVE.L	A2,A1						;GET CURSOR
-		MOVEQ	#7,D0						;MOVE 8 LONGS
-@0		MOVE.L	(A1)+,(A0)+					;MOVE A LONG
-		DBRA	D0,@0						;=>LOOP UNTIL DONE
-
-;  UPDATE THE ROWBYTES AND DEPTH FOR THE EXPANDED DATA
-
-	;	MOVE	D1,(A0)+	;COPY THE DEPTH TOO	<this is the top half of ccID! <BAL 01Apr89>
-		MOVE	D1,CCDEPTH(A4)				;SET DEPTH TO SAY IT'S EXPANDED
-		ADD		D1,D1						;DOUBLE FOR CURSOR'S ROWBYTES
-		MOVE	D1,CCBYTES(A4)				;AND UPDATE ROWBYTES
-
-
-;-----------------------------------------------
-;
-;  EXPAND THE CURSOR TO THE CURRENT DEPTH
-;
-		MOVE.L	A2,A0						;SRC = CURSOR
-		MOVE.L	([CCXDATA,A4]),A1			;POINT TO EXPANDED DATA (LOCKED)
-		MOVE.L	A1,A2						;GET START OF DST BUFFER
-		MOVE	#32,D5						;GET #BYTES OF SOURCE
-		LSL		D7,D5						;MULTIPLY BY DEPTH
-		ADD		D5,A2						;POINT TO END OF BUFFER
-
-		move	d7,d0
-		cmp		#4,d0						;16/32 bits per pixel?				<BAL 28Jun88>
-		blt.s	@1							;no, don't hack depth conversion
-		addq	#2,d0						;get address of spiffy 1 to 15/24 bit expand
-
-@1		move.l	ExTblPtr,A3					;POINT TO ROUTINE TABLE
-		add.l	0(A3,D0*4),A3				;USE DEPTH TO SELECT ROUTINE
-		MOVEQ	#0,D0						;CLEAR HIGH PART OF D0
-		JSR		(A3)						;EXPAND 32*DEPTH BYTES
-
-
-;-----------------------------------------------
-;
-;  EXPAND THE MASK TO THE CURRENT DEPTH
-;
-EXPMASK	LEA		THECRSR+MASK,A0				;SRC = CURSOR MASK
-		MOVE.L	([CCXMASK,A4]),A1			;POINT TO EXPANDED MASK (LOCKED)
-		MOVE.L	A1,A2						;GET START OF DST BUFFER
-		MOVE	#32,D5						;GET #BYTES OF SOURCE			<BAL 14Jun88>
-		LSL		D7,D5						;MULTIPLY BY DEPTH				<BAL 14Jun88>
-		ADD		D5,A2						;POINT TO END OF BUFFER
-
-		move.l	ExTblPtr,A3					;POINT TO ROUTINE TABLE
-		add.l	0(A3,D7*4),A3				;USE DEPTH TO SELECT ROUTINE
-		MOVEQ	#0,D0						;CLEAR HIGH PART OF D0
-		JSR		(A3)						;EXPAND 32*DEPTH BYTES
-
-;-----------------------------------------------
-;
-;  PREPARE TO BLT THE CURSOR ON THE SCREEN IN ANY DEPTH
-;	(SUBTITLE:  WALTZ OF THE REGISTERS)
-;
-NOEXPAND
-		MOVE.L	([CCXDATA,A4]),d0			;A2 = EXPANDED DATA FOR BLT (LOCKED)
-		_rTranslate24To32					;strip off high byte
-		move.l	d0,a2
-		MOVE.L	([CCXMASK,A4]),d0			;A3 = EXPANDED MASK FOR BLT (LOCKED)
-		_rTranslate24To32					;strip off high byte
-		move.l	d0,a3
-		MOVEQ	#16,D5						;D5 = 16
-
-;-----------------------------------------------
-;
-;  CLIP THE CURSOR VERTICALLY AND GET THE TOP AND BOTTOM INTO D2 AND D3.
-;  IF THE TOP IS CLIPPED, UPDATE THE DATA BASE ADDRESSES IN A2 AND A3.
-;
-		MOVE	MOUSE+V,D2					;MOUSE POSITION Y
-		SUB		CRSRPIN+TOP,D2				;CONVERT TO SCREEN LOCAL COORDS
-		SUB		THECRSR+HOTSPOT+V,D2		; - HOTSPOT = TOP EDGE
-		MOVE	D2,D3						;GET CURSOR BOTTOM
-		ADD		D5,D3						; = TOP + 16
-		CMP		D5,D3						;AT TOP?
-		BGE.S	CHKBOT						;=>NOT AT TOP
-		NEG		D2							;GET NUMBER OF CLIPPED ROWS
-		CMP		D5,D2						;ARE ALL 16 CLIPPED?
-		BEQ		SkipBlit					;=>IF SO, NOTHING TO SHOW
-		MULU	CCBYTES(A4),D2				; * ROWBYTES FOR OFFSET
-		ADD.L	D2,A2						;ADD VERTICAL OFFSET INTO CURSOR
-		ADD.L	D2,A3						;ADD VERTICAL OFFSET INTO MASK
-		MOVEQ	#0,D2						;AND PIN CURSOR TO TOP
-
-CHKBOT	MOVE	COLLINES,D4					;GET BOTTOM OF SCREEN
-		CMP		D4,D3						;PAST BOTTOM?
-		BLE.S	CHKLFT						;=>NO, VERTICAL OK
-		MOVE	D4,D3						;ELSE PIN TO BOTTOM EDGE
-
-
-;-----------------------------------------------
-;
-;  CLIP THE CURSOR HORIZONTALLY AND GET THE LEFT AND RIGHT INTO D0 AND D1
-;  IF THE LEFT OF THE CURSOR IS CLIPPED, ADJUST THE OFFET IN D6.
-
-CHKLFT	MOVEQ	#0,D6						;INIT SRC/DST OFFSET TO 0
-		MOVE	MOUSE+H,D0					;MOUSE POSITION X
-		SUB		CRSRPIN+LEFT,D0				;CONVERT TO SCREEN LOCAL COORDS
-		SUB		THECRSR+HOTSPOT+H,D0		; - HOTSPOT = CURSOR LEFT
-		MOVE	D0,D1						;GET CURSOR RIGHT
-		ADD		D5,D1						; = LEFT + 16
-		CMP		D5,D1						;AT LEFT EDGE?
-		BGE.S	CHKRT						;=>NOT AT LEFT EDGE
-		SUB		D0,D6						;OFFSET = AMOUNT CLIPPED
-		MOVEQ	#0,D0						;AND PIN TO LEFT EDGE
-
-CHKRT	MOVE	ROWBITS,D4					;GET RIGHT EDGE OF SCREEN
-		CMP		D4,D1						;PAST RIGHT EDGE?
-		BLE.S	RTOK						;=>NO, HORIZONTAL OK
-		MOVE	D4,D1						;ELSE PIN TO RIGHT EDGE
-RTOK
-
-;-----------------------------------------------
-;
-;  USE TOP AND LEFT TO CALCULATE THE LONG ALIGNED SCREEN BASE ADDRESS
-
-		MOVE.L	CRSRBASE,A5 				;A5 = POINTER TO BASE OF SCREEN
-		MOVE	CRSRROW,A0					;A0 = SCREEN ROWBYTES
-		MOVE	A0,D4						;COPY FOR MULU
-		MULU	D2,D4						;TOP * ROWBYTES
-		ADD.L	D4,A5						;ADD VERT OFFSET INTO SCREEN
-		ext.l	d0							;make it a long					<BAL 17Jan89>
-		LSL.l	D7,D0						;CONVERT LEFT PIXELS TO BITS
-		MOVE.l	D0,D4						;GET LEFT EDGE
-		AND.l	#~$1F,D4					;LONGWORD ALIGNED
-		MOVE.l	D4,D5						;MAKE A COPY
-		ASR.l	#3,D5						;CONVERT BITS TO BYTES
-		ADD.l	D5,A5						;GET BASE OFFSET IN SCREEN
-
-;-----------------------------------------------
-;
-;  SAVE THE CRSRRECT FOR CURSHIELD
-
-		LEA 	CrsrRect,A1 				;SET UP CRSRRECT
-		MOVE	D2,(A1)+					;TOP
-		MOVE.l	D4,D5						;GET LONG ALIGNED LEFT IN BITS
-		LSR.l	D7,D5						;CONVERT TO PIXELS
-		MOVE	D5,(A1)+					;LONG ALIGNED LEFT
-		MOVE	D3,(A1)+					;BOTTOM
-		MOVE	D5,(A1) 					;RIGHT = LEFT + longcount/pixs in long
-
-	if cursorShadow then
-		add.w	#16,-2(a1)					;grow height for shadow
-		add.w	#16,(a1)					;grow width for shadow
-	endif
-
-SAMELONG
-;-----------------------------------------------
-;
-;  ADJUST DST/SRC OFFSET IN D6
-;  GET NUMBER OF ROWS TO DO IN D3
-;  GET LONGCNT IN D5 AND USE TO ADJUST DSTBUMP IN A0
-
-		AND		#$1F,D0						;GET LEFT EDGE MOD 32
-		LSL		D7,D6						;CONVERT OFFSET TO BITS
-		SUB		D0,D6						; = NEG OFFSET FROM SOURCE
-
-		ext.l	d1							;make it a long					<BAL 17Jan89>
-		LSL.l	D7,D1						;CONVERT RIGHT EDGE TO BITS
-		MOVE.l	D1,D5						;MAKE COPY
-		SUB.l	D4,D5						;GET WIDTH OF CURSOR
-		ble		SkipBlit					;crsr fits in 0 or fewer longs so don't draw
-		subq	#1,d5						;force multiples of 32 to round down
-
-		LSR.l	#5,D5						;GET LONGS-1
-
-		SUB		D2,D3						;D3 = # ROWS TO DO
-		SUBQ	#1,D3						;MAKE IT 0 BASED
-
-		MOVE.l	D5,D2						;GET LONGS
-		ADDQ.l	#1,D2						;MAKE ONE BASED
-		LSL.l	#2,D2						;CONVERT TO BYTES
-		SUB.l	D2,A0						;ADJUST DST BUMP
-
-		lsl.l	#3,d2						;get long aligned bit width
-		lsr.l	d7,d2						;get effective cursr pixel width
-		add		d2,(a1)						;adjust crsrRect.right = left+width
-
-		BSR		CursorSect					;Now then, do we intersect shield?
-		BNE		SkipBlit					;If so, ththat's all.
-
-;-----------------------------------------------
-;
-;  CONVERT LEFT EDGE AND RIGHT EDGE TO LEFTMASK AND RIGHTMASK IN D4 AND D2
-
-		MOVEQ	#-1,D4						;FILL LONG WITH ONES
-		LSR.L	D0,D4						;AND SHIFT IN 0'S FOR LEFTMASK
-
-		MOVEQ	#-1,D2						;FILL LONG WITH ONES
-		AND		#$1F,D1						;GET RIGHT MOD 32
-		beq.s	@1							;does right have a real mask? no, flush it
-		LSR.L	D1,D2						;AND SHIFT 0'S IN FROM RIGHT
-		NOT.L	D2							;GET RIGHTMASK
-
-;-----------------------------------------------
-;
-;  SAVE DSTLEFT/DSTBUMP/LONGCNT/ROWCNT INTO CRSRPTR SO THAT
-;  HIDECURSOR KNOWS HOW MUCH SCREEN TO REPLACE.
-
-@1		LEA		CCBYTES(A4),A6				;POINT TO END OF SAVE STATE AREA
-		MOVE	(A6),A1						;A1 = ROWBYTES FOR EXPANDED CURSOR
-		MOVE.L	([CCSAVE,A4]),d0			;A4 = POINTER TO SAVE AREA (LOCKED)
-		_rTranslate24To32					;strip off high byte
-		move.l	d0,a4
-		MOVEM.L	A5/A0/D5/D3,-(A6)			;SAVE DSTLEFT/DSTBUMP/LONGCNT/ROWCNT
-
-		moveq	#true32b,d0					;switch to 32 bit addressing
-		movem.l	a0-a2,-(sp)					;save off registers
-		_rSwapMMUMode						;get previous mode in d0.b (can trash a0/a2, d0/d2)
-		movem.l	(sp)+,a0-a2					;restore registers
-		move.b	d0,-(sp)					;save previous state for later
-
-		MOVE.L	D5,A6						;SAVE LONGCNT
-		EXT.L	D6							;BFEXTU LIKES LONG OFFSETS
-		MOVE.L	D6,-(SP)					;SAVE OFFSET ON STACK
-		MOVE.L	D4,-(SP)					;SAVE LEFTMASK ON STACK
-
-		;use alternate loop if on Direct Device			<BAL 12 Mar89>
-
-		cmp		#4,d7						;are we 16 or 32 bits/pixel (direct device) ?
-		bge		Direct						;no, don't hack
-
-	if	cursorShadow then
-		cmp		#3,d7
-		beq		Shadow8
-	endif
-
-		TST		D5							;CHECK FOR JUST ONE LONG
-		BRA.S	START						;AND JUMP INTO MIDDLE
-
-;-----------------------------------------------
-;
-;  DISPLAY THE CURSOR AND SAVE THE BITS BEHIND IT (DO THE CURSOR LIMBO!!)
-;
-;  THE FUNNY TRANSFER MODE USED HERE WORKS THE SAME AS BEFORE FOR ONE BIT
-;  MODE, AND SIMILARLY FOR COLOR.  IN COLOR, THE DATA PIXELS WITHIN THE MASK
-;  REPLACE THE DESTINATION;  THE DATA PIXELS OUTSIDE THE MASK ARE XORED WITH
-;  THE DST.  IF THE DATA PIXELS OUTSIDE OF THE MASK ARE BLACK (ALL F'S),
-;  THEN THE DST IS SIMPLY INVERTED.  IF THEY ARE OTHER COLORS, INTERESTING
-;  EFFECTS WILL MANIFEST THEMSELVES.
-;
-;  REGISTER USE:	D0:	SCRATCH			A0:	DSTBUMP
-;					D1:	SCRATCH			A1:	SRCBUMP
-;					D2:	RIGHTMASK		A2:	SRCPTR
-;					D3:	ROWCNT			A3:	MASKPTR
-;					D4:	LEFTMASK		A4:	SAVEPTR
-;					D5:	LONGCNT			A5: DSTPTR
-;					D6:	OFFSET			A6:	COPY LONGCNT
-;					D7:	SCRATCH		   (A7): LEFTMASK
-;									   4(A7): COPY OFFSET
-
-END		AND.L	D2,D4						;AND RIGHTMASK INTO LEFTMASK
-MAIN	BFEXTU	(A2){D6:0},D0				;EXTRACT A LONG OF SRC
-		BFEXTU	(A3){D6:0},D1				;EXTRACT A LONG OF MASK
-		ADD.L	#32,D6						;BUMP TO NEXT LONG
-		AND.L	D4,D0						;AND SRC WITH LEFTMASK
-		AND.L	D4,D1						;AND MASK WITH LEFTMASK
-		MOVE.L	D0,D7						;COPY SRC
-
-		AND.L	D1,D7						;GET MASK AND SRC (PIXELS TO REPLACE)
-		NOT.L	D1							;GET NOTMASK
-		MOVE.L	(A5),d4						;get a long of screen
-		move.l	d4,(A4)+					;SAVE A LONG OF SCREEN
-
-		AND.L	D1,D0						;GET NOTMASK AND SRC (PIXELS TO INVERT)
-		AND.L	d4,D1						;PUNCH HOLE FOR PIXELS TO REPLACE (used to be A5)
-		OR.L	D7,D1						;REPLACE PIXELS WITHIN MASK
-		EOR.L	D0,D1						;INVERT PIXELS OUTSIDE OF MASK
-		MOVE.L	D1,(A5)+					;AND PUT TO DST
-		MOVEQ	#-1,D4						;FLUSH LEFTMASK
-		SUB		#1,D5						;DECREMENT LONGCNT
-START	BGT.S	MAIN						;=>MORE THAN ONE TO DO
-		BEQ.S	END							;=>DO LAST LONG
-		MOVE.L	4(SP),D6					;RESTORE OFFSET
-		MOVE.L	(SP),D4						;RESTORE LEFTMASK
-		ADD.L	A1,A3						;BUMP CURSOR DATA
-		ADD.L	A1,A2						;BUMP CURSOR MASK
-		ADD.L	A0,A5						;BUMP SCREEN POINTER
-		MOVE.L	A6,D5						;RESTORE LONGCNT (TEST D5)
-		DBRA	D3,START					;=>DO NEXT ROW
-
-		bra		DoneBlit
-
-
-Direct
-		bgt.s	Direct32
-
-;-----------------------------------------------
-;
-;  DISPLAY THE CURSOR AND SAVE THE BITS BEHIND IT (DO THE CURSOR LIMBO!!)
-;
-;  THE FUNNY TRANSFER MODE USED HERE WORKS THE SAME AS BEFORE FOR ONE BIT
-;  MODE, AND SIMILARLY FOR COLOR.  IN COLOR, THE DATA PIXELS WITHIN THE MASK
-;  REPLACE THE DESTINATION;  THE DATA PIXELS OUTSIDE THE MASK ARE XORED WITH
-;  THE DST.  IF THE DATA PIXELS OUTSIDE OF THE MASK ARE BLACK (ALL F'S),
-;  THEN THE DST IS SIMPLY INVERTED.  IF THEY ARE OTHER COLORS, INTERESTING
-;  EFFECTS WILL MANIFEST THEMSELVES.
-;
-;  REGISTER USE:	D0:	SCRATCH			A0:	DSTBUMP
-;					D1:	SCRATCH			A1:	SRCBUMP
-;					D2:	RIGHTMASK		A2:	SRCPTR
-;					D3:	ROWCNT			A3:	MASKPTR
-;					D4:	LEFTMASK		A4:	SAVEPTR
-;					D5:	LONGCNT			A5: DSTPTR
-;					D6:	OFFSET			A6:	COPY LONGCNT
-;					D7:	SCRATCH		   (A7): LEFTMASK
-;									   4(A7): COPY OFFSET
-Direct16
-		swap	d4
-
-		addq	#1,d5						;make one based
-		add		d5,d5						;convert longcnt to word cnt
-		move	d5,d0						;save pixel cnt
-		subq	#2,d5						;make zero based - 1
-		move	d5,a6						;save a copy for later scans
-
-		moveq	#-1,d7
-		lsr.w	#1,d7						;make into low15bits mask
-
-		add		d0,d0						;make into byte cnt
-		sub		d0,a1						;make srcRow into srcBump
-
-		asr		#3,d6						;make offset into bytes
-		add		d6,a2						;adjust src ptr
-		add		d6,a3						;adjust mask ptr
-
-@first	tst		d4							;is left pixel masked?
-		bne.s	@MAIN						;no, go to it
-		move.w	(a5)+,(a4)+					;save first pixel
-		addq	#2,a2						;bump past first src pixel
-		addq	#2,a3						;bump past first mask pixel
-		bra.s	@next
-
-@MAIN	move.w	(A2)+,D0					;EXTRACT A LONG OF SRC
-		MOVE.w	(A5),d1						;get a long of screen
-		move.w	d1,(A4)+					;SAVE A LONG OF SCREEN
-		tst.w	(A3)+						;EXTRACT A LONG OF MASK
-		bne.s	@inside
-		not.w	d0							;flip src so that black is all 1's
-		and.w	d7,d0						;mask off high bit
-		beq.s	@skipit						;no use in xoring with zero
-		eor.w	d1,d0						;xor dst with src
-@inside
-		move.w	d0,(a5)
-@skipit	addq	#2,a5
-@next	dbra	D5,@MAIN					;DECREMENT LONGCNT
-
-		tst		d2							;is right pixel masked?
-		bne.s	@last						;no, go to it
-		move.w	(a5)+,(a4)+					;save first pixel
-		addq	#2,a2						;bump past first src pixel
-		addq	#2,a3						;bump past first mask pixel
-		bra.s	@nxtScn
-
-@last	move.w	(A2)+,D0					;EXTRACT A LONG OF SRC
-		MOVE.w	(A5),d1						;get a long of screen
-		move.w	d1,(A4)+					;SAVE A LONG OF SCREEN
-		tst.w	(A3)+						;EXTRACT A LONG OF MASK
-		bne.s	@in
-		not.w	d0							;flip src so that black is all 1's
-		and.w	d7,d0						;mask off high bit
-		beq.s	@skip						;no use in xoring with zero
-		eor.w	d1,d0						;xor dst with src
-@in
-		move.w	d0,(a5)
-@skip	addq	#2,a5
-@nxtScn	ADD.L	A1,A3						;BUMP CURSOR DATA
-		ADD.L	A1,A2						;BUMP CURSOR MASK
-		ADD.L	A0,A5						;BUMP SCREEN POINTER
-		MOVE.L	A6,D5						;RESTORE LONGCNT
-		DBRA	D3,@First					;=>DO NEXT ROW
-		bra		DoneBlit
-
-
-
-
-;-----------------------------------------------
-;
-;  DISPLAY THE CURSOR AND SAVE THE BITS BEHIND IT (DO THE CURSOR LIMBO!!)
-;
-;  THE FUNNY TRANSFER MODE USED HERE WORKS THE SAME AS BEFORE FOR ONE BIT
-;  MODE, AND SIMILARLY FOR COLOR.  IN COLOR, THE DATA PIXELS WITHIN THE MASK
-;  REPLACE THE DESTINATION;  THE DATA PIXELS OUTSIDE THE MASK ARE XORED WITH
-;  THE DST.  IF THE DATA PIXELS OUTSIDE OF THE MASK ARE BLACK (ALL F'S),
-;  THEN THE DST IS SIMPLY INVERTED.  IF THEY ARE OTHER COLORS, INTERESTING
-;  EFFECTS WILL MANIFEST THEMSELVES.
-;
-;  REGISTER USE:	D0:	SCRATCH			A0:	DSTBUMP
-;					D1:	SCRATCH			A1:	SRCBUMP
-;					D2:	RIGHTMASK		A2:	SRCPTR
-;					D3:	ROWCNT			A3:	MASKPTR
-;					D4:	LEFTMASK		A4:	SAVEPTR
-;					D5:	LONGCNT			A5: DSTPTR
-;					D6:	OFFSET			A6:	COPY LONGCNT
-;					D7:	SCRATCH		   (A7): LEFTMASK
-;									   4(A7): COPY OFFSET
-
-	if cursorShadow then
-
-Direct32
-		move	d5,d0						;get a copy of long cnt
-		addq	#1,d0						;make one based
-		lsl		#2,d0						;make into byte cnt
-		sub		d0,a1						;make srcRow into srcBump
-
-		asr		#3,d6						;make offset into bytes
-		add		d6,a2						;adjust src ptr
-		add		d6,a3						;adjust mask ptr
-
-
-voff	equ	4
-hoff	equ	4
-
-;-----------------------------------------------
-;
-;  SAVE DSTLEFT/DSTBUMP/LONGCNT/ROWCNT INTO CRSRPTR SO THAT
-;  HIDECURSOR KNOWS HOW MUCH SCREEN TO REPLACE.
-
-		movem.l	d3/d5/a6/a5/a0,-(sp)
-		MOVE.L	([CRSRPTR]),D0				;GET POINTER TO CURSOR DATA (LOCKED)
-		_rTranslate24To32
-		MOVE.L	D0,A6
-		LEA		CCBYTES(A6),A6				;POINT TO END OF SAVE STATE AREA
-		move.w	mouse,d0					;get vert pos
-		lsr.w	#6,d0
-	;	add.w	#voff,d3
-		add.w	d0,d3
-		move.w	mouse+2,d0					;get horiz pos
-		lsr.w	#6,d0
-	;	add.w	#hoff,d5
-		add.w	d0,d5
-		lsl.w	#2,d0
-	;	sub.w	#hoff*4,a0
-		sub.w	d0,a0
-		MOVEM.L	A5/A0/D5/D3,-(A6)			;SAVE DSTLEFT/DSTBUMP/LONGCNT/ROWCNT
-		MOVE.L	D5,A6						;SAVE LONGCNT
-
-@MAIN2	MOVE.L	(A5)+,d1					;get a long of screen
-		move.l	d1,(a4)+					;save a long of screen
-		dbra	D5,@MAIN2					;DECREMENT LONGCNT
-
-		ADD.L	A0,A5						;BUMP SCREEN POINTER
-		MOVE.L	A6,D5						;RESTORE LONGCNT
-		DBRA	D3,@MAIN2					;=>DO NEXT ROW
-		movem.l	(sp)+,a5/d3/d5/a6/a0
-
-
-		movem.l	d3/a2-a5,-(sp)
-
-	;	moveq	#voff,d0
-		move.w	mouse,d0					;get vert pos
-		lsr.w	#6,d0
-		bra.s	@1
-
-@0		ADD.w	CRSRROW,A5					;offset SCREEN POINTER vertically
-@1		dbra	d0,@0
-
-		move.w	mouse+2,d0					;get horiz pos
-		lsr.w	#6,d0
-		lsl.w	#2,d0
-	;	add.w	#hoff*4,a5
-		add.w	d0,a5
-
-@MAIN1	MOVE.L	(A5),d1						;get a long of screen
-		move.l	(A2)+,d0					;combine A LONG OF src
-		not.l	d0							;interested in nothing , dammit!!@!
-		and.l	$31a,d0						; shit line
-		or.l	(A3)+,d0					;EXTRACT A LONG OF MASK
-		beq.s	@skipit1
-											;d0 = 0
-		moveq	#0,d0						;assume result is black
-		moveq	#$3f,d4						;amount to remove from screen
-		swap	d4							;d4 = $3f0000
-		sub.l	d4,d1						;darken the red channel
-		bcs.s	@pinred
-		move.l	d1,d0						;take the red channel
-@pinred
-		lsr.l	#8,d4
-		sub.w	d4,d1						;darken the grn channel
-		bcs.s	@pingrn
-		move.w	d1,d0						;take the grn channel
-@pingrn
-		lsr.w	#8,d4
-		sub.b	d4,d1						;darken the blu channel
-		bcs.s	@pinblu
-		move.b	d1,d0						;take the blu channel
-@pinblu
-
-		move.l	d0,(a5)
-@skipit1
-		addq	#4,a5
-		dbra	D5,@MAIN1					;DECREMENT LONGCNT
-
-		ADD.L	A1,A3						;BUMP CURSOR DATA
-		ADD.L	A1,A2						;BUMP CURSOR MASK
-		ADD.L	A0,A5						;BUMP SCREEN POINTER
-		MOVE.L	A6,D5						;RESTORE LONGCNT
-		DBRA	D3,@MAIN1					;=>DO NEXT ROW
-
-		movem.l	(sp)+,d3/a2-a5
-
-
-
-@MAIN	move.l	(A2)+,D0					;EXTRACT A LONG OF SRC
-		MOVE.L	(A5),d1						;get a long of screen
-		tst.l	(A3)+						;EXTRACT A LONG OF MASK
-		bne.s	@inside
-		not.l	d0							;flip src so that black is all 1's
-		beq.s	@skipit						;no use in xoring with zero
-		eor.l	d1,d0						;xor dst with src
-@inside
-		move.l	d0,(a5)
-@skipit	addq	#4,a5
-		dbra	D5,@MAIN					;DECREMENT LONGCNT
-
-		ADD.L	A1,A3						;BUMP CURSOR DATA
-		ADD.L	A1,A2						;BUMP CURSOR MASK
-		ADD.L	A0,A5						;BUMP SCREEN POINTER
-		MOVE.L	A6,D5						;RESTORE LONGCNT
-		DBRA	D3,@MAIN					;=>DO NEXT ROW
-		bra		DoneBlit
-
-
-;  REGISTER USE:	D0:	SCRATCH			A0:	DSTBUMP
-;					D1:	SCRATCH			A1:	SRCBUMP
-;					D2:	RIGHTMASK		A2:	SRCPTR
-;					D3:	ROWCNT			A3:	MASKPTR
-;					D4:	LEFTMASK		A4:	SAVEPTR
-;					D5:	LONGCNT			A5: DSTPTR
-;					D6:	OFFSET			A6:	COPY LONGCNT
-;					D7:	SCRATCH		   (A7): LEFTMASK
-;									   4(A7): COPY OFFSET
-Shadow8
-		move	d5,d0						;get a copy of long cnt
-		addq	#1,d0						;make one based
-		lsl		#2,d0						;make into byte cnt
-		sub		d0,a1						;make srcRow into srcBump
-
-		asr		#3,d6						;make offset into bytes
-		add		d6,a2						;adjust src ptr
-		add		d6,a3						;adjust mask ptr
-
-
-;-----------------------------------------------
-;
-;  SAVE DSTLEFT/DSTBUMP/LONGCNT/ROWCNT INTO CRSRPTR SO THAT
-;  HIDECURSOR KNOWS HOW MUCH SCREEN TO REPLACE.
-
-		movem.l	d3/d5/a6/a5/a0,-(sp)
-		MOVE.L	([CRSRPTR]),D0				;GET POINTER TO CURSOR DATA (LOCKED)
-		_rTranslate24To32
-		MOVE.L	D0,A6
-		LEA		CCBYTES(A6),A6				;POINT TO END OF SAVE STATE AREA
-		move.w	mouse,d0					;get vert pos
-		lsr.w	#6,d0						;d0=voff
-	;	add.w	#voff,d3
-		add.w	d0,d3
-		move.w	mouse+2,d0					;get horiz pos
-		lsr.w	#6,d0						;d0=hoff
-	;	add.w	#hoff,d5
-		addq	#3,d0
-		lsr.w	#2,d0						;d0=shadow width longs
-		add.w	d0,d5
-
-		lsl.w	#2,d0
-	;	sub.w	#hoff*4,a0
-		sub.w	d0,a0
-		MOVEM.L	A5/A0/D5/D3,-(A6)			;SAVE DSTLEFT/DSTBUMP/LONGCNT/ROWCNT
-		MOVE.L	D5,A6						;SAVE LONGCNT
-
-;-------------------------------------------
-;	Save bits under cursor/shadow
-;-------------------------------------------
-@MAIN2	MOVE.L	(A5)+,d1					;get a long of screen
-		move.l	d1,(a4)+					;save a long of screen
-		dbra	D5,@MAIN2					;DECREMENT LONGCNT
-
-		ADD.L	A0,A5						;BUMP SCREEN POINTER
-		MOVE.L	A6,D5						;RESTORE LONGCNT
-		DBRA	D3,@MAIN2					;=>DO NEXT ROW
-		movem.l	(sp)+,a5/d3/d5/a6/a0
-
-
-;-------------------------------------------
-;	Draw Shadow
-;-------------------------------------------
-		movem.l	d3/a2-a5,-(sp)
-
-	;	moveq	#voff-1,d0
-		move.w	mouse,d0					;get vert pos
-		lsr.w	#6,d0
-		bra.s	@1
-
-@0		ADD.w	CRSRROW,A5					;offset SCREEN POINTER vertically
-@1		dbra	d0,@0
-
-		move.w	mouse+2,d0					;get horiz pos
-		lsr.w	#6,d0
-		add.w	d0,a5
-	;	add.w	#hoff,a5
-
-@MAIN1	MOVE.l	(A5),d1						;get a long of screen
-		move.l	(A2)+,d0					;combine A LONG OF src
-		or.l	(A3)+,d0					;EXTRACT A LONG OF MASK
-		beq.s	@skipit1
-											;d0 = 0
-		moveq	#0,d0						;assume result is black
-		moveq	#$3f,d4						;amount to remove from screen
-		swap	d4							;d4 = $3f0000
-		sub.l	d4,d1						;darken the red channel
-		bcs.s	@pinred
-		move.l	d1,d0						;take the red channel
-@pinred
-		lsr.l	#8,d4
-		sub.w	d4,d1						;darken the grn channel
-		bcs.s	@pingrn
-		move.w	d1,d0						;take the grn channel
-@pingrn
-		lsr.w	#8,d4
-		sub.b	d4,d1						;darken the blu channel
-		bcs.s	@pinblu
-		move.b	d1,d0						;take the blu channel
-@pinblu
-
-	;	move.l	d0,(a5)
-@skipit1
-		addq	#4,a5
-		dbra	D5,@MAIN1					;DECREMENT LONGCNT
-
-		ADD.L	A1,A3						;BUMP CURSOR DATA
-		ADD.L	A1,A2						;BUMP CURSOR MASK
-		ADD.L	A0,A5						;BUMP SCREEN POINTER
-		MOVE.L	A6,D5						;RESTORE LONGCNT
-		DBRA	D3,@MAIN1					;=>DO NEXT ROW
-
-		movem.l	(sp)+,d3/a2-a5
-
-;-------------------------------------------
-;	Draw cursor atop shadow
-;-------------------------------------------
-
-@MAIN	move.l	(A2)+,D0					;EXTRACT A LONG OF SRC
-		tst.l	(A3)+						;EXTRACT A LONG OF MASK
-		bne.s	@inside
-		tst.l	d0							;flip src so that black is all 1's
-		beq.s	@skipit						;no use in xoring with zero
-		MOVE.L	(A5),d1						;get a long of screen
-		eor.l	d1,d0						;xor dst with src
-@inside
-		move.l	d0,(a5)
-@skipit	addq	#4,a5
-		dbra	D5,@MAIN					;DECREMENT LONGCNT
-
-		ADD.L	A1,A3						;BUMP CURSOR DATA
-		ADD.L	A1,A2						;BUMP CURSOR MASK
-		ADD.L	A0,A5						;BUMP SCREEN POINTER
-		MOVE.L	A6,D5						;RESTORE LONGCNT
-		DBRA	D3,@MAIN					;=>DO NEXT ROW
-
-	else
-
-Direct32
-		moveq	#-1,d4
-		lsr.l	#8,d4						;get low3bytes in d4
-		move	d5,d0						;get a copy of long cnt
-		addq	#1,d0						;make one based
-		lsl		#2,d0						;make into byte cnt
-		sub		d0,a1						;make srcRow into srcBump
-
-		asr		#3,d6						;make offset into bytes
-		add		d6,a2						;adjust src ptr
-		add		d6,a3						;adjust mask ptr
-
-@MAIN	move.l	(A2)+,D0					;EXTRACT A LONG OF SRC
-		MOVE.L	(A5),d1						;get a long of screen
-		move.l	d1,(A4)+					;SAVE A LONG OF SCREEN
-		tst.l	(A3)+						;EXTRACT A LONG OF MASK
-		bne.s	@inside
-		not.l	d0							;flip src so that black is all 1's
-		and.l	d4,d0						;mask off high byte
-		beq.s	@skipit						;no use in xoring with zero
-		eor.l	d1,d0						;xor dst with src
-@inside
-		move.l	d0,(a5)
-@skipit	addq	#4,a5
-		dbra	D5,@MAIN					;DECREMENT LONGCNT
-
-		ADD.L	A1,A3						;BUMP CURSOR DATA
-		ADD.L	A1,A2						;BUMP CURSOR MASK
-		ADD.L	A0,A5						;BUMP SCREEN POINTER
-		MOVE.L	A6,D5						;RESTORE LONGCNT
-		DBRA	D3,@MAIN					;=>DO NEXT ROW
-
-	endif
-
-
-DoneBlit
-		ADDQ	#8,SP						;STRIP LEFTMASK AND OFFSET
-		MOVE.B	#1,CrsrVis					;CURSOR VISIBLE
-
-		moveq	#0,d0
-		move.b	(sp)+,d0					;get previous MMU state in d0
-		_rSwapMMUMode						;restore MMU mode from d0.b
-SkipBlit
-		MOVEM.L (SP)+,D0-D7/A0-A6			;THE WALTZ IS OVER...(TANGO VERY MUCH)
-NoBlit
-		RTS
-
-
-
-;_______________________________________________________________________
-;
-;	UNBLITCURSOR															<dvb 19sep88>
-;
-; This routine unconditionally removes cursor according to the data in
-; CCSTATEREGS.
-; Such things as crsrstate, crsrvis, and other nonsense have already been
-; checked. Vectoring this routine may prove useful for later cursor
-; enhancements.
-
-UNBLITCURSOR	PROC	EXPORT
-		TST.L	CRSRPTR							;CURSOR ALLOCATED?
-		BMI.S	DONEHIDE						;=>NO, JUST RETURN
-		MOVEM.L D1-D4/A0-A2,-(SP)				;SAVE REGS USED
-
-		MOVE.L	([CRSRPTR]),A0					;GET POINTER TO CURSOR SAVE DATA (LOCKED)
-		MOVE.L	CCSAVE(A0),A1					;GET HANDLE TO SAVED BITS
-		MOVE.L	(A1),d0							;POINT TO SAVED BITS
-		_rTranslate24To32						;mask off high byte
-		move.l	d0,a1
-		LEA		CCSTATEREGS(A0),A0				;POINT TO SAVE STATE AREA
-		MOVEM.L	(A0)+,D2/D3/D4/A2				;GET /ROWCNT/LONGCNT/DSTBUMP/DSTLEFT
-
-		moveq	#true32b,d0						;switch to 32 bit mode
-		movem.l	d2/a1/a2,-(sp)					;save off registers
-		_rSwapMMUMode							;get previous mode in d0.b (can trash a0/a2, d0/d2)
-		movem.l	(sp)+,d2/a1/a2					;restore registers
-
-		MOVE.L	D3,A0							;SAVE LONGCNT
-@1		MOVE.L	(A1)+,(A2)+						;RESTORE A LONG OF SOURCE
-		DBRA	D3,@1							;=>DO ENTIRE ROW
-		MOVE.L	A0,D3							;RESTORE LONGCNT
-		ADD		D4,A2							;BUMP DST
-		DBRA	D2,@1							;=>DO FOR ALL LINES
-
-		_rSwapMMUMode							;restore original mode from d0.b
-
-		CLR.B	CRSRVIS 						;MARK IT AS INVISIBLE
-		MOVEM.L (SP)+,D1-D4/A0-A2				;RESTORE REGS USED
-DONEHIDE RTS
 
+_SetCCursor	PROC	EXPORT
+		IMPORT	QDNEW_SETCCURSOR
+		JMP		QDNEW_SETCCURSOR
 
 ;
 ;_______________________________________________________________________
@@ -1976,7 +318,7 @@ DONEHIDE RTS
 ;
 ;	return a pointer to the start of the bit-map display
 ;
-ScrnAddress		PROC	EXPORT
+_ScrnAddress		PROC	EXPORT
 		MOVE.L	ScrnBase,4(SP)			;get screenBase set up by OS
 		RTS 							;that was easy!
 
@@ -1987,7 +329,7 @@ ScrnAddress		PROC	EXPORT
 ;
 ;  return the size of the screen in pixels
 ;
-ScrnSize	PROC	EXPORT
+_ScrnSize	PROC	EXPORT
 		MOVE.L	(SP)+,D0				;get the return address
 		MOVE.L	MainDevice,A0			;get handle to main screen device
 		MOVE.L	(A0),A0					;point to main screen device
diff --git a/QuickDraw/CQD.a b/QuickDraw/CQD.a
index 02ddf1a..0a37691 100644
--- a/QuickDraw/CQD.a
+++ b/QuickDraw/CQD.a
@@ -50,6 +50,7 @@ PrNonPortable 	EQU 1
 WholeErrors 	EQU 1
 AddrModeFlag 	EQU 0
 Quicker 		EQU 1
+has32BitQD		EQU 1
 
 ROMPaletteMgr	EQU		1	;set to zero for System Disk, 1 for ROM build			<C864>
 
@@ -155,6 +156,7 @@ BlockHead	PROC		EXPORT
 		endif
 				INCLUDE	'BITBLT.a'
 				INCLUDE 'cCrsrCore.a'
+				INCLUDE	'QDExtensions2.a'
 				INCLUDE	'QDUtil.a'
 				INCLUDE	'Colorasm.a'
 				INCLUDE	'Patterns.a'
diff --git a/QuickDraw/CheckDevicesINIT.a b/QuickDraw/CheckDevicesINIT.a
index 794a824..5c9d41b 100644
--- a/QuickDraw/CheckDevicesINIT.a
+++ b/QuickDraw/CheckDevicesINIT.a
@@ -221,8 +221,8 @@ SlotParms   EQU     IOPBlk-spBlock.SPBlockSize  ; parameter block for slot manag
 VidParms	EQU		SlotParms-12			; [12] size of mode params
 StartList	EQU		VidParms-4				; [long] pointer to start of resource
 
-VARSIZE		EQU		StartList				; size of local vars for CheckDevices
-UTILVARS	EQU		VidParms				; size of local vars for utility routines
+VARSIZE		EQU		StartList-4				; size of local vars for CheckDevices
+UTILVARS	EQU		VidParms-$30			; size of local vars for utility routines
 
 ; ¥¥¥ Start of Code ¥¥¥
 ;
@@ -317,557 +317,42 @@ SetDevGamma
 ; ----------------------------------------------------------------------------------------------------------
 
 
+
+NewFunc
+
+			Link	A6,#-$B4
+			Move.l	A2,-(SP)
+			Move.l	(A0),A2
+
+			Lea.l	-$94(A6),A1
+			Move.l	#-2,(A1)
+
+			Lea.l	-$B4(A6),A0
+			Move.l	A0,$C(A1)
+			Lea.l	-$40(A6),A0
+
+			Move	(A2),$18(A0)
+			Move	#$14,$1A(A0)
+			Move.l	A1,$1C(A0)
+			dc.w	$A205					; _PBStatusImmed
+			Move.l	(SP)+,A2
+			Unlk	A6
+			Rts
+
+
+
 CheckDevices								; <19>: Moved label from within if-endif to embed utility
 											; 	routines.  It would be nice to be able to the the LINK
 											;	stuff AFTER the GotScrn entrypoint.
 
 			LINK	A6,#VARSIZE				; allocate local stack frame
-			MOVEM.L	A0-A6/D0-D7,-(SP)		; so we donÕt screw up the boot process
-;+++		MOVEM.L	D6-D7/A2-A4,-(SP)		; save work registers
+			MOVEM.L	A0-A4/D0-D7,-(SP)		; so we donÕt screw up the boot process
 
-;+++; check to see if the device list needs to be initialized
-;+++
-;+++		MOVE.L	DeviceList,A0			; get handle to device list
-;+++		MOVE.L	(A0),A0					; point to head of device list
-;+++		MOVE	GDFlags(A0),D0			; get the flags word
-;+++		BTST	#allInit,D0				; test initialize flag?
-;+++		BNE		GoHome					; => devices already initialized
-
-; ¥¥¥ 1st INIT ¥¥¥
-;
-; Try to load in the resource.  If none, then just do a SetEntries on the boot device (see
-;	the comments on the NoScrn code below).
-;
-GetScrn
-			CLR.L	-(SP)					; make room for function result
-			MOVE.L	#'scrn',-(SP)			; push desired resource type
-			CLR		-(SP)					; resource ID = 0
-			_GetResource					; get the resource
-			MOVE.L	(SP)+,D0				; get the resource handle
-			Beq.s	NoScrn					; if nil, do the no 'scrn' code
-			
-; ¥¥¥ 2nd INIT ¥¥¥
-;
-; Test the scrnInval low-mem to make sure the screen resource is valid. (Note:  scrnInval
-;	will generally be cleared by the video cardÕs primaryInit IF the information in
-;	pRAM doesnÕt match the current set up).  This is ALSO a case where we need to
-;	make a SetEntries call so the screen colors donÕt change on the the first SetEntries
-;	and/or SetGamma call.
-;
-ChkScrn		
-			Tst.b	scrnInval				; If the 'scrn' resource is not invalid,
-			Bne.s	GotScrn					;	then just go on.
-						
-			Move.l	D0,A4					; Save the 'scrn' resource handle.
-			
-			Move.l	#gestaltDisplayMgrAttr,D0 ; We need to know if the Display Manager is around.
-			_Gestalt						; Ask, and ye shall receive.
-			Bne.s	@NoDM					; Oops, got an error.
-			Move.l	A0,D0					; Get the result into D0.
-			Btst	#gestaltDisplayMgrPresent,D0 ; If the Display Manager is around, then
-			Bne.s	NoScrn					; donÕt dispose of the 'scrn' resource so
-@NoDM										; so that the Display Manager can deal with it.
-			
-			Clr.w	-(Sp)					; Make room for resFile refNum.
-			Move.l	A4,-(Sp)				; Push 'scrn' resource handle for resFile.
-			_HomeResFile					; Get refNum.
-			
-			Move.l	A4,-(Sp)				; Push 'scrn' resource handle for remove.
-			_RmveResource					; Try to remove it.
-			Tst.w	ResErr					; If everything is okay, then
-			Beq.s	@DisposeIt				;	just go on.
-			
-			Tst.w	(Sp)+					; Clean up the stack.
-			Move.l	A4,D0					; Get 'scrn' resource handle back into D0.
-			Bra.s	GotScrn					; And weÕre screwed.
-			
-@DisposeIt	Movea.l	A4,A0					; Get 'scrn' resource handle into A0.
-			_DisposHandle					; Dispose it.
-			
-			_UpdateResFile					; Update the 'scrn's resFile lest we die later.
-
-; If a 'scrn' resource is NOT around weÕll get here.  The only thing we want to do at this
-;	point is to call SetDevEntries on the boot device so that the screen will not change colors
-;	after a SetEntries/SetGamma call is made later.
-;
-NoScrn		
 			Move.l	DeviceList,A0			; A0 contains gDevice.
 			Move.l	#-1,A1					; Use gDeviceÕs PixMap for colorTable.
 			Bsr.s	SetDevEntries			;
 			Bra		NoGammaFix
 
-; ¥¥¥ 3rd INIT ¥¥¥
-;
-; Lock down the 'scrn' handle, and point at the data (in A4).
-;
-GotScrn			
-			MOVE.L	DeviceList,A0			; get handle to device list
-			MOVE.L	(A0),A0					; point to head of device list
-			BSET	#allInit,GDFlags(A0)	; say list has been initialized
-
-			MOVE.L	D0,-(SP)				; save 'scrn' resource for ReleaseResource
-			MOVE.L	D0,A0					; get the resource
-			_HLock							; lock it down
-			MOVE.L	(A0),A4					; A4 = resource pointer
-
-; Validate the 'scrn' resource.  There must be a descriptor for every screen device.
-; I assume that there are no duplicate entries and that screens don't overlap.
-; In addition the devices in the 'scrn' resource must be in slot order.
-;
-			MOVE.L	A4,StartList(A6)		; save pointer to start of list
-			MOVE	(A4)+,D7				; get the number of screens in resource
-
-	WITH	spBlock,vpBlock
-
-			LEA		SlotParms(A6),A0		; get pointer to parameter block
-			MOVE.L	#((CatDisplay << 16) ++ TypVideo),spCategory(A0)
-											; set category ID, type
-			MOVE.W	#drSwApple,spDrvrSw(A0)	; set software, hardware ID
-			MOVE.B	#$01,spTBMask(A0)		; ignore spDrvrHw
-			MOVE.B	#0,spSlot(A0)			; start with desired slot (0 to check built-in devices)
-			MOVE.B	#0,spID(A0)				; start with first (zeroth) ID
-			CLR.B	spExtDev(A0)			;
-NxtDev		_sNextTypesRsrc					; get next video device
-			BEQ.S	GotDev					; => there is one
-
-; There are no more screens; are there any more entries in the 'scrn' resource?
-;
-			TST		D7						; there should have been one per device
-			BEQ		GoodRsrc				; => there was, go initialize them
-			BRA 	BadScrn					; 
-
-; Scan through 'scrn' resource entry for this device.
-;
-GotDev		MOVE	(A4)+,D0				; get type
-			CMP		spDrvrHw(A0),D0			; does it match?
-			BNE 	BadScrn					; => nope, bad screen resource
-			MOVE	(A4)+,D0				; get slot
-			CMP.B	spSlot(A0),D0			; does it match?
-			BNE.S	BadScrn					; => nope, bad screen resource
-
-; Get the DCE entry for the device and check dCtlDevBase.
-; If no match, look for other devices in the same slot.
-;
-SlotOK		MOVE	spRefNum(A0),D0			; get the refNum
-			NOT		D0						; refNum to unitnum
-			ASL		#2,D0					; offset in unitTable
-			MOVE.L	UTableBase,A1			; get the base of the unit table
-			MOVE.L	(A1,D0),A3				; A3 = handle to the DCE
-			MOVE.L	(A3),A1					; get pointer to the DCE
-			MOVE.L	dCtlDevBase(A1),D0		; get dCtlDevBase
-			CMP.L	(A4)+,D0				; do they match?
-			BNE.S	BadScrn					; => nope, bad screen resource
-
-; Test to make sure that the requested mode (screen depth) is valid in this video
-;	sRsrc list.
-;
-			MOVE.B	spID(A0),D1				; save the spID (so that itÕs correct for the sNextTypesRsrc)
-			MOVE.W	(A4)+,D0				; get the mode
-			MOVE.B	D0,spID(A0)				; insert into spBlock
-			_sFindStruct					; find the sRsrc list entry for this mode
-			BNE.S	BadScrn					; if not, then the scrn resource is no good
-			MOVE.B	D1,spID(A0)				; restore the spID
-
-; To be completely compulsive about it, make sure there's a gDevice.
-;
-			MOVE.L	DeviceList,A3			; A3 = first gDevice in list
-			MOVE	spRefNum(A0),D1			; get refnum (unaffected by sFindStruct)
-@NxtGD		MOVE.L	(A3),A1					; get pointer to device
-			CMP		gdRefNum(A1),D1			; does refnum match?
-			BEQ.S	RectCheck				; => yes, this device matches!
-			MOVE.L	gdNextGD(A1),D0			; get handle of next device
-			MOVE.L	D0,A3					; get in A3
-			BNE.S	@NxtGD					; => check all gDevices
-			BRA.S	BadScrn					; => no such gDevice, bad 'scrn'
-
-; Compare the size of the remembered screenRect to the size of this gDevice's
-;	gdRect.  At this point, the gdRects are still topleft={0,0} from InitGDevice
-; 	so we can just check 'scrn' rect against botRight.
-;
-RectCheck
-			ADD		#8,A4					; skip to global rect in 'scrn'
-			MOVE.W	bottom(A4),D0			; get bottom
-			SUB.W	top(A4),D0				; = height
-			CMP.W	gdRect+bottom(A1),D0	; is it equal?
-			BNE.S	BadScrn					; nope, we're out
-			MOVE.W	right(A4),D0			; get right
-			SUB.W	left(A4),D0				; = width
-			CMP.W	gdRect+right(A1),D0		; is it equal?
-			BNE.S	BadScrn					; nope, we're out
-
-; This device matches!  Go check the next one.
-;
-SkipData	ADD		#8,A4					; skip to control field
-			MOVE	(A4)+,D0				; get number of control calls
-			BRA.S	SkipCtl					; skip control call
-SkipNxt		MOVE.L	(A4)+,D1				; get control code, size of params
-			ADD		D1,A4					; add size of params to skip block
-SkipCtl		DBRA	D0,SkipNxt				; => skip next control
-
-			SUBQ	#1,D7					; decrement device count
-			BMI.S	BadScrn					; => oops, bad screen resource
-			
-			LEA		SlotParms(A6),A0		; get pointer to parameter block <14>
-			BRA.s	NxtDev					; => check next device <19>: .s
-
-;	If the 'scrn' resource is bad, then let's walk down the device list and offset
-;	the invalid screens' gdRects so that they don't all pile up at (0,0).  Let's keep
-;	it simple--just put them all edge-to-edge, with the top edge at 0 (unchanged) and
-;	to the right of the previous guys'.  Offset the gdPMap's rect also.
-;
-BadScrn
-			MOVE.L	DeviceList,A0			; get the head of the list (the boot screen)
-			MOVE.L	(A0),A0					; hndl->ptr
-			MOVE.W	gdRect+right(A0),D1		; get the boot screen's right edge (if the scrn
-											;   is invalid, then this is the real right edge)
-@Loop		MOVE.L	gdNextGD(A0),D0			; get handle to next screen
-			BEQ 	ScrnDone				; when NIL we're out of here <19>: Done -> ScrnDone
-			MOVE.L	D0,A0					; get this device
-			MOVE.L	(A0),A0					; handle to ptr
-			ADD.W	D1,gdRect+left(A0)		; offset the left edge (normally zero)
-			ADD.W	D1,gdRect+right(A0)		; offset the right edge
-			MOVE.L	gdPMap(A0),A1			; get the gdPMap handle
-			MOVE.L	(A1),A1					; get the gdPMap pointer
-			ADD.W	D1,pmBounds+left(A1)	; offset the left edge (normally zero)
-			ADD.W	D1,pmBounds+right(A1)	; offset the right edge
-
-			MOVE.W	gdRect+right(A0),D1		; get the new right edge for the next device
-			BRA.S	@Loop					; for each screen
-
-GoodRsrc	_HideCursor						; cursor must be hidden here
-			MOVE.B	#true,CrsrBusy 			; MARK CHANGE IN PROGRESS
-
-; Configure each entry in the scrn resource
-;
-			MOVE.L	StartList(A6),A4		; save pointer to start of list
-			MOVE	(A4)+,D7				; get the number of screens in resource
-			SUBQ	#1,D7					; make it 0 based
-
-; It would be nice if this routine could use sRsrcInfo or sNextsRsrc here, but we
-;	don't keep the video sRsrc spID in the scrn resource, just the hw ID!!!  To
-;	make up for this, we must do a search by type.
-;
-DoNxt		LEA		SlotParms(A6),A0		; get pointer to parameter block
-			MOVE.L	#((CatDisplay << 16) ++ TypVideo),spCategory(A0)
-											; set category ID, type
-			MOVE.W	#drSwApple,spDrvrSw(A0)	;
-											; set software, (invalid) hardware ID
-			MOVE	(A4)+,spDrvrHw(A0)		; set driver hardware ID
-			MOVE.B	#$00,spTBMask(A0)		; all fields valid
-			MOVE	(A4)+,D0				; get slot
-			MOVE.B	D0,spSlot(A0)			; does it match?
-			MOVE.B	#0,spID(A0)				; start with first ID
-			CLR.B	spExtDev(A0)			;
-			_sNextTypesRsrc					; get next video device
-;+++		BNE 	BadScrn					; => this should never be taken (so letÕs comment it out) <12>
-
-; We found a device that matches the given description!  Find its gDevice and configure it.
-;
-			MOVE	spRefNum(A0),D1			; D1 = refnum
-
-			MOVE.L	DeviceList,A3			; A3 = first gDevice in list
-@NxtGD		MOVE.L	(A3),A0					; get pointer to device
-			CMP		gdRefNum(A0),D1			; does refnum match?
-			BEQ.S	@GotGD					; => yes, got the gDevice
-			MOVE.L	gdNextGD(A0),D0			; get handle of next device
-			MOVE.L	D0,A3					; get in A3
-			BNE.S	@NxtGD					; => check all gDevices
-;+++		BRA 	BadScrn					; => this should never be taken (so letÕs comment it out) <12>
-
-@GotGD		MOVE.L	(A4)+,D0				; discard dCtlDevBase
-
-; Set up the GDFlags word before calling InitGDevice.
-;
-			MOVE.L	(A3),A1					; point at the grafDevice
-			MOVE	gdFlags(A1),D0			; get the flags word
-			AND		2(A4),D0				; turn off the bits that are used
-			OR		4(A4),D0				; turn on new bits
-			BSET	#ramInit,D0				; say we've initialized it
-			BSET	#screenDevice,D0		; and flag it as a screen device
-			MOVE	D0,GDFlags(A1)			; set the flags word
-
-; If main device, set up low-memory handles.  (Wait:  If the ramInit and screenDevice
-;	flags are NOT setup, then why would the mainScreen flag be setup? -- jmp)
-;
-			MOVE	gdFlags(A1),D0			; get the flags word
-			BTST	#mainScreen,D0			; is it the main scrn?
-			BEQ.S	@InitGD					; => no, go init device
-
-			MOVE.L	A3,MainDevice			; set up as main screen device
-			MOVE.L	A3,TheGDevice			; set up as default destination device
-			MOVE.L	A3,SrcDevice			; set up as default source device
-											; AllocCursor called by InitCursor to init cursor
-			MOVE.L	(A3),A0					; point to gDevice
-			MOVE.L	gdPMap(A0),A0			; get pixMap handle
-			MOVE.L	(A0),A0					; point to pixMap
-			MOVE.L	baseAddr(A0),D0			; get base address
-			MOVE.L	D0,scrnBase				; and set up screen base
-
-			LEA		SlotParms(A6),A0		; point at slot manager block again (it's still positioned from above)
-			MOVE	(A4),D0					; get the requested mode
-			MOVE.B	#oneBitMode,spId(A0)	; pass the default mode (assumed to be 1-bit mode)
-			_sFindStruct					; point to this mode information
-
-			MOVE.B	#mVidParams,spID(A0)	; now get the device pixmap
-			_sGetBlock						; on the current heap (system normally here)
-			MOVE.L	spResult(A0),A1			; get the result pointer
-			MOVE.w	vpRowBytes(A1),screenRow ; get the screen row bytes (WORD)
-
-; Set up the low-mem for screen resolution too.  TheyÕre only WORD/WORD rather then FIXED/FIXED.
-;
-			MOVE.W	vpHRes(A1),ScrHRes		; Take the high word of vpHRes
-			MOVE.W	vpVRes(A1),ScrVRes		; Take the high word of vpVRes
-
-			MOVE.L	spResult(A0),A0			; Do what it says in IM V (p 446) instead of
-			_DisposPtr						;	of using _sDispose. <12>
-
-@InitGD		MOVE	D1,-(SP)				; push refnum
-			MOVE	(A4)+,-(SP)				; push mode
-			CLR		-(SP)					; which should be long
-			MOVE.L	A3,-(SP)				; push gDevice
-			_InitGDevice					; configure the gDevice
-			ADDQ	#4,A4					; mask and flags already used
-
-; If there is a gamma table resource id, get the gamma correction table and call the driver.
-;	We need to do this before setting the color table (via SetEntries) to make sure it takes
-;	effect right away.
-;
-			MOVE	2(A4),D0				; get the gamma table resource id
-			CMP		#-1,D0					; is it -1?
-			BEQ.S	ChkTbl					; => yes, no table
-
-; If the gamma table resource id = -2, then request linear gamma from the driver.
-;
-			CMP		#-2,D0					; is it -2?
-			BNE.S	@GetFromSys				; nope, so load the system resource
-
-;+++		LEA		VidParms(A6),A1			; point to parameter block
-;+++		CLR.L	csGTable(A1)			; pass NIL to tell new drivers to set linear
-;+++		BSR.S	GammaControl			; call a common routine to set gamma
-
-; <19>: Use SetDevGamma instead of GammaControl
-;
-			Move.l	A3,A0					; Put gDevice in A0 for SetDevGamma call.
-			Move.l	#0,A1					; (nil) gammaTable Ptr in A1 (to set linear).
-			Bsr.s	SetDevGamma
-;
-			BRA.S	ChkTbl
-
-; Load the gamma resource from the system and set it.
-;
-@GetFromSys	CLR.L	-(SP)					; make room for function result
-			MOVE.L	#'gama',-(SP)			; push gamma table rsrc type
-			MOVE	D0,-(SP)				; else push resource id
-			_GetResource					; try to read in gamma table
-			MOVE.L	(SP)+,D0				; get the result
-			BEQ.S	ChkTbl					; => couldn't find it, use default
-			MOVE.L	D0,-(SP)				; save a copy for later
-			MOVE.L	D0,A0					; setup for HLock
-			_HLock							;
-			
-;+++		LEA		VidParms(A6),A1			; point to params for SetGamma
-;+++		MOVE.L	(A0),csGTable(A1)		; gamma table pointer is only param
-;+++		BSR.S	GammaControl			; call a common routine
-
-; <19>: Use SetDevGamma instead of GammaControl.  For <23>, the setup for the
-;		SetDevGamma call was backwards.
-;
-			Move.l	(A0),A1					; Put pointer to gammaTable in A1, and
-			Move.l	A3,A0					; 	put pointer to GDevice in A0.
-			Bsr.s	SetDevGamma
-;			
-			MOVE.L	(SP),A0					; get the resource handle back
-			_HUnlock						; free it
-			_ReleaseResource				; and release it (fixing the stack)
-
-; <19>: Commented out GammaControl as it is replaced by the SetDevGamma utility
-;		above.  Also, the branch around the GammaControl routine is commented
-;		out.
-;
-;+++		BRA.S	ChkTbl					; continue on
-;
-; Here's an imbedded utility.  I know I burn 2 bytes always BSRing around it, but I
-;	would burn two with a word branch if the utility were outside.  This routine sets
-;	up the iopb and csParam block for a SetGamma control call.  It expects the csGTable
-;	field to be set up, the csParam block pointer in A1, and the gdevice pointer in A3.
-;
-;GammaControl
-; 			
-; 			LEA		IOPBlk(A6),A0			; point to parameter block
-; 			MOVE.L	A1,csParam(A0)			; move addr of parms into block
-; 			MOVE.W	#cscSetGamma,csCode(A0)	; cscSetGamma <12>
-;+++		CLR.L	ioCompletion(A0)		; no completion routine <16>: not necessary
-;+++		CLR.W	ioVRefNum(A0)			; no volRefNum <16>: not necessary
-; 			MOVE.L	(A3),A1					; point to gdevice
-; 			MOVE	GDRefNum(A1),ioRefNum(A0)	; set device's refnum
-; 			_Control ,IMMED					; SetGamma(GammaTable)
-; 											;   if error here (likely if -2 were passed to
-; 											;	and old driver) then just use default table
-; 			RTS								; and back
-; 
-;
-; Previously, if there was a color table resource id, this part loaded that table.  Now,
-;	it checks the state of the gdDevType bit.  If it is monochrome (=0), then this routine
-;	substitutes pixelSize+32 for the resID.  If it is color (=1) and in 2- or 4-bit mode, then
-;	pixelSize+64 is substituted to yield a modified color table that includes the highlight
-;	color.
-;
-; If we EVER have a gamma ID <> -1 (not default), then be sure to set the color table
-;	to flush this gamma into the CLUT hardware.
-;
-; The pointer to the gDevice is still in A1.
-;
-;
-ChkTbl
-			MOVE.L	(A3),A1					; point to the gDevice again
-			MOVE.L	gdPMap(A1),A0			; get pixmap
-			MOVE.L	(A0),A0					; get pixmap ptr
-			MOVE.W	pmPixelSize(A0),D0		; get depth
-
-			CMP		#clutType,gdType(A1)	; is it a direct/fixed (SKH) device? <SM9>
-			BNE  	SetGRect				; if so, then do nothing <19>:s <SM4> CSS
-
-			BTST	#gdDevType,gdFlags+1(A1)	; is it color or monochrome mode?
-			BNE.S	@ClrMode				; if set, then this is color
-			CMP.W	#2,D0					; 1 or 2 bit/pixel?
-			BLE.S	@RegClr					; don't do anything funky
-@MonoMode
-			ADD		#32,D0					; add 32 to pixelsize in all modes for linear gray
-			BRA.S	@GetClut				;
-@ClrMode
-			MOVE.W	D0,D1					; copy the depth
-			AND		#9,D1					; is it 1- or 8-bit mode?
-			BNE.S	@RegClr					; if so, then do regular behavior
-@Is2or4
-			ADD		#64,D0					; for 2- or 4-bit, add 64 to pixel depth (gives color+highlight)
-;!!!		BRA.S	@GetClut				;
-
-@RegClr
-;!!!		MOVE	(A4),D1					; get the color table resource id
-;!!!		CMP		#-1,D1					; is it -1?
-;!!!		BNE.S	@GetClut				; if not, then set the CLUT
-;!!!		CMP		#-1,2(A4)				; if CLUTid=-1, and gammaID<>-1, then set CLUT to flush
-;!!!		BEQ.S	SetGRect				; if both are default, then continue
-
-@GetClut	CLR.L	-(SP)					; make room for function result
-			MOVE	D0,-(SP)				; push resource id
-			_GetCTable						; get a color table
-			MOVE.L	(SP)+,D0				; get the result
-			BEQ.S	SetGRect				; => couldn't find it, use default
-
-			MOVE.L	D0,A0					; save source handle in A0
-			MOVE.L	(A3),A1					; point at the gDevice
-			MOVE.L	gdPMap(A1),A1			; get handle to its pixMap
-			MOVE.L	(A1),A1					; point at the pixMap
-			MOVE.L	pmTable(A1),A1			; get handle to existing color table
-			MOVE.L	A1,-(SP)				; push the color table for later
-			MOVE.L	A0,-(SP)				; push new table handle for dispose
-
-			_GetHandleSize					; get the source size
-			MOVE.L	D0,D1					; save size in D1
-			EXG		A0,A1					; get dest handle in A0
-			_SetHandleSize					; set the dest handle size
-			EXG		A0,A1					; swap dest back to A1, src to A0
-
-			MOVE.L	(A0),A0					; get source ptr
-			MOVE.L	(A1),A1					; get dst ptr
-			MOVE.L	D1,D0					; get size to move
-			_BlockMove						; copy it
-
-			_DisposCTable					; and dispose new handle
-
-; Now call the driver to set this color table (handle on stack)
-; <19>: Use SetDevEntries call instead of in-line code.
-;
-			Move.l	A3,A0					; A0 contains gDevice.
-			Move.l	(Sp),A1					; A1 contain colorTable Handle
-			Bsr.s	SetDevEntries			;			
-
-;			MOVE.L	(SP),A0					; get handle to color table
-;			_HLock							; lock down the color table
-;			LEA		VidParms(A6),A1			; point to params for SetEntries
-;			MOVE.L	(A0),A0					; get ctabPtr
-;			CLR.W	csStart(A1)				; start at zero, use sequence mode
-;			MOVE.W	ctSize(A0),csCount(A1)	; for the length of the table
-;			LEA		ctTable(A0),A0			; get pointer to colorspecs
-;			MOVE.L	A0,csTable(A1)			; color table pointer is first param
-;			LEA		IOPBlk(A6),A0			; point to parameter block
-;			MOVE.L	A1,csParam(A0)			; move addr of parms into block
-;			MOVE.W	#cscSetEntries,csCode(A0)	; cscSetEntries <12>
-;+++		CLR.L	ioCompletion(A0)		; no completion routine <14>: not necessary
-;+++		CLR.W	ioVRefNum(A0)			; no volRefNum <14>: not necessary
-;			MOVE.L	(A3),A1					; point to gdevice
-;			MOVE	gdRefNum(A1),ioRefNum(A0)	; set device's refnum
-;			_Control ,IMMED					; do a SetEntries on color table
-;			
-;			MOVE.L	(SP),A0					; get handle to color table
-;			_HUnLock						; unlock the color table
-
-; Finally, generate an inverse table for the table (handle on stack)
-;
-			MOVE.L	(A3),A1					; point at the gDevice
-			MOVE.L	gdITable(A1),-(SP)		; push inverse table handle
-			MOVEQ	#4,D0					; make 4-4-4 inverse tables
-			MOVE	D0,gdResPref(A1)		; save in GDevice
-			MOVE	D0,-(SP)				; and push res
-			_MakeITable						; and generate inverse table (color/inverse table handles still on stack)
-
-; Use the specified rectangle to determine the device's global coordinates
-;
-SetGRect
-			ADDA	#4,A4					; skip the CLUT and gamma resID's
-			MOVE.L	(A3),A0					; point to the grafDevice
-			MOVE.L	gdPmap(A0),A1			; get handle to pixMap
-			MOVE.L	(A1),A1					; get pointer to pixMap
-			ADDQ	#bounds,A1				; point to pixMap.bounds
-			LEA		gdRect(A0),A0			; point to its rectangle
-			MOVE.L	(A4)+,D0				; get topLeft for mouse offset
-			MOVE.L	D0,(A1)+				; copy topLeft to pixMap.bounds
-			MOVE.L	D0,(A0)+				; copy topLeft to GDRect
-			MOVE.L	(A4),(A1)				; copy botRight to pixMap.bounds
-			MOVE.L	(A4)+,(A0)+				; copy botRight to GDRect
-
-; Parse and execute the additional control commands
-;
-			MOVE	(A4)+,D6				; get number of control calls
-			BRA.S	ChkNxtCtl				; => jump into end of dbra loop
-DoCtl		LEA		IOPBlk(A6),A0			; point to parameter block
-			LEA		4(A4),A1				; point to call parameters
-			MOVE.L	A1,csParam(A0)			; move addr of parms into block
-			MOVE.W	(A4)+,csCode(A0)		; set control code
-;+++		CLR.L	ioCompletion(A0)		; no completion routine <14>: not necessary
-;+++		CLR.W	ioVRefNum(A0)			; no volRefNum <14>: not necessary
-			MOVE.L	(A3),A1					; point to gdevice
-			MOVE	gdRefNum(A1),ioRefNum(A0)	; set device's refnum
-			_Control ,IMMED					; and issue the control call
-
-			MOVE	(A4)+,D0				; get size of param block
-			ADD		D0,A4					; skip param block
-ChkNxtCtl	DBRA	D6,DoCtl				; loop for all control calls
-
-ChkNxt		DBRA	D7,DoNxt				; loop for all screens in resource
-
-			MOVE.L	MainDevice,a0
-			move.l	a0,CrsrDevice			; cursor is now on main device, no longer on boot device
-
-			import	GetDCtlEntry
-
-			subq	#4,sp					; room for resulting DCE handle
-			move.l	(a0),a0
-			move.w	gdRefnum(a0),-(sp)		; get the refNum
-			jsr		GetDCtlEntry
-			move.l	(sp)+,a0				; get handle to DCE
-			move.l	(a0),a0					; get pointer to DCE
-			move.l	#0,d0					; clear out D0
-			move.b	dCtlSlot(a0),d0			; get the slot number
-			_AttachVBL						; attach VBL to this slot
-
-			CLR.B	CrsrBusy				; end of change
-			_AllocCursor					; make sure all cursor structs are updated
-			_ShowCursor						; now redisplay cursor
-
-ScrnDone	_ReleaseResource				; all done with the resource <19>: Done -> ScrnDone
-
 ; ¥¥¥ 4th INIT ¥¥¥
 ;
 ; As explained above in the SixPack update notes, the NoGammaFix is for $067C-class
@@ -879,14 +364,7 @@ ScrnDone	_ReleaseResource				; all done with the resource <19>: Done -> ScrnDone
 ;
 NoGammaFix
 
-			Move.l	ROMBase,A0				; Point to ROMBase with A0.
-  		If Not ForROM Then
-			Cmp.w	#$067C,8(A0)			; If weÕre not running on a $67C
- 			Bne		GoHome					; 	ROM, then just go on.
-		Else
-			Cmp.w	#$077D,8(A0)			; If weÕre not running on a $77D
-			Bne		GoHome					; 	ROM, then just go on.
-		Endif
+	WITH	spBlock,vpBlock
 
 ; Get the default gamma table from ROM (so we donÕt have to get it every time
 ;	we find a card that needs it -- if we donÕt find any cards that need
@@ -925,6 +403,15 @@ NoGammaFix
 			Move.l	(A0),A0					; DCE Ptr.
 			
 			Move.b	dCtlSlot(A0),D0			; Save slot number.
+
+			Cmp.b	#15,D0
+			Bcs.b	@dont
+			Move.l	A3,A0
+			Bsr.w	NewFunc
+			Bne.s	@reallyDont
+			Bra.s	@skipGD
+@dont
+
 			Lea		SlotParms(A6),A0		; Fill out SpBlock:
 			Move.b	D0,spSlot(A0)				; 	spSlot		= slot number
 			Clr.w	spID(A0)					;	spID		= 0
@@ -947,6 +434,8 @@ NoGammaFix
 ; We found a non-TFB card that contains no gamma table directory.  So, we need to
 ;	employ our fix, which is to make a SetGamma and then a SetEntries call.
 
+@reallyDont
+
 			Move.l	A2,A0					; Lock down the gammaTable Handle.
 			_Hlock
 			
@@ -969,11 +458,6 @@ NoGammaFix
 			Move.l	A2,A0					; Dispose of the storage used for the
 			_DisposHandle					;	gammaTable Handle.
 			
-GoHome		
-;+++		MOVEM.L	(SP)+,D6-D7/A2-A4		; restore work registers
-			MOVEM.L	(SP)+,A0-A6/D0-D7		; so we donÕt screw up the boot process
-			UNLK	A6
-			
 ; ¥¥¥ 5th INIT ¥¥¥
 ;
 ;----------------------------------------------------------------
@@ -1139,7 +623,7 @@ DoDrvrPatches
 ;
 ; Save all registers to prevent problems with the ROM INIT running code.
 ;
-				MOVEM.L		A0-A6/D0-D7,-(SP)			; so we donÕt screw up the boot process
+				MOVEM.L		A5-A6,-(SP)					; so we donÕt screw up the boot process
 
 ;
 ; Point to UnitTable in A2.
@@ -1195,7 +679,12 @@ NxtSlotLoop
 				MOVE.L		(A2,D0*4),A1				; get DCE handle
 				MOVE.L		(A1),A1						; get DCE pointer
 
-				MOVE.L		A1,A4						; save this for driver patching code below
+				MOVE.L		(A1),A4
+				MOVE		dCtlFlags(A1),D0
+				BTST.L		#6,D0
+				BEQ.S		@dont
+				MOVE.L		(A4),A4
+@dont
 
 ;
 ; Point to spBlock.
@@ -1235,13 +724,7 @@ NxtSlotLoop
 ; Take the DCE pointer in A4 (from above), and test to see if we want to patch this driver.
 ;
 @IntPtch
-			If Not ForROM Then
-				BTST		#dRAMBased,dCtlFlags+1(A4)	; test if this is a driver in ROM (Erickson overpatch)	<7.0>
-				BEQ			NxtSlot						; if so, then continue to next slot						<7.0>
-			Endif
-
-				MOVE.L		dCtlDriver(A4),A1			; get handle to driver
-				MOVE.L		(A1),A1						; get pointer to driver
+				MOVE.L		A4,A1						; get pointer to driver
 
 				MOVE.L		drvrName+2(A1),D0			; get a unique long from the name
 				CMP.L		#'DrWV',D0					; is it the 2-Page card?
@@ -1342,201 +825,10 @@ Out				LEA			spBlockSize(SP),SP			; clean up the stack						<SM6>
 ;
 ; Lets restore more registers than have ever been restored before. (Hey, you can never be too careful.)
 ;
-				MOVEM.L	(SP)+,A0-A6/D0-D7				; so we donÕt screw up the boot process
+				MOVEM.L	(SP)+,A5-A6
+				MOVEM.L	(SP)+,A0-A4/D0-D7				; so we donÕt screw up the boot process
 
-; ¥¥¥ 6th INIT ¥¥¥
-;
-			if asINIT then
-;
-; Early in the boot process an _InitGraf was performed (for the Welcome to Mac box).
-;	It's not correct if the main screen moved away from the boot screen, so let's call
-;	InitGraf on these early globals to correct the problem.  This will fix a problem
-;	with the LMgr "init" which didn't do an InitGraf while setting up the environment
-;	for an alert dialog.
-;
-; Note that for the new boot process this is no longer necessary.
-;
-
-				PEA			-4(A5)
-				_InitGraf
-			
-			endif
-
-; ¥¥¥ 7th INIT ¥¥¥
-;
-			If Not ForROM Then
-
-;---------------------------------------------------------------------
-;	Local variables, definitions, etc....
-;---------------------------------------------------------------------
-
-drHwDAFB		Equ		$001C						; Built-in Video Hardware ID for Macintosh Quadras 700/900/950.
-DrvrVer950		Equ		$0001						; Version number of the Macintosh Quadra 950Õs video driver.
-
-badEntry		Equ		$38							; Location of bad table entry in the Macintosh Quadra 950 driver.
-
-; Straight from the Macintosh Quadra 950 ROMÕs source codeÉ
-;
-DAFBVidPrivates	RECORD	0
-saveBaseAddr 	DS.L	1							; the screen base address (NOT ST corrected!)
-saveScreenBase	DS.L	1							; ST corrected version of saveBaseAddr.
-saveSQElPtr 	DS.L	1							; the SQ element pointer (for _SIntRemove)
-saveGammaPtr 	DS.L	1							; the pointer to the Gamma correction table
-saveGamDispPtr	DS.L	1							; the pointer to the Gamma block
-saveVDACBase	DS.L	1							; the base addr of the VDAC
-saveDAFBBase	DS.L	1							; the base addr of the DAFB
-saveVidPtr		DS.L	1							; pointer to a big block of DAFB video parameters
-GFlags			DS.W	1							; flags word
-has16bppACDC	Ds.b	1							; true if AC842A is around
-pageModeSet		Ds.b	1							; true if the pRam PageMode enable bit is set
-saveMode		DS.W	1							; the current mode setting (in lo-byte)
-saveMonID		DS.W	1							; monitor type ID (in lo-byte)
-saveSlotId		DS.W	1							; spID of video sRsrc (hi-order byte only!)
-DAFBVidPrivSize	EQU		*
-				ENDR
-
-; Flags within GFlags wordÉ
-;
-GrayFlag		EQU		15							; luminance mapped if GFlags(GrayFlag) = 1
-IntDisFlag		EQU		14							; interrupts disabled if GFlags(IntFlag) =1
-IsMono			EQU		13							; true if monochrome only display (Portrait/Kong)
-UseSeq			EQU		12							; true if sequence mode SetEntries
-UseTrans		Equ		12							; True if weÕre supposed to translate 5-bit into 8 (DAFB 16bpp).
-Is16			EQU		11							; true if 16Mhz (Slow) CPU
-IsSlow			Equ		11							; True if Slow CPU (for DAFB, 25Mhz is slow).
-IsDirect		EQU		10							; true if direct video mode, else chunkyIndexed
-PsuedoIndex		EQU		 9							; true if SetEntries request was mapped to indexed from sequential
-													;	(due to screen depth hardware requirements)
-Has16bppSRsrc	Equ		 9							; True if FifthVidMode is 16bpp instead of 32bpp (DAFB).
-SyncOnGreen		Equ		 8							; True if weÕre supposed to put sync on green (DAFB).
-
-
-				bra.s	PatchQuadra950Driver		; skip over the title
-				
-				String	Pascal
-
-DAFBVideoTitle	Dc.b	'.Display_Video_Apple_DAFB'
-				Align	2
-
-;---------------------------------------------------------------------
-;	Main
-;---------------------------------------------------------------------
-
-PatchQuadra950Driver
-				String	AsIs
-				With	SpBlock,DAFBVidPrivates
-				
-Quadra950SaveRegs	Reg		D4-D6					; Define work registers.
-
-			If AsInit Then
-				Cmp.w	#$3FFF,ROM85				; If Color QuickDraw is not around,
-				Bne		@ExitNow					;	then just leave.
-			EndIf
-			
-				Tst.l	DeviceList					; If the device list is empty,
-				Beq		@ExitNow					; 	then just leave.
-				
-				Move.l	DeviceList,A0				; Get the DeviceList Handle.
-				Move.l	(A0),A0						; Make it a pointer.
-				Move.w	gdRefNum(A0),D0				; If thereÕs no driver, then
-				Beq		@ExitNow					;	we canÕt do anything here.
-				
-				Movem.l	Quadra950SaveRegs,-(Sp)		; Save work registers.
-				Suba.w	#spBlockSize,Sp				; Allocate SpBlock 
-
-; The shipping version of the Macintosh Quadra 950Õs ROM (1.7F2) has a bug in the built-in video
-; driver which prevents the DirectSetEntries call from working correctly when the attached display
-; is put into 32 bit-per-pixel mode.  To fix this problem, we just patch the bad table in place
-; since it resides in the System heap.
-;
-				Move.l	Sp,A0						; Get spBlock ptr into A0.
-				Clr.b	spId(A0)					; Begin at id 0.
-				Clr.b	spSlot(A0)					; We only care about Slot $0.
-				Clr.b	spExtDev(A0)				; No external device.
-				Clr.b	spTBMask(A0)				; No mask in search.
-				Move.w	#catDisplay,spCategory(A0)	; Look for:	Display,
-				Move.w	#typVideo,spCType(A0)		;  			Video,
-				Move.w	#drSwApple,spDrvrSW(A0)		;  			Apple,
-				Move.w	#drHwDAFB,spDrvrHW(A0)		;  			DAFB.
-				Clr.l	spParamData(A0)				; Look only for enabled sRsrcs.
-				Bset	#foneslot,spParamData+3(A0)	; Limit search to this slot only.
-				_GetTypeSRsrc						; If built-in video is not enabled, then
-				Bne.s	@AllDone					;	just quit.
-				
-; We found the DAFB-based (Macintosh Quadra 700/900/950) built-in video in Slot $0.
-;
-				Moveq	#0,D5						; Prepare D5.
-				Move.w	spRefNum(A0),D5				; Get the refNum.
-				Beq.s	@AllDone					; If nil, then just leave (no driver).
-				Not.w	D5							; Convert the refNum intoÉ
-				Lsl.w	#2,D5						;	Éa UTable index.
-				
-				Add.l	UTableBase,D5				; Get a ptr to the AuxDCEHandle.
-				Move.l	D5,A0						; Get it into A0.
-				
-				Move.l	(A0),A0						; Get the AuxDCEHandle.
-				Move.l	(A0),A0						; Get the AuxDCEPtr.
-				Move.l	A0,D5						; Save it for later.
-
-				move.w	dCtlFlags(a0),d0			; <27> Get driver flags
-				Move.l	dCtlDriver(A0),A0			; Get driver.
-				btst	#dRAMBased,d0				; <27> Check to see if dCtlDriver is a handle or a pointer
-				bz.s	@gotDriverPointer			; <27> A ROM based driver means itÕs a pointer
-				Move.l	(A0),A0						; Get ptr to driver.
-@gotDriverPointer
-				Move.l	A0,D6						; Save it for later.
-				
-				Moveq	#0,D0						; Prepare D0.
-				Lea		drvrName(A0),A0				; Point to the driver name.
-				Move.l	A0,D4						; Save it for later.
-				Move.b	(A0)+,D0					; Get its length.
-				Swap	D0							; Save it.
-				Lea		DAFBVideoTitle,A1			; Point to the driver name we want.
-				Move.b	(A1)+,D0					; Get its length.
-				_CmpString							; Compare the names.
-				Tst.w	D0							; If they are not equal, then we donÕt know about
-				Bne.s	@AllDone					;	this DAFB driver, so just leave.
-				
-				Moveq	#0,D0						; Re-prepare D0.
-				Move.l	D4,A0						; Re-point to the driver name.
-				Move.b	(A0),D0						; Get its length.
-				Addq	#2,D0						; Adjust offset to version field.
-				Bclr	#0,D0						; Adjust offset for word alignment.
-				Move.w	(A0,D0),D4					; Get the driverÕs version number.
-				Cmp.w	#DrvrVer950,D4				; If this isnÕt the Quadra 950Õs driver version,
-				Bne.s	@AllDone					;	then just leave.
-				
-				Adda.w	D0,A0						; Point to version part of driver name.
-				Move.l	A0,D4						; Save it for later.
-
-; We found the Macintosh Quadra 950Õs version of the DAFB driver.
-;
-				Move.l	D5,A0						; Re-point to the AuxDCEPtr.
-				Move.l	dCtlStorage(A0),A0			; Get the Handle to DAFB private storage.
-				Move.l	(A0),A0						; Make it a pointer.
-				
-				Btst	#Has16bppSRsrc,GFlags(A0)	; If a 16bpp-capable sRsrc is not in use,
-				Beq.s	@AllDone					;	then just leave.
-
-				Move.l	D6,A0						; Re-point to the DAFB driver.
-				Move.b	#$FF,badEntry(A0)			; Fix the bad table entry.
-				
-				Move.l	D4,A0						; Re-point to the DAFB driver version number.
-				Move.w	#DrvrVer950+1,(A0)			; Update it.
-
-@AllDone
-				Add.w	#spBlockSize,Sp 			; Deallocate SpBlock.
-				Movem.l	(Sp)+,Quadra950SaveRegs		; Restore work registers.
-
-@ExitNow											; Outta here, dudes.
-				Rts
-				
-				Endwith
-				
-			Else
-				
-				Rts
-			
-			Endif
+				UNLK		A6
+				RTS
 
 			END
diff --git a/QuickDraw/ColorMgr.a b/QuickDraw/ColorMgr.a
index 2175257..ca971cc 100644
--- a/QuickDraw/ColorMgr.a
+++ b/QuickDraw/ColorMgr.a
@@ -637,7 +637,7 @@ Seed
 
 		MOVE.L		D5,D4				; copy total # of color (and cleared hi word)
 		SUBQ		#2,D4				; this is the number of colors remaining
-		BLE.S		QVille				; if zero or negative, all done
+		BLT.S		QVille				; if zero or negative, all done
 		MOVEQ		#1,D5				; start at color #1 (zero based)
 @TheRestOfUs							; a temporary label for the rest of us
 		BSR.S		QUtil				; queue it
diff --git a/QuickDraw/ColorQD.make b/QuickDraw/ColorQD.make
index bca464a..fbd3364 100644
--- a/QuickDraw/ColorQD.make
+++ b/QuickDraw/ColorQD.make
@@ -21,6 +21,7 @@ QDPatchesDir	=	{ColorQDDir}Patches:
 
 CQDObjs							=	"{ObjDir}CheckDevicesINIT.a.o"			¶
 									"{ObjDir}CQD.a.o"						¶
+									"{LibDir}MoreCQD.lib"					¶
 									"{ObjDir}DeviceLoop.a.o"
 
 
@@ -28,8 +29,8 @@ CQDObjs							=	"{ObjDir}CheckDevicesINIT.a.o"			
 	Rez {StdROpts} -o "{Targ}" "{ColorQDDir}CQD.r" -i "{QDPatchesDir}"
 
 
-# "{LibDir}CQD.lib"				Ä	{CQDObjs}
-# 	Lib {StdLibOpts} -o "{Targ}" {CQDObjs}
+"{LibDir}CQD.lib"				Ä	{CQDObjs}
+	Lib {StdLibOpts} -o "{Targ}" {CQDObjs}
 
 
 "{ObjDir}CheckDevicesINIT.a.o"	Ä	"{ColorQDDir}CheckDevicesINIT.a"
diff --git a/QuickDraw/DeviceLoop.a b/QuickDraw/DeviceLoop.a
index 303b0f6..671ae3c 100644
--- a/QuickDraw/DeviceLoop.a
+++ b/QuickDraw/DeviceLoop.a
@@ -105,8 +105,38 @@ LocalSize		EQU		*
 		link	A6, #LocalSize
 		movem.l	D3-D7/A2-A4, callerRegs(A6)	; save the callers registers
 
-		btst	#6, ROM85					; Color QuickDraw available?
-		bnz		@classicQD					; if not, handle old case
+		machine	MC68030
+		move.l	([$2b6],$1fc),a0
+		machine	MC68020
+
+		tst.b	$b5(a0)
+		beq.s	@noShield
+
+		move.l	drawingRgn(a6),d0
+		beq.s	@noConversion
+
+		move.l	d0,a0
+		move.l	(a0),a0
+		move.l	$2(a0),localRect+0(a6)
+		move.l	$6(a0),localRect+4(a6)
+
+		pea		localRect+0(a6)
+		_LocalToGlobal
+
+		pea		localRect+4(a6)
+		_LocalToGlobal
+
+		bra.s	@proceedWithShield
+@noConversion
+
+		move.l	#$80008000,localRect+0(a6)
+		move.l	#$7fff7fff,localRect+4(a6)
+
+@proceedWithShield
+		pea		localRect+0(a6)
+		clr.l	-(sp)
+		_ShieldCursor
+@noShield
 
 		move.l	TheGDevice, D0				; Get the handle to the current GDevice
 		move.l	MainDevice, D1				; Get the handle to the main device
@@ -149,11 +179,11 @@ LocalSize		EQU		*
 		beq		@noMore						; if so, no more devices
 		move.l	(A4), A3					; point at the GDevice record
 		bsr		TestAndIntersect			; is device good for drawing?
-		bz.s	@nextDevice					; if not, keep searching
+		bz		@nextDevice					; if not, keep searching
 
 		move.l	flags(A6), D0				; get the callerÕs options
 		btst	#allDevicesBit, D0			; are we ignoring regions?
-		bnz.s	@visRgnSetup				; if so, donÕt change the visRgn
+		bnz		@visRgnSetup				; if so, donÕt change the visRgn
 
 		move.l	D4, -(SP)					; rectangle region handle
 		pea		localRect(A6)				; this device (local coords)
@@ -175,10 +205,12 @@ LocalSize		EQU		*
 		move.l	ctSeed(A0), D7				; stash deviceÕs ctab seed
 		move.l	flags(A6), D0				; get callerÕs flags
 		btst	#singleDevicesBit, D0		; should we group devices?
-		bnz.s	@groupingDone				; if not, donÕt call AddSimilar
+		bnz		@groupingDone				; if not, donÕt call AddSimilar
 		bsr		AddSimilarDevices			; find all the like devices
 @groupingDone
  		movem.l	D3-D7/A2-A4/A6, -(SP)		; save OUR registers
+		bsr		NewFunc1
+		move	D2,-(SP)
 		swap	D6
 		move.l	D6, -(SP)					; pass depth and flags
 		move.l	A4, -(SP)					; and the GDHandle
@@ -187,6 +219,8 @@ LocalSize		EQU		*
 		movem.l	callerRegs(A6), D3-D7/A2-A4	; restore callerÕs registers
 		move.l	A6Link(A6), A6				; and restore callerÕs A6
 		jsr		(A0)						; call the drawing procedure
+		move	(SP)+,D2
+		bsr		NewFunc2
 		movem.l	(SP)+, D3-D7/A2-A4/A6		; get OUR register set back
 		move.l	(A4), A3					; fix GDevicePtr
 @nextDevice
@@ -194,13 +228,6 @@ LocalSize		EQU		*
 		addq	#1, D3						; increment device number
 		bra.s	@deviceIntersect			; try this one
 
-@classicQD
-		move.l	A6, -(SP)					; save our stack frame ptr
-		move.w	#1, -(SP)					; pass depth (always 1)
-		move.w	#fakeDeviceFlags, -(SP)		; and gdflags (something reasonable)
-		clr.l	-(SP)						; NIL for GDHandle
-		bra.s	@simpleDeviceCommon
-
 @oneDevice
 		move.l	A6, -(SP)					; save our stack frame ptr
 		move.l	gdPMap(A0), A1				; PixMapHandle
@@ -230,6 +257,17 @@ LocalSize		EQU		*
 		_DisposRgn
 		move.l	savedVis(A6), visRgn(A2)	; put original visRgn back
 @exit
+
+		machine	MC68030
+		move.l	([$2b6],$1fc),a0
+		machine	MC68020
+
+		tst.b	$b5(a0)
+		beq.s	@noShow
+
+		_ShowCursor
+@noShow
+
 		movem.l	callerRegs(A6), D3-D7/A2-A4	; restore regs
 		unlk	A6
 		move.l	(SP)+, A0					; clean stack and return
@@ -252,27 +290,30 @@ AddSimilarDevices
 
 		movem.l	A3-A4/D3/D6, -(SP)			; save original state
 		andi.w	#importantFlagsMask, D6		; keep only pertinent flags
+		move.l	A3, A1
 		move.l	gdNextGD(A3), A4			; start with next device
 		addq	#1, D3						; which is next in number, too
 @addLoop
 		move.l	A4, D0						; is there a GDHandle?
-		bz.s	@noMore						; if NIL, then weÕre done
+		bz		@noMore						; if NIL, then weÕre done
 
 		move.l	(A4), A3					; handle->ptr
-		bsr.s	TestAndIntersect			; see if device is okay by itself
-		bz.s	@nextDevice					; if not, try next one
+		move.l	A1, -(SP)
+		bsr		TestAndIntersect			; see if device is okay by itself
+		move.l	(SP)+, A1
+		bz		@nextDevice					; if not, try next one
 
 		move.w	gdFlags(A3), D0				; get device attributes
 		andi.w	#importantFlagsMask, D0		; strip unimportant ones
 		cmp.w	D0, D6						; is this device similar to test device?
-		bne.s	@nextDevice					; if not, donÕt use it
+		bne		@nextDevice					; if not, donÕt use it
 
 		move.l	gdPMap(A3), A0				; get deviceÕs PixMapHandle
 		move.l	(A0), A0					; get deviceÕs PixMapPtr
 		move.l	D6, D0						; get depth and flags
 		swap	D0							; get depth into low word
 		cmp.w	pmPixelSize(A0), D0			; save depth as test device?
-		bne.s	@nextDevice					; if not, donÕt use it
+		bne		@nextDevice					; if not, donÕt use it
 
 		move.l	flags(A6), D0				; get the option flags
 		btst	#dontMatchSeedsBit, D0		; should we check ctSeeds?
@@ -280,12 +321,49 @@ AddSimilarDevices
 		move.l	pmTable(A0), A0				; handle to color table
 		move.l	(A0), A0
 		cmp.l	ctSeed(A0), D7				; are the seeds the same?
-		bne.s	@nextDevice					; if not, donÕt use this one
+		bne		@nextDevice					; if not, donÕt use this one
 @seedsChecked
 
+		move.l	A3, A0
+		move.l	$22(A1), D0
+		cmp		$24(A0), D0
+		bgt.s	@L4
+		blt.s	@L1
+		swap	D0
+		cmp		$22(A0), D0
+		bgt.s	@L5
+		blt.s	@L2
+		move.l	$26(A1), D0
+		cmp		$28(A0), D0
+		blt.s	@L6
+		bgt.s	@L3
+		bra.s	@nextDevice
+@L1		swap	D0
+		cmp		$22(A0), D0
+		bgt.s	@doneWhateverThatWas
+@L2		move.l	$26(A1), D0
+		cmp		$28(A0), D0
+		blt.s	@doneWhateverThatWas
+@L3		swap	D0
+		cmp		$26(A0), D0
+		blt.s	@doneWhateverThatWas
+		bra.s	@nextDevice
+@L4		swap	D0
+		cmp		$22(A0), D0
+		blt.s	@doneWhateverThatWas
+@L5		move.l	$26(A1), D0
+		cmp		$28(A0), D0
+		bgt.s	@doneWhateverThatWas
+@L6		swap	D0
+		cmp		$26(A0), D0
+		bgt.s	@doneWhateverThatWas
+		bra.s	@nextDevice
+@doneWhateverThatWas
+
 		move.l	flags(A6), D0				; what are the current options?
 		btst	#allDevicesBit, D0			; are we ignoring drawingRgn?
 		bnz.s	@visRgnSetup				; if so, no regions to setup
+		move.l	A1, -(SP)
 
 		move.l	D4, -(SP)					; rectangle region handle
 		pea		localRect(A6)				; this device (local coords)
@@ -299,6 +377,7 @@ AddSimilarDevices
 		move.l	(SP), -(SP)					; get ORed together
 		_XorRgn								; XOr is a fast way to Union when guaranteed no overlap
 		move.l	(A4), A3					; fix GDevicePtr
+		move.l	(SP)+, A1
 
 @visRgnSetup
 		bset.l	D3, D5						; mark this device done
@@ -347,4 +426,73 @@ TestAndIntersect
 @exit
 		rts
 
+
+NewFunc1
+		moveq	#0, D2
+		move.l	(DeviceList), D0
+		beq.s	@return
+		moveq	#0, D1
+@L0		movea.l	D0, A0
+		movea.l	(A0), A0
+		cmp		D3, D1
+		beq.s	@L8
+		tst		$14(A0)
+		bpl.s	@L8
+		movea.l	(A4), A1
+		move.l	$22(A1), D0
+		cmp		$24(A0), D0
+		bgt.s	@L4
+		blt.s	@L1
+		swap	D0
+		cmp		$22(A0), D0
+		bgt.s	@L5
+		blt.s	@L2
+		move.l	$26(A1), D0
+		cmp		$28(A0), D0
+		blt.s	@L6
+		bgt.s	@L3
+		bra.s	@L7
+@L1		swap	D0
+		cmp		$22(A0), D0
+		bgt.s	@L8
+@L2		move.l	$26(A1), D0
+		cmp		$28(A0), D0
+		blt.s	@L8
+@L3		swap	D0
+		cmp		$26(A0), D0
+		blt.s	@L8
+		bra.s	@L7
+@L4		swap	D0
+		cmp		$22(A0), D0
+		blt.s	@L8
+@L5		move.l	$26(A1), D0
+		cmp		$28(A0), D0
+		bgt.s	@L8
+@L6		swap	D0
+		cmp		$26(A0), D0
+		bgt.s	@L8
+@L7		bclr.s	#7, $14(A0)
+		bset.l	D1, D2
+@L8		addq	#1, D1
+		move.l	$1E(A0), D0
+		bne.s	@L0
+@return	Rts
+
+
+NewFunc2
+		tst		D2
+		beq.s	@return
+		move.l	(DeviceList), D0
+		beq.s	@return
+@L10	move.l	D0, A0
+		move.l	(A0), A0
+		lsr		#1, D2
+		bcc.s	@L11
+		bset.s	#7, $14(A0)
+		tst		D2
+		beq.s	@return
+@L11	move.l	$1E(A0), D0
+		bne.s	@L10
+@return	Rts
+
 		END
diff --git a/QuickDraw/DrawText.a b/QuickDraw/DrawText.a
index 980912b..aed426d 100644
--- a/QuickDraw/DrawText.a
+++ b/QuickDraw/DrawText.a
@@ -2861,6 +2861,7 @@ renderIt
 @singleByteFont
 	endif
 
+		; 72624
 		MOVE.L	WidthTabHandle, -(SP)		;2) Push the Width Table Handle onto the stack
 		PEA		fontID(A6)					;1) Push the Glyph Rec Ptr
 		TST.B	FASTFLAG(A6)				;if slow no need for 32-bit stuff
@@ -2868,7 +2869,6 @@ renderIt
 		TST.B	needs32bit(A6)				;running 32 bit clean
 		BEQ.S	@skip32						;NOPE, so skip it
 		move.b	MMUsave(a6),d0				;get previous MMU state in d0
-		_rSwapMMUMode						;get previous mode in d0.b (can trash a0/a1/a2, d0/d1/d2)
 		_sbRetrieveGlyph					;Call the routine via SplineDispatch
 		moveq	#true32b,d0					;switch to 32 bit addressing
 		_rSwapMMUMode						;get previous mode in d0.b (can trash a0/a1/a2, d0/d1/d2)
diff --git a/QuickDraw/FastTraps.a b/QuickDraw/FastTraps.a
index 9cb9093..304dc38 100644
--- a/QuickDraw/FastTraps.a
+++ b/QuickDraw/FastTraps.a
@@ -1005,7 +1005,7 @@ selectGetGray			equ		25
 
 				MACRO
 				_ZapLinks
-				DoPaletteDispatch selectZapLinks,0
+				DoPaletteDispatch selectZapLinks,4
 				ENDM
 
 				MACRO
@@ -2921,6 +2921,7 @@ _EmptyHandle	OPWORD	$A000+43
 _InitApplZone	OPWORD	$A000+44
 _SetApplLimit	OPWORD	$A000+45
 _BlockMove		OPWORD	$A000+46
+_BlockMoveData	OPWORD	$A000+46+$200
 
 ; Here are the event manager routines
 
diff --git a/QuickDraw/GDevice.a b/QuickDraw/GDevice.a
index 93dc4aa..e4d56f4 100644
--- a/QuickDraw/GDevice.a
+++ b/QuickDraw/GDevice.a
@@ -201,8 +201,6 @@ MODE		EQU 	REFNUM-4				; LONG, Mode for video card
 		CMP.L	#-1,D0						; if mode = -1, then don't init			<C769>
 		beq.s	Done						; => go home							<C769>
 
-		CMP.W	#OneBitMode,D0				; is it one bit per pixel?
-		BEQ.S	@Mono						; => yes, default to black and white
 		Bsr		TestForGray					; is it monochrome only?
 		Bne.s	@Mono						; => yes, leave GDevice mono
 		BSET	#GDDevType,GDFlags+1(A3)	; else default to color
@@ -210,7 +208,7 @@ MODE		EQU 	REFNUM-4				; LONG, Mode for video card
 @Mono	MOVE.W	REFNUM(A6),-(SP)			; pass device to initialize
 		MOVE.L	MODE(A6),-(SP)				; pass mode to initialize
 		MOVE.L	A2,-(SP)					; and pass gDevice handle
-		_InitGDevice						; initialize the device port
+		JSR		([$16B8])					; initialize the device port
 
 DONE	MOVE.L	(SP)+,theZone				; restore the zone
 		MOVE.L	A2,RESULT(A6)				; return graf device handle
@@ -364,6 +362,8 @@ oldBaseAddr	DS.B	4						; old base address, for later comparison
 oldPort		DS.B	4						; thePort, before we got here
 oldColor	DS.B	8						; a colorSpec used to reinstantiate fg/bk
 
+			DS.B	356
+
 VARSIZE		DS.B	0						; size of locals
 			ENDR
 
@@ -372,6 +372,13 @@ VARSIZE		DS.B	0						; size of locals
 		LINK	A6,#VARSIZE					; allocate stack frame
 		MOVEM.L	D3/A2-A4,-(SP)				; save off work registers
 
+		MOVE.L	ExpandMem,A0
+		MOVE.L	$1FC(A0),A1
+		TST.B	$B5(A1)
+		BNE.S	@true
+		CLR		$276(A0)
+@true
+
 		MOVE.L	GDH(A6),A0					; get the gDevice handle
 		_HGetState							; get the current lock state
 		MOVE	D0,GDHState(A6)				; save the state
@@ -390,16 +397,13 @@ VARSIZE		DS.B	0						; size of locals
 		BNE.S	@noShield					; no, don't shield cursor
 		BTST	#screenDevice,gdFlags(A2)		; is it screen (check hi byte with #>8)
 		BEQ.S	@noShield
-;+++		PEA		gdRect(A2)
-;+++		CLR.L	-(SP)						; in global cošrds
-;+++		_ShieldCursor
-		_HideCursor							; changed to Hide from Shield to fix
-											;   problems when cursor is on the move
-											;   during InitGDevice
+		JSR		([$F48])
+
 @noShield
 
 ; initialize the GDevice's mode and refnum
 
+		SF.B	-$6E(A6)
 		MOVE	REFNUM(A6),GDRefNum(A2) 	; set up RefNum
 		MOVE.L	MODE(A6),D0					; get the mode
 		CMP.L	MinusOne,D0					; is the mode -1?
@@ -415,7 +419,8 @@ VARSIZE		DS.B	0						; size of locals
 		MOVE.L	A1,csParam(A0)				; point to param list
 
 		CMP.L	GDMode(A2),D0				; has the mode changed?
-		BEQ		GrayOrColor					; => no, so don't set depth
+		BEQ.S	GrayOrColor					; => no, so don't set depth
+		ST.B	-$6E(A6)
 		MOVE.L	D0,GDMode(A2)				; set up mode
 
 ; setup the gDevice fields for the new screen depth
@@ -491,97 +496,246 @@ NoTbl
 		MOVEQ	#4,D0						; make 4-4-4 inverse tables
 		MOVE	D0,GDResPref(A2)			; save in GDevice
 		MOVE	D0,-(SP)					; and push res
-		_MakeITable							; and generate table
+		JSR		([$16E4])					; and generate table
 
-;  If this device has not been initialized from the system file, then copy the
-;  bounds from the pixMap to the GDRect.  Otherwise copy the GDRect to the Bounds.
 
 ModeOK
-		LEA		BOUNDS(A3),A0				; point to pixmap.bounds				<C837>
-		LEA		GDRECT(A2),A1				; point to device's global rect
-		MOVE	GDFlags(A2),D0				; get the flags word
-		BTST	#RAMInit,D0					; initialized from RAM?
-		BEQ.S	BndsOK						; => no, copy pixMap.bounds to GDRect
-		EXG		A0,A1						; else copy GDRect to pixMap.bounds
-BndsOK	MOVE.L	(A0)+,(A1)+					; copy topLeft
-		MOVE.L	(A0)+,(A1)+					; copy botRight
-
-; <dvb 3Jan89>
-; if we're about the main device, then fix all those
-; potentially errant ports.
-;
-		TST.B	QDExist						; (Unless QuickDraw don't exist)
-		BNE		@noQD
-		MOVE.L	portList,D1					; or if portlist = 0 or -1
-		BEQ		@noQD
-		ADDQ.L	#1,D1
-		BEQ		@noQD
-
-		BTST	#mainScreen,D0				; is it the main scrn? (flags already in D0)
-		BEQ		@notMain
-
-		PEA		oldPort(A6)					; Save the current port
+		MOVE.L	([$2B6],$1FC),A0
+		TST.B	$B5(A0)
+		BEQ		@L13
+		MOVE	$14(A2),D0
+		BTST.L	#$D,D0
+		BEQ		@L13
+		BTST.L	#$A,D0
+		BEQ		@L13
+		TST		(A2)
+		BEQ		@L13
+		TST.B	-$6E(A6)
+		BEQ		@L13
+		MOVE.L	$22(A2),-$6C(A6)
+		MOVE.L	$26(A2),-$68(A6)
+		TST.B	(QDExist)
+		BNE		@L9
+		MOVE.L	A5,-$7A(A6)
+		LEA.L	-$7E(A6),A5
+		MOVE.L	$6(A3),$22(A2)
+		MOVE.L	$A(A3),$26(A2)
+		MOVE.L	(ScrnBase),-$1BC(A6)
+		MOVE.L	-$58(A6),D1
+		CMP.L	(ScrnBase),D1
+		BNE.S	@L0
+		MOVE	$14(A2),D0
+		BTST.L	#$B,D0
+		BEQ		@L0
+		MOVE.L	(A3),(ScrnBase)
+@L0		PEA.L	-$82(A6)
+		_InitGraf
+		PEA.L	-$1B8(A6)
+		_OpenPort
+		MOVE.L	D2,-(SP)
+		MOVEQ.L	#$0,D1
+		MOVEQ.L	#$1,D2
+		MOVE.L	(DeviceList),D0
+@L1		BEQ.S	@L5
+		MOVE.L	D0,A0
+		CMPA.L	$8(A6),A0
+		MOVE.L	(A0),A0
+		BNE.S	@L2
+		BSET.B	#$7,$14(A0)
+		BNE.S	@L4
+		BRA.S	@L3
+@L2		BTST.B	#$7,$14(A0)
+		BEQ.S	@L4
+		BCLR.B	#$7,$14(A0)
+@L3		OR		D2,D1
+@L4		LSL		#$1,D2
+		MOVE.L	$1E(A0),D0
+		BRA.S	@L1
+@L5		MOVE.L	(SP)+,D2
+		MOVE	D1,-(SP)
+		SUBQ.L	#$4,SP
+		_NewRgn
+		MOVE.L	(SP),-(SP)
+		MOVE.L	(SP),-(SP)
+		PEA.L	$6(A3)
+		_RectRgn
+		LEA.L	-$1B8(A6),A0
+		MOVE.L	$18(A0),-(SP)
+		MOVE.L	(SP),-(SP)
+		_UnionRgn
+		_DisposRgn
+		MOVE	$C(A3),D0
+		SUB		$8(A3),D0
+		MOVE	-$66(A6),D1
+		SUB		-$6A(A6),D1
+		SUB		D1,D0
+		ASR		#$1,D0
+		MOVE	D0,-$1C6(A6)
+		MOVE	$A(A3),D0
+		SUB		$6(A3),D0
+		MOVE	-$68(A6),D1
+		SUB		-$6C(A6),D1
+		SUB		D1,D0
+		ASR		#$1,D0
+		MOVE	D0,-$1C8(A6)
+		MOVE	$8(A3),D0
+		ADD		-$1C6(A6),D0
+		MOVE.L	$6(A3),-$76(A6)
+		MOVE	$A(A3),-$72(A6)
+		MOVE	D0,-$70(A6)
+		PEA.L	-$76(A6)
+		MOVE.L	(A5),A1
+		PEA.L	-$10(A1)
+		_FillRect
+		MOVE	$6(A3),D0
+		ADD		-$1C8(A6),D0
+		MOVE	$C(A3),-$70(A6)
+		MOVE	D0,-$72(A6)
+		PEA.L	-$76(A6)
+		MOVE.L	(A5),A1
+		PEA.L	-$10(A1)
+		_FillRect
+		MOVE	$A(A3),D0
+		SUB		-$1C8(A6),D0
+		MOVE.L	$A(A3),-$72(A6)
+		MOVE	$8(A3),-$74(A6)
+		MOVE	D0,-$76(A6)
+		PEA.L	-$76(A6)
+		MOVE.L	(A5),A1
+		PEA.L	-$10(A1)
+		_FillRect
+		MOVE	$C(A3),D0
+		SUB		-$1C6(A6),D0
+		MOVE	$6(A3),-$76(A6)
+		MOVE	D0,-$74(A6)
+		PEA.L	-$76(A6)
+		MOVE.L	(A5),A1
+		PEA.L	-$10(A1)
+		_FillRect
+		MOVE	(SP)+,D1
+		BEQ.S	@L8
+		MOVE.L	(DeviceList),D0
+@L6		BEQ.S	@L8
+		MOVE.L	D0,A0
+		MOVE.L	(A0),A0
+		LSR		#$1,D1
+		BCC.S	@L7
+		BSET.B	#$7,$14(A0)
+		TST		D1
+		BEQ.S	@L8
+@L7		MOVE.L	$1E(A0),D0
+		BRA.S	@L6
+@L8		PEA.L	-$1B8(A6)
+		_ClosePort
+		MOVE.L	-$1BC(A6),(ScrnBase)
+		MOVE.L	-$6C(A6),$22(A2)
+		MOVE.L	-$68(A6),$26(A2)
+		MOVE.L	-$7A(A6),A5
+@L9		MOVE	D2,-(SP)
+		MOVE.L	$16(A2),A0
+		MOVE.L	(A0),A0
+		MOVE	$4(A0),D0
+		ANDI	#$7FFF,D0
+		MOVE	$A(A0),D1
+		SUB		$6(A0),D1
+		ADD		-$6C(A6),D1
+		SUB		-$68(A6),D1
+		ASR		#$1,D1
+		MULU	D1,D0
+		MOVE	$C(A0),D1
+		SUB		$8(A0),D1
+		ADD		-$6A(A6),D1
+		SUB		-$66(A6),D1
+		ASR		#$1,D1
+		MOVE	$20(A0),D2
+		CMPI	#$8,D2
+		BGT.S	@L11
+		BEQ.S	@L12
+@L10	ASR		#$1,D1
+		ASL		#$1,D2
+		CMPI	#$8,D2
+		BLT.S	@L10
+		BRA.S	@L12
+@L11	ASR		#$3,D2
+		MULU	D2,D1
+@L12	EXT.L	D1
+		ADD.L	D1,D0
+		ADD.L	D0,(A0)
+		MOVE	(SP)+,D2
+@L13	LEA.L	$6(A3),A0
+		LEA.L	$22(A2),A1
+		MOVE	$14(A2),D0
+		BTST.L	#$A,D0
+		BEQ.S	@L14
+		EXG.L	A0,A1
+@L14	MOVE.L	(A0)+,(A1)+
+		MOVE.L	(A0)+,(A1)+
+		TST.B	(QDExist)
+		BNE		@L20
+		MOVE.L	(PortList),D1
+		BEQ		@L20
+		ADDQ.L	#$1,D1
+		BEQ		@L20
+		BTST.L	#$B,D0
+		BEQ		@L19
+		PEA.L	-$5C(A6)
 		_GetPort
-		MOVE.L	mainDevice,theGDevice		; and set to the screen
-
-		MOVE.L	PortList,A4					; A4 = handle to list of ALL ports
-		MOVE.L	(A4),A4						; A4->list of all ports
-		MOVE	(A4),D3					; D3 = number of ports that exist
-		BRA.S	@portWalkEnd
-
-@portWalkLoop
-		MOVE.L	PortList,A4
+		MOVE.L	(MainDevice),(TheGDevice)
+		MOVE.L	(PortList),A4
 		MOVE.L	(A4),A4
-		MOVE.L	2(A4,D3.W*4),A4					; A4 = this port
-		MOVE.L	A4,-(SP)						; Set to each port in the port list
+		MOVE	(A4),D3
+		BRA.S	@L17
+@L15	MOVE.L	(PortList),A4
+		MOVE.L	(A4),A4
+		MOVE.L	$2(A4,D3.W*4),A4
+		MOVE.L	A4,-(SP)
 		_SetPort
-
-		MOVE.L	oldBaseAddr(A6),D1				; D1 = the scrnbase of ports to change
-		BTST	#7,portVersion(A4)				; high bit set?
-		BEQ.S	@oldPort
-		MOVE.L	portPixMap(A4),A4				; A4 = handle to the port's pixmap
-		MOVE.L	(A4),A4							; A4->port's pixmap
-		CMP.L	baseAddr(A4),D1					; same as the screen's?
-		BNE.S	@portWalkEnd				 	; no, skip this port
-
-		MOVE.L	baseAddr(A3),baseAddr(A4)		; replace a bunch of fields
-		MOVE	rowBytes(A3),rowBytes(A4)
-		MOVE.L	pixelType(A3),pixelType(A4)		; (gets pixelSize, too)
-		MOVE.L	cmpCount(A3),cmpCount(A4)		; (gets cmpSize, too)
-		MOVE.L	planeBytes(A3),planeBytes(A4)
-
-		PEA		oldColor(A6)					; placeholder for reinstantiating colors
+		MOVE.L	-$58(A6),D1
+		BTST.B	#$7,$6(A4)
+		BEQ.S	@L16
+		MOVE.L	$2(A4),A4
+		MOVE.L	(A4),A4
+		CMP.L	(A4),D1
+		BNE.S	@L17
+		MOVE.L	(A3),(A4)
+		MOVE	$4(A3),$4(A4)
+		MOVE.L	$1E(A3),$1E(A4)
+		MOVE.L	$22(A3),$22(A4)
+		MOVE.L	$26(A3),$26(A4)
+		PEA.L	-$64(A6)
 		MOVE.L	(SP),-(SP)
 		MOVE.L	(SP),-(SP)
 		MOVE.L	(SP),-(SP)
-		_SaveFore								; Save and restore the foreground color
-		_RestoreFore							; (Allowing for pmFore)
-		_SaveBack								; And the same for the background
+		_SaveFore
+		_RestoreFore
+		_SaveBack
 		_RestoreBack
- 		BRA.S	@portWalkEnd
-
-@oldPort
-		CMP.L	portBits+baseAddr(A4),D1		; same base on old port?
-		BNE.S	@portWalkEnd
-		MOVE.L	baseAddr(A3),portBits+baseAddr(A4)
-		MOVE	rowBytes(A3),D1
-		AND		#nurbMask,D1					; handle NURBs here
-		MOVE	D1,portBits+rowBytes(A4)
-
-@portWalkEnd
-		DBRA	D3,@portWalkLoop
-		MOVE.L	oldPort(A6),-(SP)				; restore the pre-existing port
+		BRA.S	@L17
+@L16	CMP.L	$2(A4),D1
+		BNE.S	@L17
+		MOVE.L	(A3),$2(A4)
+		MOVE	$4(A3),D1
+		ANDI	#$7FFF,D1
+		MOVE	D1,$6(A4)
+@L17	DBF		D3,@L15
+		MOVE.L	-$5C(A6),-(SP)
 		_SetPort
-
-		MOVE.L	oldBaseAddr(A6),D1
-		CMP.L	scrnBase,D1						; fix scrnBase too, if neede
-		BNE.S	@notMain
-		MOVE.L	baseAddr(A3),scrnBase
-
-@notMain
+		MOVE.L	-$58(A6),D1
+		CMP.L	(ScrnBase),D1
+		BNE.S	@L18
+		MOVE.L	(A3),(ScrnBase)
+@L18	MOVE.L	-$58(A6),D1
+		MOVE.L	(A5),A0
+		CMP.L	-$7A(A0),D1
+		BNE.S	@L19
+		MOVE.L	(A3),-$7A(A0)
+@L19	BTST.B	#$D,$14(A2)
+		BEQ.S	@L20
 		_AllocCursor
 		_ShowCursor
-@noQD
+@L20	BSR.S	NewFunc
+		MOVE.L	(ExpandMem),A0
+		MOVE	D0,$276(A0)
 
 ;
 ; notify the Palette Manager that the mode has changed
@@ -605,6 +759,62 @@ BndsOK	MOVE.L	(A0)+,(A1)+					; copy topLeft
 		UNLINK	result-return-4,'INITGDEV'
 
 
+NewFunc
+			MOVE.L	(TheGDevice),D0
+			BEQ		@L32
+			MOVE.L	(MainDevice),D1
+			CMP.L	D0,D0
+			BNE.S	@L22
+			MOVE.L	(DeviceList),D0
+			BEQ.S	@L32
+@L22		MOVE.L	D0,A0
+			MOVE.L	(A0),A0
+			MOVE.L	$1E(A0),D1
+			BEQ.S	@L32
+@L23		MOVE.L	D1,A1
+			MOVE.L	(A1),A1
+			MOVE.L	$22(A1),D0
+			CMP		$24(A0),D0
+			BGT.S	@L27
+			BLT.S	@L24
+			SWAP	D0
+			CMP		$22(A0),D0
+			BGT.S	@L28
+			BLT.S	@L25
+			MOVE.L	$26(A1),D0
+			CMP		$28(A0),D0
+			BLT.S	@L29
+			BGT.S	@L26
+			BRA.S	@L30
+@L24		SWAP	D0
+			CMP		$22(A0),D0
+			BGT.S	@L31
+@L25		MOVE.L	$26(A1),D0
+			CMP		$28(A0),D0
+			BLT.S	@L31
+@L26		SWAP	D0
+			CMP		$26(A0),D0
+			BLT.S	@L31
+			BRA.S	@L30
+@L27		SWAP	D0
+			CMP		$22(A0),D0
+			BLT.S	@L31
+@L28		MOVE.L	$26(A1),D0
+			CMP		$28(A0),D0
+			BGT.S	@L31
+@L29		SWAP	D0
+			CMP		$26(A0),D0
+			BGT.S	@L31
+@L30		MOVEQ.L	#$1,D0
+			RTS
+@L31		MOVE.L	$1E(A1),D1
+			BNE.S	@L23
+			MOVE.L	$1E(A0),D0
+			BNE.S	@L22
+@L32		MOVEQ.L	#$0,D0
+			RTS
+
+
 GetDevPixMap	PROC	EXPORT
 				IMPORT	CopyHandle, GetCTSeed, RSetHSize
 ;----------------------------------------------------------------
@@ -627,7 +837,7 @@ DEVTYPE		EQU		PMH-4					; LONG, VAR DevType
 
 MYBLOCK		EQU		-spBlock.SPBLOCKSIZE	; allocate room for parameter block	<Cxxx>
 PMHState	EQU		MyBlock-2				; save pixMap lockState
-VARSIZE		EQU		PMHState				; size of locals
+VARSIZE		EQU		PMHState-$9A			; size of locals
 
 	WITH	spBlock,vpBlock					;<C742>
 
@@ -636,6 +846,7 @@ VARSIZE		EQU		PMHState				; size of locals
 
 ; lock down the pixMap and get pointer in A2
 
+			CLR.B	-$D3(A6)
 			MOVE.L	PMH(A6),A0					; get handle to pixMap
 			_HGetState							; get the current state
 			MOVE	D0,PMHState(A6)				; save current state
@@ -651,6 +862,46 @@ VARSIZE		EQU		PMHState				; size of locals
 			MOVE.L	(A1,D0),A3					; A3 = handle to the DCE
 			MOVE.L	(A3),A1						; get pointer to the DCE
 
+			LEA.L	-$D2(A6),A4
+			LEA.L	-$82(A6),A0
+			MOVE.L	A4,$1C(A0)
+			MOVE	$18(A1),$18(A0)
+			MOVE	#$A,$1A(A0)
+			CLR.L	$C(A0)
+			CLR.L	$12(A0)
+			CLR		$16(A0)
+			DC.W	$A205						; _PBStatusImmed
+			BNE.S	@nope
+			MOVE.L	$2(A4),-$3E(A6)
+			MOVE.L	$8(A4),-$42(A6)
+			MOVE.L	$2A(A1),D3
+			LEA.L	-$AC(A6),A0
+			LEA.L	-$C2(A6),A4
+			MOVE.L	A0,$6(A4)
+			MOVE.L	$10(A6),D0
+			MOVE	D0,$4(A4)
+			MOVE.L	-$3E(A6),(A4)
+			LEA.L	-$82(A6),A0
+			MOVE.L	A4,$1C(A0)
+			MOVE	$14(A6),$18(A0)
+			MOVE	#$12,$1A(A0)
+			CLR.L	$C(A0)
+			CLR.L	$12(A0)
+			CLR		$16(A0)
+			DC.W	$A205						; _PBStatusImmed
+			BNE.S	@nope
+			LEA.L	-$C2(A6),A4
+			MOVE.B	#$1,-$D3(A6)
+			MOVE.L	-$42(A6),D3
+			MOVE.L	D3,$2A(A1)
+			MOVE.L	$8(A6),A1
+			MOVE.L	$E(A4),D4
+			MOVE	D4,(A1)
+			LEA.L	-$38(A6),A0
+			LEA.L	-$AC(A6),A1
+			BRA.S	@saveVals
+@nope
+
 ; get the resource list for the specified device
 
 			LEA		MYBLOCK(A6),A0				; point to parameter block
@@ -687,6 +938,7 @@ VARSIZE		EQU		PMHState				; size of locals
 			BNE		BadSlot						; => something wrong
 			MOVE.L	spResult(A0),A1				; save the pointer to the block			<C742>
 
+@saveVals
 			ADD.L	vpBaseOffset(A1),D3			; calculate baseAddr
 			MOVE.L	D3,(A2)+					; save baseAddr
 
@@ -731,11 +983,13 @@ VARSIZE		EQU		PMHState				; size of locals
 
 			MOVE.L	vpPlaneBytes(A1),(A2)+		; offset from one plane to another		<C742>
 
-
 ; dispose of the sBlock																	<C742>
+			TST.B	-$D3(A6)
+			BNE.S	@dont
 			MOVE.L	A1,spsPointer(A0)			;										<C742>
-			_sDisposePtr						;										<C742>
+			_SDisposePtr						;										<C742>
 			MOVE.L	A4,spsPointer(A0)			; restore pointer to list				<C742>
+@dont
 
 ; use DevType to initialize the color table
 
@@ -748,14 +1002,14 @@ VARSIZE		EQU		PMHState				; size of locals
 
 GetClut		CLR.L	-(SP)						; make room for function result
 			MOVE	D5,-(SP)					; push resource ID
-			_GetCTable							; load in the color table resource
+			JSR		([$1660])					; load in the color table resource
 			MOVE.L	(SP)+,D0					; did we get one?						<C769>
 			BEQ		TableOK						; => no, just punt						<BAL 04Sep88>
 			MOVE.L	D0,-(SP)					; push new handle for dispose			<C1/9>
 			MOVE.L	D0,-(SP)					; push source handle					<C1/9>
 			MOVE.L	(A2),-(SP)					; push destination handle				<C1/9>
-			_CopyHandle							; copy table into our handle			<C1/9>
-			_DisposCTable						; and dispose of new color table		<C1/9>
+			JSR		([$1A14])					; copy table into our handle
+			JSR		([$1690])					; and dispose of new color table
 			BRA.S	TableOK						; => and continue
 
 ;
@@ -788,10 +1042,11 @@ GetFromSlot	MOVE.B	#mTable,spID(A0)			; the fixed table							<2.3>
 			CMPI.L	#minSeed,D0					; is it a resource ID?						<H2>
 			BLE.S	@UseOriginalSeed			; -> yes, assume we know what we're doing	<H2>
 @GetNewSeed	SUBQ	#4,SP						; make room for function result				<2.3>
-			_rGetCTSeed							; get a new, unique ctable seed				<2.3>
+			JSR		([$16A0])					; get a new, unique ctable seed
 			MOVE.L	(SP)+,ctSeed(A1)			; put in the new seed						<2.3>
 @UseOriginalSeed
 												;   transindex/ctflags set below			<2.3>
+
 ;¥¥¥ <SM3> CSS end rollin GetDevPixMapPatch from Horror
 
 			MOVE.L	A4,spsPointer(A0)			; Restore the pointer to mode list.			<C742>
@@ -868,472 +1123,7 @@ CheckDevices	PROC	EXPORT
 ;  CheckDevices is called by InitGraf.
 
 
-PARAMSIZE	EQU		0
-
-IOPBlk		EQU		-IOVQElSize				; [64] parameter blk for I/O calls
-SlotParms   EQU     IOPBlk-spBlock.SPBlockSize  ; parameter block for slot manager calls <Cxxx>
-VidParms	EQU		SlotParms-12			; [12] size of mode params
-StartList	EQU		VidParms-4				; [long] pointer to start of resource
-VARSIZE		EQU		StartList				; size of locals
-
-
-			LINK	A6,#VARSIZE				; allocate local stack frame
-			MOVEM.L	D6-D7/A2-A4,-(SP)		; save work registers
-
-; check to see if the device list needs to be initialized
-
-			MOVE.L	DeviceList,A0			; get handle to device list
-			MOVE.L	(A0),A0					; point to head of device list
-			MOVE	GDFlags(A0),D0			; get the flags word
-			BTST	#AllInit,D0				; test initialize flag?
-			BNE		GoHome					; => devices already initialized
-
-; test the scrnInval lo-mem to make sure the screen resource is valid.
-
-			TST.B	scrnInval				; if this byte is cleared, then invalid
-			BEQ		GoHome					;
-
-; try to load in the resource.  If none, then exit
-
-			CLR.L	-(SP)					; make room for function result
-			MOVE.L	#'scrn',-(SP)			; push desired resource type
-			CLR		-(SP)					; resource ID = 0
-			_GetResource					; get the resource
-			MOVE.L	(SP)+,D0				; get the resource handle
-			BEQ		GoHome					; => none, don't configure
-
-; lock down the handle, and point at the data
-
-			MOVE.L	DeviceList,A0			; get handle to device list
-			MOVE.L	(A0),A0					; point to head of device list
-			BSET	#AllInit,GDFlags(A0)	; say list has been initialized
-
-			MOVE.L	D0,-(SP)				; save resource for ReleaseResource
-			MOVE.L	D0,A0					; get the resource
-			_HLock							; lock it down
-			MOVE.L	(A0),A4					; A4 = resource pointer
-
-; validate the 'scrn' resource.  There must be a descriptor for every screen device.
-; I assume that there are no duplicate entries and that screens don't overlap.
-; In addition the devices in the 'scrn' resource must be in slot order.
-
-			MOVE.L	A4,StartList(A6)		; save pointer to start of list
-			MOVE	(A4)+,D7				; get the number of screens in resource
-
-	WITH	spBlock,vpBlock
-
-			LEA		SlotParms(A6),A0				; get pointer to parameter block
-			MOVE.L	#((CatDisplay << 16) ++ TypVideo),spCategory(A0)	;<C741>
-											; set category ID, type		<C741>
-			MOVE.W	#DrSwApple,spDrvrSw(A0)	; set software, hardware ID	<C741>
-			MOVE.B	#$01,spTBMask(A0)		; ignore spDrvrH
-			MOVE.B	#0,spSlot(A0)			; start with desired slot
-			MOVE.B	#0,spID(A0)				; start with first ID
-			CLR.B	spExtDev(A0)			;<C720>
-NxtDev		LEA		SlotParms(A6),A0		; get pointer to parameter block
-			_sNextTypesRsrc					; get next video device
-			BEQ.S	GotDev					; => there is one
-
-; there are no more screens, are there more resources?
-
-			TST		D7						; there should have been one per device
-			BEQ 	GoodRsrc				; => there was, go initialize them
-			BRA.S	BadScrn					;
-
-; scan through scrn resource for this device
-
-GotDev		MOVE	(A4)+,D0				; get type
-			CMP		spDrvrHw(A0),D0			; does it match?
-			BNE.S	badScrn					; => nope, bad screen resource
-			MOVE	(A4)+,D0				; get slot
-			CMP.B	spSlot(A0),D0			; does it match?
-			BNE.S	badScrn					; => nope, bad screen resource
-
-; get the DCE entry for the device and check dCtlDevBase
-; if no match look for more devices in same slot
-
-SlotOK		MOVE	spRefNum(A0),D0			; get the refNum
-			NOT		D0						; refNum -> unitnum
-			ASL		#2,D0					; get offset in unitTable
-			MOVE.L	UTableBase,A1			; get the base of the unit table
-			MOVE.L	(A1,D0),A3				; A3 = handle to the DCE
-			MOVE.L	(A3),A1					; get pointer to the DCE
-			MOVE.L	dCtlDevBase(A1),D0		; get dCtlDevBase
-			CMP.L	(A4)+,D0				; do they match?
-			BNE.S	badScrn					; => nope, bad screen resource
-
-; to be completely compulsive about it, make sure there's a grafDevice for it
-
-			MOVE.L	DeviceList,A3			; A3 = first grafdevice in list
-			MOVE	spRefNum(A0),D1			; get refnum
-@NxtGD		MOVE.L	(A3),A1					; get pointer to device
-			CMP		GDRefNum(A1),D1			; does refnum match?
-			BEQ.S	RectCheck				; => yes, this device matches!
-			MOVE.L	GDNextGD(A1),D0			; get handle of next device
-			MOVE.L	D0,A3					; get in A3
-			BNE.S	@NxtGD					; => check all grafDevices
-			BRA.S	badScrn					; => no such grafDevice, bad 'scrn'
-
-;
-; compare the size of the remembered screen rect to the size of this gDevice's
-;	gdRect.  At this point, the GDRects are still topleft=(0,0) from InitGDevice
-; 	so we can just check 'scrn' rect against botRight.
-
-RectCheck
-			ADD		#10,A4					; skip to global rect in scrn
-			MOVE.W	bottom(A4),D0			; get bottom
-			SUB.W	top(A4),D0				; = height
-			CMP.W	GDRect+bottom(A1),D0	; is it equal?
-			BNE.S	badScrn					; nope, we're out
-			MOVE.W	right(A4),D0			; get right
-			SUB.W	left(A4),D0				; = width
-			CMP.W	GDRect+right(A1),D0		; is it equal?
-			BNE.S	badScrn					; nope, we're out
-
-; this device matches!  go check next one
-
-SkipData	ADD		#8,A4					; skip to control field
-			MOVE	(A4)+,D0				; get number of control calls
-			BRA.S	SkipCtl					; skip control call
-SkipNxt		MOVE.L	(A4)+,D1				; get control code, size of params
-			ADD		D1,A4					; add size of params to skip block
-SkipCtl		DBRA	D0,SkipNxt				; => skip next control
-
-			SUBQ	#1,D7					; decrement device count
-			BMI.S	badScrn					; => oops, bad screen resource
-			BRA		NxtDev					; => check next device
-
-BadScrn
-;	If the screen resource is bad, then let's walk down the device list and offset
-;	the invalid screens' GDRects so that they don't all pile up at (0,0).  Let's keep
-;	is simple- I just put them all edge to edge, top edge at 0 (unchanged) and to the
-;	right of the previous guys.  Offset the GDPMap's rect also.
-
-			MOVE.L	DeviceList,A0			; get the head of the list (the boot screen)
-			MOVE.L	(A0),A0					; hndl->ptr
-			MOVE.W	GDRect+right(A0),D1		; get the boot screen's right edge (if the scrn
-											;   is invalid, then this is the real right edge)
-@Loop		MOVE.L	GDNextGD(A0),D0			; get handle to next screen
-			BEQ 	Done					; if NIL, then we're out of here
-			MOVE.L	D0,A0					; get this device
-			MOVE.L	(A0),A0					; hndl->ptr
-			ADD.W	D1,GDRect+left(A0)		; offset the left edge (normally zero)
-			ADD.W	D1,GDRect+right(A0)		; offset the right edge
-			MOVE.L	gdPMap(A0),A1			; get the GDPMap handle
-			MOVE.L	(A1),A1					; get the gdPMap pointer
-			ADD.W	D1,pmBounds+left(A1)	; offset the left edge (normally zero)
-			ADD.W	D1,pmBounds+right(A1)	; offset the right edge
-
-			MOVE.W	GDRect+right(A0),D1		; get the new right edge for the next device
-			BRA.S	@Loop					; for each screen
-
-GoodRsrc	_HideCursor						; cursor must be hidden here
-			MOVE.B	#1,CRSRBUSY 			; MARK CHANGE IN PROGRESS
-			MOVE.L	CRSRDEVICE,A0			; GET HANDLE TO CURSOR DEVICE
-			MOVE.L	(A0),A0					; POINT TO CURSOR DEVICE
-			MOVE.L	GDRECT+TOPLEFT(A0),D0	; GET SCREEN TOPLEFT
-			SUB		D0,MOUSE+H				; CONVERT MOUSE TO SCREEN LOCAL
-			SWAP	D0						; GET SCREEN TOP
-			SUB		D0,MOUSE+V				; CONVERT MOUSE TO SCREEN LOCAL
-			MOVE.L	MOUSE,MTEMP				; copy to mouse temp
-			MOVE.L	MOUSE,RAWMOUSE			; and to raw coordinates
-
-; configure each entry in the scrn resource
-
-			MOVE.L	StartList(A6),A4		; save pointer to start of list
-			MOVE	(A4)+,D7				; get the number of screens in resource
-			SUBQ	#1,D7					; make it 0 based
-
-DoNxt		LEA		SlotParms(A6),A0		; get pointer to parameter block
-			MOVE.L	#((CatDisplay << 16) ++ TypVideo),spCategory(A0)	;<C741>
-											; set category ID, type		<C741>
-			MOVE.W	#DrSwApple,spDrvrSw(A0)	;							<C741>
-											; set software, (invalid) hardware ID	<C741>
-			MOVE	(A4)+,spDrvrHw(A0)		; set driver hardware ID
-			MOVE.B	#$00,spTBMask(A0)		; all fields valid
-			MOVE	(A4)+,D0				; get slot
-			MOVE.B	D0,spSlot(A0)			; does it match?
-			MOVE.B	#0,spID(A0)				; start with first ID
-			CLR.B	spExtDev(A0)			;<C720>
-			_sNextTypesRsrc					; get next video device
-			BNE 	BadScrn					; => this should never be taken
-
-; we found a device that matches the given description!  Find its GDevice and configure it
-
-			MOVE	spRefNum(A0),D1			; D1 = refnum
-
-			MOVE.L	DeviceList,A3			; A3 = first grafdevice in list
-@NxtGD		MOVE.L	(A3),A0					; get pointer to device
-			CMP		GDRefNum(A0),D1			; does refnum match?
-			BEQ.S	@GotGD					; => yes, got the grafDevice
-			MOVE.L	GDNextGD(A0),D0			; get handle of next device
-			MOVE.L	D0,A3					; get in A0
-			BNE.S	@NxtGD					; => check all grafDevices
-			BRA 	BadScrn					; => this should never be taken
-
-@GotGD		MOVE.L	(A4)+,D0				; discard dCtlDevBase
-
-; set up the GDFlags word before calling InitGDevice
-
-@0			MOVE.L	(A3),A1					; point at the grafDevice
-			MOVE	GDFlags(A1),D0			; get the flags word
-			AND		2(A4),D0				; turn off the bits that are used
-			OR		4(A4),D0				; turn on new bits
-			BSET	#RAMInit,D0				; say we've initialized it
-			BSET	#ScreenDevice,D0		; and flag it as a screen device
-			MOVE	D0,GDFlags(A1)			; set the flags word
-
-; if main device, set up low-memory handles
-
-ChkMain		MOVE	GDFlags(A1),D0			; get the flags word
-			BTST	#mainScreen,D0			; is it the main scrn?			<2.2>
-			BEQ.S	@InitGD					; => no, go init device
-
-			MOVE.L	A3,MainDevice			; set up as main screen device
-			MOVE.L	A3,TheGDevice			; set up as default destination device
-			MOVE.L	A3,SrcDevice			; set up as default source device
-											; allocCursor called by initgraf to init cursor
-			MOVE.L	(A3),A0					; point to gDevice
-			MOVE.L	gdPMap(A0),A0			; get pixMap handle
-			MOVE.L	(A0),A0					; point to pixMap
-			MOVE.L	baseAddr(A0),D0			; get base address
-			MOVE.L	D0,scrnBase				; and set up screen base
-
-			LEA		SlotParms(A6),A0		; point at slot manager block again (it's still positioned from above)
-			MOVE	(A4),D0					; get the requested mode
-;+++			MOVE.B	D0,spID(A0)				; put in block						<BAL 06Apr89>
-			MOVE.B	#128,spId(A0)			; pass the default mode (assumed to be 1-bit mode)
-			_sFindStruct					; point to this mode information
-
-			MOVE.B	#mVidParams,spID(A0)	; now get the device pixmap
-			_sGetBlock						; on the system heap (I guess this is OK)
-			MOVE.L	spResult(A0),A1			; get the result pointer
-			MOVE.w	vpRowBytes(A1),screenRow ; get the screen row bytes (WORD)	<BAL 31Mar89>
-
-; set up the lo-mem for screen resolution too.  It's only WORD/WORD rather then FIXED/FIXED
-			MOVE.W	vpHRes(A1),ScrHRes		; Take the high word of vpHRes
-			MOVE.W	vpVRes(A1),ScrVRes		; Take the high word of vpVRes
-
-			MOVE.L	A1,spsPointer(A0)		; now, release the sBlock
-			_sDisposePtr					;
-
-@InitGD
-			MOVE	D1,-(SP)				; push refnum
-			MOVE	(A4)+,-(SP)				; push mode
-			CLR		-(SP)					; which should be long
-			MOVE.L	A3,-(SP)				; push grafDevice
-			_InitGDevice					; configure the grafDevice
-			ADDQ	#4,A4					; mask and flags already used
-
-;
-; if there is a gamma table resource id, get the gamma correction table and call the driver
-;	We need to do this before the color table to make sure it takes effect right away.
-;
-
-			MOVE	2(A4),D0				; get the gamma table resource id
-			CMP		#-1,D0					; is it -1?
-			BEQ.S	ChkTbl					; => yes, no table
-
-;
-; if the gamma table resource id = -2, then request linear gamma from the driver
-;
-
-			CMP		#-2,D0					; is it -2?
-			BNE.S	@GetFromSys				; nope, so load the system resource
-
-			LEA		VidParms(A6),A1			; point to parameter block
-			CLR.L	csGTable(A1)			; pass NIL to tell new drivers to set linear
-			BSR.S	GammaControl			; call a common routine to set gamma
-			BRA.S	ChkTbl				;
-
-;
-; load the gamma resource from the system and set it
-;
-
-@GetFromSys
-			CLR.L	-(SP)					; make room for function result
-			MOVE.L	#'gama',-(SP)			; push gamma table rsrc type
-			MOVE	D0,-(SP)				; else push resource id
-			_GetResource					; try to read in gamma table
-			MOVE.L	(SP)+,D0				; get the result
-			BEQ.S	ChkTbl					; => couldn't find it, use default
-			MOVE.L	D0,-(SP)				; save a copy for later
-			MOVE.L	D0,A0					; setup for HLock
-			_HLock							;
-			LEA		VidParms(A6),A1			; point to params for SetGamma
-			MOVE.L	(A0),csGTable(A1)		; gamma table pointer is only param
-			BSR.S	GammaControl			; call a common routine
-			MOVE.L	(SP),A0					; get the resource handle back
-			_HUnlock						; free it
-			_ReleaseResource				; and release it (fixing the stack)
-			BRA.S	ChkTbl					; continue on
-
-;
-; here's an imbedded utility.  I know I burn 2 bytes always BSRing around it, but I
-;	would burn two with a word branch if the utility were outside.  This routine sets
-;	up the iopb and csParam block for a SetGamma control call.  It expects the csGTable
-;	field to be set up, the csParam block pointer in A1, and the gdevice pointer in A3.
-;
-
-GammaControl
-			LEA		IOPBlk(A6),A0			; point to parameter block
-			MOVE.L	A1,csParam(A0)			; move addr of parms into block
-			MOVE.W	#4,csCode(A0)			; csc_SetGamma
-			CLR.L	ioCompletion(A0)		; no completion routine
-			CLR.W	ioVRefNum(A0)			; no volRefNum
-			MOVE.L	(A3),A1					; point to gdevice
-			MOVE	GDRefNum(A1),ioRefNum(A0)	; set device's refnum
-			_Control ,IMMED					; SetGamma(GammaTable)
-											;   if error here (likely if -2 were passed to
-											;	and old driver) then just use default table
-			RTS								; and back
-
-;
-; Previously, if there was a color table resource id, this part loaded that table.  Now,
-;	it checks the state of the gdDevType bit.  If it is monochrome (=0), then this routine
-;	substitutes pixelSize+32 for the resID.  If it is color (=1) and 2- or 4-bit mode, then
-;	pixelSize+64 is substituted to yield a modified color table that includes the highlight
-;	color.
-;
-; If we EVER have a gamma ID <> -1 (not default), then be sure to set the color table	<2.3>
-;	to flush this gamma into the CLUT hardware.
-;
-; The pointer to the gDevice is still in A1.
-;
-
-ChkTbl
-			MOVE.L	(A3),A1					; point to the gDevice again
-			MOVE.L	gdPMap(A1),A0			; get pixmap
-			MOVE.L	(A0),A0					; get pixmap ptr
-			MOVE.W	pmPixelSize(A0),D0		; get depth
-
-			CMP		#DirectType,gdType(A1)	; is it a direct device?
-			BEQ 	SetGRect				; if so, then do nothing
-
-			BTST	#gdDevType,gdFlags+1(A1)	; is it color or monochrome mode?
-			BNE.S	@ClrMode				; if set, then this is color
-			cmp.w	#2,d0					; 1 or 2 bit/pixel?						<2.1>
-			ble.s	@regClr					; don't do anything funky				<2.1>
-@MonoMode
-			ADD		#32,D0					; add 32 to pixelsize in all modes for linear gray
-			BRA.S	@GetClut				;
-@ClrMode
-			MOVE.W	D0,D1					; copy the depth
-			AND		#9,D1					; is it 1- or 8-bit mode?
-			BNE.S	@regClr					; if so, then do regular behavior
-@is2or4
-			ADD		#64,D0					; for 2- or 4-bit, add 64 to pixel depth (gives color+highlight)
-			BRA.S	@GetClut				;
-
-@regClr
-			MOVE	(A4),D1					; get the color table resource id
-			CMP		#-1,D1					; is it -1?
-			BNE 	@GetClut				; if not, then set the CLUT				<2.3>
-			CMP		#-1,2(A4)				; if CLUTid=-1, and gammaID<>-1, then set CLUT to flush <2.3>
-			BEQ.S	SetGRect				; if both are default, then continue	<2.3>
-
-@GetClut	CLR.L	-(SP)					; make room for function result
-			MOVE	D0,-(SP)				; else push resource id
-			_GetCTable						; get a color table
-			MOVE.L	(SP)+,D0				; get the result
-			BEQ.S	SetGRect				; => couldn't find it, use default
-
-			MOVE.L	(A3),A0					; point at the grafDevice
-			MOVE.L	GDPMap(A0),A0			; get handle to its pixmap
-			MOVE.L	(A0),A0					; point at the pixmap
-			MOVE.L	pmTable(A0),-(SP)		; push our color table for set entries  <C1/9>
-			MOVE.L	D0,-(SP)				; push new table handle for dispose		<C1/9>
-			MOVE.L	D0,-(SP)				; push source color table				<C1/9>
-			MOVE.L	pmTable(A0),-(SP)		; push destination color table			<C1/9>
-			_CopyHandle						; copy new table into our handle		<C1/9>
-			_DisposCTable					; and dispose new handle				<C1/9>
-
-; now call the driver to set this color table (handle on stack)
-
-			MOVE.L	(SP),A0					; get handle to color table
-			_HLock							; lock down the color table
-			LEA		VidParms(A6),A1			; point to params for SetEntries
-			MOVE.L	(A0),A0					; get ctabPtr							<DAF>
-			CLR.W	csStart(A1)				; start at zero, use sequence mode		<DAF>
-			MOVE.W	ctSize(A0),csCount(A1)	; for the length of the table			<DAF>
-			LEA		ctTable(A0),A0			; get pointer to colorspecs				<DAF>
-			MOVE.L	A0,csTable(A1)			; color table pointer is first param	<DAF>
-			LEA		IOPBlk(A6),A0			; point to parameter block
-			MOVE.L	A1,csParam(A0)			; move addr of parms into block
-			MOVE.W	#3,csCode(A0)			; csc_SetEntries
-			CLR.L	ioCompletion(A0)		; no completion routine
-			CLR.W	ioVRefNum(A0)			; no volRefNum
-			MOVE.L	(A3),A1					; point to gdevice
-			MOVE	GDRefNum(A1),ioRefNum(A0)	; set device's refnum
-			_Control ,IMMED					; SetEntries(ColorTable);
-			MOVE.L	(SP),A0					; get handle to color table
-			_HUnLock						; unlock the color table
-
-; finally, generate an inverse table for the table (handle on stack)
-
-											; color table handle on stack
-			MOVE.L	(A3),A1					; point at the grafDevice
-			MOVE.L	GDITable(A1),-(SP)		; push inverse table handle
-			MOVEQ	#4,D0					; make 4-4-4 inverse tables
-			MOVE	D0,GDResPref(A1)		; save in GDevice
-			MOVE	D0,-(SP)				; and push res
-			_MakeITable						; and generate inverse table
-
-; use the specified rectangle to determine the device's global coordinates
-
-SetGRect
-			ADDA	#4,A4					; skip the CLUT and gamma resID's
-			MOVE.L	(A3),A0					; point to the grafDevice
-			MOVE.L	GDPMap(A0),A1			; get handle to pixMap
-			MOVE.L	(A1),A1					; get pointer to pixMap
-			ADDQ	#Bounds,A1				; point to pixMap.bounds
-			LEA		GDRect(A0),A0			; point to its rectangle
-			MOVE.L	(A4)+,D0				; get topLeft for mouse offset
-			MOVE.L	D0,(A1)+				; copy topLeft to pixMap.bounds
-			MOVE.L	D0,(A0)+				; copy topLeft to GDRect
-			MOVE.L	(A4),(A1)				; copy botRight to pixMap.bounds
-			MOVE.L	(A4)+,(A0)+				; copy botRight to GDRect
-
-; parse and execute the additional control commands
-
-			MOVE	(A4)+,D6				; get number of control calls
-			BRA.S	ChkNxtCtl				; => jump into end of dbra loop
-DoCtl		LEA		IOPBlk(A6),A0			; point to parameter block
-			LEA		4(A4),A1				; point to call parameters
-			MOVE.L	A1,csParam(A0)			; move addr of parms into block
-			MOVE.W	(A4)+,csCode(A0)		; set control code
-			CLR.L	ioCompletion(A0)		; no completion routine
-			CLR.W	ioVRefNum(A0)			; no volRefNum
-			MOVE.L	(A3),A1					; point to gdevice
-			MOVE	GDRefNum(A1),ioRefNum(A0)	; set device's refnum
-			_Control ,IMMED					; and issue the control call
-
-			MOVE	(A4)+,D0				; get size of param block
-			ADD		D0,A4					; skip param block
-ChkNxtCtl	DBRA	D6,DoCtl				; loop for all control calls
-
-ChkNxt		DBRA	D7,DoNxt				; loop for all screens in resource
-
-; NOW UPDATE THE MOUSE TO THE COORDINATE SYSTEM OF ITS SCREEN AND DISPLAY IT
-
-			MOVE.L	CRSRDEVICE,A0			; GET HANDLE TO CURSOR DEVICE
-			MOVE.L	(A0),A0					; POINT TO CURSOR DEVICE
-			MOVE.L	GDRECT+TOPLEFT(A0),D0	; GET SCREEN TOPLEFT
-			ADD		D0,MOUSE+H				; CONVERT MOUSE TO GLOBAL
-			SWAP	D0						; GET SCREEN TOP
-			ADD		D0,MOUSE+V				; CONVERT MOUSE TO GLOBAL
-			MOVE.L	MOUSE,MTEMP				; copy to mouse temp
-			MOVE.L	MOUSE,RAWMOUSE			; and to raw coordinates
-			CLR.B	CRSRBUSY				; end of change
-			_AllocCursor					; make sure cache structures are OK			<5+>
-			_ShowCursor						; now redisplay cursor
-
-DONE		_ReleaseResource				; all done with the resource
-
-GoHome		MOVEM.L	(SP)+,D6-D7/A2-A4		; restore work registers
-			UNLINK	PARAMSIZE,'CHECKDEV'
-
-	ENDWITH
+		RTS
 
 ;-------------------------------------------------------------
 ;
diff --git a/QuickDraw/GWorld.a b/QuickDraw/GWorld.a
index c2a1838..3165b6f 100644
--- a/QuickDraw/GWorld.a
+++ b/QuickDraw/GWorld.a
@@ -695,6 +695,9 @@ varSize			equ		localRect			; size of local variables
 
 		move	#noErr,result(a6)			; flag a successful operation,
 
+		move.l	offscreenGWorld(a6),a0
+		clr.l	(a0)
+
 ;-------------------------------------------------------------------------
 ; Initialize all offscreen local variables to zero.
 ; If an error happens during this function, we deallocate the memory for
@@ -765,6 +768,14 @@ varSize			equ		localRect			; size of local variables
 		cmp		#32,d7						; illegal if > 32
 		bhi		badPixelDepth				; exit with error
 
+;-------------------------------------------------------------------------
+; Treat 24-bit color as 32-bit.
+
+		cmp		#24,d7
+		bne.s	@dontSetTo32
+		moveq	#32,d7
+@dontSetTo32
+
 ;-------------------------------------------------------------------------
 ; If pixelDepth is not 0, don't try to align offscreen pixmap to screen
 
@@ -1003,6 +1014,17 @@ createPixMap
 		moveq	#5,d0						; no, cmpSize = 5
 @0		move	d0,pmCmpSize(a1)			; store cmpSize in pixmap
 
+		btst.l	#$1,d3
+		beq.s	@skipthisnonsense
+		move.l	([museDevice,a6]),a0
+		move.l	([gdPMap,a0]),a0
+		move.l	gdMode(a0),a0
+		move.l	a0,offscreenCTable(a6)
+		move.l	([offscreenPixMap,a6]),a1
+		move.l	a0,gdMode(a1)
+		bra		createDevice
+@skipthisnonsense
+
 ; Create an empty color table.
 
 		move	#ctRec,d0					; size of an empty color table
@@ -1025,7 +1047,7 @@ createPixMap
 
 ; Create a dummy inverse table (doesn't have to be a seed)
 
-		moveq	#2,d0						; small handle for dummy inverse table
+		moveq	#4,d0						; small handle for dummy inverse table
 		_NewHandle	,CLEAR					; allocate it
 		bne		reportError					; if Memory Manager error, report it and quit
 
@@ -1149,7 +1171,7 @@ dontCloneCTab
 
 ; Allocate inverse table to its initial size
 
-		moveq	#2,d0						; initial size is 2
+		moveq	#4,d0						; initial size is 2
 		_NewHandle	,CLEAR					; allocate it
 		bne		reportError					; if Memory Manager error, report it and quit
 
@@ -1393,9 +1415,9 @@ disposOffscreenHandles
 		move	portVersion(a0),d0			; get portVersion
 		and		#cPortFlag,d0				; check if cPortFlag set
 		cmp		#cPortFlag,d0				; is it set?
-		bne		@0							; if not set, don't close port
+		bne.s	@0							; if not set, don't close port
 		move.l	(a0),-(sp)					; push pointer to port
-		_ClosePort							; close it down
+		_CloseCPort							; close it down
 @0
 		move.l	d7,a0						; get handle to offscreen port
 		_DisposHandle						; dispose it
@@ -1732,7 +1754,7 @@ dontDisposeBaseAddr
 
 dontDisposeGDevice
 		move.l	offscreenGWorld(sp),-(sp)	; push pointer to offscreen port
-		_ClosePort							; get rid of all substructures
+		_CloseCPort							; get rid of all substructures
 
 		move.l	offscreenGWorld(sp),a0		; get pointer to grafport
 		_RecoverHandle						; find handle to grafport
diff --git a/QuickDraw/GrafAsm.a b/QuickDraw/GrafAsm.a
index 99d678d..cefa226 100644
--- a/QuickDraw/GrafAsm.a
+++ b/QuickDraw/GrafAsm.a
@@ -72,7 +72,7 @@ SIZEOK		_NewHandle ,CLEAR					; ask OS to do request
 ;  handle the memory full error by deep-shitting
 
 MemFull 	MOVEQ	#25,D0						;Deep Shit memory full error code
-			_SysError
+			DC.W	$A9C9						;_SysError
 JacksonPollock
 			DC.W	$A9FF						;invoke debugger just in case it comes back
 
@@ -315,7 +315,6 @@ CRSRLP		MOVE.L	(A0)+,(A4)+ 				;COPY A LONG INTO GLOBALS
 
 ; IF SCREENS NOT INITIALIZED FROM 'scrn' RESOURCE, INIT THEM
 
-			bsr.l	CheckDevices				; configure screens, if needed
 			MOVE.L	MainDevice,A0				; get main device
 			MOVE.L	A0,theGDevice				; set gDevice
 			MOVE.L	A0,srcDevice				; and srcDevice just in case
diff --git a/QuickDraw/LCursor.a b/QuickDraw/LCursor.a
index 0dcf8cf..1e2ea5b 100644
--- a/QuickDraw/LCursor.a
+++ b/QuickDraw/LCursor.a
@@ -40,11 +40,7 @@ AllocCursor PROC  	EXPORT
 ;  PROCEDURE AllocCursor;
 ;
 
-		LEA		AllocCrsr,A0				;get default cursor routine
-		MOVE.L	JAllocCrsr,D0				;has vector been initialized?
-		BEQ.S	@0							;=>no, use default routine
-		MOVE.L	D0,A0						;else use routine in vector
-@0		JMP		(A0)						;and call it
+		JMP		AllocCrsr
 
 
 InitCursor PROC  EXPORT 	
@@ -55,8 +51,8 @@ InitCursor PROC  EXPORT
 		MOVE.L	GRAFGLOBALS(A5),A0			;POINT TO QUICKDRAW GLOBALS
 		PEA 	ARROW(A0)					;PUSH ADDR OF ARROW
 		_SetCursor							;INSTALL ARROW CURSOR
-		MOVE.L	JInitCrsr,A0				;get lo mem pointer
-		JMP 	(A0)						;and call it
+		IMPORT	_InitCursor
+		JMP 	_InitCursor
 
 
 
@@ -70,8 +66,8 @@ SetCursor PROC	EXPORT
 		MOVE	#16,-(SP)					;HEIGHT:=16
 		PEA 	DATA(A0)					;PUSH ADDR OF DATA
 		PEA 	MASK(A0)					;PUSH ADDR OF MASK
-		MOVE.L	JSetCrsr,A0 				;get lo mem vector
-		JSR 	(A0)						;call vector
+		IMPORT 	_SetCursor
+		JSR 	_SetCursor
 		MOVE.L	(SP)+,(SP)					;strip param
 		RTS 								;and return
 		
@@ -92,8 +88,8 @@ SetCCursor PROC	EXPORT
 ;		_SetCursor							; and set it the old way
 
 		MOVE.L	4(SP),-(SP)					; Push handle to color cursor
-		MOVE.L	JSetCCrsr,A0 				; get lo mem vector
-		JSR 	(A0)						; call vector (but don't call him hector)
+		IMPORT	_SetCCursor
+		JSR 	_SetCCursor
 ;		_ShowCursor							; balance is a virtue
 		MOVE.L	(SP)+,(SP)					; strip param
 		RTS 								; and return
@@ -107,8 +103,8 @@ HideCursor PROC  EXPORT
 ;
 ;  ALL REGS PRESERVED.
 ;
-		MOVE.L	JHideCursor,-(SP)			;get lo mem vector
-		RTS 								;and call it
+		IMPORT	_HideCursor
+		JMP		_HideCursor
 
 
 
@@ -119,36 +115,8 @@ ShowCursor PROC  EXPORT
 ;
 ;  ALL REGS PRESERVED.
 ;
-		MOVE.L	JShowCursor,-(SP)			;get lo mem vector
-		RTS 								;and call it
-
-
-
-ShieldCursor PROC  EXPORT		
-;---------------------------------------------------------
-;
-;  PROCEDURE ShieldCursor(shieldRect: Rect; offset: Point);
-;
-;  ALL REGS PRESERVED.
-;
-		MOVEM.L D0-D3/A0-A1,-(SP)			;SAVE REGS
-		MOVE.L	32(SP),A0					;POINT TO SHIELDRECT
-		MOVEM.W (A0)+,D0/D1/D2/D3			;GET TOP ... RIGHT
-		LEA 	28(SP),A1
-		SUB 	(A1),D0 					;TOP - OFFSET.V
-		SUB 	(A1)+,D2					;BOTTOM - OFFSET.V
-		SUB 	(A1),D1 					;LEFT - OFFSET.H
-		SUB 	(A1),D3 					;RIGHT - OFFSET.H
-		MOVE	D1,-(SP)					;PUSH GLOBAL LEFT
-		MOVE	D0,-(SP)					;PUSH GLOBAL TOP
-		MOVE	D3,-(SP)					;PUSH GLOBAL RIGHT
-		MOVE	D2,-(SP)					;PUSH GLOBAL BOTTOM
-		MOVE.L	JShieldCursor,A0			;get lo mem vector
-		JSR 	(A0)						;and call it
-		MOVEM.L (SP)+,D0-D3/A0-A1			;RESTORE REGS
-		MOVE.L	(SP)+,(SP)
-		MOVE.L	(SP)+,(SP)					;STRIP 8 BYTES
-		RTS 								;AND RETURN
+		IMPORT	_ShowCursor
+		JMP		_ShowCursor
 
 
 
@@ -159,10 +127,8 @@ ObscureCursor PROC	EXPORT
 ;
 ;  Hide the cursor image until the next time the mouse moves.
 ;
-		MOVE.L	JCrsrObscure,A0 			;get lo mem vector
-		JMP 	(A0)						;and call it
-
-
+		IMPORT	_ObscureCursor
+		JMP		_ObscureCursor
 
 
 		ENDPROC 
diff --git a/QuickDraw/PaletteMgr.a b/QuickDraw/PaletteMgr.a
index cad5eb0..f75181a 100644
--- a/QuickDraw/PaletteMgr.a
+++ b/QuickDraw/PaletteMgr.a
@@ -172,7 +172,7 @@ plttUpdates	Equ		$0002			; value passed to SetPalette [short]			AWC.PB457
 ;ctReserveBit	EQU	6
 ;ctReserveVal	EQU	$4000
 
-PMgrVersNum		EQU	$0202			; Version number (VVss: version subversion)				
+PMgrVersNum		EQU	$0203			; Version number (VVss: version subversion)				
 ;-----------------------------------------------------------
 ; Let's talk about PMgrVersNum --
 ;
@@ -228,6 +228,46 @@ PMgrVersNum		EQU	$0202			; Version number (VVss: version subversion)
 ;	GetNewCWindow which is patched in PatchIIROM.a
 
 
+FlushPalettes	PROC	EXPORT				; THIEVED FROM THE MEMORY MGR
+;-----------------------------------------------------------------------
+; Call DisposePalette for all palettes in the app heap.
+;
+; Registers: D0-D2/A0-A1
+; Called by vIAZInit.
+;----------------------------------------------------------------------
+			IMPORT	AppZoneAddr
+
+			MOVEM.L	A2-A3/D3,-(SP)			; save work registers
+			MOVE.L	PMgrHandle,A2			; get paletteMgr handle
+			CMP.L	MinusOne,A2				; is it there?
+			BEQ.S	@DONE					; => no, just return
+			MOVE.L	(A2),A1					; point to data structure
+			MOVE.L	PListHandle(A1),A0		; get handle to palette list
+			_HLock							; and lock it down
+			MOVE.L	(A0),A3					; point to palette list
+
+			Move	APalettes(A1),D3		; get number of active handles
+			Beq.s	@NoPals					; no friends => go home
+			Add		FreeSpaces(A1),D3		; calculate total number of entries
+			BRA.S	@FindEnd				; => check for no entries
+
+@FindLoop	Move.L	PaletteRef(A3),D1		; get first entry
+			BEQ.S	@FindNext				; => no palette in entry
+			MOVE.L	D1,D0					; and get for routine
+			JSR		AppZoneAddr				; in application area (or zero)?	<SM30 BT>
+			BNE.S	@FindNext				; => not in app heap
+			MOVE.L	D1,-(SP)				; push palette handle
+			DC.W	$AA93					; _DisposePalette ; and dispose it in place
+@FindNext	AddQ	#PLstEntrySz,A3			; bump to the next entry
+@FindEnd	DBra	D3,@FindLoop			; repeat for all spaces
+
+@NoPals		MOVE.L	(A2),A1					; point to palette stuff
+			MOVE.L	PListHandle(A1),A0		; get handle to palette list
+			_HUnlock						; and unlock it
+
+@DONE		MOVEM.L	(SP)+,A2-A3/D3			; restore work registers
+			RTS
+
 ;---------------------------------------------------
 ;
 ; PROCEDURE	ActivatePalette(dstWindow: WindowPtr); INLINE $AA94;
@@ -584,14 +624,8 @@ gLoopEnd	DBRA	D3,gLoop				; loop for all devices						<dvb5>
 ; return Z-flag Clear if the process mgr is here (BNE ProcMgrTrue)
 
 CheckForProcessMgr	PROC EXPORT
-			MOVE.L	#'os  ',D0				; type of question
-			_Gestalt
-			TST		D0						; OSErr from Gestalt?
-			BEQ.S	@a						; No=>test result
-			SUBA	A0,A0					; Yes=>assume there's no procMgr
-@a
-			MOVE.L	A0,D0
-			BTST	#gestaltLaunchControl,D0	; clear the Z-flag if procmgr here
+			MOVE.L	ExpandMem,A0
+			TST		$128(A0)
 			RTS
 
 ;---------------------------------------------------
@@ -624,7 +658,7 @@ linkSize	DS.B		0						; linky number
 
 			movem.l	a0-a2/d0-d2,-(sp)		; Those pesky c routines					<mc8>
 			sub.l	a0,a0					; Pass the current process (0)
-			move.w	#12,d0					; _TrashProcess
+			moveq	#12,d0					; _TrashProcess
 			;_FigmentDispatch				; let everyone know this stuff is gone
 			dc.w	$A0A4
 			movem.l	(sp)+,a0-a2/d0-d2		; Restore em
@@ -660,7 +694,7 @@ linkSize	DS.B		0						; linky number
 			PEA		inFront(A6)
 			_SameProcess					; are we the front process?
 			ADDQ	#2,SP					; OSErr leaves inFront true from above
-			TST		inFront(A6)
+			TST.B	inFront(A6)
 			BEQ.S	@doNothing
 @front
 
@@ -1805,8 +1839,9 @@ linkSize	DS.B		0						;linky number
 			MOVE.L	(A2),A3					; A3->gDevice
 			TST		gdType(A3)				; a clut device?							<dvb5>
 			BNE.S	GoHome					; No=> go home w/false
-			TST		gdFlags(A3)				; Device active?
-			BPL.S	GoHome					; No=> ditto
+			MOVE	$14(A3),D0
+			AND		#$8010,D0
+			BEQ.S	GoHome					; No=> ditto
 			SUBQ	#4,SP					; space for result							<dvb5>
 			MOVE.L	A2,-(SP)				; push gDevice handle						<dvb5>
 			JSR		GetClut					; get the appropriate default clut			<dvb5>
@@ -2505,8 +2540,9 @@ FoundAPltt	Move.L	A2,srcPalette(A6)		; save it so we can unlock it				AWC.PB520
 			BEQ.s	@a						; is it a clut device?						<dvb12>
 			SUBQ	#1,D1					; fixed type?								<dvb12>
 			BNE.S	UnlockPltt				; no => we're almost done					<dvb3>
-@a			TST		gdFlags(A0)				; is it active?
-			BPL.S	UnlockPltt				; no => ditto
+@a			MOVE	$14(A3),D0
+			AND		#$8010,D0
+			BEQ.S	UnlockPltt
 			Move	ciUsage(A3),D1			; get flags
 			MoveQ	#0,D0					; clear high word
 			Move	srcEntry(A6),D0			; set D0 in case it is an explicit index
@@ -3152,8 +3188,9 @@ SetDev
 			Move.L	(A0),A0					; dereference it
 			TST		gdType(A0)				; is it CLUT type (zero)?				dvb1
 			BNE		GoHome					; No => do nothing
-			TST		gdFlags(A0)				; is it active
-			BPL		GoHome					; No=>go home
+			MOVE	$14(A0),D0
+			AND		#$8010,D0
+			BEQ		GoHome					; No=>go home
 			Move.L	gdPMap(A0),A0			; get handle to pixmap
 			Move.L	(A0),A0					; dereference pixmap
 			Move.L	pmTable(A0),A0			; get handle to CTab
@@ -4542,66 +4579,7 @@ ReleaseList	PROC	EXPORT
 ;
 FindModeID	FUNC		Export
 
-			WITH		SpBlock,VPBlock
-
-FMVars		RECORD		{A6Link},Decrement
-result		DS.B		2					; integer result
-gd			DS.B		4					; input: GDevice
-depth		DS.B		2					; input: depth
-return		DS.B		4					; return address
-A6Link		DS.B		4					; link
-spBlk		DS.B		spBlockSize			; slot parameter block
-vpPtr		DS.B		4					; pointer to vidParams block
-linkSize	DS.B		0					; size of record
-			ENDR
-	
-			WITH		FMVars
-
-			LINK		A6,#linkSize
-			MOVEM.L		A2/D3,-(SP)				; save 'em
-
-			CLR			result(A6)				; default to failure!
-
-			MOVE.L		gd(A6),A0				; A0 = gDevice handle
-			MOVE.L		(A0),A1					; A1->gDevice
-
-			MOVE.L		UTableBase,A0			; A0->unit table
-			MOVE		gdRefNum(A1),D0			; D0 = refnum
-			NEG			D0
-			SUBQ		#1,D0
-			MOVE.L		(A0,D0.W*4),A1			; A1 = AuxDCEHandle for gDevice
-			MOVE.L		(A1),A1					; A1 = AuxDCEPtr for gDevice
-			LEA			spBlk(A6),A0			; A0 -> spBlock
-			MOVE.B		dCtlSlot(A1),spSlot(A0)		; stash gDevice slot
-			CLR.B		spID(A0)					; clear the ID
-			MOVE		#catDisplay,spCategory(A0)	; category: display
-			MOVE		#typVideo,spCType(A0)
-			MOVE		#drSwApple,spDrvrSW(A0)		; Appleª style driver
-			MOVE.B		#1,spTBMask(A0)
-			_sNextTypeSRsrc
-			BNE.S		@goHome					; failure
-
-			MOVE.L		spsPointer(A0),A2		; keep saving it here
-			MOVE		#127,D3					; the 0th mode we'll look for
-
-@depthScan
-			ADDQ		#1,D3					; bump to next mode
-			MOVE.B		D3,spID(A0)				; look for the next mode
-			MOVE.L		A2,spsPointer(A0)		; sFindStruct wipes out each time
-			_sFindStruct						; look for it
-			BNE.S		@goHome					; failure
-			MOVE.B		#mVidParams,spID(A0)	; now we look for video params
-			_sGetBlock
-			BNE.S		@goHome					; failure
-			MOVE.L		spResult(A0),A1			; A1->vidParam block, finally
-			MOVE		vpPixelSize(A1),D0		; D0 = depth for this description
-			CMP			depth(A6),D0			; the one we want?
-			BNE.S		@depthScan				; scan 'til found, or slot error
-
-			MOVE		D3,result(A6)
-@goHome		MOVEM.L		(SP)+,A2/D3
-			UNLK		A6
-			RTD			#result-return-4
+			RTS
 
 
 
@@ -4625,6 +4603,7 @@ A6Link		DS.B		4							; link
 r			DS.B		4							; regionhandle
 oldPort		DS.B		4							; previous port
 myRect		DS.B		8							; rectangle for little black corners
+moreStuff	DS.B		10							; not sure what for?
 linkSize	DS.B		0							; size of record
 			ENDR
 
@@ -4634,10 +4613,31 @@ linkSize	DS.B		0							; size of record
 			MOVEM.L		A2-A3/D3-D5,-(SP)			;												<6>
 
 			MOVE		#paramErr,result(A6) ; default to failure!
+			MOVE.B		#1,myRect+6(A6)
+			MOVEQ		#0,D0
+			MOVE		depth(A6),D0
+			MOVE.L		D0,r(A6)
 
-			MOVE.L		gd(A6),A0					; A0 = gDevice handle
-			MOVE.L		(A0),A1						; A1->gDevice
+			CLR			-(SP)
+			MOVE.L		gd(A6),-(SP)
+			CLR.L		-(SP)
+			MOVE.L		r(A6),-(SP)
+			PEA			oldPort(A6)
+			CLR.L		-(SP)
+			PEA			myRect+7(A6)
 
+			MOVE		#$C12,D0					; _DMRemoveDisplay
+			DC.W		$ABEB
+
+			TST			(SP)+
+			BNE.S		@goHome
+
+			MOVE.L		oldPort(A6),D0
+			BTST.L		#1,D0
+			BNE.S		@goHome
+
+			MOVE.L		gd(A6),A1
+			MOVE.L		(A1),A1
 			MOVE		whichFlags(A6),D0			; D0 = mask of flags to change
 			ANDI		#whichMask,D0				; D0 = only the ones we let them change
 			MOVE		D0,D1						; D1 = mask of flags to change
@@ -4646,137 +4646,21 @@ linkSize	DS.B		0							; size of record
 			AND			gdFlags(A1),D0				; D0 = all the unchanged gdFlags
 			OR			D1,D0						; D0 = new gdFlags word
 			MOVE		D0,gdFlags(A1)				; Put back into gDevice
-			MOVE		gdRefNum(A1),D3				; D3 = refnum, for later use
-			
-			MOVE		depth(A6),D4				; get the depth or mode
-			TST.B		D4							; see which it is
-			BMI.S		@gotMode
 
-			SUBQ		#2,SP
+			CLR			-(SP)
 			MOVE.L		gd(A6),-(SP)
-			MOVE		D4,-(SP)
-			Import		FindModeID
-			BSR			FindModeID					; find the mode number, if it exists
-			MOVE		(SP)+,D4					; did we find one?
-			BEQ			@goHome
-
-@gotMode	Movea.l		gd(A6),A2					; Get GDHandle into A2.
-			Movea.l		(A2),A2						; Get a GDPtr into A2.
-			Btst		#mainScreen,gdFlags(A2)		; If weÕre not on the menubar screen,
-			Beq.s		@NotMain1					;	then just keep going.
-			Move.w		theMenu,D5					; Get the currently hilited menuID.
-			Clr.w		-(Sp)						; And unhilite it.
-			_HiliteMenu
-@NotMain1
-
-;			Originally, DVB wasnÕt getting the current port until corner-rounding code
-;			was about to be executed (below).  That seemed to cause port problems, so
-;			I move the port getting/setting code to here (which is the way Monitors
-;			does it).
-;
-;			-- jmp --
-
-			PEA			oldPort(A6)					; Save the current port
-			_GetPort
-			MOVE.L		WMgrPort,-(SP)				; We want to use the WMgrPort
-			_SetPort
-
-			MOVE		D3,-(SP)					; push refnum
-			EXT.L		D4
-			MOVE.L		D4,-(SP)					; push new gdev mode
-			MOVE.L		gd(A6),-(SP)				; push the handle
-			_InitGDevice
-
-			Btst		#mainScreen,gdFlags(A2)		; If weÕre not on the menubar screen,
-			Beq.s		@NotMain2					;	then just keep going.
-			Move.w		D5,-(Sp)					; Get the hilite state.
-			_HiliteMenu								; Restore it.
-			_DrawMenuBar							; Draw the MenuBar.
-@NotMain2
-
-			CLR.L		-(SP)						; Activate the front palette
-			_FrontWindow							; before drawing anything.
-			_ActivatePalette
-
-;			In Monitors (the cdev) this is the point in the code where
-;			the PortList is walked to update all the CGrafPorts to the
-;			new depth.  We donÕt need to do that here because InitGDevice
-;			does that for us with Save/ResoreFore and Save/RestoreBack
-;			calls.
-;
-;			-- jmp --
-
-;			If the LayerManger is around, we need to start at the root, otherwise
-;			we just use FrontWindow.  Originally, DVB had PaintOne instead of
-;			PaintBehind here but VL said that was wrong.  Also, Monitors uses the
-;			PaintOne/PaintBehind method instead of PaintOne/PaintOne method.
-;			
-;			-- jmp --
-
-		If HasLayers Then
-			_RedrawAll								; CheckUpdate on all layers		<42>
-		Else
-			SUBQ		#4,SP
-			_NewRgn
-			MOVE.L		(SP),r(A6)					; get a fresh region, LEAVE ON STACK
-
-			MOVE.L		gd(A6),A0					; A0 = gd handle
-			MOVE.L		(A0),A0						; A0->gdevice
-			PEA			gdRect(A0)					; push rectangle to RectRgn
-			_RectRgn								; r is now our region
-
 			CLR.L		-(SP)
-			MOVE.L		r(A6),-(SP)
-			_PaintOne
+			PEA			r(A6)
+			CLR.L		-(SP)
+			CLR.L		-(SP)
 
-			SUBQ		#4,SP
-			_FrontWindow
-			MOVE.L		r(A6),-(SP)
-			_PaintBehind
+			MOVE		#$A11,D0					; _DMEnableDisplay
+			DC.W		$ABEB
 
-			MOVE.L		r(A6),-(SP)					; Done with region
-			_DisposRgn
-		Endif
-		
-			CLR.L		myRect+topLeft(A6)			; Set the empty rect
-			CLR.L		myRect+botRight(A6)
-			MOVE.L		deviceList,A2				; A2 = 1st GDHandle
-@dloop		MOVE.L		(A2),A2						; A2 -> GDevice
-			BTST		#screenActive,gdFlags(A2)	; bit 15 in upper byte of word
-			BEQ.S		@dloopEnd					; Inactive screen?
-			PEA			gdRect(A2)
-			PEA			myRect(A6)
-			MOVE.L		(SP),-(SP)
-			_UnionRect
-@dloopEnd	MOVE.L		gdNextGD(A2),A2
-			MOVE.L		A2,D0
-			BNE.S		@dloop
+			MOVE		(SP)+,result(A6)
 
-			PEA			myRect(A6)					; Set a nice big clip
-			_ClipRect
-			PEA			myRect(A6)
-			MOVE.L		#$FFFDFFFD,-(SP)			; outset by three
-			_InsetRect
-			MOVE.L		#$00030003,-(SP)			; pensize is three
-			_PenSize
-			PEA			myRect(A6)
-			MOVE.L	#$00160016,-(SP)				; and a radius for nice rounding
-			_FrameRoundRect 						; and black out the corners
-
-			_PenNormal
-
-			MOVE.L		oldPort(A6),-(SP)			; restore the previous port
-			_SetPort
-
-			MOVE.L		gd(A6),A0
-			MOVE.L		(A0),A0
-			BTST		#mainScreen,gdFlags(A0)		; (mainScreen=11, in upper byte)
-			BEQ.S		@notMain
-			_DrawMenuBar
-@notMain
-			CLR			result(A6)					; success
 @goHome
-			MOVEM.L		(SP)+,A2/D3-D5
+			MOVEM.L		(SP)+,A2-A3/D3-D5
 			UNLK		A6
 			RTD			#result-return-4
 
@@ -4790,13 +4674,15 @@ HasDepth	FUNC		EXPORT
 whichMask	EQU			$FFFE				; the lowest bit is settable, else fail
 
 SDVars		RECORD		{A6Link},DECREMENT
-result		DS.B		2					; boolean result
-gd			DS.B		4					; input: GDevice to set
-depth		DS.B		2					; input: depth to set to
-whichFlags	DS.B		2					; which GDFlags to affect
-flags		DS.B		2					; input: various flags
-return		DS.B		4					; return address on stack
+result		DS.B		2					; 18 $12 boolean result
+gd			DS.B		4					; 14 $E input: GDevice to set
+depth		DS.B		2					; 12 $C input: depth to set to
+whichFlags	DS.B		2					; 10 $A which GDFlags to affect
+flags		DS.B		2					; 8  $8 input: various flags
+return		DS.B		4					; 4  $4 return address on stack
 A6Link		DS.B		4					; link
+myDepth		DS.B		4
+moreStuff	DS.B		24
 linkSize	DS.B		0					; size of record
 			ENDR
 
@@ -4809,13 +4695,43 @@ linkSize	DS.B		0					; size of record
 			MOVE		whichFlags(A6),D0	; D0 = mask of flags to change
 			AND			flags(A6),D0		; D0 = new flags to set
 			AND			#whichMask,D0		; D0 = all the bits we can't change
-			BNE.S		@goHome				; User tried to set bits we don't yet do!
+			BNE			@goHome				; User tried to set bits we don't yet do!
+
+			MOVEQ		#0,D0
+			MOVE		depth(A6),D0
+			MOVE.L		D0,myDepth(A6)
+
+			CLR			moreStuff+0(A6)
+			CLR.L		moreStuff+2(A6)
+			CLR			moreStuff+6(A6)
+			CLR.L		moreStuff+8(A6)
+			CLR.L		moreStuff+12(A6)
+
+			CLR			-(SP)
+			MOVE.L		gd(A6), -(SP)
+			PEA			moreStuff(A6)
+			MOVE.L		myDepth(A6), -(SP)
+			PEA			-$C(A6)
+			CLR.L		-(SP)
+
+			MOVE		#$AF3,D0					; unknown _DisplayDispatch selector
+			DC.W		$ABEB
+
+			TST			(SP)+
+			BNE.B		@goHome
+
+			MOVEQ.L		#$7F, D0
+			MOVEQ.L		#0, D1
+			MOVE		depth(A6), D1
+			CMP.L		D1, D0
+			BLT.B		@whaaa
+
+			MOVE		$C(A6), D0
+			CMP			-$C(A6), D0
+			BNE.B		@goHome
+
+@whaaa		MOVE		-$1C(A6), $12(A6)
 
-			SUBQ		#2,SP
-			MOVE.L		gd(A6),-(SP)
-			MOVE		depth(A6),-(SP)
-			BSR			FindModeID			; find the mode number, if it exists
-			MOVE		(SP)+,result(A6)	; did we find one?
 @goHome
 			UNLK		A6
 			RTD			#result-return-4
@@ -5087,6 +5003,7 @@ linkSize	DS.B		0					; size of record
 			_HLock
 			MOVE.L		(A0),A2				; A2->color table to check
 			MOVE		ctSize(A2),D3		; D3 = last color in table
+			BEQ.S		@goHome
 			MOVEQ		#0, D5				; initialized number of colors checked
 ;			MOVE		D3,D0
 ;			ADDQ		#1,D0
@@ -5108,6 +5025,9 @@ linkSize	DS.B		0					; size of record
 @next		ADDQ		#8,A2				; Bump to next color
 			DBRA		D3,@loop			; loop through all colors
 
+			TST			D5
+			BEQ.S		@goHome
+
 			DIVU		D5,D7				; compute average tolerance
 ;			DIVU		colorCount(A6),D7	; compute average tolerance
 			CMP			maxAveTol(A6),D7	; in range?
diff --git a/QuickDraw/Patterns.a b/QuickDraw/Patterns.a
index fcd6b49..7e0a641 100644
--- a/QuickDraw/Patterns.a
+++ b/QuickDraw/Patterns.a
@@ -2308,12 +2308,12 @@ VARSIZE		EQU		DstRgnPtr
 			move.w	dstPix+pixelSize(A6),d0			; preload dst depth in case not screen
 			sub.l	a0,a0							; clear maskrgn in case not screen
 			move.w	d2,d3							; remember screen flag in d3
-			beq.s	NotScreen1
+			beq		NotScreen1
 
 			MOVE.L	DEVICELIST,A2					; GET FIRST ELEMENT IN DEVICE LIST
 			MOVE.L	(A2),A1							; POINT TO DEVICE
 			TST.L	GDNEXTGD(A1)					; CHECK NEXT DEVICE
-			beq.s	NotScreen1						; only 1 device so skip devloop
+			beq		NotScreen1						; only 1 device so skip devloop
 
 		; Copy dst rect and convert to global coordinates
 
@@ -2321,38 +2321,41 @@ VARSIZE		EQU		DstRgnPtr
 			lea		globalRect(a6),a1				; point at our copy
 			move.l	(a0)+,(a1)+						; copy topleft
 			move.l	(a0),(a1)+						; copy botRight
-			move.l	dstPix+bounds+top(a6),d0		; get topleft
-			move.w	d0,d1							; get left
-			swap 	d0								; get top
-			sub.w	d1,-(a1)						; convert right to global
-			sub.w	d0,-(a1)						; convert bottom to global
-			sub.w	d1,-(a1)						; convert left to global
-			sub.w	d0,-(a1)						; convert top to global
 
-			lea		DstRectRgn(a6),A0
-			move.l	a0,DstRgnPtr(a6)				; build master pointer
-			move.w	#10,(a0)						; set region size
+			lea		globalRect(a6),a1
+			move.l	a1,d0
+			move.l	a1,-(sp)
+			jsr		([$FC0])						; _LocalToGlobal?
 
-NEXTGD		MOVE.L	(A2),A0							; POINT TO DEVICE
-			TST		GDFLAGS(A0)						; IS IT ACTIVE?
-			BPL.S	SKIPGD							; =>NO, SKIP IT
+			add		#4,d0
+			move.l	d0,-(sp)
+			jsr		([$FC0])						; _LocalToGlobal?
+
+			lea.l	DstRectRgn(a6),a0
+			move.l	a0,DstRgnPtr(a6)
+			move	#10,(a0)
+
+NEXTGD		move.l	(a2),a0
+			tst		$14(a0)
+			bpl.s	SKIPGD
 
 			CLR.B	-(SP)							; MAKE ROOM FOR BOOLEAN RESULT
 			PEA		globalRect(A6)					; PUSH SPECIFIED RECTANGLE
 			PEA		gdRect(A0)						; PUSH DEVICE'S RECTANGLE
 			PEA		dstRectRgn+rgnBBox(A6)			; PUSH DESTINATION RECT
-			_SECTRECT								; IS THE RECT IN THE DEVICE
+			JSR		([$10A8])						; SECTRECT -- IS THE RECT IN THE DEVICE
 			TST.B	(SP)+							; TEST RESULT
 			BEQ.S	SKIPGD							; => NO INTERSECTION
 
-			move.l	dstPix+bounds+top(a6),d0		; get topleft
-			move.w	d0,d1							; get left
-			swap 	d0								; get top
-			lea		dstRectRgn+rgnBBox(a6),a0 		; point to rect
-			add.w	d0,(a0)+						; convert top to local coords
-			add.w	d1,(a0)+						; convert left to local coords
-			add.w	d0,(a0)+						; convert bottom to local coords
-			add.w	d1,(a0)							; convert right to local coords
+			lea		dstRectRgn+rgnBBox(A6),a0
+			move.l	a0,d0
+			move.l	a0,-(sp)
+			jsr		([$FC4])						; _GlobalToLocal?
+
+			add		#4,d0
+			move.l	d0,-(sp)
+			jsr		([$FC4])						; _GlobalToLocal?
+
 			MOVE.L	(A2),A0							; POINT TO DEVICE
 			MOVE.L	GDPMAP(A0),A0					; GET PIXMAP
 			MOVE.L	(A0),A0							; POINT TO PIXMAP
diff --git a/QuickDraw/Pictures.a b/QuickDraw/Pictures.a
index ed4e136..0008db4 100644
--- a/QuickDraw/Pictures.a
+++ b/QuickDraw/Pictures.a
@@ -860,77 +860,6 @@ KillPicture PROC  EXPORT
 		_DisposHandle							;discard it
 		JMP 	(A1)							;and return
 
-;-----------------------Calc GCD <KON 07JAN90>---------------------
-CalcGCD		PROC EXPORT
-; Routine returns GCD( d0, d1 ) using Euclidean method
-; On Entry: D0 and D1 contain word size values to reduce
-; On Exit: D0 and D1 both contain GCD
-;
-		cmp.l	d0,d1							;while d0 != d1 (unsigned word compare)
-		beq.s	@FoundGCD
-		bgt.s	@D1isBigger						;  if( d1 < d0 )
-		exg		d0,d1							;    swap( d1, d0 )
-@D1isBigger
-		sub		d0,d1							;  d1 = d1 - d0
-		bra.s	CalcGCD							;end while
-@FoundGCD
-		rts										;d0 and d1 contain GCD
-		ENDPROC
-
-ReduceD3D4		PROC EXPORT
-			IMPORT	CalcGCD
-; Routine returns ReduceD3D4( d3, d4 ) reduces d3.w and d4.w by GCD for
-;	both the low and high words
-;
-; On Entry: D3 and D4 contain two word size values to reduce
-; On Exit: 	D3 and D4 contain reduced values
-;
-;
-; Divide Numer and Denom for width and height by GCD to prevent overflow.  
-;
-		moveq	#0,d0							;make sure high word is zero for next 2 divides
-		move.l	d0,d1							;CalcGCD exchanges regs, so both need to be cleared
-		move.w	d3,d0							;D0 has denom.v, d1 has numer.v
-		beq.s	@Done							;abort if zero.
-		move.w	d4,d1							;D0 has denom.v, d1 has numer.v
-		beq.s	@Done							;abort if zero.
-		jsr		CalcGCD							;returns GCD in d0
-		move.w	d3,d1							;D0 has denom.v, d1 has numer.v
-		divu.w	d0,d1							;dividing by GCD should never leave remainder
-		move.w	d1,d3							;save reduced numer.v
-		move.w	d4,d1							;D0 has denom.v, d1 has numer.v
-		divu.w	d0,d1
-		move.w	d1,d4							;save reduced denom.v
-;
-; Now do width:  Could have different scale factor than height did
-;
-		swap	d3								;operate on high word
-		swap	d4
-		move.w	d3,d0							;D0 has denom.h, d1 has numer.h
-		beq.s	@DoneSwap						;abort if zero.
-		move.w	d4,d1							;D0 has denom.h, d1 has numer.h
-		beq.s	@DoneSwap						;abort if zero.
-		jsr		CalcGCD							;returns GCD in d0
-		move.w	d3,d1							;D0 has denom.h, d1 has numer.h
-		divu.w	d0,d1							;dividing by GCD should never leave remainder
-		move.w	d1,d3							;save reduced numer.h
-		move.w	d4,d1							;D0 has denom.h, d1 has numer.h
-		divu.w	d0,d1
-		move.w	d1,d4							;save reduced denom.h
-@DoneSwap
-		swap	d3								;put things back
-		swap	d4
-@Done
-		rts										;all done
-;
-; End <KON 7/1/91>
-;
-		ENDPROC
-
-;-----------------------END GCD <KON 07JAN90>---------------------
-
-; as seen in QDciPatchROM.a													<sm 6/9/92>stb
-
 DrawPicture PROC  EXPORT
 		IMPORT PicItem1,NewRgn,InitColorStuff,ReduceD3D4
 ;------------------------------------------------------------------
@@ -4316,7 +4245,7 @@ MORE1
 		MOVE.L	A3,A0						;PTR TO FIRST byte of src
 		move.l	d5,d0						;get rowbytes in d0
 
-		_BlockMove							;copy from there to here
+		_BlockMoveData						;copy from there to here
 											;assumes here is a 24 bit address
 
 		moveq	#false32b,d0	;switch back before calling PutPicProc	<BAL 02Feb90>
@@ -4339,47 +4268,6 @@ DONE	MOVE.L	SAVEDSP(A6),SP				;RESTORE STACK POINTER
 ;
 
 
-PutBigPicData PROC  EXPORT						;17Jun88 BAL
-;------------------------------------------------------
-;
-;  PROCEDURE PutBigPicData(dataPtr: QDPtr; byteCount:LONG);
-;  ADD many BYTES TO THEPIC.
-;
-;	This is the same as PutPicData except the byteCount is a long
-;
-partSize	EQU		$4000
-partShift	EQU		$E
-
-		MOVEM.L	D7/A3-A4,-(SP)					;save a couple of registers
-
-		MOVE.L	20(SP),A3						;get the pointer to data
-		MOVE.L	16(SP),A4						;get data length
-		MOVE.L	A4,D7							;copy pointer
-		MOVEQ	#partShift,D0					;get a constant for the upcoming shift
-		LSR.L	D0,D7							;find the number of 16K "pages"
-		BEQ.S	LeftOvers						;no, so do the remaining part of the picture
-
-@1
-		MOVE.L	A3,-(SP)						;PUSH DATA POINTER
-		MOVE	#partSize,-(SP)					;move 16K of data
-		JSR 	PutPicData						;AND CALL GET PROC
-		ADD.W	#partSize,A3					;move data start pointer up
-		SUB.W	#partSize,A4					;subtract for remainder later
-		SUBQ.L	#1,D7							;decrease the number of pages
-		BNE.S	@1								;loop for each page
-
-LeftOvers
-		MOVE.L	A3,-(SP)						;PUSH DATA POINTER
-		MOVE.W	A4,-(SP)						;move remainder
-		JSR 	PutPicData						;AND CALL GET PROC
-
-		MOVEM.L	(SP)+,D7/A2-A4					;restore registers
-		RTD		#8								;and return
-
-;
-;GetPMData now included in GetPMData.a
-;
-
 PutPMData 	PROC	EXPORT
 			IMPORT 	PutPicByte,PutPicWord,PutPicData
 ;------------------------------------------------------
@@ -4956,53 +4844,6 @@ MapRect PROC  EXPORT
 		BRA 	MAPPT							;MAP BOTRIGHT AND RETURN
 
 
-MapRatio PROC  EXPORT
-;-------------------------------------------------------------
-;
-;  PROCEDURE MapRatio(VAR numer, denom: Point;  fromRect: Rect);
-;
-;  Map ratio so that denom.h/.v = height/width of fromRect.
-;  This is so that later scaling of the numerator will have some
-;  range to work within.
-;
-;  NOTE:  Only necessary because fractional numer, denom not used
-;
-;  numer.h :=  numer.h * fromWidth / denom.h
-;  denom.h :=  fromWidth
-;  numer.v :=  numer.v * fromHeight / denom.v
-;  denom.v :=  fromHeight
-
-PARAMSIZE		EQU 	12						; TOTAL BYTES OF PARAMS
-NUMER			EQU 	PARAMSIZE+8-4			; LONG, ADDR OF POINT
-DENOM			EQU 	NUMER-4					; LONG, ADDR OF POINT
-FROMRECT		EQU 	DENOM-4					; LONG, ADDR OF RECT
-
-		LINK	A6,#0							; NO LOCALS
-		MOVEM.L D0-D1/A0-A2,-(SP)				; SAVE REGS
-		MOVE.L	NUMER(A6),A0					; point to numer
-		MOVE.L	DENOM(A6),A1 					; point to denom
-		MOVE.L	FROMRECT(A6),A2					; point to fromRect
-
-		MOVE.W	right(A2),D0					; get fromRect right
-		SUB.W	left(A2),D0						; get fromWidth
-		MOVE.W	h(A0),D1						; get numer.h
-		MULU	D0,D1							; multiply by fromWidth
-		DIVU	h(A1),D1						; divide by denom.h
-		MOVE.W	D1,h(A0)						; update numer.h
-		MOVE.W	D0,h(A1)						; update denom.h
-
-		MOVE.W	bottom(A2),D0					; get fromRect bottom
-		SUB.W	top(A2),D0						; get fromHeight
-		MOVE.W	v(A0),D1						; get numer.v
-		MULU	D0,D1							; multiply by fromHeight
-		DIVU	v(A1),D1						; divide by denom.v
-		MOVE.W	D1,v(A0)						; update numer.v
-		MOVE.W	D0,v(A1)						; update denom.v
-
-DONE	MOVEM.L (SP)+,D0-D1/A0-A2				; RESTORE REGS
-		UNLINK	PARAMSIZE,'MAPRATIO'
-
-
 		ENDPROC 
 
 
diff --git a/QuickDraw/QDExtensions2.a b/QuickDraw/QDExtensions2.a
new file mode 100644
index 0000000..1f0dc78
--- /dev/null
+++ b/QuickDraw/QDExtensions2.a
@@ -0,0 +1,44 @@
+QDEXTENSIONS2	PROC	EXPORT
+
+
+				cmp		#10,D0
+				bhi		@bad_selector
+				jmp		@jmptbl(D0.W * 4)
+
+
+@jmptbl
+				import	QDEXTENSIONS2_SELECTOR_0
+				jmp		QDEXTENSIONS2_SELECTOR_0
+				import	QDEXTENSIONS2_SELECTOR_1
+				jmp		QDEXTENSIONS2_SELECTOR_1
+				import	QDEXTENSIONS2_SELECTOR_2
+				jmp		QDEXTENSIONS2_SELECTOR_2
+				import	QDEXTENSIONS2_SELECTOR_3
+				jmp		QDEXTENSIONS2_SELECTOR_3
+				import	QDEXTENSIONS2_SELECTOR_4
+				jmp		QDEXTENSIONS2_SELECTOR_4
+				import	QDEXTENSIONS2_SELECTOR_5
+				jmp		QDEXTENSIONS2_SELECTOR_5
+				import	QDEXTENSIONS2_SELECTOR_6
+				jmp		QDEXTENSIONS2_SELECTOR_6
+				import	QDEXTENSIONS2_SELECTOR_7
+				jmp		QDEXTENSIONS2_SELECTOR_7
+				import	QDEXTENSIONS2_SELECTOR_8
+				jmp		QDEXTENSIONS2_SELECTOR_8
+				import	QDEXTENSIONS2_SELECTOR_9
+				jmp		QDEXTENSIONS2_SELECTOR_9
+				import	QDEXTENSIONS2_SELECTOR_10
+				jmp		QDEXTENSIONS2_SELECTOR_10
+
+
+@bad_selector
+				; The upper half of D0 contains the number of bytes of parameters
+				; on the stack
+
+				move.l	(SP)+,A0
+				swap	D0
+				ext.l	D0
+				add.l	D0,SP
+				move	#paramErr,D0
+				move	D0,QDErr
+				jmp		(A0)
diff --git a/QuickDraw/QDUtil.a b/QuickDraw/QDUtil.a
index 775369f..2431604 100644
--- a/QuickDraw/QDUtil.a
+++ b/QuickDraw/QDUtil.a
@@ -1389,7 +1389,7 @@ GETPIXEL
 		MOVEQ	#0,D2						;ROUTINE = GETPIXEL
 
 SHARE	LINK	A6,#VARSIZE					;ALLOCATE STACKFRAME
-		MOVEM.L	D4-D5/A2-A3,-(SP)			;SAVE WORK REGISTERS
+		MOVEM.L	D4-D6/A2-A3,-(SP)			;SAVE WORK REGISTERS
 		MOVE.L	THEGDEVICE,-(SP)			;SAVE CURRENT GRAFDEVICE
 		MOVE.L	GRAFGLOBALS(A5),A0			;POINT TO QUICKDRAW GLOBALS
 		MOVE.L	THEPORT(A0),A0				;GET THEPORT
@@ -1420,8 +1420,15 @@ OLDRB	MOVE	VLOC(A6),D4					;GET VERTICAL
 		MOVE	D4,-(SP)					;PUSH GLOBAL TOP
 		MOVE	D5,-(SP)					;PUSH GLOBAL RIGHT
 		MOVE	D4,-(SP)					;PUSH GLOBAL BOTTOM
-		MOVE.L	JShieldCursor,A1			;get lo mem vector
-		JSR 	(A1)						;and call it
+
+		MOVE.L	SP,A0
+		CLR.L	-(SP)
+		MOVE.L	A0,-(SP)
+		CLR.L	-(SP)
+		MOVE.L	#$80000,D0
+		DC.W	$ABE0						;_QDExtensions2
+		MOVE.L	(SP)+,D6
+		ADDQ	#8,SP
 
 		MOVE.L	DEVICELIST,A3				;GET FIRST IN DEVICE LIST
 
@@ -1518,9 +1525,11 @@ NOCOLOR	cmp.w	#16,pixelType(a3)			;direct device?
 
 DONE	tst.b	(sp)+						;pop and check crsrFlag
 		beq.s	@noShow						;need to show cursor?
-		_SHOWCURSOR							;show it
+		move.l	D6,-(SP)
+		move.l	#$40001,D0
+		dc.w	$ABE0						;_QDExtensions2
 @noShow	MOVE.L	(SP)+,THEGDEVICE			;RESTORE CURRENT GRAFDEVICE
-		MOVEM.L	(SP)+,D4-D5/A2-A3			;RESTORE WORK REGISTERS
+		MOVEM.L	(SP)+,D4-D6/A2-A3			;RESTORE WORK REGISTERS
 		UNLINK	PARAMSIZE,'GETCPIXEL'
 
 
@@ -4722,7 +4731,7 @@ DSTH		EQU		SRCH-4
 			MOVE.L	(A0),A0						; get SRC pointer
 			MOVE.L	(A1),A1						; get DST pointer
 			MOVE.L	D1,D0						; D0 = size
-			_BlockMove							; copy the data
+			_BlockMoveData						; copy the data
 
 DONE		MOVE.L	(SP)+,A0					; get return address
 			ADDQ	#8,SP						; strip parameters
diff --git a/QuickDraw/ScaleBlt.a b/QuickDraw/ScaleBlt.a
index 31ea259..24376e1 100644
--- a/QuickDraw/ScaleBlt.a
+++ b/QuickDraw/ScaleBlt.a
@@ -127,7 +127,7 @@ multColor		EQU		RGNC-2				;byte, set if source contains nonblack/white colors
 ;
 		_StackAvail 						;GET STACK AVAIL IN D0.L
 		LSR.L	#2,D0						;CONVERT BYTES TO LONGS
-		SUB.L	#qdStackXtra,D0				;SUBTRACT SLOP FACTOR		<1.2> BAL
+		SUB.L	#$200,D0					;SUBTRACT SLOP FACTOR		<1.2> BAL
 		MOVE.L	D0,STACKFREE(A6)			;AND SAVE FREE LONGS ON STACK
 		bpl.s	@stkOK
 		_stNoStack							;=>NOT ENOUGH STACK, QUIT
diff --git a/QuickDraw/Stretch.a b/QuickDraw/Stretch.a
index b9dc7ac..bae0b7a 100644
--- a/QuickDraw/Stretch.a
+++ b/QuickDraw/Stretch.a
@@ -9589,32 +9589,107 @@ Scale32to16	PROC	EXPORT
 ;	CLOBBERS A0-A1/D0-D5
 ;
 
+		tst.b	-$a5(a6)
+		bne.s	@different_implementation
+
+		lea		@sexy_code,a4
+		move.l	a4,-$228(a6)
+
+@sexy_code
 		move.l	a2,d2						;get ptr to end
 		sub.l	a1,d2						;sub ptr to beginning
 		lsr.l	#2,d2						;get long cnt in d1
 		subq	#1,d2						;make zero based
 
+		move.l	#$7fff7fff,d3
+
 @NXTSLNG 
 		MOVE.L	(A0)+,D0					;GET NEXT LONG OF SRC
-		ror.l	#8,d0
-		lsr.w	#3,d0
-		ror.l	#5,d0
-		lsr.w	#3,d0
-		ror.l	#6,d0						;16 bit pixel in high word
+		lsr.l	#3,d0
+		lsl.b	#3,d0
+		lsl		#3,d0
+		lsr.l	#6,d0
+		swap	d0
 
 		MOVE.L	(A0)+,D1					;GET NEXT LONG OF SRC
-		ror.l	#8,d1
-		lsr.w	#3,d1
-		ror.l	#5,d1
-		lsr.w	#3,d1
-		ror.l	#6,d1						;16 bit pixel in high word
+		lsr.l	#3,d1
+		lsl.b	#3,d1
+		lsl		#3,d1
+		lsr.l	#6,d1
 
-		swap	d1							;merge pixels
 		move.w	d1,d0
+		and.l	d3,d0
 		move.l	d0,(a1)+					;write out 2 pixels
 		dbra	d2,@NXTSLNG					;loop for all longs in dst scanline
 		RTS
 
+@different_implementation
+		clr.b	-$2a9(a6)
+		lea		@sexy_code_2,a4
+		move.l	a4,-$228(a6)
+
+@sexy_code_2
+		move.l	a2,d2
+		sub.l	a1,d2
+		lsr.l	#2,d2
+		subq	#1,d2
+		moveq.l	#3,d0
+		and.b	-$2a9(a6),d0
+		move.l	@data_tbl(d0.w*4),d3
+		addq.b	#1,-$2a9(a6)
+
+@loop
+		moveq.l	#0,d1
+		move.l	(a0)+,d0
+		swap	d0
+		add.b	d3,d0
+		scs.b	d1
+		or.b	d0,d1
+		lsl.l	#5,d1
+		swap	d0
+		move.b	d0,d4
+		lsr		#8,d0
+		add.b	d3,d0
+		scs.b	d1
+		or.b	d0,d1
+		lsl.l	#5,d1
+		add.b	d3,d4
+		scs.b	d1
+		or.b	d4,d1
+		lsr.l	#3,d1
+		move	d1,d5
+		rol.l	#8,d3
+		swap	d5
+		moveq.l	#0,d1
+		move.l	(a0)+,d0
+		swap	d0
+		add.b	d3,d0
+		scs.b	d1
+		or.b	d0,d1
+		lsl.l	#5,d1
+		swap	d0
+		move.b	d0,d4
+		lsr		#8,d0
+		add.b	d3,d0
+		scs.b	d1
+		or.b	d0,d1
+		lsl.l	#5,d1
+		add.b	d3,d4
+		scs.b	d1
+		or.b	d4,d1
+		lsr.l	#3,d1
+		move	d1,d5
+		move.l	d5,(a1)+
+		rol.l	#8,d3
+		dbf		d2,@loop
+		rts
+
+@data_tbl
+		dc.l	$05010400
+		dc.l	$03070206
+		dc.l	$04000501
+		dc.l	$02060307
+
 
 ; from QDciPatchROM.a verbatim												<sm 6/9/92>stb
 
diff --git a/Tools/ToolSource/Vectorize.c b/Tools/ToolSource/Vectorize.c
index 22bf22b..07714b9 100644
--- a/Tools/ToolSource/Vectorize.c
+++ b/Tools/ToolSource/Vectorize.c
@@ -687,6 +687,7 @@ int main(int argc, char **argv)
 					my_name = patchstack[pi]->name;
 
 					original_size = longfrom(mod_sizeobj + 2);
+					if(original_size & 1) original_size ++;		/* even-align the patches -- found this bug while reversing QuickDraw */
 
 					if(l) fprintf(l, "    File \"{RomDump}\"; Line 0; File \"{RomDump}\"; Find /Entry=¶\"%.*s¶\"/ # patch ID %d, ", *my_name, my_name+1, patchstack[pi]->clean_id);
 					if(l) debug_print_about_patch(l, patchstack[pi]->data, patchstack[pi]->len);