PRODIS.BAS/O
FILE INFORMATION
FILENAME(S): PRODIS.BAS/O
FILE TYPE(S): PRG
FILE SIZE: 4.6K
FIRST SEEN: 2025-11-30 21:27:07
APPEARS ON: 1 disk(s)
FILE HASH
8e31ed8db3dcaa9af66026b1af5045a188446c65d8dc57d24838985368f26b77
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TESTFILES 2 | PRODIS.BAS/O | PRG | DuncanTwain | 23 | 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 39 20 4F 43 |** DATUM: 19 OC|
00000110: 54 2E 31 39 38 39 2E 00 4E 09 05 00 89 20 39 30 |T.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 54 45 53 54 46 49 4C 45 53 20 2A 00 85 | * TESTFILES *..|
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 A8 09 64 00 97 20 35 33 32 38 |*****...d.. 5328|
00000190: 30 2C 31 31 3A 97 20 35 33 32 38 31 2C 31 31 3A |0,11:. 53281,11:|
000001A0: 99 20 C7 28 31 35 35 29 00 DC 09 65 00 54 42 B2 |. .(155)...e.TB.|
000001B0: 30 37 30 3A 97 20 35 32 2C 54 42 3A 97 20 35 36 |070:. 52,TB:. 56|
000001C0: 2C 54 42 20 20 20 20 20 20 20 20 3A 8F 20 54 4F |,TB :. TO|
000001D0: 50 20 56 41 4E 20 42 41 53 49 43 2E 00 0A 0A 66 |P VAN BASIC....f|
000001E0: 00 4E 24 B2 22 43 4F 44 2E 44 49 53 53 45 4D 22 |.N$."COD.DISSEM"|
000001F0: 3A 4C B2 C3 28 4E 24 29 3A 97 20 37 30 30 2C 4C |:L..(N$):. 700,L|
00000200: 3A 81 20 49 B2 31 20 A4 20 4C 00 29 0A 67 00 97 |:. I.1 . L.).g..|
00000210: 20 37 30 30 AA 49 2C C6 28 CA 28 4E 24 2C 49 2C | 700.I,.(.(N$,I,|
00000220: 31 29 29 3A 82 20 49 3A 99 00 50 0A 68 00 99 20 |1)):. I:..P.h.. |
00000230: 22 4D 41 43 48 49 4E 45 43 4F 44 45 20 22 4E 24 |"MACHINECODE "N$|
00000240: 22 20 49 4E 4C 45 5A 45 4E 2E 2E 2E 2E 22 3A 99 |" INLEZEN....":.|
00000250: 00 89 0A 6E 00 41 B2 30 30 37 32 30 3A 42 B2 41 |...n.A.00720:B.A|
00000260: AA 36 3A 43 B2 42 AA 36 3A 44 B2 43 AA 36 3A 45 |.6:C.B.6:D.C.6:E|
00000270: B2 44 AA 36 20 20 20 20 20 20 20 20 3A 8F 20 42 |.D.6 :. B|
00000280: 4F 4F 54 53 54 52 41 50 2E 00 C7 0A 6F 00 97 41 |OOTSTRAP....o..A|
00000290: AA 30 2C 31 36 39 3A 97 41 AA 31 2C 30 30 31 3A |.0,169:.A.1,001:|
000002A0: 97 41 AA 32 2C 31 36 32 20 20 20 20 3A 97 41 AA |.A.2,162 :.A.|
000002B0: 33 2C 30 30 38 3A 97 41 AA 34 2C 31 36 30 3A 97 |3,008:.A.4,160:.|
000002C0: 41 AA 35 2C 30 30 31 00 05 0B 70 00 97 42 AA 30 |A.5,001...p..B.0|
000002D0: 2C 30 33 32 3A 97 42 AA 31 2C 31 38 36 3A 97 42 |,032:.B.1,186:.B|
000002E0: AA 32 2C 32 35 35 20 20 20 20 3A 97 42 AA 33 2C |.2,255 :.B.3,|
000002F0: 31 37 33 3A 97 42 AA 34 2C 31 38 38 3A 97 42 AA |173:.B.4,188:.B.|
00000300: 35 2C 30 30 32 00 43 0B 71 00 97 43 AA 30 2C 31 |5,002.C.q..C.0,1|
00000310: 36 32 3A 97 43 AA 31 2C 31 38 39 3A 97 43 AA 32 |62:.C.1,189:.C.2|
00000320: 2C 31 36 30 20 20 20 20 3A 97 43 AA 33 2C 30 30 |,160 :.C.3,00|
00000330: 32 3A 97 43 AA 34 2C 30 33 32 3A 97 43 AA 35 2C |2:.C.4,032:.C.5,|
00000340: 31 38 39 00 81 0B 72 00 97 44 AA 30 2C 32 35 35 |189...r..D.0,255|
00000350: 3A 97 44 AA 31 2C 31 36 39 3A 97 44 AA 32 2C 30 |:.D.1,169:.D.2,0|
00000360: 30 30 20 20 20 20 3A 97 44 AA 33 2C 31 36 32 3A |00 :.D.3,162:|
00000370: 97 44 AA 34 2C 32 35 35 3A 97 44 AA 35 2C 31 36 |.D.4,255:.D.5,16|
00000380: 30 00 BF 0B 73 00 97 45 AA 30 2C 32 35 35 3A 97 |0...s..E.0,255:.|
00000390: 45 AA 31 2C 30 33 32 3A 97 45 AA 32 2C 32 31 33 |E.1,032:.E.2,213|
000003A0: 20 20 20 20 3A 97 45 AA 33 2C 32 35 35 3A 97 45 | :.E.3,255:.E|
000003B0: AA 34 2C 30 39 36 3A 97 45 AA 35 2C 30 30 30 00 |.4,096:.E.5,000.|
000003C0: D5 0B 74 00 9E 20 41 3A 8B 20 53 54 B2 36 34 20 |..t.. A:. ST.64 |
000003D0: A7 20 31 32 30 00 FD 0B 75 00 99 3A 99 20 22 4C |. 120...u..:. "L|
000003E0: 41 41 44 46 4F 55 54 3A 54 4F 45 53 54 41 4E 44 |AADFOUT:TOESTAND|
000003F0: 20 22 53 54 3A 99 3A 89 20 39 30 39 39 00 48 0C | "ST:.:. 9099.H.|
00000400: 78 00 41 B2 30 30 36 38 30 3A 42 B2 41 AA 36 20 |x.A.00680:B.A.6 |
00000410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000420: 20 20 20 20 20 20 20 20 20 3A 8F 20 55 53 52 28 | :. USR(|
00000430: 58 29 20 53 50 4C 49 54 53 20 58 20 49 4E 20 4C |X) SPLITS X IN L|
00000440: 53 20 45 4E 20 48 53 2E 00 86 0C 79 00 97 41 AA |S EN HS....y..A.|
00000450: 30 2C 30 33 32 3A 97 41 AA 31 2C 32 34 37 3A 97 |0,032:.A.1,247:.|
00000460: 41 AA 32 2C 31 38 33 20 20 20 20 3A 97 41 AA 33 |A.2,183 :.A.3|
00000470: 2C 31 36 35 3A 97 41 AA 34 2C 30 32 30 3A 97 41 |,165:.A.4,020:.A|
00000480: AA 35 2C 31 33 33 00 C4 0C 7A 00 97 42 AA 30 2C |.5,133...z..B.0,|
00000490: 31 36 37 3A 97 42 AA 31 2C 31 36 35 3A 97 42 AA |167:.B.1,165:.B.|
000004A0: 32 2C 30 32 31 20 20 20 20 3A 97 42 AA 33 2C 31 |2,021 :.B.3,1|
000004B0: 33 33 3A 97 42 AA 34 2C 31 36 38 3A 97 42 AA 35 |33:.B.4,168:.B.5|
000004C0: 2C 30 39 36 00 05 0D 7B 00 97 20 37 38 35 2C 31 |,096...{.. 785,1|
000004D0: 36 38 3A 97 20 37 38 36 2C 30 30 32 20 20 20 20 |68:. 786,002 |
000004E0: 20 20 20 20 20 20 20 20 20 20 3A 8F 20 53 2E 50 | :. S.P|
000004F0: 2E 36 38 30 3B 20 55 49 54 3A 20 28 31 36 38 2C |.680; UIT: (168,|
00000500: 31 36 37 29 2E 00 1D 0D 7C 00 99 3A 99 20 22 54 |167)....|..:. "T|
00000510: 55 53 53 45 4E 53 54 4F 50 2E 22 3A 99 00 23 0D |USSENSTOP.":..#.|
00000520: 7D 00 90 00 45 0D 7E 00 8F 20 4C 41 54 45 52 20 |}...E.~.. LATER |
00000530: 31 32 34 2C 31 32 35 2C 31 32 36 20 57 45 47 48 |124,125,126 WEGH|
00000540: 41 4C 45 4E 2E 00 8C 0D 82 00 52 55 B2 31 37 39 |ALEN......RU.179|
00000550: 32 30 3A 4C 55 B2 33 30 38 35 32 3A 5A 55 B2 33 |20:LU.30852:ZU.3|
00000560: 32 37 36 38 3A 56 55 B2 33 38 38 33 32 3A 57 55 |2768:VU.38832:WU|
00000570: B2 30 30 38 33 32 3A 42 55 B2 30 30 36 38 30 20 |.00832:BU.00680 |
00000580: 3A 8F 20 47 45 42 49 45 44 45 4E 2E 00 C7 0D 83 |:. GEBIEDEN.....|
00000590: 00 5A B2 B7 28 52 55 29 3A 97 20 34 30 39 32 38 |.Z..(RU):. 40928|
000005A0: 2C C2 28 31 36 37 29 3A 97 20 34 30 39 32 39 2C |,.(167):. 40929,|
000005B0: C2 28 31 36 38 29 20 20 20 3A 8F 20 52 45 47 45 |.(168) :. REGE|
000005C0: 4C 53 20 40 20 36 2E 00 02 0E 84 00 5A B2 B7 28 |LS @ 6......Z..(|
000005D0: 4C 55 29 3A 97 20 34 30 39 33 30 2C C2 28 31 36 |LU):. 40930,.(16|
000005E0: 37 29 3A 97 20 34 30 39 33 31 2C C2 28 31 36 38 |7):. 40931,.(168|
000005F0: 29 20 20 20 3A 8F 20 4C 41 42 45 4C 53 20 40 20 |) :. LABELS @ |
00000600: 32 2E 00 39 0E 85 00 5A B2 B7 28 5A 55 29 3A 97 |2..9...Z..(ZU):.|
00000610: 20 34 30 39 33 32 2C C2 28 31 36 37 29 3A 97 20 | 40932,.(167):. |
00000620: 34 30 39 33 33 2C C2 28 31 36 38 29 20 20 20 3A |40933,.(168) :|
00000630: 8F 20 45 49 4E 44 2B 31 2E 00 77 0E 86 00 5A B2 |. EIND+1..w...Z.|
00000640: B7 28 56 55 29 3A 97 20 34 30 39 33 34 2C C2 28 |.(VU):. 40934,.(|
00000650: 31 36 37 29 3A 97 20 34 30 39 33 35 2C C2 28 31 |167):. 40935,.(1|
00000660: 36 38 29 20 20 20 3A 8F 20 56 4F 4F 52 42 4C 4F |68) :. VOORBLO|
00000670: 4B 20 54 45 58 54 2E 00 B2 0E 87 00 5A B2 B7 28 |K TEXT......Z..(|
00000680: 57 55 29 3A 97 20 34 30 39 33 36 2C C2 28 31 36 |WU):. 40936,.(16|
00000690: 37 29 3A 97 20 34 30 39 33 37 2C C2 28 31 36 38 |7):. 40937,.(168|
000006A0: 29 20 20 20 3A 8F 20 57 45 52 4B 47 45 42 49 45 |) :. WERKGEBIE|
000006B0: 44 2E 00 EF 0E 88 00 5A B2 B7 28 42 55 29 3A 97 |D......Z..(BU):.|
000006C0: 20 34 30 39 33 38 2C C2 28 31 36 37 29 3A 97 20 | 40938,.(167):. |
000006D0: 34 30 39 33 39 2C C2 28 31 36 38 29 20 20 20 3A |40939,.(168) :|
000006E0: 8F 20 42 45 53 54 41 4E 44 53 4E 41 41 4D 2E 00 |. BESTANDSNAAM..|
000006F0: 3C 0F 8C 00 4F 55 B2 34 30 32 35 36 20 20 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 3A 8F 20 47 45 42 | :. GEB|
00000730: 49 45 44 20 4F 50 43 4F 44 45 53 2E 00 77 0F 8D |IED OPCODES..w..|
00000740: 00 5A B2 B7 28 4F 55 29 3A 97 20 34 30 39 34 30 |.Z..(OU):. 40940|
00000750: 2C C2 28 31 36 37 29 3A 97 20 34 30 39 34 31 2C |,.(167):. 40941,|
00000760: C2 28 31 36 38 29 20 20 20 3A 8F 20 42 45 47 49 |.(168) :. BEGI|
00000770: 4E 41 44 52 45 53 2E 00 B5 0F 8E 00 4E 4F B2 31 |NADRES......NO.1|
00000780: 35 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |51 |
00000790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007A0: 20 20 20 3A 8F 20 41 41 4E 54 41 4C 20 4F 50 43 | :. AANTAL OPC|
000007B0: 4F 44 45 53 2E 00 C4 0F 8F 00 97 20 34 30 39 34 |ODES....... 4094|
000007C0: 32 2C 4E 4F 00 01 10 93 00 8D 20 33 35 30 30 20 |2,NO...... 3500 |
000007D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007E0: 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 5A | :. Z|
000007F0: 45 54 20 54 45 53 54 50 52 4F 47 52 41 4D 4D 41 |ET TESTPROGRAMMA|
00000800: 2E 00 3A 10 94 00 9E 20 33 35 34 35 36 20 20 20 |..:.... 35456 |
00000810: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000820: 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 4D 41 | :. MA|
00000830: 43 48 49 4E 45 2D 48 2E 50 2E 00 45 10 95 00 89 |CHINE-H.P..E....|
00000840: 20 39 30 39 39 00 87 10 84 03 41 B2 30 30 37 30 | 9099.....A.0070|
00000850: 30 3A 42 B2 41 AA 36 3A 43 B2 42 AA 36 3A 44 B2 |0:B.A.6:C.B.6:D.|
00000860: 43 AA 36 3A 45 B2 44 AA 36 3A 46 B2 45 AA 36 3A |C.6:E.D.6:F.E.6:|
00000870: 47 B2 46 AA 36 3A 48 B2 47 AA 36 3A 49 B2 48 AA |G.F.6:H.G.6:I.H.|
00000880: 36 3A 4A B2 49 AA 36 00 C1 10 85 03 97 41 AA 30 |6:J.I.6......A.0|
00000890: 2C 31 37 33 3A 97 41 AA 31 2C 30 30 30 3A 97 41 |,173:.A.1,000:.A|
000008A0: AA 32 2C 30 30 30 3A 97 41 AA 33 2C 31 37 30 3A |.2,000:.A.3,170:|
000008B0: 97 41 AA 34 2C 30 34 31 3A 97 41 AA 35 2C 30 31 |.A.4,041:.A.5,01|
000008C0: 35 00 FB 10 86 03 97 42 AA 30 2C 31 36 38 3A 97 |5......B.0,168:.|
000008D0: 42 AA 31 2C 31 33 38 3A 97 42 AA 32 2C 31 30 36 |B.1,138:.B.2,106|
000008E0: 3A 97 42 AA 33 2C 31 30 36 3A 97 42 AA 34 2C 31 |:.B.3,106:.B.4,1|
000008F0: 30 36 3A 97 42 AA 35 2C 31 30 36 00 35 11 87 03 |06:.B.5,106.5...|
00000900: 97 43 AA 30 2C 30 34 31 3A 97 43 AA 31 2C 30 31 |.C.0,041:.C.1,01|
00000910: 35 3A 97 43 AA 32 2C 31 37 30 3A 97 43 AA 33 2C |5:.C.2,170:.C.3,|
00000920: 31 38 39 3A 97 43 AA 34 2C 32 31 32 3A 97 43 AA |189:.C.4,212:.C.|
00000930: 35 2C 30 30 32 00 6F 11 88 03 97 44 AA 30 2C 31 |5,002.o....D.0,1|
00000940: 37 30 3A 97 44 AA 31 2C 31 38 35 3A 97 44 AA 32 |70:.D.1,185:.D.2|
00000950: 2C 32 31 32 3A 97 44 AA 33 2C 30 30 32 3A 97 44 |,212:.D.3,002:.D|
00000960: AA 34 2C 30 39 36 3A 97 44 AA 35 2C 30 30 30 00 |.4,096:.D.5,000.|
00000970: A9 11 89 03 97 45 AA 30 2C 30 34 38 3A 97 45 AA |.....E.0,048:.E.|
00000980: 31 2C 30 34 39 3A 97 45 AA 32 2C 30 35 30 3A 97 |1,049:.E.2,050:.|
00000990: 45 AA 33 2C 30 35 31 3A 97 45 AA 34 2C 30 35 32 |E.3,051:.E.4,052|
000009A0: 3A 97 45 AA 35 2C 30 35 33 00 E3 11 8A 03 97 46 |:.E.5,053......F|
000009B0: AA 30 2C 30 35 34 3A 97 46 AA 31 2C 30 35 35 3A |.0,054:.F.1,055:|
000009C0: 97 46 AA 32 2C 30 35 36 3A 97 46 AA 33 2C 30 35 |.F.2,056:.F.3,05|
000009D0: 37 3A 97 46 AA 34 2C 30 36 35 3A 97 46 AA 35 2C |7:.F.4,065:.F.5,|
000009E0: 30 36 36 00 1D 12 8B 03 97 47 AA 30 2C 30 36 37 |066......G.0,067|
000009F0: 3A 97 47 AA 31 2C 30 36 38 3A 97 47 AA 32 2C 30 |:.G.1,068:.G.2,0|
00000A00: 36 39 3A 97 47 AA 33 2C 30 37 30 3A 97 47 AA 34 |69:.G.3,070:.G.4|
00000A10: 2C 30 30 30 3A 97 47 AA 35 2C 31 36 39 00 57 12 |,000:.G.5,169.W.|
00000A20: 8C 03 97 48 AA 30 2C 30 31 39 3A 97 48 AA 31 2C |...H.0,019:.H.1,|
00000A30: 31 34 31 3A 97 48 AA 32 2C 31 31 39 3A 97 48 AA |141:.H.2,119:.H.|
00000A40: 33 2C 30 30 32 3A 97 48 AA 34 2C 31 36 32 3A 97 |3,002:.H.4,162:.|
00000A50: 48 AA 35 2C 30 30 30 00 91 12 8D 03 97 49 AA 30 |H.5,000......I.0|
00000A60: 2C 31 33 34 3A 97 49 AA 31 2C 31 39 38 3A 97 49 |,134:.I.1,198:.I|
00000A70: AA 32 2C 32 30 32 3A 97 49 AA 33 2C 31 36 39 3A |.2,202:.I.3,169:|
00000A80: 97 49 AA 34 2C 30 31 33 3A 97 49 AA 35 2C 31 35 |.I.4,013:.I.5,15|
00000A90: 37 00 CB 12 8E 03 97 4A AA 30 2C 31 32 30 3A 97 |7......J.0,120:.|
00000AA0: 4A AA 31 2C 30 30 32 3A 97 4A AA 32 2C 32 30 32 |J.1,002:.J.2,202|
00000AB0: 3A 97 4A AA 33 2C 30 31 36 3A 97 4A AA 34 2C 32 |:.J.3,016:.J.4,2|
00000AC0: 35 30 3A 97 4A AA 35 2C 30 39 36 00 FD 12 8F 03 |50:.J.5,096.....|
00000AD0: 99 20 C7 28 31 34 37 29 3A 99 3A 85 20 22 42 45 |. .(147):.:. "BE|
00000AE0: 47 49 4E 52 45 47 45 4C 4E 55 4D 4D 45 52 20 28 |GINREGELNUMMER (|
00000AF0: 33 30 30 30 2D 37 39 39 39 29 22 3B 52 00 19 13 |3000-7999)";R...|
00000B00: 90 03 8B 20 52 B3 33 30 30 30 20 B0 20 52 B1 37 |... R.3000 . R.7|
00000B10: 39 39 39 20 A7 20 39 31 31 00 3B 13 98 03 85 20 |999 . 911.;.... |
00000B20: 22 42 45 47 49 4E 41 44 52 45 53 20 48 45 58 44 |"BEGINADRES HEXD|
00000B30: 41 54 41 4D 41 4B 45 52 22 3B 41 00 4D 13 99 03 |ATAMAKER";A.M...|
00000B40: 8B 20 41 B3 32 35 35 20 A7 20 39 32 30 00 6F 13 |. A.255 . 920.o.|
00000B50: 9A 03 85 20 22 20 45 49 4E 44 41 44 52 45 53 20 |... " EINDADRES |
00000B60: 48 45 58 44 41 54 41 4D 41 4B 45 52 22 3B 5A 00 |HEXDATAMAKER";Z.|
00000B70: 89 13 9B 03 8B 20 5A B1 35 33 32 34 37 20 B0 20 |..... Z.53247 . |
00000B80: 41 B1 5A 20 A7 20 39 32 30 00 A4 13 9C 03 99 20 |A.Z . 920...... |
00000B90: C7 28 31 34 37 29 3A 99 20 52 AB 35 22 44 41 54 |.(147):. R.5"DAT|
00000BA0: 41 22 41 3B 00 DD 13 9D 03 99 20 22 22 3A 99 20 |A"A;...... "":. |
00000BB0: 22 41 3D 22 41 22 3A 52 3D 22 52 22 3A 5A 3D 22 |"A="A":R="R":Z="|
00000BC0: 5A 22 3A 47 4F 54 4F 20 39 33 30 22 3B 3A 97 20 |Z":GOTO 930";:. |
00000BD0: 37 34 37 2C 35 3A 9E 20 37 34 31 3A 80 00 F6 13 |747,5:. 741:....|
00000BE0: A2 03 99 20 C7 28 31 34 37 29 3A 8B 20 41 B1 5A |... .(147):. A.Z|
00000BF0: 20 A7 20 39 34 37 00 0F 14 A3 03 99 20 52 22 44 | . 947...... R"D|
00000C00: 41 54 41 22 3B 3A 81 20 49 B2 30 20 A4 20 33 00 |ATA";:. I.0 . 3.|
00000C10: 47 14 AC 03 99 20 22 20 22 3B 3A 81 20 4A B2 30 |G.... " ";:. J.0|
00000C20: 20 A4 20 37 3A 44 B2 41 AA 38 AC 49 AA 4A 3A 51 | . 7:D.A.8.I.J:Q|
00000C30: B2 B5 28 44 AD 32 35 36 29 3A 97 20 37 30 31 2C |..(D.256):. 701,|
00000C40: 44 AB 32 35 36 AC 51 00 77 14 AD 03 97 20 37 30 |D.256.Q.w.... 70|
00000C50: 32 2C 51 3A 9E 20 37 30 30 3A 99 20 C7 28 C2 28 |2,Q:. 700:. .(.(|
00000C60: 37 38 31 29 29 C7 28 C2 28 37 38 30 29 29 3B 3A |781)).(.(780));:|
00000C70: 82 20 4A 3A 82 20 49 00 B6 14 B1 03 99 20 22 22 |. J:. I...... ""|
00000C80: 3A 99 20 22 41 3D 22 41 AA 33 32 22 3A 52 3D 22 |:. "A="A.32":R="|
00000C90: 52 AA 31 30 22 3A 5A 3D 22 5A 22 3A 47 4F 54 4F |R.10":Z="Z":GOTO|
00000CA0: 20 39 33 30 22 3B 3A 97 20 37 34 37 2C 34 3A 9E | 930";:. 747,4:.|
00000CB0: 20 37 34 31 3A 80 00 E3 14 B3 03 99 20 C7 28 31 | 741:....... .(1|
00000CC0: 34 37 29 3A 99 20 52 22 44 41 54 41 20 26 22 3B |47):. R"DATA &";|
00000CD0: 3A 99 20 22 22 3A 99 20 22 47 4F 54 4F 20 39 34 |:. "":. "GOTO 94|
00000CE0: 39 22 3B 00 F7 14 B4 03 97 20 37 34 37 2C 33 3A |9";...... 747,3:|
00000CF0: 9E 20 37 34 31 3A 80 00 FD 14 B5 03 80 00 15 15 |. 741:..........|
00000D00: AC 0D 99 3A 99 20 22 57 41 43 48 54 20 45 56 45 |...:. "WACHT EVE|
00000D10: 4E 2E 22 3A 99 00 41 15 AD 0D 87 20 41 54 3A 5A |N.":..A.... AT:Z|
00000D20: 54 B2 41 54 3A 99 20 22 42 45 47 49 4E 41 44 52 |T.AT:. "BEGINADR|
00000D30: 45 53 20 3D 22 5A 54 3B C7 28 31 35 37 29 22 2E |ES ="ZT;.(157)".|
00000D40: 22 00 5B 15 AE 0D 97 20 32 35 33 2C 33 35 3A 97 |".[.... 253,35:.|
00000D50: 20 32 35 34 2C C2 28 36 34 38 29 00 7A 15 B6 0D | 254,.(648).z...|
00000D60: 87 20 4B 24 3A 4B B2 C3 28 4B 24 29 3A 57 B2 30 |. K$:K..(K$):W.0|
00000D70: 3A 81 20 4A B2 31 20 A4 20 4B 00 9B 15 C0 0D 55 |:. J.1 . K.....U|
00000D80: B2 C6 28 CA 28 4B 24 2C 4A 2C 31 29 29 3A 8B 20 |..(.(K$,J,1)):. |
00000D90: 55 B2 33 38 20 A7 20 33 35 39 30 00 AD 15 C5 0D |U.38 . 3590.....|
00000DA0: 8B 20 55 B3 34 38 20 A7 20 33 35 36 30 00 C8 15 |. U.48 . 3560...|
00000DB0: C6 0D 8B 20 55 B3 35 38 20 A7 20 55 B2 55 AB 34 |... U.58 . U.U.4|
00000DC0: 38 3A 89 20 33 35 33 30 00 DA 15 C7 0D 8B 20 55 |8:. 3530...... U|
00000DD0: B3 36 35 20 A7 20 33 35 36 30 00 F5 15 C8 0D 8B |.65 . 3560......|
00000DE0: 20 55 B3 37 31 20 A7 20 55 B2 55 AB 35 35 3A 89 | U.71 . U.U.55:.|
00000DF0: 20 33 35 33 30 00 00 16 C9 0D 89 20 33 35 36 30 | 3530...... 3560|
00000E00: 00 1B 16 CA 0D 8B 20 57 B2 30 20 A7 20 5A B2 55 |...... W.0 . Z.U|
00000E10: 3A 57 B2 31 3A 89 20 33 35 36 30 00 2F 16 D4 0D |:W.1:. 3560./...|
00000E20: 5A B2 5A AC 31 36 AA 55 3A 97 20 41 54 2C 5A 00 |Z.Z.16.U:. AT,Z.|
00000E30: 3F 16 DE 0D 41 54 B2 41 54 AA 31 3A 57 B2 30 00 |?...AT.AT.1:W.0.|
00000E40: 4E 16 E8 0D 82 20 4A 3A 89 20 33 35 31 30 00 7B |N.... J:. 3510.{|
00000E50: 16 06 0E 41 54 B2 41 54 AB 31 3A 99 20 22 20 45 |...AT.AT.1:. " E|
00000E60: 49 4E 44 41 44 52 45 53 20 3D 22 41 54 3B C7 28 |INDADRES ="AT;.(|
00000E70: 31 35 37 29 22 2E 22 3A 99 3A 8E 00 B5 16 A5 0F |157)".":.:......|
00000E80: 83 20 34 39 39 32 30 20 20 20 20 20 20 20 20 20 |. 49920 |
00000E90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000EA0: 20 20 20 20 3A 8F 20 54 45 53 54 50 52 4F 47 52 | :. TESTPROGR|
00000EB0: 41 4D 4D 41 2E 00 FF 16 AA 0F 83 20 41 30 33 43 |AMMA....... A03C|
00000EC0: 39 30 32 45 42 30 33 34 41 39 31 38 20 37 31 44 |902EB034A918 71D|
00000ED0: 34 39 39 30 31 43 33 31 38 42 36 31 35 20 34 36 |49901C318B615 46|
00000EE0: 31 46 34 41 33 30 46 34 32 30 33 39 43 33 20 41 |1F4A30F42039C3 A|
00000EF0: 39 43 33 38 44 33 30 43 33 38 45 30 31 43 33 00 |9C38D30C38E01C3.|
00000F00: 49 17 AF 0F 83 20 41 39 32 35 38 44 32 46 43 33 |I.... A9258D2FC3|
00000F10: 38 43 33 39 43 33 20 36 43 32 46 43 33 31 30 45 |8C39C3 6C2FC310E|
00000F20: 35 39 30 45 32 30 30 20 45 41 35 30 39 43 37 44 |590E200 EA509C7D|
00000F30: 32 46 43 33 32 30 33 41 20 43 33 36 30 30 30 38 |2FC3203A C360008|
00000F40: 44 30 44 43 33 41 45 31 39 00 93 17 B4 0F 83 20 |D0DC3AE19...... |
00000F50: 43 33 33 44 31 39 43 33 35 30 46 35 42 30 31 37 |C33D19C350F5B017|
00000F60: 20 38 43 36 30 43 33 41 45 31 34 43 33 36 35 39 | 8C60C3AE14C3659|
00000F70: 38 20 31 30 45 30 36 30 45 41 45 41 41 44 32 46 |8 10E060EAEAAD2F|
00000F80: 43 33 20 46 30 41 36 35 30 41 33 46 45 33 30 43 |C3 F0A650A3FE30C|
00000F90: 33 42 43 00 A8 17 B9 0F 83 20 31 36 43 33 45 44 |3BC...... 16C3ED|
00000FA0: 31 37 43 33 41 39 20 26 00 C4 17 70 17 85 20 22 |17C3A9 &...p.. "|
00000FB0: 34 20 48 45 58 41 44 45 43 2E 54 45 4B 45 4E 53 |4 HEXADEC.TEKENS|
00000FC0: 22 3B 41 24 00 ED 17 7A 17 81 20 55 B2 30 20 A4 |";A$...z.. U.0 .|
00000FD0: 20 33 3A 97 20 37 30 30 AA 55 2C C6 28 CA 28 41 | 3:. 700.U,.(.(A|
00000FE0: 24 2C 55 AA 31 2C 31 29 29 3A 82 20 55 00 0C 18 |$,U.1,1)):. U...|
00000FF0: 84 17 97 20 32 35 34 2C 32 3A 97 20 32 35 33 2C |... 254,2:. 253,|
00001000: 31 38 38 20 20 3A 8F 20 37 30 30 2E 00 2C 18 8E |188 :. 700..,..|
00001010: 17 9E 20 34 30 30 31 36 3A 56 B2 C2 28 32 35 31 |.. 40016:V..(251|
00001020: 29 AA 32 35 36 AC C2 28 32 35 32 29 00 3D 18 98 |).256..(252).=..|
00001030: 17 99 20 22 55 49 54 20 3D 22 56 3A 99 00 4E 18 |.. "UIT ="V:..N.|
00001040: A2 17 8B 20 56 B1 30 20 A7 20 36 30 30 30 00 54 |... V.0 . 6000.T|
00001050: 18 AC 17 90 00 6F 18 40 1F 99 20 22 4E 49 45 54 |.....o.@.. "NIET|
00001060: 20 44 4F 4F 52 20 44 45 20 44 41 54 41 21 22 00 | DOOR DE DATA!".|
00001070: 75 18 41 1F 90 00 9B 18 34 21 85 20 22 52 45 47 |u.A.....4!. "REG|
00001080: 45 4C 4E 55 4D 4D 45 52 22 3B 52 3A 8B 20 52 B3 |ELNUMMER";R:. R.|
00001090: 30 37 33 30 20 A7 20 39 30 39 39 00 C3 18 3E 21 |0730 . 9099...>!|
000010A0: 41 B2 33 36 30 30 30 AA 33 32 AC B5 28 28 52 AB |A.36000.32..((R.|
000010B0: 37 33 30 29 AD 31 30 29 3A 99 20 41 3A 89 20 38 |730).10):. A:. 8|
000010C0: 35 30 30 00 D1 18 28 23 94 22 54 45 4D 44 22 2C |500...(#."TEMD",|
000010D0: 38 00 E9 18 29 23 99 3A 99 20 22 54 45 4D 44 20 |8...)#.:. "TEMD |
000010E0: 53 41 56 45 44 2E 22 3A 99 00 F7 18 2A 23 95 22 |SAVED.":....*#."|
000010F0: 54 45 4D 44 22 2C 38 00 12 19 2B 23 99 3A 99 20 |TEMD",8...+#.:. |
00001100: 22 54 45 4D 44 20 56 45 52 49 46 49 45 44 2E 22 |"TEMD VERIFIED."|
00001110: 3A 99 00 31 19 32 23 9F 20 35 2C 38 2C 31 35 2C |:..1.2#. 5,8,15,|
00001120: 22 53 30 3A 50 52 4F 44 49 53 2E 42 41 53 2F 4F |"S0:PRODIS.BAS/O|
00001130: 22 00 57 19 33 23 98 35 2C 22 52 30 3A 50 52 4F |".W.3#.5,"R0:PRO|
00001140: 44 49 53 2E 42 41 53 2F 4F 3D 30 3A 50 52 4F 44 |DIS.BAS/O=0:PROD|
00001150: 49 53 2E 42 41 53 22 00 75 19 34 23 98 35 2C 22 |IS.BAS".u.4#.5,"|
00001160: 52 30 3A 50 52 4F 44 49 53 2E 42 41 53 3D 30 3A |R0:PRODIS.BAS=0:|
00001170: 54 45 4D 44 22 00 7D 19 37 23 A0 20 35 00 AC 19 |TEMD".}.7#. 5...|
00001180: 3C 23 99 3A 99 20 22 56 45 52 53 49 45 5A 45 54 |<#.:. "VERSIEZET|
00001190: 20 50 52 4F 44 49 53 2E 42 41 53 20 4B 4C 41 41 | PRODIS.BAS KLAA|
000011A0: 52 2E 22 3A 99 3A 89 20 39 30 39 39 00 B6 19 5A |R.":.:. 9099...Z|
000011B0: 23 9F 20 34 2C 34 00 CC 19 5F 23 98 34 2C 20 C7 |#. 4,4..._#.4, .|
000011C0: 28 32 37 29 22 42 22 C7 28 30 32 29 00 E2 19 60 |(27)"B".(02)...`|
000011D0: 23 98 34 2C 20 C7 28 32 37 29 22 4D 22 C7 28 31 |#.4, .(27)"M".(1|
000011E0: 30 29 00 F9 19 61 23 98 34 2C 20 C7 28 32 37 29 |0)...a#.4, .(27)|
000011F0: C7 28 39 32 29 C7 28 31 29 00 01 1A 64 23 9D 20 |.(92).(1)...d#. |
00001200: 34 00 0C 1A 69 23 89 20 39 30 39 39 00 16 1A 6E |4...i#. 9099...n|
00001210: 23 9F 20 34 2C 34 00 33 1A 73 23 98 34 2C 20 22 |#. 4,4.3.s#.4, "|
00001220: 20 20 20 20 45 49 4E 44 20 56 41 4E 20 4C 49 53 | EIND VAN LIS|
00001230: 54 2E 22 00 44 1A 74 23 98 34 2C 20 C7 28 32 37 |T.".D.t#.4, .(27|
00001240: 29 22 40 22 00 4B 1A 78 23 98 34 00 53 1A 7D 23 |)"@".K.x#.4.S.}#|
00001250: A0 20 34 00 5E 1A 7E 23 89 20 39 30 39 39 00 64 |. 4.^.~#. 9099.d|
00001260: 1A 8B 23 80 00 00 00 |..#.... |
..=.... 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 OCT.1989..
N.... 9050 :. LIST.
* TESTFILES *...... 9070 :. END
LIST. *************...D.. 5328
0,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:..P.H..
"MACHINECODE "N$" INLEZEN....":....N.A.0
0720:B.A.6:C.B.6:D.C.6:E.D.6 :. B
OOTSTRAP..G.O..A.0,169:.A.1,001:.A.2,162
:.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.C.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...S..E.0,255:.E.1,032:
.E.2,213 :.E.3,255:.E.4,096:.E.5,000.
U.T.. A:. ST.64 . 120...U..:. "LAADFOUT:
TOESTAND "ST:.:. 9099.H.X.A.00680:B.A.6
:. USR(X) SPLIT
S X IN LS EN HS....Y..A.0,032:.A.1,247:.
A.2,183 :.A.3,165:.A.4,020:.A.5,133.D
.Z..B.0,167:.B.1,165:.B.2,021 :.B.3,1
33:.B.4,168:.B.5,096...{.. 785,168:. 786
,002 :. S.P.680; UIT: (168,
167)....|..:. "TUSSENSTOP.":..#.}...E.~.
. LATER 124,125,126 WEGHALEN......RU.179
20:LU.30852:ZU.32768:VU.38832:WU.00832:B
U.00680 :. GEBIEDEN..G...Z..(RU):. 40928
,B(167):. 40929,B(168) :. REGELS @ 6..
....Z..(LU):. 40930,B(167):. 40931,B(168
) :. LABELS @ 2..9...Z..(ZU):. 40932,B
(167):. 40933,B(168) :. EIND+1..W...Z.
.(VU):. 40934,B(167):. 40935,B(168) :.
VOORBLOK TEXT......Z..(WU):. 40936,B(16
7):. 40937,B(168) :. WERKGEBIED......Z
..(BU):. 40938,B(167):. 40939,B(168) :
. BESTANDSNAAM..<...OU.40256
:. GEB
IED OPCODES..W...Z..(OU):. 40940,B(167):
. 40941,B(168) :. BEGINADRES......NO.1
51 :. AA
NTAL OPCODES..D.... 40942,NO...... 3500
:. ZET TESTP
ROGRAMMA..:.... 35456
:. MACHINE-H.P..E.... 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....A.0,173:.A.
1,000:.A.2,000:.A.3,170:.A.4,041:.A.5,01
5......B.0,168:.B.1,138:.B.2,106:.B.3,10
6:.B.4,106:.B.5,106.5....C.0,041:.C.1,01
5:.C.2,170:.C.3,189:.C.4,212:.C.5,002.O.
...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,0
65:.F.5,066......G.0,067:.G.1,068:.G.2,0
69:.G.3,070:.G.4,000:.G.5,169.W....H.0,0
19:.H.1,141:.H.2,119:.H.3,002:.H.4,162:.
H.5,000......I.0,134:.I.1,198:.I.2,202:.
I.3,169:.I.4,013:.I.5,157.K....J.0,120:.
J.1,002:.J.2,202:.J.3,016:.J.4,250:.J.5,
096...... G(147):.:. "BEGINREGELNUMMER (
3000-7999)";R...... R.3000 . R.7999 . 91
1.;.... "BEGINADRES HEXDATAMAKER";A.M...
. A.255 . 920.O.... " EINDADRES HEXDATAM
AKER";Z...... Z.53247 . A.Z . 920......
G(147):. R.5"DATA"A;...... "":. "A="A":R
="R":Z="Z":GOTO 930";:. 747,5:. 741:....
... G(147):. A.Z . 947...... R"DATA";:.
I.0 . 3.G.... " ";:. J.0 . 7:D.A.8.I.J:Q
..(D.256):. 701,D.256.Q.W.... 702,Q:. 70
0:. 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:..
...........:. "WACHT EVEN.":..A.... AT:Z
T.AT:. "BEGINADRES ="ZT;G(157)".".[....
253,35:. 254,B(648).Z.... K$:K.C(K$):W.0
:. J.1 . K.....U.F(J(K$,J,1)):. U.38 . 3
590...E.. U.48 . 3560.H.F.. U.58 . U.U.4
8:. 3530.Z.G.. U.65 . 3560...H.. U.71 .
U.U.55:. 3530...I.. 3560...J.. W.0 . Z.U
:W.1:. 3560./.T.Z.Z.16.U:. AT,Z.?...AT.A
T.1:W.0.N.... J:. 3510.{...AT.AT.1:. " E
INDADRES ="AT;G(157)".":.:....... 49920
:. TESTPROGR
AMMA....... A03C902EB034A918 71D49901C31
8B615 461F4A30F42039C3 A9C38D30C38E01C3.
I.... A9258D2FC38C39C3 6C2FC310E590E200
EA509C7D2FC3203A C360008D0DC3AE19......
C33D19C350F5B017 8C60C3AE14C36598 10E060
EAEAAD2FC3 F0A650A3FE30C3BC...... 16C3ED
17C3A9 &.D.P.. "4 HEXADEC.TEKENS";A$...Z
.. U.0 . 3:. 700.U,F(J(A$,U.1,1)):. U...
... 254,2:. 253,188 :. 700..,.... 40016
:V.B(251).256.B(252).=.... "UIT ="V:..N.
... V.0 . 6000.T.....O.@.. "NIET DOOR DE
DATA!".U.A.....4!. "REGELNUMMER";R:. R.
0730 . 9099.C.>!A.36000.32..((R.730).10)
:. A:. 8500.Q.(#."TEMD",8...)#.:. "TEMD
SAVED.":....*#."TEMD",8...+#.:. "TEMD VE
RIFIED.":..1.2#. 5,8,15,"S0:PRODIS.BAS/O
".W.3#.5,"R0:PRODIS.BAS/O=0:PRODIS.BAS".
U.4#.5,"R0:PRODIS.BAS=0:TEMD".}.7# 5...
<#.:. "VERSIEZET PRODIS.BAS KLAAR.":.:.
9099...Z#. 4,4.L._#.4, G(27)"B"G(02)...`
#.4, G(27)"M"G(10)...A#.4, G(27)G(92)G(1
)...D#. 4...I#. 9099...N#. 4,4.3.S#.4, "
EIND VAN LIST.".D.T#.4, G(27)"@".K.X
#.4.S.}# 4.^.~#. 9099.D..#....
> CLICK IMAGE PREVIEW FOR FULL MODAL