22-SEQ READ/PRIN
FILE INFORMATION
FILENAME(S): 22-SEQ READ/PRIN
FILE TYPE(S): PRG
FILE SIZE: 1.5K
FIRST SEEN: 2025-11-30 17:31:34
APPEARS ON: 1 disk(s)
FILE HASH
b0c3198e0bd770eb6ca7af138eb316ac0667dc8670a0e7dbfcfc2b2858668822
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITIES | 22-SEQ READ/PRIN | PRG | UK CD | 8 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 01 00 97 35 33 32 38 31 2C 31 3A 97 |.......53281,1:.| 00000010: 35 33 32 38 30 2C 31 3A 97 36 34 36 2C 30 00 35 |53280,1:.646,0.5| 00000020: 08 02 00 9F 34 2C 34 3A 98 34 2C C7 28 32 37 29 |....4,4:.4,.(27)| 00000030: C7 28 36 39 29 00 3F 08 03 00 98 34 3A A0 34 00 |.(69).?....4:.4.| 00000040: 6E 08 1D 00 99 C7 28 31 34 37 29 20 22 53 45 51 |n.....(147) "SEQ| 00000050: 55 45 4E 54 41 4C 20 46 49 4C 45 20 52 45 41 44 |UENTAL FILE READ| 00000060: 45 52 20 41 4E 44 20 50 52 49 4E 54 45 52 00 99 |ER AND PRINTER..| 00000070: 08 1E 00 99 C7 28 31 34 29 22 11 11 44 4F 20 59 |.....(14)"..DO Y| 00000080: 4F 55 20 4E 45 45 44 20 49 4E 53 54 55 43 54 49 |OU NEED INSTUCTI| 00000090: 4F 4E 53 3F 20 D9 2F CE 22 00 A1 08 28 00 A1 43 |ONS? ./."...(..C| 000000A0: 24 00 B2 08 32 00 8B 43 24 B2 22 59 22 A7 31 30 |$...2..C$."Y".10| 000000B0: 30 30 00 C2 08 3C 00 8B 43 24 B2 22 4E 22 A7 35 |00...<..C$."N".5| 000000C0: 30 30 00 CA 08 46 00 89 34 30 00 E2 08 50 00 99 |00...F..40...P..| 000000D0: 22 93 22 A3 31 36 29 22 D6 49 45 57 20 46 49 4C |".".16)".IEW FIL| 000000E0: 45 22 00 E8 08 55 00 99 00 15 09 5A 00 99 22 D0 |E"...U.....Z..".| 000000F0: 52 45 53 53 20 53 50 41 43 45 20 42 41 52 20 54 |RESS SPACE BAR T| 00000100: 4F 20 53 54 4F 50 2F 53 54 41 52 54 20 56 49 45 |O STOP/START VIE| 00000110: 57 49 4E 47 22 00 37 09 5F 00 99 3A 99 22 11 11 |WING".7._..:."..| 00000120: 11 11 C5 4E 54 45 52 20 46 49 4C 45 20 4E 41 4D |...NTER FILE NAM| 00000130: 45 22 3A 85 20 5A 24 00 53 09 64 00 99 3A 99 3A |E":. Z$.S.d..:.:| 00000140: 99 22 12 D0 52 45 53 53 20 46 31 20 3D 20 51 55 |."..RESS F1 = QU| 00000150: 49 54 22 00 63 09 68 00 8B 5A 24 B2 22 22 A7 20 |IT".c.h..Z$."". | 00000160: 35 30 30 00 71 09 69 00 9F 32 2C 38 2C 32 2C 5A |500.q.i..2,8,2,Z| 00000170: 24 00 81 09 6E 00 A1 23 32 2C 41 24 3A 99 41 24 |$...n..#2,A$:.A$| 00000180: 3B 00 96 09 73 00 8B 20 53 54 B3 B1 30 A7 A0 32 |;...s.. ST..0..2| 00000190: 3A 89 35 30 31 30 00 9E 09 78 00 A1 42 24 00 B2 |:.5010...x..B$..| 000001A0: 09 82 00 8B 42 24 B2 C7 28 33 32 29 A7 89 32 30 |....B$..(32)..20| 000001B0: 30 30 00 CA 09 8C 00 8B 42 24 B2 C7 28 31 33 33 |00......B$..(133| 000001C0: 29 A7 A0 32 3A 89 35 30 31 30 00 D3 09 96 00 89 |)..2:.5010......| 000001D0: 31 31 30 00 EC 09 C8 00 99 22 93 22 A3 31 35 29 |110......".".15)| 000001E0: 22 D0 52 49 4E 54 20 46 49 4C 45 22 00 0B 0A CA |".RINT FILE"....| 000001F0: 00 99 3A 99 22 20 C6 31 20 54 4F 20 41 42 4F 52 |..:." .1 TO ABOR| 00000200: 54 20 50 52 49 4E 54 4F 55 54 22 00 2B 0A CB 00 |T PRINTOUT".+...| 00000210: 99 22 11 11 11 11 C5 4E 54 45 52 20 46 49 4C 45 |.".....NTER FILE| 00000220: 20 4E 41 4D 45 22 3A 85 20 5A 24 00 3B 0A CC 00 | NAME":. Z$.;...| 00000230: 8B 5A 24 B2 22 22 A7 20 35 30 30 00 59 0A CD 00 |.Z$."". 500.Y...| 00000240: 9F 32 2C 38 2C 32 2C 5A 24 3A 9F 34 2C 34 2C 37 |.2,8,2,Z$:.4,4,7| 00000250: 3A 98 34 2C C7 28 31 37 29 00 71 0A D2 00 A1 23 |:.4,.(17).q....#| 00000260: 32 2C 41 24 3A 53 53 B2 53 54 3A 98 34 2C 41 24 |2,A$:SS.ST:.4,A$| 00000270: 3B 00 89 0A D7 00 8B 20 53 53 B3 B1 30 A7 A0 32 |;...... SS..0..2| 00000280: 3A A0 34 3A 89 35 30 31 30 00 91 0A DC 00 A1 42 |:.4:.5010......B| 00000290: 24 00 AC 0A F0 00 8B 42 24 B2 C7 28 31 33 33 29 |$......B$..(133)| 000002A0: A7 A0 32 3A A0 34 3A 89 35 30 31 30 00 B5 0A FA |..2:.4:.5010....| 000002B0: 00 89 32 31 30 00 CD 0A 2C 01 99 22 93 22 A3 31 |..210...,..".".1| 000002C0: 36 29 22 D6 49 45 57 20 46 49 4C 45 22 00 D3 0A |6)".IEW FILE"...| 000002D0: 36 01 99 00 00 0B 40 01 99 22 D0 52 45 53 53 20 |6.....@..".RESS | 000002E0: C3 D4 D2 CC A0 D3 20 54 4F 20 53 54 4F 50 2F 53 |...... TO STOP/S| 000002F0: 54 41 52 54 20 57 2F 20 41 4E 59 20 4B 45 59 22 |TART W/ ANY KEY"| 00000300: 00 0A 0B 54 01 89 35 30 31 30 00 2E 0B F4 01 99 |...T..5010......| 00000310: 22 93 20 20 20 20 20 20 20 20 C6 49 4C 45 20 52 |". .ILE R| 00000320: 45 41 44 45 52 2F 50 52 49 4E 54 45 52 22 00 3C |EADER/PRINTER".<| 00000330: 0B F9 01 99 3A 99 3A 99 3A 99 3A 99 00 59 0B FE |....:.:.:.:..Y..| 00000340: 01 99 3A 99 3A 99 A3 31 32 29 22 31 3A 20 D6 49 |..:.:..12)"1: .I| 00000350: 45 57 20 C6 49 4C 45 20 22 00 76 0B 08 02 99 3A |EW .ILE ".v....:| 00000360: 99 3A 99 A3 31 32 29 22 32 3A 20 D0 52 49 4E 54 |.:..12)"2: .RINT| 00000370: 20 C6 49 4C 45 22 00 94 0B 1C 02 99 3A 99 3A 99 | .ILE"......:.:.| 00000380: A3 31 32 29 22 33 3A 20 C5 58 49 54 20 50 52 4F |.12)"3: .XIT PRO| 00000390: 47 52 41 4D 00 9C 0B 58 02 A1 4B 24 00 B2 0B 62 |GRAM...X..K$...b| 000003A0: 02 91 C5 28 4B 24 29 89 38 30 2C 32 30 30 2C 37 |...(K$).80,200,7| 000003B0: 30 30 00 C3 0B 6C 02 8B 20 4B 24 B2 22 32 22 A7 |00...l.. K$."2".| 000003C0: 32 30 30 00 D4 0B 76 02 8B 20 4B 24 B2 22 33 22 |200...v.. K$."3"| 000003D0: A7 37 30 30 00 DD 0B 80 02 89 36 30 30 00 F9 0B |.700......600...| 000003E0: BC 02 99 22 93 22 A3 31 34 29 22 C5 58 49 54 20 |...".".14)".XIT | 000003F0: 54 4F 20 42 41 53 49 43 22 00 18 0C C6 02 99 3A |TO BASIC"......:| 00000400: 99 3A 99 3A 99 22 C1 D2 C5 A0 D9 CF D5 A0 D3 D5 |.:.:."..........| 00000410: D2 C5 21 20 D9 2F CE 22 00 20 0C D0 02 A1 4B 24 |..! ./.". ....K$| 00000420: 00 3A 0C DA 02 8B 4B 24 B2 22 59 22 B0 4B 24 B2 |.:....K$."Y".K$.| 00000430: 22 D9 22 A7 9E 36 34 37 33 38 00 4A 0C E4 02 8B |"."..64738.J....| 00000440: 4B 24 B3 B1 22 22 A7 35 30 30 00 53 0C EE 02 89 |K$.."".500.S....| 00000450: 37 32 30 00 5E 0C E8 03 99 22 93 22 3A 99 00 89 |720.^....".":...| 00000460: 0C F2 03 99 22 20 D4 48 49 53 20 50 52 4F 47 52 |...." .HIS PROGR| 00000470: 41 4D 20 57 49 4C 4C 20 50 52 49 4E 54 20 41 20 |AM WILL PRINT A | 00000480: D3 45 51 20 46 49 4C 45 22 00 A7 0C FC 03 99 3A |.EQ FILE"......:| 00000490: 99 22 20 54 4F 20 54 48 45 20 53 43 52 45 45 4E |." TO THE SCREEN| 000004A0: 20 28 D6 49 45 57 29 00 C2 0C 06 04 99 3A 99 22 | (.IEW)......:."| 000004B0: 20 4F 52 20 54 4F 20 54 48 45 20 50 52 49 4E 54 | OR TO THE PRINT| 000004C0: 45 52 00 F2 0C 10 04 99 3A 99 22 D0 52 45 53 53 |ER......:.".RESS| 000004D0: 20 31 3A 20 54 4F 20 56 49 45 57 20 54 48 45 20 | 1: TO VIEW THE | 000004E0: 46 49 4C 45 20 4F 4E 20 54 48 45 20 53 43 52 45 |FILE ON THE SCRE| 000004F0: 45 4E 00 27 0D 1A 04 99 3A 99 22 D0 52 45 53 53 |EN.'....:.".RESS| 00000500: 20 32 3A 20 54 4F 20 50 52 49 4E 54 20 41 20 48 | 2: TO PRINT A H| 00000510: 41 52 44 20 43 4F 50 59 20 4F 46 20 54 48 45 20 |ARD COPY OF THE | 00000520: 20 20 20 46 49 4C 45 00 40 0D 24 04 99 3A 99 22 | FILE.@.$..:."| 00000530: D0 52 45 53 53 20 33 3A 20 54 4F 20 45 4E 44 22 |.RESS 3: TO END"| 00000540: 00 5F 0D 38 04 99 3A 99 3A 99 22 12 D0 52 45 53 |._.8..:.:."..RES| 00000550: 53 20 27 2A 27 20 46 4F 52 20 4D 45 4E 55 22 00 |S '*' FOR MENU".| 00000560: 73 0D 3D 04 A1 4B 24 3A 8B 4B 24 B2 22 2A 22 A7 |s.=..K$:.K$."*".| 00000570: 35 30 30 00 7D 0D 42 04 89 31 30 38 35 00 91 0D |500.}.B..1085...| 00000580: D0 07 A1 43 24 3A 8B 43 24 B2 22 22 A7 32 30 30 |...C$:.C$."".200| 00000590: 30 00 9A 0D 34 08 89 31 31 30 00 A7 0D 92 13 9F |0...4..110......| 000005A0: 31 35 2C 38 2C 31 35 00 BB 0D 9C 13 84 31 35 2C |15,8,15......15,| 000005B0: 41 24 2C 42 24 2C 43 24 2C 44 24 00 D0 0D A6 13 |A$,B$,C$,D$.....| 000005C0: 99 3A 99 3A 99 41 24 2C 42 24 2C 43 24 2C 44 24 |.:.:.A$,B$,C$,D$| 000005D0: 00 EC 0D B0 13 A0 31 35 3A 99 3A 99 22 12 50 52 |......15:.:.".PR| 000005E0: 45 53 53 20 41 4E 59 20 4B 45 59 22 00 F4 0D BA |ESS ANY KEY"....| 000005F0: 13 A1 41 24 00 FD 0D C4 13 89 35 30 30 00 00 00 |..A$......500...|
.......53281,1:.53280,1:.646,0.5....4,4: .4,G(27)G(69).?....4: 4.N....G(147) "SEQ UENTAL FILE READER AND PRINTER......G(14 )"..DO YOU NEED INSTUCTIONS? Y/N"...(..C $...2..C$."Y".1000.B.<..C$."N".500.J.F.. 40...P..".".16)"VIEW FILE"...U.....Z.."P RESS SPACE BAR TO STOP/START VIEWING".7. _..:."....ENTER FILE NAME":. Z$.S.D..:.: .".PRESS F1 = QUIT".C.H..Z$."". 500.Q.I. .2,8,2,Z$...N..#2,A$:.A$;...S.. ST..0. 2 :.5010...X..B$......B$.G(32)..2000.J.... B$.G(133). 2:.5010.S....110...H..".".15) "PRINT FILE"...J..:." F1 TO ABORT PRINTO UT".+.K.."....ENTER FILE NAME":. Z$.;.L. .Z$."". 500.Y.M..2,8,2,Z$:.4,4,7:.4,G(17 ).Q.R..#2,A$:SS.ST:.4,A$;...W.. SS..0. 2 : 4:.5010......B$......B$.G(133). 2: 4:. 5010......210.M.,..".".16)"VIEW FILE".S. 6.....@.."PRESS CTRL S TO STOP/START W/ ANY KEY"...T..5010......". FILE R EADER/PRINTER".<....:.:.:.:..Y....:.:..1 2)"1: VIEW FILE ".V....:.:..12)"2: PRINT FILE"......:.:..12)"3: EXIT PROGRAM...X ..K$...B..E(K$).80,200,700.C.L.. K$."2". 200.T.V.. K$."3".700......600......".".1 4)"EXIT TO BASIC"...F..:.:.:."ARE YOU SU RE! Y/N". .P..K$.:.Z..K$."Y".K$."Y"..647 38.J....K$.."".500.S....720.^....".":... ...." THIS PROGRAM WILL PRINT A SEQ FILE "......:." TO THE SCREEN (VIEW).B....:." OR TO THE PRINTER......:."PRESS 1: TO V IEW THE FILE ON THE SCREEN.'....:."PRESS 2: TO PRINT A HARD COPY OF THE FILE. @.$..:."PRESS 3: TO END"._.8..:.:.".PRES S '*' FOR MENU".S.=..K$:.K$."*".500.}.B. .1085...P..C$:.C$."".2000...4..110...... 15,8,15......15,A$,B$,C$,D$.P....:.:.A$, B$,C$,D$..... 15:.:.".PRESS ANY KEY".... ..A$...D..500...
> CLICK IMAGE PREVIEW FOR FULL MODAL