- Improvements to BASIC sample code
- Fixed button painting leaving text in inverse
This commit is contained in:
Quinn Dunki 2015-02-07 17:22:02 -08:00
parent 36e4157db7
commit 2b4a194df3
3 changed files with 6 additions and 1 deletions

View File

@ -47,7 +47,7 @@ main:
; Show off some WeeGUI features
;jmp tortureTestPrint
;jmp tortureTestRects
jmp tortureTestRects
ldx #WGClearScreen
jsr WeeGUI

View File

@ -377,6 +377,9 @@ paintCheck_done:
; Y: Index into view records of button to paint
; Side effects: Clobbers all registers,P0,P1,S1
paintButton:
lda INVERSE ; Preserve INVERSE state during this
pha
lda WG_VIEWRECORDS+12,y ; Prep the title string
sta PARAM0
lda WG_VIEWRECORDS+13,y
@ -438,6 +441,8 @@ paintButton_titleMarginRightLoop:
jmp paintButton_titleMarginRightLoop
paintButton_done:
pla ; Restore inverse state
sta INVERSE
rts

Binary file not shown.