dos33fsprogs/interlace_demo/interlace.s

3633 lines
46 KiB
ArmAsm
Raw Normal View History

2019-06-06 05:02:08 +00:00
; Display a 40x48d lo-res image
; Uses the 40x48d page1/page2 every-1-scanline pageflip mode
; by deater (Vince Weaver) <vince@deater.net>
; Zero Page
FRAMEBUFFER = $00 ; $00 - $0F
YPOS = $10
YPOS_SIN = $11
CH = $24
CV = $25
GBASL = $26
GBASH = $27
BASL = $28
BASH = $29
FRAME = $60
BLARGH = $69
DRAW_PAGE = $EE
LASTKEY = $F1
PADDLE_STATUS = $F2
TEMP = $FA
WHICH = $FB
2019-06-07 01:55:21 +00:00
2019-06-06 05:02:08 +00:00
; Soft Switches
KEYPRESS= $C000
KEYRESET= $C010
SET_GR = $C050 ; Enable graphics
FULLGR = $C052 ; Full screen, no text
PAGE0 = $C054 ; Page0
PAGE1 = $C055 ; Page1
LORES = $C056 ; Enable LORES graphics
PADDLE_BUTTON0 = $C061
PADDL0 = $C064
PTRIG = $C070
; ROM routines
TEXT = $FB36 ;; Set text mode
HOME = $FC58 ;; Clear the text screen
WAIT = $FCA8 ;; delay 1/2(26+27A+5A^2) us
MAX = 1
lda #$ff
sta WHICH
start_over:
inc WHICH
lda WHICH
cmp #MAX
bne in_range
lda #0
sta WHICH
in_range:
;===================
; init screen
jsr TEXT
jsr HOME
bit KEYRESET
;===================
; init vars
lda #0
sta DRAW_PAGE
;=============================
; Load graphic page0
lda #$0c
sta BASH
lda #$00
sta BASL ; load image to $c00
lda WHICH
asl
asl ; which*4
tay
lda pictures,Y
sta GBASL
lda pictures+1,Y
sta GBASH
jsr load_rle_gr
lda #4
sta DRAW_PAGE
jsr gr_copy_to_current ; copy to page1
; GR part
bit PAGE1
bit LORES ; 4
bit SET_GR ; 4
bit FULLGR ; 4
jsr wait_until_keypressed
;=============================
; Load graphic page1
lda #$0c
sta BASH
lda #$00
sta BASL ; load image to $c00
lda WHICH
asl
asl ; which*4
tay
lda pictures+2,Y
sta GBASL
lda pictures+3,Y
sta GBASH
jsr load_rle_gr
lda #0
sta DRAW_PAGE
jsr gr_copy_to_current
; GR part
bit PAGE0
jsr wait_until_keypressed
;==============================
; setup graphics for vapor lock
;==============================
jsr vapor_lock
; vapor lock returns with us at beginning of hsync in line
; 114 (7410 cycles), so with 5070 lines to go
2019-06-06 05:02:08 +00:00
; GR part
bit LORES ; 4
bit SET_GR ; 4
bit FULLGR ; 4
jsr gr_copy_to_current ; 6+ 9292
2019-06-06 05:02:08 +00:00
; 5070 + 4550 = 9620
; 9292
; 12
; 6
; ====
; 310
2019-06-06 05:02:08 +00:00
; - 3 for jmp
; 307
2019-06-06 05:02:08 +00:00
; Try X=9 Y=6 cycles=307
2019-06-06 05:02:08 +00:00
ldy #6 ; 2
loopA: ldx #9 ; 2
loopB: dex ; 2
bne loopB ; 2nt/3
dey ; 2
bne loopA ; 2nt/3
jmp display_loop ; 3
.align $100
2019-06-06 05:02:08 +00:00
;================================================
; Display Loop
;================================================
; each scan line 65 cycles
; 1 cycle each byte (40cycles) + 25 for horizontal
; Total of 12480 cycles to draw screen
; Vertical blank = 4550 cycles (70 scan lines)
; Total of 17030 cycles to get back to where was
; We want to alternate between page1 and page2 every 65 cycles
; vblank = 4550 cycles to do scrolling
; want colors 01234567
; line 0: $X0 to $800
; line 1: $X1 to $400
; line 2: $X2
; line 3: $X3
; line 4: $4X
; line 5: $5X
; line 6: $6X
; line 7: $7X
2019-06-06 05:02:08 +00:00
display_loop:
2019-06-07 01:55:21 +00:00
; UNROLL 96 TIMES! ARE WE MAD? YES!
2019-06-11 00:49:01 +00:00
;=========
; 0(0) = $400
2019-06-07 01:55:21 +00:00
; 65 cycles total
bit PAGE0 ; 4
lda #$0b ; 2
sta $800 ; 4
sta $801 ; 4
sta $802 ; 4
sta $803 ; 4
sta $804 ; 4
sta $805 ; 4
sta $806 ; 4
sta $807 ; 4
sta $808 ; 4
sta $809 ; 4
sta $80a ; 4
sta $80b ; 4
sta $80c ; 4
sta $80d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
; 65 cycles
bit PAGE1 ; 4
lda #$0f ; 2
sta $400 ; 4
sta $401 ; 4
sta $402 ; 4
sta $403 ; 4
sta $404 ; 4
sta $405 ; 4
sta $406 ; 4
sta $407 ; 4
sta $408 ; 4
sta $409 ; 4
sta $40a ; 4
sta $40b ; 4
sta $40c ; 4
sta $40d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 1
; 65 cycles
bit PAGE0 ; 4
lda #$0b ; 2
sta $800 ; 4
sta $801 ; 4
sta $802 ; 4
sta $803 ; 4
sta $804 ; 4
sta $805 ; 4
sta $806 ; 4
sta $807 ; 4
sta $808 ; 4
sta $809 ; 4
sta $80a ; 4
sta $80b ; 4
sta $80c ; 4
sta $80d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-06 05:02:08 +00:00
; 65 cycles
bit PAGE1 ; 4
lda #$30 ; 2
sta $400 ; 4
sta $401 ; 4
sta $402 ; 4
sta $403 ; 4
sta $404 ; 4
sta $405 ; 4
sta $406 ; 4
sta $407 ; 4
sta $408 ; 4
sta $409 ; 4
sta $40a ; 4
sta $40b ; 4
sta $40c ; 4
sta $40d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 2
; 65 cycles
bit PAGE0 ; 4
lda #$00 ; 2
sta $800 ; 4
sta $801 ; 4
sta $802 ; 4
sta $803 ; 4
sta $804 ; 4
sta $805 ; 4
sta $806 ; 4
sta $807 ; 4
sta $808 ; 4
sta $809 ; 4
sta $80a ; 4
sta $80b ; 4
sta $80c ; 4
sta $80d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-06 05:02:08 +00:00
; 65 cycles
bit PAGE1 ; 4
lda #$00 ; 2
sta $400 ; 4
sta $401 ; 4
sta $402 ; 4
sta $403 ; 4
sta $404 ; 4
sta $405 ; 4
sta $406 ; 4
sta $407 ; 4
sta $408 ; 4
sta $409 ; 4
sta $40a ; 4
sta $40b ; 4
sta $40c ; 4
sta $40d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 3
; 65 cycles
bit PAGE0 ; 4
lda #$00 ; 2
sta $800 ; 4
sta $801 ; 4
sta $802 ; 4
sta $803 ; 4
sta $804 ; 4
sta $805 ; 4
sta $806 ; 4
sta $807 ; 4
sta $808 ; 4
sta $809 ; 4
sta $80a ; 4
sta $80b ; 4
sta $80c ; 4
sta $80d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
; 65 cycles
bit PAGE1 ; 4
lda #$00 ; 2
sta $400 ; 4
sta $401 ; 4
sta $402 ; 4
sta $403 ; 4
sta $404 ; 4
sta $405 ; 4
sta $406 ; 4
sta $407 ; 4
sta $408 ; 4
sta $409 ; 4
sta $40a ; 4
sta $40b ; 4
sta $40c ; 4
sta $40d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
;===================
; 4 (L1)=$480
; 65 cycles
bit PAGE0 ; 4
2019-06-11 00:49:01 +00:00
lda #$00 ; 2
sta $880 ; 4
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-06 05:02:08 +00:00
; 65 cycles
bit PAGE1 ; 4
2019-06-11 00:49:01 +00:00
lda #$00 ; 2
sta $480 ; 4
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 5
; 65 cycles
bit PAGE0 ; 4
2019-06-11 00:49:01 +00:00
lda #$00 ; 2
sta $880 ; 4
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-06 05:02:08 +00:00
; 65 cycles
bit PAGE1 ; 4
2019-06-11 00:49:01 +00:00
lda #$00 ; 2
sta $480 ; 4
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 6
; 65 cycles
bit PAGE0 ; 4
2019-06-11 00:49:01 +00:00
lda #$00 ; 2
sta $880 ; 4
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-06 05:02:08 +00:00
; 65 cycles
bit PAGE1 ; 4
2019-06-11 00:49:01 +00:00
lda #$00 ; 2
sta $480 ; 4
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 7
; 65 cycles
bit PAGE0 ; 4
2019-06-11 00:49:01 +00:00
lda #$00 ; 2
sta $880 ; 4
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 65 cycles
bit PAGE1 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $500 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $501 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $502 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $503 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $504 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $505 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $506 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $507 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $508 ; 4
bit krg ; 4
lda TEMP ; 3
;================================
2019-06-11 00:49:01 +00:00
; 8 (L2) = $500
2019-06-07 01:55:21 +00:00
; 65 cycles
bit PAGE0 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $902 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $903 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $904 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $905 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $906 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $907 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $908 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $909 ; 4
lda #$00 ; 2
sta $90a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
; 65 cycles
bit PAGE1 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $502 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $503 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $504 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $505 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $506 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $507 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $508 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $509 ; 4
lda #$00 ; 2
sta $50a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 9
; 65 cycles
bit PAGE0 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $902 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $903 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $904 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $905 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $906 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $907 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $908 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $909 ; 4
lda #$00 ; 2
sta $90a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
; 65 cycles
bit PAGE1 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $502 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $503 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $504 ; 4
2019-06-11 02:19:39 +00:00
lda #$10 ; 2
sta $505 ; 4
2019-06-11 02:19:39 +00:00
lda #$10 ; 2
sta $506 ; 4
2019-06-11 02:19:39 +00:00
lda #$10 ; 2
sta $507 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $508 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $509 ; 4
lda #$00 ; 2
sta $50a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 10
; 65 cycles
bit PAGE0 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $902 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $903 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $904 ; 4
2019-06-11 02:19:39 +00:00
lda #$90 ; 2
sta $905 ; 4
2019-06-11 02:19:39 +00:00
lda #$90 ; 2
sta $906 ; 4
2019-06-11 02:19:39 +00:00
lda #$90 ; 2
sta $907 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $908 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $909 ; 4
lda #$00 ; 2
sta $90a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
; 65 cycles
bit PAGE1 ; 4
lda #$00 ; 2
sta $502 ; 4
lda #$00 ; 2
sta $503 ; 4
2019-06-11 02:19:39 +00:00
lda #$10 ; 2
sta $504 ; 4
2019-06-11 02:19:39 +00:00
lda #$d0 ; 2
sta $505 ; 4
2019-06-11 02:19:39 +00:00
lda #$d0 ; 2
sta $506 ; 4
2019-06-11 02:19:39 +00:00
lda #$d0 ; 2
sta $507 ; 4
2019-06-11 02:19:39 +00:00
lda #$10 ; 2
sta $508 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $509 ; 4
lda #$00 ; 2
sta $50a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 11
; 65 cycles
bit PAGE0 ; 4
lda #$00 ; 2
sta $902 ; 4
lda #$00 ; 2
sta $903 ; 4
2019-06-11 02:19:39 +00:00
lda #$90 ; 2
sta $904 ; 4
2019-06-11 02:19:39 +00:00
lda #$40 ; 2
sta $905 ; 4
2019-06-11 02:19:39 +00:00
lda #$40 ; 2
sta $906 ; 4
2019-06-11 02:19:39 +00:00
lda #$40 ; 2
sta $907 ; 4
2019-06-11 02:19:39 +00:00
lda #$90 ; 2
sta $908 ; 4
2019-06-11 02:19:39 +00:00
lda #$00 ; 2
sta $909 ; 4
lda #$00 ; 2
sta $90a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
; 65 cycles
2019-06-11 02:19:39 +00:00
bit PAGE1 ; 4
lda #$00 ; 2
sta $582 ; 4
lda #$01 ; 2
sta $583 ; 4
lda #$0d ; 2
sta $584 ; 4
lda #$06 ; 2
sta $585 ; 4
lda #$06 ; 2
sta $586 ; 4
lda #$06 ; 2
sta $587 ; 4
lda #$0d ; 2
sta $588 ; 4
lda #$01 ; 2
sta $589 ; 4
lda #$00 ; 2
sta $58a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
;================================
; 12 (L3) = $580
2019-06-11 02:19:39 +00:00
bit PAGE0 ; 4
lda #$00 ; 2
sta $982 ; 4
lda #$09 ; 2
sta $983 ; 4
lda #$04 ; 2
sta $984 ; 4
lda #$02 ; 2
sta $985 ; 4
lda #$02 ; 2
sta $986 ; 4
lda #$02 ; 2
sta $987 ; 4
lda #$04 ; 2
sta $988 ; 4
lda #$09 ; 2
sta $989 ; 4
lda #$00 ; 2
sta $98a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 02:19:39 +00:00
bit PAGE1 ; 4
lda #$01 ; 2
sta $582 ; 4
lda #$0d ; 2
sta $583 ; 4
lda #$06 ; 2
sta $584 ; 4
lda #$00 ; 2
sta $585 ; 4
lda #$00 ; 2
sta $586 ; 4
lda #$00 ; 2
sta $587 ; 4
lda #$06 ; 2
sta $588 ; 4
lda #$0d ; 2
sta $589 ; 4
lda #$01 ; 2
sta $58a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 13
2019-06-11 02:19:39 +00:00
bit PAGE0 ; 4
lda #$09 ; 2
sta $982 ; 4
lda #$04 ; 2
sta $983 ; 4
lda #$02 ; 2
sta $984 ; 4
lda #$00 ; 2
sta $985 ; 4
lda #$00 ; 2
sta $986 ; 4
lda #$00 ; 2
sta $987 ; 4
lda #$02 ; 2
sta $988 ; 4
lda #$04 ; 2
sta $989 ; 4
lda #$09 ; 2
sta $98a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 02:19:39 +00:00
bit PAGE1 ; 4
lda #$d0 ; 2
sta $582 ; 4
lda #$60 ; 2
sta $583 ; 4
lda #$00 ; 2
sta $584 ; 4
lda #$00 ; 2
sta $585 ; 4
lda #$00 ; 2
sta $586 ; 4
lda #$00 ; 2
sta $587 ; 4
lda #$00 ; 2
sta $588 ; 4
lda #$60 ; 2
sta $589 ; 4
lda #$d0 ; 2
sta $58a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 02:19:39 +00:00
2019-06-11 00:49:01 +00:00
; 14
2019-06-11 02:19:39 +00:00
bit PAGE0 ; 4
lda #$40 ; 2
sta $982 ; 4
lda #$20 ; 2
sta $983 ; 4
lda #$00 ; 2
sta $984 ; 4
lda #$00 ; 2
sta $985 ; 4
lda #$00 ; 2
sta $986 ; 4
lda #$00 ; 2
sta $987 ; 4
lda #$00 ; 2
sta $988 ; 4
lda #$20 ; 2
sta $989 ; 4
lda #$40 ; 2
sta $98a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 02:19:39 +00:00
bit PAGE1 ; 4
lda #$60 ; 2
sta $582 ; 4
lda #$00 ; 2
sta $583 ; 4
lda #$00 ; 2
sta $584 ; 4
lda #$00 ; 2
sta $585 ; 4
lda #$00 ; 2
sta $586 ; 4
lda #$00 ; 2
sta $587 ; 4
lda #$00 ; 2
sta $588 ; 4
lda #$00 ; 2
sta $589 ; 4
lda #$60 ; 2
sta $58a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 15
2019-06-11 02:19:39 +00:00
bit PAGE0 ; 4
lda #$20 ; 2
sta $982 ; 4
lda #$00 ; 2
sta $983 ; 4
lda #$00 ; 2
sta $984 ; 4
lda #$00 ; 2
sta $985 ; 4
lda #$00 ; 2
sta $986 ; 4
lda #$00 ; 2
sta $987 ; 4
lda #$00 ; 2
sta $988 ; 4
lda #$00 ; 2
sta $989 ; 4
lda #$20 ; 2
sta $98a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 02:19:39 +00:00
bit PAGE1 ; 4
lda #$00 ; 2
sta $602 ; 4
lda #$00 ; 2
sta $603 ; 4
lda #$00 ; 2
sta $604 ; 4
lda #$00 ; 2
sta $605 ; 4
lda #$00 ; 2
sta $606 ; 4
lda #$00 ; 2
sta $607 ; 4
lda #$00 ; 2
sta $608 ; 4
lda #$00 ; 2
sta $609 ; 4
lda #$00 ; 2
sta $60a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 02:19:39 +00:00
2019-06-11 00:49:01 +00:00
;================================
; 16 (L4) = $600
2019-06-11 02:19:39 +00:00
bit PAGE0 ; 4
lda #$00 ; 2
sta $a02 ; 4
lda #$00 ; 2
sta $a03 ; 4
lda #$00 ; 2
sta $a04 ; 4
lda #$00 ; 2
sta $a05 ; 4
lda #$05 ; 2
sta $a06 ; 4
lda #$00 ; 2
sta $a07 ; 4
lda #$00 ; 2
sta $a08 ; 4
lda #$00 ; 2
sta $a09 ; 4
lda #$20 ; 2
sta $a0a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 02:19:39 +00:00
bit PAGE1 ; 4
lda #$00 ; 2
sta $602 ; 4
lda #$00 ; 2
sta $603 ; 4
lda #$00 ; 2
sta $604 ; 4
lda #$00 ; 2
sta $605 ; 4
lda #$07 ; 2
sta $606 ; 4
lda #$00 ; 2
sta $607 ; 4
lda #$00 ; 2
sta $608 ; 4
lda #$00 ; 2
sta $609 ; 4
lda #$00 ; 2
sta $60a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 02:19:39 +00:00
2019-06-11 00:49:01 +00:00
; 17
2019-06-11 02:19:39 +00:00
bit PAGE0 ; 4
lda #$00 ; 2
sta $a02 ; 4
lda #$00 ; 2
sta $a03 ; 4
lda #$00 ; 2
sta $a04 ; 4
lda #$00 ; 2
sta $a05 ; 4
lda #$0f ; 2
sta $a06 ; 4
lda #$00 ; 2
sta $a07 ; 4
lda #$00 ; 2
sta $a08 ; 4
lda #$00 ; 2
sta $a09 ; 4
lda #$00 ; 2
sta $a0a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 02:19:39 +00:00
bit PAGE1 ; 4
lda #$00 ; 2
sta $602 ; 4
lda #$00 ; 2
sta $603 ; 4
lda #$00 ; 2
sta $604 ; 4
lda #$80 ; 2
sta $605 ; 4
lda #$80 ; 2
sta $606 ; 4
lda #$80 ; 2
sta $607 ; 4
lda #$00 ; 2
sta $608 ; 4
lda #$00 ; 2
sta $609 ; 4
lda #$40 ; 2
sta $60a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 18
2019-06-11 02:19:39 +00:00
bit PAGE0 ; 4
lda #$b0 ; 2
sta $a02 ; 4
lda #$e0 ; 2
sta $a03 ; 4
lda #$e0 ; 2
sta $a04 ; 4
lda #$e0 ; 2
sta $a05 ; 4
lda #$e0 ; 2
sta $a06 ; 4
lda #$e0 ; 2
sta $a07 ; 4
lda #$c0 ; 2
sta $a08 ; 4
lda #$c0 ; 2
sta $a09 ; 4
lda #$40 ; 2
sta $a0a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 02:19:39 +00:00
bit PAGE1 ; 4
lda #$30 ; 2
sta $602 ; 4
lda #$e0 ; 2
sta $603 ; 4
lda #$e0 ; 2
sta $604 ; 4
lda #$e0 ; 2
sta $605 ; 4
lda #$e0 ; 2
sta $606 ; 4
lda #$e0 ; 2
sta $607 ; 4
lda #$c0 ; 2
sta $608 ; 4
lda #$c0 ; 2
sta $609 ; 4
lda #$c0 ; 2
sta $60a ; 4
2019-06-07 01:55:21 +00:00
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 19
2019-06-07 01:55:21 +00:00
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-11 02:19:39 +00:00
2019-06-11 00:49:01 +00:00
;================================
; 20 (L5) = $680
2019-06-07 01:55:21 +00:00
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 21
2019-06-07 01:55:21 +00:00
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 22
2019-06-07 01:55:21 +00:00
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 23
2019-06-07 01:55:21 +00:00
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-11 02:19:39 +00:00
2019-06-11 00:49:01 +00:00
;================================
; 24 (L6) = $700
2019-06-07 01:55:21 +00:00
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 25
2019-06-07 01:55:21 +00:00
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 26
2019-06-07 01:55:21 +00:00
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 27
2019-06-07 01:55:21 +00:00
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
;================================
; 28 (L7) = $780
2019-06-07 01:55:21 +00:00
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 29
2019-06-07 01:55:21 +00:00
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
; 30
2019-06-07 01:55:21 +00:00
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 31
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 32
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 33
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 34
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 35
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 36
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 37
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 38
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 39
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 40
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 41
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 42
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 43
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 44
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 45
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 46
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 47
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 48
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 49
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 50
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 51
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 52
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 53
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 54
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 55
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 56
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 57
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 58
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 59
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 60
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 61
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 62
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
bit PAGE1 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
; 63
bit PAGE0 ; 4
; 65 cycles
2019-06-07 01:55:21 +00:00
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
inc krg ; 6
bit krg ; 4
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$03 ; 2
sta $450 ; 4
sta $451 ; 4
sta $452 ; 4
sta $453 ; 4
sta $454 ; 4
sta $455 ; 4
sta $456 ; 4
sta $457 ; 4
sta $458 ; 4
sta $459 ; 4
sta $45a ; 4
sta $45b ; 4
sta $45c ; 4
sta $45d ; 4
lda TEMP ; 3
;=========
; 64(L16) = $450
bit PAGE0 ; 4
lda #$0b ; 2
sta $850 ; 4
sta $851 ; 4
sta $852 ; 4
sta $853 ; 4
sta $854 ; 4
sta $855 ; 4
sta $856 ; 4
sta $857 ; 4
sta $858 ; 4
sta $859 ; 4
sta $85a ; 4
sta $85b ; 4
sta $85c ; 4
sta $85d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$0f ; 2
sta $450 ; 4
sta $451 ; 4
sta $452 ; 4
sta $453 ; 4
sta $454 ; 4
sta $455 ; 4
sta $456 ; 4
sta $457 ; 4
sta $458 ; 4
sta $459 ; 4
sta $45a ; 4
sta $45b ; 4
sta $45c ; 4
sta $45d ; 4
lda TEMP ; 3
; 65
bit PAGE0 ; 4
lda #$0b ; 2
sta $850 ; 4
sta $851 ; 4
sta $852 ; 4
sta $853 ; 4
sta $854 ; 4
sta $855 ; 4
sta $856 ; 4
sta $857 ; 4
sta $858 ; 4
sta $859 ; 4
sta $85a ; 4
sta $85b ; 4
sta $85c ; 4
sta $85d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$30 ; 2
sta $450 ; 4
sta $451 ; 4
sta $452 ; 4
sta $453 ; 4
sta $454 ; 4
sta $455 ; 4
sta $456 ; 4
sta $457 ; 4
sta $458 ; 4
sta $459 ; 4
sta $45a ; 4
sta $45b ; 4
sta $45c ; 4
sta $45d ; 4
lda TEMP ; 3
; 66
bit PAGE0 ; 4
lda #$00 ; 2
sta $850 ; 4
sta $851 ; 4
sta $852 ; 4
sta $853 ; 4
sta $854 ; 4
sta $855 ; 4
sta $856 ; 4
sta $857 ; 4
sta $858 ; 4
sta $859 ; 4
sta $85a ; 4
sta $85b ; 4
sta $85c ; 4
sta $85d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$00 ; 2
sta $450 ; 4
sta $451 ; 4
sta $452 ; 4
sta $453 ; 4
sta $454 ; 4
sta $455 ; 4
sta $456 ; 4
sta $457 ; 4
sta $458 ; 4
sta $459 ; 4
sta $45a ; 4
sta $45b ; 4
sta $45c ; 4
sta $45d ; 4
lda TEMP ; 3
; 67
bit PAGE0 ; 4
lda #$00 ; 2
sta $850 ; 4
sta $851 ; 4
sta $852 ; 4
sta $853 ; 4
sta $854 ; 4
sta $855 ; 4
sta $856 ; 4
sta $857 ; 4
sta $858 ; 4
sta $859 ; 4
sta $85a ; 4
sta $85b ; 4
sta $85c ; 4
sta $85d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$02 ; 2
sta $4d0 ; 4
sta $4d1 ; 4
sta $4d2 ; 4
sta $4d3 ; 4
sta $4d4 ; 4
sta $4d5 ; 4
sta $4d6 ; 4
sta $4d7 ; 4
sta $4d8 ; 4
sta $4d9 ; 4
sta $4da ; 4
sta $4db ; 4
sta $4dc ; 4
sta $4dd ; 4
lda TEMP ; 3
;=========
; 68(L17) = $4d0
bit PAGE0 ; 4
lda #$06 ; 2
sta $8d0 ; 4
sta $8d1 ; 4
sta $8d2 ; 4
sta $8d3 ; 4
sta $8d4 ; 4
sta $8d5 ; 4
sta $8d6 ; 4
sta $8d7 ; 4
sta $8d8 ; 4
sta $8d9 ; 4
sta $8da ; 4
sta $8db ; 4
sta $8dc ; 4
sta $8dd ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$0f ; 2
sta $4d0 ; 4
sta $4d1 ; 4
sta $4d2 ; 4
sta $4d3 ; 4
sta $4d4 ; 4
sta $4d5 ; 4
sta $4d6 ; 4
sta $4d7 ; 4
sta $4d8 ; 4
sta $4d9 ; 4
sta $4da ; 4
sta $4db ; 4
sta $4dc ; 4
sta $4dd ; 4
lda TEMP ; 3
; 69
bit PAGE0 ; 4
lda #$06 ; 2
sta $8d0 ; 4
sta $8d1 ; 4
sta $8d2 ; 4
sta $8d3 ; 4
sta $8d4 ; 4
sta $8d5 ; 4
sta $8d6 ; 4
sta $8d7 ; 4
sta $8d8 ; 4
sta $8d9 ; 4
sta $8da ; 4
sta $8db ; 4
sta $8dc ; 4
sta $8dd ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$20 ; 2
sta $4d0 ; 4
sta $4d1 ; 4
sta $4d2 ; 4
sta $4d3 ; 4
sta $4d4 ; 4
sta $4d5 ; 4
sta $4d6 ; 4
sta $4d7 ; 4
sta $4d8 ; 4
sta $4d9 ; 4
sta $4da ; 4
sta $4db ; 4
sta $4dc ; 4
sta $4dd ; 4
lda TEMP ; 3
; 70
bit PAGE0 ; 4
lda #$00 ; 2
sta $8d0 ; 4
sta $8d1 ; 4
sta $8d2 ; 4
sta $8d3 ; 4
sta $8d4 ; 4
sta $8d5 ; 4
sta $8d6 ; 4
sta $8d7 ; 4
sta $8d8 ; 4
sta $8d9 ; 4
sta $8da ; 4
sta $8db ; 4
sta $8dc ; 4
sta $8dd ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$00 ; 2
sta $4d0 ; 4
sta $4d1 ; 4
sta $4d2 ; 4
sta $4d3 ; 4
sta $4d4 ; 4
sta $4d5 ; 4
sta $4d6 ; 4
sta $4d7 ; 4
sta $4d8 ; 4
sta $4d9 ; 4
sta $4da ; 4
sta $4db ; 4
sta $4dc ; 4
sta $4dd ; 4
lda TEMP ; 3
; 71
bit PAGE0 ; 4
lda #$00 ; 2
sta $8d0 ; 4
sta $8d1 ; 4
sta $8d2 ; 4
sta $8d3 ; 4
sta $8d4 ; 4
sta $8d5 ; 4
sta $8d6 ; 4
sta $8d7 ; 4
sta $8d8 ; 4
sta $8d9 ; 4
sta $8da ; 4
sta $8db ; 4
sta $8dc ; 4
sta $8dd ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$04 ; 2
sta $550 ; 4
sta $551 ; 4
sta $552 ; 4
sta $553 ; 4
sta $554 ; 4
sta $555 ; 4
sta $556 ; 4
sta $557 ; 4
sta $558 ; 4
sta $559 ; 4
sta $55a ; 4
sta $55b ; 4
sta $55c ; 4
sta $55d ; 4
lda TEMP ; 3
;=========
; 72(L18) = $550
bit PAGE0 ; 4
lda #$0c ; 2
sta $950 ; 4
sta $951 ; 4
sta $952 ; 4
sta $953 ; 4
sta $954 ; 4
sta $955 ; 4
sta $956 ; 4
sta $957 ; 4
sta $958 ; 4
sta $959 ; 4
sta $95a ; 4
sta $95b ; 4
sta $95c ; 4
sta $95d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$0f ; 2
sta $550 ; 4
sta $551 ; 4
sta $552 ; 4
sta $553 ; 4
sta $554 ; 4
sta $555 ; 4
sta $556 ; 4
sta $557 ; 4
sta $558 ; 4
sta $559 ; 4
sta $55a ; 4
sta $55b ; 4
sta $55c ; 4
sta $55d ; 4
lda TEMP ; 3
; 73
bit PAGE0 ; 4
lda #$0c ; 2
sta $950 ; 4
sta $951 ; 4
sta $952 ; 4
sta $953 ; 4
sta $954 ; 4
sta $955 ; 4
sta $956 ; 4
sta $957 ; 4
sta $958 ; 4
sta $959 ; 4
sta $95a ; 4
sta $95b ; 4
sta $95c ; 4
sta $95d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$40 ; 2
sta $550 ; 4
sta $551 ; 4
sta $552 ; 4
sta $553 ; 4
sta $554 ; 4
sta $555 ; 4
sta $556 ; 4
sta $557 ; 4
sta $558 ; 4
sta $559 ; 4
sta $55a ; 4
sta $55b ; 4
sta $55c ; 4
sta $55d ; 4
lda TEMP ; 3
; 74
bit PAGE0 ; 4
lda #$00 ; 2
sta $950 ; 4
sta $951 ; 4
sta $952 ; 4
sta $953 ; 4
sta $954 ; 4
sta $955 ; 4
sta $956 ; 4
sta $957 ; 4
sta $958 ; 4
sta $959 ; 4
sta $95a ; 4
sta $95b ; 4
sta $95c ; 4
sta $95d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$00 ; 2
sta $550 ; 4
sta $551 ; 4
sta $552 ; 4
sta $553 ; 4
sta $554 ; 4
sta $555 ; 4
sta $556 ; 4
sta $557 ; 4
sta $558 ; 4
sta $559 ; 4
sta $55a ; 4
sta $55b ; 4
sta $55c ; 4
sta $55d ; 4
lda TEMP ; 3
; 75
bit PAGE0 ; 4
lda #$00 ; 2
sta $950 ; 4
sta $951 ; 4
sta $952 ; 4
sta $953 ; 4
sta $954 ; 4
sta $955 ; 4
sta $956 ; 4
sta $957 ; 4
sta $958 ; 4
sta $959 ; 4
sta $95a ; 4
sta $95b ; 4
sta $95c ; 4
sta $95d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$05 ; 2
sta $5d0 ; 4
sta $5d1 ; 4
sta $5d2 ; 4
sta $5d3 ; 4
sta $5d4 ; 4
sta $5d5 ; 4
sta $5d6 ; 4
sta $5d7 ; 4
sta $5d8 ; 4
sta $5d9 ; 4
sta $5da ; 4
sta $5db ; 4
sta $5dc ; 4
sta $5dd ; 4
lda TEMP ; 3
;=========
; 76(L19) = $5d0
bit PAGE0 ; 4
lda #$07 ; 2
sta $9d0 ; 4
sta $9d1 ; 4
sta $9d2 ; 4
sta $9d3 ; 4
sta $9d4 ; 4
sta $9d5 ; 4
sta $9d6 ; 4
sta $9d7 ; 4
sta $9d8 ; 4
sta $9d9 ; 4
sta $9da ; 4
sta $9db ; 4
sta $9dc ; 4
sta $9dd ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$0f ; 2
sta $5d0 ; 4
sta $5d1 ; 4
sta $5d2 ; 4
sta $5d3 ; 4
sta $5d4 ; 4
sta $5d5 ; 4
sta $5d6 ; 4
sta $5d7 ; 4
sta $5d8 ; 4
sta $5d9 ; 4
sta $5da ; 4
sta $5db ; 4
sta $5dc ; 4
sta $5dd ; 4
lda TEMP ; 3
; 77
bit PAGE0 ; 4
lda #$07 ; 2
sta $9d0 ; 4
sta $9d1 ; 4
sta $9d2 ; 4
sta $9d3 ; 4
sta $9d4 ; 4
sta $9d5 ; 4
sta $9d6 ; 4
sta $9d7 ; 4
sta $9d8 ; 4
sta $9d9 ; 4
sta $9da ; 4
sta $9db ; 4
sta $9dc ; 4
sta $9dd ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$50 ; 2
sta $5d0 ; 4
sta $5d1 ; 4
sta $5d2 ; 4
sta $5d3 ; 4
sta $5d4 ; 4
sta $5d5 ; 4
sta $5d6 ; 4
sta $5d7 ; 4
sta $5d8 ; 4
sta $5d9 ; 4
sta $5da ; 4
sta $5db ; 4
sta $5dc ; 4
sta $5dd ; 4
lda TEMP ; 3
; 78
2019-06-07 01:55:21 +00:00
2019-06-11 00:49:01 +00:00
bit PAGE0 ; 4
lda #$00 ; 2
sta $9d0 ; 4
sta $9d1 ; 4
sta $9d2 ; 4
sta $9d3 ; 4
sta $9d4 ; 4
sta $9d5 ; 4
sta $9d6 ; 4
sta $9d7 ; 4
sta $9d8 ; 4
sta $9d9 ; 4
sta $9da ; 4
sta $9db ; 4
sta $9dc ; 4
sta $9dd ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$00 ; 2
sta $5d0 ; 4
sta $5d1 ; 4
sta $5d2 ; 4
sta $5d3 ; 4
sta $5d4 ; 4
sta $5d5 ; 4
sta $5d6 ; 4
sta $5d7 ; 4
sta $5d8 ; 4
sta $5d9 ; 4
sta $5da ; 4
sta $5db ; 4
sta $5dc ; 4
sta $5dd ; 4
lda TEMP ; 3
; 79
bit PAGE0 ; 4
lda #$00 ; 2
sta $9d0 ; 4
sta $9d1 ; 4
sta $9d2 ; 4
sta $9d3 ; 4
sta $9d4 ; 4
sta $9d5 ; 4
sta $9d6 ; 4
sta $9d7 ; 4
sta $9d8 ; 4
sta $9d9 ; 4
sta $9da ; 4
sta $9db ; 4
sta $9dc ; 4
sta $9dd ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$01 ; 2
sta $650 ; 4
sta $651 ; 4
sta $652 ; 4
sta $653 ; 4
sta $654 ; 4
sta $655 ; 4
sta $656 ; 4
sta $657 ; 4
sta $658 ; 4
sta $659 ; 4
sta $65a ; 4
sta $65b ; 4
sta $65c ; 4
sta $65d ; 4
lda TEMP ; 3
;=========
; 80(L20) = $650
bit PAGE0 ; 4
lda #$03 ; 2
sta $a50 ; 4
sta $a51 ; 4
sta $a52 ; 4
sta $a53 ; 4
sta $a54 ; 4
sta $a55 ; 4
sta $a56 ; 4
sta $a57 ; 4
sta $a58 ; 4
sta $a59 ; 4
sta $a5a ; 4
sta $a5b ; 4
sta $a5c ; 4
sta $a5d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$0f ; 2
sta $650 ; 4
sta $651 ; 4
sta $652 ; 4
sta $653 ; 4
sta $654 ; 4
sta $655 ; 4
sta $656 ; 4
sta $657 ; 4
sta $658 ; 4
sta $659 ; 4
sta $65a ; 4
sta $65b ; 4
sta $65c ; 4
sta $65d ; 4
lda TEMP ; 3
; 81
bit PAGE0 ; 4
lda #$03 ; 2
sta $a50 ; 4
sta $a51 ; 4
sta $a52 ; 4
sta $a53 ; 4
sta $a54 ; 4
sta $a55 ; 4
sta $a56 ; 4
sta $a57 ; 4
sta $a58 ; 4
sta $a59 ; 4
sta $a5a ; 4
sta $a5b ; 4
sta $a5c ; 4
sta $a5d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$10 ; 2
sta $650 ; 4
sta $651 ; 4
sta $652 ; 4
sta $653 ; 4
sta $654 ; 4
sta $655 ; 4
sta $656 ; 4
sta $657 ; 4
sta $658 ; 4
sta $659 ; 4
sta $65a ; 4
sta $65b ; 4
sta $65c ; 4
sta $65d ; 4
lda TEMP ; 3
; 82
bit PAGE0 ; 4
lda #$00 ; 2
sta $a50 ; 4
sta $a51 ; 4
sta $a52 ; 4
sta $a53 ; 4
sta $a54 ; 4
sta $a55 ; 4
sta $a56 ; 4
sta $a57 ; 4
sta $a58 ; 4
sta $a59 ; 4
sta $a5a ; 4
sta $a5b ; 4
sta $a5c ; 4
sta $a5d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$00 ; 2
sta $650 ; 4
sta $651 ; 4
sta $652 ; 4
sta $653 ; 4
sta $654 ; 4
sta $655 ; 4
sta $656 ; 4
sta $657 ; 4
sta $658 ; 4
sta $659 ; 4
sta $65a ; 4
sta $65b ; 4
sta $65c ; 4
sta $65d ; 4
lda TEMP ; 3
; 83
bit PAGE0 ; 4
lda #$00 ; 2
sta $a50 ; 4
sta $a51 ; 4
sta $a52 ; 4
sta $a53 ; 4
sta $a54 ; 4
sta $a55 ; 4
sta $a56 ; 4
sta $a57 ; 4
sta $a58 ; 4
sta $a59 ; 4
sta $a5a ; 4
sta $a5b ; 4
sta $a5c ; 4
sta $a5d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$08 ; 2
sta $6d0 ; 4
sta $6d1 ; 4
sta $6d2 ; 4
sta $6d3 ; 4
sta $6d4 ; 4
sta $6d5 ; 4
sta $6d6 ; 4
sta $6d7 ; 4
sta $6d8 ; 4
sta $6d9 ; 4
sta $6da ; 4
sta $6db ; 4
sta $6dc ; 4
sta $6dd ; 4
lda TEMP ; 3
;=========
; 84(21) = $6d0
bit PAGE0 ; 4
lda #$0d ; 2
sta $ad0 ; 4
sta $ad1 ; 4
sta $ad2 ; 4
sta $ad3 ; 4
sta $ad4 ; 4
sta $ad5 ; 4
sta $ad6 ; 4
sta $ad7 ; 4
sta $ad8 ; 4
sta $ad9 ; 4
sta $ada ; 4
sta $adb ; 4
sta $adc ; 4
sta $add ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$0f ; 2
sta $6d0 ; 4
sta $6d1 ; 4
sta $6d2 ; 4
sta $6d3 ; 4
sta $6d4 ; 4
sta $6d5 ; 4
sta $6d6 ; 4
sta $6d7 ; 4
sta $6d8 ; 4
sta $6d9 ; 4
sta $6da ; 4
sta $6db ; 4
sta $6dc ; 4
sta $6dd ; 4
lda TEMP ; 3
; 85
bit PAGE0 ; 4
lda #$0d ; 2
sta $ad0 ; 4
sta $ad1 ; 4
sta $ad2 ; 4
sta $ad3 ; 4
sta $ad4 ; 4
sta $ad5 ; 4
sta $ad6 ; 4
sta $ad7 ; 4
sta $ad8 ; 4
sta $ad9 ; 4
sta $ada ; 4
sta $adb ; 4
sta $adc ; 4
sta $add ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$80 ; 2
sta $6d0 ; 4
sta $6d1 ; 4
sta $6d2 ; 4
sta $6d3 ; 4
sta $6d4 ; 4
sta $6d5 ; 4
sta $6d6 ; 4
sta $6d7 ; 4
sta $6d8 ; 4
sta $6d9 ; 4
sta $6da ; 4
sta $6db ; 4
sta $6dc ; 4
sta $6dd ; 4
lda TEMP ; 3
; 86
bit PAGE0 ; 4
lda #$00 ; 2
sta $ad0 ; 4
sta $ad1 ; 4
sta $ad2 ; 4
sta $ad3 ; 4
sta $ad4 ; 4
sta $ad5 ; 4
sta $ad6 ; 4
sta $ad7 ; 4
sta $ad8 ; 4
sta $ad9 ; 4
sta $ada ; 4
sta $adb ; 4
sta $adc ; 4
sta $add ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$00 ; 2
sta $6d0 ; 4
sta $6d1 ; 4
sta $6d2 ; 4
sta $6d3 ; 4
sta $6d4 ; 4
sta $6d5 ; 4
sta $6d6 ; 4
sta $6d7 ; 4
sta $6d8 ; 4
sta $6d9 ; 4
sta $6da ; 4
sta $6db ; 4
sta $6dc ; 4
sta $6dd ; 4
lda TEMP ; 3
; 87
bit PAGE0 ; 4
lda #$00 ; 2
sta $ad0 ; 4
sta $ad1 ; 4
sta $ad2 ; 4
sta $ad3 ; 4
sta $ad4 ; 4
sta $ad5 ; 4
sta $ad6 ; 4
sta $ad7 ; 4
sta $ad8 ; 4
sta $ad9 ; 4
sta $ada ; 4
sta $adb ; 4
sta $adc ; 4
sta $add ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$0c ; 2
sta $750 ; 4
sta $751 ; 4
sta $752 ; 4
sta $753 ; 4
sta $754 ; 4
sta $755 ; 4
sta $756 ; 4
sta $757 ; 4
sta $758 ; 4
sta $759 ; 4
sta $75a ; 4
sta $75b ; 4
sta $75c ; 4
sta $75d ; 4
lda TEMP ; 3
;=========
; 88(L22) = $750
bit PAGE0 ; 4
lda #$0e ; 2
sta $b50 ; 4
sta $b51 ; 4
sta $b52 ; 4
sta $b53 ; 4
sta $b54 ; 4
sta $b55 ; 4
sta $b56 ; 4
sta $b57 ; 4
sta $b58 ; 4
sta $b59 ; 4
sta $b5a ; 4
sta $b5b ; 4
sta $b5c ; 4
sta $b5d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$0f ; 2
sta $750 ; 4
sta $751 ; 4
sta $752 ; 4
sta $753 ; 4
sta $754 ; 4
sta $755 ; 4
sta $756 ; 4
sta $757 ; 4
sta $758 ; 4
sta $759 ; 4
sta $75a ; 4
sta $75b ; 4
sta $75c ; 4
sta $75d ; 4
lda TEMP ; 3
; 89
bit PAGE0 ; 4
lda #$0e ; 2
sta $b50 ; 4
sta $b51 ; 4
sta $b52 ; 4
sta $b53 ; 4
sta $b54 ; 4
sta $b55 ; 4
sta $b56 ; 4
sta $b57 ; 4
sta $b58 ; 4
sta $b59 ; 4
sta $b5a ; 4
sta $b5b ; 4
sta $b5c ; 4
sta $b5d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$c0 ; 2
sta $750 ; 4
sta $751 ; 4
sta $752 ; 4
sta $753 ; 4
sta $754 ; 4
sta $755 ; 4
sta $756 ; 4
sta $757 ; 4
sta $758 ; 4
sta $759 ; 4
sta $75a ; 4
sta $75b ; 4
sta $75c ; 4
sta $75d ; 4
lda TEMP ; 3
; 90
bit PAGE0 ; 4
lda #$00 ; 2
sta $b50 ; 4
sta $b51 ; 4
sta $b52 ; 4
sta $b53 ; 4
sta $b54 ; 4
sta $b55 ; 4
sta $b56 ; 4
sta $b57 ; 4
sta $b58 ; 4
sta $b59 ; 4
sta $b5a ; 4
sta $b5b ; 4
sta $b5c ; 4
sta $b5d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$00 ; 2
sta $750 ; 4
sta $751 ; 4
sta $752 ; 4
sta $753 ; 4
sta $754 ; 4
sta $755 ; 4
sta $756 ; 4
sta $757 ; 4
sta $758 ; 4
sta $759 ; 4
sta $75a ; 4
sta $75b ; 4
sta $75c ; 4
sta $75d ; 4
lda TEMP ; 3
; 91
bit PAGE0 ; 4
lda #$00 ; 2
sta $b50 ; 4
sta $b51 ; 4
sta $b52 ; 4
sta $b53 ; 4
sta $b54 ; 4
sta $b55 ; 4
sta $b56 ; 4
sta $b57 ; 4
sta $b58 ; 4
sta $b59 ; 4
sta $b5a ; 4
sta $b5b ; 4
sta $b5c ; 4
sta $b5d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$09 ; 2
sta $7d0 ; 4
sta $7d1 ; 4
sta $7d2 ; 4
sta $7d3 ; 4
sta $7d4 ; 4
sta $7d5 ; 4
sta $7d6 ; 4
sta $7d7 ; 4
sta $7d8 ; 4
sta $7d9 ; 4
sta $7da ; 4
sta $7db ; 4
sta $7dc ; 4
sta $7dd ; 4
lda TEMP ; 3
;=========
; 92(L23) = $7d0
bit PAGE0 ; 4
lda #$0d ; 2
sta $bd0 ; 4
sta $bd1 ; 4
sta $bd2 ; 4
sta $bd3 ; 4
sta $bd4 ; 4
sta $bd5 ; 4
sta $bd6 ; 4
sta $bd7 ; 4
sta $bd8 ; 4
sta $bd9 ; 4
sta $bda ; 4
sta $bdb ; 4
sta $bdc ; 4
sta $bdd ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$0f ; 2
sta $7d0 ; 4
sta $7d1 ; 4
sta $7d2 ; 4
sta $7d3 ; 4
sta $7d4 ; 4
sta $7d5 ; 4
sta $7d6 ; 4
sta $7d7 ; 4
sta $7d8 ; 4
sta $7d9 ; 4
sta $7da ; 4
sta $7db ; 4
sta $7dc ; 4
sta $7dd ; 4
lda TEMP ; 3
; 93
bit PAGE0 ; 4
lda #$0d ; 2
sta $bd0 ; 4
sta $bd1 ; 4
sta $bd2 ; 4
sta $bd3 ; 4
sta $bd4 ; 4
sta $bd5 ; 4
sta $bd6 ; 4
sta $bd7 ; 4
sta $bd8 ; 4
sta $bd9 ; 4
sta $bda ; 4
sta $bdb ; 4
sta $bdc ; 4
sta $bdd ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$90 ; 2
sta $7d0 ; 4
sta $7d1 ; 4
sta $7d2 ; 4
sta $7d3 ; 4
sta $7d4 ; 4
sta $7d5 ; 4
sta $7d6 ; 4
sta $7d7 ; 4
sta $7d8 ; 4
sta $7d9 ; 4
sta $7da ; 4
sta $7db ; 4
sta $7dc ; 4
sta $7dd ; 4
lda TEMP ; 3
; 94
bit PAGE0 ; 4
2019-06-11 00:49:01 +00:00
lda #$00 ; 2
sta $bd0 ; 4
sta $bd1 ; 4
sta $bd2 ; 4
sta $bd3 ; 4
sta $bd4 ; 4
sta $bd5 ; 4
sta $bd6 ; 4
sta $bd7 ; 4
sta $bd8 ; 4
sta $bd9 ; 4
sta $bda ; 4
sta $bdb ; 4
sta $bdc ; 4
sta $bdd ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-11 00:49:01 +00:00
bit PAGE1 ; 4
lda #$00 ; 2
sta $7d0 ; 4
sta $7d1 ; 4
sta $7d2 ; 4
sta $7d3 ; 4
sta $7d4 ; 4
sta $7d5 ; 4
sta $7d6 ; 4
sta $7d7 ; 4
sta $7d8 ; 4
sta $7d9 ; 4
sta $7da ; 4
sta $7db ; 4
sta $7dc ; 4
sta $7dd ; 4
lda TEMP ; 3
; 95
bit PAGE0 ; 4
lda #$00 ; 2
sta $bd0 ; 4
sta $bd1 ; 4
sta $bd2 ; 4
sta $bd3 ; 4
sta $bd4 ; 4
sta $bd5 ; 4
sta $bd6 ; 4
sta $bd7 ; 4
sta $bd8 ; 4
sta $bd9 ; 4
sta $bda ; 4
sta $bdb ; 4
sta $bdc ; 4
sta $bdd ; 4
lda TEMP ; 3
; 65 cycles
bit PAGE1 ; 4
lda #$03 ; 2
sta $400 ; 4
sta $401 ; 4
sta $402 ; 4
sta $403 ; 4
sta $404 ; 4
sta $405 ; 4
sta $406 ; 4
sta $407 ; 4
sta $408 ; 4
sta $409 ; 4
sta $40a ; 4
sta $40b ; 4
sta $40c ; 4
sta $40d ; 4
2019-06-07 01:55:21 +00:00
lda TEMP ; 3
2019-06-06 05:02:08 +00:00
;======================================================
; We have 4550 cycles in the vblank, use them wisely
;======================================================
2019-06-07 01:55:21 +00:00
; do_nothing should be
; 4550
; -6
; -10
;=============
; 4534
2019-06-06 05:02:08 +00:00
jsr do_nothing ; 6
lda KEYPRESS ; 4
bpl no_keypress ; 3
jmp start_over
no_keypress:
jmp display_loop ; 3
;=================================
; do nothing
;=================================
2019-06-07 01:55:21 +00:00
; and take 4534-6 = 4528 cycles to do it
2019-06-11 02:19:39 +00:00
; blah, current code the tight loops are right at a page boundary
2019-06-06 05:02:08 +00:00
do_nothing:
2019-06-11 02:19:39 +00:00
; want 4528-12=4516
; Try X=4 Y=174 cycles=4525 R3 -3 X loops
; Try X=3 Y=215 cycles=4516
nop ; 2
nop ; 2
nop ; 2
nop ; 2
nop ; 2
nop ; 2
2019-06-06 05:02:08 +00:00
2019-06-11 02:19:39 +00:00
ldy #215 ; 2
loop1: ldx #3 ; 2
2019-06-07 01:55:21 +00:00
loop2: dex ; 2
2019-06-06 05:02:08 +00:00
bne loop2 ; 2nt/3
dey ; 2
bne loop1 ; 2nt/3
rts ; 6
.include "gr_simple_clear.s"
.include "gr_offsets.s"
2019-06-06 05:02:08 +00:00
.include "../asm_routines/gr_unrle.s"
.include "../asm_routines/keypress.s"
.align $100
2019-06-06 05:02:08 +00:00
.include "gr_copy.s"
.include "vapor_lock.s"
.include "delay_a.s"
2019-06-06 05:02:08 +00:00
pictures:
.word k_low,k_high
.include "k_40_48d.inc"
2019-06-07 01:55:21 +00:00
krg:
.byte $0