6502 D10
FILE INFORMATION
FILENAME(S): 6502 D10
FILE TYPE(S): PRG
FILE SIZE: 5.6K
FIRST SEEN: 2025-11-02 16:30:32
APPEARS ON: 1 disk(s)
FILE HASH
63517a87496f64e9b65ec5b32ecd8cfffbecf97585a843272933e8fe6e3af41b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NG USERS 20A | 6502 D10 | PRG | Treasure Chest - OzzyC64 | 6 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 11 08 64 00 97 35 39 34 39 38 2C 31 32 3A |....d..59498,12:|
00000010: 9C 00 34 08 6E 00 55 24 B2 22 A3 A3 A3 A3 A3 A3 |..4.n.U$."......|
00000020: A3 A3 A3 A3 22 3A 4F 24 B2 22 A4 A4 A4 A4 A4 A4 |....":O$."......|
00000030: A4 A4 A4 22 00 3E 08 78 00 8F 20 56 42 31 00 53 |...".>.x.. VB1.S|
00000040: 08 82 00 83 20 31 36 32 2C 30 2C 31 38 39 2C 37 |.... 162,0,189,7|
00000050: 32 2C 33 00 6C 08 8C 00 83 20 33 32 2C 32 31 30 |2,3.l.... 32,210|
00000060: 2C 32 35 35 2C 32 33 32 2C 32 32 34 00 84 08 96 |,255,232,224....|
00000070: 00 83 20 31 39 2C 32 30 38 2C 32 34 35 2C 39 36 |.. 19,208,245,96|
00000080: 2C 31 34 37 00 99 08 A0 00 83 20 36 38 2C 37 33 |,147...... 68,73|
00000090: 2C 38 34 2C 33 32 2C 37 33 00 AE 08 AA 00 83 20 |,84,32,73...... |
000000A0: 38 33 2C 33 32 2C 38 34 2C 36 39 2C 33 32 00 C3 |83,32,84,69,32..|
000000B0: 08 B4 00 83 20 37 31 2C 36 39 2C 37 35 2C 33 32 |.... 71,69,75,32|
000000C0: 2C 33 33 00 D2 08 BE 00 83 20 33 32 2C 33 32 2C |,33...... 32,32,|
000000D0: 31 33 00 DD 08 C8 00 8F 20 56 42 20 32 00 F5 08 |13...... VB 2...|
000000E0: D2 00 83 20 31 36 32 2C 31 37 2C 31 36 39 2C 31 |... 162,17,169,1|
000000F0: 39 37 2C 33 32 00 0F 09 DC 00 83 20 32 31 30 2C |97,32...... 210,|
00000100: 32 35 35 2C 32 30 32 2C 32 30 38 2C 32 35 30 00 |255,202,208,250.|
00000110: 18 09 E6 00 83 20 39 36 00 23 09 F0 00 8F 20 56 |..... 96.#.... V|
00000120: 42 20 33 00 3C 09 FA 00 83 20 31 36 39 2C 31 34 |B 3.<.... 169,14|
00000130: 37 2C 33 32 2C 32 31 30 2C 32 35 35 00 54 09 04 |7,32,210,255.T..|
00000140: 01 83 20 31 36 32 2C 36 35 2C 31 33 38 2C 33 32 |.. 162,65,138,32|
00000150: 2C 32 31 30 00 6C 09 0E 01 83 20 32 35 35 2C 31 |,210.l.... 255,1|
00000160: 36 39 2C 34 31 2C 33 32 2C 32 31 30 00 84 09 18 |69,41,32,210....|
00000170: 01 83 20 32 35 35 2C 31 36 39 2C 31 33 2C 33 32 |.. 255,169,13,32|
00000180: 2C 32 31 30 00 9D 09 22 01 83 20 32 35 35 2C 32 |,210...".. 255,2|
00000190: 33 32 2C 32 32 34 2C 38 35 2C 32 30 38 00 AA 09 |32,224,85,208...|
000001A0: 2C 01 83 20 32 33 37 2C 39 36 00 DF 09 36 01 99 |,.. 237,96...6..|
000001B0: 22 93 A4 22 3B 4F 24 3B 4F 24 3B 4F 24 3A 99 22 |"..";O$;O$;O$:."|
000001C0: 12 20 43 55 52 53 55 53 20 4D 41 43 48 49 4E 45 |. CURSUS MACHINE|
000001D0: 54 41 41 4C 20 44 45 45 4C 20 31 30 20 92 22 00 |TAAL DEEL 10 .".|
000001E0: 10 0A 40 01 99 22 A4 A4 A4 A4 A4 A4 22 3B 4F 24 |..@.."......";O$|
000001F0: 3B 4F 24 3A 99 22 12 32 2E 31 2E 20 42 45 45 4C |;O$:.".2.1. BEEL|
00000200: 44 53 43 48 45 52 4D 2D 55 49 54 56 4F 45 52 22 |DSCHERM-UITVOER"|
00000210: 00 3C 0A 4A 01 99 22 11 32 2E 20 55 49 54 56 4F |.<.J..".2. UITVO|
00000220: 45 52 20 4D 45 54 20 44 45 20 50 52 49 4E 54 2D |ER MET DE PRINT-|
00000230: 52 4F 55 54 49 4E 45 20 56 41 4E 22 00 5B 0A 54 |ROUTINE VAN".[.T|
00000240: 01 99 22 11 20 20 20 48 45 54 20 42 45 44 52 49 |..". HET BEDRI|
00000250: 4A 46 53 53 59 53 54 45 45 4D 22 00 8C 0A 5E 01 |JFSSYSTEEM"...^.|
00000260: 99 22 11 11 49 45 54 53 20 45 45 4E 56 4F 55 44 |."..IETS EENVOUD|
00000270: 49 47 45 52 20 41 4C 53 20 44 45 20 44 49 52 45 |IGER ALS DE DIRE|
00000280: 4B 54 45 20 55 49 54 56 4F 45 52 22 00 B9 0A 68 |KTE UITVOER"...h|
00000290: 01 99 22 11 4F 50 20 48 45 54 20 42 45 45 4C 44 |..".OP HET BEELD|
000002A0: 53 43 48 45 52 4D 20 49 53 20 44 45 20 55 49 54 |SCHERM IS DE UIT|
000002B0: 56 4F 45 52 20 4D 45 54 22 00 EA 0A 72 01 99 22 |VOER MET"...r.."|
000002C0: 11 44 45 20 50 52 49 4E 54 52 4F 55 54 49 4E 45 |.DE PRINTROUTINE|
000002D0: 20 56 41 4E 20 48 45 54 20 42 45 44 52 49 4A 46 | VAN HET BEDRIJF|
000002E0: 53 53 59 53 54 45 45 4D 2E 22 00 18 0B 7C 01 99 |SSYSTEEM."...|..|
000002F0: 22 11 11 44 49 54 20 56 4F 4F 52 44 45 45 4C 20 |"..DIT VOORDEEL |
00000300: 47 41 41 54 20 45 43 48 54 45 52 20 47 45 50 41 |GAAT ECHTER GEPA|
00000310: 41 52 44 20 4D 45 54 22 00 47 0B 86 01 99 22 11 |ARD MET".G....".|
00000320: 45 45 4E 20 4C 41 47 45 52 45 20 56 45 52 57 45 |EEN LAGERE VERWE|
00000330: 52 4B 49 4E 47 53 53 4E 45 4C 48 45 49 44 20 28 |RKINGSSNELHEID (|
00000340: 41 4C 4C 45 45 4E 22 00 68 0B 90 01 99 22 11 42 |ALLEEN".h....".B|
00000350: 49 4A 20 44 45 20 38 30 30 30 20 53 45 52 49 45 |IJ DE 8000 SERIE|
00000360: 20 4E 49 45 54 29 2E 22 00 84 0B 9A 01 8C 3A 81 | NIET)."......:.|
00000370: 49 B2 30 A4 37 30 3A 87 58 3A 97 38 32 36 AA 49 |I.0.70:.X:.826.I|
00000380: 2C 58 3A 82 00 9A 0B A4 01 49 B2 31 3A 8D 31 36 |,X:......I.1:.16|
00000390: 36 30 3A 8B 46 4C A7 33 31 30 00 D3 0B AE 01 99 |60:.FL.310......|
000003A0: 22 93 44 49 45 20 50 52 49 4E 54 52 4F 55 54 49 |".DIE PRINTROUTI|
000003B0: 4E 45 20 57 4F 52 44 54 20 4D 45 54 20 27 4A 53 |NE WORDT MET 'JS|
000003C0: 52 20 20 24 46 46 44 32 27 22 3A 99 A3 32 38 29 |R $FFD2'":..28)|
000003D0: 3B 55 24 00 00 0C B8 01 99 22 41 41 4E 47 45 52 |;U$......"AANGER|
000003E0: 4F 45 50 45 4E 20 28 44 45 43 49 4D 41 41 4C 3A |OEPEN (DECIMAAL:|
000003F0: 20 36 35 34 39 30 29 2E 20 48 45 54 20 49 4E 22 | 65490). HET IN"|
00000400: 00 2C 0C C2 01 99 22 11 44 45 20 41 43 20 41 41 |.,....".DE AC AA|
00000410: 4E 57 45 5A 49 47 45 20 53 59 4D 42 4F 4F 4C 20 |NWEZIGE SYMBOOL |
00000420: 57 4F 52 44 54 20 41 46 47 45 2D 22 00 59 0C CC |WORDT AFGE-".Y..|
00000430: 01 99 22 11 44 52 55 4B 54 20 4F 50 20 44 45 20 |..".DRUKT OP DE |
00000440: 43 55 52 53 4F 52 50 4C 41 41 54 53 20 45 4E 20 |CURSORPLAATS EN |
00000450: 48 45 54 20 43 55 52 2D 22 00 88 0C D6 01 99 22 |HET CUR-"......"|
00000460: 11 53 4F 52 41 44 52 45 53 20 57 4F 52 44 54 20 |.SORADRES WORDT |
00000470: 31 20 56 45 52 48 4F 4F 47 44 2E 20 48 45 54 20 |1 VERHOOGD. HET |
00000480: 56 4F 4C 47 45 4E 2D 22 00 B8 0C E0 01 99 22 11 |VOLGEN-"......".|
00000490: 44 45 20 53 59 4D 42 4F 4F 4C 20 57 4F 52 44 54 |DE SYMBOOL WORDT|
000004A0: 20 44 55 53 20 41 55 54 4F 4D 41 54 49 53 43 48 | DUS AUTOMATISCH|
000004B0: 20 41 43 48 54 45 52 22 00 D4 0C EA 01 99 22 11 | ACHTER"......".|
000004C0: 48 45 54 20 56 4F 52 49 47 45 20 47 45 50 52 49 |HET VORIGE GEPRI|
000004D0: 4E 54 2E 22 00 FF 0C F4 01 99 22 11 11 44 45 20 |NT."......"..DE |
000004E0: 43 55 52 53 4F 52 43 4F 4D 4D 41 4E 44 4F 27 53 |CURSORCOMMANDO'S|
000004F0: 20 4B 55 4E 4E 45 4E 20 4E 4F 52 4D 41 41 4C 00 | KUNNEN NORMAAL.|
00000500: 18 0D FE 01 99 22 11 47 45 42 52 55 49 4B 54 20 |.....".GEBRUIKT |
00000510: 57 4F 52 44 45 4E 2E 22 00 51 0D 08 02 99 22 11 |WORDEN.".Q....".|
00000520: 11 44 45 20 53 59 4D 42 4F 4C 45 4E 20 49 4E 20 |.DE SYMBOLEN IN |
00000530: 41 43 20 4D 4F 45 54 45 4E 20 49 4E 20 41 53 43 |AC MOETEN IN ASC|
00000540: 49 49 2D 43 4F 44 45 22 3A 99 A3 32 38 29 3B 55 |II-CODE":..28);U|
00000550: 24 00 5F 0D 12 02 99 22 53 54 41 41 4E 2E 22 00 |$._...."STAAN.".|
00000560: 75 0D 1C 02 49 B2 32 3A 8D 31 36 36 30 3A 8B 46 |u...I.2:.1660:.F|
00000570: 4C A7 33 31 30 00 8C 0D 26 02 99 22 93 56 4F 4F |L.310...&..".VOO|
00000580: 52 42 45 45 4C 44 3A 22 3A 99 55 24 00 B8 0D 30 |RBEELD:":.U$...0|
00000590: 02 99 22 A4 11 9D 12 31 92 2E 20 48 45 45 4C 20 |.."....1.. HEEL |
000005A0: 45 45 4E 56 4F 55 44 49 47 20 49 53 20 48 45 54 |EENVOUDIG IS HET|
000005B0: 20 57 49 53 53 45 4E 22 00 D5 0D 3A 02 99 22 11 | WISSEN"...:..".|
000005C0: 56 41 4E 20 48 45 54 20 42 45 45 4C 44 53 43 48 |VAN HET BEELDSCH|
000005D0: 45 52 4D 3A 22 00 FA 0D 44 02 99 22 11 20 20 20 |ERM:"...D..". |
000005E0: 4C 44 41 20 23 24 39 33 20 20 20 20 20 20 27 43 |LDA #$93 'C|
000005F0: 4C 52 27 20 49 4E 20 41 43 22 00 19 0E 4E 02 99 |LR' IN AC"...N..|
00000600: 22 11 20 20 20 4A 53 52 20 24 46 46 44 32 20 20 |". JSR $FFD2 |
00000610: 20 20 20 50 52 49 4E 54 22 00 2F 0E 58 02 99 22 | PRINT"./.X.."|
00000620: 11 44 41 54 20 49 53 20 41 4C 4C 45 53 21 22 00 |.DAT IS ALLES!".|
00000630: 60 0E 62 02 99 22 11 11 A4 11 9D 12 32 92 2E 20 |`.b.."......2.. |
00000640: 43 55 52 53 4F 52 20 20 20 49 4E 20 44 45 20 4C |CURSOR IN DE L|
00000650: 49 4E 4B 45 52 20 42 4F 56 45 4E 48 4F 45 4B 22 |INKER BOVENHOEK"|
00000660: 00 81 0E 6C 02 99 22 11 5A 45 54 54 45 4E 20 5A |...l..".ZETTEN Z|
00000670: 4F 4E 44 45 52 20 54 45 20 57 49 53 53 45 4E 3A |ONDER TE WISSEN:|
00000680: 22 00 A7 0E 76 02 99 22 11 20 20 20 4C 44 41 20 |"...v..". LDA |
00000690: 23 24 31 33 20 20 20 20 20 20 27 48 4F 4D 45 27 |#$13 'HOME'|
000006A0: 20 49 4E 20 41 43 22 00 C5 0E 80 02 99 22 11 20 | IN AC"......". |
000006B0: 20 20 4A 53 52 20 24 46 46 44 32 20 20 20 20 20 | JSR $FFD2 |
000006C0: 50 52 49 4E 54 00 DB 0E 8A 02 49 B2 33 3A 8D 31 |PRINT.....I.3:.1|
000006D0: 36 36 30 3A 8B 46 4C A7 34 33 30 00 0D 0F 94 02 |660:.FL.430.....|
000006E0: 99 22 93 11 11 11 A4 11 9D 12 33 92 2E 20 4D 45 |."........3.. ME|
000006F0: 54 20 27 52 45 54 55 52 4E 27 20 4B 4F 4D 54 20 |T 'RETURN' KOMT |
00000700: 44 45 20 43 55 52 53 4F 52 20 4F 50 22 00 36 0F |DE CURSOR OP".6.|
00000710: 9E 02 99 22 11 48 45 54 20 42 45 47 49 4E 20 56 |...".HET BEGIN V|
00000720: 41 4E 20 44 45 20 56 4F 4C 47 45 4E 44 45 20 52 |AN DE VOLGENDE R|
00000730: 45 47 45 4C 3A 22 00 5E 0F A8 02 99 22 11 20 20 |EGEL:".^....". |
00000740: 20 4C 44 41 20 23 24 30 44 20 20 20 20 20 20 27 | LDA #$0D '|
00000750: 52 45 54 55 52 4E 27 20 49 4E 20 41 43 22 00 7D |RETURN' IN AC".}|
00000760: 0F B2 02 99 22 11 20 20 20 4A 53 52 20 24 46 46 |....". JSR $FF|
00000770: 44 32 20 20 20 20 20 50 52 49 4E 54 22 00 AA 0F |D2 PRINT"...|
00000780: BC 02 99 22 11 49 2E 50 2E 56 2E 20 27 52 45 54 |...".I.P.V. 'RET|
00000790: 55 52 4E 27 20 47 45 42 52 55 49 4B 54 20 4D 45 |URN' GEBRUIKT ME|
000007A0: 4E 20 4F 4B 20 27 43 52 27 22 00 D3 0F C6 02 99 |N OK 'CR'"......|
000007B0: 22 11 44 41 54 20 42 45 54 45 4B 45 4E 54 20 20 |".DAT BETEKENT |
000007C0: 27 43 41 52 20 52 45 54 55 52 4E 27 2C 20 20 44 |'CAR RETURN', D|
000007D0: 55 53 22 00 FC 0F D0 02 99 22 11 27 54 45 52 55 |US"......".'TERU|
000007E0: 47 2D 57 41 47 45 4E 27 20 56 41 4E 20 44 45 20 |G-WAGEN' VAN DE |
000007F0: 54 59 50 45 4D 41 43 48 49 4E 45 22 00 12 10 DA |TYPEMACHINE"....|
00000800: 02 49 B2 34 3A 8D 31 36 36 30 3A 8B 46 4C A7 35 |.I.4:.1660:.FL.5|
00000810: 35 30 00 41 10 E4 02 99 22 93 11 11 11 11 11 41 |50.A...."......A|
00000820: 4C 53 20 45 52 20 54 45 4B 53 54 20 4D 4F 45 54 |LS ER TEKST MOET|
00000830: 20 57 4F 52 44 45 4E 20 47 45 50 52 49 4E 54 2C | WORDEN GEPRINT,|
00000840: 22 00 6E 10 EE 02 99 22 11 47 45 42 52 55 49 4B |".n....".GEBRUIK|
00000850: 54 20 4D 45 4E 2C 20 4E 45 54 20 41 4C 53 20 42 |T MEN, NET ALS B|
00000860: 49 4A 20 44 45 20 44 49 52 45 4B 54 45 22 00 9B |IJ DE DIREKTE"..|
00000870: 10 F8 02 99 22 11 55 49 54 56 4F 45 52 20 45 45 |....".UITVOER EE|
00000880: 4E 20 4C 49 4A 53 54 2C 20 4D 41 41 52 20 4E 55 |N LIJST, MAAR NU|
00000890: 20 49 4E 20 41 53 43 49 49 2E 22 00 C7 10 02 03 | IN ASCII.".....|
000008A0: 99 22 11 11 44 45 20 43 55 52 53 4F 52 42 45 53 |."..DE CURSORBES|
000008B0: 54 55 52 49 4E 47 20 4B 4F 4D 54 20 4E 41 54 55 |TURING KOMT NATU|
000008C0: 55 52 4C 49 4A 4B 22 00 E1 10 0C 03 99 22 11 4F |URLIJK"......".O|
000008D0: 4F 4B 20 49 4E 20 44 49 45 20 4C 49 4A 53 54 2E |OK IN DIE LIJST.|
000008E0: 22 00 0B 11 16 03 99 22 11 11 11 5A 4F 27 4E 20 |"......"...ZO'N |
000008F0: 4C 49 4A 53 54 20 5A 49 45 54 20 45 52 20 42 2E |LIJST ZIET ER B.|
00000900: 56 2E 20 5A 4F 20 55 49 54 3A 22 00 21 11 20 03 |V. ZO UIT:".!. .|
00000910: 49 B2 35 3A 8D 31 36 36 30 3A 8B 46 4C A7 36 36 |I.5:.1660:.FL.66|
00000920: 30 00 48 11 2A 03 99 22 93 20 20 20 20 20 41 44 |0.H.*..". AD|
00000930: 52 45 53 20 20 20 49 4E 48 4F 55 44 20 20 20 53 |RES INHOUD S|
00000940: 59 4D 42 4F 4F 4C 11 22 00 81 11 34 03 81 49 B2 |YMBOOL."...4..I.|
00000950: 30 A4 31 38 3A 99 22 20 20 20 20 20 20 4E 2B 22 |0.18:." N+"|
00000960: CA 28 C4 28 49 29 AA 22 20 22 2C 32 2C 32 29 22 |.(.(I)." ",2,2)"|
00000970: 20 20 20 20 24 20 20 20 20 20 20 20 27 20 27 91 | $ ' '.|
00000980: 22 00 BF 11 3E 03 99 A3 31 35 29 CA 28 22 39 33 |"...>...15).("93|
00000990: 34 34 34 39 35 34 32 30 34 39 35 33 32 30 35 34 |4449542049532054|
000009A0: 34 35 32 30 34 37 34 35 34 42 32 30 32 31 32 30 |452047454B202120|
000009B0: 32 30 30 44 22 2C 32 AC 49 AA 31 2C 32 29 3B 00 |200D",2.I.1,2);.|
000009C0: E7 11 48 03 99 A3 32 33 29 CA 28 22 20 44 49 54 |..H...23).(" DIT|
000009D0: 20 49 53 20 54 45 20 47 45 4B 20 21 20 22 2C 49 | IS TE GEK ! ",I|
000009E0: AA 31 2C 31 29 3A 82 00 0A 12 52 03 99 A3 32 30 |.1,1):....R...20|
000009F0: 29 22 91 27 52 45 54 55 52 4E 27 13 11 11 22 A3 |)".'RETURN'...".|
00000A00: 32 31 29 22 27 43 4C 52 27 22 00 20 12 5C 03 49 |21)"'CLR'". .\.I|
00000A10: B2 36 3A 8D 31 36 36 30 3A 8B 46 4C A7 37 34 30 |.6:.1660:.FL.740|
00000A20: 00 4E 12 66 03 99 22 93 56 4F 4F 52 20 44 45 5A |.N.f..".VOOR DEZ|
00000A30: 45 20 54 45 4B 53 54 54 41 42 45 4C 20 53 43 48 |E TEKSTTABEL SCH|
00000A40: 52 49 4A 56 45 4E 20 57 45 20 45 45 4E 22 00 76 |RIJVEN WE EEN".v|
00000A50: 12 70 03 99 22 11 50 52 4F 47 52 41 4D 4D 41 2C |.p..".PROGRAMMA,|
00000A60: 20 44 41 54 20 41 43 48 54 45 52 20 45 4C 4B 41 | DAT ACHTER ELKA|
00000A70: 41 52 20 44 45 22 00 A3 12 7A 03 99 22 11 53 59 |AR DE"...z..".SY|
00000A80: 4D 42 4F 4C 45 4E 20 49 4E 20 44 45 20 41 43 20 |MBOLEN IN DE AC |
00000A90: 4C 41 41 44 54 20 45 4E 20 44 4F 4F 52 47 45 45 |LAADT EN DOORGEE|
00000AA0: 46 54 22 00 C0 12 84 03 99 22 11 41 41 4E 20 44 |FT"......".AAN D|
00000AB0: 45 20 50 52 49 4E 54 52 4F 55 54 49 4E 45 2E 22 |E PRINTROUTINE."|
00000AC0: 00 FD 12 8E 03 99 22 11 11 50 41 53 20 4F 50 3A |......"..PAS OP:|
00000AD0: 20 44 45 20 50 4C 41 41 54 53 20 57 41 41 52 20 | DE PLAATS WAAR |
00000AE0: 44 45 20 54 45 4B 53 54 20 57 4F 52 44 54 22 3A |DE TEKST WORDT":|
00000AF0: 99 A3 31 31 29 22 A3 A3 A3 A3 A3 A3 22 00 35 13 |..11)"......".5.|
00000B00: 98 03 99 22 47 45 50 52 49 4E 54 2C 20 49 53 20 |..."GEPRINT, IS |
00000B10: 49 4E 20 44 45 20 54 41 42 45 4C 20 44 4F 4F 52 |IN DE TABEL DOOR|
00000B20: 20 44 45 20 4D 45 45 22 3A 99 A3 39 29 55 24 22 | DE MEE":..9)U$"|
00000B30: A3 A3 A3 A3 22 00 62 13 A2 03 99 22 47 45 43 4F |....".b...."GECO|
00000B40: 44 45 45 52 44 45 20 43 55 52 53 4F 52 42 45 53 |DEERDE CURSORBES|
00000B50: 54 55 52 49 4E 47 20 41 4C 20 50 52 45 43 49 45 |TURING AL PRECIE|
00000B60: 53 22 00 76 13 AC 03 99 22 11 56 41 53 54 47 45 |S".v....".VASTGE|
00000B70: 4C 45 47 44 21 22 00 96 13 B6 03 99 22 11 11 48 |LEGD!"......"..H|
00000B80: 49 45 52 20 4E 55 20 48 45 54 20 50 52 4F 47 52 |IER NU HET PROGR|
00000B90: 41 4D 4D 41 3A 22 00 AC 13 C0 03 49 B2 37 3A 8D |AMMA:".....I.7:.|
00000BA0: 31 36 36 30 3A 8B 46 4C A7 38 31 30 00 CF 13 CA |1660:.FL.810....|
00000BB0: 03 99 22 93 B0 C0 20 4C 44 58 20 23 24 30 30 20 |.."... LDX #$00 |
00000BC0: 20 20 20 54 45 4C 4C 45 52 20 4F 50 20 30 22 00 | TELLER OP 0".|
00000BD0: F6 13 D4 03 99 22 DD 9D 11 DD 20 20 4C 44 41 20 |.....".... LDA |
00000BE0: 4E 2C 58 20 20 20 20 20 53 59 4D 42 4F 4F 4C 20 |N,X SYMBOOL |
00000BF0: 49 4E 20 41 43 22 00 15 14 DE 03 99 22 DD 9D 11 |IN AC"......"...|
00000C00: DD 20 20 4A 53 52 20 24 46 46 44 32 20 20 20 50 |. JSR $FFD2 P|
00000C10: 52 49 4E 54 22 00 34 14 E8 03 99 22 DD 9D 11 DD |RINT".4...."....|
00000C20: 20 20 49 4E 58 20 20 20 20 20 20 20 20 20 58 3D | INX X=|
00000C30: 58 2B 31 22 00 53 14 F2 03 99 22 DD 9D 11 DD 20 |X+1".S....".... |
00000C40: 20 43 50 58 20 23 24 31 33 20 20 20 20 58 3D 31 | CPX #$13 X=1|
00000C50: 39 3F 22 00 81 14 FC 03 99 22 DD 9D 11 AD 5F 20 |9?"......"...._ |
00000C60: 42 4E 45 20 24 46 35 20 20 20 20 20 4E 45 45 3A |BNE $F5 NEE:|
00000C70: 20 56 4F 4C 47 45 4E 44 20 53 59 4D 42 4F 4F 4C | VOLGEND SYMBOOL|
00000C80: 22 00 90 14 06 04 99 22 11 20 20 20 52 54 53 22 |"......". RTS"|
00000C90: 00 BD 14 10 04 99 22 11 11 43 4F 4E 54 52 4F 4C |......"..CONTROL|
00000CA0: 45 45 52 20 44 41 54 20 48 45 54 20 45 49 4E 44 |EER DAT HET EIND|
00000CB0: 20 4D 4F 45 54 20 4C 49 47 47 45 4E 22 00 DE 14 | MOET LIGGEN"...|
00000CC0: 1A 04 99 22 11 42 49 4A 20 58 3D 24 31 33 20 28 |...".BIJ X=$13 (|
00000CD0: 44 45 43 49 4D 41 41 4C 20 31 39 29 21 22 00 FC |DECIMAAL 19)!"..|
00000CE0: 14 24 04 99 22 11 11 4E 55 20 45 45 4E 20 44 45 |.$.."..NU EEN DE|
00000CF0: 4D 4F 4E 53 54 52 41 54 49 45 3A 22 00 12 15 2E |MONSTRATIE:"....|
00000D00: 04 49 B2 38 3A 8D 31 36 36 30 3A 8B 46 4C A7 38 |.I.8:.1660:.FL.8|
00000D10: 37 30 00 26 15 38 04 9E 38 32 36 3A 81 57 B2 30 |70.&.8..826:.W.0|
00000D20: A4 35 30 30 3A 82 00 53 15 42 04 99 22 11 11 11 |.500:..S.B.."...|
00000D30: 4D 4F 4F 49 20 2D 20 44 41 54 20 4B 4C 4F 50 54 |MOOI - DAT KLOPT|
00000D40: 2E 20 20 20 20 20 20 44 45 20 54 45 4B 53 54 20 |. DE TEKST |
00000D50: 49 4E 22 00 81 15 4C 04 99 22 11 44 49 54 20 56 |IN"...L..".DIT V|
00000D60: 4F 4F 52 42 45 45 4C 44 20 49 53 20 4E 41 54 55 |OORBEELD IS NATU|
00000D70: 55 52 4C 49 4A 4B 20 4D 41 41 52 20 4B 4F 52 54 |URLIJK MAAR KORT|
00000D80: 22 00 AD 15 56 04 99 22 11 4D 41 41 52 20 49 4E |"...V..".MAAR IN|
00000D90: 20 50 52 49 4E 43 49 50 45 20 4B 41 4E 20 48 45 | PRINCIPE KAN HE|
00000DA0: 54 20 4E 41 54 55 55 52 4C 49 4A 4B 22 00 D8 15 |T NATUURLIJK"...|
00000DB0: 60 04 99 22 11 4E 45 54 20 5A 4F 20 4C 41 4E 47 |`..".NET ZO LANG|
00000DC0: 20 41 4C 53 20 4A 45 20 57 49 4C 54 2E 20 20 44 | ALS JE WILT. D|
00000DD0: 45 20 52 45 47 45 4C 22 00 07 16 6A 04 99 22 11 |E REGEL"...j..".|
00000DE0: 20 27 43 50 58 20 23 24 31 33 27 20 4D 4F 45 54 | 'CPX #$13' MOET|
00000DF0: 20 44 41 4E 20 41 41 4E 47 45 50 41 53 54 20 57 | DAN AANGEPAST W|
00000E00: 4F 52 44 45 4E 2E 22 00 38 16 74 04 99 22 11 11 |ORDEN.".8.t.."..|
00000E10: 41 4C 53 20 4A 45 20 48 45 54 20 50 52 4F 47 52 |ALS JE HET PROGR|
00000E20: 41 4D 4D 41 20 57 49 4C 54 20 42 45 53 54 55 44 |AMMA WILT BESTUD|
00000E30: 45 52 45 4E 20 4F 46 22 00 64 16 7E 04 99 22 11 |EREN OF".d.~..".|
00000E40: 56 45 52 41 4E 44 45 52 45 4E 3A 20 20 48 45 54 |VERANDEREN: HET|
00000E50: 20 53 54 41 41 54 20 49 4E 20 52 41 4D 20 56 41 | STAAT IN RAM VA|
00000E60: 4E 41 46 22 00 72 16 88 04 99 22 11 20 24 38 32 |NAF".r....". $82|
00000E70: 36 22 00 88 16 92 04 49 B2 39 3A 8D 31 36 36 30 |6".....I.9:.1660|
00000E80: 3A 8B 46 4C A7 39 37 30 00 B3 16 9C 04 99 22 93 |:.FL.970......".|
00000E90: 11 56 45 52 56 45 4C 45 4E 44 20 42 49 4A 20 44 |.VERVELEND BIJ D|
00000EA0: 45 5A 45 20 4D 45 54 48 4F 44 45 20 49 53 20 48 |EZE METHODE IS H|
00000EB0: 45 54 22 00 DF 16 A6 04 99 22 11 50 52 49 4E 54 |ET"......".PRINT|
00000EC0: 45 4E 20 56 41 4E 20 45 45 4E 20 52 45 45 4B 53 |EN VAN EEN REEKS|
00000ED0: 20 5A 45 4C 46 44 45 20 54 45 4B 45 4E 53 22 00 | ZELFDE TEKENS".|
00000EE0: 0D 17 B0 04 99 22 11 5A 4F 41 4C 53 20 20 42 49 |.....".ZOALS BI|
00000EF0: 4A 20 4F 4E 44 45 52 4C 49 4A 4E 45 4E 2C 20 4B |J ONDERLIJNEN, K|
00000F00: 41 44 52 45 52 45 4E 20 45 4E 5A 2E 22 00 3B 17 |ADREREN ENZ.".;.|
00000F10: BA 04 99 22 11 44 41 4E 20 4B 55 4E 20 4A 45 20 |...".DAN KUN JE |
00000F20: 42 45 54 45 52 20 47 45 45 4E 20 54 41 42 45 4C |BETER GEEN TABEL|
00000F30: 20 47 45 42 52 55 49 4B 45 4E 22 00 68 17 C4 04 | GEBRUIKEN".h...|
00000F40: 99 22 11 4D 41 41 52 20 44 41 54 20 54 45 4B 45 |.".MAAR DAT TEKE|
00000F50: 4E 20 41 50 41 52 54 20 50 52 49 4E 54 45 4E 20 |N APART PRINTEN |
00000F60: 4D 45 54 20 45 45 4E 22 00 81 17 CE 04 99 22 11 |MET EEN"......".|
00000F70: 41 50 41 52 54 20 50 52 4F 47 52 41 4D 4D 41 2E |APART PROGRAMMA.|
00000F80: 22 00 B0 17 D8 04 99 22 11 11 11 41 4C 53 20 57 |"......"...ALS W|
00000F90: 45 20 42 2E 56 2E 20 44 45 20 54 45 4B 53 54 20 |E B.V. DE TEKST |
00000FA0: 56 41 4E 20 48 45 54 20 4C 41 41 54 53 54 45 22 |VAN HET LAATSTE"|
00000FB0: 00 DE 17 E2 04 99 22 11 56 4F 4F 52 42 45 45 4C |......".VOORBEEL|
00000FC0: 44 20 57 49 4C 4C 45 4E 20 4F 4E 44 45 52 53 54 |D WILLEN ONDERST|
00000FD0: 52 45 50 45 4E 2C 20 4D 4F 45 54 45 4E 22 00 09 |REPEN, MOETEN"..|
00000FE0: 18 EC 04 99 22 11 57 45 20 31 37 20 4B 45 45 52 |....".WE 17 KEER|
00000FF0: 20 48 45 54 20 54 45 4B 45 4E 20 27 A3 27 20 41 | HET TEKEN '.' A|
00001000: 46 50 52 49 4E 54 45 4E 22 00 34 18 F6 04 99 22 |FPRINTEN".4...."|
00001010: 11 44 41 54 20 4C 45 56 45 52 54 20 48 45 54 20 |.DAT LEVERT HET |
00001020: 56 4F 4C 47 45 4E 44 45 20 50 52 4F 47 52 41 4D |VOLGENDE PROGRAM|
00001030: 4D 41 3A 22 00 4C 18 00 05 49 B2 31 30 3A 8D 31 |MA:".L...I.10:.1|
00001040: 36 36 30 3A 8B 46 4C A7 31 30 38 30 00 70 18 0A |660:.FL.1080.p..|
00001050: 05 99 22 93 20 20 20 4C 44 58 20 23 24 31 31 20 |..". LDX #$11 |
00001060: 20 20 20 20 54 45 4C 4C 45 52 20 3D 20 31 37 22 | TELLER = 17"|
00001070: 00 92 18 14 05 99 22 11 20 20 20 4C 44 41 20 23 |......". LDA #|
00001080: 24 43 35 20 20 20 20 20 27 A3 27 20 49 4E 20 41 |$C5 '.' IN A|
00001090: 43 22 00 B0 18 1E 05 99 22 11 B0 C0 20 4A 53 52 |C"......"... JSR|
000010A0: 20 24 46 46 44 32 20 20 20 20 50 52 49 4E 54 22 | $FFD2 PRINT"|
000010B0: 00 D0 18 28 05 99 22 DD 9D 11 DD 20 20 44 45 58 |...(..".... DEX|
000010C0: 20 20 20 20 20 20 20 20 20 20 58 3D 58 2D 31 22 | X=X-1"|
000010D0: 00 EF 18 32 05 99 22 DD 9D 11 AD 5F 20 42 4E 45 |...2.."...._ BNE|
000010E0: 20 24 46 41 20 20 20 20 20 20 58 3D 30 3F 22 00 | $FA X=0?".|
000010F0: FE 18 3C 05 99 22 11 20 20 20 52 54 53 22 00 2F |..<..". RTS"./|
00001100: 19 46 05 99 22 11 11 11 44 49 54 20 50 52 4F 47 |.F.."...DIT PROG|
00001110: 52 41 4D 4D 41 20 53 54 41 41 54 20 49 4E 20 52 |RAMMA STAAT IN R|
00001120: 41 4D 20 56 41 4E 41 46 20 24 38 35 39 2E 22 00 |AM VANAF $859.".|
00001130: 5E 19 50 05 99 22 11 57 45 20 52 4F 45 50 45 4E |^.P..".WE ROEPEN|
00001140: 20 4E 55 20 45 45 52 53 54 20 20 44 45 20 56 4F | NU EERST DE VO|
00001150: 4F 52 42 45 45 4C 44 2D 54 45 4B 53 54 22 00 8B |ORBEELD-TEKST"..|
00001160: 19 5A 05 99 22 11 4D 45 54 20 53 59 53 20 28 38 |.Z..".MET SYS (8|
00001170: 32 36 29 20 45 4E 20 44 41 4E 20 44 45 20 42 4F |26) EN DAN DE BO|
00001180: 56 45 4E 53 54 41 41 4E 44 45 22 00 B9 19 64 05 |VENSTAANDE"...d.|
00001190: 99 22 11 4F 4E 44 45 52 53 54 52 45 45 50 52 4F |.".ONDERSTREEPRO|
000011A0: 55 54 49 4E 45 20 4D 45 54 20 53 59 53 20 28 38 |UTINE MET SYS (8|
000011B0: 35 39 29 20 41 41 4E 3A 22 00 D1 19 6E 05 49 B2 |59) AAN:"...n.I.|
000011C0: 31 31 3A 8D 31 36 36 30 3A 8B 46 4C A7 31 31 38 |11:.1660:.FL.118|
000011D0: 30 00 EA 19 78 05 9E 38 32 36 3A 9E 38 35 39 3A |0...x..826:.859:|
000011E0: 81 57 B2 30 A4 39 39 39 3A 82 00 F4 19 82 05 99 |.W.0.999:.......|
000011F0: 22 11 5E 22 00 20 1A 8C 05 99 22 11 4C 45 54 20 |".^". ....".LET |
00001200: 45 52 20 4F 50 2C 20 20 44 41 54 20 44 45 20 43 |ER OP, DAT DE C|
00001210: 55 52 53 4F 52 20 4E 55 20 41 43 48 54 45 52 22 |URSOR NU ACHTER"|
00001220: 00 4E 1A 96 05 99 22 11 48 45 54 20 4C 41 41 54 |.N....".HET LAAT|
00001230: 53 54 45 20 27 A3 27 20 54 45 4B 45 4E 20 53 54 |STE '.' TEKEN ST|
00001240: 41 41 54 2C 20 44 55 53 20 44 41 41 52 22 00 71 |AAT, DUS DAAR".q|
00001250: 1A A0 05 99 22 11 57 41 41 52 20 48 45 54 20 50 |....".WAAR HET P|
00001260: 49 4A 4C 54 4A 45 20 57 49 4A 53 54 2E 20 44 45 |IJLTJE WIJST. DE|
00001270: 22 00 A0 1A AA 05 99 22 11 56 4F 4C 47 45 4E 44 |"......".VOLGEND|
00001280: 45 20 50 52 49 4E 54 49 4E 53 54 52 55 43 54 49 |E PRINTINSTRUCTI|
00001290: 45 20 4B 4F 4D 54 20 44 55 53 20 44 41 41 52 22 |E KOMT DUS DAAR"|
000012A0: 00 B2 1A B4 05 99 22 11 54 45 52 45 43 48 54 20 |......".TERECHT |
000012B0: 21 22 00 E3 1A BE 05 99 22 11 11 4E 4F 47 20 45 |!"......"..NOG E|
000012C0: 45 4E 53 20 44 45 20 56 4F 4F 52 44 45 4C 45 4E |ENS DE VOORDELEN|
000012D0: 20 56 41 4E 20 44 45 5A 45 20 4D 45 54 48 4F 44 | VAN DEZE METHOD|
000012E0: 45 3A 22 00 22 1B C8 05 99 22 11 41 53 43 49 49 |E:"."....".ASCII|
000012F0: 2D 43 4F 44 45 2C 20 47 45 4D 41 4B 4B 45 4C 49 |-CODE, GEMAKKELI|
00001300: 4A 4B 20 50 52 4F 47 52 41 4D 4D 45 52 45 4E 2C |JK PROGRAMMEREN,|
00001310: 22 3A 99 55 24 55 24 55 24 22 A3 A3 A3 A3 A3 A3 |":.U$U$U$"......|
00001320: A3 22 00 53 1B D2 05 99 22 45 45 4E 56 4F 55 44 |.".S...."EENVOUD|
00001330: 49 47 45 20 43 55 52 53 4F 52 42 45 53 54 55 52 |IGE CURSORBESTUR|
00001340: 49 4E 47 2E 22 3A 99 55 24 55 24 22 A3 A3 A3 A3 |ING.":.U$U$"....|
00001350: A3 A3 22 00 6B 1B DC 05 49 B2 31 32 3A 8D 31 36 |..".k...I.12:.16|
00001360: 36 30 3A 8B 46 4C A7 31 32 39 30 00 80 1B E6 05 |60:.FL.1290.....|
00001370: 99 22 93 4F 50 47 41 56 45 4E 3A 22 3A 99 55 24 |.".OPGAVEN:":.U$|
00001380: 00 B0 1B F0 05 99 22 11 31 2E 20 53 43 48 52 49 |......".1. SCHRI|
00001390: 4A 46 20 44 45 20 56 4F 4C 47 45 4E 44 45 20 42 |JF DE VOLGENDE B|
000013A0: 41 53 49 43 2D 49 4E 53 54 52 55 43 54 49 45 22 |ASIC-INSTRUCTIE"|
000013B0: 00 C7 1B FA 05 99 22 11 49 4E 20 4D 41 43 48 49 |......".IN MACHI|
000013C0: 4E 45 54 41 41 4C 22 00 FD 1B 04 06 41 24 B2 C7 |NETAAL".....A$..|
000013D0: 28 33 34 29 3A 99 22 11 27 50 52 49 4E 54 22 41 |(34):.".'PRINT"A|
000013E0: 24 22 93 22 41 24 3B A3 31 30 29 3B 41 24 22 4F |$"."A$;.10);A$"O|
000013F0: 50 47 41 56 45 20 31 22 41 24 22 27 22 00 13 1C |PGAVE 1"A$"'"...|
00001400: 0E 06 99 22 11 11 32 2E 20 49 44 45 4D 20 56 4F |..."..2. IDEM VO|
00001410: 4F 52 3A 00 45 1C 18 06 99 22 11 27 50 52 49 4E |OR:.E....".'PRIN|
00001420: 54 22 41 24 22 93 22 41 24 22 3B 53 50 43 28 31 |T"A$"."A$";SPC(1|
00001430: 30 29 3B 22 41 24 22 4F 50 47 41 56 45 20 31 22 |0);"A$"OPGAVE 1"|
00001440: 41 24 22 27 22 00 74 1C 22 06 99 22 11 11 33 2E |A$"'".t.".."..3.|
00001450: 20 53 43 48 52 49 4A 46 20 45 45 4E 20 50 47 4D | SCHRIJF EEN PGM|
00001460: 2C 20 44 41 54 20 41 41 4E 20 48 45 54 20 42 45 |, DAT AAN HET BE|
00001470: 47 49 4E 22 00 9F 1C 2C 06 99 22 11 56 41 4E 20 |GIN"...,..".VAN |
00001480: 44 45 20 45 45 52 53 54 45 20 52 45 47 45 4C 20 |DE EERSTE REGEL |
00001490: 27 41 29 27 20 50 52 49 4E 54 2C 20 4F 50 22 00 |'A)' PRINT, OP".|
000014A0: D0 1C 36 06 99 22 11 44 45 20 54 57 45 45 44 45 |..6..".DE TWEEDE|
000014B0: 20 52 45 47 45 4C 20 27 42 29 27 2C 20 45 4E 5A | REGEL 'B)', ENZ|
000014C0: 2E 20 54 4F 54 20 52 45 47 45 4C 20 32 30 2E 22 |. TOT REGEL 20."|
000014D0: 00 E8 1C 40 06 49 B2 31 33 3A 8D 31 36 36 30 3A |...@.I.13:.1660:|
000014E0: 8B 46 4C A7 31 34 30 30 00 FC 1C 4A 06 9E 38 37 |.FL.1400...J..87|
000014F0: 30 3A 81 57 B2 30 A4 35 30 30 3A 82 00 27 1D 54 |0:.W.0.500:..'.T|
00001500: 06 99 22 13 11 11 11 11 11 11 11 1D 1D 1D 45 45 |.."...........EE|
00001510: 4E 20 54 4F 45 56 41 4C 4C 49 47 45 20 4F 50 4C |N TOEVALLIGE OPL|
00001520: 4F 53 53 49 4E 47 22 00 58 1D 5E 06 99 22 11 1D |OSSING".X.^.."..|
00001530: 1D 1D 56 41 4E 20 4F 50 47 41 56 45 20 33 20 53 |..VAN OPGAVE 3 S|
00001540: 54 41 41 54 20 56 41 4E 41 46 20 24 38 37 30 20 |TAAT VANAF $870 |
00001550: 49 4E 20 52 41 4D 2E 22 00 9D 1D 68 06 99 22 11 |IN RAM."...h..".|
00001560: 11 11 11 11 11 11 11 11 11 11 11 1D 1D 2D 20 42 |.............- B|
00001570: 4C 41 44 20 31 34 20 2D 20 3C 2B 3E 20 91 A4 A4 |LAD 14 - <+> ...|
00001580: A4 A4 A4 11 9D 9D 9D 9D 9D 12 45 49 4E 44 45 92 |..........EINDE.|
00001590: 20 3C 2D 3E 20 4F 50 4E 49 45 55 57 22 00 B6 1D | <-> OPNIEUW"...|
000015A0: 72 06 8D 31 36 38 30 3A 91 46 4C 89 31 30 30 3A |r..1680:.FL.100:|
000015B0: 99 22 93 22 3A 80 00 C9 1D 7C 06 8F 20 56 4F 4C |.".":....|.. VOL|
000015C0: 47 45 4E 44 45 20 42 4C 5A 00 0E 1E 86 06 99 22 |GENDE BLZ......"|
000015D0: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000015E0: 11 11 11 11 11 11 11 11 11 20 20 2D 20 42 4C 41 |......... - BLA|
000015F0: 44 22 3B 49 3B 22 2D 20 3C 2B 3E 20 56 45 52 44 |D";I;"- <+> VERD|
00001600: 45 52 20 3C 2D 3E 20 54 45 52 55 47 22 3B 00 20 |ER <-> TERUG";. |
00001610: 1E 90 06 81 49 B2 30 A4 31 31 3A A1 58 24 3A 82 |....I.0.11:.X$:.|
00001620: 00 34 1E 9A 06 A1 58 24 3A 8B 58 24 B2 22 22 A7 |.4....X$:.X$."".|
00001630: 31 36 39 30 00 47 1E A4 06 8B 58 24 B2 22 2B 22 |1690.G....X$."+"|
00001640: A7 46 4C B2 30 3A 8E 00 5A 1E AE 06 8B 58 24 B2 |.FL.0:..Z....X$.|
00001650: 22 2D 22 A7 46 4C B2 31 3A 8E 00 64 1E B8 06 89 |"-".FL.1:..d....|
00001660: 31 36 39 30 00 00 00 |1690... |
....D..59498,12:..4.N.U$."..........":O$
.".........".>.X.. VB1.S.... 162,0,189,7
2,3.L.... 32,210,255,232,224...... 19,20
8,245,96,147... .. 68,73,84,32,73......
83,32,84,69,32.C.... 71,69,75,32,33.R...
. 32,32,13...H.. VB 2...R.. 162,17,169,1
97,32...... 210,255,202,208,250...... 96
.#.... VB 3.<.... 169,147,32,210,255.T..
.. 162,65,138,32,210.L.... 255,169,41,32
,210...... 255,169,13,32,210...".. 255,2
32,224,85,208...,.. 237,96...6.."..";O$;
O$;O$:.". CURSUS MACHINETAAL DEEL 10 .".
..@.."......";O$;O$:.".2.1. BEELDSCHERM-
UITVOER".<.J..".2. UITVOER MET DE PRINT-
ROUTINE VAN".[.T..". HET BEDRIJFSSYSTE
EM"...^.."..IETS EENVOUDIGER ALS DE DIRE
KTE UITVOER"...H..".OP HET BEELDSCHERM I
S DE UITVOER MET"...R..".DE PRINTROUTINE
VAN HET BEDRIJFSSYSTEEM."...|.."..DIT V
OORDEEL GAAT ECHTER GEPAARD MET".G....".
EEN LAGERE VERWERKINGSSNELHEID (ALLEEN".
H....".BIJ DE 8000 SERIE NIET)."......:.
I.0.70:.X:.826.I,X:......I.1:.1660:.FL.3
10.S....".DIE PRINTROUTINE WORDT MET 'JS
R $FFD2'":..28);U$......"AANGEROEPEN (D
ECIMAAL: 65490). HET IN".,.B..".DE AC AA
NWEZIGE SYMBOOL WORDT AFGE-".Y.L..".DRUK
T OP DE CURSORPLAATS EN HET CUR-"...V.."
.SORADRES WORDT 1 VERHOOGD. HET VOLGEN-"
......".DE SYMBOOL WORDT DUS AUTOMATISCH
ACHTER".T....".HET VORIGE GEPRINT."....
.."..DE CURSORCOMMANDO'S KUNNEN NORMAAL.
.....".GEBRUIKT WORDEN.".Q...."..DE SYMB
OLEN IN AC MOETEN IN ASCII-CODE":..28);U
$._...."STAAN.".U...I.2:.1660:.FL.310...
&..".VOORBEELD:":.U$...0.."....1.. HEEL
EENVOUDIG IS HET WISSEN".U.:..".VAN HET
BEELDSCHERM:"...D..". LDA #$93 'C
LR' IN AC"...N..". JSR $FFD2 PRINT
"./.X..".DAT IS ALLES!".`.B.."......2..
CURSOR IN DE LINKER BOVENHOEK"...L..".
ZETTEN ZONDER TE WISSEN:"...V..". LDA
#$13 'HOME' IN AC".E....". JSR $F
FD2 PRINT.....I.3:.1660:.FL.430.....
."........3.. MET 'RETURN' KOMT DE CURSO
R OP".6....".HET BEGIN VAN DE VOLGENDE R
EGEL:".^....". LDA #$0D 'RETURN'
IN AC".}....". JSR $FFD2 PRINT"...
...".I.P.V. 'RETURN' GEBRUIKT MEN OK 'CR
'".S.F..".DAT BETEKENT 'CAR RETURN', D
US"...P..".'TERUG-WAGEN' VAN DE TYPEMACH
INE"...Z.I.4:.1660:.FL.550.A...."......A
LS ER TEKST MOET WORDEN GEPRINT,".N...."
.GEBRUIKT MEN, NET ALS BIJ DE DIREKTE"..
....".UITVOER EEN LIJST, MAAR NU IN ASCI
I.".G...."..DE CURSORBESTURING KOMT NATU
URLIJK"......".OOK IN DIE LIJST."......"
...ZO'N LIJST ZIET ER B.V. ZO UIT:".!. .
I.5:.1660:.FL.660.H.*..". ADRES IN
HOUD SYMBOOL."...4..I.0.18:." N+"
J(D(I)." ",2,2)" $ ' '."...>...
15)J("934449542049532054452047454B202120
200D",2.I.1,2);...H...23)J(" DIT IS TE G
EK ! ",I.1,1):....R...20)".'RETURN'...".
21)"'CLR'". .\.I.6:.1660:.FL.740.N.F..".
VOOR DEZE TEKSTTABEL SCHRIJVEN WE EEN".V
.P..".PROGRAMMA, DAT ACHTER ELKAAR DE"..
.Z..".SYMBOLEN IN DE AC LAADT EN DOORGEE
FT"......".AAN DE PRINTROUTINE."......".
.PAS OP: DE PLAATS WAAR DE TEKST WORDT":
..11)"......".5...."GEPRINT, IS IN DE TA
BEL DOOR DE MEE":..9)U$"....".B...."GECO
DEERDE CURSORBESTURING AL PRECIES".V....
".VASTGELEGD!"......"..HIER NU HET PROGR
AMMA:".....I.7:.1660:.FL.810.O.J.."... L
DX #$00 TELLER OP 0"...T..".... LDA
N,X SYMBOOL IN AC"......".... JSR $
FFD2 PRINT".4....".... INX X=
X+1".S....".... CPX #$13 X=19?".....
."...._ BNE $F5 NEE: VOLGEND SYMBOOL
"......". RTS"......"..CONTROLEER DAT
HET EIND MOET LIGGEN"......".BIJ X=$13 (
DECIMAAL 19)!"...$.."..NU EEN DEMONSTRAT
IE:".....I.8:.1660:.FL.870.&.8..826:.W.0
.500:..S.B.."...MOOI - DAT KLOPT. D
E TEKST IN"...L..".DIT VOORBEELD IS NATU
URLIJK MAAR KORT"...V..".MAAR IN PRINCIP
E KAN HET NATUURLIJK".X.`..".NET ZO LANG
ALS JE WILT. DE REGEL"...J..". 'CPX #$
13' MOET DAN AANGEPAST WORDEN.".8.T.."..
ALS JE HET PROGRAMMA WILT BESTUDEREN OF"
.D.~..".VERANDEREN: HET STAAT IN RAM VA
NAF".R....". $826".....I.9:.1660:.FL.970
......"..VERVELEND BIJ DEZE METHODE IS H
ET"......".PRINTEN VAN EEN REEKS ZELFDE
TEKENS"......".ZOALS BIJ ONDERLIJNEN, K
ADREREN ENZ.".;....".DAN KUN JE BETER GE
EN TABEL GEBRUIKEN".H.D..".MAAR DAT TEKE
N APART PRINTEN MET EEN"...N..".APART PR
OGRAMMA."...X.."...ALS WE B.V. DE TEKST
VAN HET LAATSTE"......".VOORBEELD WILLEN
ONDERSTREPEN, MOETEN"......".WE 17 KEER
HET TEKEN '.' AFPRINTEN".4....".DAT LEV
ERT HET VOLGENDE PROGRAMMA:".L...I.10:.1
660:.FL.1080.P....". LDX #$11 TELL
ER = 17"......". LDA #$C5 '.' IN A
C"......"... JSR $FFD2 PRINT".P.(..".
... DEX X=X-1"...2.."...._ BNE
$FA X=0?"...<..". RTS"./.F.."...
DIT PROGRAMMA STAAT IN RAM VANAF $859.".
^.P..".WE ROEPEN NU EERST DE VOORBEELD-
TEKST"...Z..".MET SYS (826) EN DAN DE BO
VENSTAANDE"...D..".ONDERSTREEPROUTINE ME
T SYS (859) AAN:".Q.N.I.11:.1660:.FL.118
0...X..826:.859:.W.0.999:.......".^". ..
..".LET ER OP, DAT DE CURSOR NU ACHTER"
.N....".HET LAATSTE '.' TEKEN STAAT, DUS
DAAR".Q. ..".WAAR HET PIJLTJE WIJST. DE
". ....".VOLGENDE PRINTINSTRUCTIE KOMT D
US DAAR"......".TERECHT !"......"..NOG E
ENS DE VOORDELEN VAN DEZE METHODE:".".H.
.".ASCII-CODE, GEMAKKELIJK PROGRAMMEREN,
":.U$U$U$".......".S.R.."EENVOUDIGE CURS
ORBESTURING.":.U$U$"......".K...I.12:.16
60:.FL.1290......".OPGAVEN:":.U$......".
1. SCHRIJF DE VOLGENDE BASIC-INSTRUCTIE"
.G....".IN MACHINETAAL".....A$.G(34):.".
'PRINT"A$"."A$;.10);A$"OPGAVE 1"A$"'"...
..."..2. IDEM VOOR:.E....".'PRINT"A$"."A
$";SPC(10);"A$"OPGAVE 1"A$"'".T.".."..3.
SCHRIJF EEN PGM, DAT AAN HET BEGIN"...,
..".VAN DE EERSTE REGEL 'A)' PRINT, OP".
P.6..".DE TWEEDE REGEL 'B)', ENZ. TOT RE
GEL 20."...@.I.13:.1660:.FL.1400...J..87
0:.W.0.500:..'.T.."...........EEN TOEVAL
LIGE OPLOSSING".X.^.."....VAN OPGAVE 3 S
TAAT VANAF $870 IN RAM."...H..".........
.....- BLAD 14 - <+> .............EINDE.
<-> OPNIEUW"...R..1680:.FL.100:.".":..I
.|.. VOLGENDE BLZ......"................
......... - BLAD";I;"- <+> VERDER <-> T
ERUG";. ....I.0.11:.X$:..4....X$:.X$."".
1690.G....X$."+".FL.0:..Z....X$."-".FL.1
:..D....1690...
> CLICK IMAGE PREVIEW FOR FULL MODAL