> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 AA 0A 00 3B 00 14 00 3B 53 2F 49 4E 54 55 |.....;...;S/INTU|
00000010: 52 35 2F 38 00 1E 00 3B 00 28 00 B8 24 37 30 30 |R5/8...;.(..$700|
00000020: 30 00 32 00 53 54 41 52 54 20 BF 00 3C 00 95 53 |0.2.START ..<..S|
00000030: 54 59 52 00 46 00 3B 00 50 00 3B 20 2A 2A 2A 20 |TYR.F.;.P.; *** |
00000040: 56 41 52 49 41 42 4C 45 52 20 2A 2A 2A 00 5A 00 |VARIABLER ***.Z.|
00000050: 3B 00 64 00 55 52 20 C0 24 44 43 30 38 00 6E 00 |;.d.UR .$DC08.n.|
00000060: 49 52 51 56 45 43 20 C0 24 30 33 31 34 00 78 00 |IRQVEC .$0314.x.|
00000070: 43 48 52 4F 55 54 20 C0 24 46 46 44 32 20 3B 41 |CHROUT .$FFD2 ;A|
00000080: 00 82 00 49 4E 50 55 54 20 C0 24 41 42 46 39 20 |...INPUT .$ABF9 |
00000090: 3B 42 55 46 46 45 52 00 8C 00 50 4F 53 20 C0 24 |;BUFFER...POS .$|
000000A0: 30 34 31 41 2B 34 00 96 00 42 55 46 46 45 52 20 |041A+4...BUFFER |
000000B0: C0 24 30 32 30 30 00 A0 00 47 45 4D 31 20 B9 35 |.$0200...GEM1 .5|
000000C0: 2C 30 00 AA 00 54 45 58 54 20 C1 2F 74 74 6D 6D |,0...TEXT ./ttmm|
000000D0: 73 73 20 3A 20 6B 6C 6F 6B 6B 65 6E 2F 00 B4 00 |ss : klokken/...|
000000E0: BA 31 33 2C 30 2C 30 2C 30 00 BE 00 4F 4C 44 49 |.13,0,0,0...OLDI|
000000F0: 52 51 20 B9 32 2C 30 00 C8 00 46 4C 41 47 20 B9 |RQ .2,0...FLAG .|
00000100: 32 2C 30 00 D2 00 3B 00 DC 00 3B 20 2A 2A 2A 2A |2,0...;...; ****|
00000110: 20 53 54 59 52 20 2A 2A 2A 2A 00 E6 00 3B 00 F0 | STYR ****...;..|
00000120: 00 53 54 59 52 20 96 4F 50 53 54 41 52 54 00 FA |.STYR .OPSTART..|
00000130: 00 96 53 45 54 55 52 00 04 01 96 49 52 51 00 0E |..SETUR....IRQ..|
00000140: 01 85 23 24 30 30 00 18 01 92 23 24 30 41 00 22 |..#$00....#$0A."|
00000150: 01 84 31 39 38 00 2C 01 53 54 59 52 48 4F 50 20 |..198.,.STYRHOP |
00000160: 84 42 55 46 46 45 52 E3 00 36 01 A2 00 40 01 B0 |.BUFFER..6...@..|
00000170: 53 54 59 52 48 4F 50 00 4A 01 9F 00 54 01 53 54 |STYRHOP.J...T.ST|
00000180: 59 52 4C 4F 4F 50 20 96 52 45 41 44 00 5E 01 96 |YRLOOP .READ.^..|
00000190: 41 4D 50 4D 00 68 01 96 4F 4D 44 41 4E 00 72 01 |AMPM.h..OMDAN.r.|
000001A0: 95 24 45 41 33 31 00 7C 01 B7 53 54 59 52 4C 4F |.$EA31.|..STYRLO|
000001B0: 4F 50 00 86 01 9F 00 90 01 3B 20 4A 4D 50 20 53 |OP.......; JMP S|
000001C0: 54 59 52 4C 4F 4F 50 00 9A 01 3B 00 A4 01 3B 20 |TYRLOOP...;...; |
000001D0: 2A 2A 2A 20 4F 50 53 54 41 52 54 20 2A 2A 2A 00 |*** OPSTART ***.|
000001E0: AE 01 3B 00 B8 01 4F 50 53 54 41 52 54 20 85 55 |..;...OPSTART .U|
000001F0: 52 2B 36 20 3B 20 35 30 20 48 5A 00 C2 01 80 23 |R+6 ; 50 HZ....#|
00000200: 31 32 38 20 3B 20 2D 2D 2D 2D 2D 00 CC 01 84 55 |128 ; -----....U|
00000210: 52 2B 36 20 3B 20 2D 2D 2D 2D 2D 00 D6 01 3B 00 |R+6 ; -----...;.|
00000220: E0 01 92 23 24 30 30 00 EA 01 53 54 41 52 54 4C |...#$00...STARTL|
00000230: 4F 4F 31 20 85 54 45 58 54 E3 00 F4 01 96 43 48 |OO1 .TEXT.....CH|
00000240: 52 4F 55 54 00 FE 01 AA 00 08 02 86 23 24 30 30 |ROUT........#$00|
00000250: 00 12 02 B6 53 54 41 52 54 4C 4F 4F 31 00 1C 02 |....STARTLOO1...|
00000260: 96 49 4E 50 55 54 00 26 02 9F 00 30 02 3B 00 3A |.INPUT.&...0.;.:|
00000270: 02 3B 20 2A 2A 2A 2A 20 52 45 41 44 20 2A 2A 2A |.; **** READ ***|
00000280: 2A 00 44 02 3B 00 4E 02 52 45 41 44 20 92 23 24 |*.D.;.N.READ .#$|
00000290: 30 33 00 58 02 52 45 41 44 4C 4F 4F 50 20 85 55 |03.X.READLOOP .U|
000002A0: 52 E3 00 62 02 84 47 45 4D 31 E3 00 6C 02 A2 00 |R..b..GEM1..l...|
000002B0: 76 02 B0 52 45 41 44 4C 4F 4F 50 00 80 02 95 41 |v..READLOOP....A|
000002C0: 4D 50 4D 00 8A 02 3B 00 94 02 3B 20 2A 2A 2A 20 |MPM...;...; *** |
000002D0: 4F 4D 44 41 4E 2E 20 2A 2A 2A 00 9E 02 3B 00 A8 |OMDAN. ***...;..|
000002E0: 02 4F 4D 44 41 4E 20 8D 23 24 30 30 00 B2 02 92 |.OMDAN .#$00....|
000002F0: 23 24 30 33 00 BC 02 85 23 31 34 00 C6 02 96 52 |#$03....#14....R|
00000300: 56 53 00 D0 02 4F 4D 44 41 4E 4C 4F 4F 50 20 85 |VS...OMDANLOOP .|
00000310: 47 45 4D 31 E3 00 DA 02 9D 00 E4 02 81 23 32 34 |GEM1.........#24|
00000320: 30 00 EE 02 8A 00 F8 02 8A 00 02 03 8A 00 0C 03 |0...............|
00000330: 8A 00 16 03 96 52 56 53 00 20 03 A0 00 2A 03 81 |.....RVS. ...*..|
00000340: 23 31 35 00 34 03 96 52 56 53 00 3E 03 85 23 31 |#15.4..RVS.>..#1|
00000350: 30 00 48 03 96 52 56 53 00 52 03 A2 00 5C 03 3B |0.H..RVS.R...\.;|
00000360: 20 20 20 20 20 20 20 20 20 20 43 50 59 20 23 24 | CPY #$|
00000370: 30 31 00 66 03 B6 4F 4D 44 41 4E 4C 4F 4F 50 00 |01.f..OMDANLOOP.|
00000380: 70 03 85 23 31 32 00 7A 03 AB 00 84 03 96 52 56 |p..#12.z......RV|
00000390: 53 00 8E 03 95 28 4F 4C 44 49 52 51 29 00 98 03 |S....(OLDIRQ)...|
000003A0: 3B 00 A2 03 52 56 53 20 99 00 AC 03 83 23 34 38 |;...RVS .....#48|
000003B0: 2B 31 32 38 00 B6 03 84 50 4F 53 E2 00 C0 03 AD |+128....POS.....|
000003C0: 00 CA 03 9F 00 D4 03 3B 00 DE 03 3B 20 2A 2A 2A |.......;...; ***|
000003D0: 20 53 45 54 55 52 20 2A 2A 2A 00 E8 03 3B 00 F2 | SETUR ***...;..|
000003E0: 03 53 45 54 55 52 20 85 42 55 46 46 45 52 00 FC |.SETUR .BUFFER..|
000003F0: 03 86 23 24 30 30 00 06 04 B6 55 52 53 45 54 00 |..#$00....URSET.|
00000400: 10 04 9F 00 1A 04 55 52 53 45 54 20 8D 23 24 30 |......URSET .#$0|
00000410: 30 00 24 04 92 23 24 30 30 00 2E 04 8D 23 24 30 |0.$..#$00....#$0|
00000420: 30 00 38 04 4D 49 4E 4C 4F 4F 50 20 85 42 55 46 |0.8.MINLOOP .BUF|
00000430: 46 45 52 E3 00 42 04 9B 00 4C 04 87 23 24 33 30 |FER..B...L..#$30|
00000440: 00 56 04 99 00 60 04 89 00 6A 04 89 00 74 04 89 |.V...`...j...t..|
00000450: 00 7E 04 89 00 88 04 84 24 46 46 00 92 04 AA 00 |.~......$FF.....|
00000460: 9C 04 85 42 55 46 46 45 52 E3 00 A6 04 9B 00 B0 |...BUFFER.......|
00000470: 04 87 23 24 33 30 00 BA 04 99 00 C4 04 83 24 46 |..#$30........$F|
00000480: 46 00 CE 04 84 47 45 4D 31 E2 00 D8 04 AD 00 E2 |F....GEM1.......|
00000490: 04 AA 00 EC 04 93 23 24 30 38 00 F6 04 B6 4D 49 |......#$08....MI|
000004A0: 4E 4C 4F 4F 50 00 00 05 96 41 50 53 45 54 00 0A |NLOOP....APSET..|
000004B0: 05 3B 00 14 05 3B 20 2A 2A 2A 20 53 54 4F 52 45 |.;...; *** STORE|
000004C0: 20 44 41 54 41 20 2A 2A 2A 00 1E 05 3B 00 28 05 | DATA ***...;.(.|
000004D0: 85 47 45 4D 31 00 32 05 84 55 52 2B 33 00 3C 05 |.GEM1.2..UR+3.<.|
000004E0: 85 47 45 4D 31 2B 31 00 46 05 84 55 52 2B 32 00 |.GEM1+1.F..UR+2.|
000004F0: 50 05 85 47 45 4D 31 2B 32 00 5A 05 84 55 52 2B |P..GEM1+2.Z..UR+|
00000500: 31 00 64 05 85 23 24 30 30 00 6E 05 84 55 52 00 |1.d..#$00.n..UR.|
00000510: 78 05 9F 00 82 05 3B 00 8C 05 3B 20 2A 2A 2A 20 |x.....;...; *** |
00000520: 41 4D 20 50 4D 20 2A 2A 2A 00 96 05 3B 00 A0 05 |AM PM ***...;...|
00000530: 41 4D 50 4D 20 AF 00 AA 05 85 47 45 4D 31 2B 33 |AMPM .....GEM1+3|
00000540: 00 B4 05 86 23 24 31 32 00 BE 05 B6 52 45 47 4E |....#$12....REGN|
00000550: 0A 05 3B 3E 3C 00 C8 05 85 23 24 30 30 00 D2 05 |..;><....#$00...|
00000560: 95 53 4C 55 54 00 DC 05 52 45 47 4E 20 86 23 24 |.SLUT...REGN .#$|
00000570: 39 32 00 E6 05 B6 52 45 47 4E 31 0A 04 3B 3E 3C |92....REGN1..;><|
00000580: 00 F0 05 81 23 24 37 46 00 FA 05 95 53 4C 55 54 |....#$7F....SLUT|
00000590: 00 04 06 52 45 47 4E 31 20 B0 53 4C 55 54 00 0E |...REGN1 .SLUT..|
000005A0: 06 81 23 24 37 46 00 18 06 99 00 22 06 83 23 24 |..#$7F....."..#$|
000005B0: 31 32 00 2C 06 53 4C 55 54 20 84 47 45 4D 31 2B |12.,.SLUT .GEM1+|
000005C0: 33 00 36 06 AC 00 40 06 95 4F 4D 44 41 4E 00 4A |3.6...@..OMDAN.J|
000005D0: 06 3B 20 2A 2A 2A 20 45 4E 44 20 41 4D 50 4D 20 |.; *** END AMPM |
000005E0: 2A 2A 2A 00 54 06 3B 00 5E 06 3B 20 2A 2A 2A 20 |***.T.;.^.; *** |
000005F0: 53 45 54 20 41 4D 50 4D 20 2A 2A 2A 00 68 06 3B |SET AMPM ***.h.;|
00000600: 00 72 06 41 50 53 45 54 20 AF 00 7C 06 85 47 45 |.r.APSET ..|..GE|
00000610: 4D 31 00 86 06 9B 00 90 06 87 23 24 31 33 00 9A |M1........#$13..|
00000620: 06 B1 53 4C 55 54 53 45 54 00 A4 06 85 47 45 4D |..SLUTSET....GEM|
00000630: 31 00 AE 06 9B 00 B8 06 87 23 24 31 32 00 C2 06 |1........#$12...|
00000640: 80 23 24 38 30 00 CC 06 48 4F 50 53 45 54 20 84 |.#$80...HOPSET .|
00000650: 47 45 4D 31 00 D6 06 95 53 4C 55 54 53 45 54 00 |GEM1....SLUTSET.|
00000660: E0 06 41 53 45 54 20 85 47 45 4D 31 00 EA 06 53 |..ASET .GEM1...S|
00000670: 4C 55 54 53 45 54 20 AC 00 F4 06 9F 00 FE 06 3B |LUTSET ........;|
00000680: 00 08 07 3B 20 2A 2A 2A 20 49 52 51 20 2A 2A 2A |...; *** IRQ ***|
00000690: 00 12 07 3B 00 1C 07 49 52 51 20 A1 00 26 07 92 |...;...IRQ ..&..|
000006A0: 49 52 51 56 45 43 00 30 07 8D 49 52 51 56 45 43 |IRQVEC.0..IRQVEC|
000006B0: 2B 31 00 3A 07 91 4F 4C 44 49 52 51 00 44 07 8C |+1.:..OLDIRQ.D..|
000006C0: 4F 4C 44 49 52 51 2B 31 00 4E 07 92 23 43 48 45 |OLDIRQ+1.N..#CHE|
000006D0: 4B 00 58 07 8D 5E 43 48 45 4B 00 62 07 91 49 52 |K.X..^CHEK.b..IR|
000006E0: 51 56 45 43 00 6C 07 8C 49 52 51 56 45 43 2B 31 |QVEC.l..IRQVEC+1|
000006F0: 00 76 07 9E 00 80 07 9F 00 8A 07 43 48 45 4B 20 |.v.........CHEK |
00000700: 8E 46 4C 41 47 2B 31 00 94 07 B0 4F 4B 00 9E 07 |.FLAG+1....OK...|
00000710: 85 23 24 31 30 00 A8 07 84 46 4C 41 47 2B 31 00 |.#$10....FLAG+1.|
00000720: B2 07 85 24 44 32 00 BC 07 86 23 24 30 34 00 C6 |...$D2....#$04..|
00000730: 07 B6 43 53 4C 55 54 0A 03 3B 52 45 41 44 00 D0 |..CSLUT..;READ..|
00000740: 07 85 24 44 31 00 DA 07 86 23 38 30 00 E4 07 B5 |..$D1....#80....|
00000750: 43 53 4C 55 54 0A 03 3B 52 45 41 44 00 EE 07 85 |CSLUT..;READ....|
00000760: 46 4C 41 47 00 F8 07 B6 4F 4B 00 02 08 92 23 24 |FLAG....OK....#$|
00000770: 30 43 2D 33 00 0C 08 85 23 24 32 30 00 16 08 43 |0C-3....#$20...C|
00000780: 4C 4F 4F 50 20 84 50 4F 53 E3 00 20 08 A2 00 2A |LOOP .POS.. ...*|
00000790: 08 B0 43 4C 4F 4F 50 00 34 08 85 23 24 30 31 00 |..CLOOP.4..#$01.|
000007A0: 3E 08 84 46 4C 41 47 00 48 08 4F 4B 20 95 28 4F |>..FLAG.H.OK .(O|
000007B0: 4C 44 49 52 51 29 00 52 08 43 53 4C 55 54 20 85 |LDIRQ).R.CSLUT .|
000007C0: 23 24 30 30 00 5C 08 84 46 4C 41 47 00 66 08 95 |#$00.\..FLAG.f..|
000007D0: 52 45 41 44 00 FF FF |READ... |
.....;...;S/INTUR5/8...;.(..$7000.2.STAR
T ..<..STYR.F.;.P.; *** VARIABLER ***.Z.
;.D.UR .$DC08.N.IRQVEC .$0314.X.CHROUT .
$FFD2 ;A...INPUT .$ABF9 ;BUFFER...POS .$
041A+4...BUFFER .$0200. .GEM1 .5,0...TEX
T A/TTMMSS : KLOKKEN/....13,0,0,0...OLDI
RQ .2,0.H.FLAG .2,0.R.;...; **** STYR **
**...;...STYR .OPSTART....SETUR....IRQ..
..#$00....#$0A."..198.,.STYRHOP .BUFFER.
.6...@..STYRHOP.J...T.STYRLOOP .READ.^..
AMPM.H..OMDAN.R..$EA31.|..STYRLOOP......
.; JMP STYRLOOP...;...; *** OPSTART ***.
..;...OPSTART .UR+6 ; 50 HZ.B..#128 ; --
---.L..UR+6 ; -----.V.;....#$00...STARTL
OO1 .TEXT.....CHROUT........#$00....STAR
TLOO1....INPUT.&...0.;.:.; **** READ ***
*.D.;.N.READ .#$03.X.READLOOP .UR..B..GE
M1..L...V..READLOOP....AMPM...;...; ***
OMDAN. ***...;...OMDAN .#$00....#$03....
#14.F..RVS.P.OMDANLOOP .GEM1..Z......#24
0....................RVS. . .*..#15.4..R
VS.>..#10.H..RVS.R...\.; CPY #$
01.F..OMDANLOOP.P..#12.Z......RVS....(OL
DIRQ)...;...RVS .....#48+128....POS.....
.J...T.;...; *** SETUR ***...;...SETUR .
BUFFER....#$00....URSET.......URSET .#$0
0.$..#$00....#$00.8.MINLOOP .BUFFER..B..
.L..#$30.V...`...J...T...~......$FF.....
...BUFFER.........#$30.....D..$FF.N..GEM
1..X..........#$08....MINLOOP....APSET..
.;...; *** STORE DATA ***...;.(..GEM1.2.
.UR+3.<..GEM1+1.F..UR+2.P..GEM1+2.Z..UR+
1.D..#$00.N..UR.X.....;...; *** AM PM **
*...;. .AMPM .....GEM1+3....#$12....REGN
..;><.H..#$00.R..SLUT...REGN .#$92....RE
GN1..;><....#$7F....SLUT...REGN1 .SLUT..
..#$7F....."..#$12.,.SLUT .GEM1+3.6...@.
.OMDAN.J.; *** END AMPM ***.T.;.^.; ***
SET AMPM ***.H.;.R.APSET ..|..GEM1......
..#$13....SLUTSET....GEM1........#$12.B.
.#$80.L.HOPSET .GEM1.V..SLUTSET...ASET .
GEM1...SLUTSET ........;...; *** IRQ ***
...;...IRQ ..&..IRQVEC.0..IRQVEC+1.:..OL
DIRQ.D..OLDIRQ+1.N..#CHEK.X..^CHEK.B..IR
QVEC.L..IRQVEC+1.V.........CHEK .FLAG+1.
...OK....#$10....FLAG+1....$D2....#$04.F
..CSLUT..;READ.P..$D1.Z..#80....CSLUT..;
READ....FLAG....OK....#$0C-3....#$20...C
LOOP .POS.. ...*..CLOOP.4..#$01.>..FLAG.
H.OK .(OLDIRQ).R.CSLUT .#$00.\..FLAG.F..
READ...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL