00000000: 01 04 24 04 64 00 8F 23 23 23 23 4F 4E 45 20 54 |..$.d..####ONE T|
00000010: 4F 20 4F 4E 45 23 23 23 23 23 23 23 23 23 23 23 |O ONE###########|
00000020: 23 23 23 23 00 2A 04 6E 00 3A 00 4D 04 78 00 8F |####.*.n.:.M.x..|
00000030: 22 4D 49 4B 45 20 4E 49 4B 4C 41 55 53 20 2D 20 |"MIKE NIKLAUS - |
00000040: 44 45 43 20 31 30 54 48 2C 31 39 37 38 00 53 04 |DEC 10TH,1978.S.|
00000050: 82 00 3A 00 74 04 8C 00 8F 22 32 35 20 4C 4F 4E |..:.t...."25 LON|
00000060: 47 44 4F 57 4E 20 52 44 2C 20 43 4F 4E 47 4C 45 |GDOWN RD, CONGLE|
00000070: 54 4F 4E 2C 00 7A 04 96 00 3A 00 99 04 A0 00 8F |TON,.z...:......|
00000080: 22 43 48 45 53 48 49 52 45 2C 20 43 57 31 32 20 |"CHESHIRE, CW12 |
00000090: 34 51 48 2C 20 55 2E 4B 2E 00 9F 04 AA 00 3A 00 |4QH, U.K......:.|
000000A0: BD 04 B4 00 8F 22 54 45 4C 45 50 48 4F 4E 45 3A |....."TELEPHONE:|
000000B0: 2D 20 30 32 36 20 30 32 20 35 31 34 37 00 E4 04 |- 026 02 5147...|
000000C0: BE 00 8F 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |..."............|
000000D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000000E0: C0 C0 C0 22 00 FD 04 C8 00 8F 22 C0 C0 50 52 45 |..."......"..PRE|
000000F0: 4C 49 4D 49 4E 41 52 49 45 53 C0 C0 C0 00 03 05 |LIMINARIES......|
00000100: D2 00 3A 00 18 05 DC 00 4C 24 B2 22 13 11 11 11 |..:.....L$."....|
00000110: 11 11 11 11 11 11 11 22 00 32 05 E6 00 43 24 B2 |.......".2...C$.|
00000120: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
00000130: 11 22 00 50 05 F0 00 45 24 B2 22 22 3A 81 49 B2 |.".P...E$."":.I.|
00000140: 31 A4 33 39 3A 45 24 B2 45 24 AA 22 20 22 3A 82 |1.39:E$.E$." ":.|
00000150: 00 60 05 FA 00 86 41 24 28 33 36 29 3A 43 B2 30 |.`....A$(36):C.0|
00000160: 00 69 05 04 01 99 22 93 22 00 76 05 0E 01 46 24 |.i....".".v...F$|
00000170: B2 22 4F 4E 45 22 00 9C 05 18 01 8F 22 C0 C0 C0 |."ONE"......"...|
00000180: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000190: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 B9 05 22 |..........."..."|
000001A0: 01 8F 22 C0 C0 52 45 41 44 20 54 41 52 47 45 54 |.."..READ TARGET|
000001B0: 20 57 4F 52 44 53 C0 C0 C0 00 BF 05 2C 01 3A 00 | WORDS......,.:.|
000001C0: CA 05 36 01 53 31 24 B2 46 24 00 E0 05 40 01 87 |..6.S1$.F$...@..|
000001D0: 46 24 3A 8B 46 24 B2 22 2A 22 A7 20 31 30 34 30 |F$:.F$."*". 1040|
000001E0: 00 EB 05 4A 01 53 24 B2 53 31 24 00 05 06 54 01 |...J.S$.S1$...T.|
000001F0: 99 22 93 46 49 4E 41 4C 20 57 4F 52 44 20 49 53 |.".FINAL WORD IS|
00000200: 20 12 22 46 24 00 2B 06 5E 01 8F 22 C0 C0 C0 C0 | ."F$.+.^.."....|
00000210: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000220: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 50 06 68 01 |..........".P.h.|
00000230: 8F 22 C0 44 49 53 50 20 26 20 53 54 4F 52 45 20 |.".DISP & STORE |
00000240: 57 4F 52 44 20 26 20 54 45 53 54 20 45 4E 44 C0 |WORD & TEST END.|
00000250: 00 56 06 72 01 3A 00 60 06 7C 01 99 4C 24 45 24 |.V.r.:.`.|..L$E$|
00000260: 00 6C 06 86 01 4C B2 C3 28 53 24 29 00 83 06 90 |.l...L..(S$)....|
00000270: 01 99 4C 24 A3 28 33 39 AB 4C 29 AD 32 29 22 12 |..L$.(39.L).2)".|
00000280: 22 53 24 00 90 06 9A 01 41 24 28 43 29 B2 53 24 |"S$.....A$(C).S$|
00000290: 00 9F 06 A4 01 8B 53 24 B2 46 24 A7 39 30 30 00 |......S$.F$.900.|
000002A0: A9 06 AE 01 8D 31 31 39 30 00 B3 06 B8 01 43 B2 |.....1190.....C.|
000002B0: 43 AA 31 00 D9 06 C2 01 8F 22 C0 C0 C0 C0 C0 C0 |C.1......"......|
000002C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000002D0: C0 C0 C0 C0 C0 C0 C0 C0 22 00 FD 06 CC 01 8F 22 |........"......"|
000002E0: C0 C0 44 49 53 50 20 4D 45 4E 55 20 26 20 41 57 |..DISP MENU & AW|
000002F0: 41 49 54 20 43 4F 4D 4D 41 4E 44 C0 C0 00 03 07 |AIT COMMAND.....|
00000300: D6 01 3A 00 0D 07 E0 01 8D 31 31 35 30 00 1C 07 |..:......1150...|
00000310: EA 01 99 43 24 22 31 2E 20 41 44 44 00 2C 07 F4 |...C$"1. ADD.,..|
00000320: 01 99 22 32 2E 20 52 45 4D 4F 56 45 00 3C 07 FE |.."2. REMOVE.<..|
00000330: 01 99 22 33 2E 20 43 48 41 4E 47 45 00 4D 07 08 |.."3. CHANGE.M..|
00000340: 02 99 22 34 2E 20 52 45 53 54 41 52 54 00 5C 07 |.."4. RESTART.\.|
00000350: 12 02 99 22 35 2E 20 51 55 49 54 22 00 79 07 1C |..."5. QUIT".y..|
00000360: 02 8D 31 31 30 30 3A 8B 41 24 B3 22 31 22 B0 41 |..1100:.A$."1".A|
00000370: 24 B1 22 35 22 A7 35 34 30 00 9D 07 26 02 41 B2 |$."5".540...&.A.|
00000380: C5 28 41 24 29 3A 91 41 89 35 38 30 2C 37 30 30 |.(A$):.A.580,700|
00000390: 2C 37 39 30 2C 35 35 30 2C 31 30 38 30 00 AA 07 |,790,550,1080...|
000003A0: 30 02 43 B2 30 3A 89 33 33 30 00 D0 07 3A 02 8F |0.C.0:.330...:..|
000003B0: 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............|
000003C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 |..............."|
000003D0: 00 EB 07 44 02 8F 22 C0 C0 41 44 44 20 41 20 43 |...D.."..ADD A C|
000003E0: 48 41 52 41 43 54 45 52 C0 C0 C0 00 F1 07 4E 02 |HARACTER......N.|
000003F0: 3A 00 FB 07 58 02 8D 31 31 35 30 00 25 08 62 02 |:...X..1150.%.b.|
00000400: 99 43 24 22 41 44 44 20 41 46 54 45 52 20 57 48 |.C$"ADD AFTER WH|
00000410: 49 43 48 20 4E 55 4D 42 45 52 20 43 48 41 52 41 |ICH NUMBER CHARA|
00000420: 43 54 45 52 3F 00 2F 08 6C 02 8D 31 31 30 30 00 |CTER?./.l..1100.|
00000430: 44 08 76 02 41 B2 C5 28 41 24 29 3A 8B 41 B1 4C |D.v.A..(A$):.A.L|
00000440: A7 36 32 30 00 59 08 80 02 8B 41 B2 30 AF 41 24 |.620.Y....A.0.A$|
00000450: B3 B1 22 30 22 A7 36 32 30 00 6C 08 8A 02 99 22 |.."0".620.l...."|
00000460: 57 48 41 54 20 4C 45 54 54 45 52 3F 00 76 08 94 |WHAT LETTER?.v..|
00000470: 02 8D 31 31 30 30 00 8D 08 9E 02 8B 41 B2 30 A7 |..1100......A.0.|
00000480: 53 24 B2 41 24 AA 53 24 3A 89 33 36 30 00 AE 08 |S$.A$.S$:.360...|
00000490: A8 02 53 24 B2 C8 28 53 24 2C 41 29 AA 41 24 AA |..S$..(S$,A).A$.|
000004A0: CA 28 53 24 2C 41 AA 31 29 3A 89 33 36 30 00 D4 |.(S$,A.1):.360..|
000004B0: 08 B2 02 8F 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |...."...........|
000004C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000004D0: C0 C0 C0 22 00 F3 08 BC 02 8F 22 C0 C0 53 55 42 |..."......"..SUB|
000004E0: 54 52 41 43 54 20 41 20 43 48 41 52 41 43 54 45 |TRACT A CHARACTE|
000004F0: 52 C0 C0 00 F9 08 C6 02 3A 00 03 09 D0 02 8D 31 |R.......:......1|
00000500: 31 35 30 00 2B 09 DA 02 99 43 24 22 52 45 4D 4F |150.+....C$"REMO|
00000510: 56 45 20 57 48 49 43 48 20 4E 55 4D 42 45 52 20 |VE WHICH NUMBER |
00000520: 43 48 41 52 41 43 54 45 52 3F 22 00 35 09 E4 02 |CHARACTER?".5...|
00000530: 8D 31 31 30 30 00 4F 09 EE 02 41 B2 C5 28 41 24 |.1100.O...A..(A$|
00000540: 29 3A 8B 41 B1 4C 20 B0 41 B2 30 A7 37 34 30 00 |):.A.L .A.0.740.|
00000550: 68 09 F8 02 8B 41 B2 31 A7 53 24 B2 CA 28 53 24 |h....A.1.S$..(S$|
00000560: 2C 32 29 3A 89 33 36 30 00 88 09 02 03 53 24 B2 |,2):.360.....S$.|
00000570: C8 28 53 24 2C 41 AB 31 29 AA CA 28 53 24 2C 41 |.(S$,A.1)..(S$,A|
00000580: AA 31 29 3A 89 33 36 30 00 AE 09 0C 03 8F 22 C0 |.1):.360......".|
00000590: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000005A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 CB |............."..|
000005B0: 09 16 03 8F 22 C0 C0 43 48 41 4E 47 45 20 41 20 |...."..CHANGE A |
000005C0: 43 48 41 52 41 43 54 45 52 C0 C0 00 D1 09 20 03 |CHARACTER..... .|
000005D0: 3A 00 DB 09 2A 03 8D 31 31 35 30 00 02 0A 34 03 |:...*..1150...4.|
000005E0: 99 43 24 22 43 48 41 4E 47 45 20 57 48 49 43 48 |.C$"CHANGE WHICH|
000005F0: 20 4E 55 4D 42 45 52 20 43 48 41 52 41 43 54 45 | NUMBER CHARACTE|
00000600: 52 3F 00 0C 0A 3E 03 8D 31 31 30 30 00 25 0A 48 |R?...>..1100.%.H|
00000610: 03 41 B2 C5 28 41 24 29 3A 8B 41 B1 4C B0 41 B2 |.A..(A$):.A.L.A.|
00000620: 30 A7 38 33 30 00 38 0A 52 03 99 22 57 48 41 54 |0.830.8.R.."WHAT|
00000630: 20 4C 45 54 54 45 52 3F 00 42 0A 5C 03 8D 31 31 | LETTER?.B.\..11|
00000640: 30 30 00 60 0A 66 03 8B 41 B2 31 A7 53 24 B2 41 |00.`.f..A.1.S$.A|
00000650: 24 AA CA 28 53 24 2C 41 AA 31 29 3A 89 33 36 30 |$..(S$,A.1):.360|
00000660: 00 83 0A 70 03 53 24 B2 C8 28 53 24 2C 41 AB 31 |...p.S$..(S$,A.1|
00000670: 29 AA 41 24 AA CA 28 53 24 2C 41 AA 31 29 3A 89 |).A$..(S$,A.1):.|
00000680: 33 36 30 00 A9 0A 7A 03 8F 22 C0 C0 C0 C0 C0 C0 |360...z.."......|
00000690: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000006A0: C0 C0 C0 C0 C0 C0 C0 C0 22 00 C8 0A 84 03 8F 22 |........"......"|
000006B0: C0 C0 53 55 43 43 45 53 53 2C 20 4C 49 53 54 20 |..SUCCESS, LIST |
000006C0: 57 4F 52 44 53 C0 C0 C0 00 CE 0A 8E 03 3A 00 F0 |WORDS........:..|
000006D0: 0A 98 03 8D 31 31 39 30 3A 8D 31 31 35 30 3A 81 |....1190:.1150:.|
000006E0: 49 B2 31 A4 32 35 30 30 3A 82 3A 53 B2 53 AA 43 |I.1.2500:.:S.S.C|
000006F0: 00 13 0B A2 03 99 22 93 57 45 4C 4C 20 44 4F 4E |......".WELL DON|
00000700: 45 21 20 59 4F 55 20 48 41 56 45 20 43 48 41 4E |E! YOU HAVE CHAN|
00000710: 47 45 44 00 3B 0B AC 03 99 22 11 12 4F 4E 45 92 |GED.;...."..ONE.|
00000720: 20 49 4E 54 4F 20 12 22 46 24 22 92 20 49 4E 20 | INTO ."F$". IN |
00000730: 22 53 22 4D 4F 56 45 53 21 11 22 00 52 0B B6 03 |"S"MOVES!.".R...|
00000740: 44 B2 30 3A 8B 43 B1 31 38 A7 44 B2 43 3A 43 B2 |D.0:.C.18.D.C:C.|
00000750: 31 38 00 66 0B C0 03 81 49 B2 30 A4 43 3A 99 41 |18.f....I.0.C:.A|
00000760: 24 28 49 29 3A 82 00 8C 0B CA 03 8B 44 A7 99 22 |$(I):.......D.."|
00000770: 13 11 11 11 11 22 3B 3A 81 49 B2 31 39 A4 44 3A |.....";:.I.19.D:|
00000780: 99 A3 32 30 29 41 24 28 49 29 3A 82 00 B2 0B D4 |..20)A$(I):.....|
00000790: 03 8F 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |..".............|
000007A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000007B0: C0 22 00 CC 0B DE 03 8F 22 C0 C0 C0 45 4E 44 20 |."......"...END |
000007C0: 4F 52 20 41 47 41 49 4E 3F C0 C0 C0 00 D2 0B E8 |OR AGAIN?.......|
000007D0: 03 3A 00 F0 0B F2 03 99 A3 32 30 29 22 11 41 4E |.:.......20)".AN|
000007E0: 59 20 4B 45 59 20 46 4F 52 20 4E 45 58 54 22 3B |Y KEY FOR NEXT";|
000007F0: 00 FA 0B FC 03 8D 31 31 30 30 00 07 0C 06 04 43 |......1100.....C|
00000800: B2 30 3A 89 32 39 30 00 2F 0C 10 04 99 22 93 59 |.0:.290./....".Y|
00000810: 4F 55 20 47 4F 54 20 52 49 47 48 54 20 52 4F 55 |OU GOT RIGHT ROU|
00000820: 4E 44 20 49 4E 20 22 53 22 20 47 4F 45 53 2E 00 |ND IN "S" GOES..|
00000830: 3E 0C 1A 04 99 22 11 41 47 41 49 4E 3F 22 00 52 |>....".AGAIN?".R|
00000840: 0C 24 04 8D 31 31 30 30 3A 8B 41 24 B2 22 59 22 |.$..1100:.A$."Y"|
00000850: A7 8A 00 64 0C 2E 04 8B 41 24 B3 B1 22 4E 22 A7 |...d....A$.."N".|
00000860: 31 30 36 30 00 7A 0C 38 04 99 22 93 42 59 45 20 |1060.z.8..".BYE |
00000870: 42 59 45 22 3A 89 31 32 37 30 00 A0 0C 42 04 8F |BYE":.1270...B..|
00000880: 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............|
00000890: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 |..............."|
000008A0: 00 BB 0C 4C 04 8F 2B 2B 2B 47 45 54 20 41 20 43 |...L..+++GET A C|
000008B0: 48 41 52 41 43 54 45 52 2B 2B 2B 00 C1 0C 56 04 |HARACTER+++...V.|
000008C0: 3A 00 D5 0C 60 04 A1 41 24 3A 8B 41 24 B2 22 22 |:...`..A$:.A$.""|
000008D0: A7 31 31 30 30 00 DB 0C 6A 04 8E 00 00 0D 74 04 |.1100...j.....t.|
000008E0: 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.---------------|
000008F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000900: 00 20 0D 7E 04 8F 2B 2B 2B 43 4C 45 41 52 20 41 |. .~..+++CLEAR A|
00000910: 52 45 41 20 4F 46 20 53 43 52 45 45 4E 2B 2B 2B |REA OF SCREEN+++|
00000920: 00 26 0D 88 04 3A 00 42 0D 92 04 99 43 24 45 24 |.&...:.B....C$E$|
00000930: 3A 99 45 24 3A 99 45 24 3A 99 45 24 3A 99 45 24 |:.E$:.E$:.E$:.E$|
00000940: 3A 8E 00 67 0D 9C 04 8F 2D 2D 2D 2D 2D 2D 2D 2D |:..g....--------|
00000950: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000960: 2D 2D 2D 2D 2D 2D 2D 00 80 0D A6 04 8F 2B 2B 2B |-------......+++|
00000970: 44 49 53 50 4C 41 59 20 54 55 52 4E 53 2B 2B 2B |DISPLAY TURNS+++|
00000980: 00 86 0D B0 04 3A 00 AF 0D BA 04 99 22 13 11 11 |.....:......"...|
00000990: 59 4F 55 20 48 41 56 45 20 48 41 44 22 43 22 9D |YOU HAVE HAD"C".|
000009A0: 20 47 4F 45 53 2E 20 20 20 20 20 20 20 20 22 00 | GOES. ".|
000009B0: B5 0D C4 04 8E 00 DA 0D CE 04 8F 2D 2D 2D 2D 2D |...........-----|
000009C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000009D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 EF 0D D8 04 8F |----------......|
000009E0: C0 C0 C0 44 41 54 41 20 46 49 4C 45 C0 C0 C0 00 |...DATA FILE....|
000009F0: F5 0D E2 04 3A 00 2D 0E EC 04 83 54 57 4F 2C 54 |....:.-....TWO,T|
00000A00: 48 52 45 45 2C 46 4F 55 52 2C 46 49 56 45 2C 53 |HREE,FOUR,FIVE,S|
00000A10: 49 58 2C 53 45 56 45 4E 2C 45 49 47 48 54 2C 4E |IX,SEVEN,EIGHT,N|
00000A20: 49 4E 45 2C 54 45 4E 2C 4F 4E 45 2C 2A 00 33 0E |INE,TEN,ONE,*.3.|
00000A30: F6 04 80 00 00 00 |...... |
..$.D..####ONE TO ONE###############.*.N
.:.M.X.."MIKE NIKLAUS - DEC 10TH,1978.S.
..:.T...."25 LONGDOWN RD, CONGLETON,.Z..
.:... .."CHESHIRE, CW12 4QH, U.K......:.
....."TELEPHONE:- 026 02 5147......"....
..........................."...H.."..PRE
LIMINARIES......R.:.....L$."..........."
.2...C$."................".P...E$."":.I.
1.39:E$.E$." ":..`....A$(36):C.0.I....".
".V...F$."ONE"......"...................
..........."...".."..READ TARGET WORDS..
....,.:.J.6.S1$.F$...@..F$:.F$."*". 1040
...J.S$.S1$...T..".FINAL WORD IS ."F$.+.
^.."..............................".P.H.
.".DISP & STORE WORD & TEST END..V.R.:.`
.|..L$E$.L...L.C(S$)......L$.(39.L).2)".
"S$.....A$(C).S$......S$.F$.900......119
0.....C.C.1.Y.B.."......................
........"...L.."..DISP MENU & AWAIT COMM
AND.....V.:......1150......C$"1. ADD.,..
.."2. REMOVE.<...."3. CHANGE.M...."4. RE
START.\...."5. QUIT".Y....1100:.A$."1".A
$."5".540...&.A.E(A$):.A.580,700,790,550
,1080...0.C.0:.330.P.:.."...............
..............."...D.."..ADD A CHARACTER
......N.:...X..1150.%.B..C$"ADD AFTER WH
ICH NUMBER CHARACTER?./.L..1100.D.V.A.E(
A$):.A.L.620.Y....A.0.A$.."0".620.L...."
WHAT LETTER?.V....1100......A.0.S$.A$.S$
:.360.....S$.H(S$,A).A$.J(S$,A.1):.360.T
....".............................."....
.."..SUBTRACT A CHARACTER.....F.:...P..1
150.+.Z..C$"REMOVE WHICH NUMBER CHARACTE
R?".5....1100.O...A.E(A$):.A.L .A.0.740.
H....A.1.S$.J(S$,2):.360.....S$.H(S$,A.1
).J(S$,A.1):.360......".................
.............".K...."..CHANGE A CHARACTE
R...Q. .:...*..1150...4..C$"CHANGE WHICH
NUMBER CHARACTER?...>..1100.%.H.A.E(A$)
:.A.L.A.0.830.8.R.."WHAT LETTER?.B.\..11
00.`.F..A.1.S$.A$.J(S$,A.1):.360...P.S$.
H(S$,A.1).A$.J(S$,A.1):.360...Z.."......
........................".H...."..SUCCES
S, LIST WORDS....N...:......1190:.1150:.
I.1.2500:.:S.S.C......".WELL DONE! YOU H
AVE CHANGED.;...."..ONE. INTO ."F$". IN
"S"MOVES!.".R...D.0:.C.18.D.C:C.18.F....
I.0.C:.A$(I):....J..D..".....";:.I.19.D:
..20)A$(I):....T..".....................
.........".L...."...END OR AGAIN?....R..
.:.......20)".ANY KEY FOR NEXT";......11
00.....C.0:.290./....".YOU GOT RIGHT ROU
ND IN "S" GOES..>....".AGAIN?".R.$..1100
:.A$."Y"...D....A$.."N".1060.Z.8..".BYE
BYE":.1270. .B..".......................
......."...L..+++GET A CHARACTER+++.A.V.
:.U.`..A$:.A$."".1100...J.....T..-------
------------------------. .~..+++CLEAR A
REA OF SCREEN+++.&...:.B....C$E$:.E$:.E$
:.E$:.E$:..G....------------------------
-------......+++DISPLAY TURNS+++.....:..
...."...YOU HAVE HAD"C". GOES. ".
..D...Z.N..-----------------------------
--...X.....DATA FILE........:.-....TWO,T
HREE,FOUR,FIVE,SIX,SEVEN,EIGHT,NINE,TEN,
ONE,*.3.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL