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

SWITCH.D

FILE INFORMATION

FILENAME(S): SWITCH.D

FILE TYPE(S): PRG

FILE SIZE: 5.9K

FIRST SEEN: 2025-11-30 01:08:23

APPEARS ON: 1 disk(s)

FILE HASH

a249647670dc771cdae5ff44d5ca6d8ce7533774c476c6a8132d8ffa1c622f30

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
FREESOFT DISK NR SWITCH.D PRG Treasure Chest - Wolfgang Rauprich 15 3 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 2C 08 01 00 8F 12  2D 20 27 43 48 45 43 4B  |..,.....- 'CHECK|
00000010: 45 52 53 20 53 57 49 54  43 48 27 20 46 4F 52 20  |ERS SWITCH' FOR |
00000020: 43 4F 4D 4D 4F 44 4F 52  45 20 36 34 00 42 08 02  |COMMODORE 64.B..|
00000030: 00 8F 12 2D 20 44 41 4E  49 45 4C 20 4D 49 4C 4C  |...- DANIEL MILL|
00000040: 45 52 00 59 08 03 00 8F  12 2D 20 32 38 31 35 20  |ER.Y.....- 2815 |
00000050: 33 34 20 53 54 52 45 45  54 00 71 08 04 00 8F 12  |34 STREET.q.....|
00000060: 2D 20 41 53 54 4F 52 49  41 2C 20 51 55 45 45 4E  |- ASTORIA, QUEEN|
00000070: 53 00 94 08 05 00 8F 12  2D 20 4E 45 57 20 59 4F  |S.......- NEW YO|
00000080: 52 4B 2C 20 4E 45 57 20  59 4F 52 4B 20 20 20 31  |RK, NEW YORK   1|
00000090: 31 31 30 33 00 A8 08 06  00 8F 12 4D 41 52 43 48  |1103.......MARCH|
000000A0: 20 33 30 2C 31 39 38 33  00 D3 08 07 00 8F 12 2A  | 30,1983.......*|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000000D0: 2A 2A 2A 00 F2 08 14 00  86 20 42 28 34 35 29 2C  |***...... B(45),|
000000E0: 43 28 34 35 29 2C 41 24  28 34 29 2C 45 52 24 28  |C(45),A$(4),ER$(|
000000F0: 36 29 00 03 09 1E 00 8D  31 30 30 30 30 3A 89 31  |6)......10000:.1|
00000100: 30 30 35 00 19 09 23 00  8F 12 2D 20 53 4F 55 4E  |005...#...- SOUN|
00000110: 44 20 52 4F 55 54 49 4E  45 00 41 09 28 00 97 56  |D ROUTINE.A.(..V|
00000120: 4F 2C 31 35 3A 97 57 56  2C 31 37 3A 97 41 54 2C  |O,15:.WV,17:.AT,|
00000130: 31 35 3A 97 48 49 2C 36  38 3A 97 4C 4F 2C 31 34  |15:.HI,68:.LO,14|
00000140: 39 00 5D 09 32 00 81 20  54 4D B2 31 20 A4 20 31  |9.].2.. TM.1 . 1|
00000150: 30 30 3A 82 20 54 4D 3A  97 57 56 2C 30 00 84 09  |00:. TM:.WV,0...|
00000160: 37 00 97 56 4F 2C 31 35  3A 97 57 56 2C 31 37 3A  |7..VO,15:.WV,17:|
00000170: 97 41 54 2C 31 35 3A 97  48 49 2C 33 34 3A 97 4C  |.AT,15:.HI,34:.L|
00000180: 4F 2C 37 35 00 A2 09 3C  00 81 20 54 4D B2 31 20  |O,75...<.. TM.1 |
00000190: A4 20 31 30 30 3A 82 20  54 4D 3A 97 57 56 2C 30  |. 100:. TM:.WV,0|
000001A0: 3A 8E 00 B8 09 2C 01 8F  12 2D 20 50 55 5A 5A 4C  |:....,...- PUZZL|
000001B0: 45 20 53 43 52 45 45 4E  00 CF 09 2E 01 99 20 C7  |E SCREEN...... .|
000001C0: 28 31 39 29 3B A3 31 33  29 3B 48 44 47 24 3B 00  |(19);.13);HDG$;.|
000001D0: FA 09 2F 01 58 B2 34 39  3A 81 20 59 B2 31 31 35  |../.X.49:. Y.115|
000001E0: 33 20 A4 20 31 31 37 39  20 A9 33 3A 97 59 2C 58  |3 . 1179 .3:.Y,X|
000001F0: 3A 58 B2 58 AA 31 3A 82  20 59 00 09 0A 31 01 99  |:X.X.1:. Y...1..|
00000200: 20 C8 28 44 4F 24 2C 34  29 00 4A 0A 36 01 99 A3  | .(DO$,4).J.6...|
00000210: 38 29 41 24 28 42 28 31  29 29 55 50 24 41 24 28  |8)A$(B(1))UP$A$(|
00000220: 42 28 32 29 29 55 50 24  41 24 28 42 28 33 29 29  |B(2))UP$A$(B(3))|
00000230: 55 50 24 41 24 28 42 28  34 29 29 55 50 24 41 24  |UP$A$(B(4))UP$A$|
00000240: 28 42 28 35 29 29 55 50  24 3B 00 7D 0A 3B 01 99  |(B(5))UP$;.}.;..|
00000250: A3 32 31 29 41 24 28 42  28 36 29 29 55 50 24 41  |.21)A$(B(6))UP$A|
00000260: 24 28 42 28 37 29 29 55  50 24 41 24 28 42 28 38  |$(B(7))UP$A$(B(8|
00000270: 29 29 55 50 24 41 24 28  42 28 39 29 29 00 92 0A  |))UP$A$(B(9))...|
00000280: 3D 01 8B 20 C5 28 46 32  24 29 B3 B1 31 20 A7 33  |=.. .(F2$)..1 .3|
00000290: 32 30 00 9A 0A 3E 01 8D  34 30 00 E0 0A 40 01 99  |20...>..40...@..|
000002A0: A3 38 29 41 24 28 42 28  31 30 29 29 55 50 24 41  |.8)A$(B(10))UP$A|
000002B0: 24 28 42 28 31 31 29 29  55 50 24 41 24 28 42 28  |$(B(11))UP$A$(B(|
000002C0: 31 32 29 29 55 50 24 41  24 28 42 28 31 33 29 29  |12))UP$A$(B(13))|
000002D0: 55 50 24 41 24 28 42 28  31 34 29 29 55 50 24 3B  |UP$A$(B(14))UP$;|
000002E0: 00 17 0B 45 01 99 A3 32  31 29 41 24 28 42 28 31  |...E...21)A$(B(1|
000002F0: 35 29 29 55 50 24 41 24  28 42 28 31 36 29 29 55  |5))UP$A$(B(16))U|
00000300: 50 24 41 24 28 42 28 31  37 29 29 55 50 24 41 24  |P$A$(B(17))UP$A$|
00000310: 28 42 28 31 38 29 29 00  2C 0B 47 01 8B 20 C5 28  |(B(18)).,.G.. .(|
00000320: 46 32 24 29 B3 B1 32 20  A7 33 33 30 00 34 0B 48  |F2$)..2 .330.4.H|
00000330: 01 8D 34 30 00 7A 0B 4A  01 99 A3 38 29 41 24 28  |..40.z.J...8)A$(|
00000340: 42 28 31 39 29 29 55 50  24 41 24 28 42 28 32 30  |B(19))UP$A$(B(20|
00000350: 29 29 55 50 24 41 24 28  42 28 32 31 29 29 55 50  |))UP$A$(B(21))UP|
00000360: 24 41 24 28 42 28 32 32  29 29 55 50 24 41 24 28  |$A$(B(22))UP$A$(|
00000370: 42 28 32 33 29 29 55 50  24 3B 00 B1 0B 4F 01 99  |B(23))UP$;...O..|
00000380: A3 32 31 29 41 24 28 42  28 32 34 29 29 55 50 24  |.21)A$(B(24))UP$|
00000390: 41 24 28 42 28 32 35 29  29 55 50 24 41 24 28 42  |A$(B(25))UP$A$(B|
000003A0: 28 32 36 29 29 55 50 24  41 24 28 42 28 32 37 29  |(26))UP$A$(B(27)|
000003B0: 29 00 C6 0B 51 01 8B 20  C5 28 46 32 24 29 B3 B1  |)...Q.. .(F2$)..|
000003C0: 33 20 A7 33 34 30 00 CE  0B 52 01 8D 34 30 00 14  |3 .340...R..40..|
000003D0: 0C 54 01 99 A3 38 29 41  24 28 42 28 32 38 29 29  |.T...8)A$(B(28))|
000003E0: 55 50 24 41 24 28 42 28  32 39 29 29 55 50 24 41  |UP$A$(B(29))UP$A|
000003F0: 24 28 42 28 33 30 29 29  55 50 24 41 24 28 42 28  |$(B(30))UP$A$(B(|
00000400: 33 31 29 29 55 50 24 41  24 28 42 28 33 32 29 29  |31))UP$A$(B(32))|
00000410: 55 50 24 3B 00 4B 0C 59  01 99 A3 32 31 29 41 24  |UP$;.K.Y...21)A$|
00000420: 28 42 28 33 33 29 29 55  50 24 41 24 28 42 28 33  |(B(33))UP$A$(B(3|
00000430: 34 29 29 55 50 24 41 24  28 42 28 33 35 29 29 55  |4))UP$A$(B(35))U|
00000440: 50 24 41 24 28 42 28 33  36 29 29 00 60 0C 5B 01  |P$A$(B(36)).`.[.|
00000450: 8B 20 C5 28 46 32 24 29  B3 B1 34 20 A7 33 35 30  |. .(F2$)..4 .350|
00000460: 00 68 0C 5C 01 8D 34 30  00 AE 0C 5E 01 99 A3 38  |.h.\..40...^...8|
00000470: 29 41 24 28 42 28 33 37  29 29 55 50 24 41 24 28  |)A$(B(37))UP$A$(|
00000480: 42 28 33 38 29 29 55 50  24 41 24 28 42 28 33 39  |B(38))UP$A$(B(39|
00000490: 29 29 55 50 24 41 24 28  42 28 34 30 29 29 55 50  |))UP$A$(B(40))UP|
000004A0: 24 41 24 28 42 28 34 31  29 29 55 50 24 3B 00 E5  |$A$(B(41))UP$;..|
000004B0: 0C 63 01 99 A3 32 31 29  41 24 28 42 28 34 32 29  |.c...21)A$(B(42)|
000004C0: 29 55 50 24 41 24 28 42  28 34 33 29 29 55 50 24  |)UP$A$(B(43))UP$|
000004D0: 41 24 28 42 28 34 34 29  29 55 50 24 41 24 28 42  |A$(B(44))UP$A$(B|
000004E0: 28 34 35 29 29 00 FA 0C  65 01 8B 20 C5 28 46 32  |(45))...e.. .(F2|
000004F0: 24 29 B3 B1 35 20 A7 34  31 30 00 02 0D 66 01 8D  |$)..5 .410...f..|
00000500: 34 30 00 2F 0D 9A 01 58  B2 34 39 3A 81 20 59 B2  |40./...X.49:. Y.|
00000510: 31 32 33 30 20 A4 20 31  37 35 30 20 A9 31 32 30  |1230 . 1750 .120|
00000520: 3A 97 59 2C 58 3A 58 B2  58 AA 31 3A 82 20 59 00  |:.Y,X:X.X.1:. Y.|
00000530: 48 0D A4 01 99 C8 28 44  4F 24 2C 32 32 29 3B A3  |H.....(DO$,22);.|
00000540: 31 38 29 3B 4D 56 24 3B  00 6A 0D AE 01 99 C8 28  |18);MV$;.j.....(|
00000550: 44 4F 24 2C 32 34 29 3B  A3 31 32 29 3B 46 33 24  |DO$,24);.12);F3$|
00000560: 3B A3 32 37 29 3B 54 33  24 3B 00 82 0D B7 01 8F  |;.27);T3$;......|
00000570: 12 2D 20 50 55 5A 5A 4C  45 20 53 4F 4C 56 45 44  |.- PUZZLE SOLVED|
00000580: 20 3F 00 93 0D B8 01 8B  20 44 24 B2 45 24 20 A7  | ?...... D$.E$ .|
00000590: 36 35 30 00 B5 0D F4 01  8B 20 5A 5A B2 31 20 A7  |650...... ZZ.1 .|
000005A0: 20 81 20 54 4D B2 31 20  A4 20 32 30 30 30 3A 82  | . TM.1 . 2000:.|
000005B0: 20 54 4D 3A 8E 00 CA 0D  FE 01 8F 12 2D 20 4D 4F  | TM:........- MO|
000005C0: 56 45 20 52 4F 55 54 49  4E 45 00 F0 0D 03 02 99  |VE ROUTINE......|
000005D0: C8 28 44 4F 24 2C 32 34  29 3B A3 32 30 29 22 20  |.(DO$,24);.20)" |
000005E0: 20 20 20 22 3B A3 33 31  29 22 20 20 20 20 22 3B  |   ";.31)"    ";|
000005F0: 00 1C 0E 08 02 99 C8 28  44 4F 24 2C 32 34 29 3B  |.......(DO$,24);|
00000600: A3 32 30 29 22 20 20 20  22 3B C8 28 44 4F 24 2C  |.20)"   ";.(DO$,|
00000610: 32 34 29 3B A3 32 30 29  43 52 24 3B 00 32 0E 0A  |24);.20)CR$;.2..|
00000620: 02 A1 20 46 24 3A 8B 20  46 24 B2 22 22 20 A7 35  |.. F$:. F$."" .5|
00000630: 32 32 00 48 0E 0D 02 A1  20 47 24 3A 8B 20 47 24  |22.H.... G$:. G$|
00000640: B2 22 22 20 A7 35 32 35  00 68 0E 10 02 46 52 24  |."" .525.h...FR$|
00000650: B2 46 24 AA 47 24 3A 99  46 52 24 3B 3A 46 24 B2  |.F$.G$:.FR$;:F$.|
00000660: 22 22 3A 47 24 B2 22 22  00 7D 0E 11 02 8B 20 46  |"":G$."".}.... F|
00000670: 52 24 B2 22 39 39 22 20  A7 38 33 31 30 00 AD 0E  |R$."99" .8310...|
00000680: 14 02 8B 20 C8 28 46 52  24 2C 31 29 B3 22 31 22  |... .(FR$,1)."1"|
00000690: 20 B0 20 C8 28 46 52 24  2C 31 29 B1 22 35 22 20  | . .(FR$,1)."5" |
000006A0: A7 20 46 52 24 B2 22 22  3A 89 35 32 30 00 DD 0E  |. FR$."":.520...|
000006B0: 15 02 8B 20 C9 28 46 52  24 2C 31 29 B3 22 31 22  |... .(FR$,1)."1"|
000006C0: 20 B0 20 C9 28 46 52 24  2C 31 29 B1 22 39 22 20  | . .(FR$,1)."9" |
000006D0: A7 20 46 52 24 B2 22 22  3A 89 35 32 30 00 09 0F  |. FR$."":.520...|
000006E0: 17 02 48 B2 C5 28 46 52  24 29 3A 8D 38 30 30 30  |..H..(FR$):.8000|
000006F0: 3A 46 52 B2 48 3A 43 28  46 52 29 B2 C5 28 CA 28  |:FR.H:C(FR)..(.(|
00000700: 44 24 2C 46 52 2C 31 29  29 00 37 0F 1C 02 99 C8  |D$,FR,1)).7.....|
00000710: 28 44 4F 24 2C 32 34 29  3B A3 33 31 29 3B 22 20  |(DO$,24);.31);" |
00000720: 20 20 20 22 3B C8 28 44  4F 24 2C 32 34 29 3B A3  |   ";.(DO$,24);.|
00000730: 33 32 29 43 52 24 3B 00  4D 0F 1E 02 A1 20 46 24  |32)CR$;.M.... F$|
00000740: 3A 8B 20 46 24 B2 22 22  20 A7 35 34 32 00 63 0F  |:. F$."" .542.c.|
00000750: 21 02 A1 20 47 24 3A 8B  20 47 24 B2 22 22 20 A7  |!.. G$:. G$."" .|
00000760: 35 34 35 00 84 0F 24 02  54 55 24 B2 46 24 AA 47  |545...$.TU$.F$.G|
00000770: 24 3A 99 20 54 55 24 3B  3A 46 24 B2 22 22 3A 47  |$:. TU$;:F$."":G|
00000780: 24 B2 22 22 00 B4 0F 26  02 8B 20 C8 28 54 55 24  |$.""...&.. .(TU$|
00000790: 2C 31 29 B3 22 31 22 20  B0 20 C8 28 54 55 24 2C  |,1)."1" . .(TU$,|
000007A0: 31 29 B1 22 35 22 20 A7  20 54 55 24 B2 22 22 3A  |1)."5" . TU$."":|
000007B0: 89 35 34 30 00 E4 0F 29  02 8B 20 C9 28 54 55 24  |.540...).. .(TU$|
000007C0: 2C 31 29 B3 22 31 22 20  B0 20 C9 28 54 55 24 2C  |,1)."1" . .(TU$,|
000007D0: 31 29 B1 22 39 22 20 A7  20 54 55 24 B2 22 22 3A  |1)."9" . TU$."":|
000007E0: 89 35 34 30 00 10 10 2B  02 48 B2 C5 28 54 55 24  |.540...+.H..(TU$|
000007F0: 29 3A 8D 38 30 30 30 3A  54 55 B2 48 3A 43 28 54  |):.8000:TU.H:C(T|
00000800: 55 29 B2 C5 28 CA 28 44  24 2C 54 55 2C 31 29 29  |U)..(.(D$,TU,1))|
00000810: 00 32 10 2E 02 5A 31 B2  C5 28 C8 28 46 52 24 2C  |.2...Z1..(.(FR$,|
00000820: 31 29 29 3A 5A 32 B2 C5  28 C9 28 46 52 24 2C 31  |1)):Z2..(.(FR$,1|
00000830: 29 29 00 54 10 30 02 5A  33 B2 C5 28 C8 28 54 55  |)).T.0.Z3..(.(TU|
00000840: 24 2C 31 29 29 3A 5A 34  B2 C5 28 C9 28 54 55 24  |$,1)):Z4..(.(TU$|
00000850: 2C 31 29 29 00 65 10 35  02 46 32 24 B2 C8 28 46  |,1)).e.5.F2$..(F|
00000860: 52 24 2C 31 29 00 87 10  3A 02 46 52 24 B2 CA 28  |R$,1)...:.FR$..(|
00000870: 44 24 2C 46 52 2C 31 29  3A 54 55 24 B2 CA 28 44  |D$,FR,1):TU$..(D|
00000880: 24 2C 54 55 2C 31 29 00  A1 10 44 02 8B 20 46 52  |$,TU,1)...D.. FR|
00000890: 24 B2 22 34 22 20 A7 20  45 52 B2 31 3A 89 39 30  |$."4" . ER.1:.90|
000008A0: 30 00 C5 10 45 02 8B 20  54 55 24 B2 22 31 22 20  |0...E.. TU$."1" |
000008B0: B0 20 54 55 24 B2 22 32  22 20 A7 20 45 52 B2 32  |. TU$."2" . ER.2|
000008C0: 3A 89 39 30 30 00 E9 10  46 02 8B 20 46 52 24 B2  |:.900...F.. FR$.|
000008D0: 22 33 22 20 B0 20 54 55  24 B2 22 33 22 20 A7 20  |"3" . TU$."3" . |
000008E0: 45 52 B2 33 3A 89 39 30  30 00 09 11 48 02 8B 20  |ER.3:.900...H.. |
000008F0: 5A 31 B2 5A 33 20 B0 20  5A 32 B2 5A 34 20 A7 20  |Z1.Z3 . Z2.Z4 . |
00000900: 45 52 B2 34 3A 89 39 30  30 00 29 11 4E 02 43 B2  |ER.4:.900.).N.C.|
00000910: 43 28 54 55 29 3A 43 28  54 55 29 B2 43 28 46 52  |C(TU):C(TU).C(FR|
00000920: 29 3A 43 28 46 52 29 B2  43 00 55 11 58 02 44 24  |):C(FR).C.U.X.D$|
00000930: B2 22 22 3A 81 20 58 B2  31 20 A4 20 34 35 3A 44  |."":. X.1 . 45:D|
00000940: 24 B2 44 24 AA C9 28 C4  28 43 28 58 29 29 2C 31  |$.D$..(.(C(X)),1|
00000950: 29 3A 82 20 58 00 7B 11  62 02 99 C8 28 44 4F 24  |):. X.{.b...(DO$|
00000960: 2C 32 34 29 3B A3 32 30  29 22 20 20 20 20 22 3B  |,24);.20)"    ";|
00000970: A3 33 31 29 22 20 20 20  20 22 3B 00 A0 11 6C 02  |.31)"    ";...l.|
00000980: 81 20 58 B2 31 20 A4 20  34 35 3A 42 28 58 29 B2  |. X.1 . 45:B(X).|
00000990: C5 28 CA 28 44 24 2C 58  2C 31 29 29 3A 82 20 58  |.(.(D$,X,1)):. X|
000009A0: 00 DC 11 76 02 4D 56 B2  4D 56 AA 31 3A 4D 4F 24  |...v.MV.MV.1:MO$|
000009B0: B2 52 56 24 AA 57 48 24  AA C4 28 4D 56 29 AA 52  |.RV$.WH$..(MV).R|
000009C0: 4F 24 3A 99 C8 28 44 4F  24 2C 32 32 29 3B A3 32  |O$:..(DO$,22);.2|
000009D0: 35 29 3B 4D 4F 24 3B 3A  89 33 30 32 00 EA 11 8A  |5);MO$;:.302....|
000009E0: 02 81 20 58 B2 31 20 A4  20 35 00 15 12 8C 02 99  |.. X.1 . 5......|
000009F0: C8 28 44 4F 24 2C 32 34  29 3B A3 38 29 3B 57 49  |.(DO$,24);.8);WI|
00000A00: 4E 24 3B 3A 81 20 54 4D  B2 31 20 A4 20 35 30 30  |N$;:. TM.1 . 500|
00000A10: 3A 82 20 54 4D 00 47 12  8E 02 99 20 C8 28 44 4F  |:. TM.G.... .(DO|
00000A20: 24 2C 32 34 29 3B A3 38  29 3B 45 52 24 28 30 29  |$,24);.8);ER$(0)|
00000A30: 3B 3A 81 20 54 4D B2 31  20 A4 20 35 30 30 3A 82  |;:. TM.1 . 500:.|
00000A40: 20 54 4D 3A 82 20 58 00  51 12 90 02 89 38 33 31  | TM:. X.Q....831|
00000A50: 30 00 6E 12 83 03 8F 12  2D 20 46 4C 41 53 48 20  |0.n.....- FLASH |
00000A60: 45 52 52 4F 52 20 4D 45  53 53 41 47 45 53 00 83  |ERROR MESSAGES..|
00000A70: 12 84 03 46 32 24 B2 22  22 3A 81 20 58 B2 31 20  |...F2$."":. X.1 |
00000A80: A4 20 35 00 C1 12 8E 03  99 C8 28 44 4F 24 2C 32  |. 5.......(DO$,2|
00000A90: 35 29 3B A3 32 32 AB 28  C3 28 45 52 24 28 45 52  |5);.22.(.(ER$(ER|
00000AA0: 29 29 AD 32 29 29 3B 45  52 24 28 45 52 29 3B 3A  |)).2));ER$(ER);:|
00000AB0: 81 20 54 4D B2 31 20 A4  20 35 30 30 3A 82 20 54  |. TM.1 . 500:. T|
00000AC0: 4D 00 F7 12 98 03 99 C8  28 44 4F 24 2C 32 35 29  |M.......(DO$,25)|
00000AD0: 3B A3 39 29 3B 45 52 24  28 30 29 3B 3A 81 20 54  |;.9);ER$(0);:. T|
00000AE0: 4D B2 31 20 A4 20 35 30  30 3A 82 20 54 4D 3A 82  |M.1 . 500:. TM:.|
00000AF0: 20 58 3A 89 33 30 32 00  0C 13 E8 03 8F 12 2D 20  | X:.302.......- |
00000B00: 49 4E 53 54 52 55 43 54  49 4F 4E 53 00 1A 13 ED  |INSTRUCTIONS....|
00000B10: 03 97 20 35 33 32 38 31  2C 31 00 3A 13 F2 03 99  |.. 53281,1.:....|
00000B20: 43 4C 24 3B C8 28 44 4F  24 2C 33 29 3B A3 31 33  |CL$;.(DO$,3);.13|
00000B30: 29 3B 48 32 24 3B 3A 99  3A 99 00 68 13 FC 03 99  |);H2$;:.:..h....|
00000B40: 22 20 20 20 20 20 20 D0  52 45 50 41 52 45 20 54  |"      .REPARE T|
00000B50: 4F 20 54 45 53 54 20 59  4F 55 52 20 50 55 5A 5A  |O TEST YOUR PUZZ|
00000B60: 4C 45 52 27 53 22 3A 99  00 95 13 06 04 99 22 20  |LER'S":......." |
00000B70: 20 53 4B 49 4C 4C 53 2E  20 20 C5 49 47 48 54 20  | SKILLS.  .IGHT |
00000B80: 57 48 49 54 45 20 43 48  45 43 4B 45 52 53 20 41  |WHITE CHECKERS A|
00000B90: 4E 44 22 3A 99 00 C4 13  10 04 99 22 20 20 45 49  |ND":......."  EI|
00000BA0: 47 48 54 20 42 4C 41 43  4B 20 43 48 45 43 4B 45  |GHT BLACK CHECKE|
00000BB0: 52 53 20 41 52 45 20 50  4F 53 49 54 49 4F 4E 45  |RS ARE POSITIONE|
00000BC0: 44 22 3A 99 00 F7 13 1A  04 99 22 20 20 4F 4E 20  |D":......."  ON |
00000BD0: 4F 50 50 4F 53 49 54 45  20 53 49 44 45 53 20 4F  |OPPOSITE SIDES O|
00000BE0: 46 20 54 48 45 20 43 48  45 43 4B 45 52 42 4F 41  |F THE CHECKERBOA|
00000BF0: 52 44 20 22 3B 3A 99 00  0A 14 1F 04 99 22 20 20  |RD ";:......."  |
00000C00: 41 53 20 53 48 4F 57 4E  3A 22 00 40 14 24 04 5A  |AS SHOWN:".@.$.Z|
00000C10: 5A B2 31 3A 81 20 54 4D  B2 31 20 A4 20 32 30 30  |Z.1:. TM.1 . 200|
00000C20: 30 3A 82 20 54 4D 3A 99  20 43 4C 24 3B 55 43 24  |0:. TM:. CL$;UC$|
00000C30: 3B 3A 8D 31 35 30 30 3A  97 35 33 32 38 31 2C 31  |;:.1500:.53281,1|
00000C40: 00 65 14 2E 04 99 43 4C  24 3B C8 28 44 4F 24 2C  |.e....CL$;.(DO$,|
00000C50: 33 29 3B A3 31 33 29 3B  48 32 24 3B 3A 99 3A 99  |3);.13);H2$;:.:.|
00000C60: 3A 5A 5A B2 30 00 96 14  38 04 99 22 20 20 20 20  |:ZZ.0...8.."    |
00000C70: D9 4F 55 52 20 47 4F 41  4C 20 49 53 20 54 4F 20  |.OUR GOAL IS TO |
00000C80: 53 57 49 54 43 48 20 54  48 45 20 43 48 45 43 4B  |SWITCH THE CHECK|
00000C90: 45 52 53 22 3A 99 00 C7  14 42 04 99 22 20 20 54  |ERS":....B.."  T|
00000CA0: 4F 20 54 48 45 20 52 45  56 45 52 53 45 20 53 49  |O THE REVERSE SI|
00000CB0: 44 45 53 20 4F 46 20 54  48 45 20 42 4F 41 52 44  |DES OF THE BOARD|
00000CC0: 2E 20 20 C1 22 3A 99 00  F7 14 4C 04 99 22 20 20  |.  .":....L.."  |
00000CD0: 43 48 45 43 4B 45 52 20  43 41 4E 20 42 45 20 4D  |CHECKER CAN BE M|
00000CE0: 4F 56 45 44 20 54 4F 20  41 20 D2 45 44 20 53 51  |OVED TO A .ED SQ|
00000CF0: 55 41 52 45 22 3A 99 00  26 15 56 04 99 22 20 20  |UARE":..&.V.."  |
00000D00: 4F 52 20 43 41 4E 20 42  45 20 4A 55 4D 50 45 44  |OR CAN BE JUMPED|
00000D10: 20 4F 56 45 52 20 41 4E  4F 54 48 45 52 20 50 49  | OVER ANOTHER PI|
00000D20: 45 43 45 22 3A 99 00 56  15 60 04 99 22 20 20 54  |ECE":..V.`.."  T|
00000D30: 4F 20 41 4E 4F 54 48 45  52 20 D2 45 44 20 53 51  |O ANOTHER .ED SQ|
00000D40: 55 41 52 45 2E 20 20 D7  48 49 54 45 20 50 49 45  |UARE.  .HITE PIE|
00000D50: 43 45 53 22 3A 99 00 83  15 6A 04 99 22 20 20 4D  |CES":....j.."  M|
00000D60: 4F 56 45 20 54 4F 20 54  48 45 20 D2 C9 C7 C8 D4  |OVE TO THE .....|
00000D70: 3B 20 C2 4C 41 43 4B 20  43 48 45 43 4B 45 52 53  |; .LACK CHECKERS|
00000D80: 22 3A 99 00 A7 15 74 04  99 22 20 20 43 41 4E 20  |":....t.."  CAN |
00000D90: 4D 4F 56 45 20 4F 4E 4C  59 20 54 4F 20 54 48 45  |MOVE ONLY TO THE|
00000DA0: 20 CC C5 C6 D4 2E 22 00  BE 15 7E 04 81 20 54 4D  | ....."...~.. TM|
00000DB0: B2 31 20 A4 20 33 30 30  30 3A 82 20 54 4D 00 F0  |.1 . 3000:. TM..|
00000DC0: 15 88 04 99 43 4C 24 3B  C8 28 44 4F 24 2C 33 29  |....CL$;.(DO$,3)|
00000DD0: 3B A3 31 33 29 3B 4C 43  24 3B 22 C3 48 45 43 4B  |;.13);LC$;".HECK|
00000DE0: 45 52 53 20 D3 57 49 54  43 48 22 3B 3A 99 3A 99  |ERS .WITCH";:.:.|
00000DF0: 00 1E 16 92 04 99 22 20  20 20 20 20 D4 48 49 53  |......"     .HIS|
00000E00: 20 50 55 5A 5A 4C 45 20  43 41 4E 20 42 45 20 53  | PUZZLE CAN BE S|
00000E10: 4F 4C 56 45 44 20 49 4E  20 35 32 22 3A 99 00 32  |OLVED IN 52":..2|
00000E20: 16 97 04 99 22 20 20 4D  4F 56 45 53 2E 22 3A 99  |...."  MOVES.":.|
00000E30: 3A 99 00 57 16 9C 04 99  22 20 20 20 20 20 C8 41  |:..W...."     .A|
00000E40: 56 45 20 46 55 4E 20 41  4E 44 20 C7 4F 4F 44 20  |VE FUN AND .OOD |
00000E50: CC 55 43 4B 20 21 22 00  6E 16 A6 04 81 20 54 4D  |.UCK !".n.... TM|
00000E60: B2 31 20 A4 20 32 35 30  30 3A 82 20 54 4D 00 AB  |.1 . 2500:. TM..|
00000E70: 16 DC 05 8D 31 31 30 30  30 3A 81 20 58 B2 31 20  |....11000:. X.1 |
00000E80: A4 20 34 35 3A 42 28 58  29 B2 C5 28 CA 28 44 24  |. 45:B(X)..(.(D$|
00000E90: 2C 58 2C 31 29 29 3A 43  28 58 29 B2 42 28 58 29  |,X,1)):C(X).B(X)|
00000EA0: 3A 82 20 58 3A 46 32 24  B2 22 22 00 CE 16 E6 05  |:. X:F2$."".....|
00000EB0: 4D 56 B2 30 3A 97 35 33  32 38 31 2C 31 31 3A 99  |MV.0:.53281,11:.|
00000EC0: 20 43 4C 24 3B 55 43 24  3B 3A 89 33 30 32 00 FE  | CL$;UC$;:.302..|
00000ED0: 16 40 1F 8F 12 2D 20 43  4F 4E 56 45 52 54 20 27  |.@...- CONVERT '|
00000EE0: 46 52 4F 4D 2D 54 4F 27  20 54 4F 20 50 4F 53 49  |FROM-TO' TO POSI|
00000EF0: 54 49 4F 4E 20 49 4E 20  53 54 52 49 4E 47 00 11  |TION IN STRING..|
00000F00: 17 4A 1F 8B 20 48 B2 31  33 20 A7 20 48 B2 33 3A  |.J.. H.13 . H.3:|
00000F10: 8E 00 24 17 54 1F 8B 20  48 B2 31 37 20 A7 20 48  |..$.T.. H.17 . H|
00000F20: B2 37 3A 8E 00 38 17 5E  1F 8B 20 48 B2 32 32 20  |.7:..8.^.. H.22 |
00000F30: A7 20 48 B2 31 31 3A 8E  00 4C 17 68 1F 8B 20 48  |. H.11:..L.h.. H|
00000F40: B2 32 34 20 A7 20 48 B2  31 33 3A 8E 00 60 17 72  |.24 . H.13:..`.r|
00000F50: 1F 8B 20 48 B2 32 36 20  A7 20 48 B2 31 35 3A 8E  |.. H.26 . H.15:.|
00000F60: 00 74 17 7C 1F 8B 20 48  B2 32 38 20 A7 20 48 B2  |.t.|.. H.28 . H.|
00000F70: 31 37 3A 8E 00 88 17 86  1F 8B 20 48 B2 33 31 20  |17:....... H.31 |
00000F80: A7 20 48 B2 31 39 3A 8E  00 9C 17 90 1F 8B 20 48  |. H.19:....... H|
00000F90: B2 33 33 20 A7 20 48 B2  32 31 3A 8E 00 B0 17 9A  |.33 . H.21:.....|
00000FA0: 1F 8B 20 48 B2 33 35 20  A7 20 48 B2 32 33 3A 8E  |.. H.35 . H.23:.|
00000FB0: 00 C4 17 A4 1F 8B 20 48  B2 33 37 20 A7 20 48 B2  |...... H.37 . H.|
00000FC0: 32 35 3A 8E 00 D8 17 AE  1F 8B 20 48 B2 33 39 20  |25:....... H.39 |
00000FD0: A7 20 48 B2 32 37 3A 8E  00 EC 17 B8 1F 8B 20 48  |. H.27:....... H|
00000FE0: B2 34 32 20 A7 20 48 B2  32 39 3A 8E 00 00 18 C2  |.42 . H.29:.....|
00000FF0: 1F 8B 20 48 B2 34 34 20  A7 20 48 B2 33 31 3A 8E  |.. H.44 . H.31:.|
00001000: 00 14 18 CC 1F 8B 20 48  B2 34 36 20 A7 20 48 B2  |...... H.46 . H.|
00001010: 33 33 3A 8E 00 28 18 E0  1F 8B 20 48 B2 34 38 20  |33:..(.... H.48 |
00001020: A7 20 48 B2 33 35 3A 8E  00 3C 18 EA 1F 8B 20 48  |. H.35:..<.... H|
00001030: B2 35 33 20 A7 20 48 B2  33 39 3A 8E 00 50 18 F4  |.53 . H.39:..P..|
00001040: 1F 8B 20 48 B2 35 37 20  A7 20 48 B2 34 33 3A 8E  |.. H.57 . H.43:.|
00001050: 00 61 18 F9 1F 8B 20 48  B2 39 39 20 A7 38 33 31  |.a.... H.99 .831|
00001060: 30 00 76 18 FE 1F 8F 12  2D 20 4D 4F 56 45 20 49  |0.v.....- MOVE I|
00001070: 4E 56 41 4C 49 44 00 84  18 08 20 81 20 58 B2 31  |NVALID.... . X.1|
00001080: 20 A4 20 35 00 AB 18 12  20 99 20 44 4F 24 3B A3  | . 5.... . DO$;.|
00001090: 39 29 45 52 24 28 33 29  3B 3A 81 20 54 4D B2 31  |9)ER$(3);:. TM.1|
000010A0: 20 A4 20 35 30 30 3A 82  20 54 4D 00 D2 18 1C 20  | . 500:. TM.... |
000010B0: 99 20 44 4F 24 3B A3 39  29 45 52 24 28 30 29 3B  |. DO$;.9)ER$(0);|
000010C0: 3A 81 20 54 4D B2 31 20  A4 20 35 30 30 3A 82 20  |:. TM.1 . 500:. |
000010D0: 54 4D 00 E6 18 26 20 82  20 58 3A 46 32 24 B2 22  |TM...& . X:F2$."|
000010E0: 22 3A 89 33 30 32 00 01  19 6C 20 8F 12 2D 20 45  |":.302...l ..- E|
000010F0: 4E 44 20 50 55 5A 5A 4C  45 20 4D 45 53 53 41 47  |ND PUZZLE MESSAG|
00001100: 45 00 2E 19 76 20 99 20  44 4F 24 3B A3 37 29 45  |E...v . DO$;.7)E|
00001110: 4E 24 3B 3A 81 20 54 4D  B2 31 20 A4 20 31 35 30  |N$;:. TM.1 . 150|
00001120: 30 3A 82 20 54 4D 3A 99  20 43 4C 24 3A 80 00 4F  |0:. TM:. CL$:..O|
00001130: 19 10 27 8F 12 2D 20 42  55 49 4C 44 20 43 48 41  |..'..- BUILD CHA|
00001140: 52 41 43 54 45 52 20 47  52 41 50 48 49 43 53 00  |RACTER GRAPHICS.|
00001150: 8B 19 74 27 57 48 24 B2  C7 28 35 29 3A 42 4C 4B  |..t'WH$..(5):BLK|
00001160: 24 B2 C7 28 31 34 34 29  3A 52 45 44 24 B2 C7 28  |$..(144):RED$..(|
00001170: 32 38 29 3A 59 45 4C 24  B2 C7 28 31 35 38 29 3A  |28):YEL$..(158):|
00001180: 43 59 4E 24 B2 C7 28 31  35 39 29 00 B2 19 79 27  |CYN$..(159)...y'|
00001190: 50 52 50 24 B2 C7 28 31  35 36 29 3A 42 32 4C 55  |PRP$..(156):B2LU|
000011A0: 24 B2 C7 28 33 31 29 3A  43 4C 24 B2 C7 28 31 34  |$..(31):CL$..(14|
000011B0: 37 29 00 DD 19 7E 27 42  43 24 B2 C7 28 31 31 33  |7)...~'BC$..(113|
000011C0: 29 3A 44 57 24 B2 C7 28  31 37 29 3A 55 50 24 B2  |):DW$..(17):UP$.|
000011D0: C7 28 31 34 35 29 AA C7  28 31 34 35 29 00 FA 19  |.(145)..(145)...|
000011E0: 83 27 4C 46 24 B2 C7 28  31 35 37 29 AA C7 28 31  |.'LF$..(157)..(1|
000011F0: 35 37 29 AA C7 28 31 35  37 29 00 27 1A 86 27 81  |57)..(157).'..'.|
00001200: 20 58 B2 31 20 A4 20 32  34 3A 44 4F 24 B2 44 4F  | X.1 . 24:DO$.DO|
00001210: 24 AA 44 57 24 3A 82 20  58 3A 44 4F 24 B2 C7 28  |$.DW$:. X:DO$..(|
00001220: 31 39 29 AA 44 4F 24 00  40 1A 88 27 52 56 24 B2  |19).DO$.@..'RV$.|
00001230: C7 28 31 38 29 3A 52 4F  24 B2 C7 28 31 34 36 29  |.(18):RO$..(146)|
00001240: 00 59 1A 92 27 4C 43 24  B2 C7 28 31 34 29 3A 55  |.Y..'LC$..(14):U|
00001250: 43 24 B2 C7 28 31 34 32  29 00 A8 1A D8 27 41 24  |C$..(142)....'A$|
00001260: 28 31 29 B2 52 56 24 AA  52 45 44 24 AA 22 20 20  |(1).RV$.RED$."  |
00001270: 20 22 AA 52 4F 24 AA 44  57 24 AA 4C 46 24 AA 52  | ".RO$.DW$.LF$.R|
00001280: 56 24 AA 52 45 44 24 AA  22 20 22 AA 52 4F 24 AA  |V$.RED$." ".RO$.|
00001290: 57 48 24 AA 42 43 24 AA  52 56 24 AA 52 45 44 24  |WH$.BC$.RV$.RED$|
000012A0: AA 22 20 22 AA 52 4F 24  00 D3 1A E2 27 41 24 28  |." ".RO$....'A$(|
000012B0: 31 29 B2 41 24 28 31 29  AA 44 57 24 AA 4C 46 24  |1).A$(1).DW$.LF$|
000012C0: AA 52 56 24 AA 52 45 44  24 AA 22 20 20 20 22 AA  |.RV$.RED$."   ".|
000012D0: 52 4F 24 00 22 1B EC 27  41 24 28 32 29 B2 52 56  |RO$."..'A$(2).RV|
000012E0: 24 AA 52 45 44 24 AA 22  20 20 20 22 AA 52 4F 24  |$.RED$."   ".RO$|
000012F0: AA 44 57 24 AA 4C 46 24  AA 52 56 24 AA 52 45 44  |.DW$.LF$.RV$.RED|
00001300: 24 AA 22 20 22 AA 52 4F  24 AA 42 4C 24 AA 42 43  |$." ".RO$.BL$.BC|
00001310: 24 AA 52 56 24 AA 52 45  44 24 AA 22 20 22 AA 52  |$.RV$.RED$." ".R|
00001320: 4F 24 00 4D 1B F6 27 41  24 28 32 29 B2 41 24 28  |O$.M..'A$(2).A$(|
00001330: 32 29 AA 44 57 24 AA 4C  46 24 AA 52 56 24 AA 52  |2).DW$.LF$.RV$.R|
00001340: 45 44 24 AA 22 20 20 20  22 AA 52 4F 24 00 83 1B  |ED$."   ".RO$...|
00001350: 00 28 41 24 28 33 29 B2  52 56 24 AA 57 48 24 AA  |.(A$(3).RV$.WH$.|
00001360: 22 20 20 20 22 AA 52 4F  24 AA 44 57 24 AA 4C 46  |"   ".RO$.DW$.LF|
00001370: 24 AA 52 56 24 AA 57 48  24 AA 22 20 20 20 22 AA  |$.RV$.WH$."   ".|
00001380: 52 4F 24 00 AD 1B 0A 28  41 24 28 33 29 B2 41 24  |RO$....(A$(3).A$|
00001390: 28 33 29 AA 44 57 24 AA  4C 46 24 AA 52 56 24 AA  |(3).DW$.LF$.RV$.|
000013A0: 57 48 24 AA 22 20 20 20  22 AA 52 4F 24 00 E5 1B  |WH$."   ".RO$...|
000013B0: 14 28 41 24 28 34 29 B2  52 56 24 AA 52 45 44 24  |.(A$(4).RV$.RED$|
000013C0: AA 22 20 20 20 22 AA 52  4F 24 AA 44 57 24 AA 4C  |."   ".RO$.DW$.L|
000013D0: 46 24 AA 52 56 24 AA 52  45 44 24 AA 22 20 20 20  |F$.RV$.RED$."   |
000013E0: 22 AA 52 4F 24 00 10 1C  1E 28 41 24 28 34 29 B2  |".RO$....(A$(4).|
000013F0: 41 24 28 34 29 AA 44 57  24 AA 4C 46 24 AA 52 56  |A$(4).DW$.LF$.RV|
00001400: 24 AA 52 45 44 24 AA 22  20 20 20 22 AA 52 4F 24  |$.RED$."   ".RO$|
00001410: 00 29 1C 23 28 43 52 24  B2 52 56 24 AA 59 45 4C  |.).#(CR$.RV$.YEL|
00001420: 24 AA 22 20 22 AA 52 4F  24 00 51 1C 28 28 48 44  |$." ".RO$.Q.((HD|
00001430: 47 24 B2 52 56 24 AA 59  45 4C 24 AA 22 43 48 45  |G$.RV$.YEL$."CHE|
00001440: 43 4B 45 52 53 20 53 57  49 54 43 48 22 AA 52 4F  |CKERS SWITCH".RO|
00001450: 24 00 73 1C 2D 28 48 32  24 B2 4C 43 24 AA 42 32  |$.s.-(H2$.LC$.B2|
00001460: 24 AA 22 C3 48 45 43 4B  45 52 53 20 D3 57 49 54  |$.".HECKERS .WIT|
00001470: 43 48 22 00 A9 1C 32 28  46 33 24 B2 52 56 24 AA  |CH"...2(F3$.RV$.|
00001480: 43 59 4E 24 AA 22 46 52  4F 4D 20 3F 22 AA 52 4F  |CYN$."FROM ?".RO|
00001490: 24 3A 54 33 24 B2 52 56  24 AA 43 59 4E 24 AA 22  |$:T3$.RV$.CYN$."|
000014A0: 54 4F 20 3F 22 AA 52 4F  24 00 C7 1C 3C 28 4D 56  |TO ?".RO$...<(MV|
000014B0: 24 B2 52 56 24 AA 50 52  50 24 AA 22 4D 4F 56 45  |$.RV$.PRP$."MOVE|
000014C0: 20 23 22 AA 52 4F 24 00  D6 1C 41 28 8F 12 2D 20  | #".RO$...A(..- |
000014D0: 45 52 52 4F 52 53 00 06  1D 46 28 45 52 24 28 31  |ERRORS...F(ER$(1|
000014E0: 29 B2 52 56 24 AA 59 45  4C 24 AA 22 27 46 52 4F  |).RV$.YEL$."'FRO|
000014F0: 4D 27 20 50 4F 53 49 54  49 4F 4E 20 45 4D 50 54  |M' POSITION EMPT|
00001500: 59 22 AA 52 4F 24 00 37  1D 50 28 45 52 24 28 32  |Y".RO$.7.P(ER$(2|
00001510: 29 B2 52 56 24 AA 59 45  4C 24 AA 22 27 54 4F 27  |).RV$.YEL$."'TO'|
00001520: 20 50 4F 53 49 54 49 4F  4E 20 4F 43 43 55 50 49  | POSITION OCCUPI|
00001530: 45 44 22 AA 52 4F 24 00  6C 1D 5A 28 45 52 24 28  |ED".RO$.l.Z(ER$(|
00001540: 33 29 B2 52 56 24 AA 59  45 4C 24 AA 22 49 4E 56  |3).RV$.YEL$."INV|
00001550: 41 4C 49 44 20 27 46 52  4F 4D 2D 54 4F 27 20 50  |ALID 'FROM-TO' P|
00001560: 4F 53 49 54 49 4F 4E 22  AA 52 4F 24 00 98 1D 64  |OSITION".RO$...d|
00001570: 28 45 52 24 28 34 29 B2  52 56 24 AA 59 45 4C 24  |(ER$(4).RV$.YEL$|
00001580: AA 22 4D 4F 56 45 20 4E  4F 54 20 44 49 41 47 4F  |."MOVE NOT DIAGO|
00001590: 4E 41 4C 22 AA 52 4F 24  00 BF 1D 6E 28 45 52 24  |NAL".RO$...n(ER$|
000015A0: 28 35 29 B2 52 56 24 AA  59 45 4C 24 AA 22 49 4E  |(5).RV$.YEL$."IN|
000015B0: 56 41 4C 49 44 20 4D 4F  56 45 22 AA 52 4F 24 00  |VALID MOVE".RO$.|
000015C0: E8 1D A0 28 45 52 24 28  30 29 B2 22 20 20 20 20  |...(ER$(0)."    |
000015D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000015E0: 20 20 20 20 20 20 20 22  00 03 1E A5 28 8F 12 2D  |       "....(..-|
000015F0: 20 45 4E 44 20 50 55 5A  5A 4C 45 20 4D 45 53 53  | END PUZZLE MESS|
00001600: 41 47 45 00 34 1E AA 28  45 4E 24 B2 52 56 24 AA  |AGE.4..(EN$.RV$.|
00001610: 57 48 24 AA 22 54 48 41  4E 4B 53 20 46 4F 52 20  |WH$."THANKS FOR |
00001620: 50 4C 41 59 49 4E 47 2E  20 20 27 42 59 45 2E 22  |PLAYING.  'BYE."|
00001630: AA 52 4F 24 00 4C 1E AF  28 8F 12 2D 20 50 55 5A  |.RO$.L..(..- PUZ|
00001640: 5A 4C 45 20 53 4F 4C 56  45 44 20 21 00 7B 1E B4  |ZLE SOLVED !.{..|
00001650: 28 57 49 4E 24 B2 52 56  24 AA 57 48 24 AA 22 59  |(WIN$.RV$.WH$."Y|
00001660: 4F 55 20 53 4F 4C 56 45  44 20 54 48 45 20 50 55  |OU SOLVED THE PU|
00001670: 5A 5A 4C 45 20 21 22 AA  52 4F 24 00 94 1E BE 28  |ZZLE !".RO$....(|
00001680: 8F 12 2D 20 53 4F 55 4E  44 20 50 41 52 41 4D 45  |..- SOUND PARAME|
00001690: 54 45 52 53 00 D1 1E C8  28 56 4F B2 35 34 32 39  |TERS....(VO.5429|
000016A0: 36 3A 57 56 B2 35 34 32  37 36 3A 41 54 B2 35 34  |6:WV.54276:AT.54|
000016B0: 32 37 37 3A 48 49 B2 35  34 32 37 33 3A 4C 4F B2  |277:HI.54273:LO.|
000016C0: 35 34 32 37 32 3A 46 32  B2 30 3A 46 32 24 B2 22  |54272:F2.0:F2$."|
000016D0: 22 00 D7 1E 04 29 8E 00  ED 1E F7 2A 8F 12 2D 20  |"....).....*..- |
000016E0: 50 55 5A 5A 4C 45 20 46  4F 52 4D 41 54 00 24 1F  |PUZZLE FORMAT.$.|
000016F0: F8 2A 44 24 B2 22 33 33  31 33 33 33 32 33 33 33  |.*D$."3313332333|
00001700: 31 33 31 33 32 33 32 33  31 33 31 33 34 33 32 33  |1313232313134323|
00001710: 32 33 31 33 31 33 32 33  32 33 33 33 31 33 33 33  |2313132323331333|
00001720: 32 33 33 22 00 41 1F 52  2B 8F 12 2D 20 50 55 5A  |233".A.R+..- PUZ|
00001730: 5A 4C 45 20 53 4F 4C 56  45 44 20 46 4F 52 4D 41  |ZLE SOLVED FORMA|
00001740: 54 00 7A 1F 5C 2B 45 24  B2 22 33 33 32 33 33 33  |T.z.\+E$."332333|
00001750: 31 33 33 33 32 33 32 33  31 33 31 33 32 33 32 33  |1333232313132323|
00001760: 34 33 31 33 31 33 32 33  32 33 31 33 31 33 33 33  |4313132323131333|
00001770: 32 33 33 33 31 33 33 22  3A 8E 00 00 00           |2333133":....   |
..,.....- 'CHECKERS SWITCH' FOR COMMODOR
E 64.B.....- DANIEL MILLER.Y.....- 2815 
34 STREET.Q.....- ASTORIA, QUEENS.......
- NEW YORK, NEW YORK   11103.......MARCH
 30,1983.S.....*************************
***********...... B(45),C(45),A$(4),ER$(
6)......10000:.1005...#...- SOUND ROUTIN
E.A.(..VO,15:.WV,17:.AT,15:.HI,68:.LO,14
9.].2.. TM.1 . 100:. TM:.WV,0...7..VO,15
:.WV,17:.AT,15:.HI,34:.LO,75...<.. TM.1 
. 100:. TM:.WV,0:....,...- PUZZLE SCREEN
.O.... G(19);.13);HDG$;.../.X.49:. Y.115
3 . 1179 .3:.Y,X:X.X.1:. Y...1.. H(DO$,4
).J.6...8)A$(B(1))UP$A$(B(2))UP$A$(B(3))
UP$A$(B(4))UP$A$(B(5))UP$;.}.;...21)A$(B
(6))UP$A$(B(7))UP$A$(B(8))UP$A$(B(9))...
=.. E(F2$)..1 .320...>..40...@...8)A$(B(
10))UP$A$(B(11))UP$A$(B(12))UP$A$(B(13))
UP$A$(B(14))UP$;...E...21)A$(B(15))UP$A$
(B(16))UP$A$(B(17))UP$A$(B(18)).,.G.. E(
F2$)..2 .330.4.H..40.Z.J...8)A$(B(19))UP
$A$(B(20))UP$A$(B(21))UP$A$(B(22))UP$A$(
B(23))UP$;...O...21)A$(B(24))UP$A$(B(25)
)UP$A$(B(26))UP$A$(B(27)).F.Q.. E(F2$)..
3 .340.N.R..40...T...8)A$(B(28))UP$A$(B(
29))UP$A$(B(30))UP$A$(B(31))UP$A$(B(32))
UP$;.K.Y...21)A$(B(33))UP$A$(B(34))UP$A$
(B(35))UP$A$(B(36)).`.[.. E(F2$)..4 .350
.H.\..40...^...8)A$(B(37))UP$A$(B(38))UP
$A$(B(39))UP$A$(B(40))UP$A$(B(41))UP$;..
.C...21)A$(B(42))UP$A$(B(43))UP$A$(B(44)
)UP$A$(B(45))...E.. E(F2$)..5 .410...F..
40./...X.49:. Y.1230 . 1750 .120:.Y,X:X.
X.1:. Y.H....H(DO$,22);.18);MV$;.J....H(
DO$,24);.12);F3$;.27);T3$;.......- PUZZL
E SOLVED ?...... D$.E$ .650...... ZZ.1 .
 . TM.1 . 2000:. TM:..J.....- MOVE ROUTI
NE......H(DO$,24);.20)"    ";.31)"    ";
......H(DO$,24);.20)"   ";H(DO$,24);.20)
CR$;.2.... F$:. F$."" .522.H.... G$:. G$
."" .525.H...FR$.F$.G$:.FR$;:F$."":G$.""
.}.... FR$."99" .8310...... H(FR$,1)."1"
 . H(FR$,1)."5" . FR$."":.520...... I(FR
$,1)."1" . I(FR$,1)."9" . FR$."":.520...
..H.E(FR$):.8000:FR.H:C(FR).E(J(D$,FR,1)
).7....H(DO$,24);.31);"    ";H(DO$,24);.
32)CR$;.M.... F$:. F$."" .542.C.!.. G$:.
 G$."" .545...$.TU$.F$.G$:. TU$;:F$."":G
$.""...&.. H(TU$,1)."1" . H(TU$,1)."5" .
 TU$."":.540...).. I(TU$,1)."1" . I(TU$,
1)."9" . TU$."":.540...+.H.E(TU$):.8000:
TU.H:C(TU).E(J(D$,TU,1)).2...Z1.E(H(FR$,
1)):Z2.E(I(FR$,1)).T.0.Z3.E(H(TU$,1)):Z4
.E(I(TU$,1)).E.5.F2$.H(FR$,1)...:.FR$.J(
D$,FR,1):TU$.J(D$,TU,1)...D.. FR$."4" . 
ER.1:.900.E.E.. TU$."1" . TU$."2" . ER.2
:.900...F.. FR$."3" . TU$."3" . ER.3:.90
0...H.. Z1.Z3 . Z2.Z4 . ER.4:.900.).N.C.
C(TU):C(TU).C(FR):C(FR).C.U.X.D$."":. X.
1 . 45:D$.D$.I(D(C(X)),1):. X.{.B..H(DO$
,24);.20)"    ";.31)"    ";. .L.. X.1 . 
45:B(X).E(J(D$,X,1)):. X...V.MV.MV.1:MO$
.RV$.WH$.D(MV).RO$:.H(DO$,22);.25);MO$;:
.302...... X.1 . 5......H(DO$,24);.8);WI
N$;:. TM.1 . 500:. TM.G.... H(DO$,24);.8
);ER$(0);:. TM.1 . 500:. TM:. X.Q....831
0.N.....- FLASH ERROR MESSAGES.....F2$."
":. X.1 . 5.A....H(DO$,25);.22.(C(ER$(ER
)).2));ER$(ER);:. TM.1 . 500:. TM......H
(DO$,25);.9);ER$(0);:. TM.1 . 500:. TM:.
 X:.302.......- INSTRUCTIONS...... 53281
,1.:....CL$;H(DO$,3);.13);H2$;:.:..H....
"      PREPARE TO TEST YOUR PUZZLER'S":.
......"  SKILLS.  EIGHT WHITE CHECKERS A
ND":..D...."  EIGHT BLACK CHECKERS ARE P
OSITIONED":......."  ON OPPOSITE SIDES O
F THE CHECKERBOARD ";:......."  AS SHOWN
:".@.$.ZZ.1:. TM.1 . 2000:. TM:. CL$;UC$
;:.1500:.53281,1.E....CL$;H(DO$,3);.13);
H2$;:.:.:ZZ.0...8.."    YOUR GOAL IS TO 
SWITCH THE CHECKERS":..G.B.."  TO THE RE
VERSE SIDES OF THE BOARD.  A":....L.."  
CHECKER CAN BE MOVED TO A RED SQUARE":..
&.V.."  OR CAN BE JUMPED OVER ANOTHER PI
ECE":..V.`.."  TO ANOTHER RED SQUARE.  W
HITE PIECES":....J.."  MOVE TO THE RIGHT
; BLACK CHECKERS":....T.."  CAN MOVE ONL
Y TO THE LEFT."...~.. TM.1 . 3000:. TM..
....CL$;H(DO$,3);.13);LC$;"CHECKERS SWIT
CH";:.:......."     THIS PUZZLE CAN BE S
OLVED IN 52":..2...."  MOVES.":.:..W....
"     HAVE FUN AND GOOD LUCK !".N.... TM
.1 . 2500:. TM......11000:. X.1 . 45:B(X
).E(J(D$,X,1)):C(X).B(X):. X:F2$."".N...
MV.0:.53281,11:. CL$;UC$;:.302...@...- C
ONVERT 'FROM-TO' TO POSITION IN STRING..
.J.. H.13 . H.3:..$.T.. H.17 . H.7:..8.^
.. H.22 . H.11:..L.H.. H.24 . H.13:..`.R
.. H.26 . H.15:..T.|.. H.28 . H.17:.....
.. H.31 . H.19:....... H.33 . H.21:.....
.. H.35 . H.23:..D.... H.37 . H.25:..X..
.. H.39 . H.27:....... H.42 . H.29:....B
.. H.44 . H.31:....L.. H.46 . H.33:..(..
.. H.48 . H.35:..<.... H.53 . H.39:..P..
.. H.57 . H.43:..A.... H.99 .8310.V.....
- MOVE INVALID.... . X.1 . 5.... . DO$;.
9)ER$(3);:. TM.1 . 500:. TM.R.. . DO$;.9
)ER$(0);:. TM.1 . 500:. TM...& . X:F2$."
":.302...L ..- END PUZZLE MESSAGE...V . 
DO$;.7)EN$;:. TM.1 . 1500:. TM:. CL$:..O
..'..- BUILD CHARACTER GRAPHICS...T'WH$.
G(5):BLK$.G(144):RED$.G(28):YEL$.G(158):
CYN$.G(159)...Y'PRP$.G(156):B2LU$.G(31):
CL$.G(147)...~'BC$.G(113):DW$.G(17):UP$.
G(145).G(145)....'LF$.G(157).G(157).G(15
7).'..'. X.1 . 24:DO$.DO$.DW$:. X:DO$.G(
19).DO$.@..'RV$.G(18):RO$.G(146).Y..'LC$
.G(14):UC$.G(142)...X'A$(1).RV$.RED$."  
 ".RO$.DW$.LF$.RV$.RED$." ".RO$.WH$.BC$.
RV$.RED$." ".RO$.S..'A$(1).A$(1).DW$.LF$
.RV$.RED$."   ".RO$."..'A$(2).RV$.RED$."
   ".RO$.DW$.LF$.RV$.RED$." ".RO$.BL$.BC
$.RV$.RED$." ".RO$.M..'A$(2).A$(2).DW$.L
F$.RV$.RED$."   ".RO$....(A$(3).RV$.WH$.
"   ".RO$.DW$.LF$.RV$.WH$."   ".RO$....(
A$(3).A$(3).DW$.LF$.RV$.WH$."   ".RO$...
.(A$(4).RV$.RED$."   ".RO$.DW$.LF$.RV$.R
ED$."   ".RO$....(A$(4).A$(4).DW$.LF$.RV
$.RED$."   ".RO$.).#(CR$.RV$.YEL$." ".RO
$.Q.((HDG$.RV$.YEL$."CHECKERS SWITCH".RO
$.S.-(H2$.LC$.B2$."CHECKERS SWITCH"...2(
F3$.RV$.CYN$."FROM ?".RO$:T3$.RV$.CYN$."
TO ?".RO$.G.<(MV$.RV$.PRP$."MOVE #".RO$.
V.A(..- ERRORS...F(ER$(1).RV$.YEL$."'FRO
M' POSITION EMPTY".RO$.7.P(ER$(2).RV$.YE
L$."'TO' POSITION OCCUPIED".RO$.L.Z(ER$(
3).RV$.YEL$."INVALID 'FROM-TO' POSITION"
.RO$...D(ER$(4).RV$.YEL$."MOVE NOT DIAGO
NAL".RO$...N(ER$(5).RV$.YEL$."INVALID MO
VE".RO$... (ER$(0)."                    
       "....(..- END PUZZLE MESSAGE.4..(
EN$.RV$.WH$."THANKS FOR PLAYING.  'BYE."
.RO$.L..(..- PUZZLE SOLVED !.{..(WIN$.RV
$.WH$."YOU SOLVED THE PUZZLE !".RO$....(
..- SOUND PARAMETERS.Q.H(VO.54296:WV.542
76:AT.54277:HI.54273:LO.54272:F2.0:F2$."
".W..).....*..- PUZZLE FORMAT.$..*D$."33
1333233313132323131343232313132323331333
233".A.R+..- PUZZLE SOLVED FORMAT.Z.\+E$
."33233313332323131323234313132323131333
2333133":....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL