diff --git a/src/pitchdark.a b/src/pitchdark.a index a73caa4..22e7d7a 100644 --- a/src/pitchdark.a +++ b/src/pitchdark.a @@ -63,14 +63,14 @@ MainScreen jsr WeeGUI jsr PaintAllViews ; draw all UI elements bit $C010 ; clear keyboard strobe -.runLoop +.mainRunLoop ldx #WGPendingViewAction jsr WeeGUI ; handle mouse movement and clicks lda $c000 - bpl .runLoop + bpl .mainRunLoop bit $c010 jsr HandleKey ; handle keypresses - bra .runLoop + bra .mainRunLoop ExitWeeGUI ldx #WGDisableMouse ; disable mouse support before quitting diff --git a/src/ui.main.keys.a b/src/ui.main.keys.a index 393b8a0..9a9ae51 100644 --- a/src/ui.main.keys.a +++ b/src/ui.main.keys.a @@ -248,18 +248,18 @@ callback_boxart sta $C052 sta $C054 sta $C050 - bit $C010 - ldx #WGClearPendingClick + bit $C010 ; clear keyboard strobe + ldx #WGClearPendingClick ; clear WeeGUI mouse strobe jsr WeeGUI -- +.boxArtRunLoop ldx #WGPendingClick jsr WeeGUI cpx #$FF - bne + + bne + ; X != #$FF -> user clicked mouse lda $C000 - bpl - -+ bit $C010 - ldx #WGClearPendingClick + bpl .boxArtRunLoop ++ bit $C010 ; clear keyboard strobe + ldx #WGClearPendingClick ; clear WeeGUI mouse strobe jsr WeeGUI sta $C051 ; back to text rts