RealmFiles/Script/Script60029.txt

2589 lines
38 KiB
Plaintext

export60029_0 = code_00f9
export60029_1 = code_115d
export60029_2 = code_117d
export60029_3 = code_11b9
export60029_4 = code_1209
UnderlineItem::setSize:
link $3
pToa left
sat temp[$1]
pToa top
sat temp[$2]
pushi $4e ; 78, 'N', width
push1
pushi $4e ; 78, 'N', width
push0
pToa scratch
send $4
bnot
push
ldi $8 ; fixPriority
add
push
self $6
bnot
pushi $e1 ; 225, height
push1
push2
self $6
bnot
pushi $db ; 219, moveTo
push2
lst temp[$1]
lst temp[$2]
self $8
bnot
ret
UnderlineItem::draw:
link $4
pToa bitmap
sat temp[$3]
bnt code_00d2
push1
pushSelf
callk kernel_31, $2
bnot
pushi $9f ; 159, add
push1
pTos bitmap
lag global[$66]
send $6
bnot
code_00d2: pushi $5 ; scaleY
push0
pushi $4e ; 78, 'N', width
push0
self $4
bnot
push
pushi $e1 ; 225, height
push0
self $4
bnot
push
push0
pushi $ff ; 255, asInteger
callk kernel_35, $a
bnot
aTop bitmap
lat temp[$3]
bnt code_00f8
push1
pushSelf
callk kernel_30, $2
bnot
code_00f8: ret
; export60029_0
code_00f9: link $2f
lap param[$1]
sap param[$1]
pushi $a6 ; 166, release
push0
lofsa centeredItems
send $4
bnot
ldi $0
sat temp[$20]
lat temp[$25]
sat temp[$25]
ldi $ff ; 255, asInteger
sat temp[$e]
sat temp[$d]
pushi $25 ; 37, '%', fore
push0
lag global[$9]
send $4
bnot
sat temp[$18]
pushi $26 ; 38, '&', back
push0
lag global[$9]
send $4
bnot
sat temp[$19]
ldi $5 ; scaleY
sat temp[$17]
ldi $0
sat temp[$16]
ldi $0
sat temp[$15]
sat temp[$14]
ldi $0
sat temp[$1b]
ldi $0
sat temp[$8]
pushi $1d3 ; 467, modal
push0
lag global[$7]
bnt code_014b
jmp code_014d
code_014b: class Dialog
code_014d: send $4
bnot
sat temp[$13]
ldi $0
sat temp[$24]
ldi $6 ; maxScale
sat temp[$12]
lag global[$3a]
sat temp[$7]
ldi $0
sat temp[$10]
sat temp[$f]
pushi $20 ; 32, ' ', name
push1
lofsa string_00aa ; "PrintD"
push
pushi $8d ; 141, new
push0
lag global[$7]
bnt code_0175
jmp code_0177
code_0175: class Dialog
code_0177: send $4
bnot
sat temp[$0]
send $6
bnot
push0
push0
lat temp[$0]
send $4
bnot
sat temp[$c]
lat temp[$12]
sat temp[$3]
ldi $0
sat temp[$4]
ldi $0
lapi param[$1]
bnt code_021b
pushi $d0 ; 208, with
push1
push2
pushi $9 ; inLeft
ldi $0
lspi param[$1]
callk kernel_91, $4
bnot
push
class Str
send $6
bnot
sat temp[$1]
pushi $17d ; 381, addItem
pushi $7 ; priority
class TextItem
push
pushi $23 ; 35, '#', text
pushi $71 ; 113, 'q', data
push0
lat temp[$1]
send $4
bnot
push
pushi $2a ; 42, '*', font
lsg global[$3a]
pushi $25 ; 37, '%', fore
dup
push0
lat temp[$c]
send $4
bnot
push
lat temp[$0]
send $12
bnot
sat temp[$6]
sat temp[$20]
pushi $71 ; 113, 'q', data
push1
push0
pushi $95 ; 149, dispose
push0
lat temp[$1]
send $a
bnot
pushi $249 ; 585, posnItem
pushi $3 ; z
lst temp[$6]
push0
push0
pushi $1be ; 446, setSize
push1
lst temp[$6]
lat temp[$0]
send $10
bnot
lat temp[$6]
sat temp[$f]
sat temp[$10]
pushi $87 ; 135, left
push0
lat temp[$c]
send $4
bnot
sat temp[$3]
pushi $8a ; 138, bottom
push0
lat temp[$c]
send $4
bnot
push
lat temp[$12]
add
sat temp[$4]
code_021b: pushi $5a ; 90, 'Z', size
push0
lat temp[$0]
send $4
bnot
sat temp[$1c]
ldi $0
sat temp[$1d]
ldi $1
sat temp[$a]
code_022d: lst temp[$a]
lap param[$0]
lt?
bnt code_101b
ldi $0
sat temp[$f]
sat temp[$2]
lat temp[$1d]
bnt code_0245
ldi $0
sat temp[$1d]
jmp code_0276
code_0245: pushi $87 ; 135, left
push0
lat temp[$c]
send $4
bnot
sat temp[$3]
lst temp[$1c]
pushi $5a ; 90, 'Z', size
push0
lat temp[$0]
send $4
bnot
ne?
bnt code_0276
pushi $5a ; 90, 'Z', size
push0
lat temp[$0]
send $4
bnot
sat temp[$1c]
pushi $8a ; 138, bottom
push0
lat temp[$c]
send $4
bnot
push
lat temp[$12]
add
sat temp[$4]
code_0276: lat temp[$a]
lspi param[$1]
dup
ldi $65 ; 101, 'e', topString
eq?
bnt code_028f
pushi $27 ; 39, ''', mode
push1
+at temp[$a]
lspi param[$1]
lat temp[$6]
send $6
bnot
jmp code_0ad1
code_028f: dup
ldi $69 ; 105, 'i', hide
eq?
bnt code_02bf
pushi $2a ; 42, '*', font
push1
+at temp[$a]
lapi param[$1]
sat temp[$7]
push
lat temp[$0]
send $6
bnot
pushi $2a ; 42, '*', font
push1
lst temp[$7]
pushi $1be ; 446, setSize
push1
pushi $1c3 ; 451, fixedWidth
push0
lat temp[$c]
send $4
bnot
push
lat temp[$6]
send $c
bnot
jmp code_0ad1
code_02bf: dup
ldi $6a ; 106, 'j', scaleSignal
eq?
bnt code_02f1
pushi $1c3 ; 451, fixedWidth
push1
+at temp[$a]
lspi param[$1]
lat temp[$c]
send $6
bnot
pushi $1be ; 446, setSize
push1
pushi $1c3 ; 451, fixedWidth
push0
lat temp[$c]
send $4
bnot
push
lat temp[$6]
send $6
bnot
pushi $1be ; 446, setSize
push0
lat temp[$0]
send $4
bnot
jmp code_0ad1
code_02f1: dup
ldi $90 ; 144, bitGetIndex
eq?
bnt code_031b
pushi $1c4 ; 452, fixedHeight
push1
+at temp[$a]
lspi param[$1]
lat temp[$c]
send $6
bnot
pushi $e1 ; 225, height
push1
pushi $1c4 ; 452, fixedHeight
push0
lat temp[$c]
send $4
bnot
push
lat temp[$c]
send $6
bnot
jmp code_0ad1
code_031b: dup
ldi $64 ; 100, 'd', moveDone
eq?
bnt code_0330
+at temp[$a]
lapi param[$1]
sat temp[$d]
+at temp[$a]
lapi param[$1]
sat temp[$e]
jmp code_0ad1
code_0330: dup
ldi $7a ; 122, 'z', borderColor
eq?
bnt code_0350
pushi $95 ; 149, dispose
push0
lat temp[$c]
send $4
bnot
+at temp[$a]
lapi param[$1]
sat temp[$c]
push0
push1
push
lat temp[$0]
send $6
bnot
jmp code_0ad1
code_0350: dup
ldi $66 ; 102, 'f', flags
eq?
bnt code_037d
pushi $25 ; 37, '%', fore
push1
+at temp[$a]
lspi param[$1]
lat temp[$c]
send $6
bnot
lst temp[$18]
pushi $25 ; 37, '%', fore
push0
lag global[$9]
send $4
bnot
eq?
bnt code_0ad1
pushi $25 ; 37, '%', fore
push0
lat temp[$c]
send $4
bnot
sat temp[$18]
jmp code_0ad1
code_037d: dup
ldi $67 ; 103, 'g', quitGame
eq?
bnt code_03aa
pushi $26 ; 38, '&', back
push1
+at temp[$a]
lspi param[$1]
lat temp[$c]
send $6
bnot
lst temp[$19]
pushi $26 ; 38, '&', back
push0
lag global[$9]
send $4
bnot
eq?
bnt code_0ad1
pushi $26 ; 38, '&', back
push0
lat temp[$c]
send $4
bnot
sat temp[$19]
jmp code_0ad1
code_03aa: dup
ldi $80 ; 128, lastKey
eq?
bnt code_03c0
pushi $7 ; priority
push1
+at temp[$a]
lspi param[$1]
lat temp[$c]
send $6
bnot
jmp code_0ad1
code_03c0: dup
ldi $73 ; 115, 's', center
eq?
bnt code_03d6
pushi $be ; 190, seconds
push1
+at temp[$a]
lspi param[$1]
lat temp[$0]
send $6
bnot
jmp code_0ad1
code_03d6: dup
ldi $75 ; 117, 'u', show
eq?
bnt code_03e4
push0
callk kernel_33, $0
bnot
jmp code_0ad1
code_03e4: dup
ldi $72 ; 114, 'r', skip
eq?
bnt code_03fb
pushi $7 ; priority
push1
pushi $f ; 15, loop
lat temp[$c]
send $6
bnot
ldi $0
sat temp[$13]
jmp code_0ad1
code_03fb: dup
ldi $91 ; 145, bitPutIndex
eq?
bnt code_040b
+at temp[$a]
lapi param[$1]
sat temp[$13]
jmp code_0ad1
code_040b: dup
ldi $96 ; 150, isClass
eq?
bnt code_042f
pushi $9d ; 157, eachElementDo
pushi $3 ; z
pushi $dd ; 221, moveBy
+at temp[$a]
lspi param[$1]
+at temp[$a]
lspi param[$1]
pushi $1be ; 446, setSize
push0
lat temp[$0]
send $e
bnot
jmp code_0ad1
code_042f: dup
ldi $74 ; 116, 't', all
eq?
bnt code_0503
pushi $17d ; 381, addItem
pushi $5 ; scaleY
class TitleItem
push
pushi $23 ; 35, '#', text
+at temp[$a]
lspi param[$1]
pushi $25 ; 37, '%', fore
lsg global[$55]
lat temp[$0]
send $e
bnot
sat temp[$f]
lst temp[$24]
ldi $0
eq?
bnt code_0489
pushi $9d ; 157, eachElementDo
pushi $3 ; z
pushi $dd ; 221, moveBy
push0
pushi $e1 ; 225, height
push0
lat temp[$f]
send $4
bnot
push
ldi $6 ; maxScale
add
push
pushi $249 ; 585, posnItem
pushi $3 ; z
lst temp[$f]
pushi $fb ; 251, subStr
push0
pushi $1be ; 446, setSize
push0
lat temp[$0]
send $18
bnot
lat temp[$f]
sat temp[$24]
jmp code_049e
code_0489: pushi $249 ; 585, posnItem
pushi $3 ; z
lst temp[$f]
pushi $fb ; 251, subStr
lst temp[$4]
pushi $1be ; 446, setSize
push0
lat temp[$0]
send $e
bnot
code_049e: pushi $8c ; 140, scratch
push1
lst temp[$f]
pushi $1be ; 446, setSize
push0
pushi $8d ; 141, new
push0
class UnderlineItem
send $4
bnot
sat temp[$1f]
send $a
bnot
pushi $9f ; 159, add
push2
lst temp[$f]
lst temp[$1f]
lofsa centeredItems
send $8
bnot
pushi $9f ; 159, add
push1
lst temp[$1f]
lat temp[$0]
send $6
bnot
pushi $249 ; 585, posnItem
pushi $3 ; z
lst temp[$1f]
pushi $87 ; 135, left
push0
lat temp[$f]
send $4
bnot
push
pushi $8a ; 138, bottom
push0
lat temp[$f]
send $4
bnot
push
ldi $1
add
push
lat temp[$0]
send $a
bnot
lst temp[$24]
lat temp[$f]
eq?
bnt code_0ad1
ldi $0
sat temp[$f]
jmp code_0ad1
code_0503: dup
ldi $6e ; 110, 'n', resX
eq?
bnt code_0548
pushi $17d ; 381, addItem
pushi $7 ; priority
class TextItem
push
pushi $23 ; 35, '#', text
push2
pushi $9 ; inLeft
+at temp[$a]
lspi param[$1]
callk kernel_91, $4
bnot
push
pushi $2a ; 42, '*', font
lst temp[$7]
pushi $25 ; 37, '%', fore
dup
push0
lat temp[$c]
send $4
bnot
push
lat temp[$0]
send $12
bnot
sat temp[$f]
pushi $249 ; 585, posnItem
pushi $3 ; z
push
lst temp[$3]
lst temp[$4]
lat temp[$0]
send $a
bnot
jmp code_0ad1
code_0548: dup
ldi $76 ; 118, 'v', textLeft
eq?
bnt code_0585
pushi $17d ; 381, addItem
pushi $5 ; scaleY
class EditItem
push
pushi $23 ; 35, '#', text
push2
pushi $9 ; inLeft
+at temp[$a]
lspi param[$1]
callk kernel_91, $4
bnot
push
pushi $2e ; 46, '.', max
+at temp[$a]
lspi param[$1]
lat temp[$0]
send $e
bnot
sat temp[$f]
pushi $249 ; 585, posnItem
pushi $3 ; z
push
lst temp[$3]
lst temp[$4]
lat temp[$0]
send $a
bnot
jmp code_0ad1
code_0585: dup
ldi $7f ; 127, frameOut
eq?
bnt code_05d0
pushi $17d ; 381, addItem
pushi $9 ; inLeft
class EditItem
push
pushi $23 ; 35, '#', text
push2
pushi $9 ; inLeft
+at temp[$a]
lspi param[$1]
callk kernel_91, $4
bnot
push
pushi $2e ; 46, '.', max
+at temp[$a]
lspi param[$1]
pushi $8b ; 139, numLines
+at temp[$a]
lspi param[$1]
pushi $1dc ; 476, pRightMargin
+at temp[$a]
lspi param[$1]
lat temp[$0]
send $16
bnot
sat temp[$f]
pushi $249 ; 585, posnItem
pushi $3 ; z
push
lst temp[$3]
lst temp[$4]
lat temp[$0]
send $a
bnot
jmp code_0ad1
code_05d0: dup
ldi $94 ; 148, init
eq?
bnt code_0615
pushi $17d ; 381, addItem
pushi $7 ; priority
class EditItem
push
pushi $23 ; 35, '#', text
push2
pushi $9 ; inLeft
+at temp[$a]
lspi param[$1]
callk kernel_91, $4
bnot
push
pushi $2e ; 46, '.', max
+at temp[$a]
lspi param[$1]
pushi $1d9 ; 473, matchSelector
+at temp[$a]
lspi param[$1]
lat temp[$0]
send $12
bnot
sat temp[$f]
pushi $249 ; 585, posnItem
pushi $3 ; z
push
lst temp[$3]
lst temp[$4]
lat temp[$0]
send $a
bnot
jmp code_0ad1
code_0615: dup
ldi $78 ; 120, 'x', textRight
eq?
bnt code_065a
lat temp[$a]
lspi param[$1]
ldi $ff ; 255, asInteger
ne?
bnt code_0ad1
pushi $17d ; 381, addItem
pushi $7 ; priority
class IconItem
push
pushi $e ; 14, view
+at temp[$a]
lspi param[$1]
pushi $f ; 15, loop
+at temp[$a]
lspi param[$1]
pushi $10 ; 16, cel
+at temp[$a]
lspi param[$1]
lat temp[$0]
send $12
bnot
sat temp[$f]
pushi $249 ; 585, posnItem
pushi $3 ; z
push
lst temp[$3]
lst temp[$4]
lat temp[$0]
send $a
bnot
jmp code_0ad1
code_065a: dup
ldi $77 ; 119, 'w', textTop
eq?
bnt code_0667
ldi $1
sat temp[$2]
jmp code_0ad1
code_0667: dup
ldi $7e ; 126, '~', dimmed
eq?
bnt code_067c
ldi $1
sat temp[$2]
ldi $8 ; fixPriority
sat temp[$16]
ldi $0
sat temp[$17]
jmp code_0ad1
code_067c: dup
ldi $77 ; 119, 'w', textTop
eq?
bnt code_0689
ldi $1
sat temp[$2]
jmp code_0ad1
code_0689: dup
ldi $84 ; 132, pitch
eq?
bnt code_06c6
pushi $17d ; 381, addItem
pushi $9 ; inLeft
lsg global[$9]
pushi $e ; 14, view
+at temp[$a]
lspi param[$1]
pushi $f ; 15, loop
+at temp[$a]
lspi param[$1]
pushi $10 ; 16, cel
+at temp[$a]
lspi param[$1]
pushi $51 ; 81, 'Q', value
+at temp[$a]
lspi param[$1]
lat temp[$0]
send $16
bnot
sat temp[$f]
ldi $2
sat temp[$2]
ldi $8 ; fixPriority
sat temp[$16]
ldi $0
sat temp[$17]
jmp code_0ad1
code_06c6: dup
ldi $8e ; 142, getIndex
eq?
bnt code_071d
pushi $9f ; 159, add
push1
+at temp[$a]
lapi param[$1]
sat temp[$f]
push
lat temp[$0]
send $6
bnot
pushi $29 ; 41, ')', state
push1
pushi $29 ; 41, ')', state
push0
lat temp[$f]
send $4
bnot
push
ldi $80 ; 128, lastKey
or
push
pushi $db ; 219, moveTo
push2
lst temp[$3]
lst temp[$4]
pushi $94 ; 148, init
push1
lst temp[$0]
pushi $1be ; 446, setSize
push0
lat temp[$f]
send $18
bnot
pushi $249 ; 585, posnItem
pushi $3 ; z
lst temp[$f]
lst temp[$3]
lst temp[$4]
pushi $1be ; 446, setSize
push0
lat temp[$0]
send $e
bnot
jmp code_0ad1
code_071d: dup
ldi $8f ; 143, putIndex
eq?
bnt code_076c
pushi $9f ; 159, add
push1
+at temp[$a]
lapi param[$1]
sat temp[$f]
push
lat temp[$0]
send $6
bnot
pushi $29 ; 41, ')', state
push1
pushi $29 ; 41, ')', state
push0
lat temp[$f]
send $4
bnot
push
ldi $80 ; 128, lastKey
or
push
pushi $94 ; 148, init
push1
lst temp[$0]
pushi $1be ; 446, setSize
push0
lat temp[$f]
send $10
bnot
pushi $249 ; 585, posnItem
pushi $3 ; z
lst temp[$f]
lst temp[$3]
lst temp[$4]
pushi $1be ; 446, setSize
push0
lat temp[$0]
send $e
bnot
jmp code_0ad1
code_076c: dup
ldi $89 ; 137, top
eq?
bnt code_077c
+at temp[$a]
lapi param[$1]
sat temp[$1a]
jmp code_0ad1
code_077c: dup
ldi $8a ; 138, bottom
eq?
bnt code_0790
+at temp[$a]
lapi param[$1]
sat temp[$16]
ldi $0
sat temp[$17]
jmp code_0ad1
code_0790: dup
ldi $8b ; 139, numLines
eq?
bnt code_07a0
+at temp[$a]
lapi param[$1]
sat temp[$17]
jmp code_0ad1
code_07a0: dup
ldi $87 ; 135, left
eq?
bnt code_07b6
+at temp[$a]
lapi param[$1]
sat temp[$18]
+at temp[$a]
lapi param[$1]
sat temp[$19]
jmp code_0ad1
code_07b6: dup
ldi $86 ; 134, yaw
eq?
bnt code_07c6
+at temp[$a]
lapi param[$1]
sat temp[$14]
jmp code_0ad1
code_07c6: dup
ldi $85 ; 133, roll
eq?
bnt code_07d6
+at temp[$a]
lapi param[$1]
sat temp[$15]
jmp code_0ad1
code_07d6: dup
ldi $95 ; 149, dispose
eq?
bnt code_089b
ldi $1
sat temp[$1d]
+at temp[$a]
lspi param[$1]
dup
ldi $fd ; 253, strip
eq?
bnt code_07f1
ldi $6 ; maxScale
jmp code_0850
code_07f1: dup
ldi $ff ; 255, asInteger
eq?
bnt code_080c
lat temp[$10]
bnt code_0808
pushi $88 ; 136, right
push0
send $4
bnot
push
ldi $c ; 12, inBottom
add
jmp code_0850
code_0808: lat temp[$3]
jmp code_0850
code_080c: dup
ldi $fe ; 254, strIndex
eq?
bnt code_0823
lat temp[$10]
bnt code_081f
pushi $87 ; 135, left
push0
send $4
bnot
jmp code_0850
code_081f: lat temp[$3]
jmp code_0850
code_0823: dup
ldi $fa ; 250, lower
eq?
bnt code_084e
lat temp[$10]
bnt code_084a
pushi $87 ; 135, left
push0
send $4
bnot
push
pushi $4e ; 78, 'N', width
push0
lat temp[$10]
send $4
bnot
push
+at temp[$a]
lapi param[$1]
sub
push
ldi $2
div
add
jmp code_0850
code_084a: lat temp[$3]
jmp code_0850
code_084e: lat temp[$3]
code_0850: toss
sat temp[$3]
+at temp[$a]
lspi param[$1]
dup
ldi $fd ; 253, strip
eq?
bnt code_0861
ldi $6 ; maxScale
jmp code_0895
code_0861: dup
ldi $ff ; 255, asInteger
eq?
bnt code_087c
lat temp[$10]
bnt code_0878
pushi $8a ; 138, bottom
push0
send $4
bnot
push
ldi $6 ; maxScale
add
jmp code_0895
code_0878: lat temp[$4]
jmp code_0895
code_087c: dup
ldi $fe ; 254, strIndex
eq?
bnt code_0893
lat temp[$10]
bnt code_088f
pushi $89 ; 137, top
push0
send $4
bnot
jmp code_0895
code_088f: lat temp[$4]
jmp code_0895
code_0893: lat temp[$4]
code_0895: toss
sat temp[$4]
jmp code_0ad1
code_089b: dup
ldi $8c ; 140, scratch
eq?
bnt code_0a40
push0
callk kernel_121, $0
bnot
sat temp[$21]
+at temp[$a]
lspi param[$1]
ldi $0
sati temp[$25]
bnt code_0933
pushi $97 ; 151, isKindOf
push1
class BtnList
push
ldi $0
lati temp[$25]
send $6
bnot
bnt code_0933
ldi $0
lati temp[$25]
sat temp[$5]
pushi $233 ; 563, buttonW
push0
send $4
bnot
not
bnt code_08e5
lat temp[$14]
bnt code_08e5
pushi $233 ; 563, buttonW
push1
lst temp[$14]
lat temp[$5]
send $6
bnot
code_08e5: pushi $234 ; 564, buttonH
push0
lat temp[$5]
send $4
bnot
not
bnt code_0900
lat temp[$15]
bnt code_0900
pushi $234 ; 564, buttonH
push1
lst temp[$15]
lat temp[$5]
send $6
bnot
code_0900: pushi $1be ; 446, setSize
push0
lat temp[$0]
send $4
bnot
push1
push1
lst temp[$3]
push2
push1
lst temp[$4]
pushi $94 ; 148, init
push1
lst temp[$0]
lat temp[$5]
send $12
bnot
pushi $1be ; 446, setSize
push0
lat temp[$0]
send $4
bnot
pushi $e2 ; 226, heighten
push1
pushi $6 ; maxScale
lat temp[$c]
send $6
bnot
jmp code_09b3
code_0933: +at temp[$a]
lspi param[$1]
ldi $1
sati temp[$25]
+at temp[$a]
lspi param[$1]
ldi $2
sati temp[$25]
+at temp[$a]
lspi param[$1]
ldi $3 ; z
sati temp[$25]
pushi $1be ; 446, setSize
push0
lat temp[$0]
send $4
bnot
pushi $230 ; 560, startVal
push1
ldi $1
lsti temp[$25]
pushi $232 ; 562, col
push1
ldi $2
lsti temp[$25]
pushi $231 ; 561, row
push1
ldi $3 ; z
lsti temp[$25]
pushi $233 ; 563, buttonW
push1
lat temp[$14]
bnt code_0976
jmp code_0978
code_0976: ldi $0
code_0978: push
pushi $234 ; 564, buttonH
push1
lat temp[$15]
bnt code_0983
jmp code_0985
code_0983: ldi $0
code_0985: push
pushi $23e ; 574, addList
push1
ldi $0
lsti temp[$25]
push1
push1
lst temp[$3]
push2
push1
lst temp[$4]
pushi $94 ; 148, init
push1
lst temp[$0]
pushi $8d ; 141, new
push0
class BtnList
send $4
bnot
sat temp[$5]
send $36
bnot
pushi $1be ; 446, setSize
push0
lat temp[$0]
send $4
bnot
code_09b3: pushi $236 ; 566, upButton
push0
lat temp[$5]
send $4
bnot
bnt code_09f0
pushi $236 ; 566, upButton
push0
lat temp[$5]
send $4
bnot
push
ldi $ff ; 255, asInteger
ne?
bnt code_09f0
pushi $4b ; 75, 'K', at
push1
pushi $5a ; 90, 'Z', size
push0
lat temp[$0]
send $4
bnot
push
ldi $1
sub
push
lat temp[$0]
send $6
bnot
sat temp[$10]
pushi $243 ; 579, prevItem
push1
push
lat temp[$0]
send $6
bnot
jmp code_09fe
code_09f0: ldi $0
sat temp[$10]
pushi $243 ; 579, prevItem
push1
push0
lat temp[$0]
send $6
bnot
code_09fe: pushi $4b ; 75, 'K', at
push1
pushi $5a ; 90, 'Z', size
push0
pushi $23a ; 570, itemList
push0
lat temp[$5]
send $4
bnot
send $4
bnot
push
ldi $1
sub
push
pushi $23a ; 570, itemList
push0
lat temp[$5]
send $4
bnot
send $6
bnot
sat temp[$1e]
pushi $87 ; 135, left
push0
lat temp[$c]
send $4
bnot
sat temp[$3]
pushi $8a ; 138, bottom
push0
lat temp[$c]
send $4
bnot
push
lat temp[$12]
add
sat temp[$4]
jmp code_0ad1
code_0a40: dup
ldi $8d ; 141, new
eq?
bnt code_0a50
+at temp[$a]
lapi param[$1]
sat temp[$12]
jmp code_0ad1
code_0a50: dup
ldi $81 ; 129, magnifier
eq?
bnt code_0a89
+at temp[$a]
lapi param[$1]
sat temp[$f]
pushi $1be ; 446, setSize
push0
send $4
bnot
pushi $9f ; 159, add
push1
lst temp[$f]
lat temp[$0]
send $6
bnot
pushi $249 ; 585, posnItem
pushi $3 ; z
lst temp[$f]
lst temp[$3]
lst temp[$4]
lat temp[$0]
send $a
bnot
ldi $0
sat temp[$16]
sat temp[$17]
jmp code_0ad1
code_0a89: dup
ldi $7d ; 125, '}', titleFont
eq?
bnt code_0a9f
pushi $244 ; 580, selectHandler
push1
+at temp[$a]
lspi param[$1]
lat temp[$0]
send $6
bnot
jmp code_0ad1
code_0a9f: dup
ldi $93 ; 147, pLine
eq?
bnt code_0abd
pushi $246 ; 582, retObject
push1
+at temp[$a]
lspi param[$1]
pushi $247 ; 583, retSelector
push1
+at temp[$a]
lspi param[$1]
lat temp[$0]
send $c
bnot
jmp code_0ad1
code_0abd: dup
ldi $92 ; 146, pModule
eq?
bnt code_0ad1
pushi $241 ; 577, keepDialog
push1
+at temp[$a]
lspi param[$1]
lat temp[$0]
send $6
bnot
code_0ad1: toss
lst temp[$2]
ldi $1
eq?
bnt code_0b0c
pushi $17d ; 381, addItem
pushi $5 ; scaleY
lsg global[$9]
pushi $23 ; 35, '#', text
push2
pushi $9 ; inLeft
+at temp[$a]
lspi param[$1]
callk kernel_91, $4
bnot
push
pushi $51 ; 81, 'Q', value
+at temp[$a]
lspi param[$1]
lat temp[$0]
send $e
bnot
sat temp[$f]
pushi $20 ; 32, ' ', name
push1
pushi $23 ; 35, '#', text
push0
send $4
bnot
push
lat temp[$f]
send $6
bnot
code_0b0c: lat temp[$2]
bnt code_0cc7
lat temp[$17]
bnt code_0b41
lat temp[$10]
bnt code_0b41
pushi $97 ; 151, isKindOf
push1
class Button
push
lat temp[$10]
send $6
bnot
bnt code_0b41
pushi $88 ; 136, right
push0
lat temp[$10]
send $4
bnot
push
ldi $c ; 12, inBottom
add
sat temp[$3]
pushi $89 ; 137, top
push0
lat temp[$10]
send $4
bnot
sat temp[$4]
code_0b41: lat temp[$16]
bnt code_0b8f
lat temp[$10]
bnt code_0b63
pushi $97 ; 151, isKindOf
push1
class Button
push
lat temp[$10]
send $6
bnot
bnt code_0b63
ldi $fe ; 254, strIndex
sat temp[$3]
ldi $ff ; 255, asInteger
sat temp[$4]
jmp code_0b8f
code_0b63: pushi $4e ; 78, 'N', width
push0
lat temp[$c]
send $4
bnot
push
lat temp[$14]
bnt code_0b72
jmp code_0b7a
code_0b72: pushi $4e ; 78, 'N', width
push0
lat temp[$f]
send $4
bnot
code_0b7a: sub
push
ldi $2
div
sat temp[$3]
push
ldi $0
lt?
bnt code_0b8b
ldi $6 ; maxScale
sat temp[$3]
code_0b8b: ldi $fc ; 252, getToken
sat temp[$4]
code_0b8f: pushi $249 ; 585, posnItem
pushi $3 ; z
lst temp[$f]
lst temp[$3]
lst temp[$4]
lat temp[$0]
send $a
bnot
lat temp[$14]
bnt code_0bb0
pushi $4e ; 78, 'N', width
push1
push
lat temp[$f]
send $6
bnot
jmp code_0c9c
code_0bb0: lat temp[$16]
bnt code_0c9c
lat temp[$10]
bnt code_0c9c
pushi $97 ; 151, isKindOf
push1
class Button
push
lat temp[$10]
send $6
bnot
bnt code_0c9c
pushi $1e3 ; 483, wide
push0
lat temp[$f]
send $4
bnot
push
ldi $0
eq?
bnt code_0c7f
pushi $4e ; 78, 'N', width
push0
lat temp[$10]
send $4
bnot
push
pushi $4e ; 78, 'N', width
push0
lat temp[$f]
send $4
bnot
gt?
bnt code_0c01
pushi $4e ; 78, 'N', width
push1
pushi $4e ; 78, 'N', width
push0
lat temp[$10]
send $4
bnot
push
lat temp[$f]
send $6
bnot
jmp code_0c7f
code_0c01: pushi $5a ; 90, 'Z', size
push0
lat temp[$0]
send $4
bnot
push
ldi $1
sub
sat temp[$b]
code_0c0f: lst temp[$b]
ldi $0
ge?
bnt code_0c7f
pushi $4b ; 75, 'K', at
push1
lst temp[$b]
lat temp[$0]
send $6
bnot
push
ldi $0
sati temp[$25]
pushi $97 ; 151, isKindOf
push1
class Button
push
ldi $0
lati temp[$25]
send $6
bnot
not
bnt code_0c3d
jmp code_0c7f
jmp code_0c7b
code_0c3d: ldi $0
lsti temp[$25]
lat temp[$f]
ne?
bnt code_0c7b
pushi $4e ; 78, 'N', width
push1
pushi $4e ; 78, 'N', width
push0
lat temp[$f]
send $4
bnot
push
ldi $0
lati temp[$25]
send $6
bnot
pushi $db ; 219, moveTo
push2
pushi $87 ; 135, left
push0
lat temp[$10]
send $4
bnot
push
pushi $89 ; 137, top
push0
ldi $0
lati temp[$25]
send $4
bnot
push
ldi $0
lati temp[$25]
send $8
bnot
code_0c7b: -at temp[$b]
jmp code_0c0f
code_0c7f: pushi $db ; 219, moveTo
push2
pushi $87 ; 135, left
push0
lat temp[$10]
send $4
bnot
push
pushi $89 ; 137, top
push0
lat temp[$f]
send $4
bnot
push
lat temp[$f]
send $8
bnot
code_0c9c: lat temp[$15]
bnt code_0caa
pushi $e1 ; 225, height
push1
push
lat temp[$f]
send $6
bnot
code_0caa: lst temp[$18]
lat temp[$19]
eq?
bnt code_0cb5
pprev
ldi $0
eq?
code_0cb5: not
bnt code_0cc7
pushi $25 ; 37, '%', fore
push1
lst temp[$18]
pushi $26 ; 38, '&', back
push1
lst temp[$19]
lat temp[$f]
send $c
bnot
code_0cc7: lat temp[$f]
bnt code_1016
ldi $0
sat temp[$11]
code_0cd0: lst temp[$a]
lap param[$0]
ge?
bnt code_0cda
jmp code_0f99
code_0cda: +at temp[$a]
lspi param[$1]
dup
ldi $fdf7 ; -521
eq?
bnt code_0cf5
pushi $17a ; 378, clut
push1
+at temp[$a]
lspi param[$1]
lat temp[$f]
send $6
bnot
jmp code_0f95
code_0cf5: dup
ldi $fde8 ; -536
eq?
bnt code_0d0b
pushi $23 ; 35, '#', text
push1
+at temp[$a]
lspi param[$1]
lat temp[$f]
send $6
bnot
jmp code_0f95
code_0d0b: dup
ldi $fde9 ; -535
eq?
bnt code_0d35
pushi $1f5 ; 501, setIcon
pushi $5 ; scaleY
+at temp[$a]
lspi param[$1]
+at temp[$a]
lspi param[$1]
+at temp[$a]
lspi param[$1]
+at temp[$a]
lspi param[$1]
+at temp[$a]
lspi param[$1]
lat temp[$f]
send $e
bnot
jmp code_0f95
code_0d35: dup
ldi $fdf8 ; -520
eq?
bnt code_0da7
pushi $8c ; 140, scratch
push1
lst temp[$f]
pushi $1be ; 446, setSize
push0
pushi $8d ; 141, new
push0
class UnderlineItem
send $4
bnot
sat temp[$1f]
send $a
bnot
pushi $9f ; 159, add
push1
lst temp[$1f]
lat temp[$0]
send $6
bnot
pushi $249 ; 585, posnItem
pushi $3 ; z
lst temp[$1f]
pushi $87 ; 135, left
push0
lat temp[$f]
send $4
bnot
push
ldi $4 ; scaleX
sub
push
pushi $8a ; 138, bottom
push0
lat temp[$f]
send $4
bnot
push
ldi $1
add
push
lat temp[$0]
send $a
bnot
pushi $a3 ; 163, contains
push1
lst temp[$f]
lofsa centeredItems
send $6
bnot
bnt code_0f95
pushi $9f ; 159, add
push1
lst temp[$1f]
lofsa centeredItems
send $6
bnot
jmp code_0f95
code_0da7: dup
ldi $fdea ; -534
eq?
bnt code_0e08
+at temp[$a]
lapi param[$1]
sat temp[$22]
+at temp[$a]
lapi param[$1]
sat temp[$23]
pushi $243 ; 579, prevItem
push1
lst temp[$10]
pushi $249 ; 585, posnItem
pushi $5 ; scaleY
lst temp[$f]
lst temp[$22]
push
lst temp[$22]
ldi $fa ; 250, lower
eq?
bnt code_0dd9
+at temp[$a]
lapi param[$1]
jmp code_0ddb
code_0dd9: ldi $0
code_0ddb: push
lst temp[$1f]
ldi $fa ; 250, lower
eq?
bnt code_0de9
+at temp[$a]
lapi param[$1]
jmp code_0deb
code_0de9: ldi $0
code_0deb: push
lat temp[$0]
send $14
bnot
lst temp[$22]
ldi $fb ; 251, subStr
eq?
bnt code_0f95
pushi $9f ; 159, add
push1
lst temp[$f]
lofsa centeredItems
send $6
bnot
jmp code_0f95
code_0e08: dup
ldi $fdeb ; -533
eq?
bnt code_0e4c
pushi $243 ; 579, prevItem
push1
lst temp[$10]
pushi $249 ; 585, posnItem
pushi $3 ; z
lst temp[$f]
lat temp[$10]
bnt code_0e2b
pushi $88 ; 136, right
push0
send $4
bnot
jmp code_0e2d
code_0e2b: ldi $6 ; maxScale
code_0e2d: push
+at temp[$a]
lapi param[$1]
add
push
lat temp[$10]
bnt code_0e41
pushi $89 ; 137, top
push0
send $4
bnot
jmp code_0e43
code_0e41: ldi $6 ; maxScale
code_0e43: push
lat temp[$0]
send $10
bnot
jmp code_0f95
code_0e4c: dup
ldi $fdec ; -532
eq?
bnt code_0e90
pushi $243 ; 579, prevItem
push1
lst temp[$10]
pushi $249 ; 585, posnItem
pushi $3 ; z
lst temp[$f]
lat temp[$10]
bnt code_0e6f
pushi $87 ; 135, left
push0
send $4
bnot
jmp code_0e71
code_0e6f: ldi $6 ; maxScale
code_0e71: push
lat temp[$10]
bnt code_0e7f
pushi $8a ; 138, bottom
push0
send $4
bnot
jmp code_0e81
code_0e7f: ldi $6 ; maxScale
code_0e81: push
+at temp[$a]
lapi param[$1]
add
push
lat temp[$0]
send $10
bnot
jmp code_0f95
code_0e90: dup
ldi $fded ; -531
eq?
bnt code_0ea6
+at temp[$a]
lapi param[$1]
not
bnt code_0f95
ldi $1
sat temp[$11]
jmp code_0f95
code_0ea6: dup
ldi $fdee ; -530
eq?
bnt code_0ebd
pushi $1c8 ; 456, helpStr
push1
+at temp[$a]
lspi param[$1]
lat temp[$f]
send $6
bnot
jmp code_0f95
code_0ebd: dup
ldi $fdef ; -529
eq?
bnt code_0ed5
pushi $1c7 ; 455, handler
push1
+at temp[$a]
lspi param[$1]
lat temp[$f]
send $6
bnot
jmp code_0f95
code_0ed5: dup
ldi $fdf0 ; -528
eq?
bnt code_0eeb
pushi $4e ; 78, 'N', width
push1
+at temp[$a]
lspi param[$1]
lat temp[$f]
send $6
bnot
jmp code_0f95
code_0eeb: dup
ldi $fdf1 ; -527
eq?
bnt code_0f03
pushi $e1 ; 225, height
push1
+at temp[$a]
lspi param[$1]
lat temp[$f]
send $6
bnot
jmp code_0f95
code_0f03: dup
ldi $fdf2 ; -526
eq?
bnt code_0f18
+at temp[$a]
lapi param[$1]
bnt code_0f95
lat temp[$f]
sat temp[$8]
jmp code_0f95
code_0f18: dup
ldi $fdf3 ; -525
eq?
bnt code_0f2f
pushi $21 ; 33, '!', key
push1
+at temp[$a]
lspi param[$1]
lat temp[$f]
send $6
bnot
jmp code_0f95
code_0f2f: dup
ldi $fdf4 ; -524
eq?
bnt code_0f46
pushi $2a ; 42, '*', font
push1
+at temp[$a]
lspi param[$1]
lat temp[$f]
send $6
bnot
jmp code_0f95
code_0f46: dup
ldi $fdf5 ; -523
eq?
bnt code_0f5d
pushi $25 ; 37, '%', fore
push1
+at temp[$a]
lspi param[$1]
lat temp[$f]
send $6
bnot
jmp code_0f95
code_0f5d: dup
ldi $fdf9 ; -519
eq?
bnt code_0f7b
pushi $3 ; z
lst temp[$f]
+at temp[$a]
lspi param[$1]
+at temp[$a]
lspi param[$1]
calle export60025_5, $6
bnot
jmp code_0f95
code_0f7b: dup
ldi $fdf6 ; -522
eq?
bnt code_0f91
pushi $26 ; 38, '&', back
push1
+at temp[$a]
lspi param[$1]
lat temp[$f]
send $6
bnot
jmp code_0f95
code_0f91: -at temp[$a]
jmp code_0f99
code_0f95: toss
jmp code_0cd0
code_0f99: lat temp[$11]
bnt code_0fdb
pushi $58 ; 88, 'X', delete
push1
lst temp[$f]
lat temp[$0]
send $6
bnot
pushi $95 ; 149, dispose
push0
lat temp[$f]
send $4
bnot
ldi $0
sat temp[$f]
ldi $0
sat temp[$2]
pushi $243 ; 579, prevItem
push1
pushi $4b ; 75, 'K', at
push1
pushi $5a ; 90, 'Z', size
push0
lat temp[$0]
send $4
bnot
push
ldi $1
sub
push
lat temp[$0]
send $6
bnot
push
lat temp[$0]
send $6
bnot
jmp code_1016
code_0fdb: pushi $a3 ; 163, contains
push1
lst temp[$f]
lat temp[$0]
send $6
bnot
not
bnt code_0ffe
pushi $9f ; 159, add
push1
lst temp[$f]
lat temp[$0]
send $6
bnot
pushi $1be ; 446, setSize
push0
lat temp[$f]
send $4
bnot
code_0ffe: pushi $1be ; 446, setSize
push0
lat temp[$0]
send $4
bnot
lat temp[$f]
sat temp[$10]
pushi $243 ; 579, prevItem
push1
lst temp[$f]
lat temp[$0]
send $6
bnot
code_1016: +at temp[$a]
jmp code_022d
code_101b: pushi $1be ; 446, setSize
push0
pushi $e3 ; 227, expand
push2
lst temp[$12]
dup
lat temp[$0]
send $c
bnot
ldi $0
sat temp[$a]
code_102f: lst temp[$a]
pushi $5a ; 90, 'Z', size
push0
lofsa centeredItems
send $4
bnot
lt?
bnt code_1063
pushi $4b ; 75, 'K', at
push1
lst temp[$a]
lofsa centeredItems
send $6
bnot
sat temp[$f]
pushi $249 ; 585, posnItem
pushi $3 ; z
push
pushi $fb ; 251, subStr
push2
push0
send $4
bnot
push
lat temp[$0]
send $a
bnot
+at temp[$a]
jmp code_102f
code_1063: lag global[$3]
bnt code_1083
push0
push0
send $4
bnot
bnt code_1083
pushi $de ; 222, centerIn
push1
push0
push0
lag global[$3]
send $4
bnot
push
lat temp[$c]
send $6
bnot
jmp code_108b
code_1083: pushi $73 ; 115, 's', center
push0
lat temp[$c]
send $4
bnot
code_108b: pushi $db ; 219, moveTo
push2
lst temp[$d]
ldi $ff ; 255, asInteger
eq?
bnt code_10a2
pushi $87 ; 135, left
push0
lat temp[$c]
send $4
bnot
jmp code_10a4
code_10a2: lat temp[$d]
code_10a4: push
lst temp[$e]
ldi $ff ; 255, asInteger
eq?
bnt code_10b8
pushi $89 ; 137, top
push0
lat temp[$c]
send $4
bnot
jmp code_10ba
code_10b8: lat temp[$e]
code_10ba: push
lat temp[$c]
send $8
bnot
pushi $1d3 ; 467, modal
push1
lst temp[$13]
pushi $248 ; 584, open
push0
lat temp[$0]
send $a
bnot
lat temp[$8]
not
bnt code_110d
pushi $a0 ; 160, firstTrue
push2
pushi $1cc ; 460, checkState
push1
lat temp[$0]
send $8
bnot
sat temp[$8]
bnt code_110d
pushi $a0 ; 160, firstTrue
push2
pushi $1cc ; 460, checkState
push2
lat temp[$0]
send $8
bnot
not
bnt code_110d
pushi $29 ; 41, ')', state
push1
pushi $29 ; 41, ')', state
push0
lat temp[$8]
send $4
bnot
push
ldi $2
or
push
lat temp[$8]
send $6
bnot
code_110d: lst temp[$13]
ldi $0
eq?
bnt code_1123
pushi $9f ; 159, add
push1
lst temp[$0]
lag global[$13]
send $6
bnot
lat temp[$0]
ret
code_1123: lst temp[$13]
ldi $2
eq?
bnt code_1148
lat temp[$8]
bnt code_113a
pushi $1d4 ; 468, selectItem
push1
push
lat temp[$0]
send $6
bnot
code_113a: pushi $aa ; 170, addToFront
push1
lst temp[$0]
lag global[$13]
send $6
bnot
lat temp[$0]
ret
code_1148: pushi $1ce ; 462, process
push1
lst temp[$8]
lat temp[$0]
send $6
bnot
sat temp[$9]
push0
callk kernel_33, $0
bnot
lat temp[$9]
ret
; export60029_1
code_115d: link $1
push1
pushi $f5 ; 245, format
push0
&rest $1
class Str
send $4
bnot
sat temp[$0]
push
call code_00f8, $2
bnot
pushi $95 ; 149, dispose
push0
lat temp[$0]
send $4
bnot
code_117c: ret
; export60029_2
code_117d: pushi $a ; 10, inTop
lsp param[$0]
ldi $3 ; z
ge?
bnt code_118a
lap param[$3]
jmp code_118d
code_118a: lofsa string_00b1 ; ""
code_118d: push
pushi $76 ; 118, 'v', textLeft
lsp param[$1]
lsp param[$2]
pushi $77 ; 119, 'w', textTop
lofsa string_00b2 ; " OK "
push
push1
pushi $77 ; 119, 'w', textTop
lofsa string_00b7 ; "Cancel"
push
push0
&rest $4 ; scaleX
call code_00f8, $14
bnot
bnt code_11b8
pushi $5a ; 90, 'Z', size
push0
lap param[$1]
send $4
bnot
push
ldi $0
gt?
code_11b8: ret
; export60029_3
code_11b9: link $2
pushi $8d ; 141, new
push1
pushi $5 ; scaleY
class Str
send $6
bnot
sat temp[$0]
lsp param[$0]
ldi $1
gt?
bnt code_11df
pushi $f5 ; 245, format
push2
lofsa string_00be ; "%d"
push
lsp param[$2]
lat temp[$0]
send $8
bnot
code_11df: pushi $3 ; z
lst temp[$0]
pushi $5 ; scaleY
lsp param[$1]
call code_117c, $6
bnot
bnt code_11f9
pushi $ff ; 255, asInteger
push0
lat temp[$0]
send $4
bnot
jmp code_11fb
code_11f9: ldi $ff ; 255, asInteger
code_11fb: sat temp[$1]
pushi $95 ; 149, dispose
push0
lat temp[$0]
send $4
bnot
lat temp[$1]
ret
; export60029_4
code_1209: link $1
pushi $8d ; 141, new
push1
lsp param[$1]
class Str
send $6
bnot
sat temp[$0]
push2
push
lsp param[$1]
&rest $2
call code_117c, $4
bnot
bnt code_122c
lat temp[$0]
ret
jmp code_1238
code_122c: pushi $95 ; 149, dispose
push0
lat temp[$0]
send $4
bnot
ldi $0
ret
code_1238: ret