DIRECTORIES
FILE INFORMATION
FILENAME(S): DIRECTORIES
FILE TYPE(S): PRG
FILE SIZE: 6.2K
FIRST SEEN: 2025-11-30 21:23:57
APPEARS ON: 1 disk(s)
FILE HASH
577c3a0f7c21c970da5df8a3c6ec651c77f47a3c4818a209f843006389dceb9e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 SPEL 31 2 | DIRECTORIES | PRG | DuncanTwain | 24 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 25 08 64 00 8F 20 2A 20 53 4F 52 54 45 52 |..%.d.. * SORTER|
00000010: 45 4E 20 56 41 4E 20 44 45 20 44 49 52 45 43 54 |EN VAN DE DIRECT|
00000020: 4F 52 59 20 2A 00 42 08 6E 00 8F 20 41 55 54 45 |ORY *.B.n.. AUTE|
00000030: 55 52 3A 43 48 52 49 53 20 56 41 4E 20 41 41 4C |UR:CHRIS VAN AAL|
00000040: 53 54 00 5C 08 78 00 8F 20 44 24 20 20 20 3D 50 |ST.\.x.. D$ =P|
00000050: 52 4F 47 52 41 4D 4D 41 4E 41 41 4D 00 74 08 82 |ROGRAMMANAAM.t..|
00000060: 00 8F 20 46 24 20 20 20 3D 50 52 47 2F 53 45 51 |.. F$ =PRG/SEQ|
00000070: 2F 52 45 4C 00 88 08 8C 00 8F 20 46 24 28 30 29 |/REL...... F$(0)|
00000080: 3D 44 49 53 4B 2D 49 44 00 9A 08 96 00 8B 46 B2 |=DISK-ID......F.|
00000090: 30 A7 46 B2 31 3A 89 31 37 30 00 A3 08 A0 00 89 |0.F.1:.170......|
000000A0: 32 34 30 00 C3 08 AA 00 97 35 33 32 38 31 2C 30 |240......53281,0|
000000B0: 3A 97 35 33 32 38 30 2C 30 3A 97 35 33 32 37 32 |:.53280,0:.53272|
000000C0: 2C 32 31 00 05 09 B4 00 99 22 93 9E 53 41 4D 45 |,21......"..SAME|
000000D0: 4E 56 4F 45 47 45 4E 2C 20 4D 55 54 45 52 45 4E |NVOEGEN, MUTEREN|
000000E0: 20 45 4E 20 53 4F 52 54 45 52 45 4E 20 56 41 4E | EN SORTEREN VAN|
000000F0: 20 20 20 20 44 49 52 45 43 54 4F 52 49 45 53 9A | DIRECTORIES.|
00000100: 22 3A 99 3A 99 00 2F 09 BE 00 99 22 53 4F 52 54 |":.:../...."SORT|
00000110: 45 45 52 50 52 4F 47 52 41 4D 4D 41 20 41 4C 20 |EERPROGRAMMA AL |
00000120: 47 45 4C 41 44 45 4E 20 28 4A 2F 4E 29 22 3B 00 |GELADEN (J/N)";.|
00000130: 42 09 C8 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 |B....A$:.A$."".2|
00000140: 30 30 00 69 09 D2 00 99 41 24 3A 8B 41 24 B2 22 |00.i....A$:.A$."|
00000150: 4A 22 20 B0 20 41 24 B2 22 4E 22 20 A7 20 32 32 |J" . A$."N" . 22|
00000160: 30 20 45 4C 53 45 31 31 36 00 7C 09 DC 00 8B 20 |0 ELSE116.|.... |
00000170: 41 24 B2 22 4A 22 20 A7 20 32 34 30 00 91 09 E6 |A$."J" . 240....|
00000180: 00 93 22 53 4F 52 54 34 39 31 35 32 22 2C 38 2C |.."SORT49152",8,|
00000190: 31 00 C9 09 F0 00 86 41 41 24 28 31 30 30 30 29 |1......AA$(1000)|
000001A0: 2C 44 24 28 31 32 38 29 2C 46 24 28 31 32 38 29 |,D$(128),F$(128)|
000001B0: 2C 44 25 28 31 32 38 29 2C 4E 24 28 31 32 38 29 |,D%(128),N$(128)|
000001C0: 2C 42 42 24 28 31 32 38 29 00 D2 09 FA 00 4E B2 |,BB$(128).....N.|
000001D0: AB 31 00 DB 09 04 01 99 22 93 22 00 1C 0A 0E 01 |.1......".".....|
000001E0: 99 22 9E 53 41 4D 45 4E 56 4F 45 47 45 4E 2C 20 |.".SAMENVOEGEN, |
000001F0: 53 4F 52 54 45 52 45 4E 20 45 4E 20 50 52 49 4E |SORTEREN EN PRIN|
00000200: 54 45 4E 20 56 41 4E 20 44 45 20 44 49 52 45 43 |TEN VAN DE DIREC|
00000210: 54 4F 52 49 45 53 9A 22 3A 99 3A 99 00 5F 0A 18 |TORIES.":.:.._..|
00000220: 01 99 22 31 3D 4C 45 5A 45 4E 20 56 41 4E 20 44 |.."1=LEZEN VAN D|
00000230: 45 20 44 49 52 45 43 54 4F 52 49 45 53 20 45 4E |E DIRECTORIES EN|
00000240: 20 4E 41 41 52 20 20 20 20 20 20 20 20 46 4C 4F | NAAR FLO|
00000250: 50 50 59 20 53 43 48 52 59 56 45 4E 22 3A 99 00 |PPY SCHRYVEN":..|
00000260: 88 0A 22 01 99 22 32 3D 4D 55 54 45 52 45 4E 20 |..".."2=MUTEREN |
00000270: 56 41 4E 20 52 45 43 4F 52 44 53 20 4F 50 20 46 |VAN RECORDS OP F|
00000280: 4C 4F 50 50 59 22 3A 99 00 B2 0A 2C 01 99 22 33 |LOPPY":....,.."3|
00000290: 3D 53 4F 52 54 45 52 45 4E 20 56 41 4E 20 52 45 |=SORTEREN VAN RE|
000002A0: 43 4F 52 44 53 20 4F 50 20 46 4C 4F 50 50 59 22 |CORDS OP FLOPPY"|
000002B0: 3A 99 00 F3 0A 36 01 99 22 34 3D 4C 45 5A 45 4E |:....6.."4=LEZEN|
000002C0: 20 56 41 4E 20 44 45 20 44 49 52 45 43 54 4F 52 | VAN DE DIRECTOR|
000002D0: 49 45 53 20 45 4E 20 4E 41 41 52 20 20 20 20 20 |IES EN NAAR |
000002E0: 20 20 20 54 41 50 45 20 53 43 48 52 59 56 45 4E | TAPE SCHRYVEN|
000002F0: 22 3A 99 00 1A 0B 40 01 99 22 35 3D 4D 55 54 45 |":....@.."5=MUTE|
00000300: 52 45 4E 20 56 41 4E 20 52 45 43 4F 52 44 53 20 |REN VAN RECORDS |
00000310: 4F 50 20 54 41 50 45 22 3A 99 00 44 0B 4A 01 99 |OP TAPE":..D.J..|
00000320: 22 36 3D 53 4F 52 54 45 52 45 4E 20 56 41 4E 20 |"6=SORTEREN VAN |
00000330: 52 45 43 4F 52 44 53 20 4F 50 20 54 41 50 45 22 |RECORDS OP TAPE"|
00000340: 3A 99 3A 99 00 59 0B 54 01 99 22 54 4F 45 54 53 |:.:..Y.T.."TOETS|
00000350: 20 4B 45 55 5A 45 3A 22 3B 00 6D 0B 5E 01 A1 20 | KEUZE:";.m.^.. |
00000360: 4B 24 3A 8B 4B 24 B2 22 22 A7 33 35 30 00 75 0B |K$:.K$."".350.u.|
00000370: 68 01 99 4B 24 00 90 0B 72 01 8B 4B 24 B1 22 30 |h..K$...r..K$."0|
00000380: 22 20 AF 20 4B 24 B3 22 37 22 20 A7 20 33 39 30 |" . K$."7" . 390|
00000390: 00 99 0B 7C 01 89 33 34 30 00 C6 0B 86 01 99 3A |...|..340......:|
000003A0: 99 3A 99 22 54 4F 45 54 53 20 4E 41 41 4D 20 49 |.:."TOETS NAAM I|
000003B0: 4E 56 4F 45 52 42 45 53 54 41 4E 44 20 3A 22 3B |NVOERBESTAND :";|
000003C0: 3A 85 20 4E 4D 24 00 F2 0B 90 01 99 3A 99 22 54 |:. NM$......:."T|
000003D0: 4F 45 54 53 20 4E 41 41 4D 20 55 49 54 56 4F 45 |OETS NAAM UITVOE|
000003E0: 52 42 45 53 54 41 4E 44 20 3A 22 3B 3A 85 20 4D |RBESTAND :";:. M|
000003F0: 4E 24 00 FB 0B 9A 01 99 22 93 22 00 27 0C A4 01 |N$......".".'...|
00000400: 8B 20 4B 24 B2 22 32 22 20 B0 20 4B 24 B2 22 35 |. K$."2" . K$."5|
00000410: 22 20 A7 20 53 52 24 B2 22 31 22 3A 8D 32 35 35 |" . SR$."1":.255|
00000420: 30 3A 89 20 35 30 30 00 46 0C AE 01 99 22 31 3D |0:. 500.F...."1=|
00000430: 53 4F 52 54 45 52 45 4E 20 4F 50 20 44 49 53 4B |SORTEREN OP DISK|
00000440: 2D 49 44 22 3A 99 00 6B 0C B8 01 99 22 32 3D 53 |-ID":..k...."2=S|
00000450: 4F 52 54 45 52 45 4E 20 4F 50 20 50 52 4F 47 52 |ORTEREN OP PROGR|
00000460: 41 4D 4D 41 4E 41 41 4D 22 3A 99 00 83 0C C2 01 |AMMANAAM":......|
00000470: 99 22 54 4F 45 54 53 20 4B 45 55 5A 45 20 49 4E |."TOETS KEUZE IN|
00000480: 3A 22 3B 00 98 0C CC 01 A1 53 52 24 3A 8B 53 52 |:";......SR$:.SR|
00000490: 24 B2 22 22 A7 34 36 30 00 BA 0C D6 01 99 53 52 |$."".460......SR|
000004A0: 24 3A 8B 53 52 24 B3 22 31 22 20 B0 20 53 52 24 |$:.SR$."1" . SR$|
000004B0: B1 22 32 22 20 A7 20 34 35 30 00 C2 0C E0 01 99 |."2" . 450......|
000004C0: 3A 99 00 DD 0C EA 01 8B 4B 24 B2 22 31 22 20 B0 |:.......K$."1" .|
000004D0: 20 4B 24 B2 22 34 22 20 A7 20 35 34 30 00 FA 0C | K$."4" . 540...|
000004E0: F4 01 8B 4B 24 B3 22 34 22 A7 20 9F 31 2C 38 2C |...K$."4". .1,8,|
000004F0: 32 2C 4E 4D 24 3A 89 36 30 30 00 17 0D FE 01 8B |2,NM$:.600......|
00000500: 4B 24 B3 22 37 22 A7 20 9F 31 2C 31 2C 30 2C 4E |K$."7". .1,1,0,N|
00000510: 4D 24 3A 89 36 30 30 00 32 0D 08 02 8F 20 4B 24 |M$:.600.2.... K$|
00000520: 3D 31 20 4F 46 20 34 20 28 43 52 45 45 45 52 45 |=1 OF 4 (CREEERE|
00000530: 4E 29 00 54 0D 12 02 8B 4B 24 B2 22 31 22 20 B0 |N).T....K$."1" .|
00000540: 20 4B 24 B2 22 34 22 20 A7 20 8D 31 36 38 30 3A | K$."4" . .1680:|
00000550: 89 39 38 30 00 88 0D 1C 02 99 3A 99 3A 99 22 53 |.980......:.:."S|
00000560: 54 41 41 4E 20 45 52 20 41 4C 20 44 49 52 45 43 |TAAN ER AL DIREC|
00000570: 54 4F 52 49 45 53 20 49 4E 20 48 45 54 20 42 45 |TORIES IN HET BE|
00000580: 53 54 41 4E 44 22 3A 99 00 A7 0D 26 02 99 22 27 |STAND":....&.."'|
00000590: 22 3B 4E 4D 24 3B 22 27 20 28 54 4F 45 54 53 20 |";NM$;"' (TOETS |
000005A0: 4A 2F 4E 29 20 22 3B 00 BC 0D 30 02 A1 41 4E 24 |J/N) ";...0..AN$|
000005B0: 3A 8B 41 4E 24 B2 22 22 A7 35 36 30 00 D2 0D 3A |:.AN$."".560...:|
000005C0: 02 99 41 4E 24 3A 8B 41 4E 24 B2 22 4A 22 A7 35 |..AN$:.AN$."J".5|
000005D0: 30 30 00 E4 0D 44 02 8B 41 4E 24 B2 22 4E 22 A7 |00...D..AN$."N".|
000005E0: 31 30 30 30 00 ED 0D 4E 02 89 35 36 30 00 10 0E |1000...N..560...|
000005F0: 58 02 8F 20 4C 45 5A 45 4E 20 56 41 4E 20 52 45 |X.. LEZEN VAN RE|
00000600: 43 4F 52 44 20 46 4C 4F 50 50 59 2F 43 41 53 53 |CORD FLOPPY/CASS|
00000610: 00 1B 0E 62 02 8D 20 31 33 31 30 00 35 0E 6C 02 |...b.. 1310.5.l.|
00000620: 8B 4B 24 B2 22 31 22 20 B0 20 4B 24 B2 22 34 22 |.K$."1" . K$."4"|
00000630: 20 A7 39 38 30 00 44 0E 76 02 8F 20 53 4F 52 54 | .980.D.v.. SORT|
00000640: 45 52 45 4E 00 59 0E 80 02 9E 34 39 31 35 32 2C |EREN.Y....49152,|
00000650: 41 41 2C 41 41 24 28 31 29 00 7F 0E 8A 02 8F 20 |AA,AA$(1)...... |
00000660: 4E 41 20 53 4F 52 54 20 41 46 44 52 55 4B 4B 45 |NA SORT AFDRUKKE|
00000670: 4E 20 41 4C 53 20 4B 24 3D 33 20 4F 46 20 36 00 |N ALS K$=3 OF 6.|
00000680: 9B 0E 94 02 8B 4B 24 B2 22 33 22 20 B0 20 4B 24 |.....K$."3" . K$|
00000690: B2 22 36 22 20 A7 20 31 30 33 30 00 B1 0E 9E 02 |."6" . 1030.....|
000006A0: 8F 20 46 4C 4F 50 50 59 20 57 49 53 53 45 4C 45 |. FLOPPY WISSELE|
000006B0: 4E 00 E7 0E A8 02 99 22 93 22 3A 99 22 53 54 4F |N......".":."STO|
000006C0: 50 20 44 45 20 54 45 20 56 45 52 57 45 52 4B 45 |P DE TE VERWERKE|
000006D0: 4E 20 46 4C 4F 50 50 59 20 49 4E 20 44 45 20 44 |N FLOPPY IN DE D|
000006E0: 52 49 56 45 22 3A 99 00 05 0F B2 02 99 22 45 4E |RIVE":......."EN|
000006F0: 20 44 52 55 4B 20 4F 50 20 52 45 54 55 52 4E 22 | DRUK OP RETURN"|
00000700: 3A 85 59 59 24 00 1B 0F BC 02 8F 20 4D 55 54 41 |:.YY$...... MUTA|
00000710: 54 49 45 2D 52 4F 55 54 49 4E 45 00 26 0F C6 02 |TIE-ROUTINE.&...|
00000720: 8D 20 31 36 38 30 00 4A 0F D0 02 8F 20 53 4F 52 |. 1680.J.... SOR|
00000730: 54 45 52 45 4E 20 56 41 4E 20 4E 49 45 55 57 45 |TEREN VAN NIEUWE|
00000740: 20 44 49 52 45 43 54 4F 52 59 00 5F 0F DA 02 9E | DIRECTORY._....|
00000750: 34 39 31 35 32 2C 42 42 2C 42 42 24 28 31 29 00 |49152,BB,BB$(1).|
00000760: 85 0F E4 02 8F 20 44 49 53 4B 2D 49 44 20 4F 50 |..... DISK-ID OP|
00000770: 48 41 4C 45 4E 20 56 41 4E 20 4E 49 45 55 57 45 |HALEN VAN NIEUWE|
00000780: 20 46 4C 4F 50 00 9B 0F EE 02 44 31 24 B2 CA 28 | FLOP.....D1$..(|
00000790: 42 42 24 28 32 29 2C 31 2C 32 29 00 B9 0F F8 02 |BB$(2),1,2).....|
000007A0: 8F 20 5A 4F 45 4B 45 4E 20 4E 41 41 52 20 4F 55 |. ZOEKEN NAAR OU|
000007B0: 44 45 20 46 4C 4F 50 50 59 00 C6 0F 02 03 81 49 |DE FLOPPY......I|
000007C0: 58 B2 31 A4 41 41 00 DD 0F 0C 03 44 32 24 B2 CA |X.1.AA.....D2$..|
000007D0: 28 41 41 24 28 49 58 29 2C 31 2C 32 29 00 EE 0F |(AA$(IX),1,2)...|
000007E0: 16 03 8B 44 31 24 B2 44 32 24 A7 38 33 30 00 F7 |...D1$.D2$.830..|
000007F0: 0F 20 03 82 20 49 58 00 15 10 2A 03 8F 20 4E 49 |. .. IX...*.. NI|
00000800: 45 55 57 45 20 46 4C 4F 50 50 59 20 54 4F 45 56 |EUWE FLOPPY TOEV|
00000810: 4F 45 47 45 4E 00 1F 10 34 03 89 20 38 39 30 00 |OEGEN...4.. 890.|
00000820: 44 10 3E 03 8F 20 4F 55 44 45 20 46 4C 4F 50 50 |D.>.. OUDE FLOPP|
00000830: 59 20 47 45 56 4F 4E 44 45 4E 20 4E 55 20 57 49 |Y GEVONDEN NU WI|
00000840: 53 53 45 4E 00 5F 10 48 03 41 41 24 28 49 58 29 |SSEN._.H.AA$(IX)|
00000850: B2 22 5A 5A 5A 5A 22 AA 41 41 24 28 49 58 29 00 |."ZZZZ".AA$(IX).|
00000860: 73 10 52 03 49 58 B2 49 58 AA 31 3A 43 43 B2 43 |s.R.IX.IX.1:CC.C|
00000870: 43 AA 31 00 8F 10 5C 03 8B 44 31 24 B2 CA 28 41 |C.1...\..D1$..(A|
00000880: 41 24 28 49 58 29 2C 31 2C 32 29 A7 38 34 30 00 |A$(IX),1,2).840.|
00000890: B0 10 66 03 8F 20 43 43 3D 41 41 4E 54 41 4C 20 |..f.. CC=AANTAL |
000008A0: 56 45 52 56 41 4C 4C 45 4E 20 52 45 47 45 4C 53 |VERVALLEN REGELS|
000008B0: 00 BC 10 70 03 43 43 B2 43 43 AB 31 00 DE 10 7A |...p.CC.CC.1...z|
000008C0: 03 8F 20 4E 41 4D 45 4E 20 49 4E 20 47 52 4F 54 |.. NAMEN IN GROT|
000008D0: 45 20 54 41 42 45 4C 20 5A 45 54 54 45 4E 00 EA |E TABEL ZETTEN..|
000008E0: 10 84 03 81 49 B2 31 A4 42 42 00 F6 10 8E 03 41 |....I.1.BB.....A|
000008F0: 41 B2 41 41 AA 31 00 09 11 98 03 41 41 24 28 41 |A.AA.1.....AA$(A|
00000900: 41 29 B2 42 42 24 28 49 29 00 19 11 A2 03 99 41 |A).BB$(I)......A|
00000910: 41 3B 41 41 24 28 41 41 29 00 20 11 AC 03 82 49 |A;AA$(AA). ....I|
00000920: 00 2F 11 B6 03 8F 20 53 4F 52 54 45 52 45 4E 00 |./.... SORTEREN.|
00000930: 44 11 C0 03 9E 34 39 31 35 32 2C 41 41 2C 41 41 |D....49152,AA,AA|
00000940: 24 28 31 29 00 56 11 CA 03 41 41 B2 41 41 AB 43 |$(1).V...AA.AA.C|
00000950: 43 3A 43 43 B2 30 00 82 11 D4 03 99 3A 85 22 4E |C:CC.0......:."N|
00000960: 4F 47 20 45 45 4E 20 44 49 52 45 43 54 4F 52 59 |OG EEN DIRECTORY|
00000970: 20 4C 45 5A 45 4E 20 28 4A 2F 4E 29 20 22 3B 44 | LEZEN (J/N) ";D|
00000980: 44 24 00 96 11 DE 03 8B 44 44 24 B2 22 4E 22 20 |D$......DD$."N" |
00000990: A7 20 31 30 33 30 00 C9 11 E8 03 99 22 56 45 52 |. 1030......"VER|
000009A0: 57 49 53 53 45 4C 20 46 4C 4F 50 50 59 20 45 4E |WISSEL FLOPPY EN|
000009B0: 20 44 52 55 4B 20 4F 50 20 52 45 54 55 52 4E 20 | DRUK OP RETURN |
000009C0: 22 3B 3A 85 58 58 24 3A 99 00 E4 11 F2 03 8B 4B |";:.XX$:.......K|
000009D0: 24 B2 22 32 22 20 B0 20 4B 24 B2 22 34 22 20 A7 |$."2" . K$."4" .|
000009E0: 20 37 31 30 00 ED 11 FC 03 89 35 33 30 00 F6 11 | 710......530...|
000009F0: 06 04 99 22 93 22 00 1E 12 10 04 8B 4B 24 B2 22 |..."."......K$."|
00000A00: 31 22 20 B0 20 4B 24 B2 22 34 22 20 A7 20 9E 34 |1" . K$."4" . .4|
00000A10: 39 31 35 32 2C 41 41 2C 41 41 24 28 31 29 00 39 |9152,AA,AA$(1).9|
00000A20: 12 1A 04 8B 4B 24 B2 22 33 22 20 B0 20 4B 24 B2 |....K$."3" . K$.|
00000A30: 22 36 22 20 A7 31 39 31 30 00 6A 12 24 04 99 22 |"6" .1910.j.$.."|
00000A40: 43 4F 4E 54 52 4F 4C 45 45 52 20 4F 46 20 44 45 |CONTROLEER OF DE|
00000A50: 20 4A 55 49 53 54 45 20 46 4C 4F 50 50 59 2F 43 | JUISTE FLOPPY/C|
00000A60: 41 53 53 45 54 54 45 22 3A 99 00 99 12 2E 04 99 |ASSETTE":.......|
00000A70: 22 49 4E 20 48 45 54 20 41 50 50 41 52 41 41 54 |"IN HET APPARAAT|
00000A80: 20 5A 49 54 2C 20 54 4F 45 54 53 20 44 41 4E 20 | ZIT, TOETS DAN |
00000A90: 27 4A 41 27 20 49 4E 2E 22 00 B2 12 38 04 85 20 |'JA' IN."...8.. |
00000AA0: 4A 41 24 3A 8B 4A 41 24 B2 22 4A 41 22 A7 31 31 |JA$:.JA$."JA".11|
00000AB0: 31 30 00 BD 12 42 04 89 20 31 30 33 30 00 D9 12 |10...B.. 1030...|
00000AC0: 4C 04 8F 20 4E 41 41 52 20 46 4C 4F 50 50 59 20 |L.. NAAR FLOPPY |
00000AD0: 53 43 48 52 49 4A 56 45 4E 00 04 13 56 04 8B 4B |SCHRIJVEN...V..K|
00000AE0: 24 B3 22 34 22 A7 20 9F 31 2C 38 2C 32 2C 22 40 |$."4". .1,8,2,"@|
00000AF0: 30 3A 22 AA 4D 4E 24 AA 22 2C 53 2C 57 22 3A 89 |0:".MN$.",S,W":.|
00000B00: 31 31 34 30 00 1E 13 60 04 8F 20 4E 41 41 52 20 |1140...`.. NAAR |
00000B10: 54 41 50 45 20 53 43 48 52 49 4A 56 45 4E 00 2E |TAPE SCHRIJVEN..|
00000B20: 13 6A 04 9F 20 31 2C 31 2C 32 2C 4D 4E 24 00 3A |.j.. 1,1,2,MN$.:|
00000B30: 13 74 04 81 58 B2 31 A4 41 41 00 50 13 7E 04 8B |.t..X.1.AA.P.~..|
00000B40: C3 28 41 41 24 28 58 29 29 B2 30 A7 31 32 30 30 |.(AA$(X)).0.1200|
00000B50: 00 70 13 88 04 8B CA 28 41 41 24 28 58 29 2C 31 |.p.....(AA$(X),1|
00000B60: 2C 34 29 B2 22 5A 5A 5A 5A 22 A7 20 31 32 30 30 |,4)."ZZZZ". 1200|
00000B70: 00 90 13 92 04 8B CA 28 41 41 24 28 58 29 2C 31 |.......(AA$(X),1|
00000B80: 2C 34 29 B2 22 20 20 20 20 22 A7 20 31 32 30 30 |,4)." ". 1200|
00000B90: 00 A3 13 9C 04 41 42 24 B2 53 52 24 AA 41 41 24 |.....AB$.SR$.AA$|
00000BA0: 28 58 29 00 AE 13 A6 04 98 31 2C 41 42 24 00 B6 |(X)......1,AB$..|
00000BB0: 13 B0 04 82 20 58 00 D2 13 BA 04 8F 20 53 4C 55 |.... X...... SLU|
00000BC0: 49 54 45 4E 20 56 41 4E 20 42 45 53 54 41 4E 44 |ITEN VAN BESTAND|
00000BD0: 45 4E 00 D9 13 C4 04 A0 31 00 E3 13 CE 04 89 31 |EN......1......1|
00000BE0: 39 31 30 00 F4 13 D8 04 8F 20 4B 4F 50 52 4F 55 |910...... KOPROU|
00000BF0: 54 49 4E 45 00 05 14 E2 04 81 49 31 B2 31 A4 34 |TINE......I1.1.4|
00000C00: 3A 98 34 3A 82 00 39 14 EC 04 98 34 2C 22 20 20 |:.4:..9....4," |
00000C10: 42 4C 4F 4B 4B 45 4E 20 20 20 50 52 4F 47 52 41 |BLOKKEN PROGRA|
00000C20: 4D 4D 41 4E 41 41 4D 20 20 20 20 20 20 20 20 20 |MMANAAM |
00000C30: 44 49 53 4B 2D 49 44 22 3B 00 45 14 F6 04 42 4E |DISK-ID";.E...BN|
00000C40: B2 42 4E AA 31 00 5C 14 00 05 98 34 2C 22 20 20 |.BN.1.\....4," |
00000C50: 20 42 4C 41 44 4E 52 2E 22 3B 42 4E 00 63 14 0A | BLADNR.";BN.c..|
00000C60: 05 98 34 00 69 14 14 05 8E 00 90 14 1E 05 8F 20 |..4.i.......... |
00000C70: 4C 45 45 53 20 52 4F 55 54 49 4E 45 20 56 41 4E |LEES ROUTINE VAN|
00000C80: 20 46 4C 4F 50 50 59 2F 43 41 53 53 45 54 54 45 | FLOPPY/CASSETTE|
00000C90: 00 9B 14 28 05 84 31 2C 52 52 24 00 AE 14 32 05 |...(..1,RR$...2.|
00000CA0: 53 31 24 B2 CA 28 52 52 24 2C 31 2C 31 29 00 BF |S1$..(RR$,1,1)..|
00000CB0: 14 3C 05 8B 4E 46 24 B2 22 22 A7 31 33 38 30 00 |.<..NF$."".1380.|
00000CC0: E1 14 46 05 8B 53 31 24 B2 22 31 22 A7 46 31 24 |..F..S1$."1".F1$|
00000CD0: B2 CA 28 52 52 24 2C 32 2C 32 29 3A 89 31 33 37 |..(RR$,2,2):.137|
00000CE0: 30 00 EB 14 50 05 89 31 33 38 30 00 11 15 5A 05 |0...P..1380...Z.|
00000CF0: 8B 4E 46 24 B2 46 31 24 A7 99 22 56 45 52 56 41 |.NF$.F1$.."VERVA|
00000D00: 4C 4C 45 4E 3A 20 22 3B 52 52 24 3A 89 31 35 30 |LLEN: ";RR$:.150|
00000D10: 30 00 31 15 64 05 41 41 B2 41 41 AA 31 3A 41 41 |0.1.d.AA.AA.1:AA|
00000D20: 24 28 41 41 29 B2 CA 28 52 52 24 2C 32 2C 33 31 |$(AA)..(RR$,2,31|
00000D30: 29 00 44 15 6E 05 8B 53 52 24 B2 53 31 24 A7 20 |).D.n..SR$.S1$. |
00000D40: 31 34 39 30 00 57 15 78 05 8B 53 52 24 B2 22 32 |1490.W.x..SR$."2|
00000D50: 22 A7 20 31 34 35 30 00 6F 15 82 05 58 31 24 B2 |". 1450.o...X1$.|
00000D60: CA 28 41 41 24 28 41 41 29 2C 32 39 2C 33 29 00 |.(AA$(AA),29,3).|
00000D70: 87 15 8C 05 58 32 24 B2 CA 28 41 41 24 28 41 41 |....X2$..(AA$(AA|
00000D80: 29 2C 31 2C 32 31 29 00 9F 15 96 05 58 33 24 B2 |),1,21).....X3$.|
00000D90: CA 28 41 41 24 28 41 41 29 2C 32 34 2C 33 29 00 |.(AA$(AA),24,3).|
00000DA0: AA 15 A0 05 89 20 31 34 38 30 00 C2 15 AA 05 58 |..... 1480.....X|
00000DB0: 31 24 B2 CA 28 41 41 24 28 41 41 29 2C 36 2C 32 |1$..(AA$(AA),6,2|
00000DC0: 31 29 00 DA 15 B4 05 58 32 24 B2 CA 28 41 41 24 |1).....X2$..(AA$|
00000DD0: 28 41 41 29 2C 32 39 2C 33 29 00 F1 15 BE 05 58 |(AA),29,3).....X|
00000DE0: 33 24 B2 CA 28 41 41 24 28 41 41 29 2C 31 2C 33 |3$..(AA$(AA),1,3|
00000DF0: 29 00 13 16 C8 05 41 41 24 28 41 41 29 B2 58 31 |).....AA$(AA).X1|
00000E00: 24 AA 22 20 20 22 AA 58 32 24 AA 22 20 20 22 AA |$." ".X2$." ".|
00000E10: 58 33 24 00 20 16 D2 05 99 41 41 24 28 41 41 29 |X3$. ....AA$(AA)|
00000E20: 00 30 16 DC 05 8B 53 54 B2 30 A7 20 31 33 31 30 |.0....ST.0. 1310|
00000E30: 00 45 16 E6 05 8B 53 54 B2 36 34 A7 20 A0 31 3A |.E....ST.64. .1:|
00000E40: 89 31 36 37 30 00 59 16 F0 05 99 22 50 52 4F 42 |.1670.Y...."PROB|
00000E50: 4C 45 4D 45 4E 2E 22 3A 99 00 66 16 FA 05 9F 31 |LEMEN.":..f....1|
00000E60: 35 2C 38 2C 31 35 00 7E 16 04 06 84 31 35 2C 5A |5,8,15.~....15,Z|
00000E70: 31 24 2C 5A 32 24 2C 5A 33 24 2C 5A 34 24 00 97 |1$,Z2$,Z3$,Z4$..|
00000E80: 16 0E 06 99 5A 31 24 2C 5A 32 24 2C 5A 33 24 2C |....Z1$,Z2$,Z3$,|
00000E90: 5A 34 24 3A A0 31 35 00 9D 16 18 06 99 00 CE 16 |Z4$:.15.........|
00000EA0: 22 06 99 3A 99 22 57 49 4C 20 4A 45 20 4D 45 54 |"..:."WIL JE MET|
00000EB0: 20 45 45 4E 20 41 4E 44 45 52 45 20 46 4C 4F 50 | EEN ANDERE FLOP|
00000EC0: 50 59 20 44 4F 4F 52 47 41 41 4E 22 3A 99 00 F9 |PY DOORGAAN":...|
00000ED0: 16 2C 06 99 22 4F 46 20 57 49 4C 20 4A 45 20 53 |.,.."OF WIL JE S|
00000EE0: 54 4F 50 50 45 4E 20 28 44 2F 53 20 49 4E 54 4F |TOPPEN (D/S INTO|
00000EF0: 45 54 53 45 4E 2E 29 22 3B 00 0F 17 36 06 A1 5A |ETSEN.)";...6..Z|
00000F00: 5A 24 3A 8B 5A 5A 24 B2 22 22 A7 31 35 39 30 00 |Z$:.ZZ$."".1590.|
00000F10: 32 17 40 06 99 5A 5A 24 3A 8B 5A 5A 24 B2 22 44 |2.@..ZZ$:.ZZ$."D|
00000F20: 22 20 B0 20 5A 5A 24 B2 22 53 22 20 A7 20 31 36 |" . ZZ$."S" . 16|
00000F30: 32 30 00 3C 17 4A 06 89 31 35 37 30 00 4E 17 54 |20.<.J..1570.N.T|
00000F40: 06 A0 31 3A 8B 5A 5A 24 B2 22 53 22 A7 80 00 6C |..1:.ZZ$."S"...l|
00000F50: 17 5E 06 8B 4B 24 B3 22 34 22 A7 20 9F 31 2C 38 |.^..K$."4". .1,8|
00000F60: 2C 32 2C 4E 4D 24 3A 89 31 36 35 30 00 84 17 68 |,2,NM$:.1650...h|
00000F70: 06 8B 4B 24 B3 22 37 22 A7 20 9F 31 2C 31 2C 30 |..K$."7". .1,1,0|
00000F80: 2C 4E 4D 24 00 8D 17 72 06 99 22 93 22 00 96 17 |,NM$...r.."."...|
00000F90: 7C 06 89 39 38 30 00 9C 17 86 06 8E 00 B2 17 90 ||..980..........|
00000FA0: 06 8F 20 44 49 52 45 43 54 4F 52 59 20 4C 45 5A |.. DIRECTORY LEZ|
00000FB0: 45 4E 00 DC 17 9A 06 9F 38 2C 38 2C 30 2C 22 24 |EN......8,8,0,"$|
00000FC0: 22 3A 47 24 B2 C7 28 33 34 29 3A 42 4C 24 B2 22 |":G$..(34):BL$."|
00000FD0: 20 22 3A 4E B2 AB 31 3A 42 42 B2 30 00 F3 17 A4 | ":N..1:BB.0....|
00000FE0: 06 A1 23 38 2C 41 24 3A 8B 41 24 B2 22 22 A7 31 |..#8,A$:.A$."".1|
00000FF0: 38 39 30 00 23 18 AE 06 4E B2 4E AA 31 3A A1 23 |890.#...N.N.1:.#|
00001000: 38 2C 41 24 3A A1 23 38 2C 41 24 3A A1 23 38 2C |8,A$:.#8,A$:.#8,|
00001010: 42 24 3A 8B 41 24 B3 B1 22 22 A7 47 25 B2 C6 28 |B$:.A$.."".G%..(|
00001020: 41 24 29 00 3F 18 B8 06 8B 42 24 B3 B1 22 22 A7 |A$).?....B$.."".|
00001030: 47 25 B2 47 25 AA C6 28 42 24 29 AC 32 35 36 00 |G%.G%..(B$).256.|
00001040: 5B 18 C2 06 4E 24 28 4E 29 B2 C9 28 22 20 20 20 |[...N$(N)..(" |
00001050: 20 22 AA C4 28 47 25 29 2C 33 29 00 77 18 CC 06 | "..(G%),3).w...|
00001060: A1 23 38 2C 41 24 3A 8B 41 24 B2 22 22 AF 4E B3 |.#8,A$:.A$."".N.|
00001070: B1 30 A7 31 38 39 30 00 88 18 D6 06 8B 41 24 B3 |.0.1890......A$.|
00001080: B1 47 24 A7 31 37 34 30 00 B0 18 E0 06 A1 23 38 |.G$.1740......#8|
00001090: 2C 41 24 3A 8B 41 24 B3 B1 47 24 A7 44 24 28 4E |,A$:.A$..G$.D$(N|
000010A0: 29 B2 44 24 28 4E 29 AA 41 24 3A 89 31 37 36 30 |).D$(N).A$:.1760|
000010B0: 00 D9 18 EA 06 44 24 28 4E 29 B2 C8 28 44 24 28 |.....D$(N)..(D$(|
000010C0: 4E 29 AA 22 20 20 20 20 20 20 20 20 20 20 20 20 |N)." |
000010D0: 20 20 20 20 22 2C 31 36 29 00 F1 18 F4 06 A1 23 | ",16)......#|
000010E0: 38 2C 41 24 3A 8B 41 24 B2 42 4C 24 A7 31 37 38 |8,A$:.A$.BL$.178|
000010F0: 30 00 2A 19 FE 06 46 24 28 4E 29 B2 41 24 3A A1 |0.*...F$(N).A$:.|
00001100: 23 38 2C 41 24 3A 46 24 28 4E 29 B2 46 24 28 4E |#8,A$:F$(N).F$(N|
00001110: 29 AA 41 24 3A A1 23 38 2C 41 24 3A 46 24 28 4E |).A$:.#8,A$:F$(N|
00001120: 29 B2 46 24 28 4E 29 AA 41 24 00 42 19 08 07 A1 |).F$(N).A$.B....|
00001130: 23 38 2C 41 24 3A 8B 41 24 B3 B1 22 22 A7 31 38 |#8,A$:.A$.."".18|
00001140: 30 30 00 55 19 12 07 8B 53 52 24 B2 22 32 22 A7 |00.U....SR$."2".|
00001150: 20 31 38 34 30 00 96 19 1C 07 8B 4E B3 B1 30 A7 | 1840......N..0.|
00001160: 42 42 B2 42 42 AA 31 3A 42 42 24 28 42 42 29 B2 |BB.BB.1:BB$(BB).|
00001170: 46 24 28 30 29 AA 22 20 20 22 AA 44 24 28 4E 29 |F$(0)." ".D$(N)|
00001180: AA 22 20 20 22 AA 46 24 28 4E 29 AA 22 20 20 22 |." ".F$(N)." "|
00001190: AA 4E 24 28 4E 29 00 A1 19 26 07 89 20 31 38 35 |.N$(N)...&.. 185|
000011A0: 30 00 E2 19 30 07 8B 4E B3 B1 30 A7 42 42 B2 42 |0...0..N..0.BB.B|
000011B0: 42 AA 31 3A 42 42 24 28 42 42 29 B2 44 24 28 4E |B.1:BB$(BB).D$(N|
000011C0: 29 AA 22 20 20 22 AA 46 24 28 4E 29 AA 22 20 20 |)." ".F$(N)." |
000011D0: 22 AA 4E 24 28 4E 29 AA 22 20 20 22 AA 46 24 28 |".N$(N)." ".F$(|
000011E0: 30 29 00 F8 19 3A 07 44 24 28 4E 29 B2 22 22 3A |0)...:.D$(N)."":|
000011F0: 4E 24 28 4E 29 B2 22 22 00 10 1A 44 07 8B C3 28 |N$(N).""...D...(|
00001200: 42 42 24 28 42 42 29 29 B2 30 A7 89 31 37 30 30 |BB$(BB)).0..1700|
00001210: 00 4A 1A 4E 07 8B 4B 24 B2 22 31 22 20 B0 20 4B |.J.N..K$."1" . K|
00001220: 24 B2 22 34 22 20 A7 41 41 B2 41 41 AA 31 3A 41 |$."4" .AA.AA.1:A|
00001230: 41 24 28 41 41 29 B2 42 42 24 28 42 42 29 3A 99 |A$(AA).BB$(BB):.|
00001240: 41 41 3B 41 41 24 28 41 41 29 00 54 1A 58 07 89 |AA;AA$(AA).T.X..|
00001250: 31 37 30 30 00 71 1A 62 07 4E B2 AB 31 3A A0 38 |1700.q.b.N..1:.8|
00001260: 3A 81 49 B2 31 A4 4E 3A 44 25 28 49 29 B2 49 3A |:.I.1.N:D%(I).I:|
00001270: 82 00 77 1A 6C 07 8E 00 95 1A 76 07 8F 20 42 4C |..w.l.....v.. BL|
00001280: 41 44 45 52 20 45 4E 20 50 52 49 4E 54 20 46 55 |ADER EN PRINT FU|
00001290: 4E 43 54 49 45 00 B2 1A 80 07 41 B2 31 3A 42 B2 |NCTIE.....A.1:B.|
000012A0: 32 30 3A 42 4C B2 31 3A 8B 42 B1 41 41 A7 42 B2 |20:BL.1:.B.AA.B.|
000012B0: 41 41 00 BD 1A 8A 07 8D 20 32 34 31 30 00 F2 1A |AA...... 2410...|
000012C0: 94 07 99 22 13 9E 42 4C 4B 20 4E 41 41 4D 20 56 |..."..BLK NAAM V|
000012D0: 41 4E 20 50 52 4F 47 52 41 4D 4D 41 20 20 20 20 |AN PROGRAMMA |
000012E0: 49 44 20 20 42 4C 41 44 22 3B 42 4C 3B 22 9A 22 |ID BLAD";BL;"."|
000012F0: 3A 99 00 12 1B 9E 07 8F 20 41 46 44 52 55 4B 4B |:....... AFDRUKK|
00001300: 45 4E 20 54 41 42 45 4C 20 4F 50 20 53 43 48 45 |EN TABEL OP SCHE|
00001310: 52 4D 00 1D 1B A8 07 8D 20 32 31 39 30 00 32 1B |RM...... 2190.2.|
00001320: B2 07 A1 41 24 3A 8B 41 24 B2 22 22 A7 20 31 39 |...A$:.A$."". 19|
00001330: 37 30 00 53 1B BC 07 5A B2 C6 28 41 24 29 AB 31 |70.S...Z..(A$).1|
00001340: 33 32 3A 8B 5A B3 31 20 B0 20 5A B1 38 20 A7 31 |32:.Z.1 . Z.8 .1|
00001350: 39 37 30 00 61 1B C6 07 8B 5A B1 34 A7 31 39 37 |970.a....Z.4.197|
00001360: 30 00 7D 1B D0 07 91 5A 20 89 32 30 32 30 2C 32 |0.}....Z .2020,2|
00001370: 30 37 30 2C 32 31 30 30 2C 32 31 37 30 00 92 1B |070,2100,2170...|
00001380: DA 07 8F 20 54 45 52 55 47 20 42 4C 41 44 45 52 |... TERUG BLADER|
00001390: 45 4E 00 A7 1B E4 07 41 B2 41 AB 32 30 3A 8B 41 |EN.....A.A.20:.A|
000013A0: B3 31 20 A7 41 B2 31 00 BE 1B EE 07 42 4C B2 42 |.1 .A.1.....BL.B|
000013B0: 4C AB 31 3A 8B 42 4C B3 31 A7 42 4C B2 31 00 D4 |L.1:.BL.1.BL.1..|
000013C0: 1B F8 07 42 B2 41 AA 32 30 3A 8B 42 B1 41 41 A7 |...B.A.20:.B.AA.|
000013D0: 42 B2 41 41 00 DE 1B 02 08 89 31 39 33 30 00 F5 |B.AA......1930..|
000013E0: 1B 0C 08 8F 20 56 4F 4F 52 55 49 54 20 42 4C 41 |.... VOORUIT BLA|
000013F0: 44 45 52 45 4E 00 15 1C 16 08 41 B2 41 AA 32 30 |DEREN.....A.A.20|
00001400: 3A 8B 41 B1 41 41 A7 41 B2 41 AB 32 30 3A 99 3A |:.A.AA.A.A.20:.:|
00001410: 89 32 30 34 30 00 21 1C 20 08 42 4C B2 42 4C AA |.2040.!. .BL.BL.|
00001420: 31 00 2B 1C 2A 08 89 32 30 34 30 00 46 1C 34 08 |1.+.*..2040.F.4.|
00001430: 8F 20 41 46 44 52 55 4B 4B 45 4E 20 4F 50 20 50 |. AFDRUKKEN OP P|
00001440: 52 49 4E 54 45 52 00 6C 1C 3E 08 99 22 93 22 3A |RINTER.l.>..".":|
00001450: 99 22 56 41 4E 41 46 20 57 45 4C 4B 45 20 42 4C |."VANAF WELKE BL|
00001460: 5A 20 50 52 49 4E 54 45 4E 20 22 3B 00 87 1C 48 |Z PRINTEN ";...H|
00001470: 08 85 42 50 3A 8B 42 50 B1 28 41 41 AD 32 30 29 |..BP:.BP.(AA.20)|
00001480: AA 31 A7 32 31 31 30 00 96 1C 52 08 8B 42 50 B3 |.1.2110...R..BP.|
00001490: 31 A7 42 50 B2 31 00 A6 1C 5C 08 41 B2 28 42 50 |1.BP.1...\.A.(BP|
000014A0: AB 31 29 AC 32 30 00 CB 1C 66 08 9F 34 2C 34 3A |.1).20...f..4,4:|
000014B0: 9D 34 3A 41 4E 24 B2 22 31 22 3A 52 47 B2 36 30 |.4:AN$."1":RG.60|
000014C0: 3A 8D 31 32 34 30 3A 42 B2 41 41 00 E6 1C 70 08 |:.1240:B.AA...p.|
000014D0: 8D 32 31 39 30 3A A0 34 3A 41 4E 24 B2 22 30 22 |.2190:.4:AN$."0"|
000014E0: 3A 89 31 39 31 30 00 F4 1C 7A 08 8F 20 53 54 4F |:.1910...z.. STO|
000014F0: 50 50 45 4E 00 FC 1C 84 08 9C 3A 80 00 19 1D 8E |PPEN......:.....|
00001500: 08 8F 20 50 52 49 4E 54 20 4F 50 20 53 43 48 45 |.. PRINT OP SCHE|
00001510: 52 4D 2F 50 41 50 49 45 52 00 24 1D 98 08 81 58 |RM/PAPIER.$....X|
00001520: B2 41 A4 42 00 3A 1D A2 08 8B C3 28 41 41 24 28 |.A.B.:.....(AA$(|
00001530: 58 29 29 B2 30 A7 32 33 38 30 00 5A 1D AC 08 8B |X)).0.2380.Z....|
00001540: CA 28 41 41 24 28 58 29 2C 31 2C 34 29 B2 22 5A |.(AA$(X),1,4)."Z|
00001550: 5A 5A 5A 22 A7 20 32 33 38 30 00 7A 1D B6 08 8B |ZZZ". 2380.z....|
00001560: CA 28 41 41 24 28 58 29 2C 31 2C 34 29 B2 22 20 |.(AA$(X),1,4)." |
00001570: 20 20 20 22 A7 20 32 33 38 30 00 8E 1D C0 08 8B | ". 2380......|
00001580: 20 53 52 24 B2 22 31 22 20 A7 32 32 39 30 00 A4 | SR$."1" .2290..|
00001590: 1D CA 08 41 24 B2 CA 28 41 41 24 28 58 29 2C 32 |...A$..(AA$(X),2|
000015A0: 34 2C 33 29 00 BA 1D D4 08 42 24 B2 CA 28 41 41 |4,3).....B$..(AA|
000015B0: 24 28 58 29 2C 31 2C 32 31 29 00 D0 1D DE 08 43 |$(X),1,21).....C|
000015C0: 24 B2 CA 28 41 41 24 28 58 29 2C 32 39 2C 33 29 |$..(AA$(X),29,3)|
000015D0: 00 DA 1D E8 08 89 32 33 32 30 00 F0 1D F2 08 41 |......2320.....A|
000015E0: 24 B2 CA 28 41 41 24 28 58 29 2C 32 39 2C 33 29 |$..(AA$(X),29,3)|
000015F0: 00 06 1E FC 08 42 24 B2 CA 28 41 41 24 28 58 29 |.....B$..(AA$(X)|
00001600: 2C 36 2C 32 31 29 00 1B 1E 06 09 43 24 B2 CA 28 |,6,21).....C$..(|
00001610: 41 41 24 28 58 29 2C 31 2C 33 29 00 51 1E 10 09 |AA$(X),1,3).Q...|
00001620: 8B 41 4E 24 B2 22 31 22 A7 20 98 34 2C 22 20 20 |.AN$."1". .4," |
00001630: 20 22 AA 41 24 AA 22 20 20 20 20 20 20 22 AA 42 | ".A$." ".B|
00001640: 24 AA 22 20 20 20 20 22 AA 43 24 3A 89 32 33 35 |$." ".C$:.235|
00001650: 30 00 67 1E 1A 09 99 41 24 AA 22 20 22 AA 42 24 |0.g....A$." ".B$|
00001660: AA 22 20 22 AA 43 24 00 7A 1E 24 09 8B 41 4E 24 |." ".C$.z.$..AN$|
00001670: B3 B1 22 31 22 A7 32 33 37 30 00 88 1E 2E 09 59 |.."1".2370.....Y|
00001680: B2 B5 28 58 AD 52 47 29 00 9A 1E 38 09 8B 59 AC |..(X.RG)...8..Y.|
00001690: 52 47 B3 B1 58 A7 32 33 38 30 00 BB 1E 42 09 8B |RG..X.2380...B..|
000016A0: 41 4E 24 B2 22 31 22 A7 20 81 59 B2 31 A4 36 3A |AN$."1". .Y.1.6:|
000016B0: 98 34 3A 82 3A 8D 20 31 32 34 30 00 C3 1E 4C 09 |.4:.:. 1240...L.|
000016C0: 82 20 58 00 EB 1E 56 09 8B 58 B1 41 41 A7 99 3A |. X...V..X.AA..:|
000016D0: 99 22 20 20 20 12 9E 4C 41 41 54 53 54 45 20 42 |." ..LAATSTE B|
000016E0: 4C 41 44 5A 49 4A 44 45 92 9A 22 00 F1 1E 60 09 |LADZIJDE.."...`.|
000016F0: 8E 00 0C 1F 6A 09 8F 20 50 52 49 4E 54 20 46 55 |....j.. PRINT FU|
00001700: 4E 4B 54 49 45 54 4F 45 54 53 45 4E 00 17 1F 74 |NKTIETOETSEN...t|
00001710: 09 99 22 93 22 3A 99 00 2A 1F 7E 09 99 A3 33 31 |..".":..*.~...31|
00001720: 29 22 9E 12 20 46 31 20 92 22 00 3C 1F 88 09 99 |)".. F1 .".<....|
00001730: A3 33 31 29 22 9E 54 45 52 55 47 22 00 51 1F 92 |.31)".TERUG".Q..|
00001740: 09 99 A3 33 31 29 22 9E 42 4C 41 44 45 52 45 4E |...31)".BLADEREN|
00001750: 22 00 64 1F 9C 09 99 A3 33 31 29 22 11 11 12 20 |".d.....31)"... |
00001760: 46 33 20 22 00 77 1F A6 09 99 A3 33 31 29 22 56 |F3 ".w.....31)"V|
00001770: 4F 4F 52 55 49 54 22 00 8B 1F B0 09 99 A3 33 31 |OORUIT".......31|
00001780: 29 22 42 4C 41 44 45 52 45 4E 22 00 9E 1F BA 09 |)"BLADEREN".....|
00001790: 99 A3 33 31 29 22 11 11 12 20 46 35 20 22 00 B2 |..31)"... F5 "..|
000017A0: 1F C4 09 99 A3 33 31 29 22 4E 41 41 52 20 44 45 |.....31)"NAAR DE|
000017B0: 20 22 00 C6 1F CE 09 99 A3 33 31 29 22 50 52 49 | ".......31)"PRI|
000017C0: 4E 54 45 52 20 22 00 DA 1F D8 09 99 A3 33 31 29 |NTER ".......31)|
000017D0: 22 11 11 12 20 46 37 20 92 22 00 EB 1F E2 09 99 |"... F7 ."......|
000017E0: A3 33 31 29 22 53 54 4F 50 9A 22 00 F1 1F EC 09 |.31)"STOP.".....|
000017F0: 8E 00 09 20 F6 09 8F 20 46 4C 4F 50 50 59 20 56 |... ... FLOPPY V|
00001800: 45 52 57 59 44 45 52 45 4E 00 2C 20 00 0A 99 22 |ERWYDEREN., ..."|
00001810: 93 46 4C 4F 50 50 59 20 20 56 45 52 57 59 44 45 |.FLOPPY VERWYDE|
00001820: 52 45 4E 20 28 4A 2F 4E 29 22 3A 99 00 41 20 0A |REN (J/N)":..A .|
00001830: 0A 99 22 54 4F 45 54 53 20 4B 45 55 5A 45 3A 22 |.."TOETS KEUZE:"|
00001840: 3B 00 57 20 14 0A A1 41 4E 24 3A 8B 41 4E 24 B2 |;.W ...AN$:.AN$.|
00001850: 22 22 A7 32 35 38 30 00 60 20 1E 0A 99 41 4E 24 |"".2580.` ...AN$|
00001860: 00 72 20 28 0A 8B 41 4E 24 B2 22 4A 22 A7 32 36 |.r (..AN$."J".26|
00001870: 34 30 00 8C 20 32 0A 8B 41 4E 24 B2 22 4E 22 A7 |40.. 2..AN$."N".|
00001880: 4E 46 24 B2 22 22 3A 89 32 36 33 30 00 96 20 3C |NF$."":.2630.. <|
00001890: 0A 89 32 35 37 30 00 9C 20 46 0A 8E 00 C1 20 50 |..2570.. F.... P|
000018A0: 0A 99 3A 99 3A 99 22 54 4F 45 54 53 20 4E 55 4D |..:.:."TOETS NUM|
000018B0: 4D 45 52 20 56 41 4E 20 46 4C 4F 50 50 59 3A 22 |MER VAN FLOPPY:"|
000018C0: 3B 00 D9 20 5A 0A 85 4E 46 24 3A 8B C3 28 4E 46 |;.. Z..NF$:..(NF|
000018D0: 24 29 B1 32 A7 32 36 34 30 00 E5 20 64 0A 99 3A |$).2.2640.. d..:|
000018E0: 89 32 36 33 30 00 00 00 88 |.2630.... |
..%.D.. * SORTEREN VAN DE DIRECTORY *.B.
N.. AUTEUR:CHRIS VAN AALST.\.X.. D$ =P
ROGRAMMANAAM.T.... F$ =PRG/SEQ/REL....
.. F$(0)=DISK-ID......F.0.F.1:.170... ..
240.C....53281,0:.53280,0:.53272,21.....
."..SAMENVOEGEN, MUTEREN EN SORTEREN VAN
DIRECTORIES.":.:../...."SORTEERPROGR
AMMA AL GELADEN (J/N)";.B.H..A$:.A$."".2
00.I.R..A$:.A$."J" . A$."N" . 220 ELSE11
6.|.... A$."J" . 240......"SORT49152",8,
1.I....AA$(1000),D$(128),F$(128),D%(128)
,N$(128),BB$(128).R...N..1......".".....
.".SAMENVOEGEN, SORTEREN EN PRINTEN VAN
DE DIRECTORIES.":.:.._...."1=LEZEN VAN D
E DIRECTORIES EN NAAR FLOPPY SCHR
YVEN":....".."2=MUTEREN VAN RECORDS OP F
LOPPY":....,.."3=SORTEREN VAN RECORDS OP
FLOPPY":....6.."4=LEZEN VAN DE DIRECTOR
IES EN NAAR TAPE SCHRYVEN":....@.
."5=MUTEREN VAN RECORDS OP TAPE":..D.J..
"6=SORTEREN VAN RECORDS OP TAPE":.:..Y.T
.."TOETS KEUZE:";.M.^.. K$:.K$."".350.U.
H..K$...R..K$."0" . K$."7" . 390...|..34
0.F....:.:."TOETS NAAM INVOERBESTAND :";
:. NM$......:."TOETS NAAM UITVOERBESTAND
:";:. MN$......".".'.... K$."2" . K$."5
" . SR$."1":.2550:. 500.F...."1=SORTEREN
OP DISK-ID":..K...."2=SORTEREN OP PROGR
AMMANAAM":....B.."TOETS KEUZE IN:";...L.
.SR$:.SR$."".460...V..SR$:.SR$."1" . SR$
."2" . 450.B....:.......K$."1" . K$."4"
. 540......K$."4". .1,8,2,NM$:.600......
K$."7". .1,1,0,NM$:.600.2.... K$=1 OF 4
(CREEEREN).T....K$."1" . K$."4" . .1680:
.980......:.:."STAAN ER AL DIRECTORIES I
N HET BESTAND":....&.."'";NM$;"' (TOETS
J/N) ";...0..AN$:.AN$."".560.R.:..AN$:.A
N$."J".500...D..AN$."N".1000...N..560...
X.. LEZEN VAN RECORD FLOPPY/CASS...B.. 1
310.5.L..K$."1" . K$."4" .980.D.V.. SORT
EREN.Y....49152,AA,AA$(1)..... NA SORT
AFDRUKKEN ALS K$=3 OF 6......K$."3" . K$
."6" . 1030...... FLOPPY WISSELEN......"
.":."STOP DE TE VERWERKEN FLOPPY IN DE D
RIVE":......."EN DRUK OP RETURN":.YY$...
... MUTATIE-ROUTINE.&.F.. 1680.J.P.. SOR
TEREN VAN NIEUWE DIRECTORY._.Z..49152,BB
,BB$(1)...... DISK-ID OPHALEN VAN NIEUWE
FLOP.....D1$.J(BB$(2),1,2)...... ZOEKEN
NAAR OUDE FLOPPY.F....IX.1.AA.....D2$.J
(AA$(IX),1,2)......D1$.D2$.830... .. IX.
..*.. NIEUWE FLOPPY TOEVOEGEN...4.. 890.
D.>.. OUDE FLOPPY GEVONDEN NU WISSEN._.H
.AA$(IX)."ZZZZ".AA$(IX).S.R.IX.IX.1:CC.C
C.1...\..D1$.J(AA$(IX),1,2).840...F.. CC
=AANTAL VERVALLEN REGELS...P.CC.CC.1...Z
.. NAMEN IN GROTE TABEL ZETTEN......I.1.
BB.....AA.AA.1.....AA$(AA).BB$(I)......A
A;AA$(AA). ....I./.... SORTEREN.D....491
52,AA,AA$(1).V.J.AA.AA.CC:CC.0...T..:."N
OG EEN DIRECTORY LEZEN (J/N) ";DD$......
DD$."N" . 1030.I...."VERWISSEL FLOPPY EN
DRUK OP RETURN ";:.XX$:.......K$."2" .
K$."4" . 710......530......"."......K$."
1" . K$."4" . .49152,AA,AA$(1).9....K$."
3" . K$."6" .1910.J.$.."CONTROLEER OF DE
JUISTE FLOPPY/CASSETTE":......."IN HET
APPARAAT ZIT, TOETS DAN 'JA' IN."...8..
JA$:.JA$."JA".1110...B.. 1030.Y.L.. NAAR
FLOPPY SCHRIJVEN...V..K$."4". .1,8,2,"@
0:".MN$.",S,W":.1140...`.. NAAR TAPE SCH
RIJVEN...J.. 1,1,2,MN$.:.T..X.1.AA.P.~..
C(AA$(X)).0.1200.P....J(AA$(X),1,4)."ZZZ
Z". 1200......J(AA$(X),1,4)." ". 1200
.....AB$.SR$.AA$(X)......1,AB$...... X.R
.... SLUITEN VAN BESTANDEN.Y.D. 1...N..1
910...X.. KOPROUTINE......I1.1.4:.4:..9.
...4," BLOKKEN PROGRAMMANAAM
DISK-ID";.E...BN.BN.1.\....4," BLADNR.
";BN.C....4.I.......... LEES ROUTINE VAN
FLOPPY/CASSETTE...(..1,RR$...2.S1$.J(RR
$,1,1)...<..NF$."".1380...F..S1$."1".F1$
.J(RR$,2,2):.1370...P..1380...Z..NF$.F1$
.."VERVALLEN: ";RR$:.1500.1.D.AA.AA.1:AA
$(AA).J(RR$,2,31).D.N..SR$.S1$. 1490.W.X
..SR$."2". 1450.O...X1$.J(AA$(AA),29,3).
....X2$.J(AA$(AA),1,21).....X3$.J(AA$(AA
),24,3)... .. 1480.B...X1$.J(AA$(AA),6,2
1).Z...X2$.J(AA$(AA),29,3).....X3$.J(AA$
(AA),1,3)...H.AA$(AA).X1$." ".X2$." ".
X3$. .R..AA$(AA).0....ST.0. 1310.E....ST
.64. 1:.1670.Y...."PROBLEMEN.":..F....1
5,8,15.~....15,Z1$,Z2$,Z3$,Z4$......Z1$,
Z2$,Z3$,Z4$: 15.......N."..:."WIL JE MET
EEN ANDERE FLOPPY DOORGAAN":....,.."OF
WIL JE STOPPEN (D/S INTOETSEN.)";...6..Z
Z$:.ZZ$."".1590.2.@..ZZ$:.ZZ$."D" . ZZ$.
"S" . 1620.<.J..1570.N.T. 1:.ZZ$."S"...L
.^..K$."4". .1,8,2,NM$:.1650...H..K$."7"
. .1,1,0,NM$...R.."."...|..980..........
.. DIRECTORY LEZEN......8,8,0,"$":G$.G(3
4):BL$." ":N..1:BB.0......#8,A$:.A$."".1
890.#...N.N.1:.#8,A$:.#8,A$:.#8,B$:.A$..
"".G%.F(A$).?....B$.."".G%.G%.F(B$).256.
[.B.N$(N).I(" ".D(G%),3).W.L..#8,A$:.
A$."".N..0.1890...V..A$..G$.1740......#8
,A$:.A$..G$.D$(N).D$(N).A$:.1760.Y...D$(
N).H(D$(N)." ",16)......#
8,A$:.A$.BL$.1780.*...F$(N).A$:.#8,A$:F$
(N).F$(N).A$:.#8,A$:F$(N).F$(N).A$.B....
#8,A$:.A$.."".1800.U....SR$."2". 1840...
...N..0.BB.BB.1:BB$(BB).F$(0)." ".D$(N)
." ".F$(N)." ".N$(N)...&.. 1850...0..N
..0.BB.BB.1:BB$(BB).D$(N)." ".F$(N)."
".N$(N)." ".F$(0)...:.D$(N)."":N$(N).""
...D..C(BB$(BB)).0..1700.J.N..K$."1" . K
$."4" .AA.AA.1:AA$(AA).BB$(BB):.AA;AA$(A
A).T.X..1700.Q.B.N..1: 8:.I.1.N:D%(I).I:
..W.L.....V.. BLADER EN PRINT FUNCTIE...
..A.1:B.20:BL.1:.B.AA.B.AA...... 2410...
..."..BLK NAAM VAN PROGRAMMA ID BLAD
";BL;".":....... AFDRUKKEN TABEL OP SCHE
RM...... 2190.2....A$:.A$."". 1970.S...Z
.F(A$).132:.Z.1 . Z.8 .1970.A.F..Z.4.197
0.}.P..Z .2020,2070,2100,2170...Z.. TERU
G BLADEREN.....A.A.20:.A.1 .A.1.....BL.B
L.1:.BL.1.BL.1.T...B.A.20:.B.AA.B.AA....
..1930...... VOORUIT BLADEREN.....A.A.20
:.A.AA.A.A.20:.:.2040.!. .BL.BL.1.+.*..2
040.F.4.. AFDRUKKEN OP PRINTER.L.>..".":
."VANAF WELKE BLZ PRINTEN ";...H..BP:.BP
.(AA.20).1.2110...R..BP.1.BP.1...\.A.(BP
.1).20.K.F..4,4:.4:AN$."1":RG.60:.1240:B
.AA...P..2190: 4:AN$."0":.1910...Z.. STO
PPEN......:....... PRINT OP SCHERM/PAPIE
R.$....X.A.B.:....C(AA$(X)).0.2380.Z....
J(AA$(X),1,4)."ZZZZ". 2380.Z....J(AA$(X)
,1,4)." ". 2380...... SR$."1" .2290..
.J.A$.J(AA$(X),24,3)...T.B$.J(AA$(X),1,2
1).P...C$.J(AA$(X),29,3).Z....2320.....A
$.J(AA$(X),29,3).....B$.J(AA$(X),6,21)..
...C$.J(AA$(X),1,3).Q....AN$."1". .4,"
".A$." ".B$." ".C$:.2350.G....A
$." ".B$." ".C$.Z.$..AN$.."1".2370.....Y
..(X.RG)...8..Y.RG..X.2380...B..AN$."1".
.Y.1.6:.4:.:. 1240.C.L.. X...V..X.AA..:
." ..LAATSTE BLADZIJDE.."...`.....J..
PRINT FUNKTIETOETSEN...T..".":..*.~...31
)".. F1 .".<.....31)".TERUG".Q.....31)".
BLADEREN".D.....31)"... F3 ".W.....31)"V
OORUIT".......31)"BLADEREN".......31)"..
. F5 "...D...31)"NAAR DE ".F.N...31)"PRI
NTER ".Z.X...31)"... F7 .".......31)"STO
P."........ ... FLOPPY VERWYDEREN., ..."
.FLOPPY VERWYDEREN (J/N)":..A ..."TOETS
KEUZE:";.W ...AN$:.AN$."".2580.` ...AN$
.R (..AN$."J".2640.. 2..AN$."N".NF$."":.
2630.. <..2570.. F...A P..:.:."TOETS NUM
MER VAN FLOPPY:";.Y Z..NF$:.C(NF$).2.264
0.. D..:.2630....
> CLICK IMAGE PREVIEW FOR FULL MODAL