'd— 53272,23:—53280,1:—53281,1:‰150lnPHARAOH'S NEEDLES BY R‘ WAGNER 64 MODS 3­30­82 BY WIM�x««««««««««««««««««««««««««««®‚FROM 'PUBLIC DOMAIN',MSE,SVPÏŒ««««««««««««««««««««««««««««Ý–� K²1 ¤ 5è D(K)²0𪂠K ´P(1)²1470:P(2)²1483:P(3)²1496C ¾C$²" "j È™"“� ÐÈÁÒÁÏÈ'Ó ÎÅÅÄÌÅÓ"˜ Ò™" ÔÈÅ ÇÁÍÅ ÏÆ ËÉÎÇÓ ÉÓ ÕÐÏΠÙÏÕ."Ç Ü™"É ×ÉÌÌ ÓÅÔ ÕÐ  ÔÈÒÅÅ  ÎÅÅÄÌÅÓ  ×ÉÔÈ ÔÈÅ"ö æ™"ÎÕÍÂÅÒ ÏÆ ÄÉÓËÓ ÔÈÁÔ ÙÏÕ ÒÅÑÕÅÓÔ ÏÎ"% ð™"ÎÅÅÄÌÅ #1. ÙÏÕ ÁÒÅ ÒÅÑÕÉÒÅÄ ÔÏ ÍÏÖÅ ÔÈÅ"T ú™"ÄÉÓËÓ ÏÎÅ ÁÔ Á ÔÉÍÅ ÔÏ ÔÈÅ ÔÈÉÒÄ ÎÅÅÄÌÅ"ƒ ™"ÙÏÕ ×ÉÌÌ ÎÏÔ ÂÅ ÁÌÌÏ×ÅÄ ÔÏ ÐÕÔ Á ÌÁÒÇÅÒ"² ™"ÄÉÓË ÏΠÁ ÓÍÁÌÌÅÒ ÏÎÅ.ÔÏ ÍÏÖÅ ÔÈÅ ÄÉÓËÓ"á ™"ÆÉÒÓÔ ÐÒÅÓÓ ÔÈÅ ÎÅÅÄÌÅ # ÆÒÏÍ ×ÈÉÃÈ ÔÈÅ" "™"ÄÉÓË ×ÉÌÌ ÍÏÖÅ, ÔÈÅΠÐÒÅÓÓ ÔÈÅ ÎÅÅÄÌÅ #"; ,™"ÔÏ ×ÈÉÃÈ ÙÏÕ ×ÁÎÔ ÔÈÅ ÄÉÓË ÔÏ ÍÏÖÅ."j 6™" É ×ÉÌÌ ÔÈÅÎ ÍÏÖÅ ÔÈÅ ÔÏРÄÉÓË ÏÖÅÒ ÔÏ"‡ @™"ÔÈÅ ÒÅÑÕÅÓÔÅÄ ÎÅÅÄÌÅ."¶ J™" ÔÏ ÃÌÅÁÒ Á ×ÒÏÎÇ ÆÉÒÓÔ ÍÏÖÅ ÅÎÔÅÒ # 0"æ T™"ÈÏ× ÍÁÎÙ ÄÉÓËÓ ×ÉÌÌ ÙÏÕ ÒÅÑÕÉÒÅ (1-9)?";ÿ ^¡ ND$:‹ ND$²"" ‰ 350 hND²Å(ND$)% r‹ ND³1 ° ND±9 ‰ 350: |™ ND:MO²(2®ND)«1T †‹ ND±6 § ™"×ÁÒÎÉÎÇ,";z �™ND;" ÄÉÓËÓ ×ÉÌÌ ÔÁËÅ"MO;"ÍÏÖÅÓ!"– š™"ÆÏÒ Á ÐÅÒÆÅÃÔ ÇÁÍÅ."« ¤� K²1 ¤ 3000:‚ K¿ ®™"“";:—53272,21æ ¸™" –PHARAOH'S NEEDLES�" ™"ž Σ££Í"£33)"Σ££Í" Ì™" Î ÀÝÀ Í"£32)"Î ÀÝÀ Í"T Ö™"Î ½ Í �";ND;" DISKS žÎ ­ Í";… à™"£Ð - Ï£ £Ð - Ï£�"¤ ꙣ10)"YOUR MOVE NUMBER";MN± ô™""; þ� K²1 ¤ NDª1Þ ™£6)"�¦"£19)"¦"£32)"¦�"æ ‚ K™"� ’";S&™" �1� �2� �3� ’";‡0™" ’�";š:™"‘‘‘‘";ÒD‘ ND ‰ 1230,1220,1210,1200,1190,1180,1170,1160,1150àND(4)²D(1)X™"MOVE FROM NEEDLE ? "; b¡ NF$:‹ NF$²"" § ‰ 610.lNF²Å(NF$)Hv‹ NF³1 ° NF±3 § ‰ 610^€‹ D(NF)²0 § ‰ 610zŠ™ NF;" TO NEEDLE ? ";•”¡ TN$:‹ TN$²"" § ‰ 660£žTN²Å(TN$)·¨‹ TN²0 § ‰ 1080Ѳ‹ TN³1 ° TN±3 § ‰ 660漋 TN²NF § ‰ 1080üÆ‹ D(TN)²0 § ‰ 750Ћ D(NF)³D(TN) § ‰ 660Ú�.ä� K²1 ¤ 2:‚ K8î™ TN;DøP²P(NF)MDD²1h ™"";‡‹ NF±1 § ™"";¦ ‹ NF±2 § ™"";Ò*‹ Â(P)²102 § P²Pª40:™"";:DD²DDª1:‰ 810â4DM²Â(P)«176ñ>� K²1 ¤ DD)H‘ DM � 1250,1340,1430,1520,1610,1730,1850,1970,21001R‚ KC\LR²(TN«NF)¬13Vf‹ LR³0 § ‰ 920ep� K²1 ¤ LR�z‘ DM � 1300,1390,1480,1570,1690,1810,1930,2050,2180¥„‚ K¯Ž‰ 960¼˜LR²¶(LR)Ë¢� K²1 ¤ LR¬‘ DM � 1320,1410,1500,1590,1710,1830,1950,2080,2210 ¶‚ KÀP²P(TN)OÊ‘ DM � 1280,1370,1460,1550,1660,1780,1900,2020,2150kÔ‹ Â(Pª40)³±102 § ‰ 1020£Þ‘ DM � 1270,1360,1450,1540,1640,1760,1880,2000,2130®èP²Pª40¸ò‰ 980ÏüDN²µ(DM¬10®(9«DM))åD(TN)²µ(D(TN)ªDN)ûD(NF)²µ(D(NF)«DN)MN²MNª1'$‹ µ(D(3))² µ(D(4)) § ‰ 1100S.™"";MNl8™"";C$;"‘";vB‰ 600�L™"";C$;"‘";ÁV™ ND;" DISKS MOVED IN ONLY ";MN;"MOVES !"Ö`¡R$:‹ R$²""‰1120ÜjŠøt� DRAW INITAL DISK PILE*~™"������¼¢¢¢¢¢9¢¢¢¢¢’¾�������‘";:D(1)²D(1)ª9Yˆ™"�����¢¢¢¢¢8¢¢¢¢¢’������‘";:D(1)²D(1)ª80‰’™"�����¼¢¢¢¢7¢¢¢¢’¾������‘";:D(1)²D(1)ª700¶œ™"����¢¢¢¢6¢¢¢¢’�����‘";:D(1)²D(1)ª6000䦙"����¼¢¢¢5¢¢¢’¾�����‘";:D(1)²D(1)ª50000°™"���¢¢¢4¢¢¢’����‘";:D(1)²D(1)ª400000;º™"���¼¢¢3¢¢’¾����‘";:D(1)²D(1)ª3000000bÄ™"��¢¢2¢¢’���‘";:D(1)²D(1)ª2¬10®7ŠÎ™"��¼¢1¢’¾":D(1)²D(1)ª1¬10®8:‰ 590•Ø� 1 UPÅâ™"��‘¬¢ ’¢»����� ¦ ‘�����¼¢1¢’¾���";:ŽÒì� 1 DOWNö™"��¬¢ ’¢»�����¼¢1¢’¾‘����� ¦ ���";:Ž2™"��¬¢ ’¢»�����¼¢1¢’¾‘����� ���";:Ž@ � 1 RIGHTh™"¢’����� ¢1¢¢’¾�����¼¢1’�";:Žu� 1 LEFT™(™"��¢¢1¢’ ������¼¢1¢’¾���";:ޤ2� 2 UPÔ<™"��‘¢¢ ’¢¢����� ¦ ‘�����¢¢2¢¢’���";:ŽáF� 2 DOWNP™"��¢¢ ’¢¢�����¢¢2¢¢’‘����� ¦ ���";:ŽAZ™"��¢¢ ’¢¢�����¢¢2¢¢’‘����� ���";:ŽOd� 2 RIGHT}n™"¾������¼¢¢������’ ¢¢2¢¢’���";:ŽŠx� 2 LEFT²‚™"���¼¢¢2¢’¾������¢¢2¢¢’ ����";:޽Œ� 3 UPù–™"���‘¬¢¢ ’¢¢»������� ¦ ‘�������¼¢¢3¢¢’¾����";:Ž � 3 DOWNBª™"���¬¢¢ ’¢¢»�������¼¢¢3¢¢’¾‘������� ¦ ����";:Ž~´™"���¬¢¢ ’¢¢»�������¼¢¢3¢¢’¾‘������� ����";:ŽŒ¾� 3 RIGHT¾È™"¢’������� ¢¢3¢¢¢’¾�������¼¢¢3¢’��";:ŽËÒ� 3 LEFT÷Ü™"���¢¢¢3¢¢’ ��������¼¢¢3¢¢’¾����";:Žæ� 4 UP>ð™"���‘¢¢¢ ’¢¢¢������� ¦ ‘�������¢¢¢4¢¢¢’����";:ŽKú� 4 DOWN‡™"���¢¢¢ ’¢¢¢�������¢¢¢4¢¢¢’‘������� ¦ ����";:ŽÃ™"���¢¢¢ ’¢¢¢�������¢¢¢4¢¢¢’‘������� ����";:ŽÑ� 4 RIGHT "™"¾��������¼¢¢¢¢��������’ ¢¢¢4¢¢¢’����";:Ž,� 4 LEFTF6™"����¼¢¢¢4¢¢’¾��������¢¢¢4¢¢¢’ �����";:ŽQ@� 5 UP—J™"����‘¬¢¢¢ ’¢¢¢»��������� ¦ ‘���������¼¢¢¢5¢¢¢’¾�����";�TŽª^� 5 DOWNðh™"����¬¢¢¢ ’¢¢¢»���������¼¢¢¢5¢¢¢’¾‘��������� ¦ �����";örŽ<|™"����¬¢¢¢ ’¢¢¢»���������¼¢¢¢5¢¢¢’¾‘��������� �����";B†ŽP�� 5 RIGHTŒš™"¢’��������� ¢¢¢5¢¢¢¢’¾���������¼¢¢¢5¢¢’���";:Ž™¤� 5 LEFTÍ®™"����¢¢¢¢5¢¢¢’ ����������¼¢¢¢5¢¢¢’¾�����";:ŽØ¸� 6 UP™"����‘¢¢¢¢ ’¢¢¢¢��������� ¦ ‘���������¢¢¢¢6¢¢¢¢’�����";$ÌŽ1Ö� 6 DOWNwà™"����¢¢¢¢ ’¢¢¢¢���������¢¢¢¢6¢¢¢¢’‘��������� ¦ �����";}êŽÃô™"����¢¢¢¢ ’¢¢¢¢���������¢¢¢¢6¢¢¢¢’‘��������� �����";ÉþŽ×� 6 RIGHT™"¾����������¼¢¢¢¢¢¢����������’ ¢¢¢¢6¢¢¢¢’�����";:Ž&� 6 LEFT^&™"�����¼¢¢¢¢6¢¢¢’¾����������¢¢¢¢6¢¢¢¢’ ������";:Ži0� 7 UP¨:™"�����‘¬¢¢¢¢ ’¢¢¢¢»����������� ¦ ‘�����������";ÆD™"¼¢¢¢¢7¢¢¢¢’¾������";:ŽÓN� 7 DOWNX™"�����¬¢¢¢¢ ’¢¢¢¢»�����������¼¢¢¢¢7¢¢¢¢’¾‘�����������";0b™" ¦ ������";:Žpl™"�����¬¢¢¢¢ ’¢¢¢¢»�����������¼¢¢¢¢7¢¢¢¢’¾‘�����������";�v™" ������";:Ž›€� 7 RIGHTߊ™"¢’����������� ¢¢¢¢7¢¢¢¢¢’¾�����������¼¢¢¢¢7¢¢’���";:Žì”� 7 LEFT(ž™"�����¢¢¢¢¢7¢¢¢¢’ ������������¼¢¢¢¢7¢¢¢¢’¾������";:Ž3¨� 8 UPr²™"�����‘¢¢¢¢¢ ’¢¢¢¢¢����������� ¦ ‘�����������";�¼™"¢¢¢¢¢8¢¢¢¢¢’������";:Ž�Æ� 8 DOWNÝЙ"�����¢¢¢¢¢ ’¢¢¢¢¢�����������¢¢¢¢¢8¢¢¢¢¢’‘�����������";úÚ™" ¦ ������";:Ž: ä™"�����¢¢¢¢¢ ’¢¢¢¢¢�����������¢¢¢¢¢8¢¢¢¢¢’‘�����������";W î™" ������";:Že ø� 8 RIGHT¯ ™"¾������������¼¢¢¢¢¢¢¢¢������������’ ¢¢¢¢¢8¢¢¢¢¢’������";µ ŽÂ � 8 LEFT! ™"������¼¢¢¢¢¢8¢¢¢¢’¾������������¢¢¢¢¢8¢¢¢¢¢’ �������";:Ž !*� 9 UPU!4™"������‘¬¢¢¢¢¢ ’¢¢¢¢¢»������������� ¦ ‘�������������";v!>™"¼¢¢¢¢¢9¢¢¢¢¢’¾�������";:Žƒ!H� 9 DOWNÌ!R™"������¬¢¢¢¢¢ ’¢¢¢¢¢»�������������¼¢¢¢¢¢9¢¢¢¢¢’¾‘�������������";ì!\™" ¦ �������";:Ž5"f™"������¬¢¢¢¢¢ ’¢¢¢¢¢»�������������¼¢¢¢¢¢9¢¢¢¢¢’¾‘�������������";U"p™" �������";:Žc"z� 9 RIGHT­"„™"¢’������������� ¢¢¢¢¢9¢¢¢¢¢¢’¾�������������¼¢¢¢¢¢7¢¢’���";³"ŽŽÀ"˜� 9 LEFT#¢™"������¢¢¢¢¢¢9¢¢¢¢¢’ ��������������¼¢¢¢¢¢9¢¢¢¢¢’¾�������";:Ž#¬¡R$:‹ R$²""‰2220#¶€Å