From 59f802bc9f7b916b1c5e526af528fea402ad59df Mon Sep 17 00:00:00 2001
From: Dreaded_X <tim.huizinga@gmail.com>
Date: Thu, 1 Oct 2020 21:35:36 +0200
Subject: [PATCH] Updated for extra ram and external keyboard support

---
 bin/s.com           | Bin 0 -> 34688 bytes
 src/MONITOR.z80     |  36 ++++++++++++++++++------------------
 src/bios.z80        |  16 ++++++++--------
 src/cpm22.z80       |   2 +-
 src/loader.z80      |   4 ++--
 src/putsys.z80      |   2 +-
 src/ram_monitor.z80 |  18 +++++++++---------
 src/rom_monitor.z80 |  18 +++++++++---------
 8 files changed, 48 insertions(+), 48 deletions(-)
 create mode 100644 bin/s.com

diff --git a/bin/s.com b/bin/s.com
new file mode 100644
index 0000000000000000000000000000000000000000..c1c8170809604c4507130e854bb8cbfa54bcb12a
GIT binary patch
literal 34688
zcmdUYdwf*&weRG?kc3x;hwOlly)!&E6U2xTA-<|o)QX6p(TWBMOn6Tq4+BCb;H!F1
zPuoKeAU&tIr`%Sp+H0>`(x-JY#mc1nRJ63kcDJT+@DU>#A3$Ix_q*2m?LB)Eu<hrb
z^T(w%nfX1|Z~fMLt>16&g#5k}fmsi?8Qb>sEV^;-u(dT~DttXZF!r@3jcvXKLBFrC
z!e?yvC9N;6iN%tk)q9fG<vB@f-kP}2XYFk*Iu*$E*%7~8JG8B5ky&80wI;1aUyNC|
z&9H6@SfNXd5x%4yDX?n`gTV#CdHaq1tw}q1&?q`plC-wp6^q5xw=Qczam-50ww4C0
zPm1lPkEs2levEn}*KSJNjs14?qq_0mTG?es(spfs(psAri?uwjcc4AJ+$>11F!R%!
z^^JCO?;rp%yXlnOn6j(Wc2&Ot%<tXQdv>l}eafy%4ftv&JIl(f;3jRljJ6}E?AjD2
z^i|}_XU#7d2v%CYUD2x(vd4ie{q7^A>&}na(O$t<@CF$K@42I8(;xSjbkX=v)%ciQ
z{i$7b%#QTgwI@MM-LR`awyQp|BggI96Vy;_jD9F-3<Wn{UKWeRznX(3(s}~Fc?edZ
zsYzNjX<a-iroC=`r8S9W;!l*C1?O(#J6|g4s4{O3l!JMM6*2D`MV?psON3n7Ie{Yd
z^Zw&e=`9Jk-Jo)}-H^8H`vshSP%E%2PWkMLl+TW)Wz}YxAOA)xq{TeW)GaFmoj_%#
z63A4L4kkMN=}_X3KRqMy8-Kbo@kf99%EVXv>8ld6^V8QP*5;?@CYtioUr5}WpS~%v
zV@P^oA~qy_M`FD{z0ABQy*g2wpI)D69g?m~JUAr1A<;G@y)p69kaT@ws6XA1DEFtE
z60`j2O^HkW;5V=#!WTmZ9j5qZ2vg7&Z8OIU)<L)X_ZP%iIHyfAa?UVaLF}@&wYnmj
znWp{9I0)5%jB7tPe%q>jY`sz5EsK+EJ(}-jt@iq9(DT5DIQQ9&C(%+80Kye4e&%s!
zH^HRkYzK{Y({a1;gf=uNA4F85OUHlfHfCG3H0W<6fp`okkq8A#0&nF3uh}DwxAT(5
z?}7Qdv*SDS9XU%LlyN120O@h06~tpX3MRqT`=_%~12dNpcg(;5g6y{Z{sO?W{<Azj
z6HrM6fgfqPaTEqZX$oe6Tb?P*gm`T}n2@xlm&WV!jsAYnGH^l5^QK{Z06bUDjzKU3
zn|&nGBRy25<zBv|<@sO2#;iNv>Mgcjp9Sb-%VNev{QjgkY4nM8BFPZz<m`l4N6Y1G
z!*bn>b<}U~8>&O({W*5UP-O*^M*cRo0vQmBaoW!auR92@_BVzI%7tVejlyl(uZ>aL
zw10z4xO=B9=|hYQw`qCC<ZVgg(ub2qAPclH+&AY0?LaLMH-}hO0Q9up_tVcQg-l!0
z{iOBC9l#zc*xS!54>ToEPoj-E74S-}*3fTSvHA!P^|aSRa~@8jJ!$>^0?i6p7|>o^
z07hUqO}gY^0|N{iK(<fp8rwIri`G}qhlo@kx2p(aGQaIZdzSpBRRl`DLm2GHr*`cz
z(10u+trP>$uFnP<J#OziVNL+;1U~V7IKB~heAXGqSr2QI2+LUyE8x%(R?hz{_v}kd
zK(Dgnu+O{~L-%zV5%7tGg^V|L2kVt(#ZJ55(5#0+#nFP6tLwdc3LLvmVo%zi-9ku@
z7vE$@dhObeXvhy}8xRGbPjtV<-gi=;7`o))ASmB$%p{ujy<T9<+{TjXA8JSYFvJW7
za(oy?Fh|h_j9D1)?(A4hI}6Q8<BDzCQOr&n*Q<7-5(FT_Y%$%B^&4w3;^-{cp2zIQ
z#|M)D3jUZ~`*<|n9MmTyt=ET(4b9SCGQ47rMhK6yjZ#`S-;TEFg%EbfSP95QiC+|@
z!{%t%^Jj~^Qu(y#(O6?Wkn^g3`!`wxfa17LbCi;)wKZa{NY&Viz*xnsaTm~MN9?8!
zi@^{!^x5?%K@AelJByTSRYQzs(ZnZ6L^z7UKo)jxVfro%^!LjwBK|aI<^uy}4w`7}
zgtn7?Q`V0^v#h>ZPW1B{OJyiehxiai{38c(V;A!`zP`|l7O3Rl^_?^0rR|5|7=6lk
z9z!^kNLs(Dfflg6hJ^cJgb6d{`{M_O+0}h^)k*R%(Ie-z>9=wmp~4#T+CU+UrSol$
z0%`0M1V%fi*C7lyfTFV3E~{j9%t-Tk9GO6ZIJ8qP<A*DibHp}5cXL!Ggn@$GHq4Hm
zviGHQchz721FK5lpceWj7UH;8#Y#7j31D2ewRVFbCHP(vKtqL3^*|FSlw!sraFuWR
z@TBnvu;z(bP{~Qzn<3xpLjB?0Fgzgkql)LCgRI|WU0M#)T3}Zd3P@~Qbha1r$B|!~
zK92l{EAzWY0v5{>cc*ndh?RTo#*Z}UC7B%cRlY<?FSQr#iax}4CzYeKn?AN1KhZ)I
zNE~wcYsI73HHU~Cp+r8mYd--n8f){HOyp6e8uXvF=~<5Y1WX6bQz%j7Lbxep+M?zV
zVEity(u=dOEhAD7w9McV<3MK7sH9+mzH%@OX(lNYqfUfIB%bkD@M0h<B@Ch>q{Xo1
zlro5$LPO#aMK9NCF`}MXupWYAvhV(pO4l3?f(>!nE2jmH4(}c*%o}&guJ+qiLxss$
z3sfLMCq~+lBD;22(z@gh5{dR}M;RZIYD%M5HO=#kj|Lk?XMNJ7Dceswv3)BHCc`sK
zi~w!M4b)3+AWKJr#Hhkjkr%2R1wlg~Nl70WPv0n`e*hBZmoRDYP7+5(!Ci^a61lGh
zAdzhPHphCiT)Wu8MMi-re!Foff=)!ds;kSGLz`l%T1z>_^iYy8dKR0LZjgXiB*nxU
z<`854c6iwv2mmXqLxsz;s9+R%LN7%KVp}HL;%HhdWMI_S0J>+%!tEv9#>Y8?z|LY=
zx1@2)cJ{?^XkD4Cj;QHLQyt<8#wBG=Y9{zaLkqVDOBZf0Q+bx^c0`9$w|h60ze>wl
zuU-Ni<C8`cnuLxq>T5t|_AqPs=$0d`b<eESh67v~z<F}To+S&m8zXq&aAb9%1z2wZ
z*2Ata7#joE%^Wb`)k~C#mPIP_cGMl9l`sP(gp#iaF*pz5Y@Rs~g*K0Ka*^nfyf)dU
z`FeC_-VUpEddu^eX^u!5!7q#7##byqXz_6ukU-HON@9e{<pKOo8udct*fTSOU#<*(
zIosC6Vh4EEf@1BH(4y^#fD5c&HMJm9K49cNl(gVZ4sg33z&=YCZ5P+P^&XmtNNLe_
ztq0E0f6A6@U_52BE6w6`zBxQS&dekSr?E>FpTe9TL#kYm&QJVxOu8WP!PxYO#P`Oe
z$0bgUL0*69xb&pN8)v1bCT5IJpP%^AnDhmSw(;rm#A|1zFHL-Ne0pBuyJOSWCGHrL
zo}XAhCVgY#(J|>eX~^A)4dc@_iTPvG%M+oo=@s;&mIkjhC#P4@I%^X8xb)h@`Qy^-
zXq`ynN8{4XiPy)aH)E`Jj@nKkDIjZ@sGHsNsoi)?>J->MiE=;_ZKuE;-}~MgkMHrG
z@mBXNkwOw#nx(yLbzUM(keXn(vKEhw!3XV6S$&#?uSr0FFUj>;Z*0+i=14TDZHe}M
z?^i%mz<M7TGoVAeUv^@`H<GU_{myoP?pgAk?b?qA_jJ#qo-BAkf=54RM~mzi3fgC7
ztx!@H508PfPg?&p5zd0_^+dbDZ`ThUBjo9uI~EhcOU#22eP5*(AE?yAbub^;wI5<#
z3?of-tP@3jam<8-)WS3&)y)I3BmqD&X*cy~W1YY>+9PG30~5$?od%Qku>?w4LS^r|
z6_z8%;e+<20lo2^fKF6PTK8)4Z;zF3j0C1yH|@s{r{Ex~3^1Cg1Og?b7>I*?rhw@d
zAUr6PNNz-O^RMH?10n+P4sgMP7C?chV-=r!`W^mY9Cio-otYc2juTvJ{vKxN0ms|F
zZ`U5hp7pZN-g8!}Lkle@aXAg!6&Q>szDu=+A}?A8+VZ~Lc+{?b->y0;?CFi4g&ERa
z5*UICm18kGs`UfX4muI6_!GoQMKpYIXvt~=&>z^1A7(b;uI?b@VH_htqHBH!PL{rD
z|3<^IvSZHbqaWM*J|O|;$PsH(fF<d*EBo9AT?y@ljm6kd{*EL*XOBVysT1%|T4xmF
zua6gv5NU@fXa#2w3W-Mc^LVZ+DC<R=(jn6bo3&z6UR8DAf&gQz-$*<CTgsY=29<my
z;H%lImG0dx?zuF72mBI?0)o~RNVkA1deI24alHR@;VMf%hLLf7jf`tDi-`wGSze&_
zjHWPm#VlwSWQ}&L>`{%ZtgBj{3DzBfmh>9)T>ib*Jj;!HXiU<Y26IyC-x2cf0GT9O
zzM%vu7S$9XztVzQ9&ZRSE9ge?kYhJs6k>Ko8U?a`I6J8gYjZG4mMIBfa5P=0Q)qEy
zC_)fqI5UKZkUEJI$X2P~*GY2-H=;wbM1z-+)Q8&C9O`<cM3x}>XD`>*eh=)9r}Y0P
z%GJCGAqt^I!7dd~Y0rUOf9LM58vqQun@Gy-!OyeVx3W93Qd&<=N5b&pgaMG-^naDv
zLj5rmgtVDA&U_5gN5OY#!H&TK1{lT|Pi2-l<Zi!bNx_bi0Q!|QU0?aw_BQ>;SO6cE
z3csU2#mR&~QRQOTMsQpNhJDsIS_zO0SD><IU_Y;uwvhZFciQXjU{IWNT71180t37l
zPgfIMaV<NClcd+rb`*owJR?#V<{-5%o|!{?!yFPwXr2V<BxN6+&FKSm<Et#)cjD|U
zuP7M?`BBhGhM2{u8^K93?x+!HIS#>H5B*tK&MtM3RNypPP;^nYYyL=j2DT^kv(M1M
zYC@86TAmVrzJkO=RE_q6?aoGVi9UjX&Z&xL0Bu&fm+E8O(*~F!n8`B0Q%%t$L!oX2
zMjsMQFV)X2bG@6VtDp>h?M3GXvpV%h)C%dPiR;gCyE>}duRlk6vVrLnoYwSGbEIcH
zW&<%1!n2Q)8YSA#O<$0Sxk`(6P`KFqzFl#Y>pA2cq#8;tHHzT<8?8~A6;0o%7YC#1
zNSR&;b40xrMJgMlFxUxIpFP*E{=lyKP@GRm88&#Q4!%+xU4kzW9RZPiDXRdX<s&K_
z5;GXXcSu51IebSOIiA6a!wM;-mn({h>xdkh>G#>k<u`?Dj@qi|4MRA3Q?8O!3r$#`
zECizvz$`9lIR=xz_be&ep?uc*^Q4DLN?Ze~I1bZ)!l#{;DIl>)M?ZOyP|=Pg?S_|N
zsi!5A*3AZ0+NJW-@lmvWi!N0~XbKfs;#+jjqVJyvwS?qS=s|k<m-EQqp?JczA62U|
zr0$L$8j`D%4^=~8=eb0sDmOF>@|(DiPu9-ilQoHI6rDgqqLYVAXvrcICRO;bw=T6e
zqWa)X{ro%|drNfa!Uw@3iz3Hy62eRvG+Bo`rvnv55CX*YT&mw;KSU%azJFf_bLiZf
z`V>t?5MVb>x3Sn=w@j4LM5;^J-tz`vw92vpxe%Nv0AWpakzF-R$-{O70RSWb0f0&-
z$nbG3D?SziPpYrdcFq{s=~tZU$1!q04<J{jL`m6wWsUh<6VU<*O^_;Zt~XR|Y8D>?
zC}~rMQ*w<L%yvOlCMpB(ME$f1grI$|fgn+A!>9eB#}U8|K0PC~qH}*o4e1Ol+wQYx
z*C`3&a<z#5<J(nL<O0EfZb%4f3SHDya15XdD|~~(-k7#G;4Vbk-q%mTKdBPOvJToL
zFl2i<=??HQKp(kU(%z);J+6kxZV)gi&RB<n@t+526L0`vsPF``ZshyAte<UCNJ~E(
z2%Mk&Y!leX8qPI!)6Zv8g@6UlV}%Sj@l13|3>77W8-n!#pD&1CLeF8+T>AKS%}u(9
z{6QKbeNHq;sDU_C^>ZA$Q)nC!R7RZ2Z~&}mdr^kA*3NsgX?e=tkfM`3=^)h9Izr$5
z*a?urX7B-7$<rq4J_rSeaiBZ!!bi;RI1vR3dX5Sk9e+vtCq4T5ByS6tMCW{@D#CLN
z>3x(g7^rhTvPhumC+2k$&nd-adAFMi>_!N@D74htsb1@hAt|t%itI+fmNBF)1C|FJ
zxt=3uB1KN1u3e>q30XF2^_7w(CdI_DMbxiPN^dsLF@6M5@*cSXaTEd_`uTAe=LRLF
za`M=%3UR36%7R(v%WpwcMM#NKPfm6OHmzo1U94K5AYN#5)=B9K?Gz#_GNz(WRkd~S
z$BFgZG=GJ=28zj8rFe?7%E<fVR5Tmh05I1~#Tm`FXyWzm#Pghqq63S?N6Es(&t{Ay
z)Ntj6V{*P75i`o~bHCq-LvFt0Kw_*;r4zFqd5gaaO3)TTSmI#ER#K~Br*uS+&ZeQK
zF|Ew`j)5c&Zbf|9X$msr%?W5p0KFBH1f&BXX#pkKI>Li2tg^`ibr3@`^SIqn7}foD
z$B3wjV;w#?aI6R)u)a|at64&uGA<N~8K1we3lbytO`JEWHc|KAr;=xew-PgiJY89n
zl5FEdXwQTrRtu^l06Q|=t{qVlpdOB~IVMHvoo}?1Pw*Tc$8f^dWy}+Vv^{|5nJfVb
zZNDTy3(GARrLGFq-YQcTC-w@qv|U2Xi!11fiWSAqpa4n5qb9HA0*@jDrZ4&ka8DGQ
z>Fxk^T&viffsV#8kaEaI(w1@Y#C_=>BoLzf@qN?8K5lK(i(1kJ<}B2p10i(=p-yny
zYs&c0R=LDPO_`U9F@ho24c>OHHjpVL0|#^7Ygggyj?hAb`I6EH$93=}8qL`PoAoRM
z$9nDTfYh7r2vY5n%u!$>U#A%|O<aMZ?n&&3$Vb<=m?=t894Ms6#1J~8o+xwr)=bBT
z_(sYeWi+dX=Nu%vgCk(5A?b{GVCFHrM%Mgh$0-vUL=MFCjG5Yfg&%<tt`2$fSrU)m
zgaF0^T?Gwi;Gh#$$NyuR?Zn!sH;{g-D8jjcLbQ}~X<!~@R9!33+@^Op#*0D)VCzP=
zr$dFp5|r|=CL^y%|I3h&TzTj?z9VhgH?;ljGTbQ3*!Nvo0>o-qtt=^RgM$^vJF(r<
zsP^g@EnFTQh`n?vBkA2Q8I-4FGH;(O9%98}52J>2Ml+aqSv+8?2%(YlUx%M4B#{&e
zSBb%N;v+m|DaIbi81tTJd9o8CFRap`Pj*r`fy$DS01^&>!88)@j;(a`buS1**8^Y#
z-P2Lpm4zFsWK%--+($z5!St-&H>V3yt{pYLd7rjVxTDSxsSc;Ab%N6$FJjY$njCBf
zYYtoJcP=D#VZ4EuT%;8;5W2K>S}o=%oOS(0VnBc!wo`h~eLz0``bDTA^ej2KQ-CA1
z>sgY*7lMK><Vz5_xlzdH#4aVRU(bm3Ea~4#<ULQodI03@@&b@4ihM2#gyJ{PN5tt4
z6#!ZS3uaNxm?4}{G`$Adh0q};Ofb6c18E3h@dxCX<f|HJ{qZ8&s&?@}$XhdzgM`lx
z7xbHozhr<0fxGx(QZsZR$9Je}<ic$-Q-Ed=#08gxcv*Yt$*f2V<{`(By%gLp0_7~o
ztybzHlCaQ_U36-TuF_9-itb|N(21Qm8a*$Rvny%!&cwIUoLw~J#Lm#Mouxx}g$j3-
zezY@ma%btWouSmu(!yPY&)(J&j+4Ev5F(bzi-1<&*Hyt<QT#C%%jpWs!8Cb~X~IR1
zEI(`HF<nkWisRXf48ui3A;ry^MfhHnBhXVYg1Kx&?$`b#qf1F}sj)P*Q?@srw>LgJ
zDxrEer@I4-zGS~Ra}8jIr}(7*fo)Nys||IaYPtg8IH&KIgV<E6pfRv<oFYrT)e$=}
zCntBZwv_fW7xH!;09E;%TDY1NJ`OX!if!ZS26h3K3OwyH0Ur(4)*%!a*^<sNZ%^l%
z8`61+?_G%Xlg1N@Sc074_mv=D&B{lA<`n@7>M)OFFMeU@qn*jnP>2s)xb~1z)1W*P
zfCP*ZU(R&3y-puBN&EfNwIfbz_KZ6(z|C1g?FHG8@#_6<P>FW=EWs1ygwT`HA-f>h
zLI>C=vY#n@OGR>1wRvP=&JE<LLIr&*hDM>Ah=Q*uuY@+;hZ{G@2MZu;oB?xMgk;<d
z;+)6cH_W`$iAPcA2&zG3G!X&ogu$l!0Fm?v7(#=(jMo%hNz#=cAVyQ_%LsB3%&>7G
z7=jRRBWy9-kyfPDGz0YHu`E2qpPnTrc5((yy;w_BBdN_(PTR}EwKX(78r(-$Tg%MR
z^o`lVIkVUZH+@zKIQw?}Sq0WTs3Ii+xs<b@E0?#;ifM~ep)tEsk^EHc5GBGco~deo
zs%j{2n6JJ7FCsaifJRJHh~QIKCWkK_vrGIj&fHJg^(p7feLb0AvSN;MV08r}W4i@s
z&j`Ve!~k8ynqj+2N9;22Gq9_4)GjPWjpNunLX?F6jxN%Uv+5%3B@t3UE~qY&ax3I)
zcu;V-ZI<BTM(3(LqBtKqa(}S&$o(#3K?X*!IzLr4WFV8r?4oY&BCd;mqG@eSswqF!
zIK=f2@E~l}C@*qEljZk$bDoD38G^ew5?bQ&y3tEa5d;~jrrcCxo-6_y31zjh8Fqtq
zp>ex{AfEEB<93nhzjKx|$e+U13?5X5K|M<_km*FDw$CDfdt0CBSI8?wDR_B?s_=CG
zR(<K>g2eFAG~?mhfl)FPfz9#Xin2}U?fWU#dJ<s7_K!yo5k0hK7d$M!nL{xhADEHd
z_<(}o({|(c?WQN~#;4+a6?WuFyY?v*`}N!H>Zk3h??cF?O&=bl()`nQ?f0>E8EiC7
zVaPHdnE1E?*Ps@`R$(PV_kR=a)mJ05a*hP73fyy%C7c6(zCQaSXWc^c`&oIHw5!E5
zu2mCM@PMx=8R>r6|NYnTg*AnV;1(DU8q;>LhrmL%(&t@*#HvMFo6{rOXQ&NV_~JKK
zK%J7ts$EHg2)g(77(%jDy9}9l`z5^OyBRyyvm~<1&=_h&I)^==b-JP56`@tTAb%t7
zh$RCXfCov}w334mD`VON-X_+2&*LRt!vWTkZ`nk*+A8<%Y6H7pEX$~U=^73~xEA>K
z{c2*xsa$$INvjHcgk{NmPAjPnRsnqib@gnwxs2Nnx!<R;K{^OxnFG#p2gk(<u@jfb
z#z+_uQF(<CU@=Hw%0=a0{>x&gF_0$H&lFOk3L5cnrUr{lR?D<1EWxt&GM?h-#!#SH
zx^5RF9zG{89=bOE&CA#vvhq9fzZZ<$ewScJu?lGgOg5$9#6D>tvdo{uWT1WzRd~3E
zEH5Ys1aNO_&S@*8B=<R-U2t0OT-wBSD86^=+_=CHIuYP2MBKp*P4hSnp_yHj6R1?A
z;ypxLJwBqZlUsG%1dG6>O+>AC%2k?@?$A26I-jeg-GMe(<Bf8<PSKkSm(AsIG*AH5
zWf25C0`RU~?}RWk=3TqCJ82D>1K@Aljqk)istk;U*1u=h_JDBj*^NB}t+tYGuMs}h
zh=oYo5_4EPLJvrZ(E>Y=$&viMZP&gd6qJHZAjNmq7s_6!S8NxDrc}iRUm+;QtpGKx
zD&~QKnWQ|oDdiEs9_671ph#HT)o<HX?+7t^H&@DYKVuD&23Wr@KG4M<S?B0Xk!=+{
z3L_adf6cH139&q)$Y+BjdY}LwH?YIV>ZQGiaP%n~tg0aFlbpno(&;hs@P$C@ExIgj
zT*iCl4B8`t^xY$Y?O>k-1OPw*0pXILnJP0KA%O(3I)545aTp>1U4zi~y-UFgg(XMb
z+LbOM1MmoX5E*D82rQ`2ReBEaCQ6No@SBOao5MIU79ulPRVeiyt_U48nEd$dJ}HV@
ziHHn{<^<x@We~Wa+{%>ikZw78CV>`Zrn_DxWqf;R)a7W_&a=v{kwGvLzZa?W4wXw^
z*e;tM(8O+d&#vzgQ`vXp<<bK?2{E%bzGrXf!37^&^ufcQd_*l4H~xn!WMi^@)c&2_
z5>c|0?YLd99uDjK(d9xQmuOOCp?g-?U~m29PKAdkM=jbFP9cWm4r-!b&bcu4(>D|t
z`Ldf5Vyod&z7$e&rK%gbrsJtAp|L*!G&)%oT#2Ofudt)?oEh_990!G{cJ+I9RSzuz
zo>DOlkVN!lpVqn8#k8lr$Pv0&Ku!fj@8P<gyK^iGR^I2S;6fS?=k9%^fSL%v!vG*d
z*&1=QDJg*CA*n#4)DgSnvX#>Lq4+8f8auSYV-510gG1mIpg+;8^zHktsyQTzRG8sp
zL~@Ukh}{Gwrb0iCxe?(jZ}DwhcI(d?*etW<oC|?^kzGGb1?s*30rD3ha*l$}QuX%u
zpfXe>4+vNUAcDdfG7LvZi6QWw#EqFw8*C?8#yi+DvM4)d5lYsD1~IW#da<k}^wSmy
z8%w4E4okR-Q8orQI5j|`9{M+M|9%<I+OXgIK<og105>5vxF~>nCwvZApdCb@SX`@M
z5hLi+N)+}>{?VXl=jX(S5ItpsS{`kY<zPU%^xo&h)^r>rTO-vB;tH3WjrsZPfw>vo
z9miDEs`e#KNMe-G%S5<Pp(cFFRf>1<SyvCli8m@?1+z{b*&>q4Y(-6epqdVK_?iHj
zuyRUi)F~;^%mYY-PXZ`NB~Kd&uog-l8`ubkDu;{ku(CWDBEirq;6s3r4-B^(aqWW6
zYzN4)le;S=i#Xf%N>%)=tChe@YcuW!F09ZsJdWZKd_2yr)R7ulV0gWWr1;j=13H5(
z&b`T>WI>UI9K|{<K!P{&8ii3?`$ix~D<YBM;aIthf_&V+4~m3*z}{%!@ly;T1UU}I
zl*~?vd%3^%8sgLF!2{$llfx}UtYSGapTH<5_3dlONsXa^c0ji}mZ<muao>k<He_|x
z4WHQ}VRECzjpI~we-c|IqXwGrHE8eMAa9^TWO+r6Rn}LnL82D_^;}tmmPH;vaFu0q
zWfd51S_PXBYm1QNQ@fu1^<D)*Le7Bz_9_4ln(F+FFb8IRzgFFYF%zGKb;yyruB&&}
z+&}@S<amz0xf1V)#{PF|{<6<2%~wgk7&&m0yasLME1%Emp_2;gl4}dFiOL=#*OogH
z%3Yn-Bo7$z*+v<>AyztYN$Ba?Bf%%;fA{mkVQLrS=_anl*6>?oAlM@?#B-`W^<IcN
z3fmmn3oH;@MA0mdHFS?T+*{Gt3NeInd@1_B=GyS5s@UfMZqrd<A&W-aErW6^j=*Gk
z+YfFDqJy@A4iS^%{nlfPam0uq57+s`O_3J3Zt70urlisFvxsD<0R)pPC=^+NyF}^B
zu5~U<@o)7)5Ve9>A$qNfbBq0l*OECY%5)$;QE?^e^&C*jT1l($Dz$8v<ZHaN_ef5(
zMdgIrb*!fpWfEG6YgN><xAp(cDUwt`1kU6e@4rq6yW`{lXGD&8$4PivDSeP2f_!wo
zuZedg3n$*u9Xbc4tgQQvV$+1ueN(RY_(%lvQrQqN<a;R<(#P`{Y0M-+&t2z8CiRe&
z=f^=*(BjeO>gzv4pD|8Fmwm0*i*k^{Q=6pDcE!6e=-n_?BkkHzcGI8j#=pdKzkoUj
zDEMc)_Adzj-nFX$hxOGBye#(S1NsoOxq*P>?V#Vgc4N1QIDvyRrzIqSmoa3N_Fk_j
zYBwFR8*x2fuzAyNOlo5RL>k|;Ym@jwt#;&yUHcY2$cU$rsU3w7YB67>TOHJZi_LUJ
zm!cPyg7W}%JLQO7^%ijXtKHaTSHEdj0pQ!n*3tBa-Poz&%JN_B+Af$Z9uaxNuI<DZ
z>a(l=YF8o9qSb(UIa0tk?5a*#lp02>xlvoDy<k4;EJ0wvN~&%UN2>`7{y-qHwy3J0
zqsD^%G)iD%Ea#H9+%Nzlf|=}L%G+{6rIN>oFiE`%1aL?U$UxxW1&@!*t!OgGL<Q^u
zd0gL<Hz3*~_qoO1cg(~i)70kx9%)x0fFeQzm<m{g*>?5dKG-#<)Igb=%lO`*H>#8>
zOO(X^$I&S%)GChDxe9_fh$@!i?n!i>oS!w-kx&6!h**I_OwJdxL=sbbd*{Ql30~P^
zuGa6JFUyFv%N{al9b;Nm(lRN=b@EP16~R<Fx|dv<;t687#6o-(UByWz_L@bSzR-L-
z`Y9;yat)6Q0cq`~0Rz!u{mbGwexmoP1@Y+%vZw~05}%1wk7U!+5dpP5>!*u>Iz0e~
zr21VH-3Z>Nm_n$-AOLU0#B53^XMH*|@%J!c`hw47!hp^8-F+i=>XHOFu~gvsIId$$
zMOnKk?#CET#u;z94n_O<Hi&Z?dzOVLp5{`8fzKRjoO_GQ@C@fbBC>e2mj9-IXlG%d
zM${KGjh*3PPm}^7>`FxF`5p=(*rJoplAb}p*q}y-+xteC69z_C6iN{5_uk}~^DMvU
ztjNZl0wstq9Z>&0gPllIGueSr#HGrrTx}yU=P(RL7)0SpgWQ~vDCCu!ur2Y#v12_;
z5L1YY$)va=_=un2W+lbk3|Ad<l42BwsmRB%D_Kw~tCPsXU}s_<u!4B<)rE{Kb+ae$
z*rdNIqeW3^F6k}iir$hCskwjl&UL*xkM@)ye<6Y=K#2%k5@!nup3$=%KwQF#cyuvG
zKy)5XOuF`F$8=DV0;179VZ!>_n}zcf3OIAWd$T(i*++q0&mg{gGda?KkaD*3P`pr8
zkdvyUG9A5N05j<`kRqD8OB3277lS}>pwutMz(eCqiGeeG;U=oUNzWKkU5PkogK`q(
za%jJV8XT*68e!Fmd=KB=v*g&W&?jV_%wnY|s~4dZ8>BGRdH7Kk?ockKx+!ybS_!I3
z43#)Is7D52yCeoe3mS+00`b0vMUXZp0tXQO*0W>-ozWV14X%3O+>QjCLQ){w-hMM5
z03_OPh5~p9!NlU@h(z@7CaPz?I*_P7ZAM_+{XiEv!)#QB5emk-2a?80oNs*Yt{4t2
zyR6jhc+)}y8Y2T5QIgcg8e7nFkLsak6);?aPy`I#=kQ-#9MF8Bng?jl-)Mbi=86Ys
zvHLK)MP_4_NAT?d^^HdG>nohhjUQT}jIU?O<lV?fZe}H3bqkI_lg2+`){A^5I(avG
zSl4K*phC|}aYZGBnWd9=yO`(`12_B7i1B!&gidXrSAYn)ZlH5Sp`!(jqK6>ZWF4tm
zN_8oD0{Z1;@{k5?T)Nxz*Nl%a_kA_@iX4hQ-IeI_3T~lH-VJI5OKXS@ASGAJ2|B6K
z)LR8{b%I-Yt0IE&DL{I!B9ac#gxfKJOouuTUV#a$UPj<S&0^5>m9|;ev!vz$r5v5N
z(ieeEP~^KYgl;g<3k;-<Hcqd}<9A+y<Mg#ieN|hK;rK!`o>hxuhu9i%OORnAXBNa)
zx<Qteo*UC2WWjSJPf!Dmw5M^T`4kG?L?Nz1D&N2jcGFXK<I{)*B2U@1PrEm}`0W0C
zJaP~UgV13@PDb?pbCtY*$e4xoNN%LPA}GJXUjnGWwds$`CP-yn!RxGI!3!$@G~yo-
zyz_A6uLMuM)<H}Ho;-x$YqK*VdcG?-&aE`%gBIQ<WOpX=Op>*#+uhmi`0PkHK3A@I
zpiQ4ZCK{5(_SyL72iX!(*hm#rzWpQq@x$8`xyg-upDs%v8OCR|Uf}6|bqSd15_qbg
zA8PdU;<`oALtMP(*$vC^l!Rg2<XN1$MQ2=Hih-<<oUCELc(BX(iAV-P#4g<7#;?%V
z?nn(!CDnCxHEGeZe_I2yXo59d2`3u_atfL->EN5lEIy0o;!!7vI2WU!0V-I?5^GXf
zp$oQ4u7gM~leH17PcS{KUc%7<rZe}8GS(yg>V<>+2sf*QF?BcbM+R0--Q8x6rY0lt
zV3KaEsMj!w`WV0QG-Bgj^fqBOLY|4QdBy;Fwk8Sz7a%^kgvx>gL+PE6{kA$}>4Nef
zz_x$-A}Jq9kYJ!ptoLf)^LT^g+Zc+s8hb|$SmG8`UvP`aeY%+s%w!>T*=occUYh|<
z(5h15p|$t6<~uJDqC4aZ__+W`zH=vns_y(|%?f#(mb3zWEZ><oY)0vj@-&Yps$1$5
zwZIJZp0h;CWvZ0U@sfnDa;mJtRV<OucjLKmrcy<Du+$AIVXUYw70<a#@*}bBtf%kc
zUPSM=mXrkYaNjje*OTO~go&$?d|RTdBtY;pJ@Vb>j^yv)2_>uY^aFnc@uY<xw&6NH
zqGW#jg|8#HH~{_Lqj!RE?7iuNM#i(uUlM=kPF{(`fmad+Irnw}l6|;PL2MI<S3XQw
zNAI8e9p)2>q?0@hzkUEMK$<G<*eD&}BKMcaI0<dE(a8W&jAcNcCHcGNILk>!z_S63
zvE(ll8pt<}B*hreLFyZ7rclE1uDw27j-mS-La@G9mZ)KP1@c&DhRQ&B0~m*m$;rKQ
zt(L|W_-MnTR<M0mUbQ4|&;sf%;_fV!^o%h2TTAbRlcwpVckDLq-d)i?V3u(Q%nMHm
z-LadZDGCojZc*A$cz4o{`W>SzjS8JqCvM#|$699A?ACHq!Bn;HET4K^^@pisr)b_W
zcy`7v)v3@3?~XrqH;%H?lg;4*xBaddHC3F%W0Le9MAAZBb*MO&lZyJ%=j%i8j*^R0
z^tl{XKpuqjtY!vab$@?XESc)8tl4ch_h}PpY)Bs~Np_STmoK8nHJkf@Cc0+m<?<n<
zpEYRAiBwRVlnwEOh8IPp+vJMy5O8S<3Q8vk(mLG_<SLHk;tM`B_ftHG7iw==n!d>_
zP2Zl_z7+2Xn|U|hpuQ$uhnJT%B)+sX-DD0+Z!(w0=hCL}+-0iGETX5pno~@GXuoqu
zv16Wzcc353HQMij5S*OC2^fh9{=;>M=&^K8V$t2Q1>~x@Vq9AnUkj+mbF?P_yO{2L
zQ>7dUQO`BYcPm1yz8m*a{Km-#OPB8sEeHQuhhZa6w3#FAd8e$}P33-kvzt%Z^ZM{e
zDK+5zo_+SNQ$%0j1U><6eF|O?q{G93h15N(uT4Ly1pqS|1Z<bR^i=AsQ*HVYnv{6#
z?$gX731Cz`?82F7XBpto?U(qoOL0#GWnbD3_Nth1@Az-ktxO)W=4?G|jKrG*50kBp
z9Gl{shLRW!MJ7$W_pCTCWzR|hTWo6fyDs0_&#4yarkA?YM2M3}tfTiN#xPt|;|SvN
zTL?1pLwY4D<&JXG5YNnFqpWS9G$j&c&FLcjm(t{<DrC!?mwK>ik#*^%c=F05R(6Zu
zN-9v8Tj~)O=>)^%Enuv!d{4yDO{HzxgcLSHqX#85aJJmurvFJTogGwBB&MPy^dF4*
zeW|Wghkt>2Eq+Gzv751{QTq?2oZO)^b}%Nl{6Utp%Tj!2ITi7xYI8OQQ%$~9V@|4T
z|Dn})AD~}xy(R~*Tk9bM=9mV8o_MY%70plW8=_aHDsp|Piafb^2qTA!*U405D8%1-
zWj)Lv(jFpW0roM4s!N#uzPw1l@a1A8-Gk4b;LF7XGoJ<mct3#S1^<2-*{pEXhO2H~
z8=oWQ|J0rUnkleG8<C3o@e)O|7)QRTlEBpu!Nd^~Z)ZL#rV`z=4D#sZuF1~GR+8Sf
zORsJqxcRAORO)F`6ffN$maaF8(#^0<7x&ZuxdZP#snPRO75;6ooo(hgJVP=C&yZB6
zqC?wypIZ+10YZoq5fOP3e^nyYG*tUDY^IWgq(zM_sb)-Bx!l;7<F>EghzR~5p)wpV
zd$4?K<aRs6T4+Q&osg=?2Wf@?W0fGkwJ`>SeA<07NU>TmkJ0pljQ^<--Cq*sqSYMP
zW)>(G=aM7H(Z|wrS9pjFx1AtXRz(;Di@82zlan2$IsqtZj!?4jUL93210f%O#{oxR
z@k3B|DqUeGc5}MpCesga+dybJ6fu2#yUM`tiX1`8e<TIs^ZMKRN&gNh=s(@SNT}UF
z*ta3QAyPshH&Mh`v{JCN9;uDVtxA<4L{XgJGZ-w>495ZZSZjef*4ea|Tuw2Nq6+MW
zf?J0x*e)1yl%|VfTnv5?iJWtA&#kcmXj_kL(!-(>ytG3GK6S=3NN={ZnP)?U{1BmQ
zwBLb9*aQGez+t`K?6!E;u%6x|mp{cKZh7{H&m-kz!Nc%tS7ZUuevXCbnK#=V{ZSo%
z|AI=aDlk8ks?JSS<+14oqJ0Z%rQ3Z{$ZJ7LM5?sij!{rFU{UuV2Ld=^DVzi3_P4_E
z`@-2IB^El8mOa6{w^T=7)D=<)JlQ2vV^WR|_;P7+5Q|@kOvK9U2hE<Xf?~wey{&XD
zm+vmXsi-R#r0sMlrvgq=TA{0U5va+Yg$mxvvrLur65`DjYxr7kh>CaA!tvlynElQL
zK@umr;-=1Otv@<<5unK;X0(U9ZXsb3dr=Wa`$1UxsK4V{^Nx;{dX;O`Z_6_3QOBs0
zG7hbq0{3v}KzfAvN_v9+p`z6UnTwJ10E;*S0AXLy;XeY=q)8y?J^E2n`8lgvVh206
z>VMU~NBmMqK?5B9gD}Bs^4nsRHk|MDiB@)&IVOMAS}3OS5trDJe)bWAJp&KxPBrAF
z>gnbGRNzXiN=0*1`|=Rg0ZHv^`1!u}KfLNH+sYz`qDEOn+r_9?^cRrFz^3RG$mA_x
z<X-Bh;81^8XrI|0I~8|hY^zA=kGo25mH>%reT*QHv_flObCn$ymk2AYgyhE<8quG_
zW@H%;8Oi>ft9Wyk$SWuUVGx<~Mi`tttL402*UiLSKT3`=H;X#tG~0wrphYUQau2LH
zqJm)}0i`SVXn1*1ZqiCeDPC75-hG@b)k!l%N-$P-VST*Hk<q8=%4_`2HJyh$J1e*O
zF6)_FH>H2hi5#DAKmAQ5{7I#&x<h{7$Q-<{JYO3#A+1l;hb4#Ox1KjqJN`^rb8&ai
zHLLd+S0mQ)`Q{uxbSQaPYSC;;)ENt&cBNGQ*K6#Gf;_vT&}aR*9@sLG<bC|2GhlIf
z0~~6bzACE{TY|qIlC;JlH}aPw%Iq7r7CilQ8+d9Ry$82@Q;}&D%j7k~#~Gt!XsjjO
zuTv&-P6LZ<7j<i2<Ig-4uc}Qon{aU;8u$jchYLnTp}nn}@kS@SJRavDeq<AV3T&0C
zU=(OKg--v;ITFdECX$B#Schj%@gv{7Ej>hkO(I^q>7?C=EPx)h)NyfHE`FV~Yfp*M
zkWmPMDWK*jf@zCKR2YYdmqKHXcz>$F<I;3+h4OloU5d8Z6~mA;@axhxOGVMZZ>cx~
z5I<;kZ+}UIk}F0;5U4#x5T;W=%1>vjp-6{-SP*|s2SD(8F!`!x@)t<Igkf-MTgYKQ
z7lmDrfkd~X_uOSSz$a0#FZ1F*S#LdakB2+aN!VR;dMOgyZF2O`kIDi~Ae@jQ6+x>5
z+kB8E_@C-YsjA7T$dpv=RO>G-Xu!e-LRV`ob{C^aXB)kSj*&7ZD7Hfa3`YXm%(?OS
zdUC={n9~l?*N8}DHV02I#m8iDwpiVN7T8Yfz+VtkwgACf1))j45_l|IhR{yf25@>D
zN#Su)NS#PP`@VH{B&Fmu{^DAev%f80xX+jC(Da1e*hlh~oA_n~@`fMz=Ek%iFUlTj
zUZ(vVv=%I#OX{32;=Nd`JKz+dr^F2zm;M_hy>@LMc!x!XXj4x+UpNWggD7W!^DAwi
zVt)Krb^qNAA3c!aTJ=B%tM3&Pj8^$eC(r^8Gf4_WYBN$I#sO12Y*$OTLrYzO(s6I>
zzeE@wk7R_wu?)lvu?&!nll`u26mW<JHVw8uZ2wMrGz_nw7i77-!A8$toQl$W&Td_5
z9cWG-@)x9{rJ1j(DD;K;Zr_Cedt)~IVICEcwL!kK<4uodKC-Fz>8uA0fT&k>$uv+9
z{`YLhjt)l<eLW=J6N#EDyjXGk`*SZosfJ0Z`pK!LDXGS(0~Ypz8DLPd_o_X?fg6c9
zvLLOKFdpcn#Md~XhU=>EP?Q9Gch@r?nC6hLvmBvGBUVMsl+=sZLsghQ?SHFJxu<bI
zSlK1j8NH6+;^8}41@oMAo+-ZaqUP8$bz6@N!ApwG(d?r1VZf<a;gkXr8BYlQ6O;C~
zzUCx`q(Q$UWf6C5s!W_$MSx4Y!4A}@E@O;<rN2dBH@#*z{??8hnu5a;vVD=)?AqUo
z48WDTg}4Rg&@C^$QHKtYPr6ga;)k@!Ko$pYKrkm&F$n?DWc-JSxMHeLf*VRtO9KDv
zOZWz#G5ZyTyeH(L%?U)uW2HK|pc?hL%UA11saBxPfaL>VrTlW#Y5k%;)`H-SY<_>u
zG+bD?=An`oOdX{Ie?Ghpg##};#ULDtB4U|A3)&Z_k({RU^=BwP&6mnArN+%OauhzE
z0I~uR^3i)zP3i?uDpkQn8VVQT`#qI%7wak%$NAh*3>0jIS-Q3+ny!@Z`a~`uGfV}A
zFA%ZkLY@448HUP7rEZjYHaouMr597p%EeK2m!^Th3Jnd(5;?ytw?b4>rvhqN83HXH
zmYxwcr>8?vb1Gx5bMW`uMv&Pk^m%Tt&wj$05W)-DDpFT!8h+~9XjC<`=un3AdEneX
zs=2t#da1$~b?A5hQCu?^DtNsQH>E@77+P?67P623L&#>&{o^yKW<AwBT!}$w?H(sh
zFzJPZrTFetE{%S~Wq!wYxPJ!|dYqKMk@=aEk&JVkJpP%LvKB|HfUmyc&4NYvV|nza
z{OHX*9Q#o`>wLv9V^{_T9}~)x>Pe2s$<mS7DZ><6uQnpIDaBW3A7nu>1tTyXMSK@5
zRrD#tq{R_1_HRk&;hqP^wLJgpd28_7`nEcp9jTv-inWE8Ep{R)Ry(NnkJMG8(?Zud
z>;-;1iD)0yv`!2M-3IkCAZf)T4fKvzwqr>5U~f?t6wQ7|&5IU@U2pamEG767rT!K7
zlZghw27j^Fxma#Tuz>(v-`v?*y3L2bJiDLH5pZ14wZAI{{~MpbX;a(FX=8S-U+<pQ
z-Lt0n!~tt2xnA`AuKW+_qAL%?4j!Vnc}~C|Rx$h1h32Od)92%z{AGG>+n9n0W2~;`
z*~6#ZICt8#!kdtxX*~rm(%tBuMF;3HhAyNgT?gyS8oCd7Rz8fHGGWk_+<)ls{sUdH
z4P_h4Flc}0fy14LW8H<_v7Rp+M(%cK=@We$Hf?$I;DIeiw%xYn(R(jDcwp<3efMnw
z_^n5_^(?wfCUkXgeX{r8Hf{Yhr&AjR4tMH>Jy)AUuE;&FZRp{57-n0~)qr|6K_y`b
zHGsqV*~UG4N*nf+Zr)?yCq8f7V>IpQc*)p=AIfCnRt;US{^J&P&6+F!sSrj&RqFPn
zI&$Z=e`hm2ibhrrn@(-?r8eY9N-T;M4C1KgFKpO}T^^&8O3q#abI+~lhYvx^^-c@W
z5etiUELc7<uw_p&Cl7yTxDzL2sj3__;yMG~pi$;lUvgg}QyHWO&+tLk7hI4YI+s8I
z@AbmXJxew#4FSpYVSxrp=S82`2Z!qR1hGT)5Xq~Bn-xWJa!`9>ir{BFiXk8cC;hTq
z&yu=5>SULk;<JF`=~dN?f0vzwHuDaGSQa0HK{LPOB`vq(A%Y<k#T&lMaN0w}#a??B
zZ{7n$)if}PJ3!!v;(43FSfM4RP%;eqfjtkA3P_QT=!_12QxQ3bU=Vzj^LtP~6-lLP
z)4+r{{RY~p7?<kkpT~7(euWQB%DUr#GGdY+0f9~uidaiFwzdXH(21P~o;=4+u`B3O
zKHRxVz(-8<@+2zjfuNM$02CPzPHI_jsD)-d%E;46GDgZ$CEef~`d%GPGAd9ror0fi
ziGF5g8Ll+NM{l9$nGR4P@xU_$-P*9NPi`%+&fnUN|NJ>yfB158+U$|{{%m%Up1<Yi
zv-3a9*WT~!rXow%)}PES(DPe<Iy<*#QP-6{YdR`BCUzCSbFjPMRQcBKHu`a(W9!Rv
zZ^U5eAiYVZ6V|PWUER6tj2CT10pVObij#wKdLOEZmuS*CwV3hbA<T?nD$c}USFV=p
zi4qmiS>;G7JG9|_nK%^KH`Lx&VDBr`^X!Yc6oC>c_^sg~^kPiDbtx5aGoUR!+8vnm
za7hF*nW9p(XBa##4yLShi#-dcw;s@Vk*^>xMa5^f+8By;gwA&L$g^+_4@DF_=3NaI
z_ty~DaCA5v#RP36ou}H7(RS?^IF^__Z@4`Rf5M}P>PWL&m;_Ue^RtG`D#FWt==_=U
zXU|-eCuU*exYHpu(AeSF!Nc8M-G}#gcEPG1w7%YwM8UTf_1WCRNgUU~48ZtZ9X;HA
zxEsIl^KksOsI|An`fE$7!I!GfQT5!;1DLz@$pY)gEd~1zcYbkU-$hYsvTlp=S1_@~
z`lJPK0mLvGl{^f7xA7?S6h^fl$Y^Tk!NI8ZO%fL<LpQy(7lHtxID8{LQwi3}2Q=pR
zd|RG9jGxavd-&xma`5LF4%5Rahw*<@1!s>ud>P!-VK}Ppj(g3nOlP?t-G{aOi}3Ht
zjzCB8VfsO`c(`K%eq64<b^s#|#y0&QGq>jl`%xHtXUi8zp!@~a@1osW&a~oG_vVf(
z%X3Pw!pp^<9B>_D$MlYK2uSg#2RaY-EROCu^bYyNP?S7~AAbP8G`go`c2SNmzi@Vb
zPyKBA)5-_Xn=C;`Cw<D<<}2)}N0{-4GPu*u<e~jHTs@)9%p0Sfh>mVE^T!0WV>myR
zt_d&bg=2zk`Y|AP0CQd`%S?)nrk)cR+j;O1(Q`uE%RxXvsnt%}_-@a6$39_qraBM2
z<7p$;+dbz*_dC9(hGi?mm3o6-yLw&NR~gnPH%wmcqkqdM`BqHw&0ie}>+8aim5r<P
z@TTSA@QMa~@`@Qg-`v#=%a_%!xKj5m*C#K>oaMT2@`@F@ud;da@{PWYzR3-h0Je_i
zPhO$d)#9gb$&Ga@R@bf$ueeM1`DTQC7wXGbEsLxSW2XAl;Q4r|-ne-~Sf3i2syEi@
z%j+VIt0PU}8NN!-;=IZVotDAW27PsdzD$pVn`J))jJx#u@Uj)YYnDYKb&dQPsLk-z
zs~Oa|Om7TtYLsaLC%k?`<7VGYO^t;7`tbU?`ptS>gyGR%>U}re6RvNrU)>l65pJX3
z`i5oojjNZf(`%Y)Ys2-7byIzPI3jQ{tl7bV=P?qK8;XDiXeFplZt(dUd?jBQ^);Vw
zVN=7ZFep>Ee*Llt2*0d8448HLy1K~984jfS@CqW18bV#PGRR60LEidh%NxV>*saeu
zocQXJWZ8-pVV5SGmqpeJsV>zUR@F7F1Ispq>z6gI#+GZsw7`aS;l?mAT#+#|Wkv=l
zH3F);$ciw}$}|YWSNMDjun*#zz8VWKy@2BUGl<)n+G#^IOJxyrTBW{RI4ljigGJVm
z)$2FZ)7FHMk*4)E_zZs5EL|CHY#<<K8i66JBMssD#?Km5vy^tVdc|jtsSj^hw`_U%
zvj;VV8<#iL4<5tFo~Cm{UBhbT7Y1DK?6N5W@o-r=!*?sb6G%m=Rm(PP2uDuOj75;4
zI<NS{p5WgttHOH2^7?Q%qOV%kzyb;J+zb&}*R(zYK|9lc`nqNk!^JWeBv`gO0*Qin
zEnn8u5GFNSvAO|-*{p}_>+9-g_@ek9|8qY~Tml8T!N<R5enEaOlwUW>ulYV8M~rG@
z(h)acxf;WyKpU1dG%7ra<yiw2L4?C3l<Vr6!}Zhk`qe8}(WLrFxL#Jcc$NCSjv=hC
zyGIzgZe4gKlpou4fDh~fiKq+MuefybitBj#h9;3Z5sB52m3qx)n3Cqzu(<auTi3+q
zvu3kCH8?eE{AX>9xnHxaW?eX&qL;$<)z*g_R>45PQWA(6gZ4zm2o_1KlB4X9AQ%*|
zZ;(*T@R^aOb?c`2R_^xUzd~V{&z~b7{JE;(Z~waHrUjLY<}RvSc<X}7`HOF<^y!&@
zpEWz*_un$|vzGk-v(F`G0sV8oxgQFOv;XD0|5W=`{4eJ;|75_`{4e)3|EOOtzi{S7
Y7tgA=WcHk^uD)jO=jZt*{MY^aztlcNuK)l5

literal 0
HcmV?d00001

diff --git a/src/MONITOR.z80 b/src/MONITOR.z80
index 71b808b..ec083b8 100644
--- a/src/MONITOR.z80
+++ b/src/MONITOR.z80
@@ -6,12 +6,12 @@
 ;Assumes memory configuration is all-RAM
 ;
 ;The subroutines use these variables in RAM, same area as ROM monitor:
-current_location:	equ	0x7100		;word variable in RAM
-line_count:		equ	0x7102		;byte variable in RAM
-byte_count:		equ	0x7103		;byte variable in RAM
-value_pointer:		equ	0x7104		;word variable in RAM
-current_value:		equ	0x7106		;word variable in RAM
-buffer:			equ	0x7108		;buffer in RAM -- up to stack area
+current_location:	equ	0xE100		;word variable in RAM
+line_count:		equ	0xE102		;byte variable in RAM
+byte_count:		equ	0xE103		;byte variable in RAM
+value_pointer:		equ	0xE104		;word variable in RAM
+current_value:		equ	0xE106		;word variable in RAM
+buffer:			equ	0xE108		;buffer in RAM -- up to stack area
 ;Will use stack of calling program (CP/M) which is re-initialized at re-boot.
 ;
 ;
@@ -21,12 +21,12 @@ buffer:			equ	0x7108		;buffer in RAM -- up to stack area
 #code BOOT, 0x0100
 			ld	hl,code_origin	;start of code to transfer
 			ld	bc,code_end-code_start+1	;length of code to transfer
-			ld	de,07200h	;target of transfer
+			ld	de,0E200h	;target of transfer
 			ldir			;Z80 transfer instruction
-			jp	07200h
+			jp	0E200h
 code_origin:					;address of first byte of code before transfer
 ;	
-#code MAIN, 0x7200
+#code MAIN, 0xE200
 code_start:		jp 	monitor_start			
 ;
 ;Puts a single char (byte value) on serial output
@@ -54,10 +54,10 @@ write_string:		in 	a,(3)			;read status
 ;
 ;Binary loader. Receive a binary file, place in memory.
 ;Address of load passed in HL, length of load (= file length) in BC
-bload:			in 	a,(3)			;get status
-			and 	002h			;check RxRDY bit
+bload:			in 	a,(0x1F)			;get status
+			and 	001h			;check RxRDY bit
 			jp 	z,bload			;not ready, loop
-			in	a,(2)
+			in	a,(0x1E)
 			ld	(hl),a
 			inc	hl
 			dec	bc			;byte counter
@@ -91,10 +91,10 @@ get_line:		ld	c,000h			;line position
 			ld	d,a			;after this don't need to preserve hl
 			ld	a,l			;subroutines called don't use de
 			ld	e,a
-get_line_next_char:	in 	a,(3)			;get status
-			and 	002h			;check RxRDY bit
+get_line_next_char:	in 	a,(0x1F)			;get status
+			and 	001h			;check RxRDY bit
 			jp 	z,get_line_next_char	;not ready, loop
-			in 	a,(2)			;get char
+			in 	a,(0x1E)			;get char
 			cp	00dh			;check if return
 			ret	z			;yes, normal exit
 			cp	07fh			;check if backspace (VT102 keys)
@@ -378,10 +378,10 @@ load_done:		call	write_newline
 ;
 ;Get one ASCII character from the serial port.
 ;Returns with char in A reg. No error checking.
-get_char:		in 	a,(3)			;get status
-			and 	002h			;check RxRDY bit
+get_char:		in 	a,(0x1F)			;get status
+			and 	001h			;check RxRDY bit
 			jp 	z,get_char		;not ready, loop
-			in 	a,(2)			;get char
+			in 	a,(0x1E)			;get char
 			ret
 ;
 ;Subroutine to start a new line
diff --git a/src/bios.z80 b/src/bios.z80
index 2fd7139..47c7f63 100644
--- a/src/bios.z80
+++ b/src/bios.z80
@@ -1,8 +1,8 @@
 ;	skeletal cbios for first level of CP/M 2.0 alteration
 ;
-ccp:	equ	6400h		;base of ccp
-bdos:	equ	6C06h		;bdos entry
-bios:	equ	7A00h		;base of bios
+ccp:	equ	0E400h		;base of ccp
+bdos:	equ	0EC06h		;bdos entry
+bios:	equ	0FA00h		;base of bios
 cdisk:	equ	0004h		;address of current disk number 0=a,... l5=p
 iobyte:	equ	0003h		;intel i/o byte
 disks:	equ	04h		;number of disks in the system
@@ -180,8 +180,8 @@ diskok:	LD 	c, a		;send to the ccp
 ;	to insert your own code
 ;
 const:	;console status, return 0ffh if character ready, 00h if not
-	in 	a,(3)		;get status
-	and 	002h		;check RxRDY bit
+	in 	a,(0x1F)		;get status
+	and 	001h		;check RxRDY bit
 	jp 	z,no_char
 	ld	a,0ffh		;char ready	
 	ret
@@ -189,10 +189,10 @@ no_char:ld	a,00h		;no char
 	ret
 ;
 conin:	;console character into register a
-	in 	a,(3)		;get status
-	and 	002h		;check RxRDY bit
+	in 	a,(0x1F)		;get status
+	and 	001h		;check RxRDY bit
 	jp 	z,conin		;loop until char ready
-	in 	a,(2)		;get char
+	in 	a,(0x1E)		;get char
 	AND	7fh		;strip parity bit
 	ret
 ;
diff --git a/src/cpm22.z80 b/src/cpm22.z80
index 90436f0..43d444d 100644
--- a/src/cpm22.z80
+++ b/src/cpm22.z80
@@ -11,7 +11,7 @@
 ;   Set memory limit here. This is the amount of contigeous
 ; ram starting from 0000. CP/M will reside at the end of this space.
 ;
-MEM	EQU	32		;for a 62k system (TS802 TEST - WORKS OK).
+MEM	EQU	64		;for a 62k system (TS802 TEST - WORKS OK).
 ;
 IOBYTE	EQU	3		;i/o definition byte.
 TDRIVE	EQU	4		;current drive name and user number.
diff --git a/src/loader.z80 b/src/loader.z80
index 8045c32..acbb2ed 100644
--- a/src/loader.z80
+++ b/src/loader.z80
@@ -8,13 +8,13 @@
 
 hstbuf    equ 0x1200         ;will put 256-byte raw sector here
 disk_read equ 0x0296         ;subroutine in 2K ROM
-cpm       equ 0x7A00         ;CP/M cold start entry in BIOS
+cpm       equ 0xFA00         ;CP/M cold start entry in BIOS
 
 main:
 	ld c,1                   ;LBA bits 0 to 7
 	ld b,0                   ;LBA bits 8 to 15
 	ld e,0                   ;LBA bits 16 to 23
-	ld hl,0x6400             ; Memory address -- start of CCP
+	ld hl,0xE400             ; Memory address -- start of CCP
 
 loop:
 	call disk_read           ;subroutine in ROM
diff --git a/src/putsys.z80 b/src/putsys.z80
index 786b4d1..de68318 100644
--- a/src/putsys.z80
+++ b/src/putsys.z80
@@ -6,7 +6,7 @@
 #target bin
 #code _HOME, 0x1400
 
-_bios  equ 0x7A00
+_bios  equ (0x4A00+0xB000)
 seldsk equ _bios+0x1b
 settrk equ _bios+0x1e
 setsec equ _bios+0x21
diff --git a/src/ram_monitor.z80 b/src/ram_monitor.z80
index 2add648..c07a671 100644
--- a/src/ram_monitor.z80
+++ b/src/ram_monitor.z80
@@ -43,10 +43,10 @@ write_string:		in 	a,(3)			;read status
 ;
 ;Binary loader. Receive a binary file, place in memory.
 ;Address of load passed in HL, length of load (= file length) in BC
-bload:			in 	a,(3)			;get status
-			and 	002h			;check RxRDY bit
+bload:			in 	a,(0x1F)			;get status
+			and 	001h			;check RxRDY bit
 			jp 	z,bload			;not ready, loop
-			in	a,(2)
+			in	a,(0x1E)
 			ld	(hl),a
 			inc	hl
 			dec	bc			;byte counter
@@ -80,10 +80,10 @@ get_line:		ld	c,000h			;line position
 			ld	d,a			;after this don't need to preserve hl
 			ld	a,l			;subroutines called don't use de
 			ld	e,a
-get_line_next_char:	in 	a,(3)			;get status
-			and 	002h			;check RxRDY bit
+get_line_next_char:	in 	a,(0x1F)			;get status
+			and 	001h			;check RxRDY bit
 			jp 	z,get_line_next_char	;not ready, loop
-			in 	a,(2)			;get char
+			in 	a,(0x1E)			;get char
 			cp	00dh			;check if return
 			ret	z			;yes, normal exit
 			cp	07fh			;check if backspace (VT102 keys)
@@ -367,10 +367,10 @@ load_done:		call	write_newline
 ;
 ;Get one ASCII character from the serial port.
 ;Returns with char in A reg. No error checking.
-get_char:		in 	a,(3)			;get status
-			and 	002h			;check RxRDY bit
+get_char:		in 	a,(0x1F)			;get status
+			and 	001h			;check RxRDY bit
 			jp 	z,get_char		;not ready, loop
-			in 	a,(2)			;get char
+			in 	a,(0x1E)			;get char
 			ret
 ;
 ;Subroutine to start a new line
diff --git a/src/rom_monitor.z80 b/src/rom_monitor.z80
index 43aa44a..3f8ac2b 100644
--- a/src/rom_monitor.z80
+++ b/src/rom_monitor.z80
@@ -57,10 +57,10 @@ write_string:		in 	a,(3)			;read status
 ;
 ;Binary loader. Receive a binary file, place in memory.
 ;Address of load passed in HL, length of load (= file length) in BC
-bload:			in 	a,(3)			;get status
-			and 	002h			;check RxRDY bit
+bload:			in 	a,(0x1F)			;get status
+			and 	001h			;check RxRDY bit
 			jp 	z,bload			;not ready, loop
-			in	a,(2)
+			in	a,(0x1E)
 			ld	(hl),a
 			inc	hl
 			dec	bc			;byte counter
@@ -94,10 +94,10 @@ get_line:		ld	c,000h			;line position
 			ld	d,a			;after this don't need to preserve hl
 			ld	a,l			;subroutines called don't use de
 			ld	e,a
-get_line_next_char:	in 	a,(3)			;get status
-			and 	002h			;check RxRDY bit
+get_line_next_char:	in 	a,(0x1F)			;get status
+			and 	001h			;check RxRDY bit
 			jp 	z,get_line_next_char	;not ready, loop
-			in 	a,(2)			;get char
+			in 	a,(0x1E)			;get char
 			cp	00dh			;check if return
 			ret	z			;yes, normal exit
 			cp	07fh			;check if backspace (VT102 keys)
@@ -381,10 +381,10 @@ load_done:		call	write_newline
 ;
 ;Get one ASCII character from the serial port.
 ;Returns with char in A reg. No error checking.
-get_char:		in 	a,(3)			;get status
-			and 	002h			;check RxRDY bit
+get_char:		in 	a,(0x1F)			;get status
+			and 	001h			;check RxRDY bit
 			jp 	z,get_char		;not ready, loop
-			in 	a,(2)			;get char
+			in 	a,(0x1E)			;get char
 			ret
 ;
 ;Subroutine to start a new line