P
FILE INFORMATION
FILENAME(S): P
FILE TYPE(S): PRG
FILE SIZE: 10.7K
FIRST SEEN: 2025-11-30 21:06:53
APPEARS ON: 1 disk(s)
FILE HASH
16133a03565210716d9484c64f6db97150c86167ad575d17ed17777ac6f7af72
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| VW | P | PRG | DuncanTwain | 15 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: D8 1F F1 1F 64 00 2E 42 41 20 24 38 30 30 30 20 |....d..BA $8000 |
00000010: 20 3B 56 57 2D 56 49 43 32 30 00 F7 1F 6E 00 3B | ;VW-VIC20...n.;|
00000020: 00 1A 20 78 00 2E 45 51 20 49 52 51 54 45 4C 20 |.. x..EQ IRQTEL |
00000030: 3D 20 24 30 30 30 34 20 3B 54 45 4C 4C 45 52 20 |= $0004 ;TELLER |
00000040: 50 49 46 00 31 20 82 00 2E 45 51 20 54 4F 45 54 |PIF.1 ...EQ TOET|
00000050: 53 20 20 3D 20 24 30 30 30 35 00 48 20 8C 00 2E |S = $0005.H ...|
00000060: 45 51 20 54 45 4D 50 20 20 20 3D 20 24 30 30 30 |EQ TEMP = $000|
00000070: 36 00 6E 20 96 00 2E 45 51 20 55 50 4D 49 4E 20 |6.n ...EQ UPMIN |
00000080: 20 3D 20 24 30 30 30 37 20 3B 55 50 44 41 54 45 | = $0007 ;UPDATE|
00000090: 2F 4D 49 4E 55 55 54 00 8D 20 A0 00 2E 45 51 20 |/MINUUT.. ...EQ |
000000A0: 53 54 41 54 55 53 20 3D 20 24 30 30 30 38 20 3B |STATUS = $0008 ;|
000000B0: 53 54 41 54 55 53 00 B1 20 AA 00 2E 45 51 20 53 |STATUS.. ...EQ S|
000000C0: 43 52 20 20 20 20 3D 20 24 30 34 30 30 20 3B 56 |CR = $0400 ;V|
000000D0: 49 44 45 4F 53 43 48 45 52 4D 00 D7 20 B4 00 2E |IDEOSCHERM.. ...|
000000E0: 45 51 20 44 41 30 4B 4D 44 20 3D 20 24 43 30 30 |EQ DA0KMD = $C00|
000000F0: 30 20 3B 54 41 42 45 4C 20 41 46 53 54 41 4E 44 |0 ;TABEL AFSTAND|
00000100: 00 FD 20 B6 00 2E 45 51 20 44 41 31 4B 4D 44 20 |.. ...EQ DA1KMD |
00000110: 3D 20 24 43 31 30 30 20 3B 54 41 42 45 4C 20 41 |= $C100 ;TABEL A|
00000120: 46 53 54 41 4E 44 00 1F 21 B9 00 2E 45 51 20 44 |FSTAND..!...EQ D|
00000130: 41 30 4B 4D 48 20 3D 20 24 43 34 30 30 20 3B 54 |A0KMH = $C400 ;T|
00000140: 41 42 45 4C 20 4B 4D 48 00 41 21 BB 00 2E 45 51 |ABEL KMH.A!...EQ|
00000150: 20 44 41 31 4B 4D 48 20 3D 20 24 43 35 30 30 20 | DA1KMH = $C500 |
00000160: 3B 54 41 42 45 4C 20 4B 4D 48 00 63 21 BE 00 2E |;TABEL KMH.c!...|
00000170: 45 51 20 44 41 54 52 50 4D 20 3D 20 24 43 38 30 |EQ DATRPM = $C80|
00000180: 30 20 3B 54 41 42 45 4C 20 52 50 4D 00 88 21 C8 |0 ;TABEL RPM..!.|
00000190: 00 2E 45 51 20 44 52 41 20 20 20 20 3D 20 24 44 |..EQ DRA = $D|
000001A0: 43 30 30 20 3B 4F 55 54 20 4B 45 59 42 4F 41 52 |C00 ;OUT KEYBOAR|
000001B0: 44 00 AC 21 D2 00 2E 45 51 20 44 52 42 20 20 20 |D..!...EQ DRB |
000001C0: 20 3D 20 24 44 43 30 31 20 3B 49 4E 20 4B 45 59 | = $DC01 ;IN KEY|
000001D0: 42 4F 41 52 44 00 D0 21 DC 00 2E 45 51 20 54 49 |BOARD..!...EQ TI|
000001E0: 41 20 20 20 20 3D 20 24 44 46 32 30 20 3B 41 44 |A = $DF20 ;AD|
000001F0: 52 45 53 20 54 49 4D 45 52 00 F3 21 E6 00 2E 45 |RES TIMER..!...E|
00000200: 51 20 54 49 44 20 20 20 20 3D 20 24 44 46 34 30 |Q TID = $DF40|
00000210: 20 3B 44 41 54 41 20 54 49 4D 45 52 00 19 22 F0 | ;DATA TIMER..".|
00000220: 00 2E 45 51 20 49 4E 50 55 54 20 20 3D 20 24 44 |..EQ INPUT = $D|
00000230: 46 36 30 20 3B 49 4E 50 55 54 20 53 49 47 4E 41 |F60 ;INPUT SIGNA|
00000240: 4C 53 00 3B 22 FA 00 2E 45 51 20 44 49 50 20 20 |LS.;"...EQ DIP |
00000250: 20 20 3D 20 24 44 46 43 30 20 3B 44 49 50 53 57 | = $DFC0 ;DIPSW|
00000260: 49 54 43 48 00 5E 22 04 01 2E 45 51 20 4D 41 54 |ITCH.^"...EQ MAT|
00000270: 52 49 58 20 3D 20 24 45 42 38 31 20 3B 44 45 43 |RIX = $EB81 ;DEC|
00000280: 4F 44 45 52 49 4E 47 00 64 22 0E 01 3B 00 84 22 |ODERING.d"..;.."|
00000290: 18 01 3B 20 52 4F 4D 20 4D 4F 45 54 20 4F 50 20 |..; ROM MOET OP |
000002A0: 24 41 30 30 30 20 53 54 41 52 54 45 4E 00 8A 22 |$A000 STARTEN.."|
000002B0: 22 01 3B 00 9C 22 2C 01 2E 57 4F 20 53 54 41 52 |".;..",..WO STAR|
000002C0: 54 2C 4E 4D 49 00 C1 22 36 01 2E 57 4F 20 24 43 |T,NMI.."6..WO $C|
000002D0: 33 43 32 2C 24 33 38 43 44 2C 24 46 46 33 31 20 |3C2,$38CD,$FF31 |
000002E0: 20 20 20 3B 20 43 42 4D 38 30 00 C7 22 40 01 3B | ; CBM80.."@.;|
000002F0: 00 D5 22 4A 01 53 54 41 52 54 20 4E 4F 50 00 DB |.."J.START NOP..|
00000300: 22 54 01 3B 00 FD 22 5E 01 3B 20 20 20 44 49 53 |"T.;.."^.; DIS|
00000310: 41 42 4C 45 20 49 52 51 27 53 20 36 35 32 32 2C |ABLE IRQ'S 6522,|
00000320: 31 34 36 38 31 38 00 03 23 68 01 3B 00 0C 23 72 |146818..#h.;..#r|
00000330: 01 20 53 45 49 00 24 23 7C 01 3B 20 20 20 20 20 |. SEI.$#|.; |
00000340: 20 20 20 20 20 20 20 4C 44 41 20 23 30 00 3F 23 | LDA #0.?#|
00000350: 86 01 3B 20 20 20 20 20 20 20 20 20 20 20 20 53 |..; S|
00000360: 54 41 20 24 39 31 31 45 00 5A 23 90 01 3B 20 20 |TA $911E.Z#..; |
00000370: 20 20 20 20 20 20 20 20 20 20 53 54 41 20 24 39 | STA $9|
00000380: 31 32 45 00 6E 23 9A 01 20 4C 44 41 23 24 46 46 |12E.n#.. LDA#$FF|
00000390: 3B 20 43 4C 45 41 52 00 82 23 A4 01 20 53 54 41 |; CLEAR..#.. STA|
000003A0: 24 44 43 30 44 3B 20 36 35 32 36 00 96 23 AE 01 |$DC0D; 6526..#..|
000003B0: 20 53 54 41 24 44 44 30 44 3B 20 43 2D 36 34 00 | STA$DD0D; C-64.|
000003C0: A2 23 B8 01 20 4C 44 41 23 31 31 00 AE 23 C2 01 |.#.. LDA#11..#..|
000003D0: 20 53 54 41 54 49 41 00 B9 23 CC 01 20 4C 44 41 | STATIA..#.. LDA|
000003E0: 23 32 00 C5 23 D6 01 20 53 54 41 54 49 44 00 CB |#2..#.. STATID..|
000003F0: 23 E0 01 3B 00 E6 23 EA 01 3B 20 49 4E 49 54 49 |#..;..#..; INITI|
00000400: 41 4C 49 53 41 54 49 45 20 56 49 43 2D 32 30 00 |ALISATIE VIC-20.|
00000410: EC 23 F4 01 3B 00 04 24 FE 01 3B 20 20 20 20 20 |.#..;..$..; |
00000420: 20 20 20 20 4A 53 52 20 24 46 44 38 44 00 1C 24 | JSR $FD8D..$|
00000430: 08 02 3B 20 20 20 20 20 20 20 20 20 4A 53 52 20 |..; JSR |
00000440: 24 46 44 35 32 00 34 24 12 02 3B 20 20 20 20 20 |$FD52.4$..; |
00000450: 20 20 20 20 4A 53 52 20 24 45 35 31 38 00 48 24 | JSR $E518.H$|
00000460: 1C 02 20 4A 53 52 24 46 44 41 33 3B 20 43 2D 36 |.. JSR$FDA3; C-6|
00000470: 34 00 5C 24 26 02 20 4A 53 52 24 46 44 35 30 3B |4.\$&. JSR$FD50;|
00000480: 20 43 2D 36 34 00 70 24 30 02 20 4A 53 52 24 46 | C-64.p$0. JSR$F|
00000490: 44 31 35 3B 20 43 2D 36 34 00 84 24 3A 02 20 4A |D15; C-64..$:. J|
000004A0: 53 52 24 46 46 35 42 3B 20 43 2D 36 34 00 91 24 |SR$FF5B; C-64..$|
000004B0: 44 02 3B 20 20 20 36 35 32 32 00 A6 24 4E 02 3B |D.; 6522..$N.;|
000004C0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 30 00 | LDA #0.|
000004D0: CB 24 58 02 3B 20 20 20 20 20 20 20 20 20 53 54 |.$X.; ST|
000004E0: 41 20 24 39 31 31 43 20 20 20 20 20 20 3B 20 50 |A $911C ; P|
000004F0: 43 52 20 31 00 F0 24 62 02 3B 20 20 20 20 20 20 |CR 1..$b.; |
00000500: 20 20 20 53 54 41 20 24 39 31 32 43 20 20 20 20 | STA $912C |
00000510: 20 20 3B 20 50 43 52 20 32 00 15 25 6C 02 3B 20 | ; PCR 2..%l.; |
00000520: 20 20 20 20 20 20 20 20 53 54 41 20 24 39 31 31 | STA $911|
00000530: 32 20 20 20 20 20 20 3B 44 44 52 42 20 31 00 3A |2 ;DDRB 1.:|
00000540: 25 76 02 3B 20 20 20 20 20 20 20 20 20 53 54 41 |%v.; STA|
00000550: 20 24 39 31 31 33 20 20 20 20 20 20 3B 44 44 52 | $9113 ;DDR|
00000560: 41 20 31 00 5F 25 80 02 3B 20 20 20 20 20 20 20 |A 1._%..; |
00000570: 20 20 53 54 41 20 24 39 31 32 33 20 20 20 20 20 | STA $9123 |
00000580: 20 3B 44 44 52 41 20 32 00 76 25 8A 02 3B 20 20 | ;DDRA 2.v%..; |
00000590: 20 20 20 20 20 20 20 4C 44 41 20 23 24 46 46 00 | LDA #$FF.|
000005A0: 9B 25 94 02 3B 20 20 20 20 20 20 20 20 20 53 54 |.%..; ST|
000005B0: 41 20 24 39 31 32 32 20 20 20 20 20 20 3B 44 44 |A $9122 ;DD|
000005C0: 52 42 20 32 00 B0 25 9E 02 3B 20 20 20 20 20 20 |RB 2..%..; |
000005D0: 20 20 20 4C 44 58 20 23 34 00 D6 25 A8 02 3B 53 | LDX #4..%..;S|
000005E0: 54 31 20 20 20 20 20 20 20 53 54 41 20 24 39 31 |T1 STA $91|
000005F0: 31 33 2C 58 20 20 20 20 3B 54 49 4D 45 52 53 00 |13,X ;TIMERS.|
00000600: F0 25 B2 02 3B 20 20 20 20 20 20 20 20 20 53 54 |.%..; ST|
00000610: 41 20 24 39 31 32 33 2C 58 00 02 26 BC 02 3B 20 |A $9123,X..&..; |
00000620: 20 20 20 20 20 20 20 20 44 45 58 00 18 26 C6 02 | DEX..&..|
00000630: 3B 20 20 20 20 20 20 20 20 20 42 4E 45 20 53 54 |; BNE ST|
00000640: 31 00 1E 26 D0 02 3B 00 30 26 DA 02 20 4C 44 41 |1..&..;.0&.. LDA|
00000650: 23 30 3B 20 49 52 51 20 2D 00 45 26 E4 02 20 53 |#0; IRQ -.E&.. S|
00000660: 54 41 24 30 33 31 34 3B 56 45 43 54 4F 52 00 57 |TA$0314;VECTOR.W|
00000670: 26 EE 02 20 4C 44 41 23 24 39 30 3B 23 23 23 23 |&.. LDA#$90;####|
00000680: 00 65 26 F8 02 20 53 54 41 24 30 33 31 35 00 6B |.e&.. STA$0315.k|
00000690: 26 02 03 3B 00 89 26 0C 03 3B 20 4B 4C 45 55 52 |&..;..&..; KLEUR|
000006A0: 20 4B 41 52 41 4B 54 45 52 20 26 20 53 43 48 45 | KARAKTER & SCHE|
000006B0: 52 4D 00 8F 26 16 03 3B 00 9A 26 20 03 20 4C 44 |RM..&..;..& . LD|
000006C0: 58 23 30 00 A5 26 2A 03 20 4C 44 41 23 31 00 BE |X#0..&*. LDA#1..|
000006D0: 26 34 03 53 54 32 20 53 54 41 24 44 38 30 30 2C |&4.ST2 STA$D800,|
000006E0: 58 3B 20 43 2D 36 34 00 D4 26 3E 03 20 53 54 41 |X; C-64..&>. STA|
000006F0: 24 44 39 30 30 2C 58 3B 20 43 2D 36 34 00 EA 26 |$D900,X; C-64..&|
00000700: 48 03 20 53 54 41 24 44 41 30 30 2C 58 3B 20 43 |H. STA$DA00,X; C|
00000710: 2D 36 34 00 00 27 52 03 20 53 54 41 24 44 42 30 |-64..'R. STA$DB0|
00000720: 30 2C 58 3B 20 43 2D 36 34 00 1D 27 5C 03 3B 53 |0,X; C-64..'\.;S|
00000730: 54 32 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |T2 STA $|
00000740: 39 36 30 30 2C 58 00 3A 27 66 03 3B 20 20 20 20 |9600,X.:'f.; |
00000750: 20 20 20 20 20 20 20 20 53 54 41 20 24 39 37 30 | STA $970|
00000760: 30 2C 58 00 43 27 70 03 20 49 4E 58 00 4F 27 7A |0,X.C'p. INX.O'z|
00000770: 03 20 42 4E 45 53 54 32 00 68 27 84 03 3B 20 20 |. BNEST2.h'..; |
00000780: 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 32 | LDA #2|
00000790: 37 00 83 27 8E 03 3B 20 20 20 20 20 20 20 20 20 |7..'..; |
000007A0: 20 20 20 53 54 41 20 24 39 36 30 46 00 8E 27 98 | STA $960F..'.|
000007B0: 03 20 4C 44 41 23 30 00 A2 27 A2 03 20 53 54 41 |. LDA#0..'.. STA|
000007C0: 24 44 30 32 30 3B 20 43 2D 36 34 00 B6 27 AC 03 |$D020; C-64..'..|
000007D0: 20 53 54 41 24 44 30 32 31 3B 20 43 2D 36 34 00 | STA$D021; C-64.|
000007E0: C2 27 B6 03 20 53 54 41 24 30 34 00 D0 27 C0 03 |.'.. STA$04..'..|
000007F0: 20 4C 44 41 24 44 30 31 38 00 DB 27 CA 03 20 4F | LDA$D018..'.. O|
00000800: 52 41 23 32 00 E9 27 D4 03 20 53 54 41 24 44 30 |RA#2..'.. STA$D0|
00000810: 31 38 00 EF 27 DE 03 3B 00 03 28 E8 03 3B 20 4F |18..'..;..(..; O|
00000820: 50 42 4F 55 57 20 53 43 48 45 52 4D 00 09 28 F2 |PBOUW SCHERM..(.|
00000830: 03 3B 00 16 28 FC 03 20 4C 44 58 23 32 34 30 00 |.;..(.. LDX#240.|
00000840: 31 28 06 04 53 54 32 41 20 4C 44 41 53 43 52 45 |1(..ST2A LDASCRE|
00000850: 45 4E 31 2C 58 3B 23 23 23 23 00 41 28 10 04 20 |EN1,X;####.A(.. |
00000860: 53 54 41 53 43 52 2D 31 2C 58 00 58 28 1A 04 20 |STASCR-1,X.X(.. |
00000870: 4C 44 41 53 43 52 45 45 4E 32 2C 58 3B 23 23 23 |LDASCREEN2,X;###|
00000880: 23 00 6A 28 24 04 20 53 54 41 53 43 52 2B 32 33 |#.j($. STASCR+23|
00000890: 39 2C 58 00 81 28 2E 04 20 4C 44 41 53 43 52 45 |9,X..(.. LDASCRE|
000008A0: 45 4E 33 2C 58 3B 23 23 23 23 00 93 28 38 04 20 |EN3,X;####..(8. |
000008B0: 53 54 41 53 43 52 2B 34 37 39 2C 58 00 AA 28 42 |STASCR+479,X..(B|
000008C0: 04 20 4C 44 41 53 43 52 45 45 4E 34 2C 58 3B 23 |. LDASCREEN4,X;#|
000008D0: 23 23 23 00 BC 28 4C 04 20 53 54 41 53 43 52 2B |###..(L. STASCR+|
000008E0: 37 31 39 2C 58 00 C5 28 56 04 20 44 45 58 00 D2 |719,X..(V. DEX..|
000008F0: 28 60 04 20 42 4E 45 53 54 32 41 00 D8 28 6A 04 |(`. BNEST2A..(j.|
00000900: 3B 00 F4 28 74 04 3B 20 42 45 52 45 4B 45 4E 49 |;..(t.; BEREKENI|
00000910: 4E 47 20 44 41 54 41 56 45 4C 44 45 4E 00 FA 28 |NG DATAVELDEN..(|
00000920: 7E 04 3B 00 09 29 88 04 44 41 30 20 53 54 58 24 |~.;..)..DA0 STX$|
00000930: 33 31 00 15 29 92 04 20 53 54 58 24 33 32 00 21 |31..).. STX$32.!|
00000940: 29 9C 04 20 53 54 58 24 33 33 00 2D 29 A6 04 20 |).. STX$33.-).. |
00000950: 53 54 58 24 33 34 00 39 29 B0 04 20 53 54 58 24 |STX$34.9).. STX$|
00000960: 33 35 00 48 29 BA 04 20 53 54 58 44 41 30 4B 4D |35.H).. STXDA0KM|
00000970: 44 00 57 29 C4 04 20 53 54 58 44 41 31 4B 4D 44 |D.W).. STXDA1KMD|
00000980: 00 66 29 E2 04 44 41 31 20 4C 44 41 44 49 50 00 |.f)..DA1 LDADIP.|
00000990: 72 29 EC 04 20 43 4D 50 44 49 50 00 7E 29 F6 04 |r).. CMPDIP.~)..|
000009A0: 20 42 4E 45 44 41 31 00 95 29 00 05 44 41 32 20 | BNEDA1..)..DA2 |
000009B0: 43 4D 50 23 34 30 3B 43 4F 4E 56 45 52 54 00 A6 |CMP#40;CONVERT..|
000009C0: 29 0A 05 20 42 43 43 44 41 33 3B 20 44 49 50 00 |).. BCCDA3; DIP.|
000009D0: B7 29 14 05 20 53 42 43 23 34 30 3B 4E 41 41 52 |.).. SBC#40;NAAR|
000009E0: 00 C8 29 1E 05 20 49 4E 43 24 33 32 3B 20 42 43 |..).. INC$32; BC|
000009F0: 44 00 D4 29 28 05 20 42 4E 45 44 41 32 00 E2 29 |D..)(. BNEDA2..)|
00000A00: 32 05 44 41 33 20 43 4D 50 23 34 00 EE 29 3C 05 |2.DA3 CMP#4..)<.|
00000A10: 20 42 43 43 44 41 34 00 F9 29 46 05 20 53 42 43 | BCCDA4..)F. SBC|
00000A20: 23 34 00 05 2A 50 05 20 49 4E 43 24 33 31 00 11 |#4..*P. INC$31..|
00000A30: 2A 5A 05 20 42 4E 45 44 41 33 00 1D 2A 64 05 44 |*Z. BNEDA3..*d.D|
00000A40: 41 34 20 54 41 59 00 29 2A 6E 05 20 41 53 4C 24 |A4 TAY.)*n. ASL$|
00000A50: 33 32 00 35 2A 78 05 20 41 53 4C 24 33 32 00 41 |32.5*x. ASL$32.A|
00000A60: 2A 82 05 20 41 53 4C 24 33 32 00 4D 2A 8C 05 20 |*.. ASL$32.M*.. |
00000A70: 41 53 4C 24 33 32 00 59 2A 96 05 20 4C 44 41 24 |ASL$32.Y*.. LDA$|
00000A80: 33 32 00 62 2A A0 05 20 43 4C 43 00 6E 2A AA 05 |32.b*.. CLC.n*..|
00000A90: 20 41 44 43 24 33 31 00 7A 2A B4 05 20 53 54 41 | ADC$31.z*.. STA|
00000AA0: 24 33 31 00 83 2A BE 05 20 54 59 41 00 90 2A C8 |$31..*.. TYA..*.|
00000AB0: 05 20 42 45 51 44 41 34 42 00 99 2A D2 05 20 54 |. BEQDA4B..*.. T|
00000AC0: 41 58 00 A4 2A DC 05 20 4C 44 41 23 30 00 B2 2A |AX..*.. LDA#0..*|
00000AD0: E6 05 20 53 45 44 3B 21 21 21 21 00 BB 2A F0 05 |.. SED;!!!!..*..|
00000AE0: 20 43 4C 43 00 CC 2A FA 05 44 41 34 41 20 41 44 | CLC..*..DA4A AD|
00000AF0: 43 23 24 32 35 00 D5 2A 04 06 20 44 45 58 00 E2 |C#$25..*.. DEX..|
00000B00: 2A 0E 06 20 42 4E 45 44 41 34 41 00 F2 2A 18 06 |*.. BNEDA4A..*..|
00000B10: 44 41 34 42 20 53 54 41 24 33 32 00 FB 2A 2C 06 |DA4B STA$32..*,.|
00000B20: 20 49 4E 58 00 0A 2B 36 06 44 41 35 20 4C 44 41 | INX..+6.DA5 LDA|
00000B30: 24 33 35 00 13 2B 40 06 20 43 4C 43 00 1F 2B 4A |$35..+@. CLC..+J|
00000B40: 06 20 41 44 43 24 33 32 00 2B 2B 54 06 20 53 54 |. ADC$32.++T. ST|
00000B50: 41 24 33 35 00 37 2B 5E 06 20 4C 44 41 24 33 34 |A$35.7+^. LDA$34|
00000B60: 00 43 2B 68 06 20 41 44 43 24 33 31 00 4F 2B 72 |.C+h. ADC$31.O+r|
00000B70: 06 20 53 54 41 24 33 34 00 65 2B 7C 06 20 53 54 |. STA$34.e+|. ST|
00000B80: 41 44 41 30 4B 4D 44 2C 58 3B 20 4C 4F 57 00 71 |ADA0KMD,X; LOW.q|
00000B90: 2B 86 06 20 4C 44 41 24 33 33 00 7C 2B 90 06 20 |+.. LDA$33.|+.. |
00000BA0: 41 44 43 23 30 00 88 2B 9A 06 20 53 54 41 24 33 |ADC#0..+.. STA$3|
00000BB0: 33 00 9F 2B A4 06 20 53 54 41 44 41 31 4B 4D 44 |3..+.. STADA1KMD|
00000BC0: 2C 58 3B 20 48 49 47 48 00 A8 2B AE 06 20 49 4E |,X; HIGH..+.. IN|
00000BD0: 58 00 B4 2B B8 06 20 42 4E 45 44 41 35 00 C2 2B |X..+.. BNEDA5..+|
00000BE0: BA 06 3B 20 20 20 20 20 4B 4D 48 00 D4 2B BC 06 |..; KMH..+..|
00000BF0: 20 4C 44 41 44 41 30 4B 4D 44 2B 33 36 00 E0 2B | LDADA0KMD+36..+|
00000C00: BE 06 20 53 54 41 24 33 31 00 F2 2B C0 06 20 4C |.. STA$31..+.. L|
00000C10: 44 41 44 41 31 4B 4D 44 2B 33 36 00 FE 2B C2 06 |DADA1KMD+36..+..|
00000C20: 20 53 54 41 24 33 32 00 09 2C C4 06 20 4C 44 58 | STA$32..,.. LDX|
00000C30: 23 30 00 15 2C C6 06 20 53 54 58 24 33 33 00 21 |#0..,.. STX$33.!|
00000C40: 2C C8 06 20 53 54 58 24 33 34 00 2D 2C CA 06 20 |,.. STX$34.-,.. |
00000C50: 53 54 58 24 33 35 00 3C 2C CC 06 20 53 54 58 44 |STX$35.<,.. STXD|
00000C60: 41 30 4B 4D 48 00 4B 2C CE 06 20 53 54 58 44 41 |A0KMH.K,.. STXDA|
00000C70: 31 4B 4D 48 00 56 2C D0 06 20 4C 44 58 23 32 00 |1KMH.V,.. LDX#2.|
00000C80: 62 2C D1 06 44 41 36 20 43 4C 43 00 6E 2C D2 06 |b,..DA6 CLC.n,..|
00000C90: 20 4C 44 41 24 33 33 00 7A 2C D4 06 20 41 44 43 | LDA$33.z,.. ADC|
00000CA0: 24 33 31 00 86 2C D6 06 20 53 54 41 24 33 33 00 |$31..,.. STA$33.|
00000CB0: 92 2C D8 06 20 4C 44 41 24 33 34 00 9E 2C DA 06 |.,.. LDA$34..,..|
00000CC0: 20 41 44 43 24 33 32 00 AA 2C DC 06 20 53 54 41 | ADC$32..,.. STA|
00000CD0: 24 33 34 00 BB 2C DD 06 20 53 54 41 44 41 30 4B |$34..,.. STADA0K|
00000CE0: 4D 48 2C 58 00 C7 2C DE 06 20 4C 44 41 24 33 35 |MH,X..,.. LDA$35|
00000CF0: 00 D2 2C E0 06 20 41 44 43 23 30 00 DE 2C E2 06 |..,.. ADC#0..,..|
00000D00: 20 53 54 41 24 33 35 00 EF 2C E4 06 20 53 54 41 | STA$35..,.. STA|
00000D10: 44 41 31 4B 4D 48 2C 58 00 FB 2C E6 06 20 4C 44 |DA1KMH,X..,.. LD|
00000D20: 41 24 33 34 00 08 2D E8 06 20 41 4E 44 23 24 30 |A$34..-.. AND#$0|
00000D30: 46 00 13 2D EA 06 20 43 4D 50 23 35 00 1F 2D EC |F..-.. CMP#5..-.|
00000D40: 06 20 42 4D 49 44 41 37 00 30 2D EE 06 20 4C 44 |. BMIDA7.0-.. LD|
00000D50: 41 44 41 30 4B 4D 48 2C 58 00 39 2D F0 06 20 43 |ADA0KMH,X.9-.. C|
00000D60: 4C 43 00 46 2D F2 06 20 41 44 43 23 24 31 30 00 |LC.F-.. ADC#$10.|
00000D70: 57 2D F4 06 20 53 54 41 44 41 30 4B 4D 48 2C 58 |W-.. STADA0KMH,X|
00000D80: 00 68 2D F6 06 20 4C 44 41 44 41 31 4B 4D 48 2C |.h-.. LDADA1KMH,|
00000D90: 58 00 73 2D F8 06 20 41 44 43 23 30 00 84 2D FA |X.s-.. ADC#0..-.|
00000DA0: 06 20 53 54 41 44 41 31 4B 4D 48 2C 58 00 90 2D |. STADA1KMH,X..-|
00000DB0: FC 06 44 41 37 20 49 4E 58 00 99 2D FE 06 20 49 |..DA7 INX..-.. I|
00000DC0: 4E 58 00 A5 2D 00 07 20 42 4E 45 44 41 36 00 B3 |NX..-.. BNEDA6..|
00000DD0: 2D 30 07 3B 20 20 20 20 20 52 50 4D 00 BE 2D 3A |-0.; RPM..-:|
00000DE0: 07 20 4C 44 58 23 30 00 CA 2D 44 07 20 53 54 58 |. LDX#0..-D. STX|
00000DF0: 24 33 33 00 D6 2D 4E 07 20 53 54 58 24 33 34 00 |$33..-N. STX$34.|
00000E00: E5 2D 58 07 20 53 54 58 44 41 54 52 50 4D 00 EE |.-X. STXDATRPM..|
00000E10: 2D 62 07 20 49 4E 58 00 FD 2D 6C 07 44 41 38 20 |-b. INX..-l.DA8 |
00000E20: 4C 44 41 24 33 33 00 06 2E 76 07 20 43 4C 43 00 |LDA$33...v. CLC.|
00000E30: 13 2E 80 07 20 41 44 43 23 24 33 30 00 1F 2E 8A |.... ADC#$30....|
00000E40: 07 20 53 54 41 24 33 33 00 2B 2E 94 07 20 4C 44 |. STA$33.+... LD|
00000E50: 41 24 33 34 00 36 2E 9E 07 20 41 44 43 23 30 00 |A$34.6... ADC#0.|
00000E60: 42 2E A8 07 20 53 54 41 24 33 34 00 4E 2E B2 07 |B... STA$34.N...|
00000E70: 20 4C 44 59 24 33 33 00 5B 2E BC 07 20 43 50 59 | LDY$33.[... CPY|
00000E80: 23 24 35 30 00 67 2E C6 07 20 42 4D 49 44 41 39 |#$50.g... BMIDA9|
00000E90: 00 70 2E D0 07 20 43 4C 43 00 7B 2E DA 07 20 41 |.p... CLC.{... A|
00000EA0: 44 43 23 31 00 8F 2E E4 07 44 41 39 20 53 54 41 |DC#1.....DA9 STA|
00000EB0: 44 41 54 52 50 4D 2C 58 00 98 2E EE 07 20 49 4E |DATRPM,X..... IN|
00000EC0: 58 00 A4 2E F8 07 20 42 4E 45 44 41 38 00 AD 2E |X..... BNEDA8...|
00000ED0: 02 08 20 43 4C 44 00 B3 2E 0C 08 3B 00 C8 2E 16 |.. CLD.....;....|
00000EE0: 08 3B 20 43 4C 45 41 52 20 24 30 33 2D 24 31 30 |.; CLEAR $03-$10|
00000EF0: 30 00 CE 2E 20 08 3B 00 D9 2E 2A 08 20 4C 44 58 |0... .;...*. LDX|
00000F00: 23 33 00 E4 2E 34 08 20 4C 44 41 23 30 00 F5 2E |#3...4. LDA#0...|
00000F10: 3E 08 43 4C 31 20 53 54 41 24 30 30 2C 58 00 FE |>.CL1 STA$00,X..|
00000F20: 2E 48 08 20 49 4E 58 00 0A 2F 52 08 20 42 4E 45 |.H. INX../R. BNE|
00000F30: 43 4C 31 00 10 2F 5C 08 3B 00 24 2F 66 08 3B 20 |CL1../\.;.$/f.; |
00000F40: 54 45 53 54 20 43 4D 4F 53 2D 52 41 4D 00 2A 2F |TEST CMOS-RAM.*/|
00000F50: 70 08 3B 00 36 2F 7A 08 20 4C 44 41 23 31 33 00 |p.;.6/z. LDA#13.|
00000F60: 48 2F 84 08 20 53 54 41 54 49 41 3B 43 4C 45 41 |H/.. STATIA;CLEA|
00000F70: 52 00 5B 2F 8E 08 20 4C 44 41 54 49 44 3B 52 45 |R.[/.. LDATID;RE|
00000F80: 47 2E 20 44 00 67 2F 98 08 20 4C 44 41 23 31 34 |G. D.g/.. LDA#14|
00000F90: 00 73 2F A2 08 20 53 54 41 54 49 41 00 7F 2F AC |.s/.. STATIA../.|
00000FA0: 08 20 4C 44 41 54 49 44 00 8C 2F B6 08 20 43 4D |. LDATID../.. CM|
00000FB0: 50 23 24 35 35 00 98 2F C0 08 20 42 4E 45 53 54 |P#$55../.. BNEST|
00000FC0: 33 00 A4 2F CA 08 20 4C 44 41 23 31 35 00 B0 2F |3../.. LDA#15../|
00000FD0: D4 08 20 53 54 41 54 49 41 00 BC 2F DE 08 20 4C |.. STATIA../.. L|
00000FE0: 44 41 54 49 44 00 C9 2F E8 08 20 43 4D 50 23 24 |DATID../.. CMP#$|
00000FF0: 41 41 00 D5 2F F2 08 20 42 4E 45 53 54 33 00 E5 |AA../.. BNEST3..|
00001000: 2F FC 08 20 4A 4D 50 53 54 34 3B 23 23 23 00 FD |/.. JMPST4;###..|
00001010: 2F 06 09 3B 20 20 45 52 52 4F 52 3A 20 43 4C 45 |/..; ERROR: CLE|
00001020: 41 52 20 41 4C 4C 00 0C 30 10 09 53 54 33 20 4C |AR ALL..0..ST3 L|
00001030: 44 58 23 38 30 00 27 30 1A 09 53 54 33 41 20 4C |DX#80.'0..ST3A L|
00001040: 44 41 53 43 52 45 45 4E 30 2C 58 3B 23 23 23 23 |DASCREEN0,X;####|
00001050: 00 37 30 24 09 20 53 54 41 53 43 52 2D 31 2C 58 |.70$. STASCR-1,X|
00001060: 00 40 30 2E 09 20 44 45 58 00 4D 30 38 09 20 42 |.@0.. DEX.M08. B|
00001070: 4E 45 53 54 33 41 00 53 30 42 09 3B 00 5F 30 4C |NEST3A.S0B.;._0L|
00001080: 09 20 4C 44 58 23 31 34 00 6B 30 56 09 20 53 54 |. LDX#14.k0V. ST|
00001090: 58 54 49 41 00 78 30 60 09 20 4C 44 41 23 24 35 |XTIA.x0`. LDA#$5|
000010A0: 35 00 84 30 6A 09 20 53 54 41 54 49 44 00 90 30 |5..0j. STATID..0|
000010B0: 74 09 20 4C 44 58 23 31 35 00 9C 30 7E 09 20 53 |t. LDX#15..0~. S|
000010C0: 54 58 54 49 41 00 A9 30 88 09 20 4C 44 41 23 24 |TXTIA..0.. LDA#$|
000010D0: 41 41 00 B5 30 92 09 20 53 54 41 54 49 44 00 C0 |AA..0.. STATID..|
000010E0: 30 9C 09 20 4C 44 41 23 30 00 CD 30 A6 09 53 54 |0.. LDA#0..0..ST|
000010F0: 33 42 20 49 4E 58 00 D9 30 B0 09 20 53 54 58 54 |3B INX..0.. STXT|
00001100: 49 41 00 E5 30 BA 09 20 53 54 41 54 49 44 00 F2 |IA..0.. STATID..|
00001110: 30 C4 09 20 43 50 58 23 24 34 31 00 FF 30 CE 09 |0.. CPX#$41..0..|
00001120: 20 42 4E 45 53 54 33 42 00 05 31 D8 09 3B 00 24 | BNEST3B..1..;.$|
00001130: 31 E2 09 3B 20 49 4E 53 54 45 4C 4C 45 4E 20 54 |1..; INSTELLEN T|
00001140: 49 4A 44 20 45 4E 20 54 4F 54 20 4B 4D 00 2A 31 |IJD EN TOT KM.*1|
00001150: EC 09 3B 00 3E 31 F6 09 20 4C 44 58 23 31 31 3B |..;.>1.. LDX#11;|
00001160: 20 52 45 47 2E 20 42 00 4A 31 00 0A 20 53 54 58 | REG. B.J1.. STX|
00001170: 54 49 41 00 5D 31 0A 0A 20 4C 44 41 23 24 38 32 |TIA.]1.. LDA#$82|
00001180: 3B 20 53 54 4F 50 00 70 31 14 0A 20 53 54 41 54 |; STOP.p1.. STAT|
00001190: 49 44 3B 20 20 54 49 4A 44 00 76 31 1E 0A 3B 00 |ID; TIJD.v1..;.|
000011A0: 87 31 28 0A 20 4C 44 58 23 34 3B 20 44 41 54 45 |.1(. LDX#4; DATE|
000011B0: 00 A0 31 32 0A 53 54 33 43 20 4C 44 41 44 41 54 |..12.ST3C LDADAT|
000011C0: 2D 31 2C 58 3B 23 23 23 23 00 B2 31 3C 0A 20 53 |-1,X;####..1<. S|
000011D0: 54 41 53 43 52 2B 31 31 39 2C 58 00 BB 31 46 0A |TASCR+119,X..1F.|
000011E0: 20 44 45 58 00 C8 31 50 0A 20 42 4E 45 53 54 33 | DEX..1P. BNEST3|
000011F0: 43 00 CE 31 5A 0A 3B 00 E6 31 64 0A 20 4C 44 41 |C..1Z.;..1d. LDA|
00001200: 23 3C 28 53 43 52 2B 31 32 35 29 3B 44 41 47 00 |#<(SCR+125);DAG.|
00001210: F2 31 6E 0A 20 53 54 41 24 30 32 00 06 32 78 0A |.1n. STA$02..2x.|
00001220: 20 4C 44 41 23 3E 28 53 43 52 2B 31 32 35 29 00 | LDA#>(SCR+125).|
00001230: 12 32 82 0A 20 53 54 41 24 30 33 00 25 32 8C 0A |.2.. STA$03.%2..|
00001240: 20 4A 53 52 49 4E 53 54 45 4C 3B 23 23 23 00 30 | JSRINSTEL;###.0|
00001250: 32 96 0A 20 4C 44 58 23 37 00 3C 32 A0 0A 20 53 |2.. LDX#7.<2.. S|
00001260: 54 58 54 49 41 00 48 32 AA 0A 20 53 54 41 54 49 |TXTIA.H2.. STATI|
00001270: 44 00 4E 32 B4 0A 3B 00 69 32 BE 0A 20 4C 44 41 |D.N2..;.i2.. LDA|
00001280: 23 3C 28 53 43 52 2B 31 33 30 29 3B 4D 49 4E 55 |#<(SCR+130);MINU|
00001290: 55 54 00 75 32 C8 0A 20 53 54 41 24 30 32 00 89 |UT.u2.. STA$02..|
000012A0: 32 D2 0A 20 4C 44 41 23 3E 28 53 43 52 2B 31 33 |2.. LDA#>(SCR+13|
000012B0: 30 29 00 95 32 DC 0A 20 53 54 41 24 30 33 00 A8 |0)..2.. STA$03..|
000012C0: 32 E6 0A 20 4A 53 52 49 4E 53 54 45 4C 3B 23 23 |2.. JSRINSTEL;##|
000012D0: 23 00 B3 32 F0 0A 20 4C 44 58 23 38 00 BF 32 FA |#..2.. LDX#8..2.|
000012E0: 0A 20 53 54 58 54 49 41 00 CB 32 04 0B 20 53 54 |. STXTIA..2.. ST|
000012F0: 41 54 49 44 00 D1 32 0E 0B 3B 00 EA 32 18 0B 20 |ATID..2..;..2.. |
00001300: 4C 44 41 23 3C 28 53 43 52 2B 31 33 35 29 3B 4A |LDA#<(SCR+135);J|
00001310: 41 41 52 00 F6 32 22 0B 20 53 54 41 24 30 32 00 |AAR..2". STA$02.|
00001320: 0A 33 2C 0B 20 4C 44 41 23 3E 28 53 43 52 2B 31 |.3,. LDA#>(SCR+1|
00001330: 33 35 29 00 16 33 36 0B 20 53 54 41 24 30 33 00 |35)..36. STA$03.|
00001340: 29 33 40 0B 20 4A 53 52 49 4E 53 54 45 4C 3B 23 |)3@. JSRINSTEL;#|
00001350: 23 23 00 34 33 4A 0B 20 4C 44 58 23 39 00 40 33 |##.43J. LDX#9.@3|
00001360: 54 0B 20 53 54 58 54 49 41 00 4C 33 5E 0B 20 53 |T. STXTIA.L3^. S|
00001370: 54 41 54 49 44 00 52 33 68 0B 3B 00 63 33 72 0B |TATID.R3h.;.c3r.|
00001380: 20 4C 44 58 23 34 3B 20 54 49 4D 45 00 7C 33 7C | LDX#4; TIME.|3||
00001390: 0B 53 54 33 44 20 4C 44 41 54 59 44 2D 31 2C 58 |.ST3D LDATYD-1,X|
000013A0: 3B 23 23 23 23 00 8E 33 86 0B 20 53 54 41 53 43 |;####..3.. STASC|
000013B0: 52 2B 31 31 39 2C 58 00 97 33 90 0B 20 44 45 58 |R+119,X..3.. DEX|
000013C0: 00 A4 33 9A 0B 20 42 4E 45 53 54 33 44 00 AA 33 |..3.. BNEST3D..3|
000013D0: A4 0B 3B 00 BD 33 AE 0B 20 4C 44 41 23 30 3B 53 |..;..3.. LDA#0;S|
000013E0: 45 43 4F 4E 44 45 00 C9 33 B8 0B 20 53 54 41 54 |ECONDE..3.. STAT|
000013F0: 49 41 00 D5 33 C2 0B 20 53 54 41 54 49 44 00 E2 |IA..3.. STATID..|
00001400: 33 CC 0B 20 4C 44 41 23 24 33 30 00 F5 33 D6 0B |3.. LDA#$30..3..|
00001410: 20 53 54 41 53 43 52 2B 31 33 35 3B 38 31 00 08 | STASCR+135;81..|
00001420: 34 E0 0B 20 53 54 41 53 43 52 2B 31 33 36 3B 38 |4.. STASCR+136;8|
00001430: 32 00 15 34 EA 0B 20 4C 44 41 23 24 32 30 00 25 |2..4.. LDA#$20.%|
00001440: 34 F4 0B 20 53 54 41 53 43 52 2B 31 32 35 00 35 |4.. STASCR+125.5|
00001450: 34 FE 0B 20 53 54 41 53 43 52 2B 31 32 36 00 45 |4.. STASCR+126.E|
00001460: 34 08 0C 20 53 54 41 53 43 52 2B 31 33 30 00 55 |4.. STASCR+130.U|
00001470: 34 12 0C 20 53 54 41 53 43 52 2B 31 33 31 00 5B |4.. STASCR+131.[|
00001480: 34 1C 0C 3B 00 73 34 26 0C 20 4C 44 41 23 3C 28 |4..;.s4&. LDA#<(|
00001490: 53 43 52 2B 31 32 35 29 3B 55 55 52 00 7F 34 30 |SCR+125);UUR..40|
000014A0: 0C 20 53 54 41 24 30 32 00 93 34 3A 0C 20 4C 44 |. STA$02..4:. LD|
000014B0: 41 23 3E 28 53 43 52 2B 31 32 35 29 00 9F 34 44 |A#>(SCR+125)..4D|
000014C0: 0C 20 53 54 41 24 30 33 00 B2 34 4E 0C 20 4A 53 |. STA$03..4N. JS|
000014D0: 52 49 4E 53 54 45 4C 3B 23 23 23 00 BD 34 58 0C |RINSTEL;###..4X.|
000014E0: 20 4C 44 58 23 34 00 C9 34 62 0C 20 53 54 58 54 | LDX#4..4b. STXT|
000014F0: 49 41 00 D5 34 6C 0C 20 53 54 41 54 49 44 00 DB |IA..4l. STATID..|
00001500: 34 76 0C 3B 00 F6 34 80 0C 20 4C 44 41 23 3C 28 |4v.;..4.. LDA#<(|
00001510: 53 43 52 2B 31 33 30 29 3B 4D 49 4E 55 55 54 00 |SCR+130);MINUUT.|
00001520: 02 35 8A 0C 20 53 54 41 24 30 32 00 16 35 94 0C |.5.. STA$02..5..|
00001530: 20 4C 44 41 23 3E 28 53 43 52 2B 31 33 30 29 00 | LDA#>(SCR+130).|
00001540: 22 35 9E 0C 20 53 54 41 24 30 33 00 35 35 A8 0C |"5.. STA$03.55..|
00001550: 20 4A 53 52 49 4E 53 54 45 4C 3B 23 23 23 00 40 | JSRINSTEL;###.@|
00001560: 35 B2 0C 20 4C 44 58 23 32 00 4C 35 BC 0C 20 53 |5.. LDX#2.L5.. S|
00001570: 54 58 54 49 41 00 58 35 C6 0C 20 53 54 41 54 49 |TXTIA.X5.. STATI|
00001580: 44 00 5E 35 D0 0C 3B 00 6F 35 DA 0C 20 4C 44 58 |D.^5..;.o5.. LDX|
00001590: 23 34 3B 20 56 45 45 47 00 80 35 E4 0C 53 54 33 |#4; VEEG..5..ST3|
000015A0: 45 20 4C 44 41 23 24 32 30 00 92 35 EE 0C 20 53 |E LDA#$20..5.. S|
000015B0: 54 41 53 43 52 2B 31 31 39 2C 58 00 9B 35 F8 0C |TASCR+119,X..5..|
000015C0: 20 44 45 58 00 A8 35 02 0D 20 42 4E 45 53 54 33 | DEX..5.. BNEST3|
000015D0: 45 00 AE 35 0C 0D 3B 00 C2 35 16 0D 20 4C 44 41 |E..5..;..5.. LDA|
000015E0: 23 31 31 3B 20 52 45 47 2E 20 42 00 CE 35 20 0D |#11; REG. B..5 .|
000015F0: 20 53 54 41 54 49 41 00 E0 35 2A 0D 20 4C 44 58 | STATIA..5*. LDX|
00001600: 23 32 3B 20 53 54 41 52 54 00 F3 35 34 0D 20 53 |#2; START..54. S|
00001610: 54 58 54 49 44 3B 20 20 54 49 4A 44 00 0D 36 3E |TXTID; TIJD..6>|
00001620: 0D 3B 20 20 20 4B 49 4C 4F 4D 45 54 45 52 53 20 |.; KILOMETERS |
00001630: 54 4F 54 41 41 4C 00 18 36 48 0D 20 4C 44 58 23 |TOTAAL..6H. LDX#|
00001640: 30 00 34 36 52 0D 20 4C 44 41 23 3C 28 53 43 52 |0.46R. LDA#<(SCR|
00001650: 2B 36 30 37 29 3B 20 58 58 2E 2E 2E 2E 00 40 36 |+607); XX.....@6|
00001660: 5C 0D 20 53 54 41 24 30 32 00 54 36 66 0D 20 4C |\. STA$02.T6f. L|
00001670: 44 41 23 3E 28 53 43 52 2B 36 30 37 29 00 60 36 |DA#>(SCR+607).`6|
00001680: 70 0D 20 53 54 41 24 30 33 00 73 36 7A 0D 20 4A |p. STA$03.s6z. J|
00001690: 53 52 49 4E 53 54 45 4C 3B 23 23 23 00 81 36 84 |SRINSTEL;###..6.|
000016A0: 0D 20 53 54 41 24 31 30 2C 58 00 8A 36 8E 0D 20 |. STA$10,X..6.. |
000016B0: 49 4E 58 00 9D 36 98 0D 20 49 4E 43 24 30 32 3B |INX..6.. INC$02;|
000016C0: 2E 2E 58 58 2E 2E 00 A9 36 A2 0D 20 49 4E 43 24 |..XX....6.. INC$|
000016D0: 30 32 00 BC 36 AC 0D 20 4A 53 52 49 4E 53 54 45 |02..6.. JSRINSTE|
000016E0: 4C 3B 23 23 23 00 CA 36 B6 0D 20 53 54 41 24 31 |L;###..6.. STA$1|
000016F0: 30 2C 58 00 D3 36 C0 0D 20 49 4E 58 00 E6 36 CA |0,X..6.. INX..6.|
00001700: 0D 20 49 4E 43 24 30 32 3B 2E 2E 2E 2E 58 58 00 |. INC$02;....XX.|
00001710: F9 36 D4 0D 20 49 4E 43 24 30 32 3B 2E 2E 2E 2E |.6.. INC$02;....|
00001720: 58 58 00 0C 37 DE 0D 20 4A 53 52 49 4E 53 54 45 |XX..7.. JSRINSTE|
00001730: 4C 3B 23 23 23 00 1A 37 E8 0D 20 53 54 41 24 31 |L;###..7.. STA$1|
00001740: 30 2C 58 00 2D 37 F2 0D 20 4A 53 52 55 50 44 41 |0,X.-7.. JSRUPDA|
00001750: 54 45 3B 23 23 23 00 33 37 FC 0D 3B 00 53 37 06 |TE;###.37..;.S7.|
00001760: 0E 3B 20 44 49 53 50 4C 41 59 20 56 57 2D 54 52 |.; DISPLAY VW-TR|
00001770: 49 4B 45 20 43 4F 4D 50 55 54 45 52 00 59 37 10 |IKE COMPUTER.Y7.|
00001780: 0E 3B 00 68 37 1A 0E 53 54 34 20 4C 44 58 23 38 |.;.h7..ST4 LDX#8|
00001790: 30 00 83 37 24 0E 53 54 34 41 20 4C 44 41 53 43 |0..7$.ST4A LDASC|
000017A0: 52 45 45 4E 31 2C 58 3B 23 23 23 23 00 93 37 2E |REEN1,X;####..7.|
000017B0: 0E 20 53 54 41 53 43 52 2D 31 2C 58 00 9C 37 38 |. STASCR-1,X..78|
000017C0: 0E 20 44 45 58 00 A9 37 42 0E 20 42 4E 45 53 54 |. DEX..7B. BNEST|
000017D0: 34 41 00 AF 37 4C 0E 3B 00 C7 37 56 0E 3B 20 45 |4A..7L.;..7V.; E|
000017E0: 4E 41 42 4C 45 20 49 52 51 20 31 34 36 38 31 38 |NABLE IRQ 146818|
000017F0: 00 CD 37 60 0E 3B 00 E1 37 6A 0E 20 4C 44 58 23 |..7`.;..7j. LDX#|
00001800: 31 32 3B 20 52 45 47 2E 20 43 00 ED 37 74 0E 20 |12; REG. C..7t. |
00001810: 53 54 58 54 49 41 00 01 38 7E 0E 20 4C 44 41 54 |STXTIA..8~. LDAT|
00001820: 49 44 3B 43 4C 52 20 49 52 51 00 12 38 88 0E 20 |ID;CLR IRQ..8.. |
00001830: 44 45 58 3B 20 52 45 47 2E 20 42 00 1E 38 92 0E |DEX; REG. B..8..|
00001840: 20 53 54 58 54 49 41 00 2B 38 9C 0E 20 4C 44 41 | STXTIA.+8.. LDA|
00001850: 23 24 31 32 00 3F 38 A6 0E 20 53 54 41 54 49 44 |#$12.?8.. STATID|
00001860: 3B 45 4E 41 20 49 52 51 00 45 38 B0 0E 3B 00 6A |;ENA IRQ.E8..;.j|
00001870: 38 BA 0E 3B 20 49 4E 49 54 49 41 4C 49 53 41 54 |8..; INITIALISAT|
00001880: 49 45 20 4B 4D 2F 48 2C 20 52 50 4D 20 53 54 41 |IE KM/H, RPM STA|
00001890: 54 55 53 00 70 38 C4 0E 3B 00 80 38 CE 0E 4B 52 |TUS.p8..;..8..KR|
000018A0: 53 20 4C 44 58 23 24 46 46 00 8E 38 D8 0E 20 4C |S LDX#$FF..8.. L|
000018B0: 44 41 49 4E 50 55 54 00 99 38 E2 0E 20 41 4E 44 |DAINPUT..8.. AND|
000018C0: 23 32 00 A6 38 EC 0E 20 42 4E 45 4B 52 53 31 00 |#2..8.. BNEKRS1.|
000018D0: B2 38 F6 0E 20 53 54 41 24 30 45 00 BE 38 00 0F |.8.. STA$0E..8..|
000018E0: 2E 42 59 20 24 32 43 00 CE 38 0A 0F 4B 52 53 31 |.BY $2C..8..KRS1|
000018F0: 20 53 54 58 24 30 45 00 DC 38 14 0F 20 4C 44 41 | STX$0E..8.. LDA|
00001900: 49 4E 50 55 54 00 E7 38 1E 0F 20 41 4E 44 23 38 |INPUT..8.. AND#8|
00001910: 00 F4 38 28 0F 20 42 4E 45 4B 52 53 32 00 00 39 |..8(. BNEKRS2..9|
00001920: 32 0F 20 53 54 41 24 30 44 00 0C 39 3C 0F 2E 42 |2. STA$0D..9<..B|
00001930: 59 20 24 32 43 00 1C 39 46 0F 4B 52 53 32 20 53 |Y $2C..9F.KRS2 S|
00001940: 54 58 24 30 44 00 22 39 50 0F 3B 00 3C 39 5A 0F |TX$0D."9P.;.<9Z.|
00001950: 3B 20 24 24 24 20 20 47 52 4F 54 45 20 4C 55 53 |; $$$ GROTE LUS|
00001960: 20 20 24 24 24 00 42 39 64 0F 3B 00 51 39 6E 0F | $$$.B9d.;.Q9n.|
00001970: 3B 20 53 4E 45 4C 48 45 49 44 00 57 39 78 0F 3B |; SNELHEID.W9x.;|
00001980: 00 68 39 82 0F 4B 4D 48 20 4C 44 41 49 4E 50 55 |.h9..KMH LDAINPU|
00001990: 54 00 73 39 8C 0F 20 41 4E 44 23 32 00 80 39 96 |T.s9.. AND#2..9.|
000019A0: 0F 20 53 54 41 54 45 4D 50 00 8E 39 A0 0F 20 4C |. STATEMP..9.. L|
000019B0: 44 41 49 4E 50 55 54 00 99 39 AA 0F 20 41 4E 44 |DAINPUT..9.. AND|
000019C0: 23 32 00 AC 39 B4 0F 20 43 4D 50 54 45 4D 50 3B |#2..9.. CMPTEMP;|
000019D0: 20 41 4E 54 49 00 BF 39 BE 0F 20 42 4E 45 4B 4D | ANTI..9.. BNEKM|
000019E0: 48 3B 44 45 4E 44 45 52 00 CC 39 C8 0F 20 4C 44 |H;DENDER..9.. LD|
000019F0: 41 54 45 4D 50 00 D9 39 D2 0F 20 42 45 51 4B 4D |ATEMP..9.. BEQKM|
00001A00: 48 31 00 EA 39 DC 0F 20 4C 44 41 24 30 45 3B 4B |H1..9.. LDA$0E;K|
00001A10: 4D 3D 31 00 F6 39 E6 0F 20 42 4E 45 52 50 4D 00 |M=1..9.. BNERPM.|
00001A20: 0A 3A F0 0F 20 44 45 43 24 30 45 3B 4B 4D 3C 3E |.:.. DEC$0E;KM<>|
00001A30: 4B 4D 53 00 16 3A FA 0F 20 42 4E 45 52 50 4D 00 |KMS..:.. BNERPM.|
00001A40: 2B 3A 04 10 4B 4D 48 31 20 4C 44 41 24 30 45 3B |+:..KMH1 LDA$0E;|
00001A50: 4B 4D 3D 30 00 37 3A 0E 10 20 42 45 51 52 50 4D |KM=0.7:.. BEQRPM|
00001A60: 00 4B 3A 18 10 20 49 4E 43 24 30 45 3B 4B 4D 3C |.K:.. INC$0E;KM<|
00001A70: 3E 4B 4D 53 00 57 3A 22 10 20 49 4E 43 24 30 43 |>KMS.W:". INC$0C|
00001A80: 00 68 3A 2C 10 52 50 4D 20 4C 44 41 49 4E 50 55 |.h:,.RPM LDAINPU|
00001A90: 54 00 73 3A 36 10 20 41 4E 44 23 34 00 80 3A 40 |T.s:6. AND#4..:@|
00001AA0: 10 20 53 54 41 54 45 4D 50 00 8E 3A 4A 10 20 4C |. STATEMP..:J. L|
00001AB0: 44 41 49 4E 50 55 54 00 99 3A 54 10 20 41 4E 44 |DAINPUT..:T. AND|
00001AC0: 23 34 00 AC 3A 5E 10 20 43 4D 50 54 45 4D 50 3B |#4..:^. CMPTEMP;|
00001AD0: 20 41 4E 54 49 00 BF 3A 68 10 20 42 4E 45 52 50 | ANTI..:h. BNERP|
00001AE0: 4D 3B 44 45 4E 44 45 52 00 CC 3A 72 10 20 4C 44 |M;DENDER..:r. LD|
00001AF0: 41 54 45 4D 50 00 D9 3A 7C 10 20 42 45 51 52 50 |ATEMP..:|. BEQRP|
00001B00: 4D 31 00 EB 3A 86 10 20 4C 44 41 24 30 44 3B 52 |M1..:.. LDA$0D;R|
00001B10: 50 4D 3D 31 00 F7 3A 90 10 20 42 4E 45 4B 45 59 |PM=1..:.. BNEKEY|
00001B20: 00 03 3B 9A 10 20 44 45 43 24 30 44 00 0F 3B A4 |..;.. DEC$0D..;.|
00001B30: 10 20 42 4E 45 4B 45 59 00 1F 3B AE 10 52 50 4D |. BNEKEY..;..RPM|
00001B40: 31 20 4C 44 41 24 30 44 00 2B 3B B8 10 20 42 45 |1 LDA$0D.+;.. BE|
00001B50: 51 4B 45 59 00 37 3B C2 10 20 49 4E 43 24 30 44 |QKEY.7;.. INC$0D|
00001B60: 00 43 3B CC 10 20 49 4E 43 24 30 46 00 58 3B D6 |.C;.. INC$0F.X;.|
00001B70: 10 4B 45 59 20 4A 53 52 4B 45 59 42 3B 23 23 23 |.KEY JSRKEYB;###|
00001B80: 23 00 66 3B E0 10 20 4C 44 41 54 4F 45 54 53 00 |#.f;.. LDATOETS.|
00001B90: 73 3B EA 10 20 43 4D 50 23 24 46 46 00 7F 3B F4 |s;.. CMP#$FF..;.|
00001BA0: 10 20 42 45 51 4B 4D 48 00 8C 3B FE 10 20 53 54 |. BEQKMH..;.. ST|
00001BB0: 41 54 45 4D 50 00 9D 3B 08 11 4B 45 59 31 20 4A |ATEMP..;..KEY1 J|
00001BC0: 53 52 4B 45 59 42 00 AA 3B 12 11 20 4C 44 41 54 |SRKEYB..;.. LDAT|
00001BD0: 45 4D 50 00 B8 3B 1C 11 20 43 4D 50 54 4F 45 54 |EMP..;.. CMPTOET|
00001BE0: 53 00 C5 3B 26 11 20 42 45 51 4B 45 59 31 00 D7 |S..;&. BEQKEY1..|
00001BF0: 3B 30 11 20 41 4E 44 23 24 30 46 3B 26 26 26 26 |;0. AND#$0F;&&&&|
00001C00: 00 E8 3B 44 11 20 43 4D 50 23 37 3B 20 44 41 47 |..;D. CMP#7; DAG|
00001C10: 2F 00 FC 3B 4E 11 20 42 4E 45 54 52 49 50 3B 20 |/..;N. BNETRIP; |
00001C20: 4E 41 43 48 54 00 0B 3C 58 11 20 4C 44 41 53 54 |NACHT..<X. LDAST|
00001C30: 41 54 55 53 00 18 3C 62 11 20 45 4F 52 23 24 38 |ATUS..<b. EOR#$8|
00001C40: 30 00 27 3C 6C 11 20 53 54 41 53 54 41 54 55 53 |0.'<l. STASTATUS|
00001C50: 00 33 3C 76 11 20 42 4D 49 44 4E 31 00 3E 3C 80 |.3<v. BMIDN1.><.|
00001C60: 11 20 4C 44 41 23 30 00 4A 3C 8A 11 2E 42 59 20 |. LDA#0.J<...BY |
00001C70: 24 32 43 00 58 3C 94 11 44 4E 31 20 4C 44 41 23 |$2C.X<..DN1 LDA#|
00001C80: 31 00 66 3C 9E 11 20 53 54 41 24 44 30 32 30 00 |1.f<.. STA$D020.|
00001C90: 74 3C A8 11 20 53 54 41 24 44 30 32 31 00 83 3C |t<.. STA$D021..<|
00001CA0: B2 11 20 4C 44 41 53 54 41 54 55 53 00 8F 3C C6 |.. LDASTATUS..<.|
00001CB0: 11 20 42 4D 49 44 4E 32 00 9A 3C D0 11 20 4C 44 |. BMIDN2..<.. LD|
00001CC0: 41 23 31 00 A6 3C DA 11 2E 42 59 20 24 32 43 00 |A#1..<...BY $2C.|
00001CD0: B4 3C E4 11 44 4E 32 20 4C 44 41 23 30 00 BF 3C |.<..DN2 LDA#0..<|
00001CE0: EE 11 20 4C 44 58 23 30 00 D8 3C F8 11 4B 45 31 |.. LDX#0..<..KE1|
00001CF0: 20 53 54 41 24 44 38 30 30 2C 58 3B 20 43 2D 36 | STA$D800,X; C-6|
00001D00: 34 00 EE 3C 02 12 20 53 54 41 24 44 39 30 30 2C |4..<.. STA$D900,|
00001D10: 58 3B 20 43 2D 36 34 00 04 3D 0C 12 20 53 54 41 |X; C-64..=.. STA|
00001D20: 24 44 41 30 30 2C 58 3B 20 43 2D 36 34 00 1A 3D |$DA00,X; C-64..=|
00001D30: 16 12 20 53 54 41 24 44 42 30 30 2C 58 3B 20 43 |.. STA$DB00,X; C|
00001D40: 2D 36 34 00 23 3D 20 12 20 49 4E 58 00 2F 3D 2A |-64.#= . INX./=*|
00001D50: 12 20 42 4E 45 4B 45 31 00 43 3D 34 12 4B 45 32 |. BNEKE1.C=4.KE2|
00001D60: 20 4A 4D 50 4B 4D 48 3B 23 23 23 23 00 59 3D 3E | JMPKMH;####.Y=>|
00001D70: 12 54 52 49 50 20 43 4D 50 23 38 3B 54 52 49 50 |.TRIP CMP#8;TRIP|
00001D80: 20 3F 00 66 3D 48 12 20 42 4E 45 54 52 4D 45 00 | ?.f=H. BNETRME.|
00001D90: 75 3D 52 12 20 4C 44 41 53 54 41 54 55 53 00 82 |u=R. LDASTATUS..|
00001DA0: 3D 5C 12 20 45 4F 52 23 24 30 38 00 91 3D 66 12 |=\. EOR#$08..=f.|
00001DB0: 20 53 54 41 53 54 41 54 55 53 00 9C 3D 70 12 20 | STASTATUS..=p. |
00001DC0: 4C 44 58 23 30 00 A8 3D 7A 12 20 42 45 51 4B 45 |LDX#0..=z. BEQKE|
00001DD0: 32 00 BF 3D 84 12 54 52 4D 45 20 43 4D 50 23 39 |2..=..TRME CMP#9|
00001DE0: 3B 4D 45 54 45 52 53 3F 00 CC 3D 8E 12 20 42 4E |;METERS?..=.. BN|
00001DF0: 45 52 41 4C 4C 00 DB 3D 98 12 20 4C 44 41 53 54 |ERALL..=.. LDAST|
00001E00: 41 54 55 53 00 E8 3D A2 12 20 45 4F 52 23 24 32 |ATUS..=.. EOR#$2|
00001E10: 30 00 F7 3D AC 12 20 53 54 41 53 54 41 54 55 53 |0..=.. STASTATUS|
00001E20: 00 02 3E B6 12 20 4C 44 58 23 30 00 0E 3E C0 12 |..>.. LDX#0..>..|
00001E30: 20 42 45 51 4B 45 32 00 25 3E CA 12 52 41 4C 4C | BEQKE2.%>..RALL|
00001E40: 20 43 4D 50 23 35 3B 52 41 4C 4C 45 59 3F 00 32 | CMP#5;RALLEY?.2|
00001E50: 3E D4 12 20 42 4E 45 52 41 4D 45 00 41 3E DE 12 |>.. BNERAME.A>..|
00001E60: 20 4C 44 41 53 54 41 54 55 53 00 4E 3E E8 12 20 | LDASTATUS.N>.. |
00001E70: 45 4F 52 23 24 31 30 00 5D 3E F2 12 20 53 54 41 |EOR#$10.]>.. STA|
00001E80: 53 54 41 54 55 53 00 68 3E FC 12 20 4C 44 58 23 |STATUS.h>.. LDX#|
00001E90: 30 00 74 3E 06 13 20 42 45 51 4B 45 32 00 8B 3E |0.t>.. BEQKE2..>|
00001EA0: 10 13 52 41 4D 45 20 43 4D 50 23 36 3B 4D 45 54 |..RAME CMP#6;MET|
00001EB0: 45 52 53 3F 00 98 3E 1A 13 20 42 4E 45 52 45 53 |ERS?..>.. BNERES|
00001EC0: 54 00 A7 3E 24 13 20 4C 44 41 53 54 41 54 55 53 |T..>$. LDASTATUS|
00001ED0: 00 B4 3E 2E 13 20 45 4F 52 23 24 34 30 00 C3 3E |..>.. EOR#$40..>|
00001EE0: 38 13 20 53 54 41 53 54 41 54 55 53 00 D2 3E 42 |8. STASTATUS..>B|
00001EF0: 13 52 45 53 54 20 4C 44 58 23 30 00 DE 3E 4C 13 |.REST LDX#0..>L.|
00001F00: 20 42 45 51 4B 45 32 00 E4 3E 28 23 3B 00 EA 3E | BEQKE2..>(#;..>|
00001F10: 2A 23 3B 00 FB 3E 2C 23 4B 45 59 42 20 4C 44 59 |*#;..>,#KEYB LDY|
00001F20: 23 24 34 30 00 09 3F 2E 23 20 53 54 59 54 4F 45 |#$40..?.# STYTOE|
00001F30: 54 53 00 14 3F 30 23 20 4C 44 41 23 30 00 20 3F |TS..?0# LDA#0. ?|
00001F40: 32 23 20 53 54 41 44 52 41 00 2C 3F 34 23 20 4C |2# STADRA.,?4# L|
00001F50: 44 58 44 52 42 00 39 3F 36 23 20 43 50 58 23 24 |DXDRB.9?6# CPX#$|
00001F60: 46 46 00 46 3F 38 23 20 42 45 51 4B 45 4E 44 00 |FF.F?8# BEQKEND.|
00001F70: 4F 3F 3A 23 20 54 41 59 00 5C 3F 3C 23 20 4C 44 |O?:# TAY.\?<# LD|
00001F80: 41 23 24 46 45 00 6A 3F 3E 23 4B 31 20 53 54 41 |A#$FE.j?>#K1 STA|
00001F90: 44 52 41 00 75 3F 40 23 20 4C 44 58 23 38 00 7E |DRA.u?@# LDX#8.~|
00001FA0: 3F 42 23 20 50 48 41 00 8C 3F 44 23 4B 32 20 4C |?B# PHA..?D#K2 L|
00001FB0: 44 41 44 52 42 00 98 3F 46 23 20 43 4D 50 44 52 |DADRB..?F# CMPDR|
00001FC0: 42 00 A3 3F 48 23 20 42 4E 45 4B 32 00 AE 3F 4A |B..?H# BNEK2..?J|
00001FD0: 23 4B 33 20 4C 53 52 00 C0 3F 4C 23 20 42 43 53 |#K3 LSR..?L# BCS|
00001FE0: 4B 34 3B 31 3D 4E 49 45 54 00 CE 3F 4E 23 20 53 |K4;1=NIET..?N# S|
00001FF0: 54 59 54 4F 45 54 53 00 D9 3F 52 23 4B 34 20 49 |TYTOETS..?R#K4 I|
00002000: 4E 59 00 E6 3F 54 23 20 43 50 59 23 24 34 31 00 |NY..?T# CPY#$41.|
00002010: F2 3F 56 23 20 42 43 53 4B 45 4E 00 FB 3F 58 23 |.?V# BCSKEN..?X#|
00002020: 20 44 45 58 00 06 40 5A 23 20 42 4E 45 4B 33 00 | DEX..@Z# BNEK3.|
00002030: 0F 40 5C 23 20 53 45 43 00 18 40 5E 23 20 50 4C |.@\# SEC..@^# PL|
00002040: 41 00 21 40 60 23 20 52 4F 4C 00 2C 40 62 23 20 |A.!@`# ROL.,@b# |
00002050: 42 4E 45 4B 31 00 38 40 64 23 4B 45 4E 20 50 4C |BNEK1.8@d#KEN PL|
00002060: 41 00 4A 40 66 23 4B 45 4E 44 20 4C 44 59 54 4F |A.J@f#KEND LDYTO|
00002070: 45 54 53 00 5B 40 68 23 20 4C 44 41 4D 41 54 52 |ETS.[@h# LDAMATR|
00002080: 49 58 2C 59 00 69 40 6A 23 20 53 54 41 54 4F 45 |IX,Y.i@j# STATOE|
00002090: 54 53 00 72 40 6C 23 20 52 54 53 00 85 40 6E 23 |TS.r@l# RTS..@n#|
000020A0: 49 4E 53 54 45 4C 20 4C 44 41 23 24 41 30 00 90 |INSTEL LDA#$A0..|
000020B0: 40 70 23 20 4C 44 59 23 30 00 A0 40 72 23 20 53 |@p# LDY#0..@r# S|
000020C0: 54 41 28 24 30 32 29 2C 59 00 B4 40 74 23 49 4E |TA($02),Y..@t#IN|
000020D0: 31 20 4A 53 52 4B 45 59 42 3B 23 23 23 00 C2 40 |1 JSRKEYB;###..@|
000020E0: 76 23 20 4C 44 41 54 4F 45 54 53 00 CF 40 78 23 |v# LDATOETS..@x#|
000020F0: 20 43 4D 50 23 24 46 46 00 DB 40 7A 23 20 42 45 | CMP#$FF..@z# BE|
00002100: 51 49 4E 31 00 E8 40 7C 23 20 53 54 41 54 45 4D |QIN1..@|# STATEM|
00002110: 50 00 FD 40 7E 23 49 4E 31 41 20 4A 53 52 4B 45 |P..@~#IN1A JSRKE|
00002120: 59 42 3B 23 23 23 00 0A 41 80 23 20 4C 44 41 54 |YB;###..A.# LDAT|
00002130: 45 4D 50 00 18 41 82 23 20 43 4D 50 54 4F 45 54 |EMP..A.# CMPTOET|
00002140: 53 00 25 41 84 23 20 42 45 51 49 4E 31 41 00 30 |S.%A.# BEQIN1A.0|
00002150: 41 86 23 20 4C 44 59 23 30 00 3D 41 88 23 20 41 |A.# LDY#0.=A.# A|
00002160: 4E 44 23 24 30 46 00 4F 41 8A 23 20 43 4D 50 23 |ND#$0F.OA.# CMP#|
00002170: 31 30 3B 20 3E 39 20 3F 00 5E 41 8C 23 20 42 50 |10; >9 ?.^A.# BP|
00002180: 4C 49 4E 53 54 45 4C 00 67 41 8E 23 20 43 4C 43 |LINSTEL.gA.# CLC|
00002190: 00 74 41 90 23 20 41 44 43 23 24 33 30 00 84 41 |.tA.# ADC#$30..A|
000021A0: 92 23 20 53 54 41 28 24 30 32 29 2C 59 00 8D 41 |.# STA($02),Y..A|
000021B0: 94 23 20 41 53 4C 00 96 41 96 23 20 41 53 4C 00 |.# ASL..A.# ASL.|
000021C0: 9F 41 98 23 20 41 53 4C 00 A8 41 9A 23 20 41 53 |.A.# ASL..A.# AS|
000021D0: 4C 00 B5 41 9C 23 20 53 54 41 54 45 4D 50 00 C5 |L..A.# STATEMP..|
000021E0: 41 9E 23 49 4E 32 20 4C 44 41 23 24 41 30 00 D0 |A.#IN2 LDA#$A0..|
000021F0: 41 A0 23 20 4C 44 59 23 31 00 E0 41 A2 23 20 53 |A.# LDY#1..A.# S|
00002200: 54 41 28 24 30 32 29 2C 59 00 F4 41 A4 23 49 4E |TA($02),Y..A.#IN|
00002210: 33 20 4A 53 52 4B 45 59 42 3B 23 23 23 00 02 42 |3 JSRKEYB;###..B|
00002220: A6 23 20 4C 44 41 54 4F 45 54 53 00 0F 42 A8 23 |.# LDATOETS..B.#|
00002230: 20 43 4D 50 23 24 46 46 00 1B 42 AA 23 20 42 45 | CMP#$FF..B.# BE|
00002240: 51 49 4E 33 00 28 42 AC 23 20 53 54 41 54 45 4D |QIN3.(B.# STATEM|
00002250: 50 00 38 42 AE 23 49 4E 34 20 4A 53 52 4B 45 59 |P.8B.#IN4 JSRKEY|
00002260: 42 00 45 42 B0 23 20 4C 44 41 54 45 4D 50 00 53 |B.EB.# LDATEMP.S|
00002270: 42 B2 23 20 43 4D 50 54 4F 45 54 53 00 5F 42 B4 |B.# CMPTOETS._B.|
00002280: 23 20 42 45 51 49 4E 34 00 6A 42 B6 23 20 4C 44 |# BEQIN4.jB.# LD|
00002290: 59 23 31 00 77 42 B8 23 20 41 4E 44 23 24 30 46 |Y#1.wB.# AND#$0F|
000022A0: 00 89 42 BA 23 20 43 4D 50 23 31 30 3B 20 3E 39 |..B.# CMP#10; >9|
000022B0: 20 3F 00 95 42 BC 23 20 42 50 4C 49 4E 32 00 9E | ?..B.# BPLIN2..|
000022C0: 42 BE 23 20 43 4C 43 00 AB 42 C0 23 20 41 44 43 |B.# CLC..B.# ADC|
000022D0: 23 24 33 30 00 BB 42 C2 23 20 53 54 41 28 24 30 |#$30..B.# STA($0|
000022E0: 32 29 2C 59 00 C8 42 C4 23 20 41 4E 44 23 24 30 |2),Y..B.# AND#$0|
000022F0: 46 00 D1 42 C6 23 20 43 4C 43 00 DE 42 C8 23 20 |F..B.# CLC..B.# |
00002300: 41 44 43 54 45 4D 50 00 E7 42 CA 23 20 52 54 53 |ADCTEMP..B.# RTS|
00002310: 00 ED 42 CC 23 3B 00 00 43 CE 23 55 50 44 41 54 |..B.#;..C.#UPDAT|
00002320: 45 20 4C 44 58 23 24 31 30 00 0F 43 D0 23 55 50 |E LDX#$10..C.#UP|
00002330: 31 20 53 54 58 54 49 41 00 1D 43 D2 23 20 4C 44 |1 STXTIA..C.# LD|
00002340: 41 24 30 30 2C 58 00 29 43 D4 23 20 53 54 41 54 |A$00,X.)C.# STAT|
00002350: 49 44 00 32 43 D6 23 20 49 4E 58 00 3F 43 D8 23 |ID.2C.# INX.?C.#|
00002360: 20 43 50 58 23 24 33 30 00 4B 43 DA 23 20 42 4E | CPX#$30.KC.# BN|
00002370: 45 55 50 31 00 54 43 DC 23 20 52 54 53 00 5A 43 |EUP1.TC.# RTS.ZC|
00002380: DE 23 3B 00 6A 43 E0 23 53 43 52 45 45 4E 30 20 |.#;.jC.#SCREEN0 |
00002390: 4E 4F 50 00 8B 43 E2 23 2E 54 58 20 22 20 20 20 |NOP..C.#.TX " |
000023A0: 20 45 52 52 4F 52 20 46 4F 55 4E 44 20 49 4E 20 | ERROR FOUND IN |
000023B0: 20 20 20 22 00 A8 43 E4 23 2E 54 58 20 22 20 20 | "..C.#.TX " |
000023C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000023D0: 22 00 C9 43 E6 23 2E 54 58 20 22 20 20 20 20 20 |"..C.#.TX " |
000023E0: 20 20 43 4D 4F 53 2D 52 41 4D 20 20 20 20 20 20 | CMOS-RAM |
000023F0: 20 22 00 E6 43 E8 23 2E 54 58 20 22 20 20 20 20 | "..C.#.TX " |
00002400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00002410: F6 43 EA 23 53 43 52 45 45 4E 31 20 4E 4F 50 00 |.C.#SCREEN1 NOP.|
00002420: 17 44 EC 23 2E 54 58 20 22 20 20 20 20 20 20 20 |.D.#.TX " |
00002430: 56 57 2D 54 52 49 4B 45 20 20 20 20 20 20 20 22 |VW-TRIKE "|
00002440: 00 34 44 EE 23 2E 54 58 20 22 20 20 20 20 20 20 |.4D.#.TX " |
00002450: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 55 44 | ".UD|
00002460: F0 23 2E 54 58 20 22 20 20 20 20 20 20 20 43 4F |.#.TX " CO|
00002470: 4D 50 55 54 45 52 20 20 20 20 20 20 20 22 00 72 |MPUTER ".r|
00002480: 44 F2 23 2E 54 58 20 22 20 20 20 20 20 20 20 20 |D.#.TX " |
00002490: 20 20 20 20 20 20 20 20 20 20 22 00 93 44 F4 23 | "..D.#|
000024A0: 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 20 20 |.TX " |
000024B0: 20 20 20 20 20 20 20 20 20 20 20 22 00 B0 44 F6 | "..D.|
000024C0: 23 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 20 |#.TX " |
000024D0: 20 20 20 20 20 20 20 20 22 00 D1 44 F8 23 2E 54 | "..D.#.T|
000024E0: 58 20 22 20 20 20 20 20 20 20 20 3A 20 20 20 20 |X " : |
000024F0: 2D 20 20 20 20 20 20 20 20 22 00 EE 44 FA 23 2E |- "..D.#.|
00002500: 54 58 20 22 20 20 20 20 20 20 20 20 20 20 20 20 |TX " |
00002510: 20 20 20 20 20 20 22 00 0F 45 FC 23 2E 54 58 20 | "..E.#.TX |
00002520: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00002530: 20 20 20 20 20 20 20 22 00 2C 45 FE 23 2E 54 58 | ".,E.#.TX|
00002540: 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | " |
00002550: 20 20 20 20 22 00 4D 45 00 24 2E 54 58 20 22 20 | ".ME.$.TX " |
00002560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002570: 20 20 20 20 20 22 00 6A 45 02 24 2E 54 58 20 22 | ".jE.$.TX "|
00002580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002590: 20 20 22 00 7A 45 04 24 53 43 52 45 45 4E 32 20 | ".zE.$SCREEN2 |
000025A0: 4E 4F 50 00 9B 45 06 24 2E 54 58 20 22 67 67 67 |NOP..E.$.TX "ggg|
000025B0: 67 67 67 67 67 67 67 67 67 67 67 67 67 67 20 20 |gggggggggggggg |
000025C0: 20 20 20 22 00 B8 45 08 24 2E 54 58 20 22 20 20 | "..E.$.TX " |
000025D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000025E0: 22 00 D9 45 0A 24 2E 54 58 20 22 20 20 20 20 67 |"..E.$.TX " g|
000025F0: 20 20 20 20 67 20 20 20 20 67 20 20 20 4B 4D 2F | g g KM/|
00002600: 48 22 00 F6 45 0C 24 2E 54 58 20 22 20 20 20 20 |H"..E.$.TX " |
00002610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00002620: 17 46 0E 24 2E 54 58 20 22 20 20 20 20 35 30 20 |.F.$.TX " 50 |
00002630: 20 31 30 30 20 20 31 35 30 20 20 20 20 20 20 22 | 100 150 "|
00002640: 00 34 46 10 24 2E 54 58 20 22 20 20 20 20 20 20 |.4F.$.TX " |
00002650: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 55 46 | ".UF|
00002660: 12 24 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 |.$.TX " |
00002670: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 72 | ".r|
00002680: 46 14 24 2E 54 58 20 22 20 20 20 20 20 20 20 20 |F.$.TX " |
00002690: 20 20 20 20 20 20 20 20 20 20 22 00 93 46 16 24 | "..F.$|
000026A0: 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 20 20 |.TX " |
000026B0: 20 20 20 20 20 20 20 20 20 20 20 22 00 B0 46 18 | "..F.|
000026C0: 24 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 20 |$.TX " |
000026D0: 20 20 20 20 20 20 20 20 22 00 D1 46 1A 24 2E 54 | "..F.$.T|
000026E0: 58 20 22 67 67 67 67 67 67 67 67 67 67 67 67 67 |X "ggggggggggggg|
000026F0: 67 67 67 67 20 20 20 30 30 22 00 EE 46 1C 24 2E |gggg 00"..F.$.|
00002700: 54 58 20 22 20 20 20 20 20 20 20 20 20 20 20 20 |TX " |
00002710: 20 20 20 20 20 20 22 00 FE 46 1E 24 53 43 52 45 | "..F.$SCRE|
00002720: 45 4E 33 20 4E 4F 50 00 1F 47 20 24 2E 54 58 20 |EN3 NOP..G $.TX |
00002730: 22 20 20 20 20 67 20 20 20 20 67 20 20 20 20 67 |" g g g|
00002740: 20 20 20 20 54 50 4D 22 00 3C 47 22 24 2E 54 58 | TPM".<G"$.TX|
00002750: 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | " |
00002760: 20 20 20 20 22 00 5D 47 24 24 2E 54 58 20 22 20 | ".]G$$.TX " |
00002770: 20 20 20 32 30 20 20 20 34 30 20 20 20 36 30 20 | 20 40 60 |
00002780: 20 2A 31 30 30 22 00 7A 47 26 24 2E 54 58 20 22 | *100".zG&$.TX "|
00002790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000027A0: 20 20 22 00 9B 47 28 24 2E 54 58 20 22 20 20 20 | "..G($.TX " |
000027B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000027C0: 20 20 20 22 00 B8 47 2A 24 2E 54 58 20 22 20 20 | "..G*$.TX " |
000027D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000027E0: 22 00 D9 47 2C 24 2E 54 58 20 22 54 4F 54 41 41 |"..G,$.TX "TOTAA|
000027F0: 4C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |L |
00002800: 20 22 00 F6 47 2E 24 2E 54 58 20 22 20 20 20 20 | "..G.$.TX " |
00002810: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00002820: 17 48 30 24 2E 54 58 20 22 20 20 20 20 20 20 20 |.H0$.TX " |
00002830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00002840: 00 34 48 32 24 2E 54 58 20 22 20 20 20 20 20 20 |.4H2$.TX " |
00002850: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 55 48 | ".UH|
00002860: 34 24 2E 54 58 20 22 54 52 49 50 20 20 20 20 20 |4$.TX "TRIP |
00002870: 20 20 2E 20 20 20 20 20 20 20 20 20 20 22 00 72 | . ".r|
00002880: 48 36 24 2E 54 58 20 22 20 20 20 20 20 20 20 20 |H6$.TX " |
00002890: 20 20 20 20 20 20 20 20 20 20 22 00 93 48 38 24 | "..H8$|
000028A0: 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 20 20 |.TX " |
000028B0: 20 20 20 20 20 20 20 20 20 20 20 22 00 B0 48 3A | "..H:|
000028C0: 24 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 20 |$.TX " |
000028D0: 20 20 20 20 20 20 20 20 22 00 C0 48 3C 24 53 43 | "..H<$SC|
000028E0: 52 45 45 4E 34 20 4E 4F 50 00 E1 48 3E 24 2E 54 |REEN4 NOP..H>$.T|
000028F0: 58 20 22 52 41 4C 4C 45 59 20 20 20 20 20 2E 20 |X "RALLEY . |
00002900: 20 20 20 20 20 20 20 20 20 22 00 FE 48 40 24 2E | "..H@$.|
00002910: 54 58 20 22 20 20 20 20 20 20 20 20 20 20 20 20 |TX " |
00002920: 20 20 20 20 20 20 22 00 1F 49 42 24 2E 54 58 20 | "..IB$.TX |
00002930: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00002940: 20 20 20 20 20 20 20 22 00 3C 49 44 24 2E 54 58 | ".<ID$.TX|
00002950: 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | " |
00002960: 20 20 20 20 22 00 5D 49 46 24 2E 54 58 20 22 20 | ".]IF$.TX " |
00002970: 20 20 20 20 42 45 4E 5A 49 4E 45 20 4F 4C 49 45 | BENZINE OLIE|
00002980: 20 20 20 20 20 22 00 7A 49 48 24 2E 54 58 20 22 | ".zIH$.TX "|
00002990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000029A0: 20 20 22 00 9B 49 4A 24 2E 54 58 20 22 20 20 2E | "..IJ$.TX " .|
000029B0: 20 20 56 4F 4C 54 20 20 41 4D 50 45 52 45 20 20 | VOLT AMPERE |
000029C0: 20 2E 20 22 00 B8 49 4C 24 2E 54 58 20 22 20 20 | . "..IL$.TX " |
000029D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000029E0: 22 00 D9 49 4E 24 2E 54 58 20 22 20 20 20 20 20 |"..IN$.TX " |
000029F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002A00: 20 22 00 F6 49 50 24 2E 54 58 20 22 20 20 20 20 | "..IP$.TX " |
00002A10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00002A20: 17 4A 52 24 2E 54 58 20 22 20 20 20 20 20 20 20 |.JR$.TX " |
00002A30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00002A40: 00 34 4A 54 24 2E 54 58 20 22 20 20 20 20 20 20 |.4JT$.TX " |
00002A50: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 46 4A | ".FJ|
00002A60: 56 24 44 41 54 20 2E 54 58 22 44 41 54 45 22 00 |V$DAT .TX"DATE".|
00002A70: 58 4A 58 24 54 59 44 20 2E 54 58 22 54 49 4D 45 |XJX$TYD .TX"TIME|
00002A80: 22 00 6A 4A 5A 24 4E 4D 49 20 4A 53 52 55 50 44 |".jJZ$NMI JSRUPD|
00002A90: 41 54 45 00 76 4A 5C 24 20 4C 44 41 23 36 33 00 |ATE.vJ\$ LDA#63.|
00002AA0: 82 4A 5E 24 20 53 54 41 54 49 44 00 93 4A 60 24 |.J^$ STATID..J`$|
00002AB0: 4E 4D 31 20 4C 44 41 49 4E 50 55 54 00 A0 4A 62 |NM1 LDAINPUT..Jb|
00002AC0: 24 20 41 4E 44 23 24 32 30 00 AC 4A 64 24 20 42 |$ AND#$20..Jd$ B|
00002AD0: 45 51 4E 4D 31 00 BB 4A 66 24 2E 43 4F 20 55 50 |EQNM1..Jf$.CO UP|
00002AE0: 44 41 54 45 00 00 00 |DATE... |
X...D..BA $8000 ;VW-VIC20...N.;.. X..EQ
IRQTEL = $0004 ;TELLER PIF.1 ...EQ TOET
S = $0005.H ...EQ TEMP = $0006.N ...E
Q UPMIN = $0007 ;UPDATE/MINUUT.. ..EQ
STATUS = $0008 ;STATUS.. ...EQ SCR =
$0400 ;VIDEOSCHERM.W ...EQ DA0KMD = $C00
0 ;TABEL AFSTAND.. ...EQ DA1KMD = $C100
;TABEL AFSTAND..!...EQ DA0KMH = $C400 ;T
ABEL KMH.A!...EQ DA1KMH = $C500 ;TABEL K
MH.C!...EQ DATRPM = $C800 ;TABEL RPM..!H
..EQ DRA = $DC00 ;OUT KEYBOARD..!R..E
Q DRB = $DC01 ;IN KEYBOARD.P!...EQ TI
A = $DF20 ;ADRES TIMER..!...EQ TID
= $DF40 ;DATA TIMER.."...EQ INPUT = $D
F60 ;INPUT SIGNALS.;"...EQ DIP = $DFC
0 ;DIPSWITCH.^"...EQ MATRIX = $EB81 ;DEC
ODERING.D"..;.."..; ROM MOET OP $A000 ST
ARTEN.."".;..",..WO START,NMI.A"6..WO $C
3C2,$38CD,$FF31 ; CBM80.G"@.;.U"J.STA
RT NOP.."T.;.."^.; DISABLE IRQ'S 6522,
146818..#H.;..#R. SEI.$#|.; L
DA #0.?#..; STA $911E.Z#..;
STA $912E.N#.. LDA#$FF; CLEAR.
.#.. STA$DC0D; 6526..#.. STA$DD0D; C-64.
.#.. LDA#11..#B. STATIA..#L. LDA#2.E#V.
STATID.K#..;..#..; INITIALISATIE VIC-20.
.#..;..$..; JSR $FD8D..$..;
JSR $FD52.4$..; JSR $E518.H$
.. JSR$FDA3; C-64.\$&. JSR$FD50; C-64.P$
0. JSR$FD15; C-64..$:. JSR$FF5B; C-64..$
D.; 6522..$N.; LDA #0.K$X.;
STA $911C ; PCR 1..$B.;
STA $912C ; PCR 2..%L.;
STA $9112 ;DDRB 1.:%V.; STA
$9113 ;DDRA 1._%..; STA $9
123 ;DDRA 2.V%..; LDA #$FF.
.%..; STA $9122 ;DDRB 2..%.
.; LDX #4.V%..;ST1 STA $91
13,X ;TIMERS..%..; STA $9123,
X..&..; DEX..&F.; BNE ST
1..&P.;.0&Z. LDA#0; IRQ -.E&.. STA$0314;
VECTOR.W&.. LDA#$90;####.E&.. STA$0315.K
&..;..&..; KLEUR KARAKTER & SCHERM..&..;
..& . LDX#0..&*. LDA#1..&4.ST2 STA$D800,
X; C-64.T&>. STA$D900,X; C-64..&H. STA$D
A00,X; C-64..'R. STA$DB00,X; C-64..'\.;S
T2 STA $9600,X.:'F.;
STA $9700,X.C'P. INX.O'Z. BNEST2.H'..;
LDA #27..'..; STA $
960F..'.. LDA#0..'.. STA$D020; C-64..'..
STA$D021; C-64.B'.. STA$04.P'.. LDA$D01
8..'J. ORA#2..'T. STA$D018..'..;..(..; O
PBOUW SCHERM..(..;..(.. LDX#240.1(..ST2A
LDASCREEN1,X;####.A(.. STASCR-1,X.X(..
LDASCREEN2,X;####.J($. STASCR+239,X..(..
LDASCREEN3,X;####..(8. STASCR+479,X..(B
. LDASCREEN4,X;####..(L. STASCR+719,X.E(
V. DEX.R(`. BNEST2A.X(J.;..(T.; BEREKENI
NG DATAVELDEN..(~.;..)..DA0 STX$31..)..
STX$32.!).. STX$33.-).. STX$34.9).. STX$
35.H).. STXDA0KMD.W)D. STXDA1KMD.F)..DA1
LDADIP.R).. CMPDIP.~).. BNEDA1..)..DA2
CMP#40;CONVERT..).. BCCDA3; DIP..).. SBC
#40;NAAR.H).. INC$32; BCD.T)(. BNEDA2..)
2.DA3 CMP#4..)<. BCCDA4..)F. SBC#4..*P.
INC$31..*Z. BNEDA3..*D.DA4 TAY.)*N. ASL$
32.5*X. ASL$32.A*.. ASL$32.M*.. ASL$32.Y
*.. LDA$32.B* . CLC.N*.. ADC$31.Z*.. STA
$31..*.. TYA..*H. BEQDA4B..*R. TAX..*..
LDA#0..*.. SED;!!!!..*.. CLC.L*..DA4A AD
C#$25.U*.. DEX..*.. BNEDA4A..*..DA4B STA
$32..*,. INX..+6.DA5 LDA$35..+@. CLC..+J
. ADC$32.++T. STA$35.7+^. LDA$34.C+H. AD
C$31.O+R. STA$34.E+|. STADA0KMD,X; LOW.Q
+.. LDA$33.|+.. ADC#0..+.. STA$33..+.. S
TADA1KMD,X; HIGH..+.. INX..+.. BNEDA5.B+
..; KMH.T+.. LDADA0KMD+36..+.. STA$3
1..+.. LDADA1KMD+36..+B. STA$32..,D. LDX
#0..,F. STX$33.!,H. STX$34.-,J. STX$35.<
,L. STXDA0KMH.K,N. STXDA1KMH.V,P. LDX#2.
B,Q.DA6 CLC.N,R. LDA$33.Z,T. ADC$31..,V.
STA$33..,X. LDA$34..,Z. ADC$32..,.. STA
$34..,.. STADA0KMH,X.G,.. LDA$35.R,.. AD
C#0..,.. STA$35..,.. STADA1KMH,X..,.. LD
A$34..-.. AND#$0F..-.. CMP#5..-.. BMIDA7
.0-.. LDADA0KMH,X.9-.. CLC.F-.. ADC#$10.
W-.. STADA0KMH,X.H-.. LDADA1KMH,X.S-.. A
DC#0..-.. STADA1KMH,X..-..DA7 INX..-.. I
NX..-.. BNEDA6..-0.; RPM..-:. LDX#0.
J-D. STX$33.V-N. STX$34..-X. STXDATRPM..
-B. INX..-L.DA8 LDA$33...V. CLC..... ADC
#$30..... STA$33.+... LDA$34.6... ADC#0.
B... STA$34.N... LDY$33.[... CPY#$50.G.F
. BMIDA9.P.P. CLC.{.Z. ADC#1.....DA9 STA
DATRPM,X..... INX..... BNEDA8..... CLD..
...;.H...; CLEAR $03-$100.N. .;.Y.*. LDX
#3...4. LDA#0...>.CL1 STA$00,X...H. INX.
./R. BNECL1../\.;.$/F.; TEST CMOS-RAM.*/
P.;.6/Z. LDA#13.H/.. STATIA;CLEAR.[/.. L
DATID;REG. D.G/.. LDA#14.S/.. STATIA./.
. LDATID../.. CMP#$55../.. BNEST3../J. L
DA#15../T. STATIA../.. LDATID.I/.. CMP#$
AA.U/.. BNEST3../.. JMPST4;###../..; ER
ROR: CLEAR ALL..0..ST3 LDX#80.'0..ST3A L
DASCREEN0,X;####.70$. STASCR-1,X.@0.. DE
X.M08. BNEST3A.S0B.;._0L. LDX#14.K0V. ST
XTIA.X0`. LDA#$55..0J. STATID..0T. LDX#1
5..0~. STXTIA..0.. LDA#$AA..0.. STATID..
0.. LDA#0.M0..ST3B INX.Y0.. STXTIA..0..
STATID..0D. CPX#$41..0N. BNEST3B..1X.;.$
1..; INSTELLEN TIJD EN TOT KM.*1..;.>1..
LDX#11; REG. B.J1.. STXTIA.]1.. LDA#$82
; STOP.P1.. STATID; TIJD.V1..;..1(. LDX
#4; DATE. 12.ST3C LDADAT-1,X;####..1<. S
TASCR+119,X..1F. DEX.H1P. BNEST3C.N1Z.;.
.1D. LDA#<(SCR+125);DAG..1N. STA$02..2X.
LDA#>(SCR+125)..2.. STA$03.%2.. JSRINST
EL;###.02.. LDX#7.<2 . STXTIA.H2.. STATI
D.N2..;.I2.. LDA#<(SCR+130);MINUUT.U2H.
STA$02..2R. LDA#>(SCR+130)..2.. STA$03..
2.. JSRINSTEL;###..2.. LDX#8..2.. STXTIA
.K2.. STATID.Q2..;..2.. LDA#<(SCR+135);J
AAR..2". STA$02..3,. LDA#>(SCR+135)..36.
STA$03.)3@. JSRINSTEL;###.43J. LDX#9.@3
T. STXTIA.L3^. STATID.R3H.;.C3R. LDX#4;
TIME.|3|.ST3D LDATYD-1,X;####..3.. STASC
R+119,X..3.. DEX..3.. BNEST3D..3..;..3..
LDA#0;SECONDE.I3.. STATIA.U3B. STATID..
3L. LDA#$30..3V. STASCR+135;81..4.. STAS
CR+136;82..4.. LDA#$20.%4.. STASCR+125.5
4.. STASCR+126.E4.. STASCR+130.U4.. STAS
CR+131.[4..;.S4&. LDA#<(SCR+125);UUR.40
. STA$02..4:. LDA#>(SCR+125)..4D. STA$03
..4N. JSRINSTEL;###..4X. LDX#4.I4B. STXT
IA.U4L. STATID..4V.;..4.. LDA#<(SCR+130)
;MINUUT..5.. STA$02..5.. LDA#>(SCR+130).
"5.. STA$03.55.. JSRINSTEL;###.@5.. LDX#
2.L5.. STXTIA.X5F. STATID.^5P.;.O5Z. LDX
#4; VEEG..5..ST3E LDA#$20..5.. STASCR+11
9,X..5.. DEX..5.. BNEST3E..5..;.B5.. LDA
#11; REG. B.N5 . STATIA..5*. LDX#2; STAR
T..54. STXTID; TIJD..6>.; KILOMETERS
TOTAAL..6H. LDX#0.46R. LDA#<(SCR+607); X
X.....@6\. STA$02.T6F. LDA#>(SCR+607).`6
P. STA$03.S6Z. JSRINSTEL;###..6.. STA$10
,X..6.. INX..6.. INC$02;..XX....6.. INC$
02..6.. JSRINSTEL;###.J6.. STA$10,X.S6..
INX..6J. INC$02;....XX..6T. INC$02;....
XX..7.. JSRINSTEL;###..7.. STA$10,X.-7..
JSRUPDATE;###.37..;.S7..; DISPLAY VW-TR
IKE COMPUTER.Y7..;.H7..ST4 LDX#80..7$.ST
4A LDASCREEN1,X;####..7.. STASCR-1,X..78
. DEX..7B. BNEST4A..7L.;.G7V.; ENABLE IR
Q 146818.M7`.;..7J. LDX#12; REG. C..7T.
STXTIA..8~. LDATID;CLR IRQ..8.. DEX; REG
. B..8.. STXTIA.+8.. LDA#$12.?8.. STATID
;ENA IRQ.E8..;.J8..; INITIALISATIE KM/H,
RPM STATUS.P8D.;..8N.KRS LDX#$FF..8X. L
DAINPUT..8.. AND#2..8.. BNEKRS1..8.. STA
$0E..8...BY $2C.N8..KRS1 STX$0E..8.. LDA
INPUT..8.. AND#8..8(. BNEKRS2..92. STA$0
D..9<..BY $2C..9F.KRS2 STX$0D."9P.;.<9Z.
; $$$ GROTE LUS $$$.B9D.;.Q9N.; SNELHE
ID.W9X.;.H9..KMH LDAINPUT.S9.. AND#2..9.
. STATEMP..9 . LDAINPUT..9.. AND#2..9..
CMPTEMP; ANTI..9.. BNEKMH;DENDER.L9H. LD
ATEMP.Y9R. BEQKMH1..9.. LDA$0E;KM=1..9..
BNERPM..:.. DEC$0E;KM<>KMS..:.. BNERPM.
+:..KMH1 LDA$0E;KM=0.7:.. BEQRPM.K:.. IN
C$0E;KM<>KMS.W:". INC$0C.H:,.RPM LDAINPU
T.S:6. AND#4..:@. STATEMP..:J. LDAINPUT.
.:T. AND#4..:^. CMPTEMP; ANTI..:H. BNERP
M;DENDER.L:R. LDATEMP.Y:|. BEQRPM1..:..
LDA$0D;RPM=1..:.. BNEKEY..;.. DEC$0D..;.
. BNEKEY..;..RPM1 LDA$0D.+;.. BEQKEY.7;B
. INC$0D.C;L. INC$0F.X;V.KEY JSRKEYB;###
#.F;.. LDATOETS.S;.. CMP#$FF.;.. BEQKMH
..;.. STATEMP..;..KEY1 JSRKEYB..;.. LDAT
EMP..;.. CMPTOETS.E;&. BEQKEY1.W;0. AND#
$0F;&&&&..;D. CMP#7; DAG/..;N. BNETRIP;
NACHT..<X. LDASTATUS..<B. EOR#$80.'<L. S
TASTATUS.3<V. BMIDN1.><.. LDA#0.J<...BY
$2C.X<..DN1 LDA#1.F<.. STA$D020.T<.. STA
$D021..<.. LDASTATUS..<F. BMIDN2..<P. LD
A#1..<Z..BY $2C..<..DN2 LDA#0..<.. LDX#0
.X<..KE1 STA$D800,X; C-64..<.. STA$D900,
X; C-64..=.. STA$DA00,X; C-64..=.. STA$D
B00,X; C-64.#= . INX./=*. BNEKE1.C=4.KE2
JMPKMH;####.Y=>.TRIP CMP#8;TRIP ?.F=H.
BNETRME.U=R. LDASTATUS..=\. EOR#$08..=F.
STASTATUS..=P. LDX#0..=Z. BEQKE2..=..TR
ME CMP#9;METERS?.L=.. BNERALL..=.. LDAST
ATUS..=.. EOR#$20..=.. STASTATUS..>.. LD
X#0..>.. BEQKE2.%>J.RALL CMP#5;RALLEY?.2
>T. BNERAME.A>.. LDASTATUS.N>.. EOR#$10.
]>.. STASTATUS.H>.. LDX#0.T>.. BEQKE2..>
..RAME CMP#6;METERS?..>.. BNEREST..>$. L
DASTATUS..>.. EOR#$40.C>8. STASTATUS.R>B
.REST LDX#0..>L. BEQKE2..>(#;..>*#;..>,#
KEYB LDY#$40..?.# STYTOETS..?0# LDA#0. ?
2# STADRA.,?4# LDXDRB.9?6# CPX#$FF.F?8#
BEQKEND.O?:# TAY.\?<# LDA#$FE.J?>#K1 STA
DRA.U?@# LDX#8.~?B# PHA..?D#K2 LDADRB..?
F# CMPDRB..?H# BNEK2..?J#K3 LSR..?L# BCS
K4;1=NIET.N?N# STYTOETS.Y?R#K4 INY..?T#
CPY#$41..?V# BCSKEN..?X# DEX..@Z# BNEK3.
.@\# SEC..@^# PLA.!@`# ROL.,@B# BNEK1.8@
D#KEN PLA.J@F#KEND LDYTOETS.[@H# LDAMATR
IX,Y.I@J# STATOETS.R@L# RTS..@N#INSTEL L
DA#$A0..@P# LDY#0. @R# STA($02),Y..@T#IN
1 JSRKEYB;###.B@V# LDATOETS.O@X# CMP#$FF
..@Z# BEQIN1..@|# STATEMP..@~#IN1A JSRKE
YB;###..A.# LDATEMP..A.# CMPTOETS.%A.# B
EQIN1A.0A.# LDY#0.=A.# AND#$0F.OA.# CMP#
10; >9 ?.^A.# BPLINSTEL.GA.# CLC.TA.# AD
C#$30..A.# STA($02),Y..A.# ASL..A.# ASL.
.A.# ASL..A.# ASL..A.# STATEMP.EA.#IN2 L
DA#$A0.PA # LDY#1..A.# STA($02),Y..A.#IN
3 JSRKEYB;###..B.# LDATOETS..B.# CMP#$FF
..B.# BEQIN3.(B.# STATEMP.8B.#IN4 JSRKEY
B.EB.# LDATEMP.SB.# CMPTOETS._B.# BEQIN4
.JB.# LDY#1.WB.# AND#$0F..B.# CMP#10; >9
?..B.# BPLIN2..B.# CLC..B.# ADC#$30..BB
# STA($02),Y.HBD# AND#$0F.QBF# CLC..BH#
ADCTEMP..BJ# RTS..BL#;..CN#UPDATE LDX#$1
0..CP#UP1 STXTIA..CR# LDA$00,X.)CT# STAT
ID.2CV# INX.?CX# CPX#$30.KCZ# BNEUP1.TC.
# RTS.ZC.#;.JC.#SCREEN0 NOP..C.#.TX "
ERROR FOUND IN "..C.#.TX "
".IC.#.TX " CMOS-RAM
"..C.#.TX " "..C.#SCRE
EN1 NOP..D.#.TX " VW-TRIKE "
.4D.#.TX " ".UD.#.TX "
COMPUTER ".RD.#.TX "
"..D.#.TX "
"..D.#.TX " ".QD.#.T
X " : - "..D.#.TX "
"..E.#.TX "
".,E.#.TX " ".ME
.$.TX " ".JE.$.TX "
".ZE.$SCREEN2 NOP..E.$
.TX "GGGGGGGGGGGGGGGGG "..E.$.TX "
".YE.$.TX " G G
G KM/H"..E.$.TX " ".
.F.$.TX " 50 100 150 ".4F.$.TX
" ".UF.$.TX "
".RF.$.TX "
"..F.$.TX " "..F.
$.TX " ".QF.$.TX "GGGGG
GGGGGGGGGGGG 00"..F.$.TX "
"..F.$SCREEN3 NOP..G $.TX " G
G G TPM".<G"$.TX "
".]G$$.TX " 20 40 60 *100".Z
G&$.TX " "..G($.TX "
"..G*$.TX "
".YG,$.TX "TOTAAL
"..G.$.TX " "..H0$.TX
" ".4H2$.TX "
".UH4$.TX "TRIP .
".RH6$.TX " "..H8$
.TX " "..H:$.TX "
"..H<$SCREEN4 NOP..H>$.T
X "RALLEY . "..H@$.TX "
"..IB$.TX "
".<ID$.TX " ".]I
F$.TX " BENZINE OLIE ".ZIH$.TX "
"..IJ$.TX " . VOLT
AMPERE . "..IL$.TX "
".YIN$.TX " "..IP$.
TX " "..JR$.TX "
".4JT$.TX "
".FJV$DAT .TX"DATE".XJX$TYD .TX"TIME
".JJZ$NMI JSRUPDATE.VJ\$ LDA#63..J^$ STA
TID..J`$NM1 LDAINPUT. JB$ AND#$20..JD$ B
EQNM1..JF$.CO UPDATE...
> CLICK IMAGE PREVIEW FOR FULL MODAL