aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorB. Watson <yalhcru@gmail.com>2016-02-11 06:22:19 -0500
committerB. Watson <yalhcru@gmail.com>2016-02-11 06:22:19 -0500
commit01b6bf2b5445399526aa2850329c160441ed0791 (patch)
treeae69b135572d38498d6bda8f3a40407f19005c6f
parent12c87c593f65cc3db16fa5b322bc9bdd2b8d55e5 (diff)
downloadtaipan-01b6bf2b5445399526aa2850329c160441ed0791.tar.gz
B now cycles thru all 16 hues; sound ON now followed by normal space, not invers
-rw-r--r--newtitle.s43
1 files changed, 28 insertions, 15 deletions
diff --git a/newtitle.s b/newtitle.s
index 75dae91..f2138f4 100644
--- a/newtitle.s
+++ b/newtitle.s
@@ -22,6 +22,8 @@ origin = *
; location sound code will look at to see whether sound
; is disabled (0 = enabled, !0 = disabled). If you
; change this here, change it in sounds.h also!
+ ; in case you're wondering, $03c0 is the start of the printer
+ ; buffer. Taipan doesn't print, so no problem.
sound_disabled = $03c0
; since we're changing the font and colors, we'll save the old
@@ -65,9 +67,12 @@ help_size = * - help_rom
.out .sprintf("help_size == %x", help_size)
.endif
-colorchoices:
- .byte $c0,$10,$00
-colorcount = (*-colorchoices)-1
+; background colors now cycles thru all 16 hues
+;colorchoices:
+ ;.byte $c0,$10,$00
+;colorcount = (*-colorchoices)-1
+default_bg = $c0 ; green
+
textchoices:
.byte $08,$0a,$0c,$0e
textcount = (*-textchoices)-1
@@ -82,7 +87,7 @@ wait:
; this is needed to prevent the DL from crossing a 1K boundary.
filler:
- .repeat 3
+ .repeat 5
.byte $aa
.endrepeat
@@ -166,9 +171,9 @@ sounddisp = help + 78
start:
.ifdef CART_TARGET
- lda #$42 ; finish display list. this part has to be in RAM.
- sta dl_ram
- lda #<version
+ lda #$42 ; finish display list. this part has to be in RAM,
+ sta dl_ram ; so we can change the LMS target to show the different
+ lda #<version ; lines of help.
sta help_lms
lda #>version
sta help_lms+1
@@ -179,6 +184,7 @@ start:
lda #>dlist
sta help_lms+4
+ ; copy the help text into RAM, where it can be modified.
ldx #0
@hsloop:
lda help_rom,x
@@ -197,7 +203,8 @@ start:
sta color2save
; setup color registers
- lda colorchoices
+ ;lda colorchoices
+ lda #default_bg
sta COLOR2 ; text bg
lda textchoices
sta COLOR1 ; text fg
@@ -290,8 +297,8 @@ start:
; wait for user to press a key
wait4key:
- lda colorchoices,x
- sta COLOR2
+ ;lda colorchoices,x
+ ;sta COLOR2
lda textchoices,y
sta COLOR1
lda CH
@@ -329,10 +336,16 @@ not_esc:
not_s:
cmp #21 ; B key
bne not_b
- dex
- bpl x_ok
- ldx #colorcount
- bne x_ok
+ lda COLOR2
+ clc
+ adc #$10 ; next hue ($f0 wraps around to $00)
+ sta COLOR2
+ clc
+ bcc x_ok
+ ;dex
+ ;bpl x_ok
+ ;ldx #colorcount
+ ;bne x_ok
not_b:
cmp #45 ; T key
@@ -373,7 +386,7 @@ enable_disable_sound:
now_on:
lda #174 ; inverse N screen code
sta sounddisp
- lda #128 ; inverse space screen code
+ lda #0 ; space screen code
sta sounddisp+1
rts