DOUBLE LIST
FILE INFORMATION
FILENAME(S): DOUBLE LIST
FILE TYPE(S): PRG
FILE SIZE: 1.6K
FIRST SEEN: 2025-10-19 22:48:31
APPEARS ON: 1 disk(s)
FILE HASH
fe4ad362e5bf88766050e615b568160a240b7209713b8a5291d7ad68e672e28f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITIES U38 | DOUBLE LIST | PRG | Radd Maxx | 26 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 0A 00 8F 20 43 4F 4D 4D 2C 50 55 54 |....... COMM,PUT| 00000010: 4F 59 20 43 55 4C 54 20 44 45 43 20 38 33 00 41 |OY CULT DEC 83.A| 00000020: 08 14 00 8F 2A 2A 2A 2A 2A 46 52 45 44 20 42 41 |....*****FRED BA| 00000030: 52 4B 45 52 20 54 59 50 45 52 52 52 2A 2A 2A 2A |RKER TYPERRR****| 00000040: 2A 00 69 08 1E 00 8F 3A 43 48 41 4E 47 45 20 4C |*.i....:CHANGE L| 00000050: 49 4E 45 20 34 34 30 20 54 4F 20 32 20 4F 52 20 |INE 440 TO 2 OR | 00000060: 33 20 43 4F 4C 55 4D 4E 53 00 84 08 28 00 8F 3A |3 COLUMNS...(..:| 00000070: 44 45 50 45 4E 44 49 4E 47 20 4F 4E 20 50 52 49 |DEPENDING ON PRI| 00000080: 4E 54 45 52 00 CC 08 37 00 8F 3A 43 48 41 4E 47 |NTER...7..:CHANG| 00000090: 45 20 4C 49 4E 45 53 20 31 39 30 20 54 4F 20 32 |E LINES 190 TO 2| 000000A0: 36 30 20 54 4F 20 50 52 4F 50 45 52 20 50 52 49 |60 TO PROPER PRI| 000000B0: 4E 54 45 52 20 43 4F 44 45 53 20 46 4F 52 28 59 |NTER CODES FOR(Y| 000000C0: 4F 55 52 20 50 52 49 4E 54 45 52 29 00 F2 08 3C |OUR PRINTER)...<| 000000D0: 00 8F 3A 54 48 49 53 20 49 53 20 46 4F 52 20 54 |..:THIS IS FOR T| 000000E0: 48 45 20 4F 4B 49 44 41 54 41 20 50 52 49 4E 54 |HE OKIDATA PRINT| 000000F0: 45 52 00 F8 08 46 00 3A 00 FE 08 50 00 3A 00 23 |ER...F.:...P.:.#| 00000100: 09 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.d.. ***********| 00000110: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000120: 2A 2A 2A 00 48 09 6E 00 8F 20 2A 20 20 20 20 20 |***.H.n.. * | 00000130: 44 49 53 4B 20 44 49 52 45 43 54 4F 52 59 20 4C |DISK DIRECTORY L| 00000140: 41 42 4C 53 20 20 20 2A 00 6D 09 78 00 8F 20 2A |ABLS *.m.x.. *| 00000150: 20 20 20 20 20 42 59 20 53 54 45 56 45 20 43 41 | BY STEVE CA| 00000160: 54 45 53 20 20 31 39 38 33 20 20 20 2A 00 92 09 |TES 1983 *...| 00000170: 82 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************| 00000180: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000190: 2A 2A 00 B7 09 8C 00 8F 20 2A 20 43 48 41 4E 47 |**...... * CHANG| 000001A0: 45 20 41 53 43 49 49 20 43 4F 44 45 20 46 4F 52 |E ASCII CODE FOR| 000001B0: 20 59 4F 55 52 20 2A 00 DC 09 96 00 8F 20 2A 20 | YOUR *...... * | 000001C0: 50 52 49 4E 54 45 52 2E 20 20 54 48 49 53 20 43 |PRINTER. THIS C| 000001D0: 4F 44 45 20 49 53 20 46 4F 52 20 2A 00 01 0A A0 |ODE IS FOR *....| 000001E0: 00 8F 20 2A 20 41 4E 20 4F 4B 49 44 41 54 41 20 |.. * AN OKIDATA | 000001F0: 39 32 20 50 52 49 4E 54 45 52 2E 20 20 20 20 20 |92 PRINTER. | 00000200: 2A 00 26 0A AA 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*.&.... ********| 00000210: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000220: 2A 2A 2A 2A 2A 2A 00 2C 0A B4 00 3A 00 51 0A BE |******.,...:.Q..| 00000230: 00 3A 20 20 50 4E B2 34 3A 20 8F 20 50 52 49 4E |.: PN.4: . PRIN| 00000240: 54 45 52 20 44 45 56 49 53 45 20 4E 55 4D 42 45 |TER DEVISE NUMBE| 00000250: 52 00 73 0A C8 00 3A 20 20 44 4E B2 38 3A 20 8F |R.s...: DN.8: .| 00000260: 20 44 49 53 4B 20 44 45 56 49 53 45 20 4E 55 4D | DISK DEVISE NUM| 00000270: 42 45 52 00 95 0A D2 00 3A 20 20 42 49 24 B2 C7 |BER.....: BI$..| 00000280: 28 33 30 29 3A 20 8F 20 31 30 20 43 48 41 52 2E |(30): . 10 CHAR.| 00000290: 2F 49 4E 43 48 00 B7 0A DC 00 3A 20 20 4C 49 24 |/INCH.....: LI$| 000002A0: B2 C7 28 32 39 29 3A 20 8F 20 31 37 20 43 48 41 |..(29): . 17 CHA| 000002B0: 52 2E 2F 49 4E 43 48 00 D9 0A E6 00 3A 20 20 52 |R./INCH.....: R| 000002C0: 53 24 B2 C7 28 32 34 29 3A 20 8F 20 52 45 53 45 |S$..(24): . RESE| 000002D0: 54 20 50 52 49 4E 54 45 52 00 F9 0A F0 00 3A 20 |T PRINTER.....: | 000002E0: 20 42 4F 24 B2 C7 28 32 37 29 AA 22 54 22 3A 20 | BO$..(27)."T": | 000002F0: 8F 20 42 4F 4C 44 20 4F 4E 00 1A 0B FA 00 3A 20 |. BOLD ON.....: | 00000300: 20 42 46 24 B2 C7 28 32 37 29 AA 22 49 22 3A 20 | BF$..(27)."I": | 00000310: 8F 20 42 4F 4C 44 20 4F 46 46 00 3D 0B 04 01 3A |. BOLD OFF.=...:| 00000320: 20 20 53 50 24 B2 C7 28 32 37 29 AA 22 38 22 3A | SP$..(27)."8":| 00000330: 20 8F 20 38 20 4C 49 4E 45 53 2F 49 4E 00 43 0B | . 8 LINES/IN.C.| 00000340: 0E 01 3A 00 6C 0B 18 01 86 20 50 24 28 31 35 30 |..:.l.... P$(150| 00000350: 29 3A 43 24 B2 22 20 20 44 49 53 4B 20 4E 41 4D |):C$." DISK NAM| 00000360: 45 20 3D 22 3A 4E 24 B2 C7 28 30 29 00 97 0B 22 |E =":N$..(0)..."| 00000370: 01 54 24 B2 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.T$."-----------| 00000380: 2D 2D 2D 22 3A 54 24 B2 22 20 22 AA 54 24 AA 54 |---":T$." ".T$.T| 00000390: 24 AA 54 24 AA 54 24 00 C2 0B 2C 01 55 24 B2 22 |$.T$.T$...,.U$."| 000003A0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 3A |==============":| 000003B0: 55 24 B2 22 20 22 AA 55 24 AA 55 24 AA 55 24 AA |U$." ".U$.U$.U$.| 000003C0: 55 24 00 E5 0B 36 01 97 20 35 33 32 37 32 2C 32 |U$...6.. 53272,2| 000003D0: 33 3A 99 20 22 93 22 3A 58 B2 31 3A 5A B2 31 3A |3:. ".":X.1:Z.1:| 000003E0: 58 24 B2 22 22 00 FE 0B 40 01 9F 20 34 2C 50 4E |X$.""...@.. 4,PN| 000003F0: 3A 9F 20 36 2C 44 4E 2C 30 2C 22 24 30 22 00 18 |:. 6,DN,0,"$0"..| 00000400: 0C 4A 01 A1 23 36 2C 41 24 2C 41 24 2C 41 24 2C |.J..#6,A$,A$,A$,| 00000410: 41 24 2C 41 24 2C 41 24 00 31 0C 54 01 A1 23 36 |A$,A$,A$.1.T..#6| 00000420: 2C 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 33 36 |,A$:. A$."" . 36| 00000430: 30 00 44 0C 5E 01 58 24 B2 58 24 AA 41 24 3A 89 |0.D.^.X$.X$.A$:.| 00000440: 20 33 34 30 00 85 0C 68 01 42 24 B2 CA 28 58 24 | 340...h.B$..(X$| 00000450: 2C 32 31 2C 32 29 AA 22 20 22 3A 41 24 B2 CA 28 |,21,2)." ":A$..(| 00000460: 58 24 2C 33 2C 31 36 29 3A 44 4E 24 B2 43 24 AA |X$,3,16):DN$.C$.| 00000470: C7 28 33 34 29 AA 41 24 AA C7 28 33 34 29 AA 22 |.(34).A$..(34)."| 00000480: 20 22 AA 42 24 00 99 0C 72 01 50 24 B2 22 20 22 | ".B$...r.P$." "| 00000490: 3A 99 20 44 4E 24 22 11 22 00 BB 0C 7C 01 A1 23 |:. DN$"."...|..#| 000004A0: 36 2C 41 24 2C 41 24 3A 8B 20 41 24 B2 22 22 20 |6,A$,A$:. A$."" | 000004B0: A7 20 A0 20 36 3A 89 20 34 32 30 00 E9 0C 86 01 |. . 6:. 420.....| 000004C0: A1 23 36 2C 41 24 2C 42 24 3A 42 24 B2 C4 28 C6 |.#6,A$,B$:B$..(.| 000004D0: 28 41 24 AA 4E 24 29 AA C6 28 42 24 AA 4E 24 29 |(A$.N$)..(B$.N$)| 000004E0: AC 32 35 36 29 AA 22 20 22 00 26 0D 90 01 A1 23 |.256)." ".&....#| 000004F0: 36 2C 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 50 |6,A$:. A$."" . P| 00000500: 24 28 58 29 B2 42 24 3A 99 20 22 20 20 22 50 24 |$(X).B$:. " "P$| 00000510: 28 58 29 3A 58 B2 58 AA 31 3A 42 24 B2 22 22 20 |(X):X.X.1:B$."" | 00000520: 3A 89 20 33 38 30 00 39 0D 9A 01 42 24 B2 42 24 |:. 380.9...B$.B$| 00000530: AA 41 24 3A 89 20 34 30 30 00 54 0D A4 01 98 34 |.A$:. 400.T....4| 00000540: 2C 53 50 24 3B 4C 49 24 3B 54 24 3A 98 34 3A 98 |,SP$;LI$;T$:.4:.| 00000550: 34 2C 55 24 00 81 0D AE 01 98 34 2C 42 49 24 3B |4,U$......4,BI$;| 00000560: 42 4F 24 3B 44 4E 24 22 20 3A 22 3B 4C 49 24 3B |BO$;DN$" :";LI$;| 00000570: 50 24 28 58 AB 31 29 3B 42 46 24 3A 98 34 2C 54 |P$(X.1);BF$:.4,T| 00000580: 24 00 AB 0D B8 01 81 20 42 B2 31 20 A4 20 32 3A |$...... B.1 . 2:| 00000590: 50 24 B2 50 24 AA C8 28 50 24 28 5A 29 2C 32 37 |P$.P$..(P$(Z),27| 000005A0: 29 AA 22 20 22 3A 5A B2 5A AA 31 00 C5 0D C2 01 |)." ":Z.Z.1.....| 000005B0: 8B 20 5A B2 58 AB 31 20 A7 20 98 34 2C 50 24 3A |. Z.X.1 . .4,P$:| 000005C0: 89 20 34 38 30 00 E8 0D CC 01 82 20 42 3A 98 34 |. 480...... B:.4| 000005D0: 2C 50 24 3A 50 24 B2 22 20 22 3A 8B 20 5A B2 58 |,P$:P$." ":. Z.X| 000005E0: AB 31 20 A7 20 34 38 30 00 F2 0D D6 01 89 20 34 |.1 . 480...... 4| 000005F0: 34 30 00 19 0E E0 01 98 34 2C 55 24 3A 98 34 3A |40......4,U$:.4:| 00000600: 99 20 22 11 20 20 41 4E 4F 54 48 45 52 20 44 49 |. ". ANOTHER DI| 00000610: 53 4B 20 28 59 2F 4E 29 22 00 37 0E EA 01 A1 20 |SK (Y/N)".7.... | 00000620: 41 24 3A 8B 20 41 24 B2 22 59 22 20 A7 20 A0 20 |A$:. A$."Y" . . | 00000630: 34 3A 89 20 33 31 30 00 4B 0E F4 01 8B 20 41 24 |4:. 310.K.... A$| 00000640: B3 B1 22 4E 22 20 A7 20 34 39 30 00 5E 0E FE 01 |.."N" . 490.^...| 00000650: 98 34 2C 54 24 3A 98 34 2C 52 24 3A A0 34 00 00 |.4,T$:.4,R$:.4..| 00000660: 00 |. |
....... COMM,PUTOY CULT DEC 83.A....**** *FRED BARKER TYPERRR*****.I....:CHANGE L INE 440 TO 2 OR 3 COLUMNS...(..:DEPENDIN G ON PRINTER.L.7..:CHANGE LINES 190 TO 2 60 TO PROPER PRINTER CODES FOR(YOUR PRIN TER)...<..:THIS IS FOR THE OKIDATA PRINT ER...F.:...P.:.#.D.. ******************* ***********.H.N.. * DISK DIRECTORY L ABLS *.M.X.. * BY STEVE CATES 198 3 *...... **************************** **...... * CHANGE ASCII CODE FOR YOUR *. ..... * PRINTER. THIS CODE IS FOR *... .. * AN OKIDATA 92 PRINTER. *.&.... ******************************.,...:.Q.. .: PN.4: . PRINTER DEVISE NUMBER.S.H.: DN.8: . DISK DEVISE NUMBER...R.: BI$.G (30): . 10 CHAR./INCH.....: LI$.G(29): . 17 CHAR./INCH.Y...: RS$.G(24): . RESE T PRINTER.....: BO$.G(27)."T": . BOLD O N.....: BF$.G(27)."I": . BOLD OFF.=...: SP$.G(27)."8": . 8 LINES/IN.C...:.L... . P$(150):C$." DISK NAME =":N$.G(0)..." .T$."--------------":T$." ".T$.T$.T$.T$. B.,.U$."==============":U$." ".U$.U$.U$. U$...6.. 53272,23:. ".":X.1:Z.1:X$.""... @.. 4,PN:. 6,DN,0,"$0"...J..#6,A$,A$,A$, A$,A$,A$.1.T..#6,A$:. A$."" . 360.D.^.X$ .X$.A$:. 340...H.B$.J(X$,21,2)." ":A$.J( X$,3,16):DN$.C$.G(34).A$.G(34)." ".B$... R.P$." ":. DN$"."...|..#6,A$,A$:. A$."" . 6:. 420......#6,A$,B$:B$.D(F(A$.N$). F(B$.N$).256)." ".&....#6,A$:. A$."" . P $(X).B$:. " "P$(X):X.X.1:B$."" :. 380.9 ...B$.B$.A$:. 400.T....4,SP$;LI$;T$:.4:. 4,U$......4,BI$;BO$;DN$" :";LI$;P$(X.1); BF$:.4,T$...... B.1 . 2:P$.P$.H(P$(Z),27 )." ":Z.Z.1.E.B.. Z.X.1 . .4,P$:. 480... L.. B:.4,P$:P$." ":. Z.X.1 . 480...V.. 4 40......4,U$:.4:. ". ANOTHER DISK (Y/N) ".7.... A$:. A$."Y" . 4:. 310.K.... A$ .."N" . 490.^....4,T$:.4,R$: 4...
> CLICK IMAGE PREVIEW FOR FULL MODAL