Multiple names: MACHINETAAL L4 , MT 4, MTAAL 04
FILE INFORMATION
FILENAME(S):
• MACHINETAAL L4  <br>• MT 4<br>• MTAAL 04
FILE TYPE(S): PRG
FILE SIZE: 6.3K
FIRST SEEN: 2025-11-30 21:05:27
APPEARS ON: 4 disk(s)
FILE HASH
083fb2a0b82261a9f62d69a0dfa1ed818704abf6db64e73f3c6d1d0ff2b062fa
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE BRUIN 59B | MACHINETAAL L4 | PRG | DuncanTwain | 20 | 4 | DOWNLOAD FILE |
| LESSEN | MT 4 | PRG | DuncanTwain | 20 | 4 | DOWNLOAD FILE |
| 64S08 64S10 | MTAAL 04 | PRG | DuncanTwain | 20 | 4 | DOWNLOAD FILE |
| C64 HULP 35 1 | MTAAL 04 | PRG | DuncanTwain | 20 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 64 00 8F 00 25 08 69 00 8F 20 41 41 |....d...%.i.. AA|
00000010: 4E 50 41 53 53 49 4E 47 20 43 4F 4D 4D 4F 44 4F |NPASSING COMMODO|
00000020: 52 45 20 36 34 00 2B 08 6E 00 8F 00 43 08 73 00 |RE 64.+.n...C.s.|
00000030: 8F 20 43 4F 55 52 42 4F 49 53 20 53 4F 46 54 57 |. COURBOIS SOFTW|
00000040: 41 52 45 00 49 08 78 00 8F 00 6F 08 7D 00 99 22 |ARE.I.x...o.}.."|
00000050: 93 22 C7 28 38 29 C7 28 31 34 32 29 3A 97 35 33 |.".(8).(142):.53|
00000060: 32 38 30 2C 35 3A 97 35 33 32 38 31 2C 31 33 00 |280,5:.53281,13.|
00000070: 75 08 82 00 9C 00 A8 08 87 00 55 24 B2 22 A3 A3 |u.........U$."..|
00000080: A3 A3 A3 A3 A3 A3 A3 22 3A 4F 24 B2 22 A4 A4 A4 |.......":O$."...|
00000090: A4 A4 A4 A4 A4 A4 22 3A 41 24 B2 22 41 44 52 45 |......":A$."ADRE|
000000A0: 53 53 45 52 49 4E 47 22 00 D8 08 8C 00 99 22 93 |SSERING"......".|
000000B0: 1F 20 2A 2A 2A 20 43 4F 4D 4D 4F 44 4F 52 45 20 |. *** COMMODORE |
000000C0: 36 34 20 2A 2A 2A 20 4D 41 43 48 49 4E 45 54 41 |64 *** MACHINETA|
000000D0: 41 4C 20 34 20 2A 2A 2A 00 E7 08 91 00 81 49 B2 |AL 4 ***......I.|
000000E0: 30 A4 39 39 39 3A 82 00 1F 09 96 00 83 31 36 32 |0.999:.......162|
000000F0: 2C 30 2C 31 38 31 2C 30 2C 31 35 37 2C 30 2C 34 |,0,181,0,157,0,4|
00000100: 2C 31 36 39 2C 30 2C 31 35 37 2C 30 2C 32 31 36 |,169,0,157,0,216|
00000110: 2C 32 33 32 2C 32 30 38 2C 32 34 33 2C 39 36 00 |,232,208,243,96.|
00000120: 3D 09 9B 00 8C 3A 81 49 B2 30 A4 31 35 3A 87 49 |=....:.I.0.15:.I|
00000130: 4E 3A 97 38 32 38 AA 49 2C 49 4E 3A 82 00 5C 09 |N:.828.I,IN:..\.|
00000140: A0 00 99 22 93 1E 31 2E 32 2E 33 2E 39 2E 52 45 |..."..1.2.3.9.RE|
00000150: 4C 41 54 49 45 56 45 2D 22 3B 41 24 00 8E 09 A5 |LATIEVE-";A$....|
00000160: 00 99 22 11 11 90 57 45 20 4B 52 49 4A 47 45 4E |.."...WE KRIJGEN|
00000170: 20 4E 55 20 44 45 20 42 45 4C 41 4E 47 52 49 4A | NU DE BELANGRIJ|
00000180: 4B 45 20 20 20 20 20 20 20 20 20 20 20 22 00 BE |KE "..|
00000190: 09 AA 00 99 22 11 56 4F 4F 52 57 41 41 52 44 45 |....".VOORWAARDE|
000001A0: 4C 49 4A 4B 45 20 53 50 52 4F 4E 47 2D 4F 50 44 |LIJKE SPRONG-OPD|
000001B0: 52 41 43 48 54 45 4E 2E 20 20 20 20 20 22 00 EE |RACHTEN. "..|
000001C0: 09 AF 00 99 22 11 41 4C 20 4E 41 41 52 20 47 45 |....".AL NAAR GE|
000001D0: 4C 41 4E 47 20 44 45 20 55 49 54 4B 4F 4D 53 54 |LANG DE UITKOMST|
000001E0: 20 56 41 4E 20 45 45 4E 20 20 20 20 20 22 00 1E | VAN EEN "..|
000001F0: 0A B4 00 99 22 11 57 49 53 4B 55 4E 44 49 47 45 |....".WISKUNDIGE|
00000200: 20 4F 50 45 52 41 54 49 45 20 53 4C 41 41 54 20 | OPERATIE SLAAT |
00000210: 44 45 20 43 50 55 20 45 45 4E 20 20 20 22 00 4E |DE CPU EEN ".N|
00000220: 0A B9 00 99 22 11 41 41 4E 54 41 4C 20 4F 50 44 |....".AANTAL OPD|
00000230: 52 41 43 48 54 45 4E 20 41 4C 20 4F 46 20 4E 49 |RACHTEN AL OF NI|
00000240: 45 54 20 4F 56 45 52 2E 20 20 20 20 20 22 00 7F |ET OVER. "..|
00000250: 0A BE 00 99 22 11 1E 42 49 4A 20 45 45 4E 20 36 |...."..BIJ EEN 6|
00000260: 35 31 30 20 43 50 55 20 5A 49 4A 4E 20 44 45 52 |510 CPU ZIJN DER|
00000270: 47 45 4C 49 4A 4B 45 20 20 20 20 20 20 20 22 00 |GELIJKE ".|
00000280: AF 0A C3 00 99 22 11 53 50 52 4F 4E 47 45 4E 20 |.....".SPRONGEN |
00000290: 41 4C 54 49 4A 44 20 52 45 4C 41 54 49 45 46 20 |ALTIJD RELATIEF |
000002A0: 2D 20 57 45 20 47 45 56 45 4E 20 44 55 53 22 00 |- WE GEVEN DUS".|
000002B0: DF 0A C8 00 99 22 11 4E 49 45 54 20 44 45 20 50 |.....".NIET DE P|
000002C0: 4C 41 41 54 53 20 41 41 4E 20 57 41 41 52 48 45 |LAATS AAN WAARHE|
000002D0: 45 4E 20 4D 4F 45 54 20 57 4F 52 44 45 4E 22 00 |EN MOET WORDEN".|
000002E0: 0F 0B CD 00 99 22 11 47 45 53 50 52 4F 4E 47 45 |.....".GESPRONGE|
000002F0: 4E 2C 20 4D 41 41 52 20 48 45 54 20 41 41 4E 54 |N, MAAR HET AANT|
00000300: 41 4C 20 42 59 54 45 53 20 44 41 54 20 20 22 00 |AL BYTES DAT ".|
00000310: 30 0B D2 00 99 22 11 4D 4F 45 54 20 57 4F 52 44 |0....".MOET WORD|
00000320: 45 4E 20 4F 56 45 52 47 45 53 4C 41 47 45 4E 21 |EN OVERGESLAGEN!|
00000330: 00 45 0B D7 00 49 B2 31 3A 8D 39 34 30 3A 8B 46 |.E...I.1:.940:.F|
00000340: 4C A7 31 34 30 00 76 0B DC 00 99 22 93 90 45 45 |L.140.v...."..EE|
00000350: 4E 20 42 45 4C 41 4E 47 52 49 4A 4B 45 20 56 4F |N BELANGRIJKE VO|
00000360: 4F 52 57 41 41 52 44 45 4C 49 4A 4B 45 20 53 50 |ORWAARDELIJKE SP|
00000370: 52 4F 4E 47 2D 22 00 A8 0B E1 00 99 22 11 49 4E |RONG-"......".IN|
00000380: 53 54 52 55 43 54 49 45 20 49 53 3A 20 20 1C 27 |STRUCTIE IS: .'|
00000390: 42 4E 45 27 90 2E 20 20 20 44 41 54 20 42 45 54 |BNE'.. DAT BET|
000003A0: 45 4B 45 4E 54 20 3A 22 00 D1 0B E6 00 99 22 11 |EKENT :"......".|
000003B0: 1F 42 52 41 4E 43 48 20 49 46 A0 52 45 53 55 4C |.BRANCH IF.RESUL|
000003C0: 54 20 4E 4F 54 20 45 51 55 41 4C 20 5A 45 52 4F |T NOT EQUAL ZERO|
000003D0: 2E 00 00 0C EB 00 99 22 11 90 28 53 50 52 49 4E |......."..(SPRIN|
000003E0: 47 2C 20 41 4C 53 20 48 45 54 20 52 45 53 55 4C |G, ALS HET RESUL|
000003F0: 54 41 41 54 20 4E 49 45 54 20 47 45 4C 49 4A 4B |TAAT NIET GELIJK|
00000400: 00 15 0C F0 00 99 22 11 49 53 20 41 41 4E 20 4E |......".IS AAN N|
00000410: 55 4C 21 29 22 00 46 0C F5 00 99 22 11 1F 44 45 |UL!)".F...."..DE|
00000420: 20 4F 50 44 52 41 43 48 54 27 42 4E 45 20 24 30 | OPDRACHT'BNE $0|
00000430: 38 27 20 42 45 54 45 4B 45 4E 54 20 56 4F 4F 52 |8' BETEKENT VOOR|
00000440: 20 44 45 20 20 22 00 76 0C FA 00 99 22 11 36 35 | DE ".v....".65|
00000450: 31 30 3A 20 53 4C 41 20 44 45 20 56 4F 4C 47 45 |10: SLA DE VOLGE|
00000460: 4E 44 45 20 24 30 38 20 4F 50 44 52 41 43 48 54 |NDE $08 OPDRACHT|
00000470: 2D 42 59 54 45 53 00 A2 0C FF 00 99 22 4F 56 45 |-BYTES......"OVE|
00000480: 52 20 41 4C 53 20 48 45 54 20 52 45 53 55 4C 54 |R ALS HET RESULT|
00000490: 41 41 54 20 56 41 4E 20 44 45 20 4C 41 41 54 53 |AAT VAN DE LAATS|
000004A0: 54 45 00 CB 0C 04 01 99 22 11 52 45 4B 45 4E 4F |TE......".REKENO|
000004B0: 50 44 52 41 43 48 54 20 47 45 4C 49 4A 4B 20 57 |PDRACHT GELIJK W|
000004C0: 41 53 20 41 41 4E 20 4E 55 4C 2E 00 F8 0C 09 01 |AS AAN NUL......|
000004D0: 99 22 11 47 45 54 45 4C 44 20 57 4F 52 44 54 20 |.".GETELD WORDT |
000004E0: 56 41 4E 41 46 20 44 45 20 45 45 52 53 54 45 20 |VANAF DE EERSTE |
000004F0: 4F 50 44 52 41 43 48 54 00 1A 0D 0E 01 99 22 11 |OPDRACHT......".|
00000500: 4E 41 20 44 45 20 53 50 52 4F 4E 47 4F 50 44 52 |NA DE SPRONGOPDR|
00000510: 41 43 48 54 2D 42 59 54 45 2E 00 2F 0D 13 01 49 |ACHT-BYTE../...I|
00000520: B2 32 3A 8D 39 34 30 3A 8B 46 4C A7 31 36 30 00 |.2:.940:.FL.160.|
00000530: 4F 0D 18 01 99 22 93 1F 44 55 53 3A 20 20 2A 20 |O...."..DUS: * |
00000540: 30 2E 20 42 59 54 45 20 27 42 4E 45 27 11 22 00 |0. BYTE 'BNE'.".|
00000550: 6A 0D 1D 01 99 A3 36 29 3B 22 2A 20 31 2E 20 42 |j.....6);"* 1. B|
00000560: 59 54 45 20 20 24 30 38 11 22 00 89 0D 22 01 99 |YTE $08."..."..|
00000570: A3 37 29 3B 22 20 32 2E 20 42 59 54 45 20 20 2E |.7);" 2. BYTE .|
00000580: 2E 2E 20 20 1C C0 C0 AE 22 00 97 0D 27 01 99 A3 |.. ...."...'...|
00000590: 32 34 29 3B 22 DD 22 00 CD 0D 2C 01 81 4E B2 33 |24);"."...,..N.3|
000005A0: A4 39 3A 99 A3 37 29 22 1F 22 3B 4E 3B 22 9D 2E |.9:..7)".";N;"..|
000005B0: 20 42 59 54 45 20 20 2E 2E 2E 20 20 20 20 1C DD | BYTE ... ..|
000005C0: 22 3A 99 A3 32 34 29 3B 22 DD 22 3A 82 00 EE 0D |":..24);".":....|
000005D0: 31 01 99 A3 37 29 3B 22 1F 31 30 2E 20 42 59 54 |1...7);".10. BYT|
000005E0: 45 20 27 4C 44 41 27 20 1C 5F C0 BD 11 22 00 0D |E 'LDA' ._..."..|
000005F0: 0E 36 01 99 22 13 11 11 11 11 11 11 11 11 1C 22 |.6..".........."|
00000600: 3B A3 32 37 29 3B 22 41 43 48 54 11 22 00 20 0E |;.27);"ACHT.". .|
00000610: 3B 01 99 A3 32 37 29 3B 22 42 59 54 45 53 11 22 |;...27);"BYTES."|
00000620: 00 38 0E 40 01 99 A3 32 37 29 3B 22 4F 56 45 52 |.8.@...27);"OVER|
00000630: 53 4C 41 41 4E 20 11 22 00 53 0E 45 01 99 A3 32 |SLAAN .".S.E...2|
00000640: 37 29 3B 22 20 20 20 20 20 20 11 11 11 11 11 11 |7);" ......|
00000650: 11 11 22 00 68 0E 4A 01 49 B2 33 3A 8D 39 34 30 |..".h.J.I.3:.940|
00000660: 3A 8B 46 4C A7 32 32 30 00 9B 0E 4F 01 99 22 93 |:.FL.220...O..".|
00000670: 90 44 45 20 4F 50 44 52 41 43 48 54 20 1C 27 42 |.DE OPDRACHT .'B|
00000680: 4E 45 20 24 30 30 27 90 20 20 42 45 54 45 4B 45 |NE $00'. BETEKE|
00000690: 4E 54 20 20 53 4C 41 20 20 2D 22 00 C9 0E 54 01 |NT SLA -"...T.|
000006A0: 99 22 11 4E 55 4C 20 42 59 54 45 53 20 4F 56 45 |.".NUL BYTES OVE|
000006B0: 52 2C 20 44 55 53 20 45 46 46 45 43 54 49 45 46 |R, DUS EFFECTIEF|
000006C0: 20 57 4F 52 44 54 20 45 52 00 E2 0E 59 01 99 22 | WORDT ER...Y.."|
000006D0: 11 4E 49 45 54 20 47 45 53 50 52 4F 4E 47 45 4E |.NIET GESPRONGEN|
000006E0: 2E 22 00 10 0F 5E 01 99 22 11 11 44 45 20 36 35 |."...^.."..DE 65|
000006F0: 31 30 20 4B 41 4E 20 4D 41 58 49 4D 41 41 4C 20 |10 KAN MAXIMAAL |
00000700: 31 32 37 20 42 59 54 45 20 56 4F 4F 52 55 49 54 |127 BYTE VOORUIT|
00000710: 00 39 0F 63 01 99 22 11 53 50 52 49 4E 47 45 4E |.9.c..".SPRINGEN|
00000720: 20 28 4D 45 54 20 27 42 4E 45 20 24 37 46 27 29 | (MET 'BNE $7F')|
00000730: 2E 20 20 54 45 52 55 47 2D 00 64 0F 68 01 99 22 |. TERUG-.d.h.."|
00000740: 11 53 50 52 49 4E 47 45 4E 20 4B 41 4E 20 4F 50 |.SPRINGEN KAN OP|
00000750: 20 44 45 20 56 4F 4C 47 45 4E 44 45 20 4D 41 4E | DE VOLGENDE MAN|
00000760: 49 45 52 3A 00 80 0F 6D 01 99 22 11 11 1F 24 30 |IER:...m.."...$0|
00000770: 30 20 3D 20 30 20 42 59 54 45 20 54 45 52 55 47 |0 = 0 BYTE TERUG|
00000780: 00 9A 0F 72 01 99 22 11 24 46 46 20 3D 20 31 20 |...r..".$FF = 1 |
00000790: 42 59 54 45 20 54 45 52 55 47 00 B4 0F 77 01 99 |BYTE TERUG...w..|
000007A0: 22 11 24 46 45 20 3D 20 32 20 42 59 54 45 20 54 |".$FE = 2 BYTE T|
000007B0: 45 52 55 47 00 D3 0F 7C 01 99 22 11 24 46 44 20 |ERUG...|..".$FD |
000007C0: 3D 20 33 20 42 59 54 45 20 54 45 52 55 47 20 45 |= 3 BYTE TERUG E|
000007D0: 4E 5A 2E 00 E8 0F 81 01 49 B2 34 3A 8D 39 34 30 |NZ......I.4:.940|
000007E0: 3A 8B 46 4C A7 32 38 30 00 14 10 86 01 99 22 93 |:.FL.280......".|
000007F0: 1F 4D 41 58 49 4D 41 41 4C 20 4B 41 4E 20 4F 56 |.MAXIMAAL KAN OV|
00000800: 45 52 20 31 32 38 20 20 42 59 54 45 53 20 57 4F |ER 128 BYTES WO|
00000810: 52 44 45 4E 00 3C 10 8B 01 99 22 11 54 45 52 55 |RDEN.<....".TERU|
00000820: 47 47 45 53 50 52 4F 4E 47 45 4E 3A 20 1C 27 42 |GGESPRONGEN: .'B|
00000830: 4E 45 20 24 38 30 27 1F 2E 11 90 22 00 61 10 90 |NE $80'....".a..|
00000840: 01 99 42 24 3B 22 54 45 52 55 47 53 50 52 49 4E |..B$;"TERUGSPRIN|
00000850: 47 45 4E 20 4F 56 45 52 20 38 20 42 59 54 45 53 |GEN OVER 8 BYTES|
00000860: 3A 00 82 10 95 01 99 A3 31 30 29 3B 22 1C 11 30 |:.......10);"..0|
00000870: 2E 20 42 59 54 45 20 27 4C 44 41 27 20 1F 5F C0 |. BYTE 'LDA' ._.|
00000880: AE 22 00 90 10 9A 01 99 A3 32 36 29 3B 22 DD 22 |.".......26);"."|
00000890: 00 C6 10 9F 01 81 4E B2 31 A4 37 3A 99 A3 39 29 |......N.1.7:..9)|
000008A0: 22 1C 22 3B 4E 3B 22 9D 2E 20 42 59 54 45 20 20 |".";N;".. BYTE |
000008B0: 2E 2E 2E 20 20 20 20 1F DD 22 3A 99 A3 32 36 29 |... ..":..26)|
000008C0: 3B 22 DD 22 3A 82 00 E6 10 A4 01 99 A3 31 30 29 |;".":........10)|
000008D0: 3B 22 1C 38 2E 20 42 59 54 45 20 20 2E 2E 2E 20 |;".8. BYTE ... |
000008E0: 1F 20 C0 C0 BD 22 00 06 11 A9 01 99 22 13 11 11 |. ..."......"...|
000008F0: 11 11 11 11 11 11 11 11 22 3B A3 32 39 29 3B 22 |........";.29);"|
00000900: 41 43 48 54 11 22 00 19 11 AE 01 99 A3 32 39 29 |ACHT.".......29)|
00000910: 3B 22 42 59 54 45 53 11 22 00 2D 11 B3 01 99 A3 |;"BYTES.".-.....|
00000920: 32 39 29 3B 22 54 45 52 55 47 2D 11 22 00 43 11 |29);"TERUG-.".C.|
00000930: B8 01 99 A3 32 39 29 3B 22 53 50 52 49 4E 47 45 |....29);"SPRINGE|
00000940: 4E 11 22 00 6C 11 BD 01 99 A3 38 29 3B 22 2A 22 |N.".l.....8);"*"|
00000950: 3B A3 31 38 29 3B 22 27 42 4E 45 27 22 3B A3 32 |;.18);"'BNE'";.2|
00000960: 39 29 3B 22 20 20 20 20 20 20 11 22 00 86 11 C2 |9);" ."....|
00000970: 01 99 A3 38 29 3B 22 2A 22 3B A3 31 39 29 3B 22 |...8);"*";.19);"|
00000980: 24 46 38 11 11 22 00 9B 11 C7 01 49 B2 35 3A 8D |$F8..".....I.5:.|
00000990: 39 34 30 3A 8B 46 4C A7 33 33 35 00 C3 11 CC 01 |940:.FL.335.....|
000009A0: 99 22 93 1F 56 4F 4F 52 44 45 45 4C 20 52 45 4C |."..VOORDEEL REL|
000009B0: 41 54 49 45 56 45 20 22 3B 41 24 3B 22 3A 20 44 |ATIEVE ";A$;": D|
000009C0: 45 20 22 00 EE 11 D1 01 99 22 11 50 52 4F 47 52 |E "......".PROGR|
000009D0: 41 4D 4D 41 27 53 20 4B 55 4E 4E 45 4E 20 4F 56 |AMMA'S KUNNEN OV|
000009E0: 45 52 41 4C 20 49 4E 20 44 45 20 52 41 4D 00 1C |ERAL IN DE RAM..|
000009F0: 12 D6 01 99 22 11 57 4F 52 44 45 4E 20 4F 50 47 |....".WORDEN OPG|
00000A00: 45 53 4C 41 47 45 4E 20 4F 4D 44 41 54 20 45 52 |ESLAGEN OMDAT ER|
00000A10: 20 49 4D 4D 45 52 53 20 47 45 45 4E 00 46 12 DB | IMMERS GEEN.F..|
00000A20: 01 99 22 11 41 42 53 4F 4C 55 54 45 20 41 44 52 |..".ABSOLUTE ADR|
00000A30: 45 53 53 45 4E 20 57 4F 52 44 45 4E 20 47 45 42 |ESSEN WORDEN GEB|
00000A40: 52 55 49 4B 54 2E 00 74 12 E0 01 99 22 11 11 90 |RUIKT..t...."...|
00000A50: 4E 41 44 45 45 4C 3A 20 20 44 45 20 42 45 52 45 |NADEEL: DE BERE|
00000A60: 4B 45 4E 49 4E 47 20 56 41 4E 20 44 45 20 4C 45 |KENING VAN DE LE|
00000A70: 4E 47 54 45 00 A1 12 E5 01 99 22 11 56 41 4E 20 |NGTE......".VAN |
00000A80: 44 45 20 53 50 52 4F 4E 47 20 49 53 20 4C 41 53 |DE SPRONG IS LAS|
00000A90: 54 49 47 20 45 4E 20 47 45 45 46 54 20 56 41 41 |TIG EN GEEFT VAA|
00000AA0: 4B 00 CF 12 EA 01 99 22 11 46 4F 55 54 45 4E 20 |K......".FOUTEN |
00000AB0: 45 4E 20 44 45 20 53 50 52 4F 4E 47 47 52 4F 4F |EN DE SPRONGGROO|
00000AC0: 54 54 45 20 49 53 20 42 45 50 45 52 4B 54 2E 00 |TTE IS BEPERKT..|
00000AD0: 00 13 EF 01 99 22 11 11 1C 4D 45 45 53 54 41 4C |....."...MEESTAL|
00000AE0: 20 4C 41 54 45 4E 20 57 45 20 45 45 4E 20 41 53 | LATEN WE EEN AS|
00000AF0: 53 45 4D 42 4C 45 52 50 52 4F 47 52 41 4D 4D 41 |SEMBLERPROGRAMMA|
00000B00: 00 2D 13 F4 01 99 22 11 44 45 20 42 45 52 45 4B |.-....".DE BEREK|
00000B10: 45 4E 49 4E 47 45 4E 20 55 49 54 56 4F 45 52 45 |ENINGEN UITVOERE|
00000B20: 4E 2C 20 5A 4F 44 41 54 20 54 45 4E 2D 00 56 13 |N, ZODAT TEN-.V.|
00000B30: F9 01 99 22 11 4D 49 4E 53 54 45 20 48 45 54 20 |...".MINSTE HET |
00000B40: 45 45 52 53 54 45 20 4E 41 44 45 45 4C 20 56 45 |EERSTE NADEEL VE|
00000B50: 52 56 41 4C 54 2E 00 6B 13 FE 01 49 B2 36 3A 8D |RVALT..k...I.6:.|
00000B60: 39 34 30 3A 8B 46 4C A7 33 39 30 00 8F 13 03 02 |940:.FL.390.....|
00000B70: 99 22 93 90 31 2E 32 2E 34 2E 20 45 45 4E 20 45 |."..1.2.4. EEN E|
00000B80: 45 52 53 54 45 20 56 4F 4F 52 42 45 45 4C 44 00 |ERSTE VOORBEELD.|
00000B90: C0 13 08 02 99 22 11 11 1C 4B 49 4A 4B 45 4E 20 |....."...KIJKEN |
00000BA0: 57 45 20 4E 4F 47 20 45 45 4E 53 20 4E 41 41 52 |WE NOG EENS NAAR|
00000BB0: 20 48 45 54 20 56 45 52 50 4C 41 41 54 53 45 4E | HET VERPLAATSEN|
00000BC0: 00 EF 13 0D 02 99 22 11 56 41 4E 20 44 41 54 41 |......".VAN DATA|
00000BD0: 2E 20 20 57 45 20 47 41 41 4E 20 45 45 4E 20 50 |. WE GAAN EEN P|
00000BE0: 52 4F 47 52 41 4D 4D 41 20 4D 41 4B 45 4E 2C 00 |ROGRAMMA MAKEN,.|
00000BF0: 1A 14 12 02 99 22 11 44 41 54 20 44 45 20 49 4E |.....".DAT DE IN|
00000C00: 48 4F 55 44 20 56 41 4E 20 44 45 20 47 45 48 45 |HOUD VAN DE GEHE|
00000C10: 55 47 45 4E 43 45 4C 4C 45 4E 00 47 14 17 02 99 |UGENCELLEN.G....|
00000C20: 22 11 24 30 30 30 30 20 2D 20 24 30 30 46 46 20 |".$0000 - $00FF |
00000C30: 4E 41 41 52 20 24 30 34 30 30 20 2D 20 24 30 34 |NAAR $0400 - $04|
00000C40: 46 46 20 56 45 52 2D 00 57 14 1C 02 99 22 11 50 |FF VER-.W....".P|
00000C50: 4C 41 41 54 53 54 2E 00 7E 14 21 02 99 22 11 11 |LAATST..~.!.."..|
00000C60: 1F 24 30 30 30 30 20 2D 20 24 30 30 46 46 20 49 |.$0000 - $00FF I|
00000C70: 53 20 49 4E 20 5A 45 52 4F 50 41 47 45 2C 00 AB |S IN ZEROPAGE,..|
00000C80: 14 26 02 99 22 11 24 30 34 30 30 20 2D 20 24 30 |.&..".$0400 - $0|
00000C90: 34 46 46 20 49 53 20 48 45 54 20 45 45 52 53 54 |4FF IS HET EERST|
00000CA0: 45 20 4B 57 41 52 54 20 56 41 4E 00 C3 14 2B 02 |E KWART VAN...+.|
00000CB0: 99 22 11 48 45 54 20 42 45 45 4C 44 53 43 48 45 |.".HET BEELDSCHE|
00000CC0: 52 4D 2E 00 D8 14 30 02 49 B2 37 3A 8D 39 34 30 |RM....0.I.7:.940|
00000CD0: 3A 8B 46 4C A7 34 36 30 00 05 15 35 02 99 22 93 |:.FL.460...5..".|
00000CE0: 1C 4F 4D 20 48 45 54 20 50 52 4F 47 52 41 4D 4D |.OM HET PROGRAMM|
00000CF0: 41 20 54 45 20 4B 55 4E 4E 45 4E 20 53 43 48 52 |A TE KUNNEN SCHR|
00000D00: 49 4A 56 45 4E 00 41 15 3A 02 53 24 B2 22 11 20 |IJVEN.A.:.S$.". |
00000D10: 20 20 20 20 20 22 3A 99 22 11 4D 4F 45 54 45 4E | ":.".MOETEN|
00000D20: 20 57 45 20 4E 4F 47 20 34 20 4E 49 45 55 57 45 | WE NOG 4 NIEUWE|
00000D30: 20 36 35 31 30 2D 4F 50 44 52 41 43 48 54 45 4E | 6510-OPDRACHTEN|
00000D40: 22 00 70 15 3F 02 99 22 11 4C 45 52 45 4E 3A 22 |".p.?..".LEREN:"|
00000D50: 3A 99 22 11 1F 20 20 27 4C 44 58 27 2C 27 53 54 |:.".. 'LDX','ST|
00000D60: 41 27 2C 27 49 4E 58 27 2C 27 52 54 53 27 1C 2E |A','INX','RTS'..|
00000D70: 00 9B 15 44 02 99 22 1F 11 20 20 27 4C 44 58 27 |...D..".. 'LDX'|
00000D80: 20 28 4C 4F 41 44 20 49 4E 44 45 58 20 58 20 57 | (LOAD INDEX X W|
00000D90: 49 54 48 20 4D 45 4D 4F 52 59 29 00 C8 15 49 02 |ITH MEMORY)...I.|
00000DA0: 99 22 11 20 20 27 53 54 41 27 20 28 53 54 4F 52 |.". 'STA' (STOR|
00000DB0: 45 20 41 43 43 55 4D 55 4C 41 54 4F 52 20 54 4F |E ACCUMULATOR TO|
00000DC0: 20 4D 45 4D 4F 52 59 29 00 F2 15 4E 02 99 22 11 | MEMORY)...N..".|
00000DD0: 20 20 27 49 4E 58 27 20 28 49 4E 43 52 45 4D 45 | 'INX' (INCREME|
00000DE0: 4E 54 20 49 4E 44 45 58 20 58 20 42 59 20 4F 4E |NT INDEX X BY ON|
00000DF0: 45 29 00 1A 16 53 02 99 22 11 20 20 27 52 54 53 |E)...S..". 'RTS|
00000E00: 27 20 28 52 45 54 55 52 4E 20 46 52 4F 4D 20 53 |' (RETURN FROM S|
00000E10: 55 42 52 4F 55 54 49 4E 45 29 00 48 16 58 02 99 |UBROUTINE).H.X..|
00000E20: 22 1C 11 44 45 5A 45 20 56 49 45 52 20 4F 50 44 |"..DEZE VIER OPD|
00000E30: 52 41 43 48 54 45 4E 20 5A 49 4A 4E 20 47 45 4D |RACHTEN ZIJN GEM|
00000E40: 41 4B 4B 45 4C 49 4A 4B 00 71 16 5D 02 99 22 11 |AKKELIJK.q.]..".|
00000E50: 54 45 20 42 45 47 52 49 4A 50 45 4E 20 45 4E 20 |TE BEGRIJPEN EN |
00000E60: 57 45 52 4B 45 4E 20 41 4C 53 20 56 4F 4C 47 54 |WERKEN ALS VOLGT|
00000E70: 3A 00 A1 16 62 02 99 22 11 90 27 4C 44 58 27 20 |:...b.."..'LDX' |
00000E80: 4C 41 41 44 54 20 45 45 4E 20 42 59 54 45 20 49 |LAADT EEN BYTE I|
00000E90: 4E 20 48 45 54 20 58 2D 52 45 47 49 53 54 45 52 |N HET X-REGISTER|
00000EA0: 2E 00 C7 16 67 02 99 22 11 44 55 53 20 27 4C 44 |....g..".DUS 'LD|
00000EB0: 58 20 23 24 30 30 27 20 4C 41 41 44 54 20 24 30 |X #$00' LAADT $0|
00000EC0: 30 20 49 4E 20 58 52 00 DC 16 6C 02 49 B2 38 3A |0 IN XR...l.I.8:|
00000ED0: 8D 39 34 30 3A 8B 46 4C A7 35 31 35 00 10 17 71 |.940:.FL.515...q|
00000EE0: 02 99 22 93 1C 27 53 54 41 27 1F 20 49 53 20 48 |.."..'STA'. IS H|
00000EF0: 45 54 20 4F 4D 47 45 4B 45 45 52 44 45 20 20 56 |ET OMGEKEERDE V|
00000F00: 41 4E 20 27 4C 44 41 27 2E 20 44 45 5A 45 22 3B |AN 'LDA'. DEZE";|
00000F10: 00 39 17 76 02 99 53 24 22 4F 50 44 52 41 43 48 |.9.v..S$"OPDRACH|
00000F20: 54 20 5A 45 54 20 44 45 20 49 4E 48 4F 55 44 20 |T ZET DE INHOUD |
00000F30: 56 41 4E 20 44 45 20 41 43 00 62 17 7B 02 99 53 |VAN DE AC.b.{..S|
00000F40: 24 22 49 4E 20 44 45 20 47 45 48 45 55 47 45 4E |$"IN DE GEHEUGEN|
00000F50: 43 45 4C 20 4D 45 54 20 4D 45 45 47 45 47 45 56 |CEL MET MEEGEGEV|
00000F60: 45 4E 00 8B 17 80 02 99 53 24 3B 22 41 44 52 45 |EN......S$;"ADRE|
00000F70: 53 2E 20 42 2E 56 2E 20 20 27 53 54 41 20 24 30 |S. B.V. 'STA $0|
00000F80: 31 32 33 27 20 5A 45 54 20 44 45 00 B6 17 85 02 |123' ZET DE.....|
00000F90: 99 53 24 3B 22 49 4E 48 4F 55 44 20 56 41 4E 20 |.S$;"INHOUD VAN |
00000FA0: 44 45 20 41 43 20 4F 50 20 50 4C 41 41 54 53 20 |DE AC OP PLAATS |
00000FB0: 24 30 31 32 33 2E 00 E8 17 8A 02 99 22 11 11 1C |$0123......."...|
00000FC0: 27 49 4E 58 27 20 1F 4D 41 41 4B 54 20 44 45 20 |'INX' .MAAKT DE |
00000FD0: 49 4E 48 4F 55 44 20 56 41 4E 20 48 45 54 20 58 |INHOUD VAN HET X|
00000FE0: 52 20 31 20 47 52 4F 2D 00 0C 18 8F 02 99 53 24 |R 1 GRO-......S$|
00000FF0: 3B 22 54 45 52 2E 20 44 55 53 20 24 41 32 20 57 |;"TER. DUS $A2 W|
00001000: 4F 52 44 54 20 24 41 33 2C 20 45 4E 00 29 18 94 |ORDT $A3, EN.)..|
00001010: 02 99 53 24 3B 22 24 46 46 20 57 4F 52 44 54 20 |..S$;"$FF WORDT |
00001020: 24 30 30 2C 20 45 54 43 2E 00 5B 18 99 02 99 22 |$00, ETC..[...."|
00001030: 11 11 1C 27 52 54 53 27 1F 20 5A 4F 52 47 54 20 |...'RTS'. ZORGT |
00001040: 56 4F 4F 52 20 48 45 54 20 54 45 52 55 47 53 50 |VOOR HET TERUGSP|
00001050: 52 49 4E 47 45 4E 20 4E 41 41 52 00 84 18 9E 02 |RINGEN NAAR.....|
00001060: 99 53 24 3B 22 48 45 54 20 48 4F 4F 46 44 50 52 |.S$;"HET HOOFDPR|
00001070: 4F 47 52 41 4D 4D 41 20 55 49 54 20 45 45 4E 20 |OGRAMMA UIT EEN |
00001080: 53 55 42 2D 00 AF 18 A3 02 99 53 24 3B 22 52 4F |SUB-......S$;"RO|
00001090: 55 54 49 4E 45 2E 20 20 20 28 56 47 4C 2E 20 42 |UTINE. (VGL. B|
000010A0: 41 53 49 43 3A 20 27 52 45 54 55 52 4E 27 29 00 |ASIC: 'RETURN').|
000010B0: C4 18 A8 02 49 B2 39 3A 8D 39 34 30 3A 8B 46 4C |....I.9:.940:.FL|
000010C0: A7 35 36 35 00 DF 18 AD 02 99 22 93 90 4E 55 20 |.565......"..NU |
000010D0: 4F 4E 53 20 50 52 4F 47 52 41 4D 4D 41 3A 11 00 |ONS PROGRAMMA:..|
000010E0: F4 18 B2 02 99 A3 31 36 29 3B 22 48 45 58 2D 43 |......16);"HEX-C|
000010F0: 4F 44 45 22 00 12 19 B7 02 99 22 11 1C 4C 44 58 |ODE"......"..LDX|
00001100: 20 23 20 24 30 30 20 20 20 20 20 20 20 41 32 20 | # $00 A2 |
00001110: 30 30 00 39 19 BC 02 99 22 11 4C 44 41 20 24 30 |00.9....".LDA $0|
00001120: 30 2C 58 20 20 20 5F AE 20 20 42 35 20 30 30 22 |0,X _. B5 00"|
00001130: 3A 99 A3 31 33 29 3B 22 DD 00 62 19 C1 02 99 22 |:..13);"..b...."|
00001140: 53 54 41 20 24 30 34 30 30 2C 58 20 20 DD 20 20 |STA $0400,X . |
00001150: 39 44 20 30 30 20 30 34 22 3A 99 A3 31 33 29 3B |9D 00 04":..13);|
00001160: 22 DD 00 85 19 C6 02 99 22 49 4E 58 20 20 20 20 |"......."INX |
00001170: 20 20 20 20 20 20 DD 20 20 45 38 22 3A 99 A3 31 | . E8":..1|
00001180: 33 29 3B 22 DD 00 A1 19 CB 02 99 22 42 4E 45 20 |3);"......."BNE |
00001190: 24 46 38 20 20 20 20 20 C0 BD 20 20 44 30 20 46 |$F8 .. D0 F|
000011A0: 38 00 BB 19 D0 02 99 22 11 52 54 53 20 20 20 20 |8......".RTS |
000011B0: 20 20 20 20 20 20 20 20 20 36 30 00 E6 19 D5 02 | 60.....|
000011C0: 99 22 11 90 57 45 20 53 43 48 52 49 4A 56 45 4E |."..WE SCHRIJVEN|
000011D0: 20 44 49 54 20 50 52 4F 47 52 41 4D 4D 41 20 4D | DIT PROGRAMMA M|
000011E0: 45 54 20 45 45 4E 00 14 1A DA 02 99 22 11 41 53 |ET EEN......".AS|
000011F0: 53 45 4D 42 4C 45 52 20 28 45 56 45 4E 54 55 45 |SEMBLER (EVENTUE|
00001200: 45 4C 20 49 4E 20 52 4F 4D 29 20 4F 46 20 4D 45 |EL IN ROM) OF ME|
00001210: 54 20 44 45 00 42 1A DF 02 99 22 11 53 54 41 4E |T DE.B....".STAN|
00001220: 44 41 41 52 44 20 4D 4F 4E 49 54 4F 52 20 49 4E |DAARD MONITOR IN|
00001230: 20 44 45 20 4B 41 53 53 45 54 54 45 42 55 46 46 | DE KASSETTEBUFF|
00001240: 45 52 00 5F 1A E4 02 99 22 11 56 41 4E 41 46 20 |ER._....".VANAF |
00001250: 50 4C 41 41 54 53 20 1F 24 30 33 33 43 90 2E 00 |PLAATS .$033C...|
00001260: 75 1A E9 02 49 B2 31 30 3A 8D 39 34 30 3A 8B 46 |u...I.10:.940:.F|
00001270: 4C A7 36 32 35 00 A2 1A EE 02 99 22 93 1C 45 45 |L.625......"..EE|
00001280: 4E 20 4D 41 43 48 49 4E 45 2D 54 41 41 4C 20 50 |N MACHINE-TAAL P|
00001290: 52 4F 47 52 41 4D 4D 41 20 57 4F 52 44 54 20 47 |ROGRAMMA WORDT G|
000012A0: 45 2D 00 CD 1A F3 02 99 22 11 53 54 41 52 54 20 |E-......".START |
000012B0: 4D 45 54 20 44 45 20 4F 50 44 52 41 43 48 54 20 |MET DE OPDRACHT |
000012C0: 27 53 59 53 20 28 2E 2E 2E 2E 29 27 2E 00 FA 1A |'SYS (....)'....|
000012D0: F8 02 99 22 11 4E 41 20 41 46 4C 4F 4F 50 20 56 |...".NA AFLOOP V|
000012E0: 41 4E 20 44 49 54 20 50 52 4F 47 52 41 4D 4D 41 |AN DIT PROGRAMMA|
000012F0: 20 4D 4F 45 54 20 57 45 45 52 00 24 1B FD 02 99 | MOET WEER.$....|
00001300: 22 11 54 45 52 55 47 47 45 53 50 52 4F 4E 47 45 |".TERUGGESPRONGE|
00001310: 4E 20 57 4F 52 44 45 4E 20 4E 41 41 52 20 42 41 |N WORDEN NAAR BA|
00001320: 53 49 43 2E 00 51 1B 02 03 99 22 11 44 41 41 52 |SIC..Q....".DAAR|
00001330: 4F 4D 20 49 53 20 44 45 20 4C 41 41 54 53 54 45 |OM IS DE LAATSTE|
00001340: 20 4D 41 43 48 49 4E 45 2D 54 41 41 4C 20 4F 50 | MACHINE-TAAL OP|
00001350: 2D 00 67 1B 07 03 99 22 11 44 52 41 43 48 54 3A |-.g....".DRACHT:|
00001360: 20 1C 27 52 54 53 27 00 7D 1B 0C 03 49 B2 31 31 | .'RTS'.}...I.11|
00001370: 3A 8D 39 34 30 3A 8B 46 4C A7 36 38 35 00 97 1B |:.940:.FL.685...|
00001380: 11 03 99 22 93 90 57 45 52 4B 49 4E 47 20 20 20 |..."..WERKING |
00001390: 20 20 20 20 20 20 3A 00 C6 1B 16 03 99 22 11 1C | :......"..|
000013A0: 27 4C 44 58 20 23 20 24 30 30 27 20 4C 41 41 44 |'LDX # $00' LAAD|
000013B0: 54 20 24 30 30 20 49 4E 20 58 52 2E 20 44 49 54 |T $00 IN XR. DIT|
000013C0: 20 57 4F 52 44 54 00 E5 1B 1B 03 99 22 11 4E 55 | WORDT......".NU|
000013D0: 20 41 4C 53 20 54 45 4C 4C 45 52 20 47 45 42 52 | ALS TELLER GEBR|
000013E0: 55 49 4B 54 2E 00 14 1C 20 03 99 22 11 11 1F 27 |UIKT.... .."...'|
000013F0: 4C 44 41 20 24 30 30 2C 58 27 20 4C 41 41 44 54 |LDA $00,X' LAADT|
00001400: 20 44 45 20 49 4E 48 4F 55 44 20 56 41 4E 20 5A | DE INHOUD VAN Z|
00001410: 45 52 4F 2D 00 40 1C 25 03 99 22 11 50 41 47 45 |ERO-.@.%..".PAGE|
00001420: 2D 50 4C 41 41 54 53 20 24 30 30 2B 58 20 49 4E |-PLAATS $00+X IN|
00001430: 20 44 45 20 41 43 2E 20 4F 4D 44 41 54 20 49 4E | DE AC. OMDAT IN|
00001440: 00 6B 1C 2A 03 99 22 11 58 52 20 44 45 20 45 45 |.k.*..".XR DE EE|
00001450: 52 53 54 45 20 4B 45 45 52 20 24 30 30 20 53 54 |RSTE KEER $00 ST|
00001460: 41 41 54 2C 20 49 53 20 48 45 54 00 8C 1C 2F 03 |AAT, IS HET.../.|
00001470: 99 22 11 47 45 48 45 55 47 45 4E 41 44 52 45 53 |.".GEHEUGENADRES|
00001480: 20 45 45 4E 56 4F 55 44 49 47 20 3A 00 AE 1C 34 | EENVOUDIG :...4|
00001490: 03 99 22 11 24 30 30 20 2B 20 58 20 3D 20 24 30 |..".$00 + X = $0|
000014A0: 30 20 2B 20 24 30 30 20 3D 20 24 30 30 2E 00 C4 |0 + $00 = $00...|
000014B0: 1C 39 03 49 B2 31 32 3A 8D 39 34 30 3A 8B 46 4C |.9.I.12:.940:.FL|
000014C0: A7 37 35 30 00 F2 1C 3E 03 99 22 93 1C 27 53 54 |.750...>.."..'ST|
000014D0: 41 20 24 30 34 30 30 2C 58 27 20 5A 45 54 20 44 |A $0400,X' ZET D|
000014E0: 45 20 49 4E 48 4F 55 44 20 56 41 4E 20 44 45 20 |E INHOUD VAN DE |
000014F0: 41 43 00 1E 1D 43 03 99 22 11 4F 50 20 47 45 48 |AC...C..".OP GEH|
00001500: 45 55 47 45 4E 50 4C 41 41 54 53 20 24 30 34 30 |EUGENPLAATS $040|
00001510: 30 2B 58 2C 20 44 45 20 45 45 52 53 54 45 00 44 |0+X, DE EERSTE.D|
00001520: 1D 48 03 99 22 11 4B 45 45 52 20 44 55 53 20 4F |.H..".KEER DUS O|
00001530: 50 20 24 30 34 30 30 2B 24 30 30 20 3D 20 24 30 |P $0400+$00 = $0|
00001540: 34 30 30 2E 00 74 1D 4D 03 99 22 11 11 1F 27 49 |400..t.M.."...'I|
00001550: 4E 58 27 20 4D 41 41 4B 54 20 44 45 20 49 4E 48 |NX' MAAKT DE INH|
00001560: 4F 55 44 20 56 41 4E 20 58 52 20 31 20 47 52 4F |OUD VAN XR 1 GRO|
00001570: 54 45 52 2C 00 92 1D 52 03 99 22 11 44 55 53 20 |TER,...R..".DUS |
00001580: 56 41 4E 20 24 30 30 20 4E 41 41 52 20 24 30 31 |VAN $00 NAAR $01|
00001590: 2E 22 00 C3 1D 57 03 99 22 11 11 1C 27 42 4E 45 |."...W.."...'BNE|
000015A0: 20 24 46 38 27 20 4C 45 56 45 52 54 20 45 45 4E | $F8' LEVERT EEN|
000015B0: 20 54 45 52 55 47 53 50 52 49 4E 47 45 4E 20 4F | TERUGSPRINGEN O|
000015C0: 56 45 52 00 F0 1D 5C 03 99 55 24 3A 99 22 41 43 |VER...\..U$:."AC|
000015D0: 48 54 20 42 59 54 45 53 2C 20 41 4C 53 20 44 45 |HT BYTES, ALS DE|
000015E0: 20 55 49 54 4B 4F 4D 53 54 20 56 41 4E 20 44 45 | UITKOMST VAN DE|
000015F0: 00 1A 1E 61 03 99 22 11 4C 41 41 54 53 54 45 20 |...a..".LAATSTE |
00001600: 42 45 52 45 4B 45 4E 49 4E 47 20 4F 4E 47 45 4C |BEREKENING ONGEL|
00001610: 49 4A 4B 20 30 20 57 41 53 2E 00 41 1E 66 03 99 |IJK 0 WAS..A.f..|
00001620: 22 11 44 41 54 20 57 41 53 20 5A 4F 2C 20 57 41 |".DAT WAS ZO, WA|
00001630: 4E 54 20 58 52 20 57 41 53 20 4E 55 20 24 30 31 |NT XR WAS NU $01|
00001640: 2E 00 57 1E 6B 03 49 B2 31 33 3A 8D 39 34 30 3A |..W.k.I.13:.940:|
00001650: 8B 46 4C A7 37 38 35 00 87 1E 70 03 99 22 93 1F |.FL.785...p.."..|
00001660: 48 45 54 20 44 41 54 41 2D 54 52 41 4E 53 50 4F |HET DATA-TRANSPO|
00001670: 52 54 20 48 45 52 48 41 41 4C 54 20 5A 49 43 48 |RT HERHAALT ZICH|
00001680: 20 4E 55 20 4D 45 54 00 B2 1E 75 03 99 22 11 58 | NU MET...u..".X|
00001690: 20 3D 20 24 30 31 2C 20 44 41 4E 20 4D 45 54 20 | = $01, DAN MET |
000016A0: 20 58 20 3D 20 24 30 32 2C 20 45 54 43 2E 20 48 | X = $02, ETC. H|
000016B0: 45 54 00 E0 1E 7A 03 99 22 11 53 54 4F 50 54 2C |ET...z..".STOPT,|
000016C0: 20 41 4C 53 20 58 20 3D 20 24 30 30 20 57 4F 52 | ALS X = $00 WOR|
000016D0: 44 54 2C 20 44 55 53 20 44 41 4E 20 4D 4F 45 54 |DT, DUS DAN MOET|
000016E0: 00 0D 1F 7F 03 99 22 11 56 4F 4F 52 20 27 49 4E |......".VOOR 'IN|
000016F0: 58 27 20 20 58 20 3D 20 24 46 46 20 5A 49 4A 4E |X' X = $FF ZIJN|
00001700: 20 47 45 57 45 45 53 54 2E 20 48 45 54 00 3C 1F | GEWEEST. HET.<.|
00001710: 84 03 99 22 11 50 52 4F 47 52 41 4D 4D 41 20 57 |...".PROGRAMMA W|
00001720: 4F 52 44 54 20 44 55 53 20 56 4F 4F 52 20 41 4C |ORDT DUS VOOR AL|
00001730: 4C 45 20 58 20 56 41 4E 20 24 30 30 00 57 1F 89 |LE X VAN $00.W..|
00001740: 03 99 22 11 54 4F 54 20 24 46 46 20 55 49 54 47 |..".TOT $FF UITG|
00001750: 45 56 4F 45 52 44 2E 00 87 1F 8E 03 99 22 11 11 |EVOERD......."..|
00001760: 1C 48 45 54 20 50 52 4F 47 52 41 4D 4D 41 20 42 |.HET PROGRAMMA B|
00001770: 45 47 49 4E 54 20 4F 50 20 24 30 33 33 43 20 28 |EGINT OP $033C (|
00001780: 3D 20 38 32 38 20 29 00 AE 1F 93 03 99 22 11 53 |= 828 )......".S|
00001790: 54 41 52 54 20 48 45 54 20 53 54 52 41 4B 53 20 |TART HET STRAKS |
000017A0: 4D 45 54 20 53 59 53 28 38 32 38 29 20 21 00 DE |MET SYS(828) !..|
000017B0: 1F 98 03 99 22 11 11 50 52 4F 42 45 45 52 20 44 |...."..PROBEER D|
000017C0: 41 4E 20 4F 4F 4B 20 48 45 54 20 56 4F 4C 47 45 |AN OOK HET VOLGE|
000017D0: 4E 44 45 20 42 41 53 49 43 2D 50 52 4F 2D 00 02 |NDE BASIC-PRO-..|
000017E0: 20 9D 03 99 22 11 47 52 41 4D 4D 41 3A 90 20 31 | ...".GRAMMA:. 1|
000017F0: 30 20 53 59 53 20 28 38 32 38 29 3A 47 4F 54 4F |0 SYS (828):GOTO|
00001800: 31 30 00 18 20 A2 03 49 B2 31 34 3A 8D 39 34 30 |10.. ..I.14:.940|
00001810: 3A 8B 46 4C B2 31 A7 8A 00 42 20 A7 03 99 22 93 |:.FL.1...B ...".|
00001820: 90 45 49 4E 44 45 2E 20 1C 4C 41 41 44 20 48 45 |.EINDE. .LAAD HE|
00001830: 54 20 56 4F 4C 47 45 4E 44 45 20 44 45 45 4C 22 |T VOLGENDE DEEL"|
00001840: 3A 80 00 53 20 AC 03 8F 20 4E 49 45 55 57 20 42 |:..S ... NIEUW B|
00001850: 4C 41 44 00 9A 20 B1 03 99 22 90 13 11 11 11 11 |LAD.. ..."......|
00001860: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001870: 11 11 11 11 2D 20 50 41 47 49 4E 41 22 3B 49 3B |....- PAGINA";I;|
00001880: 22 2D 20 20 3C 2B 3E 20 56 45 52 44 45 52 20 20 |"- <+> VERDER |
00001890: 3C 2D 3E 20 54 45 52 55 47 13 00 AC 20 B6 03 81 |<-> TERUG... ...|
000018A0: 49 B2 30 A4 31 31 3A A1 58 24 3A 82 00 BF 20 BB |I.0.11:.X$:... .|
000018B0: 03 A1 58 24 3A 8B 58 24 B2 22 22 A7 39 35 35 00 |..X$:.X$."".955.|
000018C0: D2 20 C0 03 8B 58 24 B2 22 2B 22 A7 46 4C B2 30 |. ...X$."+".FL.0|
000018D0: 3A 8E 00 E5 20 C5 03 8B 58 24 B2 22 2D 22 A7 46 |:... ...X$."-".F|
000018E0: 4C B2 31 3A 8E 00 EE 20 CA 03 89 39 35 35 00 11 |L.1:... ...955..|
000018F0: 21 CF 03 99 A3 4C 29 41 24 3A 99 A3 4C 29 22 DD |!....L)A$:..L)".|
00001900: 22 3B 42 24 3B 22 DD 22 3A 99 A3 4C 29 43 24 3A |";B$;".":..L)C$:|
00001910: 8E 00 00 00 |.... |
....D...%.I.. AANPASSING COMMODORE 64.+.
N...C.S.. COURBOIS SOFTWARE.I.X...O.}.."
."G(8)G(142):.53280,5:.53281,13.U.......
..U$.".........":O$.".........":A$."ADRE
SSERING".X....".. *** COMMODORE 64 *** M
ACHINETAAL 4 ***......I.0.999:.......162
,0,181,0,157,0,4,169,0,157,0,216,232,208
,243,96.=....:.I.0.15:.IN:.828.I,IN:..\.
.."..1.2.3.9.RELATIEVE-";A$......"...WE
KRIJGEN NU DE BELANGRIJKE "..
....".VOORWAARDELIJKE SPRONG-OPDRACHTEN.
"......".AL NAAR GELANG DE UITKOMST
VAN EEN "......".WISKUNDIGE OPERATI
E SLAAT DE CPU EEN ".N....".AANTAL OPD
RACHTEN AL OF NIET OVER. "....."..B
IJ EEN 6510 CPU ZIJN DERGELIJKE ".
..C..".SPRONGEN ALTIJD RELATIEF - WE GEV
EN DUS"...H..".NIET DE PLAATS AAN WAARHE
EN MOET WORDEN"...M..".GESPRONGEN, MAAR
HET AANTAL BYTES DAT ".0.R..".MOET WORD
EN OVERGESLAGEN!.E.W.I.1:.940:.FL.140.V.
..."..EEN BELANGRIJKE VOORWAARDELIJKE SP
RONG-"......".INSTRUCTIE IS: .'BNE'..
DAT BETEKENT :".Q...."..BRANCH IF RESUL
T NOT EQUAL ZERO......."..(SPRING, ALS H
ET RESULTAAT NIET GELIJK......".IS AAN N
UL!)".F...."..DE OPDRACHT'BNE $08' BETEK
ENT VOOR DE ".V....".6510: SLA DE VOLGE
NDE $08 OPDRACHT-BYTES......"OVER ALS HE
T RESULTAAT VAN DE LAATSTE.K....".REKENO
PDRACHT GELIJK WAS AAN NUL.......".GETEL
D WORDT VANAF DE EERSTE OPDRACHT......".
NA DE SPRONGOPDRACHT-BYTE../...I.2:.940:
.FL.160.O...."..DUS: * 0. BYTE 'BNE'.".
J.....6);"* 1. BYTE $08."..."...7);" 2.
BYTE ... ...."...'...24);".".M.,..N.3
.9:..7)".";N;".. BYTE ... ..":..24);
".":....1...7);".10. BYTE 'LDA' ._..."..
.6.."..........";.27);"ACHT.". .;...27);
"BYTES.".8.@...27);"OVERSLAAN .".S.E...2
7);" ........".H.J.I.3:.940:.FL.220
...O.."..DE OPDRACHT .'BNE $00'. BETEKE
NT SLA -".I.T..".NUL BYTES OVER, DUS E
FFECTIEF WORDT ER...Y..".NIET GESPRONGEN
."...^.."..DE 6510 KAN MAXIMAAL 127 BYTE
VOORUIT.9.C..".SPRINGEN (MET 'BNE $7F')
. TERUG-.D.H..".SPRINGEN KAN OP DE VOLG
ENDE MANIER:...M.."...$00 = 0 BYTE TERUG
...R..".$FF = 1 BYTE TERUG...W..".$FE =
2 BYTE TERUG.S.|..".$FD = 3 BYTE TERUG E
NZ......I.4:.940:.FL.280......"..MAXIMAA
L KAN OVER 128 BYTES WORDEN.<....".TERU
GGESPRONGEN: .'BNE $80'....".A....B$;"TE
RUGSPRINGEN OVER 8 BYTES:.......10);"..0
. BYTE 'LDA' ._..".......26);".".F....N.
1.7:..9)".";N;".. BYTE ... ..":..26)
;".":........10);".8. BYTE ... . ..."..
...."...........";.29);"ACHT.".......29)
;"BYTES.".-.....29);"TERUG-.".C.....29);
"SPRINGEN.".L.....8);"*";.18);"'BNE'";.2
9);" ."...B...8);"*";.19);"$F8.."..
.G.I.5:.940:.FL.335.C.L.."..VOORDEEL REL
ATIEVE ";A$;": DE "...Q..".PROGRAMMA'S K
UNNEN OVERAL IN DE RAM...V..".WORDEN OPG
ESLAGEN OMDAT ER IMMERS GEEN.F....".ABSO
LUTE ADRESSEN WORDEN GEBRUIKT..T...."...
NADEEL: DE BEREKENING VAN DE LENGTE....
..".VAN DE SPRONG IS LASTIG EN GEEFT VAA
K.O....".FOUTEN EN DE SPRONGGROOTTE IS B
EPERKT......."...MEESTAL LATEN WE EEN AS
SEMBLERPROGRAMMA.-....".DE BEREKENINGEN
UITVOEREN, ZODAT TEN-.V....".MINSTE HET
EERSTE NADEEL VERVALT..K...I.6:.940:.FL.
390......"..1.2.4. EEN EERSTE VOORBEELD.
....."...KIJKEN WE NOG EENS NAAR HET VER
PLAATSEN......".VAN DATA. WE GAAN EEN P
ROGRAMMA MAKEN,......".DAT DE INHOUD VAN
DE GEHEUGENCELLEN.G....".$0000 - $00FF
NAAR $0400 - $04FF VER-.W....".PLAATST..
~.!.."...$0000 - $00FF IS IN ZEROPAGE,..
.&..".$0400 - $04FF IS HET EERSTE KWART
VAN.C.+..".HET BEELDSCHERM..X.0.I.7:.940
:.FL.460...5.."..OM HET PROGRAMMA TE KUN
NEN SCHRIJVEN.A.:.S$.". ":.".MOETEN
WE NOG 4 NIEUWE 6510-OPDRACHTEN".P.?.."
.LEREN:":.".. 'LDX','STA','INX','RTS'..
...D..".. 'LDX' (LOAD INDEX X WITH MEMO
RY).H.I..". 'STA' (STORE ACCUMULATOR TO
MEMORY)...N..". 'INX' (INCREMENT INDEX
X BY ONE)...S..". 'RTS' (RETURN FROM S
UBROUTINE).H.X.."..DEZE VIER OPDRACHTEN
ZIJN GEMAKKELIJK.Q.]..".TE BEGRIJPEN EN
WERKEN ALS VOLGT:...B.."..'LDX' LAADT EE
N BYTE IN HET X-REGISTER..G.G..".DUS 'LD
X #$00' LAADT $00 IN XR...L.I.8:.940:.FL
.515...Q.."..'STA'. IS HET OMGEKEERDE V
AN 'LDA'. DEZE";.9.V..S$"OPDRACHT ZET DE
INHOUD VAN DE AC.B.{..S$"IN DE GEHEUGEN
CEL MET MEEGEGEVEN......S$;"ADRES. B.V.
'STA $0123' ZET DE......S$;"INHOUD VAN
DE AC OP PLAATS $0123......."...'INX' .M
AAKT DE INHOUD VAN HET XR 1 GRO-......S$
;"TER. DUS $A2 WORDT $A3, EN.)....S$;"$F
F WORDT $00, ETC..[...."...'RTS'. ZORGT
VOOR HET TERUGSPRINGEN NAAR......S$;"HET
HOOFDPROGRAMMA UIT EEN SUB-......S$;"RO
UTINE. (VGL. BASIC: 'RETURN').D...I.9:
.940:.FL.565......"..NU ONS PROGRAMMA:..
......16);"HEX-CODE"......"..LDX # $00
A2 00.9....".LDA $00,X _. B5 00"
:..13);"..B.A.."STA $0400,X . 9D 00 04
":..13);"....F.."INX . E8":..1
3);"....K.."BNE $F8 .. D0 F8...P.."
.RTS 60...U.."..WE SCHRIJVEN
DIT PROGRAMMA MET EEN...Z..".ASSEMBLER
(EVENTUEEL IN ROM) OF MET DE.B....".STAN
DAARD MONITOR IN DE KASSETTEBUFFER._....
".VANAF PLAATS .$033C...U...I.10:.940:.F
L.625......"..EEN MACHINE-TAAL PROGRAMMA
WORDT GE-.M....".START MET DE OPDRACHT
'SYS (....)'.......".NA AFLOOP VAN DIT P
ROGRAMMA MOET WEER.$....".TERUGGESPRONGE
N WORDEN NAAR BASIC..Q....".DAAROM IS DE
LAATSTE MACHINE-TAAL OP-.G....".DRACHT:
.'RTS'.}...I.11:.940:.FL.685......"..WE
RKING :.F...."..'LDX # $00' LAAD
T $00 IN XR. DIT WORDT......".NU ALS TEL
LER GEBRUIKT.... .."...'LDA $00,X' LAADT
DE INHOUD VAN ZERO-.@.%..".PAGE-PLAATS
$00+X IN DE AC. OMDAT IN.K.*..".XR DE EE
RSTE KEER $00 STAAT, IS HET.../..".GEHEU
GENADRES EENVOUDIG :...4..".$00 + X = $0
0 + $00 = $00..D.9.I.12:.940:.FL.750...>
.."..'STA $0400,X' ZET DE INHOUD VAN DE
AC...C..".OP GEHEUGENPLAATS $0400+X, DE
EERSTE.D.H..".KEER DUS OP $0400+$00 = $0
400..T.M.."...'INX' MAAKT DE INHOUD VAN
XR 1 GROTER,...R..".DUS VAN $00 NAAR $01
.".C.W.."...'BNE $F8' LEVERT EEN TERUGSP
RINGEN OVER...\..U$:."ACHT BYTES, ALS DE
UITKOMST VAN DE...A..".LAATSTE BEREKENI
NG ONGELIJK 0 WAS..A.F..".DAT WAS ZO, WA
NT XR WAS NU $01..W.K.I.13:.940:.FL.785.
..P.."..HET DATA-TRANSPORT HERHAALT ZICH
NU MET...U..".X = $01, DAN MET X = $02
, ETC. HET...Z..".STOPT, ALS X = $00 WOR
DT, DUS DAN MOET.....".VOOR 'INX' X =
$FF ZIJN GEWEEST. HET.<....".PROGRAMMA W
ORDT DUS VOOR ALLE X VAN $00.W....".TOT
$FF UITGEVOERD......."...HET PROGRAMMA B
EGINT OP $033C (= 828 )......".START HET
STRAKS MET SYS(828) !......"..PROBEER D
AN OOK HET VOLGENDE BASIC-PRO-.. ...".GR
AMMA:. 10 SYS (828):GOTO10.. ..I.14:.940
:.FL.1...B ..."..EINDE. .LAAD HET VOLGEN
DE DEEL":..S ... NIEUW BLAD.. ..."......
....................- PAGINA";I;"- <+>
VERDER <-> TERUG... ...I.0.11:.X$:... .
..X$:.X$."".955.R ...X$."+".FL.0:... E..
X$."-".FL.1:... J..955..!O...L)A$:..L)".
";B$;".":..L)C$:....
> CLICK IMAGE PREVIEW FOR FULL MODAL