DIR.PRINTEN
FILE INFORMATION
FILENAME(S): DIR.PRINTEN
FILE TYPE(S): PRG
FILE SIZE: 3K
FIRST SEEN: 2025-11-30 21:06:42
APPEARS ON: 1 disk(s)
FILE HASH
aa9ddf8ae77d27f5d0301934520c9e0418eae609d6aeb81b93601e6cfba53b60
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HULP PROG 2A | DIR.PRINTEN | PRG | DuncanTwain | 21 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 18 08 01 00 8F 20 44 49 52 45 43 54 4F 52 |....... DIRECTOR| 00000010: 59 20 4C 49 53 54 45 52 00 37 08 64 00 97 35 33 |Y LISTER.7.d..53| 00000020: 32 38 30 2C 31 35 3A 97 35 33 32 38 31 2C 31 31 |280,15:.53281,11| 00000030: 3A 99 22 05 93 22 3B 00 5A 08 6E 00 86 54 24 28 |:."..";.Z.n..T$(| 00000040: 37 35 29 20 3A 8F 20 42 45 56 41 54 20 54 59 50 |75) :. BEVAT TYP| 00000050: 45 20 56 41 4E 20 46 49 4C 45 00 7E 08 78 00 86 |E VAN FILE.~.x..| 00000060: 50 52 24 28 37 35 29 3A 8F 20 42 45 56 41 54 20 |PR$(75):. BEVAT | 00000070: 50 52 4F 47 52 41 4D 4D 41 4E 41 4D 45 4E 00 A0 |PROGRAMMANAMEN..| 00000080: 08 82 00 86 20 42 42 24 28 37 35 29 20 3A 8F 20 |.... BB$(75) :. | 00000090: 42 45 56 41 54 20 46 49 4C 45 4C 45 4E 47 54 45 |BEVAT FILELENGTE| 000000A0: 00 BF 08 8C 00 44 4E 24 B2 22 22 20 3A 8F 20 44 |.....DN$."" :. D| 000000B0: 4E 24 20 49 53 20 44 49 52 45 43 54 4F 52 59 00 |N$ IS DIRECTORY.| 000000C0: E3 08 96 00 50 52 B2 30 20 3A 8F 20 50 52 20 49 |....PR.0 :. PR I| 000000D0: 53 20 50 41 52 41 4D 45 54 45 52 20 56 41 4E 20 |S PARAMETER VAN | 000000E0: 50 52 24 00 0B 09 A0 00 42 46 B2 30 3A 8F 20 42 |PR$.....BF.0:. B| 000000F0: 46 20 42 45 56 41 54 20 41 41 4E 54 41 4C 20 56 |F BEVAT AANTAL V| 00000100: 52 49 4A 45 20 42 4C 4F 43 4B 53 00 3C 09 AA 00 |RIJE BLOCKS.<...| 00000110: 99 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |."**************| 00000120: 20 44 49 52 20 4C 49 53 54 45 52 20 2A 2A 2A 2A | DIR LISTER ****| 00000130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3B 00 6D 09 B4 |**********";.m..| 00000140: 00 99 22 2A 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 28 |.."* --------- (| 00000150: 43 29 20 42 45 52 54 20 53 43 48 55 54 54 45 20 |C) BERT SCHUTTE | 00000160: 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 2A 22 3B 00 9E 09 |--------- *";...| 00000170: B9 00 99 22 2A 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 20 | | 00000190: 20 20 20 20 20 20 20 20 20 20 20 2A 22 3B 00 CF | *";..| 000001A0: 09 BA 00 99 22 2A 45 4E 49 47 53 5A 49 4E 53 20 |...."*ENIGSZINS | 000001B0: 41 41 4E 47 45 50 41 53 54 20 44 4F 4F 52 20 48 |AANGEPAST DOOR H| 000001C0: 2E 47 2E 56 41 4E 20 4D 41 4E 45 4E 2A 22 3B 00 |.G.VAN MANEN*";.| 000001D0: FF 09 BE 00 99 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....."**********| 000001E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000001F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 |**************".| 00000200: 0C 0A C8 00 99 22 11 11 11 11 11 22 00 16 0A D2 |....."....."....| 00000210: 00 51 B2 51 AA 31 00 23 0A DC 00 8B 51 B1 31 A7 |.Q.Q.1.#....Q.1.| 00000220: 32 37 30 00 3F 0A E6 00 85 22 57 41 54 20 49 53 |270.?...."WAT IS| 00000230: 20 44 45 20 44 41 54 55 4D 20 22 3B 44 41 24 00 | DE DATUM ";DA$.| 00000240: 68 0A F0 00 44 41 24 B2 C8 28 44 41 24 AA 22 20 |h...DA$..(DA$." | 00000250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000260: 20 20 20 22 2C 32 30 29 00 74 0A FA 00 99 22 11 | ",20).t....".| 00000270: 11 11 11 22 00 92 0A 04 01 99 22 53 4C 55 49 54 |..."......"SLUIT| 00000280: 20 45 45 4E 20 50 52 49 4E 54 45 52 20 41 41 4E | EEN PRINTER AAN| 00000290: 2C 22 00 B5 0A 0E 01 99 22 11 53 54 4F 50 20 45 |,"......".STOP E| 000002A0: 45 4E 20 44 49 53 4B 20 49 4E 20 44 45 20 44 52 |EN DISK IN DE DR| 000002B0: 49 56 45 2C 22 00 CE 0A 18 01 99 22 11 44 52 55 |IVE,"......".DRU| 000002C0: 4B 20 4F 50 20 12 52 45 54 55 52 4E 92 22 00 E5 |K OP .RETURN."..| 000002D0: 0A 22 01 A1 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 |."..A$:.A$...(13| 000002E0: 29 A7 32 39 30 00 00 0B 2C 01 8D 20 34 30 30 20 |).290...,.. 400 | 000002F0: 3A 8F 20 49 4E 4C 45 45 53 52 4F 55 54 49 4E 45 |:. INLEESROUTINE| 00000300: 00 1A 0B 36 01 8D 20 39 39 30 20 3A 8F 20 50 52 |...6.. 990 :. PR| 00000310: 49 4E 54 52 4F 55 54 49 4E 45 00 41 0B 40 01 99 |INTROUTINE.A.@..| 00000320: 22 11 11 4B 4C 41 41 52 20 21 20 20 4E 4F 47 20 |"..KLAAR ! NOG | 00000330: 45 45 4E 20 44 49 53 4B 20 28 4A 2F 4E 29 20 3F |EEN DISK (J/N) ?| 00000340: 22 00 49 0B 4A 01 A1 41 24 00 61 0B 54 01 8B 20 |".I.J..A$.a.T.. | 00000350: 41 24 B2 22 4A 22 A7 99 22 93 22 3B 3A 89 31 37 |A$."J"..".";:.17| 00000360: 30 00 76 0B 5E 01 8B 20 41 24 B2 22 4E 22 A7 99 |0.v.^.. A$."N"..| 00000370: 22 93 22 3B 3A 80 00 7F 0B 68 01 89 33 33 30 00 |".";:....h..330.| 00000380: 85 0B 72 01 3A 00 8B 0B 7C 01 3A 00 91 0B 86 01 |..r.:...|.:.....| 00000390: 80 00 B4 0B 90 01 3A 8F 20 48 49 45 52 20 42 45 |......:. HIER BE| 000003A0: 47 49 4E 54 20 4C 45 45 53 2D 53 55 42 52 4F 55 |GINT LEES-SUBROU| 000003B0: 54 49 4E 45 00 F7 0B 9A 01 50 52 B2 30 3A 42 46 |TINE.....PR.0:BF| 000003C0: B2 30 3A 44 4E 24 B2 22 22 3A 81 49 B2 31 A4 37 |.0:DN$."":.I.1.7| 000003D0: 35 3A 54 24 28 49 29 B2 22 20 20 20 22 3A 50 52 |5:T$(I)." ":PR| 000003E0: 24 28 49 29 B2 22 22 3A 42 42 24 28 49 29 B2 22 |$(I)."":BB$(I)."| 000003F0: 20 20 20 20 20 20 22 00 17 0C A4 01 50 52 24 28 | ".....PR$(| 00000400: 49 29 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 |I)." | 00000410: 20 20 20 20 22 3A 82 00 34 0C AE 01 9F 31 35 2C | ":..4....15,| 00000420: 38 2C 31 35 2C 22 49 30 22 3A 9F 32 2C 38 2C 32 |8,15,"I0":.2,8,2| 00000430: 2C 22 23 22 00 41 0C B8 01 54 B2 31 38 3A 53 B2 |,"#".A...T.18:S.| 00000440: 31 00 58 0C C2 01 98 31 35 2C 22 42 2D 52 22 3B |1.X....15,"B-R";| 00000450: 32 3B 30 3B 31 38 3B 30 00 6C 0C CC 01 98 31 35 |2;0;18;0.l....15| 00000460: 2C 22 42 2D 50 22 3B 32 3B 31 34 34 00 77 0C D6 |,"B-P";2;144.w..| 00000470: 01 44 4E 24 B2 22 22 00 85 0C E0 01 3A 3A 81 49 |.DN$."".....::.I| 00000480: B2 31 A4 32 30 00 90 0C EA 01 A1 23 32 2C 58 24 |.1.20......#2,X$| 00000490: 00 9F 0C F4 01 44 4E 24 B2 44 4E 24 AA 58 24 00 |.....DN$.DN$.X$.| 000004A0: A6 0C FE 01 82 49 00 CF 0C 08 02 44 4E 24 B2 C8 |.....I.....DN$..| 000004B0: 28 44 4E 24 2C 31 38 29 AA 22 20 20 20 20 20 20 |(DN$,18)." | 000004C0: 20 20 20 23 20 22 AA C9 28 44 4E 24 2C 32 29 00 | # "..(DN$,2).| 000004D0: E5 0C 12 02 98 31 35 2C 22 42 2D 52 22 3B 32 3B |.....15,"B-R";2;| 000004E0: 30 3B 54 3B 53 00 F7 0C 1C 02 98 31 35 2C 22 42 |0;T;S......15,"B| 000004F0: 2D 50 22 3B 32 3B 30 00 11 0D 26 02 A1 23 32 2C |-P";2;0...&..#2,| 00000500: 58 24 3A 8B 58 24 B2 22 22 A7 58 24 B2 C7 28 30 |X$:.X$."".X$..(0| 00000510: 29 00 1D 0D 30 02 54 B2 C6 28 58 24 29 00 37 0D |)...0.T..(X$).7.| 00000520: 3A 02 A1 23 32 2C 58 24 3A 8B 58 24 B2 22 22 A7 |:..#2,X$:.X$."".| 00000530: 58 24 B2 C7 28 30 29 00 43 0D 44 02 53 B2 C6 28 |X$..(0).C.D.S..(| 00000540: 58 24 29 00 4E 0D 4E 02 81 58 B2 30 A4 37 00 65 |X$).N.N..X.0.7.e| 00000550: 0D 58 02 98 31 35 2C 22 42 2D 50 22 3B 32 3B 58 |.X..15,"B-P";2;X| 00000560: AC 33 32 AA 35 00 70 0D 62 02 46 46 24 B2 22 22 |.32.5.p.b.FF$.""| 00000570: 00 7C 0D 6C 02 81 59 B2 30 A4 31 35 00 96 0D 76 |.|.l..Y.0.15...v| 00000580: 02 A1 23 32 2C 58 24 3A 8B 58 24 B2 22 22 A7 58 |..#2,X$:.X$."".X| 00000590: 24 B2 C7 28 30 29 00 B2 0D 80 02 8B C6 28 58 24 |$..(0).......(X$| 000005A0: 29 B1 31 32 37 B0 C6 28 58 24 29 B3 33 32 A7 36 |).127..(X$).32.6| 000005B0: 37 30 00 C1 0D 8A 02 46 46 24 B2 46 46 24 AA 58 |70.....FF$.FF$.X| 000005C0: 24 00 C8 0D 94 02 82 59 00 D4 0D 9E 02 50 52 B2 |$......Y.....PR.| 000005D0: 50 52 AA 31 00 FD 0D A8 02 46 46 24 B2 C8 28 46 |PR.1.....FF$..(F| 000005E0: 46 24 AA 22 20 20 20 20 20 20 20 20 20 20 20 20 |F$." | 000005F0: 20 20 20 20 20 20 20 20 22 2C 31 36 29 00 0D 0E | ",16)...| 00000600: B2 02 50 52 24 28 50 52 29 B2 46 46 24 00 24 0E |..PR$(PR).FF$.$.| 00000610: BC 02 98 31 35 2C 22 42 2D 50 22 3B 32 3B 58 AC |...15,"B-P";2;X.| 00000620: 33 32 AA 32 00 3E 0E C6 02 A1 23 32 2C 58 24 3A |32.2.>....#2,X$:| 00000630: 8B 58 24 B2 22 22 A7 58 24 B2 C7 28 30 29 00 59 |.X$."".X$..(0).Y| 00000640: 0E D0 02 46 54 B2 35 3A 54 59 B2 C6 28 58 24 29 |...FT.5:TY..(X$)| 00000650: 3A 46 54 B2 54 59 AF 31 35 00 6F 0E DA 02 8B 20 |:FT.TY.15.o.... | 00000660: 46 54 B2 31 20 A7 20 54 24 B2 22 53 45 51 22 00 |FT.1 . T$."SEQ".| 00000670: 85 0E E4 02 8B 20 46 54 B2 32 20 A7 20 54 24 B2 |..... FT.2 . T$.| 00000680: 22 50 52 47 22 00 9B 0E EE 02 8B 20 46 54 B2 33 |"PRG"...... FT.3| 00000690: 20 A7 20 54 24 B2 22 55 53 52 22 00 B1 0E F8 02 | . T$."USR".....| 000006A0: 8B 20 46 54 B2 34 20 A7 20 54 24 B2 22 52 45 4C |. FT.4 . T$."REL| 000006B0: 22 00 C7 0E 02 03 8B 20 46 54 B1 34 20 A7 20 54 |"...... FT.4 . T| 000006C0: 24 B2 22 3F 3F 3F 22 00 D5 0E 0C 03 54 24 28 50 |$."???".....T$(P| 000006D0: 52 29 B2 54 24 00 F7 0E 16 03 8B 20 C8 28 46 46 |R).T$...... .(FF| 000006E0: 24 2C 32 29 B2 22 20 20 22 A7 20 54 24 28 50 52 |$,2)." ". T$(PR| 000006F0: 29 B2 22 20 20 20 22 00 0F 0F 20 03 98 31 35 2C |)." "... ..15,| 00000700: 22 42 2D 50 22 3B 32 3B 58 AC 33 32 AA 33 30 00 |"B-P";2;X.32.30.| 00000710: 1A 0F 2A 03 81 59 B2 31 A4 32 00 34 0F 34 03 A1 |..*..Y.1.2.4.4..| 00000720: 23 32 2C 58 24 3A 8B 58 24 B2 22 22 A7 58 24 B2 |#2,X$:.X$."".X$.| 00000730: C7 28 30 29 00 44 0F 3E 03 42 4C 28 59 29 B2 C6 |.(0).D.>.BL(Y)..| 00000740: 28 58 24 29 00 79 0F 48 03 8B 42 4C 28 31 29 B2 |(X$).y.H..BL(1).| 00000750: 30 A7 50 52 24 28 50 52 29 B2 22 20 20 20 20 20 |0.PR$(PR)." | 00000760: 20 20 20 20 20 20 20 20 20 20 20 22 3A 54 24 28 | ":T$(| 00000770: 50 52 29 B2 22 20 20 20 22 00 80 0F 52 03 82 59 |PR)." "...R..Y| 00000780: 00 BA 0F 5C 03 8B 42 4C 28 31 29 B3 B1 30 A7 20 |...\..BL(1)..0. | 00000790: 42 42 24 28 50 52 29 B2 C8 28 C4 28 42 4C 28 31 |BB$(PR)..(.(BL(1| 000007A0: 29 AA 32 35 36 AC 42 4C 28 32 29 29 AA 22 20 20 |).256.BL(2))." | 000007B0: 20 20 20 20 20 20 22 2C 36 29 00 C1 0F 66 03 82 | ",6)...f..| 000007C0: 58 00 CF 0F 70 03 8B 54 B3 B1 30 A7 35 33 30 00 |X...p..T..0.530.| 000007D0: E6 0F 7A 03 98 31 35 2C 22 42 2D 52 22 3B 32 3B |..z..15,"B-R";2;| 000007E0: 30 3B 31 38 3B 30 00 FC 0F 84 03 81 58 B2 30 A4 |0;18;0......X.0.| 000007F0: 33 34 3A 8B 20 58 B2 31 37 A7 20 82 00 12 10 8E |34:. X.17. .....| 00000800: 03 98 31 35 2C 22 42 2D 50 22 3B 32 3B 58 AC 34 |..15,"B-P";2;X.4| 00000810: AA 34 00 2C 10 98 03 A1 23 32 2C 58 24 3A 8B 58 |.4.,....#2,X$:.X| 00000820: 24 B2 22 22 A7 58 24 B2 C7 28 30 29 00 3C 10 A2 |$."".X$..(0).<..| 00000830: 03 42 46 B2 42 46 AA C6 28 58 24 29 00 43 10 AC |.BF.BF..(X$).C..| 00000840: 03 82 58 00 50 10 B6 03 A0 31 35 3A A0 32 3A 8E |..X.P....15:.2:.| 00000850: 00 74 10 C0 03 3A 8F 20 48 49 45 52 20 45 49 4E |.t...:. HIER EIN| 00000860: 44 49 47 54 20 4C 45 45 53 2D 53 55 42 52 4F 55 |DIGT LEES-SUBROU| 00000870: 54 49 4E 45 00 7A 10 CA 03 3A 00 80 10 D4 03 3A |TINE.z...:.....:| 00000880: 00 9D 10 DE 03 3A 8F 20 48 49 45 52 20 50 52 49 |.....:. HIER PRI| 00000890: 4E 54 2D 53 55 42 52 4F 55 54 49 4E 45 00 A6 10 |NT-SUBROUTINE...| 000008A0: E8 03 9F 34 2C 34 00 BF 10 F2 03 81 49 B2 31 A4 |...4,4......I.1.| 000008B0: 37 38 3A 98 34 2C 22 C3 22 3B 3A 82 3A 98 34 00 |78:.4,".";:.:.4.| 000008C0: F1 10 FC 03 98 34 2C 22 A5 48 2E 47 2E 56 41 4E |.....4,".H.G.VAN| 000008D0: 20 4D 41 4E 45 4E 20 20 20 20 20 20 20 20 20 20 | MANEN | 000008E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A7 22 | ."| 000008F0: 3B 00 FB 10 06 04 8D 31 32 37 30 00 2D 11 10 04 |;......1270.-...| 00000900: 98 34 2C 22 A5 52 49 4A 4E 45 4E 42 45 52 47 48 |.4,".RIJNENBERGH| 00000910: 4F 46 20 32 34 20 20 20 20 20 20 20 20 20 20 20 |OF 24 | 00000920: 20 20 20 20 20 20 20 20 20 20 A7 22 3B 00 37 11 | .";.7.| 00000930: 1A 04 8D 31 32 37 30 00 69 11 24 04 98 34 2C 22 |...1270.i.$..4,"| 00000940: A5 36 39 35 32 20 48 52 20 44 49 45 52 45 4E 20 |.6952 HR DIEREN | 00000950: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000960: 20 20 20 20 20 20 A7 22 3B 00 73 11 2E 04 8D 31 | .";.s....1| 00000970: 32 37 30 00 A5 11 38 04 98 34 2C 22 A5 54 45 4C |270...8..4,".TEL| 00000980: 20 30 38 33 33 30 2D 31 34 35 30 33 20 20 20 20 | 08330-14503 | 00000990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000009A0: 20 20 A7 22 3B 00 AF 11 42 04 8D 31 32 37 30 00 | .";...B..1270.| 000009B0: C8 11 4C 04 81 49 B2 31 A4 37 38 3A 98 34 2C 22 |..L..I.1.78:.4,"| 000009C0: A8 22 3B 3A 82 3A 98 34 00 F1 11 56 04 98 34 2C |.";:.:.4...V..4,| 000009D0: 22 A5 22 AA C7 28 31 34 29 AA 44 4E 24 AA 22 20 |"."..(14).DN$." | 000009E0: 20 20 20 20 20 20 22 AA C7 28 31 35 29 AA 22 A7 | "..(15).".| 000009F0: 22 00 1B 12 60 04 98 34 2C C7 28 31 38 29 3B 3A |"...`..4,.(18);:| 00000A00: 81 49 B2 31 A4 37 38 3A 98 34 2C 22 A8 22 3B 3A |.I.1.78:.4,".";:| 00000A10: 82 3A 98 34 2C C7 28 31 34 36 29 00 27 12 6A 04 |.:.4,.(146).'.j.| 00000A20: 81 4A B2 31 A4 32 34 00 55 12 74 04 98 34 2C 22 |.J.1.24.U.t..4,"| 00000A30: A5 22 42 42 24 28 4A 29 50 52 24 28 4A 29 22 20 |."BB$(J)PR$(J)" | 00000A40: 22 54 24 28 4A 29 22 20 20 20 20 20 20 20 20 20 |"T$(J)" | 00000A50: 20 20 A7 22 3B 00 8B 12 7E 04 98 34 2C 22 A5 22 | .";...~..4,"."| 00000A60: 42 42 24 28 4A AA 32 35 29 50 52 24 28 4A AA 32 |BB$(J.25)PR$(J.2| 00000A70: 35 29 22 20 22 54 24 28 4A AA 32 35 29 22 20 20 |5)" "T$(J.25)" | 00000A80: 20 20 20 20 20 20 20 20 20 A7 22 00 92 12 88 04 | .".....| 00000A90: 82 4A 00 C3 12 92 04 98 34 2C 22 A5 22 42 42 24 |.J......4,"."BB$| 00000AA0: 28 32 35 29 50 52 24 28 32 35 29 22 20 22 54 24 |(25)PR$(25)" "T$| 00000AB0: 28 32 35 29 22 20 20 20 20 20 20 20 20 20 20 20 |(25)" | 00000AC0: A7 22 3B 00 FE 12 9C 04 42 46 24 B2 C4 28 42 46 |.";.....BF$..(BF| 00000AD0: 29 AA 22 20 20 56 52 49 4A 45 20 42 4C 4F 4B 4B |)." VRIJE BLOKK| 00000AE0: 45 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |EN | 00000AF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 15 | "..| 00000B00: 13 A6 04 98 34 2C 22 A5 22 C8 28 42 46 24 2C 33 |....4,".".(BF$,3| 00000B10: 37 29 22 A7 22 00 2E 13 B0 04 81 49 B2 31 A4 37 |7)"."......I.1.7| 00000B20: 38 3A 98 34 2C 22 A8 22 3B 3A 82 3A 98 34 00 78 |8:.4,".";:.:.4.x| 00000B30: 13 BA 04 98 34 2C 22 C7 20 20 20 20 20 20 44 41 |....4,". DA| 00000B40: 54 55 4D 3A 20 22 44 41 24 22 20 20 20 20 20 20 |TUM: "DA$" | 00000B50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000B60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000B70: 20 20 20 20 20 20 A5 22 00 91 13 C4 04 81 49 B2 | ."......I.| 00000B80: 31 A4 37 38 3A 98 34 2C 22 C3 22 3B 3A 82 3A 98 |1.78:.4,".";:.:.| 00000B90: 34 00 98 13 C9 04 A0 34 00 9E 13 CE 04 8E 00 A4 |4......4........| 00000BA0: 13 D8 04 80 00 AA 13 E2 04 3A 00 B0 13 EC 04 3A |.........:.....:| 00000BB0: 00 F4 13 F6 04 98 34 2C 22 A5 20 20 20 20 20 20 |......4,". | 00000BC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000BD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A7 | .| 00000BE0: 22 3A 8F 20 4C 45 47 45 20 48 41 4C 56 45 20 52 |":. LEGE HALVE R| 00000BF0: 45 47 45 4C 00 FA 13 00 05 8E 00 00 00 |EGEL......... |
....... DIRECTORY LISTER.7.D..53280,15:.
53281,11:."..";.Z.N..T$(75) :. BEVAT TYP
E VAN FILE.~.X..PR$(75):. BEVAT PROGRAMM
ANAMEN. .... BB$(75) :. BEVAT FILELENGTE
.....DN$."" :. DN$ IS DIRECTORY.....PR.0
:. PR IS PARAMETER VAN PR$... .BF.0:. B
F BEVAT AANTAL VRIJE BLOCKS.<...."******
******** DIR LISTER **************";.M..
.."* --------- (C) BERT SCHUTTE --------
- *";......"*
*";.O...."*ENIGSZINS AANGEPAS
T DOOR H.G.VAN MANEN*";......"**********
******************************"...H.."..
..."...R.Q.Q.1.#....Q.1.270.?...."WAT IS
DE DATUM ";DA$.H...DA$.H(DA$."
",20).T...."...."......"SLUIT
EEN PRINTER AAN,"......".STOP EEN DISK
IN DE DRIVE,".N....".DRUK OP .RETURN."..
."..A$:.A$..G(13).290...,.. 400 :. INLEE
SROUTINE...6.. 990 :. PRINTROUTINE.A.@..
"..KLAAR ! NOG EEN DISK (J/N) ?".I.J..A
$.A.T.. A$."J"..".";:.170.V.^.. A$."N"..
".";:...H..330...R.:...|.:...........:.
HIER BEGINT LEES-SUBROUTINE.....PR.0:BF
.0:DN$."":.I.1.75:T$(I)." ":PR$(I)."":
BB$(I)." ".....PR$(I)."
":..4....15,8,15,"I0":.2,8,2,"#".A..
.T.18:S.1.X.B..15,"B-R";2;0;18;0.L.L..15
,"B-P";2;144.W.V.DN$."".....::.I.1.20...
...#2,X$.....DN$.DN$.X$......I.O...DN$.H
(DN$,18)." # ".I(DN$,2)......15,
"B-R";2;0;T;S......15,"B-P";2;0...&..#2,
X$:.X$."".X$.G(0)...0.T.F(X$).7.:..#2,X$
:.X$."".X$.G(0).C.D.S.F(X$).N.N..X.0.7.E
.X..15,"B-P";2;X.32.5.P.B.FF$."".|.L..Y.
0.15...V..#2,X$:.X$."".X$.G(0)......F(X$
).127.F(X$).32.670.A...FF$.FF$.X$.H....Y
.T...PR.PR.1.....FF$.H(FF$."
",16).....PR$(PR).FF$.$....15,"B
-P";2;X.32.2.>.F..#2,X$:.X$."".X$.G(0).Y
.P.FT.5:TY.F(X$):FT.TY.15.O.Z.. FT.1 . T
$."SEQ"...... FT.2 . T$."PRG"...... FT.3
. T$."USR"...... FT.4 . T$."REL".G....
FT.4 . T$."???".U...T$(PR).T$...... H(FF
$,2)." ". T$(PR)." "... ..15,"B-P";2;
X.32.30...*..Y.1.2.4.4..#2,X$:.X$."".X$.
G(0).D.>.BL(Y).F(X$).Y.H..BL(1).0.PR$(PR
)." ":T$(PR)." "...R..Y
...\..BL(1)..0. BB$(PR).H(D(BL(1).256.BL
(2))." ",6).A.F..X.O.P..T..0.530.
..Z..15,"B-R";2;0;18;0......X.0.34:. X.1
7. .......15,"B-P";2;X.4.4.,....#2,X$:.X
$."".X$.G(0).<...BF.BF.F(X$).C....X.P...
15: 2:..T...:. HIER EINDIGT LEES-SUBROU
TINE.Z.J.:...T.:.....:. HIER PRINT-SUBRO
UTINE......4,4......I.1.78:.4,"C";:.:.4.
.....4,".H.G.VAN MANEN
.";......1270.-....4,".RIJNENBERGH
OF 24 .";.7....1270.
I.$..4,".6952 HR DIEREN
.";.S....1270...8..4,".TEL 08330-1
4503 .";...B..1270.
H.L..I.1.78:.4,".";:.:.4...V..4,".".G(14
).DN$." ".G(15)."."...`..4,G(18);:
.I.1.78:.4,".";:.:.4,G(146).'.J..J.1.24.
U.T..4,"."BB$(J)PR$(J)" "T$(J)"
.";...~..4,"."BB$(J.25)PR$(J.25)" "T$(
J.25)" ."......J.C....4,"."BB$
(25)PR$(25)" "T$(25)" .";.....
BF$.D(BF)." VRIJE BLOKKEN
"......4,"."H(BF$,37)"."...
...I.1.78:.4,".";:.:.4.X....4,"G DA
TUM: "DA$"
."...D..I.1.78:.4,"C";:.:.
4...I. 4...N.....X.......:.....:......4,
". .
":. LEGE HALVE REGEL.........
> CLICK IMAGE PREVIEW FOR FULL MODAL