SEQ FILE READER
FILE INFORMATION
FILENAME(S): SEQ FILE READER
FILE TYPE(S): PRG
FILE SIZE: 3.5K
FIRST SEEN: 2025-10-20 14:30:26
APPEARS ON: 3 disk(s)
FILE HASH
e8f8eedf27fd49f335008b42e8371ff9dee884ae061e88d1561eb6beb45a7c80
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| WOLF S SOFT C011 | SEQ FILE READER | PRG | Treasure Chest - Klaus Der Suhler | 4 | 5 | DOWNLOAD FILE |
| C128 Z004 | SEQ FILE READER | PRG | Treasure Chest - Plattfuss | 9 | 2 | DOWNLOAD FILE |
| 6 | SEQ FILE READER | PRG | Treasure Chest - Plattfuss | 20 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 2C 1C 02 00 8F 2A 2A 2A 2A 2A 2A 2A 20 43 |..,....******* C|
00000010: 48 41 4E 47 45 20 54 4F 20 34 30 20 43 4F 4C 55 |HANGE TO 40 COLU|
00000020: 4D 4E 53 20 2A 2A 2A 2A 2A 2A 2A 2A 00 56 1C 03 |MNS ********.V..|
00000030: 00 8F 20 54 4F 20 43 48 41 4E 47 45 20 54 4F 20 |.. TO CHANGE TO |
00000040: 34 30 20 43 4F 4C 20 44 45 4C 45 54 45 20 4C 49 |40 COL DELETE LI|
00000050: 4E 45 20 31 35 30 00 97 1C 04 00 8F 20 43 48 41 |NE 150...... CHA|
00000060: 4E 47 45 20 37 39 20 49 4E 20 4C 49 4E 45 20 35 |NGE 79 IN LINE 5|
00000070: 31 30 20 54 4F 20 33 39 20 20 26 20 43 48 41 4E |10 TO 39 & CHAN|
00000080: 47 45 20 32 37 20 49 4E 20 4C 49 4E 45 20 31 30 |GE 27 IN LINE 10|
00000090: 30 20 54 4F 20 31 33 00 B4 1C 05 00 8F 20 52 45 |0 TO 13...... RE|
000000A0: 4D 4F 56 45 20 52 45 4D 20 46 52 4F 4D 20 4C 49 |MOVE REM FROM LI|
000000B0: 4E 45 20 37 00 C1 1C 07 00 8F 47 4F 54 4F 39 30 |NE 7......GOTO90|
000000C0: 30 00 2D 1D 0A 00 DE 30 2C 31 3A 99 22 13 54 48 |0.-....0,1:.".TH|
000000D0: 49 53 20 49 53 20 41 4E 20 38 30 20 43 4F 4C 55 |IS IS AN 80 COLU|
000000E0: 4D 4E 20 50 52 4F 47 52 41 4D 20 53 57 49 54 43 |MN PROGRAM SWITC|
000000F0: 48 20 54 4F 20 20 27 52 47 42 27 20 4F 4E 20 4D |H TO 'RGB' ON M|
00000100: 4F 4E 49 54 4F 52 22 3A DE 35 2C 31 3A E8 3A E7 |ONITOR":.5,1:.:.|
00000110: 20 36 2C 37 3A E7 20 35 2C 38 3A E8 20 3A 8F 20 | 6,7:. 5,8:. :. |
00000120: 53 43 52 45 45 4E 20 43 4F 4C 4F 52 53 00 36 1D |SCREEN COLORS.6.|
00000130: 14 00 99 22 93 22 00 90 1D 1E 00 99 22 12 1C 20 |..."."......".. |
00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00000190: 00 ED 1D 28 00 99 22 12 1C 20 92 20 20 20 20 20 |...(..".. . |
000001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001E0: 20 20 20 20 20 20 20 20 20 12 20 92 22 00 49 1E | . .".I.|
000001F0: 32 00 99 22 12 1C 20 92 20 20 20 20 20 20 20 20 |2..".. . |
00000200: 20 20 20 20 53 45 51 20 46 49 4C 45 20 52 45 41 | SEQ FILE REA|
00000210: 44 45 52 20 41 4E 44 20 50 52 49 4E 54 45 52 20 |DER AND PRINTER |
00000220: 43 2D 31 32 38 20 38 30 20 43 4F 4C 55 4D 4E 53 |C-128 80 COLUMNS|
00000230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000240: 20 20 20 20 20 20 12 20 22 00 A6 1E 3C 00 99 22 | . "...<.."|
00000250: 12 1C 20 92 20 20 20 20 20 20 20 20 20 20 20 20 |.. . |
00000260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 | B|
00000270: 59 20 44 41 56 45 20 43 20 20 20 20 20 20 20 20 |Y DAVE C |
00000280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002A0: 20 20 12 20 92 22 00 03 1F 46 00 99 22 12 1C 20 | . ."...F..".. |
000002B0: 92 20 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A |. ***|
000002C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 20 20 20 20 20 |********** |
000002F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 | .|
00000300: 20 92 22 00 5D 1F 50 00 99 22 12 1C 20 20 20 20 | .".].P..".. |
00000310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000350: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 6C 1F | ".l.|
00000360: 55 00 E7 35 2C 38 3A 99 22 11 11 22 00 C0 1F 5A |U..5,8:.".."...Z|
00000370: 00 F9 31 2C C7 28 31 33 33 29 3A F9 33 2C C7 28 |..1,.(133):.3,.(|
00000380: 31 33 34 29 3A F9 35 2C C7 28 31 33 35 29 3A F9 |134):.5,.(135):.|
00000390: 37 2C C7 28 31 33 36 29 3A F9 32 2C C7 28 31 33 |7,.(136):.2,.(13|
000003A0: 37 29 3A F9 34 2C C7 28 31 33 38 29 3A F9 36 2C |7):.4,.(138):.6,|
000003B0: C7 28 31 33 39 29 3A F9 38 2C C7 28 31 34 30 29 |.(139):.8,.(140)|
000003C0: 00 CE 1F 64 00 52 B2 32 37 3A E7 35 2C 38 00 03 |...d.R.27:.5,8..|
000003D0: 20 6E 00 99 20 20 20 C7 28 31 34 29 20 A6 52 29 | n.. .(14) .R)|
000003E0: 22 12 4F 50 54 49 4F 4E 53 3A 92 22 3A 99 20 A6 |".OPTIONS:.":. .|
000003F0: 52 29 22 11 46 31 20 3D 20 44 49 52 45 43 54 4F |R)".F1 = DIRECTO|
00000400: 52 59 22 00 36 20 78 00 99 20 A6 52 29 22 11 46 |RY".6 x.. .R)".F|
00000410: 33 20 3D 20 53 43 52 45 45 4E 20 4F 4E 4C 59 22 |3 = SCREEN ONLY"|
00000420: 3A 99 20 A6 52 29 22 11 46 35 20 3D 20 48 41 52 |:. .R)".F5 = HAR|
00000430: 44 43 4F 50 59 22 00 59 20 82 00 99 20 A6 52 29 |DCOPY".Y ... .R)|
00000440: 22 11 46 37 20 3D 20 53 43 52 41 54 43 48 20 44 |".F7 = SCRATCH D|
00000450: 49 53 4B 20 46 49 4C 45 22 00 7C 20 8C 00 A1 F9 |ISK FILE".| ....|
00000460: 20 4B 24 3A 8B 4B 24 B3 C7 28 31 33 33 29 B0 4B | K$:.K$..(133).K|
00000470: 24 B1 C7 28 31 33 36 29 A7 31 34 30 00 83 20 96 |$..(136).140.. .|
00000480: 00 FE 25 00 96 20 A0 00 8B 4B 24 B2 C7 28 31 33 |..%.. ...K$..(13|
00000490: 36 29 A7 36 36 30 00 A9 20 AA 00 8B 4B 24 B1 C7 |6).660.. ...K$..|
000004A0: 28 31 33 33 29 A7 34 30 30 00 AF 20 B4 00 E8 00 |(133).400.. ....|
000004B0: E2 20 BE 00 99 22 13 22 A6 52 29 20 22 12 44 49 |. ...".".R) ".DI|
000004C0: 52 45 43 54 4F 52 59 92 11 11 22 3A 99 A6 52 29 |RECTORY...":..R)|
000004D0: 22 46 31 20 3D 20 53 43 52 45 45 4E 20 4F 4E 4C |"F1 = SCREEN ONL|
000004E0: 59 22 00 1D 21 C8 00 99 A6 52 29 20 22 11 46 33 |Y"..!....R) ".F3|
000004F0: 20 3D 20 48 41 52 44 43 4F 50 59 22 3A 99 A6 52 | = HARDCOPY":..R|
00000500: 29 20 22 11 46 35 20 3D 20 43 41 4E 43 45 4C 20 |) ".F5 = CANCEL |
00000510: 46 55 4E 43 54 49 4F 4E 22 3A 50 B2 30 00 40 21 |FUNCTION":P.0.@!|
00000520: D2 00 A1 F9 20 4B 24 3A 8B 4B 24 B3 C7 28 31 33 |.... K$:.K$..(13|
00000530: 33 29 B0 4B 24 B1 C7 28 31 33 35 29 A7 32 31 30 |3).K$..(135).210|
00000540: 00 46 21 DC 00 E8 00 59 21 E6 00 8B 4B 24 B2 C7 |.F!....Y!...K$..|
00000550: 28 31 33 35 29 A7 31 31 30 00 6C 21 F0 00 8B 4B |(135).110.l!...K|
00000560: 24 B2 C7 28 31 33 33 29 A7 33 35 30 00 9B 21 FA |$..(133).350..!.|
00000570: 00 9F 34 2C 34 3A 98 34 3A 98 34 2C C7 28 31 34 |..4,4:.4:.4,.(14|
00000580: 29 22 44 49 52 45 43 54 4F 52 59 22 C7 28 31 35 |)"DIRECTORY".(15|
00000590: 29 3A 98 34 3A 98 34 3A 50 B2 31 00 D1 21 04 01 |):.4:.4:P.1..!..|
000005A0: 99 22 93 12 44 49 52 45 43 54 4F 52 59 92 22 3A |."..DIRECTORY.":|
000005B0: 99 3A 99 3A 9F 31 2C 38 2C 30 2C 22 24 30 22 3A |.:.:.1,8,0,"$0":|
000005C0: A1 23 31 2C 41 24 2C 42 24 3A 4E 24 B2 C7 28 30 |.#1,A$,B$:N$..(0|
000005D0: 29 00 EA 21 0E 01 A1 23 31 2C 41 24 2C 42 24 3A |)..!...#1,A$,B$:|
000005E0: 8B 42 24 B2 22 22 A7 33 37 30 00 10 22 18 01 A1 |.B$."".370.."...|
000005F0: 23 31 2C 41 24 2C 42 24 3A 99 C6 28 41 24 AA 4E |#1,A$,B$:..(A$.N|
00000600: 24 29 AA 32 35 36 AC C6 28 42 24 AA 4E 24 29 3B |$).256..(B$.N$);|
00000610: 00 33 22 22 01 8B 50 B2 31 A7 98 34 2C C6 28 41 |.3""..P.1..4,.(A|
00000620: 24 AA 4E 24 29 AA 32 35 36 AC C6 28 42 24 AA 4E |$.N$).256..(B$.N|
00000630: 24 29 3B 00 49 22 2C 01 A1 23 31 2C 41 24 3A 8B |$);.I",..#1,A$:.|
00000640: 41 24 B2 22 22 A7 33 33 30 00 59 22 36 01 8B 50 |A$."".330.Y"6..P|
00000650: B2 31 A7 98 34 2C 41 24 3B 00 67 22 40 01 99 41 |.1..4,A$;.g"@..A|
00000660: 24 3B 3A 89 33 30 30 00 75 22 4A 01 99 3A 8B 50 |$;:.300.u"J..:.P|
00000670: B2 31 A7 98 34 00 7E 22 54 01 89 32 37 30 00 84 |.1..4.~"T..270..|
00000680: 22 5E 01 EE 00 A9 22 68 01 99 22 11 11 D0 52 45 |"^...."h.."...RE|
00000690: 53 53 20 C1 4E 59 20 CB 45 59 22 3A A1 F9 20 4B |SS .NY .EY":.. K|
000006A0: 24 3A E8 20 3A 89 31 31 30 00 C3 22 72 01 8B 50 |$:. :.110.."r..P|
000006B0: B2 31 A7 81 58 B2 31 A4 37 3A 98 34 3A 82 58 3A |.1..X.1.7:.4:.X:|
000006C0: 50 B2 30 00 ED 22 7C 01 99 3A 99 22 50 52 45 53 |P.0.."|..:."PRES|
000006D0: 53 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E |S ANY KEY TO CON|
000006E0: 54 49 4E 55 45 2E 22 3A A0 31 3A A0 34 00 FB 22 |TINUE.":.1:.4.."|
000006F0: 86 01 A1 F9 4B 24 20 3A 89 32 30 00 1D 23 90 01 |....K$ :.20..#..|
00000700: 9F 31 2C 34 2C 37 3A 4C B2 31 3A 50 B2 30 3A 8B |.1,4,7:L.1:P.0:.|
00000710: 4B 24 B2 C7 28 31 33 35 29 A7 50 B2 31 00 3F 23 |K$..(135).P.1.?#|
00000720: 9A 01 99 22 93 12 C5 4E 54 45 52 20 41 20 46 49 |..."...NTER A FI|
00000730: 4C 45 4E 41 4D 45 3A 92 20 22 3B 3A 85 46 24 00 |LENAME:. ";:.F$.|
00000740: 59 23 A4 01 9F 38 2C 38 2C 38 2C 46 24 AA 22 2C |Y#...8,8,8,F$.",|
00000750: 53 2C 52 22 3A 8D 38 31 30 00 8E 23 AE 01 99 22 |S,R":.810..#..."|
00000760: 93 12 50 52 45 53 53 20 41 4E 59 20 4B 45 59 20 |..PRESS ANY KEY |
00000770: 54 4F 20 50 41 55 53 45 20 41 4E 44 20 47 45 54 |TO PAUSE AND GET|
00000780: 20 4D 4F 52 45 20 4F 50 54 49 4F 4E 53 22 00 C2 | MORE OPTIONS"..|
00000790: 23 B8 01 99 22 20 11 D0 52 45 53 53 20 27 CE CF |#..." ..RESS '..|
000007A0: 20 D3 C3 D2 CF CC CC 27 20 54 4F 20 D0 41 55 53 | ......' TO .AUS|
000007B0: 45 20 57 49 54 48 4F 55 54 20 4F 50 54 49 4F 4E |E WITHOUT OPTION|
000007C0: 53 22 00 DC 23 C2 01 99 3A 99 3A 99 A3 31 30 29 |S"..#...:.:..10)|
000007D0: 22 12 22 46 24 22 92 22 3A 99 3A 99 00 0A 24 CC |"."F$".":.:...$.|
000007E0: 01 8B 50 B2 31 A7 98 31 2C C7 28 31 34 35 29 C7 |..P.1..1,.(145).|
000007F0: 28 31 34 29 46 24 C7 28 31 35 29 C7 28 31 37 29 |(14)F$.(15).(17)|
00000800: 3A 98 31 3A 98 31 3A 4C B2 34 00 16 24 D6 01 A1 |:.1:.1:L.4..$...|
00000810: 23 38 2C 43 48 24 00 2B 24 E0 01 99 43 48 24 3B |#8,CH$.+$...CH$;|
00000820: 3A 8B 53 54 B3 B1 30 A7 36 30 30 00 52 24 EA 01 |:.ST..0.600.R$..|
00000830: 8B 50 B2 31 A7 98 31 2C 43 48 24 3B 3A 8B 43 48 |.P.1..1,CH$;:.CH|
00000840: 24 B2 C7 28 31 33 29 A7 4C B2 4C AA 31 3A 8D 38 |$..(13).L.L.1:.8|
00000850: 34 30 00 65 24 F4 01 A1 4B 24 3A 8B 4B 24 B2 22 |40.e$...K$:.K$."|
00000860: 22 A7 34 37 30 00 96 24 FE 01 99 3A 81 58 B2 31 |".470..$...:.X.1|
00000870: A4 37 39 3A 99 22 2A 22 3B 3A 82 58 3A 99 3A 99 |.79:."*";:.X:.:.|
00000880: 22 12 50 41 55 53 45 20 49 53 20 49 4E 20 45 46 |".PAUSE IS IN EF|
00000890: 46 45 43 54 92 22 00 CD 24 08 02 99 22 4F 50 54 |FECT."..$..."OPT|
000008A0: 49 4F 4E 53 3A 22 3A 99 22 46 31 20 3D 20 50 52 |IONS:":."F1 = PR|
000008B0: 49 4E 54 45 52 20 4F 4E 22 3A 99 22 46 33 20 3D |INTER ON":."F3 =|
000008C0: 20 50 52 49 4E 54 45 52 20 4F 46 46 22 00 04 25 | PRINTER OFF"..%|
000008D0: 12 02 99 22 46 35 20 3D 20 41 42 4F 52 54 20 4F |..."F5 = ABORT O|
000008E0: 50 45 52 41 54 49 4F 4E 22 3A 99 22 46 37 20 3D |PERATION":."F7 =|
000008F0: 20 43 4F 4E 54 49 4E 55 45 20 55 4E 43 48 41 4E | CONTINUE UNCHAN|
00000900: 47 45 44 22 00 27 25 1C 02 A1 F9 20 4B 24 3A 8B |GED".'%.... K$:.|
00000910: 4B 24 B3 C7 28 31 33 33 29 B0 4B 24 B1 C7 28 31 |K$..(133).K$..(1|
00000920: 33 36 29 A7 35 34 30 00 52 25 26 02 8B 4B 24 B2 |36).540.R%&..K$.|
00000930: C7 28 31 33 33 29 A7 50 B2 31 3A 98 31 2C C7 28 |.(133).P.1:.1,.(|
00000940: 31 37 29 3A 98 31 3A 98 31 3A 4C B2 33 3A 89 35 |17):.1:.1:L.3:.5|
00000950: 38 30 00 6A 25 30 02 8B 4B 24 B2 C7 28 31 33 34 |80.j%0..K$..(134|
00000960: 29 A7 50 B2 30 3A 89 35 38 30 00 7D 25 3A 02 8B |).P.0:.580.}%:..|
00000970: 4B 24 B2 C7 28 31 33 35 29 A7 35 39 30 00 A8 25 |K$..(135).590..%|
00000980: 44 02 99 22 12 43 4F 4E 54 49 4E 55 49 4E 47 92 |D..".CONTINUING.|
00000990: 22 3A 81 58 B2 31 A4 33 39 3A 99 22 2A 22 3B 3A |":.X.1.39:."*";:|
000009A0: 82 3A 99 3A 89 34 37 30 00 D5 25 4E 02 99 22 93 |.:.:.470..%N..".|
000009B0: 11 11 11 11 11 22 A3 31 31 29 C7 28 31 34 32 29 |.....".11).(142)|
000009C0: 22 12 4F 50 45 52 41 54 49 4F 4E 20 41 42 4F 52 |".OPERATION ABOR|
000009D0: 54 45 44 92 22 00 FB 25 58 02 8B 50 B2 31 A7 98 |TED."..%X..P.1..|
000009E0: 31 3A 81 58 B2 4C AA 32 A4 36 36 3A 98 31 3A 82 |1:.X.L.2.66:.1:.|
000009F0: 58 3A 98 31 2C C7 28 31 34 35 29 00 04 26 62 02 |X:.1,.(145)..&b.|
00000A00: 99 44 53 24 00 45 26 6C 02 A0 31 3A A0 38 3A 99 |.DS$.E&l..1:.8:.|
00000A10: 3A 99 C7 28 31 34 29 22 11 11 C4 4F 20 59 4F 55 |:..(14)"...O YOU|
00000A20: 20 57 49 53 48 20 54 4F 20 52 45 41 44 22 3A 99 | WISH TO READ":.|
00000A30: 22 41 4E 4F 54 48 45 52 20 46 49 4C 45 3F 20 28 |"ANOTHER FILE? (|
00000A40: 59 2F 4E 29 22 00 60 26 76 02 A1 F9 20 4B 24 3A |Y/N)".`&v... K$:|
00000A50: 8B 4B 24 B2 22 59 22 A7 9C 3A E8 3A 89 31 30 30 |.K$."Y"..:.:.100|
00000A60: 00 71 26 80 02 8B 4B 24 B3 B1 22 4E 22 A7 36 33 |.q&...K$.."N".63|
00000A70: 30 00 7A 26 8A 02 89 38 38 30 00 8B 26 94 02 99 |0.z&...880..&...|
00000A80: C7 28 31 34 32 29 3A 8D 38 36 30 00 BF 26 9E 02 |.(142):.860..&..|
00000A90: 99 22 11 11 11 54 59 50 45 20 49 4E 20 54 48 45 |."...TYPE IN THE|
00000AA0: 20 20 46 49 4C 45 4E 41 4D 45 20 20 54 4F 20 42 | FILENAME TO B|
00000AB0: 45 20 20 53 43 52 41 54 43 48 45 44 20 22 3B 00 |E SCRATCHED ";.|
00000AC0: EF 26 A8 02 99 22 4F 52 20 50 52 45 53 53 20 52 |.&..."OR PRESS R|
00000AD0: 45 54 55 52 4E 20 54 4F 20 41 42 4F 52 54 20 54 |ETURN TO ABORT T|
00000AE0: 48 45 20 46 55 4E 43 54 49 4F 4E 2E 11 11 22 00 |HE FUNCTION...".|
00000AF0: 07 27 B2 02 99 22 12 46 49 4C 45 4E 41 4D 45 3A |.'...".FILENAME:|
00000B00: 92 22 3B 3A 85 46 24 00 16 27 BC 02 8B 46 24 B2 |.";:.F$..'...F$.|
00000B10: 22 22 A7 37 35 30 00 51 27 C6 02 8D 38 36 30 3A |"".750.Q'...860:|
00000B20: 99 22 11 11 4C 41 53 54 20 43 48 41 4E 43 45 21 |."..LAST CHANCE!|
00000B30: 22 3A 99 22 11 11 44 4F 20 59 4F 55 20 52 45 41 |":."..DO YOU REA|
00000B40: 4C 4C 59 20 57 49 53 48 20 54 4F 20 4B 49 4C 4C |LLY WISH TO KILL|
00000B50: 22 00 74 27 D0 02 99 22 11 54 48 45 20 20 12 20 |".t'...".THE . |
00000B60: 22 46 24 22 20 92 20 20 46 49 4C 45 3F 20 28 59 |"F$" . FILE? (Y|
00000B70: 2F 4E 29 22 00 89 27 DA 02 A1 F9 20 4B 24 3A 8B |/N)"..'.... K$:.|
00000B80: 4B 24 B2 22 22 A7 37 33 30 00 99 27 E4 02 8B 4B |K$."".730..'...K|
00000B90: 24 B2 22 59 22 A7 37 36 30 00 A9 27 EE 02 99 C7 |$."Y".760..'....|
00000BA0: 28 31 34 29 3A 89 35 39 30 00 C2 27 F8 02 8D 38 |(14):.590..'...8|
00000BB0: 36 30 3A 99 22 11 11 4B 49 4C 4C 49 4E 47 20 22 |60:."..KILLING "|
00000BC0: 46 24 00 E0 27 02 03 A0 31 35 3A 9F 31 35 2C 38 |F$..'...15:.15,8|
00000BD0: 2C 31 35 3A 98 31 35 2C 22 53 30 3A 22 AA 46 24 |,15:.15,"S0:".F$|
00000BE0: 00 F5 27 0C 03 81 58 B2 31 A4 32 30 30 30 3A 82 |..'...X.1.2000:.|
00000BF0: 58 3A A0 31 35 00 16 28 16 03 8D 38 36 30 3A 99 |X:.15..(...860:.|
00000C00: 22 11 11 22 46 24 22 20 49 53 20 4E 4F 57 20 44 |".."F$" IS NOW D|
00000C10: 45 41 44 21 21 22 00 33 28 20 03 81 58 B2 31 A4 |EAD!!".3( ..X.1.|
00000C20: 32 30 30 30 3A 82 58 3A 99 C7 28 31 34 29 3A 89 |2000:.X:..(14):.|
00000C30: 31 31 30 00 62 28 2A 03 8B 44 53 B1 30 A7 99 3A |110.b(*..DS.0..:|
00000C40: 99 22 54 48 45 52 45 20 49 53 20 41 20 44 49 53 |."THERE IS A DIS|
00000C50: 4B 20 45 52 52 4F 52 22 3A 99 44 53 24 3A 89 36 |K ERROR":.DS$:.6|
00000C60: 32 30 00 91 28 34 03 8B 44 53 B1 30 A7 99 3A 99 |20..(4..DS.0..:.|
00000C70: 22 54 48 45 52 45 20 49 53 20 41 20 44 49 53 4B |"THERE IS A DISK|
00000C80: 20 45 52 52 4F 52 22 3A 99 44 53 24 3A 89 36 32 | ERROR":.DS$:.62|
00000C90: 30 00 97 28 3E 03 8E 00 B2 28 48 03 8B 4C B2 36 |0..(>....(H..L.6|
00000CA0: 30 A7 4C B2 31 3A 81 58 B2 31 A4 37 3A 98 31 3A |0.L.1:.X.1.7:.1:|
00000CB0: 82 58 00 B8 28 52 03 8E 00 E2 28 5C 03 99 22 93 |.X..(R....(\..".|
00000CC0: 11 11 11 11 11 22 A3 38 29 22 12 4B 49 4C 4C 20 |.....".8)".KILL |
00000CD0: 46 55 4E 43 54 49 4F 4E 20 41 43 54 49 56 45 20 |FUNCTION ACTIVE |
00000CE0: 92 22 00 E8 28 66 03 8E 00 61 29 70 03 F9 31 2C |."..(f...a)p..1,|
00000CF0: 22 47 52 41 50 48 49 43 22 3A F9 32 2C 22 44 4C |"GRAPHIC":.2,"DL|
00000D00: 4F 41 44 22 AA C7 28 33 34 29 3A F9 33 2C 22 44 |OAD"..(34):.3,"D|
00000D10: 49 52 45 43 54 4F 52 59 22 AA C7 28 31 33 29 3A |IRECTORY"..(13):|
00000D20: F9 34 2C 22 53 43 4E 43 4C 52 22 AA C7 28 31 33 |.4,"SCNCLR"..(13|
00000D30: 29 3A F9 35 2C 22 44 53 41 56 45 22 AA C7 28 33 |):.5,"DSAVE"..(3|
00000D40: 34 29 3A F9 36 2C 22 52 55 4E 22 AA C7 28 31 33 |4):.6,"RUN"..(13|
00000D50: 29 3A F9 37 2C 22 4C 49 53 54 22 AA C7 28 31 33 |):.7,"LIST"..(13|
00000D60: 29 00 7B 29 7A 03 F9 38 2C 22 4D 4F 4E 49 54 4F |).{)z..8,"MONITO|
00000D70: 52 22 AA C7 28 31 33 29 3A FE 26 00 81 29 7F 03 |R"..(13):.&..)..|
00000D80: 80 00 A9 29 84 03 99 22 11 D3 C5 D1 20 C6 C9 CC |...)...".... ...|
00000D90: C5 20 D2 C5 C1 C4 C5 D2 20 26 20 D0 D2 C9 CE D4 |. ...... & .....|
00000DA0: C5 D2 20 C3 2D 31 32 38 22 00 D0 29 8E 03 99 22 |.. .-128"..)..."|
00000DB0: 11 34 30 20 C3 CF CC D5 CD CE D3 20 C2 D9 20 C4 |.40 ....... .. .|
00000DC0: C1 D6 C5 20 C3 20 CF CE 20 D1 2D CC C9 CE CB 22 |... . .. .-...."|
00000DD0: 00 D8 29 98 03 89 38 35 00 00 00 |..)...85... |
..,....******* CHANGE TO 40 COLUMNS ****
****.V.... TO CHANGE TO 40 COL DELETE LI
NE 150...... CHANGE 79 IN LINE 510 TO 39
& CHANGE 27 IN LINE 100 TO 13...... RE
MOVE REM FROM LINE 7.A....GOTO900.-....0
,1:.".THIS IS AN 80 COLUMN PROGRAM SWITC
H TO 'RGB' ON MONITOR":.5,1:.:. 6,7:. 5
,8:. :. SCREEN COLORS.6...."."......"..
"
...(..".. .
. .".I.2..".. . SEQ
FILE READER AND PRINTER C-128 80 COLUMNS
. "...<..".. .
BY DAVE C
. ."..
.F..".. . *******************
**************************
. .".].P.."..
".L.U..5,8:.".."...Z
..1,G(133):.3,G(134):.5,G(135):.7,G(136)
:.2,G(137):.4,G(138):.6,G(139):.8,G(140)
.N.D.R.27:.5,8.. N.. G(14) .R)".OPTION
S:.":. .R)".F1 = DIRECTORY".6 X.. .R)".F
3 = SCREEN ONLY":. .R)".F5 = HARDCOPY".Y
... .R)".F7 = SCRATCH DISK FILE".| ....
K$:.K$.G(133).K$.G(136).140.. ...%.. .
.K$.G(136).660.. ...K$.G(133).400.. ....
. ...".".R) ".DIRECTORY...":..R)"F1 = SC
REEN ONLY"..!H...R) ".F3 = HARDCOPY":..R
) ".F5 = CANCEL FUNCTION":P.0.@!R... K$:
.K$.G(133).K$.G(135).210.F!....Y!...K$.G
(135).110.L!...K$.G(133).350..!...4,4:.4
:.4,G(14)"DIRECTORY"G(15):.4:.4:P.1.Q!..
."..DIRECTORY.":.:.:.1,8,0,"$0":.#1,A$,B
$:N$.G(0)..!...#1,A$,B$:.B$."".370.."...
#1,A$,B$:.F(A$.N$).256.F(B$.N$);.3""..P.
1..4,F(A$.N$).256.F(B$.N$);.I",..#1,A$:.
A$."".330.Y"6..P.1..4,A$;.G"@..A$;:.300.
U"J..:.P.1..4.~"T..270.."^...."H.."..PRE
SS ANY KEY":.. K$:. :.110.C"R..P.1..X.1.
7:.4:.X:P.0.."|..:."PRESS ANY KEY TO CON
TINUE.": 1: 4.."....K$ :.20..#...1,4,7:L
.1:P.0:.K$.G(135).P.1.?#..."..ENTER A FI
LENAME:. ";:.F$.Y#...8,8,8,F$.",S,R":.81
0..#..."..PRESS ANY KEY TO PAUSE AND GET
MORE OPTIONS".B#..." .PRESS 'NO SCROLL'
TO PAUSE WITHOUT OPTIONS"..#B..:.:..10)
"."F$".":.:...$L..P.1..1,G(145)G(14)F$G(
15)G(17):.1:.1:L.4..$V..#8,CH$.+$...CH$;
:.ST..0.600.R$...P.1..1,CH$;:.CH$.G(13).
L.L.1:.840.E$...K$:.K$."".470..$...:.X.1
.79:."*";:.X:.:.".PAUSE IS IN EFFECT.".M
$..."OPTIONS:":."F1 = PRINTER ON":."F3 =
PRINTER OFF"..%..."F5 = ABORT OPERATION
":."F7 = CONTINUE UNCHANGED".'%.... K$:.
K$.G(133).K$.G(136).540.R%&..K$.G(133).P
.1:.1,G(17):.1:.1:L.3:.580.J%0..K$.G(134
).P.0:.580.}%:..K$.G(135).590..%D..".CON
TINUING.":.X.1.39:."*";:.:.:.470.U%N..".
.....".11)G(142)".OPERATION ABORTED."..%
X..P.1..1:.X.L.2.66:.1:.X:.1,G(145)..&B.
.DS$.E&L. 1: 8:.:.G(14)"..DO YOU WISH TO
READ":."ANOTHER FILE? (Y/N)".`&V... K$:
.K$."Y"..:.:.100.Q&...K$.."N".630.Z&...8
80..&...G(142):.860..&..."...TYPE IN THE
FILENAME TO BE SCRATCHED ";..&..."OR
PRESS RETURN TO ABORT THE FUNCTION...".
.'...".FILENAME:.";:.F$..'...F$."".750.Q
'F..860:."..LAST CHANCE!":."..DO YOU REA
LLY WISH TO KILL".T'P..".THE . "F$" .
FILE? (Y/N)"..'Z... K$:.K$."".730..'...K
$."Y".760..'...G(14):.590.B'...860:."..K
ILLING "F$..'.. 15:.15,8,15:.15,"S0:".F$
..'...X.1.2000:.X: 15..(...860:.".."F$"
IS NOW DEAD!!".3( ..X.1.2000:.X:.G(14):.
110.B(*..DS.0..:."THERE IS A DISK ERROR"
:.DS$:.620..(4..DS.0..:."THERE IS A DISK
ERROR":.DS$:.620..(>....(H..L.60.L.1:.X
.1.7:.1:.X..(R....(\.."......".8)".KILL
FUNCTION ACTIVE ."..(F...A)P..1,"GRAPHIC
":.2,"DLOAD".G(34):.3,"DIRECTORY".G(13):
.4,"SCNCLR".G(13):.5,"DSAVE".G(34):.6,"R
UN".G(13):.7,"LIST".G(13).{)Z..8,"MONITO
R".G(13):.&..)....)...".SEQ FILE READER
& PRINTER C-128".P)...".40 COLUMNS BY D
AVE C ON Q-LINK".X)...85...
> CLICK IMAGE PREVIEW FOR FULL MODAL