RAINBOW DIR
FILE INFORMATION
FILENAME(S): RAINBOW DIR
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-11-30 21:10:13
APPEARS ON: 1 disk(s)
FILE HASH
d5926eb385ff1ab4fa90bdf4776190c4837bc582ee9018f7e3ec3ed8402168ff
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GERRY | RAINBOW DIR | PRG | DuncanTwain | 5 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 00 00 9E 32 30 36 31 00 00 00 20 44 |.......2061... D| 00000010: E5 A9 0E 8D 20 D0 8D 21 D0 EA A9 36 85 01 4C EE |.... ..!...6..L.| 00000020: 15 2A 08 FF 00 51 08 0B 00 8F 20 2A 03 FF 20 52 |.*...Q.... *.. R| 00000030: 41 49 4E 42 4F 57 20 44 49 53 4B 20 55 54 49 4C |AINBOW DISK UTIL| 00000040: 49 54 59 20 56 31 2E 30 20 2A 03 FF 00 79 08 0C |ITY V1.0 *...y..| 00000050: 00 8F 20 2A 03 FF 20 42 49 4C 42 4F 20 42 41 47 |.. *.. BILBO BAG| 00000060: 47 49 4E 53 20 46 45 42 20 31 39 38 36 20 2A 06 |GINS FEB 1986 *.| 00000070: FF 00 A1 08 0D 00 8F 20 2A 21 FF 00 C9 08 0E 00 |....... *!......| 00000080: 8F 20 2A 03 FF 20 20 53 45 54 20 55 50 20 53 43 |. *.. SET UP SC| 00000090: 52 45 45 4E 20 26 20 53 54 52 49 4E 47 53 20 20 |REEN & STRINGS | 000000A0: 2A 03 FF 00 F1 08 0F 00 8F 20 2A 21 FF 00 28 09 |*........ *!..(.| 000000B0: 10 00 52 56 24 B2 C7 28 31 38 29 3A 43 44 24 B2 |..RV$..(18):CD$.| 000000C0: C7 28 31 37 29 3A 43 55 24 B2 C7 28 31 34 35 29 |.(17):CU$..(145)| 000000D0: 3A 43 53 24 B2 C7 28 31 34 37 29 3A 57 48 24 B2 |:CS$..(147):WH$.| 000000E0: C7 28 35 29 00 3E 09 11 00 97 35 33 32 38 30 2C |.(5).>....53280,| 000000F0: 30 3A 97 35 33 32 38 31 2C 30 00 6B 09 12 00 81 |0:.53281,0.k....| 00000100: 49 B2 31 A4 38 3A 87 20 44 3A 81 4A B2 30 A4 31 |I.1.8:. D:.J.0.1| 00000110: 33 3A 44 24 28 49 29 B2 44 24 28 49 29 AA C7 28 |3:D$(I).D$(I)..(| 00000120: 44 29 3A 82 4A 2C 49 00 8A 09 13 00 83 20 34 36 |D):.J,I...... 46| 00000130: 2C 34 35 2C 34 33 2C 39 36 2C 33 33 2C 33 35 2C |,45,43,96,33,35,| 00000140: 31 31 38 2C 33 32 00 9E 09 14 00 44 24 28 38 29 |118,32.....D$(8)| 00000150: B2 52 56 24 AA 44 24 28 38 29 00 BA 09 15 00 81 |.RV$.D$(8)......| 00000160: 49 B2 31 A4 37 3A 87 20 43 3A 43 24 28 49 29 B2 |I.1.7:. C:C$(I).| 00000170: C7 28 43 29 3A 82 00 D7 09 16 00 83 20 35 2C 32 |.(C):....... 5,2| 00000180: 38 2C 33 30 2C 33 31 2C 31 35 39 2C 31 35 38 2C |8,30,31,159,158,| 00000190: 31 35 36 00 F3 09 17 00 81 49 B2 30 A4 31 31 3A |156......I.0.11:| 000001A0: 87 43 3A 97 34 39 31 35 32 AA 49 2C 43 3A 82 00 |.C:.49152.I,C:..| 000001B0: 15 0A 18 00 83 20 37 2C 33 2C 34 2C 35 2C 37 2C |..... 7,3,4,5,7,| 000001C0: 38 2C 34 2C 37 2C 31 30 2C 31 32 2C 31 33 2C 31 |8,4,7,10,12,13,1| 000001D0: 34 00 3C 0A 19 00 8F 20 2A 03 FF 20 07 FF 49 4E |4.<.... *.. ..IN| 000001E0: 53 54 52 55 43 54 49 4F 4E 53 20 07 FF 2A 03 FF |STRUCTIONS ..*..| 000001F0: 00 7A 0A 1A 00 99 43 53 24 43 44 24 57 48 24 52 |.z....CS$CD$WH$R| 00000200: 56 24 A6 32 29 22 52 41 49 4E 42 4F 57 20 44 49 |V$.2)"RAINBOW DI| 00000210: 53 4B 20 20 42 49 4C 42 4F 20 42 41 47 47 49 4E |SK BILBO BAGGIN| 00000220: 53 20 46 45 42 20 31 39 38 36 22 43 44 24 00 9C |S FEB 1986"CD$..| 00000230: 0A 1B 00 81 49 B2 30 A4 31 31 3A 97 35 35 33 33 |....I.0.11:.5533| 00000240: 38 AA 49 2C C2 28 34 39 31 35 32 AA 49 29 3A 82 |8.I,.(49152.I):.| 00000250: 00 CA 0A 1C 00 99 22 43 52 45 41 54 45 20 43 4F |......"CREATE CO| 00000260: 4C 4F 55 52 46 55 4C 20 44 49 53 4B 20 44 49 52 |LOURFUL DISK DIR| 00000270: 45 43 54 4F 52 49 45 53 20 57 49 54 48 22 00 E9 |ECTORIES WITH"..| 00000280: 0A 1D 00 99 22 54 48 49 53 20 55 53 45 46 55 4C |...."THIS USEFUL| 00000290: 20 55 54 49 4C 49 54 59 2E 22 43 44 24 00 15 0B | UTILITY."CD$...| 000002A0: 1E 00 99 22 43 48 4F 4F 53 45 20 41 20 53 55 49 |..."CHOOSE A SUI| 000002B0: 54 41 42 4C 45 20 44 49 56 49 44 45 52 20 41 4E |TABLE DIVIDER AN| 000002C0: 44 20 43 4F 4C 4F 52 2D 22 00 43 0B 1F 00 99 22 |D COLOR-".C...."| 000002D0: 41 4C 4C 20 46 49 4C 45 53 20 4C 4F 57 45 52 20 |ALL FILES LOWER | 000002E0: 4F 4E 20 54 48 45 20 20 44 49 53 4B 20 44 49 52 |ON THE DISK DIR| 000002F0: 45 43 54 4F 52 59 22 00 71 0B 20 00 99 22 57 49 |ECTORY".q. .."WI| 00000300: 4C 4C 20 42 45 20 44 49 53 50 4C 41 59 45 44 20 |LL BE DISPLAYED | 00000310: 4F 4E 20 54 48 45 20 53 43 52 45 45 4E 20 49 4E |ON THE SCREEN IN| 00000320: 20 54 48 45 22 00 88 0B 21 00 99 22 4E 45 57 20 | THE"...!.."NEW | 00000330: 43 4F 4C 4F 55 52 20 21 22 43 44 24 00 B6 0B 22 |COLOUR !"CD$..."| 00000340: 00 99 22 57 49 54 48 20 41 20 42 49 54 20 4F 46 |.."WITH A BIT OF| 00000350: 20 50 4C 41 4E 4E 49 4E 47 2C 20 59 4F 55 20 43 | PLANNING, YOU C| 00000360: 41 4E 20 43 52 45 41 54 45 22 00 E4 0B 23 00 99 |AN CREATE"...#..| 00000370: 22 41 20 4D 55 4C 54 49 43 4F 4C 4F 55 52 20 44 |"A MULTICOLOUR D| 00000380: 49 52 45 43 54 4F 52 59 20 54 4F 20 48 49 47 48 |IRECTORY TO HIGH| 00000390: 4C 49 47 48 54 20 41 22 00 07 0C 24 00 99 22 50 |LIGHT A"...$.."P| 000003A0: 41 52 54 49 43 55 4C 41 52 20 53 45 54 20 4F 46 |ARTICULAR SET OF| 000003B0: 20 46 49 4C 45 53 2E 22 43 44 24 00 36 0C 25 00 | FILES."CD$.6.%.| 000003C0: 99 A6 31 30 29 3B 3A 81 49 B2 31 A4 34 3A 99 52 |..10);:.I.1.4:.R| 000003D0: 56 24 43 24 28 49 29 C8 28 44 24 28 38 29 2C 36 |V$C$(I).(D$(8),6| 000003E0: 29 3B 3A 82 3A 99 20 57 48 24 00 69 0C 26 00 99 |);:.:. WH$.i.&..| 000003F0: 20 43 44 24 22 52 45 4D 45 4D 42 45 52 20 54 48 | CD$"REMEMBER TH| 00000400: 41 54 20 53 4F 4D 45 20 43 4F 4C 4F 55 52 20 43 |AT SOME COLOUR C| 00000410: 4F 4D 42 49 4E 54 41 54 49 4F 4E 53 22 00 97 0C |OMBINTATIONS"...| 00000420: 27 00 99 22 4D 41 59 20 4E 4F 54 20 53 48 4F 57 |'.."MAY NOT SHOW| 00000430: 20 55 50 20 57 45 4C 4C 20 45 47 2E 20 42 4C 55 | UP WELL EG. BLU| 00000440: 45 20 50 52 49 4E 54 20 4F 4E 22 00 C4 0C 28 00 |E PRINT ON"...(.| 00000450: 99 22 41 20 42 4C 55 45 20 53 43 52 45 45 4E 20 |."A BLUE SCREEN | 00000460: 4F 52 20 45 56 45 4E 20 52 45 44 20 4F 4E 20 42 |OR EVEN RED ON B| 00000470: 4C 55 45 2E 22 43 44 24 00 F7 0C 29 00 99 43 44 |LUE."CD$...)..CD| 00000480: 24 43 44 24 22 20 03 FF 2A 03 FF 20 50 52 45 53 |$CD$" ..*.. PRES| 00000490: 53 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E |S ANY KEY TO CON| 000004A0: 54 49 4E 55 45 20 2A 03 FF 22 3B 00 0C 0D 2A 00 |TINUE *..";...*.| 000004B0: A1 20 41 24 3A 8B 20 41 24 B2 22 22 A7 20 34 32 |. A$:. A$."". 42| 000004C0: 00 32 0D 2B 00 8F 20 2A 1F FF 00 58 0D 2C 00 8F |.2.+.. *...X.,..| 000004D0: 20 2A 03 FF 20 43 48 4F 4F 53 45 20 53 54 59 4C | *.. CHOOSE STYL| 000004E0: 45 20 4F 46 20 44 49 56 49 44 45 52 20 2A 03 FF |E OF DIVIDER *..| 000004F0: 00 7E 0D 2D 00 8F 20 2A 1F FF 00 A4 0D 2E 00 99 |.~.-.. *........| 00000500: 43 53 24 C7 28 31 35 35 29 3A 44 24 28 39 29 B2 |CS$.(155):D$(9).| 00000510: 22 2D 59 4F 55 52 20 4D 45 53 53 41 47 45 2D 22 |"-YOUR MESSAGE-"| 00000520: 00 C3 0D 2F 00 81 49 B2 31 A4 39 3A 99 A6 31 30 |.../..I.1.9:..10| 00000530: 29 49 22 29 22 44 24 28 49 29 43 44 24 3A 82 00 |)I")"D$(I)CD$:..| 00000540: F0 0D 30 00 99 22 52 45 4D 45 4D 42 45 52 3A 41 |..0.."REMEMBER:A| 00000550: 20 44 49 56 49 44 45 52 2F 43 4F 4C 4F 55 52 20 | DIVIDER/COLOUR | 00000560: 43 4F 4D 42 49 4E 41 54 49 4F 4E 22 00 1E 0E 31 |COMBINATION"...1| 00000570: 00 99 22 43 41 4E 20 4F 4E 4C 59 20 42 45 20 55 |.."CAN ONLY BE U| 00000580: 53 45 44 20 4F 4E 43 45 20 4F 4E 20 41 20 44 49 |SED ONCE ON A DI| 00000590: 53 4B 2E 20 20 57 49 54 48 22 00 4C 0E 32 00 99 |SK. WITH".L.2..| 000005A0: 22 54 48 45 20 20 4D 45 53 53 41 47 45 20 4F 50 |"THE MESSAGE OP| 000005B0: 49 54 49 4F 4E 20 54 4F 4F 2C 20 48 4F 57 45 56 |ITION TOO, HOWEV| 000005C0: 45 52 2C 54 48 49 53 22 00 78 0E 33 00 99 22 53 |ER,THIS".x.3.."S| 000005D0: 48 4F 55 4C 44 20 4E 4F 54 20 43 52 45 41 54 45 |HOULD NOT CREATE| 000005E0: 20 4D 55 43 48 20 4F 46 20 41 20 50 52 4F 42 4C | MUCH OF A PROBL| 000005F0: 45 4D 21 22 00 A4 0E 34 00 99 20 43 44 24 52 56 |EM!"...4.. CD$RV| 00000600: 24 A3 38 29 22 20 20 50 52 45 53 53 20 4B 45 59 |$.8)" PRESS KEY| 00000610: 20 54 4F 20 43 48 4F 4F 53 45 22 C7 28 31 39 29 | TO CHOOSE".(19)| 00000620: 00 C6 0E 35 00 4D 41 24 B2 22 31 32 33 34 35 36 |...5.MA$."123456| 00000630: 37 38 39 22 3A 8D 20 31 30 36 3A 44 B2 C5 28 41 |789":. 106:D..(A| 00000640: 24 29 00 D6 0E 36 00 8B 20 44 B3 B1 39 20 A7 20 |$)...6.. D..9 . | 00000650: 36 32 00 10 0F 37 00 99 43 53 24 43 44 24 22 20 |62...7..CS$CD$" | 00000660: 45 4E 54 45 52 20 4D 45 53 53 41 47 45 20 05 FF |ENTER MESSAGE ..| 00000670: 22 43 44 24 22 A3 0E FF 22 43 55 24 43 55 24 00 |"CD$"..."CU$CU$.| 00000680: 34 0F 38 00 99 A3 31 37 29 3B 3A 85 44 24 28 39 |4.8...17);:.D$(9| 00000690: 29 3A 44 24 28 39 29 B2 C8 28 44 24 28 39 29 2C |):D$(9)..(D$(9),| 000006A0: 31 34 29 00 55 0F 39 00 44 41 24 B2 C9 28 44 24 |14).U.9.DA$..(D$| 000006B0: 28 34 29 2C 28 31 34 AB C3 28 44 24 28 39 29 03 |(4),(14..(D$(9).| 000006C0: FF AD 32 29 00 6D 0F 3A 00 44 24 28 39 29 B2 44 |..2).m.:.D$(9).D| 000006D0: 41 24 AA 44 24 28 39 29 AA 44 41 24 00 93 0F 3B |A$.D$(9).DA$...;| 000006E0: 00 8F 20 2A 1F FF 00 B9 0F 3C 00 8F 20 2A 03 FF |.. *.....<.. *..| 000006F0: 20 43 48 4F 4F 53 45 20 4F 4E 45 20 4F 46 20 34 | CHOOSE ONE OF 4| 00000700: 20 43 4F 4C 4F 55 52 53 20 2A 03 FF 00 DF 0F 3D | COLOURS *.....=| 00000710: 00 8F 20 2A 1F FF 00 0E 10 3E 00 99 20 43 53 24 |.. *.....>.. CS$| 00000720: 43 44 24 52 56 24 A3 38 29 22 45 4E 54 45 52 20 |CD$RV$.8)"ENTER | 00000730: 43 48 4F 49 43 45 20 4F 46 20 43 4F 4C 4F 55 52 |CHOICE OF COLOUR| 00000740: 3A 22 43 44 24 00 39 10 3F 00 81 20 49 B2 31 A4 |:"CD$.9.?.. I.1.| 00000750: 34 3A 99 A6 31 30 29 49 22 29 22 20 03 FF 43 24 |4:..10)I")" ..C$| 00000760: 28 49 29 44 24 28 44 29 57 48 24 43 44 24 3A 82 |(I)D$(D)WH$CD$:.| 00000770: 00 69 10 40 00 99 20 52 56 24 A3 38 29 22 20 20 |.i.@.. RV$.8)" | 00000780: 50 52 45 53 53 20 41 4E 59 20 4B 45 59 20 54 4F |PRESS ANY KEY TO| 00000790: 20 43 48 4F 4F 53 45 20 20 22 43 44 24 43 44 24 | CHOOSE "CD$CD$| 000007A0: 00 85 10 41 00 4D 41 24 B2 22 31 32 33 34 22 3A |...A.MA$."1234":| 000007B0: 8D 31 30 36 3A 43 B2 C5 28 41 24 29 00 AB 10 42 |.106:C..(A$)...B| 000007C0: 00 8F 20 2A 1F FF 00 D1 10 43 00 8F 20 2A 03 FF |.. *.....C.. *..| 000007D0: 20 43 48 45 41 4B 20 54 48 41 54 20 43 48 4F 49 | CHEAK THAT CHOI| 000007E0: 43 45 20 49 53 20 4F 4B 20 2A 03 FF 00 F7 10 44 |CE IS OK *.....D| 000007F0: 00 8F 20 2A 1F FF 00 15 11 45 00 99 22 20 03 FF |.. *.....E.." ..| 00000800: 59 4F 55 52 20 43 48 4F 49 43 45 20 49 53 20 3A |YOUR CHOICE IS :| 00000810: 22 43 44 24 00 38 11 46 00 99 22 20 03 FF 44 49 |"CD$.8.F.." ..DI| 00000820: 56 49 44 45 52 20 09 FF 22 44 24 28 44 29 43 44 |VIDER .."D$(D)CD| 00000830: 24 00 60 11 47 00 99 22 20 03 FF 43 4F 4C 4F 55 |$.`.G.." ..COLOU| 00000840: 52 20 0A FF 22 43 24 28 43 29 44 24 28 34 29 43 |R .."C$(C)D$(4)C| 00000850: 44 24 00 7E 11 48 00 99 20 43 44 24 57 48 24 A3 |D$.~.H.. CD$WH$.| 00000860: 31 34 29 22 4F 4B 3F 20 03 FF 28 59 2F 4E 29 22 |14)"OK? ..(Y/N)"| 00000870: 00 9F 11 49 00 4D 41 24 B2 22 59 4E 22 3A 8D 20 |...I.MA$."YN":. | 00000880: 31 30 36 20 3A 8B 20 41 24 B2 22 4E 22 A7 20 34 |106 :. A$."N". 4| 00000890: 36 00 D9 11 4A 00 99 20 43 53 24 43 44 24 22 20 |6...J.. CS$CD$" | 000008A0: 20 52 45 41 44 59 20 54 4F 20 53 41 56 45 20 59 | READY TO SAVE Y| 000008B0: 4F 55 52 20 43 48 4F 49 43 45 20 54 4F 20 44 49 |OUR CHOICE TO DI| 000008C0: 53 4B 20 3A 20 03 FF 22 43 44 24 00 F4 11 4B 00 |SK : .."CD$...K.| 000008D0: 99 20 A3 31 33 29 43 24 28 43 29 44 24 28 44 29 |. .13)C$(C)D$(D)| 000008E0: 43 44 24 43 44 24 00 2B 12 4C 00 99 20 57 48 24 |CD$CD$.+.L.. WH$| 000008F0: 22 20 20 50 52 45 53 53 20 5B 50 5D 20 54 4F 20 |" PRESS [P] TO | 00000900: 50 52 4F 43 45 45 44 20 4F 52 20 5B 41 5D 20 54 |PROCEED OR [A] T| 00000910: 4F 20 41 42 4F 52 54 20 20 22 43 44 24 00 4C 12 |O ABORT "CD$.L.| 00000920: 4D 00 4D 41 24 B2 22 50 41 22 3A 8D 20 31 30 36 |M.MA$."PA":. 106| 00000930: 20 3A 8B 20 41 24 B2 22 41 22 A7 20 39 30 00 72 | :. A$."A". 90.r| 00000940: 12 4E 00 8F 20 2A 1F FF 00 98 12 4F 00 8F 20 2A |.N.. *.....O.. *| 00000950: 03 FF 4F 50 45 4E 20 55 53 52 20 46 49 4C 45 20 |..OPEN USR FILE | 00000960: 57 49 54 48 20 43 48 4F 49 43 45 2A 03 FF 00 BE |WITH CHOICE*....| 00000970: 12 50 00 8F 20 2A 1F FF 00 DF 12 51 00 46 4C 24 |.P.. *.....Q.FL$| 00000980: B2 C7 28 33 34 29 AA 43 24 28 43 29 AA 44 24 28 |..(34).C$(C).D$(| 00000990: 44 29 AA 22 2C 55 2C 57 22 00 03 13 52 00 9F 20 |D).",U,W"...R.. | 000009A0: 31 35 2C 38 2C 31 35 3A 9F 20 32 2C 38 2C 32 2C |15,8,15:. 2,8,2,| 000009B0: 46 4C 24 3A A0 20 32 3A 8D 20 31 31 32 00 29 13 |FL$:. 2:. 112.).| 000009C0: 53 00 8F 20 2A 1F FF 00 4F 13 54 00 8F 20 2A 03 |S.. *...O.T.. *.| 000009D0: FF 20 48 4F 57 20 54 4F 20 45 52 41 53 45 20 41 |. HOW TO ERASE A| 000009E0: 20 44 49 56 49 44 45 52 21 20 2A 03 FF 00 75 13 | DIVIDER! *...u.| 000009F0: 55 00 8F 20 2A 1F FF 00 AB 13 56 00 99 20 43 44 |U.. *.....V.. CD| 00000A00: 24 43 44 24 22 20 49 46 20 59 4F 55 20 57 49 53 |$CD$" IF YOU WIS| 00000A10: 48 20 54 4F 20 20 53 43 52 41 54 43 48 20 20 54 |H TO SCRATCH T| 00000A20: 48 49 53 20 44 49 56 49 44 45 52 2C 22 00 DA 13 |HIS DIVIDER,"...| 00000A30: 57 00 99 22 20 59 4F 55 20 43 41 4E 20 44 4F 20 |W.." YOU CAN DO | 00000A40: 53 4F 20 42 59 20 43 48 4F 4F 53 49 4E 47 20 5B |SO BY CHOOSING [| 00000A50: 45 5D 20 42 45 4C 4F 57 20 4F 52 22 00 0B 14 58 |E] BELOW OR"...X| 00000A60: 00 99 22 45 4E 54 45 52 49 4E 47 20 54 48 45 20 |.."ENTERING THE | 00000A70: 46 4F 4C 4C 4F 57 49 4E 47 20 49 4E 20 44 49 52 |FOLLOWING IN DIR| 00000A80: 45 43 54 20 4D 4F 44 45 3A 22 43 44 24 00 43 14 |ECT MODE:"CD$.C.| 00000A90: 59 00 99 22 4F 50 45 4E 31 35 2C 38 2C 31 35 2C |Y.."OPEN15,8,15,| 00000AA0: 22 C7 28 33 34 29 22 53 30 3A 3F 22 43 24 28 43 |".(34)"S0:?"C$(C| 00000AB0: 29 44 24 28 44 29 C7 28 33 34 29 22 3A 43 4C 4F |)D$(D).(34)":CLO| 00000AC0: 53 45 31 35 22 00 7C 14 5A 00 99 20 43 44 24 43 |SE15".|.Z.. CD$C| 00000AD0: 44 24 57 48 24 22 20 2A 2A 20 50 52 45 53 53 20 |D$WH$" ** PRESS | 00000AE0: 5B 52 5D 20 54 4F 20 52 45 2D 52 55 4E 2C 20 5B |[R] TO RE-RUN, [| 00000AF0: 51 5D 20 54 4F 20 51 55 49 54 20 2A 2A 22 00 AE |Q] TO QUIT **"..| 00000B00: 14 5B 00 99 20 22 20 2A 2A 20 20 5B 44 5D 20 46 |.[.. " ** [D] F| 00000B10: 4F 52 20 44 49 52 45 43 54 4F 52 59 2C 20 5B 45 |OR DIRECTORY, [E| 00000B20: 5D 20 54 4F 20 45 52 41 53 45 20 2A 2A 20 22 3B |] TO ERASE ** ";| 00000B30: 00 D1 14 5C 00 4D 41 24 B2 22 52 51 44 45 22 3A |...\.MA$."RQDE":| 00000B40: 8D 20 31 30 38 20 3A 8B 20 41 24 B2 22 52 22 A7 |. 108 :. A$."R".| 00000B50: 20 32 36 00 E2 14 5D 00 8B 20 41 24 B2 22 44 22 | 26...].. A$."D"| 00000B60: A7 20 39 39 00 18 15 5E 00 8B 20 41 24 B2 22 45 |. 99...^.. A$."E| 00000B70: 22 A7 20 9F 20 31 35 2C 38 2C 31 35 2C 22 53 4F |". . 15,8,15,"SO| 00000B80: 3A 3F 22 AA 43 24 28 43 29 AA 44 24 28 44 29 3A |:?".C$(C).D$(D):| 00000B90: 8D 20 31 31 32 3A 89 20 39 30 00 3D 15 5F 00 97 |. 112:. 90.=._..| 00000BA0: 20 36 34 36 2C 31 34 3A 99 20 43 53 24 43 44 24 | 646,14:. CS$CD$| 00000BB0: 22 20 47 4F 44 44 42 59 45 20 21 22 3B 3A 80 00 |" GODDBYE !";:..| 00000BC0: 63 15 60 00 8F 20 2A 1F FF 00 89 15 61 00 8F 20 |c.`.. *.....a.. | 00000BD0: 2A 03 FF 20 44 49 53 50 4C 41 59 20 44 49 53 4B |*.. DISPLAY DISK| 00000BE0: 20 44 49 52 45 43 54 4F 52 59 20 20 2A 03 FF 00 | DIRECTORY *...| 00000BF0: AF 15 62 00 8F 20 2A 1F FF 00 DA 15 63 00 97 20 |..b.. *.....c.. | 00000C00: 36 34 36 2C 31 34 3A 99 43 53 24 43 44 24 3A 9F |646,14:.CS$CD$:.| 00000C10: 20 31 2C 38 2C 30 2C 22 24 22 3A A1 23 31 2C 58 | 1,8,0,"$":.#1,X| 00000C20: 24 2C 58 24 00 FE 15 64 00 A1 23 31 2C 58 24 2C |$,X$...d..#1,X$,| 00000C30: 58 24 2C 58 24 2C 58 24 3A 8B 20 53 54 20 A7 20 |X$,X$,X$:. ST . | 00000C40: A0 20 31 3A 89 20 39 30 00 1A 16 65 00 A1 23 31 |. 1:. 90...e..#1| 00000C50: 2C 58 24 3A 8B 20 58 24 B2 22 22 A7 20 99 3A 89 |,X$:. X$."". .:.| 00000C60: 20 31 30 30 00 2A 16 66 00 99 20 58 24 3B 3A 89 | 100.*.f.. X$;:.| 00000C70: 20 31 30 31 00 50 16 67 00 8F 20 2A 1F FF 00 76 | 101.P.g.. *...v| 00000C80: 16 68 00 8F 20 2A 03 FF 20 47 45 54 20 52 45 51 |.h.. *.. GET REQ| 00000C90: 55 49 52 45 44 20 4B 45 59 20 49 4E 50 55 54 20 |UIRED KEY INPUT | 00000CA0: 20 2A 03 FF 00 9C 16 69 00 8F 20 2A 1F FF 00 CA | *.....i.. *....| 00000CB0: 16 6A 00 A1 20 41 24 3A 81 20 49 B2 31 20 A4 20 |.j.. A$:. I.1 . | 00000CC0: C3 28 4D 41 24 29 3A 8B 20 41 24 B2 CA 28 4D 41 |.(MA$):. A$..(MA| 00000CD0: 24 2C 49 2C 31 29 A7 20 4D 41 B2 31 00 DE 16 6B |$,I,1). MA.1...k| 00000CE0: 00 82 3A 8B 20 4D 41 20 A7 20 4D 41 B2 30 3A 8E |..:. MA . MA.0:.| 00000CF0: 00 E8 16 6C 00 89 20 31 30 36 00 0E 17 6D 00 8F |...l.. 106...m..| 00000D00: 20 2A 1F FF 00 34 17 6E 00 8F 20 2A 03 FF 20 43 | *...4.n.. *.. C| 00000D10: 48 45 43 4B 20 44 49 53 4B 20 45 52 52 4F 52 20 |HECK DISK ERROR | 00000D20: 43 48 41 4E 4E 45 4C 2A 03 FF 00 5A 17 6F 00 8F |CHANNEL*...Z.o..| 00000D30: 20 2A 1F FF 00 92 17 70 00 99 43 53 24 43 44 24 | *.....p..CS$CD$| 00000D40: 22 45 52 52 4F 52 20 52 45 50 4F 52 54 3A 22 3B |"ERROR REPORT:";| 00000D50: 3A 84 31 35 2C 45 24 28 30 29 2C 45 24 28 31 29 |:.15,E$(0),E$(1)| 00000D60: 2C 45 24 28 32 29 2C 45 24 28 33 29 00 B6 17 71 |,E$(2),E$(3)...q| 00000D70: 00 81 20 49 B2 30 20 A4 20 33 3A 99 22 20 22 45 |.. I.0 . 3:." "E| 00000D80: 24 28 49 29 3B 3A 82 3A A0 20 31 35 3A 99 3A 8E |$(I);:.:. 15:.:.| 00000D90: 00 BC 17 72 00 3A 00 C2 17 73 00 3A 00 C8 17 74 |...r.:...s.:...t| 00000DA0: 00 3A 00 F0 17 75 00 23 23 FF 00 18 18 76 00 23 |.:...u.##....v.#| 00000DB0: 20 21 FF 23 00 3E 18 77 00 23 20 20 41 4D 80 45 | !.#.>.w.# AM.E| 00000DC0: 44 20 42 59 20 54 48 45 20 27 42 45 45 20 03 FF |D BY THE 'BEE ..| 00000DD0: 46 45 42 20 27 38 36 20 20 23 00 66 18 78 00 23 |FEB '86 #.f.x.#| 00000DE0: 20 21 FF 23 00 8E 18 79 00 23 23 FF 00 04 FF A2 | !.#...y.##.....| 00000DF0: 00 BD 30 16 9D 10 01 E8 D0 F7 A2 34 BD 97 16 9D |..0........4....| 00000E00: 00 03 E8 D0 F7 EA EA A2 FF 9A A9 91 85 2D 38 E9 |.............-8.| 00000E10: 01 85 FE A9 18 85 2E E9 00 85 FF A9 ED 85 FC A9 |................| 00000E20: 15 85 FD AD 21 D0 85 FB 4C 52 01 00 00 00 00 00 |....!...LR......| 00000E30: 00 00 29 08 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..).... ********| 00000E40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000E50: 2A 48 C6 FC A5 FC C9 FF D0 02 C6 FD 68 60 48 AD |*H..........h`H.| 00000E60: 20 D0 49 01 8D 20 D0 C6 FE A5 FE C9 FF D0 02 C6 | .I.. ..........| 00000E70: FF 68 60 A0 00 B1 FC C9 FF D0 18 EA EA EA 20 30 |.h`........... 0| 00000E80: 01 B1 FC AA 20 30 01 B1 FC 91 FE 20 3D 01 CA D0 |.... 0..... =...| 00000E90: F8 F0 05 91 FE 20 3D 01 A6 FC CA 86 FC E0 FF D0 |..... =.........| 00000EA0: 02 C6 FD A5 FE C9 1F A5 FF E9 08 B0 C8 A5 FB 8D |................| 00000EB0: 20 D0 A9 37 85 01 20 60 A6 20 8E A6 A2 1F BD 10 | ..7.. `. ......| 00000EC0: 01 9D 00 08 CA D0 F7 A9 FF 4C 34 03 4C AE A7 |.........L4.L.. |
.......2061... D.... P.!P..6..L..*...Q.. .. *.. RAINBOW DISK UTILITY V1.0 *...Y.. .. *.. BILBO BAGGINS FEB 1986 *........ *!..I.... *.. SET UP SCREEN & STRINGS *........ *!..(...RV$.G(18):CD$.G(17):CU $.G(145):CS$.G(147):WH$.G(5).>....53280, 0:.53281,0.K....I.1.8:. D:.J.0.13:D$(I). D$(I).G(D):.J,I...... 46,45,43,96,33,35, 118,32.....D$(8).RV$.D$(8)......I.1.7:. C:C$(I).G(C):..W.... 5,28,30,31,159,158, 156......I.0.11:.C:.49152.I,C:....... 7, 3,4,5,7,8,4,7,10,12,13,14.<.... *.. ..IN STRUCTIONS ..*...Z....CS$CD$WH$RV$.2)"RA INBOW DISK BILBO BAGGINS FEB 1986"CD$.. ....I.0.11:.55338.I,B(49152.I):..J...."C REATE COLOURFUL DISK DIRECTORIES WITH".. ...."THIS USEFUL UTILITY."CD$......"CHOO SE A SUITABLE DIVIDER AND COLOR-".C...." ALL FILES LOWER ON THE DISK DIRECTORY". Q. .."WILL BE DISPLAYED ON THE SCREEN IN THE"...!.."NEW COLOUR !"CD$...".."WITH A BIT OF PLANNING, YOU CAN CREATE"...#.. "A MULTICOLOUR DIRECTORY TO HIGHLIGHT A" ...$.."PARTICULAR SET OF FILES."CD$.6.%. ..10);:.I.1.4:.RV$C$(I)H(D$(8),6);:.:. W H$.I.&.. CD$"REMEMBER THAT SOME COLOUR C OMBINTATIONS"...'.."MAY NOT SHOW UP WELL EG. BLUE PRINT ON".D.(.."A BLUE SCREEN OR EVEN RED ON BLUE."CD$...)..CD$CD$" .. *.. PRESS ANY KEY TO CONTINUE *..";...*. . A$:. A$."". 42.2.+.. *...X.,.. *.. CHO OSE STYLE OF DIVIDER *...~.-.. *........ CS$G(155):D$(9)."-YOUR MESSAGE-".C./..I. 1.9:..10)I")"D$(I)CD$:....0.."REMEMBER:A DIVIDER/COLOUR COMBINATION"...1.."CAN O NLY BE USED ONCE ON A DISK. WITH".L.2.. "THE MESSAGE OPITION TOO, HOWEVER,THIS" .X.3.."SHOULD NOT CREATE MUCH OF A PROBL EM!"...4.. CD$RV$.8)" PRESS KEY TO CHOO SE"G(19).F.5.MA$."123456789":. 106:D.E(A $).V.6.. D..9 . 62...7..CS$CD$" ENTER ME SSAGE .."CD$"..."CU$CU$.4.8...17);:.D$(9 ):D$(9).H(D$(9),14).U.9.DA$.I(D$(4),(14. C(D$(9)...2).M.:.D$(9).DA$.D$(9).DA$...; .. *.....<.. *.. CHOOSE ONE OF 4 COLOURS *.....=.. *.....>.. CS$CD$RV$.8)"ENTER CHOICE OF COLOUR:"CD$.9.?.. I.1.4:..10)I ")" ..C$(I)D$(D)WH$CD$:..I.@.. RV$.8)" PRESS ANY KEY TO CHOOSE "CD$CD$...A.MA$ ."1234":.106:C.E(A$)...B.. *...Q.C.. *.. CHEAK THAT CHOICE IS OK *.....D.. *.... .E.." ..YOUR CHOICE IS :"CD$.8.F.." ..DI VIDER .."D$(D)CD$.`.G.." ..COLOUR .."C$( C)D$(4)CD$.~.H.. CD$WH$.14)"OK? ..(Y/N)" ...I.MA$."YN":. 106 :. A$."N". 46.Y.J.. CS$CD$" READY TO SAVE YOUR CHOICE TO DI SK : .."CD$...K.. .13)C$(C)D$(D)CD$CD$.+ .L.. WH$" PRESS [P] TO PROCEED OR [A] T O ABORT "CD$.L.M.MA$."PA":. 106 :. A$." A". 90.R.N.. *.....O.. *..OPEN USR FILE WITH CHOICE*.....P.. *.....Q.FL$.G(34).C $(C).D$(D).",U,W"...R.. 15,8,15:. 2,8,2, FL$: 2:. 112.).S.. *...O.T.. *.. HOW TO ERASE A DIVIDER! *...U.U.. *.....V.. CD $CD$" IF YOU WISH TO SCRATCH THIS DIVI DER,".Z.W.." YOU CAN DO SO BY CHOOSING [ E] BELOW OR"...X.."ENTERING THE FOLLOWIN G IN DIRECT MODE:"CD$.C.Y.."OPEN15,8,15, "G(34)"S0:?"C$(C)D$(D)G(34)":CLOSE15".|. Z.. CD$CD$WH$" ** PRESS [R] TO RE-RUN, [ Q] TO QUIT **"...[.. " ** [D] FOR DIREC TORY, [E] TO ERASE ** ";.Q.\.MA$."RQDE": . 108 :. A$."R". 26...].. A$."D". 99...^ .. A$."E". . 15,8,15,"SO:?".C$(C).D$(D): . 112:. 90.=._.. 646,14:. CS$CD$" GODDBY E !";:..C.`.. *.....A.. *.. DISPLAY DISK DIRECTORY *.....B.. *...Z.C.. 646,14:. CS$CD$:. 1,8,0,"$":.#1,X$,X$...D..#1,X$, X$,X$,X$:. ST . 1:. 90...E..#1,X$:. X$ ."". .:. 100.*.F.. X$;:. 101.P.G.. *...V .H.. *.. GET REQUIRED KEY INPUT *.....I .. *...J.J.. A$:. I.1 . C(MA$):. A$.J(MA $,I,1). MA.1...K..:. MA . MA.0:....L.. 1 06...M.. *...4.N.. *.. CHECK DISK ERROR CHANNEL*...Z.O.. *.....P..CS$CD$"ERROR R EPORT:";:.15,E$(0),E$(1),E$(2),E$(3)...Q .. I.0 . 3:." "E$(I);:.: 15:.:....R.:.B .S.:.H.T.:...U.##....V.# !.#.>.W.# AM.E D BY THE 'BEE ..FEB '86 #.F.X.# !.#...Y .##.......0.....P..4.......P.........-8. ....................!P..LR........).... *************************HF...I.P.F.H`H. PI.. PF...I.P.F.H` ...I.P.... 0.... 0.. ... =.JP..... =...J....P.F...I......H... P.7.. `. ..........JP...L4.L..
> CLICK IMAGE PREVIEW FOR FULL MODAL