Multiple names: MACHINETAAL L12 , MT 12, MTAAL 12
FILE INFORMATION
FILENAME(S):
• MACHINETAAL L12 <br>• MT 12<br>• MTAAL 12
FILE TYPE(S): PRG
FILE SIZE: 6.2K
FIRST SEEN: 2025-11-30 21:05:27
APPEARS ON: 4 disk(s)
FILE HASH
92539a0802cd130cc9aceaf09cdc4757c09ae15edab3cfc8ada9463f1e7da047
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE BRUIN 59B | MACHINETAAL L12  | PRG | DuncanTwain | 25 | 7 | DOWNLOAD FILE |
| LESSEN | MT 12 | PRG | DuncanTwain | 11 | 19 | DOWNLOAD FILE |
| 64S08 64S10 | MTAAL 12 | PRG | DuncanTwain | 25 | 7 | DOWNLOAD FILE |
| C64 HULP 35 1 | MTAAL 12 | PRG | DuncanTwain | 11 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 64 00 8F 00 27 08 69 00 8F 20 41 41 |....d...'.i.. AA|
00000010: 4E 50 41 53 53 49 4E 47 45 4E 20 43 4F 4D 4D 4F |NPASSINGEN COMMO|
00000020: 44 4F 52 45 20 36 34 00 2D 08 6E 00 8F 00 45 08 |DORE 64.-.n...E.|
00000030: 73 00 8F 20 43 4F 55 52 42 4F 49 53 20 53 4F 46 |s.. COURBOIS SOF|
00000040: 54 57 41 52 45 00 4B 08 78 00 8F 00 70 08 7D 00 |TWARE.K.x...p.}.|
00000050: 99 22 93 22 C7 28 38 29 C7 28 31 34 32 29 3A 97 |.".".(8).(142):.|
00000060: 35 33 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 35 |53280,0:.53281,5|
00000070: 00 76 08 82 00 9C 00 BE 08 87 00 55 24 B2 22 A3 |.v.........U$.".|
00000080: A3 A3 A3 A3 A3 A3 A3 A3 A3 22 3A 4F 24 B2 22 A4 |.........":O$.".|
00000090: A4 A4 A4 A4 A4 A4 A4 A4 22 3A 49 24 B2 22 49 4E |........":I$."IN|
000000A0: 50 55 54 2D 52 4F 55 54 49 4E 45 22 3A 42 24 B2 |PUT-ROUTINE":B$.|
000000B0: 22 20 42 45 45 4C 44 53 43 48 45 52 4D 22 00 00 |" BEELDSCHERM"..|
000000C0: 09 8C 00 83 31 36 39 2C 32 35 35 2C 31 33 33 2C |....169,255,133,|
000000D0: 32 35 31 2C 31 36 39 2C 37 2C 31 33 33 2C 32 35 |251,169,7,133,25|
000000E0: 32 2C 31 36 30 2C 30 2C 32 33 30 2C 32 35 31 2C |2,160,0,230,251,|
000000F0: 32 30 38 2C 34 2C 32 33 30 2C 32 35 32 2C 34 38 |208,4,230,252,48|
00000100: 00 43 09 91 00 83 31 34 2C 31 37 37 2C 32 35 31 |.C....14,177,251|
00000110: 2C 32 30 38 2C 32 34 34 2C 32 30 30 2C 31 37 37 |,208,244,200,177|
00000120: 2C 32 35 31 2C 32 30 38 2C 32 33 37 2C 32 30 30 |,251,208,237,200|
00000130: 2C 31 37 37 2C 32 35 31 2C 32 30 38 2C 32 33 32 |,177,251,208,232|
00000140: 2C 39 36 00 73 09 96 00 99 22 93 90 20 2A 2A 2A |,96.s....".. ***|
00000150: 20 43 4F 4D 4D 4F 44 4F 52 45 20 36 34 20 2A 2A | COMMODORE 64 **|
00000160: 20 4D 41 43 48 49 4E 45 54 41 41 4C 20 31 32 20 | MACHINETAAL 12 |
00000170: 2A 2A 2A 00 8B 09 9B 00 99 22 11 05 33 2E 20 5A |***......"..3. Z|
00000180: 4F 45 4B 52 4F 55 54 49 4E 45 53 00 B8 09 A0 00 |OEKROUTINES.....|
00000190: 99 22 11 11 1F 45 45 4E 20 56 45 45 4C 20 56 4F |."...EEN VEEL VO|
000001A0: 4F 52 4B 4F 4D 45 4E 44 20 50 52 4F 42 4C 45 45 |ORKOMEND PROBLEE|
000001B0: 4D 20 56 4F 52 4D 45 4E 00 E5 09 A5 00 99 22 11 |M VORMEN......".|
000001C0: 44 45 20 5A 4F 45 4B 2D 52 4F 55 54 49 4E 45 53 |DE ZOEK-ROUTINES|
000001D0: 2E 20 49 4E 20 44 45 5A 45 20 4C 45 53 20 47 41 |. IN DEZE LES GA|
000001E0: 41 4E 20 57 45 00 11 0A AA 00 99 22 11 44 45 20 |AN WE......".DE |
000001F0: 4F 50 42 4F 55 57 20 56 41 4E 20 45 45 4E 20 44 |OPBOUW VAN EEN D|
00000200: 45 52 47 45 4C 49 4A 4B 45 20 52 4F 55 54 49 4E |ERGELIJKE ROUTIN|
00000210: 45 00 25 0A AF 00 99 22 11 4F 4E 44 45 52 5A 4F |E.%....".ONDERZO|
00000220: 45 4B 45 4E 2E 00 52 0A B4 00 99 22 11 11 9E 48 |EKEN..R...."...H|
00000230: 45 54 20 47 52 4F 54 45 20 56 4F 4F 52 44 45 45 |ET GROTE VOORDEE|
00000240: 4C 20 56 41 4E 20 4D 41 43 48 49 4E 45 54 41 41 |L VAN MACHINETAA|
00000250: 4C 2D 00 7D 0A B9 00 99 22 11 5A 4F 45 4B 2D 52 |L-.}....".ZOEK-R|
00000260: 4F 55 54 49 4E 45 53 20 49 53 20 44 45 20 47 52 |OUTINES IS DE GR|
00000270: 4F 54 45 20 53 4E 45 4C 48 45 49 44 2E 00 A7 0A |OTE SNELHEID....|
00000280: BE 00 99 22 11 28 43 41 2E 20 31 30 30 30 20 4D |...".(CA. 1000 M|
00000290: 41 41 4C 20 53 4E 45 4C 4C 45 52 20 44 41 4E 20 |AAL SNELLER DAN |
000002A0: 42 41 53 49 43 2E 29 00 C3 0A C3 00 8C 3A 81 49 |BASIC.)......:.I|
000002B0: B2 30 A4 33 32 3A 87 58 3A 97 38 32 36 AA 49 2C |.0.32:.X:.826.I,|
000002C0: 58 3A 82 00 D8 0A C8 00 49 B2 31 3A 8D 39 34 35 |X:......I.1:.945|
000002D0: 3A 8B 46 4C A7 31 35 30 00 04 0B CD 00 99 22 93 |:.FL.150......".|
000002E0: 05 57 45 20 47 41 41 4E 20 44 45 20 4F 50 42 4F |.WE GAAN DE OPBO|
000002F0: 55 57 20 56 41 4E 20 5A 4F 45 4B 2D 52 4F 55 54 |UW VAN ZOEK-ROUT|
00000300: 49 4E 45 53 00 31 0B D2 00 99 22 11 4F 4E 44 45 |INES.1....".ONDE|
00000310: 52 5A 4F 45 4B 45 4E 20 41 41 4E 20 44 45 20 48 |RZOEKEN AAN DE H|
00000320: 41 4E 44 20 56 41 4E 20 45 45 4E 20 56 4F 4F 52 |AND VAN EEN VOOR|
00000330: 2D 00 3F 0B D7 00 99 22 11 42 45 45 4C 44 2E 00 |-.?....".BEELD..|
00000340: 6E 0B DC 00 99 22 11 11 90 53 54 45 4C 20 57 45 |n...."...STEL WE|
00000350: 20 57 49 4C 4C 45 4E 20 48 45 54 20 47 45 48 45 | WILLEN HET GEHE|
00000360: 55 47 45 4E 47 45 42 49 45 44 20 56 41 4E 00 96 |UGENGEBIED VAN..|
00000370: 0B E1 00 99 22 11 24 30 38 30 30 20 54 4F 54 20 |....".$0800 TOT |
00000380: 24 38 30 30 30 20 4E 41 5A 4F 45 4B 45 4E 20 4F |$8000 NAZOEKEN O|
00000390: 50 20 44 52 49 45 00 BD 0B E6 00 99 22 11 4F 50 |P DRIE......".OP|
000003A0: 56 4F 4C 47 45 4E 44 45 20 42 59 54 45 53 20 27 |VOLGENDE BYTES '|
000003B0: 24 30 30 2D 24 30 30 2D 24 30 30 27 2E 00 EB 0B |$00-$00-$00'....|
000003C0: EB 00 99 22 11 57 45 20 5A 4F 45 4B 45 4E 20 44 |...".WE ZOEKEN D|
000003D0: 55 53 20 48 45 54 20 41 44 52 45 53 20 56 41 4E |US HET ADRES VAN|
000003E0: 20 48 45 54 20 45 45 52 53 54 45 00 17 0C F0 00 | HET EERSTE.....|
000003F0: 99 22 11 56 41 4E 20 44 52 49 45 20 4F 50 56 4F |.".VAN DRIE OPVO|
00000400: 4C 47 45 4E 44 45 20 47 45 48 45 55 47 45 4E 50 |LGENDE GEHEUGENP|
00000410: 4C 41 41 54 53 45 4E 00 35 0C F5 00 99 22 11 4D |LAATSEN.5....".M|
00000420: 45 54 20 53 54 45 45 44 53 20 49 4E 48 4F 55 44 |ET STEEDS INHOUD|
00000430: 20 24 30 30 2E 00 64 0C FA 00 99 22 11 11 1F 44 | $00..d...."...D|
00000440: 49 54 20 49 53 20 4E 41 4D 45 4C 49 4A 4B 20 48 |IT IS NAMELIJK H|
00000450: 45 54 20 45 49 4E 44 41 44 52 45 53 20 56 41 4E |ET EINDADRES VAN|
00000460: 20 48 45 54 00 89 0C FF 00 99 22 11 49 4E 20 52 | HET......".IN R|
00000470: 41 4D 20 53 54 41 41 4E 44 20 42 41 53 49 43 50 |AM STAAND BASICP|
00000480: 52 4F 47 52 41 4D 4D 41 2E 00 9E 0C 04 01 49 B2 |ROGRAMMA......I.|
00000490: 32 3A 8D 39 34 35 3A 8B 46 4C A7 31 35 30 00 C9 |2:.945:.FL.150..|
000004A0: 0C 09 01 99 22 93 9E 57 45 20 48 45 42 42 45 4E |...."..WE HEBBEN|
000004B0: 20 45 45 4E 20 54 45 4C 4C 45 52 20 4E 4F 44 49 | EEN TELLER NODI|
000004C0: 47 20 44 49 45 20 56 41 4E 00 F6 0C 0E 01 99 22 |G DIE VAN......"|
000004D0: 11 24 30 38 30 30 20 54 4F 54 20 24 38 30 30 30 |.$0800 TOT $8000|
000004E0: 20 4B 41 4E 20 54 45 4C 4C 45 4E 2E 20 44 45 20 | KAN TELLEN. DE |
000004F0: 49 4E 48 4F 55 44 00 24 0D 13 01 99 22 11 56 41 |INHOUD.$....".VA|
00000500: 4E 20 44 45 20 43 45 4C 20 57 41 41 52 56 41 4E |N DE CEL WAARVAN|
00000510: 20 44 45 20 54 45 4C 4C 45 52 20 48 45 54 20 41 | DE TELLER HET A|
00000520: 44 52 45 53 00 50 0D 18 01 99 22 11 41 41 4E 47 |DRES.P....".AANG|
00000530: 45 45 46 54 20 57 4F 52 44 54 20 47 45 54 45 53 |EEFT WORDT GETES|
00000540: 54 20 4F 50 20 49 4E 48 4F 55 44 20 24 30 30 2E |T OP INHOUD $00.|
00000550: 00 7B 0D 1D 01 99 22 11 41 4C 53 20 44 45 20 49 |.{....".ALS DE I|
00000560: 4E 48 4F 55 44 20 47 45 45 4E 20 24 30 30 20 49 |NHOUD GEEN $00 I|
00000570: 53 2C 20 57 4F 52 44 54 20 44 45 00 A0 0D 22 01 |S, WORDT DE...".|
00000580: 99 22 11 54 45 4C 4C 45 52 49 4E 48 4F 55 44 20 |.".TELLERINHOUD |
00000590: 31 20 48 4F 47 45 52 20 47 45 4D 41 41 4B 54 2E |1 HOGER GEMAAKT.|
000005A0: 00 CF 0D 27 01 99 22 11 05 41 4C 53 20 44 45 20 |...'.."..ALS DE |
000005B0: 49 4E 48 4F 55 44 20 57 45 4C 20 24 30 30 20 49 |INHOUD WEL $00 I|
000005C0: 53 2C 20 57 4F 52 44 45 4E 20 42 45 49 44 45 00 |S, WORDEN BEIDE.|
000005D0: F9 0D 2C 01 99 22 11 56 4F 4C 47 45 4E 44 45 20 |..,..".VOLGENDE |
000005E0: 43 45 4C 4C 45 4E 20 4F 4F 4B 20 4F 50 20 24 30 |CELLEN OOK OP $0|
000005F0: 30 20 47 45 54 45 53 54 2E 00 27 0E 31 01 99 22 |0 GETEST..'.1.."|
00000600: 11 5A 49 4A 4E 20 4E 49 45 54 20 42 45 49 44 45 |.ZIJN NIET BEIDE|
00000610: 20 43 45 4C 4C 45 4E 20 24 30 30 2C 20 44 41 4E | CELLEN $00, DAN|
00000620: 20 5A 4F 45 4B 45 4E 00 54 0E 36 01 99 22 11 57 | ZOEKEN.T.6..".W|
00000630: 45 20 56 45 52 44 45 52 2C 20 41 4E 44 45 52 53 |E VERDER, ANDERS|
00000640: 20 57 4F 52 44 54 20 48 45 54 20 5A 4F 45 4B 45 | WORDT HET ZOEKE|
00000650: 4E 47 45 2D 00 7F 0E 3B 01 99 22 11 53 54 4F 50 |NGE-...;..".STOP|
00000660: 54 2E 20 4D 41 58 49 4D 41 41 4C 20 57 4F 52 44 |T. MAXIMAAL WORD|
00000670: 54 20 54 4F 54 20 24 38 30 30 30 20 47 45 2D 00 |T TOT $8000 GE-.|
00000680: 8D 0E 40 01 99 22 11 5A 4F 43 48 54 2E 00 A2 0E |..@..".ZOCHT....|
00000690: 45 01 49 B2 33 3A 8D 39 34 35 3A 8B 46 4C A7 32 |E.I.3:.945:.FL.2|
000006A0: 30 35 00 CE 0E 4A 01 99 22 93 1F 41 4C 53 20 54 |05...J.."..ALS T|
000006B0: 45 4C 4C 45 52 20 47 45 42 52 55 49 4B 45 4E 20 |ELLER GEBRUIKEN |
000006C0: 57 45 20 44 45 20 50 4C 41 41 54 53 45 4E 00 FC |WE DE PLAATSEN..|
000006D0: 0E 4F 01 99 22 11 24 46 42 2F 24 46 43 2E 20 57 |.O..".$FB/$FC. W|
000006E0: 45 20 48 45 42 42 45 4E 20 54 57 45 45 20 50 4C |E HEBBEN TWEE PL|
000006F0: 41 41 54 53 45 4E 20 4E 4F 44 49 47 00 26 0F 54 |AATSEN NODIG.&.T|
00000700: 01 99 22 11 4F 4D 44 41 54 20 44 45 20 5A 4F 45 |..".OMDAT DE ZOE|
00000710: 4B 47 45 42 49 45 44 20 4F 56 45 52 20 54 57 45 |KGEBIED OVER TWE|
00000720: 45 20 42 59 54 45 00 54 0F 59 01 99 22 11 41 44 |E BYTE.T.Y..".AD|
00000730: 52 45 53 53 45 4E 20 4C 4F 4F 50 54 2E 20 57 45 |RESSEN LOOPT. WE|
00000740: 20 4B 49 45 5A 45 4E 20 44 45 20 54 45 4C 4C 45 | KIEZEN DE TELLE|
00000750: 52 20 49 4E 00 80 0F 5E 01 99 22 11 5A 45 52 4F |R IN...^..".ZERO|
00000760: 2D 50 41 47 45 20 4F 4D 44 41 54 20 44 41 54 20 |-PAGE OMDAT DAT |
00000770: 53 4E 45 4C 4C 45 52 20 57 45 52 4B 54 20 45 4E |SNELLER WERKT EN|
00000780: 00 A8 0F 63 01 99 22 11 4F 4D 44 41 54 20 44 45 |...c..".OMDAT DE|
00000790: 5A 45 20 49 4E 44 49 52 45 4B 54 20 47 45 41 44 |ZE INDIREKT GEAD|
000007A0: 52 45 53 53 45 45 52 44 00 BE 0F 68 01 99 22 11 |RESSEERD...h..".|
000007B0: 4B 55 4E 4E 45 4E 20 57 4F 52 44 45 4E 2E 00 D3 |KUNNEN WORDEN...|
000007C0: 0F 6D 01 49 B2 34 3A 8D 39 34 35 3A 8B 46 4C A7 |.m.I.4:.945:.FL.|
000007D0: 32 36 35 00 FC 0F 72 01 99 22 93 1C 45 45 52 53 |265...r.."..EERS|
000007E0: 54 20 5A 45 54 54 45 4E 20 57 45 20 48 45 54 20 |T ZETTEN WE HET |
000007F0: 53 54 41 52 54 41 44 52 45 53 2D 31 00 27 10 77 |STARTADRES-1.'.w|
00000800: 01 99 22 11 49 4E 20 44 45 20 54 45 4C 4C 45 52 |..".IN DE TELLER|
00000810: 2D 47 45 48 45 55 47 45 4E 50 4C 41 41 54 53 45 |-GEHEUGENPLAATSE|
00000820: 4E 2E 20 44 45 4E 4B 00 4C 10 7C 01 99 22 11 41 |N. DENK.L.|..".A|
00000830: 41 4E 20 44 45 20 56 4F 4C 47 4F 52 44 45 21 20 |AN DE VOLGORDE! |
00000840: 28 4C 41 41 47 2F 48 4F 4F 47 29 3A 00 64 10 81 |(LAAG/HOOG):.d..|
00000850: 01 99 22 11 1F 20 20 20 20 20 20 20 4C 44 41 20 |..".. LDA |
00000860: 23 24 46 46 00 8B 10 86 01 99 22 11 20 20 20 20 |#$FF......". |
00000870: 20 20 20 53 54 41 20 24 46 42 20 20 20 20 90 24 | STA $FB .$|
00000880: 46 46 20 4E 41 41 52 20 24 46 42 00 A3 10 8B 01 |FF NAAR $FB.....|
00000890: 99 22 11 1F 20 20 20 20 20 20 20 4C 44 41 20 23 |.".. LDA #|
000008A0: 24 30 37 00 CA 10 90 01 99 22 11 20 20 20 20 20 |$07......". |
000008B0: 20 20 53 54 41 20 24 46 43 20 20 20 20 90 24 30 | STA $FC .$0|
000008C0: 37 20 4E 41 41 52 20 24 46 43 00 F7 10 95 01 99 |7 NAAR $FC......|
000008D0: 22 11 11 05 4F 4D 44 41 54 20 57 45 20 49 4E 44 |"...OMDAT WE IND|
000008E0: 49 52 45 4B 54 20 57 49 4C 4C 45 4E 20 41 44 52 |IREKT WILLEN ADR|
000008F0: 45 53 53 45 52 45 4E 00 17 11 9A 01 99 22 11 5A |ESSEREN......".Z|
00000900: 45 54 54 45 4E 20 57 45 20 4E 4F 47 20 24 30 30 |ETTEN WE NOG $00|
00000910: 20 49 4E 20 59 52 3A 00 2F 11 9F 01 99 22 11 1F | IN YR:./...."..|
00000920: 20 20 20 20 20 20 20 4C 44 59 20 23 24 30 30 00 | LDY #$00.|
00000930: 44 11 A4 01 49 B2 35 3A 8D 39 34 35 3A 8B 46 4C |D...I.5:.945:.FL|
00000940: A7 33 33 30 00 70 11 A9 01 99 22 93 9E 57 45 20 |.330.p...."..WE |
00000950: 42 45 47 49 4E 4E 45 4E 20 4E 55 20 44 45 20 5A |BEGINNEN NU DE Z|
00000960: 4F 45 4B 2D 4C 4F 4F 50 20 4D 45 54 20 48 45 54 |OEK-LOOP MET HET|
00000970: 00 95 11 AE 01 99 22 11 56 45 52 48 4F 47 45 4E |......".VERHOGEN|
00000980: 20 56 41 4E 20 44 45 20 54 45 4C 4C 45 52 20 4D | VAN DE TELLER M|
00000990: 45 54 20 31 3A 00 BE 11 B3 01 99 22 11 20 1C 20 |ET 1:......". . |
000009A0: 20 20 20 49 4E 43 20 24 46 42 20 20 90 20 56 45 | INC $FB . VE|
000009B0: 52 48 4F 4F 47 20 4C 4F 57 2D 42 59 54 45 00 DD |RHOOG LOW-BYTE..|
000009C0: 11 B8 01 99 22 11 20 05 20 20 B0 5F 1C 42 4E 45 |....". . ._.BNE|
000009D0: 20 24 30 34 90 20 20 20 3D 20 30 20 3F 00 0A 12 | $04. = 0 ?...|
000009E0: BD 01 99 22 20 05 20 20 DD 11 9D DD 1C 20 49 4E |..." . ..... IN|
000009F0: 43 20 24 46 43 20 90 20 20 56 45 52 48 4F 4F 47 |C $FC . VERHOOG|
00000A00: 20 48 49 47 48 2D 42 59 54 45 00 2D 12 C2 01 99 | HIGH-BYTE.-....|
00000A10: 22 20 05 20 20 DD 11 9D DD 20 1C 42 4D 49 20 24 |" . .... .BMI $|
00000A20: 2E 2E 20 90 20 20 3D 20 24 38 30 20 3F 00 42 12 |.. . = $80 ?.B.|
00000A30: C7 01 99 22 20 05 20 20 DD 11 9D AD C0 1C 2E 2E |..." . ........|
00000A40: 2E 2E 00 71 12 CC 01 99 22 11 90 44 4F 4F 52 20 |...q...."..DOOR |
00000A50: 42 4E 45 20 57 4F 52 44 54 20 24 46 43 20 41 4C |BNE WORDT $FC AL|
00000A60: 4C 45 45 4E 20 56 45 52 48 4F 4F 47 44 20 41 4C |LEEN VERHOOGD AL|
00000A70: 53 00 96 12 D1 01 99 22 11 48 45 54 20 4C 4F 57 |S......".HET LOW|
00000A80: 2D 42 59 54 45 20 47 45 44 45 45 4C 54 45 20 4E |-BYTE GEDEELTE N|
00000A90: 55 4C 20 49 53 2E 00 BF 12 D6 01 99 22 11 4D 45 |UL IS.......".ME|
00000AA0: 54 20 42 4D 49 20 4D 4F 45 54 20 42 49 4A 20 48 |T BMI MOET BIJ H|
00000AB0: 45 54 20 42 45 52 45 49 4B 45 4E 20 56 41 4E 00 |ET BEREIKEN VAN.|
00000AC0: EA 12 DB 01 99 22 11 24 38 30 30 30 20 57 45 47 |.....".$8000 WEG|
00000AD0: 47 45 53 50 52 4F 4E 47 45 4E 20 57 4F 52 44 45 |GESPRONGEN WORDE|
00000AE0: 4E 20 4E 41 41 52 20 45 45 4E 00 08 13 E0 01 99 |N NAAR EEN......|
00000AF0: 22 11 50 4C 41 41 54 53 20 57 41 41 52 20 52 54 |".PLAATS WAAR RT|
00000B00: 53 20 53 54 41 41 54 2E 00 1D 13 E5 01 49 B2 36 |S STAAT......I.6|
00000B10: 3A 8D 39 34 35 3A 8B 46 4C A7 33 37 30 00 47 13 |:.945:.FL.370.G.|
00000B20: EA 01 99 22 93 1F 4E 55 20 56 4F 4C 47 54 20 44 |..."..NU VOLGT D|
00000B30: 45 20 54 45 53 54 20 4F 46 20 44 45 20 49 4E 48 |E TEST OF DE INH|
00000B40: 4F 55 44 20 56 41 4E 00 74 13 EF 01 99 22 11 44 |OUD VAN.t....".D|
00000B50: 45 20 43 45 4C 20 57 41 41 52 56 41 4E 20 48 45 |E CEL WAARVAN HE|
00000B60: 54 20 41 44 52 45 53 20 49 4E 20 44 45 20 54 45 |T ADRES IN DE TE|
00000B70: 4C 4C 45 52 00 A2 13 F4 01 99 22 11 53 54 41 41 |LLER......".STAA|
00000B80: 54 20 4F 4F 4B 20 4E 55 4C 20 49 53 2E 20 5A 4F |T OOK NUL IS. ZO|
00000B90: 20 4E 49 45 54 2C 20 44 41 4E 20 53 50 52 49 4E | NIET, DAN SPRIN|
00000BA0: 47 54 00 CE 13 F9 01 99 22 11 48 45 54 20 50 52 |GT......".HET PR|
00000BB0: 4F 47 52 41 4D 4D 41 20 4E 41 41 52 20 44 45 20 |OGRAMMA NAAR DE |
00000BC0: 50 4C 41 41 54 53 20 57 41 41 52 20 44 45 00 EC |PLAATS WAAR DE..|
00000BD0: 13 FE 01 99 22 11 54 45 4C 4C 45 52 20 57 4F 52 |....".TELLER WOR|
00000BE0: 44 54 20 56 45 52 48 4F 4F 47 44 2E 00 17 14 03 |DT VERHOOGD.....|
00000BF0: 02 99 22 11 11 11 05 20 20 20 20 20 20 4C 44 41 |..".... LDA|
00000C00: 20 28 24 46 42 29 2C 59 20 20 42 45 44 45 4E 4B | ($FB),Y BEDENK|
00000C10: 3A 20 59 3D 30 20 21 00 43 14 08 02 99 22 11 20 |: Y=0 !.C....". |
00000C20: 20 20 20 20 20 42 4E 45 20 24 2E 2E 20 20 20 20 | BNE $.. |
00000C30: 20 20 53 50 52 49 4E 47 20 4E 41 41 52 20 27 49 | SPRING NAAR 'I|
00000C40: 4E 43 27 00 58 14 0D 02 49 B2 37 3A 8D 39 34 35 |NC'.X...I.7:.945|
00000C50: 3A 8B 46 4C A7 34 32 35 00 86 14 12 02 99 22 93 |:.FL.425......".|
00000C60: 90 57 41 53 20 44 45 20 43 45 4C 49 4E 48 4F 55 |.WAS DE CELINHOU|
00000C70: 44 20 57 45 4C 20 24 30 30 2C 20 44 41 4E 20 4D |D WEL $00, DAN M|
00000C80: 4F 45 54 20 44 45 00 A9 14 17 02 99 22 11 56 4F |OET DE......".VO|
00000C90: 4C 47 45 4E 44 45 20 43 45 4C 20 57 4F 52 44 45 |LGENDE CEL WORDE|
00000CA0: 4E 20 47 45 54 45 53 54 3A 00 CC 14 1C 02 99 22 |N GETEST:......"|
00000CB0: 11 05 20 20 20 20 20 20 20 49 4E 59 20 20 20 20 |.. INY |
00000CC0: 20 20 20 20 20 4E 55 3A 20 59 3D 31 00 E6 14 21 | NU: Y=1...!|
00000CD0: 02 99 22 11 20 20 20 20 20 20 20 4C 44 41 20 28 |..". LDA (|
00000CE0: 24 46 42 29 2C 59 00 10 15 26 02 99 22 11 20 20 |$FB),Y...&..". |
00000CF0: 20 20 20 20 20 42 4E 45 20 24 2E 2E 20 20 20 20 | BNE $.. |
00000D00: 20 4E 41 41 52 20 27 4C 44 59 20 23 24 30 30 27 | NAAR 'LDY #$00'|
00000D10: 00 3C 15 2B 02 99 22 11 90 41 4C 53 20 44 45 5A |.<.+.."..ALS DEZ|
00000D20: 45 20 43 45 4C 49 4E 48 4F 55 44 20 4F 4F 4B 20 |E CELINHOUD OOK |
00000D30: 24 30 30 20 49 53 2C 20 4D 4F 45 54 00 63 15 30 |$00 IS, MOET.c.0|
00000D40: 02 99 22 11 4E 4F 47 20 44 45 20 44 45 52 44 45 |..".NOG DE DERDE|
00000D50: 20 43 45 4C 20 57 4F 52 44 45 4E 20 47 45 54 45 | CEL WORDEN GETE|
00000D60: 53 54 3A 00 86 15 35 02 99 22 11 05 20 20 20 20 |ST:...5..".. |
00000D70: 20 20 20 49 4E 59 20 20 20 20 20 20 20 20 20 4E | INY N|
00000D80: 55 3A 20 59 3D 32 00 A0 15 3A 02 99 22 11 20 20 |U: Y=2...:..". |
00000D90: 20 20 20 20 20 4C 44 41 20 28 24 46 42 29 2C 59 | LDA ($FB),Y|
00000DA0: 00 CA 15 3F 02 99 22 11 20 20 20 20 20 20 20 42 |...?..". B|
00000DB0: 4E 45 20 24 2E 2E 20 20 20 20 20 4E 41 41 52 20 |NE $.. NAAR |
00000DC0: 27 4C 44 59 20 23 24 30 30 27 00 F8 15 44 02 99 |'LDY #$00'...D..|
00000DD0: 22 11 90 45 4E 20 41 4C 53 20 44 45 5A 45 20 43 |"..EN ALS DEZE C|
00000DE0: 45 4C 49 4E 48 4F 55 44 20 4F 4F 4B 20 24 30 30 |ELINHOUD OOK $00|
00000DF0: 20 49 53 2C 20 44 41 4E 00 24 16 49 02 99 22 11 | IS, DAN.$.I..".|
00000E00: 05 20 20 20 20 20 20 20 52 54 53 20 20 20 20 20 |. RTS |
00000E10: 20 20 20 20 54 45 52 55 47 20 4E 41 41 52 20 42 | TERUG NAAR B|
00000E20: 41 53 49 43 00 39 16 4E 02 49 B2 38 3A 8D 39 34 |ASIC.9.N.I.8:.94|
00000E30: 35 3A 8B 46 4C A7 34 39 30 00 5C 16 53 02 99 22 |5:.FL.490.\.S.."|
00000E40: 93 05 4E 55 20 4E 4F 47 20 45 45 4E 53 20 41 4C |..NU NOG EENS AL|
00000E50: 4C 45 53 20 53 41 4D 45 4E 3A 11 22 00 87 16 58 |LES SAMEN:."...X|
00000E60: 02 99 22 20 20 20 20 20 20 4C 44 41 20 23 24 46 |.." LDA #$F|
00000E70: 46 90 20 20 20 20 20 20 53 54 41 52 54 41 44 52 |F. STARTADR|
00000E80: 20 3D 20 30 37 46 46 00 9C 16 5D 02 99 22 05 20 | = 07FF...]..". |
00000E90: 20 20 20 20 20 53 54 41 20 24 46 42 00 B1 16 62 | STA $FB...b|
00000EA0: 02 99 22 20 20 20 20 20 20 4C 44 41 20 23 24 30 |.." LDA #$0|
00000EB0: 37 00 C5 16 67 02 99 22 20 20 20 20 20 20 53 54 |7...g.." ST|
00000EC0: 41 20 24 46 43 00 EF 16 6C 02 99 22 1C 20 20 B0 |A $FC...l..". .|
00000ED0: C0 C0 C0 05 4C 44 59 20 23 24 30 30 90 20 20 20 |....LDY #$00. |
00000EE0: 20 20 20 59 2C 20 53 54 41 52 54 20 3D 20 30 00 | Y, START = 0.|
00000EF0: FA 16 71 02 99 22 1C 20 20 DD 00 24 17 76 02 99 |..q..". ..$.v..|
00000F00: 22 20 20 DD B0 C0 C0 05 49 4E 43 20 24 46 42 20 |" .....INC $FB |
00000F10: 90 20 20 20 20 20 20 41 44 52 20 3D 20 41 44 52 |. ADR = ADR|
00000F20: 20 2B 20 31 00 47 17 7B 02 99 22 1C 20 20 DD DD | + 1.G.{..". ..|
00000F30: B0 5F 05 42 4E 45 20 24 2E 2E 90 20 20 20 20 20 |._.BNE $... |
00000F40: 20 20 3D 20 30 20 3F 00 5D 17 80 02 99 22 1C 20 | = 0 ?.]....". |
00000F50: 20 DD DD DD 20 05 49 4E 43 20 24 46 43 00 82 17 | ... .INC $FC...|
00000F60: 85 02 99 22 1C 20 B0 DD DD DD 5F 05 42 4D 49 20 |...". ...._.BMI |
00000F70: 24 2E 2E 90 20 20 20 20 20 20 20 4B 4C 41 41 52 |$... KLAAR|
00000F80: 20 3F 00 8F 17 8A 02 99 22 1C 20 DD DD DD DD 00 | ?......". .....|
00000F90: B1 17 8F 02 99 22 20 DD DD DD AD C0 05 4C 44 41 |....." ......LDA|
00000FA0: 20 28 24 46 42 29 2C 59 90 20 20 20 59 20 3D 20 | ($FB),Y. Y = |
00000FB0: 30 00 D4 17 94 02 99 22 1C 20 DD DD AD C0 5F 05 |0......". ...._.|
00000FC0: 42 4E 45 20 24 2E 2E 90 20 20 20 20 20 20 20 3D |BNE $... =|
00000FD0: 20 30 20 3F 00 DF 17 99 02 99 22 1C 20 DD DD 00 | 0 ?......". ...|
00000FE0: 01 18 9E 02 99 22 20 DD DD 20 20 20 05 49 4E 59 |....." .. .INY|
00000FF0: 20 20 90 20 20 20 20 20 20 20 20 20 59 20 3D 20 | . Y = |
00001000: 31 00 1B 18 A3 02 99 22 1C 20 DD DD 20 20 05 20 |1......". .. . |
00001010: 4C 44 41 20 28 24 46 42 29 2C 59 00 3E 18 A8 02 |LDA ($FB),Y.>...|
00001020: 99 22 1C 20 DD AB C0 C0 5F 05 42 4E 45 20 24 2E |.". ...._.BNE $.|
00001030: 2E 90 20 20 20 20 20 20 20 3D 20 30 20 3F 00 61 |.. = 0 ?.a|
00001040: 18 AD 02 99 22 1C 20 DD DD 20 05 20 20 49 4E 59 |....". .. . INY|
00001050: 20 90 20 20 20 20 20 20 20 20 20 20 59 20 3D 20 | . Y = |
00001060: 32 00 7B 18 B2 02 99 22 1C 20 DD DD 20 20 05 20 |2.{....". .. . |
00001070: 4C 44 41 20 28 24 46 42 29 2C 59 00 9E 18 B7 02 |LDA ($FB),Y.....|
00001080: 99 22 1C 20 DD AD C0 C0 5F 05 42 4E 45 20 24 2E |.". ...._.BNE $.|
00001090: 2E 20 20 90 20 20 20 20 20 3D 20 30 20 3F 00 C1 |. . = 0 ?..|
000010A0: 18 BC 02 99 22 1C 20 AD C0 C0 C0 C0 05 52 54 53 |....". ......RTS|
000010B0: 20 20 90 20 20 20 20 20 20 20 20 20 4B 4C 41 41 | . KLAA|
000010C0: 52 00 D6 18 C1 02 49 B2 39 3A 8D 39 34 35 3A 8B |R.....I.9:.945:.|
000010D0: 46 4C A7 35 33 30 00 01 19 C6 02 99 22 93 1F 4E |FL.530......"..N|
000010E0: 55 20 45 45 4E 20 4B 4C 45 49 4E 20 54 45 53 54 |U EEN KLEIN TEST|
000010F0: 4A 45 21 20 20 57 45 20 52 4F 45 50 45 4E 20 44 |JE! WE ROEPEN D|
00001100: 45 00 2E 19 CB 02 99 22 11 5A 4F 45 4B 52 4F 55 |E......".ZOEKROU|
00001110: 54 49 4E 45 20 4D 45 54 20 53 59 53 20 38 32 36 |TINE MET SYS 826|
00001120: 20 41 41 4E 20 45 4E 20 5A 45 54 54 45 4E 00 5D | AAN EN ZETTEN.]|
00001130: 19 D0 02 99 22 11 44 41 4E 20 48 45 54 20 49 4E |....".DAN HET IN|
00001140: 20 24 46 42 2F 46 43 20 53 54 41 41 4E 44 20 41 | $FB/FC STAAND A|
00001150: 44 52 45 53 20 44 45 43 49 4D 41 41 4C 00 8C 19 |DRES DECIMAAL...|
00001160: D5 02 99 22 11 4F 50 20 48 45 54 20 53 43 48 45 |...".OP HET SCHE|
00001170: 52 4D 3A 20 50 45 45 4B 28 32 35 31 29 2B 32 35 |RM: PEEK(251)+25|
00001180: 36 2A 50 45 45 4B 28 32 35 32 29 2E 00 B8 19 DA |6*PEEK(252).....|
00001190: 02 99 22 11 05 4F 4D 20 45 45 4E 20 49 44 45 45 |.."..OM EEN IDEE|
000011A0: 20 54 45 20 4B 52 49 4A 47 45 4E 20 48 4F 45 20 | TE KRIJGEN HOE |
000011B0: 53 4E 45 4C 20 44 41 54 00 E5 19 DF 02 99 22 11 |SNEL DAT......".|
000011C0: 47 41 41 54 2C 20 4C 41 54 45 4E 20 57 45 20 44 |GAAT, LATEN WE D|
000011D0: 45 20 36 34 20 4F 4E 44 45 52 20 48 45 54 20 5A |E 64 ONDER HET Z|
000011E0: 4F 45 4B 45 4E 00 12 1A E4 02 99 22 11 45 45 4E |OEKEN......".EEN|
000011F0: 20 5A 57 41 52 54 45 20 42 41 4C 4B 20 4F 50 20 | ZWARTE BALK OP |
00001200: 48 45 54 20 53 43 48 45 52 4D 20 5A 45 54 54 45 |HET SCHERM ZETTE|
00001210: 4E 2E 00 32 1A E9 02 99 22 11 11 90 42 45 4E 20 |N..2...."...BEN |
00001220: 4A 45 20 4B 4C 41 41 52 20 28 4A 2F 4E 29 20 3F |JE KLAAR (J/N) ?|
00001230: 11 11 00 47 1A EE 02 A1 58 24 3A 8B 58 24 B3 B1 |...G....X$:.X$..|
00001240: 22 4A 22 A7 37 35 30 00 77 1A F3 02 81 43 B2 30 |"J".750.w....C.0|
00001250: A4 31 30 3A 81 57 B2 30 A4 34 30 30 AC B4 28 43 |.10:.W.0.400..(C|
00001260: 29 3A 82 57 3A 99 22 91 20 20 20 9D 9D 9D 22 3B |):.W:.". ...";|
00001270: 31 30 AB 43 3A 82 43 00 B6 1A F8 02 99 22 91 12 |10.C:.C......"..|
00001280: 20 20 20 20 20 20 20 20 20 20 92 22 3A 9E 38 32 | .":.82|
00001290: 36 3A 99 22 05 91 41 44 52 20 3D 22 3B C2 28 32 |6:."..ADR =";.(2|
000012A0: 35 31 29 AA 32 35 36 AC C2 28 32 35 32 29 3B 22 |51).256..(252);"|
000012B0: 20 20 20 20 20 22 00 D1 1A FD 02 99 22 11 90 56 | "......"..V|
000012C0: 4C 55 47 2C 20 4E 49 45 54 20 57 41 41 52 20 3F |LUG, NIET WAAR ?|
000012D0: 21 00 E7 1A 02 03 49 B2 31 30 3A 8D 39 34 35 3A |!.....I.10:.945:|
000012E0: 8B 46 4C A7 35 39 35 00 13 1B 07 03 99 22 93 05 |.FL.595......"..|
000012F0: 45 45 4E 20 54 4F 45 50 41 53 53 49 4E 47 20 56 |EEN TOEPASSING V|
00001300: 41 4E 20 44 49 54 20 50 52 4F 47 52 41 4D 4D 41 |AN DIT PROGRAMMA|
00001310: 20 49 53 00 3A 1B 0C 03 99 22 11 44 45 20 42 45 | IS.:....".DE BE|
00001320: 52 45 4B 45 4E 49 4E 47 20 56 41 4E 20 44 45 20 |REKENING VAN DE |
00001330: 4C 45 4E 47 54 45 20 56 41 4E 00 67 1B 11 03 99 |LENGTE VAN.g....|
00001340: 22 11 42 41 53 49 43 2D 50 52 4F 47 52 41 4D 4D |".BASIC-PROGRAMM|
00001350: 41 27 53 2E 20 45 45 4E 20 42 41 53 49 43 2D 50 |A'S. EEN BASIC-P|
00001360: 52 4F 47 52 41 4D 2D 00 93 1B 16 03 99 22 11 4D |ROGRAM-......".M|
00001370: 41 20 42 45 47 49 4E 54 20 4F 50 20 24 30 38 30 |A BEGINT OP $080|
00001380: 31 20 3D 20 31 30 32 35 20 45 4E 20 45 49 4E 44 |1 = 1025 EN EIND|
00001390: 49 47 54 00 C2 1B 1B 03 99 22 11 4F 50 20 44 45 |IGT......".OP DE|
000013A0: 20 50 4C 41 41 54 53 20 57 41 41 52 20 44 45 20 | PLAATS WAAR DE |
000013B0: 44 52 49 45 20 24 30 30 20 42 45 47 49 4E 4E 45 |DRIE $00 BEGINNE|
000013C0: 4E 2E 00 E4 1B 20 03 99 22 11 11 90 57 45 20 4B |N.... .."...WE K|
000013D0: 55 4E 4E 45 4E 20 44 55 53 20 53 43 48 52 49 4A |UNNEN DUS SCHRIJ|
000013E0: 56 45 4E 3A 00 25 1C 25 03 99 22 11 1F 31 2E 20 |VEN:.%.%.."..1. |
000013F0: 27 53 59 53 20 38 32 36 27 22 3A 99 22 11 32 2E |'SYS 826'":.".2.|
00001400: 20 27 50 52 49 4E 54 20 50 45 45 4B 28 32 35 31 | 'PRINT PEEK(251|
00001410: 29 2B 32 35 36 2A 50 45 45 4B 28 32 35 32 29 2D |)+256*PEEK(252)-|
00001420: 31 30 32 35 27 00 54 1C 2A 03 99 22 11 90 45 4E |1025'.T.*.."..EN|
00001430: 20 4B 52 49 4A 47 45 4E 20 41 4C 53 20 52 45 53 | KRIJGEN ALS RES|
00001440: 55 4C 54 41 41 54 20 44 45 20 4C 45 4E 47 54 45 |ULTAAT DE LENGTE|
00001450: 20 56 41 4E 00 79 1C 2F 03 99 22 11 48 45 54 20 | VAN.y./..".HET |
00001460: 42 41 53 49 43 2D 50 52 4F 47 52 41 4D 4D 41 20 |BASIC-PROGRAMMA |
00001470: 49 4E 20 42 59 54 45 53 2E 00 8F 1C 34 03 49 B2 |IN BYTES....4.I.|
00001480: 31 31 3A 8D 39 34 35 3A 8B 46 4C A7 37 31 30 00 |11:.945:.FL.710.|
00001490: A1 1C 39 03 99 22 93 9E 4F 50 47 41 56 45 4E 20 |..9.."..OPGAVEN |
000014A0: 3A 00 D0 1C 3E 03 99 22 11 90 31 2E 20 42 45 50 |:...>.."..1. BEP|
000014B0: 41 41 4C 20 44 45 20 4C 45 4E 47 54 45 20 56 41 |AAL DE LENGTE VA|
000014C0: 4E 20 44 49 54 20 50 52 4F 47 52 41 4D 4D 41 2E |N DIT PROGRAMMA.|
000014D0: 00 FC 1C 43 03 99 22 11 05 32 2E 20 46 52 45 28 |...C.."..2. FRE(|
000014E0: 30 29 20 48 4F 55 44 54 20 4F 4F 4B 20 52 45 4B |0) HOUDT OOK REK|
000014F0: 45 4E 49 4E 47 20 4D 45 54 20 44 45 00 25 1D 48 |ENING MET DE.%.H|
00001500: 03 99 22 11 20 20 20 56 4F 4F 52 20 56 41 52 49 |..". VOOR VARI|
00001510: 41 42 45 4C 45 4E 20 4E 4F 44 49 47 45 20 52 55 |ABELEN NODIGE RU|
00001520: 49 4D 54 45 2E 00 51 1D 4D 03 99 22 11 20 20 20 |IMTE..Q.M..". |
00001530: 4D 45 54 20 44 49 54 20 4D 41 43 48 49 4E 45 2D |MET DIT MACHINE-|
00001540: 54 41 41 4C 2D 50 52 4F 47 52 41 4D 4D 41 20 45 |TAAL-PROGRAMMA E|
00001550: 4E 00 7D 1D 52 03 99 22 11 20 20 20 46 52 45 28 |N.}.R..". FRE(|
00001560: 30 29 20 4D 4F 45 54 20 4A 45 20 44 45 20 56 4F |0) MOET JE DE VO|
00001570: 4F 52 20 56 41 52 49 41 42 45 4C 45 4E 00 9E 1D |OR VARIABELEN...|
00001580: 57 03 99 22 11 20 20 20 4E 4F 44 49 47 45 20 52 |W..". NODIGE R|
00001590: 55 49 4D 54 45 20 42 45 50 41 4C 45 4E 2E 00 CC |UIMTE BEPALEN...|
000015A0: 1D 5C 03 99 22 11 90 33 2E 20 50 52 4F 42 45 45 |.\.."..3. PROBEE|
000015B0: 52 20 4D 45 54 20 44 45 20 49 4E 54 45 52 4E 45 |R MET DE INTERNE|
000015C0: 20 4B 4C 4F 4B 20 54 45 20 42 45 2D 00 FA 1D 61 | KLOK TE BE-...a|
000015D0: 03 99 22 11 20 20 20 50 41 4C 45 4E 20 48 4F 45 |..". PALEN HOE|
000015E0: 20 53 4E 45 4C 20 44 45 20 5A 4F 45 4B 52 4F 55 | SNEL DE ZOEKROU|
000015F0: 54 49 4E 45 20 49 53 20 49 4E 00 17 1E 66 03 99 |TINE IS IN...f..|
00001600: 22 11 20 20 20 4B 42 59 54 45 20 50 45 52 20 53 |". KBYTE PER S|
00001610: 45 43 4F 4E 44 45 2E 00 2D 1E 6B 03 49 B2 31 32 |ECONDE..-.k.I.12|
00001620: 3A 8D 39 34 35 3A 8B 46 4C A7 37 37 35 00 5A 1E |:.945:.FL.775.Z.|
00001630: 70 03 99 22 93 05 34 2E 20 57 41 41 52 4F 4D 20 |p.."..4. WAAROM |
00001640: 57 4F 52 44 54 20 41 4C 53 20 53 54 41 52 54 41 |WORDT ALS STARTA|
00001650: 44 52 45 53 20 24 30 37 46 46 00 82 1E 75 03 99 |DRES $07FF...u..|
00001660: 22 11 20 20 20 47 45 4E 4F 4D 45 4E 20 49 4E 20 |". GENOMEN IN |
00001670: 50 4C 41 41 54 53 20 56 41 4E 20 24 30 38 30 30 |PLAATS VAN $0800|
00001680: 20 3F 00 B0 1E 7A 03 99 22 11 90 35 2E 20 57 41 | ?...z.."..5. WA|
00001690: 4E 4E 45 45 52 20 57 4F 52 44 54 20 24 46 43 20 |NNEER WORDT $FC |
000016A0: 4D 45 54 20 31 20 56 45 52 48 4F 4F 47 44 20 3F |MET 1 VERHOOGD ?|
000016B0: 00 DB 1E 7F 03 99 22 11 05 36 2E 20 42 49 4A 20 |......"..6. BIJ |
000016C0: 50 52 45 43 49 45 53 20 57 45 4C 4B 20 41 44 52 |PRECIES WELK ADR|
000016D0: 45 53 20 57 4F 52 44 54 20 49 4E 00 04 1F 84 03 |ES WORDT IN.....|
000016E0: 99 22 11 20 20 20 45 4C 4B 20 47 45 56 41 4C 20 |.". ELK GEVAL |
000016F0: 47 45 53 54 4F 50 54 20 4D 45 54 20 5A 4F 45 4B |GESTOPT MET ZOEK|
00001700: 45 4E 20 3F 00 33 1F 89 03 99 22 11 90 37 2E 20 |EN ?.3...."..7. |
00001710: 57 41 41 52 4F 4D 20 47 45 42 52 55 49 4B 45 4E |WAAROM GEBRUIKEN|
00001720: 20 57 45 20 41 4C 53 20 54 45 4C 4C 45 52 20 4E | WE ALS TELLER N|
00001730: 49 45 54 00 4F 1F 8E 03 99 22 11 20 20 20 47 45 |IET.O....". GE|
00001740: 57 4F 4F 4E 20 58 52 20 4F 46 20 59 52 20 3F 00 |WOON XR OF YR ?.|
00001750: 7B 1F 93 03 99 22 11 05 38 2E 20 57 41 41 52 4F |{...."..8. WAARO|
00001760: 4D 20 42 45 47 49 4E 54 20 44 45 20 42 49 4E 4E |M BEGINT DE BINN|
00001770: 45 4E 2D 4C 4F 4F 50 20 4D 45 54 00 A5 1F 98 03 |EN-LOOP MET.....|
00001780: 99 22 11 20 20 20 27 49 4E 43 20 24 46 42 27 20 |.". 'INC $FB' |
00001790: 45 4E 20 44 45 20 42 45 49 44 45 20 42 55 49 54 |EN DE BEIDE BUIT|
000017A0: 45 4E 53 54 45 00 C0 1F 9D 03 99 22 11 20 20 20 |ENSTE......". |
000017B0: 4D 45 54 20 27 4C 44 59 20 23 24 30 30 27 20 3F |MET 'LDY #$00' ?|
000017C0: 00 C9 1F A2 03 49 B2 31 33 00 DA 1F A7 03 8D 39 |.....I.13......9|
000017D0: 35 30 3A 91 46 4C 89 31 33 30 00 FA 1F AC 03 99 |50:.FL.130......|
000017E0: 22 93 05 44 41 54 20 57 41 53 20 48 45 54 2E 2E |"..DAT WAS HET..|
000017F0: 2E 2E 2E 2E 2E 2E 2E 22 3A 80 00 00 20 B1 03 8F |.......":... ...|
00001800: 00 49 20 B6 03 99 22 1C 13 11 11 11 11 11 11 11 |.I ...".........|
00001810: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001820: 11 2D 20 50 41 47 49 4E 41 22 3B 49 3B 22 2D 20 |.- PAGINA";I;"- |
00001830: 20 3C 2B 3E 20 56 45 52 44 45 52 20 20 3C 2D 3E | <+> VERDER <->|
00001840: 20 54 45 52 55 47 13 22 3B 00 5B 20 BB 03 81 49 | TERUG.";.[ ...I|
00001850: B2 30 A4 31 31 3A A1 58 24 3A 82 00 6E 20 C0 03 |.0.11:.X$:..n ..|
00001860: A1 58 24 3A 8B 58 24 B2 22 22 A7 39 36 30 00 81 |.X$:.X$."".960..|
00001870: 20 C5 03 8B 58 24 B2 22 2B 22 A7 46 4C B2 30 3A | ...X$."+".FL.0:|
00001880: 8E 00 94 20 CA 03 8B 58 24 B2 22 2D 22 A7 46 4C |... ...X$."-".FL|
00001890: B2 31 3A 8E 00 9D 20 CF 03 89 39 36 30 00 00 00 |.1:... ...960...|
....D...'.I.. AANPASSINGEN COMMODORE 64.
-.N...E.S.. COURBOIS SOFTWARE.K.X...P.}.
."."G(8)G(142):.53280,0:.53281,5.V......
...U$."..........":O$.".........":I$."IN
PUT-ROUTINE":B$." BEELDSCHERM"......169,
255,133,251,169,7,133,252,160,0,230,251,
208,4,230,252,48.C....14,177,251,208,244
,200,177,251,208,237,200,177,251,208,232
,96.S....".. *** COMMODORE 64 ** MACHINE
TAAL 12 ***......"..3. ZOEKROUTINES... .
."...EEN VEEL VOORKOMEND PROBLEEM VORMEN
......".DE ZOEK-ROUTINES. IN DEZE LES GA
AN WE......".DE OPBOUW VAN EEN DERGELIJK
E ROUTINE.%....".ONDERZOEKEN..R...."...H
ET GROTE VOORDEEL VAN MACHINETAAL-.}....
".ZOEK-ROUTINES IS DE GROTE SNELHEID....
...".(CA. 1000 MAAL SNELLER DAN BASIC.).
C.C..:.I.0.32:.X:.826.I,X:..X.H.I.1:.945
:.FL.150...M.."..WE GAAN DE OPBOUW VAN Z
OEK-ROUTINES.1.R..".ONDERZOEKEN AAN DE H
AND VAN EEN VOOR-.?.W..".BEELD..N...."..
.STEL WE WILLEN HET GEHEUGENGEBIED VAN..
....".$0800 TOT $8000 NAZOEKEN OP DRIE..
....".OPVOLGENDE BYTES '$00-$00-$00'....
...".WE ZOEKEN DUS HET ADRES VAN HET EER
STE......".VAN DRIE OPVOLGENDE GEHEUGENP
LAATSEN.5....".MET STEEDS INHOUD $00..D.
..."...DIT IS NAMELIJK HET EINDADRES VAN
HET......".IN RAM STAAND BASICPROGRAMMA
......I.2:.945:.FL.150.I...."..WE HEBBEN
EEN TELLER NODIG DIE VAN......".$0800 T
OT $8000 KAN TELLEN. DE INHOUD.$....".VA
N DE CEL WAARVAN DE TELLER HET ADRES.P..
..".AANGEEFT WORDT GETEST OP INHOUD $00.
.{....".ALS DE INHOUD GEEN $00 IS, WORDT
DE. ."..".TELLERINHOUD 1 HOGER GEMAAKT.
.O.'.."..ALS DE INHOUD WEL $00 IS, WORDE
N BEIDE...,..".VOLGENDE CELLEN OOK OP $0
0 GETEST..'.1..".ZIJN NIET BEIDE CELLEN
$00, DAN ZOEKEN.T.6..".WE VERDER, ANDERS
WORDT HET ZOEKENGE-..;..".STOPT. MAXIM
AAL WORDT TOT $8000 GE-...@..".ZOCHT....
E.I.3:.945:.FL.205.N.J.."..ALS TELLER GE
BRUIKEN WE DE PLAATSEN...O..".$FB/$FC. W
E HEBBEN TWEE PLAATSEN NODIG.&.T..".OMDA
T DE ZOEKGEBIED OVER TWEE BYTE.T.Y..".AD
RESSEN LOOPT. WE KIEZEN DE TELLER IN...^
..".ZERO-PAGE OMDAT DAT SNELLER WERKT EN
...C..".OMDAT DEZE INDIREKT GEADRESSEERD
...H..".KUNNEN WORDEN..S.M.I.4:.945:.FL.
265...R.."..EERST ZETTEN WE HET STARTADR
ES-1.'.W..".IN DE TELLER-GEHEUGENPLAATSE
N. DENK.L.|..".AAN DE VOLGORDE! (LAAG/HO
OG):.D....".. LDA #$FF......".
STA $FB .$FF NAAR $FB......"..
LDA #$07.J....". STA $FC .$0
7 NAAR $FC......"...OMDAT WE INDIREKT WI
LLEN ADRESSEREN......".ZETTEN WE NOG $00
IN YR:./....".. LDY #$00.D...I.5:
.945:.FL.330.P...."..WE BEGINNEN NU DE Z
OEK-LOOP MET HET......".VERHOGEN VAN DE
TELLER MET 1:......". . INC $FB . VE
RHOOG LOW-BYTE......". . ._.BNE $04.
= 0 ?......" . ..... INC $FC . VERHOOG
HIGH-BYTE.-.B.." . .... .BMI $.. . =
$80 ?.B.G.." . ...........Q.L.."..DOOR
BNE WORDT $FC ALLEEN VERHOOGD ALS...Q.."
.HET LOW-BYTE GEDEELTE NUL IS....V..".ME
T BMI MOET BIJ HET BEREIKEN VAN......".$
8000 WEGGESPRONGEN WORDEN NAAR EEN......
".PLAATS WAAR RTS STAAT......I.6:.945:.F
L.370.G...."..NU VOLGT DE TEST OF DE INH
OUD VAN.T....".DE CEL WAARVAN HET ADRES
IN DE TELLER......".STAAT OOK NUL IS. ZO
NIET, DAN SPRINGT.N....".HET PROGRAMMA
NAAR DE PLAATS WAAR DE......".TELLER WOR
DT VERHOOGD.......".... LDA ($FB),Y
BEDENK: Y=0 !.C....". BNE $..
SPRING NAAR 'INC'.X...I.7:.945:.FL.425
......"..WAS DE CELINHOUD WEL $00, DAN M
OET DE......".VOLGENDE CEL WORDEN GETEST
:.L....".. INY NU: Y=1...!
..". LDA ($FB),Y...&..". BNE
$.. NAAR 'LDY #$00'.<.+.."..ALS DEZ
E CELINHOUD OOK $00 IS, MOET.C.0..".NOG
DE DERDE CEL WORDEN GETEST:...5.."..
INY NU: Y=2. .:..". LDA
($FB),Y.J.?..". BNE $.. NAAR
'LDY #$00'...D.."..EN ALS DEZE CELINHOUD
OOK $00 IS, DAN.$.I..".. RTS
TERUG NAAR BASIC.9.N.I.8:.945:.FL.49
0.\.S.."..NU NOG EENS ALLES SAMEN:."...X
.." LDA #$FF. STARTADR = 07FF.
..]..". STA $FB...B.." LDA #$0
7.E.G.." STA $FC...L..". .....LDY
#$00. Y, START = 0...Q..". ..$.V..
" .....INC $FB . ADR = ADR + 1.G.{
..". ..._.BNE $... = 0 ?.]....".
... .INC $FC......". ...._.BMI $...
KLAAR ?......". .........." ......LDA
($FB),Y. Y = 0.T....". ...._.BNE $...
= 0 ?......". ........" .. .INY
. Y = 1......". .. . LDA ($FB
),Y.>....". ...._.BNE $... = 0 ?.A
....". .. . INY . Y = 2.{...."
. .. . LDA ($FB),Y......". ...._.BNE $.
. . = 0 ?.A....". ......RTS .
KLAAR.V.A.I.9:.945:.FL.530...F.."..N
U EEN KLEIN TESTJE! WE ROEPEN DE...K.."
.ZOEKROUTINE MET SYS 826 AAN EN ZETTEN.]
.P..".DAN HET IN $FB/FC STAAND ADRES DEC
IMAAL...U..".OP HET SCHERM: PEEK(251)+25
6*PEEK(252)....Z.."..OM EEN IDEE TE KRIJ
GEN HOE SNEL DAT......".GAAT, LATEN WE D
E 64 ONDER HET ZOEKEN......".EEN ZWARTE
BALK OP HET SCHERM ZETTEN..2...."...BEN
JE KLAAR (J/N) ?...G....X$:.X$.."J".750.
W....C.0.10:.W.0.400..(C):.W:.". ...";
10.C:.C......".. .":.826:."..AD
R =";B(251).256.B(252);" ".Q...."..V
LUG, NIET WAAR ?!.....I.10:.945:.FL.595.
....."..EEN TOEPASSING VAN DIT PROGRAMMA
IS.:....".DE BEREKENING VAN DE LENGTE V
AN.G....".BASIC-PROGRAMMA'S. EEN BASIC-P
ROGRAM-......".MA BEGINT OP $0801 = 1025
EN EINDIGT.B....".OP DE PLAATS WAAR DE
DRIE $00 BEGINNEN.... .."...WE KUNNEN DU
S SCHRIJVEN:.%.%.."..1. 'SYS 826'":.".2.
'PRINT PEEK(251)+256*PEEK(252)-1025'.T.
*.."..EN KRIJGEN ALS RESULTAAT DE LENGTE
VAN.Y./..".HET BASIC-PROGRAMMA IN BYTES
....4.I.11:.945:.FL.710...9.."..OPGAVEN
:.P.>.."..1. BEPAAL DE LENGTE VAN DIT PR
OGRAMMA....C.."..2. FRE(0) HOUDT OOK REK
ENING MET DE.%.H..". VOOR VARIABELEN N
ODIGE RUIMTE..Q.M..". MET DIT MACHINE-
TAAL-PROGRAMMA EN.}.R..". FRE(0) MOET
JE DE VOOR VARIABELEN...W..". NODIGE R
UIMTE BEPALEN..L.\.."..3. PROBEER MET DE
INTERNE KLOK TE BE-...A..". PALEN HOE
SNEL DE ZOEKROUTINE IS IN...F..". KBY
TE PER SECONDE..-.K.I.12:.945:.FL.775.Z.
P.."..4. WAAROM WORDT ALS STARTADRES $07
FF...U..". GENOMEN IN PLAATS VAN $0800
?...Z.."..5. WANNEER WORDT $FC MET 1 VE
RHOOGD ?....."..6. BIJ PRECIES WELK ADR
ES WORDT IN......". ELK GEVAL GESTOPT
MET ZOEKEN ?.3...."..7. WAAROM GEBRUIKEN
WE ALS TELLER NIET.O....". GEWOON XR
OF YR ?.{...."..8. WAAROM BEGINT DE BINN
EN-LOOP MET......". 'INC $FB' EN DE BE
IDE BUITENSTE......". MET 'LDY #$00' ?
.I...I.13.Z....950:.FL.130......"..DAT W
AS HET.........":... ....I ...".........
.................- PAGINA";I;"- <+> VER
DER <-> TERUG.";.[ ...I.0.11:.X$:..N ..
.X$:.X$."".960.. E..X$."+".FL.0:... J..X
$."-".FL.1:... O..960...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL