1534 lines
21 KiB
Plaintext
1534 lines
21 KiB
Plaintext
MenuBar::init:
|
|
lap param[$0]
|
|
bnt code_0163
|
|
lap param[$1]
|
|
aTop left
|
|
lsp param[$0]
|
|
ldi $1
|
|
gt?
|
|
bnt code_0163
|
|
lap param[$2]
|
|
aTop top
|
|
lsp param[$0]
|
|
ldi $2
|
|
gt?
|
|
bnt code_0163
|
|
lap param[$3]
|
|
aTop right
|
|
lsp param[$0]
|
|
ldi $3 ; z
|
|
gt?
|
|
bnt code_0163
|
|
lap param[$4]
|
|
aTop bottom
|
|
code_0163: pushi $94 ; 148, init
|
|
push0
|
|
super List, $4
|
|
bnot
|
|
ret
|
|
|
|
MenuBar::construct:
|
|
link $5
|
|
pushi $d0 ; 208, with
|
|
pushi $4 ; scaleX
|
|
push0
|
|
push0
|
|
push0
|
|
push0
|
|
class IntArray
|
|
send $c
|
|
bnot
|
|
sat temp[$2]
|
|
pushi $26 ; 38, '&', back
|
|
push1
|
|
pTos back
|
|
pushi $7 ; priority
|
|
push1
|
|
pushi $fa ; 250, lower
|
|
pushi $87 ; 135, left
|
|
push1
|
|
pTos left
|
|
pushi $89 ; 137, top
|
|
push1
|
|
pTos top
|
|
pushi $88 ; 136, right
|
|
push1
|
|
pTos right
|
|
pushi $8a ; 138, bottom
|
|
push1
|
|
pTos bottom
|
|
pushi $94 ; 148, init
|
|
push0
|
|
pushi $9a ; 154, yourself
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class Plane
|
|
send $4
|
|
bnot
|
|
send $2c
|
|
bnot
|
|
aTop plane
|
|
pushi $cf ; 207, casts
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
aTop casts
|
|
ldi $3 ; z
|
|
sat temp[$4]
|
|
ldi $0
|
|
sat temp[$0]
|
|
code_01cb: lst temp[$0]
|
|
pToa size
|
|
lt?
|
|
bnt code_028b
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
self $6
|
|
bnot
|
|
sat temp[$3]
|
|
pushi $5 ; scaleY
|
|
push0
|
|
pushi $71 ; 113, 'q', data
|
|
push0
|
|
lat temp[$2]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $20 ; 32, ' ', name
|
|
push0
|
|
lat temp[$3]
|
|
send $4
|
|
bnot
|
|
push
|
|
pTos font
|
|
push0
|
|
callk kernel_70, $a
|
|
bnot
|
|
pushi $87 ; 135, left
|
|
push1
|
|
lst temp[$4]
|
|
pushi $88 ; 136, right
|
|
push1
|
|
lst temp[$4]
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
push2
|
|
lat temp[$2]
|
|
send $6
|
|
bnot
|
|
add
|
|
push
|
|
ldi $1
|
|
add
|
|
push
|
|
pushi $23 ; 35, '#', text
|
|
push1
|
|
pushi $23 ; 35, '#', text
|
|
push1
|
|
pushi $20 ; 32, ' ', name
|
|
push0
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
self $6
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $2a ; 42, '*', font
|
|
push1
|
|
pTos font
|
|
pushi $25 ; 37, '%', fore
|
|
push1
|
|
push0
|
|
pushi $26 ; 38, '&', back
|
|
push1
|
|
pTos back
|
|
pushi $72 ; 114, 'r', skip
|
|
push1
|
|
pushi $fe ; 254, strIndex
|
|
pushi $1be ; 446, setSize
|
|
push0
|
|
pushi $dc ; 220, posn
|
|
push2
|
|
lst temp[$4]
|
|
push1
|
|
pushi $4a ; 74, 'J', setPri
|
|
push1
|
|
pushi $fa ; 250, lower
|
|
pushi $94 ; 148, init
|
|
push1
|
|
pushi $cf ; 207, casts
|
|
push0
|
|
self $4
|
|
bnot
|
|
push
|
|
pushi $9a ; 154, yourself
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class TextItem
|
|
send $4
|
|
bnot
|
|
send $3a
|
|
bnot
|
|
push
|
|
pushi $2b3 ; 691, construct
|
|
push0
|
|
lat temp[$3]
|
|
send $16
|
|
bnot
|
|
lst temp[$4]
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
push2
|
|
lat temp[$2]
|
|
send $6
|
|
bnot
|
|
push
|
|
pToa margin
|
|
add
|
|
add
|
|
sat temp[$4]
|
|
+at temp[$0]
|
|
jmp code_01cb
|
|
|
|
code_028b: pushi $b5 ; 181, set
|
|
pushi $5 ; scaleY
|
|
pTos left
|
|
pTos top
|
|
pTos right
|
|
pTos bottom
|
|
push1
|
|
pToa plane
|
|
send $e
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$2]
|
|
send $4
|
|
bnot
|
|
ret
|
|
|
|
MenuBar::show:
|
|
pToa plane
|
|
bnt code_02c6
|
|
pTos state
|
|
ldi $1
|
|
or
|
|
aTop state
|
|
pushi $7 ; priority
|
|
push1
|
|
pushi $fa ; 250, lower
|
|
pToa plane
|
|
send $6
|
|
bnot
|
|
push1
|
|
pTos plane
|
|
callk kernel_42, $2
|
|
bnot
|
|
code_02c6: push0
|
|
callk kernel_33, $0
|
|
bnot
|
|
ret
|
|
|
|
MenuBar::onMe:
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa left
|
|
ge?
|
|
bnt code_02fe
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa right
|
|
le?
|
|
bnt code_02fe
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa top
|
|
ge?
|
|
bnt code_02fe
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa bottom
|
|
le?
|
|
code_02fe: ret
|
|
|
|
MenuBar::handleEvent:
|
|
link $5
|
|
pushi $2b ; 43, '+', type
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $4 ; scaleX
|
|
and
|
|
bnt code_0363
|
|
ldi $0
|
|
sat temp[$3]
|
|
code_0313: lst temp[$3]
|
|
pToa size
|
|
lt?
|
|
bnt code_03ff
|
|
ldi $0
|
|
sat temp[$4]
|
|
code_031f: lst temp[$4]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$3]
|
|
self $6
|
|
bnot
|
|
send $4
|
|
bnot
|
|
lt?
|
|
bnt code_035c
|
|
pushi $c8 ; 200, handleEvent
|
|
push1
|
|
lsp param[$1]
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$4]
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$3]
|
|
self $6
|
|
bnot
|
|
send $6
|
|
bnot
|
|
send $6
|
|
bnot
|
|
pushi $50 ; 80, 'P', claimed
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
bnt code_0358
|
|
ldi $1
|
|
ret
|
|
|
|
code_0358: +at temp[$4]
|
|
jmp code_031f
|
|
|
|
code_035c: +at temp[$3]
|
|
jmp code_0313
|
|
|
|
jmp code_03ff
|
|
|
|
code_0363: pTos state
|
|
ldi $1
|
|
and
|
|
bnt code_03fc
|
|
pushi $2b ; 43, '+', type
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
and
|
|
bnt code_03fc
|
|
pushi $eb ; 235, onMe
|
|
push1
|
|
lsp param[$1]
|
|
self $6
|
|
bnot
|
|
bnt code_03fc
|
|
ldi $0
|
|
sat temp[$1]
|
|
ldi $0
|
|
sat temp[$0]
|
|
lap param[$1]
|
|
sat temp[$2]
|
|
code_0392: pushi $a0 ; 160, firstTrue
|
|
push2
|
|
pushi $eb ; 235, onMe
|
|
lst temp[$2]
|
|
self $8
|
|
bnot
|
|
sat temp[$0]
|
|
push
|
|
ldi $0
|
|
ne?
|
|
bnt code_03c9
|
|
pushi $1c9 ; 457, highlight
|
|
push1
|
|
push1
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
pushi $c8 ; 200, handleEvent
|
|
push1
|
|
lst temp[$2]
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
pushi $1c9 ; 457, highlight
|
|
push1
|
|
push0
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
jmp code_03db
|
|
|
|
code_03c9: pushi $2b ; 43, '+', type
|
|
push0
|
|
lat temp[$2]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $2
|
|
and
|
|
bnt code_03db
|
|
ldi $1
|
|
sat temp[$1]
|
|
code_03db: lat temp[$1]
|
|
bnt code_03e3
|
|
jmp code_03f0
|
|
|
|
jmp code_0392
|
|
|
|
code_03e3: pushi $f3 ; 243, nextEvent
|
|
push0
|
|
lag global[$e]
|
|
send $4
|
|
bnot
|
|
sat temp[$2]
|
|
jmp code_0392
|
|
|
|
code_03f0: pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push1
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
ret
|
|
|
|
jmp code_03ff
|
|
|
|
code_03fc: ldi $0
|
|
ret
|
|
|
|
code_03ff: ret
|
|
|
|
MenuBar::hide:
|
|
pToa plane
|
|
bnt code_041c
|
|
pTos state
|
|
ldi $fe ; 254, strIndex
|
|
and
|
|
aTop state
|
|
pushi $7 ; priority
|
|
push1
|
|
pushi $ff ; 255, asInteger
|
|
pToa plane
|
|
send $6
|
|
bnot
|
|
push1
|
|
pTos plane
|
|
callk kernel_42, $2
|
|
bnot
|
|
code_041c: ret
|
|
|
|
MenuBar::dispose:
|
|
pushi $69 ; 105, 'i', hide
|
|
push0
|
|
self $4
|
|
bnot
|
|
pToa plane
|
|
bnt code_042e
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
code_042e: pToa name
|
|
bnt code_0439
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
code_0439: pushi $95 ; 149, dispose
|
|
push0
|
|
super List, $4
|
|
bnot
|
|
ret
|
|
|
|
MenuBar::select:
|
|
pushi $1ca ; 458, select
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
ret
|
|
|
|
MenuList::init:
|
|
lap param[$0]
|
|
bnt code_0454
|
|
lap param[$1]
|
|
aTop client
|
|
code_0454: pushi $94 ; 148, init
|
|
push0
|
|
super List, $4
|
|
bnot
|
|
pushi $89 ; 137, top
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
aTop top
|
|
pushi $8a ; 138, bottom
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
aTop bottom
|
|
ret
|
|
|
|
MenuList::highlight:
|
|
link $3
|
|
lap param[$0]
|
|
bnt code_047d
|
|
lap param[$1]
|
|
jmp code_0483
|
|
|
|
code_047d: pTos state
|
|
ldi $20 ; 32, ' ', name
|
|
and
|
|
not
|
|
code_0483: sat temp[$0]
|
|
pTos state
|
|
ldi $20 ; 32, ' ', name
|
|
and
|
|
bnt code_04aa
|
|
lat temp[$0]
|
|
bnt code_0493
|
|
ret
|
|
|
|
jmp code_04a1
|
|
|
|
code_0493: lag global[$54]
|
|
sat temp[$1]
|
|
pushi $26 ; 38, '&', back
|
|
push0
|
|
pToa text
|
|
send $4
|
|
bnot
|
|
sat temp[$2]
|
|
code_04a1: pTos state
|
|
ldi $df ; 223, centerOn
|
|
and
|
|
aTop state
|
|
jmp code_04c7
|
|
|
|
code_04aa: lat temp[$0]
|
|
not
|
|
bnt code_04b2
|
|
ret
|
|
|
|
jmp code_04c0
|
|
|
|
code_04b2: pushi $26 ; 38, '&', back
|
|
push0
|
|
pToa text
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
lag global[$54]
|
|
sat temp[$2]
|
|
code_04c0: pTos state
|
|
ldi $20 ; 32, ' ', name
|
|
or
|
|
aTop state
|
|
code_04c7: pushi $8 ; fixPriority
|
|
pushi $7 ; priority
|
|
pushi $11 ; 17, bitmap
|
|
push0
|
|
pToa text
|
|
send $4
|
|
bnot
|
|
push
|
|
push0
|
|
push0
|
|
pushi $88 ; 136, right
|
|
push0
|
|
pToa text
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $87 ; 135, left
|
|
push0
|
|
pToa text
|
|
send $4
|
|
bnot
|
|
sub
|
|
push
|
|
pushi $8a ; 138, bottom
|
|
push0
|
|
pToa text
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $89 ; 137, top
|
|
push0
|
|
pToa text
|
|
send $4
|
|
bnot
|
|
sub
|
|
push
|
|
lst temp[$2]
|
|
lst temp[$1]
|
|
callk kernel_35, $10
|
|
bnot
|
|
push1
|
|
pTos text
|
|
callk kernel_32, $2
|
|
bnot
|
|
push0
|
|
callk kernel_33, $0
|
|
bnot
|
|
ret
|
|
|
|
MenuList::construct:
|
|
link $c
|
|
pushi $d0 ; 208, with
|
|
pushi $4 ; scaleX
|
|
push0
|
|
push0
|
|
push0
|
|
push0
|
|
class IntArray
|
|
send $c
|
|
bnot
|
|
sat temp[$3]
|
|
pushi $d0 ; 208, with
|
|
pushi $4 ; scaleX
|
|
push0
|
|
push0
|
|
push0
|
|
push0
|
|
class IntArray
|
|
send $c
|
|
bnot
|
|
sat temp[$4]
|
|
ldi $0
|
|
sat temp[$5]
|
|
pushi $2b2 ; 690, yMargin
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
add
|
|
sat temp[$6]
|
|
pushi $94 ; 148, init
|
|
push0
|
|
pushi $9a ; 154, yourself
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class Plane
|
|
send $4
|
|
bnot
|
|
send $8
|
|
bnot
|
|
aTop plane
|
|
pushi $cf ; 207, casts
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
aTop casts
|
|
ldi $0
|
|
sat temp[$0]
|
|
code_0571: lst temp[$0]
|
|
pToa size
|
|
lt?
|
|
bnt code_05d2
|
|
pushi $5 ; scaleY
|
|
push0
|
|
pushi $71 ; 113, 'q', data
|
|
push0
|
|
lat temp[$3]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $23 ; 35, '#', text
|
|
push0
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
self $6
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $2a ; 42, '*', font
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
push0
|
|
callk kernel_70, $a
|
|
bnot
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
push2
|
|
lat temp[$3]
|
|
send $6
|
|
bnot
|
|
push
|
|
ldi $1e ; 30, brRight
|
|
add
|
|
push
|
|
lat temp[$5]
|
|
gt?
|
|
bnt code_05c3
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
push2
|
|
lat temp[$3]
|
|
send $6
|
|
bnot
|
|
push
|
|
ldi $1e ; 30, brRight
|
|
add
|
|
sat temp[$5]
|
|
code_05c3: lst temp[$5]
|
|
ldi $1e ; 30, brRight
|
|
lt?
|
|
bnt code_05ce
|
|
ldi $1e ; 30, brRight
|
|
sat temp[$5]
|
|
code_05ce: +at temp[$0]
|
|
jmp code_0571
|
|
|
|
code_05d2: ldi $0
|
|
sat temp[$0]
|
|
code_05d6: lst temp[$0]
|
|
pToa size
|
|
lt?
|
|
bnt code_0688
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
self $6
|
|
bnot
|
|
sat temp[$2]
|
|
pushi $23 ; 35, '#', text
|
|
push0
|
|
send $4
|
|
bnot
|
|
bnt code_0683
|
|
pushi $2a ; 42, '*', font
|
|
push1
|
|
pushi $2a ; 42, '*', font
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $25 ; 37, '%', fore
|
|
push1
|
|
push0
|
|
pushi $26 ; 38, '&', back
|
|
push1
|
|
pushi $26 ; 38, '&', back
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $72 ; 114, 'r', skip
|
|
push1
|
|
pushi $fe ; 254, strIndex
|
|
pushi $4a ; 74, 'J', setPri
|
|
push1
|
|
pushi $fd ; 253, strip
|
|
pushi $dc ; 220, posn
|
|
push2
|
|
pushi $2b1 ; 689, xMargin
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
lst temp[$6]
|
|
pushi $87 ; 135, left
|
|
push1
|
|
pushi $2b1 ; 689, xMargin
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $88 ; 136, right
|
|
push1
|
|
pushi $2b1 ; 689, xMargin
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
lat temp[$5]
|
|
add
|
|
push
|
|
ldi $1
|
|
add
|
|
push
|
|
pushi $89 ; 137, top
|
|
push1
|
|
lst temp[$6]
|
|
pushi $8a ; 138, bottom
|
|
push1
|
|
lst temp[$6]
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
pushi $3 ; z
|
|
lat temp[$3]
|
|
send $6
|
|
bnot
|
|
push
|
|
pushi $2b2 ; 690, yMargin
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
add
|
|
add
|
|
sat temp[$6]
|
|
push
|
|
pushi $94 ; 148, init
|
|
push1
|
|
pushi $cf ; 207, casts
|
|
push0
|
|
self $4
|
|
bnot
|
|
push
|
|
lat temp[$2]
|
|
send $44
|
|
bnot
|
|
code_0683: +at temp[$0]
|
|
jmp code_05d6
|
|
|
|
code_0688: pushi $26 ; 38, '&', back
|
|
push1
|
|
pushi $26 ; 38, '&', back
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $7 ; priority
|
|
push1
|
|
push0
|
|
pushi $87 ; 135, left
|
|
push1
|
|
pTos left
|
|
pushi $89 ; 137, top
|
|
push1
|
|
pushi $8a ; 138, bottom
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
add
|
|
push
|
|
pushi $88 ; 136, right
|
|
push1
|
|
pTos left
|
|
lat temp[$5]
|
|
add
|
|
push
|
|
pushi $2b1 ; 689, xMargin
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $2
|
|
mul
|
|
push
|
|
ldi $2
|
|
add
|
|
add
|
|
push
|
|
pushi $8a ; 138, bottom
|
|
push1
|
|
pushi $8a ; 138, bottom
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
add
|
|
push
|
|
lat temp[$6]
|
|
add
|
|
push
|
|
pToa plane
|
|
send $24
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$3]
|
|
send $4
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$4]
|
|
send $4
|
|
bnot
|
|
ret
|
|
|
|
MenuList::show:
|
|
pToa plane
|
|
bnt code_070f
|
|
pushi $7 ; priority
|
|
push1
|
|
pushi $fa ; 250, lower
|
|
send $6
|
|
bnot
|
|
push1
|
|
pTos plane
|
|
callk kernel_42, $2
|
|
bnot
|
|
code_070f: push0
|
|
callk kernel_33, $0
|
|
bnot
|
|
ret
|
|
|
|
MenuList::onMe:
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa left
|
|
ge?
|
|
bnt code_0747
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa right
|
|
le?
|
|
bnt code_0747
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa top
|
|
ge?
|
|
bnt code_0747
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa bottom
|
|
le?
|
|
code_0747: ret
|
|
|
|
MenuList::handleEvent:
|
|
link $5
|
|
pToa size
|
|
bnt code_0754
|
|
pushi $75 ; 117, 'u', show
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_0754: lap param[$1]
|
|
sat temp[$1]
|
|
ldi $0
|
|
sat temp[$3]
|
|
sat temp[$2]
|
|
code_075e: pushi $2b ; 43, '+', type
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $2
|
|
ne?
|
|
bnt code_0823
|
|
pushi $eb ; 235, onMe
|
|
push2
|
|
push1
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa plane
|
|
send $8
|
|
bnot
|
|
bnt code_07de
|
|
pushi $b9 ; 185, localize
|
|
push1
|
|
pTos plane
|
|
lat temp[$1]
|
|
send $6
|
|
bnot
|
|
pushi $a0 ; 160, firstTrue
|
|
push2
|
|
pushi $eb ; 235, onMe
|
|
lst temp[$1]
|
|
self $8
|
|
bnot
|
|
sat temp[$3]
|
|
bnt code_07b4
|
|
pushi $29 ; 41, ')', state
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
and
|
|
not
|
|
bnt code_07b4
|
|
lat temp[$2]
|
|
sat temp[$3]
|
|
code_07b4: lst temp[$2]
|
|
lat temp[$3]
|
|
ne?
|
|
bnt code_0815
|
|
lat temp[$2]
|
|
bnt code_07cc
|
|
pushi $1c9 ; 457, highlight
|
|
push1
|
|
push0
|
|
send $6
|
|
bnot
|
|
ldi $0
|
|
sat temp[$2]
|
|
code_07cc: lat temp[$3]
|
|
sat temp[$2]
|
|
lat temp[$3]
|
|
bnt code_0815
|
|
pushi $1c9 ; 457, highlight
|
|
push1
|
|
push1
|
|
send $6
|
|
bnot
|
|
jmp code_0815
|
|
|
|
code_07de: pushi $eb ; 235, onMe
|
|
push1
|
|
lst temp[$1]
|
|
self $6
|
|
bnot
|
|
bnt code_07ed
|
|
ldi $0
|
|
jmp code_0815
|
|
|
|
code_07ed: pushi $eb ; 235, onMe
|
|
push1
|
|
lst temp[$1]
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
bnt code_0805
|
|
pushi $69 ; 105, 'i', hide
|
|
push0
|
|
self $4
|
|
bnot
|
|
ldi $0
|
|
ret
|
|
|
|
jmp code_0815
|
|
|
|
code_0805: lat temp[$2]
|
|
bnt code_0815
|
|
pushi $1c9 ; 457, highlight
|
|
push1
|
|
push0
|
|
send $6
|
|
bnot
|
|
ldi $0
|
|
sat temp[$2]
|
|
code_0815: pushi $f3 ; 243, nextEvent
|
|
push0
|
|
lag global[$e]
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
jmp code_075e
|
|
|
|
code_0823: lat temp[$2]
|
|
bnt code_0843
|
|
pushi $1c9 ; 457, highlight
|
|
push1
|
|
push0
|
|
send $6
|
|
bnot
|
|
pushi $69 ; 105, 'i', hide
|
|
push0
|
|
self $4
|
|
bnot
|
|
pushi $1ca ; 458, select
|
|
push1
|
|
lst temp[$2]
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
ldi $1
|
|
ret
|
|
|
|
code_0843: pushi $69 ; 105, 'i', hide
|
|
push0
|
|
self $4
|
|
bnot
|
|
ldi $1
|
|
ret
|
|
|
|
MenuList::select:
|
|
ret
|
|
|
|
MenuList::hide:
|
|
pToa plane
|
|
bnt code_0860
|
|
pushi $7 ; priority
|
|
push1
|
|
pushi $ff ; 255, asInteger
|
|
send $6
|
|
bnot
|
|
push1
|
|
pTos plane
|
|
callk kernel_42, $2
|
|
bnot
|
|
code_0860: ret
|
|
|
|
MenuList::dispose:
|
|
pushi $69 ; 105, 'i', hide
|
|
push0
|
|
self $4
|
|
bnot
|
|
pToa plane
|
|
bnt code_0872
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
code_0872: pToa name
|
|
bnt code_087d
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
code_087d: pushi $95 ; 149, dispose
|
|
push0
|
|
super List, $4
|
|
bnot
|
|
ret
|
|
|
|
MenuOption::onMe:
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa left
|
|
ge?
|
|
bnt code_08b8
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa right
|
|
le?
|
|
bnt code_08b8
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa top
|
|
ge?
|
|
bnt code_08b8
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa bottom
|
|
le?
|
|
code_08b8: ret
|
|
|
|
MenuOption::highlight:
|
|
link $3
|
|
lap param[$0]
|
|
bnt code_08c3
|
|
lap param[$1]
|
|
jmp code_08c9
|
|
|
|
code_08c3: pTos state
|
|
ldi $20 ; 32, ' ', name
|
|
and
|
|
not
|
|
code_08c9: sat temp[$0]
|
|
pTos state
|
|
ldi $20 ; 32, ' ', name
|
|
and
|
|
bnt code_08ea
|
|
lat temp[$0]
|
|
bnt code_08d9
|
|
ret
|
|
|
|
jmp code_08e1
|
|
|
|
code_08d9: lag global[$54]
|
|
sat temp[$2]
|
|
pToa back
|
|
sat temp[$1]
|
|
code_08e1: pTos state
|
|
ldi $df ; 223, centerOn
|
|
and
|
|
aTop state
|
|
jmp code_0901
|
|
|
|
code_08ea: lat temp[$0]
|
|
not
|
|
bnt code_08f2
|
|
ret
|
|
|
|
jmp code_08fa
|
|
|
|
code_08f2: pToa back
|
|
sat temp[$2]
|
|
lag global[$54]
|
|
sat temp[$1]
|
|
code_08fa: pTos state
|
|
ldi $20 ; 32, ' ', name
|
|
or
|
|
aTop state
|
|
code_0901: pushi $8 ; fixPriority
|
|
pushi $7 ; priority
|
|
pTos bitmap
|
|
push0
|
|
push0
|
|
pTos right
|
|
pToa left
|
|
sub
|
|
push
|
|
pTos bottom
|
|
pToa top
|
|
sub
|
|
push
|
|
lst temp[$1]
|
|
lst temp[$2]
|
|
callk kernel_35, $10
|
|
bnot
|
|
push1
|
|
pushSelf
|
|
callk kernel_32, $2
|
|
bnot
|
|
push0
|
|
callk kernel_33, $0
|
|
bnot
|
|
ret
|
|
|
|
MenuOption::select:
|
|
pToa theObj
|
|
bnt code_093d
|
|
pToa selector
|
|
bnt code_093d
|
|
push2
|
|
pTos theObj
|
|
pTos selector
|
|
calle export60025_5, $4
|
|
bnot
|
|
code_093d: ret
|
|
|
|
MenuOption::handleEvent:
|
|
pTos state
|
|
ldi $1
|
|
or
|
|
bnt code_0990
|
|
pTos hotKey
|
|
pushi $31 ; 49, '1', message
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
eq?
|
|
bt code_097e
|
|
pushi $31 ; 49, '1', message
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $61 ; 97, 'a', frame
|
|
gt?
|
|
bnt code_0990
|
|
pushi $31 ; 49, '1', message
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $7a ; 122, 'z', borderColor
|
|
lt?
|
|
bnt code_0990
|
|
pTos hotKey
|
|
pushi $31 ; 49, '1', message
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $20 ; 32, ' ', name
|
|
sub
|
|
eq?
|
|
code_097e: bnt code_0990
|
|
pushi $1ca ; 458, select
|
|
push0
|
|
self $4
|
|
bnot
|
|
pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push1
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
code_0990: ret
|
|
|
|
link $1
|
|
ldi $0
|
|
sat temp[$0]
|
|
push0
|
|
lap param[$2]
|
|
le?
|
|
bnt code_09c3
|
|
pprev
|
|
ldi $1a ; 26, signal
|
|
le?
|
|
bnt code_09c3
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
lst temp[$0]
|
|
pushi $3 ; z
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
+at temp[$0]
|
|
push
|
|
lsp param[$2]
|
|
ldi $40 ; 64, '@', yStep
|
|
add
|
|
push
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
jmp code_0ac6
|
|
|
|
code_09c3: pushi $7a ; 122, 'z', borderColor
|
|
lap param[$2]
|
|
ge?
|
|
bnt code_09e3
|
|
pprev
|
|
ldi $61 ; 97, 'a', frame
|
|
ge?
|
|
bnt code_09e3
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
lst temp[$0]
|
|
lsp param[$2]
|
|
ldi $20 ; 32, ' ', name
|
|
sub
|
|
push
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
jmp code_0ac6
|
|
|
|
code_09e3: pushi $5a ; 90, 'Z', size
|
|
lap param[$2]
|
|
ge?
|
|
bnt code_09ff
|
|
pprev
|
|
ldi $41 ; 65, 'A', moveSpeed
|
|
ge?
|
|
bnt code_09ff
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
lst temp[$0]
|
|
lsp param[$2]
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
jmp code_0ac6
|
|
|
|
code_09ff: pushi $4300 ; 17152
|
|
lap param[$2]
|
|
ge?
|
|
bnt code_0a32
|
|
pprev
|
|
ldi $3b00 ; 15104
|
|
ge?
|
|
bnt code_0a32
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
lst temp[$0]
|
|
pushi $46 ; 70, 'F', isBlocked
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
+at temp[$0]
|
|
push
|
|
pushi $32 ; 50, '2', edit
|
|
lsp param[$2]
|
|
ldi $3b00 ; 15104
|
|
sub
|
|
add
|
|
push
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
jmp code_0ac6
|
|
|
|
code_0a32: lsp param[$2]
|
|
ldi $3a00 ; 14848
|
|
eq?
|
|
bnt code_0a63
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
lst temp[$0]
|
|
pushi $46 ; 70, 'F', isBlocked
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
+at temp[$0]
|
|
push
|
|
pushi $31 ; 49, '1', message
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
+at temp[$0]
|
|
push
|
|
pushi $30 ; 48, '0', who
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
jmp code_0ac6
|
|
|
|
code_0a63: pushi $2c00 ; 11264
|
|
lap param[$2]
|
|
ge?
|
|
bnt code_0a96
|
|
pprev
|
|
ldi $1e00 ; 7680
|
|
ge?
|
|
bnt code_0a96
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
lst temp[$0]
|
|
push2
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
+at temp[$0]
|
|
push
|
|
push1
|
|
lsp param[$2]
|
|
calle export60025_6, $2
|
|
bnot
|
|
push
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
jmp code_0ac6
|
|
|
|
code_0a96: pushi $2c00 ; 11264
|
|
lap param[$2]
|
|
ge?
|
|
bnt code_0ac6
|
|
pprev
|
|
ldi $1e00 ; 7680
|
|
ge?
|
|
bnt code_0ac6
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
lst temp[$0]
|
|
push2
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
+at temp[$0]
|
|
push
|
|
push1
|
|
lsp param[$2]
|
|
calle export60025_6, $2
|
|
bnot
|
|
push
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
code_0ac6: pushi $4b ; 75, 'K', at
|
|
push2
|
|
+at temp[$0]
|
|
push
|
|
push0
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
lap param[$1]
|
|
ret
|
|
|