?=2CBSH0GH BABM( ZXJL"05LBPN"85H4DBDZHZ4AZBJE?MA BOS Z=FDIS(2,-280,300)?MA1BPS Z=FX(,6,,,,)?MBJBTT !,"THE GAME MEMORY RELIES ON YOUR ABI-"?MB"BUT !,"LITY TO REMEMBER WHICH CARDS LIE ON"?MB:BVT !,"THE TABLE AND WHERE. HE GA E STARTS"?MCRBXT !,"WITH A NUMBER OF CARDS ON THE TABLE"?MCBZT !,"(=SCOPE), UPSIDE DOWN."?MCA !,"ROWS : ",NY;IF (NY-2)1.62;IF (NY-8)1.70,1.70,1.65?MK8CAT !,"NOT CORRECT"?MK>CBG 1.62?ML"CFA !"COLUMNS : ",NX;IF (NX-2)1.70;IF (NX-8)1.75,1.75;D 1.65;G 1.70?ML9CKIF (NX*NY/2-FITR(NX*NY/2))1.80,2.05,1.80?MM CPD 1.65;T !,"NUMBER OF CARDS SHOULD BE EVEN!!";G 1.62?MM+DES XP=200;S XO=-200;S YO=-330;S YP=70?MM?DJS SP=4;S GA=1;S SU=0;S NS=0;S WI=0?MNRDTF X=1,NX;F Y=1,NY;S A(Y*10+X)=0?MN!DYF X=1,NX;S ME(X)=0;S N=1?MN.D^DO 10;S A(Y*10+X)=N?MOGD(DO 2.30;S N=N+1;IF (N NX*NY/2)2.30,2.30,2.50?MOSD2F I=1,SP;S ME(I)=0?MO$D3S US=0;S MS=0;S BA=0;S MA=0?MO.FJS Z=FX(,6,,,,)?MO=FRS Z=FX(,288,XO,YO,XO,YO)?MPVFTF X=XO,(XP-XO)/NX,XP;S Z=FX(,289,X,YO,X,YP)?MP/FUF Y=YO,(YP-YO)/NY,YP;S Z=FX(,289,XO,Y,XP,Y)?MP=FYF X=1,NX;F Y=1,NY;D 11 MQNF^C F X=1,NX;F Y=1,NY;D 11.10?MQ)F C S Z=FDIS();T !;F I=1,SP;T ME(I),"=",A(ME(I))?MQ:F1S BA=0;D 1.15;T " GAME ",GA?MRLF2S Z=FX(,786,,,,);IF (-BA)3.60;?MRRF3G 3.50?MR FS Z=FX(,786,,,,);IF (-BA)3.65?MSIF?G 3.62?MSZGAS I2=Y*10+X;I (-A(I2))3.70;?MS GBD 3.80;S BA=0;G 3.62?MS6GFIF (I2-I1)3.72,3.66,3.72?MTHGHIF (A(I2)-A(I1))5.15,4.10,5.15?MTWGPS Z=FDIS();T "ILLEGAL";R?MT HJS US=US+1?MT5HOS Z=FDIS();T !," YOU: ",US," ME: ",MS;?MUGHTD 12;S A(I1)=0;S A(I2)=0;D 13?MU[H^IF (US+MS-(NX*NY/2))3.49,6.10,6.10?MU+JOF I=1,SP-1;S ME(I)=ME(I+1)?MU4JPS ME(SP)=I1;?MVJQD 5.15;S ME(SP)=I2?MVIJRS MY=0;S I=0?MV JSS I=I+1;S J=I+1;I (A(ME(I)))5.23,5.23?MV1JTI (ME(I)-ME(J))5.21,5.22,5.21?MWFJUIF (A(ME(I))-A(ME(J)))5.22,5.28,5.22?MWZJVIF (SP-J)5.23,5.23;S J=J+1;G 5.20?MW*JWIF (I-SP+1)5.19,5.70,5.70?MW8J\S I1=ME(I);S I2=ME(J)?MXNJ(F N=1,10;S I=I1;D 11.20;S I=I2;D 11. 0?MXTJ)D 4.20?MX J-S MS=MS+1;D 4.15?MX8J2IF (-US-MS+(NX*NY/2))6.10,6.10;S MY=0;G 5.18?MYCKFD 10.10;D 10.30?MYYKGS I2=Y*10+X;IF (-A(I2))5.76,5.72,5.76?MY:KHS X=X+1;IF (X-NX)5.71,5.71;S X=1;S Y=Y+1;IF (Y-NY)5.71,5.71;?MZCKIS Y=1;G 5.71?MZIKLS I=0?MZ^KMS I=I+1;IF (ME(I)-I2)5 78,5.72,5.78?MZ+KNIF (I-SP)5.77;G 5.80?MZ:KOF N=1,10;S I=I2;D 11.20?M[\KPD 5.79;D 5.17;IF (MY)5.81,5.81;IF (A(I2)-A(I1))3.10,5.40,3.10?M[.KQS MY=MY+1;S I1=I2;S I=0;G 5.19?M\OLJS Z=FDIS();IF (US-MS)6.20,6.25;T !"YOU WIN";S SP=SP+1;G 6.30?M\$LTS WI=1;T !,"I WIN";S SP=SP-1;G 6.30?M\3LYT !,"GAME ENDS IN A TIE"?M]AL^D 4.15;IF (WI-1)6.40;?M]$LS SU=SU+SP;S NS=NS+1;T !,"YOUR MEMORY-SPAN IS APPR.",%2.01,SU/NS?M^DL(S GA=GA+1;T !,"MY MEMORY-SPAN FOR NEXT GAME IS ",%2.00,SP?M^\L2T !,"ALL OVER AGAIN (0) OR NEXT GAME (1)"?M^5L3A !,"TYPE 0 OR 1 : ",I;IF (I)6.50,1.60,2.20?M FTJS X=FITR(NX*(2*FRAN()-1)+1)?M WTYIF (NY-1-ME(X))10.10,10.40;?M (T^S Y=FITR(NY*(2*FRAN()-1)+1)?M GT(IF (A(Y*10+X))10.50,10.50;S Y=Y+1;IF (Y-NY)10.40,10.40;?M QT*S Y=1;G 10.40?M ]T2S ME(X)=ME(X)+1;R?M .VDIF (A(Y*10+X))11.05,11.05;R?M >VED 11.80;D 11.81;D 11.06;R?M!NVFS Z=FX(,289,X0,Y0,XX,YY);R?M!*VJD 11.80;S Z=FDIS(2,X -20,Y0+10);T %2.00,A(Y*10+X)?M!>VTS Y=FITR(I/10);S X=I-10*Y;D 11.10?M"^WPS X0=(((X-1)/NX)*(XP-XO))+XO;S Y0=(((Y-1)/NY)*(YP-YO))+YO?M":WQS XX=((X/NX)*(XP-XO))+XO;S YY=((Y/NY)*(YP-YO))+YO?MNWZS X=FITR((((X-XO)/(XP-XO))*NX)+1)?M"W[S Y=FITR((((Y-YO)/(YP-YO))* Y)+1)?M(XJS I=0?M>XTS I=I+1;IF (ME(I)-I1)12.26,12.25,12.26?M$JXYS ME(I)=0;G 12.30?M$\XZIF (ME(I)-I2)12.30,12.25,12.30?M$ X^IF (I-SP)12.20;R?M$:ZJS I=I1;D 13.50;S I=I2;D 13.50;R?M%OZ2S Y=FITR(I/10);S X=I-10*Y;D 11.05;R?M>ES X=FX(,X);D 11.90;S Y=FX(,Y);D 11 91;S BA=1;D 11.10;R?M?>?>?>?>?>?>?>?>?>?>?>?>?>?>?>?>?>?>?>04^D.C.H4&5DZUJVZ4R4N4<(.E8!R4JU> *IN4ZE.EBJ3CAQ!%WEG CAGAGFT WTQ!A A!G $DG A!QWDT\$! GA!$TDVRE%CDV$D3P%UECS QWGA!FWUU%TSSIQQ ?%3 .C 0?CQ=8CA8?]).C)8,C)0>CA>*C 0*AI.8,D5C1:0C8CS8= %:>B30(AI(8A0E0A I *8K0> *SO1BU[2K19H>P*Q;$[0 *?S7K6[1O1[2S1K1C:K6[1K22C.0B2B /BH.??0+)0ASHKG[1[0K4[3/B[;[<[= ([^0B8A IB+,0AK^[H[7B2C/T4K2C +WV2C/.O->G>N4=4?2GFD(+V/MEJ<8^8"8 ;T \K[ ^KZ ]/&8O+?K 2A +]K8[9K;[:K< :S:S9+02I/78H?;DBWU2C/?[(04=/=.C?Y?[KJ^AKK03X&BX&BKKCF<(*0CI>(+CKKCG> KHKJZCJE?*20BJEJC=H*2ZCKK069H8T[K[MJE[NO* KK&B:K-03:0AJ^A +&BKB +&BK-&B2C.F JE8!*\AXHDNAAZD!?8??KL[MSM+RSN+P02/O6O2C \/XZ)8 K][/K- + /S/K. + /O/S/ //,=Q8XLL K52A 62I/7V>38H[+05K82A 62I/70!=<&KNJJI?H.NJ",.= :P:?9?4&JN06:J"Z!JM2J!Z!JL2J Z JI*GB>2>H>H>HA:AG?D:<:Q8HB(9DJ*ZNB 9DZ$J$9DJ$J+Z%N9HZ$RNZZ&J 2J Z J&8!Z&R&R%J<(.,9DZ *DN/Z.A!<;CAQ!%WEG CAGAGFT WTQ!A A!G $DG A!QWDT\$! GA!$TDVRE%CDV$D=P%UECS QWGA!FWUU%TSSIQQ ?%3 .C 0?CQ=8CA8?]).C)8,C)0>CA>*C 0*AI.8,D5C1:0C8CS8=C%:>B30(AI(8A0E A I"337 N=70^ FX0AAT0AJB*D?(D0L FX DL F0 B$>AYG4AD.>BOL-C 84BC4>\\>CA=0B8/C 8BU5 C?8HBP5=BO7^BS79BT70BV5(6=02;Z[ K([)K 9H[ K)(+2[7/.A8[.0A 82C/9 =T,C,CVCDKA4J&HD+>&;J??M?!>!*HPX$ +?B8+?C?BP6CD7TCU5%-M??V>[0 BMKPE=CBNBGBCC BJBMA?B.?A>?0A?OB??>H->8XR8AYXVJVXKJU%)IZXHX2IZXW%*% ;D<%&*OB*A%&%&IZXOXP%%H]XK%0%1+2*9PV%,ITH5> %6H0XHX2H7%;%0 *0%5%.)?% FI%7<()?XRHR8A*ZDQ%0H6I >(+RX^ 9H C:H&> %6H %/8DX7%1%%%1+ +*H,9FH,8DH7X7%%%1%6+*H,H7X7%%%1+ 8PH7AF<0%6> K;8P8DX5/B.? PPLPHI0Z9M+WUWUWUWUWUWU<\LWUY&=^9F8F8F.K%,HR%"%O%5H5?H*3%-8HSXI%:%3%6% FF%$5%7<(*98AXXH5? *0%9%3*9%9X7*U%-%6% FH%$5%$OLKXR.>FIFSX98 HH9\K8 H.?EGHKXKHK9 HY>X%6/HB:OQX98 HKQ8A\K8 H,9O\: O\XIS\IOHIOX9LI\KP9+%IOH/\D;: O,S,XIIOX9LK\IP9+3/,W BJBOBWH=I WUH5FHFL<:%,%-%6HSXR%%H6IN>(-=%(K>*HH6=%"%%%(K> %+%%%)H6IN> *$%8<(*98AXXH5?%9%3*;%9X7* HS*+XV-!H5?(*9%)*4NN%0%(O7/H6SJB>(+O%1/ +TOQ8 HJX,(S$/$.&H^> +4%%/.%*% 7>\B/.H]FHFLCSCFCICDCGCCCACTCLCECWCMCQCRBJ%4& PK& IIXZH%=HPZ?(PZ %6% NJ$+03:LK0/P.*V% LCH6%"J-:P^8A%YL X6*B% NK%X*CPV%%% LCG;%)*[%%%,H7X**DH?$38AH?%)%%*DB:%,%-%6H0XHX2H7%;HHXW$4YPV%%%)% >J9%&*;H08AXHX2%*% 9J9%&+FF[<(H68!X9OLSLXJLJ=H+ H9> +THJOLX9L9X9,9SL;/L3= 0LK/X3K.X4: 0&/-W3[0V>+/:/,J;J8W KBJ9B1KJB%B"B!BB$B B,B;BM%4B"BM%6X2%&%%%(O7*VH6ARH1X1%%%(O7*V*Q%2* H1X.&0LKX1&/$+[OI\XXHX8!HY?(*1LX8!H1>(+EHXH8*!P NAHYHE9!HK>P%6HYH8XYH1\XPXKO\XPX$GE 4X-!HXXILI8!KO> *,PXPX-!B H6IL> /O%%+P=P=GY[MHB"H6IM> S[H6KVX,H,?H/[H6KW?(S[/[$GKX(3X[XX$-^8XRLKX9,9J!JZJ)J&X*J+J+FHFLO/H,%"H-%"H.%"JA%"%%X-%4*W+Z+% LG%4*$BJC?%6I XXIIH,<(* 8A>(+SH,IQ?H+3%2 %$$$GDX5UIUXXHTH->(-!LKX-*-%2B,B;BMB=%TE%$$JY?H$)$G82XIUXX" .WNRH/0CO.H,IQ?.]H IP? R].]PVLKX-J\LK8!H,> %6%%. B70B%-.2PV%%H6IN> *7HO8 HSX/I[8!HS>()?2ILS\UI[X9L9<(+WXZHS9!HZ>XH/HZ\9HZ+I8 HSXIH/8 HSXJH/H0X0HH8 HJXZHHH/XHLJ\IPZ+(*3BP$4X6%(NS/-%)/-U[V(V^U5VXUOU:VTVUV,U=WBVAU7CX%4* *R*KH6IJ< %6I]X02I][2A)?%,H0XH%5PSH5?%8%3)?%8X7*UI\XY-!D5I[XUI[XSHSXIH79!%:<(*6>X*7HSXU%8< *&(%).HV> +VI>(8AY*=IH+ESLPP+%HQARX6H6IC>(+KH6K./X%!B82ILU\0H0\UH1< \HHH8AX02A/0/0J+FL2BG/G/2(AP?60Y* 0^AF<(*MIS.LW?H7%/AR""IB%)H7""K.X6%).UT^AFXZIKX[**P[XZHZJK=*(:H[%)HZIK%)."= <(H6IN<(*>H?$3.5H?$3H>*(+ZH9AR< ]2A/BIR]+TUXP2+/H1%;X19ISK9HH>P/]%6 C?A XD> %/X18 X2/]W82ILR2A/4H4S&2ILO2A/:R ==Z8HZA0!*U0"XNN5<(*U0$XN^5J58AAGJ Z50Y*&0^AF<(*&ISZ2J2JB>(+ H\> %6J2X\0I**0JX &+Z[2$JA9DJ0A,BMYPY[Y[BJH\=(*7Z>X\J>.6T=Z60AN4> +A0BHN> +LJ60&XN+SJ6^4J48AAGJ3Z40A.>[V: KVX70AHN> +[0B+"ISX7PNIEX/8 J3XH2A\HP/+)X\J3Z5J3Z4/2K$IA%)%+PR%7<(+?X7IA%)%)%+H?%)IVY*)?H2> *LHH8!HW?.!J)%)HHX92IP2*"L9ARIC> * 8 X28 HHXHL9AAX1.!UXL9AAHF> *X\9*YC\I\XXHY8!HX>(-!LX/NKMXOXP%%%)%%%)%%%)PXLX L%%%)PX$GDX%XH?%)H8IIHX*+T"C=:()L 6F6ED!% NK$+[KC 2K !KC%>(+(.J-^ZLZKCXCY=*?4Y7JYJZ2K&HZ)% NJJ)9DX%JXX$-^J LV,R[0)Z 0*09.[0:2IV(2A.[A=77[:% NJ$+2K.)J > -!R IDX7X5.8DQKQ[P$+<(+(=H+T"% NJ$+"$+"% NJ$+"$+"KSX3-^88^V>[+8!"JZ03:$4["K!03:K"++VDA[M2I P2ASP/"KRX3-^T=2K //+=9Q/ >K?=+;JX?H+;OR++1:OR/0V6=&29UJAZA2K&X6.AQ[03T$+9H JIJJX4-^%%%0%(O7*$R\H62K.\ZG"NYDPNXDPXPHYXOH YOI+XYPGQ SPCPGAAPSUNSWIXBXYCTAKEXAUC\A BXA)DPA3DVA=EPAAGESAAQETALEQAVEUA EYA*A4CPA>DRAAHDXAARDZAMD\AWERA!EVA+EXA5BPA?CTAAICXAASDTAND^AXESA"EWA,EZA6E[AABXAAJC\AATDVAODPAYEPAETA-EYA7EZAAAE\AAKDXAAUCPAPCTAZDZA$EQA.E[A8E^AABE AALFPAAVEUAQA[CXA%DRA/D\A9EVAACE\AAME]AAWE ARFPA\BPA&DTA0D^A:ERAADEWAANE]AAXE^MEAFU NBXMEBF[MECMEDMEEDPMEFDPMEGDPMEHDPIFZ USMSAPBAAPMAX0G Y0H/0I1FUI2FZ MYJCPAXXHR0YYI. ?*&K( *K) ++G;,K7>(*5;$K6>(+JI 4JJ 3+KW1+L0&00000000P/0!*6H/IX?H+ITXTXTXTXTXTXTX0&0A% DQ0BK09<(+$?HK6IPX/K,XIK-\IP/+[K09?HIDK.K/X]/ RL3K3GI+I.DAWUE0&OXFV1PD3RV,GB B$2%!X1% L PXLX/9RDH,CRDNRZ-FH,CLB;H%?H TX[$GK6=$+[U$G86>F=V>6=&=6>KH3VCE[VV=J?3VCB&>KV3VF=[VQKNKUH$X$P[-^$G6=CN^=-^+R+VDS:LB?K63VC3&>K0&>K-&=[V/,(TT N??[D$\?;[F,,T N&TWSS?=\W8*L;H%?H3X[$G6]V H%?H*Q$GF ^]6]: [2.S ZS2.\$G6]F^V].\+B+R+N NH%<(%6?H$)$G7.V H%<(-^?*4$GF .7.: X[HEX$8 O.X%X&X 8A .$G/6]G.V 7.+K( .K% .K" .K .K\ .KY .KV .N].\ ??"?? !??UOCG?>!K:I?>U][A?= &G9?(+.K]H[= +-K[=:8!H[8!XZH[HZ>(+HZ8A?HIE^PZ+CIB%)+C8 K^[^**E?:G?61(1,?:-L ZS]/^.8 H[X[S\++8 [\+KLL+K: ZIB%)RLL^S\+28 [\+3; H%X(H%?H$)/92HX&X$X%X [LX(H6J4<(*PII> *Q8 X(&6H6J5>(*P"W..VH6J2>(.W%1.W* H,[K"7SL> %6&6*XH6IJ?H.WH6J3? .WH6AR* <;<&=U= G.."H XH&X"H%X![JMM[MKKXX"X![KJ.7BA;,H 9DX H&8DX&H%8DX%KJ8D[J/M/H;H HX 8DH&H"X&8DH%H!X%8DKJ[J/[5J;H!=H9P8HX!H"8HX"H8HXP /,/,&*SDE]L;JYK] H%?K\K^%) +X[H$=H*W< K!?(*\$G $8AH[*I$G *8 *U % &K(XLH$9 [,KX$%WS,*%O&<(*8K"?H*48A\LP$K"P[8O&P[8\A$?=RB = YO > FH6IL>(*B BH6IM> *Q F E COE8!X[KHX$ D G$G4XH6KA> *& F B DH H[X[$GDXH[<(.?*1$G"=4X8A*6$G"94X8 H[X[*&DT?=Y&Y Y(<;..W9;/LG.;]H\W.=WSO>P/"PK-!BJ32K=8 [=;X K=< 8> K?IVY*//3FI8 X 0NAF<(+RISX6/Q%/!$2W;X XN<(.Z2J2AS>(*NIDBX IFB2H X J3B2>(*YL X R8 H XMJ29F8FAG<(*7J4Z2N2<(*5Z2KDXLIOX/LM\LP/*-.24XD5;KC*;KCXM8 H XLIOX/LL\MP/*>*A 5 8*A : 9 ; 7*AH%> +UX$X%X&X *A%$% %$$$+=H+"8 Z2XH%> %6%TE%$$%$<8+0%<8%$ 6R2++*A 6*A9+8D;]6S/,7//[5F5E9G535M5K9?;H 8!X H&8 (+IH!<(H"<(H>(.SH 8!H$<(*;ZCJC=8![RKRK^?H*=JC?*5/SR*1*;8 H X SSR*8RS.SH ?+DH$?.S+FH$?JC? .SH X$H!X%H"X HX .S/,I1 )H$?(++8AXK(X "SWP +$P&H% )H! *BH" *CH& )H! *CH" *D*3Z(%6H 8!8AT?+ (A/S4A8HH$X$IT%H!?8 X(H%<(/&?H$)H!<(/&/T5P;]:1:.:5F;H8!XH"8 (+3H%9D?H+0%W9 H$X$+ >6/]X$/]7/;2H%=H8!?H 5/6-99;AH$G2>(*5$GB *1H%8!J9> *1H&8!J:=8!8A?-^$G28*WX$-^XMAP=CI[WH0WHYWH]W+N%%%)H6 N> +LHN> +R2J//=KXZHZ8F8F(%/8D(8J8H((:H?%)/W=$C.IK%)HZ/(GAPR,2ILI2A/0U"2I\H2A/52I >2A/?DX3 Note: Lines longer than 256 characters were wrapped