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
f16c7e8baf11bfe163007c7b3ff500f6f3839be6b69299df9004e03069739b95
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MEENEEM 1 | PRODIS.BAS | PRG | DuncanTwain | 14 | 0 | 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 34 20 44 45 |** DATUM: 14 DE|
00000110: 43 2E 31 39 38 39 2E 00 4E 09 05 00 89 20 39 30 |C.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 2A 20 4D 45 45 4E 45 45 4D 2D 31 20 2A 00 85 | * MEENEEM-1 *..|
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 2A 2A 2A 2A 2A 2A 2A 2A | ********|
00000180: 2A 2A 2A 2A 2A 00 B3 09 07 00 8F 20 20 20 20 20 |*****...... |
00000190: 20 20 20 20 20 20 20 20 20 50 52 4F 47 52 41 4D | PROGRAM|
000001A0: 4D 45 55 52 3A 20 4A 2E 48 2E 56 41 4E 20 52 49 |MEUR: J.H.VAN RI|
000001B0: 4A 4E 2E 00 D6 09 64 00 97 20 35 33 32 38 30 2C |JN....d.. 53280,|
000001C0: 31 31 3A 97 20 35 33 32 38 31 2C 31 31 3A 99 20 |11:. 53281,11:. |
000001D0: C7 28 31 35 35 29 00 0A 0A 65 00 54 42 B2 30 39 |.(155)...e.TB.09|
000001E0: 30 3A 97 20 35 32 2C 54 42 3A 97 20 35 36 2C 54 |0:. 52,TB:. 56,T|
000001F0: 42 20 20 20 20 20 20 20 20 3A 8F 20 54 4F 50 20 |B :. TOP |
00000200: 56 41 4E 20 42 41 53 49 43 2E 00 38 0A 66 00 4E |VAN BASIC..8.f.N|
00000210: 24 B2 22 43 4F 44 2E 44 49 53 53 45 4D 22 3A 4C |$."COD.DISSEM":L|
00000220: B2 C3 28 4E 24 29 3A 97 20 37 30 30 2C 4C 3A 81 |..(N$):. 700,L:.|
00000230: 20 49 B2 31 20 A4 20 4C 00 57 0A 67 00 97 20 37 | I.1 . L.W.g.. 7|
00000240: 30 30 AA 49 2C C6 28 CA 28 4E 24 2C 49 2C 31 29 |00.I,.(.(N$,I,1)|
00000250: 29 3A 82 20 49 3A 99 00 7E 0A 68 00 99 20 22 4D |):. I:..~.h.. "M|
00000260: 41 43 48 49 4E 45 43 4F 44 45 20 22 4E 24 22 20 |ACHINECODE "N$" |
00000270: 49 4E 4C 45 5A 45 4E 2E 2E 2E 2E 22 3A 99 00 B7 |INLEZEN....":...|
00000280: 0A 6E 00 41 B2 30 30 37 32 30 3A 42 B2 41 AA 36 |.n.A.00720:B.A.6|
00000290: 3A 43 B2 42 AA 36 3A 44 B2 43 AA 36 3A 45 B2 44 |:C.B.6:D.C.6:E.D|
000002A0: AA 36 20 20 20 20 20 20 20 20 3A 8F 20 42 4F 4F |.6 :. BOO|
000002B0: 54 53 54 52 41 50 2E 00 F5 0A 6F 00 97 41 AA 30 |TSTRAP....o..A.0|
000002C0: 2C 31 36 39 3A 97 41 AA 31 2C 30 30 31 3A 97 41 |,169:.A.1,001:.A|
000002D0: AA 32 2C 31 36 32 20 20 20 20 3A 97 41 AA 33 2C |.2,162 :.A.3,|
000002E0: 30 30 38 3A 97 41 AA 34 2C 31 36 30 3A 97 41 AA |008:.A.4,160:.A.|
000002F0: 35 2C 30 30 31 00 33 0B 70 00 97 42 AA 30 2C 30 |5,001.3.p..B.0,0|
00000300: 33 32 3A 97 42 AA 31 2C 31 38 36 3A 97 42 AA 32 |32:.B.1,186:.B.2|
00000310: 2C 32 35 35 20 20 20 20 3A 97 42 AA 33 2C 31 37 |,255 :.B.3,17|
00000320: 33 3A 97 42 AA 34 2C 31 38 38 3A 97 42 AA 35 2C |3:.B.4,188:.B.5,|
00000330: 30 30 32 00 71 0B 71 00 97 43 AA 30 2C 31 36 32 |002.q.q..C.0,162|
00000340: 3A 97 43 AA 31 2C 31 38 39 3A 97 43 AA 32 2C 31 |:.C.1,189:.C.2,1|
00000350: 36 30 20 20 20 20 3A 97 43 AA 33 2C 30 30 32 3A |60 :.C.3,002:|
00000360: 97 43 AA 34 2C 30 33 32 3A 97 43 AA 35 2C 31 38 |.C.4,032:.C.5,18|
00000370: 39 00 AF 0B 72 00 97 44 AA 30 2C 32 35 35 3A 97 |9...r..D.0,255:.|
00000380: 44 AA 31 2C 31 36 39 3A 97 44 AA 32 2C 30 30 30 |D.1,169:.D.2,000|
00000390: 20 20 20 20 3A 97 44 AA 33 2C 31 36 32 3A 97 44 | :.D.3,162:.D|
000003A0: AA 34 2C 32 35 35 3A 97 44 AA 35 2C 31 36 30 00 |.4,255:.D.5,160.|
000003B0: ED 0B 73 00 97 45 AA 30 2C 32 35 35 3A 97 45 AA |..s..E.0,255:.E.|
000003C0: 31 2C 30 33 32 3A 97 45 AA 32 2C 32 31 33 20 20 |1,032:.E.2,213 |
000003D0: 20 20 3A 97 45 AA 33 2C 32 35 35 3A 97 45 AA 34 | :.E.3,255:.E.4|
000003E0: 2C 30 39 36 3A 97 45 AA 35 2C 30 30 30 00 03 0C |,096:.E.5,000...|
000003F0: 74 00 9E 20 41 3A 8B 20 53 54 B2 36 34 20 A7 20 |t.. A:. ST.64 . |
00000400: 31 32 30 00 2B 0C 75 00 99 3A 99 20 22 4C 41 41 |120.+.u..:. "LAA|
00000410: 44 46 4F 55 54 3A 54 4F 45 53 54 41 4E 44 20 22 |DFOUT:TOESTAND "|
00000420: 53 54 3A 99 3A 89 20 39 30 39 39 00 76 0C 78 00 |ST:.:. 9099.v.x.|
00000430: 41 B2 30 30 36 38 30 3A 42 B2 41 AA 36 20 20 20 |A.00680:B.A.6 |
00000440: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000450: 20 20 20 20 20 20 20 3A 8F 20 55 53 52 28 58 29 | :. USR(X)|
00000460: 20 53 50 4C 49 54 53 20 58 20 49 4E 20 4C 53 20 | SPLITS X IN LS |
00000470: 45 4E 20 48 53 2E 00 B4 0C 79 00 97 41 AA 30 2C |EN HS....y..A.0,|
00000480: 30 33 32 3A 97 41 AA 31 2C 32 34 37 3A 97 41 AA |032:.A.1,247:.A.|
00000490: 32 2C 31 38 33 20 20 20 20 3A 97 41 AA 33 2C 31 |2,183 :.A.3,1|
000004A0: 36 35 3A 97 41 AA 34 2C 30 32 30 3A 97 41 AA 35 |65:.A.4,020:.A.5|
000004B0: 2C 31 33 33 00 F2 0C 7A 00 97 42 AA 30 2C 31 36 |,133...z..B.0,16|
000004C0: 37 3A 97 42 AA 31 2C 31 36 35 3A 97 42 AA 32 2C |7:.B.1,165:.B.2,|
000004D0: 30 32 31 20 20 20 20 3A 97 42 AA 33 2C 31 33 33 |021 :.B.3,133|
000004E0: 3A 97 42 AA 34 2C 31 36 38 3A 97 42 AA 35 2C 30 |:.B.4,168:.B.5,0|
000004F0: 39 36 00 33 0D 7B 00 97 20 37 38 35 2C 31 36 38 |96.3.{.. 785,168|
00000500: 3A 97 20 37 38 36 2C 30 30 32 20 20 20 20 20 20 |:. 786,002 |
00000510: 20 20 20 20 20 20 20 20 3A 8F 20 53 2E 50 2E 36 | :. S.P.6|
00000520: 38 30 3B 20 55 49 54 3A 20 28 31 36 38 2C 31 36 |80; UIT: (168,16|
00000530: 37 29 2E 00 7A 0D 82 00 52 55 B2 32 33 30 34 30 |7)..z...RU.23040|
00000540: 3A 4C 55 B2 32 37 36 37 32 3A 5A 55 B2 32 38 36 |:LU.27672:ZU.286|
00000550: 37 32 3A 56 55 B2 33 38 38 33 32 3A 57 55 B2 30 |72:VU.38832:WU.0|
00000560: 30 38 33 32 3A 42 55 B2 30 30 36 38 30 20 3A 8F |0832:BU.00680 :.|
00000570: 20 47 45 42 49 45 44 45 4E 2E 00 B5 0D 83 00 5A | GEBIEDEN......Z|
00000580: B2 B7 28 52 55 29 3A 97 20 34 30 39 32 38 2C C2 |..(RU):. 40928,.|
00000590: 28 31 36 37 29 3A 97 20 34 30 39 32 39 2C C2 28 |(167):. 40929,.(|
000005A0: 31 36 38 29 20 20 20 3A 8F 20 52 45 47 45 4C 53 |168) :. REGELS|
000005B0: 20 40 20 36 2E 00 F0 0D 84 00 5A B2 B7 28 4C 55 | @ 6......Z..(LU|
000005C0: 29 3A 97 20 34 30 39 33 30 2C C2 28 31 36 37 29 |):. 40930,.(167)|
000005D0: 3A 97 20 34 30 39 33 31 2C C2 28 31 36 38 29 20 |:. 40931,.(168) |
000005E0: 20 20 3A 8F 20 4C 41 42 45 4C 53 20 40 20 32 2E | :. LABELS @ 2.|
000005F0: 00 27 0E 85 00 5A B2 B7 28 5A 55 29 3A 97 20 34 |.'...Z..(ZU):. 4|
00000600: 30 39 33 32 2C C2 28 31 36 37 29 3A 97 20 34 30 |0932,.(167):. 40|
00000610: 39 33 33 2C C2 28 31 36 38 29 20 20 20 3A 8F 20 |933,.(168) :. |
00000620: 45 49 4E 44 2B 31 2E 00 65 0E 86 00 5A B2 B7 28 |EIND+1..e...Z..(|
00000630: 56 55 29 3A 97 20 34 30 39 33 34 2C C2 28 31 36 |VU):. 40934,.(16|
00000640: 37 29 3A 97 20 34 30 39 33 35 2C C2 28 31 36 38 |7):. 40935,.(168|
00000650: 29 20 20 20 3A 8F 20 56 4F 4F 52 42 4C 4F 4B 20 |) :. VOORBLOK |
00000660: 54 45 58 54 2E 00 A0 0E 87 00 5A B2 B7 28 57 55 |TEXT......Z..(WU|
00000670: 29 3A 97 20 34 30 39 33 36 2C C2 28 31 36 37 29 |):. 40936,.(167)|
00000680: 3A 97 20 34 30 39 33 37 2C C2 28 31 36 38 29 20 |:. 40937,.(168) |
00000690: 20 20 3A 8F 20 57 45 52 4B 47 45 42 49 45 44 2E | :. WERKGEBIED.|
000006A0: 00 DD 0E 88 00 5A B2 B7 28 42 55 29 3A 97 20 34 |.....Z..(BU):. 4|
000006B0: 30 39 33 38 2C C2 28 31 36 37 29 3A 97 20 34 30 |0938,.(167):. 40|
000006C0: 39 33 39 2C C2 28 31 36 38 29 20 20 20 3A 8F 20 |939,.(168) :. |
000006D0: 42 45 53 54 41 4E 44 53 4E 41 41 4D 2E 00 2A 0F |BESTANDSNAAM..*.|
000006E0: 8C 00 4F 55 B2 34 30 32 35 36 20 20 20 20 20 20 |..OU.40256 |
000006F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
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 3A 8F 20 47 45 42 49 45 | :. GEBIE|
00000720: 44 20 4F 50 43 4F 44 45 53 2E 00 65 0F 8D 00 5A |D OPCODES..e...Z|
00000730: B2 B7 28 4F 55 29 3A 97 20 34 30 39 34 30 2C C2 |..(OU):. 40940,.|
00000740: 28 31 36 37 29 3A 97 20 34 30 39 34 31 2C C2 28 |(167):. 40941,.(|
00000750: 31 36 38 29 20 20 20 3A 8F 20 42 45 47 49 4E 41 |168) :. BEGINA|
00000760: 44 52 45 53 2E 00 A3 0F 8E 00 4E 4F B2 31 35 31 |DRES......NO.151|
00000770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000790: 20 3A 8F 20 41 41 4E 54 41 4C 20 4F 50 43 4F 44 | :. AANTAL OPCOD|
000007A0: 45 53 2E 00 B2 0F 8F 00 97 20 34 30 39 34 32 2C |ES....... 40942,|
000007B0: 4E 4F 00 EA 0F 90 00 4D 41 B2 30 34 30 20 20 20 |NO.....MA.040 |
000007C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F | :.|
000007E0: 20 4B 41 4E 54 4C 49 4A 4E 2E 00 F9 0F 91 00 97 | KANTLIJN.......|
000007F0: 20 34 30 39 34 33 2C 4D 41 00 36 10 93 00 8D 20 | 40943,MA.6.... |
00000800: 33 35 30 30 20 20 20 20 20 20 20 20 20 20 20 20 |3500 |
00000810: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000820: 20 3A 8F 20 5A 45 54 20 54 45 53 54 50 52 4F 47 | :. ZET TESTPROG|
00000830: 52 41 4D 4D 41 2E 00 6F 10 94 00 9E 20 33 35 34 |RAMMA..o.... 354|
00000840: 35 36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |56 |
00000850: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000860: 3A 8F 20 4D 41 43 48 49 4E 45 2D 48 2E 50 2E 00 |:. MACHINE-H.P..|
00000870: 7A 10 95 00 89 20 39 30 39 39 00 BC 10 84 03 41 |z.... 9099.....A|
00000880: B2 30 30 37 30 30 3A 42 B2 41 AA 36 3A 43 B2 42 |.00700:B.A.6:C.B|
00000890: AA 36 3A 44 B2 43 AA 36 3A 45 B2 44 AA 36 3A 46 |.6:D.C.6:E.D.6:F|
000008A0: B2 45 AA 36 3A 47 B2 46 AA 36 3A 48 B2 47 AA 36 |.E.6:G.F.6:H.G.6|
000008B0: 3A 49 B2 48 AA 36 3A 4A B2 49 AA 36 00 F6 10 85 |:I.H.6:J.I.6....|
000008C0: 03 97 41 AA 30 2C 31 37 33 3A 97 41 AA 31 2C 30 |..A.0,173:.A.1,0|
000008D0: 30 30 3A 97 41 AA 32 2C 30 30 30 3A 97 41 AA 33 |00:.A.2,000:.A.3|
000008E0: 2C 31 37 30 3A 97 41 AA 34 2C 30 34 31 3A 97 41 |,170:.A.4,041:.A|
000008F0: AA 35 2C 30 31 35 00 30 11 86 03 97 42 AA 30 2C |.5,015.0....B.0,|
00000900: 31 36 38 3A 97 42 AA 31 2C 31 33 38 3A 97 42 AA |168:.B.1,138:.B.|
00000910: 32 2C 31 30 36 3A 97 42 AA 33 2C 31 30 36 3A 97 |2,106:.B.3,106:.|
00000920: 42 AA 34 2C 31 30 36 3A 97 42 AA 35 2C 31 30 36 |B.4,106:.B.5,106|
00000930: 00 6A 11 87 03 97 43 AA 30 2C 30 34 31 3A 97 43 |.j....C.0,041:.C|
00000940: AA 31 2C 30 31 35 3A 97 43 AA 32 2C 31 37 30 3A |.1,015:.C.2,170:|
00000950: 97 43 AA 33 2C 31 38 39 3A 97 43 AA 34 2C 32 31 |.C.3,189:.C.4,21|
00000960: 32 3A 97 43 AA 35 2C 30 30 32 00 A4 11 88 03 97 |2:.C.5,002......|
00000970: 44 AA 30 2C 31 37 30 3A 97 44 AA 31 2C 31 38 35 |D.0,170:.D.1,185|
00000980: 3A 97 44 AA 32 2C 32 31 32 3A 97 44 AA 33 2C 30 |:.D.2,212:.D.3,0|
00000990: 30 32 3A 97 44 AA 34 2C 30 39 36 3A 97 44 AA 35 |02:.D.4,096:.D.5|
000009A0: 2C 30 30 30 00 DE 11 89 03 97 45 AA 30 2C 30 34 |,000......E.0,04|
000009B0: 38 3A 97 45 AA 31 2C 30 34 39 3A 97 45 AA 32 2C |8:.E.1,049:.E.2,|
000009C0: 30 35 30 3A 97 45 AA 33 2C 30 35 31 3A 97 45 AA |050:.E.3,051:.E.|
000009D0: 34 2C 30 35 32 3A 97 45 AA 35 2C 30 35 33 00 18 |4,052:.E.5,053..|
000009E0: 12 8A 03 97 46 AA 30 2C 30 35 34 3A 97 46 AA 31 |....F.0,054:.F.1|
000009F0: 2C 30 35 35 3A 97 46 AA 32 2C 30 35 36 3A 97 46 |,055:.F.2,056:.F|
00000A00: AA 33 2C 30 35 37 3A 97 46 AA 34 2C 30 36 35 3A |.3,057:.F.4,065:|
00000A10: 97 46 AA 35 2C 30 36 36 00 52 12 8B 03 97 47 AA |.F.5,066.R....G.|
00000A20: 30 2C 30 36 37 3A 97 47 AA 31 2C 30 36 38 3A 97 |0,067:.G.1,068:.|
00000A30: 47 AA 32 2C 30 36 39 3A 97 47 AA 33 2C 30 37 30 |G.2,069:.G.3,070|
00000A40: 3A 97 47 AA 34 2C 30 30 30 3A 97 47 AA 35 2C 31 |:.G.4,000:.G.5,1|
00000A50: 36 39 00 8C 12 8C 03 97 48 AA 30 2C 30 31 39 3A |69......H.0,019:|
00000A60: 97 48 AA 31 2C 31 34 31 3A 97 48 AA 32 2C 31 31 |.H.1,141:.H.2,11|
00000A70: 39 3A 97 48 AA 33 2C 30 30 32 3A 97 48 AA 34 2C |9:.H.3,002:.H.4,|
00000A80: 31 36 32 3A 97 48 AA 35 2C 30 30 30 00 C6 12 8D |162:.H.5,000....|
00000A90: 03 97 49 AA 30 2C 31 33 34 3A 97 49 AA 31 2C 31 |..I.0,134:.I.1,1|
00000AA0: 39 38 3A 97 49 AA 32 2C 32 30 32 3A 97 49 AA 33 |98:.I.2,202:.I.3|
00000AB0: 2C 31 36 39 3A 97 49 AA 34 2C 30 31 33 3A 97 49 |,169:.I.4,013:.I|
00000AC0: AA 35 2C 31 35 37 00 00 13 8E 03 97 4A AA 30 2C |.5,157......J.0,|
00000AD0: 31 32 30 3A 97 4A AA 31 2C 30 30 32 3A 97 4A AA |120:.J.1,002:.J.|
00000AE0: 32 2C 32 30 32 3A 97 4A AA 33 2C 30 31 36 3A 97 |2,202:.J.3,016:.|
00000AF0: 4A AA 34 2C 32 35 30 3A 97 4A AA 35 2C 30 39 36 |J.4,250:.J.5,096|
00000B00: 00 32 13 8F 03 99 20 C7 28 31 34 37 29 3A 99 3A |.2.... .(147):.:|
00000B10: 85 20 22 42 45 47 49 4E 52 45 47 45 4C 4E 55 4D |. "BEGINREGELNUM|
00000B20: 4D 45 52 20 28 33 30 30 30 2D 37 39 39 39 29 22 |MER (3000-7999)"|
00000B30: 3B 52 00 4E 13 90 03 8B 20 52 B3 33 30 30 30 20 |;R.N.... R.3000 |
00000B40: B0 20 52 B1 37 39 39 39 20 A7 20 39 31 31 00 70 |. R.7999 . 911.p|
00000B50: 13 98 03 85 20 22 42 45 47 49 4E 41 44 52 45 53 |.... "BEGINADRES|
00000B60: 20 48 45 58 44 41 54 41 4D 41 4B 45 52 22 3B 41 | HEXDATAMAKER";A|
00000B70: 00 82 13 99 03 8B 20 41 B3 32 35 35 20 A7 20 39 |...... A.255 . 9|
00000B80: 32 30 00 A4 13 9A 03 85 20 22 20 45 49 4E 44 41 |20...... " EINDA|
00000B90: 44 52 45 53 20 48 45 58 44 41 54 41 4D 41 4B 45 |DRES HEXDATAMAKE|
00000BA0: 52 22 3B 5A 00 BE 13 9B 03 8B 20 5A B1 35 33 32 |R";Z...... Z.532|
00000BB0: 34 37 20 B0 20 41 B1 5A 20 A7 20 39 32 30 00 D9 |47 . A.Z . 920..|
00000BC0: 13 9C 03 99 20 C7 28 31 34 37 29 3A 99 20 52 AB |.... .(147):. R.|
00000BD0: 35 22 44 41 54 41 22 41 3B 00 12 14 9D 03 99 20 |5"DATA"A;...... |
00000BE0: 22 22 3A 99 20 22 41 3D 22 41 22 3A 52 3D 22 52 |"":. "A="A":R="R|
00000BF0: 22 3A 5A 3D 22 5A 22 3A 47 4F 54 4F 20 39 33 30 |":Z="Z":GOTO 930|
00000C00: 22 3B 3A 97 20 37 34 37 2C 35 3A 9E 20 37 34 31 |";:. 747,5:. 741|
00000C10: 3A 80 00 2B 14 A2 03 99 20 C7 28 31 34 37 29 3A |:..+.... .(147):|
00000C20: 8B 20 41 B1 5A 20 A7 20 39 34 37 00 44 14 A3 03 |. A.Z . 947.D...|
00000C30: 99 20 52 22 44 41 54 41 22 3B 3A 81 20 49 B2 30 |. R"DATA";:. I.0|
00000C40: 20 A4 20 33 00 7C 14 AC 03 99 20 22 20 22 3B 3A | . 3.|.... " ";:|
00000C50: 81 20 4A B2 30 20 A4 20 37 3A 44 B2 41 AA 38 AC |. J.0 . 7:D.A.8.|
00000C60: 49 AA 4A 3A 51 B2 B5 28 44 AD 32 35 36 29 3A 97 |I.J:Q..(D.256):.|
00000C70: 20 37 30 31 2C 44 AB 32 35 36 AC 51 00 AC 14 AD | 701,D.256.Q....|
00000C80: 03 97 20 37 30 32 2C 51 3A 9E 20 37 30 30 3A 99 |.. 702,Q:. 700:.|
00000C90: 20 C7 28 C2 28 37 38 31 29 29 C7 28 C2 28 37 38 | .(.(781)).(.(78|
00000CA0: 30 29 29 3B 3A 82 20 4A 3A 82 20 49 00 EB 14 B1 |0));:. J:. I....|
00000CB0: 03 99 20 22 22 3A 99 20 22 41 3D 22 41 AA 33 32 |.. "":. "A="A.32|
00000CC0: 22 3A 52 3D 22 52 AA 31 30 22 3A 5A 3D 22 5A 22 |":R="R.10":Z="Z"|
00000CD0: 3A 47 4F 54 4F 20 39 33 30 22 3B 3A 97 20 37 34 |:GOTO 930";:. 74|
00000CE0: 37 2C 34 3A 9E 20 37 34 31 3A 80 00 18 15 B3 03 |7,4:. 741:......|
00000CF0: 99 20 C7 28 31 34 37 29 3A 99 20 52 22 44 41 54 |. .(147):. R"DAT|
00000D00: 41 20 26 22 3B 3A 99 20 22 22 3A 99 20 22 47 4F |A &";:. "":. "GO|
00000D10: 54 4F 20 39 34 39 22 3B 00 2C 15 B4 03 97 20 37 |TO 949";.,.... 7|
00000D20: 34 37 2C 33 3A 9E 20 37 34 31 3A 80 00 32 15 B5 |47,3:. 741:..2..|
00000D30: 03 80 00 4A 15 AC 0D 99 3A 99 20 22 57 41 43 48 |...J....:. "WACH|
00000D40: 54 20 45 56 45 4E 2E 22 3A 99 00 76 15 AD 0D 87 |T EVEN.":..v....|
00000D50: 20 41 54 3A 5A 54 B2 41 54 3A 99 20 22 42 45 47 | AT:ZT.AT:. "BEG|
00000D60: 49 4E 41 44 52 45 53 20 3D 22 5A 54 3B C7 28 31 |INADRES ="ZT;.(1|
00000D70: 35 37 29 22 2E 22 00 90 15 AE 0D 97 20 32 35 33 |57)"."...... 253|
00000D80: 2C 33 35 3A 97 20 32 35 34 2C C2 28 36 34 38 29 |,35:. 254,.(648)|
00000D90: 00 AF 15 B6 0D 87 20 4B 24 3A 4B B2 C3 28 4B 24 |...... K$:K..(K$|
00000DA0: 29 3A 57 B2 30 3A 81 20 4A B2 31 20 A4 20 4B 00 |):W.0:. J.1 . K.|
00000DB0: D0 15 C0 0D 55 B2 C6 28 CA 28 4B 24 2C 4A 2C 31 |....U..(.(K$,J,1|
00000DC0: 29 29 3A 8B 20 55 B2 33 38 20 A7 20 33 35 39 30 |)):. U.38 . 3590|
00000DD0: 00 E2 15 C5 0D 8B 20 55 B3 34 38 20 A7 20 33 35 |...... U.48 . 35|
00000DE0: 36 30 00 FD 15 C6 0D 8B 20 55 B3 35 38 20 A7 20 |60...... U.58 . |
00000DF0: 55 B2 55 AB 34 38 3A 89 20 33 35 33 30 00 0F 16 |U.U.48:. 3530...|
00000E00: C7 0D 8B 20 55 B3 36 35 20 A7 20 33 35 36 30 00 |... U.65 . 3560.|
00000E10: 2A 16 C8 0D 8B 20 55 B3 37 31 20 A7 20 55 B2 55 |*.... U.71 . U.U|
00000E20: AB 35 35 3A 89 20 33 35 33 30 00 35 16 C9 0D 89 |.55:. 3530.5....|
00000E30: 20 33 35 36 30 00 50 16 CA 0D 8B 20 57 B2 30 20 | 3560.P.... W.0 |
00000E40: A7 20 5A B2 55 3A 57 B2 31 3A 89 20 33 35 36 30 |. Z.U:W.1:. 3560|
00000E50: 00 64 16 D4 0D 5A B2 5A AC 31 36 AA 55 3A 97 20 |.d...Z.Z.16.U:. |
00000E60: 41 54 2C 5A 00 74 16 DE 0D 41 54 B2 41 54 AA 31 |AT,Z.t...AT.AT.1|
00000E70: 3A 57 B2 30 00 83 16 E8 0D 82 20 4A 3A 89 20 33 |:W.0...... J:. 3|
00000E80: 35 31 30 00 B0 16 06 0E 41 54 B2 41 54 AB 31 3A |510.....AT.AT.1:|
00000E90: 99 20 22 20 45 49 4E 44 41 44 52 45 53 20 3D 22 |. " EINDADRES ="|
00000EA0: 41 54 3B C7 28 31 35 37 29 22 2E 22 3A 99 3A 8E |AT;.(157)".":.:.|
00000EB0: 00 EA 16 A5 0F 83 20 34 39 39 32 30 20 20 20 20 |...... 49920 |
00000EC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000ED0: 20 20 20 20 20 20 20 20 20 3A 8F 20 54 45 53 54 | :. TEST|
00000EE0: 50 52 4F 47 52 41 4D 4D 41 2E 00 34 17 AA 0F 83 |PROGRAMMA..4....|
00000EF0: 20 41 30 33 43 39 30 32 45 42 30 33 34 41 39 31 | A03C902EB034A91|
00000F00: 38 20 37 31 44 34 39 39 30 31 43 33 31 38 42 36 |8 71D49901C318B6|
00000F10: 31 35 20 34 36 31 46 34 41 33 30 46 34 32 30 33 |15 461F4A30F4203|
00000F20: 39 43 33 20 41 39 43 33 38 44 33 30 43 33 38 45 |9C3 A9C38D30C38E|
00000F30: 30 31 43 33 00 7E 17 AF 0F 83 20 41 39 32 35 38 |01C3.~.... A9258|
00000F40: 44 32 46 43 33 38 43 33 39 43 33 20 36 43 32 46 |D2FC38C39C3 6C2F|
00000F50: 43 33 31 30 45 35 39 30 45 32 30 30 20 45 41 35 |C310E590E200 EA5|
00000F60: 30 39 43 37 44 32 46 43 33 32 30 33 41 20 43 33 |09C7D2FC3203A C3|
00000F70: 36 30 30 30 38 44 30 44 43 33 41 45 31 39 00 C8 |60008D0DC3AE19..|
00000F80: 17 B4 0F 83 20 43 33 33 44 31 39 43 33 35 30 46 |.... C33D19C350F|
00000F90: 35 42 30 31 37 20 38 43 36 30 43 33 41 45 31 34 |5B017 8C60C3AE14|
00000FA0: 43 33 36 35 39 38 20 31 30 45 30 36 30 45 41 45 |C36598 10E060EAE|
00000FB0: 41 41 44 32 46 43 33 20 46 30 41 36 35 30 41 33 |AAD2FC3 F0A650A3|
00000FC0: 46 45 33 30 43 33 42 43 00 DD 17 B9 0F 83 20 31 |FE30C3BC...... 1|
00000FD0: 36 43 33 45 44 31 37 43 33 41 39 20 26 00 F9 17 |6C3ED17C3A9 &...|
00000FE0: 70 17 85 20 22 34 20 48 45 58 41 44 45 43 2E 54 |p.. "4 HEXADEC.T|
00000FF0: 45 4B 45 4E 53 22 3B 41 24 00 22 18 7A 17 81 20 |EKENS";A$.".z.. |
00001000: 55 B2 30 20 A4 20 33 3A 97 20 37 30 30 AA 55 2C |U.0 . 3:. 700.U,|
00001010: C6 28 CA 28 41 24 2C 55 AA 31 2C 31 29 29 3A 82 |.(.(A$,U.1,1)):.|
00001020: 20 55 00 41 18 84 17 97 20 32 35 34 2C 32 3A 97 | U.A.... 254,2:.|
00001030: 20 32 35 33 2C 31 38 38 20 20 3A 8F 20 37 30 30 | 253,188 :. 700|
00001040: 2E 00 61 18 8E 17 9E 20 34 30 30 31 36 3A 56 B2 |..a.... 40016:V.|
00001050: C2 28 32 35 31 29 AA 32 35 36 AC C2 28 32 35 32 |.(251).256..(252|
00001060: 29 00 72 18 98 17 99 20 22 55 49 54 20 3D 22 56 |).r.... "UIT ="V|
00001070: 3A 99 00 83 18 A2 17 8B 20 56 B1 30 20 A7 20 36 |:....... V.0 . 6|
00001080: 30 30 30 00 89 18 AC 17 90 00 A4 18 40 1F 99 20 |000.........@.. |
00001090: 22 4E 49 45 54 20 44 4F 4F 52 20 44 45 20 44 41 |"NIET DOOR DE DA|
000010A0: 54 41 21 22 00 AA 18 41 1F 90 00 D0 18 34 21 85 |TA!"...A.....4!.|
000010B0: 20 22 52 45 47 45 4C 4E 55 4D 4D 45 52 22 3B 52 | "REGELNUMMER";R|
000010C0: 3A 8B 20 52 B3 30 37 33 30 20 A7 20 39 30 39 39 |:. R.0730 . 9099|
000010D0: 00 F8 18 3E 21 41 B2 33 36 30 30 30 AA 33 32 AC |...>!A.36000.32.|
000010E0: B5 28 28 52 AB 37 33 30 29 AD 31 30 29 3A 99 20 |.((R.730).10):. |
000010F0: 41 3A 89 20 38 35 30 30 00 06 19 28 23 94 22 54 |A:. 8500...(#."T|
00001100: 45 4D 44 22 2C 38 00 1E 19 29 23 99 3A 99 20 22 |EMD",8...)#.:. "|
00001110: 54 45 4D 44 20 53 41 56 45 44 2E 22 3A 99 00 2C |TEMD SAVED.":..,|
00001120: 19 2A 23 95 22 54 45 4D 44 22 2C 38 00 47 19 2B |.*#."TEMD",8.G.+|
00001130: 23 99 3A 99 20 22 54 45 4D 44 20 56 45 52 49 46 |#.:. "TEMD VERIF|
00001140: 49 45 44 2E 22 3A 99 00 66 19 32 23 9F 20 35 2C |IED.":..f.2#. 5,|
00001150: 38 2C 31 35 2C 22 53 30 3A 50 52 4F 44 49 53 2E |8,15,"S0:PRODIS.|
00001160: 42 41 53 2F 4F 22 00 8C 19 33 23 98 35 2C 22 52 |BAS/O"...3#.5,"R|
00001170: 30 3A 50 52 4F 44 49 53 2E 42 41 53 2F 4F 3D 30 |0:PRODIS.BAS/O=0|
00001180: 3A 50 52 4F 44 49 53 2E 42 41 53 22 00 AA 19 34 |:PRODIS.BAS"...4|
00001190: 23 98 35 2C 22 52 30 3A 50 52 4F 44 49 53 2E 42 |#.5,"R0:PRODIS.B|
000011A0: 41 53 3D 30 3A 54 45 4D 44 22 00 B2 19 37 23 A0 |AS=0:TEMD"...7#.|
000011B0: 20 35 00 E1 19 3C 23 99 3A 99 20 22 56 45 52 53 | 5...<#.:. "VERS|
000011C0: 49 45 5A 45 54 20 50 52 4F 44 49 53 2E 42 41 53 |IEZET PRODIS.BAS|
000011D0: 20 4B 4C 41 41 52 2E 22 3A 99 3A 89 20 39 30 39 | KLAAR.":.:. 909|
000011E0: 39 00 EB 19 5A 23 9F 20 34 2C 34 00 01 1A 5F 23 |9...Z#. 4,4..._#|
000011F0: 98 34 2C 20 C7 28 32 37 29 22 42 22 C7 28 30 32 |.4, .(27)"B".(02|
00001200: 29 00 17 1A 60 23 98 34 2C 20 C7 28 32 37 29 22 |)...`#.4, .(27)"|
00001210: 4D 22 C7 28 31 30 29 00 2E 1A 61 23 98 34 2C 20 |M".(10)...a#.4, |
00001220: C7 28 32 37 29 C7 28 39 32 29 C7 28 31 29 00 36 |.(27).(92).(1).6|
00001230: 1A 64 23 9D 20 34 00 41 1A 69 23 89 20 39 30 39 |.d#. 4.A.i#. 909|
00001240: 39 00 4B 1A 6E 23 9F 20 34 2C 34 00 68 1A 73 23 |9.K.n#. 4,4.h.s#|
00001250: 98 34 2C 20 22 20 20 20 20 45 49 4E 44 20 56 41 |.4, " EIND VA|
00001260: 4E 20 4C 49 53 54 2E 22 00 79 1A 74 23 98 34 2C |N LIST.".y.t#.4,|
00001270: 20 C7 28 32 37 29 22 40 22 00 80 1A 78 23 98 34 | .(27)"@"...x#.4|
00001280: 00 88 1A 7D 23 A0 20 34 00 93 1A 7E 23 89 20 39 |...}#. 4...~#. 9|
00001290: 30 39 39 00 99 1A 8B 23 80 00 00 00 |099....#.... |
..=.... 100 :. PROGRAMMA PRODIS.BAS D
ISSEMBLER MET LABELS....... 100 :. LA
BELS WORDEN AANGEMAAKT. KEUZE: DECIMAAL
OF HEXADEC..H.... 9000 :. VERSIE
ZET. TAAL: BASIC.
......
************* DATUM: 14 DEC.1989..
N.... 9050 :. LIST.
* MEENEEM-1 *...... 9070 :. END
LIST. *************......
PROGRAMMEUR: J.H.VAN RIJN..V.D.
. 53280,11:. 53281,11:. G(155)...E.TB.09
0:. 52,TB:. 56,TB :. TOP VAN BASI
C..8.F.N$."COD.DISSEM":L.C(N$):. 700,L:.
I.1 . L.W.G.. 700.I,F(J(N$,I,1)):. I:..
~.H.. "MACHINECODE "N$" INLEZEN....":...
.N.A.00720:B.A.6:C.B.6:D.C.6:E.D.6
:. BOOTSTRAP....O..A.0,169:.A.1,001:.A
.2,162 :.A.3,008:.A.4,160:.A.5,001.3.
P..B.0,032:.B.1,186:.B.2,255 :.B.3,17
3:.B.4,188:.B.5,002.Q.Q..C.0,162:.C.1,18
9:.C.2,160 :.C.3,002:.C.4,032:.C.5,18
9...R..D.0,255:.D.1,169:.D.2,000 :.D.
3,162:.D.4,255:.D.5,160...S..E.0,255:.E.
1,032:.E.2,213 :.E.3,255:.E.4,096:.E.
5,000...T.. A:. ST.64 . 120.+.U..:. "LAA
DFOUT:TOESTAND "ST:.:. 9099.V.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..B.0,167:.B.1,165:.B.2,021 :
.B.3,133:.B.4,168:.B.5,096.3.{.. 785,168
:. 786,002 :. S.P.680; UIT:
(168,167)..Z...RU.23040:LU.27672:ZU.286
72:VU.38832:WU.00832:BU.00680 :. GEBIEDE
N......Z..(RU):. 40928,B(167):. 40929,B(
168) :. REGELS @ 6......Z..(LU):. 4093
0,B(167):. 40931,B(168) :. LABELS @ 2.
.'...Z..(ZU):. 40932,B(167):. 40933,B(16
8) :. EIND+1..E...Z..(VU):. 40934,B(16
7):. 40935,B(168) :. VOORBLOK TEXT.. .
..Z..(WU):. 40936,B(167):. 40937,B(168)
:. WERKGEBIED......Z..(BU):. 40938,B(1
67):. 40939,B(168) :. BESTANDSNAAM..*.
..OU.40256
:. GEBIED OPCODES..E...Z
..(OU):. 40940,B(167):. 40941,B(168) :
. BEGINADRES......NO.151
:. AANTAL OPCODES......
. 40942,NO.....MA.040
:. KANTLIJN....... 40943,M
A.6.... 3500
:. ZET TESTPROGRAMMA..O.... 35456
:. MACHINE-H.P..
Z.... 9099.....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.0....B.0,168:.B.1,138:.B.
2,106:.B.3,106:.B.4,106:.B.5,106.J....C.
0,041:.C.1,015:.C.2,170:.C.3,189:.C.4,21
2:.C.5,002......D.0,170:.D.1,185:.D.2,21
2:.D.3,002:.D.4,096:.D.5,000......E.0,04
8:.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.R....G.0,067:.G
.1,068:.G.2,069:.G.3,070:.G.4,000:.G.5,1
69......H.0,019:.H.1,141:.H.2,119:.H.3,0
02:.H.4,162:.H.5,000.F....I.0,134:.I.1,1
98:.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.2.... G(147):.:. "BEGIN
REGELNUMMER (3000-7999)";R.N.... R.3000
. R.7999 . 911.P.... "BEGINADRES HEXDATA
MAKER";A...... A.255 . 920...... " EINDA
DRES HEXDATAMAKER";Z...... Z.53247 . A.Z
. 920.Y.... G(147):. R.5"DATA"A;......
"":. "A="A":R="R":Z="Z":GOTO 930";:. 747
,5:. 741:..+.... G(147):. A.Z . 947.D...
. 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...... "":. "A="A.32":R="R.10":Z="Z"
:GOTO 930";:. 747,4:. 741:....... G(147)
:. R"DATA &";:. "":. "GOTO 949";.,.... 7
47,3:. 741:..2.....J....:. "WACHT EVEN."
:..V.... AT:ZT.AT:. "BEGINADRES ="ZT;G(1
57)"."...... 253,35:. 254,B(648)...... K
$:K.C(K$):W.0:. J.1 . K.P...U.F(J(K$,J,1
)):. U.38 . 3590...E.. U.48 . 3560...F..
U.58 . U.U.48:. 3530...G.. U.65 . 3560.
*.H.. U.71 . U.U.55:. 3530.5.I.. 3560.P.
J.. W.0 . Z.U:W.1:. 3560.D.T.Z.Z.16.U:.
AT,Z.T...AT.AT.1:W.0...... J:. 3510.....
AT.AT.1:. " EINDADRES ="AT;G(157)".":.:.
...... 49920
:. TESTPROGRAMMA..4.... A03C902EB034A91
8 71D49901C318B615 461F4A30F42039C3 A9C3
8D30C38E01C3.~.... A9258D2FC38C39C3 6C2F
C310E590E200 EA509C7D2FC3203A C360008D0D
C3AE19.H.... C33D19C350F5B017 8C60C3AE14
C36598 10E060EAEAAD2FC3 F0A650A3FE30C3BC
...... 16C3ED17C3A9 &...P.. "4 HEXADEC.T
EKENS";A$.".Z.. U.0 . 3:. 700.U,F(J(A$,U
.1,1)):. U.A.... 254,2:. 253,188 :. 700
..A.... 40016:V.B(251).256.B(252).R....
"UIT ="V:....... V.0 . 6000.........@..
"NIET DOOR DE DATA!"...A...P.4!. "REGELN
UMMER";R:. R.0730 . 9099...>!A.36000.32.
.((R.730).10):. A:. 8500...(#."TEMD",8..
.)#.:. "TEMD SAVED.":..,.*#."TEMD",8.G.+
#.:. "TEMD VERIFIED.":..F.2#. 5,8,15,"S0
:PRODIS.BAS/O"...3#.5,"R0:PRODIS.BAS/O=0
:PRODIS.BAS"...4#.5,"R0:PRODIS.BAS=0:TEM
D"...7# 5...<#.:. "VERSIEZET PRODIS.BAS
KLAAR.":.:. 9099...Z#. 4,4..._#.4, G(27
)"B"G(02)...`#.4, G(27)"M"G(10)...A#.4,
G(27)G(92)G(1).6.D#. 4.A.I#. 9099.K.N#.
4,4.H.S#.4, " EIND VAN LIST.".Y.T#.4,
G(27)"@"...X#.4...}# 4...~#. 9099....#
....
> CLICK IMAGE PREVIEW FOR FULL MODAL