mirror of
https://github.com/a2stuff/prodos-drivers.git
synced 2024-12-26 17:29:33 +00:00
Text color themes: Don't force 40 col/text or clear the text screen
This commit is contained in:
parent
3e0d41b809
commit
a6d4fa6308
@ -12,16 +12,6 @@
|
||||
;;; ************************************************************
|
||||
|
||||
.proc maybe_install_driver
|
||||
bit ROMIN2
|
||||
sta CLR80VID
|
||||
sta CLRALTCHAR
|
||||
sta CLR80COL
|
||||
jsr SETVID
|
||||
jsr SETKBD
|
||||
jsr SETNORM
|
||||
jsr INIT
|
||||
jsr HOME
|
||||
|
||||
lda #$C0 ; text: bright greeen on black
|
||||
sta TBCOLOR
|
||||
lda #$00 ; border: black
|
||||
|
@ -12,16 +12,6 @@
|
||||
;;; ************************************************************
|
||||
|
||||
.proc maybe_install_driver
|
||||
bit ROMIN2
|
||||
sta CLR80VID
|
||||
sta CLRALTCHAR
|
||||
sta CLR80COL
|
||||
jsr SETVID
|
||||
jsr SETKBD
|
||||
jsr SETNORM
|
||||
jsr INIT
|
||||
jsr HOME
|
||||
|
||||
lda #$0f ; text: black on white
|
||||
sta TBCOLOR
|
||||
lda #$0f ; border: white
|
||||
|
@ -12,16 +12,6 @@
|
||||
;;; ************************************************************
|
||||
|
||||
.proc maybe_install_driver
|
||||
bit ROMIN2
|
||||
sta CLR80VID
|
||||
sta CLRALTCHAR
|
||||
sta CLR80COL
|
||||
jsr SETVID
|
||||
jsr SETKBD
|
||||
jsr SETNORM
|
||||
jsr INIT
|
||||
jsr HOME
|
||||
|
||||
lda #$f2 ; text: white on dark blue
|
||||
sta TBCOLOR
|
||||
lda #$02 ; text: dark blue
|
||||
|
@ -12,16 +12,6 @@
|
||||
;;; ************************************************************
|
||||
|
||||
.proc maybe_install_driver
|
||||
bit ROMIN2
|
||||
sta CLR80VID
|
||||
sta CLRALTCHAR
|
||||
sta CLR80COL
|
||||
jsr SETVID
|
||||
jsr SETKBD
|
||||
jsr SETNORM
|
||||
jsr INIT
|
||||
jsr HOME
|
||||
|
||||
lda #$5a ; text: dark gray on light gray
|
||||
sta TBCOLOR
|
||||
lda #$0a ; border: gray
|
||||
|
@ -12,16 +12,6 @@
|
||||
;;; ************************************************************
|
||||
|
||||
.proc maybe_install_driver
|
||||
bit ROMIN2
|
||||
sta CLR80VID
|
||||
sta CLRALTCHAR
|
||||
sta CLR80COL
|
||||
jsr SETVID
|
||||
jsr SETKBD
|
||||
jsr SETNORM
|
||||
jsr INIT
|
||||
jsr HOME
|
||||
|
||||
lda #$f6 ; border: white on medium blue
|
||||
sta TBCOLOR
|
||||
lda #$06 ; border: medium blue
|
||||
|
@ -12,16 +12,6 @@
|
||||
;;; ************************************************************
|
||||
|
||||
.proc maybe_install_driver
|
||||
bit ROMIN2
|
||||
sta CLR80VID
|
||||
sta CLRALTCHAR
|
||||
sta CLR80COL
|
||||
jsr SETVID
|
||||
jsr SETKBD
|
||||
jsr SETNORM
|
||||
jsr INIT
|
||||
jsr HOME
|
||||
|
||||
lda #$2e ; text: dark blue on bright green
|
||||
sta TBCOLOR
|
||||
lda #$0e ; border: bright green
|
||||
|
@ -12,16 +12,6 @@
|
||||
;;; ************************************************************
|
||||
|
||||
.proc maybe_install_driver
|
||||
bit ROMIN2
|
||||
sta CLR80VID
|
||||
sta CLRALTCHAR
|
||||
sta CLR80COL
|
||||
jsr SETVID
|
||||
jsr SETKBD
|
||||
jsr SETNORM
|
||||
jsr INIT
|
||||
jsr HOME
|
||||
|
||||
lda #$5b ; text: gray on pink
|
||||
sta TBCOLOR
|
||||
lda #$07 ; border: light blue
|
||||
|
@ -12,16 +12,6 @@
|
||||
;;; ************************************************************
|
||||
|
||||
.proc maybe_install_driver
|
||||
bit ROMIN2
|
||||
sta CLR80VID
|
||||
sta CLRALTCHAR
|
||||
sta CLR80COL
|
||||
jsr SETVID
|
||||
jsr SETKBD
|
||||
jsr SETNORM
|
||||
jsr INIT
|
||||
jsr HOME
|
||||
|
||||
lda #$f0 ; text: white on black
|
||||
sta TBCOLOR
|
||||
lda #$00 ; border: black
|
||||
|
Loading…
Reference in New Issue
Block a user