From 347a945e29b540f439d85467db44cb2705ba9af4 Mon Sep 17 00:00:00 2001
From: Robert Pengelly <robertapengelly@hotmail.com>
Date: Fri, 23 Aug 2024 14:35:20 +0100
Subject: [PATCH] Bug fixes and start of left and right arrow key logic

---
 build/chimaera.img       | Bin 368640 -> 368640 bytes
 build/chimaera.vhd       | Bin 34120704 -> 34120704 bytes
 src/apps/pcomm/pcomm.asm | 224 ++++++++++++++++++++++++++++++++++++---
 3 files changed, 212 insertions(+), 12 deletions(-)

diff --git a/build/chimaera.img b/build/chimaera.img
index 8c637b69ce9bd3769255441178dd483ea2ab54d6..ca1e7c2b1534bd86815bb9fb55b163cdfb27ef9a 100644
GIT binary patch
delta 3446
zcmaJ@3s93+7QXot5=6jY6%jP~f8<TPNkms*<BIjUOKk#Cp03n&XY4rJ?G%YlJ6)45
zvm?QlvEEL*+gU|wyW6t1%c}}x3&99+)L$^w4lRm`PQ5X;yOgR-72I?GKvDZ(Cfu8Q
z?mg%G&iT&0ak!%$?&y8VildpYK4?t8HqBmCF{gM=F+yxa(%+M2^9DZnrw*=9+BwO-
zCV%znr&i_j)?zFFs67PLnh?reo&WUer}!VS&qnJC5L#(ozkbEjt9TfB6eR_o43Lig
zv#j~t=<g!-$3(7w7+Ekf#uK=B{xM`h<deu?*JE~hb6wbba`0+?*sEMR_S0S;<-2mt
z+Q;}RkO+Pc%bWP>gU{A#47UpN4DOM4i_36bzkm;46mZ?3Ah;_cEVM1V@&spe<HLgj
zEr=~GQjMPCki}ZySdMH9@F5{yv7&{mIxY$=TvN96f0HP<t_U>7KtD!-Ev-DVI0p;p
zE7>GxD4K+JCeAyfuN;-{nq4`{m8+d2^b<WTK>?*}y@EFB$*((iayK#Q>WrD!hr#DU
zQE=P~+o6Q1K@<$vtNM*TdK8n}olB>Q*#8!?(k)qJiCY_~!j&f!li}24xMR-#ODf`U
zFX4`4l4I^n?!8Ph?B2w!%_Qb7)3m4cKrocPX(TUPOCs%E3EVrFT<OZ4c~-~ZMKgF&
zt_`8IL)X0Q_#0e8P8#^fhc8EJY5+q^tSD$%5<*>9BfV?xBLGsjnA|?0ov}9cAt08;
zz<WN)>CWbEWRRD;V>mH`yxF~s>&gH$Jh|O%;<jc;h_<Imh?;Z~qJupNTt_N7(X%n_
zN-`kYDfc%b0JTHz{{XozN6=Hrbla%^0IJ-5pDUliR$7yrS9%rlwNSsk(fvYJU%A}>
zHZuBhq>}E{3<@;^#yj|z%6?%-OkNv@?p`fcIz71Vyins#+N)9lu{->&ibBJ6d}u%*
zHK(@Q2L&6bU@PQyLItH-l}D+u;<}51(U;Y?OYT37F!L=8*fK3pAPNC3`Si*H$b!>T
zBn(st*a>!Jp{5|uQse2U)fgXC`3<*5-Zi-Ei;6dE%Tz|+I)?FwnAAT4Y7uEWojE%Q
zZ2Q7TfRWcOE(kZwreb_h84JmhGuj!d_=gIjUMLmBaRzjuBgf8wE_7u04Cq1^)Ww3J
zE)s*f5J4C5<cg?M-{PSPwkVfj79HZLeYiR2cm_wzeaXc;HPoSLnJWtT9U;EsieT`y
ztc5RLWuJf$-5H9jBM(56O*U6&tw!p%`r@*dP*LFBwv~`TA0)6sYo!NM7^4A5nNJ|S
zeX;iG3RA94?thUpSzuVA2z+dsRw4Hvky)&H`L0@xb2PP|r8DbfNpWeB?JbKnzaX!$
zvzKSR0Ld<(8@0e6Sjn9|YYJ#73*hX^D{Pa=pzG_)ibvkXbr2pl_|>x398e6@uW>#c
z!iRkZL6dKpRD4m1*44{1*@w7J^8vmU!(Bk{Xe9r($b!6%(>!_Q9B=S}qB=AvsammF
zWx{~_0BYTYEUmq~g&twso%hO$1-A`@J1hMtnVdV9k=DysjziNq?Bm!r-C-X~vxVg3
z1Y|j>9!QOnw###EcM3ENE5W{$WQZ}*h(+3x7PBanC;E*KnAt-6lO}Wld;jE%v2)`O
zrTBfx7))`##?tOUub!;wXB`cWOc8+g4P*+1VGqg_p@+K1Ogyw*$C$|uU3hFPc;VHL
zcl-Y}_IM2{=CvZZaX?f%zB89A4ZiW705^Wz-in~6qIxZq$iIsnn%IT2fANK2Q{n9B
z0ij|R@3SeJ%;RU_$f=1FW_Dur7_H*`%OP-6gmlM-foyI8z|gU&hO3MVRykQ}G;57p
z={hf1>CsqNwm;f*rBc&5#yFc1433v&*|rqJ^=gHMs-Wr|)J5+9=zefz6^Mt^t*AQQ
z5-AG)J@;v?tbBuW(C9t_!i5yww;Bh+`6|zmP<KUGW5}nTaNg(%3_CBEb|l8PMWPS0
zycNo@4?i5b8_-zk)<n|qX^b7;?>wYsf^ZI6Y0A7H@NlQ6M}_DZYS>i2k|~QBrw5I;
zcq^TiC<zzT$~sGiWS$0G->|j5;raT8=jsCyR{BlC#15GUu9o&g+Lg}Bu3Fw{=Uy#S
zw4z*)h}_?F&t?BNPj#`l@>k%d{0SDybqHGT5X+zh0>0AevGo0${=eLV3lXzc3toyw
zAL}*QNoZnOZ<__(9mdsALew)+FV=%}=(hjQKX-2aPaVAct^YUoi2eL>u2w_b=i|cX
z03@hK#l?J@LT;Q-6lygd08|hJ1E?nPNFMh?bdr8y-rTQ7BsfiGQC(76G%lKxdP0zg
zUKk<IT+q&ZJ%(bx$70nm*}Lp<)Y1I<g@c?CI2qg%m(@r;Oy4=E`MD>)k-X6VgnClR
zRgeZ;6+J*I`;$~l@uIAynTwkn`knH^ef#z)!V&sJ{>>{0<;8tgjZlL^{5wL*5bFVi
zj!fGmLugyvw&xHs&glLdLVt`q8VA;>Z><RZcmC>FgkFpv{{W#sB=0Ums5g1@O@s<{
z?6OZ4lW0klblHE+Qq?IYI0v0w($nG+6X2$*Fv8D|R&N6N{32d)IzhG*?OpR-4m^UV
z6Lx8xYrb1&^hqzF)1$<7-UR6(bRJjH6cqT3Em&w4a}23+cY>ELcPu9+lHXs-Wkcg7
ztx`-Zq~~MV+d*ay>e;G5H8aIT3)M$~p0t~xokBWcxvwWWMP>$Jwq&=9iK4J0vrSB7
zZ%T;ktE50g<)|8F`s9GzwK17A4#sjrm!&tR>8etes@73OxWx0X(Tt}$ZHlKl?R%bK
zX+%GSS45^w@r+FSA<wY1$9RUNS?IOdlRUu-<Ec(3?L)b2U_907g>?69iRZJ|^lX*!
zRHs|$=hLTn!g3y+V^F69KV6HdjYsX$TzWi#o(|~c=x9V(@G(`VQ!b3we$lMHzMD(+
zE}}21B$DcxjHDM&k@Vv4Np@j!>`T0&8&8q!#y=$4g&!l?g)OucY7#6acwr>Hdh+Cr
zTs8nnHZ<ILo(+tgS8t(tswr}?4CI!3^*|1O#BxxtyNg)mSPj2i1k^$^=$;VxzUxW$
z`*E4etEam{=&a8Ii=3X8<!uj8yVubCPg)zoJ+ruZ-Pe^e?zfp_OHmwA7tNiVYW_Dd
zT|Bu`J-HG`+*4Ccv9vF0SlSm=5=+9HW7(0Y64*Ckgz4Gg;J%W@Tv;{*n@gT4iQ%@G
gCZ@{fc`ehFl`oC%d1+Jz9}Yh9V=s*=-u}n`0d`B2?*IS*

delta 3180
zcmZ`*4Nz0r6~1|afCvay5Q0fwBt}BWGeK0)xZonF!?FZI`BkagPPc!Ktt2wj*$N$|
zT_P*9-Mhb?>WbK%S*lY7<S$bQM9^`Ki&)%svI_<nz0a(508y)`J@*BK)oo^ybKkl5
zo%?;~eCOU&IU=hZk?*edlYQ2H=8Sf1QRR-N$l}Oigs4Tr=hd8?eAf2~^ZDoI8DTy%
zFC*i%t$D1u*vx)^-XDExL?|mG@AZt=*dLgWK-&utO3%s8-tziZ7A%Xxg^lMn(4qlj
zbI*U@2zf6mG<zX3-_9I2i;HDnK;}a}hYVJ|FfVSd5Bj?pqUJ1&Di&V*|53lsH$8LP
z3w-^M3*t72o7h7~Q(I;FJB7J=$JB}9GOqqE%QZ}~T>UhwbXY=6#FbKgjxjj6hG~}U
zjV>(;czBUPCUZemDze6M$C8y;e?4N^1C}JLA!m_yPdkfDw&4QuK?<Ji+O*;ZSN%|2
z5mEh+*&k+`B3C$4g1i!Ywjb%|@Q&^S%u^li>5f`4u4`eMbS`Dp<Dha04D~Lhe!S*u
z!yvh+!(F3E!TF1bN5_AJ%*2|E*EtkRVszE#{N{F3CF6uK8Lo1yV;mcBn<JU&*nlS-
zJDJiA_!u!RdV>QtfuvE7ca5uYXOD_$)!`dGSxZN?6kjC87jDlFB!k-K&Asn4s(cMZ
z=Nd*r<#hm}Me0&2DC0o8C-i*g3<4Nu*W&4OiY29S3t;?gtpFpfZzJ<K5x><J#ds3&
zhkcuwp+rE#;^{skQ;{ejI;as4^=k!0NBdRGU>rWz|Ks?3YCv>A%%4F3s$9%}j_e~L
zWLQn!e8?X`)dy#o{Y$9llDawlyq|a*6stD!E}Js2U(Ej%83xmY`qj#(**dr3KDSA7
zmo1OV?O@OYPqD=2<m$a_okLw45CFvPvv(|o`f={qB#Y}V{;G1CwL-}&AhWY2FI5CM
zC2})YKgAjbQwA!;{1=F$v6XIXvI#0gU_(<LxwjIsU~?8J-4-QhgLz4zydc+9=j>{g
z8J^Yf`a4r6^p3`&;@yg}0K?#Rit%MkVLt#W5qEr%yvzseV8TLR`0}VKSRX+=N}nte
z@VZMN3*~}(s1kg#xCFA$;<ig53oV|w1hUZjWU<mG3zbh6E|7&1-*6>_iC8FtHQcUW
zM(!&}<wSE@?^*`u46H6bEF<sBTB2P_?s&4Y>jA4DY}p16=OwqG$H?IT?oen8G}K%p
zb+^id-fAo^YYB8IS%)<p^2bB|EDAGeT1^SLA!9s?zZ{TO)`*Q+Rxy8HWHf=P5_``Y
z7g@yo2O^U>uOPRu`=){_9+Fx>s^mZv;EQejnFZv}G?J|+x3EJbf>v%UE1o*R)x$op
zfDaS3r-3q{PT#D6m$(L=mFJn}gk4mku-_Ea?H_F)Re0HU4jP;&eetcK1-V_L3jFaE
zR?mZSy5vZG$ZvOmkpqB7Q2S0~YQL#4k*{P_0guayl@2Qh@yz798j~w)nVSkM8<Z`+
z&16~c7sx3loG}>3fY~<~S;?~|B393qm1pzhrp_w#&V{<KY0DKUO3I3Nmy{Oq(N7m-
z?dq!etiAMtF~p)Z23nNKF6f8RCq@=p$o<4v2_5zCCoN1(uS?nZw2!~=gs2$4cQd$}
zLR?Dt4T9?20Zz3~=4CC7@#T26AZK%(Lt^)`W|A!hHxvP%y1KlwRaW(uXrnbwKYqy1
zM2<p&8AyScH$WWfaYG)Nge^6_Euk(YAM}K567A2o4I3OMK@4JWm<{e=w#Iof&|wKW
z<A2o|%o?2D3EN0%SBkPD6rD;rZ;_ljHTu9SH<L#y2qto-!&zhrtV(4o#FgpZsZ-pu
zW&D|$?lw6shi%wQx@Un0+noIYh<t)h?`%w`b)}QXeUsLeX7Udj&(;H4p#l~mk@Gay
zc>1S}r}s6U-rML6F%#R|3Xu~UxU)^3ZX2<;Dr}X^J7s?DC@amSgha2KvG*&8Gn%V@
z1;XtA5#7q(27ouvy#x^ONRCGnt(Om+As^l6H_VX!Y2Gk{e?F9|X_Y}XEbEQz0nWJ5
z5^LOPQ5ZQ(jDFnKn@5&H49KbFn>-SWFAuGXZIwCU;L7(MT)BCML3+T5E_9gCgNgS_
z1O;MOT~zeYy><lc)s*830}(xS<*57pk&|@Y!#l1imexg)<+q(Cvz*G!{-Kooq51dM
zjxw5dBsRERVO-7n36`sgoMfSg^^V!To@#{Q@w2kIn=cY>z9SJJA65|2E5a}9!oRt$
z4qneCty`aD(1Zk`XU%(<aHjd6?s8GEUob-d5>NgSp<hU`;oHc>gVHzmB4k+7_X$FO
zlD5VmBniJ~hF@8R6rsb)r=KHKr9N1O(3pDnZG?WU#b1ubYCNk*Nw{$I{f8!~+Y@UW
zrlo{3**&pTAqKdJ+ugCa?^|xmNUZ1ps?B_q1~<Y;Y=y#>`DnXgP`DOsP6=1<jumbN
zTW<h~L*8rDVInCsFr>%P4N-a=QpTggrr|7VjtncP=^EZg&9Q#@Qjf|+)`Ua36}zDU
z{JX(D&>tBm$^k$v8#_HJm$E#$!=s`ntG^woy&=^P!(f!I_KNMlRO2HfQs(jv;iPT;
z&La_NR9fN}ED-!Sk`h#D<_W4a&k4#kIA)C7vQjfoaHZyDf^y9Z1mzkN8H<=B2vI0O
zRXqM|EQ=Z-C{e{1l7kWSs=)c<Yp9nJRmGdg^~Li<!M&MZu2;na!GsoL2a7s|v2cd~
zKP~Xf*OHJR-<_h0Crl8jbpz9_3{JbXQR6m{w*myBVM{4dw{D)OTlbvkkPbK8;<jAZ
z%@e(@dzt8v?ggSlIuj{{!uTo)Q7BP2hdGi(4Xq@Yzma{^P=apGL~;Y>34$94rn)&G
zxCZ`}K+zT_((=(lJ~9Bk6^Z0+e|WBVmHw03Y<F{{!k?h8yookvOKQh6)ahQ+jQLOf
z8Oz${q`TE3=64(Lo}w5WRunxq44Rl7Ce3*c_&k4^c<zxGKVKd-DGb9)q&Rz0N?!>t
ziNOxv0y^xRTad(*r@&^>_$MV%jCIrOP*S~X>g`=qBKR`!6}Ro0@@qJWf6ILLKdG!L
A&j0`b

diff --git a/build/chimaera.vhd b/build/chimaera.vhd
index 0507a766f6e4528b78c01929993b2c9d8a5e13aa..14c5bb51022cb044e309923ec4537fa3451f094c 100644
GIT binary patch
delta 5951
zcmaKw3s_WT8pqF^ftfi7I4CLt4l~F_5Dzn65(pEoSY8+y1rhU-ZMtq{D(Ge=7_~B5
zW|#Gpo8qmlNDB=Gq!dNP)kclXwQ$wUtuvCfW?nV{_y3;(HQQaD=l468@0{<v@Atjm
zIrC6-Xrr+Rlvind20pjr)<+*}mYID<)M76^vblq2uQ**^mM&|62(-Wl_yQf!SEkE`
z`hkVH`Q386<q86~g6D5&M#gxv_s{4(-`=kEw2#ahF=EW{EVComVg7ZyPAE+kgwZ3i
z#*G+b{x9v(!l-OP7?v@1?2vK8&DffSAkTx_ACM`0Jm@2h_=slpEJNU!yF>FnT9(@a
zGn?-T%^P}qXt?U0_R6{UOQPmAqqvz}XWZSjkLTY1-Sw}t9yT)lo~(TZ7h>L|+4;C(
z`I=d!ChMh~Ol$3x&AC(M4W}&frqdRA!x@XEHb20wR;Lv27j3ojrZW~bJ2Y>i{>EWZ
zusgDg1`7o}<@J_GpCJ`u$v&5*LfoF>@nn~!=A1<hv8p?Srs-8?!R|bhtu9Sb(&DAA
zia{?$hku$_d_%jiOYseHp3!+l{UlMHBsA%2#`>t+6O{+`(gN|KtnAfGA>qem^xMZ}
zDZ1%5Ux!_*%VNDya>~}A?v$0QdTF5KlHH2nP^Tv=0}N6`pk6NC@6-NJqjFg%bz2=R
z>6IdbG(g;vq*NNDB=PMe<+4GVET$(Z8IqJLjY~wb26eSfncG{6QFcjEl(<n=&Pmef
zPDc|MYgfh^R5RY7?oOy2<R`r@My18$N%E$%fu@y+ry|s4iQu3ZYQ7GvAK5G*rVag-
ztNv0%$Mm?nVzT$=K=e@30;Cl2yMD^z04YRt^;1>{NQ1<^{TP^8xf&p)iZl9oqnjP?
ziEev>H@bC!h;DbBvOiFo5PvQf(Jj!rw+RSvzSjMoP;)jwJshjfyy0Fe6fbEO=XK<n
zs@Te59VH)aI_7po*Hf0{<MXucHG-`n%`@FAOlK@B8*SI*`*o)*^FuPLMdA9_xjJW^
zyy1jpWo^s~y&g$kGhfQjv0jkZH(HdHout`?XDkIMkr^2Bwi3yU(AViq4tc|Ai>)E~
z_(HAwh#<3bOJhNj9W$rmiS{h@Tu+RMvu>iLG2bFP(XPueWoOz~*6l7e*>07%t(UHB
zw$_$S%$*W3Rc~t;#UOthl<~hs)mN$REG2dEhBmv;uR>E^ijsQzTf3;PNN>^fQ3eEK
zg7lGhO^~sVcY=z7SuqJpWiTryLAe~vib-gzn4aE>iEgWyF07bH<y;pj!Fb7xIVlLL
zu?DN>&1&K0$}~TzpQvPnNU^yKOlpy-qPxo?Z?r`2K4-BuRHWmeUU%Fg2<ifZygYC%
z)?@oR+*4}uEX}gqsTBs7#avr348z%g;mnV4sOx$$yG9IPgGD(OB83)q@JStApmjej
zrrNO?;M24tRm#`8w`lB+%&eMHlk-O0DUNRPp-H)U6AKi(BP%;IXU{P+R}98JTb&Sr
zp+Ih0=fRQLY9629+?$zGt<m5OQ8qRA%4T^3o{tOMMom>3DhSiLtp{$BH#Jx-rYw8=
zYM3}FqUM;HOTxG2h`GsJCF8xJUNd?6F9^)e+<nBXEbT6ttqmx#-6kPsxz7}Rs*J$b
z3RRN@d(|<sUERX#oj0fET51bq^yg4Nh*du8F7=B)W-e~Unk*`8l?yr)6}H3|_@<>b
zY0~2AFgiMQmv(f)wQLikRpd~qS1g{=woWHTOsdFmS>{E%ZMWENS5L*X)d?<sHdG2J
z6kG2a=XX7=-f_+{*>@EQFCJQXiYp#Hr3N72*M(FAHp_%07uMB*mQ*v=;_jBzLM+Y7
z7VitPto4BV{g!*@AwRrI(ApYZ#-d*`=IN{rtp}UL)_sLl0w&gFOvg027xJdItK^jX
zzOoeP<&>_Cmi%CILxFC4M(a`Ba=7h|4Bj!KMJ*BCgYn?)0iJiVA8O|k0yMPTS%bx4
z-kFZ|tUbrdT3yWvi$mQRiqnO^UWa*}by(CQ7TC~Gv{;i;(93#ZxsP4dW9CInjn@4^
zv-iw!6p)xOq-0-3pv&T3)~uFl=8borvDI!t^<s#c9kxb)b4lG6Lv6m_Hs8<d{LQwy
zrpwN=dAp+{s{@6t$@Td<zpY!(UvDxw)EUuAc^KwHZr-y#f<@sx<4}8rdn5OE)*aLf
zYKu@lxojBAi;W$;jRlboH8|Q+y(n3(FO8t7E0@d4XOxxCDJy@XtSP{u{uI@Ag{BU#
zn_cT8hB?pHl$xD|;)_##s)W%f60Ljt&6>gw&1yoZT>JpKnb(<*s#%W(xSm7k2?B>|
zhfww1i|!Y0;w>q2y?Ni1wgxUZ%^@sh&9Q2`aQ(8p9CIifY@0AHMD_et_jCX6z8?SU
z#<M@WAG)a&hD(FRQj<~}E`|AbLr|EK{L@)#FXg*%DcVwMszXfK-gppLdq|#6Uqt{)
z?;cWk_wTQGLfW3;GET~y*y_rNIp{0Ysb5@CruC2_I=vF2%I-S5!^GmRDGXDKDqra#
ztrKm?%v#&_;<{3X-Hq!^|L>Q<Hf63^>TGPU=n{;ET++2sDK<+n`hjxa<bg^3E6dH2
zQ=7AD)hZu<LHI=b(^5gm3_H185XyaAZwZ3V*RfU*wn&pTf-o~|<`aTo>v-TzL3lE3
zXBb+8es&1Lk3B|&3c}Not?voK<FQMo3c|72DHjDHC&BX_h;zlLlY%_ofgd<zdt6b@
zGtRx94^NFN3NNmF8-BS|)ki5`MoIFJBT<?K!itf<q~RlZBx+%VbL20hYz>|-rL#^a
zZ>W#*d?=m!^lC4m=_F6s)nxXJ0ju4EZuT0aP|+2wJQ^*H=5|}O6rpoP=cp$_Jzo{2
zQ;d|z28&fPb#g`9)x;naSi}@8FyB2me>_m?+DnsxQmshY<%)J$<|kFVqWQJ)t@%Et
zDWLd<5qpWTP1>3XvC6g>JnsBi@8@S{oTSsl852|=e^1J9bY;rM_&X^Z<8P<z7q2A7
zBjv#OJ1Gao|2Ad6_<K_Ji?^%abZJi+-FQ+q_EvVqBV}woDI0s|s7tzdQ=ZiuDWk!Y
zvaz>a{j$TIlyN@ODs{6Odn46^iqvYeu*<XW`NAU81Z0|)pa%GPzqrQUs_3VdepP8q
zkd}yX^?lXFdQY~-PRzDmzLRaed^_8{vQjA{+XM2QY!Ar4&33PRPquqyyPAg?@=h?i
z@nl<{s0>X+w%9UTZp#y;Iox`ZtWUJ7nfg0P;yjZaT%U*}@xxfe6khMk$>g+t+ZQPs
z`l-u&alCLSe})dKsZUfF`l`VvoBBHIDh5~I5_Z*FE8nq7rM}{{{*|NdlZrLs!%52Y
zjfODAxY5x4_JJu$YCq_I`{eRFC&QH5yAMp8y!QqrOP<SvHXA|}|C@$T-irfV-hKrS
zjwXA1M@xTkY6_p<U75Do5F$=by?vmo3~x3_x@C*fB;W@+0Dlkw0zpS$1VNw^=nR5E
z7tj@S10kS02nAsv9P|Jt5CP1<0wO_A5Cx(^42T82Kpcn%y+H!#17wg0tiT5Pf_|Vs
z7y#}A13?l<1}WfvkO~HY2f$#E28Mv4U>Fz<Mu3qZ9gG4Gf``CpFb0eT<3I+mgG`VG
z9AG?{0J1?2m<V#gB#;LtgNMNsFcnM#)4?NP26z<w4m<{Cf?44AU^e&zcpN+do&<Bi
zQ(!Kb2j+u(PyiNyh2W3iX|M=90~Uj4!4gmiiojCv94H3QgBQS`z%oz*oM1Uv0bT?z
zftBE8unN2aUInj#*TJ8`YM_8Oz?)zV_zQRotOe^pDOe9SfQ?`i*bLqVe+BP=cfot0
z47?AvfUV#I@F6G%+rW145vTw=z)nyJsz5c^1!};@;1jSL>;bi4FW3j_z<zK590c{?
z5cnH7432<LfeRc3$G~y$8E62XgA?Eja1#6-oC05huRtR>4gLYnfV1En_!^uC-+&9?
zpWs{Y9Z-QATm((vdvFQ-0Dc7j0++#0;0pK|Tm{#_b#Mdx8~g%pf@aVHTEVRqi_$bN
z14^W{ln>=g=_oyApd`wV>OlEZ0aPH>kup+2R41x46-;%Zx>DV!5UM*BN`+D3R1eBT
zMNnqSLPb(NsVFL%ilJhuUQ`?vPxYn}s6LcTB~n((M)jroQT?d_)P2-IDv3&_QmFf>
zRB90Q05zEMjNcIM4W))r!>JL}NGhEgMLkG8M2)7#P-CfaR0d_IGN~-eL5-&-P}x)t
zHId4tCQ*6RWa?pR3N@9QMop(4p=MBzQoo}fqh?aGsNYkwsXtJUQ%_J&Qgf)MsJYZU
zYCe@u6;KPPh14IZr>RBMGt^@0S!xMYNEJ~_spqI->Urt~>QB@%s)TY<%c&LAi_}Zh
zO6p~574-`BD)k!mI`wC2HKkB*P;XLesJ~EeQERDnR4KKd+CXijHc^|Yx2eBU?@;ej
z?@?vc`_vX{EA;{OAyrOoqqb8YQ5Dn<YA01mRZ-Q{E~<w5nEHg;P3@s-slC)bs*c)E
z9iR?U_0%EiZ`5Jx2=yuDqK;C>sN>XUR0H)nb%OeWI!XPVIz@d+eML1=r>TEXXQ;E(
zIqGZbJoOEAf%+%)E%hCxQf}%Z)kJ+yU7~)Vex&|IU8a7bu24TySE*~%b?OH7Z|WE7
zCe=)}P_5K04PJjDb~KboX(=Ddm(o#saSvX9;+kpeHX6k4+PpE(l!jw3Ht0Zh;38kg
VV{<|x`-<~M6+HC_{#Cn0^B+Z%`{4ip

delta 5680
zcmZ{n30xHC`NwBxId%{b3?QKF&dQ2%jk|boh*5)AVhqa>6fbf$=CU>llBPyTX(FqU
zG?$ah3ryM&Z9I@e5<u~4k~N0JBz993W6i9@SjDRb_5b@VDAx4P=kxu}%sad9`#kUa
zyfaJb{>q?Iu(@96<+Hne%eIeo%Ve)Xk;k`en>?tikLRpxva)Qlq5~q(125nWe1LD=
zWW}&Axn%0ru>7!mLEusF{N0tAnJahy1$DRIxUcuzpOigu;=L2H<(&K+`M>Y`2y4^P
zGBNwUiTBF?<Njb_N}eEOWKNql{=Nw^j<OK!8TiHkS;E2eZ94HG-Kxh7fzxgct$S!i
z=?P4hZwswE^c$h!Q@7psLbvaEy3M?`TQAS|{{L?OJL8N=lW)t|TX3S|DqZbUhUIUM
zt&Osto}OiG>D-WCpsYV5D^;Dcvi^c>ZYd0~YtGcN-J-2Usk$I*^CM=>@V)%0DA;rI
zO2-OC(aO3MvuZU<p&^%KEn%3pUFdkQUKZ?*BYD~zsp>f&Y4pHjO4((7acJ3Pabb|7
zQ~OfUW(plXjnlley^4Cbue4aamZ<LZmBI&}NURaJCOXZfzxXZk!Ku}0ww@^e&eo=V
zny5C#NhADoC9OTttqM6>QHna!Aes6ONG#j!bz?|Nikc8FMX99*X{6YatkxN%6tN*$
zJ!_C=i?fo|byg`|dPqTH2Cdqv&PkAB)E$y!5o;6GW0Ewr-|=|H8pc?I8*>d>TYTLZ
zKk0SRk{gR*l&YhF#tOt!6X`UYI01&n_P~9Ux&#EYeYkqT9|6r8dP_i$4DSwTT!54&
z{*t6F36R3Y_9S&xfHX!tl*GVf^+JG@E*2+sN4GTA6W!kU?&#J8BD%Jr>h3`4{<!lo
zh;Fgoy+uHPi}dafgvO%*+L0J--evb{p=@cFxUer<K98x(=qq{YCu1E~gq@L74=&WZ
z-xh3b<2*~d!gxWhaM>;@qkYcEi^8)SMB!3<zK^3-S>GX7w8X6N^+l2w<<o`JttXUq
z=VY~_pY%k@1-S_2P>lKRDTi4m-&P-Ej<UW}wzZ`mEY`a}6BKrCb`_=Av2q$lv}bGQ
z2Vq7WtuxH7LbKw)eV^&ZyexY~Yg28M?RvS}db)FiwWWGS{#;XmudQtggZy<+LH{eN
zB(>oVDJ7&kw518RhNd2flPvz$P_5nET`&pi$PgBc`IhyuB=i(a2n!}&tqWnn#H(jR
zSTOND1v99-U@Sca6Uu@ytH(m6gdm-aB`FGSw1#LGO<Kv>x^aHea8b<+mxko8jM83@
zs)=x#mC6)z(<Ry3Rx=qF`+R=HcGOn-D$4_Fu=Q?ix#rp^&n~RaFQ_p%&2mdo24>TZ
z*(@~WXj_LcITz;7EvsLIOOYkz`t+$qdiO<Lx*dm7eaH56sZj5JLub#)&dZwKeA2{i
zfjQ38N{z@FN$4GWC*^4`vMa~VtmzFp9d><nL4M~3WjzMM2i!rr`f;cfEZg@3@g=3o
zEgQ4#H;R77OjF}YPvv_@G#)o~$n^@I1)90L|DwRWtfu28_00%Lwz^SDO-3PRxz}9Z
zbOjNv7V2jU_WF}1yY_7qE8>@ed~-{Yf(~=E!!fEBftfpLQllcJs6MB}sYMs_j0{Vi
z7%2@Eaa<57g_XEvyQYunS!lPMZM5$w6<*q3@g4W%4Aabl{JAq{&2UFtyJhaa8r(Z~
zzxqOYKw*5kq0pS-#3ng@HC@KWa$QX?!9M%?YK>UF%W1B@w#U8ys%8=0yT+htYk<=X
z`(cevBd--#drLiXK=(us@sxN@MT<{khn%BLi$pV4Lfte#>R(bDRk}o%Ry5RlV!4-H
zTZ3s9F%NpT4IQz?h1nDn#+UD^33Qs>epj{8x`nxpBes@}s0lq9a%?Vtxx96wp{3Ao
zi}zQp{<5vL<E-Q8tfo|RL!huJbzh;+rcK8$br^HBD;9L7Yt6vZs?bn6RxZ|;WOQ_H
zQm%)%w{$hv8M!8oBRN`gPvriN*1f)h_Li`Dc6A0<mp3cBZx#*8(LQ8<j-99&*0D~|
zwQg3bH$Pmxc|rB&`PCf(Ihy0fCv>gY)jR5p8IGfkwI)Z2_)>vay)bp0(~OxO+10q$
zq_svUWp|>Rg?DhM#ySL?%&|N{;8LrM(BeDXhAvIL=uYm^_Fiz?y3|Lbq_MHJQJ9Xx
zQR(txB|WV$I(>GbDP1WXU_Ig3m96zdCz#a2@3XaN^+1#~IJ!2f6%VxB?gv^{wyllN
z9o_y0yKw33t1~@?s5-wfghw1YUoT*zZOwEBp^&aQGh_C83$0qydG&6iWa?KDuJu3F
zYR@sU<{DQ;YR}a@Yn0ZAvGs!9=5hup<)hBZN_p5h8T;AV(zC}qt8rSnJ?iHBG7Rs_
z)uE^&*;7k*dMrEDr_54}|0rd|$WbF~u>pR<b-bs8#k!B8rA0b_FMmP!M1SsiL3k`u
zwGEcSl9oo!n=c5qzI)yhgcl-f2MB^s@cA4#YGR}ytTbQyKoCk}mKF%Y4>5C33Br@{
z>KAcRbZq-zZDz3NvG_A*s<}PdafFMC1#4`NX06!p3a@uXt9u4Z%J`$vy2ZkZNms_<
zm2ot>*yNaWWs0rM^WJc@`Y7vN(Vo|aW0$WsROtAI4R$S+J!6(yn$gWpgA^&YTU2|D
zG?mBIF_MYLrWk1fkLv;@W50HbT^kmR<u}d6hVX7i`@ujdY^W|1an+>lXty}ci&7fe
zEqvyBHwrNw0cDqiaF!9%p>KRVMqNDwqZ~Na{SdDEDOU2)#aiMuFMm&}Z-y~dOKfkd
zme`xA8e`P~@kn)0Y;UTAVt<{gG4{4pjj?v^htM0Tq8m@DmN@nOc%+IWQ}waLP1lx&
zdfq2$Zh|z7H#|98;_TYtKD{}keT+@&Z?(iB*Myq%23gqQIrqG1kZL?q&5hRr{JLK}
zmN-rH(^j~c^8`^HH%v;4b=kBfzMhnW`Y~l!VsFZ>#G5G}N>r<cA?3q~y(u3~{B_EQ
z5^qcSP@-L%g>~v)U3B9~*`=t86)EHBSzR38wPJN~^knK%>{^y@Z>DHxrej?SG989r
zG+4+!NnBDc?iCyI9GIjn^Tu`YUHnBhrqQKn#on6mZAX%$wPtL?bzz5VSlw$jX|1<d
zIJ|B|vQ(xMpH5aEtTYTzgDMRXH!u8Br5hI`ZZ<CNX?!JB>TNVu-SV~YwC=A3Z!kov
z)6!5}=p7dW)Rvx)c`kPJer$xeD3#+!s1Ix~go{O^Z(jH;n=@JhexMKV2LT`u^aVj6
z81w^ofDjN0!a#oz4kAD#7yt%>C}0F8AOkZP1fqcj3<fb^2p9@tK^%w&2_O+DU>L9h
z8%P4f!3Z!Ci~`9Z1*C#BFdC$TG2l)x7K{Vq!CfE&OaK$XBrq9F0e6FYz*KNAm<H|x
znZORRKsLw$x!`_~2d0A=ARo*Gv%qXH2h0Tp-~sR;cnCZU9s$1rkAivNG4MEe0z3(x
z0`tLd!2<9*@HAKm7J))g1Qvs0@C^7pcozHtECJ7frJw|qg6F{>K^gcHcmcc!mVt8M
z0L#G&@Df-FD!|L&&)^mCDtHaN4&DH(fC}COZ-KYLJK$Zg8ms|p!8))WRDvq70lWv^
z2Y&&71s{NF@FCa;Hi5r^kHBWI1#AV|Kn>UqYC#>S2Mu5cXapaFPe2oB1}$JG*acd_
zZm<XJ1^d8$@OSVj_zZjwoZtZX0vrTif;R9K_!=An-+*tyci=Gi2XKM!!9T$fa1<N^
z?cg~00h|E;0w=+bKm%@Y3Uq*<z-jO^I0OC-&VqBG6PyPZz(sHgTn7IESHLfz3tR=)
z!1Wb#M(bV%lt}3*FUp(pp?oO=B~gA<AIhH!paQABR1g(R^`q{fLa0zGjOtH?QxQ}o
zHGmpOMNvk|M9Gwy8bn1?7HTjRLk*#ZQn6GV6;CBliIhSOqpXyTN}`5SBdC$oC@Pss
zp;D<d$}>&rJR3vZNsXn(QRAt*s0?ZXHIbS`O{S($cT@LJQ>lBYY1DmGCS|9xsB9{S
z%BAk7@~G+53@V?RNzI~WQ*)@fQ~~t>^&s^S^)U4a^&9F@Y993%^*Hqe^(6HaHJ|z|
zwSf8^^)$7RT0|96Mbu)dn0ki#J@qX02WkoR9JQ1xp-QResXtO>)Ssvqs28baR5|6K
zmQyRJm#CFg1@$uZXX+K|Rq8eBb?Oaj6{S*dQg2ajQ}0mkQmd&o)LLpCwVtY^s;CXr
zd(`{XU#P!QA5hiQhtx)D6ZJRhBWg3Xh1yDOqiU$_R4r9U)l&`B4yuv*nEHfjqME4|
zYA3aeYNd8ld#JtCK59Spcj{B>GwO57NgbfRpbk=BQf<^%)YsG@>Kp1?>O1N%^$*HL
zeNX+9Izk<#j#2H@aq0)^1obcKB=sYuQEuuK)j|D4ou+=K&QSlR&Qj;7PU<{$fx1Xt
zqApYap{`KBP+inj>Kb)jhsU3Y6CEW|ddiFPrhF)0u^Ep)vFg#+g2bQJR2swx{mgl5
h)(*tkkl=R)m)xT$^CJrLlJi5KnQltM|2-RZ{|89*N{s*j

diff --git a/src/apps/pcomm/pcomm.asm b/src/apps/pcomm/pcomm.asm
index ced250f..81272c8 100644
--- a/src/apps/pcomm/pcomm.asm
+++ b/src/apps/pcomm/pcomm.asm
@@ -102,6 +102,9 @@ _main:
     cmp     al,     HEX (4B)
     je      .L4
     
+    ;cmp     al,     HEX (4D)
+    ;je      .L58
+    
     cmp     al,     HEX (50)
     je      .L2
     
@@ -112,6 +115,28 @@ _main:
     cmp     al,     HEX (09)
     jne     .L14
     
+    push    ax
+    push    bx
+    push    cx
+    push    dx
+    
+    mov     bx,     offset _scratch
+    
+    mov     ax,     di
+    sub     ax,     bx
+    
+    mov     cl,     ch
+    xor     ch,     ch
+    
+    cmp     ax,     cx
+    
+    pop     dx
+    pop     cx
+    pop     bx
+    pop     ax
+    
+    jne     .L11
+    
     push    ax
     push    bx
     push    dx
@@ -536,10 +561,105 @@ _main:
     
     jmp     .L11
 
+.L58:
+
+    push    bx
+    push    cx
+    push    dx
+    
+    mov     bx,     offset _scratch
+    
+    mov     ax,     di
+    sub     ax,     bx
+    
+    mov     cl,     ch
+    xor     ch,     ch
+    
+    cmp     ax,     cx
+    je      .L63
+    
+    mov     ax,     HEX (0300)
+    xor     bx,     bx
+    int     HEX (10)
+    
+    cmp     dl,     HEX (4F)
+    jb      .L64
+    
+    xor     dl,     dl
+    inc     dh
+    
+    jmp     .L65
+
+.L64:
+
+    inc     dl
+
+.L65:
+
+    mov     ax,     HEX (0200)
+    xor     bx,     bx
+    int     HEX (10)
+    
+    inc     di
+
+.L63:
+
+    pop     dx
+    pop     cx
+    pop     bx
+    
+    jmp     .L11
+
+.L57:
+
+    push    bx
+    push    cx
+    push    dx
+    
+    mov     ax,     HEX (0300)
+    xor     bx,     bx
+    int     HEX (10)
+    
+    cmp     dh,     cs:[_curr_row]
+    jne     .L62
+    
+    cmp     dl,     cs:[_curr_col]
+    je      .L60
+
+.L62:
+
+    and     dl,     dl
+    jnz     .L59
+    
+    mov     dl,     HEX (4F)
+    dec     dh
+    
+    jmp     .L61
+
+.L59:
+
+    dec     dl
+
+.L61:
+
+    mov     ax,     HEX (0200)
+    xor     bx,     bx
+    int     HEX (10)
+    
+    dec     di
+
+.L60:
+
+    pop     dx
+    pop     cx
+    pop     bx
+    
+    jmp     .L11
+
 .L4:
 
-   call _handle_backspace
-   jmp  .L11 
+    call _handle_backspace
+    jmp  .L11
 
 .L3:
 
@@ -849,11 +969,87 @@ _main:
 
 .L1:
 
+    and     ch,     ch
+    jz      .L67
+    
+    push    ax
+    push    bx
+    push    cx
+    push    dx
+    
+    xor     ah,     ah
+    mov     al,     cs:[_curr_col]
+    
+    xor     dx,     dx
+    
+    mov     cl,     ch
+    xor     ch,     ch
+    
+    add     ax,     cx
+    
+    mov     di,     offset _scratch
+    add     di,     cx
+    
+    mov     cx,     80
+    div     cx
+    
+    mov     dh,     cs:[_curr_row]
+    add     dh,     al
+    
+    mov     ax,     HEX (0200)
+    xor     bx,     bx
+    int     HEX (10)
+    
+    pop     dx
+    pop     cx
+    pop     bx
+    pop     ax
+
+.L67:
+
     call    _history_up
     jmp     .L11
 
 .L2:
 
+    and     ch,     ch
+    jz      .L66
+    
+    push    ax
+    push    bx
+    push    cx
+    push    dx
+    
+    xor     ah,     ah
+    mov     al,     cs:[_curr_col]
+    
+    xor     dx,     dx
+    
+    mov     cl,     ch
+    xor     ch,     ch
+    
+    add     ax,     cx
+    
+    mov     di,     offset _scratch
+    add     di,     cx
+    
+    mov     cx,     80
+    div     cx
+    
+    mov     dh,     cs:[_curr_row]
+    add     dh,     al
+    
+    mov     ax,     HEX (0200)
+    xor     bx,     bx
+    int     HEX (10)
+    
+    pop     dx
+    pop     cx
+    pop     bx
+    pop     ax
+
+.L66:
+
     call    _history_down
     jmp     .L11
 
@@ -1015,20 +1211,24 @@ _handle_backspace:
     xor     ah,     ah
     mov     al,     cs:[_curr_col]
     
+    push    bx
     push    cx
     push    dx
+    
     xor     dx,     dx
     
     mov     cl,     ch
     xor     ch,     ch
+    
     add     ax,     cx
     
-    mov     cx,     HEX (50)
+    mov     cx,     80
     div     cx
     
     xchg    ax,     dx
     pop     dx
     pop     cx
+    pop     bx
     
     and     ax,     ax
     jnz     .L13
@@ -1200,15 +1400,6 @@ _prompt:
     mov     ax,     cs
     mov     ds,     ax
 
-.L19:
-
-    mov     ax,     HEX (0300)
-    xor     bx,     bx
-    int     HEX (10)
-    
-    mov     cs:[_curr_row],     dh          ; byte ptr [bp - 2]
-    mov     cs:[_curr_col],     dl          ; byte ptr [bp - 1]
-
 .L17:
 
     mov     di,     offset _scratch
@@ -1256,6 +1447,15 @@ _prompt:
     mov     dl,     ' '
     int     HEX (21)
 
+.L19:
+
+    mov     ax,     HEX (0300)
+    xor     bx,     bx
+    int     HEX (10)
+    
+    mov     cs:[_curr_row],     dh          ; byte ptr [bp - 2]
+    mov     cs:[_curr_col],     dl          ; byte ptr [bp - 1]
+
 .L18:
 
     pop     ds
-- 
2.34.1