diff --git a/autumn/autumn.s b/autumn/autumn.s index 8aeb093f..2ddf5278 100644 --- a/autumn/autumn.s +++ b/autumn/autumn.s @@ -19,6 +19,8 @@ EBP4 = $F7 COLORL = $F8 COLORH = $F9 SOUND = $FA +FRAMEL = $FB +FRAMEH = $FC ; Soft Switches KEYPRESS= $C000 @@ -153,7 +155,8 @@ label_11f: ; two extra instructions and #$7 ; 2 - ora #$2 ; 2 +smc: + ora #$1 ; 2 tax ; 1 ; if using color lookup table @@ -180,6 +183,14 @@ put_pixel: lda YCOORDL ; 2 jsr HPLOT0 ; 3 +; inc FRAMEL ; 2 +; bne no_frame ; 2 +; inc FRAMEH ; 2 +;no_frame: +; lda smc +; eor #$3 +; sta smc + ; lda KEYPRESS ; 3 ; see if key pressed ; bpl autumn_forever ; 2 ; loop if not @@ -236,9 +247,28 @@ color_lookup: ; blue and purple palette ; .byte $02,$02,$03,$06, $06,$06,$02,$07 + ; qkumba ora2 white/blue/purple +; .byte $02,$03,$02,$03, $06,$07,$06,$07 + ; orange and green palette ; .byte $01,$01,$03,$05, $05,$05,$01,$07 +; .byte $01,$03,$01,$03, $05,$07,$05,$07 +; .byte $01,$01,$03,$03, $05,$05,$07,$07 + ; "Leaf" Locations ; TOP-LEFT ?? CENTER-TOP TOP-RIGHT LEFT ?? CENTER-BOTTOM ?? + + + +; FANCY OPENER + +; SET ADDRESS in 1a/Ab +; lda #xx ; 2 +; sta 1a ; 2 +; lda #xx ; 2 +; sta 1b ; 2 +; lda angle ; 2 +; jsr xdraw1 ; 3 +