ü| ¹ Mad Tiles¹ By Paul Kennedy¹ July 1989(› ¼› ,› î› Ì2¹ Main Game Loop5<áìÿu� áì"" â › Xœ <’ ëìÿ(á);F™ øì ã � guesó(ø)ì â bììø ’ « ø�P� (ëì ÷ bìë) û (ëì ÷ bìî) û (ëì ÷ bìï ÷ bìï ÷ bì ï) û (ëì ÷ bìï ÷ bìï ÷ bìï) â Z ’ 2FZ� ëì â guesó(bì)ìguesó(bìò)guesó(bìò)ìFd� ëì â guesó(bì)ìguesó(bìñ)guesó(bìñ)ìEn� ëì â guesó(bì)ìguesó(bìò)guesó(bìò)ìEx� ëì â guesó(bì)ìguesó(bìñ)guesó(bìñ)ì‚bâìbì;Œ™ øì ã � guesó(ø)ì â bììø ’ « øŽ–xøìxð(bì)yùìyð(bì)³ Þaô(xø,yù);" ";³ Þaô(xø,yùñ);" ";³ Þaô(xø,yùñ);" ";* xøìxð(bâ)yùìyð(bâ)@ª� guesó(bâ)ìcorrecô(bâ) â adäì’ adä쇴ãì™ ypïìyù ã yùñ™ xpïìxø ã xøñ³ Þaô(xpï,ypï);ÿ(Èñadäñã);ãìãñ« xpï« ypïW¾moveóìmoveóñíìÿ"(moveó)³ Þaô(Eòÿ(í), );ÿ|(í,ÿ(í)ò)TÈrighôì™ øì ã � correcô(ø)ìguesó(ø) â righôìrighôñÒ« ø� righôî â 2JÜl±ì"Puzzle Solved - Well Done!"l²ì"Press A Key For Another Go"æ³ ÿ()ñ"p"Cð™ øì ã ÿ(l±)³ Þaô(Eòø,);ÿx(l±,ø)« øú™ äì ã è« ä>™ øì ã ÿ(l²)³ Þaô(+,);ÿ|(l²,ø)« ø³ ÿ()ñ"q"!áìÿu� áì"" â  ’  "œ 2,¹ Initialise 6Š a-z@³ ÿ()ñ"f"4J� correcô (),guesó (),xð(),yð()Tmoveóìtimåì2^™ øì ã ¸ xð(ø),yð(ø)« ø<h‡ 11,10,18,10,25,10,11,14,18,14,25,14,11,18,18,18,25,18ráìÿ(ø{�)· á%|òìÿ(ÿ}ó)ñguesó()ìò†™ øì ã �òìÿ(ÿ}ó)ñ7š™ ãì ã � òìguesó(ã) â � ’ « ã¤guesó(ø)ìò ®« ø.¸™ øì ã correcô(ø)ìø« øÂÀ̹ Set Up Screen Ö³ clóÿàøìyðìwäìRdîìsoräì› Šxðìyðìwäì dîìsoräì› Šxðì yðìwäìdîì soräì› Šxðì&yðì wäì dîìsoräì› Šxðì+yðì wäìdîìsoräì› Šjêxðì8yðì wäìdîìsoräì› Šxðì8yðìwäìdîìsoräì› Š¨ô³ Þaô(,);"MAD TILES"³ Þaô(',);"KEYS"³ Þaô(,,);ÿ(ì);ÿ(í);ÿ(î);³ Þaô(,,);ÿ(ï);ÿ(ð);ÿ(ñ)³ Þaô(,,);ÿ(ò);ÿ(ó);ÿ(ô);?þ³ Þaô(9, );"MOVES: 0000"³ Þaô(:,);"TIME: 0000",³ Þaô( , );ÿ(‚);ÿ(,š);ÿ(ˆ),³ Þaô( ,);ÿ(‚);ÿ(,š);ÿ(ˆ)�äìÿ(„)ñÿ(,•)ñÿ(Ÿ)ñÿ(,•)ñÿ(Ÿ)ñÿ(,•)ñÿ(�)™ øì ã  ³ Þaô(,øñ);©(ä,ø,);³ Þaô(,øñ);©(ä,ø,);« ø´&™ øì ã � guesó(ø)ì â ³ Þaô(xð(ø),yð(ø));" ";³ Þaô(xð(ø),yð(ø)ñ);" ";³ Þaô(xð(ø),yð(ø)ñ);" ";œ D>0� guesó(ø)ìcorrecô(ø) â adäì’ adäìŸ:ãì™ ypïìyð(ø) ã yð(ø)ñ™ xpïìxð(ø) ã xð(ø)ñ³ Þaô(xpï,ypï);ÿ(Èñadäñã);ãìãñ« xpï« ypï D« øNÀX¹ Update Time;b� oôïÿ (ø{�) â timåìtimåñoôìÿ(ø{�)Nlôìÿ"(timå)ôìÿ|(ô,(ÿ(ô)ò))³ Þaô(Dòÿ(ô),);ôvÀ€Äй Draw Box Subroutinew”³ Þaô(xð,yð);ÿ(†ñ(soräó));™ øì ã wäò³ ÿ(Šñ(soräó));« ø³ ÿ(Œñ(soräó));…ž™ øì ã dîò³ Þaô(xð,yðñø);ÿ(…ñ(soräó));³ Þaô(xðñwäò,yðñø);ÿ(…ñ(soräó))« ø¨³ Þaô(xð,yðñdîò);ÿ(ƒñ(soräó));™ øì ã wäò³ ÿ(Šñ(soräó));« ø³ ÿ(‰ñ(soräó));²À¼¹!Æclóìÿ()ñ"E"ñÿ()ñ"H";Ј Þaô(ø,ù)ìÿ()ñ"Y"ñÿ(ùñ )ñÿ(øñ )uÚˆ Þwindo÷(coì,ro÷,widå,higè)ìÿ()ñ"X"ñÿ(ro÷ñ )ñÿ(coìñ )ñÿ(higèñ)ñÿ(widåñ)äÀî¹ Design Characters ø½  >Ï þ¿ ™ heøìpÀ ã ˜À¸ pë² heø,pë« heøO ‡ 243,62,129,211,241,62,130,211,242,175,95,103,22,184,58,153,192,111,41,41O‡ 41,25,17,154,192,235,1,8,0,237,176,62,133,211,241,62,134,211,242,251,201$ ™ chaòìÈ ã ô² ™À,chaòQ*™ ro÷ì ã ¸ binarù(ro÷)² ™Àñro÷,(binarù(ro÷))« ro÷ 4c±ìpÀ� c±« chaò$>‡ 253,205,205,253,205,205,205,0$H‡ 253,173,173,173,140,140,141,0"R‡ 251,128,128,248,24,24,248,1%\‡ 239,204,204,207,205,204,204,85%f‡ 223,217,217,223,153,217,217,64$p‡ 190,179,179,179,179,179,190,0z‡ 0,255,48,48,48,48,48,63„‡ 0,248,28,12,12,12,28,249 އ 2,31,58,53,58,117,186,117#˜‡ 170,253,174,92,168,80,160,64 ¢‡ 128,241,49,49,49,49,49,49$¬‡ 0,143,140,140,140,140,140,140¶‡ 48,48,48,48,48,48,48,253À‡ 2,5,10,21,42,85,170,85%ʇ 186,117,186,116,184,112,184,95Ô‡ 128,0,0,0,0,12,12,252Þ‡ 49,49,49,49,49,49,57,31&è‡ 140,140,140,140,140,140,156,248ò¹ 8000 Plus ü‡ 255,0,31,96,96,96,31,96$‡ 255,0,129,102,102,102,134,102‡ 255,0,248,6,6,6,6,6‡ 255,0,31,96,96,96,96,96$$‡ 255,0,129,102,102,102,102,102.‡ 255,0,248,6,6,6,6,68‡ 96,96,31,0,0,127,96,96"B‡ 102,102,129,0,0,230,102,102L‡ 6,6,248,0,0,0,0,0V‡ 96,96,31,0,0,96,96,96"`‡ 102,102,129,0,0,103,102,102j‡ 6,6,248,0,0,254,0,0t‡ 96,127,96,96,96,96,0,255~‡ 102,230,6,6,6,7,0,255ˆ‡ 0,0,0,0,0,254,0,255’‡ 96,96,96,96,96,127,0,255!œ‡ 102,103,96,96,96,231,0,255¦‡ 0,254,6,6,6,254,0,255 °¹ Arrowsº‡ 0,0,0,0,1,3,0,14!ć 24,60,102,195,255,255,16,8· 0,0,0,0,128,192,0,112"؇ 30,62,118,198,199,118,62,30⇠16,8,16,170,85,8,16,8%ì‡ 120,124,110,227,99,110,124,120ö‡ 14,0,3,1,0,0,0,0!‡ 16,8,255,255,195,102,60,24 ‡ 112,0,192,128,0,0,0,0Àì‡ 120,124,110,227,99,110,124,120ö‡ 14,0,3,1,0,0,0,0!‡ 16,8,255,255,195,102,60,24 ‡ 112,0,192,128,0,0,0,0À