PEPE
FILE INFORMATION
FILENAME(S): PEPE
FILE TYPE(S): PRG
FILE SIZE: 10.9K
FIRST SEEN: 2025-11-30 21:06:53
APPEARS ON: 1 disk(s)
FILE HASH
38c10e95482c9c69e6af6a173d881082c42e77550551201ce2ee969e58e2061b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| VW | PEPE | PRG | DuncanTwain | 20 | 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 30 52 50 4D 20 3D 20 24 43 38 30 |EQ DA0RPM = $C80|
00000180: 30 20 3B 54 41 42 45 4C 20 52 50 4D 00 87 21 C3 |0 ;TABEL RPM..!.|
00000190: 00 2E 45 51 20 44 41 31 52 50 4D 20 3D 20 24 43 |..EQ DA1RPM = $C|
000001A0: 39 30 30 20 3B 54 41 42 45 4C 20 52 50 4D 20 32 |900 ;TABEL RPM 2|
000001B0: 00 AC 21 C8 00 2E 45 51 20 44 52 41 20 20 20 20 |..!...EQ DRA |
000001C0: 3D 20 24 44 43 30 30 20 3B 4F 55 54 20 4B 45 59 |= $DC00 ;OUT KEY|
000001D0: 42 4F 41 52 44 00 D0 21 D2 00 2E 45 51 20 44 52 |BOARD..!...EQ DR|
000001E0: 42 20 20 20 20 3D 20 24 44 43 30 31 20 3B 49 4E |B = $DC01 ;IN|
000001F0: 20 4B 45 59 42 4F 41 52 44 00 F4 21 DC 00 2E 45 | KEYBOARD..!...E|
00000200: 51 20 54 49 41 20 20 20 20 3D 20 24 44 46 32 30 |Q TIA = $DF20|
00000210: 20 3B 41 44 52 45 53 20 54 49 4D 45 52 00 17 22 | ;ADRES TIMER.."|
00000220: E6 00 2E 45 51 20 54 49 44 20 20 20 20 3D 20 24 |...EQ TID = $|
00000230: 44 46 34 30 20 3B 44 41 54 41 20 54 49 4D 45 52 |DF40 ;DATA TIMER|
00000240: 00 3D 22 F0 00 2E 45 51 20 49 4E 50 55 54 20 20 |.="...EQ INPUT |
00000250: 3D 20 24 44 46 36 30 20 3B 49 4E 50 55 54 20 53 |= $DF60 ;INPUT S|
00000260: 49 47 4E 41 4C 53 00 5F 22 FA 00 2E 45 51 20 44 |IGNALS._"...EQ D|
00000270: 49 50 20 20 20 20 3D 20 24 44 46 43 30 20 3B 44 |IP = $DFC0 ;D|
00000280: 49 50 53 57 49 54 43 48 00 82 22 04 01 2E 45 51 |IPSWITCH.."...EQ|
00000290: 20 4D 41 54 52 49 58 20 3D 20 24 45 42 38 31 20 | MATRIX = $EB81 |
000002A0: 3B 44 45 43 4F 44 45 52 49 4E 47 00 88 22 0E 01 |;DECODERING.."..|
000002B0: 3B 00 A8 22 18 01 3B 20 52 4F 4D 20 4D 4F 45 54 |;.."..; ROM MOET|
000002C0: 20 4F 50 20 24 41 30 30 30 20 53 54 41 52 54 45 | OP $A000 STARTE|
000002D0: 4E 00 AE 22 22 01 3B 00 C0 22 2C 01 2E 57 4F 20 |N.."".;..",..WO |
000002E0: 53 54 41 52 54 2C 4E 4D 49 00 E5 22 36 01 2E 57 |START,NMI.."6..W|
000002F0: 4F 20 24 43 33 43 32 2C 24 33 38 43 44 2C 24 46 |O $C3C2,$38CD,$F|
00000300: 46 33 31 20 20 20 20 3B 20 43 42 4D 38 30 00 EB |F31 ; CBM80..|
00000310: 22 40 01 3B 00 F9 22 4A 01 53 54 41 52 54 20 4E |"@.;.."J.START N|
00000320: 4F 50 00 FF 22 54 01 3B 00 21 23 5E 01 3B 20 20 |OP.."T.;.!#^.; |
00000330: 20 44 49 53 41 42 4C 45 20 49 52 51 27 53 20 36 | DISABLE IRQ'S 6|
00000340: 35 32 32 2C 31 34 36 38 31 38 00 27 23 68 01 3B |522,146818.'#h.;|
00000350: 00 30 23 72 01 20 53 45 49 00 48 23 7C 01 3B 20 |.0#r. SEI.H#|.; |
00000360: 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 | LDA #|
00000370: 30 00 63 23 86 01 3B 20 20 20 20 20 20 20 20 20 |0.c#..; |
00000380: 20 20 20 53 54 41 20 24 39 31 31 45 00 7E 23 90 | STA $911E.~#.|
00000390: 01 3B 20 20 20 20 20 20 20 20 20 20 20 20 53 54 |.; ST|
000003A0: 41 20 24 39 31 32 45 00 92 23 9A 01 20 4C 44 41 |A $912E..#.. LDA|
000003B0: 23 24 46 46 3B 20 43 4C 45 41 52 00 A6 23 A4 01 |#$FF; CLEAR..#..|
000003C0: 20 53 54 41 24 44 43 30 44 3B 20 36 35 32 36 00 | STA$DC0D; 6526.|
000003D0: BA 23 AE 01 20 53 54 41 24 44 44 30 44 3B 20 43 |.#.. STA$DD0D; C|
000003E0: 2D 36 34 00 C6 23 B8 01 20 4C 44 41 23 31 31 00 |-64..#.. LDA#11.|
000003F0: D2 23 C2 01 20 53 54 41 54 49 41 00 DD 23 CC 01 |.#.. STATIA..#..|
00000400: 20 4C 44 41 23 32 00 E9 23 D6 01 20 53 54 41 54 | LDA#2..#.. STAT|
00000410: 49 44 00 EF 23 E0 01 3B 00 0A 24 EA 01 3B 20 49 |ID..#..;..$..; I|
00000420: 4E 49 54 49 41 4C 49 53 41 54 49 45 20 56 49 43 |NITIALISATIE VIC|
00000430: 2D 32 30 00 10 24 F4 01 3B 00 28 24 FE 01 3B 20 |-20..$..;.($..; |
00000440: 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 44 38 | JSR $FD8|
00000450: 44 00 40 24 08 02 3B 20 20 20 20 20 20 20 20 20 |D.@$..; |
00000460: 4A 53 52 20 24 46 44 35 32 00 58 24 12 02 3B 20 |JSR $FD52.X$..; |
00000470: 20 20 20 20 20 20 20 20 4A 53 52 20 24 45 35 31 | JSR $E51|
00000480: 38 00 6C 24 1C 02 20 4A 53 52 24 46 44 41 33 3B |8.l$.. JSR$FDA3;|
00000490: 20 43 2D 36 34 00 80 24 26 02 20 4A 53 52 24 46 | C-64..$&. JSR$F|
000004A0: 44 35 30 3B 20 43 2D 36 34 00 94 24 30 02 20 4A |D50; C-64..$0. J|
000004B0: 53 52 24 46 44 31 35 3B 20 43 2D 36 34 00 A8 24 |SR$FD15; C-64..$|
000004C0: 3A 02 20 4A 53 52 24 46 46 35 42 3B 20 43 2D 36 |:. JSR$FF5B; C-6|
000004D0: 34 00 B5 24 44 02 3B 20 20 20 36 35 32 32 00 CA |4..$D.; 6522..|
000004E0: 24 4E 02 3B 20 20 20 20 20 20 20 20 20 4C 44 41 |$N.; LDA|
000004F0: 20 23 30 00 EF 24 58 02 3B 20 20 20 20 20 20 20 | #0..$X.; |
00000500: 20 20 53 54 41 20 24 39 31 31 43 20 20 20 20 20 | STA $911C |
00000510: 20 3B 20 50 43 52 20 31 00 14 25 62 02 3B 20 20 | ; PCR 1..%b.; |
00000520: 20 20 20 20 20 20 20 53 54 41 20 24 39 31 32 43 | STA $912C|
00000530: 20 20 20 20 20 20 3B 20 50 43 52 20 32 00 39 25 | ; PCR 2.9%|
00000540: 6C 02 3B 20 20 20 20 20 20 20 20 20 53 54 41 20 |l.; STA |
00000550: 24 39 31 31 32 20 20 20 20 20 20 3B 44 44 52 42 |$9112 ;DDRB|
00000560: 20 31 00 5E 25 76 02 3B 20 20 20 20 20 20 20 20 | 1.^%v.; |
00000570: 20 53 54 41 20 24 39 31 31 33 20 20 20 20 20 20 | STA $9113 |
00000580: 3B 44 44 52 41 20 31 00 83 25 80 02 3B 20 20 20 |;DDRA 1..%..; |
00000590: 20 20 20 20 20 20 53 54 41 20 24 39 31 32 33 20 | STA $9123 |
000005A0: 20 20 20 20 20 3B 44 44 52 41 20 32 00 9A 25 8A | ;DDRA 2..%.|
000005B0: 02 3B 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 |.; LDA #|
000005C0: 24 46 46 00 BF 25 94 02 3B 20 20 20 20 20 20 20 |$FF..%..; |
000005D0: 20 20 53 54 41 20 24 39 31 32 32 20 20 20 20 20 | STA $9122 |
000005E0: 20 3B 44 44 52 42 20 32 00 D4 25 9E 02 3B 20 20 | ;DDRB 2..%..; |
000005F0: 20 20 20 20 20 20 20 4C 44 58 20 23 34 00 FA 25 | LDX #4..%|
00000600: A8 02 3B 53 54 31 20 20 20 20 20 20 20 53 54 41 |..;ST1 STA|
00000610: 20 24 39 31 31 33 2C 58 20 20 20 20 3B 54 49 4D | $9113,X ;TIM|
00000620: 45 52 53 00 14 26 B2 02 3B 20 20 20 20 20 20 20 |ERS..&..; |
00000630: 20 20 53 54 41 20 24 39 31 32 33 2C 58 00 26 26 | STA $9123,X.&&|
00000640: BC 02 3B 20 20 20 20 20 20 20 20 20 44 45 58 00 |..; DEX.|
00000650: 3C 26 C6 02 3B 20 20 20 20 20 20 20 20 20 42 4E |<&..; BN|
00000660: 45 20 53 54 31 00 42 26 D0 02 3B 00 54 26 DA 02 |E ST1.B&..;.T&..|
00000670: 20 4C 44 41 23 30 3B 20 49 52 51 20 2D 00 69 26 | LDA#0; IRQ -.i&|
00000680: E4 02 20 53 54 41 24 30 33 31 34 3B 56 45 43 54 |.. STA$0314;VECT|
00000690: 4F 52 00 7B 26 EE 02 20 4C 44 41 23 24 39 30 3B |OR.{&.. LDA#$90;|
000006A0: 23 23 23 23 00 89 26 F8 02 20 53 54 41 24 30 33 |####..&.. STA$03|
000006B0: 31 35 00 8F 26 02 03 3B 00 AD 26 0C 03 3B 20 4B |15..&..;..&..; K|
000006C0: 4C 45 55 52 20 4B 41 52 41 4B 54 45 52 20 26 20 |LEUR KARAKTER & |
000006D0: 53 43 48 45 52 4D 00 B3 26 16 03 3B 00 BE 26 20 |SCHERM..&..;..& |
000006E0: 03 20 4C 44 58 23 30 00 C9 26 2A 03 20 4C 44 41 |. LDX#0..&*. LDA|
000006F0: 23 31 00 E2 26 34 03 53 54 32 20 53 54 41 24 44 |#1..&4.ST2 STA$D|
00000700: 38 30 30 2C 58 3B 20 43 2D 36 34 00 F8 26 3E 03 |800,X; C-64..&>.|
00000710: 20 53 54 41 24 44 39 30 30 2C 58 3B 20 43 2D 36 | STA$D900,X; C-6|
00000720: 34 00 0E 27 48 03 20 53 54 41 24 44 41 30 30 2C |4..'H. STA$DA00,|
00000730: 58 3B 20 43 2D 36 34 00 24 27 52 03 20 53 54 41 |X; C-64.$'R. STA|
00000740: 24 44 42 30 30 2C 58 3B 20 43 2D 36 34 00 41 27 |$DB00,X; C-64.A'|
00000750: 5C 03 3B 53 54 32 20 20 20 20 20 20 20 20 20 53 |\.;ST2 S|
00000760: 54 41 20 24 39 36 30 30 2C 58 00 5E 27 66 03 3B |TA $9600,X.^'f.;|
00000770: 20 20 20 20 20 20 20 20 20 20 20 20 53 54 41 20 | STA |
00000780: 24 39 37 30 30 2C 58 00 67 27 70 03 20 49 4E 58 |$9700,X.g'p. INX|
00000790: 00 73 27 7A 03 20 42 4E 45 53 54 32 00 8C 27 84 |.s'z. BNEST2..'.|
000007A0: 03 3B 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 |.; LD|
000007B0: 41 20 23 32 37 00 A7 27 8E 03 3B 20 20 20 20 20 |A #27..'..; |
000007C0: 20 20 20 20 20 20 20 53 54 41 20 24 39 36 30 46 | STA $960F|
000007D0: 00 B2 27 98 03 20 4C 44 41 23 30 00 C6 27 A2 03 |..'.. LDA#0..'..|
000007E0: 20 53 54 41 24 44 30 32 30 3B 20 43 2D 36 34 00 | STA$D020; C-64.|
000007F0: DA 27 AC 03 20 53 54 41 24 44 30 32 31 3B 20 43 |.'.. STA$D021; C|
00000800: 2D 36 34 00 E6 27 B6 03 20 53 54 41 24 30 34 00 |-64..'.. STA$04.|
00000810: F4 27 C0 03 20 4C 44 41 24 44 30 31 38 00 FF 27 |.'.. LDA$D018..'|
00000820: CA 03 20 4F 52 41 23 32 00 0D 28 D4 03 20 53 54 |.. ORA#2..(.. ST|
00000830: 41 24 44 30 31 38 00 13 28 DE 03 3B 00 27 28 E8 |A$D018..(..;.'(.|
00000840: 03 3B 20 4F 50 42 4F 55 57 20 53 43 48 45 52 4D |.; OPBOUW SCHERM|
00000850: 00 2D 28 F2 03 3B 00 3A 28 FC 03 20 4C 44 58 23 |.-(..;.:(.. LDX#|
00000860: 32 34 30 00 55 28 06 04 53 54 32 41 20 4C 44 41 |240.U(..ST2A LDA|
00000870: 53 43 52 45 45 4E 31 2C 58 3B 23 23 23 23 00 65 |SCREEN1,X;####.e|
00000880: 28 10 04 20 53 54 41 53 43 52 2D 31 2C 58 00 7C |(.. STASCR-1,X.||
00000890: 28 1A 04 20 4C 44 41 53 43 52 45 45 4E 32 2C 58 |(.. LDASCREEN2,X|
000008A0: 3B 23 23 23 23 00 8E 28 24 04 20 53 54 41 53 43 |;####..($. STASC|
000008B0: 52 2B 32 33 39 2C 58 00 A5 28 2E 04 20 4C 44 41 |R+239,X..(.. LDA|
000008C0: 53 43 52 45 45 4E 33 2C 58 3B 23 23 23 23 00 B7 |SCREEN3,X;####..|
000008D0: 28 38 04 20 53 54 41 53 43 52 2B 34 37 39 2C 58 |(8. STASCR+479,X|
000008E0: 00 CE 28 42 04 20 4C 44 41 53 43 52 45 45 4E 34 |..(B. LDASCREEN4|
000008F0: 2C 58 3B 23 23 23 23 00 E0 28 4C 04 20 53 54 41 |,X;####..(L. STA|
00000900: 53 43 52 2B 37 31 39 2C 58 00 E9 28 56 04 20 44 |SCR+719,X..(V. D|
00000910: 45 58 00 F6 28 60 04 20 42 4E 45 53 54 32 41 00 |EX..(`. BNEST2A.|
00000920: FC 28 6A 04 3B 00 18 29 74 04 3B 20 42 45 52 45 |.(j.;..)t.; BERE|
00000930: 4B 45 4E 49 4E 47 20 44 41 54 41 56 45 4C 44 45 |KENING DATAVELDE|
00000940: 4E 00 1E 29 7E 04 3B 00 2D 29 88 04 44 41 30 20 |N..)~.;.-)..DA0 |
00000950: 53 54 58 24 33 31 00 39 29 92 04 20 53 54 58 24 |STX$31.9).. STX$|
00000960: 33 32 00 45 29 9C 04 20 53 54 58 24 33 33 00 51 |32.E).. STX$33.Q|
00000970: 29 A6 04 20 53 54 58 24 33 34 00 5D 29 B0 04 20 |).. STX$34.]).. |
00000980: 53 54 58 24 33 35 00 6C 29 BA 04 20 53 54 58 44 |STX$35.l).. STXD|
00000990: 41 30 4B 4D 44 00 7B 29 C4 04 20 53 54 58 44 41 |A0KMD.{).. STXDA|
000009A0: 31 4B 4D 44 00 8A 29 E2 04 44 41 31 20 4C 44 41 |1KMD..)..DA1 LDA|
000009B0: 44 49 50 00 96 29 EC 04 20 43 4D 50 44 49 50 00 |DIP..).. CMPDIP.|
000009C0: A2 29 F6 04 20 42 4E 45 44 41 31 00 B9 29 00 05 |.).. BNEDA1..)..|
000009D0: 44 41 32 20 43 4D 50 23 34 30 3B 43 4F 4E 56 45 |DA2 CMP#40;CONVE|
000009E0: 52 54 00 CA 29 0A 05 20 42 43 43 44 41 33 3B 20 |RT..).. BCCDA3; |
000009F0: 44 49 50 00 DB 29 14 05 20 53 42 43 23 34 30 3B |DIP..).. SBC#40;|
00000A00: 4E 41 41 52 00 EC 29 1E 05 20 49 4E 43 24 33 32 |NAAR..).. INC$32|
00000A10: 3B 20 42 43 44 00 F8 29 28 05 20 42 4E 45 44 41 |; BCD..)(. BNEDA|
00000A20: 32 00 06 2A 32 05 44 41 33 20 43 4D 50 23 34 00 |2..*2.DA3 CMP#4.|
00000A30: 12 2A 3C 05 20 42 43 43 44 41 34 00 1D 2A 46 05 |.*<. BCCDA4..*F.|
00000A40: 20 53 42 43 23 34 00 29 2A 50 05 20 49 4E 43 24 | SBC#4.)*P. INC$|
00000A50: 33 31 00 35 2A 5A 05 20 42 4E 45 44 41 33 00 41 |31.5*Z. BNEDA3.A|
00000A60: 2A 64 05 44 41 34 20 54 41 58 00 4D 2A 6E 05 20 |*d.DA4 TAX.M*n. |
00000A70: 4C 44 41 24 33 32 00 56 2A 78 05 20 41 53 4C 00 |LDA$32.V*x. ASL.|
00000A80: 5F 2A 82 05 20 41 53 4C 00 68 2A 8C 05 20 41 53 |_*.. ASL.h*.. AS|
00000A90: 4C 00 71 2A 96 05 20 41 53 4C 00 7A 2A A0 05 20 |L.q*.. ASL.z*.. |
00000AA0: 43 4C 43 00 86 2A AA 05 20 41 44 43 24 33 31 00 |CLC..*.. ADC$31.|
00000AB0: 99 2A B4 05 20 53 54 41 24 33 31 3B 20 3D 20 43 |.*.. STA$31; = C|
00000AC0: 4D 2E 00 A2 2A BE 05 20 54 58 41 00 AF 2A C8 05 |M...*.. TXA..*..|
00000AD0: 20 42 45 51 44 41 34 42 00 BA 2A DC 05 20 4C 44 | BEQDA4B..*.. LD|
00000AE0: 41 23 30 00 C8 2A E6 05 20 53 45 44 3B 21 21 21 |A#0..*.. SED;!!!|
00000AF0: 21 00 D1 2A F0 05 20 43 4C 43 00 E2 2A FA 05 44 |!..*.. CLC..*..D|
00000B00: 41 34 41 20 41 44 43 23 24 32 35 00 EB 2A 04 06 |A4A ADC#$25..*..|
00000B10: 20 44 45 58 00 F8 2A 0E 06 20 42 4E 45 44 41 34 | DEX..*.. BNEDA4|
00000B20: 41 00 10 2B 18 06 44 41 34 42 20 53 54 41 24 33 |A..+..DA4B STA$3|
00000B30: 32 3B 3D 20 31 2F 34 43 4D 00 19 2B 2C 06 20 49 |2;= 1/4CM..+,. I|
00000B40: 4E 58 00 28 2B 36 06 44 41 35 20 4C 44 41 24 33 |NX.(+6.DA5 LDA$3|
00000B50: 35 00 31 2B 40 06 20 43 4C 43 00 3D 2B 4A 06 20 |5.1+@. CLC.=+J. |
00000B60: 41 44 43 24 33 32 00 49 2B 54 06 20 53 54 41 24 |ADC$32.I+T. STA$|
00000B70: 33 35 00 55 2B 5E 06 20 4C 44 41 24 33 34 00 61 |35.U+^. LDA$34.a|
00000B80: 2B 68 06 20 41 44 43 24 33 31 00 6D 2B 72 06 20 |+h. ADC$31.m+r. |
00000B90: 53 54 41 24 33 34 00 83 2B 7C 06 20 53 54 41 44 |STA$34..+|. STAD|
00000BA0: 41 30 4B 4D 44 2C 58 3B 20 4C 4F 57 00 8F 2B 86 |A0KMD,X; LOW..+.|
00000BB0: 06 20 4C 44 41 24 33 33 00 9A 2B 90 06 20 41 44 |. LDA$33..+.. AD|
00000BC0: 43 23 30 00 A6 2B 9A 06 20 53 54 41 24 33 33 00 |C#0..+.. STA$33.|
00000BD0: BD 2B A4 06 20 53 54 41 44 41 31 4B 4D 44 2C 58 |.+.. STADA1KMD,X|
00000BE0: 3B 20 48 49 47 48 00 C6 2B AE 06 20 49 4E 58 00 |; HIGH..+.. INX.|
00000BF0: D2 2B B8 06 20 42 4E 45 44 41 35 00 E0 2B BA 06 |.+.. BNEDA5..+..|
00000C00: 3B 20 20 20 20 20 4B 4D 48 00 F2 2B BC 06 20 4C |; KMH..+.. L|
00000C10: 44 41 44 41 30 4B 4D 44 2B 33 36 00 03 2C BD 06 |DADA0KMD+36..,..|
00000C20: 20 53 54 41 44 41 30 4B 4D 48 2B 31 00 0F 2C BE | STADA0KMH+1..,.|
00000C30: 06 20 53 54 41 24 33 31 00 21 2C C0 06 20 4C 44 |. STA$31.!,.. LD|
00000C40: 41 44 41 31 4B 4D 44 2B 33 36 00 32 2C C1 06 20 |ADA1KMD+36.2,.. |
00000C50: 53 54 41 44 41 31 4B 4D 48 2B 31 00 3E 2C C2 06 |STADA1KMH+1.>,..|
00000C60: 20 53 54 41 24 33 32 00 49 2C C4 06 20 4C 44 58 | STA$32.I,.. LDX|
00000C70: 23 30 00 55 2C C6 06 20 53 54 58 24 33 33 00 61 |#0.U,.. STX$33.a|
00000C80: 2C C8 06 20 53 54 58 24 33 34 00 6D 2C CA 06 20 |,.. STX$34.m,.. |
00000C90: 53 54 58 24 33 35 00 7C 2C CC 06 20 53 54 58 44 |STX$35.|,.. STXD|
00000CA0: 41 30 4B 4D 48 00 8B 2C CE 06 20 53 54 58 44 41 |A0KMH..,.. STXDA|
00000CB0: 31 4B 4D 48 00 96 2C D0 06 20 4C 44 58 23 32 00 |1KMH..,.. LDX#2.|
00000CC0: A2 2C D1 06 44 41 36 20 43 4C 43 00 AE 2C D2 06 |.,..DA6 CLC..,..|
00000CD0: 20 4C 44 41 24 33 33 00 BA 2C D4 06 20 41 44 43 | LDA$33..,.. ADC|
00000CE0: 24 33 31 00 C6 2C D6 06 20 53 54 41 24 33 33 00 |$31..,.. STA$33.|
00000CF0: D2 2C D8 06 20 4C 44 41 24 33 34 00 DE 2C DA 06 |.,.. LDA$34..,..|
00000D00: 20 41 44 43 24 33 32 00 EA 2C DB 06 20 53 54 41 | ADC$32..,.. STA|
00000D10: 24 33 34 00 F7 2C DC 06 20 41 4E 44 23 24 46 30 |$34..,.. AND#$F0|
00000D20: 00 10 2D DD 06 20 53 54 41 44 41 30 4B 4D 48 2C |..-.. STADA0KMH,|
00000D30: 58 3B 20 58 2C 59 20 4B 4D 00 1C 2D DE 06 20 4C |X; X,Y KM..-.. L|
00000D40: 44 41 24 33 35 00 27 2D E0 06 20 41 44 43 23 30 |DA$35.'-.. ADC#0|
00000D50: 00 33 2D E2 06 20 53 54 41 24 33 35 00 4C 2D E4 |.3-.. STA$35.L-.|
00000D60: 06 20 53 54 41 44 41 31 4B 4D 48 2C 58 3B 20 58 |. STADA1KMH,X; X|
00000D70: 59 30 20 4B 4D 00 58 2D E6 06 20 4C 44 41 24 33 |Y0 KM.X-.. LDA$3|
00000D80: 34 00 65 2D E8 06 20 41 4E 44 23 24 30 46 00 70 |4.e-.. AND#$0F.p|
00000D90: 2D EA 06 20 43 4D 50 23 35 00 7C 2D EC 06 20 42 |-.. CMP#5.|-.. B|
00000DA0: 4D 49 44 41 37 00 8D 2D EE 06 20 4C 44 41 44 41 |MIDA7..-.. LDADA|
00000DB0: 30 4B 4D 48 2C 58 00 96 2D F0 06 20 43 4C 43 00 |0KMH,X..-.. CLC.|
00000DC0: A3 2D F2 06 20 41 44 43 23 24 31 30 00 B4 2D F4 |.-.. ADC#$10..-.|
00000DD0: 06 20 53 54 41 44 41 30 4B 4D 48 2C 58 00 C5 2D |. STADA0KMH,X..-|
00000DE0: F6 06 20 4C 44 41 44 41 31 4B 4D 48 2C 58 00 D0 |.. LDADA1KMH,X..|
00000DF0: 2D F8 06 20 41 44 43 23 30 00 E1 2D FA 06 20 53 |-.. ADC#0..-.. S|
00000E00: 54 41 44 41 31 4B 4D 48 2C 58 00 ED 2D FC 06 44 |TADA1KMH,X..-..D|
00000E10: 41 37 20 49 4E 58 00 F9 2D 00 07 20 42 4E 45 44 |A7 INX..-.. BNED|
00000E20: 41 36 00 07 2E 30 07 3B 20 20 20 20 20 52 50 4D |A6...0.; RPM|
00000E30: 00 12 2E 3A 07 20 4C 44 58 23 30 00 1E 2E 44 07 |...:. LDX#0...D.|
00000E40: 20 53 54 58 24 33 33 00 2A 2E 4E 07 20 53 54 58 | STX$33.*.N. STX|
00000E50: 24 33 34 00 39 2E 58 07 20 53 54 58 44 41 30 52 |$34.9.X. STXDA0R|
00000E60: 50 4D 00 42 2E 62 07 20 49 4E 58 00 51 2E 6C 07 |PM.B.b. INX.Q.l.|
00000E70: 44 41 38 20 4C 44 41 24 33 33 00 5A 2E 76 07 20 |DA8 LDA$33.Z.v. |
00000E80: 43 4C 43 00 67 2E 80 07 20 41 44 43 23 24 33 30 |CLC.g... ADC#$30|
00000E90: 00 73 2E 8A 07 20 53 54 41 24 33 33 00 7F 2E 94 |.s... STA$33....|
00000EA0: 07 20 4C 44 41 24 33 34 00 8A 2E 9E 07 20 41 44 |. LDA$34..... AD|
00000EB0: 43 23 30 00 96 2E A8 07 20 53 54 41 24 33 34 00 |C#0..... STA$34.|
00000EC0: A2 2E B2 07 20 4C 44 59 24 33 33 00 AF 2E BC 07 |.... LDY$33.....|
00000ED0: 20 43 50 59 23 24 35 30 00 BB 2E C6 07 20 42 4D | CPY#$50..... BM|
00000EE0: 49 44 41 39 00 C4 2E D0 07 20 43 4C 43 00 CF 2E |IDA9..... CLC...|
00000EF0: DA 07 20 41 44 43 23 31 00 E3 2E E4 07 44 41 39 |.. ADC#1.....DA9|
00000F00: 20 53 54 41 44 41 30 52 50 4D 2C 58 00 EC 2E EE | STADA0RPM,X....|
00000F10: 07 20 49 4E 58 00 F8 2E F8 07 20 42 4E 45 44 41 |. INX..... BNEDA|
00000F20: 38 00 01 2F 02 08 20 43 4C 44 00 0D 2F 03 08 20 |8../.. CLD../.. |
00000F30: 4C 44 58 23 31 30 00 27 2F 04 08 44 41 39 41 20 |LDX#10.'/..DA9A |
00000F40: 4C 44 41 44 41 54 52 50 4D 2C 58 3B 23 23 23 23 |LDADATRPM,X;####|
00000F50: 00 3A 2F 05 08 20 53 54 41 44 41 31 52 50 4D 2D |.:/.. STADA1RPM-|
00000F60: 31 2C 58 00 43 2F 06 08 20 44 45 58 00 50 2F 07 |1,X.C/.. DEX.P/.|
00000F70: 08 20 42 4E 45 44 41 39 41 00 56 2F 0C 08 3B 00 |. BNEDA9A.V/..;.|
00000F80: 6B 2F 16 08 3B 20 43 4C 45 41 52 20 24 30 33 2D |k/..; CLEAR $03-|
00000F90: 24 31 30 30 00 71 2F 20 08 3B 00 7C 2F 2A 08 20 |$100.q/ .;.|/*. |
00000FA0: 4C 44 58 23 33 00 87 2F 34 08 20 4C 44 41 23 30 |LDX#3../4. LDA#0|
00000FB0: 00 98 2F 3E 08 43 4C 31 20 53 54 41 24 30 30 2C |../>.CL1 STA$00,|
00000FC0: 58 00 A1 2F 48 08 20 49 4E 58 00 AD 2F 52 08 20 |X../H. INX../R. |
00000FD0: 42 4E 45 43 4C 31 00 B3 2F 5C 08 3B 00 C7 2F 66 |BNECL1../\.;../f|
00000FE0: 08 3B 20 54 45 53 54 20 43 4D 4F 53 2D 52 41 4D |.; TEST CMOS-RAM|
00000FF0: 00 CD 2F 70 08 3B 00 D9 2F 7A 08 20 4C 44 41 23 |../p.;../z. LDA#|
00001000: 31 33 00 EB 2F 84 08 20 53 54 41 54 49 41 3B 43 |13../.. STATIA;C|
00001010: 4C 45 41 52 00 FE 2F 8E 08 20 4C 44 41 54 49 44 |LEAR../.. LDATID|
00001020: 3B 52 45 47 2E 20 44 00 0A 30 98 08 20 4C 44 41 |;REG. D..0.. LDA|
00001030: 23 31 34 00 16 30 A2 08 20 53 54 41 54 49 41 00 |#14..0.. STATIA.|
00001040: 22 30 AC 08 20 4C 44 41 54 49 44 00 2F 30 B6 08 |"0.. LDATID./0..|
00001050: 20 43 4D 50 23 24 35 35 00 3B 30 C0 08 20 42 4E | CMP#$55.;0.. BN|
00001060: 45 53 54 33 00 47 30 CA 08 20 4C 44 41 23 31 35 |EST3.G0.. LDA#15|
00001070: 00 53 30 D4 08 20 53 54 41 54 49 41 00 5F 30 DE |.S0.. STATIA._0.|
00001080: 08 20 4C 44 41 54 49 44 00 6C 30 E8 08 20 43 4D |. LDATID.l0.. CM|
00001090: 50 23 24 41 41 00 78 30 F2 08 20 42 4E 45 53 54 |P#$AA.x0.. BNEST|
000010A0: 33 00 88 30 FC 08 20 4A 4D 50 53 54 34 3B 23 23 |3..0.. JMPST4;##|
000010B0: 23 00 A0 30 06 09 3B 20 20 45 52 52 4F 52 3A 20 |#..0..; ERROR: |
000010C0: 43 4C 45 41 52 20 41 4C 4C 00 AF 30 10 09 53 54 |CLEAR ALL..0..ST|
000010D0: 33 20 4C 44 58 23 38 30 00 CA 30 1A 09 53 54 33 |3 LDX#80..0..ST3|
000010E0: 41 20 4C 44 41 53 43 52 45 45 4E 30 2C 58 3B 23 |A LDASCREEN0,X;#|
000010F0: 23 23 23 00 DA 30 24 09 20 53 54 41 53 43 52 2D |###..0$. STASCR-|
00001100: 31 2C 58 00 E3 30 2E 09 20 44 45 58 00 F0 30 38 |1,X..0.. DEX..08|
00001110: 09 20 42 4E 45 53 54 33 41 00 F6 30 42 09 3B 00 |. BNEST3A..0B.;.|
00001120: 02 31 4C 09 20 4C 44 58 23 31 34 00 0E 31 56 09 |.1L. LDX#14..1V.|
00001130: 20 53 54 58 54 49 41 00 1B 31 60 09 20 4C 44 41 | STXTIA..1`. LDA|
00001140: 23 24 35 35 00 27 31 6A 09 20 53 54 41 54 49 44 |#$55.'1j. STATID|
00001150: 00 33 31 74 09 20 4C 44 58 23 31 35 00 3F 31 7E |.31t. LDX#15.?1~|
00001160: 09 20 53 54 58 54 49 41 00 4C 31 88 09 20 4C 44 |. STXTIA.L1.. LD|
00001170: 41 23 24 41 41 00 58 31 92 09 20 53 54 41 54 49 |A#$AA.X1.. STATI|
00001180: 44 00 63 31 9C 09 20 4C 44 41 23 30 00 70 31 A6 |D.c1.. LDA#0.p1.|
00001190: 09 53 54 33 42 20 49 4E 58 00 7C 31 B0 09 20 53 |.ST3B INX.|1.. S|
000011A0: 54 58 54 49 41 00 88 31 BA 09 20 53 54 41 54 49 |TXTIA..1.. STATI|
000011B0: 44 00 95 31 C4 09 20 43 50 58 23 24 34 31 00 A2 |D..1.. CPX#$41..|
000011C0: 31 CE 09 20 42 4E 45 53 54 33 42 00 A8 31 D8 09 |1.. BNEST3B..1..|
000011D0: 3B 00 C7 31 E2 09 3B 20 49 4E 53 54 45 4C 4C 45 |;..1..; INSTELLE|
000011E0: 4E 20 54 49 4A 44 20 45 4E 20 54 4F 54 20 4B 4D |N TIJD EN TOT KM|
000011F0: 00 CD 31 EC 09 3B 00 E1 31 F6 09 20 4C 44 58 23 |..1..;..1.. LDX#|
00001200: 31 31 3B 20 52 45 47 2E 20 42 00 ED 31 00 0A 20 |11; REG. B..1.. |
00001210: 53 54 58 54 49 41 00 00 32 0A 0A 20 4C 44 41 23 |STXTIA..2.. LDA#|
00001220: 24 38 32 3B 20 53 54 4F 50 00 13 32 14 0A 20 53 |$82; STOP..2.. S|
00001230: 54 41 54 49 44 3B 20 20 54 49 4A 44 00 19 32 1E |TATID; TIJD..2.|
00001240: 0A 3B 00 2A 32 28 0A 20 4C 44 58 23 34 3B 20 44 |.;.*2(. LDX#4; D|
00001250: 41 54 45 00 43 32 32 0A 53 54 33 43 20 4C 44 41 |ATE.C22.ST3C LDA|
00001260: 44 41 54 2D 31 2C 58 3B 23 23 23 23 00 55 32 3C |DAT-1,X;####.U2<|
00001270: 0A 20 53 54 41 53 43 52 2B 31 31 39 2C 58 00 5E |. STASCR+119,X.^|
00001280: 32 46 0A 20 44 45 58 00 6B 32 50 0A 20 42 4E 45 |2F. DEX.k2P. BNE|
00001290: 53 54 33 43 00 71 32 5A 0A 3B 00 89 32 64 0A 20 |ST3C.q2Z.;..2d. |
000012A0: 4C 44 41 23 3C 28 53 43 52 2B 31 32 35 29 3B 44 |LDA#<(SCR+125);D|
000012B0: 41 47 00 95 32 6E 0A 20 53 54 41 24 30 32 00 A9 |AG..2n. STA$02..|
000012C0: 32 78 0A 20 4C 44 41 23 3E 28 53 43 52 2B 31 32 |2x. LDA#>(SCR+12|
000012D0: 35 29 00 B5 32 82 0A 20 53 54 41 24 30 33 00 C8 |5)..2.. STA$03..|
000012E0: 32 8C 0A 20 4A 53 52 49 4E 53 54 45 4C 3B 23 23 |2.. JSRINSTEL;##|
000012F0: 23 00 D3 32 96 0A 20 4C 44 58 23 37 00 DF 32 A0 |#..2.. LDX#7..2.|
00001300: 0A 20 53 54 58 54 49 41 00 EB 32 AA 0A 20 53 54 |. STXTIA..2.. ST|
00001310: 41 54 49 44 00 F1 32 B4 0A 3B 00 0C 33 BE 0A 20 |ATID..2..;..3.. |
00001320: 4C 44 41 23 3C 28 53 43 52 2B 31 33 30 29 3B 4D |LDA#<(SCR+130);M|
00001330: 49 4E 55 55 54 00 18 33 C8 0A 20 53 54 41 24 30 |INUUT..3.. STA$0|
00001340: 32 00 2C 33 D2 0A 20 4C 44 41 23 3E 28 53 43 52 |2.,3.. LDA#>(SCR|
00001350: 2B 31 33 30 29 00 38 33 DC 0A 20 53 54 41 24 30 |+130).83.. STA$0|
00001360: 33 00 4B 33 E6 0A 20 4A 53 52 49 4E 53 54 45 4C |3.K3.. JSRINSTEL|
00001370: 3B 23 23 23 00 56 33 F0 0A 20 4C 44 58 23 38 00 |;###.V3.. LDX#8.|
00001380: 62 33 FA 0A 20 53 54 58 54 49 41 00 6E 33 04 0B |b3.. STXTIA.n3..|
00001390: 20 53 54 41 54 49 44 00 74 33 0E 0B 3B 00 8D 33 | STATID.t3..;..3|
000013A0: 18 0B 20 4C 44 41 23 3C 28 53 43 52 2B 31 33 35 |.. LDA#<(SCR+135|
000013B0: 29 3B 4A 41 41 52 00 99 33 22 0B 20 53 54 41 24 |);JAAR..3". STA$|
000013C0: 30 32 00 AD 33 2C 0B 20 4C 44 41 23 3E 28 53 43 |02..3,. LDA#>(SC|
000013D0: 52 2B 31 33 35 29 00 B9 33 36 0B 20 53 54 41 24 |R+135)..36. STA$|
000013E0: 30 33 00 CC 33 40 0B 20 4A 53 52 49 4E 53 54 45 |03..3@. JSRINSTE|
000013F0: 4C 3B 23 23 23 00 D7 33 4A 0B 20 4C 44 58 23 39 |L;###..3J. LDX#9|
00001400: 00 E3 33 54 0B 20 53 54 58 54 49 41 00 EF 33 5E |..3T. STXTIA..3^|
00001410: 0B 20 53 54 41 54 49 44 00 F5 33 68 0B 3B 00 06 |. STATID..3h.;..|
00001420: 34 72 0B 20 4C 44 58 23 34 3B 20 54 49 4D 45 00 |4r. LDX#4; TIME.|
00001430: 1F 34 7C 0B 53 54 33 44 20 4C 44 41 54 59 44 2D |.4|.ST3D LDATYD-|
00001440: 31 2C 58 3B 23 23 23 23 00 31 34 86 0B 20 53 54 |1,X;####.14.. ST|
00001450: 41 53 43 52 2B 31 31 39 2C 58 00 3A 34 90 0B 20 |ASCR+119,X.:4.. |
00001460: 44 45 58 00 47 34 9A 0B 20 42 4E 45 53 54 33 44 |DEX.G4.. BNEST3D|
00001470: 00 4D 34 A4 0B 3B 00 60 34 AE 0B 20 4C 44 41 23 |.M4..;.`4.. LDA#|
00001480: 30 3B 53 45 43 4F 4E 44 45 00 6C 34 B8 0B 20 53 |0;SECONDE.l4.. S|
00001490: 54 41 54 49 41 00 78 34 C2 0B 20 53 54 41 54 49 |TATIA.x4.. STATI|
000014A0: 44 00 85 34 CC 0B 20 4C 44 41 23 24 33 30 00 98 |D..4.. LDA#$30..|
000014B0: 34 D6 0B 20 53 54 41 53 43 52 2B 31 33 35 3B 38 |4.. STASCR+135;8|
000014C0: 31 00 AB 34 E0 0B 20 53 54 41 53 43 52 2B 31 33 |1..4.. STASCR+13|
000014D0: 36 3B 38 32 00 B8 34 EA 0B 20 4C 44 41 23 24 32 |6;82..4.. LDA#$2|
000014E0: 30 00 C8 34 F4 0B 20 53 54 41 53 43 52 2B 31 32 |0..4.. STASCR+12|
000014F0: 35 00 D8 34 FE 0B 20 53 54 41 53 43 52 2B 31 32 |5..4.. STASCR+12|
00001500: 36 00 E8 34 08 0C 20 53 54 41 53 43 52 2B 31 33 |6..4.. STASCR+13|
00001510: 30 00 F8 34 12 0C 20 53 54 41 53 43 52 2B 31 33 |0..4.. STASCR+13|
00001520: 31 00 FE 34 1C 0C 3B 00 16 35 26 0C 20 4C 44 41 |1..4..;..5&. LDA|
00001530: 23 3C 28 53 43 52 2B 31 32 35 29 3B 55 55 52 00 |#<(SCR+125);UUR.|
00001540: 22 35 30 0C 20 53 54 41 24 30 32 00 36 35 3A 0C |"50. STA$02.65:.|
00001550: 20 4C 44 41 23 3E 28 53 43 52 2B 31 32 35 29 00 | LDA#>(SCR+125).|
00001560: 42 35 44 0C 20 53 54 41 24 30 33 00 55 35 4E 0C |B5D. STA$03.U5N.|
00001570: 20 4A 53 52 49 4E 53 54 45 4C 3B 23 23 23 00 60 | JSRINSTEL;###.`|
00001580: 35 58 0C 20 4C 44 58 23 34 00 6C 35 62 0C 20 53 |5X. LDX#4.l5b. S|
00001590: 54 58 54 49 41 00 78 35 6C 0C 20 53 54 41 54 49 |TXTIA.x5l. STATI|
000015A0: 44 00 7E 35 76 0C 3B 00 99 35 80 0C 20 4C 44 41 |D.~5v.;..5.. LDA|
000015B0: 23 3C 28 53 43 52 2B 31 33 30 29 3B 4D 49 4E 55 |#<(SCR+130);MINU|
000015C0: 55 54 00 A5 35 8A 0C 20 53 54 41 24 30 32 00 B9 |UT..5.. STA$02..|
000015D0: 35 94 0C 20 4C 44 41 23 3E 28 53 43 52 2B 31 33 |5.. LDA#>(SCR+13|
000015E0: 30 29 00 C5 35 9E 0C 20 53 54 41 24 30 33 00 D8 |0)..5.. STA$03..|
000015F0: 35 A8 0C 20 4A 53 52 49 4E 53 54 45 4C 3B 23 23 |5.. JSRINSTEL;##|
00001600: 23 00 E3 35 B2 0C 20 4C 44 58 23 32 00 EF 35 BC |#..5.. LDX#2..5.|
00001610: 0C 20 53 54 58 54 49 41 00 FB 35 C6 0C 20 53 54 |. STXTIA..5.. ST|
00001620: 41 54 49 44 00 01 36 D0 0C 3B 00 12 36 DA 0C 20 |ATID..6..;..6.. |
00001630: 4C 44 58 23 34 3B 20 56 45 45 47 00 23 36 E4 0C |LDX#4; VEEG.#6..|
00001640: 53 54 33 45 20 4C 44 41 23 24 32 30 00 35 36 EE |ST3E LDA#$20.56.|
00001650: 0C 20 53 54 41 53 43 52 2B 31 31 39 2C 58 00 3E |. STASCR+119,X.>|
00001660: 36 F8 0C 20 44 45 58 00 4B 36 02 0D 20 42 4E 45 |6.. DEX.K6.. BNE|
00001670: 53 54 33 45 00 51 36 0C 0D 3B 00 65 36 16 0D 20 |ST3E.Q6..;.e6.. |
00001680: 4C 44 41 23 31 31 3B 20 52 45 47 2E 20 42 00 71 |LDA#11; REG. B.q|
00001690: 36 20 0D 20 53 54 41 54 49 41 00 83 36 2A 0D 20 |6 . STATIA..6*. |
000016A0: 4C 44 58 23 32 3B 20 53 54 41 52 54 00 96 36 34 |LDX#2; START..64|
000016B0: 0D 20 53 54 58 54 49 44 3B 20 20 54 49 4A 44 00 |. STXTID; TIJD.|
000016C0: B0 36 3E 0D 3B 20 20 20 4B 49 4C 4F 4D 45 54 45 |.6>.; KILOMETE|
000016D0: 52 53 20 54 4F 54 41 41 4C 00 BB 36 48 0D 20 4C |RS TOTAAL..6H. L|
000016E0: 44 58 23 30 00 D7 36 52 0D 20 4C 44 41 23 3C 28 |DX#0..6R. LDA#<(|
000016F0: 53 43 52 2B 36 30 37 29 3B 20 58 58 2E 2E 2E 2E |SCR+607); XX....|
00001700: 00 E3 36 5C 0D 20 53 54 41 24 30 32 00 F7 36 66 |..6\. STA$02..6f|
00001710: 0D 20 4C 44 41 23 3E 28 53 43 52 2B 36 30 37 29 |. LDA#>(SCR+607)|
00001720: 00 03 37 70 0D 20 53 54 41 24 30 33 00 16 37 7A |..7p. STA$03..7z|
00001730: 0D 20 4A 53 52 49 4E 53 54 45 4C 3B 23 23 23 00 |. JSRINSTEL;###.|
00001740: 24 37 84 0D 20 53 54 41 24 31 30 2C 58 00 2D 37 |$7.. STA$10,X.-7|
00001750: 8E 0D 20 49 4E 58 00 40 37 98 0D 20 49 4E 43 24 |.. INX.@7.. INC$|
00001760: 30 32 3B 2E 2E 58 58 2E 2E 00 4C 37 A2 0D 20 49 |02;..XX...L7.. I|
00001770: 4E 43 24 30 32 00 5F 37 AC 0D 20 4A 53 52 49 4E |NC$02._7.. JSRIN|
00001780: 53 54 45 4C 3B 23 23 23 00 6D 37 B6 0D 20 53 54 |STEL;###.m7.. ST|
00001790: 41 24 31 30 2C 58 00 76 37 C0 0D 20 49 4E 58 00 |A$10,X.v7.. INX.|
000017A0: 89 37 CA 0D 20 49 4E 43 24 30 32 3B 2E 2E 2E 2E |.7.. INC$02;....|
000017B0: 58 58 00 9C 37 D4 0D 20 49 4E 43 24 30 32 3B 2E |XX..7.. INC$02;.|
000017C0: 2E 2E 2E 58 58 00 AF 37 DE 0D 20 4A 53 52 49 4E |...XX..7.. JSRIN|
000017D0: 53 54 45 4C 3B 23 23 23 00 BD 37 E8 0D 20 53 54 |STEL;###..7.. ST|
000017E0: 41 24 31 30 2C 58 00 D0 37 F2 0D 20 4A 53 52 55 |A$10,X..7.. JSRU|
000017F0: 50 44 41 54 45 3B 23 23 23 00 D6 37 FC 0D 3B 00 |PDATE;###..7..;.|
00001800: F6 37 06 0E 3B 20 44 49 53 50 4C 41 59 20 56 57 |.7..; DISPLAY VW|
00001810: 2D 54 52 49 4B 45 20 43 4F 4D 50 55 54 45 52 00 |-TRIKE COMPUTER.|
00001820: FC 37 10 0E 3B 00 0B 38 1A 0E 53 54 34 20 4C 44 |.7..;..8..ST4 LD|
00001830: 58 23 38 30 00 26 38 24 0E 53 54 34 41 20 4C 44 |X#80.&8$.ST4A LD|
00001840: 41 53 43 52 45 45 4E 31 2C 58 3B 23 23 23 23 00 |ASCREEN1,X;####.|
00001850: 36 38 2E 0E 20 53 54 41 53 43 52 2D 31 2C 58 00 |68.. STASCR-1,X.|
00001860: 3F 38 38 0E 20 44 45 58 00 4C 38 42 0E 20 42 4E |?88. DEX.L8B. BN|
00001870: 45 53 54 34 41 00 52 38 4C 0E 3B 00 6A 38 56 0E |EST4A.R8L.;.j8V.|
00001880: 3B 20 45 4E 41 42 4C 45 20 49 52 51 20 31 34 36 |; ENABLE IRQ 146|
00001890: 38 31 38 00 70 38 60 0E 3B 00 84 38 6A 0E 20 4C |818.p8`.;..8j. L|
000018A0: 44 58 23 31 32 3B 20 52 45 47 2E 20 43 00 90 38 |DX#12; REG. C..8|
000018B0: 74 0E 20 53 54 58 54 49 41 00 A4 38 7E 0E 20 4C |t. STXTIA..8~. L|
000018C0: 44 41 54 49 44 3B 43 4C 52 20 49 52 51 00 B5 38 |DATID;CLR IRQ..8|
000018D0: 88 0E 20 44 45 58 3B 20 52 45 47 2E 20 42 00 C1 |.. DEX; REG. B..|
000018E0: 38 92 0E 20 53 54 58 54 49 41 00 CE 38 9C 0E 20 |8.. STXTIA..8.. |
000018F0: 4C 44 41 23 24 31 32 00 E2 38 A6 0E 20 53 54 41 |LDA#$12..8.. STA|
00001900: 54 49 44 3B 45 4E 41 20 49 52 51 00 E8 38 B0 0E |TID;ENA IRQ..8..|
00001910: 3B 00 0D 39 BA 0E 3B 20 49 4E 49 54 49 41 4C 49 |;..9..; INITIALI|
00001920: 53 41 54 49 45 20 4B 4D 2F 48 2C 20 52 50 4D 20 |SATIE KM/H, RPM |
00001930: 53 54 41 54 55 53 00 13 39 C4 0E 3B 00 23 39 CE |STATUS..9..;.#9.|
00001940: 0E 4B 52 53 20 4C 44 58 23 24 46 46 00 31 39 D8 |.KRS LDX#$FF.19.|
00001950: 0E 20 4C 44 41 49 4E 50 55 54 00 3C 39 E2 0E 20 |. LDAINPUT.<9.. |
00001960: 41 4E 44 23 32 00 49 39 EC 0E 20 42 4E 45 4B 52 |AND#2.I9.. BNEKR|
00001970: 53 31 00 55 39 F6 0E 20 53 54 41 24 30 45 00 61 |S1.U9.. STA$0E.a|
00001980: 39 00 0F 2E 42 59 20 24 32 43 00 71 39 0A 0F 4B |9...BY $2C.q9..K|
00001990: 52 53 31 20 53 54 58 24 30 45 00 7F 39 14 0F 20 |RS1 STX$0E..9.. |
000019A0: 4C 44 41 49 4E 50 55 54 00 8A 39 1E 0F 20 41 4E |LDAINPUT..9.. AN|
000019B0: 44 23 38 00 97 39 28 0F 20 42 4E 45 4B 52 53 32 |D#8..9(. BNEKRS2|
000019C0: 00 A3 39 32 0F 20 53 54 41 24 30 44 00 AF 39 3C |..92. STA$0D..9<|
000019D0: 0F 2E 42 59 20 24 32 43 00 BF 39 46 0F 4B 52 53 |..BY $2C..9F.KRS|
000019E0: 32 20 53 54 58 24 30 44 00 C5 39 50 0F 3B 00 DF |2 STX$0D..9P.;..|
000019F0: 39 5A 0F 3B 20 24 24 24 20 20 47 52 4F 54 45 20 |9Z.; $$$ GROTE |
00001A00: 4C 55 53 20 20 24 24 24 00 E5 39 64 0F 3B 00 F4 |LUS $$$..9d.;..|
00001A10: 39 6E 0F 3B 20 53 4E 45 4C 48 45 49 44 00 FA 39 |9n.; SNELHEID..9|
00001A20: 78 0F 3B 00 06 3A 82 0F 4B 4D 48 20 43 4C 49 00 |x.;..:..KMH CLI.|
00001A30: 14 3A 87 0F 20 4C 44 41 49 4E 50 55 54 00 1F 3A |.:.. LDAINPUT..:|
00001A40: 8C 0F 20 41 4E 44 23 32 00 2C 3A 96 0F 20 53 54 |.. AND#2.,:.. ST|
00001A50: 41 54 45 4D 50 00 3A 3A A0 0F 20 4C 44 41 49 4E |ATEMP.::.. LDAIN|
00001A60: 50 55 54 00 45 3A AA 0F 20 41 4E 44 23 32 00 58 |PUT.E:.. AND#2.X|
00001A70: 3A B4 0F 20 43 4D 50 54 45 4D 50 3B 20 41 4E 54 |:.. CMPTEMP; ANT|
00001A80: 49 00 6B 3A BE 0F 20 42 4E 45 4B 4D 48 3B 44 45 |I.k:.. BNEKMH;DE|
00001A90: 4E 44 45 52 00 78 3A C8 0F 20 4C 44 41 54 45 4D |NDER.x:.. LDATEM|
00001AA0: 50 00 85 3A D2 0F 20 42 45 51 4B 4D 48 31 00 96 |P..:.. BEQKMH1..|
00001AB0: 3A DC 0F 20 4C 44 41 24 30 45 3B 4B 4D 3D 31 00 |:.. LDA$0E;KM=1.|
00001AC0: A2 3A E6 0F 20 42 4E 45 52 50 4D 00 B6 3A F0 0F |.:.. BNERPM..:..|
00001AD0: 20 44 45 43 24 30 45 3B 4B 4D 3C 3E 4B 4D 53 00 | DEC$0E;KM<>KMS.|
00001AE0: C2 3A FA 0F 20 42 4E 45 52 50 4D 00 D7 3A 04 10 |.:.. BNERPM..:..|
00001AF0: 4B 4D 48 31 20 4C 44 41 24 30 45 3B 4B 4D 3D 30 |KMH1 LDA$0E;KM=0|
00001B00: 00 E3 3A 0E 10 20 42 45 51 52 50 4D 00 F7 3A 18 |..:.. BEQRPM..:.|
00001B10: 10 20 49 4E 43 24 30 45 3B 4B 4D 3C 3E 4B 4D 53 |. INC$0E;KM<>KMS|
00001B20: 00 03 3B 22 10 20 49 4E 43 24 30 43 00 14 3B 2C |..;". INC$0C..;,|
00001B30: 10 52 50 4D 20 4C 44 41 49 4E 50 55 54 00 1F 3B |.RPM LDAINPUT..;|
00001B40: 36 10 20 41 4E 44 23 34 00 2C 3B 40 10 20 53 54 |6. AND#4.,;@. ST|
00001B50: 41 54 45 4D 50 00 3A 3B 4A 10 20 4C 44 41 49 4E |ATEMP.:;J. LDAIN|
00001B60: 50 55 54 00 45 3B 54 10 20 41 4E 44 23 34 00 58 |PUT.E;T. AND#4.X|
00001B70: 3B 5E 10 20 43 4D 50 54 45 4D 50 3B 20 41 4E 54 |;^. CMPTEMP; ANT|
00001B80: 49 00 6B 3B 68 10 20 42 4E 45 52 50 4D 3B 44 45 |I.k;h. BNERPM;DE|
00001B90: 4E 44 45 52 00 78 3B 72 10 20 4C 44 41 54 45 4D |NDER.x;r. LDATEM|
00001BA0: 50 00 85 3B 7C 10 20 42 45 51 52 50 4D 31 00 97 |P..;|. BEQRPM1..|
00001BB0: 3B 86 10 20 4C 44 41 24 30 44 3B 52 50 4D 3D 31 |;.. LDA$0D;RPM=1|
00001BC0: 00 A3 3B 90 10 20 42 4E 45 4B 45 59 00 AF 3B 9A |..;.. BNEKEY..;.|
00001BD0: 10 20 44 45 43 24 30 44 00 BB 3B A4 10 20 42 4E |. DEC$0D..;.. BN|
00001BE0: 45 4B 45 59 00 CB 3B AE 10 52 50 4D 31 20 4C 44 |EKEY..;..RPM1 LD|
00001BF0: 41 24 30 44 00 D7 3B B8 10 20 42 45 51 4B 45 59 |A$0D..;.. BEQKEY|
00001C00: 00 E3 3B C2 10 20 49 4E 43 24 30 44 00 EF 3B CC |..;.. INC$0D..;.|
00001C10: 10 20 49 4E 43 24 30 46 00 04 3C D6 10 4B 45 59 |. INC$0F..<..KEY|
00001C20: 20 4A 53 52 4B 45 59 42 3B 23 23 23 23 00 12 3C | JSRKEYB;####..<|
00001C30: E0 10 20 4C 44 41 54 4F 45 54 53 00 1F 3C EA 10 |.. LDATOETS..<..|
00001C40: 20 43 4D 50 23 24 46 46 00 2B 3C F4 10 20 42 45 | CMP#$FF.+<.. BE|
00001C50: 51 4B 4D 48 00 38 3C FE 10 20 53 54 41 54 45 4D |QKMH.8<.. STATEM|
00001C60: 50 00 49 3C 08 11 4B 45 59 31 20 4A 53 52 4B 45 |P.I<..KEY1 JSRKE|
00001C70: 59 42 00 56 3C 12 11 20 4C 44 41 54 45 4D 50 00 |YB.V<.. LDATEMP.|
00001C80: 64 3C 1C 11 20 43 4D 50 54 4F 45 54 53 00 71 3C |d<.. CMPTOETS.q<|
00001C90: 26 11 20 42 45 51 4B 45 59 31 00 83 3C 30 11 20 |&. BEQKEY1..<0. |
00001CA0: 41 4E 44 23 24 30 46 3B 26 26 26 26 00 94 3C 44 |AND#$0F;&&&&..<D|
00001CB0: 11 20 43 4D 50 23 37 3B 20 44 41 47 2F 00 A8 3C |. CMP#7; DAG/..<|
00001CC0: 4E 11 20 42 4E 45 54 52 49 50 3B 20 4E 41 43 48 |N. BNETRIP; NACH|
00001CD0: 54 00 B7 3C 58 11 20 4C 44 41 53 54 41 54 55 53 |T..<X. LDASTATUS|
00001CE0: 00 C4 3C 62 11 20 45 4F 52 23 24 38 30 00 D3 3C |..<b. EOR#$80..<|
00001CF0: 6C 11 20 53 54 41 53 54 41 54 55 53 00 DF 3C 76 |l. STASTATUS..<v|
00001D00: 11 20 42 4D 49 44 4E 31 00 EA 3C 80 11 20 4C 44 |. BMIDN1..<.. LD|
00001D10: 41 23 30 00 F6 3C 8A 11 2E 42 59 20 24 32 43 00 |A#0..<...BY $2C.|
00001D20: 04 3D 94 11 44 4E 31 20 4C 44 41 23 31 00 12 3D |.=..DN1 LDA#1..=|
00001D30: 9E 11 20 53 54 41 24 44 30 32 30 00 20 3D A8 11 |.. STA$D020. =..|
00001D40: 20 53 54 41 24 44 30 32 31 00 2F 3D B2 11 20 4C | STA$D021./=.. L|
00001D50: 44 41 53 54 41 54 55 53 00 3B 3D C6 11 20 42 4D |DASTATUS.;=.. BM|
00001D60: 49 44 4E 32 00 46 3D D0 11 20 4C 44 41 23 31 00 |IDN2.F=.. LDA#1.|
00001D70: 52 3D DA 11 2E 42 59 20 24 32 43 00 60 3D E4 11 |R=...BY $2C.`=..|
00001D80: 44 4E 32 20 4C 44 41 23 30 00 6B 3D EE 11 20 4C |DN2 LDA#0.k=.. L|
00001D90: 44 58 23 30 00 84 3D F8 11 4B 45 31 20 53 54 41 |DX#0..=..KE1 STA|
00001DA0: 24 44 38 30 30 2C 58 3B 20 43 2D 36 34 00 9A 3D |$D800,X; C-64..=|
00001DB0: 02 12 20 53 54 41 24 44 39 30 30 2C 58 3B 20 43 |.. STA$D900,X; C|
00001DC0: 2D 36 34 00 B0 3D 0C 12 20 53 54 41 24 44 41 30 |-64..=.. STA$DA0|
00001DD0: 30 2C 58 3B 20 43 2D 36 34 00 C6 3D 16 12 20 53 |0,X; C-64..=.. S|
00001DE0: 54 41 24 44 42 30 30 2C 58 3B 20 43 2D 36 34 00 |TA$DB00,X; C-64.|
00001DF0: CF 3D 20 12 20 49 4E 58 00 DB 3D 2A 12 20 42 4E |.= . INX..=*. BN|
00001E00: 45 4B 45 31 00 EF 3D 34 12 4B 45 32 20 4A 4D 50 |EKE1..=4.KE2 JMP|
00001E10: 4B 4D 48 3B 23 23 23 23 00 05 3E 3E 12 54 52 49 |KMH;####..>>.TRI|
00001E20: 50 20 43 4D 50 23 38 3B 54 52 49 50 20 3F 00 12 |P CMP#8;TRIP ?..|
00001E30: 3E 48 12 20 42 4E 45 54 52 4D 45 00 21 3E 52 12 |>H. BNETRME.!>R.|
00001E40: 20 4C 44 41 53 54 41 54 55 53 00 2E 3E 5C 12 20 | LDASTATUS..>\. |
00001E50: 45 4F 52 23 24 30 38 00 3D 3E 66 12 20 53 54 41 |EOR#$08.=>f. STA|
00001E60: 53 54 41 54 55 53 00 48 3E 70 12 20 4C 44 58 23 |STATUS.H>p. LDX#|
00001E70: 30 00 54 3E 7A 12 20 42 45 51 4B 45 32 00 6B 3E |0.T>z. BEQKE2.k>|
00001E80: 84 12 54 52 4D 45 20 43 4D 50 23 39 3B 4D 45 54 |..TRME CMP#9;MET|
00001E90: 45 52 53 3F 00 78 3E 8E 12 20 42 4E 45 52 41 4C |ERS?.x>.. BNERAL|
00001EA0: 4C 00 87 3E 98 12 20 4C 44 41 53 54 41 54 55 53 |L..>.. LDASTATUS|
00001EB0: 00 94 3E A2 12 20 45 4F 52 23 24 32 30 00 A3 3E |..>.. EOR#$20..>|
00001EC0: AC 12 20 53 54 41 53 54 41 54 55 53 00 AE 3E B6 |.. STASTATUS..>.|
00001ED0: 12 20 4C 44 58 23 30 00 BA 3E C0 12 20 42 45 51 |. LDX#0..>.. BEQ|
00001EE0: 4B 45 32 00 D1 3E CA 12 52 41 4C 4C 20 43 4D 50 |KE2..>..RALL CMP|
00001EF0: 23 35 3B 52 41 4C 4C 45 59 3F 00 DE 3E D4 12 20 |#5;RALLEY?..>.. |
00001F00: 42 4E 45 52 41 4D 45 00 ED 3E DE 12 20 4C 44 41 |BNERAME..>.. LDA|
00001F10: 53 54 41 54 55 53 00 FA 3E E8 12 20 45 4F 52 23 |STATUS..>.. EOR#|
00001F20: 24 31 30 00 09 3F F2 12 20 53 54 41 53 54 41 54 |$10..?.. STASTAT|
00001F30: 55 53 00 14 3F FC 12 20 4C 44 58 23 30 00 20 3F |US..?.. LDX#0. ?|
00001F40: 06 13 20 42 45 51 4B 45 32 00 37 3F 10 13 52 41 |.. BEQKE2.7?..RA|
00001F50: 4D 45 20 43 4D 50 23 36 3B 4D 45 54 45 52 53 3F |ME CMP#6;METERS?|
00001F60: 00 44 3F 1A 13 20 42 4E 45 52 45 53 54 00 53 3F |.D?.. BNEREST.S?|
00001F70: 24 13 20 4C 44 41 53 54 41 54 55 53 00 60 3F 2E |$. LDASTATUS.`?.|
00001F80: 13 20 45 4F 52 23 24 34 30 00 6F 3F 38 13 20 53 |. EOR#$40.o?8. S|
00001F90: 54 41 53 54 41 54 55 53 00 7E 3F 42 13 52 45 53 |TASTATUS.~?B.RES|
00001FA0: 54 20 4C 44 58 23 30 00 8A 3F 4C 13 20 42 45 51 |T LDX#0..?L. BEQ|
00001FB0: 4B 45 32 00 90 3F 28 23 3B 00 96 3F 2A 23 3B 00 |KE2..?(#;..?*#;.|
00001FC0: A7 3F 2C 23 4B 45 59 42 20 4C 44 59 23 24 34 30 |.?,#KEYB LDY#$40|
00001FD0: 00 B5 3F 2E 23 20 53 54 59 54 4F 45 54 53 00 C0 |..?.# STYTOETS..|
00001FE0: 3F 30 23 20 4C 44 41 23 30 00 CC 3F 32 23 20 53 |?0# LDA#0..?2# S|
00001FF0: 54 41 44 52 41 00 D8 3F 34 23 20 4C 44 58 44 52 |TADRA..?4# LDXDR|
00002000: 42 00 E5 3F 36 23 20 43 50 58 23 24 46 46 00 F2 |B..?6# CPX#$FF..|
00002010: 3F 38 23 20 42 45 51 4B 45 4E 44 00 FB 3F 3A 23 |?8# BEQKEND..?:#|
00002020: 20 54 41 59 00 08 40 3C 23 20 4C 44 41 23 24 46 | TAY..@<# LDA#$F|
00002030: 45 00 16 40 3E 23 4B 31 20 53 54 41 44 52 41 00 |E..@>#K1 STADRA.|
00002040: 21 40 40 23 20 4C 44 58 23 38 00 2A 40 42 23 20 |!@@# LDX#8.*@B# |
00002050: 50 48 41 00 38 40 44 23 4B 32 20 4C 44 41 44 52 |PHA.8@D#K2 LDADR|
00002060: 42 00 44 40 46 23 20 43 4D 50 44 52 42 00 4F 40 |B.D@F# CMPDRB.O@|
00002070: 48 23 20 42 4E 45 4B 32 00 5A 40 4A 23 4B 33 20 |H# BNEK2.Z@J#K3 |
00002080: 4C 53 52 00 6C 40 4C 23 20 42 43 53 4B 34 3B 31 |LSR.l@L# BCSK4;1|
00002090: 3D 4E 49 45 54 00 7A 40 4E 23 20 53 54 59 54 4F |=NIET.z@N# STYTO|
000020A0: 45 54 53 00 85 40 52 23 4B 34 20 49 4E 59 00 92 |ETS..@R#K4 INY..|
000020B0: 40 54 23 20 43 50 59 23 24 34 31 00 9E 40 56 23 |@T# CPY#$41..@V#|
000020C0: 20 42 43 53 4B 45 4E 00 A7 40 58 23 20 44 45 58 | BCSKEN..@X# DEX|
000020D0: 00 B2 40 5A 23 20 42 4E 45 4B 33 00 BB 40 5C 23 |..@Z# BNEK3..@\#|
000020E0: 20 53 45 43 00 C4 40 5E 23 20 50 4C 41 00 CD 40 | SEC..@^# PLA..@|
000020F0: 60 23 20 52 4F 4C 00 D8 40 62 23 20 42 4E 45 4B |`# ROL..@b# BNEK|
00002100: 31 00 E4 40 64 23 4B 45 4E 20 50 4C 41 00 F6 40 |1..@d#KEN PLA..@|
00002110: 66 23 4B 45 4E 44 20 4C 44 59 54 4F 45 54 53 00 |f#KEND LDYTOETS.|
00002120: 07 41 68 23 20 4C 44 41 4D 41 54 52 49 58 2C 59 |.Ah# LDAMATRIX,Y|
00002130: 00 15 41 6A 23 20 53 54 41 54 4F 45 54 53 00 1E |..Aj# STATOETS..|
00002140: 41 6C 23 20 52 54 53 00 31 41 6E 23 49 4E 53 54 |Al# RTS.1An#INST|
00002150: 45 4C 20 4C 44 41 23 24 41 30 00 3C 41 70 23 20 |EL LDA#$A0.<Ap# |
00002160: 4C 44 59 23 30 00 4C 41 72 23 20 53 54 41 28 24 |LDY#0.LAr# STA($|
00002170: 30 32 29 2C 59 00 60 41 74 23 49 4E 31 20 4A 53 |02),Y.`At#IN1 JS|
00002180: 52 4B 45 59 42 3B 23 23 23 00 6E 41 76 23 20 4C |RKEYB;###.nAv# L|
00002190: 44 41 54 4F 45 54 53 00 7B 41 78 23 20 43 4D 50 |DATOETS.{Ax# CMP|
000021A0: 23 24 46 46 00 87 41 7A 23 20 42 45 51 49 4E 31 |#$FF..Az# BEQIN1|
000021B0: 00 94 41 7C 23 20 53 54 41 54 45 4D 50 00 A9 41 |..A|# STATEMP..A|
000021C0: 7E 23 49 4E 31 41 20 4A 53 52 4B 45 59 42 3B 23 |~#IN1A JSRKEYB;#|
000021D0: 23 23 00 B6 41 80 23 20 4C 44 41 54 45 4D 50 00 |##..A.# LDATEMP.|
000021E0: C4 41 82 23 20 43 4D 50 54 4F 45 54 53 00 D1 41 |.A.# CMPTOETS..A|
000021F0: 84 23 20 42 45 51 49 4E 31 41 00 DC 41 86 23 20 |.# BEQIN1A..A.# |
00002200: 4C 44 59 23 30 00 E9 41 88 23 20 41 4E 44 23 24 |LDY#0..A.# AND#$|
00002210: 30 46 00 FB 41 8A 23 20 43 4D 50 23 31 30 3B 20 |0F..A.# CMP#10; |
00002220: 3E 39 20 3F 00 0A 42 8C 23 20 42 50 4C 49 4E 53 |>9 ?..B.# BPLINS|
00002230: 54 45 4C 00 13 42 8E 23 20 43 4C 43 00 20 42 90 |TEL..B.# CLC. B.|
00002240: 23 20 41 44 43 23 24 33 30 00 30 42 92 23 20 53 |# ADC#$30.0B.# S|
00002250: 54 41 28 24 30 32 29 2C 59 00 39 42 94 23 20 41 |TA($02),Y.9B.# A|
00002260: 53 4C 00 42 42 96 23 20 41 53 4C 00 4B 42 98 23 |SL.BB.# ASL.KB.#|
00002270: 20 41 53 4C 00 54 42 9A 23 20 41 53 4C 00 61 42 | ASL.TB.# ASL.aB|
00002280: 9C 23 20 53 54 41 54 45 4D 50 00 71 42 9E 23 49 |.# STATEMP.qB.#I|
00002290: 4E 32 20 4C 44 41 23 24 41 30 00 7C 42 A0 23 20 |N2 LDA#$A0.|B.# |
000022A0: 4C 44 59 23 31 00 8C 42 A2 23 20 53 54 41 28 24 |LDY#1..B.# STA($|
000022B0: 30 32 29 2C 59 00 A0 42 A4 23 49 4E 33 20 4A 53 |02),Y..B.#IN3 JS|
000022C0: 52 4B 45 59 42 3B 23 23 23 00 AE 42 A6 23 20 4C |RKEYB;###..B.# L|
000022D0: 44 41 54 4F 45 54 53 00 BB 42 A8 23 20 43 4D 50 |DATOETS..B.# CMP|
000022E0: 23 24 46 46 00 C7 42 AA 23 20 42 45 51 49 4E 33 |#$FF..B.# BEQIN3|
000022F0: 00 D4 42 AC 23 20 53 54 41 54 45 4D 50 00 E4 42 |..B.# STATEMP..B|
00002300: AE 23 49 4E 34 20 4A 53 52 4B 45 59 42 00 F1 42 |.#IN4 JSRKEYB..B|
00002310: B0 23 20 4C 44 41 54 45 4D 50 00 FF 42 B2 23 20 |.# LDATEMP..B.# |
00002320: 43 4D 50 54 4F 45 54 53 00 0B 43 B4 23 20 42 45 |CMPTOETS..C.# BE|
00002330: 51 49 4E 34 00 16 43 B6 23 20 4C 44 59 23 31 00 |QIN4..C.# LDY#1.|
00002340: 23 43 B8 23 20 41 4E 44 23 24 30 46 00 35 43 BA |#C.# AND#$0F.5C.|
00002350: 23 20 43 4D 50 23 31 30 3B 20 3E 39 20 3F 00 41 |# CMP#10; >9 ?.A|
00002360: 43 BC 23 20 42 50 4C 49 4E 32 00 4A 43 BE 23 20 |C.# BPLIN2.JC.# |
00002370: 43 4C 43 00 57 43 C0 23 20 41 44 43 23 24 33 30 |CLC.WC.# ADC#$30|
00002380: 00 67 43 C2 23 20 53 54 41 28 24 30 32 29 2C 59 |.gC.# STA($02),Y|
00002390: 00 74 43 C4 23 20 41 4E 44 23 24 30 46 00 7D 43 |.tC.# AND#$0F.}C|
000023A0: C6 23 20 43 4C 43 00 8A 43 C8 23 20 41 44 43 54 |.# CLC..C.# ADCT|
000023B0: 45 4D 50 00 93 43 CA 23 20 52 54 53 00 99 43 CC |EMP..C.# RTS..C.|
000023C0: 23 3B 00 AC 43 CE 23 55 50 44 41 54 45 20 4C 44 |#;..C.#UPDATE LD|
000023D0: 58 23 24 31 30 00 BB 43 D0 23 55 50 31 20 53 54 |X#$10..C.#UP1 ST|
000023E0: 58 54 49 41 00 C9 43 D2 23 20 4C 44 41 24 30 30 |XTIA..C.# LDA$00|
000023F0: 2C 58 00 D5 43 D4 23 20 53 54 41 54 49 44 00 DE |,X..C.# STATID..|
00002400: 43 D6 23 20 49 4E 58 00 EB 43 D8 23 20 43 50 58 |C.# INX..C.# CPX|
00002410: 23 24 33 30 00 F7 43 DA 23 20 42 4E 45 55 50 31 |#$30..C.# BNEUP1|
00002420: 00 00 44 DC 23 20 52 54 53 00 06 44 DE 23 3B 00 |..D.# RTS..D.#;.|
00002430: 16 44 E0 23 53 43 52 45 45 4E 30 20 4E 4F 50 00 |.D.#SCREEN0 NOP.|
00002440: 37 44 E2 23 2E 54 58 20 22 20 20 20 20 45 52 52 |7D.#.TX " ERR|
00002450: 4F 52 20 46 4F 55 4E 44 20 49 4E 20 20 20 20 22 |OR FOUND IN "|
00002460: 00 54 44 E4 23 2E 54 58 20 22 20 20 20 20 20 20 |.TD.#.TX " |
00002470: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 75 44 | ".uD|
00002480: E6 23 2E 54 58 20 22 20 20 20 20 20 20 20 43 4D |.#.TX " CM|
00002490: 4F 53 2D 52 41 4D 20 20 20 20 20 20 20 22 00 92 |OS-RAM "..|
000024A0: 44 E8 23 2E 54 58 20 22 20 20 20 20 20 20 20 20 |D.#.TX " |
000024B0: 20 20 20 20 20 20 20 20 20 20 22 00 A2 44 EA 23 | "..D.#|
000024C0: 53 43 52 45 45 4E 31 20 4E 4F 50 00 C3 44 EC 23 |SCREEN1 NOP..D.#|
000024D0: 2E 54 58 20 22 20 20 20 20 20 20 20 56 57 2D 54 |.TX " VW-T|
000024E0: 52 49 4B 45 20 20 20 20 20 20 20 22 00 E0 44 EE |RIKE "..D.|
000024F0: 23 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 20 |#.TX " |
00002500: 20 20 20 20 20 20 20 20 22 00 01 45 F0 23 2E 54 | "..E.#.T|
00002510: 58 20 22 20 20 20 20 20 20 20 43 4F 4D 50 55 54 |X " COMPUT|
00002520: 45 52 20 20 20 20 20 20 20 22 00 1E 45 F2 23 2E |ER "..E.#.|
00002530: 54 58 20 22 20 20 20 20 20 20 20 20 20 20 20 20 |TX " |
00002540: 20 20 20 20 20 20 22 00 3F 45 F4 23 2E 54 58 20 | ".?E.#.TX |
00002550: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00002560: 20 20 20 20 20 20 20 22 00 5C 45 F6 23 2E 54 58 | ".\E.#.TX|
00002570: 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | " |
00002580: 20 20 20 20 22 00 7D 45 F8 23 2E 54 58 20 22 20 | ".}E.#.TX " |
00002590: 20 20 20 20 20 20 20 3A 20 20 20 20 2D 20 20 20 | : - |
000025A0: 20 20 20 20 20 22 00 9A 45 FA 23 2E 54 58 20 22 | "..E.#.TX "|
000025B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000025C0: 20 20 22 00 BB 45 FC 23 2E 54 58 20 22 20 20 20 | "..E.#.TX " |
000025D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000025E0: 20 20 20 22 00 D8 45 FE 23 2E 54 58 20 22 20 20 | "..E.#.TX " |
000025F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002600: 22 00 F9 45 00 24 2E 54 58 20 22 20 20 20 20 20 |"..E.$.TX " |
00002610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002620: 20 22 00 16 46 02 24 2E 54 58 20 22 20 20 20 20 | "..F.$.TX " |
00002630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00002640: 26 46 04 24 53 43 52 45 45 4E 32 20 4E 4F 50 00 |&F.$SCREEN2 NOP.|
00002650: 47 46 06 24 2E 54 58 20 22 67 67 67 67 67 67 67 |GF.$.TX "ggggggg|
00002660: 67 67 67 67 67 67 67 67 67 67 20 20 20 20 20 22 |gggggggggg "|
00002670: 00 64 46 08 24 2E 54 58 20 22 20 20 20 20 20 20 |.dF.$.TX " |
00002680: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 85 46 | "..F|
00002690: 0A 24 2E 54 58 20 22 20 20 20 20 67 20 20 20 20 |.$.TX " g |
000026A0: 67 20 20 20 20 67 20 20 20 4B 4D 2F 48 22 00 A2 |g g KM/H"..|
000026B0: 46 0C 24 2E 54 58 20 22 20 20 20 20 20 20 20 20 |F.$.TX " |
000026C0: 20 20 20 20 20 20 20 20 20 20 22 00 C3 46 0E 24 | "..F.$|
000026D0: 2E 54 58 20 22 20 20 20 20 35 30 20 20 31 30 30 |.TX " 50 100|
000026E0: 20 20 31 35 30 20 20 20 20 20 20 22 00 E0 46 10 | 150 "..F.|
000026F0: 24 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 20 |$.TX " |
00002700: 20 20 20 20 20 20 20 20 22 00 01 47 12 24 2E 54 | "..G.$.T|
00002710: 58 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |X " |
00002720: 20 20 20 20 20 20 20 20 20 22 00 1E 47 14 24 2E | "..G.$.|
00002730: 54 58 20 22 20 20 20 20 20 20 20 20 20 20 20 20 |TX " |
00002740: 20 20 20 20 20 20 22 00 3F 47 16 24 2E 54 58 20 | ".?G.$.TX |
00002750: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00002760: 20 20 20 20 20 20 20 22 00 5C 47 18 24 2E 54 58 | ".\G.$.TX|
00002770: 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | " |
00002780: 20 20 20 20 22 00 7D 47 1A 24 2E 54 58 20 22 67 | ".}G.$.TX "g|
00002790: 67 67 67 67 67 67 67 67 67 67 67 67 67 67 67 67 |gggggggggggggggg|
000027A0: 20 20 20 30 30 22 00 9A 47 1C 24 2E 54 58 20 22 | 00"..G.$.TX "|
000027B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000027C0: 20 20 22 00 AA 47 1E 24 53 43 52 45 45 4E 33 20 | "..G.$SCREEN3 |
000027D0: 4E 4F 50 00 CB 47 20 24 2E 54 58 20 22 20 20 20 |NOP..G $.TX " |
000027E0: 20 67 20 20 20 20 67 20 20 20 20 67 20 20 20 20 | g g g |
000027F0: 54 50 4D 22 00 E8 47 22 24 2E 54 58 20 22 20 20 |TPM"..G"$.TX " |
00002800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002810: 22 00 09 48 24 24 2E 54 58 20 22 20 20 20 20 32 |"..H$$.TX " 2|
00002820: 30 20 20 20 34 30 20 20 20 36 30 20 20 2A 31 30 |0 40 60 *10|
00002830: 30 22 00 26 48 26 24 2E 54 58 20 22 20 20 20 20 |0".&H&$.TX " |
00002840: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00002850: 47 48 28 24 2E 54 58 20 22 20 20 20 20 20 20 20 |GH($.TX " |
00002860: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00002870: 00 64 48 2A 24 2E 54 58 20 22 20 20 20 20 20 20 |.dH*$.TX " |
00002880: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 85 48 | "..H|
00002890: 2C 24 2E 54 58 20 22 54 4F 54 41 41 4C 20 20 20 |,$.TX "TOTAAL |
000028A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 A2 | "..|
000028B0: 48 2E 24 2E 54 58 20 22 20 20 20 20 20 20 20 20 |H.$.TX " |
000028C0: 20 20 20 20 20 20 20 20 20 20 22 00 C3 48 30 24 | "..H0$|
000028D0: 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 20 20 |.TX " |
000028E0: 20 20 20 20 20 20 20 20 20 20 20 22 00 E0 48 32 | "..H2|
000028F0: 24 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 20 |$.TX " |
00002900: 20 20 20 20 20 20 20 20 22 00 01 49 34 24 2E 54 | "..I4$.T|
00002910: 58 20 22 54 52 49 50 20 20 20 20 20 20 20 2E 20 |X "TRIP . |
00002920: 20 20 20 20 20 20 20 20 20 22 00 1E 49 36 24 2E | "..I6$.|
00002930: 54 58 20 22 20 20 20 20 20 20 20 20 20 20 20 20 |TX " |
00002940: 20 20 20 20 20 20 22 00 3F 49 38 24 2E 54 58 20 | ".?I8$.TX |
00002950: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00002960: 20 20 20 20 20 20 20 22 00 5C 49 3A 24 2E 54 58 | ".\I:$.TX|
00002970: 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | " |
00002980: 20 20 20 20 22 00 6C 49 3C 24 53 43 52 45 45 4E | ".lI<$SCREEN|
00002990: 34 20 4E 4F 50 00 8D 49 3E 24 2E 54 58 20 22 52 |4 NOP..I>$.TX "R|
000029A0: 41 4C 4C 45 59 20 20 20 20 20 2E 20 20 20 20 20 |ALLEY . |
000029B0: 20 20 20 20 20 22 00 AA 49 40 24 2E 54 58 20 22 | "..I@$.TX "|
000029C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000029D0: 20 20 22 00 CB 49 42 24 2E 54 58 20 22 20 20 20 | "..IB$.TX " |
000029E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000029F0: 20 20 20 22 00 E8 49 44 24 2E 54 58 20 22 20 20 | "..ID$.TX " |
00002A00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002A10: 22 00 09 4A 46 24 2E 54 58 20 22 20 20 20 20 20 |"..JF$.TX " |
00002A20: 42 45 4E 5A 49 4E 45 20 4F 4C 49 45 20 20 20 20 |BENZINE OLIE |
00002A30: 20 22 00 26 4A 48 24 2E 54 58 20 22 20 20 20 20 | ".&JH$.TX " |
00002A40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00002A50: 47 4A 4A 24 2E 54 58 20 22 20 20 2E 20 20 56 4F |GJJ$.TX " . VO|
00002A60: 4C 54 20 20 41 4D 50 45 52 45 20 20 20 2E 20 22 |LT AMPERE . "|
00002A70: 00 64 4A 4C 24 2E 54 58 20 22 20 20 20 20 20 20 |.dJL$.TX " |
00002A80: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 85 4A | "..J|
00002A90: 4E 24 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 |N$.TX " |
00002AA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 A2 | "..|
00002AB0: 4A 50 24 2E 54 58 20 22 20 20 20 20 20 20 20 20 |JP$.TX " |
00002AC0: 20 20 20 20 20 20 20 20 20 20 22 00 C3 4A 52 24 | "..JR$|
00002AD0: 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 20 20 |.TX " |
00002AE0: 20 20 20 20 20 20 20 20 20 20 20 22 00 E0 4A 54 | "..JT|
00002AF0: 24 2E 54 58 20 22 20 20 20 20 20 20 20 20 20 20 |$.TX " |
00002B00: 20 20 20 20 20 20 20 20 22 00 F2 4A 56 24 44 41 | "..JV$DA|
00002B10: 54 20 2E 54 58 22 44 41 54 45 22 00 04 4B 58 24 |T .TX"DATE"..KX$|
00002B20: 54 59 44 20 2E 54 58 22 54 49 4D 45 22 00 13 4B |TYD .TX"TIME"..K|
00002B30: 5E 24 44 41 54 52 50 4D 20 4E 4F 50 00 2F 4B 68 |^$DATRPM NOP./Kh|
00002B40: 24 2E 42 59 20 30 2C 31 2C 31 2C 32 2C 33 2C 34 |$.BY 0,1,1,2,3,4|
00002B50: 2C 35 2C 36 2C 36 2C 37 00 41 4B 86 25 4E 4D 49 |,5,6,6,7.AK.%NMI|
00002B60: 20 4A 53 52 55 50 44 41 54 45 00 4D 4B 88 25 20 | JSRUPDATE.MK.% |
00002B70: 4C 44 41 23 36 33 00 59 4B 8A 25 20 53 54 41 54 |LDA#63.YK.% STAT|
00002B80: 49 44 00 6A 4B 8C 25 4E 4D 31 20 4C 44 41 49 4E |ID.jK.%NM1 LDAIN|
00002B90: 50 55 54 00 77 4B 8E 25 20 41 4E 44 23 24 32 30 |PUT.wK.% AND#$20|
00002BA0: 00 83 4B 90 25 20 42 45 51 4E 4D 31 00 92 4B 92 |..K.% BEQNM1..K.|
00002BB0: 25 2E 43 4F 20 55 50 44 41 54 45 00 00 00 |%.CO UPDATE... |
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 DA0RPM = $C800 ;TABEL RPM..!C
..EQ DA1RPM = $C900 ;TABEL RPM 2..!H..EQ
DRA = $DC00 ;OUT KEYBOARD.P!R..EQ DR
B = $DC01 ;IN KEYBOARD..!...EQ TIA
= $DF20 ;ADRES TIMER.."...EQ TID = $
DF40 ;DATA TIMER.="...EQ INPUT = $DF60
;INPUT SIGNALS._"...EQ DIP = $DFC0 ;D
IPSWITCH.."...EQ MATRIX = $EB81 ;DECODER
ING.."..;.."..; ROM MOET OP $A000 STARTE
N.."".;..",..WO START,NMI.."6..WO $C3C2,
$38CD,$FF31 ; CBM80.."@.;.."J.START N
OP.."T.;.!#^.; DISABLE IRQ'S 6522,1468
18.'#H.;.0#R. SEI.H#|.; LDA #
0.C#..; STA $911E.~#..;
STA $912E..#.. LDA#$FF; CLEAR..#..
STA$DC0D; 6526..#.. STA$DD0D; C-64.F#..
LDA#11.R#B. STATIA..#L. LDA#2..#V. STAT
ID..#..;..$..; INITIALISATIE VIC-20..$..
;.($..; JSR $FD8D.@$..;
JSR $FD52.X$..; JSR $E518.L$.. J
SR$FDA3; C-64..$&. JSR$FD50; C-64..$0. J
SR$FD15; C-64..$:. JSR$FF5B; C-64..$D.;
6522.J$N.; LDA #0..$X.;
STA $911C ; PCR 1..%B.; S
TA $912C ; PCR 2.9%L.; STA
$9112 ;DDRB 1.^%V.; STA $91
13 ;DDRA 1..%..; STA $9123
;DDRA 2..%..; LDA #$FF..%..
; STA $9122 ;DDRB 2.T%..;
LDX #4..%..;ST1 STA $9113,X
;TIMERS..&..; STA $9123,X.&&
..; DEX.<&F.; BNE ST1.B&
P.;.T&Z. LDA#0; IRQ -.I&.. STA$0314;VECT
OR.{&.. LDA#$90;####..&.. STA$0315..&..;
..&..; KLEUR KARAKTER & SCHERM..&..;..&
. LDX#0.I&*. LDA#1..&4.ST2 STA$D800,X; C
-64..&>. STA$D900,X; C-64..'H. STA$DA00,
X; C-64.$'R. STA$DB00,X; C-64.A'\.;ST2
STA $9600,X.^'F.; STA
$9700,X.G'P. INX.S'Z. BNEST2..'..;
LDA #27..'..; STA $960F
..'.. LDA#0.F'.. STA$D020; C-64.Z'.. STA
$D021; C-64..'.. STA$04..'.. LDA$D018..'
J. ORA#2..(T. STA$D018..(..;.'(..; OPBOU
W SCHERM.-(..;.:(.. LDX#240.U(..ST2A LDA
SCREEN1,X;####.E(.. STASCR-1,X.|(.. LDAS
CREEN2,X;####..($. STASCR+239,X..(.. LDA
SCREEN3,X;####..(8. STASCR+479,X.N(B. LD
ASCREEN4,X;####..(L. STASCR+719,X..(V. D
EX..(`. BNEST2A..(J.;..)T.; BEREKENING D
ATAVELDEN..)~.;.-)..DA0 STX$31.9).. STX$
32.E).. STX$33.Q).. STX$34.]).. STX$35.L
).. STXDA0KMD.{)D. STXDA1KMD..)..DA1 LDA
DIP..).. CMPDIP..).. BNEDA1..)..DA2 CMP#
40;CONVERT.J).. BCCDA3; DIP..).. SBC#40;
NAAR..).. INC$32; BCD..)(. BNEDA2..*2.DA
3 CMP#4..*<. BCCDA4..*F. SBC#4.)*P. INC$
31.5*Z. BNEDA3.A*D.DA4 TAX.M*N. LDA$32.V
*X. ASL._*.. ASL.H*.. ASL.Q*.. ASL.Z* .
CLC..*.. ADC$31..*.. STA$31; = CM...*..
TXA..*H. BEQDA4B..*.. LDA#0.H*.. SED;!!!
!.Q*.. CLC..*..DA4A ADC#$25..*.. DEX..*.
. BNEDA4A..+..DA4B STA$32;= 1/4CM..+,. I
NX.(+6.DA5 LDA$35.1+@. CLC.=+J. ADC$32.I
+T. STA$35.U+^. LDA$34.A+H. ADC$31.M+R.
STA$34..+|. STADA0KMD,X; LOW..+.. LDA$33
..+.. ADC#0..+.. STA$33..+.. STADA1KMD,X
; HIGH.F+.. INX.R+.. BNEDA5..+..; KM
H..+.. LDADA0KMD+36..,.. STADA0KMH+1..,.
. STA$31.!,.. LDADA1KMD+36.2,A. STADA1KM
H+1.>,B. STA$32.I,D. LDX#0.U,F. STX$33.A
,H. STX$34.M,J. STX$35.|,L. STXDA0KMH..,
N. STXDA1KMH..,P. LDX#2..,Q.DA6 CLC..,R.
LDA$33..,T. ADC$31.F,V. STA$33.R,X. LDA
$34..,Z. ADC$32..,.. STA$34..,.. AND#$F0
..-.. STADA0KMH,X; X,Y KM..-.. LDA$35.'-
.. ADC#0.3-.. STA$35.L-.. STADA1KMH,X; X
Y0 KM.X-.. LDA$34.E-.. AND#$0F.P-.. CMP#
5.|-.. BMIDA7..-.. LDADA0KMH,X..-.. CLC.
.-.. ADC#$10..-.. STADA0KMH,X.E-.. LDADA
1KMH,X.P-.. ADC#0..-.. STADA1KMH,X..-..D
A7 INX..-.. BNEDA6...0.; RPM...:. LD
X#0...D. STX$33.*.N. STX$34.9.X. STXDA0R
PM.B.B. INX.Q.L.DA8 LDA$33.Z.V. CLC.G...
ADC#$30.S... STA$33.... LDA$34..... AD
C#0..... STA$34..... LDY$33..... CPY#$50
...F. BMIDA9.D.P. CLC.O.Z. ADC#1.....DA9
STADA0RPM,X..... INX..... BNEDA8../.. C
LD../.. LDX#10.'/..DA9A LDADATRPM,X;####
.:/.. STADA1RPM-1,X.C/.. DEX.P/.. BNEDA9
A.V/..;.K/..; CLEAR $03-$100.Q/ .;.|/*.
LDX#3../4. LDA#0../>.CL1 STA$00,X../H. I
NX../R. BNECL1../\.;.G/F.; TEST CMOS-RAM
.M/P.;.Y/Z. LDA#13../.. STATIA;CLEAR../.
. LDATID;REG. D..0.. LDA#14..0.. STATIA.
"0.. LDATID./0.. CMP#$55.;0.. BNEST3.G0J
. LDA#15.S0T. STATIA._0.. LDATID.L0.. CM
P#$AA.X0.. BNEST3..0.. JMPST4;###. 0..;
ERROR: CLEAR ALL..0..ST3 LDX#80.J0..ST3
A LDASCREEN0,X;####.Z0$. STASCR-1,X..0..
DEX..08. BNEST3A..0B.;..1L. LDX#14..1V.
STXTIA..1`. LDA#$55.'1J. STATID.31T. LD
X#15.?1~. STXTIA.L1.. LDA#$AA.X1.. STATI
D.C1.. LDA#0.P1..ST3B INX.|1.. STXTIA..1
.. STATID..1D. CPX#$41..1N. BNEST3B..1X.
;.G1..; INSTELLEN TIJD EN TOT KM.M1..;..
1.. LDX#11; REG. B..1.. STXTIA..2.. LDA#
$82; STOP..2.. STATID; TIJD..2..;.*2(.
LDX#4; DATE.C22.ST3C LDADAT-1,X;####.U2<
. STASCR+119,X.^2F. DEX.K2P. BNEST3C.Q2Z
.;..2D. LDA#<(SCR+125);DAG..2N. STA$02..
2X. LDA#>(SCR+125)..2.. STA$03.H2.. JSRI
NSTEL;###.S2.. LDX#7..2 . STXTIA..2.. ST
ATID..2..;..3.. LDA#<(SCR+130);MINUUT..3
H. STA$02.,3R. LDA#>(SCR+130).83.. STA$0
3.K3.. JSRINSTEL;###.V3.. LDX#8.B3.. STX
TIA.N3.. STATID.T3..;..3.. LDA#<(SCR+135
);JAAR..3". STA$02..3,. LDA#>(SCR+135)..
36. STA$03.L3@. JSRINSTEL;###.W3J. LDX#9
..3T. STXTIA..3^. STATID..3H.;..4R. LDX#
4; TIME..4|.ST3D LDATYD-1,X;####.14.. ST
ASCR+119,X.:4.. DEX.G4.. BNEST3D.M4..;.`
4.. LDA#0;SECONDE.L4.. STATIA.X4B. STATI
D..4L. LDA#$30..4V. STASCR+135;81..4.. S
TASCR+136;82..4.. LDA#$20.H4.. STASCR+12
5.X4.. STASCR+126..4.. STASCR+130..4.. S
TASCR+131..4..;..5&. LDA#<(SCR+125);UUR.
"50. STA$02.65:. LDA#>(SCR+125).B5D. STA
$03.U5N. JSRINSTEL;###.`5X. LDX#4.L5B. S
TXTIA.X5L. STATID.~5V.;..5.. LDA#<(SCR+1
30);MINUUT..5.. STA$02..5.. LDA#>(SCR+13
0).E5.. STA$03.X5.. JSRINSTEL;###..5.. L
DX#2..5.. STXTIA..5F. STATID..6P.;..6Z.
LDX#4; VEEG.#6..ST3E LDA#$20.56.. STASCR
+119,X.>6.. DEX.K6.. BNEST3E.Q6..;.E6..
LDA#11; REG. B.Q6 . STATIA..6*. LDX#2; S
TART..64. STXTID; TIJD..6>.; KILOMETE
RS TOTAAL..6H. LDX#0.W6R. LDA#<(SCR+607)
; XX......6\. STA$02..6F. LDA#>(SCR+607)
..7P. STA$03..7Z. JSRINSTEL;###.$7.. STA
$10,X.-7.. INX.@7.. INC$02;..XX...L7.. I
NC$02._7.. JSRINSTEL;###.M7.. STA$10,X.V
7.. INX..7J. INC$02;....XX..7T. INC$02;.
...XX..7.. JSRINSTEL;###..7.. STA$10,X.P
7.. JSRUPDATE;###.V7..;..7..; DISPLAY VW
-TRIKE COMPUTER..7..;..8..ST4 LDX#80.&8$
.ST4A LDASCREEN1,X;####.68.. STASCR-1,X.
?88. DEX.L8B. BNEST4A.R8L.;.J8V.; ENABLE
IRQ 146818.P8`.;..8J. LDX#12; REG. C..8
T. STXTIA..8~. LDATID;CLR IRQ..8.. DEX;
REG. B.A8.. STXTIA.N8.. LDA#$12..8.. STA
TID;ENA IRQ..8..;..9..; INITIALISATIE KM
/H, RPM STATUS..9D.;.#9N.KRS LDX#$FF.19X
. LDAINPUT.<9.. AND#2.I9.. BNEKRS1.U9..
STA$0E.A9...BY $2C.Q9..KRS1 STX$0E.9..
LDAINPUT..9.. AND#8..9(. BNEKRS2..92. ST
A$0D..9<..BY $2C..9F.KRS2 STX$0D.E9P.;..
9Z.; $$$ GROTE LUS $$$..9D.;..9N.; SNE
LHEID..9X.;..:..KMH CLI..:.. LDAINPUT..:
.. AND#2.,:.. STATEMP.:: . LDAINPUT.E:..
AND#2.X:.. CMPTEMP; ANTI.K:.. BNEKMH;DE
NDER.X:H. LDATEMP..:R. BEQKMH1..:.. LDA$
0E;KM=1..:.. BNERPM..:.. DEC$0E;KM<>KMS.
B:.. BNERPM.W:..KMH1 LDA$0E;KM=0..:.. BE
QRPM..:.. INC$0E;KM<>KMS..;". INC$0C..;,
.RPM LDAINPUT..;6. AND#4.,;@. STATEMP.:;
J. LDAINPUT.E;T. AND#4.X;^. CMPTEMP; ANT
I.K;H. BNERPM;DENDER.X;R. LDATEMP..;|. B
EQRPM1..;.. LDA$0D;RPM=1..;.. BNEKEY..;.
. DEC$0D..;.. BNEKEY.K;..RPM1 LDA$0D.W;.
. BEQKEY..;B. INC$0D..;L. INC$0F..<V.KEY
JSRKEYB;####..<.. LDATOETS..<.. CMP#$FF
.+<.. BEQKMH.8<.. STATEMP.I<..KEY1 JSRKE
YB.V<.. LDATEMP.D<.. CMPTOETS.Q<&. BEQKE
Y1..<0. AND#$0F;&&&&..<D. CMP#7; DAG/..<
N. BNETRIP; NACHT..<X. LDASTATUS.D<B. EO
R#$80.S<L. STASTATUS..<V. BMIDN1..<.. LD
A#0..<...BY $2C..=..DN1 LDA#1..=.. STA$D
020. =.. STA$D021./=.. LDASTATUS.;=F. BM
IDN2.F=P. LDA#1.R=Z..BY $2C.`=..DN2 LDA#
0.K=.. LDX#0..=..KE1 STA$D800,X; C-64..=
.. STA$D900,X; C-64..=.. STA$DA00,X; C-6
4.F=.. STA$DB00,X; C-64.O= . INX..=*. BN
EKE1..=4.KE2 JMPKMH;####..>>.TRIP CMP#8;
TRIP ?..>H. BNETRME.!>R. LDASTATUS..>\.
EOR#$08.=>F. STASTATUS.H>P. LDX#0.T>Z. B
EQKE2.K>..TRME CMP#9;METERS?.X>.. BNERAL
L..>.. LDASTATUS..>.. EOR#$20..>.. STAST
ATUS..>.. LDX#0..>.. BEQKE2.Q>J.RALL CMP
#5;RALLEY?..>T. BNERAME..>.. LDASTATUS..
>.. EOR#$10..?.. STASTATUS..?.. LDX#0. ?
.. BEQKE2.7?..RAME CMP#6;METERS?.D?.. BN
EREST.S?$. LDASTATUS.`?.. EOR#$40.O?8. S
TASTATUS.~?B.REST LDX#0..?L. BEQKE2..?(#
;..?*#;..?,#KEYB LDY#$40..?.# STYTOETS..
?0# LDA#0.L?2# STADRA.X?4# LDXDRB..?6# C
PX#$FF..?8# BEQKEND..?:# TAY..@<# LDA#$F
E..@>#K1 STADRA.!@@# LDX#8.*@B# PHA.8@D#
K2 LDADRB.D@F# CMPDRB.O@H# BNEK2.Z@J#K3
LSR.L@L# BCSK4;1=NIET.Z@N# STYTOETS..@R#
K4 INY..@T# CPY#$41..@V# BCSKEN..@X# DEX
..@Z# BNEK3..@\# SEC.D@^# PLA.M@`# ROL.X
@B# BNEK1..@D#KEN PLA..@F#KEND LDYTOETS.
.AH# LDAMATRIX,Y..AJ# STATOETS..AL# RTS.
1AN#INSTEL LDA#$A0.<AP# LDY#0.LAR# STA($
02),Y.`AT#IN1 JSRKEYB;###.NAV# LDATOETS.
{AX# CMP#$FF..AZ# BEQIN1..A|# STATEMP..A
~#IN1A JSRKEYB;###..A.# LDATEMP.DA.# CMP
TOETS.QA.# BEQIN1A..A.# LDY#0..A.# AND#$
0F..A.# CMP#10; >9 ?..B.# BPLINSTEL..B.#
CLC. B.# ADC#$30.0B.# STA($02),Y.9B.# A
SL.BB.# ASL.KB.# ASL.TB.# ASL.AB.# STATE
MP.QB.#IN2 LDA#$A0.|B # LDY#1..B.# STA($
02),Y. B.#IN3 JSRKEYB;###..B.# LDATOETS.
.B.# CMP#$FF.GB.# BEQIN3.TB.# STATEMP..B
.#IN4 JSRKEYB..B.# LDATEMP..B.# CMPTOETS
..C.# BEQIN4..C.# LDY#1.#C.# AND#$0F.5C.
# CMP#10; >9 ?.AC.# BPLIN2.JC.# CLC.WC.#
ADC#$30.GCB# STA($02),Y.TCD# AND#$0F.}C
F# CLC..CH# ADCTEMP..CJ# RTS..CL#;..CN#U
PDATE LDX#$10..CP#UP1 STXTIA.ICR# LDA$00
,X.UCT# STATID..CV# INX..CX# CPX#$30..CZ
# BNEUP1..D.# RTS..D.#;..D.#SCREEN0 NOP.
7D.#.TX " ERROR FOUND IN ".TD.#.TX
" ".UD.#.TX " CM
OS-RAM "..D.#.TX "
"..D.#SCREEN1 NOP.CD.#.TX " VW-T
RIKE "..D.#.TX "
"..E.#.TX " COMPUTER "..E.#.
TX " ".?E.#.TX "
".\E.#.TX "
".}E.#.TX " : - "..
E.#.TX " "..E.#.TX "
".XE.#.TX "
"..E.$.TX "
"..F.$.TX " ".&F.$SCRE
EN2 NOP.GF.$.TX "GGGGGGGGGGGGGGGGG "
.DF.$.TX " "..F.$.TX "
G G G KM/H"..F.$.TX "
".CF.$.TX " 50 100 150
"..F.$.TX " "..G.$.T
X " "..G.$.TX "
".?G.$.TX "
".\G.$.TX " ".}G
.$.TX "GGGGGGGGGGGGGGGGG 00"..G.$.TX "
"..G.$SCREEN3 NOP.KG $
.TX " G G G TPM"..G"$.TX "
"..H$$.TX " 20 40
60 *100".&H&$.TX " ".
GH($.TX " ".DH*$.TX
" "..H,$.TX "TOTAAL
"..H.$.TX "
".CH0$.TX " "..H2
$.TX " "..I4$.TX "TRIP
. "..I6$.TX "
".?I8$.TX " "
.\I:$.TX " ".LI<$SCREEN
4 NOP..I>$.TX "RALLEY . "..
I@$.TX " ".KIB$.TX "
"..ID$.TX "
"..JF$.TX " BENZINE OLIE
".&JH$.TX " ".GJJ$.TX
" . VOLT AMPERE . ".DJL$.TX "
"..JN$.TX "
"..JP$.TX " ".CJR$
.TX " "..JT$.TX "
"..JV$DAT .TX"DATE"..KX$
TYD .TX"TIME"..K^$DATRPM NOP./KH$.BY 0,1
,1,2,3,4,5,6,6,7.AK.%NMI JSRUPDATE.MK.%
LDA#63.YK.% STATID.JK.%NM1 LDAINPUT.WK.%
AND#$20..K.% BEQNM1..K.%.CO UPDATE...
> CLICK IMAGE PREVIEW FOR FULL MODAL