!active = $7f9d05

STZ $1401	;disable L/R scrolling

lda #$01
sta $7f9da1     ; disable L/R on HUD
sta $7f9da3     ; Set R Power on HUD

LDA $18		;check if controller button is newly pressed..
AND #$10	;R button
BEQ Return	;

;Toggle Active

lda !active
beq GrantStar

RemoveStar:

lda #$00
sta $1490
lda #$00
sta !active

GrantStar:

LDA #$10
STA $1490
lda #$00
sta !active

Return:

RTL

back to listings