6502 D12
FILE INFORMATION
FILENAME(S): 6502 D12
FILE TYPE(S): PRG
FILE SIZE: 6.1K
FIRST SEEN: 2025-11-02 16:30:32
APPEARS ON: 1 disk(s)
FILE HASH
ad643675c820a80221747de47f16182e60de3000b33c47125a06d3c4bb9fa000
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NG USERS 20A | 6502 D12 | PRG | Treasure Chest - OzzyC64 | 5 | 10 | 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 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 6E 08 78 00 83 31 36 39 2C 32 35 |...".n.x..169,25| 00000040: 35 2C 31 33 33 2C 31 2C 31 36 39 2C 33 2C 31 33 |5,133,1,169,3,13| 00000050: 33 2C 32 2C 31 36 30 2C 30 2C 32 33 30 2C 31 2C |3,2,160,0,230,1,| 00000060: 32 30 38 2C 34 2C 32 33 30 2C 32 2C 34 38 00 AB |208,4,230,2,48..| 00000070: 08 82 00 83 31 34 2C 31 37 37 2C 31 2C 32 30 38 |....14,177,1,208| 00000080: 2C 32 34 34 2C 32 30 30 2C 31 37 37 2C 31 2C 32 |,244,200,177,1,2| 00000090: 30 38 2C 32 33 37 2C 32 30 30 2C 31 37 37 2C 31 |08,237,200,177,1| 000000A0: 2C 32 30 38 2C 32 33 32 2C 39 36 00 DD 08 8C 00 |,208,232,96.....| 000000B0: 99 22 93 A4 A4 A4 A4 A4 A4 22 3B 4F 24 3B 4F 24 |.".......";O$;O$| 000000C0: 3A 99 22 12 43 55 52 53 55 53 20 4D 41 43 48 49 |:.".CURSUS MACHI| 000000D0: 4E 45 2D 54 41 41 4C 20 28 31 32 29 22 00 04 09 |NE-TAAL (12)"...| 000000E0: 96 00 99 22 A4 A4 A4 A4 A4 A4 A4 22 3B 4F 24 3A |...".......";O$:| 000000F0: 99 22 12 33 2E 20 5A 4F 45 4B 52 4F 55 54 49 4E |.".3. ZOEKROUTIN| 00000100: 45 53 20 22 00 31 09 A0 00 99 22 11 11 45 45 4E |ES ".1...."..EEN| 00000110: 20 56 45 45 4C 20 56 4F 4F 52 4B 4F 4D 45 4E 44 | VEEL VOORKOMEND| 00000120: 20 50 52 4F 42 4C 45 45 4D 20 56 4F 52 4D 45 4E | PROBLEEM VORMEN| 00000130: 22 00 5F 09 AA 00 99 22 11 44 45 20 5A 4F 45 4B |"._....".DE ZOEK| 00000140: 2D 52 4F 55 54 49 4E 45 53 2E 20 49 4E 20 44 45 |-ROUTINES. IN DE| 00000150: 5A 45 20 4C 45 53 20 47 41 41 4E 20 57 45 22 00 |ZE LES GAAN WE".| 00000160: 8C 09 B4 00 99 22 11 44 45 20 4F 50 42 4F 55 57 |.....".DE OPBOUW| 00000170: 20 56 41 4E 20 45 45 4E 20 44 45 52 47 45 4C 49 | VAN EEN DERGELI| 00000180: 4A 4B 45 20 52 4F 55 54 49 4E 45 22 00 A1 09 BE |JKE ROUTINE"....| 00000190: 00 99 22 11 4F 4E 44 45 52 5A 4F 45 4B 45 4E 2E |..".ONDERZOEKEN.| 000001A0: 22 00 CE 09 C8 00 99 22 11 11 48 45 54 20 47 52 |"......"..HET GR| 000001B0: 4F 54 45 20 56 4F 4F 52 44 45 45 4C 20 56 41 4E |OTE VOORDEEL VAN| 000001C0: 20 4D 41 43 48 49 4E 45 54 41 41 4C 2D 22 00 FA | MACHINETAAL-"..| 000001D0: 09 D2 00 99 22 11 5A 4F 45 4B 2D 52 4F 55 54 49 |....".ZOEK-ROUTI| 000001E0: 4E 45 53 20 49 53 20 44 45 20 47 52 4F 54 45 20 |NES IS DE GROTE | 000001F0: 53 4E 45 4C 48 45 49 44 2E 22 00 25 0A DC 00 99 |SNELHEID.".%....| 00000200: 22 11 28 43 41 2E 20 31 30 30 30 20 4D 41 41 4C |".(CA. 1000 MAAL| 00000210: 20 53 4E 45 4C 4C 45 52 20 44 41 4E 20 42 41 53 | SNELLER DAN BAS| 00000220: 49 43 2E 29 22 00 41 0A E6 00 8C 3A 81 49 B2 30 |IC.)".A....:.I.0| 00000230: A4 33 32 3A 87 58 3A 97 38 32 36 AA 49 2C 58 3A |.32:.X:.826.I,X:| 00000240: 82 00 57 0A F0 00 49 B2 31 3A 8D 31 37 34 30 3A |..W...I.1:.1740:| 00000250: 8B 46 4C A7 31 34 30 00 83 0A FA 00 99 22 93 57 |.FL.140......".W| 00000260: 45 20 47 41 41 4E 20 44 45 20 4F 50 42 4F 55 57 |E GAAN DE OPBOUW| 00000270: 20 56 41 4E 20 5A 4F 45 4B 2D 52 4F 55 54 49 4E | VAN ZOEK-ROUTIN| 00000280: 45 53 22 00 B1 0A 04 01 99 22 11 4F 4E 44 45 52 |ES"......".ONDER| 00000290: 5A 4F 45 4B 45 4E 20 41 41 4E 20 44 45 20 48 41 |ZOEKEN AAN DE HA| 000002A0: 4E 44 20 56 41 4E 20 45 45 4E 20 56 4F 4F 52 2D |ND VAN EEN VOOR-| 000002B0: 22 00 C0 0A 0E 01 99 22 11 42 45 45 4C 44 2E 22 |"......".BEELD."| 000002C0: 00 EE 0A 18 01 99 22 11 53 54 45 4C 20 57 45 20 |......".STEL WE | 000002D0: 57 49 4C 4C 45 4E 20 48 45 54 20 47 45 48 45 55 |WILLEN HET GEHEU| 000002E0: 47 45 4E 47 45 42 49 45 44 20 56 41 4E 22 00 17 |GENGEBIED VAN"..| 000002F0: 0B 22 01 99 22 11 24 30 34 30 30 20 54 4F 54 20 |."..".$0400 TOT | 00000300: 24 38 30 30 30 20 4E 41 5A 4F 45 4B 45 4E 20 4F |$8000 NAZOEKEN O| 00000310: 50 20 44 52 49 45 22 00 3F 0B 2C 01 99 22 11 4F |P DRIE".?.,..".O| 00000320: 50 56 4F 4C 47 45 4E 44 45 20 42 59 54 45 53 20 |PVOLGENDE BYTES | 00000330: 27 24 30 30 2D 24 30 30 2D 24 30 30 27 2E 22 00 |'$00-$00-$00'.".| 00000340: 6E 0B 36 01 99 22 11 57 45 20 5A 4F 45 4B 45 4E |n.6..".WE ZOEKEN| 00000350: 20 44 55 53 20 48 45 54 20 41 44 52 45 53 20 56 | DUS HET ADRES V| 00000360: 41 4E 20 48 45 54 20 45 45 52 53 54 45 22 00 9B |AN HET EERSTE"..| 00000370: 0B 40 01 99 22 11 56 41 4E 20 44 52 49 45 20 4F |.@..".VAN DRIE O| 00000380: 50 56 4F 4C 47 45 4E 44 45 20 47 45 48 45 55 47 |PVOLGENDE GEHEUG| 00000390: 45 4E 50 4C 41 41 54 53 45 4E 22 00 BA 0B 4A 01 |ENPLAATSEN"...J.| 000003A0: 99 22 11 4D 45 54 20 53 54 45 45 44 53 20 49 4E |.".MET STEEDS IN| 000003B0: 48 4F 55 44 20 24 30 30 2E 22 00 E9 0B 54 01 99 |HOUD $00."...T..| 000003C0: 22 11 11 44 49 54 20 49 53 20 4E 41 4D 45 4C 49 |"..DIT IS NAMELI| 000003D0: 4A 4B 20 48 45 54 20 45 49 4E 44 41 44 52 45 53 |JK HET EINDADRES| 000003E0: 20 56 41 4E 20 48 45 54 22 00 0F 0C 5E 01 99 22 | VAN HET"...^.."| 000003F0: 11 49 4E 20 52 41 4D 20 53 54 41 41 4E 44 20 42 |.IN RAM STAAND B| 00000400: 41 53 49 43 50 52 4F 47 52 41 4D 4D 41 2E 22 00 |ASICPROGRAMMA.".| 00000410: 25 0C 68 01 49 B2 32 3A 8D 31 37 34 30 3A 8B 46 |%.h.I.2:.1740:.F| 00000420: 4C A7 31 34 30 00 50 0C 72 01 99 22 93 57 45 20 |L.140.P.r..".WE | 00000430: 48 45 42 42 45 4E 20 45 45 4E 20 54 45 4C 4C 45 |HEBBEN EEN TELLE| 00000440: 52 20 4E 4F 44 49 47 20 44 49 45 20 56 41 4E 22 |R NODIG DIE VAN"| 00000450: 00 7E 0C 7C 01 99 22 11 24 30 34 30 30 20 54 4F |.~.|..".$0400 TO| 00000460: 54 20 24 38 30 30 30 20 4B 41 4E 20 54 45 4C 4C |T $8000 KAN TELL| 00000470: 45 4E 2E 20 44 45 20 49 4E 48 4F 55 44 22 00 AD |EN. DE INHOUD"..| 00000480: 0C 86 01 99 22 11 56 41 4E 20 44 45 20 43 45 4C |....".VAN DE CEL| 00000490: 20 57 41 41 52 56 41 4E 20 44 45 20 54 45 4C 4C | WAARVAN DE TELL| 000004A0: 45 52 20 48 45 54 20 41 44 52 45 53 22 00 D9 0C |ER HET ADRES"...| 000004B0: 90 01 99 22 11 41 41 4E 47 45 45 46 54 20 57 4F |...".AANGEEFT WO| 000004C0: 52 44 54 20 47 45 54 45 53 54 20 4F 50 20 49 4E |RDT GETEST OP IN| 000004D0: 48 4F 55 44 20 24 30 30 22 00 05 0D 9A 01 99 22 |HOUD $00"......"| 000004E0: 11 41 4C 53 20 44 45 20 49 4E 48 4F 55 44 20 47 |.ALS DE INHOUD G| 000004F0: 45 45 4E 20 24 30 30 20 49 53 2C 20 57 4F 52 44 |EEN $00 IS, WORD| 00000500: 54 20 44 45 22 00 2C 0D A4 01 99 22 11 54 45 4C |T DE".,....".TEL| 00000510: 4C 45 52 49 4E 4C 48 4F 55 44 20 31 20 48 4F 47 |LERINLHOUD 1 HOG| 00000520: 45 52 20 47 45 4D 41 41 4B 54 2E 22 00 5B 0D AE |ER GEMAAKT.".[..| 00000530: 01 99 22 11 41 4C 53 20 44 45 20 49 4E 48 4F 55 |..".ALS DE INHOU| 00000540: 44 20 57 45 4C 20 24 30 30 20 49 53 2C 20 57 4F |D WEL $00 IS, WO| 00000550: 52 44 45 4E 20 42 45 49 44 45 22 00 86 0D B8 01 |RDEN BEIDE".....| 00000560: 99 22 11 56 4F 4C 47 45 4E 44 45 20 43 45 4C 4C |.".VOLGENDE CELL| 00000570: 45 4E 20 4F 4F 4B 20 4F 50 20 24 30 30 20 47 45 |EN OOK OP $00 GE| 00000580: 54 45 53 54 2E 22 00 B5 0D C2 01 99 22 11 5A 49 |TEST."......".ZI| 00000590: 4A 4E 20 4E 49 45 54 20 42 45 49 44 45 20 43 45 |JN NIET BEIDE CE| 000005A0: 4C 4C 45 4E 20 24 30 30 2C 20 44 41 4E 20 5A 4F |LLEN $00, DAN ZO| 000005B0: 45 4B 45 4E 22 00 E3 0D CC 01 99 22 11 57 45 20 |EKEN"......".WE | 000005C0: 56 45 52 44 45 52 2C 20 41 4E 44 45 52 53 20 57 |VERDER, ANDERS W| 000005D0: 4F 52 44 54 20 48 45 54 20 5A 4F 45 4B 45 4E 47 |ORDT HET ZOEKENG| 000005E0: 45 2D 22 00 0F 0E D6 01 99 22 11 53 54 4F 50 54 |E-"......".STOPT| 000005F0: 2E 20 4D 41 58 49 4D 41 41 4C 20 57 4F 52 44 54 |. MAXIMAAL WORDT| 00000600: 20 54 4F 54 20 24 38 30 30 30 20 47 45 2D 22 00 | TOT $8000 GE-".| 00000610: 1E 0E E0 01 99 22 11 5A 4F 43 48 54 2E 22 00 34 |.....".ZOCHT.".4| 00000620: 0E EA 01 49 B2 33 3A 8D 31 37 34 30 3A 8B 46 4C |...I.3:.1740:.FL| 00000630: A7 32 35 30 00 66 0E F4 01 99 22 93 11 11 11 11 |.250.f....".....| 00000640: 11 11 41 4C 53 20 54 45 4C 4C 45 52 20 47 45 42 |..ALS TELLER GEB| 00000650: 52 55 49 4B 45 4E 20 57 45 20 44 45 20 50 4C 41 |RUIKEN WE DE PLA| 00000660: 41 54 53 45 4E 22 00 95 0E FE 01 99 22 11 24 30 |ATSEN"......".$0| 00000670: 31 2F 24 30 32 2E 20 57 45 20 48 45 42 42 45 4E |1/$02. WE HEBBEN| 00000680: 20 54 57 45 45 20 50 4C 41 41 54 53 45 4E 20 4E | TWEE PLAATSEN N| 00000690: 4F 44 49 47 22 00 C1 0E 08 02 99 22 11 4F 4D 44 |ODIG"......".OMD| 000006A0: 41 54 20 48 45 54 20 5A 4F 45 4B 47 45 42 49 45 |AT HET ZOEKGEBIE| 000006B0: 44 20 4F 56 45 52 20 54 57 45 45 20 42 59 54 45 |D OVER TWEE BYTE| 000006C0: 22 00 F0 0E 12 02 99 22 11 41 44 52 45 53 53 45 |"......".ADRESSE| 000006D0: 4E 20 4C 4F 4F 50 54 2E 20 57 45 20 4B 49 45 5A |N LOOPT. WE KIEZ| 000006E0: 45 4E 20 44 45 20 54 45 4C 4C 45 52 20 49 4E 22 |EN DE TELLER IN"| 000006F0: 00 1D 0F 1C 02 99 22 11 5A 45 52 4F 2D 50 41 47 |......".ZERO-PAG| 00000700: 45 20 4F 4D 44 41 54 20 44 41 54 20 53 4E 45 4C |E OMDAT DAT SNEL| 00000710: 4C 45 52 20 57 45 52 4B 54 20 45 4E 22 00 47 0F |LER WERKT EN".G.| 00000720: 26 02 99 22 11 4F 4D 44 41 54 20 44 45 5A 45 20 |&..".OMDAT DEZE | 00000730: 49 4E 44 49 52 45 4B 54 20 47 45 41 44 44 52 45 |INDIREKT GEADDRE| 00000740: 53 53 45 45 52 44 22 00 5E 0F 30 02 99 22 11 4B |SSEERD".^.0..".K| 00000750: 55 4E 4E 45 4E 20 57 4F 52 44 45 4E 2E 22 00 74 |UNNEN WORDEN.".t| 00000760: 0F 3A 02 49 B2 34 3A 8D 31 37 34 30 3A 8B 46 4C |.:.I.4:.1740:.FL| 00000770: A7 33 37 30 00 9D 0F 44 02 99 22 93 45 45 52 53 |.370...D..".EERS| 00000780: 54 20 5A 45 54 54 45 4E 20 57 45 20 48 45 54 20 |T ZETTEN WE HET | 00000790: 53 54 41 52 54 41 44 52 45 53 2D 31 22 00 C9 0F |STARTADRES-1"...| 000007A0: 4E 02 99 22 11 49 4E 20 44 45 20 54 45 4C 4C 45 |N..".IN DE TELLE| 000007B0: 52 2D 47 45 48 45 55 47 45 4E 50 4C 41 41 54 53 |R-GEHEUGENPLAATS| 000007C0: 45 4E 2E 20 44 45 4E 4B 22 00 EF 0F 58 02 99 22 |EN. DENK"...X.."| 000007D0: 11 41 41 4E 20 44 45 20 56 4F 4C 47 4F 52 44 45 |.AAN DE VOLGORDE| 000007E0: 21 20 28 4C 41 41 47 2F 48 4F 4F 47 29 3A 22 00 |! (LAAG/HOOG):".| 000007F0: 07 10 62 02 99 22 11 20 20 20 20 20 20 20 4C 44 |..b..". LD| 00000800: 41 20 23 24 46 46 22 00 2E 10 6C 02 99 22 11 20 |A #$FF"...l..". | 00000810: 20 20 20 20 20 20 53 54 41 20 24 30 31 20 20 20 | STA $01 | 00000820: 20 24 46 46 20 4E 41 41 52 20 24 30 31 22 00 46 | $FF NAAR $01".F| 00000830: 10 76 02 99 22 11 20 20 20 20 20 20 20 4C 44 41 |.v..". LDA| 00000840: 20 23 24 30 33 22 00 6D 10 80 02 99 22 11 20 20 | #$03".m....". | 00000850: 20 20 20 20 20 53 54 41 20 24 30 32 20 20 20 20 | STA $02 | 00000860: 24 30 33 20 4E 41 41 52 20 24 30 32 22 00 9A 10 |$03 NAAR $02"...| 00000870: 8A 02 99 22 11 11 4F 4D 44 41 54 20 57 45 20 49 |..."..OMDAT WE I| 00000880: 4E 44 49 52 45 4B 54 20 57 49 4C 4C 45 4E 20 41 |NDIREKT WILLEN A| 00000890: 44 52 45 53 53 45 52 45 4E 22 00 BB 10 94 02 99 |DRESSEREN"......| 000008A0: 22 11 5A 45 54 54 45 4E 20 57 45 20 4E 4F 47 20 |".ZETTEN WE NOG | 000008B0: 24 30 30 20 49 4E 20 59 52 3A 22 00 D3 10 9E 02 |$00 IN YR:".....| 000008C0: 99 22 11 20 20 20 20 20 20 20 4C 44 59 20 23 24 |.". LDY #$| 000008D0: 30 30 22 00 E9 10 A8 02 49 B2 35 3A 8D 31 37 34 |00".....I.5:.174| 000008E0: 30 3A 8B 46 4C A7 35 30 30 00 15 11 B2 02 99 22 |0:.FL.500......"| 000008F0: 93 57 45 20 42 45 47 49 4E 4E 45 4E 20 4E 55 20 |.WE BEGINNEN NU | 00000900: 44 45 20 5A 4F 45 4B 2D 4C 4F 4F 50 20 4D 45 54 |DE ZOEK-LOOP MET| 00000910: 20 48 45 54 22 00 3B 11 BC 02 99 22 11 56 45 52 | HET".;....".VER| 00000920: 48 4F 47 45 4E 20 56 41 4E 20 44 45 20 54 45 4C |HOGEN VAN DE TEL| 00000930: 4C 45 52 20 4D 45 54 20 31 3A 22 00 63 11 C6 02 |LER MET 1:".c...| 00000940: 99 22 11 20 20 20 20 20 49 4E 43 20 24 30 31 20 |.". INC $01 | 00000950: 20 20 56 45 52 48 4F 4F 47 20 4C 4F 57 2D 42 59 | VERHOOG LOW-BY| 00000960: 54 45 22 00 80 11 D0 02 99 22 11 20 20 20 B0 5F |TE"......". ._| 00000970: 42 4E 45 20 24 30 34 20 20 20 3D 20 30 20 3F 22 |BNE $04 = 0 ?"| 00000980: 00 AB 11 DA 02 99 22 20 20 20 DD 11 9D DD 20 49 |......" .... I| 00000990: 4E 43 20 24 30 32 20 20 20 56 45 52 48 4F 4F 47 |NC $02 VERHOOG| 000009A0: 20 48 49 47 48 2D 42 59 54 45 22 00 CC 11 E4 02 | HIGH-BYTE".....| 000009B0: 99 22 20 20 20 DD 11 9D DD 20 42 4D 49 20 24 2E |." .... BMI $.| 000009C0: 2E 20 20 20 3D 20 24 38 30 20 3F 22 00 DF 11 EE |. = $80 ?"....| 000009D0: 02 99 22 20 20 20 DD 11 9D AD C0 2E 2E 2E 2E 00 |.." ..........| 000009E0: 0E 12 F8 02 99 22 11 44 4F 4F 52 20 42 4E 45 20 |.....".DOOR BNE | 000009F0: 57 4F 52 44 54 20 24 30 32 20 41 4C 4C 45 45 4E |WORDT $02 ALLEEN| 00000A00: 20 56 45 52 48 4F 4F 47 44 20 41 4C 53 22 00 34 | VERHOOGD ALS".4| 00000A10: 12 02 03 99 22 11 48 45 54 20 4C 4F 57 2D 42 59 |....".HET LOW-BY| 00000A20: 54 45 20 47 45 44 45 45 4C 54 45 20 4E 55 4C 20 |TE GEDEELTE NUL | 00000A30: 49 53 2E 22 00 5E 12 0C 03 99 22 11 4D 45 54 20 |IS.".^....".MET | 00000A40: 42 4D 49 20 4D 4F 45 54 20 42 49 4A 20 48 45 54 |BMI MOET BIJ HET| 00000A50: 20 42 45 52 45 49 4B 45 4E 20 56 41 4E 22 00 8A | BEREIKEN VAN"..| 00000A60: 12 16 03 99 22 11 24 38 30 30 30 20 57 45 47 47 |....".$8000 WEGG| 00000A70: 45 53 50 52 4F 4E 47 45 4E 20 57 4F 52 44 45 4E |ESPRONGEN WORDEN| 00000A80: 20 4E 41 41 52 20 45 45 4E 22 00 A9 12 20 03 99 | NAAR EEN"... ..| 00000A90: 22 11 50 4C 41 41 54 53 20 57 41 41 52 20 52 54 |".PLAATS WAAR RT| 00000AA0: 53 20 53 54 41 41 54 2E 22 00 BF 12 2A 03 49 B2 |S STAAT."...*.I.| 00000AB0: 36 3A 8D 31 37 34 30 3A 8B 46 4C A7 35 38 30 00 |6:.1740:.FL.580.| 00000AC0: ED 12 34 03 99 22 93 11 11 11 11 4E 55 20 56 4F |..4..".....NU VO| 00000AD0: 4C 47 54 20 44 45 20 54 45 53 54 20 4F 46 20 44 |LGT DE TEST OF D| 00000AE0: 45 20 49 4E 48 4F 55 44 20 56 41 4E 22 00 1B 13 |E INHOUD VAN"...| 00000AF0: 3E 03 99 22 11 44 45 20 43 45 4C 20 57 41 41 52 |>..".DE CEL WAAR| 00000B00: 56 41 4E 20 48 45 54 20 41 44 52 45 53 20 49 4E |VAN HET ADRES IN| 00000B10: 20 44 45 20 54 45 4C 4C 45 52 22 00 4A 13 48 03 | DE TELLER".J.H.| 00000B20: 99 22 11 53 54 41 41 54 20 4F 4F 4B 20 4E 55 4C |.".STAAT OOK NUL| 00000B30: 20 49 53 2E 20 5A 4F 20 4E 49 45 54 2C 20 44 41 | IS. ZO NIET, DA| 00000B40: 4E 20 53 50 52 49 4E 47 54 22 00 77 13 52 03 99 |N SPRINGT".w.R..| 00000B50: 22 11 48 45 54 20 50 52 4F 47 52 41 4D 4D 41 20 |".HET PROGRAMMA | 00000B60: 4E 41 41 52 20 44 45 20 50 4C 41 41 54 53 20 57 |NAAR DE PLAATS W| 00000B70: 41 41 52 20 44 45 22 00 96 13 5C 03 99 22 11 54 |AAR DE"...\..".T| 00000B80: 45 4C 4C 45 52 20 57 4F 52 44 54 20 56 45 52 48 |ELLER WORDT VERH| 00000B90: 4F 4F 47 44 2E 22 00 C2 13 66 03 99 22 11 11 11 |OOGD."...f.."...| 00000BA0: 20 20 20 20 20 20 4C 44 41 20 28 24 30 31 29 2C | LDA ($01),| 00000BB0: 59 20 20 42 45 44 45 4E 4B 54 3A 20 59 3D 30 20 |Y BEDENKT: Y=0 | 00000BC0: 21 22 00 EF 13 70 03 99 22 11 20 20 20 20 20 20 |!"...p..". | 00000BD0: 42 4E 45 20 24 2E 2E 20 20 20 20 20 20 53 50 52 |BNE $.. SPR| 00000BE0: 49 4E 47 20 4E 41 41 52 20 27 49 4E 43 27 22 00 |ING NAAR 'INC'".| 00000BF0: 05 14 7A 03 49 B2 37 3A 8D 31 37 34 30 3A 8B 46 |..z.I.7:.1740:.F| 00000C00: 4C A7 36 39 30 00 33 14 84 03 99 22 93 57 41 53 |L.690.3....".WAS| 00000C10: 20 44 45 20 43 45 4C 49 4E 48 4F 55 44 20 57 45 | DE CELINHOUD WE| 00000C20: 4C 20 24 30 30 2C 20 44 41 4E 20 4D 4F 45 54 20 |L $00, DAN MOET | 00000C30: 44 45 22 00 57 14 8E 03 99 22 11 56 4F 4C 47 45 |DE".W....".VOLGE| 00000C40: 4E 44 45 20 43 45 4C 20 57 4F 52 44 45 4E 20 47 |NDE CEL WORDEN G| 00000C50: 45 54 45 53 54 3A 22 00 7A 14 98 03 99 22 11 20 |ETEST:".z....". | 00000C60: 20 20 20 20 20 20 49 4E 59 20 20 20 20 20 20 20 | INY | 00000C70: 20 20 4E 55 3A 20 59 3D 31 22 00 94 14 A2 03 99 | NU: Y=1"......| 00000C80: 22 11 20 20 20 20 20 20 20 4C 44 41 20 28 24 30 |". LDA ($0| 00000C90: 31 29 2C 59 00 BE 14 AC 03 99 22 11 20 20 20 20 |1),Y......". | 00000CA0: 20 20 20 42 4E 45 20 24 2E 2E 20 20 20 20 20 4E | BNE $.. N| 00000CB0: 41 41 52 20 27 4C 44 59 20 23 24 30 30 27 00 EA |AAR 'LDY #$00'..| 00000CC0: 14 B6 03 99 22 11 41 4C 53 20 44 45 5A 45 20 43 |....".ALS DEZE C| 00000CD0: 45 4C 49 4E 48 4F 55 44 20 4F 4F 4B 20 24 30 30 |ELINHOUD OOK $00| 00000CE0: 20 49 53 2C 20 4D 4F 45 54 22 00 12 15 C0 03 99 | IS, MOET"......| 00000CF0: 22 11 4E 4F 47 20 44 45 20 44 45 52 44 45 20 43 |".NOG DE DERDE C| 00000D00: 45 4C 20 57 4F 52 44 45 4E 20 47 45 54 45 53 54 |EL WORDEN GETEST| 00000D10: 3A 22 00 35 15 CA 03 99 22 11 20 20 20 20 20 20 |:".5....". | 00000D20: 20 49 4E 59 20 20 20 20 20 20 20 20 20 4E 55 3A | INY NU:| 00000D30: 20 59 3D 32 22 00 4F 15 D4 03 99 22 11 20 20 20 | Y=2".O....". | 00000D40: 20 20 20 20 4C 44 41 20 28 24 30 31 29 2C 59 00 | LDA ($01),Y.| 00000D50: 7A 15 DE 03 99 22 11 20 20 20 20 20 20 20 42 4E |z....". BN| 00000D60: 45 20 24 2E 2E 20 20 20 20 20 4E 41 41 52 20 27 |E $.. NAAR '| 00000D70: 4C 44 59 20 23 24 30 30 27 22 00 A8 15 E8 03 99 |LDY #$00'"......| 00000D80: 22 11 45 4E 20 41 4C 53 20 44 45 5A 45 20 43 45 |".EN ALS DEZE CE| 00000D90: 4C 49 4E 48 4F 55 44 20 4F 4F 4B 20 24 30 30 20 |LINHOUD OOK $00 | 00000DA0: 49 53 2C 20 44 41 4E 22 00 D4 15 F2 03 99 22 11 |IS, DAN"......".| 00000DB0: 20 20 20 20 20 20 20 52 54 53 20 20 20 20 20 20 | RTS | 00000DC0: 20 20 20 54 45 52 55 47 20 4E 41 41 52 20 42 41 | TERUG NAAR BA| 00000DD0: 53 49 43 22 00 EA 15 FC 03 49 B2 38 3A 8D 31 37 |SIC".....I.8:.17| 00000DE0: 34 30 3A 8B 46 4C A7 38 32 30 00 0C 16 06 04 99 |40:.FL.820......| 00000DF0: 22 93 4E 55 20 4E 4F 47 20 45 45 4E 53 20 41 4C |".NU NOG EENS AL| 00000E00: 4C 45 53 20 53 41 4D 45 4E 3A 11 22 00 37 16 10 |LES SAMEN:.".7..| 00000E10: 04 99 22 20 20 20 20 20 20 4C 44 41 20 23 24 46 |.." LDA #$F| 00000E20: 46 20 20 20 20 20 20 53 54 41 52 54 41 44 52 20 |F STARTADR | 00000E30: 3D 20 30 33 46 46 22 00 4C 16 1A 04 99 22 20 20 |= 03FF".L...." | 00000E40: 20 20 20 20 53 54 41 20 24 30 31 22 00 62 16 24 | STA $01".b.$| 00000E50: 04 99 22 20 20 20 20 20 20 4C 44 41 20 23 24 30 |.." LDA #$0| 00000E60: 33 22 00 76 16 2E 04 99 22 20 20 20 20 20 20 53 |3".v...." S| 00000E70: 54 41 20 24 30 32 00 9E 16 38 04 99 22 20 20 B0 |TA $02...8.." .| 00000E80: C0 C0 C0 4C 44 59 20 23 24 30 30 20 20 20 20 20 |...LDY #$00 | 00000E90: 20 59 2C 20 53 54 41 52 54 20 3D 20 30 22 00 AA | Y, START = 0"..| 00000EA0: 16 42 04 99 22 20 20 DD 20 22 00 D2 16 4C 04 99 |.B.." . "...L..| 00000EB0: 22 20 20 DD B0 C0 C0 49 4E 43 20 24 30 31 20 20 |" ....INC $01 | 00000EC0: 20 20 20 20 20 41 44 52 20 3D 20 41 44 52 20 2B | ADR = ADR +| 00000ED0: 31 22 00 F3 16 56 04 99 22 20 20 DD DD B0 5F 42 |1"...V.." ..._B| 00000EE0: 4E 45 20 24 2E 2E 20 20 20 20 20 20 20 3D 20 30 |NE $.. = 0| 00000EF0: 20 3F 22 00 08 17 60 04 99 22 20 20 DD DD DD 20 | ?"...`.." ... | 00000F00: 49 4E 43 20 24 30 32 22 00 2B 17 6A 04 99 22 20 |INC $02".+.j.." | 00000F10: B0 DB DB DB 5F 42 4D 49 20 24 2E 2E 20 20 20 20 |...._BMI $.. | 00000F20: 20 20 20 4B 4C 41 41 52 20 3F 22 00 38 17 74 04 | KLAAR ?".8.t.| 00000F30: 99 22 20 DD DD DD DD 22 00 58 17 7E 04 99 22 20 |." ....".X.~.." | 00000F40: DD DD DD AD C0 4C 44 41 20 28 24 30 31 29 2C 59 |.....LDA ($01),Y| 00000F50: 20 20 20 59 20 3D 20 30 00 79 17 88 04 99 22 20 | Y = 0.y...." | 00000F60: DD DD AD C0 5F 42 4E 45 20 24 2E 2E 20 20 20 20 |...._BNE $.. | 00000F70: 20 20 20 3D 20 30 20 3F 22 00 84 17 92 04 99 22 | = 0 ?"......"| 00000F80: 20 DD DD 22 00 A4 17 9C 04 99 22 20 DD DD 20 20 | .."......" .. | 00000F90: 20 49 4E 59 20 20 20 20 20 20 20 20 20 20 20 59 | INY Y| 00000FA0: 20 3D 20 31 00 BD 17 A6 04 99 22 20 DD DD 20 20 | = 1......" .. | 00000FB0: 20 4C 44 41 20 28 24 30 31 29 2C 59 22 00 DE 17 | LDA ($01),Y"...| 00000FC0: B0 04 99 22 20 DD AB C0 C0 5F 42 4E 45 20 24 2E |..." ...._BNE $.| 00000FD0: 2E 20 20 20 20 20 20 20 3D 20 30 20 3F 22 00 FF |. = 0 ?"..| 00000FE0: 17 BA 04 99 22 20 DD DD 20 20 20 49 4E 59 20 20 |...." .. INY | 00000FF0: 20 20 20 20 20 20 20 20 20 59 20 3D 20 32 22 00 | Y = 2".| 00001000: 18 18 C4 04 99 22 20 DD DD 20 20 20 4C 44 41 20 |....." .. LDA | 00001010: 28 24 30 31 29 2C 59 22 00 39 18 CE 04 99 22 20 |($01),Y".9...." | 00001020: DD AD C0 C0 5F 42 4E 45 20 24 2E 2E 20 20 20 20 |...._BNE $.. | 00001030: 20 20 20 3D 20 30 20 3F 22 00 5A 18 D8 04 99 22 | = 0 ?".Z...."| 00001040: 20 AD C0 C0 C0 C0 52 54 53 20 20 20 20 20 20 20 | .....RTS | 00001050: 20 20 20 20 4B 4C 41 41 52 22 00 70 18 E2 04 49 | KLAAR".p...I| 00001060: B2 39 3A 8D 31 37 34 30 3A 8B 46 4C A7 39 30 30 |.9:.1740:.FL.900| 00001070: 00 9A 18 EC 04 99 22 93 4E 55 20 45 45 4E 20 4B |......".NU EEN K| 00001080: 4C 45 49 4E 20 54 45 53 54 4A 45 21 20 57 45 20 |LEIN TESTJE! WE | 00001090: 52 4F 45 50 45 4E 20 44 45 22 00 C8 18 F6 04 99 |ROEPEN DE"......| 000010A0: 22 11 5A 4F 45 4B 52 4F 55 54 49 4E 45 20 4D 45 |".ZOEKROUTINE ME| 000010B0: 54 20 53 59 53 20 38 32 36 20 41 41 4E 20 45 4E |T SYS 826 AAN EN| 000010C0: 20 5A 45 54 54 45 4E 22 00 F9 18 00 05 99 22 11 | ZETTEN"......".| 000010D0: 44 41 4E 20 48 45 54 20 49 4E 20 24 30 31 2F 24 |DAN HET IN $01/$| 000010E0: 30 32 20 53 54 41 41 4E 44 20 41 44 52 45 53 20 |02 STAAND ADRES | 000010F0: 44 45 43 49 4D 41 41 4C 22 00 25 19 0A 05 99 22 |DECIMAAL".%...."| 00001100: 11 4F 50 20 48 45 54 20 53 43 48 45 52 4D 3A 20 |.OP HET SCHERM: | 00001110: 50 45 45 4B 28 31 29 2B 32 35 36 2A 50 45 45 4B |PEEK(1)+256*PEEK| 00001120: 28 32 29 2E 22 00 51 19 14 05 99 22 11 4F 4D 20 |(2).".Q....".OM | 00001130: 45 45 4E 20 49 44 45 45 20 54 45 20 4B 52 49 4A |EEN IDEE TE KRIJ| 00001140: 47 45 4E 20 48 4F 45 20 53 4E 45 4C 20 44 41 54 |GEN HOE SNEL DAT| 00001150: 22 00 80 19 1E 05 99 22 11 47 41 41 54 2C 20 4C |"......".GAAT, L| 00001160: 41 54 45 4E 20 57 45 20 44 45 20 43 42 4D 20 4F |ATEN WE DE CBM O| 00001170: 4E 44 45 52 20 48 45 54 20 5A 4F 45 4B 45 4E 22 |NDER HET ZOEKEN"| 00001180: 00 AD 19 28 05 99 22 11 45 45 4E 20 57 49 54 54 |...(..".EEN WITT| 00001190: 45 20 42 41 4C 4B 20 4F 50 20 48 45 54 20 53 43 |E BALK OP HET SC| 000011A0: 48 45 52 4D 20 5A 45 54 54 45 4E 2E 22 00 CD 19 |HERM ZETTEN."...| 000011B0: 32 05 99 22 11 11 42 45 4E 20 4A 45 20 4B 4C 41 |2.."..BEN JE KLA| 000011C0: 41 52 20 28 4A 2F 4E 29 20 3F 11 11 22 00 E3 19 |AR (J/N) ?.."...| 000011D0: 3C 05 A1 58 24 3A 8B 58 24 B3 B1 22 4A 22 A7 31 |<..X$:.X$.."J".1| 000011E0: 33 34 30 00 13 1A 46 05 81 43 B2 30 A4 31 30 3A |340...F..C.0.10:| 000011F0: 81 57 B2 30 A4 34 30 30 AC B4 28 43 29 3A 82 57 |.W.0.400..(C):.W| 00001200: 3A 99 22 91 20 20 20 9D 9D 9D 22 3B 31 30 AB 43 |:.". ...";10.C| 00001210: 3A 82 43 00 4D 1A 50 05 99 22 91 12 20 20 20 20 |:.C.M.P..".. | 00001220: 20 20 20 20 20 20 92 22 3A 9E 38 32 36 3A 99 22 | .":.826:."| 00001230: 91 41 44 52 20 3D 22 3B C2 28 31 29 AA 32 35 36 |.ADR =";.(1).256| 00001240: AC C2 28 32 29 3B 22 20 20 20 20 20 22 00 68 1A |..(2);" ".h.| 00001250: 5A 05 99 22 11 56 4C 55 47 2C 20 4E 49 45 54 20 |Z..".VLUG, NIET | 00001260: 57 41 41 52 20 3F 21 22 00 80 1A 64 05 49 B2 31 |WAAR ?!"...d.I.1| 00001270: 30 3A 8D 31 37 34 30 3A 8B 46 4C A7 31 30 33 30 |0:.1740:.FL.1030| 00001280: 00 AC 1A 6E 05 99 22 93 45 45 4E 20 54 4F 45 50 |...n..".EEN TOEP| 00001290: 41 53 53 49 4E 47 20 56 41 4E 20 44 49 54 20 50 |ASSING VAN DIT P| 000012A0: 52 4F 47 52 41 4D 4D 41 20 49 53 22 00 D4 1A 78 |ROGRAMMA IS"...x| 000012B0: 05 99 22 11 44 45 20 42 45 52 45 4B 45 4E 49 4E |..".DE BEREKENIN| 000012C0: 47 20 56 41 4E 20 44 45 20 4C 45 4E 47 54 45 20 |G VAN DE LENGTE | 000012D0: 56 41 4E 22 00 02 1B 82 05 99 22 11 42 41 53 49 |VAN"......".BASI| 000012E0: 43 2D 50 52 4F 47 52 41 4D 4D 41 27 53 2E 20 45 |C-PROGRAMMA'S. E| 000012F0: 45 4E 20 42 41 53 49 43 2D 50 52 4F 47 52 41 4D |EN BASIC-PROGRAM| 00001300: 2D 22 00 2E 1B 8C 05 99 22 11 4D 41 20 42 45 47 |-"......".MA BEG| 00001310: 49 4E 54 20 41 4C 54 49 4A 44 20 4F 50 20 24 30 |INT ALTIJD OP $0| 00001320: 34 30 30 20 3D 20 31 30 32 34 20 45 4E 22 00 5C |400 = 1024 EN".\| 00001330: 1B 96 05 99 22 11 45 49 4E 44 49 47 54 20 4F 50 |....".EINDIGT OP| 00001340: 20 44 45 20 50 4C 41 41 54 53 20 57 41 41 52 20 | DE PLAATS WAAR | 00001350: 44 45 20 44 52 49 45 20 24 30 30 22 00 6D 1B A0 |DE DRIE $00".m..| 00001360: 05 99 22 11 42 45 47 49 4E 4E 45 4E 22 00 8F 1B |..".BEGINNEN"...| 00001370: AA 05 99 22 11 11 57 45 20 4B 55 4E 4E 45 4E 20 |..."..WE KUNNEN | 00001380: 44 55 53 20 53 43 48 52 49 4A 56 45 4E 3A 22 00 |DUS SCHRIJVEN:".| 00001390: D0 1B B4 05 99 22 11 20 20 31 2E 20 27 53 59 53 |.....". 1. 'SYS| 000013A0: 20 38 32 36 27 22 3A 99 22 11 20 20 32 2E 20 27 | 826'":.". 2. '| 000013B0: 50 52 49 4E 54 20 50 45 45 4B 28 31 29 2B 32 35 |PRINT PEEK(1)+25| 000013C0: 36 2A 50 45 45 4B 28 32 29 2D 31 30 32 34 27 22 |6*PEEK(2)-1024'"| 000013D0: 00 FF 1B BE 05 99 22 11 45 4E 20 4B 52 49 4A 47 |......".EN KRIJG| 000013E0: 45 4E 20 41 4C 53 20 52 45 53 55 4C 54 41 41 54 |EN ALS RESULTAAT| 000013F0: 20 44 45 20 4C 45 4E 47 54 45 20 56 41 4E 22 00 | DE LENGTE VAN".| 00001400: 25 1C C8 05 99 22 11 48 45 54 20 42 41 53 49 43 |%....".HET BASIC| 00001410: 2D 50 52 4F 47 52 41 4D 4D 41 20 49 4E 20 42 59 |-PROGRAMMA IN BY| 00001420: 54 45 53 2E 22 00 3D 1C D2 05 49 B2 31 31 3A 8D |TES.".=...I.11:.| 00001430: 31 37 34 30 3A 8B 46 4C A7 31 32 36 30 00 53 1C |1740:.FL.1260.S.| 00001440: DC 05 99 22 93 4F 50 47 41 56 45 4E 20 3A 22 3A |...".OPGAVEN :":| 00001450: 99 55 24 00 82 1C E6 05 99 22 11 31 2E 20 42 45 |.U$......".1. BE| 00001460: 50 41 41 4C 20 44 45 20 4C 45 4E 47 54 45 20 56 |PAAL DE LENGTE V| 00001470: 41 4E 20 44 49 54 20 50 52 4F 47 52 41 4D 4D 41 |AN DIT PROGRAMMA| 00001480: 2E 22 00 AE 1C F0 05 99 22 11 32 2E 20 46 52 45 |."......".2. FRE| 00001490: 28 30 29 20 48 4F 55 44 54 20 4F 4F 4B 20 52 45 |(0) HOUDT OOK RE| 000014A0: 4B 45 4E 49 4E 47 20 4D 45 54 20 44 45 22 00 D8 |KENING MET DE"..| 000014B0: 1C FA 05 99 22 11 20 20 20 56 4F 4F 52 20 56 41 |....". VOOR VA| 000014C0: 52 49 41 42 45 4C 45 4E 20 4E 4F 44 49 47 45 20 |RIABELEN NODIGE | 000014D0: 52 55 49 4D 54 45 2E 22 00 05 1D 04 06 99 22 11 |RUIMTE."......".| 000014E0: 20 20 20 4D 45 54 20 44 49 54 20 4D 41 43 48 49 | MET DIT MACHI| 000014F0: 4E 45 2D 54 41 41 4C 2D 50 52 4F 47 52 41 4D 4D |NE-TAAL-PROGRAMM| 00001500: 41 20 45 4E 22 00 32 1D 0E 06 99 22 11 20 20 20 |A EN".2....". | 00001510: 46 52 45 28 30 29 20 4D 4F 45 54 20 4A 45 20 44 |FRE(0) MOET JE D| 00001520: 45 20 56 4F 4F 52 20 56 41 52 49 41 42 45 4C 45 |E VOOR VARIABELE| 00001530: 4E 22 00 54 1D 18 06 99 22 11 20 20 20 4E 4F 44 |N".T....". NOD| 00001540: 49 47 45 20 52 55 49 4D 54 45 20 42 45 50 41 4C |IGE RUIMTE BEPAL| 00001550: 45 4E 2E 22 00 82 1D 22 06 99 22 11 33 2E 20 50 |EN."..."..".3. P| 00001560: 52 4F 42 45 45 52 20 4D 45 54 20 44 45 20 49 4E |ROBEER MET DE IN| 00001570: 54 45 52 4E 45 20 4B 4C 4F 4B 20 54 45 20 42 45 |TERNE KLOK TE BE| 00001580: 2D 22 00 B1 1D 2C 06 99 22 11 20 20 20 50 41 4C |-"...,..". PAL| 00001590: 45 4E 20 48 4F 45 20 53 4E 45 4C 20 44 45 20 5A |EN HOE SNEL DE Z| 000015A0: 4F 45 4B 52 4F 55 54 49 4E 45 20 49 53 20 49 4E |OEKROUTINE IS IN| 000015B0: 22 00 CF 1D 36 06 99 22 11 20 20 20 4B 42 59 54 |"...6..". KBYT| 000015C0: 45 20 50 45 52 20 53 45 43 4F 4E 44 45 2E 22 00 |E PER SECONDE.".| 000015D0: E7 1D 40 06 49 B2 31 32 3A 8D 31 37 34 30 3A 8B |..@.I.12:.1740:.| 000015E0: 46 4C A7 31 33 39 30 00 14 1E 4A 06 99 22 93 34 |FL.1390...J..".4| 000015F0: 2E 20 57 41 41 52 4F 4D 20 57 4F 52 44 54 20 41 |. WAAROM WORDT A| 00001600: 4C 53 20 53 54 41 52 54 41 44 52 45 53 20 24 30 |LS STARTADRES $0| 00001610: 33 46 46 22 00 3D 1E 54 06 99 22 11 20 20 20 47 |3FF".=.T..". G| 00001620: 45 4E 4F 4D 45 4E 20 49 4E 20 50 4C 41 41 54 53 |ENOMEN IN PLAATS| 00001630: 20 56 41 4E 20 24 30 34 30 30 20 3F 22 00 6B 1E | VAN $0400 ?".k.| 00001640: 5E 06 99 22 11 35 2E 20 57 41 4E 4E 45 45 52 20 |^..".5. WANNEER | 00001650: 57 4F 52 44 54 20 24 30 32 20 4D 45 54 20 31 20 |WORDT $02 MET 1 | 00001660: 56 45 52 48 4F 4F 47 44 20 3F 22 00 96 1E 68 06 |VERHOOGD ?"...h.| 00001670: 99 22 11 36 2E 20 42 49 4A 20 50 52 45 43 49 45 |.".6. BIJ PRECIE| 00001680: 53 20 57 45 4C 4B 20 41 44 52 45 53 20 57 4F 52 |S WELK ADRES WOR| 00001690: 44 54 20 49 4E 22 00 C0 1E 72 06 99 22 11 20 20 |DT IN"...r..". | 000016A0: 20 45 4C 4B 20 47 45 56 41 4C 20 47 45 53 54 4F | ELK GEVAL GESTO| 000016B0: 50 54 20 4D 45 54 20 5A 4F 45 4B 45 4E 20 3F 22 |PT MET ZOEKEN ?"| 000016C0: 00 EF 1E 7C 06 99 22 11 37 2E 20 57 41 41 52 4F |...|..".7. WAARO| 000016D0: 4D 20 47 45 42 52 55 49 4B 45 4E 20 57 45 20 41 |M GEBRUIKEN WE A| 000016E0: 4C 53 20 54 45 4C 4C 45 52 20 4E 49 45 54 22 00 |LS TELLER NIET".| 000016F0: 0C 1F 86 06 99 22 11 20 20 20 47 45 57 4F 4F 4E |.....". GEWOON| 00001700: 20 58 52 20 4F 46 20 59 52 20 3F 22 00 38 1F 90 | XR OF YR ?".8..| 00001710: 06 99 22 11 38 2E 20 57 41 41 52 4F 4D 20 42 45 |..".8. WAAROM BE| 00001720: 47 49 4E 54 20 44 45 20 42 49 4E 4E 45 4E 2D 4C |GINT DE BINNEN-L| 00001730: 4F 4F 50 20 4D 45 54 22 00 63 1F 9A 06 99 22 11 |OOP MET".c....".| 00001740: 20 20 20 27 49 4E 43 20 24 30 31 27 20 45 4E 20 | 'INC $01' EN | 00001750: 44 45 20 42 45 49 44 45 20 42 55 49 54 45 4E 53 |DE BEIDE BUITENS| 00001760: 54 45 22 00 7F 1F A4 06 99 22 11 20 20 20 4D 45 |TE"......". ME| 00001770: 54 20 27 4C 44 59 20 23 24 30 30 27 20 3F 22 00 |T 'LDY #$00' ?".| 00001780: BA 1F AE 06 99 22 11 11 1D 1D 2D 20 42 4C 41 44 |....."....- BLAD| 00001790: 20 31 33 20 2D 20 3C 2B 3E 20 91 A4 A4 A4 A4 A4 | 13 - <+> ......| 000017A0: 11 9D 9D 9D 9D 9D 12 45 49 4E 44 45 92 20 3C 2D |.......EINDE. <-| 000017B0: 3E 20 4F 50 4E 49 45 55 57 22 00 CC 1F B8 06 8D |> OPNIEUW"......| 000017C0: 31 37 36 30 3A 91 46 4C 89 31 30 30 00 D7 1F C2 |1760:.FL.100....| 000017D0: 06 99 22 93 22 3A 80 00 DD 1F CC 06 8F 00 22 20 |..".":........" | 000017E0: D6 06 99 22 13 11 11 11 11 11 11 11 11 11 11 11 |..."............| 000017F0: 11 11 11 11 11 11 11 11 11 11 11 11 20 2D 20 42 |............ - B| 00001800: 4C 41 44 22 3B 49 3B 22 2D 20 20 3C 2B 3E 20 56 |LAD";I;"- <+> V| 00001810: 45 52 44 45 52 20 20 3C 2D 3E 20 54 45 52 55 47 |ERDER <-> TERUG| 00001820: 22 3B 00 34 20 E0 06 81 49 B2 30 A4 31 31 3A A1 |";.4 ...I.0.11:.| 00001830: 58 24 3A 82 00 48 20 EA 06 A1 58 24 3A 8B 58 24 |X$:..H ...X$:.X$| 00001840: B2 22 22 A7 31 37 37 30 00 5B 20 F4 06 8B 58 24 |."".1770.[ ...X$| 00001850: B2 22 2B 22 A7 46 4C B2 30 3A 8E 00 6E 20 FE 06 |."+".FL.0:..n ..| 00001860: 8B 58 24 B2 22 2D 22 A7 46 4C B2 31 3A 8E 00 78 |.X$."-".FL.1:..x| 00001870: 20 08 07 89 31 37 37 30 00 00 00 | ...1770... |
....D..59468,12:..4.N.U$."..........":O$
.".........".N.X..169,255,133,1,169,3,13
3,2,160,0,230,1,208,4,230,2,48......14,1
77,1,208,244,200,177,1,208,237,200,177,1
,208,232,96......".......";O$;O$:.".CURS
US MACHINE-TAAL (12)"......".......";O$:
.".3. ZOEKROUTINES ".1. .."..EEN VEEL VO
ORKOMEND PROBLEEM VORMEN"._....".DE ZOEK
-ROUTINES. IN DEZE LES GAAN WE"......".D
E OPBOUW VAN EEN DERGELIJKE ROUTINE"....
..".ONDERZOEKEN.".N.H.."..HET GROTE VOOR
DEEL VAN MACHINETAAL-"...R..".ZOEK-ROUTI
NES IS DE GROTE SNELHEID.".%....".(CA. 1
000 MAAL SNELLER DAN BASIC.)".A....:.I.0
.32:.X:.826.I,X:..W...I.1:.1740:.FL.140.
.....".WE GAAN DE OPBOUW VAN ZOEK-ROUTIN
ES"......".ONDERZOEKEN AAN DE HAND VAN E
EN VOOR-"......".BEELD."......".STEL WE
WILLEN HET GEHEUGENGEBIED VAN"..."..".$0
400 TOT $8000 NAZOEKEN OP DRIE".?.,..".O
PVOLGENDE BYTES '$00-$00-$00'.".N.6..".W
E ZOEKEN DUS HET ADRES VAN HET EERSTE"..
.@..".VAN DRIE OPVOLGENDE GEHEUGENPLAATS
EN"...J..".MET STEEDS INHOUD $00."...T..
"..DIT IS NAMELIJK HET EINDADRES VAN HET
"...^..".IN RAM STAAND BASICPROGRAMMA.".
%.H.I.2:.1740:.FL.140.P.R..".WE HEBBEN E
EN TELLER NODIG DIE VAN".~.|..".$0400 TO
T $8000 KAN TELLEN. DE INHOUD"......".VA
N DE CEL WAARVAN DE TELLER HET ADRES".Y.
...".AANGEEFT WORDT GETEST OP INHOUD $00
"......".ALS DE INHOUD GEEN $00 IS, WORD
T DE".,....".TELLERINLHOUD 1 HOGER GEMAA
KT.".[....".ALS DE INHOUD WEL $00 IS, WO
RDEN BEIDE"......".VOLGENDE CELLEN OOK O
P $00 GETEST."...B..".ZIJN NIET BEIDE CE
LLEN $00, DAN ZOEKEN"...L..".WE VERDER,
ANDERS WORDT HET ZOEKENGE-"...V..".STOPT
. MAXIMAAL WORDT TOT $8000 GE-"......".Z
OCHT.".4...I.3:.1740:.FL.250.F....".....
..ALS TELLER GEBRUIKEN WE DE PLAATSEN"..
....".$01/$02. WE HEBBEN TWEE PLAATSEN N
ODIG".A....".OMDAT HET ZOEKGEBIED OVER T
WEE BYTE"......".ADRESSEN LOOPT. WE KIEZ
EN DE TELLER IN"......".ZERO-PAGE OMDAT
DAT SNELLER WERKT EN".G.&..".OMDAT DEZE
INDIREKT GEADDRESSEERD".^.0..".KUNNEN WO
RDEN.".T.:.I.4:.1740:.FL.370...D..".EERS
T ZETTEN WE HET STARTADRES-1".I.N..".IN
DE TELLER-GEHEUGENPLAATSEN. DENK"...X.."
.AAN DE VOLGORDE! (LAAG/HOOG):"...B..".
LDA #$FF"...L..". STA $01
$FF NAAR $01".F.V..". LDA #$03".M
....". STA $02 $03 NAAR $02"...
..."..OMDAT WE INDIREKT WILLEN ADRESSERE
N"......".ZETTEN WE NOG $00 IN YR:".S...
.". LDY #$00".....I.5:.1740:.FL.50
0......".WE BEGINNEN NU DE ZOEK-LOOP MET
HET".;....".VERHOGEN VAN DE TELLER MET
1:".C.F..". INC $01 VERHOOG LOW-BY
TE"...P..". ._BNE $04 = 0 ?"...Z.."
.... INC $02 VERHOOG HIGH-BYTE".L...
." .... BMI $.. = $80 ?"......" ..
.............".DOOR BNE WORDT $02 ALLEEN
VERHOOGD ALS".4....".HET LOW-BYTE GEDEE
LTE NUL IS.".^....".MET BMI MOET BIJ HET
BEREIKEN VAN"......".$8000 WEGGESPRONGE
N WORDEN NAAR EEN"... ..".PLAATS WAAR RT
S STAAT."...*.I.6:.1740:.FL.580...4.."..
...NU VOLGT DE TEST OF DE INHOUD VAN"...
>..".DE CEL WAARVAN HET ADRES IN DE TELL
ER".J.H..".STAAT OOK NUL IS. ZO NIET, DA
N SPRINGT".W.R..".HET PROGRAMMA NAAR DE
PLAATS WAAR DE"...\..".TELLER WORDT VERH
OOGD.".B.F.."... LDA ($01),Y BEDEN
KT: Y=0 !"...P..". BNE $.. SPR
ING NAAR 'INC'"...Z.I.7:.1740:.FL.690.3.
...".WAS DE CELINHOUD WEL $00, DAN MOET
DE".W....".VOLGENDE CEL WORDEN GETEST:".
Z....". INY NU: Y=1"......
". LDA ($01),Y......". BNE $
.. NAAR 'LDY #$00'......".ALS DEZE C
ELINHOUD OOK $00 IS, MOET"......".NOG DE
DERDE CEL WORDEN GETEST:".5.J..".
INY NU: Y=2".O.T..". LDA
($01),Y.Z....". BNE $.. NAAR '
LDY #$00'"......".EN ALS DEZE CELINHOUD
OOK $00 IS, DAN".T....". RTS
TERUG NAAR BASIC".....I.8:.1740:.FL.8
20......".NU NOG EENS ALLES SAMEN:.".7..
.." LDA #$FF STARTADR = 03FF".
L...." STA $01".B.$.." LDA #$0
3".V...." STA $02...8.." ....LDY #
$00 Y, START = 0"...B.." . ".R.L..
" ....INC $01 ADR = ADR +1"...V..
" ..._BNE $.. = 0 ?"...`.." ...
INC $02".+.J.." ...._BMI $.. KLAAR
?".8.T.." ....".X.~.." .....LDA ($01),Y
Y = 0.Y...." ...._BNE $.. = 0 ?
"......" .."......" .. INY Y
= 1......" .. LDA ($01),Y"......" ...
._BNE $.. = 0 ?"......" .. INY
Y = 2"...D.." .. LDA ($01),Y"
.9.N.." ...._BNE $.. = 0 ?".Z.X.."
.....RTS KLAAR".P...I.9:.1740
:.FL.900......".NU EEN KLEIN TESTJE! WE
ROEPEN DE".H....".ZOEKROUTINE MET SYS 82
6 AAN EN ZETTEN"......".DAN HET IN $01/$
02 STAAND ADRES DECIMAAL".%....".OP HET
SCHERM: PEEK(1)+256*PEEK(2).".Q....".OM
EEN IDEE TE KRIJGEN HOE SNEL DAT"......"
.GAAT, LATEN WE DE CBM ONDER HET ZOEKEN"
...(..".EEN WITTE BALK OP HET SCHERM ZET
TEN.".M.2.."..BEN JE KLAAR (J/N) ?.."...
<..X$:.X$.."J".1340...F..C.0.10:.W.0.400
..(C):.W:.". ...";10.C:.C.M.P.."..
.":.826:.".ADR =";B(1).256.B(2);"
".H.Z..".VLUG, NIET WAAR ?!"...D.I.1
0:.1740:.FL.1030...N..".EEN TOEPASSING V
AN DIT PROGRAMMA IS".T.X..".DE BEREKENIN
G VAN DE LENGTE VAN"......".BASIC-PROGRA
MMA'S. EEN BASIC-PROGRAM-"......".MA BEG
INT ALTIJD OP $0400 = 1024 EN".\....".EI
NDIGT OP DE PLAATS WAAR DE DRIE $00".M.
..".BEGINNEN"......"..WE KUNNEN DUS SCHR
IJVEN:".P....". 1. 'SYS 826'":.". 2. '
PRINT PEEK(1)+256*PEEK(2)-1024'"......".
EN KRIJGEN ALS RESULTAAT DE LENGTE VAN".
%.H..".HET BASIC-PROGRAMMA IN BYTES.".=.
R.I.11:.1740:.FL.1260.S....".OPGAVEN :":
.U$......".1. BEPAAL DE LENGTE VAN DIT P
ROGRAMMA."......".2. FRE(0) HOUDT OOK RE
KENING MET DE".X....". VOOR VARIABELEN
NODIGE RUIMTE."......". MET DIT MACHI
NE-TAAL-PROGRAMMA EN".2....". FRE(0) M
OET JE DE VOOR VARIABELEN".T....". NOD
IGE RUIMTE BEPALEN."..."..".3. PROBEER M
ET DE INTERNE KLOK TE BE-"...,..". PAL
EN HOE SNEL DE ZOEKROUTINE IS IN".O.6.."
. KBYTE PER SECONDE."...@.I.12:.1740:.
FL.1390...J..".4. WAAROM WORDT ALS START
ADRES $03FF".=.T..". GENOMEN IN PLAATS
VAN $0400 ?".K.^..".5. WANNEER WORDT $0
2 MET 1 VERHOOGD ?"...H..".6. BIJ PRECIE
S WELK ADRES WORDT IN"...R..". ELK GEV
AL GESTOPT MET ZOEKEN ?"...|..".7. WAARO
M GEBRUIKEN WE ALS TELLER NIET"......".
GEWOON XR OF YR ?".8....".8. WAAROM BE
GINT DE BINNEN-LOOP MET".C....". 'INC
$01' EN DE BEIDE BUITENSTE".....". ME
T 'LDY #$00' ?"......"....- BLAD 13 - <+
> .............EINDE. <-> OPNIEUW".L....
1760:.FL.100.W.B..".":....L..." V.."....
.................... - BLAD";I;"- <+> V
ERDER <-> TERUG";.4 ...I.0.11:.X$:..H .
..X$:.X$."".1770.[ ...X$."+".FL.0:..N ..
.X$."-".FL.1:..X ...1770...
> CLICK IMAGE PREVIEW FOR FULL MODAL