Apple-2-SW/pitch-dark
1
0
Fork 0
mirror of https://github.com/a2-4am/pitch-dark.git synced 2025-02-02 08:30:50 +00:00
Code Issues Projects Releases Wiki Activity

repaint refactor

Browse Source
This commit is contained in:
4am 2018-02-07 21:41:07 -05:00
parent a3e31f149e
commit e38436ed8d
1 changed files with 13 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
src/paint.a
View File

@ -102,6 +102,13 @@ PaintAllViews
jsr WeeGUI
jsr .paintTitleView
jsr .paintInfoView
ldx #WGSelectView
lda #ID_DESCRIPTION
jsr WeeGUI
ldx #WGPaintView
jsr WeeGUI
jmp .paintDescriptionView
;------------------------------------------------------------------------------
@ -124,7 +131,7 @@ RepaintSomeViews
.paintTitleView
ldx #WGSelectView
lda #0
lda #ID_TITLE
jsr WeeGUI
jsr INVERSE
ldx #WGPrint
@ -138,13 +145,12 @@ RepaintSomeViews
.paintDescriptionView
ldx #WGSelectView
lda #13
jsr WeeGUI
ldx #WGEraseViewContents
lda #ID_DESCRIPTION
jsr WeeGUI
;ldx #WGEraseViewContents
;jsr WeeGUI
lda addrDescription
ldy addrDescription+1
ldx #1
jsr .multiPrint
lda .vtab+1
cmp #10
@ -161,14 +167,13 @@ RepaintSomeViews
jsr WeeGUI
lda addrInfo
ldy addrInfo+1
ldx #0
; note: execution falls through here
.multiPrint
sta $00
sty $01
stx .htab+1
stx .vtab+1
stz .htab+1
stz .vtab+1
.printLoop
lda ($00)
beq .printDone