_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

ONE TO ONE

FILE INFORMATION

FILENAME(S): ONE TO ONE

FILE TYPE(S): PRG

FILE SIZE: 2.6K

FIRST SEEN: 2025-11-30 21:07:07

APPEARS ON: 2 disk(s)

FILE HASH

62ee1e254e768876f9155cfda73ab2ec85d16fef1ca8832675d5e9c5c52b7f5c

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
CS TAPES PET 01 ONE TO ONE PRG DuncanTwain 24 6 DOWNLOAD FILE
CS TAPES PET 12 ONE TO ONE PRG DuncanTwain 5 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL