Apple-2-SW/pitch-dark
1
0
Fork 0
mirror of https://github.com/a2-4am/pitch-dark.git synced 2024-06-23 21:29:29 +00:00
Code Issues Projects Releases Wiki Activity

.

Browse Source
This commit is contained in:
4am 2018-03-31 12:31:49 -04:00
parent 066413c267
commit 5aecacbd00
2 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/pitchdark.a
View File

@ -63,14 +63,14 @@ MainScreen
jsr WeeGUI jsr WeeGUI
jsr PaintAllViews ; draw all UI elements jsr PaintAllViews ; draw all UI elements
bit $C010 ; clear keyboard strobe bit $C010 ; clear keyboard strobe
.runLoop .mainRunLoop
ldx #WGPendingViewAction ldx #WGPendingViewAction
jsr WeeGUI ; handle mouse movement and clicks jsr WeeGUI ; handle mouse movement and clicks
lda $c000 lda $c000
bpl .runLoop bpl .mainRunLoop
bit $c010 bit $c010
jsr HandleKey ; handle keypresses jsr HandleKey ; handle keypresses
bra .runLoop bra .mainRunLoop
ExitWeeGUI ExitWeeGUI
ldx #WGDisableMouse ; disable mouse support before quitting ldx #WGDisableMouse ; disable mouse support before quitting

14
src/ui.main.keys.a
View File

@ -248,18 +248,18 @@ callback_boxart
sta $C052 sta $C052
sta $C054 sta $C054
sta $C050 sta $C050
bit $C010 bit $C010 ; clear keyboard strobe
ldx #WGClearPendingClick ldx #WGClearPendingClick ; clear WeeGUI mouse strobe
jsr WeeGUI jsr WeeGUI
- .boxArtRunLoop
ldx #WGPendingClick ldx #WGPendingClick
jsr WeeGUI jsr WeeGUI
cpx #$FF cpx #$FF
bne + bne + ; X != #$FF -> user clicked mouse
lda $C000 lda $C000
bpl - bpl .boxArtRunLoop
+ bit $C010 + bit $C010 ; clear keyboard strobe
ldx #WGClearPendingClick ldx #WGClearPendingClick ; clear WeeGUI mouse strobe
jsr WeeGUI jsr WeeGUI
sta $C051 ; back to text sta $C051 ; back to text
rts rts