diff options
Diffstat (limited to 'newtitle.s')
-rw-r--r-- | newtitle.s | 36 |
1 files changed, 36 insertions, 0 deletions
@@ -4,6 +4,11 @@ .include "atari.inc" + ; 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! +sound_disabled = $06ff + ; where our screen was loaded (see newtitle.pl) screendata = $9000 @@ -27,6 +32,7 @@ helphitbl: .byte >help .byte >(help+32) .byte >(help+64) + .byte >(help+96) .byte 0 helplotbl: @@ -34,10 +40,14 @@ helplotbl: .byte <help .byte <(help+32) .byte <(help+64) + .byte <(help+96) .byte 0 helpshowing = FR1 +; N<space> or FF (inverse) +sounddisp = help + 78 + colorchoices: .byte $c0,$10,$00 @@ -101,6 +111,7 @@ wait4key: bne not_esc ; show next line of help +showhelp: stx FR1+1 ldx helpshowing inx @@ -119,6 +130,13 @@ helpok: bcc x_ok not_esc: + cmp #62 ; S key + bne not_s + jsr enable_disable_sound + clc + bcc showhelp + +not_s: cmp #21 ; B key bne not_b dex @@ -151,6 +169,24 @@ wait: beq wait rts +enable_disable_sound: + lda #2 + sta helpshowing + lda sound_disabled + eor #$01 + sta sound_disabled + beq now_on + lda #166 ; inverse F screen code + sta sounddisp + sta sounddisp+1 + rts +now_on: + lda #174 ; inverse N screen code + sta sounddisp + lda #128 ; inverse space screen code + sta sounddisp+1 + rts + ; display list here dlist: .byte $70 ; 24 scanlines of blanks |