CONTDIRPRINT
FILE INFORMATION
FILENAME(S): CONTDIRPRINT
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-12-01 19:06:20
APPEARS ON: 1 disk(s)
FILE HASH
37a969af2c64f15f046af3bd52081b90fea012b3b0b1b4ec9ed799db83a02c14
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 98 S 1 | CONTDIRPRINT | PRG | Icebreaker | 27 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 05 00 44 56 B2 C2 28 31 38 36 29 3A |......DV..(186):| 00000010: 8B 44 56 B3 38 A7 44 56 B2 38 00 37 08 0A 00 97 |.DV.8.DV.8.7....| 00000020: 35 33 32 38 31 2C 30 3A 97 35 33 32 38 30 2C 30 |53281,0:.53280,0| 00000030: 3A 99 22 93 0E 08 22 00 41 08 0F 00 8D 31 30 30 |:."...".A....100| 00000040: 30 00 7F 08 14 00 9E 35 37 38 31 32 22 49 4E 50 |0......57812"INP| 00000050: 55 54 20 41 2F 44 20 43 43 30 30 22 2C 44 56 2C |UT A/D CC00",DV,| 00000060: 30 3A 97 37 38 30 2C 30 3A 97 37 38 31 2C 30 3A |0:.780,0:.781,0:| 00000070: 97 37 38 32 2C 32 30 34 3A 9E 36 35 34 39 33 00 |.782,204:.65493.| 00000080: B3 08 16 00 9F 31 35 2C 44 56 2C 31 35 2C 22 52 |.....15,DV,15,"R| 00000090: 30 3A 44 52 49 56 45 52 3D 44 52 49 56 45 52 22 |0:DRIVER=DRIVER"| 000000A0: 3A 84 31 35 2C 45 52 2C 45 52 24 2C 41 2C 41 3A |:.15,ER,ER$,A,A:| 000000B0: A0 31 35 00 C2 08 17 00 8B 45 52 B3 B1 36 33 A7 |.15......ER..63.| 000000C0: 33 30 00 DB 08 18 00 9F 38 2C 44 56 2C 38 2C 22 |30......8,DV,8,"| 000000D0: 44 52 49 56 45 52 2C 50 2C 52 22 00 FC 08 1A 00 |DRIVER,P,R".....| 000000E0: 81 49 B2 30 A4 35 3A 84 38 2C 45 28 49 29 3A 45 |.I.0.5:.8,E(I):E| 000000F0: B2 45 28 49 29 3A 81 4A B2 30 A4 45 00 0A 09 1B |.E(I):.J.0.E....| 00000100: 00 84 38 2C 44 28 49 2C 4A 29 00 15 09 1C 00 82 |..8,D(I,J)......| 00000110: 3A 82 3A A0 38 00 3E 09 1E 00 86 57 24 28 33 30 |:.:.8.>....W$(30| 00000120: 30 29 2C 46 24 28 33 30 30 29 3A 57 B2 32 30 36 |0),F$(300):W.206| 00000130: AC 32 35 36 3A 46 B2 32 30 34 AC 32 35 36 00 75 |.256:F.204.256.u| 00000140: 09 20 00 53 50 24 B2 22 20 20 20 20 20 20 20 20 |. .SP$." | 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 22 00 8F 09 22 00 48 24 B2 22 30 31 | "...".H$."01| 00000180: 32 33 34 35 36 37 38 39 41 42 43 44 45 46 22 00 |23456789ABCDEF".| 00000190: A3 09 28 00 81 49 B2 30 A4 33 3A 87 4D 24 28 49 |..(..I.0.3:.M$(I| 000001A0: 29 3A 82 00 C4 09 2A 00 83 22 20 C3 52 45 41 54 |):....*.." .REAT| 000001B0: 45 20 41 20 50 52 49 4E 54 45 52 20 44 52 49 56 |E A PRINTER DRIV| 000001C0: 45 52 20 22 00 E5 09 2B 00 83 22 20 20 D0 52 49 |ER "...+.." .RI| 000001D0: 4E 54 20 C3 4F 4E 54 45 4E 54 53 20 D3 48 45 45 |NT .ONTENTS .HEE| 000001E0: 54 20 20 20 22 00 06 0A 2C 00 83 22 20 20 20 20 |T "...,.." | 000001F0: D0 52 49 4E 54 20 20 C4 49 52 45 43 54 4F 52 59 |.RINT .IRECTORY| 00000200: 20 20 20 20 20 22 00 27 0A 2D 00 83 22 20 20 20 | ".'.-.." | 00000210: 20 D1 55 49 54 20 54 48 45 20 50 52 4F 47 52 41 | .UIT THE PROGRA| 00000220: 4D 20 20 20 20 20 22 00 3B 0A 32 00 81 49 B2 30 |M ".;.2..I.0| 00000230: A4 34 3A 87 50 24 28 49 29 3A 82 00 56 0A 34 00 |.4:.P$(I):..V.4.| 00000240: 83 22 20 20 D3 55 42 53 43 52 49 50 54 20 CD 4F |." .UBSCRIPT .O| 00000250: 44 45 20 20 20 22 00 71 0A 35 00 83 22 20 20 20 |DE ".q.5.." | 00000260: 20 C5 4C 49 54 45 20 D0 49 54 43 48 20 20 20 20 | .LITE .ITCH | 00000270: 22 00 8C 0A 37 00 83 22 20 20 C3 4F 4E 44 45 4E |"...7.." .ONDEN| 00000280: 53 45 44 20 CD 4F 44 45 20 20 20 22 00 A7 0A 38 |SED .ODE "...8| 00000290: 00 83 22 20 CC 49 4E 45 20 D3 50 41 43 49 4E 47 |.." .INE .PACING| 000002A0: 20 37 2F 37 32 20 22 00 C2 0A 3A 00 83 22 20 20 | 7/72 "...:.." | 000002B0: 20 D2 45 53 45 54 20 D0 52 49 4E 54 45 52 20 20 | .ESET .RINTER | 000002C0: 20 22 00 EA 0A 64 00 99 22 93 11 11 81 20 20 20 | "...d..".... | 000002D0: 20 20 20 20 20 20 20 D4 C8 C5 20 CD C9 C7 C8 D4 | ... .....| 000002E0: D9 20 CC CF C1 C4 D3 D4 C1 D2 00 19 0B 66 00 99 |. ...........f..| 000002F0: 22 11 20 20 20 20 20 C3 CF CE D4 C5 CE D4 D3 20 |". ........ | 00000300: C1 CE C4 20 C4 C9 D2 C5 C3 D4 CF D2 D9 20 D0 D2 |... ......... ..| 00000310: C9 CE D4 C5 D2 11 11 9F 22 00 25 0B 69 00 4D B2 |........".%.i.M.| 00000320: 30 3A 54 B2 38 00 3E 0B 6E 00 81 49 B2 30 A4 33 |0:T.8.>.n..I.0.3| 00000330: 3A 99 A3 54 29 4D 24 28 49 29 3A 99 3A 82 00 60 |:..T)M$(I):.:..`| 00000340: 0B 78 00 97 32 31 34 2C 36 AA 4D AC 32 3A 99 3A |.x..214,6.M.2:.:| 00000350: 99 A3 54 29 22 05 12 22 4D 24 28 4D 29 22 91 22 |..T)".."M$(M)"."| 00000360: 00 87 0B 82 00 A1 41 24 3A 8B 41 24 B3 B1 22 91 |......A$:.A$..".| 00000370: 22 AF 41 24 B3 B1 22 11 22 AF 41 24 B3 B1 C7 28 |".A$..".".A$...(| 00000380: 31 33 29 A7 31 33 30 00 99 0B 8C 00 8B 41 24 B2 |13).130......A$.| 00000390: C7 28 31 33 29 A7 31 38 30 00 AA 0B 91 00 99 A3 |.(13).180.......| 000003A0: 54 29 22 9F 22 4D 24 28 4D 29 00 C5 0B 96 00 8B |T)"."M$(M)......| 000003B0: 41 24 B2 22 91 22 A7 4D B2 4D AB 31 3A 8B 4D B3 |A$.".".M.M.1:.M.| 000003C0: 30 A7 4D B2 33 00 E0 0B A0 00 8B 41 24 B2 22 11 |0.M.3......A$.".| 000003D0: 22 A7 4D B2 4D AA 31 3A 8B 4D B1 33 A7 4D B2 30 |".M.M.1:.M.3.M.0| 000003E0: 00 E9 0B AA 00 89 31 32 30 00 02 0C B4 00 91 4D |......120......M| 000003F0: AA 31 89 32 30 30 2C 33 30 30 2C 35 30 30 2C 34 |.1.200,300,500,4| 00000400: 30 30 00 33 0C C8 00 99 22 93 11 11 11 9F 20 20 |00.3...."..... | 00000410: 20 20 D9 4F 55 20 57 49 4C 4C 20 4E 45 45 44 20 | .OU WILL NEED | 00000420: 59 4F 55 52 20 50 52 49 4E 54 45 52 20 4D 41 4E |YOUR PRINTER MAN| 00000430: 55 41 4C 00 61 0C CA 00 99 22 20 49 4E 20 4F 52 |UAL.a...." IN OR| 00000440: 44 45 52 20 54 4F 20 45 4E 54 45 52 20 54 48 45 |DER TO ENTER THE| 00000450: 20 46 4F 4C 4C 4F 57 49 4E 47 20 43 4F 44 45 53 | FOLLOWING CODES| 00000460: 2E 00 8D 0C CC 00 99 22 20 C9 46 20 59 4F 55 20 |......." .F YOU | 00000470: 50 55 54 20 41 20 24 20 42 45 46 4F 52 45 20 54 |PUT A $ BEFORE T| 00000480: 48 45 20 56 45 52 59 20 46 49 52 53 54 00 B7 0C |HE VERY FIRST...| 00000490: CE 00 99 22 20 45 4E 54 52 59 2C 20 54 48 45 20 |..." ENTRY, THE | 000004A0: 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 45 58 50 |PROGRAM WILL EXP| 000004B0: 45 43 54 20 54 48 45 00 CE 0C D0 00 99 22 20 4E |ECT THE......" N| 000004C0: 55 4D 42 45 52 53 20 49 4E 20 C8 C5 D8 2E 00 DF |UMBERS IN ......| 000004D0: 0C DC 00 99 22 9A 11 20 C5 D8 C1 CD D0 CC C5 00 |....".. ........| 000004E0: 01 0D E1 00 99 22 11 9F 22 50 24 28 30 29 22 3A |.....".."P$(0)":| 000004F0: 20 05 32 37 20 38 33 20 34 39 20 20 20 20 9A 4F | .27 83 49 .O| 00000500: 52 00 1D 0D E3 00 99 22 11 9F 22 50 24 28 30 29 |R......".."P$(0)| 00000510: 22 3A 20 05 24 31 42 20 35 33 20 34 39 00 45 0D |": .$1B 53 49.E.| 00000520: E6 00 99 22 9A 11 20 C5 4E 54 45 52 20 59 4F 55 |...".. .NTER YOU| 00000530: 52 20 50 52 49 4E 54 45 52 27 53 20 43 4F 44 45 |R PRINTER'S CODE| 00000540: 20 46 4F 52 3A 00 52 0D F0 00 4B B2 30 3A 42 42 | FOR:.R...K.0:BB| 00000550: B2 30 00 7D 0D FA 00 97 32 31 34 2C 31 36 3A 99 |.0.}....214,16:.| 00000560: 3A 99 22 9F 22 50 24 28 4B 29 22 3A 20 22 3B 3A |:."."P$(K)": ";:| 00000570: 8D 35 30 30 30 30 3A 42 24 B2 51 39 24 00 9D 0D |.50000:B$.Q9$...| 00000580: FC 00 8B C8 28 42 24 2C 31 29 B2 22 24 22 B0 42 |....(B$,1)."$".B| 00000590: 42 B2 31 A7 42 42 B2 31 3A 89 32 38 30 00 B0 0D |B.1.BB.1:.280...| 000005A0: FF 00 4A B2 30 3A 81 49 B2 31 A4 C3 28 42 24 29 |..J.0:.I.1..(B$)| 000005B0: 00 E1 0D 00 01 8B CA 28 42 24 2C 49 2C 31 29 B2 |.......(B$,I,1).| 000005C0: 22 20 22 A7 44 28 4B 2C 4A 29 B2 C5 28 43 24 29 |" ".D(K,J)..(C$)| 000005D0: 3A 43 24 B2 22 22 3A 4A B2 4A AA 31 3A 89 32 35 |:C$."":J.J.1:.25| 000005E0: 38 00 F5 0D 01 01 43 24 B2 43 24 AA CA 28 42 24 |8.....C$.C$..(B$| 000005F0: 2C 49 2C 31 29 00 15 0E 02 01 82 3A 44 28 4B 2C |,I,1)......:D(K,| 00000600: 4A 29 B2 C5 28 43 24 29 3A 43 24 B2 22 22 3A 45 |J)..(C$):C$."":E| 00000610: 28 4B 29 B2 4A 00 38 0E 03 01 4B B2 4B AA 31 3A |(K).J.8...K.K.1:| 00000620: 8B 4B B3 35 A7 97 37 38 31 2C 31 37 3A 9E 35 39 |.K.5..781,17:.59| 00000630: 39 30 33 3A 89 32 35 30 00 5A 0E 04 01 8D 31 30 |903:.250.Z....10| 00000640: 30 30 3A 9F 38 2C 44 56 2C 38 2C 22 40 30 3A 44 |00:.8,DV,8,"@0:D| 00000650: 52 49 56 45 52 2C 50 2C 57 22 00 78 0E 06 01 81 |RIVER,P,W".x....| 00000660: 49 B2 30 A4 35 3A 45 B2 45 28 49 29 3A 98 38 2C |I.0.5:E.E(I):.8,| 00000670: 45 3A 81 4A B2 30 A4 45 00 86 0E 08 01 98 38 2C |E:.J.0.E......8,| 00000680: 44 28 49 2C 4A 29 00 91 0E 0A 01 82 3A 82 3A A0 |D(I,J)......:.:.| 00000690: 38 00 9A 0E 0E 01 89 31 30 30 00 BC 0E 18 01 8B |8......100......| 000006A0: C8 28 42 24 2C 31 29 B2 22 24 22 A7 42 24 B2 C9 |.(B$,1)."$".B$..| 000006B0: 28 42 24 2C C3 28 42 24 29 AB 31 29 00 DF 0E 1A |(B$,.(B$).1)....| 000006C0: 01 4A B2 30 3A 81 49 B2 31 A4 C3 28 42 24 29 A9 |.J.0:.I.1..(B$).| 000006D0: 33 3A 42 42 24 B2 CA 28 42 24 2C 49 2C 31 29 00 |3:BB$..(B$,I,1).| 000006E0: 05 0F 1B 01 81 4C B2 31 A4 31 36 3A 8B 42 42 24 |.....L.1.16:.BB$| 000006F0: B2 CA 28 48 24 2C 4C 2C 31 29 A7 55 B2 4C AB 31 |..(H$,L,1).U.L.1| 00000700: 3A 4C B2 31 36 00 0B 0F 1C 01 82 00 2B 0F 1E 01 |:L.16.......+...| 00000710: 44 28 4B 2C 4A 29 B2 31 36 AC 55 3A 42 42 24 B2 |D(K,J).16.U:BB$.| 00000720: CA 28 42 24 2C 49 AA 31 2C 31 29 00 51 0F 1F 01 |.(B$,I.1,1).Q...| 00000730: 81 4C B2 31 A4 31 36 3A 8B 42 42 24 B2 CA 28 48 |.L.1.16:.BB$..(H| 00000740: 24 2C 4C 2C 31 29 A7 55 B2 4C AB 31 3A 4C B2 31 |$,L,1).U.L.1:L.1| 00000750: 36 00 57 0F 20 01 82 00 71 0F 22 01 44 28 4B 2C |6.W. ...q.".D(K,| 00000760: 4A 29 B2 44 28 4B 2C 4A 29 AA 55 3A 4A B2 4A AA |J).D(K,J).U:J.J.| 00000770: 31 00 7C 0F 24 01 82 3A 89 32 35 39 00 B1 0F 2C |1.|.$..:.259...,| 00000780: 01 9E 35 32 37 33 36 2C 22 54 2E 43 4F 4E 54 45 |..52736,"T.CONTE| 00000790: 4E 54 2A 22 2C 44 56 3A 57 24 28 30 29 B2 C9 28 |NT*",DV:W$(0)..(| 000007A0: 57 24 28 30 29 2C C3 28 57 24 28 30 29 29 AB 32 |W$(0),.(W$(0)).2| 000007B0: 29 00 DB 0F 31 01 48 B2 C2 28 32 35 32 29 AC 32 |)...1.H..(252).2| 000007C0: 35 36 AA C2 28 32 35 31 29 3A 47 B2 B5 28 48 AD |56..(251):G..(H.| 000007D0: 32 29 3A 47 47 B2 48 AB 47 AC 32 00 E6 0F 36 01 |2):GG.H.G.2...6.| 000007E0: 9F 34 2C 34 2C 37 00 FF 0F 38 01 81 49 B2 30 A4 |.4,4,7...8..I.0.| 000007F0: 33 3A 45 B2 45 28 49 29 3A 81 4A B2 30 A4 45 00 |3:E.E(I):.J.0.E.| 00000800: 11 10 3A 01 98 34 2C C7 28 44 28 49 2C 4A 29 29 |..:..4,.(D(I,J))| 00000810: 3B 00 1A 10 3C 01 82 3A 98 34 00 20 10 3E 01 82 |;...<..:.4. .>..| 00000820: 00 2B 10 40 01 81 49 B2 30 A4 47 00 39 10 42 01 |.+.@..I.0.G.9.B.| 00000830: 98 34 2C 57 24 28 49 29 3B 00 5C 10 44 01 98 34 |.4,W$(I);.\.D..4| 00000840: 2C C8 28 53 50 24 2C 34 32 AB C3 28 57 24 28 49 |,.(SP$,42..(W$(I| 00000850: 29 29 29 57 24 28 49 AA 47 AA 31 29 00 62 10 4A |)))W$(I.G.1).b.J| 00000860: 01 82 00 73 10 4F 01 8B 47 47 A7 98 34 2C 57 24 |...s.O..GG..4,W$| 00000870: 28 48 29 00 9B 10 54 01 45 B2 45 28 34 29 3A 81 |(H)...T.E.E(4):.| 00000880: 49 B2 30 A4 45 3A 98 34 2C C7 28 44 28 34 2C 49 |I.0.E:.4,.(D(4,I| 00000890: 29 29 3B 3A 82 3A 98 34 3A A0 34 00 A4 10 5E 01 |));:.:.4:.4...^.| 000008A0: 89 31 30 30 00 DD 10 90 01 9F 31 35 2C 38 2C 31 |.100......15,8,1| 000008B0: 35 2C 22 52 30 3A 48 45 4C 4C 4F 20 43 4F 4E 4E |5,"R0:HELLO CONN| 000008C0: 45 43 54 3D 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 |ECT=HELLO CONNEC| 000008D0: 54 22 3A 84 31 35 2C 45 52 3A A0 31 35 00 F0 10 |T":.15,ER:.15...| 000008E0: 9A 01 8B 45 52 B3 B1 36 33 A7 99 22 93 22 3A 80 |...ER..63..".":.| 000008F0: 00 1E 11 A4 01 99 22 93 11 11 11 90 4C 4F 41 44 |......".....LOAD| 00000900: 22 C7 28 33 34 29 22 48 45 4C 4C 4F 20 43 4F 4E |".(34)"HELLO CON| 00000910: 4E 45 43 54 22 C7 28 33 34 29 22 2C 38 22 00 2E |NECT".(34)",8"..| 00000920: 11 AE 01 99 22 11 11 11 11 52 55 4E 13 22 00 4B |...."....RUN.".K| 00000930: 11 B8 01 97 36 33 31 2C 31 33 3A 97 36 33 32 2C |....631,13:.632,| 00000940: 31 33 3A 97 31 39 38 2C 32 3A 80 00 61 11 F4 01 |13:.198,2:..a...| 00000950: 9E 35 32 32 32 34 2C 22 24 3A 2A 22 2C 44 56 2C |.52224,"$:*",DV,| 00000960: 30 00 84 11 F9 01 48 B2 C2 28 32 35 32 29 AC 32 |0.....H..(252).2| 00000970: 35 36 AA C2 28 32 35 31 29 AB 31 3A 47 B2 B5 28 |56..(251).1:G..(| 00000980: 48 AD 34 29 00 8F 11 FE 01 9F 34 2C 34 2C 37 00 |H.4)......4,4,7.| 00000990: A8 11 00 02 81 49 B2 30 A4 33 3A 45 B2 45 28 49 |.....I.0.3:E.E(I| 000009A0: 29 3A 81 4A B2 30 A4 45 00 BA 11 02 02 98 34 2C |):.J.0.E......4,| 000009B0: C7 28 44 28 49 2C 4A 29 29 3B 00 C3 11 04 02 82 |.(D(I,J));......| 000009C0: 3A 98 34 00 C9 11 06 02 82 00 D9 11 08 02 98 34 |:.4............4| 000009D0: 2C 46 24 28 30 29 3A 98 34 00 E6 11 0A 02 81 49 |,F$(0):.4......I| 000009E0: B2 31 A4 47 AA 31 00 F4 11 0C 02 98 34 2C 46 24 |.1.G.1......4,F$| 000009F0: 28 49 29 3B 00 18 12 0D 02 98 34 2C C8 28 53 50 |(I);......4,.(SP| 00000A00: 24 2C 32 30 AB C3 28 46 24 28 49 29 29 29 46 24 |$,20..(F$(I)))F$| 00000A10: 28 49 AA 47 AA 31 29 3B 00 42 12 0E 02 98 34 2C |(I.G.1);.B....4,| 00000A20: C8 28 53 50 24 2C 32 30 AB C3 28 46 24 28 49 AA |.(SP$,20..(F$(I.| 00000A30: 47 AA 31 29 29 29 46 24 28 49 AA 32 AC 47 AA 32 |G.1)))F$(I.2.G.2| 00000A40: 29 3B 00 6D 12 0F 02 98 34 2C C8 28 53 50 24 2C |);.m....4,.(SP$,| 00000A50: 32 30 AB C3 28 46 24 28 49 AA 47 AC 32 AA 32 29 |20..(F$(I.G.2.2)| 00000A60: 29 29 46 24 28 49 AA 33 AC 47 AA 33 29 00 73 12 |))F$(I.3.G.3).s.| 00000A70: 12 02 82 00 9A 12 17 02 9F 32 2C 44 56 2C 30 2C |.........2,DV,0,| 00000A80: 22 24 3A 51 57 33 34 35 22 3A 81 49 B2 30 A4 33 |"$:QW345":.I.0.3| 00000A90: 33 3A A1 23 32 2C 41 24 3A 82 00 CF 12 19 02 A1 |3:.#2,A$:.......| 00000AA0: 23 32 2C 4C 42 24 3A 4C 42 B2 C6 28 4C 42 24 AA |#2,LB$:LB..(LB$.| 00000AB0: C7 28 30 29 29 3A A1 23 32 2C 48 42 24 3A 48 42 |.(0)):.#2,HB$:HB| 00000AC0: B2 C6 28 48 42 24 AA C7 28 30 29 29 3A A0 32 00 |..(HB$..(0)):.2.| 00000AD0: D6 12 1A 02 98 34 00 F5 12 1B 02 98 34 2C 48 42 |.....4......4,HB| 00000AE0: AC 32 35 36 AA 4C 42 22 20 42 4C 4F 43 4B 53 20 |.256.LB" BLOCKS | 00000AF0: 46 52 45 45 22 00 1D 13 1C 02 45 B2 45 28 34 29 |FREE".....E.E(4)| 00000B00: 3A 81 49 B2 30 A4 45 3A 98 34 2C C7 28 44 28 34 |:.I.0.E:.4,.(D(4| 00000B10: 2C 49 29 29 3B 3A 82 3A 98 34 3A A0 34 00 26 13 |,I));:.:.4:.4.&.| 00000B20: 26 02 89 31 30 30 00 4B 13 E8 03 9F 31 35 2C 44 |&..100.K....15,D| 00000B30: 56 2C 31 35 2C 22 49 22 3A 84 31 35 2C 45 52 2C |V,15,"I":.15,ER,| 00000B40: 45 52 24 2C 41 2C 41 3A A0 31 35 00 57 13 F2 03 |ER$,A,A:.15.W...| 00000B50: 8B 45 52 B2 30 A7 8E 00 7A 13 FC 03 99 22 11 11 |.ER.0...z...."..| 00000B60: 11 20 22 45 52 24 22 20 2D 20 C3 48 45 43 4B 20 |. "ER$" - .HECK | 00000B70: 59 4F 55 52 20 44 52 49 56 45 00 93 13 06 04 99 |YOUR DRIVE......| 00000B80: 22 11 20 41 4E 44 20 50 52 45 53 53 20 41 20 4B |". AND PRESS A K| 00000B90: 45 59 2E 00 A7 13 10 04 A1 41 24 3A 8B 41 24 B2 |EY.......A$:.A$.| 00000BA0: 22 22 A7 31 30 34 30 00 B1 13 1A 04 89 31 30 30 |"".1040......100| 00000BB0: 30 00 E8 13 10 27 9F 31 35 2C 38 2C 31 35 2C 22 |0....'.15,8,15,"| 00000BC0: 53 30 3A 43 4F 4E 54 44 49 52 50 52 49 4E 54 22 |S0:CONTDIRPRINT"| 00000BD0: 3A A0 31 35 3A 94 22 43 4F 4E 54 44 49 52 50 52 |:.15:."CONTDIRPR| 00000BE0: 49 4E 54 22 2C 38 3A 80 00 03 14 50 C3 51 39 24 |INT",8:....P.Q9$| 00000BF0: B2 22 22 3A 55 39 B2 35 33 32 38 30 3A 97 31 39 |."":U9.53280:.19| 00000C00: 38 2C 30 00 0B 14 5A C3 A1 41 24 00 32 14 64 C3 |8,0...Z..A$.2.d.| 00000C10: 97 36 34 36 2C BB 28 31 29 AC 31 35 AA 31 3A 99 |.646,.(1).15.1:.| 00000C20: 22 A4 9D 22 3B 3A 8B 41 24 B2 22 22 A7 35 30 30 |"..";:.A$."".500| 00000C30: 31 30 00 47 14 6E C3 8B 41 24 B2 C7 28 31 33 29 |10.G.n..A$..(13)| 00000C40: A7 99 22 20 22 3A 8E 00 79 14 78 C3 8B 28 41 24 |.." ":..y.x..(A$| 00000C50: B2 C7 28 32 30 29 AF C3 28 51 39 24 29 29 A7 51 |..(20)..(Q9$)).Q| 00000C60: 39 24 B2 C8 28 51 39 24 2C C3 28 51 39 24 29 AB |9$..(Q9$,.(Q9$).| 00000C70: 31 29 3A 89 35 30 30 38 30 00 A8 14 82 C3 8B C3 |1):.50080.......| 00000C80: 28 51 39 24 29 B1 B2 32 30 A7 54 39 25 B2 C2 28 |(Q9$)..20.T9%..(| 00000C90: 55 39 29 3A 97 55 39 2C 31 3A 97 55 39 2C 54 39 |U9):.U9,1:.U9,T9| 00000CA0: 25 3A 89 35 30 30 31 30 00 D9 14 8C C3 8B 41 24 |%:.50010......A$| 00000CB0: B3 22 20 22 B0 28 41 24 B1 C7 28 31 32 37 29 AF |." ".(A$..(127).| 00000CC0: 41 24 B3 C7 28 31 36 30 29 29 B0 41 24 B2 C7 28 |A$..(160)).A$..(| 00000CD0: 33 34 29 A7 35 30 30 31 30 00 E8 14 96 C3 51 39 |34).50010.....Q9| 00000CE0: 24 B2 51 39 24 AA 41 24 00 FB 14 A0 C3 99 22 05 |$.Q9$.A$......".| 00000CF0: 22 41 24 3B 3A 89 35 30 30 31 30 00 00 00 |"A$;:.50010... |
......DV.B(186):.DV.8.DV.8.7....53281,0:
.53280,0:."...".A....1000.....57812"INP
UT A/D CC00",DV,0:.780,0:.781,0:.782,204
:.65493......15,DV,15,"R0:DRIVER=DRIVER"
:.15,ER,ER$,A,A: 15.B....ER..63.30......
8,DV,8,"DRIVER,P,R"......I.0.5:.8,E(I):E
.E(I):.J.0.E......8,D(I,J)......:.: 8.>.
...W$(300),F$(300):W.206.256:F.204.256.U
. .SP$."
"...".H$."0123456789ABCDEF".
..(..I.0.3:.M$(I):..D.*.." CREATE A PRIN
TER DRIVER "...+.." PRINT CONTENTS SHEE
T "...,.." PRINT DIRECTORY ".'
.-.." QUIT THE PROGRAM ".;.2..I.0
.4:.P$(I):..V.4.." SUBSCRIPT MODE ".Q
.5.." ELITE PITCH "...7.." CONDEN
SED MODE "...8.." LINE SPACING 7/72 ".
B.:.." RESET PRINTER "...D.."....
THE MIGHTY LOADSTAR...F..". C
ONTENTS AND DIRECTORY PRINTER...".%.I.M.
0:T.8.>.N..I.0.3:..T)M$(I):.:..`.X..214,
6.M.2:.:..T)".."M$(M)"."......A$:.A$..".
".A$..".".A$..G(13).130......A$.G(13).18
0.......T)"."M$(M).E....A$.".".M.M.1:.M.
0.M.3... ..A$.".".M.M.1:.M.3.M.0......12
0......M.1.200,300,500,400.3.H..".....
YOU WILL NEED YOUR PRINTER MANUAL.A.J.
." IN ORDER TO ENTER THE FOLLOWING CODES
....L.." IF YOU PUT A $ BEFORE THE VERY
FIRST...N.." ENTRY, THE PROGRAM WILL EXP
ECT THE.N.P.." NUMBERS IN HEX......."..
EXAMPLE......".."P$(0)": .27 83 49 .O
R......".."P$(0)": .$1B 53 49.E....".. E
NTER YOUR PRINTER'S CODE FOR:.R...K.0:BB
.0.}....214,16:.:."."P$(K)": ";:.50000:B
$.Q9$......H(B$,1)."$".BB.1.BB.1:.280...
..J.0:.I.1.C(B$)......J(B$,I,1)." ".D(K,
J).E(C$):C$."":J.J.1:.258.....C$.C$.J(B$
,I,1)......:D(K,J).E(C$):C$."":E(K).J.8.
..K.K.1:.K.5..781,17:.59903:.250.Z....10
00:.8,DV,8,"@0:DRIVER,P,W".X....I.0.5:E.
E(I):.8,E:.J.0.E......8,D(I,J)......:.:
8......100......H(B$,1)."$".B$.I(B$,C(B$
).1).....J.0:.I.1.C(B$).3:BB$.J(B$,I,1).
.....L.1.16:.BB$.J(H$,L,1).U.L.1:L.16...
....+...D(K,J).16.U:BB$.J(B$,I.1,1).Q...
.L.1.16:.BB$.J(H$,L,1).U.L.1:L.16.W. ...
Q.".D(K,J).D(K,J).U:J.J.1.|.$..:.259...,
..52736,"T.CONTENT*",DV:W$(0).I(W$(0),C(
W$(0)).2)...1.H.B(252).256.B(251):G..(H.
2):GG.H.G.2...6..4,4,7...8..I.0.3:E.E(I)
:.J.0.E...:..4,G(D(I,J));...<..:.4. .>..
.+.@..I.0.G.9.B..4,W$(I);.\.D..4,H(SP$,4
2.C(W$(I)))W$(I.G.1).B.J...S.O..GG..4,W$
(H)...T.E.E(4):.I.0.E:.4,G(D(4,I));:.:.4
: 4...^..100......15,8,15,"R0:HELLO CONN
ECT=HELLO CONNECT":.15,ER: 15......ER..6
3..".":.......".....LOAD"G(34)"HELLO CON
NECT"G(34)",8"......"....RUN.".K....631,
13:.632,13:.198,2:..A....52224,"$:*",DV,
0.....H.B(252).256.B(251).1:G..(H.4)....
..4,4,7......I.0.3:E.E(I):.J.0.E......4,
G(D(I,J));.C....:.4.I.....Y....4,F$(0):.
4......I.1.G.1......4,F$(I);......4,H(SP
$,20.C(F$(I)))F$(I.G.1);.B....4,H(SP$,20
.C(F$(I.G.1)))F$(I.2.G.2);.M....4,H(SP$,
20.C(F$(I.G.2.2)))F$(I.3.G.3).S.........
.2,DV,0,"$:QW345":.I.0.33:.#2,A$:..O....
#2,LB$:LB.F(LB$.G(0)):.#2,HB$:HB.F(HB$.G
(0)): 2.V....4......4,HB.256.LB" BLOCKS
FREE".....E.E(4):.I.0.E:.4,G(D(4,I));:.:
.4: 4.&.&..100.K....15,DV,15,"I":.15,ER,
ER$,A,A: 15.W....ER.0...Z...."... "ER$"
- CHECK YOUR DRIVE......". AND PRESS A K
EY.......A$:.A$."".1040......1000....'.1
5,8,15,"S0:CONTDIRPRINT": 15:."CONTDIRPR
INT",8:....PCQ9$."":U9.53280:.198,0...ZC
.A$.2.DC.646,.(1).15.1:."..";:.A$."".500
10.G.NC.A$.G(13).." ":..Y.XC.(A$.G(20).C
(Q9$)).Q9$.H(Q9$,C(Q9$).1):.50080....C.C
(Q9$)..20.T9%.B(U9):.U9,1:.U9,T9%:.50010
.Y..C.A$." ".(A$.G(127).A$.G(160)).A$.G(
34).50010....CQ9$.Q9$.A$... C."."A$;:.50
010...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL