_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

PRODIS.BAS

FILE INFORMATION

FILENAME(S): PRODIS.BAS

FILE TYPE(S): PRG

FILE SIZE: 4.7K

FIRST SEEN: 2025-11-30 21:27:07

APPEARS ON: 1 disk(s)

FILE HASH

d9029370860324d96ec45f3af8421cefd733518cd05e3323d0f27d8f1379ef06

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
TESTFILES 2 PRODIS.BAS PRG DuncanTwain 22 5 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 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |     ***********|
00000100: 2A 2A 20 20 44 41 54 55  4D 3A 20 31 39 20 4E 4F  |**  DATUM: 19 NO|
00000110: 56 2E 31 39 38 39 2E 00  50 09 05 00 89 20 39 30  |V.1989..P.... 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 2A 20 54 45 53 54 46  49 4C 45 53 20 32 20 2A  | * TESTFILES 2 *|
00000150: 00 87 09 06 00 89 20 39  30 37 30 20 20 20 3A 8F  |...... 9070   :.|
00000160: 20 20 20 20 20 20 20 45  4E 44 20 4C 49 53 54 2E  |       END LIST.|
00000170: 20 20 20 20 20 20 20 20  20 20 2A 2A 2A 2A 2A 2A  |          ******|
00000180: 2A 2A 2A 2A 2A 2A 2A 00  AA 09 64 00 97 20 35 33  |*******...d.. 53|
00000190: 32 38 30 2C 31 31 3A 97  20 35 33 32 38 31 2C 31  |280,11:. 53281,1|
000001A0: 31 3A 99 20 C7 28 31 35  35 29 00 DE 09 65 00 54  |1:. .(155)...e.T|
000001B0: 42 B2 30 37 30 3A 97 20  35 32 2C 54 42 3A 97 20  |B.070:. 52,TB:. |
000001C0: 35 36 2C 54 42 20 20 20  20 20 20 20 20 3A 8F 20  |56,TB        :. |
000001D0: 54 4F 50 20 56 41 4E 20  42 41 53 49 43 2E 00 0C  |TOP VAN BASIC...|
000001E0: 0A 66 00 4E 24 B2 22 43  4F 44 2E 44 49 53 53 45  |.f.N$."COD.DISSE|
000001F0: 4D 22 3A 4C B2 C3 28 4E  24 29 3A 97 20 37 30 30  |M":L..(N$):. 700|
00000200: 2C 4C 3A 81 20 49 B2 31  20 A4 20 4C 00 2B 0A 67  |,L:. I.1 . L.+.g|
00000210: 00 97 20 37 30 30 AA 49  2C C6 28 CA 28 4E 24 2C  |.. 700.I,.(.(N$,|
00000220: 49 2C 31 29 29 3A 82 20  49 3A 99 00 52 0A 68 00  |I,1)):. I:..R.h.|
00000230: 99 20 22 4D 41 43 48 49  4E 45 43 4F 44 45 20 22  |. "MACHINECODE "|
00000240: 4E 24 22 20 49 4E 4C 45  5A 45 4E 2E 2E 2E 2E 22  |N$" INLEZEN...."|
00000250: 3A 99 00 8B 0A 6E 00 41  B2 30 30 37 32 30 3A 42  |:....n.A.00720:B|
00000260: B2 41 AA 36 3A 43 B2 42  AA 36 3A 44 B2 43 AA 36  |.A.6:C.B.6:D.C.6|
00000270: 3A 45 B2 44 AA 36 20 20  20 20 20 20 20 20 3A 8F  |:E.D.6        :.|
00000280: 20 42 4F 4F 54 53 54 52  41 50 2E 00 C9 0A 6F 00  | BOOTSTRAP....o.|
00000290: 97 41 AA 30 2C 31 36 39  3A 97 41 AA 31 2C 30 30  |.A.0,169:.A.1,00|
000002A0: 31 3A 97 41 AA 32 2C 31  36 32 20 20 20 20 3A 97  |1:.A.2,162    :.|
000002B0: 41 AA 33 2C 30 30 38 3A  97 41 AA 34 2C 31 36 30  |A.3,008:.A.4,160|
000002C0: 3A 97 41 AA 35 2C 30 30  31 00 07 0B 70 00 97 42  |:.A.5,001...p..B|
000002D0: AA 30 2C 30 33 32 3A 97  42 AA 31 2C 31 38 36 3A  |.0,032:.B.1,186:|
000002E0: 97 42 AA 32 2C 32 35 35  20 20 20 20 3A 97 42 AA  |.B.2,255    :.B.|
000002F0: 33 2C 31 37 33 3A 97 42  AA 34 2C 31 38 38 3A 97  |3,173:.B.4,188:.|
00000300: 42 AA 35 2C 30 30 32 00  45 0B 71 00 97 43 AA 30  |B.5,002.E.q..C.0|
00000310: 2C 31 36 32 3A 97 43 AA  31 2C 31 38 39 3A 97 43  |,162:.C.1,189:.C|
00000320: AA 32 2C 31 36 30 20 20  20 20 3A 97 43 AA 33 2C  |.2,160    :.C.3,|
00000330: 30 30 32 3A 97 43 AA 34  2C 30 33 32 3A 97 43 AA  |002:.C.4,032:.C.|
00000340: 35 2C 31 38 39 00 83 0B  72 00 97 44 AA 30 2C 32  |5,189...r..D.0,2|
00000350: 35 35 3A 97 44 AA 31 2C  31 36 39 3A 97 44 AA 32  |55:.D.1,169:.D.2|
00000360: 2C 30 30 30 20 20 20 20  3A 97 44 AA 33 2C 31 36  |,000    :.D.3,16|
00000370: 32 3A 97 44 AA 34 2C 32  35 35 3A 97 44 AA 35 2C  |2:.D.4,255:.D.5,|
00000380: 31 36 30 00 C1 0B 73 00  97 45 AA 30 2C 32 35 35  |160...s..E.0,255|
00000390: 3A 97 45 AA 31 2C 30 33  32 3A 97 45 AA 32 2C 32  |:.E.1,032:.E.2,2|
000003A0: 31 33 20 20 20 20 3A 97  45 AA 33 2C 32 35 35 3A  |13    :.E.3,255:|
000003B0: 97 45 AA 34 2C 30 39 36  3A 97 45 AA 35 2C 30 30  |.E.4,096:.E.5,00|
000003C0: 30 00 D7 0B 74 00 9E 20  41 3A 8B 20 53 54 B2 36  |0...t.. A:. ST.6|
000003D0: 34 20 A7 20 31 32 30 00  FF 0B 75 00 99 3A 99 20  |4 . 120...u..:. |
000003E0: 22 4C 41 41 44 46 4F 55  54 3A 54 4F 45 53 54 41  |"LAADFOUT:TOESTA|
000003F0: 4E 44 20 22 53 54 3A 99  3A 89 20 39 30 39 39 00  |ND "ST:.:. 9099.|
00000400: 4A 0C 78 00 41 B2 30 30  36 38 30 3A 42 B2 41 AA  |J.x.A.00680:B.A.|
00000410: 36 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |6               |
00000420: 20 20 20 20 20 20 20 20  20 20 20 3A 8F 20 55 53  |           :. US|
00000430: 52 28 58 29 20 53 50 4C  49 54 53 20 58 20 49 4E  |R(X) SPLITS X IN|
00000440: 20 4C 53 20 45 4E 20 48  53 2E 00 88 0C 79 00 97  | LS EN HS....y..|
00000450: 41 AA 30 2C 30 33 32 3A  97 41 AA 31 2C 32 34 37  |A.0,032:.A.1,247|
00000460: 3A 97 41 AA 32 2C 31 38  33 20 20 20 20 3A 97 41  |:.A.2,183    :.A|
00000470: AA 33 2C 31 36 35 3A 97  41 AA 34 2C 30 32 30 3A  |.3,165:.A.4,020:|
00000480: 97 41 AA 35 2C 31 33 33  00 C6 0C 7A 00 97 42 AA  |.A.5,133...z..B.|
00000490: 30 2C 31 36 37 3A 97 42  AA 31 2C 31 36 35 3A 97  |0,167:.B.1,165:.|
000004A0: 42 AA 32 2C 30 32 31 20  20 20 20 3A 97 42 AA 33  |B.2,021    :.B.3|
000004B0: 2C 31 33 33 3A 97 42 AA  34 2C 31 36 38 3A 97 42  |,133:.B.4,168:.B|
000004C0: AA 35 2C 30 39 36 00 07  0D 7B 00 97 20 37 38 35  |.5,096...{.. 785|
000004D0: 2C 31 36 38 3A 97 20 37  38 36 2C 30 30 32 20 20  |,168:. 786,002  |
000004E0: 20 20 20 20 20 20 20 20  20 20 20 20 3A 8F 20 53  |            :. S|
000004F0: 2E 50 2E 36 38 30 3B 20  55 49 54 3A 20 28 31 36  |.P.680; UIT: (16|
00000500: 38 2C 31 36 37 29 2E 00  1F 0D 7C 00 99 3A 99 20  |8,167)....|..:. |
00000510: 22 54 55 53 53 45 4E 53  54 4F 50 2E 22 3A 99 00  |"TUSSENSTOP.":..|
00000520: 25 0D 7D 00 90 00 47 0D  7E 00 8F 20 4C 41 54 45  |%.}...G.~.. LATE|
00000530: 52 20 31 32 34 2C 31 32  35 2C 31 32 36 20 57 45  |R 124,125,126 WE|
00000540: 47 48 41 4C 45 4E 2E 00  8E 0D 82 00 52 55 B2 31  |GHALEN......RU.1|
00000550: 37 39 32 30 3A 4C 55 B2  33 30 38 35 32 3A 5A 55  |7920:LU.30852:ZU|
00000560: B2 33 32 37 36 38 3A 56  55 B2 33 38 38 33 32 3A  |.32768:VU.38832:|
00000570: 57 55 B2 30 30 38 33 32  3A 42 55 B2 30 30 36 38  |WU.00832:BU.0068|
00000580: 30 20 3A 8F 20 47 45 42  49 45 44 45 4E 2E 00 C9  |0 :. GEBIEDEN...|
00000590: 0D 83 00 5A B2 B7 28 52  55 29 3A 97 20 34 30 39  |...Z..(RU):. 409|
000005A0: 32 38 2C C2 28 31 36 37  29 3A 97 20 34 30 39 32  |28,.(167):. 4092|
000005B0: 39 2C C2 28 31 36 38 29  20 20 20 3A 8F 20 52 45  |9,.(168)   :. RE|
000005C0: 47 45 4C 53 20 40 20 36  2E 00 04 0E 84 00 5A B2  |GELS @ 6......Z.|
000005D0: B7 28 4C 55 29 3A 97 20  34 30 39 33 30 2C C2 28  |.(LU):. 40930,.(|
000005E0: 31 36 37 29 3A 97 20 34  30 39 33 31 2C C2 28 31  |167):. 40931,.(1|
000005F0: 36 38 29 20 20 20 3A 8F  20 4C 41 42 45 4C 53 20  |68)   :. LABELS |
00000600: 40 20 32 2E 00 3B 0E 85  00 5A B2 B7 28 5A 55 29  |@ 2..;...Z..(ZU)|
00000610: 3A 97 20 34 30 39 33 32  2C C2 28 31 36 37 29 3A  |:. 40932,.(167):|
00000620: 97 20 34 30 39 33 33 2C  C2 28 31 36 38 29 20 20  |. 40933,.(168)  |
00000630: 20 3A 8F 20 45 49 4E 44  2B 31 2E 00 79 0E 86 00  | :. EIND+1..y...|
00000640: 5A B2 B7 28 56 55 29 3A  97 20 34 30 39 33 34 2C  |Z..(VU):. 40934,|
00000650: C2 28 31 36 37 29 3A 97  20 34 30 39 33 35 2C C2  |.(167):. 40935,.|
00000660: 28 31 36 38 29 20 20 20  3A 8F 20 56 4F 4F 52 42  |(168)   :. VOORB|
00000670: 4C 4F 4B 20 54 45 58 54  2E 00 B4 0E 87 00 5A B2  |LOK TEXT......Z.|
00000680: B7 28 57 55 29 3A 97 20  34 30 39 33 36 2C C2 28  |.(WU):. 40936,.(|
00000690: 31 36 37 29 3A 97 20 34  30 39 33 37 2C C2 28 31  |167):. 40937,.(1|
000006A0: 36 38 29 20 20 20 3A 8F  20 57 45 52 4B 47 45 42  |68)   :. WERKGEB|
000006B0: 49 45 44 2E 00 F1 0E 88  00 5A B2 B7 28 42 55 29  |IED......Z..(BU)|
000006C0: 3A 97 20 34 30 39 33 38  2C C2 28 31 36 37 29 3A  |:. 40938,.(167):|
000006D0: 97 20 34 30 39 33 39 2C  C2 28 31 36 38 29 20 20  |. 40939,.(168)  |
000006E0: 20 3A 8F 20 42 45 53 54  41 4E 44 53 4E 41 41 4D  | :. BESTANDSNAAM|
000006F0: 2E 00 3E 0F 8C 00 4F 55  B2 34 30 32 35 36 20 20  |..>...OU.40256  |
00000700: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000710: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000720: 20 20 20 20 20 20 20 20  20 20 20 20 3A 8F 20 47  |            :. G|
00000730: 45 42 49 45 44 20 4F 50  43 4F 44 45 53 2E 00 79  |EBIED OPCODES..y|
00000740: 0F 8D 00 5A B2 B7 28 4F  55 29 3A 97 20 34 30 39  |...Z..(OU):. 409|
00000750: 34 30 2C C2 28 31 36 37  29 3A 97 20 34 30 39 34  |40,.(167):. 4094|
00000760: 31 2C C2 28 31 36 38 29  20 20 20 3A 8F 20 42 45  |1,.(168)   :. BE|
00000770: 47 49 4E 41 44 52 45 53  2E 00 B7 0F 8E 00 4E 4F  |GINADRES......NO|
00000780: B2 31 35 31 20 20 20 20  20 20 20 20 20 20 20 20  |.151            |
00000790: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000007A0: 20 20 20 20 20 3A 8F 20  41 41 4E 54 41 4C 20 4F  |     :. AANTAL O|
000007B0: 50 43 4F 44 45 53 2E 00  C6 0F 8F 00 97 20 34 30  |PCODES....... 40|
000007C0: 39 34 32 2C 4E 4F 00 FE  0F 90 00 4D 41 B2 30 34  |942,NO.....MA.04|
000007D0: 30 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |0               |
000007E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000007F0: 20 20 3A 8F 20 4B 41 4E  54 4C 49 4A 4E 2E 00 0D  |  :. KANTLIJN...|
00000800: 10 91 00 97 20 34 30 39  34 33 2C 4D 41 00 4A 10  |.... 40943,MA.J.|
00000810: 93 00 8D 20 33 35 30 30  20 20 20 20 20 20 20 20  |... 3500        |
00000820: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000830: 20 20 20 20 20 3A 8F 20  5A 45 54 20 54 45 53 54  |     :. ZET TEST|
00000840: 50 52 4F 47 52 41 4D 4D  41 2E 00 83 10 94 00 9E  |PROGRAMMA.......|
00000850: 20 33 35 34 35 36 20 20  20 20 20 20 20 20 20 20  | 35456          |
00000860: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000870: 20 20 20 20 3A 8F 20 4D  41 43 48 49 4E 45 2D 48  |    :. MACHINE-H|
00000880: 2E 50 2E 00 8E 10 95 00  89 20 39 30 39 39 00 D0  |.P....... 9099..|
00000890: 10 84 03 41 B2 30 30 37  30 30 3A 42 B2 41 AA 36  |...A.00700:B.A.6|
000008A0: 3A 43 B2 42 AA 36 3A 44  B2 43 AA 36 3A 45 B2 44  |:C.B.6:D.C.6:E.D|
000008B0: AA 36 3A 46 B2 45 AA 36  3A 47 B2 46 AA 36 3A 48  |.6:F.E.6:G.F.6:H|
000008C0: B2 47 AA 36 3A 49 B2 48  AA 36 3A 4A B2 49 AA 36  |.G.6:I.H.6:J.I.6|
000008D0: 00 0A 11 85 03 97 41 AA  30 2C 31 37 33 3A 97 41  |......A.0,173:.A|
000008E0: AA 31 2C 30 30 30 3A 97  41 AA 32 2C 30 30 30 3A  |.1,000:.A.2,000:|
000008F0: 97 41 AA 33 2C 31 37 30  3A 97 41 AA 34 2C 30 34  |.A.3,170:.A.4,04|
00000900: 31 3A 97 41 AA 35 2C 30  31 35 00 44 11 86 03 97  |1:.A.5,015.D....|
00000910: 42 AA 30 2C 31 36 38 3A  97 42 AA 31 2C 31 33 38  |B.0,168:.B.1,138|
00000920: 3A 97 42 AA 32 2C 31 30  36 3A 97 42 AA 33 2C 31  |:.B.2,106:.B.3,1|
00000930: 30 36 3A 97 42 AA 34 2C  31 30 36 3A 97 42 AA 35  |06:.B.4,106:.B.5|
00000940: 2C 31 30 36 00 7E 11 87  03 97 43 AA 30 2C 30 34  |,106.~....C.0,04|
00000950: 31 3A 97 43 AA 31 2C 30  31 35 3A 97 43 AA 32 2C  |1:.C.1,015:.C.2,|
00000960: 31 37 30 3A 97 43 AA 33  2C 31 38 39 3A 97 43 AA  |170:.C.3,189:.C.|
00000970: 34 2C 32 31 32 3A 97 43  AA 35 2C 30 30 32 00 B8  |4,212:.C.5,002..|
00000980: 11 88 03 97 44 AA 30 2C  31 37 30 3A 97 44 AA 31  |....D.0,170:.D.1|
00000990: 2C 31 38 35 3A 97 44 AA  32 2C 32 31 32 3A 97 44  |,185:.D.2,212:.D|
000009A0: AA 33 2C 30 30 32 3A 97  44 AA 34 2C 30 39 36 3A  |.3,002:.D.4,096:|
000009B0: 97 44 AA 35 2C 30 30 30  00 F2 11 89 03 97 45 AA  |.D.5,000......E.|
000009C0: 30 2C 30 34 38 3A 97 45  AA 31 2C 30 34 39 3A 97  |0,048:.E.1,049:.|
000009D0: 45 AA 32 2C 30 35 30 3A  97 45 AA 33 2C 30 35 31  |E.2,050:.E.3,051|
000009E0: 3A 97 45 AA 34 2C 30 35  32 3A 97 45 AA 35 2C 30  |:.E.4,052:.E.5,0|
000009F0: 35 33 00 2C 12 8A 03 97  46 AA 30 2C 30 35 34 3A  |53.,....F.0,054:|
00000A00: 97 46 AA 31 2C 30 35 35  3A 97 46 AA 32 2C 30 35  |.F.1,055:.F.2,05|
00000A10: 36 3A 97 46 AA 33 2C 30  35 37 3A 97 46 AA 34 2C  |6:.F.3,057:.F.4,|
00000A20: 30 36 35 3A 97 46 AA 35  2C 30 36 36 00 66 12 8B  |065:.F.5,066.f..|
00000A30: 03 97 47 AA 30 2C 30 36  37 3A 97 47 AA 31 2C 30  |..G.0,067:.G.1,0|
00000A40: 36 38 3A 97 47 AA 32 2C  30 36 39 3A 97 47 AA 33  |68:.G.2,069:.G.3|
00000A50: 2C 30 37 30 3A 97 47 AA  34 2C 30 30 30 3A 97 47  |,070:.G.4,000:.G|
00000A60: AA 35 2C 31 36 39 00 A0  12 8C 03 97 48 AA 30 2C  |.5,169......H.0,|
00000A70: 30 31 39 3A 97 48 AA 31  2C 31 34 31 3A 97 48 AA  |019:.H.1,141:.H.|
00000A80: 32 2C 31 31 39 3A 97 48  AA 33 2C 30 30 32 3A 97  |2,119:.H.3,002:.|
00000A90: 48 AA 34 2C 31 36 32 3A  97 48 AA 35 2C 30 30 30  |H.4,162:.H.5,000|
00000AA0: 00 DA 12 8D 03 97 49 AA  30 2C 31 33 34 3A 97 49  |......I.0,134:.I|
00000AB0: AA 31 2C 31 39 38 3A 97  49 AA 32 2C 32 30 32 3A  |.1,198:.I.2,202:|
00000AC0: 97 49 AA 33 2C 31 36 39  3A 97 49 AA 34 2C 30 31  |.I.3,169:.I.4,01|
00000AD0: 33 3A 97 49 AA 35 2C 31  35 37 00 14 13 8E 03 97  |3:.I.5,157......|
00000AE0: 4A AA 30 2C 31 32 30 3A  97 4A AA 31 2C 30 30 32  |J.0,120:.J.1,002|
00000AF0: 3A 97 4A AA 32 2C 32 30  32 3A 97 4A AA 33 2C 30  |:.J.2,202:.J.3,0|
00000B00: 31 36 3A 97 4A AA 34 2C  32 35 30 3A 97 4A AA 35  |16:.J.4,250:.J.5|
00000B10: 2C 30 39 36 00 46 13 8F  03 99 20 C7 28 31 34 37  |,096.F.... .(147|
00000B20: 29 3A 99 3A 85 20 22 42  45 47 49 4E 52 45 47 45  |):.:. "BEGINREGE|
00000B30: 4C 4E 55 4D 4D 45 52 20  28 33 30 30 30 2D 37 39  |LNUMMER (3000-79|
00000B40: 39 39 29 22 3B 52 00 62  13 90 03 8B 20 52 B3 33  |99)";R.b.... R.3|
00000B50: 30 30 30 20 B0 20 52 B1  37 39 39 39 20 A7 20 39  |000 . R.7999 . 9|
00000B60: 31 31 00 84 13 98 03 85  20 22 42 45 47 49 4E 41  |11...... "BEGINA|
00000B70: 44 52 45 53 20 48 45 58  44 41 54 41 4D 41 4B 45  |DRES HEXDATAMAKE|
00000B80: 52 22 3B 41 00 96 13 99  03 8B 20 41 B3 32 35 35  |R";A...... A.255|
00000B90: 20 A7 20 39 32 30 00 B8  13 9A 03 85 20 22 20 45  | . 920...... " E|
00000BA0: 49 4E 44 41 44 52 45 53  20 48 45 58 44 41 54 41  |INDADRES HEXDATA|
00000BB0: 4D 41 4B 45 52 22 3B 5A  00 D2 13 9B 03 8B 20 5A  |MAKER";Z...... Z|
00000BC0: B1 35 33 32 34 37 20 B0  20 41 B1 5A 20 A7 20 39  |.53247 . A.Z . 9|
00000BD0: 32 30 00 ED 13 9C 03 99  20 C7 28 31 34 37 29 3A  |20...... .(147):|
00000BE0: 99 20 52 AB 35 22 44 41  54 41 22 41 3B 00 26 14  |. R.5"DATA"A;.&.|
00000BF0: 9D 03 99 20 22 22 3A 99  20 22 41 3D 22 41 22 3A  |... "":. "A="A":|
00000C00: 52 3D 22 52 22 3A 5A 3D  22 5A 22 3A 47 4F 54 4F  |R="R":Z="Z":GOTO|
00000C10: 20 39 33 30 22 3B 3A 97  20 37 34 37 2C 35 3A 9E  | 930";:. 747,5:.|
00000C20: 20 37 34 31 3A 80 00 3F  14 A2 03 99 20 C7 28 31  | 741:..?.... .(1|
00000C30: 34 37 29 3A 8B 20 41 B1  5A 20 A7 20 39 34 37 00  |47):. A.Z . 947.|
00000C40: 58 14 A3 03 99 20 52 22  44 41 54 41 22 3B 3A 81  |X.... R"DATA";:.|
00000C50: 20 49 B2 30 20 A4 20 33  00 90 14 AC 03 99 20 22  | I.0 . 3...... "|
00000C60: 20 22 3B 3A 81 20 4A B2  30 20 A4 20 37 3A 44 B2  | ";:. J.0 . 7:D.|
00000C70: 41 AA 38 AC 49 AA 4A 3A  51 B2 B5 28 44 AD 32 35  |A.8.I.J:Q..(D.25|
00000C80: 36 29 3A 97 20 37 30 31  2C 44 AB 32 35 36 AC 51  |6):. 701,D.256.Q|
00000C90: 00 C0 14 AD 03 97 20 37  30 32 2C 51 3A 9E 20 37  |...... 702,Q:. 7|
00000CA0: 30 30 3A 99 20 C7 28 C2  28 37 38 31 29 29 C7 28  |00:. .(.(781)).(|
00000CB0: C2 28 37 38 30 29 29 3B  3A 82 20 4A 3A 82 20 49  |.(780));:. J:. I|
00000CC0: 00 FF 14 B1 03 99 20 22  22 3A 99 20 22 41 3D 22  |...... "":. "A="|
00000CD0: 41 AA 33 32 22 3A 52 3D  22 52 AA 31 30 22 3A 5A  |A.32":R="R.10":Z|
00000CE0: 3D 22 5A 22 3A 47 4F 54  4F 20 39 33 30 22 3B 3A  |="Z":GOTO 930";:|
00000CF0: 97 20 37 34 37 2C 34 3A  9E 20 37 34 31 3A 80 00  |. 747,4:. 741:..|
00000D00: 2C 15 B3 03 99 20 C7 28  31 34 37 29 3A 99 20 52  |,.... .(147):. R|
00000D10: 22 44 41 54 41 20 26 22  3B 3A 99 20 22 22 3A 99  |"DATA &";:. "":.|
00000D20: 20 22 47 4F 54 4F 20 39  34 39 22 3B 00 40 15 B4  | "GOTO 949";.@..|
00000D30: 03 97 20 37 34 37 2C 33  3A 9E 20 37 34 31 3A 80  |.. 747,3:. 741:.|
00000D40: 00 46 15 B5 03 80 00 5E  15 AC 0D 99 3A 99 20 22  |.F.....^....:. "|
00000D50: 57 41 43 48 54 20 45 56  45 4E 2E 22 3A 99 00 8A  |WACHT EVEN.":...|
00000D60: 15 AD 0D 87 20 41 54 3A  5A 54 B2 41 54 3A 99 20  |.... AT:ZT.AT:. |
00000D70: 22 42 45 47 49 4E 41 44  52 45 53 20 3D 22 5A 54  |"BEGINADRES ="ZT|
00000D80: 3B C7 28 31 35 37 29 22  2E 22 00 A4 15 AE 0D 97  |;.(157)"."......|
00000D90: 20 32 35 33 2C 33 35 3A  97 20 32 35 34 2C C2 28  | 253,35:. 254,.(|
00000DA0: 36 34 38 29 00 C3 15 B6  0D 87 20 4B 24 3A 4B B2  |648)...... K$:K.|
00000DB0: C3 28 4B 24 29 3A 57 B2  30 3A 81 20 4A B2 31 20  |.(K$):W.0:. J.1 |
00000DC0: A4 20 4B 00 E4 15 C0 0D  55 B2 C6 28 CA 28 4B 24  |. K.....U..(.(K$|
00000DD0: 2C 4A 2C 31 29 29 3A 8B  20 55 B2 33 38 20 A7 20  |,J,1)):. U.38 . |
00000DE0: 33 35 39 30 00 F6 15 C5  0D 8B 20 55 B3 34 38 20  |3590...... U.48 |
00000DF0: A7 20 33 35 36 30 00 11  16 C6 0D 8B 20 55 B3 35  |. 3560...... U.5|
00000E00: 38 20 A7 20 55 B2 55 AB  34 38 3A 89 20 33 35 33  |8 . U.U.48:. 353|
00000E10: 30 00 23 16 C7 0D 8B 20  55 B3 36 35 20 A7 20 33  |0.#.... U.65 . 3|
00000E20: 35 36 30 00 3E 16 C8 0D  8B 20 55 B3 37 31 20 A7  |560.>.... U.71 .|
00000E30: 20 55 B2 55 AB 35 35 3A  89 20 33 35 33 30 00 49  | U.U.55:. 3530.I|
00000E40: 16 C9 0D 89 20 33 35 36  30 00 64 16 CA 0D 8B 20  |.... 3560.d.... |
00000E50: 57 B2 30 20 A7 20 5A B2  55 3A 57 B2 31 3A 89 20  |W.0 . Z.U:W.1:. |
00000E60: 33 35 36 30 00 78 16 D4  0D 5A B2 5A AC 31 36 AA  |3560.x...Z.Z.16.|
00000E70: 55 3A 97 20 41 54 2C 5A  00 88 16 DE 0D 41 54 B2  |U:. AT,Z.....AT.|
00000E80: 41 54 AA 31 3A 57 B2 30  00 97 16 E8 0D 82 20 4A  |AT.1:W.0...... J|
00000E90: 3A 89 20 33 35 31 30 00  C4 16 06 0E 41 54 B2 41  |:. 3510.....AT.A|
00000EA0: 54 AB 31 3A 99 20 22 20  45 49 4E 44 41 44 52 45  |T.1:. " EINDADRE|
00000EB0: 53 20 3D 22 41 54 3B C7  28 31 35 37 29 22 2E 22  |S ="AT;.(157)"."|
00000EC0: 3A 99 3A 8E 00 FE 16 A5  0F 83 20 34 39 39 32 30  |:.:....... 49920|
00000ED0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000EE0: 20 20 20 20 20 20 20 20  20 20 20 20 20 3A 8F 20  |             :. |
00000EF0: 54 45 53 54 50 52 4F 47  52 41 4D 4D 41 2E 00 48  |TESTPROGRAMMA..H|
00000F00: 17 AA 0F 83 20 41 30 33  43 39 30 32 45 42 30 33  |.... A03C902EB03|
00000F10: 34 41 39 31 38 20 37 31  44 34 39 39 30 31 43 33  |4A918 71D49901C3|
00000F20: 31 38 42 36 31 35 20 34  36 31 46 34 41 33 30 46  |18B615 461F4A30F|
00000F30: 34 32 30 33 39 43 33 20  41 39 43 33 38 44 33 30  |42039C3 A9C38D30|
00000F40: 43 33 38 45 30 31 43 33  00 92 17 AF 0F 83 20 41  |C38E01C3...... A|
00000F50: 39 32 35 38 44 32 46 43  33 38 43 33 39 43 33 20  |9258D2FC38C39C3 |
00000F60: 36 43 32 46 43 33 31 30  45 35 39 30 45 32 30 30  |6C2FC310E590E200|
00000F70: 20 45 41 35 30 39 43 37  44 32 46 43 33 32 30 33  | EA509C7D2FC3203|
00000F80: 41 20 43 33 36 30 30 30  38 44 30 44 43 33 41 45  |A C360008D0DC3AE|
00000F90: 31 39 00 DC 17 B4 0F 83  20 43 33 33 44 31 39 43  |19...... C33D19C|
00000FA0: 33 35 30 46 35 42 30 31  37 20 38 43 36 30 43 33  |350F5B017 8C60C3|
00000FB0: 41 45 31 34 43 33 36 35  39 38 20 31 30 45 30 36  |AE14C36598 10E06|
00000FC0: 30 45 41 45 41 41 44 32  46 43 33 20 46 30 41 36  |0EAEAAD2FC3 F0A6|
00000FD0: 35 30 41 33 46 45 33 30  43 33 42 43 00 F1 17 B9  |50A3FE30C3BC....|
00000FE0: 0F 83 20 31 36 43 33 45  44 31 37 43 33 41 39 20  |.. 16C3ED17C3A9 |
00000FF0: 26 00 0D 18 70 17 85 20  22 34 20 48 45 58 41 44  |&...p.. "4 HEXAD|
00001000: 45 43 2E 54 45 4B 45 4E  53 22 3B 41 24 00 36 18  |EC.TEKENS";A$.6.|
00001010: 7A 17 81 20 55 B2 30 20  A4 20 33 3A 97 20 37 30  |z.. U.0 . 3:. 70|
00001020: 30 AA 55 2C C6 28 CA 28  41 24 2C 55 AA 31 2C 31  |0.U,.(.(A$,U.1,1|
00001030: 29 29 3A 82 20 55 00 55  18 84 17 97 20 32 35 34  |)):. U.U.... 254|
00001040: 2C 32 3A 97 20 32 35 33  2C 31 38 38 20 20 3A 8F  |,2:. 253,188  :.|
00001050: 20 37 30 30 2E 00 75 18  8E 17 9E 20 34 30 30 31  | 700..u.... 4001|
00001060: 36 3A 56 B2 C2 28 32 35  31 29 AA 32 35 36 AC C2  |6:V..(251).256..|
00001070: 28 32 35 32 29 00 86 18  98 17 99 20 22 55 49 54  |(252)...... "UIT|
00001080: 20 3D 22 56 3A 99 00 97  18 A2 17 8B 20 56 B1 30  | ="V:....... V.0|
00001090: 20 A7 20 36 30 30 30 00  9D 18 AC 17 90 00 B8 18  | . 6000.........|
000010A0: 40 1F 99 20 22 4E 49 45  54 20 44 4F 4F 52 20 44  |@.. "NIET DOOR D|
000010B0: 45 20 44 41 54 41 21 22  00 BE 18 41 1F 90 00 E4  |E DATA!"...A....|
000010C0: 18 34 21 85 20 22 52 45  47 45 4C 4E 55 4D 4D 45  |.4!. "REGELNUMME|
000010D0: 52 22 3B 52 3A 8B 20 52  B3 30 37 33 30 20 A7 20  |R";R:. R.0730 . |
000010E0: 39 30 39 39 00 0C 19 3E  21 41 B2 33 36 30 30 30  |9099...>!A.36000|
000010F0: AA 33 32 AC B5 28 28 52  AB 37 33 30 29 AD 31 30  |.32..((R.730).10|
00001100: 29 3A 99 20 41 3A 89 20  38 35 30 30 00 1A 19 28  |):. A:. 8500...(|
00001110: 23 94 22 54 45 4D 44 22  2C 38 00 32 19 29 23 99  |#."TEMD",8.2.)#.|
00001120: 3A 99 20 22 54 45 4D 44  20 53 41 56 45 44 2E 22  |:. "TEMD SAVED."|
00001130: 3A 99 00 40 19 2A 23 95  22 54 45 4D 44 22 2C 38  |:..@.*#."TEMD",8|
00001140: 00 5B 19 2B 23 99 3A 99  20 22 54 45 4D 44 20 56  |.[.+#.:. "TEMD V|
00001150: 45 52 49 46 49 45 44 2E  22 3A 99 00 7A 19 32 23  |ERIFIED.":..z.2#|
00001160: 9F 20 35 2C 38 2C 31 35  2C 22 53 30 3A 50 52 4F  |. 5,8,15,"S0:PRO|
00001170: 44 49 53 2E 42 41 53 2F  4F 22 00 A0 19 33 23 98  |DIS.BAS/O"...3#.|
00001180: 35 2C 22 52 30 3A 50 52  4F 44 49 53 2E 42 41 53  |5,"R0:PRODIS.BAS|
00001190: 2F 4F 3D 30 3A 50 52 4F  44 49 53 2E 42 41 53 22  |/O=0:PRODIS.BAS"|
000011A0: 00 BE 19 34 23 98 35 2C  22 52 30 3A 50 52 4F 44  |...4#.5,"R0:PROD|
000011B0: 49 53 2E 42 41 53 3D 30  3A 54 45 4D 44 22 00 C6  |IS.BAS=0:TEMD"..|
000011C0: 19 37 23 A0 20 35 00 F5  19 3C 23 99 3A 99 20 22  |.7#. 5...<#.:. "|
000011D0: 56 45 52 53 49 45 5A 45  54 20 50 52 4F 44 49 53  |VERSIEZET PRODIS|
000011E0: 2E 42 41 53 20 4B 4C 41  41 52 2E 22 3A 99 3A 89  |.BAS KLAAR.":.:.|
000011F0: 20 39 30 39 39 00 FF 19  5A 23 9F 20 34 2C 34 00  | 9099...Z#. 4,4.|
00001200: 15 1A 5F 23 98 34 2C 20  C7 28 32 37 29 22 42 22  |.._#.4, .(27)"B"|
00001210: C7 28 30 32 29 00 2B 1A  60 23 98 34 2C 20 C7 28  |.(02).+.`#.4, .(|
00001220: 32 37 29 22 4D 22 C7 28  31 30 29 00 42 1A 61 23  |27)"M".(10).B.a#|
00001230: 98 34 2C 20 C7 28 32 37  29 C7 28 39 32 29 C7 28  |.4, .(27).(92).(|
00001240: 31 29 00 4A 1A 64 23 9D  20 34 00 55 1A 69 23 89  |1).J.d#. 4.U.i#.|
00001250: 20 39 30 39 39 00 5F 1A  6E 23 9F 20 34 2C 34 00  | 9099._.n#. 4,4.|
00001260: 7C 1A 73 23 98 34 2C 20  22 20 20 20 20 45 49 4E  ||.s#.4, "    EIN|
00001270: 44 20 56 41 4E 20 4C 49  53 54 2E 22 00 8D 1A 74  |D VAN LIST."...t|
00001280: 23 98 34 2C 20 C7 28 32  37 29 22 40 22 00 94 1A  |#.4, .(27)"@"...|
00001290: 78 23 98 34 00 9C 1A 7D  23 A0 20 34 00 A7 1A 7E  |x#.4...}#. 4...~|
000012A0: 23 89 20 39 30 39 39 00  AD 1A 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: 19 NOV.1989..
P.... 9050   :.       LIST.             
 * TESTFILES 2 *...... 9070   :.       E
ND LIST.          *************...D.. 53
280,11:. 53281,11:. G(155)...E.TB.070:. 
52,TB:. 56,TB        :. TOP VAN BASIC...
.F.N$."COD.DISSEM":L.C(N$):. 700,L:. I.1
 . L.+.G.. 700.I,F(J(N$,I,1)):. I:..R.H.
. "MACHINECODE "N$" INLEZEN....":....N.A
.00720:B.A.6:C.B.6:D.C.6:E.D.6        :.
 BOOTSTRAP..I.O..A.0,169:.A.1,001:.A.2,1
62    :.A.3,008:.A.4,160:.A.5,001...P..B
.0,032:.B.1,186:.B.2,255    :.B.3,173:.B
.4,188:.B.5,002.E.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,16
2:.D.4,255:.D.5,160.A.S..E.0,255:.E.1,03
2:.E.2,213    :.E.3,255:.E.4,096:.E.5,00
0.W.T.. A:. ST.64 . 120...U..:. "LAADFOU
T:TOESTAND "ST:.:. 9099.J.X.A.00680:B.A.
6                          :. USR(X) SPL
ITS X IN LS EN HS....Y..A.0,032:.A.1,247
:.A.2,183    :.A.3,165:.A.4,020:.A.5,133
.F.Z..B.0,167:.B.1,165:.B.2,021    :.B.3
,133:.B.4,168:.B.5,096...{.. 785,168:. 7
86,002              :. S.P.680; UIT: (16
8,167)....|..:. "TUSSENSTOP.":..%.}...G.
~.. LATER 124,125,126 WEGHALEN......RU.1
7920:LU.30852:ZU.32768:VU.38832:WU.00832
:BU.00680 :. GEBIEDEN..I...Z..(RU):. 409
28,B(167):. 40929,B(168)   :. REGELS @ 6
......Z..(LU):. 40930,B(167):. 40931,B(1
68)   :. LABELS @ 2..;...Z..(ZU):. 40932
,B(167):. 40933,B(168)   :. EIND+1..Y...
Z..(VU):. 40934,B(167):. 40935,B(168)   
:. VOORBLOK TEXT......Z..(WU):. 40936,B(
167):. 40937,B(168)   :. WERKGEBIED.....
.Z..(BU):. 40938,B(167):. 40939,B(168)  
 :. BESTANDSNAAM..>...OU.40256          
                                    :. G
EBIED OPCODES..Y...Z..(OU):. 40940,B(167
):. 40941,B(168)   :. BEGINADRES......NO
.151                                 :. 
AANTAL OPCODES..F.... 40942,NO.....MA.04
0                                 :. KAN
TLIJN....... 40943,MA.J.... 3500        
                     :. ZET TESTPROGRAMM
A....... 35456                          
    :. MACHINE-H.P....... 9099.P...A.007
00: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.D....
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,002......D.0,
170:.D.1,185:.D.2,212:.D.3,002:.D.4,096:
.D.5,000......E.0,048:.E.1,049:.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.F....G.0,067:.G.1,068:.G.2,069:.G.3
,070:.G.4,000:.G.5,169. ....H.0,019:.H.1
,141:.H.2,119:.H.3,002:.H.4,162:.H.5,000
.Z....I.0,134:.I.1,198:.I.2,202:.I.3,169
:.I.4,013:.I.5,157......J.0,120:.J.1,002
:.J.2,202:.J.3,016:.J.4,250:.J.5,096.F..
.. G(147):.:. "BEGINREGELNUMMER (3000-79
99)";R.B.... R.3000 . R.7999 . 911......
 "BEGINADRES HEXDATAMAKER";A...... A.255
 . 920...... " EINDADRES HEXDATAMAKER";Z
.R.... Z.53247 . A.Z . 920...... G(147):
. R.5"DATA"A;.&.... "":. "A="A":R="R":Z=
"Z":GOTO 930";:. 747,5:. 741:..?.... G(1
47):. A.Z . 947.X.... R"DATA";:. I.0 . 3
...... " ";:. J.0 . 7:D.A.8.I.J:Q..(D.25
6):. 701,D.256.Q...... 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";.@.... 747,3:. 741:..F.....^
....:. "WACHT EVEN.":....... AT:ZT.AT:. 
"BEGINADRES ="ZT;G(157)"."...... 253,35:
. 254,B(648).C.... K$:K.C(K$):W.0:. J.1 
. K.....U.F(J(K$,J,1)):. U.38 . 3590...E
.. U.48 . 3560...F.. U.58 . U.U.48:. 353
0.#.G.. U.65 . 3560.>.H.. U.71 . U.U.55:
. 3530.I.I.. 3560.D.J.. W.0 . Z.U:W.1:. 
3560.X.T.Z.Z.16.U:. AT,Z.....AT.AT.1:W.0
...... J:. 3510.D...AT.AT.1:. " EINDADRE
S ="AT;G(157)".":.:....... 49920        
                     :. TESTPROGRAMMA..H
.... A03C902EB034A918 71D49901C318B615 4
61F4A30F42039C3 A9C38D30C38E01C3...... A
9258D2FC38C39C3 6C2FC310E590E200 EA509C7
D2FC3203A C360008D0DC3AE19...... C33D19C
350F5B017 8C60C3AE14C36598 10E060EAEAAD2
FC3 F0A650A3FE30C3BC...... 16C3ED17C3A9 
&...P.. "4 HEXADEC.TEKENS";A$.6.Z.. U.0 
. 3:. 700.U,F(J(A$,U.1,1)):. U.U.... 254
,2:. 253,188  :. 700..U.... 40016:V.B(25
1).256.B(252)...... "UIT ="V:....... V.0
 . 6000.........@.. "NIET DOOR DE DATA!"
...A.....4!. "REGELNUMMER";R:. R.0730 . 
9099...>!A.36000.32..((R.730).10):. A:. 
8500...(#."TEMD",8.2.)#.:. "TEMD SAVED."
:..@.*#."TEMD",8.[.+#.:. "TEMD VERIFIED.
":..Z.2#. 5,8,15,"S0:PRODIS.BAS/O". .3#.
5,"R0:PRODIS.BAS/O=0:PRODIS.BAS"...4#.5,
"R0:PRODIS.BAS=0:TEMD".F.7#  5...<#.:. "
VERSIEZET 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, "    EIN
D VAN LIST."...T#.4, G(27)"@"...X#.4...}
#  4...~#. 9099....#....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL