MODULE6
FILE INFORMATION
FILENAME(S): MODULE6
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-12-02 02:15:47
APPEARS ON: 1 disk(s)
FILE HASH
517a11dd2f1737dce65a65ea9891349fe29030aa22c731a82f79593e53b3eeff
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PLOT B | MODULE6 | PRG | The BAM Archive | 20 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 00 00 8F 00 17 08 01 00 8B 20 47 4C |............. GL| 00000010: B2 30 20 A7 20 34 30 00 29 08 02 00 8B 20 47 4C |.0 . 40.).... GL| 00000020: B2 36 36 20 A7 20 31 34 30 00 3C 08 0A 00 8B 20 |.66 . 140.<.... | 00000030: 47 4C B2 35 30 30 20 A7 20 32 33 30 00 4F 08 14 |GL.500 . 230.O..| 00000040: 00 8B 20 47 4C B2 37 34 30 20 A7 20 34 39 30 00 |.. GL.740 . 490.| 00000050: 61 08 28 00 8F 3A 20 53 44 41 20 4D 4F 44 55 4C |a.(..: SDA MODUL| 00000060: 45 00 89 08 32 00 99 22 93 05 20 20 20 20 20 20 |E...2..".. | 00000070: 20 20 20 20 20 20 20 20 12 D3 C4 C1 20 C1 C9 C4 | .... ...| 00000080: 20 CD 4F 44 55 4C 45 92 22 00 BB 08 3C 00 99 22 | .ODULE."...<.."| 00000090: 11 11 20 20 D0 4C 45 41 53 45 20 4B 45 45 50 20 |.. .LEASE KEEP | 000000A0: 9A C1 D2 C3 20 C1 C9 C4 20 56 36 2E 30 05 20 44 |.... ... V6.0. D| 000000B0: 49 53 4B 20 48 41 4E 44 59 21 22 00 EB 08 41 00 |ISK HANDY!"...A.| 000000C0: 99 22 11 20 CC 4F 43 41 54 45 20 54 48 45 20 44 |.". .OCATE THE D| 000000D0: 49 53 4B 28 53 29 20 57 49 54 48 20 54 48 45 20 |ISK(S) WITH THE | 000000E0: 46 49 4C 45 53 20 59 4F 55 20 22 00 1A 09 42 00 |FILES YOU "...B.| 000000F0: 99 22 20 57 41 4E 54 20 54 4F 20 4D 41 4B 45 20 |." WANT TO MAKE | 00000100: 49 4E 54 4F 20 41 4E 20 D3 C4 C1 2E 20 C6 49 4C |INTO AN .... .IL| 00000110: 45 43 4F 50 59 20 54 48 45 22 00 49 09 43 00 99 |ECOPY THE".I.C..| 00000120: 22 20 46 49 4C 45 53 20 4F 4E 54 4F 20 41 20 44 |" FILES ONTO A D| 00000130: 49 53 4B 20 57 49 54 48 20 50 4C 45 4E 54 59 20 |ISK WITH PLENTY | 00000140: 4F 46 20 52 4F 4F 4D 2E 22 00 78 09 44 00 99 22 |OF ROOM.".x.D.."| 00000150: 20 D4 48 49 53 20 57 49 4C 4C 20 42 45 20 59 4F | .HIS WILL BE YO| 00000160: 55 52 20 27 9E 57 4F 52 4B 20 44 49 53 4B 05 27 |UR '.WORK DISK.'| 00000170: 2E 20 C1 4C 53 4F 2C 22 00 A7 09 45 00 99 22 20 |. .LSO,"...E.." | 00000180: 46 49 4C 45 43 4F 50 59 20 54 48 45 20 46 49 4C |FILECOPY THE FIL| 00000190: 45 20 43 41 4C 4C 45 44 3A 20 D3 C4 C1 2E CD CC |E CALLED: ......| 000001A0: 20 4F 4E 54 4F 20 22 00 F4 09 46 00 99 22 20 54 | ONTO "...F.." T| 000001B0: 48 45 20 27 9E 57 4F 52 4B 20 44 49 53 4B 05 27 |HE '.WORK DISK.'| 000001C0: 2E 20 C9 54 27 53 20 4F 4E 20 54 48 45 2E 2E 2E |. .T'S ON THE...| 000001D0: 22 3A 99 22 11 9A 20 20 20 20 20 20 20 20 20 20 |":.".. | 000001E0: 20 20 C1 D2 C3 20 C1 C9 C4 20 56 36 2E 30 20 C4 | ... ... V6.0 .| 000001F0: 49 53 4B 22 00 29 0A 47 00 99 22 05 11 20 20 D0 |ISK".).G..".. .| 00000200: 52 45 53 53 20 12 9E 24 05 92 20 46 4F 52 20 41 |RESS ..$.. FOR A| 00000210: 20 44 49 52 45 43 54 4F 52 59 20 4F 46 20 C4 52 | DIRECTORY OF .R| 00000220: 49 56 45 20 38 2C 30 2E 22 00 5F 0A 5A 00 99 22 |IVE 8,0."._.Z.."| 00000230: 11 11 20 D0 52 45 53 53 20 12 9E D3 D0 C1 C3 C5 |.. .RESS .......| 00000240: 20 C2 C1 D2 05 92 20 54 4F 20 52 45 54 55 52 4E | ..... TO RETURN| 00000250: 20 54 4F 20 4D 41 49 4E 20 4D 45 4E 55 2E 22 00 | TO MAIN MENU.".| 00000260: 8B 0A 64 00 99 22 11 20 20 20 20 20 20 20 C1 4E |..d..". .N| 00000270: 59 20 4F 54 48 45 52 20 4B 45 59 20 57 49 4C 4C |Y OTHER KEY WILL| 00000280: 20 43 4F 4E 54 49 4E 55 45 2E 22 00 A2 0A 6E 00 | CONTINUE."...n.| 00000290: A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 31 |. A$:. A$."" . 1| 000002A0: 31 30 00 B6 0A 82 00 8B 20 41 24 B3 B1 22 20 22 |10...... A$.." "| 000002B0: 20 A7 20 31 39 30 00 F1 0A 8C 00 47 4C B2 36 36 | . 190.....GL.66| 000002C0: 3A 99 22 93 05 11 11 11 11 11 20 D0 4C 45 41 53 |:."....... .LEAS| 000002D0: 45 20 49 4E 53 45 52 54 20 44 49 53 4B 20 57 49 |E INSERT DISK WI| 000002E0: 54 48 20 C1 D2 C3 20 C1 C9 C4 20 4F 4E 20 49 54 |TH ... ... ON IT| 000002F0: 22 00 16 0B 96 00 99 22 20 20 20 20 20 20 20 20 |"......" | 00000300: 20 20 20 41 4E 44 20 50 52 45 53 53 20 41 4E 59 | AND PRESS ANY| 00000310: 20 4B 45 59 2E 22 00 21 0B A0 00 97 31 39 38 2C | KEY.".!....198,| 00000320: 30 00 37 0B AA 00 A1 41 24 3A 8B 20 41 24 B2 22 |0.7....A$:. A$."| 00000330: 22 20 A7 20 31 37 30 00 55 0B AF 00 99 22 93 11 |" . 170.U...."..| 00000340: 11 11 22 3B A6 31 35 29 3B 22 CC 4F 41 44 49 4E |..";.15);".OADIN| 00000350: 47 2E 2E 2E 22 00 80 0B B4 00 99 22 13 90 11 11 |G..."......"....| 00000360: 4C 4F 41 44 22 C7 28 33 34 29 22 4D 41 49 4E 22 |LOAD".(34)"MAIN"| 00000370: C7 28 33 34 29 22 2C 38 13 22 3B 3A 89 36 35 30 |.(34)",8.";:.650| 00000380: 00 94 0B BE 00 8B 20 41 24 B3 B1 22 24 22 20 A7 |...... A$.."$" .| 00000390: 20 32 36 30 00 BF 0B C8 00 99 22 93 20 20 20 20 | 260......". | 000003A0: 20 20 20 20 12 C8 4F 4C 44 20 44 4F 57 4E 20 D3 | ..OLD DOWN .| 000003B0: C8 C9 C6 D4 20 54 4F 20 50 41 55 53 45 2E 22 00 |.... TO PAUSE.".| 000003C0: D8 0B D2 00 99 22 11 11 44 49 52 22 3A 99 22 13 |....."..DIR":.".| 000003D0: 22 3A 47 4C B2 35 30 30 00 E1 0B DC 00 89 36 35 |":GL.500......65| 000003E0: 30 00 1B 0C E6 00 97 31 39 38 2C 30 3A 99 22 20 |0......198,0:." | 000003F0: 20 20 20 12 D0 52 45 53 53 20 41 4E 59 20 4B 45 | ..RESS ANY KE| 00000400: 59 20 54 4F 20 52 45 54 55 52 4E 20 54 4F 20 4D |Y TO RETURN TO M| 00000410: 45 4E 55 2E 92 22 3A 47 4C B2 30 00 32 0C F0 00 |ENU..":GL.0.2...| 00000420: A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 32 |. A$:. A$."" . 2| 00000430: 34 30 00 3B 0C FA 00 89 20 34 30 00 62 0C 04 01 |40.;.... 40.b...| 00000440: 99 22 93 20 20 20 20 20 20 20 20 20 20 20 20 20 |.". | 00000450: 12 D3 C4 C1 20 C1 C9 C4 20 CD 4F 44 55 4C 45 2E |.... ... .ODULE.| 00000460: 92 22 00 90 0C 0E 01 99 22 11 20 20 20 CE 4F 57 |."......". .OW| 00000470: 20 54 48 41 54 20 59 4F 55 20 4B 4E 4F 57 20 54 | THAT YOU KNOW T| 00000480: 48 45 20 4E 41 4D 45 53 20 4F 46 20 54 48 45 22 |HE NAMES OF THE"| 00000490: 00 CB 0C 18 01 99 22 20 46 49 4C 45 53 20 54 4F |......" FILES TO| 000004A0: 20 42 45 20 D3 C4 C1 44 2C 20 41 4E 53 57 45 52 | BE ...D, ANSWER| 000004B0: 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 20 20 | THE FOLLOWING | 000004C0: 51 55 45 53 54 49 4F 4E 53 3A 22 00 FE 0C 22 01 |QUESTIONS:"...".| 000004D0: 99 22 11 11 CE 41 4D 45 20 4F 46 20 46 49 4E 41 |."...AME OF FINA| 000004E0: 4C 20 4F 55 54 50 55 54 20 46 49 4C 45 22 3A 85 |L OUTPUT FILE":.| 000004F0: 46 24 3A 8B 20 46 24 B2 22 22 20 A7 20 8A 00 25 |F$:. F$."" . ..%| 00000500: 0D 2C 01 99 22 D0 55 54 20 27 9E 57 4F 52 4B 20 |.,..".UT '.WORK | 00000510: 44 49 53 4B 05 27 20 49 4E 20 C4 52 49 56 45 20 |DISK.' IN .RIVE | 00000520: 38 2C 30 2E 22 00 6D 0D 2D 01 99 22 11 D4 48 45 |8,0.".m.-.."..HE| 00000530: 20 46 4F 4C 4C 4F 57 49 4E 47 20 50 52 4F 4D 50 | FOLLOWING PROMP| 00000540: 54 53 20 50 45 52 54 41 49 4E 20 54 4F 20 54 48 |TS PERTAIN TO TH| 00000550: 45 20 20 20 20 46 49 4C 45 53 20 59 4F 55 20 57 |E FILES YOU W| 00000560: 41 4E 54 20 54 4F 20 D3 C4 C1 2E 11 22 00 7D 0D |ANT TO .....".}.| 00000570: 36 01 8B 20 41 B2 39 20 A7 20 34 31 30 00 A8 0D |6.. A.9 . 410...| 00000580: 40 01 85 20 22 C6 49 4C 45 2C 20 50 41 54 54 45 |@.. ".ILE, PATTE| 00000590: 52 4E 20 4F 52 20 12 9E D2 C5 D4 D5 D2 CE 92 05 |RN OR ..........| 000005A0: 22 3B 46 49 24 28 41 29 00 BE 0D 4A 01 8B 20 46 |";FI$(A)...J.. F| 000005B0: 49 24 28 41 29 B2 22 22 20 A7 20 34 31 30 00 DA |I$(A)."" . 410..| 000005C0: 0D 54 01 8B 20 46 49 24 28 41 29 B2 22 53 44 41 |.T.. FI$(A)."SDA| 000005D0: 2E 4D 4C 22 20 A7 20 33 32 30 00 EF 0D 5E 01 8D |.ML" . 320...^..| 000005E0: 20 35 34 30 3A 46 44 24 28 41 29 B2 44 52 24 00 | 540:FD$(A).DR$.| 000005F0: 05 0E 68 01 81 20 49 B2 31 20 A4 20 C3 28 46 49 |..h.. I.1 . .(FI| 00000600: 24 28 41 29 29 00 37 0E 72 01 8B 20 CA 28 46 49 |$(A)).7.r.. .(FI| 00000610: 24 28 41 29 2C 49 2C 31 29 B2 22 20 22 20 A7 20 |$(A),I,1)." " . | 00000620: 54 45 24 28 41 29 B2 54 45 24 28 41 29 AA 22 3F |TE$(A).TE$(A)."?| 00000630: 22 3A 89 20 33 39 30 00 57 0E 7C 01 54 45 24 28 |":. 390.W.|.TE$(| 00000640: 41 29 B2 54 45 24 28 41 29 AA CA 28 46 49 24 28 |A).TE$(A)..(FI$(| 00000650: 41 29 2C 49 2C 31 29 00 5D 0E 86 01 82 00 6D 0E |A),I,1).].....m.| 00000660: 90 01 41 B2 41 AA 31 3A 89 20 33 31 30 00 81 0E |..A.A.1:. 310...| 00000670: 9A 01 8B 20 46 49 24 28 30 29 B2 22 22 20 A7 20 |... FI$(0)."" . | 00000680: 8A 00 8B 0E 9B 01 8D 20 38 30 30 00 B1 0E 9F 01 |....... 800.....| 00000690: 9F 31 35 2C 38 2C 31 35 2C 22 43 30 3A 42 41 53 |.15,8,15,"C0:BAS| 000006A0: 45 2E 41 52 43 3D 53 44 41 2E 4D 4C 22 3A A0 31 |E.ARC=SDA.ML":.1| 000006B0: 35 00 D5 0E A4 01 43 24 B2 22 41 52 43 2F 41 5A |5.....C$."ARC/AZ| 000006C0: 20 41 3A 42 41 53 45 20 49 4E 54 52 4F 22 3A 45 | A:BASE INTRO":E| 000006D0: 58 24 B2 22 22 00 E5 0E AE 01 81 20 49 B2 30 20 |X$.""...... I.0 | 000006E0: A4 20 41 AB 31 00 03 0F B8 01 45 58 24 B2 45 58 |. A.1.....EX$.EX| 000006F0: 24 AA 22 20 22 AA 46 44 24 28 49 29 AA 54 45 24 |$." ".FD$(I).TE$| 00000700: 28 49 29 00 09 0F C2 01 82 00 17 0F CC 01 43 24 |(I)...........C$| 00000710: B2 43 24 AA 45 58 24 00 32 0F D6 01 99 22 93 11 |.C$.EX$.2...."..| 00000720: 11 11 22 3B 43 24 3A 99 22 13 22 3A 47 4C B2 37 |..";C$:.".":GL.7| 00000730: 34 30 00 3B 0F E0 01 89 36 35 30 00 57 0F EA 01 |40.;....650.W...| 00000740: 46 24 B2 22 52 30 3A 22 AA 46 24 AA 22 3D 42 41 |F$."R0:".F$."=BA| 00000750: 53 45 2E 41 52 43 22 00 7A 0F EB 01 9F 31 35 2C |SE.ARC".z....15,| 00000760: 38 2C 31 35 2C 46 24 3A 98 31 35 2C 22 53 30 3A |8,15,F$:.15,"S0:| 00000770: 49 4E 54 52 4F 22 3A A0 31 35 00 A6 0F F4 01 99 |INTRO":.15......| 00000780: 22 20 20 20 20 20 D9 4F 55 52 20 D3 C4 C1 20 46 |" .OUR ... F| 00000790: 49 4C 45 20 48 41 53 20 42 45 45 4E 20 43 52 45 |ILE HAS BEEN CRE| 000007A0: 41 54 45 44 21 22 00 E3 0F FE 01 97 20 31 39 38 |ATED!"...... 198| 000007B0: 2C 30 3A 99 22 20 12 D0 52 45 53 53 20 41 4E 59 |,0:." ..RESS ANY| 000007C0: 20 4B 45 59 20 54 4F 20 52 45 54 55 52 4E 20 54 | KEY TO RETURN T| 000007D0: 4F 20 4D 41 49 4E 20 4D 45 4E 55 2E 92 22 3A 47 |O MAIN MENU..":G| 000007E0: 4C B2 30 00 FA 0F 08 02 A1 20 41 24 3A 8B 20 41 |L.0...... A$:. A| 000007F0: 24 B2 22 22 20 A7 20 35 32 30 00 00 10 12 02 8A |$."" . 520......| 00000800: 00 0B 10 1C 02 44 52 24 B2 22 22 00 28 10 26 02 |.....DR$."".(.&.| 00000810: 8B 20 44 56 B2 38 20 AF 20 44 52 B2 30 20 A7 20 |. DV.8 . DR.0 . | 00000820: 44 52 24 B2 22 41 3A 22 00 45 10 30 02 8B 20 44 |DR$."A:".E.0.. D| 00000830: 56 B2 38 20 AF 20 44 52 B2 31 20 A7 20 44 52 24 |V.8 . DR.1 . DR$| 00000840: B2 22 42 3A 22 00 62 10 3A 02 8B 20 44 56 B2 39 |."B:".b.:.. DV.9| 00000850: 20 AF 20 44 52 B2 30 20 A7 20 44 52 24 B2 22 43 | . DR.0 . DR$."C| 00000860: 3A 22 00 7F 10 44 02 8B 20 44 56 B2 39 20 AF 20 |:"...D.. DV.9 . | 00000870: 44 52 B2 31 20 A7 20 44 52 24 B2 22 44 3A 22 00 |DR.1 . DR$."D:".| 00000880: 9C 10 4E 02 8B 20 44 56 B2 31 30 AF 20 44 52 B2 |..N.. DV.10. DR.| 00000890: 30 20 A7 20 44 52 24 B2 22 45 3A 22 00 BA 10 58 |0 . DR$."E:"...X| 000008A0: 02 8B 20 44 56 B2 31 30 20 AF 20 44 52 B2 31 20 |.. DV.10 . DR.1 | 000008B0: A7 20 44 52 24 B2 22 46 3A 22 00 D8 10 62 02 8B |. DR$."F:"...b..| 000008C0: 20 44 56 B2 31 31 20 AF 20 44 52 B2 30 20 A7 20 | DV.11 . DR.0 . | 000008D0: 44 52 24 B2 22 47 3A 22 00 F6 10 6C 02 8B 20 44 |DR$."G:"...l.. D| 000008E0: 56 B2 31 31 20 AF 20 44 52 B2 31 20 A7 20 44 52 |V.11 . DR.1 . DR| 000008F0: 24 B2 22 48 3A 22 00 FC 10 76 02 8E 00 02 11 80 |$."H:"...v......| 00000900: 02 80 00 3E 11 8A 02 97 20 36 33 31 2C 31 33 3A |...>.... 631,13:| 00000910: 97 36 33 32 2C 37 31 3A 97 20 36 33 33 2C 32 30 |.632,71:. 633,20| 00000920: 37 3A 97 36 33 35 2C 31 33 3A 97 36 33 36 2C 31 |7:.635,13:.636,1| 00000930: 33 3A 97 31 39 38 2C 35 3A 89 20 36 34 30 00 6E |3:.198,5:. 640.n| 00000940: 11 94 02 99 22 93 20 20 C8 4F 57 20 4D 41 4E 59 |....". .OW MANY| 00000950: 20 44 52 49 56 45 53 20 41 52 45 20 59 4F 55 20 | DRIVES ARE YOU | 00000960: 47 4F 49 4E 47 20 54 4F 20 55 53 45 3F 22 00 9F |GOING TO USE?"..| 00000970: 11 95 02 99 22 11 11 20 20 20 20 20 20 20 20 12 |....".. .| 00000980: 9E CF 92 05 4E 45 20 4F 52 20 12 9E CD 92 05 55 |....NE OR .....U| 00000990: 4C 54 49 50 4C 45 20 C4 52 49 56 45 53 3F 22 00 |LTIPLE .RIVES?".| 000009A0: B6 11 9E 02 A1 20 41 24 3A 8B 20 41 24 B2 22 22 |..... A$:. A$.""| 000009B0: 20 A7 20 36 37 30 00 E8 11 A8 02 8B 20 41 24 B3 | . 670...... A$.| 000009C0: B1 22 CF 22 20 AF 20 41 24 B3 B1 22 4F 22 20 AF |."." . A$.."O" .| 000009D0: 20 41 24 B3 B1 22 CD 22 20 AF 20 41 24 B3 B1 22 | A$.."." . A$.."| 000009E0: 4D 22 20 A7 20 36 37 30 00 F2 11 B2 02 97 20 32 |M" . 670...... 2| 000009F0: 2C 31 00 10 12 BC 02 8B 20 41 24 B2 22 4D 22 20 |,1...... A$."M" | 00000A00: B0 20 41 24 B2 22 CD 22 20 A7 20 97 20 32 2C 32 |. A$."." . . 2,2| 00000A10: 00 16 12 C6 02 8E 00 30 12 20 03 8F 20 2A 2A 20 |.......0. .. ** | 00000A20: 53 49 4D 50 4C 45 20 45 44 49 54 4F 52 20 2A 2A |SIMPLE EDITOR **| 00000A30: 00 53 12 21 03 99 22 05 93 11 11 11 11 11 11 11 |.S.!..".........| 00000A40: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000A50: 11 22 3B 00 A3 12 2A 03 99 22 CE 4F 57 20 43 52 |.";...*..".OW CR| 00000A60: 45 41 54 45 20 41 20 54 49 54 4C 45 20 53 43 52 |EATE A TITLE SCR| 00000A70: 45 45 4E 2E 20 C9 54 20 57 49 4C 4C 20 42 45 20 |EEN. .T WILL BE | 00000A80: 20 20 44 49 53 50 4C 41 59 45 44 20 57 48 45 4E | DISPLAYED WHEN| 00000A90: 20 54 48 45 20 46 49 4C 45 20 49 53 20 52 55 4E | THE FILE IS RUN| 00000AA0: 21 22 3B 00 B7 12 2F 03 99 22 9E 20 46 31 3D 44 |!";.../..". F1=D| 00000AB0: 4F 4E 45 05 13 22 3B 00 D7 12 30 03 A1 20 41 24 |ONE..";...0.. A$| 00000AC0: 3A 8B 20 41 24 B2 22 22 20 B0 20 41 24 B2 22 93 |:. A$."" . A$.".| 00000AD0: 22 20 A7 20 38 31 36 00 EC 12 31 03 8B 41 24 B2 |" . 816...1..A$.| 00000AE0: 22 85 22 A7 20 8D 31 31 30 30 3A 8E 00 17 13 32 |".". .1100:....2| 00000AF0: 03 97 37 38 33 2C C2 28 37 38 33 29 B0 31 3A 9E |..783,.(783).1:.| 00000B00: 36 35 35 32 30 3A 52 B2 C2 28 37 38 31 29 3A 43 |65520:R..(781):C| 00000B10: B2 C2 28 37 38 32 29 00 3B 13 34 03 8B 20 52 B2 |..(782).;.4.. R.| 00000B20: 32 32 20 AF 20 43 B1 33 38 20 A7 20 99 41 24 3B |22 . C.38 . .A$;| 00000B30: 22 9D 9D 22 3B 3A 89 20 38 31 36 00 6E 13 3E 03 |"..";:. 816.n.>.| 00000B40: 8B 20 52 B2 32 32 20 AF 20 28 41 24 B2 22 11 22 |. R.22 . (A$."."| 00000B50: 20 B0 20 41 24 B2 C7 28 31 33 29 20 B0 20 41 24 | . A$..(13) . A$| 00000B60: B2 C7 28 31 34 31 29 29 20 A7 20 38 31 36 00 7D |..(141)) . 816.}| 00000B70: 13 48 03 99 41 24 3B 3A 89 20 38 31 36 00 95 13 |.H..A$;:. 816...| 00000B80: 4C 04 8F 20 2A 2A 20 53 41 56 45 20 53 43 52 45 |L.. ** SAVE SCRE| 00000B90: 45 4E 20 2A 2A 00 AC 13 56 04 9F 32 2C 38 2C 32 |EN **...V..2,8,2| 00000BA0: 2C 22 49 4E 54 52 4F 2C 53 2C 57 22 00 C6 13 57 |,"INTRO,S,W"...W| 00000BB0: 04 98 32 2C C7 28 31 34 37 29 3B C7 28 35 29 3B |..2,.(147);.(5);| 00000BC0: C7 28 31 34 29 3B 00 EC 13 60 04 81 20 4A B2 30 |.(14);...`.. J.0| 00000BD0: A4 32 32 3A 81 4B B2 30 A4 33 39 3A 58 B2 C2 28 |.22:.K.0.39:X..(| 00000BE0: 31 30 32 34 AA 4A AC 34 30 AA 4B 29 00 0C 14 6A |1024.J.40.K)...j| 00000BF0: 04 8B 20 58 B1 31 32 38 20 A7 20 58 B2 58 AB 31 |.. X.128 . X.X.1| 00000C00: 32 38 3A 98 32 2C C7 28 31 38 29 3B 00 25 14 74 |28:.2,.(18);.%.t| 00000C10: 04 8B 20 58 B3 33 32 20 A7 20 98 32 2C C7 28 58 |.. X.32 . .2,.(X| 00000C20: AA 36 34 29 3B 00 42 14 7E 04 8B 20 58 B1 33 31 |.64);.B.~.. X.31| 00000C30: 20 AF 20 58 B3 36 34 20 A7 20 98 32 2C C7 28 58 | . X.64 . .2,.(X| 00000C40: 29 3B 00 62 14 88 04 8B 20 58 B1 36 33 20 AF 20 |);.b.... X.63 . | 00000C50: 58 B3 39 36 20 A7 20 98 32 2C C7 28 58 AA 33 32 |X.96 . .2,.(X.32| 00000C60: 29 3B 00 83 14 92 04 8B 20 58 B1 39 35 20 AF 20 |);...... X.95 . | 00000C70: 58 B3 31 32 38 20 A7 20 98 32 2C C7 28 58 AA 36 |X.128 . .2,.(X.6| 00000C80: 34 29 3B 00 92 14 9C 04 98 32 2C C7 28 31 34 36 |4);......2,.(146| 00000C90: 29 3B 00 9F 14 A6 04 82 3A 82 3A A0 32 3A 8E 00 |);......:.:.2:..| 00000CA0: 00 00 |.. |
............. GL.0 . 40.).... GL.66 . 14
0.<.... GL.500 . 230.O.... GL.740 . 490.
A.(..: SDA MODULE...2.."..
.SDA AID MODULE."...<..".. PLEASE KEEP
.ARC AID V6.0. DISK HANDY!"...A..". LOCA
TE THE DISK(S) WITH THE FILES YOU "...B.
." WANT TO MAKE INTO AN SDA. FILECOPY TH
E".I.C.." FILES ONTO A DISK WITH PLENTY
OF ROOM.".X.D.." THIS WILL BE YOUR '.WOR
K DISK.'. ALSO,"...E.." FILECOPY THE FIL
E CALLED: SDA.ML ONTO "...F.." THE '.WOR
K DISK.'. IT'S ON THE...":."..
ARC AID V6.0 DISK".).G..".. PRESS ..$
.. FOR A DIRECTORY OF DRIVE 8,0."._.Z.."
.. PRESS ..SPACE BAR.. TO RETURN TO MAIN
MENU."...D..". ANY OTHER KEY WILL
CONTINUE."...N.. A$:. A$."" . 110......
A$.." " . 190.....GL.66:."....... PLEAS
E INSERT DISK WITH ARC AID ON IT"......"
AND PRESS ANY KEY.".!. ..198,
0.7....A$:. A$."" . 170.U...."....";.15)
;"LOADING..."......"....LOAD"G(34)"MAIN"
G(34)",8.";:.650...... A$.."$" . 260...H
..". .HOLD DOWN SHIFT TO PAUSE.".
X.R.."..DIR":.".":GL.500......650......1
98,0:." .PRESS ANY KEY TO RETURN TO M
ENU..":GL.0.2.... A$:. A$."" . 240.;....
40.B....". .SDA AID MODULE.
."......". NOW THAT YOU KNOW THE NAMES
OF THE".K...." FILES TO BE SDAD, ANSWER
THE FOLLOWING QUESTIONS:"...".."..NAME
OF FINAL OUTPUT FILE":.F$:. F$."" . ..%
.,.."PUT '.WORK DISK.' IN DRIVE 8,0.".M.
-..".THE FOLLOWING PROMPTS PERTAIN TO TH
E FILES YOU WANT TO SDA..".}.6.. A.9
. 410...@.. "FILE, PATTERN OR ..RETURN..
";FI$(A)...J.. FI$(A)."" . 410.Z.T.. FI$
(A)."SDA.ML" . 320...^.. 540:FD$(A).DR$.
..H.. I.1 . C(FI$(A)).7.R.. J(FI$(A),I,1
)." " . TE$(A).TE$(A)."?":. 390.W.|.TE$(
A).TE$(A).J(FI$(A),I,1).].....M...A.A.1:
. 310...... FI$(0)."" . ....... 800.....
.15,8,15,"C0:BASE.ARC=SDA.ML": 15.U...C$
."ARC/AZ A:BASE INTRO":EX$.""...... I.0
. A.1.....EX$.EX$." ".FD$(I).TE$(I)...B.
....L.C$.C$.EX$.2.V.."....";C$:.".":GL.7
40.;....650.W...F$."R0:".F$."=BASE.ARC".
Z....15,8,15,F$:.15,"S0:INTRO": 15......
" YOUR SDA FILE HAS BEEN CREATED!"..
.... 198,0:." .PRESS ANY KEY TO RETURN T
O MAIN MENU..":GL.0...... A$:. A$."" . 5
20...........DR$."".(.&.. DV.8 . DR.0 .
DR$."A:".E.0.. DV.8 . DR.1 . DR$."B:".B.
:.. DV.9 . DR.0 . DR$."C:"..D.. DV.9 .
DR.1 . DR$."D:"...N.. DV.10. DR.0 . DR$.
"E:"...X.. DV.10 . DR.1 . DR$."F:".X.B..
DV.11 . DR.0 . DR$."G:"...L.. DV.11 . D
R.1 . DR$."H:"...V.........>.... 631,13:
.632,71:. 633,207:.635,13:.636,13:.198,5
:. 640.N....". HOW MANY DRIVES ARE YOU
GOING TO USE?"......".. ..O..NE O
R ..M..ULTIPLE DRIVES?"...... A$:. A$.""
. 670...... A$.."O" . A$.."O" . A$.."M"
. A$.."M" . 670...... 2,1...... A$."M"
. A$."M" . . 2,2...F...0. .. ** SIMPLE E
DITOR **.S.!..".........................
.";...*.."NOW CREATE A TITLE SCREEN. IT
WILL BE DISPLAYED WHEN THE FILE IS RUN
!";.../..". F1=DONE..";.W.0.. A$:. A$.""
. A$."." . 816...1..A$.".". .1100:....2
..783,B(783).1:.65520:R.B(781):C.B(782).
;.4.. R.22 . C.38 . .A$;"..";:. 816.N.>.
. R.22 . (A$."." . A$.G(13) . A$.G(141))
. 816.}.H..A$;:. 816...L.. ** SAVE SCRE
EN **...V..2,8,2,"INTRO,S,W".F.W..2,G(14
7);G(5);G(14);...`.. J.0.22:.K.0.39:X.B(
1024.J.40.K)...J.. X.128 . X.X.128:.2,G(
18);.%.T.. X.32 . .2,G(X.64);.B.~.. X.31
. X.64 . .2,G(X);.B.... X.63 . X.96 . .
2,G(X.32);...... X.95 . X.128 . .2,G(X.6
4);......2,G(146);......:.: 2:....
> CLICK IMAGE PREVIEW FOR FULL MODAL