User Tools

Site Tools

Trace:
base:colour_flashing_notewriter_style

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

— base:colour_flashing_notewriter_style [2015-04-17 04:30] (current)
Line 1: Line 1:
 +==== Colour Flashing Notewriter Style ====
 +Have you saw programs like Face Noter, Octanoter, etc. All those programs use a special extra colour mode, to activate char flashing. Some of you may find it to be really difficult to understand how it works, but it is actually *that* easy to remember. All you need to do is switch $D011 to $5b to get extra colour mode, and create a colour cycling routine. Here's a routine for it.
 +
 +<code> 
 +;===============================
 +;Flashing colours in EBC mode
 +;===============================
 +
 +flashpt = $02
 +
 +           !to "flasher.prg",cbm
 +           * = $0810
 +           sei
 +           lda #$00
 +           sta flashpt
 +           sta $d020
 +           sta $d021
 +           lda #<irq
 +           ldx #>irq
 +           sta $314
 +           stx $315
 +           lda #$7f
 +           sta $dc0d
 +           lda #$5b
 +           sta $d011 ;Swich on EBC mode
 +           lda #$01
 +           sta $d01a
 +           cli
 +           rts ;Just end here for now
 +irq        inc $d019
 +           jsr flash
 +           jmp $ea31
 +
 +flash      inc flashpt
 +           lda colour1,x
 +           sta $d022 ;EBC Multicolour 1
 +           lda colour2,x
 +           sta $d023 ;EBC Multicolour 2
 +           lda colour3,x
 +           sta $d024 ;EBC Multicolour 3
 +           inx
 +           cpx #$28
 +           beq resetf
 +           inc flashpt
 +           rts
 +resetf     ldx #$00
 +           stx flashpt
 +           rts
 +
 +colour1    !byte $09,$09,$02,$02,$08,$08,$0a,$0a
 +           !byte $07,$07,$01,$01,$07,$07,$0a,$0a
 +           !byte $08,$08,$02,$02,$09,$09,$00,$00
 +           !byte $00,$00,$00,$00,$00,$00,$00,$00
 +           !byte $00,$00,$00,$00,$00,$00,$00,$00
 +           !byte $00
 +
 +colour2    !byte $06,$06,$04,$04,$0e,$0e,$05,$05
 +           !byte $0d,$0d,$01,$01,$0d,$0d,$05,$05
 +           !byte $0e,$0e,$04,$04,$06,$06,$00,$00
 +           !byte $00,$00,$00,$00,$00,$00,$00,$00
 +           !byte $00,$00,$00,$00,$00,$00,$00,$00
 +           !byte $00
 +
 +colour3    !byte $00,$00,$00,$00,$00,$00,$00,$00
 +           !byte $00,$00,$09,$09,$02,$02,$08,$08
 +           !byte $05,$05,$0d,$0d,$01,$01,$0d,$0d
 +           !byte $05,$05,$08,$08,$02,$02,$09,$09
 +           !byte $00,$00,$00,$00,$00,$00,$00,$00
 +</code>
  
base/colour_flashing_notewriter_style.txt ยท Last modified: 2015-04-17 04:30 (external edit)

Page Tools