SEQUENTIAL

FILE INFORMATION

FILENAME(S): SEQUENTIAL

FILE TYPE(S): SEQ

FILE SIZE: 2.2K

FIRST SEEN: 2025-10-19 22:48:34

APPEARS ON: 1 disk(s)

FILE HASH

a0104d6a13092b2d6a791865244dc3e6a7a00b1f81c0c78abd4a8747fd4dcdc3

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
MM UTILITY	SEQUENTIAL	SEQ	Radd Maxx	12	2	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 30 43 4C 52 0D 31 50 4F  4B 45 35 33 32 38 30 2C  |0CLR.1POKE53280,|
00000010: 31 34 0D 32 50 4F 4B 45  35 33 32 38 31 2C 31 34  |14.2POKE53281,14|
00000020: 0D 33 41 4D 3D 39 39 0D  34 44 3D 33 0D 35 44 49  |.3AM=99.4D=3.5DI|
00000030: 4D 45 42 28 34 30 2C 32  30 29 0D 36 3F 22 93 11  |MEB(40,20).6?"..|
00000040: 11 22 3B 0D 37 3F 54 41  42 28 31 32 29 3B 0D 38  |.";.7?TAB(12);.8|
00000050: 3F 22 05 4E 45 57 20 45  52 52 4F 52 20 4C 4F 47  |?".NEW ERROR LOG|
00000060: 47 45 52 90 22 0D 39 3F  54 41 42 28 31 32 29 3B  |GER.".9?TAB(12);|
00000070: 0D 31 30 3F 22 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |.10?"...........|
00000080: A3 A3 A3 A3 A3 11 22 0D  31 31 3F 54 41 42 28 31  |......".11?TAB(1|
00000090: 30 29 3B 0D 31 32 3F 22  05 43 52 45 41 54 45 44  |0);.12?".CREATED|
000000A0: 20 42 59 20 4A 49 4D 20  44 52 45 57 11 11 11 22  | BY JIM DREW..."|
000000B0: 0D 31 33 3F 22 90 59 4F  55 20 4D 41 59 20 54 45  |.13?".YOU MAY TE|
000000C0: 53 54 3A 11 22 0D 31 34  3F 22 20 20 31 29 20 41  |ST:.".14?"  1) A|
000000D0: 20 53 45 54 20 4F 46 20  54 52 41 43 4B 53 20 28  | SET OF TRACKS (|
000000E0: 31 2D 34 30 29 22 0D 31  35 3F 22 11 20 20 32 29  |1-40)".15?".  2)|
000000F0: 20 41 4C 4C 20 54 52 41  43 4B 53 20 4F 4E 20 53  | ALL TRACKS ON S|
00000100: 54 41 4E 44 41 52 44 20  44 49 53 4B 20 28 31 2D  |TANDARD DISK (1-|
00000110: 33 35 29 22 0D 31 36 3F  22 11 50 4C 45 41 53 45  |35)".16?".PLEASE|
00000120: 20 45 4E 54 45 52 20 05  31 90 20 4F 52 20 05 32  | ENTER .1. OR .2|
00000130: 3A 20 32 9D 90 22 3B 0D  31 37 4F 50 45 4E 31 2C  |: 2..";.17OPEN1,|
00000140: 30 0D 31 38 49 4E 50 55  54 23 31 2C 43 0D 31 39  |0.18INPUT#1,C.19|
00000150: 43 4C 4F 53 45 31 0D 32  30 3F 0D 32 31 49 46 43  |CLOSE1.20?.21IFC|
00000160: 3D 32 54 C8 54 53 3D 31  3A 54 45 3D 33 35 3A 47  |=2T.TS=1:TE=35:G|
00000170: CF 38 34 36 36 0D 32 32  49 46 43 3D 31 47 CF 38  |.8466.22IFC=1G.8|
00000180: 33 37 33 0D 32 33 3F 22  93 22 0D 32 34 47 CF 38  |373.23?".".24G.8|
00000190: 32 33 32 0D 32 35 3F 22  93 11 53 54 41 52 54 49  |232.25?"..STARTI|
000001A0: 4E 47 20 54 52 41 43 4B  20 23 3A 22 3B 0D 32 36  |NG TRACK #:";.26|
000001B0: 4F 50 45 4E 31 2C 30 0D  32 37 49 4E 50 55 54 23  |OPEN1,0.27INPUT#|
000001C0: 31 2C 54 53 0D 32 38 43  4C 4F 53 45 31 0D 32 39  |1,TS.28CLOSE1.29|
000001D0: 3F 0D 33 30 49 46 54 53  3C 31 4F 52 54 53 3E 34  |?.30IFTS<1ORTS>4|
000001E0: 30 47 CF 38 33 37 33 0D  33 31 3F 22 11 45 4E 44  |0G.8373.31?".END|
000001F0: 49 4E 47 20 54 52 41 43  4B 20 23 3A 22 3B 0D 33  |ING TRACK #:";.3|
00000200: 32 4F 50 45 4E 31 2C 30  0D 33 33 49 4E 50 55 54  |2OPEN1,0.33INPUT|
00000210: 23 31 2C 54 45 0D 33 34  43 4C 4F 53 45 31 0D 33  |#1,TE.34CLOSE1.3|
00000220: 35 3F 0D 33 36 49 46 54  45 3C 31 4F 52 54 45 3E  |5?.36IFTE<1ORTE>|
00000230: 34 30 47 CF 38 33 37 33  0D 33 37 49 46 54 45 3C  |40G.8373.37IFTE<|
00000240: 54 53 47 CF 38 33 37 33  0D 33 38 47 4F D3 39 30  |TSG.8373.38GO.90|
00000250: 35 33 0D 33 39 47 4F D3  38 38 30 33 0D 34 30 44  |53.39GO.8803.40D|
00000260: 49 4D 42 54 28 34 30 29  0D 34 31 58 3D 31 0D 34  |IMBT(40).41X=1.4|
00000270: 31 46 4F 52 58 3D 31 54  4F 31 37 0D 34 32 42 54  |1FORX=1TO17.42BT|
00000280: 28 58 29 3D 32 30 0D 34  33 4E 45 58 54 0D 34 34  |(X)=20.43NEXT.44|
00000290: 58 3D 31 38 0D 34 34 46  4F 52 58 3D 31 38 54 4F  |X=18.44FORX=18TO|
000002A0: 32 33 0D 34 35 42 54 28  58 29 3D 31 38 0D 34 36  |23.45BT(X)=18.46|
000002B0: 4E 45 58 54 0D 34 37 58  3D 32 34 0D 34 37 46 4F  |NEXT.47X=24.47FO|
000002C0: 52 58 3D 32 34 54 4F 33  30 0D 34 38 42 54 28 58  |RX=24TO30.48BT(X|
000002D0: 29 3D 31 37 0D 34 39 4E  45 58 54 0D 35 30 58 3D  |)=17.49NEXT.50X=|
000002E0: 33 31 0D 35 30 46 4F 52  58 3D 33 31 54 4F 33 35  |31.50FORX=31TO35|
000002F0: 0D 35 31 42 54 28 58 29  3D 31 36 0D 35 32 4E 45  |.51BT(X)=16.52NE|
00000300: 58 54 0D 35 33 58 3D 33  36 0D 35 33 46 4F 52 58  |XT.53X=36.53FORX|
00000310: 3D 33 36 54 4F 34 30 0D  35 34 42 54 28 58 29 3D  |=36TO40.54BT(X)=|
00000320: 31 35 0D 35 35 4E 45 58  54 0D 35 36 54 3D 54 53  |15.55NEXT.56T=TS|
00000330: 0D 35 36 46 4F 52 54 3D  54 53 54 4F 54 45 0D 35  |.56FORT=TSTOTE.5|
00000340: 37 3F 22 93 11 20 20 20  20 20 54 52 41 43 4B 20  |7?"..     TRACK |
00000350: 23 20 22 3B 0D 35 38 3F  54 0D 35 39 3F 0D 36 30  |# ";.58?T.59?.60|
00000360: 53 3D 30 0D 36 30 46 4F  52 53 3D 30 54 4F 42 54  |S=0.60FORS=0TOBT|
00000370: 28 54 29 0D 36 31 3F 22  53 45 43 54 4F 52 20 23  |(T).61?"SECTOR #|
00000380: 20 22 3B 0D 36 32 3F 53  3B 0D 36 33 49 46 53 3C  | ";.62?S;.63IFS<|
00000390: 31 30 54 C8 3F 22 20 22  3B 0D 36 34 4F 50 45 4E  |10T.?" ";.64OPEN|
000003A0: 31 35 2C 38 2C 31 35 0D  36 35 50 52 49 4E 54 23  |15,8,15.65PRINT#|
000003B0: 31 35 2C 22 4D 2D 57 22  3B 0D 36 36 50 52 49 4E  |15,"M-W";.66PRIN|
000003C0: 54 23 31 35 2C 43 48 52  24 28 36 29 3B 0D 36 37  |T#15,CHR$(6);.67|
000003D0: 50 52 49 4E 54 23 31 35  2C 43 48 52 24 28 30 29  |PRINT#15,CHR$(0)|
000003E0: 3B 0D 36 38 50 52 49 4E  54 23 31 35 2C 43 48 52  |;.68PRINT#15,CHR|
000003F0: 24 28 32 29 3B 0D 36 39  50 52 49 4E 54 23 31 35  |$(2);.69PRINT#15|
00000400: 2C 43 48 52 24 28 54 29  3B 0D 37 30 50 52 49 4E  |,CHR$(T);.70PRIN|
00000410: 54 23 31 35 2C 43 48 52  24 28 53 29 0D 37 31 50  |T#15,CHR$(S).71P|
00000420: 52 49 4E 54 23 31 35 2C  22 4D 2D 57 22 3B 0D 37  |RINT#15,"M-W";.7|
00000430: 32 50 52 49 4E 54 23 31  35 2C 43 48 52 24 28 30  |2PRINT#15,CHR$(0|
00000440: 29 3B 0D 37 33 50 52 49  4E 54 23 31 35 2C 43 48  |);.73PRINT#15,CH|
00000450: 52 24 28 30 29 3B 0D 37  34 50 52 49 4E 54 23 31  |R$(0);.74PRINT#1|
00000460: 35 2C 43 48 52 24 28 31  29 3B 0D 37 35 50 52 49  |5,CHR$(1);.75PRI|
00000470: 4E 54 23 31 35 2C 43 48  52 24 28 31 32 38 29 0D  |NT#15,CHR$(128).|
00000480: 37 36 50 52 49 4E 54 23  31 35 2C 22 4D 2D 52 22  |76PRINT#15,"M-R"|
00000490: 3B 0D 37 37 50 52 49 4E  54 23 31 35 2C 43 48 52  |;.77PRINT#15,CHR|
000004A0: 24 28 30 29 3B 0D 37 38  50 52 49 4E 54 23 31 35  |$(0);.78PRINT#15|
000004B0: 2C 43 48 52 24 28 30 29  0D 37 39 47 45 54 23 31  |,CHR$(0).79GET#1|
000004C0: 35 2C 41 24 0D 38 30 41  3D 41 53 43 28 41 24 2B  |5,A$.80A=ASC(A$+|
000004D0: 43 48 52 24 28 30 29 29  0D 38 31 49 46 41 3E 41  |CHR$(0)).81IFA>A|
000004E0: 4D 47 CF 38 36 34 32 0D  38 32 49 46 41 3D 31 54  |MG.8642.82IFA=1T|
000004F0: C8 3F 22 20 47 4F 4F 44  22 3A 45 42 28 54 2C 53  |.?" GOOD":EB(T,S|
00000500: 29 3D 30 3A 47 CF 38 37  31 35 0D 38 33 3F 22 20  |)=0:G.8715.83?" |
00000510: 45 52 52 4F 52 20 23 22  3B 0D 38 34 3F 41 2B 31  |ERROR #";.84?A+1|
00000520: 38 0D 38 35 45 42 28 54  2C 53 29 3D 41 2B 31 38  |8.85EB(T,S)=A+18|
00000530: 0D 38 36 45 3D 31 0D 38  37 43 4C 4F 53 45 31 35  |.86E=1.87CLOSE15|
00000540: 0D 38 38 47 45 54 5A 24  0D 38 39 49 46 5A 24 3C  |.88GETZ$.89IFZ$<|
00000550: 3E 22 22 47 CF 38 37 32  37 0D 39 30 4E 45 58 54  |>""G.8727.90NEXT|
00000560: 0D 39 31 4E 45 58 54 0D  39 32 47 4F D3 38 38 30  |.91NEXT.92GO.880|
00000570: 33 0D 39 33 49 46 45 54  C8 47 4F D3 38 38 31 36  |3.93IFET.GO.8816|
00000580: 3A 47 CF 38 37 35 38 0D  39 34 3F 22 93 11 11 22  |:G.8758.94?"..."|
00000590: 3B 0D 39 35 3F 54 41 42  28 31 35 29 3B 0D 39 36  |;.95?TAB(15);.96|
000005A0: 3F 22 4E 4F 20 45 52 52  4F 52 53 22 0D 39 37 3F  |?"NO ERRORS".97?|
000005B0: 22 11 11 1D 1D 1D 1D 1D  1D 05 45 4E 44 20 4F 46  |".........END OF|
000005C0: 20 52 45 50 4F 52 54 2D  50 52 45 53 53 20 41 4E  | REPORT-PRESS AN|
000005D0: 59 20 4B 45 59 22 0D 39  38 47 4F D3 39 30 39 31  |Y KEY".98GO.9091|
000005E0: 0D 39 39 47 CF 38 31 30  35 0D 31 30 30 4F 50 45  |.99G.8105.100OPE|
000005F0: 4E 31 35 2C 38 2C 31 35  0D 31 30 31 50 52 49 4E  |N15,8,15.101PRIN|
00000600: 54 23 31 35 2C 22 49 22  0D 31 30 32 43 4C 4F 53  |T#15,"I".102CLOS|
00000610: 45 31 35 0D 31 30 33 52  45 54 55 52 4E 0D 31 30  |E15.103RETURN.10|
00000620: 34 3F 22 93 11 11 90 44  4F 20 59 4F 55 20 57 49  |4?"....DO YOU WI|
00000630: 53 48 20 41 20 52 45 50  4F 52 54 20 4F 46 20 44  |SH A REPORT OF D|
00000640: 49 53 4B 20 45 52 52 4F  52 53 3A 05 20 59 9D 90  |ISK ERRORS:. Y..|
00000650: 22 3B 0D 31 30 35 4F 50  45 4E 31 2C 30 0D 31 30  |";.105OPEN1,0.10|
00000660: 36 49 4E 50 55 54 23 31  2C 51 24 0D 31 30 37 43  |6INPUT#1,Q$.107C|
00000670: 4C 4F 53 45 31 0D 31 30  38 3F 0D 31 30 39 49 46  |LOSE1.108?.109IF|
00000680: 4C 45 46 54 24 28 51 24  2C 31 29 3D 22 59 22 47  |LEFT$(Q$,1)="Y"G|
00000690: CF 38 38 39 36 0D 31 31  30 49 46 4C 45 46 54 24  |.8896.110IFLEFT$|
000006A0: 28 51 24 2C 31 29 3D 22  4E 22 47 CF 38 31 30 35  |(Q$,1)="N"G.8105|
000006B0: 0D 31 31 31 47 CF 38 38  31 36 0D 31 31 32 3F 22  |.111G.8816.112?"|
000006C0: 11 4F 55 54 50 55 54 20  54 4F 20 50 52 49 4E 54  |.OUTPUT TO PRINT|
000006D0: 45 52 3A 05 20 4E 9D 90  22 3B 0D 31 31 33 4F 50  |ER:. N..";.113OP|
000006E0: 45 4E 31 2C 30 0D 31 31  34 49 4E 50 55 54 23 31  |EN1,0.114INPUT#1|
000006F0: 2C 51 24 0D 31 31 35 43  4C 4F 53 45 31 0D 31 31  |,Q$.115CLOSE1.11|
00000700: 36 3F 0D 31 31 37 49 46  4C 45 46 54 24 28 51 24  |6?.117IFLEFT$(Q$|
00000710: 2C 31 29 3D 22 59 22 54  C8 44 3D 34 3A 47 CF 38  |,1)="Y"T.D=4:G.8|
00000720: 39 35 36 0D 31 31 38 49  46 4C 45 46 54 24 28 51  |956.118IFLEFT$(Q|
00000730: 24 2C 31 29 3C 3E 22 4E  22 47 CF 38 38 39 36 0D  |$,1)<>"N"G.8896.|
00000740: 31 31 39 4F 50 45 4E 34  2C 44 0D 31 32 30 3F 22  |119OPEN4,D.120?"|
00000750: 93 22 0D 31 32 31 54 3D  54 53 0D 31 32 31 46 4F  |.".121T=TS.121FO|
00000760: 52 54 3D 54 53 54 4F 54  45 0D 31 32 32 53 3D 30  |RT=TSTOTE.122S=0|
00000770: 0D 31 32 32 46 4F 52 53  3D 30 54 4F 42 54 28 54  |.122FORS=0TOBT(T|
00000780: 29 0D 31 32 33 49 46 45  42 28 54 2C 53 29 3C 3E  |).123IFEB(T,S)<>|
00000790: 30 47 CF 38 39 38 39 0D  31 32 34 4E 45 58 54 0D  |0G.8989.124NEXT.|
000007A0: 31 32 35 4E 45 58 54 0D  31 32 36 52 45 54 55 52  |125NEXT.126RETUR|
000007B0: 4E 0D 31 32 37 49 46 44  3D 33 54 C8 4C 3D 4C 2B  |N.127IFD=3T.L=L+|
000007C0: 31 0D 31 32 38 50 52 49  4E 54 23 34 2C 22 45 52  |1.128PRINT#4,"ER|
000007D0: 52 4F 52 20 23 20 22 3B  0D 31 32 39 50 52 49 4E  |ROR # ";.129PRIN|
000007E0: 54 23 34 2C 45 42 28 54  2C 53 29 3B 0D 31 33 30  |T#4,EB(T,S);.130|
000007F0: 50 52 49 4E 54 23 34 2C  22 20 54 52 41 43 4B 3A  |PRINT#4," TRACK:|
00000800: 22 3B 0D 31 33 31 50 52  49 4E 54 23 34 2C 54 3B  |";.131PRINT#4,T;|
00000810: 0D 31 33 32 50 52 49 4E  54 23 34 2C 22 20 53 45  |.132PRINT#4," SE|
00000820: 43 54 4F 52 3A 22 3B 0D  31 33 33 50 52 49 4E 54  |CTOR:";.133PRINT|
00000830: 23 34 2C 53 0D 31 33 34  49 46 4C 3E 32 30 54 C8  |#4,S.134IFL>20T.|
00000840: 47 4F D3 39 30 35 33 3A  4C 3D 30 0D 31 33 35 47  |GO.9053:L=0.135G|
00000850: CF 38 39 38 36 0D 31 33  36 3F 22 11 1D 1D 1D 1D  |.8986.136?".....|
00000860: 1D 1D 1D 05 50 52 45 53  53 20 41 4E 59 20 4B 45  |....PRESS ANY KE|
00000870: 59 20 54 4F 20 43 4F 4E  54 49 4E 55 45 90 22 0D  |Y TO CONTINUE.".|
00000880: 31 33 37 50 4F 4B 45 31  39 38 2C 30 0D 31 33 38  |137POKE198,0.138|
00000890: 47 45 54 41 24 0D 31 33  39 49 46 41 24 3D 22 22  |GETA$.139IFA$=""|
000008A0: 47 CF 39 30 39 35 0D 31  34 30 3F 22 93 22 0D 31  |G.9095.140?".".1|
000008B0: 34 31 52 45 54 55 52 4E  0D 31 34 32 45 4E 44 0D  |41RETURN.142END.|

0CLR.1POKE53280,14.2POKE53281,14.3AM=99.
4D=3.5DIMEB(40,20).6?"...";.7?TAB(12);.8
?".NEW ERROR LOGGER.".9?TAB(12);.10?"...
..............".11?TAB(10);.12?".CREATED
 BY JIM DREW...".13?".YOU MAY TEST:.".14
?"  1) A SET OF TRACKS (1-40)".15?".  2)
 ALL TRACKS ON STANDARD DISK (1-35)".16?
".PLEASE ENTER .1. OR .2: 2..";.17OPEN1,
0.18INPUT#1,C.19CLOSE1.20?.21IFC=2THTS=1
:TE=35:GO8466.22IFC=1GO8373.23?".".24GO8
232.25?"..STARTING TRACK #:";.26OPEN1,0.
27INPUT#1,TS.28CLOSE1.29?.30IFTS<1ORTS>4
0GO8373.31?".ENDING TRACK #:";.32OPEN1,0
.33INPUT#1,TE.34CLOSE1.35?.36IFTE<1ORTE>
40GO8373.37IFTE<TSGO8373.38GOS9053.39GOS
8803.40DIMBT(40).41X=1.41FORX=1TO17.42BT
(X)=20.43NEXT.44X=18.44FORX=18TO23.45BT(
X)=18.46NEXT.47X=24.47FORX=24TO30.48BT(X
)=17.49NEXT.50X=31.50FORX=31TO35.51BT(X)
=16.52NEXT.53X=36.53FORX=36TO40.54BT(X)=
15.55NEXT.56T=TS.56FORT=TSTOTE.57?"..   
  TRACK # ";.58?T.59?.60S=0.60FORS=0TOBT
(T).61?"SECTOR # ";.62?S;.63IFS<10TH?" "
;.64OPEN15,8,15.65PRINT#15,"M-W";.66PRIN
T#15,CHR$(6);.67PRINT#15,CHR$(0);.68PRIN
T#15,CHR$(2);.69PRINT#15,CHR$(T);.70PRIN
T#15,CHR$(S).71PRINT#15,"M-W";.72PRINT#1
5,CHR$(0);.73PRINT#15,CHR$(0);.74PRINT#1
5,CHR$(1);.75PRINT#15,CHR$(128).76PRINT#
15,"M-R";.77PRINT#15,CHR$(0);.78PRINT#15
,CHR$(0).79GET#15,A$.80A=ASC(A$+CHR$(0))
.81IFA>AMGO8642.82IFA=1TH?" GOOD":EB(T,S
)=0:GO8715.83?" ERROR #";.84?A+18.85EB(T
,S)=A+18.86E=1.87CLOSE15.88GETZ$.89IFZ$<
>""GO8727.90NEXT.91NEXT.92GOS8803.93IFET
HGOS8816:GO8758.94?"...";.95?TAB(15);.96
?"NO ERRORS".97?".........END OF REPORT-
PRESS ANY KEY".98GOS9091.99GO8105.100OPE
N15,8,15.101PRINT#15,"I".102CLOSE15.103R
ETURN.104?"....DO YOU WISH A REPORT OF D
ISK ERRORS:. Y..";.105OPEN1,0.106INPUT#1
,Q$.107CLOSE1.108?.109IFLEFT$(Q$,1)="Y"G
O8896.110IFLEFT$(Q$,1)="N"GO8105.111GO88
16.112?".OUTPUT TO PRINTER:. N..";.113OP
EN1,0.114INPUT#1,Q$.115CLOSE1.116?.117IF
LEFT$(Q$,1)="Y"THD=4:GO8956.118IFLEFT$(Q
$,1)<>"N"GO8896.119OPEN4,D.120?".".121T=
TS.121FORT=TSTOTE.122S=0.122FORS=0TOBT(T
).123IFEB(T,S)<>0GO8989.124NEXT.125NEXT.
126RETURN.127IFD=3THL=L+1.128PRINT#4,"ER
ROR # ";.129PRINT#4,EB(T,S);.130PRINT#4,
" TRACK:";.131PRINT#4,T;.132PRINT#4," SE
CTOR:";.133PRINT#4,S.134IFL>20THGOS9053:
L=0.135GO8986.136?".........PRESS ANY KE
Y TO CONTINUE.".137POKE198,0.138GETA$.13
9IFA$=""GO9095.140?".".141RETURN.142END.

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL