PRODIS.BAS/O
FILE INFORMATION
FILENAME(S): PRODIS.BAS/O
FILE TYPE(S): PRG
FILE SIZE: 8.3K
FIRST SEEN: 2025-11-30 21:27:08
APPEARS ON: 1 disk(s)
FILE HASH
c8506c31b6aa934b79339621a46a204a9b9e2ba89d07f5bd54ac1a05a3cfbe16
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RES1 BRUIN | PRODIS.BAS/O | PRG | DuncanTwain | 10 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3D 08 01 00 89 20 31 30 30 20 20 20 20 3A |..=.... 100 :|
00000010: 8F 20 50 52 4F 47 52 41 4D 4D 41 20 50 52 4F 44 |. PROGRAMMA PROD|
00000020: 49 53 2E 42 41 53 20 44 49 53 53 45 4D 42 4C 45 |IS.BAS DISSEMBLE|
00000030: 52 20 4D 45 54 20 4C 41 42 45 4C 53 2E 00 83 08 |R MET LABELS....|
00000040: 02 00 89 20 31 30 30 20 20 20 20 3A 8F 20 4C 41 |... 100 :. LA|
00000050: 42 45 4C 53 20 57 4F 52 44 45 4E 20 41 41 4E 47 |BELS WORDEN AANG|
00000060: 45 4D 41 41 4B 54 2E 20 4B 45 55 5A 45 3A 20 44 |EMAAKT. KEUZE: D|
00000070: 45 43 49 4D 41 41 4C 20 4F 46 20 48 45 58 41 44 |ECIMAAL OF HEXAD|
00000080: 45 43 2E 00 C8 08 03 00 89 20 39 30 30 30 20 20 |EC....... 9000 |
00000090: 20 3A 8F 20 20 20 20 20 20 20 56 45 52 53 49 45 | :. VERSIE|
000000A0: 5A 45 54 2E 20 20 20 20 20 20 20 20 20 20 20 20 |ZET. |
000000B0: 20 20 20 20 20 20 20 20 20 20 20 20 54 41 41 4C | TAAL|
000000C0: 3A 20 42 41 53 49 43 2E 00 17 09 04 00 8F 20 20 |: BASIC....... |
000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000F0: 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 2A 2A 2A | ******|
00000100: 2A 2A 20 20 44 41 54 55 4D 3A 20 33 30 20 41 55 |** DATUM: 30 AU|
00000110: 47 2E 31 39 38 39 2E 00 4E 09 05 00 89 20 39 30 |G.1989..N.... 90|
00000120: 35 30 20 20 20 3A 8F 20 20 20 20 20 20 20 4C 49 |50 :. LI|
00000130: 53 54 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 |ST. |
00000140: 20 20 20 20 20 20 2A 20 52 45 53 31 20 2A 00 85 | * RES1 *..|
00000150: 09 06 00 89 20 39 30 37 30 20 20 20 3A 8F 20 20 |.... 9070 :. |
00000160: 20 20 20 20 20 45 4E 44 20 4C 49 53 54 2E 20 20 | END LIST. |
00000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A | ***|
00000180: 2A 2A 2A 2A 2A 00 D0 09 14 00 41 B2 30 30 38 32 |*****.....A.0082|
00000190: 30 3A 5A B2 B7 28 47 29 20 20 20 20 20 20 20 20 |0:Z..(G) |
000001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A | :|
000001B0: 8F 20 47 45 54 41 4C 20 47 20 4D 45 54 20 4B 20 |. GETAL G MET K |
000001C0: 48 45 58 54 45 4B 45 4E 53 20 49 4E 20 47 24 2E |HEXTEKENS IN G$.|
000001D0: 00 E2 09 15 00 9E 20 33 39 38 38 38 3A 47 24 B2 |...... 39888:G$.|
000001E0: 22 22 00 17 0A 16 00 81 20 55 B2 30 20 A4 20 33 |""...... U.0 . 3|
000001F0: 3A 47 24 B2 47 24 AA C7 28 C2 28 41 AA 55 29 29 |:G$.G$..(.(A.U))|
00000200: 3A 82 20 55 3A 47 24 B2 22 24 22 AA C9 28 47 24 |:. U:G$."$"..(G$|
00000210: 2C 4B AB 31 29 3A 8E 00 60 0A 19 00 41 B2 30 30 |,K.1):..`...A.00|
00000220: 38 32 30 3A 5A B2 B7 28 47 29 20 20 20 20 20 20 |820:Z..(G) |
00000230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000240: 20 3A 8F 20 47 45 54 41 4C 20 47 20 4D 45 54 20 | :. GETAL G MET |
00000250: 4B 20 43 49 4A 46 45 52 53 20 49 4E 20 47 24 2E |K CIJFERS IN G$.|
00000260: 00 72 0A 1A 00 9E 20 33 39 37 34 34 3A 47 24 B2 |.r.... 39744:G$.|
00000270: 22 22 00 A1 0A 1B 00 81 20 55 B2 30 20 A4 20 34 |""...... U.0 . 4|
00000280: 3A 47 24 B2 47 24 AA C7 28 C2 28 41 AA 55 29 29 |:G$.G$..(.(A.U))|
00000290: 3A 82 20 55 3A 47 24 B2 C9 28 47 24 2C 4B 29 3A |:. U:G$..(G$,K):|
000002A0: 8E 00 DB 0A 23 00 58 4C B2 58 4C AA 31 3A 8B 20 |....#.XL.XL.1:. |
000002B0: 58 4C B3 32 35 36 20 A7 20 8E 20 20 20 20 20 20 |XL.256 . . |
000002C0: 20 20 20 20 3A 8F 20 48 4F 4F 47 20 58 4C 2C 58 | :. HOOG XL,X|
000002D0: 48 20 4F 50 20 4D 45 54 20 31 2E 00 F3 0A 24 00 |H OP MET 1....$.|
000002E0: 58 4C B2 58 4C AB 32 35 36 3A 58 48 B2 58 48 AA |XL.XL.256:XH.XH.|
000002F0: 31 3A 8E 00 1F 0B 28 00 97 20 32 38 2C 41 4C 3A |1:....(.. 28,AL:|
00000300: 97 20 32 39 2C 41 48 3A 97 20 33 30 2C 53 31 20 |. 29,AH:. 30,S1 |
00000310: 20 20 20 20 20 20 3A 8F 20 52 45 47 45 4C 2E 00 | :. REGEL..|
00000320: 4F 0B 29 00 97 20 33 31 2C 53 32 3A 97 20 33 33 |O.).. 31,S2:. 33|
00000330: 2C 4F 4C 3A 97 20 33 34 2C 4F 48 3A 9E 20 33 37 |,OL:. 34,OH:. 37|
00000340: 38 33 34 3A 56 41 B2 C2 28 37 35 37 29 3A 8E 00 |834:VA..(757):..|
00000350: 85 0B 2D 00 8B 20 55 56 B3 B1 32 20 A7 20 8E 20 |..-.. UV..2 . . |
00000360: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000370: 20 20 3A 8F 20 53 54 41 54 55 53 20 56 41 4E 20 | :. STATUS VAN |
00000380: 44 49 53 4B 2E 00 A1 0B 2E 00 9F 20 39 2C 38 2C |DISK....... 9,8,|
00000390: 31 35 3A 84 39 2C 41 24 2C 42 24 2C 43 24 2C 44 |15:.9,A$,B$,C$,D|
000003A0: 24 00 CC 0B 2F 00 99 3A 99 20 22 53 43 48 49 4A |$.../..:. "SCHIJ|
000003B0: 46 20 22 41 24 22 2C 20 22 42 24 22 2C 20 22 43 |F "A$", "B$", "C|
000003C0: 24 22 2C 20 22 44 24 22 2E 22 3A 99 00 D6 0B 30 |$", "D$".":....0|
000003D0: 00 A0 20 39 3A 8E 00 05 0C 32 00 97 20 32 36 2C |.. 9:....2.. 26,|
000003E0: 58 4C 3A 97 20 32 37 2C 58 48 20 20 20 20 20 20 |XL:. 27,XH |
000003F0: 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 4C | :. L|
00000400: 41 42 45 4C 2E 00 37 0C 33 00 9E 20 33 37 38 37 |ABEL..7.3.. 3787|
00000410: 36 3A 8B 20 C2 28 37 38 31 29 B1 30 20 A7 20 8E |6:. .(781).0 . .|
00000420: 20 20 20 3A 8F 20 49 54 45 4D 20 53 54 41 41 54 | :. ITEM STAAT|
00000430: 20 45 52 20 41 4C 2E 00 6B 0C 34 00 9E 20 33 37 | ER AL..k.4.. 37|
00000440: 37 39 32 3A 56 42 B2 C2 28 37 35 38 29 3A 8E 20 |792:VB..(758):. |
00000450: 20 20 20 20 20 20 20 20 20 3A 8F 20 56 55 4C 20 | :. VUL |
00000460: 4E 49 45 55 57 20 49 54 45 4D 2E 00 B2 0C 3C 00 |NIEUW ITEM....<.|
00000470: 49 B2 4C 20 20 20 20 20 20 20 20 20 20 20 20 20 |I.L |
00000480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000490: 20 20 20 20 20 20 20 3A 8F 20 5A 4F 45 4B 20 49 | :. ZOEK I|
000004A0: 54 45 4D 20 49 4E 20 4C 41 42 45 4C 54 41 42 45 |TEM IN LABELTABE|
000004B0: 4C 2E 00 E1 0C 3D 00 8B 20 28 58 48 B2 C2 28 4C |L....=.. (XH..(L|
000004C0: 55 AA 49 AA 49 AB 31 29 29 20 AF 20 28 58 4C B2 |U.I.I.1)) . (XL.|
000004D0: C2 28 4C 55 AA 49 AA 49 AB 32 29 29 20 A7 20 36 |.(LU.I.I.2)) . 6|
000004E0: 33 00 F6 0C 3E 00 49 B2 49 AB 31 3A 8B 20 49 B1 |3...>.I.I.1:. I.|
000004F0: 30 20 A7 20 36 31 00 FC 0C 3F 00 8E 00 3D 0D 41 |0 . 61...?...=.A|
00000500: 00 4B B2 33 3A 8D 20 32 35 3A 4B 24 B2 4C 24 AA |.K.3:. 25:K$.L$.|
00000510: 47 24 3A 8E 20 20 20 20 20 20 20 20 20 20 20 3A |G$:. :|
00000520: 8F 20 4D 41 41 4B 20 4C 41 42 45 4C 20 4F 46 20 |. MAAK LABEL OF |
00000530: 4C 41 42 45 4C 4F 50 45 52 41 4E 44 2E 00 7F 0D |LABELOPERAND....|
00000540: 46 00 8B 20 44 43 B2 31 20 A7 20 8D 20 32 35 3A |F.. DC.1 . . 25:|
00000550: 8E 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 44 |. :. D|
00000560: 45 43 49 4D 41 41 4C 20 28 44 43 3D 31 29 20 4F |ECIMAAL (DC=1) O|
00000570: 46 20 48 45 58 41 44 45 43 49 4D 41 41 4C 2E 00 |F HEXADECIMAAL..|
00000580: C0 0D 47 00 8D 20 32 30 3A 8E 20 20 20 20 20 20 |..G.. 20:. |
00000590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005A0: 20 20 3A 8F 20 47 45 54 41 4C 20 47 20 49 4E 20 | :. GETAL G IN |
000005B0: 4B 20 43 49 4A 46 45 52 53 20 49 4E 20 47 24 2E |K CIJFERS IN G$.|
000005C0: 00 F6 0D 50 00 58 4C B2 59 4C 3A 58 48 B2 59 48 |...P.XL.YL:XH.YH|
000005D0: 3A 4A 56 B2 30 3A 81 20 55 B2 30 20 A4 20 4E 4E |:JV.0:. U.0 . NN|
000005E0: AB 31 20 20 20 20 20 20 20 3A 8F 20 53 55 42 50 |.1 :. SUBP|
000005F0: 41 53 53 20 31 2E 00 18 0E 51 00 8D 20 33 35 3A |ASS 1....Q.. 35:|
00000600: 8D 20 36 30 3A 8B 20 49 B1 30 20 A7 20 4A 28 55 |. 60:. I.0 . J(U|
00000610: 29 B2 49 3A 4A 56 B2 31 00 22 0E 52 00 82 20 55 |).I:JV.1.".R.. U|
00000620: 3A 8E 00 58 0E 55 00 58 4C B2 59 4C 3A 58 48 B2 |:..X.U.XL.YL:XH.|
00000630: 59 48 3A 81 20 55 B2 30 20 A4 20 4E 4E AB 31 20 |YH:. U.0 . NN.1 |
00000640: 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 53 55 | :. SU|
00000650: 42 50 41 53 53 20 32 2E 00 84 0E 56 00 4D 24 B2 |BPASS 2....V.M$.|
00000660: 22 20 20 20 20 20 22 3A 8B 20 4A 28 55 29 B1 30 |" ":. J(U).0|
00000670: 20 A7 20 47 B2 4A 28 55 29 3A 8D 20 36 35 3A 4D | . G.J(U):. 65:M|
00000680: 24 B2 4B 24 00 B1 0E 57 00 4D 24 B2 4D 24 AA 22 |$.K$...W.M$.M$."|
00000690: 20 2E 42 59 54 45 20 22 3A 8D 20 33 35 3A 47 B2 | .BYTE ":. 35:G.|
000006A0: C2 28 58 4C AA 32 35 36 AC 58 48 29 3A 8D 20 37 |.(XL.256.XH):. 7|
000006B0: 30 00 E3 0E 58 00 4D 24 B2 4D 24 AA 47 24 3A 4D |0...X.M$.M$.G$:M|
000006C0: 24 B2 C8 28 28 4D 24 AA 22 20 20 20 20 20 20 20 |$..((M$." |
000006D0: 20 20 20 22 29 2C 31 39 29 AA 22 20 3B 22 3A 8D | "),19)." ;":.|
000006E0: 20 39 36 00 ED 0E 59 00 82 20 55 3A 8E 00 34 0F | 96...Y.. U:..4.|
000006F0: 5A 00 43 54 24 B2 C7 28 31 32 37 29 3A 91 20 55 |Z.CT$..(127):. U|
00000700: 56 20 89 20 39 32 2C 39 33 2C 39 34 20 20 20 20 |V . 92,93,94 |
00000710: 20 20 20 20 3A 8F 20 4F 50 45 4E 20 52 41 4E 44 | :. OPEN RAND|
00000720: 41 50 50 41 52 41 41 54 20 4F 50 20 55 56 3D 30 |APPARAAT OP UV=0|
00000730: 2E 2E 33 2E 00 6F 0F 5B 00 99 20 C7 28 31 34 37 |..3..o.[.. .(147|
00000740: 29 3A 8E 20 20 20 20 20 20 20 20 20 20 20 20 20 |):. |
00000750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000760: 20 20 20 20 20 3A 8F 20 53 43 48 45 52 4D 2E 00 | :. SCHERM..|
00000770: AC 0F 5C 00 9F 20 35 2C 31 2C 31 2C 4E 24 AA 22 |..\.. 5,1,1,N$."|
00000780: 2C 53 2C 57 22 3A 8E 20 20 20 20 20 20 20 20 20 |,S,W":. |
00000790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007A0: 20 20 20 20 3A 8F 20 54 41 50 45 2E 00 E9 0F 5D | :. TAPE....]|
000007B0: 00 9F 20 35 2C 38 2C 33 2C 4E 24 AA 22 2C 53 2C |.. 5,8,3,N$.",S,|
000007C0: 57 22 3A 8E 20 20 20 20 20 20 20 20 20 20 20 20 |W":. |
000007D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007E0: 20 3A 8F 20 44 49 53 43 2E 00 23 10 5E 00 9F 20 | :. DISC..#.^.. |
000007F0: 35 2C 34 3A 98 35 2C C7 28 32 37 29 22 4D 22 C7 |5,4:.5,.(27)"M".|
00000800: 28 32 30 29 3A 98 35 2C 22 20 20 44 20 49 20 53 |(20):.5," D I S|
00000810: 20 53 20 45 20 4D 20 42 20 4C 20 41 20 47 20 45 | S E M B L A G E|
00000820: 20 2E 22 00 51 10 5F 00 98 35 3A 98 35 2C 22 20 | .".Q._..5:.5," |
00000830: 56 45 4C 44 20 56 41 4E 20 22 41 42 22 20 54 2F |VELD VAN "AB" T/|
00000840: 4D 20 22 41 45 3B 43 54 24 22 2E 22 3A 98 35 3A |M "AE;CT$".":.5:|
00000850: 8E 00 88 10 60 00 8B 20 55 56 B1 30 20 A7 20 98 |....`.. UV.0 . .|
00000860: 35 2C 4D 24 20 20 20 20 20 20 20 20 20 20 20 20 |5,M$ |
00000870: 20 20 20 20 3A 8F 20 4F 55 54 50 55 54 20 56 41 | :. OUTPUT VA|
00000880: 4E 20 52 45 47 45 4C 2E 00 93 10 61 00 99 20 4D |N REGEL....a.. M|
00000890: 24 3A 8E 00 CD 10 62 00 8B 20 55 56 B1 30 20 A7 |$:....b.. UV.0 .|
000008A0: 20 A0 20 35 20 20 20 20 20 20 20 20 20 20 20 20 | . 5 |
000008B0: 20 20 20 20 20 20 20 3A 8F 20 53 4C 55 49 54 20 | :. SLUIT |
000008C0: 52 41 4E 44 41 50 50 41 52 41 41 54 2E 00 EE 10 |RANDAPPARAAT....|
000008D0: 63 00 99 20 22 45 49 4E 44 45 20 56 41 4E 20 44 |c.. "EINDE VAN D|
000008E0: 49 53 53 45 4D 42 4C 41 47 45 2E 22 3A 8E 00 1C |ISSEMBLAGE.":...|
000008F0: 11 64 00 4E 24 B2 22 43 4F 44 2E 44 49 53 53 45 |.d.N$."COD.DISSE|
00000900: 4D 22 3A 4C B2 C3 28 4E 24 29 3A 97 20 37 30 30 |M":L..(N$):. 700|
00000910: 2C 4C 3A 81 20 49 B2 31 20 A4 20 4C 00 3B 11 65 |,L:. I.1 . L.;.e|
00000920: 00 97 20 37 30 30 AA 49 2C C6 28 CA 28 4E 24 2C |.. 700.I,.(.(N$,|
00000930: 49 2C 31 29 29 3A 82 20 49 3A 99 00 62 11 66 00 |I,1)):. I:..b.f.|
00000940: 99 20 22 4D 41 43 48 49 4E 45 43 4F 44 45 20 22 |. "MACHINECODE "|
00000950: 4E 24 22 20 49 4E 4C 45 5A 45 4E 2E 2E 2E 2E 22 |N$" INLEZEN...."|
00000960: 3A 99 00 9B 11 6E 00 41 B2 34 39 31 35 32 3A 42 |:....n.A.49152:B|
00000970: B2 41 AA 36 3A 43 B2 42 AA 36 3A 44 B2 43 AA 36 |.A.6:C.B.6:D.C.6|
00000980: 3A 45 B2 44 AA 36 20 20 20 20 20 20 20 20 3A 8F |:E.D.6 :.|
00000990: 20 42 4F 4F 54 53 54 52 41 50 2E 00 D9 11 6F 00 | BOOTSTRAP....o.|
000009A0: 97 41 AA 30 2C 31 36 39 3A 97 41 AA 31 2C 30 30 |.A.0,169:.A.1,00|
000009B0: 31 3A 97 41 AA 32 2C 31 36 32 20 20 20 20 3A 97 |1:.A.2,162 :.|
000009C0: 41 AA 33 2C 30 30 38 3A 97 41 AA 34 2C 31 36 30 |A.3,008:.A.4,160|
000009D0: 3A 97 41 AA 35 2C 30 30 31 00 17 12 70 00 97 42 |:.A.5,001...p..B|
000009E0: AA 30 2C 30 33 32 3A 97 42 AA 31 2C 31 38 36 3A |.0,032:.B.1,186:|
000009F0: 97 42 AA 32 2C 32 35 35 20 20 20 20 3A 97 42 AA |.B.2,255 :.B.|
00000A00: 33 2C 31 37 33 3A 97 42 AA 34 2C 31 38 38 3A 97 |3,173:.B.4,188:.|
00000A10: 42 AA 35 2C 30 30 32 00 55 12 71 00 97 43 AA 30 |B.5,002.U.q..C.0|
00000A20: 2C 31 36 32 3A 97 43 AA 31 2C 31 38 39 3A 97 43 |,162:.C.1,189:.C|
00000A30: AA 32 2C 31 36 30 20 20 20 20 3A 97 43 AA 33 2C |.2,160 :.C.3,|
00000A40: 30 30 32 3A 97 43 AA 34 2C 30 33 32 3A 97 43 AA |002:.C.4,032:.C.|
00000A50: 35 2C 31 38 39 00 93 12 72 00 97 44 AA 30 2C 32 |5,189...r..D.0,2|
00000A60: 35 35 3A 97 44 AA 31 2C 31 36 39 3A 97 44 AA 32 |55:.D.1,169:.D.2|
00000A70: 2C 30 30 30 20 20 20 20 3A 97 44 AA 33 2C 31 36 |,000 :.D.3,16|
00000A80: 32 3A 97 44 AA 34 2C 32 35 35 3A 97 44 AA 35 2C |2:.D.4,255:.D.5,|
00000A90: 31 36 30 00 D1 12 73 00 97 45 AA 30 2C 32 35 35 |160...s..E.0,255|
00000AA0: 3A 97 45 AA 31 2C 30 33 32 3A 97 45 AA 32 2C 32 |:.E.1,032:.E.2,2|
00000AB0: 31 33 20 20 20 20 3A 97 45 AA 33 2C 32 35 35 3A |13 :.E.3,255:|
00000AC0: 97 45 AA 34 2C 30 39 36 3A 97 45 AA 35 2C 30 30 |.E.4,096:.E.5,00|
00000AD0: 30 00 EB 12 74 00 9E 20 34 39 31 35 32 3A 8B 20 |0...t.. 49152:. |
00000AE0: 53 54 B2 36 34 20 A7 20 31 32 30 00 13 13 75 00 |ST.64 . 120...u.|
00000AF0: 99 3A 99 20 22 4C 41 41 44 46 4F 55 54 3A 54 4F |.:. "LAADFOUT:TO|
00000B00: 45 53 54 41 4E 44 20 22 53 54 3A 99 3A 89 20 39 |ESTAND "ST:.:. 9|
00000B10: 30 39 39 00 5E 13 78 00 41 B2 30 30 36 38 30 3A |099.^.x.A.00680:|
00000B20: 42 B2 41 AA 36 20 20 20 20 20 20 20 20 20 20 20 |B.A.6 |
00000B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A | :|
00000B40: 8F 20 55 53 52 28 58 29 20 53 50 4C 49 54 53 20 |. USR(X) SPLITS |
00000B50: 58 20 49 4E 20 4C 53 20 45 4E 20 48 53 2E 00 9C |X IN LS EN HS...|
00000B60: 13 79 00 97 41 AA 30 2C 30 33 32 3A 97 41 AA 31 |.y..A.0,032:.A.1|
00000B70: 2C 32 34 37 3A 97 41 AA 32 2C 31 38 33 20 20 20 |,247:.A.2,183 |
00000B80: 20 3A 97 41 AA 33 2C 31 36 35 3A 97 41 AA 34 2C | :.A.3,165:.A.4,|
00000B90: 30 32 30 3A 97 41 AA 35 2C 31 33 33 00 DA 13 7A |020:.A.5,133...z|
00000BA0: 00 97 42 AA 30 2C 31 36 37 3A 97 42 AA 31 2C 31 |..B.0,167:.B.1,1|
00000BB0: 36 35 3A 97 42 AA 32 2C 30 32 31 20 20 20 20 3A |65:.B.2,021 :|
00000BC0: 97 42 AA 33 2C 31 33 33 3A 97 42 AA 34 2C 31 36 |.B.3,133:.B.4,16|
00000BD0: 38 3A 97 42 AA 35 2C 30 39 36 00 1B 14 7B 00 97 |8:.B.5,096...{..|
00000BE0: 20 37 38 35 2C 31 36 38 3A 97 20 37 38 36 2C 30 | 785,168:. 786,0|
00000BF0: 30 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |02 |
00000C00: 3A 8F 20 53 2E 50 2E 36 38 30 3B 20 55 49 54 3A |:. S.P.680; UIT:|
00000C10: 20 28 31 36 38 2C 31 36 37 29 2E 00 62 14 82 00 | (168,167)..b...|
00000C20: 52 55 B2 31 37 39 32 30 3A 4C 55 B2 33 30 38 35 |RU.17920:LU.3085|
00000C30: 32 3A 5A 55 B2 33 32 37 36 38 3A 56 55 B2 33 38 |2:ZU.32768:VU.38|
00000C40: 38 33 32 3A 57 55 B2 30 30 38 33 32 3A 42 55 B2 |832:WU.00832:BU.|
00000C50: 30 30 37 30 30 20 3A 8F 20 47 45 42 49 45 44 45 |00700 :. GEBIEDE|
00000C60: 4E 2E 00 9D 14 83 00 5A B2 B7 28 52 55 29 3A 97 |N......Z..(RU):.|
00000C70: 20 34 30 39 32 38 2C C2 28 31 36 37 29 3A 97 20 | 40928,.(167):. |
00000C80: 34 30 39 32 39 2C C2 28 31 36 38 29 20 20 20 3A |40929,.(168) :|
00000C90: 8F 20 52 45 47 45 4C 53 20 40 20 36 2E 00 D8 14 |. REGELS @ 6....|
00000CA0: 84 00 5A B2 B7 28 4C 55 29 3A 97 20 34 30 39 33 |..Z..(LU):. 4093|
00000CB0: 30 2C C2 28 31 36 37 29 3A 97 20 34 30 39 33 31 |0,.(167):. 40931|
00000CC0: 2C C2 28 31 36 38 29 20 20 20 3A 8F 20 4C 41 42 |,.(168) :. LAB|
00000CD0: 45 4C 53 20 40 20 32 2E 00 0F 15 85 00 5A B2 B7 |ELS @ 2......Z..|
00000CE0: 28 5A 55 29 3A 97 20 34 30 39 33 32 2C C2 28 31 |(ZU):. 40932,.(1|
00000CF0: 36 37 29 3A 97 20 34 30 39 33 33 2C C2 28 31 36 |67):. 40933,.(16|
00000D00: 38 29 20 20 20 3A 8F 20 45 49 4E 44 2B 31 2E 00 |8) :. EIND+1..|
00000D10: 4D 15 86 00 5A B2 B7 28 56 55 29 3A 97 20 34 30 |M...Z..(VU):. 40|
00000D20: 39 33 34 2C C2 28 31 36 37 29 3A 97 20 34 30 39 |934,.(167):. 409|
00000D30: 33 35 2C C2 28 31 36 38 29 20 20 20 3A 8F 20 56 |35,.(168) :. V|
00000D40: 4F 4F 52 42 4C 4F 4B 20 54 45 58 54 2E 00 88 15 |OORBLOK TEXT....|
00000D50: 87 00 5A B2 B7 28 57 55 29 3A 97 20 34 30 39 33 |..Z..(WU):. 4093|
00000D60: 36 2C C2 28 31 36 37 29 3A 97 20 34 30 39 33 37 |6,.(167):. 40937|
00000D70: 2C C2 28 31 36 38 29 20 20 20 3A 8F 20 57 45 52 |,.(168) :. WER|
00000D80: 4B 47 45 42 49 45 44 2E 00 C5 15 88 00 5A B2 B7 |KGEBIED......Z..|
00000D90: 28 42 55 29 3A 97 20 34 30 39 33 38 2C C2 28 31 |(BU):. 40938,.(1|
00000DA0: 36 37 29 3A 97 20 34 30 39 33 39 2C C2 28 31 36 |67):. 40939,.(16|
00000DB0: 38 29 20 20 20 3A 8F 20 42 45 53 54 41 4E 44 53 |8) :. BESTANDS|
00000DC0: 4E 41 41 4D 2E 00 12 16 8C 00 4F 55 B2 34 30 32 |NAAM......OU.402|
00000DD0: 35 36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |56 |
00000DE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000DF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E00: 3A 8F 20 47 45 42 49 45 44 20 4F 50 43 4F 44 45 |:. GEBIED OPCODE|
00000E10: 53 2E 00 4D 16 8D 00 5A B2 B7 28 4F 55 29 3A 97 |S..M...Z..(OU):.|
00000E20: 20 34 30 39 34 30 2C C2 28 31 36 37 29 3A 97 20 | 40940,.(167):. |
00000E30: 34 30 39 34 31 2C C2 28 31 36 38 29 20 20 20 3A |40941,.(168) :|
00000E40: 8F 20 42 45 47 49 4E 41 44 52 45 53 2E 00 8B 16 |. BEGINADRES....|
00000E50: 8E 00 4E 4F B2 31 35 31 20 20 20 20 20 20 20 20 |..NO.151 |
00000E60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E70: 20 20 20 20 20 20 20 20 20 3A 8F 20 41 41 4E 54 | :. AANT|
00000E80: 41 4C 20 4F 50 43 4F 44 45 53 2E 00 9A 16 8F 00 |AL OPCODES......|
00000E90: 97 20 34 30 39 34 32 2C 4E 4F 00 D7 16 93 00 8D |. 40942,NO......|
00000EA0: 20 33 35 30 30 20 20 20 20 20 20 20 20 20 20 20 | 3500 |
00000EB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000EC0: 20 20 3A 8F 20 5A 45 54 20 54 45 53 54 50 52 4F | :. ZET TESTPRO|
00000ED0: 47 52 41 4D 4D 41 2E 00 10 17 95 00 9E 20 33 36 |GRAMMA....... 36|
00000EE0: 30 30 30 20 20 20 20 20 20 20 20 20 20 20 20 20 |000 |
00000EF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F00: 20 3A 8F 20 4D 41 43 48 49 4E 45 2D 48 2E 50 2E | :. MACHINE-H.P.|
00000F10: 00 4B 17 96 00 52 4D B2 C2 28 37 35 32 29 AA 32 |.K...RM..(752).2|
00000F20: 35 36 AC C2 28 37 35 33 29 20 20 20 20 20 20 20 |56..(753) |
00000F30: 20 20 20 20 20 20 3A 8F 20 4D 41 58 2E 41 41 4E | :. MAX.AAN|
00000F40: 54 41 4C 20 52 45 47 45 4C 53 2E 00 86 17 97 00 |TAL REGELS......|
00000F50: 4C 4D B2 C2 28 37 35 34 29 AA 32 35 36 AC C2 28 |LM..(754).256..(|
00000F60: 37 35 35 29 20 20 20 20 20 20 20 20 20 20 20 20 |755) |
00000F70: 20 3A 8F 20 4D 41 58 2E 41 41 4E 54 41 4C 20 4C | :. MAX.AANTAL L|
00000F80: 41 42 45 4C 53 2E 00 C6 17 98 00 44 43 B2 C2 28 |ABELS......DC..(|
00000F90: 37 35 36 29 20 20 20 20 20 20 20 20 20 20 20 20 |756) |
00000FA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A | :|
00000FB0: 8F 20 44 43 2D 56 4C 41 47 3B 20 44 45 43 49 4D |. DC-VLAG; DECIM|
00000FC0: 41 41 4C 3D 31 2E 00 FA 17 99 00 41 42 B2 C2 28 |AAL=1......AB..(|
00000FD0: 37 36 30 29 AA 32 35 36 AC C2 28 37 36 31 29 20 |760).256..(761) |
00000FE0: 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 42 | :. B|
00000FF0: 45 47 49 4E 41 44 52 45 53 2E 00 2D 18 9A 00 41 |EGINADRES..-...A|
00001000: 45 B2 C2 28 37 36 32 29 AA 32 35 36 AC C2 28 37 |E..(762).256..(7|
00001010: 36 33 29 20 20 20 20 20 20 20 20 20 20 20 20 20 |63) |
00001020: 3A 8F 20 45 49 4E 44 41 44 52 45 53 2E 00 63 18 |:. EINDADRES..c.|
00001030: A0 00 4C 24 B2 C7 28 C2 28 37 32 30 29 29 AA C7 |..L$..(.(720))..|
00001040: 28 C2 28 37 32 31 29 29 20 20 20 20 20 3A 8F 20 |(.(721)) :. |
00001050: 4C 41 42 45 4C 20 42 45 47 49 4E 4C 45 54 54 45 |LABEL BEGINLETTE|
00001060: 52 53 2E 00 9E 18 A1 00 55 56 B2 C2 28 37 35 31 |RS......UV..(751|
00001070: 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |) |
00001080: 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 41 | :. A|
00001090: 50 50 41 52 41 41 54 4E 55 4D 4D 45 52 2E 00 C3 |PPARAATNUMMER...|
000010A0: 18 A2 00 4E 24 B2 22 22 3A 42 B2 C2 28 31 36 39 |...N$."":B..(169|
000010B0: 29 AA 32 35 36 AC C2 28 31 37 30 29 3A 4C B2 C2 |).256..(170):L..|
000010C0: 28 42 29 00 E5 18 A3 00 81 20 49 B2 31 20 A4 20 |(B)...... I.1 . |
000010D0: 4C 3A 4E 24 B2 4E 24 AA C7 28 C2 28 42 AA 49 29 |L:N$.N$..(.(B.I)|
000010E0: 29 3A 82 20 49 00 00 19 FB 00 8F 20 34 30 32 35 |):. I...... 4025|
000010F0: 36 20 54 41 42 45 4C 20 4F 50 43 4F 44 45 53 2E |6 TABEL OPCODES.|
00001100: 00 1B 19 FC 00 8F 20 34 30 34 31 36 20 54 41 42 |...... 40416 TAB|
00001110: 45 4C 20 53 54 55 55 52 2D 31 2E 00 36 19 FD 00 |EL STUUR-1..6...|
00001120: 8F 20 34 30 35 37 36 20 54 41 42 45 4C 20 53 54 |. 40576 TABEL ST|
00001130: 55 55 52 2D 32 2E 00 50 19 FE 00 8F 20 34 30 37 |UUR-2..P.... 407|
00001140: 33 36 20 54 41 42 45 4C 20 4D 4E 45 4D 2D 31 2E |36 TABEL MNEM-1.|
00001150: 00 6A 19 FF 00 8F 20 34 30 38 30 30 20 54 41 42 |.j.... 40800 TAB|
00001160: 45 4C 20 4D 4E 45 4D 2D 32 2E 00 84 19 00 01 8F |EL MNEM-2.......|
00001170: 20 34 30 38 36 34 20 54 41 42 45 4C 20 4D 4E 45 | 40864 TABEL MNE|
00001180: 4D 2D 33 2E 00 9C 19 90 01 99 3A 99 20 22 44 4F |M-3.......:. "DO|
00001190: 4F 52 47 41 4E 47 20 32 2E 22 3A 99 00 B9 19 AE |ORGANG 2.":.....|
000011A0: 01 8D 20 39 30 3A 8B 20 55 56 B2 30 20 B0 20 55 |.. 90:. UV.0 . U|
000011B0: 56 B2 33 20 A7 20 34 34 30 00 ED 19 AF 01 8B 20 |V.3 . 440...... |
000011C0: 53 54 B3 B1 30 20 AF 20 53 54 B3 B1 36 34 20 A7 |ST..0 . ST..64 .|
000011D0: 20 99 20 22 4F 50 45 4E 45 4E 20 46 4F 55 54 2E | . "OPENEN FOUT.|
000011E0: 22 3A 8D 20 34 35 3A 89 20 39 30 39 39 00 31 1A |":. 45:. 9099.1.|
000011F0: B8 01 4D 24 B2 22 20 20 20 20 20 20 20 20 20 2A |..M$." *|
00001200: 3D 22 3A 4B B2 35 3A 47 B2 41 42 3A 8D 20 37 30 |=":K.5:G.AB:. 70|
00001210: 3A 4D 24 B2 4D 24 AA 47 24 3A 8D 20 39 36 20 20 |:M$.M$.G$:. 96 |
00001220: 20 3A 8F 20 45 45 52 53 54 45 20 52 45 47 45 4C | :. EERSTE REGEL|
00001230: 2E 00 6B 1A B9 01 81 20 53 B2 31 20 A4 20 52 3A |..k.... S.1 . R:|
00001240: 53 36 B2 52 55 AA 36 AC 53 3A 59 4C B2 C2 28 53 |S6.RU.6.S:YL..(S|
00001250: 36 AB 36 29 20 20 20 3A 8F 20 4F 50 44 52 41 43 |6.6) :. OPDRAC|
00001260: 48 54 20 52 45 47 45 4C 20 53 2E 00 AE 1A BA 01 |HT REGEL S......|
00001270: 59 48 B2 C2 28 53 36 AB 35 29 3A 53 31 B2 C2 28 |YH..(S6.5):S1..(|
00001280: 53 36 AB 34 29 3A 53 32 B2 C2 28 53 36 AB 33 29 |S6.4):S2..(S6.3)|
00001290: 3A 4E 4E B2 53 31 20 AF 20 31 39 32 3A 53 31 B2 |:NN.S1 . 192:S1.|
000012A0: 53 31 AB 4E 4E 3A 4E 4E B2 4E 4E AD 36 34 00 F2 |S1.NN:NN.NN.64..|
000012B0: 1A BB 01 4F 4C B2 C2 28 53 36 AB 32 29 3A 4F 48 |...OL..(S6.2):OH|
000012C0: B2 C2 28 53 36 AB 31 29 3A 4E 53 B2 28 53 32 20 |..(S6.1):NS.(S2 |
000012D0: AF 20 32 34 29 AD 38 3A 50 B2 28 53 32 20 AF 20 |. 24).8:P.(S2 . |
000012E0: 39 36 29 AD 33 32 3A 58 4C B2 59 4C 3A 58 48 B2 |96).32:XL.YL:XH.|
000012F0: 59 48 00 24 1B BC 01 4D 24 B2 22 20 20 20 20 20 |YH.$...M$." |
00001300: 20 22 3A 8D 20 36 30 3A 8B 20 49 B3 31 20 A7 20 | ":. 60:. I.1 . |
00001310: 34 34 36 20 20 20 3A 8F 20 5A 4F 45 4B 20 4C 41 |446 :. ZOEK LA|
00001320: 42 45 4C 2E 00 3B 1B BD 01 47 B2 49 3A 8D 20 36 |BEL..;...G.I:. 6|
00001330: 35 3A 4D 24 B2 4B 24 AA 22 20 22 00 71 1B BE 01 |5:M$.K$." ".q...|
00001340: 8B 20 53 31 B2 36 33 20 A7 20 4D 24 B2 4D 24 AA |. S1.63 . M$.M$.|
00001350: 22 2E 42 59 54 45 20 22 3A 47 B2 C2 28 58 4C AA |".BYTE ":G..(XL.|
00001360: 32 35 36 AC 58 48 29 3A 4B B2 33 3A 89 20 34 36 |256.XH):K.3:. 46|
00001370: 36 00 82 1B C2 01 8B 20 4E 4E B2 30 20 A7 20 34 |6...... NN.0 . 4|
00001380: 36 30 00 B3 1B C3 01 8D 20 38 30 3A 8B 20 4A 56 |60...... 80:. JV|
00001390: B2 30 20 A7 20 34 36 30 20 20 20 20 20 20 20 20 |.0 . 460 |
000013A0: 20 20 20 20 20 20 3A 8F 20 53 55 42 50 41 53 53 | :. SUBPASS|
000013B0: 20 31 2E 00 E7 1B C4 01 4D 24 B2 4D 24 AA 22 2E | 1......M$.M$.".|
000013C0: 42 59 54 45 20 22 3A 47 B2 C2 28 59 4C AA 32 35 |BYTE ":G..(YL.25|
000013D0: 36 AC 59 48 29 3A 4B B2 33 3A 8D 20 37 30 3A 4D |6.YH):K.3:. 70:M|
000013E0: 24 B2 4D 24 AA 47 24 00 12 1C C5 01 4D 24 B2 C8 |$.M$.G$.....M$..|
000013F0: 28 28 4D 24 AA 53 24 28 53 32 20 AF 20 37 29 AA |((M$.S$(S2 . 7).|
00001400: 22 20 20 20 20 20 20 22 29 2C 31 39 29 AA 22 20 |" "),19)." |
00001410: 3B 22 00 54 1C C6 01 8D 20 39 36 20 20 20 20 20 |;".T.... 96 |
00001420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001430: 20 20 20 20 20 20 20 20 20 20 3A 8F 20 4F 55 54 | :. OUT|
00001440: 20 45 45 52 53 54 45 20 2E 42 59 54 45 2D 52 45 | EERSTE .BYTE-RE|
00001450: 47 45 4C 2E 00 86 1C C7 01 8D 20 38 35 3A 89 20 |GEL....... 85:. |
00001460: 34 39 30 20 20 20 20 20 20 20 20 20 20 20 20 20 |490 |
00001470: 20 20 20 20 20 20 20 20 20 3A 8F 20 53 55 42 50 | :. SUBP|
00001480: 41 53 53 20 32 2E 00 C1 1C CC 01 4D 24 B2 4D 24 |ASS 2......M$.M$|
00001490: AA C7 28 C2 28 34 30 37 33 36 AA 53 31 29 29 AA |..(.(40736.S1)).|
000014A0: C7 28 C2 28 34 30 38 30 30 AA 53 31 29 29 AA C7 |.(.(40800.S1))..|
000014B0: 28 C2 28 34 30 38 36 34 AA 53 31 29 29 AA 22 20 |(.(40864.S1))." |
000014C0: 22 00 E7 1C CD 01 8B 20 4E 53 B2 30 20 A7 20 4D |"...... NS.0 . M|
000014D0: 24 B2 4D 24 AA 22 20 20 20 20 20 20 20 20 20 20 |$.M$." |
000014E0: 22 3A 89 20 34 37 30 00 18 1D CE 01 4D 24 B2 4D |":. 470.....M$.M|
000014F0: 24 AA C7 28 C2 28 34 30 32 32 34 AA 50 29 29 3A |$..(.(40224.P)):|
00001500: 4B B2 33 3A 8B 20 28 53 32 20 AF 20 31 32 38 29 |K.3:. (S2 . 128)|
00001510: B2 30 20 A7 20 34 36 35 00 4D 1D CF 01 58 4C B2 |.0 . 465.M...XL.|
00001520: 4F 4C 3A 58 48 B2 4F 48 3A 8D 20 36 30 3A 8B 20 |OL:XH.OH:. 60:. |
00001530: 49 B3 31 20 A7 20 34 36 35 20 20 20 3A 8F 20 4C |I.1 . 465 :. L|
00001540: 41 42 45 4C 2D 4F 50 45 52 41 4E 44 3F 00 69 1D |ABEL-OPERAND?.i.|
00001550: D0 01 47 B2 49 3A 8D 20 36 35 3A 4D 24 B2 4D 24 |..G.I:. 65:M$.M$|
00001560: AA 4B 24 3A 89 20 34 37 30 00 8C 1D D1 01 47 B2 |.K$:. 470.....G.|
00001570: 4F 4C 3A 8B 20 4E 53 B2 32 20 A7 20 47 B2 47 AA |OL:. NS.2 . G.G.|
00001580: 32 35 36 AC 4F 48 3A 4B B2 4B AA 32 00 9E 1D D2 |256.OH:K.K.2....|
00001590: 01 8D 20 37 30 3A 4D 24 B2 4D 24 AA 47 24 00 DE |.. 70:M$.M$.G$..|
000015A0: 1D D6 01 53 41 B2 53 32 20 AF 20 37 20 20 20 20 |...SA.S2 . 7 |
000015B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000015C0: 20 20 20 20 20 20 20 20 3A 8F 20 4C 41 54 45 52 | :. LATER|
000015D0: 20 49 4E 20 4D 41 43 48 2E 43 4F 44 45 2E 00 12 | IN MACH.CODE...|
000015E0: 1E D7 01 55 24 B2 C7 28 C2 28 34 30 32 33 32 AA |...U$..(.(40232.|
000015F0: 53 41 29 29 AA C7 28 C2 28 34 30 32 34 30 AA 53 |SA))..(.(40240.S|
00001600: 41 29 29 AA C7 28 C2 28 34 30 32 34 38 AA 53 41 |A))..(.(40248.SA|
00001610: 29 29 00 35 1E D8 01 4D 24 B2 C8 28 28 4D 24 AA |)).5...M$..((M$.|
00001620: 55 24 AA 22 20 20 20 20 20 20 22 29 2C 31 39 29 |U$." "),19)|
00001630: AA 22 20 3B 22 00 72 1E E0 01 8D 20 39 36 20 20 |." ;".r.... 96 |
00001640: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001650: 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 | :. |
00001660: 4F 55 54 20 47 45 44 49 53 53 2E 20 52 45 47 45 |OUT GEDISS. REGE|
00001670: 4C 2E 00 7A 1E EA 01 82 20 53 00 B4 1E EB 01 4D |L..z.... S.....M|
00001680: 24 B2 22 20 20 20 20 20 20 2E 45 4E 44 22 3A 8D |$." .END":.|
00001690: 20 39 36 20 20 20 20 20 20 20 20 20 20 20 20 20 | 96 |
000016A0: 20 20 3A 8F 20 2E 45 4E 44 2D 44 49 52 45 43 54 | :. .END-DIRECT|
000016B0: 49 45 46 2E 00 E5 1E EC 01 8B 20 55 56 B2 33 20 |IEF....... UV.3 |
000016C0: A7 20 98 35 2C C7 28 32 37 29 22 40 22 20 20 20 |. .5,.(27)"@" |
000016D0: 20 20 20 20 3A 8F 20 52 45 53 45 54 20 50 52 49 | :. RESET PRI|
000016E0: 4E 54 45 52 2E 00 21 1F ED 01 8D 20 39 38 3A 89 |NTER..!.... 98:.|
000016F0: 20 39 30 39 39 20 20 20 20 20 20 20 20 20 20 20 | 9099 |
00001700: 20 20 20 20 20 20 20 20 20 20 3A 8F 20 53 4C 55 | :. SLU|
00001710: 49 54 20 52 41 4E 44 41 50 50 41 52 41 54 45 4E |IT RANDAPPARATEN|
00001720: 2E 00 63 1F 84 03 41 B2 30 30 37 30 30 3A 42 B2 |..c...A.00700:B.|
00001730: 41 AA 36 3A 43 B2 42 AA 36 3A 44 B2 43 AA 36 3A |A.6:C.B.6:D.C.6:|
00001740: 45 B2 44 AA 36 3A 46 B2 45 AA 36 3A 47 B2 46 AA |E.D.6:F.E.6:G.F.|
00001750: 36 3A 48 B2 47 AA 36 3A 49 B2 48 AA 36 3A 4A B2 |6:H.G.6:I.H.6:J.|
00001760: 49 AA 36 00 9D 1F 85 03 97 41 AA 30 2C 31 37 33 |I.6......A.0,173|
00001770: 3A 97 41 AA 31 2C 30 30 30 3A 97 41 AA 32 2C 30 |:.A.1,000:.A.2,0|
00001780: 30 30 3A 97 41 AA 33 2C 31 37 30 3A 97 41 AA 34 |00:.A.3,170:.A.4|
00001790: 2C 30 34 31 3A 97 41 AA 35 2C 30 31 35 00 D7 1F |,041:.A.5,015...|
000017A0: 86 03 97 42 AA 30 2C 31 36 38 3A 97 42 AA 31 2C |...B.0,168:.B.1,|
000017B0: 31 33 38 3A 97 42 AA 32 2C 31 30 36 3A 97 42 AA |138:.B.2,106:.B.|
000017C0: 33 2C 31 30 36 3A 97 42 AA 34 2C 31 30 36 3A 97 |3,106:.B.4,106:.|
000017D0: 42 AA 35 2C 31 30 36 00 11 20 87 03 97 43 AA 30 |B.5,106.. ...C.0|
000017E0: 2C 30 34 31 3A 97 43 AA 31 2C 30 31 35 3A 97 43 |,041:.C.1,015:.C|
000017F0: AA 32 2C 31 37 30 3A 97 43 AA 33 2C 31 38 39 3A |.2,170:.C.3,189:|
00001800: 97 43 AA 34 2C 32 31 32 3A 97 43 AA 35 2C 30 30 |.C.4,212:.C.5,00|
00001810: 32 00 4B 20 88 03 97 44 AA 30 2C 31 37 30 3A 97 |2.K ...D.0,170:.|
00001820: 44 AA 31 2C 31 38 35 3A 97 44 AA 32 2C 32 31 32 |D.1,185:.D.2,212|
00001830: 3A 97 44 AA 33 2C 30 30 32 3A 97 44 AA 34 2C 30 |:.D.3,002:.D.4,0|
00001840: 39 36 3A 97 44 AA 35 2C 30 30 30 00 85 20 89 03 |96:.D.5,000.. ..|
00001850: 97 45 AA 30 2C 30 34 38 3A 97 45 AA 31 2C 30 34 |.E.0,048:.E.1,04|
00001860: 39 3A 97 45 AA 32 2C 30 35 30 3A 97 45 AA 33 2C |9:.E.2,050:.E.3,|
00001870: 30 35 31 3A 97 45 AA 34 2C 30 35 32 3A 97 45 AA |051:.E.4,052:.E.|
00001880: 35 2C 30 35 33 00 BF 20 8A 03 97 46 AA 30 2C 30 |5,053.. ...F.0,0|
00001890: 35 34 3A 97 46 AA 31 2C 30 35 35 3A 97 46 AA 32 |54:.F.1,055:.F.2|
000018A0: 2C 30 35 36 3A 97 46 AA 33 2C 30 35 37 3A 97 46 |,056:.F.3,057:.F|
000018B0: AA 34 2C 30 36 35 3A 97 46 AA 35 2C 30 36 36 00 |.4,065:.F.5,066.|
000018C0: F9 20 8B 03 97 47 AA 30 2C 30 36 37 3A 97 47 AA |. ...G.0,067:.G.|
000018D0: 31 2C 30 36 38 3A 97 47 AA 32 2C 30 36 39 3A 97 |1,068:.G.2,069:.|
000018E0: 47 AA 33 2C 30 37 30 3A 97 47 AA 34 2C 30 30 30 |G.3,070:.G.4,000|
000018F0: 3A 97 47 AA 35 2C 31 36 39 00 33 21 8C 03 97 48 |:.G.5,169.3!...H|
00001900: AA 30 2C 30 31 39 3A 97 48 AA 31 2C 31 34 31 3A |.0,019:.H.1,141:|
00001910: 97 48 AA 32 2C 31 31 39 3A 97 48 AA 33 2C 30 30 |.H.2,119:.H.3,00|
00001920: 32 3A 97 48 AA 34 2C 31 36 32 3A 97 48 AA 35 2C |2:.H.4,162:.H.5,|
00001930: 30 30 30 00 6D 21 8D 03 97 49 AA 30 2C 31 33 34 |000.m!...I.0,134|
00001940: 3A 97 49 AA 31 2C 31 39 38 3A 97 49 AA 32 2C 32 |:.I.1,198:.I.2,2|
00001950: 30 32 3A 97 49 AA 33 2C 31 36 39 3A 97 49 AA 34 |02:.I.3,169:.I.4|
00001960: 2C 30 31 33 3A 97 49 AA 35 2C 31 35 37 00 A7 21 |,013:.I.5,157..!|
00001970: 8E 03 97 4A AA 30 2C 31 32 30 3A 97 4A AA 31 2C |...J.0,120:.J.1,|
00001980: 30 30 32 3A 97 4A AA 32 2C 32 30 32 3A 97 4A AA |002:.J.2,202:.J.|
00001990: 33 2C 30 31 36 3A 97 4A AA 34 2C 32 35 30 3A 97 |3,016:.J.4,250:.|
000019A0: 4A AA 35 2C 30 39 36 00 D9 21 8F 03 99 20 C7 28 |J.5,096..!... .(|
000019B0: 31 34 37 29 3A 99 3A 85 20 22 42 45 47 49 4E 52 |147):.:. "BEGINR|
000019C0: 45 47 45 4C 4E 55 4D 4D 45 52 20 28 33 30 30 30 |EGELNUMMER (3000|
000019D0: 2D 37 39 39 39 29 22 3B 52 00 F5 21 90 03 8B 20 |-7999)";R..!... |
000019E0: 52 B3 33 30 30 30 20 B0 20 52 B1 37 39 39 39 20 |R.3000 . R.7999 |
000019F0: A7 20 39 31 31 00 17 22 98 03 85 20 22 42 45 47 |. 911.."... "BEG|
00001A00: 49 4E 41 44 52 45 53 20 48 45 58 44 41 54 41 4D |INADRES HEXDATAM|
00001A10: 41 4B 45 52 22 3B 41 00 29 22 99 03 8B 20 41 B3 |AKER";A.)"... A.|
00001A20: 32 35 35 20 A7 20 39 32 30 00 4B 22 9A 03 85 20 |255 . 920.K"... |
00001A30: 22 20 45 49 4E 44 41 44 52 45 53 20 48 45 58 44 |" EINDADRES HEXD|
00001A40: 41 54 41 4D 41 4B 45 52 22 3B 5A 00 65 22 9B 03 |ATAMAKER";Z.e"..|
00001A50: 8B 20 5A B1 35 33 32 34 37 20 B0 20 41 B1 5A 20 |. Z.53247 . A.Z |
00001A60: A7 20 39 32 30 00 80 22 9C 03 99 20 C7 28 31 34 |. 920.."... .(14|
00001A70: 37 29 3A 99 20 52 AB 35 22 44 41 54 41 22 41 3B |7):. R.5"DATA"A;|
00001A80: 00 B9 22 9D 03 99 20 22 22 3A 99 20 22 41 3D 22 |.."... "":. "A="|
00001A90: 41 22 3A 52 3D 22 52 22 3A 5A 3D 22 5A 22 3A 47 |A":R="R":Z="Z":G|
00001AA0: 4F 54 4F 20 39 33 30 22 3B 3A 97 20 37 34 37 2C |OTO 930";:. 747,|
00001AB0: 35 3A 9E 20 37 34 31 3A 80 00 D2 22 A2 03 99 20 |5:. 741:..."... |
00001AC0: C7 28 31 34 37 29 3A 8B 20 41 B1 5A 20 A7 20 39 |.(147):. A.Z . 9|
00001AD0: 34 37 00 EB 22 A3 03 99 20 52 22 44 41 54 41 22 |47.."... R"DATA"|
00001AE0: 3B 3A 81 20 49 B2 30 20 A4 20 33 00 23 23 AC 03 |;:. I.0 . 3.##..|
00001AF0: 99 20 22 20 22 3B 3A 81 20 4A B2 30 20 A4 20 37 |. " ";:. J.0 . 7|
00001B00: 3A 44 B2 41 AA 38 AC 49 AA 4A 3A 51 B2 B5 28 44 |:D.A.8.I.J:Q..(D|
00001B10: AD 32 35 36 29 3A 97 20 37 30 31 2C 44 AB 32 35 |.256):. 701,D.25|
00001B20: 36 AC 51 00 53 23 AD 03 97 20 37 30 32 2C 51 3A |6.Q.S#... 702,Q:|
00001B30: 9E 20 37 30 30 3A 99 20 C7 28 C2 28 37 38 31 29 |. 700:. .(.(781)|
00001B40: 29 C7 28 C2 28 37 38 30 29 29 3B 3A 82 20 4A 3A |).(.(780));:. J:|
00001B50: 82 20 49 00 92 23 B1 03 99 20 22 22 3A 99 20 22 |. I..#... "":. "|
00001B60: 41 3D 22 41 AA 33 32 22 3A 52 3D 22 52 AA 31 30 |A="A.32":R="R.10|
00001B70: 22 3A 5A 3D 22 5A 22 3A 47 4F 54 4F 20 39 33 30 |":Z="Z":GOTO 930|
00001B80: 22 3B 3A 97 20 37 34 37 2C 34 3A 9E 20 37 34 31 |";:. 747,4:. 741|
00001B90: 3A 80 00 BF 23 B3 03 99 20 C7 28 31 34 37 29 3A |:...#... .(147):|
00001BA0: 99 20 52 22 44 41 54 41 20 26 22 3B 3A 99 20 22 |. R"DATA &";:. "|
00001BB0: 22 3A 99 20 22 47 4F 54 4F 20 39 34 39 22 3B 00 |":. "GOTO 949";.|
00001BC0: D3 23 B4 03 97 20 37 34 37 2C 33 3A 9E 20 37 34 |.#... 747,3:. 74|
00001BD0: 31 3A 80 00 D9 23 B5 03 80 00 F1 23 AC 0D 99 3A |1:...#.....#...:|
00001BE0: 99 20 22 57 41 43 48 54 20 45 56 45 4E 2E 22 3A |. "WACHT EVEN.":|
00001BF0: 99 00 1D 24 AD 0D 87 20 41 54 3A 5A 54 B2 41 54 |...$... AT:ZT.AT|
00001C00: 3A 99 20 22 42 45 47 49 4E 41 44 52 45 53 20 3D |:. "BEGINADRES =|
00001C10: 22 5A 54 3B C7 28 31 35 37 29 22 2E 22 00 37 24 |"ZT;.(157)".".7$|
00001C20: AE 0D 97 20 32 35 33 2C 33 35 3A 97 20 32 35 34 |... 253,35:. 254|
00001C30: 2C C2 28 36 34 38 29 00 56 24 B6 0D 87 20 4B 24 |,.(648).V$... K$|
00001C40: 3A 4B B2 C3 28 4B 24 29 3A 57 B2 30 3A 81 20 4A |:K..(K$):W.0:. J|
00001C50: B2 31 20 A4 20 4B 00 77 24 C0 0D 55 B2 C6 28 CA |.1 . K.w$..U..(.|
00001C60: 28 4B 24 2C 4A 2C 31 29 29 3A 8B 20 55 B2 33 38 |(K$,J,1)):. U.38|
00001C70: 20 A7 20 33 35 39 30 00 89 24 C5 0D 8B 20 55 B3 | . 3590..$... U.|
00001C80: 34 38 20 A7 20 33 35 36 30 00 A4 24 C6 0D 8B 20 |48 . 3560..$... |
00001C90: 55 B3 35 38 20 A7 20 55 B2 55 AB 34 38 3A 89 20 |U.58 . U.U.48:. |
00001CA0: 33 35 33 30 00 B6 24 C7 0D 8B 20 55 B3 36 35 20 |3530..$... U.65 |
00001CB0: A7 20 33 35 36 30 00 D1 24 C8 0D 8B 20 55 B3 37 |. 3560..$... U.7|
00001CC0: 31 20 A7 20 55 B2 55 AB 35 35 3A 89 20 33 35 33 |1 . U.U.55:. 353|
00001CD0: 30 00 DC 24 C9 0D 89 20 33 35 36 30 00 F7 24 CA |0..$... 3560..$.|
00001CE0: 0D 8B 20 57 B2 30 20 A7 20 5A B2 55 3A 57 B2 31 |.. W.0 . Z.U:W.1|
00001CF0: 3A 89 20 33 35 36 30 00 0B 25 D4 0D 5A B2 5A AC |:. 3560..%..Z.Z.|
00001D00: 31 36 AA 55 3A 97 20 41 54 2C 5A 00 1B 25 DE 0D |16.U:. AT,Z..%..|
00001D10: 41 54 B2 41 54 AA 31 3A 57 B2 30 00 2A 25 E8 0D |AT.AT.1:W.0.*%..|
00001D20: 82 20 4A 3A 89 20 33 35 31 30 00 57 25 06 0E 41 |. J:. 3510.W%..A|
00001D30: 54 B2 41 54 AB 31 3A 99 20 22 20 45 49 4E 44 41 |T.AT.1:. " EINDA|
00001D40: 44 52 45 53 20 3D 22 41 54 3B C7 28 31 35 37 29 |DRES ="AT;.(157)|
00001D50: 22 2E 22 3A 99 3A 8E 00 91 25 A5 0F 83 20 34 39 |".":.:...%... 49|
00001D60: 39 32 30 20 20 20 20 20 20 20 20 20 20 20 20 20 |920 |
00001D70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001D80: 3A 8F 20 54 45 53 54 50 52 4F 47 52 41 4D 4D 41 |:. TESTPROGRAMMA|
00001D90: 2E 00 DB 25 AA 0F 83 20 41 30 33 43 39 30 32 45 |...%... A03C902E|
00001DA0: 42 30 33 34 41 39 31 38 20 37 31 44 34 39 39 30 |B034A918 71D4990|
00001DB0: 31 43 33 31 38 42 36 31 35 20 34 36 31 46 34 41 |1C318B615 461F4A|
00001DC0: 33 30 46 34 32 30 33 39 43 33 20 41 39 43 33 38 |30F42039C3 A9C38|
00001DD0: 44 33 30 43 33 38 45 30 31 43 33 00 25 26 AF 0F |D30C38E01C3.%&..|
00001DE0: 83 20 41 39 32 35 38 44 32 46 43 33 38 43 33 39 |. A9258D2FC38C39|
00001DF0: 43 33 20 36 43 32 46 43 33 31 30 45 35 39 30 45 |C3 6C2FC310E590E|
00001E00: 32 30 30 20 45 41 35 30 39 43 37 44 32 46 43 33 |200 EA509C7D2FC3|
00001E10: 32 30 33 41 20 43 33 36 30 30 30 38 44 30 44 43 |203A C360008D0DC|
00001E20: 33 41 45 31 39 00 71 26 B4 0F 83 20 43 33 33 44 |3AE19.q&... C33D|
00001E30: 31 39 43 33 35 30 46 35 42 30 31 37 20 38 43 36 |19C350F5B017 8C6|
00001E40: 30 43 33 41 45 31 34 43 33 36 35 39 38 20 31 30 |0C3AE14C36598 10|
00001E50: 45 30 36 30 45 41 45 41 41 44 32 46 43 33 20 46 |E060EAEAAD2FC3 F|
00001E60: 30 41 36 35 30 41 33 46 45 33 30 43 33 42 43 20 |0A650A3FE30C3BC |
00001E70: 26 00 8D 26 70 17 85 20 22 34 20 48 45 58 41 44 |&..&p.. "4 HEXAD|
00001E80: 45 43 2E 54 45 4B 45 4E 53 22 3B 41 24 00 B6 26 |EC.TEKENS";A$..&|
00001E90: 7A 17 81 20 55 B2 30 20 A4 20 33 3A 97 20 37 30 |z.. U.0 . 3:. 70|
00001EA0: 30 AA 55 2C C6 28 CA 28 41 24 2C 55 AA 31 2C 31 |0.U,.(.(A$,U.1,1|
00001EB0: 29 29 3A 82 20 55 00 D5 26 84 17 97 20 32 35 34 |)):. U..&... 254|
00001EC0: 2C 32 3A 97 20 32 35 33 2C 31 38 38 20 20 3A 8F |,2:. 253,188 :.|
00001ED0: 20 37 30 30 2E 00 F5 26 8E 17 9E 20 34 30 30 31 | 700...&... 4001|
00001EE0: 36 3A 56 B2 C2 28 32 35 31 29 AA 32 35 36 AC C2 |6:V..(251).256..|
00001EF0: 28 32 35 32 29 00 06 27 98 17 99 20 22 55 49 54 |(252)..'... "UIT|
00001F00: 20 3D 22 56 3A 99 00 17 27 A2 17 8B 20 56 B1 30 | ="V:...'... V.0|
00001F10: 20 A7 20 36 30 30 30 00 1D 27 AC 17 90 00 38 27 | . 6000..'....8'|
00001F20: 40 1F 99 20 22 4E 49 45 54 20 44 4F 4F 52 20 44 |@.. "NIET DOOR D|
00001F30: 45 20 44 41 54 41 21 22 00 3E 27 41 1F 90 00 64 |E DATA!".>'A...d|
00001F40: 27 34 21 85 20 22 52 45 47 45 4C 4E 55 4D 4D 45 |'4!. "REGELNUMME|
00001F50: 52 22 3B 52 3A 8B 20 52 B3 30 37 33 30 20 A7 20 |R";R:. R.0730 . |
00001F60: 39 30 39 39 00 8C 27 3E 21 41 B2 33 36 30 30 30 |9099..'>!A.36000|
00001F70: AA 33 32 AC B5 28 28 52 AB 37 33 30 29 AD 31 30 |.32..((R.730).10|
00001F80: 29 3A 99 20 41 3A 89 20 38 35 30 30 00 9A 27 28 |):. A:. 8500..'(|
00001F90: 23 94 22 54 45 4D 44 22 2C 38 00 B2 27 29 23 99 |#."TEMD",8..')#.|
00001FA0: 3A 99 20 22 54 45 4D 44 20 53 41 56 45 44 2E 22 |:. "TEMD SAVED."|
00001FB0: 3A 99 00 C0 27 2A 23 95 22 54 45 4D 44 22 2C 38 |:...'*#."TEMD",8|
00001FC0: 00 DB 27 2B 23 99 3A 99 20 22 54 45 4D 44 20 56 |..'+#.:. "TEMD V|
00001FD0: 45 52 49 46 49 45 44 2E 22 3A 99 00 FA 27 32 23 |ERIFIED.":...'2#|
00001FE0: 9F 20 35 2C 38 2C 31 35 2C 22 53 30 3A 50 52 4F |. 5,8,15,"S0:PRO|
00001FF0: 44 49 53 2E 42 41 53 2F 4F 22 00 20 28 33 23 98 |DIS.BAS/O". (3#.|
00002000: 35 2C 22 52 30 3A 50 52 4F 44 49 53 2E 42 41 53 |5,"R0:PRODIS.BAS|
00002010: 2F 4F 3D 30 3A 50 52 4F 44 49 53 2E 42 41 53 22 |/O=0:PRODIS.BAS"|
00002020: 00 3E 28 34 23 98 35 2C 22 52 30 3A 50 52 4F 44 |.>(4#.5,"R0:PROD|
00002030: 49 53 2E 42 41 53 3D 30 3A 54 45 4D 44 22 00 46 |IS.BAS=0:TEMD".F|
00002040: 28 37 23 A0 20 35 00 75 28 3C 23 99 3A 99 20 22 |(7#. 5.u(<#.:. "|
00002050: 56 45 52 53 49 45 5A 45 54 20 50 52 4F 44 49 53 |VERSIEZET PRODIS|
00002060: 2E 42 41 53 20 4B 4C 41 41 52 2E 22 3A 99 3A 89 |.BAS KLAAR.":.:.|
00002070: 20 39 30 39 39 00 7F 28 5A 23 9F 20 34 2C 34 00 | 9099..(Z#. 4,4.|
00002080: 95 28 5F 23 98 34 2C 20 C7 28 32 37 29 22 42 22 |.(_#.4, .(27)"B"|
00002090: C7 28 30 32 29 00 AB 28 60 23 98 34 2C 20 C7 28 |.(02)..(`#.4, .(|
000020A0: 32 37 29 22 4D 22 C7 28 31 30 29 00 C2 28 61 23 |27)"M".(10)..(a#|
000020B0: 98 34 2C 20 C7 28 32 37 29 C7 28 39 32 29 C7 28 |.4, .(27).(92).(|
000020C0: 31 29 00 CA 28 64 23 9D 20 34 00 D5 28 69 23 89 |1)..(d#. 4..(i#.|
000020D0: 20 39 30 39 39 00 DF 28 6E 23 9F 20 34 2C 34 00 | 9099..(n#. 4,4.|
000020E0: FC 28 73 23 98 34 2C 20 22 20 20 20 20 45 49 4E |.(s#.4, " EIN|
000020F0: 44 20 56 41 4E 20 4C 49 53 54 2E 22 00 0D 29 74 |D VAN LIST."..)t|
00002100: 23 98 34 2C 20 C7 28 32 37 29 22 40 22 00 14 29 |#.4, .(27)"@"..)|
00002110: 78 23 98 34 00 1C 29 7D 23 A0 20 34 00 27 29 7E |x#.4..)}#. 4.')~|
00002120: 23 89 20 39 30 39 39 00 2D 29 8B 23 80 00 00 00 |#. 9099.-).#....|
..=.... 100 :. PROGRAMMA PRODIS.BAS D
ISSEMBLER MET LABELS....... 100 :. LA
BELS WORDEN AANGEMAAKT. KEUZE: DECIMAAL
OF HEXADEC..H.... 9000 :. VERSIE
ZET. TAAL: BASIC.
......
******** DATUM: 30 AUG.1989..
N.... 9050 :. LIST.
* RES1 *...... 9070 :. END
LIST. ********.P...A.0082
0:Z..(G) :. GETAL
G MET K HEXTEKENS IN G$....... 39888:G$.
""...... U.0 . 3:G$.G$.G(B(A.U)):. U:G$.
"$".I(G$,K.1):..`...A.00820:Z..(G)
:. GETAL G MET K CIJFER
S IN G$..R.... 39744:G$.""...... U.0 . 4
:G$.G$.G(B(A.U)):. U:G$.I(G$,K):....#.XL
.XL.1:. XL.256 . . :. HOOG XL,X
H OP MET 1....$.XL.XL.256:XH.XH.1:....(.
. 28,AL:. 29,AH:. 30,S1 :. REGEL..
O.).. 31,S2:. 33,OL:. 34,OH:. 37834:VA.B
(757):....-.. UV..2 . .
:. STATUS VAN DISK....... 9,8,15:.9,A$
,B$,C$,D$.L./..:. "SCHIJF "A$", "B$", "C
$", "D$".":..V.0. 9:....2.. 26,XL:. 27,
XH :. LABEL..7.3.. 3787
6:. B(781).0 . . :. ITEM STAAT ER AL..
K.4.. 37792:VB.B(758):. :. VUL
NIEUW ITEM....<.I.L
:. ZOEK ITEM IN LABELTABE
L....=.. (XH.B(LU.I.I.1)) . (XL.B(LU.I.I
.2)) . 63...>.I.I.1:. I.0 . 61...?...=.A
.K.3:. 25:K$.L$.G$:. :. MAAK L
ABEL OF LABELOPERAND...F.. DC.1 . . 25:
. :. DECIMAAL (DC=1) OF HEXADE
CIMAAL....G.. 20:.
:. GETAL G IN K CIJFERS IN G$....P.XL.
YL:XH.YH:JV.0:. U.0 . NN.1 :. SUBP
ASS 1....Q.. 35:. 60:. I.0 . J(U).I:JV.1
.".R.. U:..X.U.XL.YL:XH.YH:. U.0 . NN.1
:. SUBPASS 2....V.M$." ":
. J(U).0 . G.J(U):. 65:M$.K$...W.M$.M$."
.BYTE ":. 35:G.B(XL.256.XH):. 70...X.M$
.M$.G$:M$.H((M$." "),19)." ;":.
96...Y.. U:..4.Z.CT$.G(127):. UV . 92,9
3,94 :. OPEN RANDAPPARAAT OP UV=0
..3..O.[.. G(147):.
:. SCHERM....\.. 5,1,1,N$."
,S,W":. :. T
APE....].. 5,8,3,N$.",S,W":.
:. DISC..#.^.. 5,4:.5,G
(27)"M"G(20):.5," D I S S E M B L A G E
.".Q._..5:.5," VELD VAN "AB" T/M "AE;CT
$".":.5:....`.. UV.0 . .5,M$
:. OUTPUT VAN REGEL....A.. M$:..M.B.
. UV.0 . 5 :. SLUIT
RANDAPPARAAT....C.. "EINDE VAN DISSEMBLA
GE.":....D.N$."COD.DISSEM":L.C(N$):. 700
,L:. I.1 . L.;.E.. 700.I,F(J(N$,I,1)):.
I:..B.F.. "MACHINECODE "N$" INLEZEN...."
:....N.A.49152:B.A.6:C.B.6:D.C.6:E.D.6
:. BOOTSTRAP..Y.O..A.0,169:.A.1,00
1:.A.2,162 :.A.3,008:.A.4,160:.A.5,00
1...P..B.0,032:.B.1,186:.B.2,255 :.B.
3,173:.B.4,188:.B.5,002.U.Q..C.0,162:.C.
1,189:.C.2,160 :.C.3,002:.C.4,032:.C.
5,189...R..D.0,255:.D.1,169:.D.2,000
:.D.3,162:.D.4,255:.D.5,160.Q.S..E.0,255
:.E.1,032:.E.2,213 :.E.3,255:.E.4,096
:.E.5,000...T.. 49152:. ST.64 . 120...U.
.:. "LAADFOUT:TOESTAND "ST:.:. 9099.^.X.
A.00680:B.A.6 :
. USR(X) SPLITS X IN LS EN HS....Y..A.0,
032:.A.1,247:.A.2,183 :.A.3,165:.A.4,
020:.A.5,133.Z.Z..B.0,167:.B.1,165:.B.2,
021 :.B.3,133:.B.4,168:.B.5,096...{..
785,168:. 786,002 :. S.P.6
80; UIT: (168,167)..B...RU.17920:LU.3085
2:ZU.32768:VU.38832:WU.00832:BU.00700 :.
GEBIEDEN......Z..(RU):. 40928,B(167):.
40929,B(168) :. REGELS @ 6..X...Z..(LU
):. 40930,B(167):. 40931,B(168) :. LAB
ELS @ 2......Z..(ZU):. 40932,B(167):. 40
933,B(168) :. EIND+1..M...Z..(VU):. 40
934,B(167):. 40935,B(168) :. VOORBLOK
TEXT......Z..(WU):. 40936,B(167):. 40937
,B(168) :. WERKGEBIED..E...Z..(BU):. 4
0938,B(167):. 40939,B(168) :. BESTANDS
NAAM......OU.40256
:. GEBIED OPCODE
S..M...Z..(OU):. 40940,B(167):. 40941,B(
168) :. BEGINADRES......NO.151
:. AANTAL OPCOD
ES....... 40942,NO.W.... 3500
:. ZET TESTPROGRAMMA..
..... 36000
:. MACHINE-H.P..K...RM.B(752).256.B(753
) :. MAX.AANTAL REGELS......
LM.B(754).256.B(755) :. MAX.
AANTAL LABELS..F...DC.B(756)
:. DC-VLAG; DECIMAAL=1...
...AB.B(760).256.B(761) :. B
EGINADRES..-...AE.B(762).256.B(763)
:. EINDADRES..C. .L$.G(B(720)).G
(B(721)) :. LABEL BEGINLETTERS......
UV.B(751) :. A
PPARAATNUMMER..C...N$."":B.B(169).256.B(
170):L.B(B)...... I.1 . L:N$.N$.G(B(B.I)
):. I...... 40256 TABEL OPCODES....... 4
0416 TABEL STUUR-1..6.... 40576 TABEL ST
UUR-2..P.... 40736 TABEL MNEM-1..J.... 4
0800 TABEL MNEM-2....... 40864 TABEL MNE
M-3.......:. "DOORGANG 2.":....... 90:.
UV.0 . UV.3 . 440...... ST..0 . ST..64 .
. "OPENEN FOUT.":. 45:. 9099.1...M$."
*=":K.5:G.AB:. 70:M$.M$.G$:. 96
:. EERSTE REGEL..K.... S.1 . R:S6.RU.6.
S:YL.B(S6.6) :. OPDRACHT REGEL S......
YH.B(S6.5):S1.B(S6.4):S2.B(S6.3):NN.S1 .
192:S1.S1.NN:NN.NN.64.....OL.B(S6.2):OH
.B(S6.1):NS.(S2 . 24).8:P.(S2 . 96).32:X
L.YL:XH.YH.$...M$." ":. 60:. I.1 .
446 :. ZOEK LABEL..;...G.I:. 65:M$.K$.
" ".Q.... S1.63 . M$.M$.".BYTE ":G.B(XL.
256.XH):K.3:. 466...B.. NN.0 . 460...C..
80:. JV.0 . 460 :. SUBPASS
1....D.M$.M$.".BYTE ":G.B(YL.256.YH):K.
3:. 70:M$.M$.G$...E.M$.H((M$.S$(S2 . 7).
" "),19)." ;".T.F.. 96
:. OUT EERSTE .BYTE-RE
GEL....G.. 85:. 490
:. SUBPASS 2..A.L.M$.M$.G(B(40736.S1)).
G(B(40800.S1)).G(B(40864.S1))." "...M..
NS.0 . M$.M$." ":. 470...N.M$.M
$.G(B(40224.P)):K.3:. (S2 . 128).0 . 465
.M.O.XL.OL:XH.OH:. 60:. I.1 . 465 :. L
ABEL-OPERAND?.I.P.G.I:. 65:M$.M$.K$:. 47
0...Q.G.OL:. NS.2 . G.G.256.OH:K.K.2...R
.. 70:M$.M$.G$...V.SA.S2 . 7
:. LATER IN MACH.CODE...
.W.U$.G(B(40232.SA)).G(B(40240.SA)).G(B(
40248.SA)).5.X.M$.H((M$.U$." "),19)
." ;".R.... 96
:. OUT GEDISS. REGEL..Z.... S.....M
$." .END":. 96 :. .EN
D-DIRECTIEF....... UV.3 . .5,G(27)"@"
:. RESET PRINTER..!.... 98:. 9099
:. SLUIT RANDAPPARATEN
..C...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......A.0,173
:.A.1,000:.A.2,000:.A.3,170:.A.4,041:.A.
5,015.W....B.0,168:.B.1,138:.B.2,106:.B.
3,106:.B.4,106:.B.5,106.. ...C.0,041:.C.
1,015:.C.2,170:.C.3,189:.C.4,212:.C.5,00
2.K ...D.0,170:.D.1,185:.D.2,212:.D.3,00
2:.D.4,096:.D.5,000.. ...E.0,048:.E.1,04
9:.E.2,050:.E.3,051:.E.4,052:.E.5,053..
...F.0,054:.F.1,055:.F.2,056:.F.3,057:.F
.4,065:.F.5,066.. ...G.0,067:.G.1,068:.G
.2,069:.G.3,070:.G.4,000:.G.5,169.3!...H
.0,019:.H.1,141:.H.2,119:.H.3,002:.H.4,1
62:.H.5,000.M!...I.0,134:.I.1,198:.I.2,2
02:.I.3,169:.I.4,013:.I.5,157..!...J.0,1
20:.J.1,002:.J.2,202:.J.3,016:.J.4,250:.
J.5,096.Y!... G(147):.:. "BEGINREGELNUMM
ER (3000-7999)";R..!... R.3000 . R.7999
. 911.."... "BEGINADRES HEXDATAMAKER";A.
)"... A.255 . 920.K"... " EINDADRES HEXD
ATAMAKER";Z.E"... Z.53247 . A.Z . 920.."
... G(147):. R.5"DATA"A;.."... "":. "A="
A":R="R":Z="Z":GOTO 930";:. 747,5:. 741:
..R"... G(147):. A.Z . 947.."... R"DATA"
;:. I.0 . 3.##... " ";:. J.0 . 7:D.A.8.I
.J:Q..(D.256):. 701,D.256.Q.S#... 702,Q:
. 700:. G(B(781))G(B(780));:. J:. I..#..
. "":. "A="A.32":R="R.10":Z="Z":GOTO 930
";:. 747,4:. 741:...#... G(147):. R"DATA
&";:. "":. "GOTO 949";.S#... 747,3:. 74
1:..Y#.....#...:. "WACHT EVEN.":...$...
AT:ZT.AT:. "BEGINADRES ="ZT;G(157)".".7$
... 253,35:. 254,B(648).V$... K$:K.C(K$)
:W.0:. J.1 . K.W$..U.F(J(K$,J,1)):. U.38
. 3590..$E.. U.48 . 3560..$F.. U.58 . U
.U.48:. 3530..$G.. U.65 . 3560.Q$H.. U.7
1 . U.U.55:. 3530..$I.. 3560..$J.. W.0 .
Z.U:W.1:. 3560..%T.Z.Z.16.U:. AT,Z..%..
AT.AT.1:W.0.*%... J:. 3510.W%..AT.AT.1:.
" EINDADRES ="AT;G(157)".":.:...%... 49
920 :. TESTP
ROGRAMMA...%... A03C902EB034A918 71D4990
1C318B615 461F4A30F42039C3 A9C38D30C38E0
1C3.%&... A9258D2FC38C39C3 6C2FC310E590E
200 EA509C7D2FC3203A C360008D0DC3AE19.Q&
... C33D19C350F5B017 8C60C3AE14C36598 10
E060EAEAAD2FC3 F0A650A3FE30C3BC &..&P..
"4 HEXADEC.TEKENS";A$..&Z.. U.0 . 3:. 70
0.U,F(J(A$,U.1,1)):. U.U&... 254,2:. 253
,188 :. 700...&... 40016:V.B(251).256.B
(252)..'... "UIT ="V:...'... V.0 . 6000.
.'....8'@.. "NIET DOOR DE DATA!".>'A...D
'4!. "REGELNUMMER";R:. R.0730 . 9099..'>
!A.36000.32..((R.730).10):. A:. 8500..'(
#."TEMD",8..')#.:. "TEMD SAVED.":...'*#.
"TEMD",8..'+#.:. "TEMD VERIFIED.":...'2#
. 5,8,15,"S0:PRODIS.BAS/O". (3#.5,"R0:PR
ODIS.BAS/O=0:PRODIS.BAS".>(4#.5,"R0:PROD
IS.BAS=0:TEMD".F(7# 5.U(<#.:. "VERSIEZE
T PRODIS.BAS KLAAR.":.:. 9099.(Z#. 4,4.
.(_#.4, G(27)"B"G(02)..(`#.4, G(27)"M"G(
10).B(A#.4, G(27)G(92)G(1).J(D#. 4.U(I#.
9099..(N#. 4,4..(S#.4, " EIND VAN LI
ST."..)T#.4, G(27)"@"..)X#.4..)}# 4.')~
#. 9099.-).#....
> CLICK IMAGE PREVIEW FOR FULL MODAL