mirror of
https://github.com/cc65/cc65.git
synced 2025-08-10 04:25:21 +00:00
Sqeeze out two bytes of the code.
git-svn-id: svn://svn.cc65.org/cc65/trunk@4165 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
@@ -433,7 +433,7 @@ SETVIEWPAGE:
|
|||||||
;
|
;
|
||||||
|
|
||||||
SETDRAWPAGE:
|
SETDRAWPAGE:
|
||||||
cmp #1
|
cmp #1
|
||||||
beq @L1 ; page == maxpages-1
|
beq @L1 ; page == maxpages-1
|
||||||
lda #<$de20 ; page 0
|
lda #<$de20 ; page 0
|
||||||
ldx #>$de20
|
ldx #>$de20
|
||||||
@@ -464,25 +464,24 @@ VBL_INTERRUPT = TIMER2_INTERRUPT
|
|||||||
SERIAL_INTERRUPT = TIMER4_INTERRUPT
|
SERIAL_INTERRUPT = TIMER4_INTERRUPT
|
||||||
|
|
||||||
IRQ:
|
IRQ:
|
||||||
lda INTSET ; Poll all pending interrupts
|
lda INTSET ; Poll all pending interrupts
|
||||||
and #VBL_INTERRUPT
|
and #VBL_INTERRUPT
|
||||||
bne IRQVBL
|
beq IRQEND ; Exit if not a VBL interrupt
|
||||||
clc ; Not a VBL interrupt - exit
|
|
||||||
rts
|
lda SWAPREQUEST
|
||||||
IRQVBL:
|
beq @L0
|
||||||
lda SWAPREQUEST
|
lda DRAWPAGE
|
||||||
beq @L0
|
jsr SETVIEWPAGE
|
||||||
lda DRAWPAGE
|
lda DRAWPAGE
|
||||||
jsr SETVIEWPAGE
|
eor #1
|
||||||
lda DRAWPAGE
|
sta DRAWPAGE
|
||||||
eor #1
|
jsr SETDRAWPAGE
|
||||||
sta DRAWPAGE
|
stz SWAPREQUEST
|
||||||
jsr SETDRAWPAGE
|
|
||||||
stz SWAPREQUEST
|
|
||||||
@L0:
|
@L0:
|
||||||
jsr VBLHOOK
|
jsr VBLHOOK
|
||||||
clc
|
IRQEND:
|
||||||
rts
|
clc
|
||||||
|
rts
|
||||||
|
|
||||||
; ------------------------------------------------------------------------
|
; ------------------------------------------------------------------------
|
||||||
; SETCOLOR: Set the drawing color (in A). The new color is already checked
|
; SETCOLOR: Set the drawing color (in A). The new color is already checked
|
||||||
@@ -1003,7 +1002,7 @@ text_c:
|
|||||||
; The Font
|
; The Font
|
||||||
; 96 characters from ASCII 32 to 127
|
; 96 characters from ASCII 32 to 127
|
||||||
; 8 pixels wide, 8 pixels high
|
; 8 pixels wide, 8 pixels high
|
||||||
; bit value 0 = foreground, bit value 1 = background / transparent
|
; bit value 0 = foreground, bit value 1 = background / transparent
|
||||||
font:
|
font:
|
||||||
; VERSAIL
|
; VERSAIL
|
||||||
.byte $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF ;32
|
.byte $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF ;32
|
||||||
|
Reference in New Issue
Block a user