MC12
FILE INFORMATION
FILENAME(S): MC12
FILE TYPE(S): PRG
FILE SIZE: 6K
FIRST SEEN: 2025-12-01 02:26:02
APPEARS ON: 1 disk(s)
FILE HASH
4ef78fc0cf1bb64ee76212dcf1e0cb1710906fe2b733f231547e8b46d7c27cfe
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| EDUKATIV | MC12 | PRG | hedning, shine | 25 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 11 08 64 00 97 35 39 34 36 38 2C 31 32 3A |....d..59468,12:| 00000010: 9C 00 59 08 6E 00 55 24 B2 22 A3 A3 A3 A3 A3 A3 |..Y.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 3A 49 24 B2 22 49 4E 50 55 54 2D 52 |...":I$."INPUT-R| 00000040: 4F 55 54 49 4E 45 22 3A 42 24 B2 22 20 42 45 45 |OUTINE":B$." BEE| 00000050: 4C 44 53 43 48 45 52 4D 22 00 93 08 78 00 83 31 |LDSCHERM"...x..1| 00000060: 36 39 2C 32 35 35 2C 31 33 33 2C 31 2C 31 36 39 |69,255,133,1,169| 00000070: 2C 33 2C 31 33 33 2C 32 2C 31 36 30 2C 30 2C 32 |,3,133,2,160,0,2| 00000080: 33 30 2C 31 2C 32 30 38 2C 34 2C 32 33 30 2C 32 |30,1,208,4,230,2| 00000090: 2C 34 38 00 D0 08 82 00 83 31 34 2C 31 37 37 2C |,48......14,177,| 000000A0: 31 2C 32 30 38 2C 32 34 34 2C 32 30 30 2C 31 37 |1,208,244,200,17| 000000B0: 37 2C 31 2C 32 30 38 2C 32 33 37 2C 32 30 30 2C |7,1,208,237,200,| 000000C0: 31 37 37 2C 31 2C 32 30 38 2C 32 33 32 2C 39 36 |177,1,208,232,96| 000000D0: 00 01 09 8C 00 99 22 93 A4 A4 A4 A4 A4 A4 22 3B |......".......";| 000000E0: 4F 24 3B 4F 24 3A 99 22 12 43 55 52 53 55 53 20 |O$;O$:.".CURSUS | 000000F0: 4D 41 43 48 49 4E 45 2D 54 41 41 4C 20 28 31 32 |MACHINE-TAAL (12| 00000100: 29 00 28 09 96 00 99 22 A4 A4 A4 A4 A4 A4 A4 22 |).(...."......."| 00000110: 3B 4F 24 3A 99 22 12 33 2E 20 5A 4F 45 4B 52 4F |;O$:.".3. ZOEKRO| 00000120: 55 54 49 4E 45 53 20 22 00 54 09 A0 00 99 22 11 |UTINES ".T....".| 00000130: 11 45 45 4E 20 56 45 45 4C 20 56 4F 4F 52 4B 4F |.EEN VEEL VOORKO| 00000140: 4D 45 4E 44 20 50 52 4F 42 4C 45 45 4D 20 56 4F |MEND PROBLEEM VO| 00000150: 52 4D 45 4E 00 81 09 AA 00 99 22 11 44 45 20 5A |RMEN......".DE Z| 00000160: 4F 45 4B 2D 52 4F 55 54 49 4E 45 53 2E 20 49 4E |OEK-ROUTINES. IN| 00000170: 20 44 45 5A 45 20 4C 45 53 20 47 41 41 4E 20 57 | DEZE LES GAAN W| 00000180: 45 00 AD 09 B4 00 99 22 11 44 45 20 4F 50 42 4F |E......".DE OPBO| 00000190: 55 57 20 56 41 4E 20 45 45 4E 20 44 45 52 47 45 |UW VAN EEN DERGE| 000001A0: 4C 49 4A 4B 45 20 52 4F 55 54 49 4E 45 00 C1 09 |LIJKE ROUTINE...| 000001B0: BE 00 99 22 11 4F 4E 44 45 52 5A 4F 45 4B 45 4E |...".ONDERZOEKEN| 000001C0: 2E 00 ED 09 C8 00 99 22 11 11 48 45 54 20 47 52 |......."..HET GR| 000001D0: 4F 54 45 20 56 4F 4F 52 44 45 45 4C 20 56 41 4E |OTE VOORDEEL VAN| 000001E0: 20 4D 41 43 48 49 4E 45 54 41 41 4C 2D 00 18 0A | MACHINETAAL-...| 000001F0: D2 00 99 22 11 5A 4F 45 4B 2D 52 4F 55 54 49 4E |...".ZOEK-ROUTIN| 00000200: 45 53 20 49 53 20 44 45 20 47 52 4F 54 45 20 53 |ES IS DE GROTE S| 00000210: 4E 45 4C 48 45 49 44 2E 00 42 0A DC 00 99 22 11 |NELHEID..B....".| 00000220: 28 43 41 2E 20 31 30 30 30 20 4D 41 41 4C 20 53 |(CA. 1000 MAAL S| 00000230: 4E 45 4C 4C 45 52 20 44 41 4E 20 42 41 53 49 43 |NELLER DAN BASIC| 00000240: 2E 29 00 5E 0A E6 00 8C 3A 81 49 B2 30 A4 33 32 |.).^....:.I.0.32| 00000250: 3A 87 58 3A 97 38 32 36 AA 49 2C 58 3A 82 00 74 |:.X:.826.I,X:..t| 00000260: 0A F0 00 49 B2 31 3A 8D 31 37 34 30 3A 8B 46 4C |...I.1:.1740:.FL| 00000270: A7 31 34 30 00 9F 0A FA 00 99 22 93 57 45 20 47 |.140......".WE G| 00000280: 41 41 4E 20 44 45 20 4F 50 42 4F 55 57 20 56 41 |AAN DE OPBOUW VA| 00000290: 4E 20 5A 4F 45 4B 2D 52 4F 55 54 49 4E 45 53 00 |N ZOEK-ROUTINES.| 000002A0: CC 0A 04 01 99 22 11 4F 4E 44 45 52 5A 4F 45 4B |.....".ONDERZOEK| 000002B0: 45 4E 20 41 41 4E 20 44 45 20 48 41 4E 44 20 56 |EN AAN DE HAND V| 000002C0: 41 4E 20 45 45 4E 20 56 4F 4F 52 2D 00 DA 0A 0E |AN EEN VOOR-....| 000002D0: 01 99 22 11 42 45 45 4C 44 2E 00 08 0B 18 01 99 |..".BEELD.......| 000002E0: 22 11 11 53 54 45 4C 20 57 45 20 57 49 4C 4C 45 |"..STEL WE WILLE| 000002F0: 4E 20 48 45 54 20 47 45 48 45 55 47 45 4E 47 45 |N HET GEHEUGENGE| 00000300: 42 49 45 44 20 56 41 4E 00 30 0B 22 01 99 22 11 |BIED VAN.0."..".| 00000310: 24 30 34 30 30 20 54 4F 54 20 24 38 30 30 30 20 |$0400 TOT $8000 | 00000320: 4E 41 5A 4F 45 4B 45 4E 20 4F 50 20 44 52 49 45 |NAZOEKEN OP DRIE| 00000330: 00 57 0B 2C 01 99 22 11 4F 50 56 4F 4C 47 45 4E |.W.,..".OPVOLGEN| 00000340: 44 45 20 42 59 54 45 53 20 27 24 30 30 2D 24 30 |DE BYTES '$00-$0| 00000350: 30 2D 24 30 30 27 2E 00 85 0B 36 01 99 22 11 57 |0-$00'....6..".W| 00000360: 45 20 5A 4F 45 4B 45 4E 20 44 55 53 20 48 45 54 |E ZOEKEN DUS HET| 00000370: 20 41 44 52 45 53 20 56 41 4E 20 48 45 54 20 45 | ADRES VAN HET E| 00000380: 45 52 53 54 45 00 B1 0B 40 01 99 22 11 56 41 4E |ERSTE...@..".VAN| 00000390: 20 44 52 49 45 20 4F 50 56 4F 4C 47 45 4E 44 45 | DRIE OPVOLGENDE| 000003A0: 20 47 45 48 45 55 47 45 4E 50 4C 41 41 54 53 45 | GEHEUGENPLAATSE| 000003B0: 4E 00 CF 0B 4A 01 99 22 11 4D 45 54 20 53 54 45 |N...J..".MET STE| 000003C0: 45 44 53 20 49 4E 48 4F 55 44 20 24 30 30 2E 00 |EDS INHOUD $00..| 000003D0: FD 0B 54 01 99 22 11 11 44 49 54 20 49 53 20 4E |..T.."..DIT IS N| 000003E0: 41 4D 45 4C 49 4A 4B 20 48 45 54 20 45 49 4E 44 |AMELIJK HET EIND| 000003F0: 41 44 52 45 53 20 56 41 4E 20 48 45 54 00 22 0C |ADRES VAN HET.".| 00000400: 5E 01 99 22 11 49 4E 20 52 41 4D 20 53 54 41 41 |^..".IN RAM STAA| 00000410: 4E 44 20 42 41 53 49 43 50 52 4F 47 52 41 4D 4D |ND BASICPROGRAMM| 00000420: 41 2E 00 38 0C 68 01 49 B2 32 3A 8D 31 37 34 30 |A..8.h.I.2:.1740| 00000430: 3A 8B 46 4C A7 31 34 30 00 62 0C 72 01 99 22 93 |:.FL.140.b.r..".| 00000440: 57 45 20 48 45 42 42 45 4E 20 45 45 4E 20 54 45 |WE HEBBEN EEN TE| 00000450: 4C 4C 45 52 20 4E 4F 44 49 47 20 44 49 45 20 56 |LLER NODIG DIE V| 00000460: 41 4E 00 8F 0C 7C 01 99 22 11 24 30 34 30 30 20 |AN...|..".$0400 | 00000470: 54 4F 54 20 24 38 30 30 30 20 4B 41 4E 20 54 45 |TOT $8000 KAN TE| 00000480: 4C 4C 45 4E 2E 20 44 45 20 49 4E 48 4F 55 44 00 |LLEN. DE INHOUD.| 00000490: BD 0C 86 01 99 22 11 56 41 4E 20 44 45 20 43 45 |.....".VAN DE CE| 000004A0: 4C 20 57 41 41 52 56 41 4E 20 44 45 20 54 45 4C |L WAARVAN DE TEL| 000004B0: 4C 45 52 20 48 45 54 20 41 44 52 45 53 00 E9 0C |LER HET ADRES...| 000004C0: 90 01 99 22 11 41 41 4E 47 45 45 46 54 20 57 4F |...".AANGEEFT WO| 000004D0: 52 44 54 20 47 45 54 45 53 54 20 4F 50 20 49 4E |RDT GETEST OP IN| 000004E0: 48 4F 55 44 20 24 30 30 2E 00 14 0D 9A 01 99 22 |HOUD $00......."| 000004F0: 11 41 4C 53 20 44 45 20 49 4E 48 4F 55 44 20 47 |.ALS DE INHOUD G| 00000500: 45 45 4E 20 24 30 30 20 49 53 2C 20 57 4F 52 44 |EEN $00 IS, WORD| 00000510: 54 20 44 45 00 39 0D A4 01 99 22 11 54 45 4C 4C |T DE.9....".TELL| 00000520: 45 52 49 4E 48 4F 55 44 20 31 20 48 4F 47 45 52 |ERINHOUD 1 HOGER| 00000530: 20 47 45 4D 41 41 4B 54 2E 00 67 0D AE 01 99 22 | GEMAAKT..g...."| 00000540: 11 41 4C 53 20 44 45 20 49 4E 48 4F 55 44 20 57 |.ALS DE INHOUD W| 00000550: 45 4C 20 24 30 30 20 49 53 2C 20 57 4F 52 44 45 |EL $00 IS, WORDE| 00000560: 4E 20 42 45 49 44 45 00 91 0D B8 01 99 22 11 56 |N BEIDE......".V| 00000570: 4F 4C 47 45 4E 44 45 20 43 45 4C 4C 45 4E 20 4F |OLGENDE CELLEN O| 00000580: 4F 4B 20 4F 50 20 24 30 30 20 47 45 54 45 53 54 |OK OP $00 GETEST| 00000590: 2E 00 BF 0D C2 01 99 22 11 5A 49 4A 4E 20 4E 49 |.......".ZIJN NI| 000005A0: 45 54 20 42 45 49 44 45 20 43 45 4C 4C 45 4E 20 |ET BEIDE CELLEN | 000005B0: 24 30 30 2C 20 44 41 4E 20 5A 4F 45 4B 45 4E 00 |$00, DAN ZOEKEN.| 000005C0: EC 0D CC 01 99 22 11 57 45 20 56 45 52 44 45 52 |.....".WE VERDER| 000005D0: 2C 20 41 4E 44 45 52 53 20 57 4F 52 44 54 20 48 |, ANDERS WORDT H| 000005E0: 45 54 20 5A 4F 45 4B 45 4E 47 45 2D 00 17 0E D6 |ET ZOEKENGE-....| 000005F0: 01 99 22 11 53 54 4F 50 54 2E 20 4D 41 58 49 4D |..".STOPT. MAXIM| 00000600: 41 41 4C 20 57 4F 52 44 54 20 54 4F 54 20 24 38 |AAL WORDT TOT $8| 00000610: 30 30 30 20 47 45 2D 00 25 0E E0 01 99 22 11 5A |000 GE-.%....".Z| 00000620: 4F 43 48 54 2E 00 3B 0E EA 01 49 B2 33 3A 8D 31 |OCHT..;...I.3:.1| 00000630: 37 34 30 3A 8B 46 4C A7 32 35 30 00 6C 0E F4 01 |740:.FL.250.l...| 00000640: 99 22 93 11 11 11 11 11 11 41 4C 53 20 54 45 4C |.".......ALS TEL| 00000650: 4C 45 52 20 47 45 42 52 55 49 4B 45 4E 20 57 45 |LER GEBRUIKEN WE| 00000660: 20 44 45 20 50 4C 41 41 54 53 45 4E 00 9A 0E FE | DE PLAATSEN....| 00000670: 01 99 22 11 24 30 31 2F 24 30 32 2E 20 57 45 20 |..".$01/$02. WE | 00000680: 48 45 42 42 45 4E 20 54 57 45 45 20 50 4C 41 41 |HEBBEN TWEE PLAA| 00000690: 54 53 45 4E 20 4E 4F 44 49 47 00 C4 0E 08 02 99 |TSEN NODIG......| 000006A0: 22 11 4F 4D 44 41 54 20 44 45 20 5A 4F 45 4B 47 |".OMDAT DE ZOEKG| 000006B0: 45 42 49 45 44 20 4F 56 45 52 20 54 57 45 45 20 |EBIED OVER TWEE | 000006C0: 42 59 54 45 00 F2 0E 12 02 99 22 11 41 44 52 45 |BYTE......".ADRE| 000006D0: 53 53 45 4E 20 4C 4F 4F 50 54 2E 20 57 45 20 4B |SSEN LOOPT. WE K| 000006E0: 49 45 5A 45 4E 20 44 45 20 54 45 4C 4C 45 52 20 |IEZEN DE TELLER | 000006F0: 49 4E 00 1E 0F 1C 02 99 22 11 5A 45 52 4F 2D 50 |IN......".ZERO-P| 00000700: 41 47 45 20 4F 4D 44 41 54 20 44 41 54 20 53 4E |AGE OMDAT DAT SN| 00000710: 45 4C 4C 45 52 20 57 45 52 4B 54 20 45 4E 00 46 |ELLER WERKT EN.F| 00000720: 0F 26 02 99 22 11 4F 4D 44 41 54 20 44 45 5A 45 |.&..".OMDAT DEZE| 00000730: 20 49 4E 44 49 52 45 4B 54 20 47 45 41 44 52 45 | INDIREKT GEADRE| 00000740: 53 53 45 45 52 44 00 5C 0F 30 02 99 22 11 4B 55 |SSEERD.\.0..".KU| 00000750: 4E 4E 45 4E 20 57 4F 52 44 45 4E 2E 00 72 0F 3A |NNEN WORDEN..r.:| 00000760: 02 49 B2 34 3A 8D 31 37 34 30 3A 8B 46 4C A7 33 |.I.4:.1740:.FL.3| 00000770: 37 30 00 9A 0F 44 02 99 22 93 45 45 52 53 54 20 |70...D..".EERST | 00000780: 5A 45 54 54 45 4E 20 57 45 20 48 45 54 20 53 54 |ZETTEN WE HET ST| 00000790: 41 52 54 41 44 52 45 53 2D 31 00 C5 0F 4E 02 99 |ARTADRES-1...N..| 000007A0: 22 11 49 4E 20 44 45 20 54 45 4C 4C 45 52 2D 47 |".IN DE TELLER-G| 000007B0: 45 48 45 55 47 45 4E 50 4C 41 41 54 53 45 4E 2E |EHEUGENPLAATSEN.| 000007C0: 20 44 45 4E 4B 00 EA 0F 58 02 99 22 11 41 41 4E | DENK...X..".AAN| 000007D0: 20 44 45 20 56 4F 4C 47 4F 52 44 45 21 20 28 4C | DE VOLGORDE! (L| 000007E0: 41 41 47 2F 48 4F 4F 47 29 3A 00 01 10 62 02 99 |AAG/HOOG):...b..| 000007F0: 22 11 20 20 20 20 20 20 20 4C 44 41 20 23 24 46 |". LDA #$F| 00000800: 46 00 27 10 6C 02 99 22 11 20 20 20 20 20 20 20 |F.'.l..". | 00000810: 53 54 41 20 24 30 31 20 20 20 20 24 46 46 20 4E |STA $01 $FF N| 00000820: 41 41 52 20 24 30 31 00 3E 10 76 02 99 22 11 20 |AAR $01.>.v..". | 00000830: 20 20 20 20 20 20 4C 44 41 20 23 24 30 33 00 64 | LDA #$03.d| 00000840: 10 80 02 99 22 11 20 20 20 20 20 20 20 53 54 41 |....". STA| 00000850: 20 24 30 32 20 20 20 20 24 30 33 20 4E 41 41 52 | $02 $03 NAAR| 00000860: 20 24 30 32 00 90 10 8A 02 99 22 11 11 4F 4D 44 | $02......"..OMD| 00000870: 41 54 20 57 45 20 49 4E 44 49 52 45 4B 54 20 57 |AT WE INDIREKT W| 00000880: 49 4C 4C 45 4E 20 41 44 52 45 53 53 45 52 45 4E |ILLEN ADRESSEREN| 00000890: 00 B0 10 94 02 99 22 11 5A 45 54 54 45 4E 20 57 |......".ZETTEN W| 000008A0: 45 20 4E 4F 47 20 24 30 30 20 49 4E 20 59 52 3A |E NOG $00 IN YR:| 000008B0: 00 C7 10 9E 02 99 22 11 20 20 20 20 20 20 20 4C |......". L| 000008C0: 44 59 20 23 24 30 30 00 DD 10 A8 02 49 B2 35 3A |DY #$00.....I.5:| 000008D0: 8D 31 37 34 30 3A 8B 46 4C A7 35 30 30 00 08 11 |.1740:.FL.500...| 000008E0: B2 02 99 22 93 57 45 20 42 45 47 49 4E 4E 45 4E |...".WE BEGINNEN| 000008F0: 20 4E 55 20 44 45 20 5A 4F 45 4B 2D 4C 4F 4F 50 | NU DE ZOEK-LOOP| 00000900: 20 4D 45 54 20 48 45 54 00 2D 11 BC 02 99 22 11 | MET HET.-....".| 00000910: 56 45 52 48 4F 47 45 4E 20 56 41 4E 20 44 45 20 |VERHOGEN VAN DE | 00000920: 54 45 4C 4C 45 52 20 4D 45 54 20 31 3A 00 54 11 |TELLER MET 1:.T.| 00000930: C6 02 99 22 11 20 20 20 20 20 49 4E 43 20 24 30 |...". INC $0| 00000940: 31 20 20 20 56 45 52 48 4F 4F 47 20 4C 4F 57 2D |1 VERHOOG LOW-| 00000950: 42 59 54 45 00 70 11 D0 02 99 22 11 20 20 20 B0 |BYTE.p....". .| 00000960: 5F 42 4E 45 20 24 30 34 20 20 20 3D 20 30 20 3F |_BNE $04 = 0 ?| 00000970: 00 9A 11 DA 02 99 22 20 20 20 DD 11 9D DD 20 49 |......" .... I| 00000980: 4E 43 20 24 30 32 20 20 20 56 45 52 48 4F 4F 47 |NC $02 VERHOOG| 00000990: 20 48 49 47 48 2D 42 59 54 45 00 BA 11 E4 02 99 | HIGH-BYTE......| 000009A0: 22 20 20 20 DD 11 9D DD 20 42 4D 49 20 24 2E 2E |" .... BMI $..| 000009B0: 20 20 20 3D 20 24 38 30 20 3F 00 CD 11 EE 02 99 | = $80 ?......| 000009C0: 22 20 20 20 DD 11 9D AD C0 2E 2E 2E 2E 00 FB 11 |" ............| 000009D0: F8 02 99 22 11 44 4F 4F 52 20 42 4E 45 20 57 4F |...".DOOR BNE WO| 000009E0: 52 44 54 20 24 30 32 20 41 4C 4C 45 45 4E 20 56 |RDT $02 ALLEEN V| 000009F0: 45 52 48 4F 4F 47 44 20 41 4C 53 00 20 12 02 03 |ERHOOGD ALS. ...| 00000A00: 99 22 11 48 45 54 20 4C 4F 57 2D 42 59 54 45 20 |.".HET LOW-BYTE | 00000A10: 47 45 44 45 45 4C 54 45 20 4E 55 4C 20 49 53 2E |GEDEELTE NUL IS.| 00000A20: 00 49 12 0C 03 99 22 11 4D 45 54 20 42 4D 49 20 |.I....".MET BMI | 00000A30: 4D 4F 45 54 20 42 49 4A 20 48 45 54 20 42 45 52 |MOET BIJ HET BER| 00000A40: 45 49 4B 45 4E 20 56 41 4E 00 74 12 16 03 99 22 |EIKEN VAN.t...."| 00000A50: 11 24 38 30 30 30 20 57 45 47 47 45 53 50 52 4F |.$8000 WEGGESPRO| 00000A60: 4E 47 45 4E 20 57 4F 52 44 45 4E 20 4E 41 41 52 |NGEN WORDEN NAAR| 00000A70: 20 45 45 4E 00 92 12 20 03 99 22 11 50 4C 41 41 | EEN... ..".PLAA| 00000A80: 54 53 20 57 41 41 52 20 52 54 53 20 53 54 41 41 |TS WAAR RTS STAA| 00000A90: 54 2E 00 A8 12 2A 03 49 B2 36 3A 8D 31 37 34 30 |T....*.I.6:.1740| 00000AA0: 3A 8B 46 4C A7 35 38 30 00 D5 12 34 03 99 22 93 |:.FL.580...4..".| 00000AB0: 11 11 11 11 4E 55 20 56 4F 4C 47 54 20 44 45 20 |....NU VOLGT DE | 00000AC0: 54 45 53 54 20 4F 46 20 44 45 20 49 4E 48 4F 55 |TEST OF DE INHOU| 00000AD0: 44 20 56 41 4E 00 02 13 3E 03 99 22 11 44 45 20 |D VAN...>..".DE | 00000AE0: 43 45 4C 20 57 41 41 52 56 41 4E 20 48 45 54 20 |CEL WAARVAN HET | 00000AF0: 41 44 52 45 53 20 49 4E 20 44 45 20 54 45 4C 4C |ADRES IN DE TELL| 00000B00: 45 52 00 30 13 48 03 99 22 11 53 54 41 41 54 20 |ER.0.H..".STAAT | 00000B10: 4F 4F 4B 20 4E 55 4C 20 49 53 2E 20 5A 4F 20 4E |OOK NUL IS. ZO N| 00000B20: 49 45 54 2C 20 44 41 4E 20 53 50 52 49 4E 47 54 |IET, DAN SPRINGT| 00000B30: 00 5C 13 52 03 99 22 11 48 45 54 20 50 52 4F 47 |.\.R..".HET PROG| 00000B40: 52 41 4D 4D 41 20 4E 41 41 52 20 44 45 20 50 4C |RAMMA NAAR DE PL| 00000B50: 41 41 54 53 20 57 41 41 52 20 44 45 00 7A 13 5C |AATS WAAR DE.z.\| 00000B60: 03 99 22 11 54 45 4C 4C 45 52 20 57 4F 52 44 54 |..".TELLER WORDT| 00000B70: 20 56 45 52 48 4F 4F 47 44 2E 00 A4 13 66 03 99 | VERHOOGD....f..| 00000B80: 22 11 11 11 20 20 20 20 20 20 4C 44 41 20 28 24 |"... LDA ($| 00000B90: 30 31 29 2C 59 20 20 42 45 44 45 4E 4B 3A 20 59 |01),Y BEDENK: Y| 00000BA0: 3D 30 20 21 00 D0 13 70 03 99 22 11 20 20 20 20 |=0 !...p..". | 00000BB0: 20 20 42 4E 45 20 24 2E 2E 20 20 20 20 20 20 53 | BNE $.. S| 00000BC0: 50 52 49 4E 47 20 4E 41 41 52 20 27 49 4E 43 27 |PRING NAAR 'INC'| 00000BD0: 00 E6 13 7A 03 49 B2 37 3A 8D 31 37 34 30 3A 8B |...z.I.7:.1740:.| 00000BE0: 46 4C A7 36 39 30 00 13 14 84 03 99 22 93 57 41 |FL.690......".WA| 00000BF0: 53 20 44 45 20 43 45 4C 49 4E 48 4F 55 44 20 57 |S DE CELINHOUD W| 00000C00: 45 4C 20 24 30 30 2C 20 44 41 4E 20 4D 4F 45 54 |EL $00, DAN MOET| 00000C10: 20 44 45 00 36 14 8E 03 99 22 11 56 4F 4C 47 45 | DE.6....".VOLGE| 00000C20: 4E 44 45 20 43 45 4C 20 57 4F 52 44 45 4E 20 47 |NDE CEL WORDEN G| 00000C30: 45 54 45 53 54 3A 00 58 14 98 03 99 22 11 20 20 |ETEST:.X....". | 00000C40: 20 20 20 20 20 49 4E 59 20 20 20 20 20 20 20 20 | INY | 00000C50: 20 4E 55 3A 20 59 3D 31 00 72 14 A2 03 99 22 11 | NU: Y=1.r....".| 00000C60: 20 20 20 20 20 20 20 4C 44 41 20 28 24 30 31 29 | LDA ($01)| 00000C70: 2C 59 00 9C 14 AC 03 99 22 11 20 20 20 20 20 20 |,Y......". | 00000C80: 20 42 4E 45 20 24 2E 2E 20 20 20 20 20 4E 41 41 | BNE $.. NAA| 00000C90: 52 20 27 4C 44 59 20 23 24 30 30 27 00 C7 14 B6 |R 'LDY #$00'....| 00000CA0: 03 99 22 11 41 4C 53 20 44 45 5A 45 20 43 45 4C |..".ALS DEZE CEL| 00000CB0: 49 4E 48 4F 55 44 20 4F 4F 4B 20 24 30 30 20 49 |INHOUD OOK $00 I| 00000CC0: 53 2C 20 4D 4F 45 54 00 EE 14 C0 03 99 22 11 4E |S, MOET......".N| 00000CD0: 4F 47 20 44 45 20 44 45 52 44 45 20 43 45 4C 20 |OG DE DERDE CEL | 00000CE0: 57 4F 52 44 45 4E 20 47 45 54 45 53 54 3A 00 10 |WORDEN GETEST:..| 00000CF0: 15 CA 03 99 22 11 20 20 20 20 20 20 20 49 4E 59 |....". INY| 00000D00: 20 20 20 20 20 20 20 20 20 4E 55 3A 20 59 3D 32 | NU: Y=2| 00000D10: 00 2A 15 D4 03 99 22 11 20 20 20 20 20 20 20 4C |.*....". L| 00000D20: 44 41 20 28 24 30 31 29 2C 59 00 54 15 DE 03 99 |DA ($01),Y.T....| 00000D30: 22 11 20 20 20 20 20 20 20 42 4E 45 20 24 2E 2E |". BNE $..| 00000D40: 20 20 20 20 20 4E 41 41 52 20 27 4C 44 59 20 23 | NAAR 'LDY #| 00000D50: 24 30 30 27 00 81 15 E8 03 99 22 11 45 4E 20 41 |$00'......".EN A| 00000D60: 4C 53 20 44 45 5A 45 20 43 45 4C 49 4E 48 4F 55 |LS DEZE CELINHOU| 00000D70: 44 20 4F 4F 4B 20 24 30 30 20 49 53 2C 20 44 41 |D OOK $00 IS, DA| 00000D80: 4E 00 AC 15 F2 03 99 22 11 20 20 20 20 20 20 20 |N......". | 00000D90: 52 54 53 20 20 20 20 20 20 20 20 20 54 45 52 55 |RTS TERU| 00000DA0: 47 20 4E 41 41 52 20 42 41 53 49 43 00 C2 15 FC |G NAAR BASIC....| 00000DB0: 03 49 B2 38 3A 8D 31 37 34 30 3A 8B 46 4C A7 38 |.I.8:.1740:.FL.8| 00000DC0: 32 30 00 E4 15 06 04 99 22 93 4E 55 20 4E 4F 47 |20......".NU NOG| 00000DD0: 20 45 45 4E 53 20 41 4C 4C 45 53 20 53 41 4D 45 | EENS ALLES SAME| 00000DE0: 4E 3A 11 22 00 0E 16 10 04 99 22 20 20 20 20 20 |N:."......" | 00000DF0: 20 4C 44 41 20 23 24 46 46 20 20 20 20 20 20 53 | LDA #$FF S| 00000E00: 54 41 52 54 41 44 52 20 3D 20 30 33 46 46 00 22 |TARTADR = 03FF."| 00000E10: 16 1A 04 99 22 20 20 20 20 20 20 53 54 41 20 24 |...." STA $| 00000E20: 30 31 00 37 16 24 04 99 22 20 20 20 20 20 20 4C |01.7.$.." L| 00000E30: 44 41 20 23 24 30 33 00 4B 16 2E 04 99 22 20 20 |DA #$03.K...." | 00000E40: 20 20 20 20 53 54 41 20 24 30 32 00 72 16 38 04 | STA $02.r.8.| 00000E50: 99 22 20 20 B0 C0 C0 C0 4C 44 59 20 23 24 30 30 |." ....LDY #$00| 00000E60: 20 20 20 20 20 20 59 2C 20 53 54 41 52 54 20 3D | Y, START =| 00000E70: 20 30 00 7C 16 42 04 99 22 20 20 DD 00 A4 16 4C | 0.|.B.." ....L| 00000E80: 04 99 22 20 20 DD B0 C0 C0 49 4E 43 20 24 30 31 |.." ....INC $01| 00000E90: 20 20 20 20 20 20 20 41 44 52 20 3D 20 41 44 52 | ADR = ADR| 00000EA0: 20 2B 20 31 00 C4 16 56 04 99 22 20 20 DD DD B0 | + 1...V.." ...| 00000EB0: 5F 42 4E 45 20 24 2E 2E 20 20 20 20 20 20 20 3D |_BNE $.. =| 00000EC0: 20 30 20 3F 00 D8 16 60 04 99 22 20 20 DD DD DD | 0 ?...`.." ...| 00000ED0: 20 49 4E 43 20 24 30 32 00 FA 16 6A 04 99 22 20 | INC $02...j.." | 00000EE0: B0 DD DD DD 5F 42 4D 49 20 24 2E 2E 20 20 20 20 |...._BMI $.. | 00000EF0: 20 20 20 4B 4C 41 41 52 20 3F 00 06 17 74 04 99 | KLAAR ?...t..| 00000F00: 22 20 DD DD DD DD 00 26 17 7E 04 99 22 20 DD DD |" .....&.~.." ..| 00000F10: DD AD C0 4C 44 41 20 28 24 30 31 29 2C 59 20 20 |...LDA ($01),Y | 00000F20: 20 59 20 3D 20 30 00 46 17 88 04 99 22 20 DD DD | Y = 0.F...." ..| 00000F30: AD C0 5F 42 4E 45 20 24 2E 2E 20 20 20 20 20 20 |.._BNE $.. | 00000F40: 20 3D 20 30 20 3F 00 50 17 92 04 99 22 20 DD DD | = 0 ?.P...." ..| 00000F50: 00 70 17 9C 04 99 22 20 DD DD 20 20 20 49 4E 59 |.p...." .. INY| 00000F60: 20 20 20 20 20 20 20 20 20 20 20 59 20 3D 20 31 | Y = 1| 00000F70: 00 88 17 A6 04 99 22 20 DD DD 20 20 20 4C 44 41 |......" .. LDA| 00000F80: 20 28 24 30 31 29 2C 59 00 A8 17 B0 04 99 22 20 | ($01),Y......" | 00000F90: DD AB C0 C0 5F 42 4E 45 20 24 2E 2E 20 20 20 20 |...._BNE $.. | 00000FA0: 20 20 20 3D 20 30 20 3F 00 C8 17 BA 04 99 22 20 | = 0 ?......" | 00000FB0: DD DD 20 20 20 49 4E 59 20 20 20 20 20 20 20 20 |.. INY | 00000FC0: 20 20 20 59 20 3D 20 32 00 E0 17 C4 04 99 22 20 | Y = 2......" | 00000FD0: DD DD 20 20 20 4C 44 41 20 28 24 30 31 29 2C 59 |.. LDA ($01),Y| 00000FE0: 00 00 18 CE 04 99 22 20 DD AD C0 C0 5F 42 4E 45 |......" ...._BNE| 00000FF0: 20 24 2E 2E 20 20 20 20 20 20 20 3D 20 30 20 3F | $.. = 0 ?| 00001000: 00 20 18 D8 04 99 22 20 AD C0 C0 C0 C0 52 54 53 |. ...." .....RTS| 00001010: 20 20 20 20 20 20 20 20 20 20 20 4B 4C 41 41 52 | KLAAR| 00001020: 00 36 18 E2 04 49 B2 39 3A 8D 31 37 34 30 3A 8B |.6...I.9:.1740:.| 00001030: 46 4C A7 39 30 30 00 60 18 EC 04 99 22 93 4E 55 |FL.900.`....".NU| 00001040: 20 45 45 4E 20 4B 4C 45 49 4E 20 54 45 53 54 4A | EEN KLEIN TESTJ| 00001050: 45 21 20 20 57 45 20 52 4F 45 50 45 4E 20 44 45 |E! WE ROEPEN DE| 00001060: 00 8D 18 F6 04 99 22 11 5A 4F 45 4B 52 4F 55 54 |......".ZOEKROUT| 00001070: 49 4E 45 20 4D 45 54 20 53 59 53 20 38 32 36 20 |INE MET SYS 826 | 00001080: 41 41 4E 20 45 4E 20 5A 45 54 54 45 4E 00 BC 18 |AAN EN ZETTEN...| 00001090: 00 05 99 22 11 44 41 4E 20 48 45 54 20 49 4E 20 |...".DAN HET IN | 000010A0: 24 30 31 2F 30 32 20 53 54 41 41 4E 44 20 41 44 |$01/02 STAAND AD| 000010B0: 52 45 53 20 44 45 43 49 4D 41 41 4C 00 E7 18 0A |RES DECIMAAL....| 000010C0: 05 99 22 11 4F 50 20 48 45 54 20 53 43 48 45 52 |..".OP HET SCHER| 000010D0: 4D 3A 20 50 45 45 4B 28 31 29 2B 32 35 36 2A 50 |M: PEEK(1)+256*P| 000010E0: 45 45 4B 28 32 29 2E 00 12 19 14 05 99 22 11 4F |EEK(2).......".O| 000010F0: 4D 20 45 45 4E 20 49 44 45 45 20 54 45 20 4B 52 |M EEN IDEE TE KR| 00001100: 49 4A 47 45 4E 20 48 4F 45 20 53 4E 45 4C 20 44 |IJGEN HOE SNEL D| 00001110: 41 54 00 40 19 1E 05 99 22 11 47 41 41 54 2C 20 |AT.@....".GAAT, | 00001120: 4C 41 54 45 4E 20 57 45 20 44 45 20 50 45 54 20 |LATEN WE DE PET | 00001130: 4F 4E 44 45 52 20 48 45 54 20 5A 4F 45 4B 45 4E |ONDER HET ZOEKEN| 00001140: 00 6C 19 28 05 99 22 11 45 45 4E 20 57 49 54 54 |.l.(..".EEN WITT| 00001150: 45 20 42 41 4C 4B 20 4F 50 20 48 45 54 20 53 43 |E BALK OP HET SC| 00001160: 48 45 52 4D 20 5A 45 54 54 45 4E 2E 00 8B 19 32 |HERM ZETTEN....2| 00001170: 05 99 22 11 11 42 45 4E 20 4A 45 20 4B 4C 41 41 |.."..BEN JE KLAA| 00001180: 52 20 28 4A 2F 4E 29 20 3F 11 11 00 A1 19 3C 05 |R (J/N) ?.....<.| 00001190: A1 58 24 3A 8B 58 24 B3 B1 22 4A 22 A7 31 33 34 |.X$:.X$.."J".134| 000011A0: 30 00 D1 19 46 05 81 43 B2 30 A4 31 30 3A 81 57 |0...F..C.0.10:.W| 000011B0: B2 30 A4 34 30 30 AC B4 28 43 29 3A 82 57 3A 99 |.0.400..(C):.W:.| 000011C0: 22 91 20 20 20 9D 9D 9D 22 3B 31 30 AB 43 3A 82 |". ...";10.C:.| 000011D0: 43 00 0B 1A 50 05 99 22 91 12 20 20 20 20 20 20 |C...P..".. | 000011E0: 20 20 20 20 92 22 3A 9E 38 32 36 3A 99 22 91 41 | .":.826:.".A| 000011F0: 44 52 20 3D 22 3B C2 28 31 29 AA 32 35 36 AC C2 |DR =";.(1).256..| 00001200: 28 32 29 3B 22 20 20 20 20 20 22 00 25 1A 5A 05 |(2);" ".%.Z.| 00001210: 99 22 11 56 4C 55 47 2C 20 4E 49 45 54 20 57 41 |.".VLUG, NIET WA| 00001220: 41 52 20 3F 21 00 3D 1A 64 05 49 B2 31 30 3A 8D |AR ?!.=.d.I.10:.| 00001230: 31 37 34 30 3A 8B 46 4C A7 31 30 33 30 00 68 1A |1740:.FL.1030.h.| 00001240: 6E 05 99 22 93 45 45 4E 20 54 4F 45 50 41 53 53 |n..".EEN TOEPASS| 00001250: 49 4E 47 20 56 41 4E 20 44 49 54 20 50 52 4F 47 |ING VAN DIT PROG| 00001260: 52 41 4D 4D 41 20 49 53 00 8F 1A 78 05 99 22 11 |RAMMA IS...x..".| 00001270: 44 45 20 42 45 52 45 4B 45 4E 49 4E 47 20 56 41 |DE BEREKENING VA| 00001280: 4E 20 44 45 20 4C 45 4E 47 54 45 20 56 41 4E 00 |N DE LENGTE VAN.| 00001290: BC 1A 82 05 99 22 11 42 41 53 49 43 2D 50 52 4F |.....".BASIC-PRO| 000012A0: 47 52 41 4D 4D 41 27 53 2E 20 45 45 4E 20 42 41 |GRAMMA'S. EEN BA| 000012B0: 53 49 43 2D 50 52 4F 47 52 41 4D 2D 00 E7 1A 8C |SIC-PROGRAM-....| 000012C0: 05 99 22 11 4D 41 20 42 45 47 49 4E 54 20 41 4C |..".MA BEGINT AL| 000012D0: 54 49 4A 44 20 4F 50 20 24 30 34 30 30 20 3D 20 |TIJD OP $0400 = | 000012E0: 31 30 32 34 20 45 4E 00 14 1B 96 05 99 22 11 45 |1024 EN......".E| 000012F0: 49 4E 44 49 47 54 20 4F 50 20 44 45 20 50 4C 41 |INDIGT OP DE PLA| 00001300: 41 54 53 20 57 41 41 52 20 44 45 20 44 52 49 45 |ATS WAAR DE DRIE| 00001310: 20 24 30 30 00 25 1B A0 05 99 22 11 42 45 47 49 | $00.%....".BEGI| 00001320: 4E 4E 45 4E 2E 00 46 1B AA 05 99 22 11 11 57 45 |NNEN..F...."..WE| 00001330: 20 4B 55 4E 4E 45 4E 20 44 55 53 20 53 43 48 52 | KUNNEN DUS SCHR| 00001340: 49 4A 56 45 4E 3A 00 86 1B B4 05 99 22 11 20 20 |IJVEN:......". | 00001350: 31 2E 20 27 53 59 53 20 38 32 36 27 22 3A 99 22 |1. 'SYS 826'":."| 00001360: 11 20 20 32 2E 20 27 50 52 49 4E 54 20 50 45 45 |. 2. 'PRINT PEE| 00001370: 4B 28 31 29 2B 32 35 36 2A 50 45 45 4B 28 32 29 |K(1)+256*PEEK(2)| 00001380: 2D 31 30 32 34 27 00 B4 1B BE 05 99 22 11 45 4E |-1024'......".EN| 00001390: 20 4B 52 49 4A 47 45 4E 20 41 4C 53 20 52 45 53 | KRIJGEN ALS RES| 000013A0: 55 4C 54 41 41 54 20 44 45 20 4C 45 4E 47 54 45 |ULTAAT DE LENGTE| 000013B0: 20 56 41 4E 00 D9 1B C8 05 99 22 11 48 45 54 20 | VAN......".HET | 000013C0: 42 41 53 49 43 2D 50 52 4F 47 52 41 4D 4D 41 20 |BASIC-PROGRAMMA | 000013D0: 49 4E 20 42 59 54 45 53 2E 00 F1 1B D2 05 49 B2 |IN BYTES......I.| 000013E0: 31 31 3A 8D 31 37 34 30 3A 8B 46 4C A7 31 32 36 |11:.1740:.FL.126| 000013F0: 30 00 07 1C DC 05 99 22 93 4F 50 47 41 56 45 4E |0......".OPGAVEN| 00001400: 20 3A 22 3A 99 55 24 00 35 1C E6 05 99 22 11 31 | :":.U$.5....".1| 00001410: 2E 20 42 45 50 41 41 4C 20 44 45 20 4C 45 4E 47 |. BEPAAL DE LENG| 00001420: 54 45 20 56 41 4E 20 44 49 54 20 50 52 4F 47 52 |TE VAN DIT PROGR| 00001430: 41 4D 4D 41 2E 00 60 1C F0 05 99 22 11 32 2E 20 |AMMA..`....".2. | 00001440: 46 52 45 28 30 29 20 48 4F 55 44 54 20 4F 4F 4B |FRE(0) HOUDT OOK| 00001450: 20 52 45 4B 45 4E 49 4E 47 20 4D 45 54 20 44 45 | REKENING MET DE| 00001460: 00 89 1C FA 05 99 22 11 20 20 20 56 4F 4F 52 20 |......". VOOR | 00001470: 56 41 52 49 41 42 45 4C 45 4E 20 4E 4F 44 49 47 |VARIABELEN NODIG| 00001480: 45 20 52 55 49 4D 54 45 2E 00 B5 1C 04 06 99 22 |E RUIMTE......."| 00001490: 11 20 20 20 4D 45 54 20 44 49 54 20 4D 41 43 48 |. MET DIT MACH| 000014A0: 49 4E 45 2D 54 41 41 4C 2D 50 52 4F 47 52 41 4D |INE-TAAL-PROGRAM| 000014B0: 4D 41 20 45 4E 00 E1 1C 0E 06 99 22 11 20 20 20 |MA EN......". | 000014C0: 46 52 45 28 30 29 20 4D 4F 45 54 20 4A 45 20 44 |FRE(0) MOET JE D| 000014D0: 45 20 56 4F 4F 52 20 56 41 52 49 41 42 45 4C 45 |E VOOR VARIABELE| 000014E0: 4E 00 02 1D 18 06 99 22 11 20 20 20 4E 4F 44 49 |N......". NODI| 000014F0: 47 45 20 52 55 49 4D 54 45 20 42 45 50 41 4C 45 |GE RUIMTE BEPALE| 00001500: 4E 2E 00 2F 1D 22 06 99 22 11 33 2E 20 50 52 4F |N../."..".3. PRO| 00001510: 42 45 45 52 20 4D 45 54 20 44 45 20 49 4E 54 45 |BEER MET DE INTE| 00001520: 52 4E 45 20 4B 4C 4F 4B 20 54 45 20 42 45 2D 00 |RNE KLOK TE BE-.| 00001530: 5D 1D 2C 06 99 22 11 20 20 20 50 41 4C 45 4E 20 |].,..". PALEN | 00001540: 48 4F 45 20 53 4E 45 4C 20 44 45 20 5A 4F 45 4B |HOE SNEL DE ZOEK| 00001550: 52 4F 55 54 49 4E 45 20 49 53 20 49 4E 00 7A 1D |ROUTINE IS IN.z.| 00001560: 36 06 99 22 11 20 20 20 4B 42 59 54 45 20 50 45 |6..". KBYTE PE| 00001570: 52 20 53 45 43 4F 4E 44 45 2E 00 92 1D 40 06 49 |R SECONDE....@.I| 00001580: B2 31 32 3A 8D 31 37 34 30 3A 8B 46 4C A7 31 33 |.12:.1740:.FL.13| 00001590: 39 30 00 BE 1D 4A 06 99 22 93 34 2E 20 57 41 41 |90...J..".4. WAA| 000015A0: 52 4F 4D 20 57 4F 52 44 54 20 41 4C 53 20 53 54 |ROM WORDT ALS ST| 000015B0: 41 52 54 41 44 52 45 53 20 24 30 33 46 46 00 E6 |ARTADRES $03FF..| 000015C0: 1D 54 06 99 22 11 20 20 20 47 45 4E 4F 4D 45 4E |.T..". GENOMEN| 000015D0: 20 49 4E 20 50 4C 41 41 54 53 20 56 41 4E 20 24 | IN PLAATS VAN $| 000015E0: 30 34 30 30 20 3F 00 13 1E 5E 06 99 22 11 35 2E |0400 ?...^..".5.| 000015F0: 20 57 41 4E 4E 45 45 52 20 57 4F 52 44 54 20 24 | WANNEER WORDT $| 00001600: 30 32 20 4D 45 54 20 31 20 56 45 52 48 4F 4F 47 |02 MET 1 VERHOOG| 00001610: 44 20 3F 00 3D 1E 68 06 99 22 11 36 2E 20 42 49 |D ?.=.h..".6. BI| 00001620: 4A 20 50 52 45 43 49 45 53 20 57 45 4C 4B 20 41 |J PRECIES WELK A| 00001630: 44 52 45 53 20 57 4F 52 44 54 20 49 4E 00 66 1E |DRES WORDT IN.f.| 00001640: 72 06 99 22 11 20 20 20 45 4C 4B 20 47 45 56 41 |r..". ELK GEVA| 00001650: 4C 20 47 45 53 54 4F 50 54 20 4D 45 54 20 5A 4F |L GESTOPT MET ZO| 00001660: 45 4B 45 4E 20 3F 00 94 1E 7C 06 99 22 11 37 2E |EKEN ?...|..".7.| 00001670: 20 57 41 41 52 4F 4D 20 47 45 42 52 55 49 4B 45 | WAAROM GEBRUIKE| 00001680: 4E 20 57 45 20 41 4C 53 20 54 45 4C 4C 45 52 20 |N WE ALS TELLER | 00001690: 4E 49 45 54 00 B0 1E 86 06 99 22 11 20 20 20 47 |NIET......". G| 000016A0: 45 57 4F 4F 4E 20 58 52 20 4F 46 20 59 52 20 3F |EWOON XR OF YR ?| 000016B0: 00 DB 1E 90 06 99 22 11 38 2E 20 57 41 41 52 4F |......".8. WAARO| 000016C0: 4D 20 42 45 47 49 4E 54 20 44 45 20 42 49 4E 4E |M BEGINT DE BINN| 000016D0: 45 4E 2D 4C 4F 4F 50 20 4D 45 54 00 05 1F 9A 06 |EN-LOOP MET.....| 000016E0: 99 22 11 20 20 20 27 49 4E 43 20 24 30 31 27 20 |.". 'INC $01' | 000016F0: 45 4E 20 44 45 20 42 45 49 44 45 20 42 55 49 54 |EN DE BEIDE BUIT| 00001700: 45 4E 53 54 45 00 20 1F A4 06 99 22 11 20 20 20 |ENSTE. ....". | 00001710: 4D 45 54 20 27 4C 44 59 20 23 24 30 30 27 20 3F |MET 'LDY #$00' ?| 00001720: 00 5C 1F AE 06 99 22 11 11 1D 1D 2D 20 42 4C 41 |.\...."....- BLA| 00001730: 44 20 31 33 20 2D 20 20 3C 2B 3E 20 91 A4 A4 A4 |D 13 - <+> ....| 00001740: A4 A4 11 9D 9D 9D 9D 9D 12 45 49 4E 44 45 92 20 |.........EINDE. | 00001750: 3C 2D 3E 20 4F 50 4E 49 45 55 57 22 00 6E 1F B8 |<-> OPNIEUW".n..| 00001760: 06 8D 31 37 36 30 3A 91 46 4C 89 31 30 30 00 79 |..1760:.FL.100.y| 00001770: 1F C2 06 99 22 93 22 3A 80 00 7F 1F CC 06 8F 00 |....".":........| 00001780: C6 1F D6 06 99 22 13 11 11 11 11 11 11 11 11 11 |....."..........| 00001790: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 20 |............... | 000017A0: 20 2D 20 42 4C 41 44 22 3B 49 3B 22 2D 20 20 3C | - BLAD";I;"- <| 000017B0: 2B 3E 20 56 45 52 44 45 52 20 20 3C 2D 3E 20 54 |+> VERDER <-> T| 000017C0: 45 52 55 47 22 3B 00 D8 1F E0 06 81 49 B2 30 A4 |ERUG";......I.0.| 000017D0: 31 31 3A A1 58 24 3A 82 00 EC 1F EA 06 A1 58 24 |11:.X$:.......X$| 000017E0: 3A 8B 58 24 B2 22 22 A7 31 37 37 30 00 FF 1F F4 |:.X$."".1770....| 000017F0: 06 8B 58 24 B2 22 2B 22 A7 46 4C B2 30 3A 8E 00 |..X$."+".FL.0:..| 00001800: 12 20 FE 06 8B 58 24 B2 22 2D 22 A7 46 4C B2 31 |. ...X$."-".FL.1| 00001810: 3A 8E 00 1C 20 08 07 89 31 37 37 30 00 00 00 41 |:... ...1770...A|
....D..59468,12:..Y.N.U$."..........":O$
.".........":I$."INPUT-ROUTINE":B$." BEE
LDSCHERM"...X..169,255,133,1,169,3,133,2
,160,0,230,1,208,4,230,2,48.P....14,177,
1,208,244,200,177,1,208,237,200,177,1,20
8,232,96......".......";O$;O$:.".CURSUS
MACHINE-TAAL (12).(....".......";O$:.".3
. ZOEKROUTINES ".T. .."..EEN VEEL VOORKO
MEND PROBLEEM VORMEN......".DE ZOEK-ROUT
INES. IN DEZE LES GAAN WE......".DE OPBO
UW VAN EEN DERGELIJKE ROUTINE.A....".OND
ERZOEKEN....H.."..HET GROTE VOORDEEL VAN
MACHINETAAL-...R..".ZOEK-ROUTINES IS DE
GROTE SNELHEID..B....".(CA. 1000 MAAL S
NELLER DAN BASIC.).^....:.I.0.32:.X:.826
.I,X:..T...I.1:.1740:.FL.140......".WE G
AAN DE OPBOUW VAN ZOEK-ROUTINES.L....".O
NDERZOEKEN AAN DE HAND VAN EEN VOOR-.Z..
..".BEELD......."..STEL WE WILLEN HET GE
HEUGENGEBIED VAN.0."..".$0400 TOT $8000
NAZOEKEN OP DRIE.W.,..".OPVOLGENDE BYTES
'$00-$00-$00'....6..".WE ZOEKEN DUS HET
ADRES VAN HET EERSTE...@..".VAN DRIE OP
VOLGENDE GEHEUGENPLAATSEN.O.J..".MET STE
EDS INHOUD $00....T.."..DIT IS NAMELIJK
HET EINDADRES VAN HET.".^..".IN RAM STAA
ND BASICPROGRAMMA..8.H.I.2:.1740:.FL.140
.B.R..".WE HEBBEN EEN TELLER NODIG DIE V
AN...|..".$0400 TOT $8000 KAN TELLEN. DE
INHOUD......".VAN DE CEL WAARVAN DE TEL
LER HET ADRES......".AANGEEFT WORDT GETE
ST OP INHOUD $00.......".ALS DE INHOUD G
EEN $00 IS, WORDT DE.9....".TELLERINHOUD
1 HOGER GEMAAKT..G....".ALS DE INHOUD W
EL $00 IS, WORDEN BEIDE......".VOLGENDE
CELLEN OOK OP $00 GETEST....B..".ZIJN NI
ET BEIDE CELLEN $00, DAN ZOEKEN...L..".W
E VERDER, ANDERS WORDT HET ZOEKENGE-...V
..".STOPT. MAXIMAAL WORDT TOT $8000 GE-.
%....".ZOCHT..;...I.3:.1740:.FL.250.L...
.".......ALS TELLER GEBRUIKEN WE DE PLAA
TSEN......".$01/$02. WE HEBBEN TWEE PLAA
TSEN NODIG.D....".OMDAT DE ZOEKGEBIED OV
ER TWEE BYTE......".ADRESSEN LOOPT. WE K
IEZEN DE TELLER IN......".ZERO-PAGE OMDA
T DAT SNELLER WERKT EN.F.&..".OMDAT DEZE
INDIREKT GEADRESSEERD.\.0..".KUNNEN WOR
DEN..R.:.I.4:.1740:.FL.370...D..".EERST
ZETTEN WE HET STARTADRES-1.E.N..".IN DE
TELLER-GEHEUGENPLAATSEN. DENK...X..".AAN
DE VOLGORDE! (LAAG/HOOG):...B..".
LDA #$FF.'.L..". STA $01 $FF N
AAR $01.>.V..". LDA #$03.D....".
STA $02 $03 NAAR $02......"..OMD
AT WE INDIREKT WILLEN ADRESSEREN......".
ZETTEN WE NOG $00 IN YR:.G....". L
DY #$00.....I.5:.1740:.FL.500......".WE
BEGINNEN NU DE ZOEK-LOOP MET HET.-....".
VERHOGEN VAN DE TELLER MET 1:.T.F..".
INC $01 VERHOOG LOW-BYTE.P.P..". .
_BNE $04 = 0 ?...Z.." .... INC $02
VERHOOG HIGH-BYTE......" .... BMI $..
= $80 ?.M...." ...............".DOO
R BNE WORDT $02 ALLEEN VERHOOGD ALS. ...
.".HET LOW-BYTE GEDEELTE NUL IS..I....".
MET BMI MOET BIJ HET BEREIKEN VAN.T...."
.$8000 WEGGESPRONGEN WORDEN NAAR EEN...
..".PLAATS WAAR RTS STAAT....*.I.6:.1740
:.FL.580.U.4..".....NU VOLGT DE TEST OF
DE INHOUD VAN...>..".DE CEL WAARVAN HET
ADRES IN DE TELLER.0.H..".STAAT OOK NUL
IS. ZO NIET, DAN SPRINGT.\.R..".HET PROG
RAMMA NAAR DE PLAATS WAAR DE.Z.\..".TELL
ER WORDT VERHOOGD....F.."... LDA ($
01),Y BEDENK: Y=0 !.P.P..". BNE $.
. SPRING NAAR 'INC'...Z.I.7:.1740:.
FL.690......".WAS DE CELINHOUD WEL $00,
DAN MOET DE.6....".VOLGENDE CEL WORDEN G
ETEST:.X....". INY NU: Y=1
.R....". LDA ($01),Y......".
BNE $.. NAAR 'LDY #$00'.G....".ALS
DEZE CELINHOUD OOK $00 IS, MOET......".N
OG DE DERDE CEL WORDEN GETEST:...J..".
INY NU: Y=2.*.T..". L
DA ($01),Y.T....". BNE $.. NAA
R 'LDY #$00'......".EN ALS DEZE CELINHOU
D OOK $00 IS, DAN......". RTS
TERUG NAAR BASIC.B...I.8:.1740:.FL.8
20......".NU NOG EENS ALLES SAMEN:."....
.." LDA #$FF STARTADR = 03FF."
...." STA $01.7.$.." LDA #$03.
K...." STA $02.R.8.." ....LDY #$00
Y, START = 0.|.B.." ....L.." ...
.INC $01 ADR = ADR + 1.D.V.." ...
_BNE $.. = 0 ?.X.`.." ... INC $02
...J.." ...._BMI $.. KLAAR ?...T..
" .....&.~.." .....LDA ($01),Y Y = 0.F
...." ...._BNE $.. = 0 ?.P...." ..
.P...." .. INY Y = 1......"
.. LDA ($01),Y......" ...._BNE $..
= 0 ?.H...." .. INY Y = 2
...D.." .. LDA ($01),Y...N.." ...._BNE
$.. = 0 ?. .X.." .....RTS
KLAAR.6...I.9:.1740:.FL.900.`....".NU
EEN KLEIN TESTJE! WE ROEPEN DE......".
ZOEKROUTINE MET SYS 826 AAN EN ZETTEN...
...".DAN HET IN $01/02 STAAND ADRES DECI
MAAL......".OP HET SCHERM: PEEK(1)+256*P
EEK(2).......".OM EEN IDEE TE KRIJGEN HO
E SNEL DAT.@....".GAAT, LATEN WE DE PET
ONDER HET ZOEKEN.L.(..".EEN WITTE BALK O
P HET SCHERM ZETTEN....2.."..BEN JE KLAA
R (J/N) ?.....<..X$:.X$.."J".1340.Q.F..C
.0.10:.W.0.400..(C):.W:.". ...";10.C:.
C...P..".. .":.826:.".ADR =";B(
1).256.B(2);" ".%.Z..".VLUG, NIET WA
AR ?!.=.D.I.10:.1740:.FL.1030.H.N..".EEN
TOEPASSING VAN DIT PROGRAMMA IS...X..".
DE BEREKENING VAN DE LENGTE VAN......".B
ASIC-PROGRAMMA'S. EEN BASIC-PROGRAM-....
..".MA BEGINT ALTIJD OP $0400 = 1024 EN.
.....".EINDIGT OP DE PLAATS WAAR DE DRIE
$00.%. ..".BEGINNEN..F...."..WE KUNNEN
DUS SCHRIJVEN:......". 1. 'SYS 826'":."
. 2. 'PRINT PEEK(1)+256*PEEK(2)-1024'..
....".EN KRIJGEN ALS RESULTAAT DE LENGTE
VAN.Y.H..".HET BASIC-PROGRAMMA IN BYTES
....R.I.11:.1740:.FL.1260......".OPGAVEN
:":.U$.5....".1. BEPAAL DE LENGTE VAN D
IT PROGRAMMA..`....".2. FRE(0) HOUDT OOK
REKENING MET DE......". VOOR VARIABEL
EN NODIGE RUIMTE.......". MET DIT MACH
INE-TAAL-PROGRAMMA EN......". FRE(0) M
OET JE DE VOOR VARIABELEN......". NODI
GE RUIMTE BEPALEN../."..".3. PROBEER MET
DE INTERNE KLOK TE BE-.].,..". PALEN
HOE SNEL DE ZOEKROUTINE IS IN.Z.6..".
KBYTE PER SECONDE....@.I.12:.1740:.FL.13
90...J..".4. WAAROM WORDT ALS STARTADRES
$03FF...T..". GENOMEN IN PLAATS VAN $
0400 ?...^..".5. WANNEER WORDT $02 MET 1
VERHOOGD ?.=.H..".6. BIJ PRECIES WELK A
DRES WORDT IN.F.R..". ELK GEVAL GESTOP
T MET ZOEKEN ?...|..".7. WAAROM GEBRUIKE
N WE ALS TELLER NIET......". GEWOON XR
OF YR ?......".8. WAAROM BEGINT DE BINN
EN-LOOP MET......". 'INC $01' EN DE BE
IDE BUITENSTE. ....". MET 'LDY #$00' ?
.\...."....- BLAD 13 - <+> ............
.EINDE. <-> OPNIEUW".N....1760:.FL.100.Y
.B..".":...L...F.V.."..................
....... - BLAD";I;"- <+> VERDER <-> T
ERUG";.X....I.0.11:.X$:.......X$:.X$."".
1770......X$."+".FL.0:... ...X$."-".FL.1
:... ...1770...A
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL