SUPDUM.COD.S/O
FILE INFORMATION
FILENAME(S): SUPDUM.COD.S/O
FILE TYPE(S): PRG
FILE SIZE: 5.3K
FIRST SEEN: 2025-11-30 21:26:12
APPEARS ON: 1 disk(s)
FILE HASH
56b1fb73b2b73bd31ac03b5484572bf3cf29a12ace1af3235e6d3caee08ed698
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DEMO 2 | SUPDUM.COD.S/O | PRG | DuncanTwain | 21 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 38 08 01 00 89 20 31 30 20 20 3A 8F 20 20 |..8.... 10 :. |
00000010: 20 20 20 53 43 48 52 49 4A 46 54 20 4D 41 43 48 | SCHRIJFT MACH|
00000020: 49 4E 45 43 4F 44 45 20 4E 41 41 52 20 45 45 4E |INECODE NAAR EEN|
00000030: 20 53 43 48 49 4A 46 2E 00 73 08 02 00 89 20 31 | SCHIJF..s.... 1|
00000040: 30 20 20 3A 8F 20 20 20 20 20 54 41 41 4C 3A 20 |0 :. TAAL: |
00000050: 4E 4F 52 4D 41 41 4C 20 42 41 53 49 43 20 45 4E |NORMAAL BASIC EN|
00000060: 20 43 4F 44 45 20 47 45 44 45 45 4C 54 45 4C 49 | CODE GEDEELTELI|
00000070: 4A 4B 2E 00 9C 08 03 00 89 20 32 30 30 20 3A 8F |JK....... 200 :.|
00000080: 20 56 45 52 53 49 45 5A 45 54 54 45 52 3A 20 53 | VERSIEZETTER: S|
00000090: 55 50 44 55 4D 2E 43 4F 44 2E 53 2E 00 B9 08 04 |UPDUM.COD.S.....|
000000A0: 00 8F 20 47 4F 54 4F 20 31 30 30 20 48 45 58 44 |.. GOTO 100 HEXD|
000000B0: 41 54 41 4D 41 4B 45 52 2E 00 E7 08 05 00 8F 20 |ATAMAKER....... |
000000C0: 20 20 20 20 20 20 20 20 20 52 45 47 45 4C 20 39 | REGEL 9|
000000D0: 39 30 3A 20 44 41 54 41 20 3C 42 45 53 54 41 4E |90: DATA <BESTAN|
000000E0: 44 53 4E 41 41 4D 3E 00 1C 09 06 00 8F 20 20 20 |DSNAAM>...... |
000000F0: 20 20 20 20 20 20 20 52 45 47 45 4C 20 39 39 35 | REGEL 995|
00000100: 3A 20 44 41 54 41 20 3C 42 45 47 49 4E 41 44 52 |: DATA <BEGINADR|
00000110: 45 53 20 44 45 43 49 4D 41 41 4C 3E 00 62 09 07 |ES DECIMAAL>.b..|
00000120: 00 8F 20 20 20 20 20 20 20 20 20 20 56 41 4E 41 |.. VANA|
00000130: 46 20 52 45 47 45 4C 20 31 30 30 30 20 44 45 20 |F REGEL 1000 DE |
00000140: 44 41 54 41 20 49 4E 20 48 45 58 41 44 45 43 49 |DATA IN HEXADECI|
00000150: 4D 41 41 4C 2E 20 45 49 4E 44 20 4D 45 54 20 26 |MAAL. EIND MET &|
00000160: 20 2E 00 99 09 08 00 8F 20 20 20 20 20 20 20 20 | ....... |
00000170: 20 20 32 39 20 4E 4F 56 2E 31 39 39 30 2E 20 20 | 29 NOV.1990. |
00000180: 20 20 20 20 50 52 4F 47 52 2E 3A 20 4A 2E 48 2E | PROGR.: J.H.|
00000190: 56 41 4E 20 52 49 4A 4E 2E 00 B3 09 09 00 8F 20 |VAN RIJN....... |
000001A0: 20 20 20 20 20 20 20 20 20 64 72 20 44 45 4D 4F | dr DEMO|
000001B0: 2D 32 2E 00 F0 09 0A 00 97 20 35 32 2C 31 30 30 |-2....... 52,100|
000001C0: 3A 97 20 35 36 2C C2 28 35 32 29 3A 8D 20 32 38 |:. 56,.(52):. 28|
000001D0: 30 3A 8D 20 33 30 30 20 20 20 20 3A 8F 20 52 45 |0:. 300 :. RE|
000001E0: 53 45 52 56 45 52 45 4E 2C 20 43 4F 44 45 53 2E |SERVEREN, CODES.|
000001F0: 00 31 0A 0B 00 87 20 4E 24 3A 4E 24 B2 4E 24 AA |.1.... N$:N$.N$.|
00000200: 22 2C 50 2C 57 22 3A 4C B2 C3 28 4E 24 29 3A 97 |",P,W":L..(N$):.|
00000210: 20 37 30 30 2C 4C 20 20 20 20 20 20 20 20 20 20 | 700,L |
00000220: 20 3A 8F 20 42 45 53 54 41 4E 44 53 4E 41 41 4D | :. BESTANDSNAAM|
00000230: 2E 00 6B 0A 0C 00 81 20 55 B2 31 20 A4 20 4C 3A |..k.... U.1 . L:|
00000240: 97 20 37 30 30 AA 55 2C C6 28 CA 28 4E 24 2C 55 |. 700.U,.(.(N$,U|
00000250: 2C 31 29 29 3A 82 20 55 20 20 20 20 3A 8F 20 4E |,1)):. U :. N|
00000260: 41 41 4D 20 54 45 4B 45 4E 53 2E 00 B2 0A 0D 00 |AAM TEKENS......|
00000270: 8D 20 33 32 30 3A 8B 20 58 25 B2 30 20 A7 20 39 |. 320:. X%.0 . 9|
00000280: 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |3 |
00000290: 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 41 | :. A|
000002A0: 44 52 45 53 20 56 41 4E 20 41 43 24 20 2D 20 58 |DRES VAN AC$ - X|
000002B0: 25 2E 00 F2 0A 0E 00 9E 20 34 39 38 38 30 3A 8B |%....... 49880:.|
000002C0: 20 53 54 B3 B1 30 20 A7 20 55 B2 30 3A 89 20 37 | ST..0 . U.0:. 7|
000002D0: 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |0 |
000002E0: 20 20 3A 8F 20 4F 50 45 4E 20 42 45 53 54 41 4E | :. OPEN BESTAN|
000002F0: 44 2E 00 34 0B 0F 00 87 20 41 3A 48 30 25 B2 B5 |D..4.... A:H0%..|
00000300: 28 41 AD 32 35 36 29 3A 4C 30 25 B2 41 AB 32 35 |(A.256):L0%.A.25|
00000310: 36 AC 48 30 25 20 20 20 20 20 20 20 20 20 20 20 |6.H0% |
00000320: 20 20 20 20 20 20 3A 8F 20 42 45 47 49 4E 41 44 | :. BEGINAD|
00000330: 52 45 53 2E 00 7A 0B 10 00 48 31 25 B2 B5 28 48 |RES..z...H1%..(H|
00000340: 30 25 AD 31 36 29 3A 48 30 25 B2 48 30 25 AB 31 |0%.16):H0%.H0%.1|
00000350: 36 AC 48 31 25 3A 4C 31 25 B2 B5 28 4C 30 25 AD |6.H1%:L1%..(L0%.|
00000360: 31 36 29 3A 4C 30 25 B2 4C 30 25 AB 31 36 AC 4C |16):L0%.L0%.16.L|
00000370: 31 25 3A 48 B2 34 39 38 36 30 00 B2 0B 11 00 41 |1%:H.49860.....A|
00000380: 43 24 B2 C7 28 C2 28 48 AA 4C 31 25 29 29 AA C7 |C$..(.(H.L1%))..|
00000390: 28 C2 28 48 AA 4C 30 25 29 29 20 20 20 20 20 20 |(.(H.L0%)) |
000003A0: 20 20 20 20 20 20 20 3A 8F 20 4C 4F 42 59 54 45 | :. LOBYTE|
000003B0: 53 2E 00 E7 0B 12 00 41 43 24 B2 41 43 24 AA C7 |S......AC$.AC$..|
000003C0: 28 C2 28 48 AA 48 31 25 29 29 AA C7 28 C2 28 48 |(.(H.H1%))..(.(H|
000003D0: AA 48 30 25 29 29 3A 89 20 32 36 20 3A 8F 20 48 |.H0%)):. 26 :. H|
000003E0: 49 42 59 54 45 53 2E 00 F1 0B 19 00 87 20 41 43 |IBYTES....... AC|
000003F0: 24 00 0E 0C 1A 00 44 52 B2 C2 28 36 33 29 AA 32 |$.....DR..(63).2|
00000400: 35 36 AC C2 28 36 34 29 3A 8D 20 33 34 30 00 44 |56..(64):. 340.D|
00000410: 0C 1B 00 97 20 32 35 32 2C C2 28 58 25 AA 32 29 |.... 252,.(X%.2)|
00000420: 3A 97 20 32 35 33 2C C2 28 58 25 AA 33 29 3A 97 |:. 253,.(X%.3):.|
00000430: 20 32 35 34 2C C2 28 58 25 AA 34 29 3A 97 20 32 | 254,.(X%.4):. 2|
00000440: 35 30 2C 30 00 63 0C 1E 00 9E 20 34 39 39 32 30 |50,0.c.... 49920|
00000450: 3A 91 20 C2 28 32 35 31 29 AA 31 20 89 20 32 35 |:. .(251).1 . 25|
00000460: 2C 38 30 00 8B 0C 46 00 8B 20 53 54 B3 B1 36 34 |,80...F.. ST..64|
00000470: 20 A7 20 99 3A 99 20 22 41 44 52 45 53 22 55 22 | . .:. "ADRES"U"|
00000480: 46 4F 55 54 22 53 54 22 9D 2E 22 00 C0 0C 50 00 |FOUT"ST".."...P.|
00000490: 9E 20 34 39 39 31 30 20 20 20 20 20 20 20 20 20 |. 49910 |
000004A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004B0: 20 20 20 20 20 3A 8F 20 53 4C 55 49 54 45 4E 2E | :. SLUITEN.|
000004C0: 00 CA 0C 5A 00 8D 20 33 35 30 00 E5 0C 5C 00 99 |...Z.. 350...\..|
000004D0: 20 22 45 49 4E 44 45 20 56 41 4E 20 53 43 48 52 | "EINDE VAN SCHR|
000004E0: 49 4A 46 2E 22 00 EB 0C 5D 00 80 00 2D 0D 64 00 |IJF."...]...-.d.|
000004F0: 41 B2 30 30 37 30 30 3A 42 B2 41 AA 36 3A 43 B2 |A.00700:B.A.6:C.|
00000500: 42 AA 36 3A 44 B2 43 AA 36 3A 45 B2 44 AA 36 3A |B.6:D.C.6:E.D.6:|
00000510: 46 B2 45 AA 36 3A 47 B2 46 AA 36 3A 48 B2 47 AA |F.E.6:G.F.6:H.G.|
00000520: 36 3A 49 B2 48 AA 36 3A 4A B2 49 AA 36 00 67 0D |6:I.H.6:J.I.6.g.|
00000530: 65 00 97 41 AA 30 2C 31 37 33 3A 97 41 AA 31 2C |e..A.0,173:.A.1,|
00000540: 30 30 30 3A 97 41 AA 32 2C 30 30 30 3A 97 41 AA |000:.A.2,000:.A.|
00000550: 33 2C 31 37 30 3A 97 41 AA 34 2C 30 34 31 3A 97 |3,170:.A.4,041:.|
00000560: 41 AA 35 2C 30 31 35 00 A1 0D 66 00 97 42 AA 30 |A.5,015...f..B.0|
00000570: 2C 31 36 38 3A 97 42 AA 31 2C 31 33 38 3A 97 42 |,168:.B.1,138:.B|
00000580: AA 32 2C 31 30 36 3A 97 42 AA 33 2C 31 30 36 3A |.2,106:.B.3,106:|
00000590: 97 42 AA 34 2C 31 30 36 3A 97 42 AA 35 2C 31 30 |.B.4,106:.B.5,10|
000005A0: 36 00 DB 0D 67 00 97 43 AA 30 2C 30 34 31 3A 97 |6...g..C.0,041:.|
000005B0: 43 AA 31 2C 30 31 35 3A 97 43 AA 32 2C 31 37 30 |C.1,015:.C.2,170|
000005C0: 3A 97 43 AA 33 2C 31 38 39 3A 97 43 AA 34 2C 32 |:.C.3,189:.C.4,2|
000005D0: 31 32 3A 97 43 AA 35 2C 30 30 32 00 15 0E 68 00 |12:.C.5,002...h.|
000005E0: 97 44 AA 30 2C 31 37 30 3A 97 44 AA 31 2C 31 38 |.D.0,170:.D.1,18|
000005F0: 35 3A 97 44 AA 32 2C 32 31 32 3A 97 44 AA 33 2C |5:.D.2,212:.D.3,|
00000600: 30 30 32 3A 97 44 AA 34 2C 30 39 36 3A 97 44 AA |002:.D.4,096:.D.|
00000610: 35 2C 30 30 30 00 4F 0E 69 00 97 45 AA 30 2C 30 |5,000.O.i..E.0,0|
00000620: 34 38 3A 97 45 AA 31 2C 30 34 39 3A 97 45 AA 32 |48:.E.1,049:.E.2|
00000630: 2C 30 35 30 3A 97 45 AA 33 2C 30 35 31 3A 97 45 |,050:.E.3,051:.E|
00000640: AA 34 2C 30 35 32 3A 97 45 AA 35 2C 30 35 33 00 |.4,052:.E.5,053.|
00000650: 89 0E 6A 00 97 46 AA 30 2C 30 35 34 3A 97 46 AA |..j..F.0,054:.F.|
00000660: 31 2C 30 35 35 3A 97 46 AA 32 2C 30 35 36 3A 97 |1,055:.F.2,056:.|
00000670: 46 AA 33 2C 30 35 37 3A 97 46 AA 34 2C 30 36 35 |F.3,057:.F.4,065|
00000680: 3A 97 46 AA 35 2C 30 36 36 00 C3 0E 6B 00 97 47 |:.F.5,066...k..G|
00000690: AA 30 2C 30 36 37 3A 97 47 AA 31 2C 30 36 38 3A |.0,067:.G.1,068:|
000006A0: 97 47 AA 32 2C 30 36 39 3A 97 47 AA 33 2C 30 37 |.G.2,069:.G.3,07|
000006B0: 30 3A 97 47 AA 34 2C 30 30 30 3A 97 47 AA 35 2C |0:.G.4,000:.G.5,|
000006C0: 31 36 39 00 FD 0E 6C 00 97 48 AA 30 2C 30 31 39 |169...l..H.0,019|
000006D0: 3A 97 48 AA 31 2C 31 34 31 3A 97 48 AA 32 2C 31 |:.H.1,141:.H.2,1|
000006E0: 31 39 3A 97 48 AA 33 2C 30 30 32 3A 97 48 AA 34 |19:.H.3,002:.H.4|
000006F0: 2C 31 36 32 3A 97 48 AA 35 2C 30 30 30 00 37 0F |,162:.H.5,000.7.|
00000700: 6D 00 97 49 AA 30 2C 31 33 34 3A 97 49 AA 31 2C |m..I.0,134:.I.1,|
00000710: 31 39 38 3A 97 49 AA 32 2C 32 30 32 3A 97 49 AA |198:.I.2,202:.I.|
00000720: 33 2C 31 36 39 3A 97 49 AA 34 2C 30 31 33 3A 97 |3,169:.I.4,013:.|
00000730: 49 AA 35 2C 31 35 37 00 71 0F 6E 00 97 4A AA 30 |I.5,157.q.n..J.0|
00000740: 2C 31 32 30 3A 97 4A AA 31 2C 30 30 32 3A 97 4A |,120:.J.1,002:.J|
00000750: AA 32 2C 32 30 32 3A 97 4A AA 33 2C 30 31 36 3A |.2,202:.J.3,016:|
00000760: 97 4A AA 34 2C 32 35 30 3A 97 4A AA 35 2C 30 39 |.J.4,250:.J.5,09|
00000770: 36 00 A3 0F 6F 00 99 20 C7 28 31 34 37 29 3A 99 |6...o.. .(147):.|
00000780: 3A 85 20 22 42 45 47 49 4E 52 45 47 45 4C 4E 55 |:. "BEGINREGELNU|
00000790: 4D 4D 45 52 20 28 31 30 30 30 2D 39 39 39 39 29 |MMER (1000-9999)|
000007A0: 22 3B 52 00 BF 0F 70 00 8B 20 52 B3 31 30 30 30 |";R...p.. R.1000|
000007B0: 20 B0 20 52 B1 39 39 39 39 20 A7 20 31 31 31 00 | . R.9999 . 111.|
000007C0: EF 0F 78 00 85 20 22 42 45 47 49 4E 41 44 52 45 |..x.. "BEGINADRE|
000007D0: 53 20 48 45 58 44 41 54 41 4D 41 4B 45 52 22 3B |S HEXDATAMAKER";|
000007E0: 41 3A 8B 20 41 B3 32 35 35 20 A7 20 31 32 30 00 |A:. A.255 . 120.|
000007F0: 27 10 7A 00 85 20 22 20 45 49 4E 44 41 44 52 45 |'.z.. " EINDADRE|
00000800: 53 20 48 45 58 44 41 54 41 4D 41 4B 45 52 22 3B |S HEXDATAMAKER";|
00000810: 5A 3A 8B 20 5A B1 35 33 32 34 37 20 B0 20 41 B1 |Z:. Z.53247 . A.|
00000820: 5A 20 A7 20 31 32 30 00 42 10 7C 00 99 20 C7 28 |Z . 120.B.|.. .(|
00000830: 31 34 37 29 3A 99 20 52 AB 35 22 44 41 54 41 22 |147):. R.5"DATA"|
00000840: 41 3B 00 7B 10 7D 00 99 20 22 22 3A 99 20 22 41 |A;.{.}.. "":. "A|
00000850: 3D 22 41 22 3A 52 3D 22 52 22 3A 5A 3D 22 5A 22 |="A":R="R":Z="Z"|
00000860: 3A 47 4F 54 4F 20 31 33 30 22 3B 3A 97 20 37 34 |:GOTO 130";:. 74|
00000870: 37 2C 35 3A 9E 20 37 34 31 3A 80 00 94 10 82 00 |7,5:. 741:......|
00000880: 99 20 C7 28 31 34 37 29 3A 8B 20 41 B1 5A 20 A7 |. .(147):. A.Z .|
00000890: 20 31 34 37 00 AD 10 83 00 99 20 52 22 44 41 54 | 147...... R"DAT|
000008A0: 41 22 3B 3A 81 20 49 B2 30 20 A4 20 33 00 E5 10 |A";:. I.0 . 3...|
000008B0: 8C 00 99 20 22 20 22 3B 3A 81 20 4A B2 30 20 A4 |... " ";:. J.0 .|
000008C0: 20 37 3A 44 B2 41 AA 38 AC 49 AA 4A 3A 51 B2 B5 | 7:D.A.8.I.J:Q..|
000008D0: 28 44 AD 32 35 36 29 3A 97 20 37 30 31 2C 44 AB |(D.256):. 701,D.|
000008E0: 32 35 36 AC 51 00 15 11 8D 00 97 20 37 30 32 2C |256.Q...... 702,|
000008F0: 51 3A 9E 20 37 30 30 3A 99 20 C7 28 C2 28 37 38 |Q:. 700:. .(.(78|
00000900: 31 29 29 C7 28 C2 28 37 38 30 29 29 3B 3A 82 20 |1)).(.(780));:. |
00000910: 4A 3A 82 20 49 00 54 11 91 00 99 20 22 22 3A 99 |J:. I.T.... "":.|
00000920: 20 22 41 3D 22 41 AA 33 32 22 3A 52 3D 22 52 AA | "A="A.32":R="R.|
00000930: 31 30 22 3A 5A 3D 22 5A 22 3A 47 4F 54 4F 20 31 |10":Z="Z":GOTO 1|
00000940: 33 30 22 3B 3A 97 20 37 34 37 2C 34 3A 9E 20 37 |30";:. 747,4:. 7|
00000950: 34 31 3A 80 00 81 11 93 00 99 20 C7 28 31 34 37 |41:....... .(147|
00000960: 29 3A 99 20 52 22 44 41 54 41 20 26 22 3B 3A 99 |):. R"DATA &";:.|
00000970: 20 22 22 3A 99 20 22 47 4F 54 4F 20 31 34 39 22 | "":. "GOTO 149"|
00000980: 3B 00 95 11 94 00 97 20 37 34 37 2C 33 3A 9E 20 |;...... 747,3:. |
00000990: 37 34 31 3A 80 00 9B 11 95 00 80 00 BB 11 96 00 |741:............|
000009A0: 85 20 22 43 4F 44 2E 53 55 50 44 55 4D 20 57 45 |. "COD.SUPDUM WE|
000009B0: 47 20 28 4A 2F 4E 29 22 3B 41 24 00 CF 11 98 00 |G (J/N)";A$.....|
000009C0: 8B 20 41 24 B3 B1 22 4A 22 20 A7 20 31 39 30 00 |. A$.."J" . 190.|
000009D0: EC 11 9A 00 85 20 22 5A 45 4B 45 52 20 57 45 54 |..... "ZEKER WET|
000009E0: 45 4E 20 28 4A 2F 4E 29 22 3B 41 24 00 00 12 9C |EN (J/N)";A$....|
000009F0: 00 8B 20 41 24 B3 B1 22 4A 22 20 A7 20 31 39 30 |.. A$.."J" . 190|
00000A00: 00 1D 12 A0 00 9F 20 31 2C 38 2C 31 35 2C 22 53 |...... 1,8,15,"S|
00000A10: 30 3A 43 4F 44 2E 53 55 50 44 55 4D 22 00 25 12 |0:COD.SUPDUM".%.|
00000A20: A2 00 A0 20 31 00 41 12 AA 00 99 3A 99 20 22 43 |... 1.A....:. "C|
00000A30: 4F 44 2E 53 55 50 44 55 4D 20 57 45 47 2E 22 3A |OD.SUPDUM WEG.":|
00000A40: 99 00 4B 12 BE 00 89 20 32 34 30 00 6E 12 C8 00 |..K.... 240.n...|
00000A50: 94 20 22 54 45 4D 50 44 22 2C 38 3A 99 3A 99 20 |. "TEMPD",8:.:. |
00000A60: 22 54 45 4D 50 44 20 53 41 56 45 44 2E 22 00 94 |"TEMPD SAVED."..|
00000A70: 12 CD 00 95 20 22 54 45 4D 50 44 22 2C 38 3A 99 |.... "TEMPD",8:.|
00000A80: 3A 99 20 22 54 45 4D 50 44 20 56 45 52 49 46 49 |:. "TEMPD VERIFI|
00000A90: 45 44 2E 22 00 B5 12 D2 00 9F 20 35 2C 38 2C 31 |ED."...... 5,8,1|
00000AA0: 35 2C 22 53 30 3A 53 55 50 44 55 4D 2E 43 4F 44 |5,"S0:SUPDUM.COD|
00000AB0: 2E 53 2F 4F 22 00 E0 12 D7 00 98 35 2C 20 22 52 |.S/O"......5, "R|
00000AC0: 30 3A 53 55 50 44 55 4D 2E 43 4F 44 2E 53 2F 4F |0:SUPDUM.COD.S/O|
00000AD0: 3D 30 3A 53 55 50 44 55 4D 2E 43 4F 44 2E 53 22 |=0:SUPDUM.COD.S"|
00000AE0: 00 02 13 DC 00 98 35 2C 20 22 52 30 3A 53 55 50 |......5, "R0:SUP|
00000AF0: 44 55 4D 2E 43 4F 44 2E 53 3D 30 3A 54 45 4D 50 |DUM.COD.S=0:TEMP|
00000B00: 44 22 00 0A 13 E1 00 A0 20 35 00 1E 13 E6 00 8B |D"...... 5......|
00000B10: 20 53 54 B3 B1 30 20 A7 20 8D 20 33 35 30 00 47 | ST..0 . . 350.G|
00000B20: 13 EB 00 99 3A 99 20 22 20 56 45 52 53 49 45 5A |....:. " VERSIEZ|
00000B30: 45 54 20 53 55 50 44 55 4D 2E 43 4F 44 2E 53 20 |ET SUPDUM.COD.S |
00000B40: 4B 4C 41 41 52 2E 22 00 4D 13 F0 00 80 00 99 13 |KLAAR.".M.......|
00000B50: 18 01 41 B2 34 39 38 38 30 3A 42 B2 41 AA 36 3A |..A.49880:B.A.6:|
00000B60: 43 B2 42 AA 36 3A 44 B2 43 AA 36 3A 45 B2 44 AA |C.B.6:D.C.6:E.D.|
00000B70: 36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |6 |
00000B80: 20 3A 46 B2 45 AA 36 3A 47 B2 46 AA 36 3A 48 B2 | :F.E.6:G.F.6:H.|
00000B90: 47 AA 36 3A 49 B2 48 AA 36 00 D7 13 19 01 97 41 |G.6:I.H.6......A|
00000BA0: AA 30 2C 31 36 39 3A 97 41 AA 31 2C 30 30 31 3A |.0,169:.A.1,001:|
00000BB0: 97 41 AA 32 2C 31 36 32 20 20 20 20 3A 97 41 AA |.A.2,162 :.A.|
00000BC0: 33 2C 30 30 38 3A 97 41 AA 34 2C 31 36 30 3A 97 |3,008:.A.4,160:.|
00000BD0: 41 AA 35 2C 30 30 33 00 15 14 1A 01 97 42 AA 30 |A.5,003......B.0|
00000BE0: 2C 30 33 32 3A 97 42 AA 31 2C 31 38 36 3A 97 42 |,032:.B.1,186:.B|
00000BF0: AA 32 2C 32 35 35 20 20 20 20 3A 97 42 AA 33 2C |.2,255 :.B.3,|
00000C00: 31 37 33 3A 97 42 AA 34 2C 31 38 38 3A 97 42 AA |173:.B.4,188:.B.|
00000C10: 35 2C 30 30 32 00 53 14 1B 01 97 43 AA 30 2C 31 |5,002.S....C.0,1|
00000C20: 36 32 3A 97 43 AA 31 2C 31 38 39 3A 97 43 AA 32 |62:.C.1,189:.C.2|
00000C30: 2C 31 36 30 20 20 20 20 3A 97 43 AA 33 2C 30 30 |,160 :.C.3,00|
00000C40: 32 3A 97 43 AA 34 2C 30 33 32 3A 97 43 AA 35 2C |2:.C.4,032:.C.5,|
00000C50: 31 38 39 00 91 14 1C 01 97 44 AA 30 2C 32 35 35 |189......D.0,255|
00000C60: 3A 97 44 AA 31 2C 30 33 32 3A 97 44 AA 32 2C 31 |:.D.1,032:.D.2,1|
00000C70: 39 32 20 20 20 20 3A 97 44 AA 33 2C 32 35 35 3A |92 :.D.3,255:|
00000C80: 97 44 AA 34 2C 31 36 32 3A 97 44 AA 35 2C 30 30 |.D.4,162:.D.5,00|
00000C90: 31 00 CF 14 1D 01 97 45 AA 30 2C 30 33 32 3A 97 |1......E.0,032:.|
00000CA0: 45 AA 31 2C 32 30 31 3A 97 45 AA 32 2C 32 35 35 |E.1,201:.E.2,255|
00000CB0: 20 20 20 20 3A 97 45 AA 33 2C 30 39 36 3A 97 45 | :.E.3,096:.E|
00000CC0: AA 34 2C 32 33 34 3A 97 45 AA 35 2C 32 33 34 00 |.4,234:.E.5,234.|
00000CD0: 0D 15 1E 01 97 46 AA 30 2C 31 36 39 3A 97 46 AA |.....F.0,169:.F.|
00000CE0: 31 2C 30 30 31 3A 97 46 AA 32 2C 30 33 32 20 20 |1,001:.F.2,032 |
00000CF0: 20 20 3A 97 46 AA 33 2C 31 39 35 3A 97 46 AA 34 | :.F.3,195:.F.4|
00000D00: 2C 32 35 35 3A 97 46 AA 35 2C 30 33 32 00 39 15 |,255:.F.5,032.9.|
00000D10: 1F 01 97 47 AA 30 2C 32 33 31 3A 97 47 AA 31 2C |...G.0,231:.G.1,|
00000D20: 32 35 35 3A 97 47 AA 32 2C 30 39 36 20 20 20 20 |255:.G.2,096 |
00000D30: 3A 97 47 AA 33 2C 32 33 34 00 7C 15 20 01 81 20 |:.G.3,234.|. .. |
00000D40: 55 B2 30 30 20 A4 20 30 39 3A 97 20 34 39 38 36 |U.00 . 09:. 4986|
00000D50: 30 AA 55 2C 28 34 38 AA 55 29 3A 82 20 55 20 20 |0.U,(48.U):. U |
00000D60: 20 3A 8F 20 48 45 58 41 44 45 43 2E 49 4E 20 34 | :. HEXADEC.IN 4|
00000D70: 39 38 36 30 2E 2E 34 39 38 37 35 2E 00 A3 15 21 |9860..49875....!|
00000D80: 01 81 20 55 B2 31 30 20 A4 20 31 35 3A 97 20 34 |.. U.10 . 15:. 4|
00000D90: 39 38 36 30 AA 55 2C 28 35 35 AA 55 29 3A 82 20 |9860.U,(55.U):. |
00000DA0: 55 3A 8E 00 EF 15 2C 01 41 B2 34 39 39 32 30 3A |U:....,.A.49920:|
00000DB0: 42 B2 41 AA 36 3A 43 B2 42 AA 36 3A 44 B2 43 AA |B.A.6:C.B.6:D.C.|
00000DC0: 36 3A 45 B2 44 AA 36 20 20 20 20 20 20 20 20 20 |6:E.D.6 |
00000DD0: 20 20 20 20 20 20 20 3A 46 B2 45 AA 36 3A 47 B2 | :F.E.6:G.|
00000DE0: 46 AA 36 3A 48 B2 47 AA 36 3A 49 B2 48 AA 36 00 |F.6:H.G.6:I.H.6.|
00000DF0: 2D 16 2D 01 97 41 AA 30 2C 31 36 39 3A 97 41 AA |-.-..A.0,169:.A.|
00000E00: 31 2C 30 30 30 3A 97 41 AA 32 2C 31 33 33 20 20 |1,000:.A.2,133 |
00000E10: 20 20 3A 97 41 AA 33 2C 32 35 31 3A 97 41 AA 34 | :.A.3,251:.A.4|
00000E20: 2C 31 36 30 3A 97 41 AA 35 2C 30 30 30 00 6B 16 |,160:.A.5,000.k.|
00000E30: 2E 01 97 42 AA 30 2C 31 37 37 3A 97 42 AA 31 2C |...B.0,177:.B.1,|
00000E40: 32 35 33 3A 97 42 AA 32 2C 32 30 31 20 20 20 20 |253:.B.2,201 |
00000E50: 3A 97 42 AA 33 2C 30 33 38 3A 97 42 AA 34 2C 32 |:.B.3,038:.B.4,2|
00000E60: 30 38 3A 97 42 AA 35 2C 30 30 33 00 A9 16 2F 01 |08:.B.5,003.../.|
00000E70: 97 43 AA 30 2C 32 33 30 3A 97 43 AA 31 2C 32 35 |.C.0,230:.C.1,25|
00000E80: 31 3A 97 43 AA 32 2C 30 39 36 20 20 20 20 3A 97 |1:.C.2,096 :.|
00000E90: 43 AA 33 2C 32 30 31 3A 97 43 AA 34 2C 30 34 38 |C.3,201:.C.4,048|
00000EA0: 3A 97 43 AA 35 2C 31 34 34 00 E7 16 30 01 97 44 |:.C.5,144...0..D|
00000EB0: AA 30 2C 30 35 34 3A 97 44 AA 31 2C 32 30 31 3A |.0,054:.D.1,201:|
00000EC0: 97 44 AA 32 2C 30 35 38 20 20 20 20 3A 97 44 AA |.D.2,058 :.D.|
00000ED0: 33 2C 31 34 34 3A 97 44 AA 34 2C 30 31 33 3A 97 |3,144:.D.4,013:.|
00000EE0: 44 AA 35 2C 32 30 31 00 25 17 31 01 97 45 AA 30 |D.5,201.%.1..E.0|
00000EF0: 2C 30 36 35 3A 97 45 AA 31 2C 31 34 34 3A 97 45 |,065:.E.1,144:.E|
00000F00: AA 32 2C 30 34 36 20 20 20 20 3A 97 45 AA 33 2C |.2,046 :.E.3,|
00000F10: 32 30 31 3A 97 45 AA 34 2C 30 37 31 3A 97 45 AA |201:.E.4,071:.E.|
00000F20: 35 2C 31 34 34 00 63 17 32 01 97 46 AA 30 2C 30 |5,144.c.2..F.0,0|
00000F30: 30 32 3A 97 46 AA 31 2C 31 37 36 3A 97 46 AA 32 |02:.F.1,176:.F.2|
00000F40: 2C 30 34 30 20 20 20 20 3A 97 46 AA 33 2C 30 35 |,040 :.F.3,05|
00000F50: 36 3A 97 46 AA 34 2C 32 33 33 3A 97 46 AA 35 2C |6:.F.4,233:.F.5,|
00000F60: 30 30 37 00 A1 17 33 01 97 47 AA 30 2C 30 35 36 |007...3..G.0,056|
00000F70: 3A 97 47 AA 31 2C 32 33 33 3A 97 47 AA 32 2C 30 |:.G.1,233:.G.2,0|
00000F80: 34 38 20 20 20 20 3A 97 47 AA 33 2C 31 36 36 3A |48 :.G.3,166:|
00000F90: 97 47 AA 34 2C 32 35 30 3A 97 47 AA 35 2C 32 30 |.G.4,250:.G.5,20|
00000FA0: 38 00 DF 17 34 01 97 48 AA 30 2C 30 31 32 3A 97 |8...4..H.0,012:.|
00000FB0: 48 AA 31 2C 30 32 34 3A 97 48 AA 32 2C 30 34 32 |H.1,024:.H.2,042|
00000FC0: 20 20 20 20 3A 97 48 AA 33 2C 30 34 32 3A 97 48 | :.H.3,042:.H|
00000FD0: AA 34 2C 30 34 32 3A 97 48 AA 35 2C 30 34 32 00 |.4,042:.H.5,042.|
00000FE0: 1D 18 35 01 97 49 AA 30 2C 31 33 33 3A 97 49 AA |..5..I.0,133:.I.|
00000FF0: 31 2C 30 30 32 3A 97 49 AA 32 2C 32 33 30 20 20 |1,002:.I.2,230 |
00001000: 20 20 3A 97 49 AA 33 2C 32 35 30 3A 97 49 AA 34 | :.I.3,250:.I.4|
00001010: 2C 30 32 34 3A 97 49 AA 35 2C 31 34 34 00 69 18 |,024:.I.5,144.i.|
00001020: 36 01 41 B2 34 39 39 37 34 3A 42 B2 41 AA 36 3A |6.A.49974:B.A.6:|
00001030: 43 B2 42 AA 36 3A 44 B2 43 AA 36 3A 45 B2 44 AA |C.B.6:D.C.6:E.D.|
00001040: 36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |6 |
00001050: 20 3A 46 B2 45 AA 36 3A 47 B2 46 AA 36 3A 48 B2 | :F.E.6:G.F.6:H.|
00001060: 47 AA 36 3A 49 B2 48 AA 36 00 A7 18 37 01 97 41 |G.6:I.H.6...7..A|
00001070: AA 30 2C 30 31 38 3A 97 41 AA 31 2C 30 30 35 3A |.0,018:.A.1,005:|
00001080: 97 41 AA 32 2C 30 30 32 20 20 20 20 3A 97 41 AA |.A.2,002 :.A.|
00001090: 33 2C 31 36 32 3A 97 41 AA 34 2C 30 30 30 3A 97 |3,162:.A.4,000:.|
000010A0: 41 AA 35 2C 31 33 34 00 E5 18 38 01 97 42 AA 30 |A.5,134...8..B.0|
000010B0: 2C 32 35 30 3A 97 42 AA 31 2C 30 33 32 3A 97 42 |,250:.B.1,032:.B|
000010C0: AA 32 2C 32 31 30 20 20 20 20 3A 97 42 AA 33 2C |.2,210 :.B.3,|
000010D0: 32 35 35 3A 97 42 AA 34 2C 31 36 35 3A 97 42 AA |255:.B.4,165:.B.|
000010E0: 35 2C 31 34 34 00 23 19 39 01 97 43 AA 30 2C 32 |5,144.#.9..C.0,2|
000010F0: 34 30 3A 97 43 AA 31 2C 30 30 35 3A 97 43 AA 32 |40:.C.1,005:.C.2|
00001100: 2C 31 36 39 20 20 20 20 3A 97 43 AA 33 2C 30 30 |,169 :.C.3,00|
00001110: 32 3A 97 43 AA 34 2C 31 33 33 3A 97 43 AA 35 2C |2:.C.4,133:.C.5,|
00001120: 32 35 31 00 61 19 3A 01 97 44 AA 30 2C 30 39 36 |251.a.:..D.0,096|
00001130: 3A 97 44 AA 31 2C 32 30 30 3A 97 44 AA 32 2C 31 |:.D.1,200:.D.2,1|
00001140: 39 36 20 20 20 20 3A 97 44 AA 33 2C 32 35 32 3A |96 :.D.3,252:|
00001150: 97 44 AA 34 2C 31 34 34 3A 97 44 AA 35 2C 31 38 |.D.4,144:.D.5,18|
00001160: 34 00 77 19 3B 01 97 45 AA 30 2C 30 39 36 3A 97 |4.w.;..E.0,096:.|
00001170: 45 AA 31 2C 32 33 34 00 7D 19 3C 01 8E 00 92 19 |E.1,234.}.<.....|
00001180: 40 01 41 43 24 B2 22 2E 2E 2E 2E 2E 2E 2E 2E 2E |@.AC$.".........|
00001190: 2E 22 00 C4 19 41 01 56 25 B2 C2 28 34 35 29 AA |."...A.V%..(45).|
000011A0: 32 35 36 AC C2 28 34 36 29 3A 57 25 B2 56 25 AA |256..(46):W%.V%.|
000011B0: 31 36 30 3A 58 25 B2 30 3A 81 20 55 B2 56 25 20 |160:X%.0:. U.V% |
000011C0: A4 20 57 25 00 E3 19 42 01 8B 20 C2 28 55 AA 30 |. W%...B.. .(U.0|
000011D0: 29 B3 B1 C6 28 22 41 22 29 AA 30 30 30 20 A7 20 |)...("A").000 . |
000011E0: 33 32 35 00 02 1A 43 01 8B 20 C2 28 55 AA 31 29 |325...C.. .(U.1)|
000011F0: B3 B1 C6 28 22 43 22 29 AA 31 32 38 20 A7 20 33 |...("C").128 . 3|
00001200: 32 35 00 11 1A 44 01 58 25 B2 55 3A 89 20 33 32 |25...D.X%.U:. 32|
00001210: 39 00 27 1A 45 01 82 20 55 3A 99 20 22 47 45 45 |9.'.E.. U:. "GEE|
00001220: 4E 20 41 43 24 2E 22 00 2D 1A 49 01 8E 00 60 1A |N AC$.".-.I...`.|
00001230: 54 01 53 41 B2 32 35 36 AC C2 28 36 34 38 29 AA |T.SA.256..(648).|
00001240: 33 35 3A 53 24 B2 C9 28 C4 28 31 30 30 30 30 AA |35:S$..(.(10000.|
00001250: 44 52 29 2C 34 29 3A 81 20 59 B2 31 20 A4 20 34 |DR),4):. Y.1 . 4|
00001260: 00 82 1A 55 01 97 20 28 53 41 AA 59 AB 31 29 2C |...U.. (SA.Y.1),|
00001270: C6 28 CA 28 53 24 2C 59 2C 31 29 29 3A 82 20 59 |.(.(S$,Y,1)):. Y|
00001280: 3A 8E 00 A0 1A 5E 01 9F 20 31 35 2C 38 2C 31 35 |:....^.. 15,8,15|
00001290: 3A 84 31 35 2C 41 24 2C 42 24 2C 43 24 2C 44 24 |:.15,A$,B$,C$,D$|
000012A0: 00 BE 1A 5F 01 99 20 41 24 22 2C 20 22 42 24 22 |..._.. A$", "B$"|
000012B0: 2C 20 22 43 24 22 2C 20 22 44 24 22 2E 22 00 C9 |, "C$", "D$"."..|
000012C0: 1A 60 01 A0 20 31 35 3A 8E 00 DB 1A DE 03 83 20 |.`.. 15:....... |
000012D0: 20 43 4F 44 2E 53 55 50 44 55 4D 00 E8 1A E3 03 | COD.SUPDUM.....|
000012E0: 83 20 20 34 39 31 35 32 00 32 1B E8 03 83 20 41 |. 49152.2.... A|
000012F0: 44 31 38 44 30 38 35 46 37 41 39 30 31 41 32 20 |D18D085F7A901A2 |
00001300: 30 34 41 30 30 30 32 30 42 41 46 46 41 39 30 30 |04A00020BAFFA900|
00001310: 20 32 30 42 44 46 46 32 30 43 30 46 46 41 32 30 | 20BDFF20C0FFA20|
00001320: 31 20 32 30 43 39 46 46 41 39 31 38 32 30 44 32 |1 20C9FFA91820D2|
00001330: 46 46 00 7C 1B F2 03 83 20 41 39 31 42 41 32 34 |FF.|.... A91BA24|
00001340: 31 41 30 30 38 32 30 39 41 20 43 30 41 32 35 35 |1A008209A C0A255|
00001350: 41 30 30 31 32 30 39 41 43 30 20 41 32 34 44 41 |A001209AC0 A24DA|
00001360: 30 31 34 32 30 39 41 43 30 41 39 20 44 30 38 35 |014209AC0A9 D085|
00001370: 46 45 41 39 30 30 38 35 46 44 41 44 00 C6 1B FC |FEA90085FDAD....|
00001380: 03 83 20 38 38 30 32 38 35 46 43 38 35 41 38 41 |.. 880285FC85A8A|
00001390: 39 30 30 20 38 35 46 42 38 35 41 37 41 39 31 38 |900 85FB85A7A918|
000013A0: 38 35 46 38 20 41 39 31 42 41 32 36 37 41 30 30 |85F8 A91BA267A00|
000013B0: 35 32 30 39 41 20 43 30 41 32 34 30 41 30 30 31 |5209A C0A240A001|
000013C0: 32 30 39 46 43 30 00 10 1C 06 04 83 20 41 30 30 |209FC0...... A00|
000013D0: 30 38 34 41 39 41 35 46 37 34 41 34 41 20 42 31 |084A9A5F74A4A B1|
000013E0: 41 37 32 30 41 41 43 30 41 34 41 39 43 38 20 43 |A720AAC0A4A9C8 C|
000013F0: 30 32 38 39 30 45 45 41 39 30 41 32 30 44 32 20 |02890EEA90A20D2 |
00001400: 46 46 31 38 41 39 32 38 36 35 41 37 38 35 41 37 |FF18A92865A785A7|
00001410: 00 5A 1C 10 04 83 20 41 39 30 30 36 35 41 38 38 |.Z.... A90065A88|
00001420: 35 41 38 43 36 46 38 20 31 30 43 36 41 32 31 42 |5A8C6F8 10C6A21B|
00001430: 41 30 34 30 32 30 39 46 20 43 30 41 39 30 31 32 |A040209F C0A9012|
00001440: 30 43 33 46 46 32 30 45 37 20 46 46 36 30 38 35 |0C3FF20E7 FF6085|
00001450: 30 32 32 30 44 32 46 46 38 41 00 A4 1C 1A 04 83 |0220D2FF8A......|
00001460: 20 32 30 44 32 46 46 39 38 32 30 44 32 46 46 41 | 20D2FF9820D2FFA|
00001470: 35 20 30 32 36 30 38 35 30 32 41 39 30 30 32 41 |5 02608502A9002A|
00001480: 32 36 20 30 32 32 41 32 36 30 32 32 41 32 36 30 |26 022A26022A260|
00001490: 32 32 41 20 41 41 41 35 30 32 36 35 46 44 38 35 |22A AAA50265FD85|
000014A0: 46 39 38 41 00 EE 1C 24 04 83 20 36 35 46 45 38 |F98A...$.. 65FE8|
000014B0: 35 46 41 41 44 30 45 44 43 32 39 20 46 45 38 44 |5FAAD0EDC29 FE8D|
000014C0: 30 45 44 43 41 35 30 31 32 39 46 42 20 38 35 30 |0EDCA50129FB 850|
000014D0: 31 41 30 30 37 42 31 46 39 39 39 33 34 20 30 33 |1A007B1F99934 03|
000014E0: 38 38 31 30 46 38 41 35 30 31 30 39 30 34 00 34 |8810F8A5010904.4|
000014F0: 1D 2E 04 83 20 38 35 30 31 41 44 30 45 44 43 30 |.... 8501AD0EDC0|
00001500: 39 30 31 38 44 20 30 45 44 43 41 30 30 37 41 32 |9018D 0EDCA007A2|
00001510: 30 37 33 45 33 34 20 30 33 36 41 43 41 31 30 46 |073E34 036ACA10F|
00001520: 39 32 30 44 32 46 46 20 38 38 31 30 46 31 36 30 |920D2FF 8810F160|
00001530: 30 30 20 26 00 00 00 |00 &... |
..8.... 10 :. SCHRIJFT MACHINECODE
NAAR EEN SCHIJF..S.... 10 :. TAAL:
NORMAAL BASIC EN CODE GEDEELTELIJK......
. 200 :. VERSIEZETTER: SUPDUM.COD.S.....
.. GOTO 100 HEXDATAMAKER.......
REGEL 990: DATA <BESTANDSNAAM>......
REGEL 995: DATA <BEGINADRES DECIM
AAL>.B.... VANAF REGEL 1000 DE
DATA IN HEXADECIMAAL. EIND MET & .......
29 NOV.1990. PROGR.: J.H.
VAN RIJN....... DR DEMO-2......
. 52,100:. 56,B(52):. 280:. 300 :. RE
SERVEREN, CODES..1.... N$:N$.N$.",P,W":L
.C(N$):. 700,L :. BESTANDSNAAM
..K.... U.1 . L:. 700.U,F(J(N$,U,1)):. U
:. NAAM TEKENS....... 320:. X%.0 . 9
3 :. ADRES VAN
AC$ - X%....... 49880:. ST..0 . U.0:. 7
0 :. OPEN BESTAND..4....
A:H0%..(A.256):L0%.A.256.H0%
:. BEGINADRES..Z...H1%..(H0%.16):H
0%.H0%.16.H1%:L1%..(L0%.16):L0%.L0%.16.L
1%:H.49860.....AC$.G(B(H.L1%)).G(B(H.L0%
)) :. LOBYTES......AC$.AC$.G
(B(H.H1%)).G(B(H.H0%)):. 26 :. HIBYTES..
..... AC$.....DR.B(63).256.B(64):. 340.D
.... 252,B(X%.2):. 253,B(X%.3):. 254,B(X
%.4):. 250,0.C.... 49920:. B(251).1 . 25
,80...F.. ST..64 . .:. "ADRES"U"FOUT"ST"
.."...P.. 49910
:. SLUITEN..J.Z.. 350...\.. "EINDE
VAN SCHRIJF."...]...-.D.A.00700:B.A.6:C.
B.6:D.C.6:E.D.6:F.E.6:G.F.6:H.G.6:I.H.6:
J.I.6.G.E..A.0,173:.A.1,000:.A.2,000:.A.
3,170:.A.4,041:.A.5,015...F..B.0,168:.B.
1,138:.B.2,106:.B.3,106:.B.4,106:.B.5,10
6...G..C.0,041:.C.1,015:.C.2,170:.C.3,18
9:.C.4,212:.C.5,002...H..D.0,170:.D.1,18
5:.D.2,212:.D.3,002:.D.4,096:.D.5,000.O.
I..E.0,048:.E.1,049:.E.2,050:.E.3,051:.E
.4,052:.E.5,053...J..F.0,054:.F.1,055:.F
.2,056:.F.3,057:.F.4,065:.F.5,066.C.K..G
.0,067:.G.1,068:.G.2,069:.G.3,070:.G.4,0
00:.G.5,169...L..H.0,019:.H.1,141:.H.2,1
19:.H.3,002:.H.4,162:.H.5,000.7.M..I.0,1
34:.I.1,198:.I.2,202:.I.3,169:.I.4,013:.
I.5,157.Q.N..J.0,120:.J.1,002:.J.2,202:.
J.3,016:.J.4,250:.J.5,096...O.. G(147):.
:. "BEGINREGELNUMMER (1000-9999)";R...P.
. R.1000 . R.9999 . 111...X.. "BEGINADRE
S HEXDATAMAKER";A:. A.255 . 120.'.Z.. "
EINDADRES HEXDATAMAKER";Z:. Z.53247 . A.
Z . 120.B.|.. G(147):. R.5"DATA"A;.{.}..
"":. "A="A":R="R":Z="Z":GOTO 130";:. 74
7,5:. 741:....... G(147):. A.Z . 147....
.. R"DATA";:. I.0 . 3...... " ";:. J.0 .
7:D.A.8.I.J:Q..(D.256):. 701,D.256.Q...
... 702,Q:. 700:. G(B(781))G(B(780));:.
J:. I.T.... "":. "A="A.32":R="R.10":Z="Z
":GOTO 130";:. 747,4:. 741:....... G(147
):. R"DATA &";:. "":. "GOTO 149";......
747,3:. 741:............. "COD.SUPDUM WE
G (J/N)";A$.O.... A$.."J" . 190...... "Z
EKER WETEN (J/N)";A$...... A$.."J" . 190
... .. 1,8,15,"S0:COD.SUPDUM".%... 1.A.
...:. "COD.SUPDUM WEG.":..K.... 240.N.H.
. "TEMPD",8:.:. "TEMPD SAVED."...M.. "TE
MPD",8:.:. "TEMPD VERIFIED."...R.. 5,8,1
5,"S0:SUPDUM.COD.S/O"...W..5, "R0:SUPDUM
.COD.S/O=0:SUPDUM.COD.S"......5, "R0:SUP
DUM.COD.S=0:TEMPD"..... 5...... ST..0 .
. 350.G....:. " VERSIEZET SUPDUM.COD.S
KLAAR.".M.........A.49880:B.A.6:C.B.6:D.
C.6:E.D.6 :F.E.6:G.F.6:H.
G.6:I.H.6.W....A.0,169:.A.1,001:.A.2,162
:.A.3,008:.A.4,160:.A.5,003......B.0
,032:.B.1,186:.B.2,255 :.B.3,173:.B.4
,188:.B.5,002.S....C.0,162:.C.1,189:.C.2
,160 :.C.3,002:.C.4,032:.C.5,189.....
.D.0,255:.D.1,032:.D.2,192 :.D.3,255:
.D.4,162:.D.5,001.O....E.0,032:.E.1,201:
.E.2,255 :.E.3,096:.E.4,234:.E.5,234.
.....F.0,169:.F.1,001:.F.2,032 :.F.3,
195:.F.4,255:.F.5,032.9....G.0,231:.G.1,
255:.G.2,096 :.G.3,234.|. .. U.00 . 0
9:. 49860.U,(48.U):. U :. HEXADEC.IN 4
9860..49875....!.. U.10 . 15:. 49860.U,(
55.U):. U:....,.A.49920:B.A.6:C.B.6:D.C.
6:E.D.6 :F.E.6:G.F.6:H.G.
6:I.H.6.-.-..A.0,169:.A.1,000:.A.2,133
:.A.3,251:.A.4,160:.A.5,000.K....B.0,1
77:.B.1,253:.B.2,201 :.B.3,038:.B.4,2
08:.B.5,003.../..C.0,230:.C.1,251:.C.2,0
96 :.C.3,201:.C.4,048:.C.5,144...0..D
.0,054:.D.1,201:.D.2,058 :.D.3,144:.D
.4,013:.D.5,201.%.1..E.0,065:.E.1,144:.E
.2,046 :.E.3,201:.E.4,071:.E.5,144.C.
2..F.0,002:.F.1,176:.F.2,040 :.F.3,05
6:.F.4,233:.F.5,007...3..G.0,056:.G.1,23
3:.G.2,048 :.G.3,166:.G.4,250:.G.5,20
8...4..H.0,012:.H.1,024:.H.2,042 :.H.
3,042:.H.4,042:.H.5,042...5..I.0,133:.I.
1,002:.I.2,230 :.I.3,250:.I.4,024:.I.
5,144.I.6.A.49974:B.A.6:C.B.6:D.C.6:E.D.
6 :F.E.6:G.F.6:H.G.6:I.H.
6...7..A.0,018:.A.1,005:.A.2,002 :.A.
3,162:.A.4,000:.A.5,134...8..B.0,250:.B.
1,032:.B.2,210 :.B.3,255:.B.4,165:.B.
5,144.#.9..C.0,240:.C.1,005:.C.2,169
:.C.3,002:.C.4,133:.C.5,251.A.:..D.0,096
:.D.1,200:.D.2,196 :.D.3,252:.D.4,144
:.D.5,184.W.;..E.0,096:.E.1,234.}.<.....
@.AC$."..........".D.A.V%.B(45).256.B(46
):W%.V%.160:X%.0:. U.V% . W%...B.. B(U.0
)..F("A").000 . 325...C.. B(U.1)..F("C")
.128 . 325...D.X%.U:. 329.'.E.. U:. "GEE
N AC$.".-.I...`.T.SA.256.B(648).35:S$.I(
D(10000.DR),4):. Y.1 . 4...U.. (SA.Y.1),
F(J(S$,Y,1)):. Y:.. .^.. 15,8,15:.15,A$,
B$,C$,D$..._.. A$", "B$", "C$", "D$".".I
.`. 15:....... COD.SUPDUM...... 49152
.2.... AD18D085F7A901A2 04A00020BAFFA900
20BDFF20C0FFA201 20C9FFA91820D2FF.|....
A91BA241A008209A C0A255A001209AC0 A24DA
014209AC0A9 D085FEA90085FDAD.F.... 88028
5FC85A8A900 85FB85A7A91885F8 A91BA267A00
5209A C0A240A001209FC0...... A00084A9A5F
74A4A B1A720AAC0A4A9C8 C02890EEA90A20D2
FF18A92865A785A7.Z.... A90065A885A8C6F8
10C6A21BA040209F C0A90120C3FF20E7 FF6085
0220D2FF8A...... 20D2FF9820D2FFA5 026085
02A9002A26 022A26022A26022A AAA50265FD85
F98A...$.. 65FE85FAAD0EDC29 FE8D0EDCA501
29FB 8501A007B1F99934 038810F8A5010904.4
.... 8501AD0EDC09018D 0EDCA007A2073E34 0
36ACA10F920D2FF 8810F16000 &...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL