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

B1

FILE INFORMATION

FILENAME(S): B1

FILE TYPE(S): PRG

FILE SIZE: 2.7K

FIRST SEEN: 2025-11-30 21:05:53

APPEARS ON: 1 disk(s)

FILE HASH

687118929a3114003fd62a138ba1bb71db0d1f5baca5a8b72437f518da851519

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
CAD GEM B1 PRG DuncanTwain 20 9 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 18 08 05 00 41 B2  41 AA 31 3A 91 20 41 20  |......A.A.1:. A |
00000010: 89 20 31 30 2C 31 35 30  00 38 08 0A 00 99 22 93  |. 10,150.8....".|
00000020: 22 3A 57 B2 33 39 3A 48  B2 36 3A 58 B2 30 3A 59  |":W.39:H.6:X.0:Y|
00000030: B2 31 3A 8D 38 30 3A 99  00 62 08 14 00 99 22 DD  |.1:.80:..b....".|
00000040: D5 C0 C9 D5 C0 C9 B0 C0  C9 20 D5 C0 C9 B0 C0 AE  |......... ......|
00000050: D5 B2 C9 20 20 20 42 41  43 4B 55 50 20 4D 41 4B  |...   BACKUP MAK|
00000060: 45 52 00 88 08 1E 00 99  22 DD DD 20 20 DD 20 DD  |ER......"..  . .|
00000070: DD 20 DD 20 DD 20 20 AB  C0 20 DD DD DD 20 20 20  |. . .  .. ...   |
00000080: 20 20 20 20 20 28 43 29  00 B0 08 28 00 99 22 DD  |     (C)...(..".|
00000090: DD 20 20 AB C0 B3 DD 20  DD 20 DD 20 AE DD 20 20  |.  .... . . ..  |
000000A0: DD 20 DD 20 20 20 20 20  20 31 39 38 35 20 42 59  |. .      1985 BY|
000000B0: 00 DE 08 32 00 99 22 DD  CA C0 CB CB 20 CA AD C0  |...2.."..... ...|
000000C0: CB 20 CA C0 CB AD C0 BD  CB 20 CA 20 20 20 43 4F  |. ....... .   CO|
000000D0: 4D 50 55 54 45 52 20 54  4F 4F 4C 53 20 22 00 05  |MPUTER TOOLS "..|
000000E0: 09 3C 00 99 22 11 20 20  20 20 20 20 20 20 52 45  |.<..".        RE|
000000F0: 56 2E 20 33 2E 34 20 42  59 20 45 56 45 4C 59 4E  |V. 3.4 BY EVELYN|
00000100: 20 52 4F 53 41 00 13 09  46 00 93 22 42 32 22 2C  | ROSA...F.."B2",|
00000110: 38 2C 31 00 42 09 50 00  50 24 B2 22 13 11 11 11  |8,1.B.P.P$."....|
00000120: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00000130: 11 11 11 11 11 22 3A 99  C8 28 50 24 2C 59 AA 31  |.....":..(P$,Y.1|
00000140: 29 3B 00 74 09 5A 00 50  31 24 B2 22 C0 C0 C0 C0  |);.t.Z.P1$."....|
00000150: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000160: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000170: C0 C0 C0 22 00 A6 09 64  00 50 32 24 B2 22 20 20  |..."...d.P2$."  |
00000180: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000190: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001A0: 20 20 20 20 20 22 00 BF  09 6E 00 99 A3 58 29 22  |     "...n...X)"|
000001B0: D5 22 C8 28 50 31 24 2C  57 AB 32 29 22 C9 22 00  |.".(P1$,W.2)".".|
000001C0: E4 09 78 00 81 57 4E B2  31 A4 48 AB 32 3A 99 A3  |..x..WN.1.H.2:..|
000001D0: 58 29 22 DD 22 C8 28 50  32 24 2C 57 AB 32 29 22  |X)".".(P2$,W.2)"|
000001E0: DD 22 3A 82 00 0C 0A 82  00 99 A3 58 29 22 CA 22  |.":........X)"."|
000001F0: C8 28 50 31 24 2C 57 AB  32 29 22 CB 22 C8 28 50  |.(P1$,W.2)".".(P|
00000200: 24 2C 59 AA 31 29 A3 58  29 3B 3A 8E 00 22 0A 96  |$,Y.1).X);:.."..|
00000210: 00 4E 24 B2 C7 28 31 29  3A 4D 57 24 B2 22 4D 2D  |.N$..(1):MW$."M-|
00000220: 57 22 00 59 0A 9B 00 9F  20 31 2C 38 2C 31 35 3A  |W".Y.... 1,8,15:|
00000230: 9F 32 2C 38 2C 32 2C 22  23 30 22 3A 98 31 2C 22  |.2,8,2,"#0":.1,"|
00000240: 55 31 22 3B 32 3B 30 3B  31 38 3B 30 3A 98 31 2C  |U1";2;0;18;0:.1,|
00000250: 22 42 2D 50 22 3B 32 3B  32 00 7E 0A A0 00 98 31  |"B-P";2;2.~....1|
00000260: 2C C7 28 36 35 29 3A 84  31 2C 45 2C 45 24 2C 45  |,.(65):.1,E,E$,E|
00000270: 54 2C 45 53 3A 8B 45 B2  30 A7 20 31 37 30 00 AE  |T,ES:.E.0. 170..|
00000280: 0A A2 00 53 52 B2 31 3A  8D 20 32 31 30 3A 99 45  |...SR.1:. 210:.E|
00000290: 3B 45 24 3B 45 54 3B 45  53 3A 99 22 20 20 54 52  |;E$;ET;ES:."  TR|
000002A0: 59 20 41 47 41 49 4E 3F  20 28 59 2F 4E 29 00 CA  |Y AGAIN? (Y/N)..|
000002B0: 0A A4 00 97 31 39 38 2C  30 3A 92 31 39 38 2C 31  |....198,0:.198,1|
000002C0: 3A 8B 41 24 B2 22 59 22  A7 8A 00 DB 0A A5 00 8B  |:.A$."Y"........|
000002D0: 41 24 B3 B1 22 4E 22 A7  31 36 34 00 E7 0A A6 00  |A$.."N".164.....|
000002E0: 9E 20 36 34 37 36 37 00  10 0B AA 00 98 31 2C 4D  |. 64767......1,M|
000002F0: 57 24 4E 24 4E 24 4E 24  C7 28 36 35 29 3A 98 31  |W$N$N$N$.(65):.1|
00000300: 2C C7 28 32 29 C7 28 37  29 4E 24 C7 28 36 35 29  |,.(2).(7)N$.(65)|
00000310: 00 25 0B AF 00 98 31 2C  22 55 32 22 3B 32 3B 30  |.%....1,"U2";2;0|
00000320: 3B 31 38 3B 30 00 3A 0B  B4 00 98 31 2C 22 55 31  |;18;0.:....1,"U1|
00000330: 22 3B 32 3B 30 3B 31 38  3B 33 00 52 0B B9 00 A1  |";2;0;18;3.R....|
00000340: 23 31 2C 41 24 3A 41 B2  C6 28 41 24 AA C7 28 30  |#1,A$:A..(A$..(0|
00000350: 29 29 00 7D 0B BB 00 A1  23 31 2C 41 24 3A 41 B2  |)).}....#1,A$:A.|
00000360: C6 28 41 24 AA C7 28 30  29 29 B1 32 A7 20 53 52  |.(A$..(0)).2. SR|
00000370: B2 31 3A 8D 20 32 30 30  3A 89 31 36 36 00 AF 0B  |.1:. 200:.166...|
00000380: BE 00 41 24 B2 C7 28 41  AA 31 29 3A 98 31 2C 22  |..A$..(A.1):.1,"|
00000390: 42 2D 50 22 3B 32 3B 35  3A 98 32 2C 41 24 3A 98  |B-P";2;5:.2,A$:.|
000003A0: 31 2C 22 55 32 22 3B 32  3B 30 3B 31 38 3B 33 00  |1,"U2";2;0;18;3.|
000003B0: D1 0B C8 00 98 31 2C 22  55 31 22 3B 32 3B 30 3B  |.....1,"U1";2;0;|
000003C0: 31 38 3B 30 3A 98 31 2C  22 42 2D 50 22 3B 32 3B  |18;0:.1,"B-P";2;|
000003D0: 32 00 DB 0B D2 00 98 32  2C 4E 24 00 03 0C DC 00  |2......2,N$.....|
000003E0: 98 31 2C 22 55 32 22 3B  32 3B 30 3B 31 38 3B 30  |.1,"U2";2;0;18;0|
000003F0: 3A A0 32 3A A0 31 3A 8B  20 53 52 A7 20 53 52 B2  |:.2:.1:. SR. SR.|
00000400: 30 3A 8E 00 4C 0C E6 00  99 22 13 11 11 11 11 11  |0:..L...."......|
00000410: 11 11 11 11 11 11 11 11  20 20 20 20 20 20 50 4C  |........      PL|
00000420: 41 43 45 20 41 20 42 4C  41 4E 4B 20 44 49 53 4B  |ACE A BLANK DISK|
00000430: 20 49 4E 20 54 48 45 20  44 52 49 56 45 2E 20 50  | IN THE DRIVE. P|
00000440: 52 45 53 53 20 52 45 54  55 52 4E 22 00 71 0C EB  |RESS RETURN".q..|
00000450: 00 97 31 39 38 2C 30 3A  92 31 39 38 2C 31 3A A1  |..198,0:.198,1:.|
00000460: 41 24 3A 8B 41 24 B3 B1  C7 28 31 33 29 A7 32 33  |A$:.A$...(13).23|
00000470: 35 00 93 0C F0 00 99 22  46 4F 52 4D 41 54 54 49  |5......"FORMATTI|
00000480: 4E 47 2E 20 50 4C 45 41  53 45 20 57 41 49 54 2E  |NG. PLEASE WAIT.|
00000490: 2E 2E 22 00 C7 0C F5 00  9F 31 2C 38 2C 31 35 2C  |.."......1,8,15,|
000004A0: 22 4E 30 3A 43 41 44 20  47 45 4D 2C D2 D3 22 3A  |"N0:CAD GEM,..":|
000004B0: 84 31 2C 45 2C 45 24 2C  45 54 2C 45 53 3A 8B 45  |.1,E,E$,ET,ES:.E|
000004C0: B2 30 A7 20 32 35 30 00  10 0D F6 00 99 45 3B 45  |.0. 250......E;E|
000004D0: 24 3B 45 54 3B 45 53 3A  81 49 B2 30 A4 32 30 30  |$;ET;ES:.I.0.200|
000004E0: 30 3A 82 3A 99 22 91 91  20 20 20 20 20 20 20 20  |0:.:."..        |
000004F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000500: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
00000510: 00 48 0D F7 00 99 22 20  20 20 20 20 20 20 20 20  |.H...."         |
00000520: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000530: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
00000540: 3A A0 31 3A 89 32 33 30  00 77 0D FA 00 9F 20 32  |:.1:.230.w.... 2|
00000550: 2C 38 2C 32 2C 22 23 30  22 3A 98 31 2C 22 55 31  |,8,2,"#0":.1,"U1|
00000560: 22 3B 32 3B 30 3B 31 38  3B 33 3A 98 31 2C 22 42  |";2;0;18;3:.1,"B|
00000570: 2D 50 22 3B 32 3B 35 00  8D 0D FF 00 98 32 2C C7  |-P";2;5......2,.|
00000580: 28 32 31 30 29 20 3A A0  32 3A A0 31 3A 00 AD 0D  |(210) :.2:.1:...|
00000590: 2C 01 4D 52 24 B2 22 4D  2D 52 22 3A 4D 57 24 B2  |,.MR$."M-R":MW$.|
000005A0: 22 4D 2D 57 22 3A 5A 24  B2 C7 28 30 29 00 CB 0D  |"M-W":Z$..(0)...|
000005B0: 36 01 49 30 B2 30 3A 49  31 B2 30 3A 49 32 B2 30  |6.I0.0:I1.0:I2.0|
000005C0: 3A 42 B2 30 3A 41 24 B2  22 54 22 00 DE 0D 40 01  |:B.0:A$."T"...@.|
000005D0: 43 24 B2 22 43 4F 44 45  22 3A 53 52 B2 30 00 F3  |C$."CODE":SR.0..|
000005E0: 0D 4A 01 54 52 B2 33 30  3A 53 45 B2 31 30 3A 43  |.J.TR.30:SE.10:C|
000005F0: 4F B2 30 00 FD 0D 54 01  89 20 35 31 30 00 13 0E  |O.0...T.. 510...|
00000600: 5E 01 8F 20 2D 2D 2D 2D  2D 2D 53 45 4E 44 20 43  |^.. ------SEND C|
00000610: 4F 44 45 00 29 0E 68 01  81 49 B2 30 A4 54 4C 3A  |ODE.).h..I.0.TL:|
00000620: 49 30 B2 C2 28 54 AA 49  29 00 47 0E 72 01 98 31  |I0..(T.I).G.r..1|
00000630: 2C 4D 57 24 C7 28 49 29  C7 28 42 AA 33 29 C7 28  |,MW$.(I).(B.3).(|
00000640: 31 29 C7 28 49 30 29 00  4F 0E 7C 01 82 3A 8E 00  |1).(I0).O.|..:..|
00000650: 68 0E 86 01 8F 2D 2D 2D  2D 2D 2D 2D 57 41 49 54  |h....-------WAIT|
00000660: 20 46 4F 52 20 4B 45 59  00 8E 0E 90 01 97 31 39  | FOR KEY......19|
00000670: 38 2C 30 3A 92 20 31 39  38 2C 31 3A A1 41 24 3A  |8,0:. 198,1:.A$:|
00000680: 8B 41 24 B3 B1 C7 28 31  33 29 A7 34 30 30 00 A3  |.A$...(13).400..|
00000690: 0E 9A 01 3A 20 20 8B 20  53 52 20 A7 20 53 52 B2  |...:  . SR . SR.|
000006A0: 30 3A 8E 00 B7 0E A4 01  8F 2D 2D 2D 2D 2D 2D 2D  |0:.......-------|
000006B0: 4A 4F 42 20 51 55 45 00  D4 0E AE 01 43 4F B2 32  |JOB QUE.....CO.2|
000006C0: 32 34 3A 20 8F 20 45 58  45 43 55 54 45 20 42 55  |24: . EXECUTE BU|
000006D0: 46 46 45 52 00 F0 0E B8  01 3A 20 98 31 2C 4D 57  |FFER.....: .1,MW|
000006E0: 24 C7 28 36 33 29 5A 24  C7 28 31 29 C7 28 42 29  |$.(63)Z$.(1).(B)|
000006F0: 00 13 0F C2 01 98 31 2C  4D 57 24 C7 28 36 AA 42  |......1,MW$.(6.B|
00000700: AC 32 29 5A 24 C7 28 32  29 C7 28 54 52 29 C7 28  |.2)Z$.(2).(TR).(|
00000710: 53 45 29 00 2F 0F CC 01  3A 20 98 31 2C 4D 57 24  |SE)./...: .1,MW$|
00000720: C7 28 42 29 5A 24 C7 28  31 29 C7 28 43 4F 29 00  |.(B)Z$.(1).(CO).|
00000730: 47 0F D6 01 98 31 2C 4D  52 24 C7 28 42 29 5A 24  |G....1,MR$.(B)Z$|
00000740: 3A A1 23 31 2C 41 24 00  63 0F E0 01 3A 20 41 B2  |:.#1,A$.c...: A.|
00000750: C6 28 41 24 AA 5A 24 29  3A 8B 41 B1 31 32 37 A7  |.(A$.Z$):.A.127.|
00000760: 34 37 30 00 70 0F EA 01  8B 41 B3 B1 31 A7 20 90  |470.p....A..1. .|
00000770: 00 9B 0F F4 01 8E 20 20  20 20 20 20 20 20 20 20  |......          |
00000780: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000790: 20 20 20 20 20 20 20 20  20 20 20 00 B6 0F FE 01  |           .....|
000007A0: 43 4F B2 31 37 36 3A 54  52 B2 33 35 3A 53 45 B2  |CO.176:TR.35:SE.|
000007B0: 30 3A 53 52 B2 31 00 D0  0F 08 02 9F 31 2C 38 2C  |0:SR.1......1,8,|
000007C0: 31 35 2C 22 49 30 22 3A  8D 34 35 30 3A 49 B2 30  |15,"I0":.450:I.0|
000007D0: 00 DA 0F 12 02 54 52 B2  33 37 00 EA 0F 1C 02 54  |.....TR.37.....T|
000007E0: B2 28 54 52 AB 33 35 29  AC 32 00 1A 10 26 02 3A  |.(TR.35).2...&.:|
000007F0: 20 98 31 2C 4D 52 24 5A  24 C7 28 32 38 29 3A A1  | .1,MR$Z$.(28):.|
00000800: 23 31 2C 43 24 3A 43 4F  B2 C6 28 43 24 AA 5A 24  |#1,C$:CO..(C$.Z$|
00000810: 29 3A 53 45 B2 43 4F AF  A8 33 00 36 10 30 02 8F  |):SE.CO..3.6.0..|
00000820: 2D 2D 2D 2D 2D 4D 4F 56  45 20 4F 55 54 20 54 4F  |-----MOVE OUT TO|
00000830: 20 54 52 41 43 4B 00 41  10 3A 02 81 49 B2 31 A4  | TRACK.A.:..I.1.|
00000840: 54 00 5C 10 44 02 3A 20  43 4F B2 28 43 4F AA 31  |T.\.D.: CO.(CO.1|
00000850: 29 AF 33 3A 49 30 B2 53  45 AA 43 4F 00 79 10 4E  |).3:I0.SE.CO.y.N|
00000860: 02 3A 20 98 31 2C 4D 57  24 5A 24 C7 28 32 38 29  |.: .1,MW$Z$.(28)|
00000870: C7 28 31 29 C7 28 49 30  29 00 8E 10 58 02 82 3A  |.(1).(I0)...X..:|
00000880: 49 B2 30 3A 8B 53 52 A7  53 52 B2 30 3A 8E 00 A2  |I.0:.SR.SR.0:...|
00000890: 10 62 02 8F 2D 2D 2D 2D  2D 53 45 4E 44 20 43 4F  |.b..-----SEND CO|
000008A0: 44 45 00 C5 10 67 02 45  54 B2 32 34 3A 53 45 B2  |DE...g.ET.24:SE.|
000008B0: 30 3A 81 49 B2 30 A4 39  3A 81 49 30 B2 53 45 A4  |0:.I.0.9:.I0.SE.|
000008C0: 45 54 3A 87 41 00 DD 10  68 02 98 31 2C 4D 57 24  |ET:.A...h..1,MW$|
000008D0: C7 28 49 30 29 C7 28 33  29 C7 28 41 29 00 F8 10  |.(I0).(3).(A)...|
000008E0: 69 02 82 3A 8C 3A 53 45  B2 45 54 AA 31 3A 45 54  |i..:.:SE.ET.1:ET|
000008F0: B2 45 54 AA 32 35 3A 82  00 15 11 6C 02 54 B2 31  |.ET.25:....l.T.1|
00000900: 34 34 AC 32 35 36 3A 54  4C B2 37 34 3A 42 B2 31  |44.256:TL.74:B.1|
00000910: 3A 8D 33 36 30 00 2C 11  76 02 8F 2D 2D 2D 2D 2D  |:.360.,.v..-----|
00000920: 45 58 45 43 55 54 45 20  43 4F 44 45 00 3C 11 80  |EXECUTE CODE.<..|
00000930: 02 49 30 B2 54 52 3A 54  52 B2 33 35 00 54 11 8A  |.I0.TR:TR.35.T..|
00000940: 02 49 B2 30 3A 42 B2 31  3A 43 4F B2 32 32 34 3A  |.I.0:B.1:CO.224:|
00000950: 8D 34 34 30 00 5E 11 94  02 54 52 B2 49 30 00 98  |.440.^...TR.I0..|
00000960: 11 9E 02 54 B2 28 54 52  AB 33 35 29 AC 32 3A 98  |...T.(TR.35).2:.|
00000970: 31 2C 4D 52 24 5A 24 C7  28 32 38 29 3A A1 23 31  |1,MR$Z$.(28):.#1|
00000980: 2C 43 24 3A 43 4F B2 C6  28 43 24 AA 5A 24 29 3A  |,C$:CO..(C$.Z$):|
00000990: 53 45 B2 43 4F AF A8 33  00 A3 11 A8 02 81 49 B2  |SE.CO..3......I.|
000009A0: 30 A4 54 00 BE 11 B2 02  3A 20 43 4F B2 28 43 4F  |0.T.....: CO.(CO|
000009B0: AB 31 29 AF 33 3A 49 30  B2 53 45 AA 43 4F 00 E0  |.1).3:I0.SE.CO..|
000009C0: 11 BC 02 3A 20 98 31 2C  4D 57 24 5A 24 C7 28 32  |...: .1,MW$Z$.(2|
000009D0: 38 29 C7 28 31 29 C7 28  49 30 29 3A 82 3A A0 31  |8).(1).(I0):.:.1|
000009E0: 00 1C 12 C1 02 99 22 20  20 20 50 4C 41 43 45 20  |......"   PLACE |
000009F0: 54 48 45 20 4D 41 53 54  45 52 20 44 49 53 4B 20  |THE MASTER DISK |
00000A00: 49 4E 20 54 48 45 20 44  52 49 56 45 2E 20 50 52  |IN THE DRIVE. PR|
00000A10: 45 53 53 20 52 45 54 55  52 4E 2E 22 00 41 12 C2  |ESS RETURN.".A..|
00000A20: 02 97 31 39 38 2C 30 3A  92 31 39 38 2C 31 3A A1  |..198,0:.198,1:.|
00000A30: 41 24 3A 8B 41 24 B3 B1  C7 28 31 33 29 A7 37 30  |A$:.A$...(13).70|
00000A40: 36 00 4F 12 C4 02 93 22  42 33 22 2C 38 2C 31 00  |6.O...."B3",8,1.|
00000A50: 9F 12 C6 02 83 38 32 2C  37 39 2C 38 33 2C 36 35  |.....82,79,83,65|
00000A60: 2C 39 32 2C 36 39 2C 38  36 2C 36 39 2C 37 36 2C  |,92,69,86,69,76,|
00000A70: 38 39 2C 37 38 2C 39 32  2C 38 37 2C 36 39 2C 38  |89,78,92,87,69,8|
00000A80: 33 2C 37 36 2C 36 39 2C  38 39 2C 39 32 2C 37 34  |3,76,69,89,92,74|
00000A90: 2C 36 35 2C 37 37 2C 36  39 2C 38 33 2C 39 32 00  |,65,77,69,83,92.|
00000AA0: 00 00                                             |..              |
......A.A.1:. A . 10,150.8....".":W.39:H
.6:X.0:Y.1:.80:..B....".U.IU.I..I U.I...
U.I   BACKUP MAKER......"..  . .. . .  .
. ...        (C)...(.."..  .... . . ..  
. .      1985 BY...2..".J.KK J..K J.K...
K J   COMPUTER TOOLS "...<..".        RE
V. 3.4 BY EVELYN ROSA...F.."B2",8,1.B.P.
P$.".........................":.H(P$,Y.1
);.T.Z.P1$."............................
..........."...D.P2$."                  
                     "...N...X)"U"H(P1$,
W.2)"I"...X..WN.1.H.2:..X)"."H(P2$,W.2)"
.":........X)"J"H(P1$,W.2)"K"H(P$,Y.1).X
);:.."...N$.G(1):MW$."M-W".Y.... 1,8,15:
.2,8,2,"#0":.1,"U1";2;0;18;0:.1,"B-P";2;
2.~. ..1,G(65):.1,E,E$,ET,ES:.E.0. 170..
...SR.1:. 210:.E;E$;ET;ES:."  TRY AGAIN?
 (Y/N).J....198,0:.198,1:.A$."Y"........
A$.."N".164...... 64767......1,MW$N$N$N$
G(65):.1,G(2)G(7)N$G(65).%....1,"U2";2;0
;18;0.:....1,"U1";2;0;18;3.R....#1,A$:A.
F(A$.G(0)).}....#1,A$:A.F(A$.G(0)).2. SR
.1:. 200:.166.....A$.G(A.1):.1,"B-P";2;5
:.2,A$:.1,"U2";2;0;18;3.Q.H..1,"U1";2;0;
18;0:.1,"B-P";2;2...R..2,N$......1,"U2";
2;0;18;0: 2: 1:. SR. SR.0:..L...."......
........      PLACE A BLANK DISK IN THE 
DRIVE. PRESS RETURN".Q....198,0:.198,1:.
A$:.A$..G(13).235......"FORMATTING. PLEA
SE WAIT...".G....1,8,15,"N0:CAD GEM,RS":
.1,E,E$,ET,ES:.E.0. 250......E;E$;ET;ES:
.I.0.2000:.:."..                        
               ".H...."                 
                       ": 1:.230.W.... 2
,8,2,"#0":.1,"U1";2;0;18;3:.1,"B-P";2;5.
.....2,G(210) : 2: 1:...,.MR$."M-R":MW$.
"M-W":Z$.G(0).K.6.I0.0:I1.0:I2.0:B.0:A$.
"T"...@.C$."CODE":SR.0...J.TR.30:SE.10:C
O.0...T.. 510...^.. ------SEND CODE.).H.
.I.0.TL:I0.B(T.I).G.R..1,MW$G(I)G(B.3)G(
1)G(I0).O.|..:..H....-------WAIT FOR KEY
......198,0:. 198,1:.A$:.A$..G(13).400..
...:  . SR . SR.0:.......-------JOB QUE.
T...CO.224: . EXECUTE BUFFER.....: .1,MW
$G(63)Z$G(1)G(B)...B..1,MW$G(6.B.2)Z$G(2
)G(TR)G(SE)./.L.: .1,MW$G(B)Z$G(1)G(CO).
G.V..1,MR$G(B)Z$:.#1,A$.C...: A.F(A$.Z$)
:.A.127.470.P....A..1. .......          
                           .....CO.176:T
R.35:SE.0:SR.1.P....1,8,15,"I0":.450:I.0
.Z...TR.37.....T.(TR.35).2...&.: .1,MR$Z
$G(28):.#1,C$:CO.F(C$.Z$):SE.CO..3.6.0..
-----MOVE OUT TO TRACK.A.:..I.1.T.\.D.: 
CO.(CO.1).3:I0.SE.CO.Y.N.: .1,MW$Z$G(28)
G(1)G(I0)...X..:I.0:.SR.SR.0:....B..----
-SEND CODE.E.G.ET.24:SE.0:.I.0.9:.I0.SE.
ET:.A...H..1,MW$G(I0)G(3)G(A)...I..:.:SE
.ET.1:ET.ET.25:....L.T.144.256:TL.74:B.1
:.360.,.V..-----EXECUTE CODE.<...I0.TR:T
R.35.T...I.0:B.1:CO.224:.440.^...TR.I0..
...T.(TR.35).2:.1,MR$Z$G(28):.#1,C$:CO.F
(C$.Z$):SE.CO..3......I.0.T.....: CO.(CO
.1).3:I0.SE.CO.....: .1,MW$Z$G(28)G(1)G(
I0):.: 1...A.."   PLACE THE MASTER DISK 
IN THE DRIVE. PRESS RETURN.".A.B..198,0:
.198,1:.A$:.A$..G(13).706.O.D.."B3",8,1.
..F..82,79,83,65,92,69,86,69,76,89,78,92
,87,69,83,76,69,89,92,74,65,77,69,83,92.
..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL