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

resize version dialog based on number of available versions

Browse Source
This commit is contained in:
4am 2018-04-11 18:55:28 -04:00
parent 4a698edb5c
commit 385c2fa55f
7 changed files with 34 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
res/text/amfv.txt
View File

@ -31,8 +31,8 @@
for the "Class One Security Mode Access Decoder" is always 12. for the "Class One Security Mode Access Decoder" is always 12.
[versions] [versions]
R79.DEPROT.Z4=Release 79 / Serial number 851122 R79.DEPROT.Z4=Release 79 / Serial number 851122 (patched)
R77.DEPROT.Z4=Release 77 / Serial number 850814 R77.DEPROT.Z4=Release 77 / Serial number 850814 (patched)
[options] [options]
ARTWORK=1 ARTWORK=1

4
res/text/bureaucracy.txt
View File

@ -40,8 +40,8 @@
are asked five questions in the paranoid's house, you may give any answers. are asked five questions in the paranoid's house, you may give any answers.
[versions] [versions]
R116.DEPROT.Z4=Release 116 / Licence number 870602 R116.DEPROT.Z4=Release 116 / Licence number 870602 (patched)
R86.DEPROT.Z4=Release 86 / Licence number 870212 R86.DEPROT.Z4=Release 86 / Licence number 870212 (patched)
[options] [options]
ARTWORK=1 ARTWORK=1

10
res/text/sorcerer.txt
View File

@ -22,11 +22,11 @@
white, gray, black, red, black. white, gray, black, red, black.
[versions] [versions]
R18.DEPROT.Z3=Release 18 / Serial number 860904 R18.DEPROT.Z3=Release 18 / Serial number 860904 (patched)
R15.DEPROT.Z3=Release 15 / Serial number 851108 R15.DEPROT.Z3=Release 15 / Serial number 851108 (patched)
R13.DEPROT.Z3=Release 13 / Serial number 851021 R13.DEPROT.Z3=Release 13 / Serial number 851021 (patched)
R6.DEPROT.Z3=Release 6 / Serial number 840508 R6.DEPROT.Z3=Release 6 / Serial number 840508 (patched)
R4.DEPROT.Z3=Release 4 / Serial number 840131 R4.DEPROT.Z3=Release 4 / Serial number 840131 (patched)
[options] [options]
ARTWORK=1 ARTWORK=1

4
res/text/spellbreaker.txt
View File

@ -26,8 +26,8 @@
it look easy." The answer is Barsap. it look easy." The answer is Barsap.
[versions] [versions]
R87.DEPROT.Z3=Release 87 / Serial number 860904 R87.DEPROT.Z3=Release 87 / Serial number 860904 (patched)
R63.DEPROT.Z3=Release 63 / Serial number 850916 R63.DEPROT.Z3=Release 63 / Serial number 850916 (patched)
[options] [options]
ARTWORK=1 ARTWORK=1

2
res/text/stationfall.txt
View File

@ -42,7 +42,7 @@
just enter the current GST (displayed at the top of the screen). just enter the current GST (displayed at the top of the screen).
[versions] [versions]
R107.DEPROT.Z3=Release 107 / Serial number 870430 R107.DEPROT.Z3=Release 107 / Serial number 870430 (patched)
[options] [options]
ARTWORK=1 ARTWORK=1

2
src/ui.common.a
View File

@ -62,7 +62,7 @@ CreateButton
; creates a WeeGUI decorated frame view ; creates a WeeGUI decorated frame view
; ;
; in: WeeGUI initialized ; in: WeeGUI initialized
; stack contains 8 bytes of parameters: ; stack contains 4 bytes of parameters:
; +1 [word] address of WeeGUI view configuration block for frame ; +1 [word] address of WeeGUI view configuration block for frame
; +3 [word] address of null-terminated string for frame title ; +3 [word] address of null-terminated string for frame title
; out: $00/$01 clobbered ; out: $00/$01 clobbered

33
src/ui.versions.a
View File

@ -75,17 +75,19 @@ VersionsDialog
!word gVersionsStore !word gVersionsStore
sta .numVersions sta .numVersions
; TODO calculate proper height based on number of available versions asl
ldy #3 inc
sty kViewVersionsFrame+3 ; frame top sta kViewVersionsFrame+5 ; frame visible height = 1 + (2 * numVersions)
iny sta kViewVersionsFrame+7 ; frame height
sty kViewVersionsOK+2 ; OK top lda #12
iny sec
iny sbc .numVersions
sty kViewVersionsCancel+2 ; Cancel top sta kViewVersionsFrame+3 ; frame top = 12 - numVersions
ldy #19 inc
sty kViewVersionsFrame+5 ; frame visible height sta kViewVersionsOK+2 ; OK top = frame top + 1
sty kViewVersionsFrame+7 ; frame height inc
inc
sta kViewVersionsCancel+2 ; Cancel top = OK top + 2
jsr CreateDialog jsr CreateDialog
!word kViewVersionsFrame !word kViewVersionsFrame
@ -96,7 +98,7 @@ VersionsDialog
jsr CreateButton jsr CreateButton
!word kViewVersionsCancel !word kViewVersionsCancel
ldx #0 ldx #0 ; X = index of radio button (0-based)
.createRadioLoop .createRadioLoop
phx phx
lda #1 lda #1
@ -107,6 +109,13 @@ VersionsDialog
lda kVersions,x lda kVersions,x
ldy kVersions+1,x ldy kVersions+1,x
+STAY + +STAY +
+STAY SRC
txa
inc
clc
adc kViewVersionsFrame+3
ldy #2
sta (SRC),y ; radio button top = frame top + 1 + (2 * X)
jsr CreateRadio ; create radio button for this version (will print label later) jsr CreateRadio ; create radio button for this version (will print label later)
+ !word $FDFD ; SMC + !word $FDFD ; SMC
plx plx