From 7d4ba8e802aa44d74e65c2f7559b1d7b50c9f09d Mon Sep 17 00:00:00 2001 From: Jeremy Penner Date: Sat, 24 Aug 2019 22:37:00 -0400 Subject: [PATCH] gfx cleanup, bad random fm instrument generator --- entity.jor | 1 + game.exe | Bin 102889 -> 111081 bytes game.prj | Bin 5721 -> 5522 bytes jiles.jor | 2 +- jopl.c | 8 ++++++++ jopl.exe | Bin 66720 -> 68278 bytes jopl.jor | 8 +++++++- jopl.prj | Bin 4547 -> 4609 bytes jorth.h | 2 +- petehous.jor | 7 ++++--- petehous.map | Bin 368 -> 368 bytes sprite.gfx | Bin 10240 -> 10240 bytes 12 files changed, 22 insertions(+), 6 deletions(-) diff --git a/entity.jor b/entity.jor index 661608a..642b25d 100755 --- a/entity.jor +++ b/entity.jor @@ -94,3 +94,4 @@ array frames 6 defstatic {jeanne} 6 7 2 5 defanim {jeanne-walk} 18 defsingle {phone} +38 defsingle {fridge} diff --git a/game.exe b/game.exe index eda9108c83413661a1baa85f95e2d9f880383a00..8df01f595e6a77b704f86e4823abcd5b7cadb8ee 100755 GIT binary patch delta 13657 zcmb`Odt6l2+Q;{v8HTH%A_!g(Q6 zIlEF%pHoBhzG+#Ckgo7XDquIS=akvadrOC#KtPBy?{Dor18BXc{&@Sy%(K4hSpl6?k34SG7C6X-*Miw-XkYsIL222rQ6`xZh^_5X-$USkKm_78aMyAyUA z=zh1*U0Ir|WT%1foSshcV0XeU1Ko0)&Mrk~V3$sXftqjAsZey}f9XvfR+$>AumWJL->gZ5Y>X!%uc8x2^g! z!;`yox3sPOGv(f0%HvP9SrqLI)@B=<-QP9(!cA`nlXWh$4?68sjj#NZo_^G`km)ZL zvRQkUTJsl6P48J~?O!Yu+_TVgo(zIiJ%+;e7pr=&XQABxRLIt2_Mh%q%JQE| z^(d6ovryh&EacNwXdEUu|1Xw0aYG&oX{>*^?LRH~O^RNj&Bd9ug=<~hUtJ8DNPqkgTr>ggBT z&J3(fWhUT=y7^+4=-U&fvxJzh_^^||DU&%S5R)k`b`|+7Wkbv6Q5)fHZl`Q*$Zv{o z{sUu0Ft$N4_FKEBPLDCKt*-tk#!j_+9X*?oPDRVb`w|tWm!=0r+Ti|Ow7Q3uJHM0e z_M{7IHF62rQ!7%ZU8h*lbu#bII*LUB%gQ-WSgZX%OQdz!bsb8H4sThTQdl+vgB>0- zOp7&aW4j=aNqd{pjly^wlVa2XgL?w)+tp|!p{w#Xn(4^XAvYfftf%=*Qku^WU8VVP zOzhGAbaoX8;KatlNt`L#eGk3TCeVX7S$m}Qy@vA!X6czZzUFg-lP!(lf*;f_1Is%*m{(Adj7z;Ay_B7o^1? z^$x+(*+~d;SoQ1NJ@Y0o>|s?F3mGUDV4Vr#zcDyzur~Y z33@^=i0v}I5i&Ld`1b~s>C2nJ zT8kFYZ7n@p*GG)1#AK*qqLFpHMQ|!zs`4nwD_?rP_b7RFk~V{$q+0bfXm;Tdd3DvK zxl*lkhr4Ubvw^z-Ej_fZ+}Ew8w^F;JCC_U(=GECt{7I+7@)^=1;0l$DEo!dw>|Qn@ zZ}!xYM)&czb>)))w6?8TpvIeBHDhgwQ9BLng1FP5k|*Z%=36Fae5GE#(oLQ3X;<-1 zgSz`lm(@cX9)%g(;0u*h@15_VnH~*{%1%S^F4TqWl3fP5M(;)u9}~nzxg`@6UY#oY zUW|-f`?C+Cc2;vWGc5V`je_^{E!hn#POH(oB zZo^_!IosJ!HVJaGWX(Bq(ra`sj@zhn>4_VM1>1^0_YEJg#M?o7=PWj~jfF1WJXp>S z2_4Orj_jz|-uU8C0mCErER5f^s3WyeFK;VBwJqXOl_%@iWj$bOSX8k`B~RC`^Z z39|o?7uG&Qa$2XkpWN{Ejmp8brXQR(b^ynDTTPHu@tkK|y8WPz)e%BNbjRIDKJ^{!-WDR=`&N=Q`y8U0tX2--a_WJ%dfT=LC}vJJAQ5 zS=4xscAS?!%8+#0l?wnnB0Yya&dtun-X1VR!SITO9`h_6gmj)KE$?kSU&eXTRMJKa zzy=r^5pOeKqv>g2ogh1iJL_Z*!(2j_i`Xac5jGfbCTt-(ePq8NFQBJtyWK2XS8OT% zf!d5NHBY8IQE*(dQ&aWy$oS$n}?3Sdj7w^O*flVdBlThXPbR;G9>?bOqyUMd*|geluk zG2O1G35sb~GEPF%U}lVM9E*HWpkJ{}R^4mY1m`$r7dcEvKAmn%L@qm>bnQ5u*y#ax zsp}~5gew+Z6Fg^$^283!QCOq6JN9fKxnR&!zvSDR?Y;Xncw6r6CD{e_?|w%sKo8$e z+1W!s@=~`&ev}Z^SSylc;81>vv|0YF7&xde`lX?puL{)MNH;0|jSgfp<3A`GigANx z+29&oRG>54SX1aT5Wo4ghx69n;>xvN$0s5#v<^cX&XaJS4Q)DArLjZ3!eH0f6Dkbp z^bP8L4q^MSH*PZQfYx9L>@!rw2k@zZgBRdSmDMI+ikOVK%+^C|27@T1fku+)P5jXv%gi+Q{2| z_4LRu0=XabIOy^g@@=4=mIBQM+6T0tg=7J}4fG(;HlS%Oq!>s9x)5DKraCG0s5es90Y2**6fX)EL0Ud54U!lq%ptC^zfp#|01-}wixSqCN7RV2vJm^1~NF2~b zpbJ3tmu&)lv5Bm}@SXs>0`~o7fts4gaP)OQP$bY%pe0R25A*?0Ezl=G^P0#SpiMya zK<@%2H<7JC>wy}9UIB`2BL4=;0crwT0~FRoj``_nCXlTK>`5?H6LEsw57q{h4%Bd+ zsD1P_5$Fccbf6!ulSH5xpqoHrfj+-Z{tKut5VurM2LtWCPTmD_UlNEKC;+HLu~iGi zY_(ky=&RSsw?2r_dmjoLPyiVqUJq$JuEn5t= z_D1p|&{Uv7P@4mExsj9s#REkFO$0jCNPY$y2ow!80_b2PnTSF31G)n!6li-R2?YA} zqCjGRIG`@E&`36c9S0i=bQUPDk*NK#>46e~YJd!lBm!s~P!ZZ% z4m7usj1Iu22TFogF;G$?nF6gspvgcl1C4AX3xKkLQh}ZY>eonC`s;0U5!ei{~*4*9Czr z0`doXw}E5{AJ`eNEU=4UYZ{0Js0!#Qpc6n(Hju4AyMVHR_5-Ci zkb0nZfXqN208K|L;0Rv=vI1=a8rwhy06hcrEYNzO!3`u1C<|!qQmnrmuz&_~57!Fqj)K*VUh3RQ3P!Z7mK$q&t1)#ftUI$79I$2NF0}TLr8z=_oKs{0S(ob6{r$gWk7T4$x5I%fU1EUKojeU1oS-67eE_dDXWT#tdV zN1bJ0Ts?U|SWoW*`W|Wz1J%`$uYnSPegv8dbheJH1{wx*4k#X|rj9fN^#-~OG!Uq~ zj`W9byLnC^6vz*#xQ^TpbPcF>Dc0Yw=LGt49oY=_Em%F&E&x4SM|$?b&^X!_X52JlnV5nlbpkfx&!Dfpu2#oon*rR zJq-aW0U7{Q<|JJ*wbKsPBI%^dJtm5HNtXr$nAJsiXJ(bH%ciZ2j6GZ(=cRze9fJ3!9Y*` zh-2|8i2xN^1Tqxgy*z=rIdh6HvA7Sr<6eYXocw}Re)=7^Ug4!xD|0DWPI0S6j|i@LW;wB;)A|frrovup*tS-kp$YbSI=3izgZJP^+hN z@i3vS(M~c-Z^y>ijCg&!SH)}+4L9mg$t2ls;UV?Tf_hP>E%iIy&MKN#U!>CxcQdh` zeL$f|=jRbMI|J*z)+-Z*k`$voJk=OX`i{_hF-b(Fw>7fu)UZRr2zkrx?2v6q`a2`1 z7?ZV0MpL91m1rzNuQ%hGp4i>-M59>k^jy%LoYEE_^nF`2XS&Xk($+gS`CIMb^;UaS zqg9#}cQ2-KZCo;MEUSn+?;D&Y>iooXtv&o`R>>Dx(zbE?BY?Cet1uLPCD}$YN2Mq0 z@JzVcShjZjQl8J2&fgP>fodw!pqc{CtiI~tigS&4r{2zjd?r~E+r=8SPTLj_JLxWU zx<-9MjQT1|eYVJVgYKrIEqjBmvq;xj&ZX|{$A)`Dcw08o8#G0_o8?@o_Vl@v=R~wg zeZrmaMb>;-wbb|YIiF)$dK&ENjq!7|W|wo&IwQVlF-rD(hoEWO?p?rVN$z`xh8klU z-D0}ms1s;chdrIOOB$cB9i2ayz*e#=q5nkI(hKXZ9p#b_98J&wYUJTDQjzWVv@PMqOO>(-ud)y9U+)5Lp z0x^!>hDm1=r$u4PntIMxT}F|vZgZ&*Gg_S`B~8p2f+C2Hk8)e;NgSsae>!>5z2{iA zSnZi3Y3IZ+Oh@&^nEu8XUu?51m4JHh;ooh|#^k@-o-L`8?i!XIsO`))MY$6?v)u_D z*~A~3?~If;WJfl~)gV`zpOj|H9&Rf-xtl}CloQWxc+r*Z3@`c&EjUvIIjDf;DZJ>j zch}}rL~}c%>u(?kusCyw@1w%PM~>t5eYJLN4(H??YjZXSR+`%J?Now<#T{}p%o9j~ z9E2dQY@8^uXocLK10w|Al8$V9INCBKd8B{#@PeWd*_Qa1``ExpnfzWo1W+k3;lUxerz-l60UG?ZP&zbjf1%@twYM0+TYI` zAe3I68sTrGuO7x6VDFYrjl|ja|z#E@=t8TK=S(lWA95q(@()9~~m7lRN=QFR; z9btP7JUl-9s#H8Z6t4J_>7xfa)Q8xJA)e5Lwcs3>fwdh)=Y{R%3{vOx;iGdnbANbN z&j3Ra+hL*lurtCL&K$1iya)jIb4YV$yu;^6wKJsQIh-l9M*Bhz$H{@bV`@Y}q6NV@ zsxak+oDd~XDw(+qT@2K%G@y&}E9dT*F8u^MK?&wQalo^*$b#IiQ0svpwww!7)}w)8 z1e>^fRgY<9JqaZ}HkS0QF2&E=CTVcmjJw&Yk*`QDy1i4t@o!I;*ObU!f49qHnBOVK zl2`4QmwegZ(+2VA-Huta@J_C)aQKa$g>A}+_%utqD zvOdT2LS=mp4e>PF>&&F&+0i!mlCZtFv(}JnDG0w*2*d!S0(z^4#7{x=1!yHuLxn&$ z)R5*xL|=f+KtBMPYe*c>0U&1UbD*U)WHt(Z2=pS*ZlDKhNWfG?Uw|Z_5}-*n-a)ns}qqAx%vf$j$SqMBTSRw&RnKv6)pJ=LTbY8==PV1Z!oRg;f_>ORF2EKvKW z0)4HT90ocIM1d{?t*s^$s0Qdd&?%s&s>w~Da-a^NgFuf|lf{z}eF5^#)6?xhGpmUO zWAQRjpFEqMZUGxtO_IhS`~nsMwHJVfR1?)qL|=dg0ObJ%Rg?A^h`s;~0WtvnRz>Q8 zrUBgvG#BVf6>(2T^aW@j(Bx6{*!B{6Yk> z0Eh?rM-`crhUg1WCQv;=Sh9+2fw2=nD}cTSGF6dBp|u|<7w9O^k}4treE{?<&?i9i zs>o@eO+bY}?*b*;s>rZe2)}^61ojG8Y!>lmoO0Xbn(U6&VYZ2~+~~B#^4gZPC(A z#{{wiyCH{@dHxUVMbHoa^7g3F z`sGTQa|b;N#nwFnedP$b52nuSLA)2}BG8&6}ctm7s?oC0C;@UiSFw{~W zh~rJtlMkfvrn1rphN_S_{ow8}OAJ>Ti06%MT!Bfm?(Sb%#*fMbqhgKygml^3w|RTT9~pDFle2t-DJk2 z_ezTt_2?{2>9R+M@xG2~4M%b<(rXKc@D{0bVPvSojdcUNYK#o8o#!Z?=a7C}IF8Sg zdOvn|v;~vi*KP5`K4F*He@0@wuI}N)OwGxQ>)ubaNJ}28z&aVUXed5Y7Tv|?m91Pf ziihpZnbY}v>4(e({`sNd*8IYh)%jA=;uPdOv$ztG8RK}mJn4BfCxO@L&$>vB)(fYL(Je@oHh}CUp*zZe**)G>;*I1kB!pd=n#e@-7$+4zCmKa$R<7eeeL&PYc%WIbTAf7YaDn0nz zP(Q0ZO(iE*Kers37oR&AYjuxE!rvtPrNGcD+R@fmwDI^GYmI*?YR4LT!Z@ovN4Y#E?-312~oWy04G;+Sv@ zLIM+xLr7%82?$9Lblge)Z(IRGr}#L&mIxUB7J^u{jpW%_+zd!#$0Omt` zmDh4f#!X-L=Lf{F`FR+-BZ&zQLYTya`Kpn83KJes#qis$djcYOo$nw_pix4BBSmhZ^kvvLUEuI6+0JTZ)a%vXJ;G-A(@IR4p5ykSr3GCm{#-})SWOZ5K& D8@R8Q delta 13652 zcmb`Odt6l2`v3Qy83q^-R0PEfVu}(PnkFJBjyeuzYMa~4>`b(dshM9>12i*d3{N`j z?DE}}dU~Cb==)8}@&f4!Z=?ct^LkF1-MqJSxCsP=IP?9iy=MTe->E--y=3ND@Aa%_ z-JiAgv#0Bq_1BB^U1vNpf?vz|bI}~fc|5Mr-CbvB;w@`EoaPz-!<@#MvedG+a-m~+ ztTttyW%)h3b!Tf+lWUhp<|Bj4@y`d9B~7x<_US^0{Do##V5TRc9)FFQ#qrv6yxmwx zjD8VZvi^WEuZJoZ9WWAV6lgjp(u|E+phxVeEY)4K%Sd=mpcA~C=_&r@EbHw^IFQZqZA$W;c_Zscz}2($L@OzR|8b^pAAy7}pNNPqr&J zFZnaWhR-!=NuZC?kI&F)-3blRmERrV)6{it)H zoWEGezOr+v)qkXtGT@`%6)`+r*Un^e7gyPM0^=dW>de|0fr zs|C@!fq%4DI&BrZKu5MK2mOh%K=tjqqyAL)e5-H53ud~{(m!7G=5}AO;|}!;cdD}# zdb1^6P^GplyF=(ROVb5f_B11MfuVOlXtZr%DFLeKTf|v(=QGf7sv4ge!e$wjp}cFB zI{U@ubA8H;%mf@!2cP4X{5wMnOGqnJA9ngTbuxzsVKSvT?gIbKoplveMoYNP_zn}# zt0oFk-5Yd@UtIi~n5|T=sJ#rQ$SR!ECMDp@)H>MdPqgsfQ+#SH8(Ma++F)OE+Z1d4 ze^Y()9~diuu??!R-&(wNdX4#Pwf9FgcBaMW=-G_4sakH{pJ+Hio*W!$hx>QaicVUd z6>W5{H=SRlQ%WeFT9w+IX4Q(hjd_38Q7j5rR?mU_D*gYnL~5(k+^Uvn^_8`&g%vX} z*y=UIv{=J7wus7@v^1;T$dAV{DMcMJddAT1?Ttnfx*A`jnT|3YO7n5RdYjKAwfXGO zRhu8j#7^zEu&aQ9lj`!vaXHbR2k5nCksiLy+9R*)GKe?I+q;YoH2MW_QVUe&U%K=M z^A8z;&%}`UK%<#1_9)sc6qo3O&(9`DpV*$#L?EbZ5W?A>SRPPX_l-*Gn6YVSf zdVApUMbc7Z7_XgDI zd&b0Cix$xBjh$Q9O^U+4P1VFiBkN?N=u*2>?p0D&zWhShp~~tc%|?M3Z2}FRmVZoH zU6rYBqmAzLv~PJfaJQf(K+-mRc zWfSsdXB~N1w?KP)J~5!R%?%=*ce}l2tSu>Omyul%cNsOx#Jt{c$Ha^(6O=36#B^`F z3U?W`9ap;fowVUmn6VB1P%--Md>K=`8W@#b#=|et1v4!BcaMVi^Do*9DB;*y#h|9UuXgJEd;9FCyTkP>6h}%bMycbVQI;r<4{3#h z*)sTM?IpWMd&JLADIN|Fr!ch+F*xQ zoA^%@=sR^HeV?Nz)vckf`egkfV{U*tm9CI>KZ`ZuoiQ5m8~vb-6m%7++#|djYrlre z2~yfWB7BHJO^1-6iSlFN;c=*@wN|9JT9szevC2`Qoae)p?)(jz!&JYzH9S6;9mS3b zTy8iCn<$?T?;j1X5~4VpWl3VC9xlz>BhpiycR4bmpIu#?2Wz}XA^p%p`gAOdu<@c; zq`FYLrAFP9iphqW&L;7Y#5%!NyH|O!R~cKE<**&R!mX4nPw~0msnC%>iRcz*r0+4P zbW_o3P7wvV%xfaQD$26ad`Yn**G2SFE|Beq0W1@Tt$iKuP}ecmr!uUV1cdrvUsu#^0- znI)a?XvcZ!rw&P*Q@sGNBhq`=ZFxM8Jt8sNP6NZDb#N-P54bmSAw8D>(e?!qbxpQsmX3nn~ zXBpK*PuA0Io{i>X?JMK`3{ea!%N_1pO6-y*tE`V?{z0;wmq{e^EZ;>Aoab}A`Blo< z%|?rz!5hs@0xe9!T9wRA$@)vi90OZ2U0ve!T^w7v9g1#&u4IaL(l&uU?xXVD-r?%@ zQ%$!BG(k1(PR2=?(~lWr8z)b>DA2E1CadnX8=`9@vx^+2qnu8+#v+%UPUaSzPVDr6 zyEL~JdBYX6Z;0NrM15k1=1{Cr+#NeNkX*uq1|;9rY~S6d*4J`hFUcOLfA>3D3VQTz z%FZ78k&k-vlt&3ki?t%>^%=lVls7A%rG5H#N56D*^L3Ht*3nI>f1`ca%mnt0hGJab zsdl(VHx=oWX4Vw?EW~eq?c}`mcerxB&+$o!3$4Y_M(`wpXG3eDnpAeEml~ZqXF{pb zLf@di=Mc6JyW%Fp4rm>Qz-iJH9>S*%4qk*WRacvGDPn4p4x39dX%GREOuC{&MsL29 zfN;=G52`34MpyV)By;rin1}w-$gZ*2lh_3*1hbUt-9R&d4gh5}lKDVy1Em3N2b$DK3V|e`(Liqk4R0hL1!GkL zJqnZ$)VGn`1M~#YV?axR0vn0F6ji2!%?Fze*3>{I;LMr;v=nF>(B%g5X{bPl0j&fY z19Yl^yrmUrB+y!*K|lu^$TlE7(2GFbfIes-hk+WdiR2|9_cf7jY9L<$T>z4STz0T^ z4dgP|*I;jfoda6dKfeL}jfwCKjzfPd<18oD^1N2Y>3Fs-%*MU9;dIu=6f&Ta_ znTbxV0o?`a1ihz$Eb1oEr-1eV%9jzx{p~_&O^FTd;cGc6YUx_9{piNgr@&hOj`j2`N2XqU-myGYm9lSLTbQ()J?zP~EcoO&_{eLV;i33MFjv3eo^eE?Ji^a;?+da@d56HpD% zyFkhHWE;>rpgN#efMV;(zk!wk)dQ^t3a=+80tA{3WN!p}5=>K1Two7@H3M0IYHt#) zpFk6VZUIdO`r#%?1d0K=4KxDi^PA+qfVu;5lLXoiXzxw(E|BMnNVGr(pd!^)6%e!4 zd_|<-xfIWYc1nUJ_0pt&K8fei?G7+d4$N+Q*$a<6H0c`~e0s0Wg zbd!7tv=OKq&}N|fZ;}f@tAKg{{T(RkCJFZ!=mMZ#K+CU)b{ce(%mm8>8;O?9fm%x) zSr0T3s4vu}16{2n#X#{uQ9xsX&eV~gf%*VN0}Tc`Tt~)Y5Ceej0SW`!QAdJ+e!VP` z7$6R4OC4DNbO|Wd4px0xq%YQyO<*U%MgW}$dZvzO1F`9W5`ij#=GKv3K-+-|(AE;5 z8Fgfs0h=Bu30j3fNp)lbwDN(*1HBA1q>f|(Ed??HJqOgIjw}uo>~uDm32Y%4Uq@u9 zO#?~=$^xpXC8a=PfTjaY0{Xs|{0uY*C=F;h(D7QLM=QDkS%LZjeNsy-K<-N-nGF;O z^lmMg599)R45;anNbRrGk_W-gfz1cI47R$Kq#AJFSSi9n}o$U30jKyL%Z03E6!+Aae12igwQ9q7Xv z5)IUN5snJTb5W$5Ysd^B`$e!4uqv>>*O24zy(fS^1^NzXc?~H6+7A?j8Lt4EQ$tGO zL$(2xL8};OdJS0&^afA`&{m+aHADt_0q6^$jX;B89_VSHlR&G0!t6EVXLznh!PukD z0x+(IydNUa2Z6qaS|(6+HTfDS0q94di9qM8$ts|MKo@}Gfhwy>15j6>t3Z8#N~%du z__o^@L_&cAfC{V0LqIoxswQFm{dz&9FISVzVBdn(K|i>fvp6a59DzXzL!9!0<8zi0IG74D?p=xUIQ`$edi({WaKQxH z4|D=(0T7O}T|mcx_5)?QhybmB0(}Lv4QQf^%myj|`UdC?pm-Nq1hfL^BG3y!eOx5A z9^*3)tPbpHumBgChAyQ+Ot?Wu~8%g@ZH55n43Pm@Cu9jusiN$sKqHSNR_8A1ACH@-y1RvSKZS?!edaX02%{t zkl_%QBE}c8@kI_1Ofeph$8#IS{FG}(IViSoUlWWZnKrE7VJl2B8TT8xEzP%_5lJQ~ zBEck2jvbh2;&Kv72XIv-Tq(~Lgp4zty%cl=tpF=9yK6iNMw2HY#Z)-Xgoj#z&cMTj zzEVHVB)=USV>jXT?S2ijNp#%MBSqsByZJ}7yBsx=S-(5rYzwPsQcZzbKgh$x8ukH& z0&{>@)a?qY@mViR6pKrquosZNXbFZQplGRyOxFlxEuINi znTpqpdYtD4`QihS7^wOJ9jb9~x!UVnxx(cpyi;#sLB1SCl3Junty$k34?7mO)}qs% zlA^vcYtI+>Z!q89+AM4^w-uP%N;u>G9&ETbL^KOXZ_pK(ZTdtD7yM3`1sdY+it*dpB$RN_Iw!5qGs(`;{n51TqqBIk>=`{E%oJ1Skt_j2 zPoZ6{P77<7JSt%aI)5R7tz>sX&#|nfm)71m&LtmtCOF8mMkiIWH@GfC;Zl}$;lAT6 z-o9KlrCWQc&Xas3H;h@DIVN&}(oezLU)Iq_w5Obw7OWsP6oORAzS?=@_B?JZ@uXtUi~3{!!>l-=Z&kTj5`a;nBA=LQp9r8P&B9&56EgdM@hGIjN4(1+wR1uAdI80 zVeTCq_NiiD1zwtP)}YBiQ@$6r_+}``%WNK;hiIS z*Vu4ON5$Bfo~9UoY_s_q5%oU6zuP2W^51O{WKGh21BD=cn~)RbNod29eXBqMq4~}b zWka?K99M~4IXx-WE)234oZibJWXehBH>`IHu84xq(1LRXkb@m8Pvr%ly}Kr@G@9EL zU2_XTfH~Ry{T~r$*-qm1eT9Ba8t3A+u1VV*RF>0%ZH)R}elmD3#$*0TvQW6F!Rc#Z&t{go)&O&Xq`N#TN=zn!X^h|A$+-*YmL+J>(=xA~eCEU$LV-D0z3+?MhV8lX) zbrc|T({T7TU{utneQ)TCw#F+_DS6q1h!Ew)T7Qq|QscaDOql4GE|A!C`TGe|hd~;Z zjz`EawYFH)rVfLJM%`9wi|>ku1gNE?%MTkL>;~n0H%@N&9`@I0leZfY#Kmh5fgYhs ztvE{zx&FIwU)W96$YqaXYQ#;AxUX=ti7Me@Lb>rgcXu5Bjy&BijZ4SK2K;q&k-hW9 z8iNUk5~v@B$fh^?!a{$(m>(MrgoI1Ca?LlS2%UquExkitHnC@bFF+{2I6CfN-T>s+qRZIA(^OknxjZk#C(epoh;4UP^Xkzci_LHbR5@ zj;NjXBrGw}bw^OaQWIV6h2Du$zuGX27}h$rxY>)gi1w0IHad-!tg+Ea?GOisZgL!2 zFnn@!dPjHNw8bEbih(yi^Hp7Mqf@V_2_;yHK`@|vd(jr;vFBMqC{7^7k&iN_p(7QOirE_ZHF%j-;XSPAo8Q4+NVI)&uOLa#Dp$WD^ld77!2gk8(0D z710-yEK+AwO0j&lKFDD~_vVn?#o&?gAd-C*j(+QF61o_)} zv8digp2WEBP0r-U>=V$d!aG-B!=N+g?>XCr|=a&uopo;1S;F3QXh~mXV2*S z2o#(4iS(6YQB@hI zFT-s+*9SX1`l<}MW#*uJEFO=A{wac3q>B8CuHzFe z#bQQJZSTyfMJ<^@WvfH*!<8(LUX#Usz6GDxk|`HhhV;qo%H``NYE%}j64iR_fq zB{#@IxBZ5h$yxt^K+>N__8R zq&yuOR@`be@pen4evyT}0Fpu$;r_GGQu+u_M$e?7F@8Lke}*esXmLg?vJ@_|Y>DyM zk8W+tL6$8fWd3sEt$D^^j>U{qaK-x zDP8c$K;GX`q2tJMi~QQG{=7xrJu5QI;la9rT`fk2*Uxkm&UDB>&Kk*Q$Xy@3KiYyx z@9xP9z&>G@*?&f2ysq!#q-@>k%WL0Hw8)P=T8eejclH2$rp&&N&nR9zdngavo3khL zR{4kQtUzm6#7b*^$||dzG$#c)&(0}>a?;%Eyh9%J*r?u)F1c)i@gsxX`SUbCZ_QT6 zpRJf>kHzBd{g1~sM_LNjt+C+g+|^C0XgIo=SH0$K4HdZ{S&PI`{&<_&sp>5;j?W1$}Sc@cc^Umeq}Gm z;d2&w%7U3N_xge_(TU=@Pp)8nIk)IHbnMJiKWWgV-Anon$k@C+n9C6hrtq8DQ&O#( zez0JQ#+#OFm-Mk`XmX+prfAz$G+ge4f+@Pr>EV_7RaPEbD$gpIEA=a_xJucrxaKUk z(q^{^C&v;wR(b=8>-#yxP1x)!D6`Rfcd{z#dJmFP)N*S@s+N-~{j{?4=^lNoP7FS) zgyRlrIoCYtrvldICbU^5Pxnn!TRvX;xxnaayVAFz>{f&zLxoybKD(z$Q8|inW=;-X zYQ$j7SULcoPcI!}u;zc}@6t)H*sR4{mrmh%Yw@*ZF&MAn;G7yZhPQHu53+DwZ7!Wa zscZJp(mJb4Tl%Z@Q$Mc6h@jBd13n$Xm9|=oXXfqpn`z7Oqm!^Gsg|3QeROQpJ+_>I z_<2v0j?d9M69(B_(a8y5`285otR5d> zlUC@QxjN@+{n1MOU>nCBl@bQqiLDxy!`y(Ses{X68^^FF9n8P(GRn|qL0Vl2wVJ1Q9D;V6GqycDG%7>FV^hn zZkw$AUTT!8hPswtldd}B<81NGjY(?uh&){J;`G`Fp zb=|Z_;j^pbbFE{cqxhnuhq1Wsg0+V|lj98dk&*AefGm#FXf(bg*9+;%8f|+z7U@YE zU3)qaY5b2I?dhp^rEPbm7v7b&ue=LvxGTN+uJpFM(&Vo6@w?LJ?n=`;)1$bSI{_B} z$K1I`z3xiKT8dXTCG%RxJV)`~=C|(U`F-gF_zNL+;}w7IeSRCahY8#GSgb_|+ac^_ z!Uz2SaD)jT^5tA96L#>YxdTl2h!5irG2vsrfh%LePF}}dW5O;72_^`;`Gx!vChXx? z@ooV^F|Xm)q(La*Kjs~2c1WM_=lFFD?M1N{nXnH+Ksp4tWUeX$!lw{wn1G-wSCZG2H|lgdJ&CoFjYnV_D z!DfX}0bw~4Dk0=C;W&g3-*jZFAAU(4$p5We9r@BvKt7UhGPa1O#u z$G%_h=W{i@ann-|@Tmq?Bvg~a3ARlK9zY4(zJHG9pXHI=a}5810rR21&g;1()21)S z@V#T${A6NxBrzck!Z;?RYliSCOn6um!|$-|GbHk6|Gt<)rEDt`j%l9fEr}erxm>e` tZx!|}p1`+g`LumcOy(c;*WN7l-*;>p|J*pjOhc#Yo@{eL{J9;*NV diff --git a/game.prj b/game.prj index 1303699cd963a15ee7ed9c9fff2f9a5399489391..2ef020e69697e34ab8299ba44cb8d86cd5b17f81 100755 GIT binary patch delta 211 zcmcbqGf8`cIvaEACW*~jY$w>b64prgiz_oQd`#Z_hvx+oD+5ClQ0gVWJ!3r&i#`Jb z!z|`AOdpsZGq*4uWnRYo|9>j;L?&IPKIUTPzfAxC-(-5i)X2P_={=JQ^Cl)=pnN0{ z8v?N>Qy7ytGZ&C`g5fH|PsT__RmO>o$xKHXKQfduPGLv@LIws725|*-An6q>qOO85^W3rJ?Ol&C!;0A4;r`Tzg` delta 335 zcmbQFeN$(HIvX?d7WU0rY$w>bg6g*Ti7PWOe01LYhvx+os}chPQ0gVWJ!Ac47JUW= zhD4Uh%-dO3v3N80u;jA*|F6Rm!Tg0Ol*NkW2=o8{3z%0kd$6=IZ)1MVT*)lLa)&{I ztO$c+Nxk3y{~iho3@Hp|(hN$B3<@BjMxf1(lP`#f zu{wuD2DnZ>Dtmnb-ALN`6*WeH*R~J2JhROQ`r%vt@RA2)c`~UxDS0OGY M77%-Lu!ub)0Cgo`p8x;= diff --git a/jiles.jor b/jiles.jor index 5bdd7e1..8d754eb 100755 --- a/jiles.jor +++ b/jiles.jor @@ -9,7 +9,7 @@ array preview 128 allot : color! >r dup r@ @ = if drop else r@ ! refresh then rdrop ; -: +sprite! spriteindex spritecount +!cycle refresh ; +: +sprite! spriteindex spritecount +!cycle spriteindex @ . refresh ; : draw-palette 0 0x11 for i 79 i 3 << drawfatbox next ; diff --git a/jopl.c b/jopl.c index 9c91e24..585363e 100755 --- a/jopl.c +++ b/jopl.c @@ -1,4 +1,6 @@ #include +#include +#include #include "jorth.h" #include "adlib.h" #include "kbd.h" @@ -73,6 +75,10 @@ void f_seremit() { DROP(1); } +void f_random() { + TOP().i = random(TOP().i); +} + void do_repl(char *exe) { adlib_init(); @@ -89,6 +95,7 @@ void do_repl(char *exe) { CDEF("key-debounce", kbd_debounce); CDEF("key-pressed", f_keyWasPressed); CDEF("key-down", f_keydown); + CDEF("rnd", f_random); f_loadfile("jopl.jor"); ontick = f_lookupcp("ontick"); timer_setcallback(timer_callback); @@ -145,6 +152,7 @@ void keything() { } int main(int argc, char *argv[]) { // keything(); + randomize(); do_repl(argv[0]); return 0; } \ No newline at end of file diff --git a/jopl.exe b/jopl.exe index dd18bb129ca7bec16cd9901a37bb9abd5d0580ff..97c6696feee73fcd7b0b0564ff2d8de73ae57d94 100755 GIT binary patch delta 22321 zcmc({cX$-l8~1%r$)=HP-()vEVbenkgbo2x31x+lxPTzir9%=Ckqrcuuu^nDumXZK z5rH6%2p9!|6#)xHDH_m)4G=;X$iCmRo1*-l_xbC+u6J_H?Du@``;<9z&Y3wg2iBI0 zdsd3d{zKELfD{x-L@w9d*OXoTE}My>;)tr_Ds~Rt#_@ZrB%UAI>R$GI7xA;azaYN6 z2LeZi=go{4demgkjNU2!bUnN4^_j*p7^uj*tVfNsnD1)(Irp>Sc}YJ$yt#EZ{a`9L ztf2D1Hz@V0d`LRaC;GgfY;p8Tkq=91LF+pw%Vn60eO^V1@GQrTuUIWE^78(3;2?{m z^*|}kuZ{PBLD2UGRE+R@z$@QMv)b>Kxm?99TqbTXFurid>X;$f1LL{#((b?{?sw@zppkDICmjehwBX6IZg;v@z02ZQBZVnjbJL{$ z$|(M&_R@4^OpB-6BNJDeobD)SFRfALaPuUGa$3iqb1jbUiDicr_VC^5N3!dG&UJk3 zdg|a1dkq7w=j!E~=@$7Syn_Dabx~TXS{MUsYNf@MwmIE#yhB40>o%tg+4bu;r^_5! z9OI-YbtIQ5^;Wm!ojs)q>hLIk=E=OO(i^?5)>%imvvjO;Ioe2@)E&9a(s^|{f2&T4 z(j;;drGA>0;U)1bi`ue!t|(|pR=q`jm~Lq(qhn~iv{V!A7gT3;dZS2=KxwbW)FQEm z)oQPG7i5!kK{LN~ZFg&VR=pdTZdjf91&%p4td12fmW(~S-fVMq&8ja>Ep(LJuogH* zNXxZhw)}g}mNKf=aje$r^l`_ns?Obv0zy>$)|^vBTvQ z9K$^=#!+~W`P)a+zh&)p=CO3U@8 zK|{jW^+J87R;He?3@UKsMwA`$DMy=i$KQXgv6+16lC`~>E`B(ot#9yo^P1J2xI5LG z*QAH~aBi{`Vlet23rAY+baJGg21BclS-9DkkFZ)CGa6!-)r1!;$@;S?hb^6@GDFOG zUEe0sE!o`|(Fpt-E?2w0PTvOUxpMZJ0vRzJ8Ob;)IQq%$5HehAXrg~#Z8#ei2|dYS zO|-g;H%AHxddgOI)pH{2cBFf?KY!Kf!cosBNfqVegN zq^FIc{Pr|yo-rH4mU&FMv9EHNbSD)9`-Cz+9D_u3V!vmHwj7Uts~Toop%zbTA+ zN}6O!7_JR@EYHR<|DVURmA9r_92ftG?gBmfICYC> zjhIV48GZ#r_5;UD_Z__+xZ~_}SXrhm;d1t&eI7gE3Ux79K4mLuk_+!OQ=XdloYK_}djXZu?mJApER_5lsKC3^$C2b2r6 z1*rEexi^sgZ=2P9+HZihz9kQ6VR6icTRz;%fI@G{2jMmr$O<$a$oG~!3|S5W8Ugea z(4Cv|1*OH&6KDcZU!dxn@=%~;py@yzfsWmjy9pMD5$JiKmO%S&%C=lE1=u_=HQ3gh z^3y;!|FX&pf$IOVI#%73rvP05vI9AR7T%N>0{s9a0i6PxaZ`Q`XfM#4K!<@w+>|#1 zZ30>gvqajXE^2(-oq*6F6>>}~nF+Txf8ycxJ0H2S9O4>SpAD^LlL@}?XG z^dwLP&}g8Cb#h0bOrZTh7NE;@@+hEoK;Hm$2l};6-h@hv06GSg2z0Pco&scR0d@i` z2y924W5{iJJqFf0m#p&7pd9F1b@F#W)j(%}u3fS^Ua6D)QN722&H?=fR8%J)#<}hX zQUiSrG^$R%0kjq9BG4y51M1{35w}vHzkuGqWV1TD*2%eG3&9*<%itDYCzk-t0J;J+ z7f4?xPxHZ;3RD9$5s0soUj@nox(-wTbp3|B0TDX^-300b^!p9@G>{qSHc%U&Z*Ite zUKWQ2$aW7b3~bL0xeu7@qE&tX3s1=X_s58)s zTDcS`1Sl9N_M+A1_@Y)m1Lgx}0@K26Tdlke=ytVL4g(^fH)~}d)b*c0kw90gt&W## zuNJ0h(1SZvff{)CTAX(9^Z@XFywk7ND%Vf%@0VKloZ4ZveHk!EGH_msJR^0n9;YOsM|pmDufXdR& z2Xyh8Tn3Z^^eRv%pyStMGmr`BjoxT~X0QX-v~Uh{yP&Ks$j>1I@f94*~idh&`}Z0gb#S55uUp8Ayg#1yH|h zasZHRCD;M5wP2mE$?d@w0DT3t1Sl5i15E=u0yGCmdrdCI$Tb|ug$ID~Ky*#c3A8wJ zfqsHlKG4;x@>HNSpkIJ`0iC%jhXBO@odRkFbi{U5UIC^8I|~*9w)?6q13kK6l`jDK z0Ijv=itW&_19c z$Pws0pnJX1{kOY9$giv{ygr6HS!BU7l1keIe`||$Vosy0CfjC1vH~Zt^(Q%lmT=YXhe;? z3#Hfu)E8(MP+pBq{u^us*kG_VV4Z5@05s3}K*NDv1v1yjKcNv!1$qYPc_2-V92#VC z3PB2*57c;%1{lnY985_x6^y#*ap%z=UV{S3;yY3GuxKgjm<_K@1r&g5oT4C{oGA zyh0(*io=7B0uQ&A!A}fQgclSJ*rx!eD4q8xpg3Iq74DSNk+pn?<*WmgC_e8>a z9V0Ymf(q>H71uitS-s^aq25kf<=>E5hm%&v(P}v(5zmJ})j-iepI6&tUoa8uGMEx< zbG3Xw!Q!~_t5vQAdibl=v9em88;d#vx(jp}XhF66N`42#WuoH%O{`@ zc(ptb$$tQ30NMeRTP<$@dL1Yl$o4K+TD3e6g|&etfh`7#sg_$quB^e}gx|7z*7aX! z$ZZkx-G6Y)yyooU2&l)4v$A=Zi78zr^^SbR?g`iKSFL3|zRjQ_{SgIzsI14=2w+P5 zb%vwl9;)GLSQzHqmBX+tZW?H4t>$hX)<{#NaN9mg8L7fe1ZoA;24Fe!d0=OXbD z-d5|~tcM&Dlr0Dk@Mb~0)AErE5$x#>iY)jPf^FPE9~K;qV3aqWAnABw4V_QS4YRCM|hd%B=>bMfSJwV4ymO%ty4@TnUTd_ zxZX~!J-j6Ic(pxCEPsXaT#6Fu%hskejozuWpF3WC7m#e@rSL@ zZKg{9d-fw+sI*9&|4llY_}r|R9@4e8Sy7xGZEsPA=vVn-Kvjn5I+DQ?;S_o;&Jb7Q zHmi|_w2S7BOS9WWC`+?S=ZZAf&t6qlrRrWOZEW`!e^M_kP0i=mD5Z<3J^7aLlDYi_ zK20TgcZlPo6;hiH{rK-MEhN*VsTdeA~9=SX;#kq(k%bVxq?$nD!h?Hhm}E|iYm=T=*3I=|N4tnAxqY~wE5mPXdfp=MyBR#L zeOPIa^gO>JZ}t;VtSoRi?@M#jI@osKXN`_`9Hd8j=~k_&NcG%yat}rz>EA4je_`M;qo&s6m+-yr7m6#qN?QO zQg+8N`n~r&W&6I+RpR4Gbz7uV*)b+%L4#!lv$%@<94Udw%`OT@%0+IjpR>3*#_&i< z)#)j|yF!}QNpE9s@3X}9wb@4$b=ialZ4a!=wujed?;Xm?9R@gFjPc^A>;%E1+)$Uj zt}gpcv&(jH?ZPaynm#R1o?^xP*acaxM>6r2yNU%_#22}nKNW_8{8E?EBnxuG)A;k{i&K8}z`X=vx@z&TkNJ<8@OsMt{G*c&M=?%a!y zXd(U3IW(oH6JFJcXg-Q1S(p(O8QuNbK0>VWCb`*&s&zbRlnhgEexCPTZ-I)rZ2OVD!F2ZuM%l%M+#V9XD$n|- ztVdujI_%M?!>rA1&#K%6*&#_1M-&#s2u!+Vj zMO7w`5p-`ivJAqNXVse(x+qilFKQWDj`6=h@n0Giy2$IlwX>{8@vZ+s)=Zf1YTGE=ip~6+dMo6y#zNIz>07^lk|E7-BPkkj4#zofu3d(x)&U4{@jr{rRcDv8h(# zx+X?eX5*%-VS}%yDJ(Z){Js1sp_w1Ap1-M5%IliVb(W;ASzMiTrfX8$(k!P6V-$Le zSAnBjtrfT0>@t^bu5;vwg9U|Oh;-mT94WZl@ML_s`;aid zT&Z zQmf1{I7*qb119Hi#YvLiZ?l6-znClqXARI!&S~c=d!R27F8c__t6RA?W%R3fKC2_g zU6pobw^!{`l^qfT>$!{+RPij?}+zA!_%7zC*aEg562D^!66^ zeEx^1hL*ECJq2TydmVVpBwf zTOUyb=5lz*^UJkl9Z|H%#cW2Ki|;^+T*uvd>m;ij#6mu~jw|(6>*dc$##cMmFc?~R z3+Ets{d(2fJfQmft@q0jobi{PW;bgQw=3h8)O0m!Ds--2E3Z*gTj$ z1F>#;7mwuRQ>10{OwY3f8`SMJxM$*1HEuZreC!2^AEIU|*h>EROar&E1{;L)7JOw@Lv+ej1JSCTzo_?k)RpMVV8a z8Q3*k&MoqC^u`F|5D4ABbNHUzq8R&g{2h@iQsAR@t~0W08d!k+oFkv?+5CDS1X3&4 z@5zN;zc+WV!}iy(gDz#)@I6wug6@XBx%TJ8@?x=kuHxVk#a>*pgZ8w&(z1deZm+bd z!0fXJx6}xG_+IJff?i2qTpBjajMIqD1cOvwpCH1$#7RN@&?k-o6&VH&Kr791X zrSw9*&enhp_EYQR-12Om873A^P|CT*%5ra)w{Q@Vf4(SPC|n-@eXc9^DE4F6PoN;n z6qUKl6klOKl-ugn@S{V^)2edIdweaeesb-TZ)~&*-?m!HX!yR|KEiLPr4h#K|1zW_(F5o=60%W2A)WG zw*Pkms>i~SkA>Sj7EXUGYVE zgyYYBSkJ%D3Hf(CZ3@;=@Ap7X*(sUAjZ&2 zN@rp${YFEW7)L+RL?*`5Rr-aA3ABOy)esYD9YrzmEWJVBGcko; zqn;XwsU%T^{hA}anmeUj_X3#_`Wnw1%NSm0LMf0eVi6VNQ>X;~|nWV(Y2ba)% zie}0YWU}7DWQauyz(~IOE z0M5#^f#3-v6*yS1ru9H&5e$Q*h(61E)yS; zp8JxCZ4||2$3c8V(cB;=wo@dxiHVP?JvS*HVh5#iaS0GRsRLKY#4a1POGz6nfemDg^90d1kGZC4Zlt%4q>0t8i&JV zA$?njD(tCD9Kk+>iLbGSb9_69Z)hNyQX#&jp){9?@8~Jo&&2oG7432O0lSfjqf}_4 zWTt+kUfc>Mj$!|hiR0K0GjRg@R~>Np3Hz^1{7ii~A9geNg>pF~6Tf12-yTjvY-Z#X zS?R4#5T~(!%ETFZnjSLo8+KD?9Dc`c>&Vnu>dQ@J;vDuJOq|F5H4_)GU+#j#AJ{+b zhQpuO?=w-2y-jxIk6Wq zQG%&0^vj_Hrh!V_(KZE%tYqxPkpsChD;N!o*GNZ>QsMiw2X>3*t8AQyLR@ zu>ZltT^dEVnYf4jb}t)__pz_(jl)0KH#6~oQaD8)h=-KS>6v(hJ(h`j?ERT=VPDJy zambYk4&o3K?Ecy-144k9z=Q~~fC(>d2yJ3Q0fP6=$lse&akUKj0QqD>_`+#06Mi5o zned1BDhr|oL|`^V0K`Ei0wK;ap@ew5AA}0RGyp;kk-~(A8%gO*XhD8sLWeAL19AP) ze}_;XC^B$uxbaK`!D&7d!4MxYVT1^M0>T9GfQb-@gh3FY5VZvmVVspKD1-J#ogn5h(HUX^6I~z{GSL;{WhS~oEMfw$Tydv^=mGI66FoUx|D{Z&11)EwSEJ|+ z@fst2AYNx817ZaenGma)$bxu_3A}uycbLe5SjzAj)@_h zmTQ**QNZ!Ei-|(ck9IThBz*QUVdVyLUo$ZjiUqgk@1=JmY$2Vzd6cmbjXGtFfL4|HDhQE4Ky-vS5)gxEyN z8i?P*MxXyBO|f3$La8&4{vW)k(Yr~kMr&~A(Ii;3rd-|PbzI>8iq%|fW2^?Tf{XKz zCef5&qp2;2Wxxk_BT=W<9~f=9fC6MM)`?Cr)gd);U|Hm10( z@iabaJh7(CwltQki7e*)Y@Ybr8*LwRX`V9f;5vFtJGf3Bv6$=Z5pQr^JYs)it_QfT z^e3y>rlgz17mWp~Y%I{1TsKej^;~zdxhuA*SA50wpj+$|4>l%!2uUAeNgr;^ql)Y4 zY1K#mhkT7#cbM}xsKt9se9NVKF8Oy{FHdXup6l(YVCGYAV@^MCeLN}tOJp>XCXwkO z-*Z`>;{U)kkQH3E$J8W_aycHKAGzE{(bpr6a(NzcgzJY`HjE@51@ST0-;>bB#=2@E z$3WcOy-6JB@EpNP{~OL@K@djJ-{IpHXE}vOoa16VVpW65`xM4O=HtB&l?P!X?=ze~ z$58NT)ZQ7^V*kKh#Kn^Slk;IuS0q+Lu$L6#MF@e3rc1`MZ-twPg5~NKmpB7=-i%x1 zUtAE!2wmokNE>I^B(5M9BR0QA^?wj7=~;0&GnTYlIJp=u2xRp&E}ml~_$n96?O}P; za4osLOx!?L?jBSJ;lpyh3Bh`x-z^AtIhc=oB(UA)5;*rL@qh7dYRq>~G4A+H;x3nn zq>wZdERPoVxFip`j~{nAnyQMKSbJ~5POQ>hXEsD~tA|`C?le2If4DTx%w}sY#6Q4J zi17Z0`OqVfub8OkI&+7Zc))e!(%EfIfR8&f5igS-v1`{f5V4^ND_y*31J{)+WzI*q zZeS?%2F})W%}AZ$PxL}<3xBHYTv`;r#|Z0C8-H;eZ}Q{mWNvH9~a1zTU% z?EkgpJr?fwSh)XV;Q^0@2R;_IJQjZ9zhN5<`Y)itkA?Fe3lDiLT<}=9@UifdkAI!xe>}Ax$(+l+!W<;Zl>}C z-s%6uEmr=_tx^8MZC3uu?NFY=8@too9_1PCGv#mGK4m?J7kB(YCC7iSM^`~{^CU#;}zuPXic+e&{M|3DeYKT;}rL8an-RccuV|BTAak5|R<6IJp2 zG*tp$q)O!Nsw957Duv&qYQ=9;wdVJz+VDqIZTW9hwp9L@sssOvDvdv_>d0SHb>i=+ zI`cm2uDrjx8y~3d&PS+w@KI_kv%x=X?4a(&cU1T0yQ=%}nd%IFggT2KrOxIjsB`$q z>Rf)7x-b8NxN!0%TV@|8CA zll(#TQ2wxb82^KMIRB%11bN6shPsZXr}RI&2&CRGmdYqnaQVWX7SxL#e7dq3Ex}u9G|C|&G*+l z&s#Kec&lbEKTPu?KT_$it)e!6BMKU?z>|AOXaex7C#U#cnR%QTDm zWg0ubQu8XmO0$&zK(n0Rql~-y%TM{0NQ(b}E7S-Xpm*H-ZDw7dB(+E4iI+C6->_EUZ!z6=f0e#Yl(_wvKF z`}mRC{ro8H7yKCQm;5;GL4Kn45I(F7u(fD}02`$tUP)__n%he5&p`pQfwj`|ED- zLv%O!LftKXsO~mDRd<)4uDi$2vgz*grMd_F0^K9NTvyM(t#k1o>3Ct6P7wC!MB#g# zmvBs{5Kim7h2M0(!bP3G@VBmo;M4^Ow{?NSeVtO^^eREnYXm>NP6*KJ1(n_)gy@5W z7`;(2>rFz6K1ArC4;8xW!-U@Ya3NbCAz1X0f>j?S*hcH4g(>=$!YsX6DAC6X^Y!sU znLa^yS)VAprcV|meTwjgzLl^}-$q!kZ!2unw-dJLQ-y8%_QGy`2jNqFny^>jN!X|F zEPSEwB7CFoCVZ#wE*#bO5RU763P0=9h2QnPg!B5|!e9D6!exD?;M8Xc*Yw%KeSMBi z;0(EfzadWuF!U2thW>)dFhGbg3>3_UCxk@9AfcThUubU_B6Ktq2)zu2LSMs^LO;V$ z;R(Yq!D@I)7-kqDj4+H8#v4Wn6AjM@lMSPV62ln5W*8^TH;fk+8YT#93=@S-hG&H> zhDpLU!(?HPVTy3TFje@{V4Ef!G)xz&3^Rmp46}seh9co7!))QC;d$Y2!yLhBm@9BW zFAA!ld4e&hR0s`PAjAZf3Fe@MLVVCmLQ>Gn!r-7q!qlL0p(JRr@M6#sVL{L`VNuX> zVRg{!!h1n0h4+Kr5;h0DEgT4XM>rDnu5dJHjc`0@t?+lyI^mHm=zT#Oyk1BM-XOFK z{y@kI-YE1B-XshR-Ykp>-Xcs1-YU!r{!n;6_#g?`4bgaO8b z!V|_r!js0sg6(Nzl`z_PM3`j!T9|75PMB`|UMMpDAj~!%6>P>Ig$2fA!b`^E!ZPCt zVU_VG;Vt9O!n?*_gtf+Bh4sdh!bamMVTbXwARB)d_8QL$Um4E{hmGfjuZjnN_8G+q|&7_Zob`$nfwZ>$kG(^Wwb{*6fS;eiV%;RBE_Fg(c(!{n0Ud|QvBOw z7M-S8@tP@KykSZZZFb#dWpWFy~WVb zK4R<846%1;rZ^-tOPmmzEzS$g5nl_<6*q+T6+aEl6Tc1ZC!P)MFV=<*5EWqqMPryn zOb&ZO>=`yl927QK92=G|&JG(Q+QSOO_reNA+s?2j#Y16M@nqOg@k-b*@ln`tQ5F7_ z7!y81ObZ_==7v8l4i6tCP78lVTo685Tp2z_+#Ehu{5*V|cr<*x_(%8z@mBam(L3T< z(G)RBOo^B*rbkQ>2S-d5$3;vNpO2U>z8Wz@ToW-<+!ZlPJRDIZo{A_Ioe?EseZ+G% zQ5`v3Y#I5y*fDaB*f;V8@u|qU;`GQD#j?nG;v11RaZ6;WxG!?P_+#V(@z2OI@pj}w z(I@I9F(m3`u~pP7Vy~!0Vt!P)I6i8zI48<3E{S?oTpP7StcY4FRz)onPe&~mYocBg zT~V)#nrKNhN3Re&MXwa|qTdilMB7%0Gon|E3!~o@S4F=iZjF9h+#mgpcr5x|u{!!a z@lNy_(KlwT7#g!qY#sBy*gIyuI3#9+I3eZ(@r9U;;?kH+;<}j4;_jF&;*prG;+dEa z#j7#fL~8kwsBO7jjBWX`*tz8nv0uxb;>eb}#F;HC#Ftv`7FW0YMBLMIkNC5#<)>m@ z%l)Ftd_W8~e<4PizZ9d*2gMZgA+f#ru-MUDCH69ZE#{fO5eJ*U6`wSJFAg{VAdWO2 z6~~!>6epTbh?C4eiBru#i$&&N#S-&r@kR3)ak=?-@h$Uj;%4(X@nf?$RhWHfkJ*>L zF#FMQa|=3aR?~TW7PQ?k2T`3lnC_X4#KoG(CpMJSv0-G04X4!D22Ne5!->j zj7_7%v7P8hY-jp9whMh9+m(Kf?M}bP_OQ{#*q(GbHl3WYz32u$FWijHpxd#TbU!wW z9>iu7AD2gBTz}HW4Io`yAO*!KDK1V$@o{QOj?+-bI4yOG(^2<017*hrQQtT$e~UBG zptukk5*JFt;=*W5TsX~$i^Tjjib~?5$rcwwuf?^bH{)!v^g&!4ZHkMht@tdrGcJ)T z5Lpr5lJxOr3W<*+b9_7{#wSqQ_(aN#PojSD$uugy6^)N? zLzCj$(v0|2dLh0&+2hmbo%oKlF}@R3#CN9s@m=Wa_-=F}zB^rv??HEL@ja z%}dCqml6ueo?xY=2}5ah!f;xX@Dy!I7(o>YBWZWS)3hgH6zxwKO$QRj(7}Xp^j*Su zI-W3rY$p>Y(z%4mbUk4T-AwSO`w1=RVL||TCo0J|QAI5h)fAVgq1K6d%nl9IJ~4>8 zB^s%BVkl)KhEaB6IQ37Aq=AW1l%E()BNAii#l)7hHZhhqB%)>$3q>Y%rTC<7)HbO*bxi6( z-I97zkEA}-FDZj8Nm-Pilud<6IW#&cm!>4;QBhJqnwvC$<|PfJ`AHVqlr)I8Bn_tR zNkeF7QUQII^dwa#S?NU5P`Z>fjP4~3C;w#IQxu*&g4!mJq>SXJsW5pIJ)8Uty_h_j zmM4#))yZRNee!tvF!@>9kvxg^Bu}P&$y4ZH@-+G`c{-g)oNFp?xXu(&3c%=$n)mG0kRMXI@Y9@D7B9y7Ou(g=X6T z9`Bi;*_)v!_(+D_+YCO07D`i3#MoYLNZ}p66=9-IzOb+1lW0)`|CZNMIkZ3c54?&N zH}JFIcIW``3*fId@LKRC&`R)|;7c30AZTeBv>IF?sA#!|hm!$@*AURcV1(iIh6oAZ zlGN&_lg1SwcmYG-3he0FZV1V=QVRb$$oK}VNr2H}vo%*tp;giVSXaZ^8rBy?d^vB} zHi#YQO=%viZ^6pGK%W!aG#V+;s{_3)ZHM(8SUZB}cr{yR!}_jt4%YWz?F#Fze_8*8 zb&VAGOOSCbtUX~3RW!%#r|3ZIq#m%o4{IM-U;dYMkD@cJm!`tH0oH6-Z@E8;Ltu;d zPNol}_h8)!YaWQzyZL-eVcjGhg>^Hm?8D?v@8)d;j@v2qI2B~9K-@CK_4j9I?b&+!r_pX{Dy)0Zj9vkJ(LbxvNC*Ax zBunp|is3$&zB;wcydNp7hIM2>Xp_$i0eMsj{uaoBfDAeym7LDzzLXA}4l;fPz8*X; zFs8|WYG5oKl&-;g2-Z#Ds{FxR(O5K)8`<93a<$pwj`C_t@h*CN~LMUSfAwKUx4)a7ayY1xqZIG@ktfyEuL+n zYBGI;^baC9O*M|apZ08cOF`e^%nl=XTGg%*V{wzgt&iXssAj#(vqd%VZxC$xFWym| zNZ%u!@4&mNV;j7QMyZ$551im$oH0SoT7Y}AVPTYojv>O22;Wq*@9UnerzX%Xj^o%{ z>1 zu8eNY)^Tjrc+Q@IN{y#h&O#s5v}VY?)oDD}@;pMfHO-e&sr6+12e?MtoN=@^!yT_0 zN3%`a%N<~caavDfyaYW_+uRseXg!Jk4Zcbn#9ZCmc5Mebfiu30&@OG;28#Bi^>hO# z$Y0vXCa%zV3Un33SLZ2^`}!Moo(!(T5UOj=AXVq7l^ft`I!}*asTJxxHFOhtsIIw& zrt3Tn^EUV_oszk_w*|U3^b;E0U4+VY%_GV#T?ZTef-_(%ME2;K&){!eEd2`p0Nknb zbRm{ffIgW0xL1p)^q!W_!e;#dI*C`_F6b0}^T0Ao?>S2(MJ0N6kMV3}4P0RB177}@ zL258~A;KH~;_LOEGxi4GsBb>weR|JX`htINdr2U~D5!qD71CK^07qz9jDXs)68 z2G3Z+)}Aah;NwlhX4_)GyLW7C3CgyH%vks*LoWS>YsMC$oHS%IpPz9B`kl#8+#kE1uBcNa_(|N zLdnKxx&qCXskAmmkh6gg0Iz|L1AhYiY6G8cTt(MV&;;-zqr_hOyL0e1MdMQuZt4j7 znNZaYTY||`b8PuavdPw5bsZZFtzqb5YUY`y6ski)ZNYO*&8>H)DVA=6vjr_B$gFW& zZHlB@;A~mTJErD4n2beXx53%smVKrU9(S}qtReKYOt!}5mdUR%9V{vIaJJHg3u)&5 zAs)`wy99#YL85F64)MchDm*YC7!u;`cdvm*o4e3`)KD+*ICBSlRPy)_H!I2Z5COIV zW+WzVjoT!%=j_=!n5mfDHEt#5?)XN9rwZ^F&1sDo6ToD*&IR9NZmyy8=7r>qFF$$U zH_S7e{71)ndQ*Q6(u3Q?F4PI1uV!G|Vxu5IThR3GMpBP%>zZ- zM993#39rXg(wEkPqZ|;W8UWJ5o~$RrbHua|DLTf zaRqh3b!CfmsuGt{Cup`#=S1S1Mi

JcAWmty7rf88Ml0UQ&|VhkZhvpA=8s8qR)8 zQa`Q-bSe1uq-?G`^nBd2x9}5Cf`BG?yxFX#YLJ-G`0!6lxLP34Safppgx^wY&#VX`a ze$w*44AQkrKXdyk4*rE+f2!hhM}b1}y&fwmYkfF{wBu4l+ksq!+dGkPC%~ueft=@; z_k{Vuoaae_Yp@TIW?vu359B1yk%eU9r7te|@KZUd*EIt=3MOzkYb+`uOxaL|SFu(A zlQgiUTuZDT<?pW9+LqW?^uaICQQR9ERYPTqKpg!9`eIq$&N+S04mNkwr9m^0d*D@cZ2838Q9?ELydR=f*{6^vchq?9BYZ zl!N~tu3zQ={G-m?0r^>E8Is?J2K5?{u_{{NqJwh#XVT#OJm!#}*$=OJ0QwZ90d&>EtIX{(nz1CTzBacp9n5a+V8Vp^_EcBp7OmB z`0gXCGC;EX#&G?loxbthbm@w(iQgI}?e{e{|-xw zz%i*>u1K}WCt=n91*?P&yM|z;0Y1`ArT9jGs z1WEU;CB5^MMfa`BQU^=Mo>d)bbF|B>E@<9YnSbA!r%XWDP=^xh3@)@)Q@)BB7EP*F zCOMRmk4qZKs9xpzJ!^@lGtKk&to9b(j|w*SRdViISvdmlTL%ra-*8@Bp4~Hfb81O) zo?@1&bY{Z}Sl1+{RG0WUQ$`Bp(nNhrRooM0bCv9;wkU(|S(OZFw?0C5>aJBW zKQHli8Xtm3T_xSq>jN9X!k?6iXRc~AKa)MvEQ&9v>X{U3@Uu;VZNhVwpYuX|oCypC zT!p|1I2U@M`YRJ|*R%bHKls)cBYGW`rLuza^CC_0oow54Y*s$B-O4n)q1~aISEC*XH z%KOrEqaUB&Qd(||7(rd?8c<@4vvJ|(d9$LT(Fb=aX;34HT+K62MhvB846Xo%UUD#e zad&E(+_SQpMqGQTU81bc(k+t0{07*Tm$|NE&9+pxhG;c&Yy9@$uTU|(l2YSWk{&5v zJ&|n&i!!Xts^mOTGM_lFVa->msi_vFN3EUvBW2DLc_ZxF!!GOzYiMD#qcuT6?W8IciR}Nd8IjoiP{iAFf<4_^8fE2vy zjJKij@RaW(3up^tO0CL}suEvC^H5pgY7CuRDpa2Lqu!~tF`%~60aG1ujC{Z z@FhN(PMqAr+U|($w(OT?u^(|`h6KZ!3cr%m!d2sirS0>YKT@uhD;pgPGY{3>uG7t| zR__A^jTdHKtzlKl{$^4)Q&dR1lG<)n+wlrZgPEOUqNq%1CM_{V=M6QZW!N(xwR1n8 zn(xJGu2G5g);40zhTSvPkk}BTv|)z-O{*+Q#Q&sEEsBq%G8;Nnnw&{jw{zc^njgdx zL-LM^u2FU&i^#J3{I<2E8A}%-%*K(tF;&@Xl7^Urxbc$B9Bcdeosf5sKsjS;Vr8ih+AHE%c_Jr%d3op z-2TYbxnOYy7Ll+x23%d~Od}I=vCAUQj>}^SZ2>EiW(Mfo%uwT{j{^d2PZVoO7iWyS zidDJwL`iunCnBkSuvp|u>Q4k@JyYI)qNF`@4!MUFD@(35OfFU_x1V50g`8cjeDK88 zZdfRgoQ#CD2+D9Jv=9mX`OsNvd+;{&a(7N@5g4N>jAGBE9jQfPQSy$|JY|zKCUAkR zf#Pb;7|JY4)xR|!Pk8Rucvv<=s;qJwtwp)>uT@S%c2EAbD$^e*5tVX0=sD2Npw~c0 zK9DDSTa?2<89*n2`aF<5fOY`o0PO?n^g!+ewCZ1*)maal!5Tl1yEn8b3t-k8X3K#B zAIJw`HU-EEG#jYF133#>4hI?tG#=RBQulU7=ijC|}T6lqJ9$ zf&T*RfX&WtIA+lpud5Jl*{*l_5)o9`WdKuxf~?o5esw^Xx9y!RcTi) z=YXvMQ^3~2ET&wZ2=qSCZJ-Z;4CV4TPm3}Es1)cuAii8)05k~bF3>2TyZ7bwh}adV z0;n(0-}mLefZ6~(1WE_``M&JyW>KPmY>&a3g6+C5cLvjeJp&2`TIWiPY7+AX`ry7i z8CGT2t@3kNJ-%*L-n%bv1v(Gp0J;G*>b`sx=qM21$)cPF>U&@IbGIlvf!u+<2TH#$ zcXhW}lr>-tz_x%jy)Vy%*&?8ZKpz7I-factjTLWDKiUGQF&8oa}PhJmn5~vB#1)#zAz}nuEufS|MSWBR_K+*T)M?kZIS_3Tx(%+MP5OX|Gd!T7R z+&#Gk&_JM$KyL!wxhwYr$^}XX$^*J^SDpdX8Yl;-Gtf_W zG4=+4t$|q-(3f}QAAmf8HUQ~>R@{;A06qN2DsKTIp!e^{eK1O01= zAh*uw7(jt#ayep70a5|Y25L|yhrnt$Pyo<)phu;0XP{m{p+EzHu9eFDfl`5DfO3IO zmOAflq797Q-qv9IO66+YUNcZ4%p!p{m&*No@H7N!2BZaAUMjx}^x!hOC6MDXo`$7z zJkUQt9e_%K#+S-RfQ|#D1N{XwuvA`&QtSch0(1l@x6~$|0ow@H3#=Hdb*cOWXc~nKx&{hKmkCjOXQ|N&o80IfINW~mdFEv zZUcP@^zf2ZnOY*R2RaK>40IJ}M2Rd57UdAoUZ4{|y-Vbau-bmfW|a?t?FCCKk#B>o zgxPVRO+ZN{awU)*=r5p;fC5UKpG}j26re&N&l348y3!kvU2Z!=Uqfg)LK(V!+xh*J z1)1OqZI93=2xTbl*V}RedTT7SuPZnh!EWg;^wn)g^7&Nd#zm`gPf|sP+bW^roHHcO zPi!ytT5Zp&ViOK*nqc5Xt39*2gkE^Bo`M)lZ#!Q{kGfw<7rE* zM{X-&7I9mShJ5>hwZwPf9Kv*t*%zO)gCAH6Q!e4lyTmSSiw@*lo228>0o+XKcJ$`B zT)fY_%MFlsUw`Ymr1TSO zuG@teGGYkP7C8{9wDn^#21Q$xD{gohw)A?Xr+aW--#+_hx-GhBFD(hM8~3K80uH3l zo0}k2#=gOCG)e>GrkMha)^&%F*byXlINGx2$8+g{niz|+R0@j^Ql1Fzb(U^E~<0H`>j!kkMtzz|(8jnZpS*v^j zDdeBEDo?J-P2%u~1-b?_1nA~9`C%*`u|T(gx&xiLCf@*R0(1|k9ngVm^2jK3zaX$m zuo$qd*PM6C3y90WyC={m*W|4*tNatMNI*Q$+-q_>WO*IP2z2*Pyn9}gKL9!f6b|$^ z(2#3#Jmi^DtK0&=KRmXs`zc)xg4KnmRwesRNn0hix+qg$T{xXhdEp~b*?{QnVEeB0 zb5el&&c{}z;T`FAQm9SzW!3(GRr?bk=iC~*C3l#tDx6+L`S|p$k~0uB!NY2;%&g)l z-&5`if1n5RVm853?gg)p(u5qGyLPltT8*W#L&K^7=H^g8gK&yjS|aWtJL!X>25PZw9XlGywvuhmMW&3p6by`@eqI`YjLNrf%0@Z%dwZ?uf&yShn> zT6X3C3YY$F8PNG#uKDT8MwNDrAl_l=;Gppx`nQNwHX0Mx;>3v|D zuRVB9ro(+s=6sKxgvrfmnHa7cNQ0BZqo-%8DPKepdHd12sZF_OON+c9lTEQK%*5;W z9+R{wIl4(gZee@Jd#&suKCJEiy&UOYs}pkPc~qwJxU)esQWA2#@;%s(Pk|~=(L7z! zs-^Ax6V{^mlB4!?_sVnsOFYwm#q-WnHrB*gR+8-uDhNRasZ`+4I;VU)%i^lbPlHg^ z9k^PakXyqGYk0mFqLCk8Alw@2Ksk5TPWss=it+;KSgT=%E00}e`?arQqNgj>e*>lT z))9#tYeJT?5J$e3vd9a$*+t=Kk;qN+Dk-Rsu{=;(+IoO(B@cskN8b@{c{tFZomKgx zJFT9PiTi%R6B!k_&y1R$>3A*^Z>e;jo=JSZvjO84vNF>aupqcEU3xfXYH|^>E~SDsuuQL)&oQiJ4(-3#YqNfw8X=86;)2P2<1yl;*V! zO#H4DX46Ep4)=wb_-wgpaLvFB6pwh2Tpx(4Q+_c>r`on1(5kgX_HT{nn|I+MubNpV zPiK75BG(3Xt_!R$9qX32+)+Mfq&)jXcg)lZ`vn@-CtQKQlX%6H3CI6SwH zsIv+k`e`MD1|H1o`@Kl}|I4E91Id~i!W9%xN$t*IIpn9b&fK3;!%lsI9%bu{kFyI? zo@P^iq@^bYM2xY{!S1OtNt)g%4%VAG9nc{;ojsk8B%uQd1<16;eQ8?fvs{YQJH5F% z1)YxdM7%p}FC4~SUY+7<@$xijO?nKsOZp{!g}Ewg{_N_k74~~28vBvTb8PV?!gk}R zdsUV+EhCoOTf8BI<8{sv&i<$ONqc$a5#sWvuDL1g&Z@kpYi>xQoAnQb+2YOa}+)^OcZW;3a73mIlc(XF8-`bD~>xL z{hr%Gy;xm%NW4|`T$!)F_2{`WTk`MPfqS($uj?d^dsRB#ZDPWrEcQ1geMb76^uC$D zr2mrsd;0Q>PtrG}uTDRl{w!lzrks8vJvL)Y`i^wz?e2Y1xj%L9!{J>wOg3apV~NSe@B+2F8t5NX25`ED!h=jP8X$XKzdA>~`= zXK*k2bLMC8F28j5l>l2o2A>}~KSQW9;i;hG{0#9$f8(R>PqR5Z7#?L?GLO1H&c<7b zBO9~A<=IMQHC}Xt9C#jNE4SgfwTEQP?6W)0(B=ndcx?Q+L_q{XJ#xp$){IG?wr)ER~XLYdPRHvnO*pUM~P@(d`?>3 zYYaC`^6h=H}#m?!`@?Yk4VcYOMzvX#k*&g^Y72@e|Kj~l&k|*;xSI1 z`8xK7ShFI8KDu2}SpyOfqJFgmuMR1t0}k$fJEuh0U6Avg8|_Tp!_#kJ-$m2zsX04S ze+#>%`&!Dgp6QRry_79C`yF(s+6Awb7QEKMxFN?rNh~T5 zi>A3BJnFt7hv=X^d4qKMH9u~HRQXz@=h_^~53vVtkQ((%i!Z&=uU{nIqZ%|n-P596 zg6~yJ^9#N3MhDr!;mFt9&lRCmMZxQ(5BeGOTWYY;es0bBoT4nA1$@_Uq-uRmfvU*E z;UOGEWbTI4r2hvoa*iWvH{4#h{V2#{_boY#-M@m{mXov~czPZt$a9KPc1lYB)vw;% zY!!Yn{%%D7EPqW!+i1R5P?FaIj4 zwOhf1B9B1>*X+t!H-`>lQU8U5pPdY!dPW{Qf7tiKA$n=pz@=h#ZgwtK`aM!VeA}(q zb5)^Oym(zMXS<)s{)igjm8r4K>>-{#TQE5GJ`m0{@H_T$VKEc43{0T4l+rQ-R`jWqYo!=>lM%Mvn{xt0+ z|ALqNpS|SYB86;d>h6rIUN?LLC#2@4OK*O0(DP2u3g;hcUd>CXo5kQ^I-(qYG}oBY z`0?B;h%=kpB)VgBhC5yPym;v5?t(2+MdUw_c2Oo1gUEwh#l&D*LYtWwLL2B;CWg|- zbc>1C=_~S6Lky#3l)%Irbb->C7*1!X4-+G(jDBEZB(0}PCf=kqq?zQ4TJWDlMbwjt$@DADU}6gK+$TCT3je7zpH49JF3qBHCZ^E}a??Y+ zM;sTz#B|z5otdyv1@&iQ2JNJ=Ow6POw33Ngw3yB?QAjuG2@|tv4rvS!@6(qwh>1D0 zg~l;4mo|~jKsNH9N5^O}Lq+tEHZn1v#?!Y<*l9VPWnuwcqbE!(q~9pi2(gHcQx+48 zX*Ts?;saVsW0?4mj?ywFmLU1>nUH8AdHO*trPZ{EiDk5k#`_c5{6C_Nn)TUsDUNZw$mXYR>6mA+}RXt}_!m zY}AY!!c;Le<)$*RliuKNF!2q&&OKye7Y*gw#X)>a!?_Qbkm*fs3lrbb2re}qVmFQC zMlrF6hH&c=AokKQt{+A_|9$9pV<2chHR0AW@jcuTCJx{RQ8`mT&_FUILHr1}kO?-_ zsv6^Th%EGN6Ntlbe=u*e#2+-6(pp3O z2{(v|vvAXxI0v_siNE0fWa2!WPaB*rz)@Sczu|0QOkITQ#Ka}I9ZX!NOm06DSK$6( z;vYDn9Zpx_S}<`9E|rPv)Q>Do+<+U-#7(%-O#BNsg$V_2DHFHgb}(@pZnCXC&Lz}~ zt}szby-C*rq6}_76L)9`oo3=LoKxI`n3jUmeYp3TD5pg38WRhyH#1$qq5MT6!&~p9Brx%0{M9qZ0 zM%d7Q;bX`M;m3qut?-8kWW)p!!i2e21VA)mBoHE+iJ)2$jLh~h5(2WHiO^aR262Uv zaEPyaL)apq-1DFsAzEK1@Tx~+nTUdzz(h2}L?&V&rZN!=K{V5i;+PE+@yv#a1ZKlT zBE)nik|1U=(HLSj6HOrIFwxWoHIJ!g5c8R64zYlV77&Y=XbJHF6Unur6~u>(w1!y1 zL>q{uOtghq!9+WVPnc*A@fj1Ci=ov_q(H1^q9bQphv6S8mD@)fQz6p0|IlV8I&nd? zg^A7(Uonx+eL~xq$l!L<4kj|WBY2C4$l^S?T})(i3dv05a3Wn|q6??vnx#YJay;!| zqATY`JDKRli8k8HRClf`_Y)I65bYNxED*mk@d^q%Ap@c(L_QO}ASPx)^oE$sL?4K$ zOyogKW1=s_-Yke$A+9rFg}BMYYY++({UB`Ecj`v{p{ke|08!1vK!|hM5Q8AfnHUW5 zh>0N(Pnj4Bu{H->M`t4Zf55%}y@is(57Brp_HN-^J8GAMMngrnvA=Z(}HNlVv;Qtm2xv1J$HKK@%X2eEbHHy6I zQmhk;kXbbbI{yEgu>Jo_x<2K3T#V~>%;RERVlghPid~rPgW5~{5aKCAOKQVdH8`(c zswH*COSw2#LhLSjusgk!i+7P_T!Kq{#3j0dmcz!`8dg9!6a1JeqzJNfir9w z*TiN0X|45Vwcl`~0oH_9a?R-^6RWruuAo(1OP5$(o6efr z%UD}`VV`ognxd_Qku&MK>}|-*S+aGtLF>6>S2;fCTDgKg=UTgjjcel)cCM{U?5NGP zm}^H@S-sY!TqkyNK{nTI_@=f*ySVnQ_$#;$uFUE>#kX7vU166f*CzcPl0L+e-d&r= z9`}j~}_tt`uJo>9wRz zWVpx=T&An^KXNssh|6*X)ro^#w#()amqYG0)^-kYU0moOm+KOHxvs8gbz(i&%|$+~ zt*Sb57{uA#>%xU=oDcCs0Y0ljx&TtVB$lrZIO_;}T7zde=$9B}7 zQ=H(uIVSv%qxR0T7W*fjA`Vu2XE{$|1D|*f0%H}4e?bUL)ZH?ceG(ob?krcQIL{fm zWB8OZMZ{B+~Znt3G89^xHhvVDB^Q=@9GAk%ck7SVx{Bz*#ZRAe83h<9grsAc$_HP>e6k3;7vcBj-BCQw>2APpi{KlO8vt{a0PT1WGzZSl+Py`?(MO;nxX?5f|nrK&%;&s1kI z!F7&XtNM%kTy>t?sCv$ARynw@Rm96Gj^C%M<_@X^{uh-y|EtP_KcVvE|57#J|517I z|Ehd!{4JF)e^;gAAF9;+GnIzt)LLFt>v#{fp7&83c%9mh_fz}xX0?eASDX1bbs(Rh z4&ocDgZVb<5Wb^2j89XC^XcjczPq{+-%B0E_fbdl{nRo1V0A1%Ngc;eQz!6}I+0(Y zPU6?98}r5LCj2+*X8c~Ytp)#sx+Q;Doy?zCx8kp=Tk{XpZTU)dJN~JQ(~X~~>CR8l z^x)@dEc`;vEBq2oPkx!E7r#Q&n_sKx!*9~$@mn-~`LAsnE5BXy8vmW9AHPR4fIq0o z!_Z)isFw>2aAGR>R(bImB;P5Tz#P&=AeX~*&! z?Ks|~eS;6sj^{(P6ZjZyJ|C|w;FGiy`BvIVd>id#zP)w|pP_x1&(cogbG7gBJ+;$$ zTb_0%Z`ID?`)dpNVcOaJ2<`j)DD7N+w00gpPFuvktDVo!)Y|z%?Lz)T?P6Zie!zdE z{gD4yyM+HtEAi{KOZhLf%lOUO<@^@y3jS;D$NVAfC;YG4Px%wt&-hc?|L}ilSMh&q z*YKCLYx#e)>-ZAwdcH#YIsZueg^hor-NZlBZsx1CU-F!83*SJum2ar~n)lUh<2AbN zyk57157rg)QM#RctnM4Wxo#KVPWLUJf~ApE-FJMpZV#WU+sk*;?dL7J1AI^2k9;59 zLH<7eoO^M$$-{Cu75B)>#=nqQ&&o&QAl zC%;m6mfxm3#~;xB#UIk0=YQ4x&7aU+Gf15YxOZXst86Tp*!-wnd@@@3@_%wYv-&tS5XX+pDujwE0{q>dn zApK*0v`zn%AFHq83-r(Vx%z7UV?8IV)bqkxy&%YXQP`_@6AtU$g`;{;;iTS6IHUI# z&gvTq|LA>$8+u=%Os^8|>NUb6y-s+d*9%p8gWzE>3MzxYpfQ*Plff*683Ke@L!gjk z2ojnbf`#^m5Fx`5D)caf2{x-CLKtLdBn&k~3S$h>!Z<^WFu@Qjyl03PY=#73mLXAC zXlN`fHZ&2I7@7*p49$cUhUUU*LknS@p{20F&`Q{7Xf1qcXd`@MXeWGYXfNzGbP)C# zQiKDBj>1odRNZ7W7tR_og!6_>;f5hgC^KZ+gi1pf;fWzvs4{dF+>PA? zm9e{^FgC_7) z`WS}@uNsF6LyfNsZyDbZ#u$eSZyQGlcH>AvGQKG+Gma8g7~c}s8b=G8jbntZ#<9ZJ zM%y@Hhw*LU8{-6FpYa{xd*dYGpmDNr#yCYdYkXHIGfoq#jPD6FH~nNH1;SXrMMA#cVqv!5hr)cnrNSb=kA03c> z`cCjS?G^$|dxUV)ULnr3Pe?TF7h0OW7h0Qs5Zao46grp=3hAapLRZsa!PdicMCfZe zD!gX;Md)ujCJZ+HDhxCICcI@jE{rvu5XPHM3h$au35BN9!W`2Xp~&>Ru)y?(u-Npc zu*7s$_{?-pSZ}%@Y%u*Td}X>QY&TsJcA72=dren_?@j**M@?6SUrg78-%Qtqlct-( zIn%$wWs@RYHQf?!m~PvI+olqs%v37eGu;s?Om~GxrhCG3(|y6sTrPN;D+IOqfuJ)# z5)9@_!QcE?2s1wwBFxW(D07w2*z6E6X)d-jb7C7aFLpEwVmGrW_B6YRd1iO9pV?C! zXl@`5HG7Gp%--TSb3?Jf>?6Kw_7!KE)#7ZkO(V`TYsC-DI&qmt<_PhOxsiC*94VeRM~fHDG2#_-EdI$( zoOs(DFP51T#E0fYvC^C*J~cNM`GBUP7|=}g2xuYt2DB6#1tg2D0$Pb(Yyqvs0Re5q zw*%UWg#qovj{@3@n*utBdjnF$69FB?s{yIv!+9*$V6OOcU{~?)z;0rBV0Y0isE6nuWD(<%$0Z>MPo|1-&XB46=%U2E8WU3hF0T1@#wI!2`tb;DKVx;6Y+`@L;iD z@DOoq@KAAP@ay8z;9=qy!EcDWgNKX11&_FkhjEykkMktkTGJ< zkg?($A>+i!A#aQJkn!TmkO|`UkaxsGA^GCjkOJ{`$VBmZ$RwMn4xKDUgiaBYL#K*4 zq3??QL#K)3Lf;c-g-#cjVSnDn&>7;M(3#@#&{^U?p@rgu(AlC#*!!Y6Y>t>1Hdjmy zn=h|S_(5nqa>5nDt@#8y$;=qoX@ z(br<@M%%>PM%%@KjdqCR8x@PQ8|@U=Hu^?9&}f%<$<}DESk-8sC`RrV8%7=weItJq zO_2x1(8xn#MC4&HG4iO`D)J|>W8}|bdgL)NJMvdCH}W^JXXJ6QPvj}FZ{%t5wa7E# z;K)D3p^@jrHzWTNr$t^6=R}?tmquO`KaKRDRgs>wHnIVI8R{i%JlnNp$yC@ngWvZ8~?5*8%V>-~um=wAi(~%zAVp7Qw(}_G{JCiClgLJW(;RHt2hyt8L9{w{Fs+RpLYrb=r_Hg$=!|MRmuiDIiXVk2*bt#u+Fk&X1Df%+w?V` z+Qo%XYFsFFi3_7Q1I8JA3aJm#U|TT{dMHl&YlOF{ANC?dW+#l&}@xcD?`9p8!C$EQg>8WrD-#>Mxb3Go)18sC#<#`hvAzBg@%??d0k=h3h6 zed%)it5hCuCAWmv$Uni>kKz;hQ%b@B%1jtYuOtj6Yr^X^Fku)COL&7uB@CzW2_tDr z!kaWBVHC|tc#9S$jHP7>Lup0A+q5cS60J*^LYoq%QE>tmhZAPe&k2R}d&2v4K4A{s zOqfd#6XubaSVX$S`4pbGkm3>-QA*-e>Yn%^_3fUxg!&~erGbgdXhh;i^j6{ow(5kV z4R4@#@PW#F9e52D)O@UV=ObtmG@F=tg%8Eqb&Tf&Xo|G+Y=rIIniM|clL(*C)Bpyn z_;`A+hX2CrXgahv_;0+LY&HBM_zY+t@GIamYxq6zS+N&IL|Ooz2;N=9BudROQB0zR;EmybS7fQVj`dbPz_zMAx z5zrjoOD}L=x0dt)I9t8dxz*cu2LBMe6?pawd@}eFaJDA<-V1yyxCGADNOw4S%_PB9 z1S~}WTMqsAg$RD`Eom8eNAN)R`i#4Re*~Te{>lq{Cirsj&fs%i;Je)0&%d(_{8^WZDNrK}4JxK+~c7qYn3QsCcbO>5Ag3t$}Ng_ZuABgZR~)=3R7P8zZS zp))}*yb$W)-HtXQsX}mXZ+0tOMwu+HXPpIrI|{1cE_KIv2}?Y)#WWEaR9kPzSc3(WS7 zqHn?1f#>>0)TJ;MTn7IfWc&+!sc$3t4*U!76~3W$_A>ZxY1riqo7u^}#@SbedE1&J zQWfS@+i{Lj1=nKiIkM6oq*n~mMb)Q{uTrtjPV^1jS{0iobsd{k;ZE@_&RbO>H56ML zR6$Pt9c!s4RIWlWa!Zwj2}PdvK;Ko>cRD|{fd$h(II~*o)a;Z{!@q}a`~pu?>zy_~ z;GC{zBZ%whqaIEBk^Vt=`>BW5PpAE$PNoC6vcm{CtY$kiTt}ta=oCkBeyV08j_dHz zxcJZTsx|dILK8PZ^SGpS-OJ1H{iChFmCtH2{s+AJ zg^Yc5>CSl9aMsv#X-*G2_0%Of^$nc+=;EE4oo47+sH<KG;9r*)w?yN+_5t0v0eeW-KQ1Z#iTIp)gXF0`k4yF z2Lopfu8U!tQO+AeobAtP_{6|kqiat}m7%^dh8kU*?M#U<*7Gc*t9P*dDP4^9y`zuO zRYPo(%B#lu8X9ACjU{ZW%G<_BXI|`NTV}*c0S>lfWkpS9%>TVHhfd<2v3)BCjTsC% z4^O}0bQ=Ab?Osv&4I-==IQdw=Q0Gz?+ryIYSKkX3`CX%PoEtW~VZVnT>pQMvJa)@r zeZfX-Kg&dHw7XQ3kiRLME<>|jEdizwx>Cd2g8u^@4c-C#Y7OsiT29wcP`1Nmut_2; zQaE#{fc;Hqw$J4e>}wB$*;R9Fw~N2oR$p}yH34kXOO&~uH#H~HzeuPlcuRAA>m6v0 zA_bi7e;I17Z=|!$p>zwJ?Sh$Su7Ap{H@BhN;A}6l_<<|OIuyTgi8hAYdJiN+kxNl@zx`P@@1J^~i#5$MD zJ{wzUZTI2n41X>@Tx*ZMk*=%H0LR|)T8zDo9k6VM*BbCQBa`d+sz}#cMGpAd$od*O z7CD=$kZ~^f#mEVD_C2Cpy{Q|A@waDGeRmp(Z&P;kK!mrVI@Lwk8kL7dIL^7XW_wgm zsz#!0ca0pCT4y6fyI$nj9vdA#DcxYtj^@$czO%(?TM?Y;RZx_!8i)pi z8)MQ4OE1o?I6?Ss)z<6~?`w>YUNyv)ZjHJQHzg39-m!^kf@UO-@;^c zL<34iBV+5H__&K4#^rF{&NWdt_=V^nv6YK0xwB-)~dnEC{J4YN)V9B0ihY!nb?ki4^gl}t`XaMkGuaqLTAijjIF!lOB2TP zICPdG4nyjEE|g~2IgEW9Sm+n*w2_@QvD0RD`jVZtu+vty-u)FjeT|cC#x^F8a_?d@ zFw6aCmh>;|bPNGAe&we9p9Sp2p@8V?|9b&3vJ`RMITWx5hXTIB4I1>uUd> diff --git a/jopl.jor b/jopl.jor index ba523a7..ab40d3d 100755 --- a/jopl.jor +++ b/jopl.jor @@ -93,6 +93,11 @@ array semitones fgetc ar-alg adlib! close ; +: rndbyte 256 rnd dup . ; +: rndop rndbyte rndbyte rndbyte rndbyte rndbyte s" loadop " type loadop ; +: rndinst s" op1 " type op1 rndop s" op2 " type op2 rndop + rndbyte s" ar-alg adlib! " type cr ar-alg adlib! ; + : panic 9 -1 for i voice ! noteoff next ; var songticks @@ -293,7 +298,8 @@ var stopkeys : jamkeys stoponesc voicekeys ' noteon onkeynote - 41 key-pressed if noteoff then ; + 41 key-pressed if noteoff then + 88 key-pressed if rndinst then ; : jam ' jamkeys dokeys ; diff --git a/jopl.prj b/jopl.prj index 19fab05609a5bbe6309e00dee906d2aa60e6ce36..d34877d3ed1d7bf33d22e6feb70fd0c0e342c78a 100755 GIT binary patch delta 385 zcmX@C+^DiaosDJfA|C(E+H6PJSj8EF>b6Y&%9GA2%#dBVX>uZOI;$u{1dw$W$P!~n z2C^*qGI>`4bzEX*V9;Y^V3$Ml;zm$uRLVH8J!t z&S7L>n$Pf^@fG7LMm5HZjGq|xF+?$%G5r5;2GqmDz{bD|G>?@*fg?tYA53zCNiK#T zwOc0l@~g8j_;@-^<`)!W3GwuGoy;RBlLQpd^8o7RVBlq7nLWji1FVAuO!6>%o;Ahq z|9^g-*&qfFgBU{x13SZi5GU9bq(^`uprQ{&k03)|VLe0-h#|-zI@v}*TaIV8*y<)f zJ_cck2_TNQ6UYR12DQ>nlYRN61%Pe@>I0b%a=)J58xT5K|t17Ad8!! z4alFXLa`5eEzXkG8; zSyTLY7`PcaKxTkA!LF0%3CL)GEEix1sOW=Q4zX5{p|7wWXd!>@bPz+3L2R;?fVODv zbg|VPz-1WZ{#E}8sUK$jEbP%r -#define MEM_SIZE 16384 +#define MEM_SIZE 24576 #define STACK_SIZE 64 #define RSTACK_SIZE 64 diff --git a/petehous.jor b/petehous.jor index c5c8ec6..20358ad 100755 --- a/petehous.jor +++ b/petehous.jor @@ -4,11 +4,14 @@ 15 5 N ' {chair} defentity chair 7 6 N ' {pete-bed} defentity bed 10 9 N ' {phone} defentity e_phone +18 3 N ' {fridge} defentity fridge table :touch pete say" Yesterday's breakfast is still\on the table." say" Maybe the day before's too." ;entity chair :touch pete say" I've had my morning coffee\already." ;entity bed :touch pete say" I'm not tired yet." ;entity +fridge :touch pete say" Should get some more beer soon." ;entity + e_phone :touch phone :| s" [don't pick up]" @@ -75,7 +78,7 @@ done |; choose ;entity :noname reset-level - :| table yield chair yield bed yield e_phone yield done |; ' entities redefine + :| table yield chair yield bed yield e_phone yield fridge yield done |; ' entities redefine :| touch-begin 16 10 2= dup if move-player 12 8 pete.jor queue-level @@ -85,8 +88,6 @@ then touch-next 11 4 2= dup if pete say" I'm already dressed." then touch-next 16 3 2= dup if pete say" The sink's full of nasty dishes.\I'm not touching them." -then touch-next 18 3 2= dup if - pete say" Should get some more beer soon." then touch-last |; ' player-touch redefine s" petehous.map" load-map diff --git a/petehous.map b/petehous.map index 3f5c16175e043fb340933e94359895357ee31689..36e00accb4e41c4f4ab13dcd3606a8787831184c 100755 GIT binary patch delta 17 Ycmeys^nq!DA0yX9e`!XpjoGY>05(bl_5c6? delta 17 Ycmeys^nq!DA0yvHe`!X(joGY>05*mM{r~^~ diff --git a/sprite.gfx b/sprite.gfx index 74cbaa6a65e6a326ba9cd7eb67695a9dc4902d83..6b3dd601439f22a792dd5f81e6940af4dba1c3d6 100755 GIT binary patch delta 178 zcmZn&Xb9MFK)jy$0rP>+e_^orYw=eY8$^HqOR4;SAmDF;!TzrPE*Kk3D>nU+|6~8B S9vA#kKlz||{pR};iu?d-JAS|b delta 21 dcmZn&Xb9MFKzwqdME&Ob5({}YKTuI%1^{S$2;=|&