3150 lines
44 KiB
Plaintext
3150 lines
44 KiB
Plaintext
CDSlot::init:
|
|
lap param[$1]
|
|
aTop x
|
|
lap param[$2]
|
|
aTop y
|
|
ret
|
|
|
|
CDSlot::setOwner:
|
|
lap param[$1]
|
|
bnt code_0248
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushSelf
|
|
lofsa CDActiveSlots
|
|
send $6
|
|
bnot
|
|
jmp code_0252
|
|
|
|
code_0248: pushi $58 ; 88, 'X', delete
|
|
push1
|
|
pushSelf
|
|
lofsa CDActiveSlots
|
|
send $6
|
|
bnot
|
|
code_0252: lap param[$1]
|
|
aTop pOwner
|
|
ret
|
|
|
|
CDSlotList::init:
|
|
link $2
|
|
pushi $94 ; 148, init
|
|
push0
|
|
super Set, $4
|
|
bnot
|
|
ldi $0
|
|
sat temp[$0]
|
|
code_0265: lst temp[$0]
|
|
ldi $4 ; scaleX
|
|
lt?
|
|
bnt code_0299
|
|
pushi $94 ; 148, init
|
|
push2
|
|
lst temp[$0]
|
|
ldi $9f ; 159, add
|
|
mul
|
|
push
|
|
ldi $7 ; priority
|
|
add
|
|
push
|
|
pushi $6 ; maxScale
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class CDSlot
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
send $8
|
|
bnot
|
|
pushi $9f ; 159, add
|
|
push1
|
|
lst temp[$1]
|
|
self $6
|
|
bnot
|
|
+at temp[$0]
|
|
jmp code_0265
|
|
|
|
code_0299: ret
|
|
|
|
CDSlotList::findSlot:
|
|
pToa size
|
|
not
|
|
bnt code_02a6
|
|
pushi $94 ; 148, init
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_02a6: pushi $a1 ; 161, firstEqual
|
|
push2
|
|
pushi $343 ; 835, pOwner
|
|
push0
|
|
self $8
|
|
bnot
|
|
ret
|
|
|
|
CDSlotList::findClosestSlot:
|
|
link $6
|
|
pToa size
|
|
not
|
|
bnt code_02c0
|
|
pushi $94 ; 148, init
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_02c0: ldi $2710 ; 10000
|
|
sat temp[$1]
|
|
ldi $0
|
|
sat temp[$2]
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $b3 ; 179, begin
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push1
|
|
pushSelf
|
|
class Sequence
|
|
send $6
|
|
bnot
|
|
sat temp[$4]
|
|
send $4
|
|
bnot
|
|
code_02e5: pushi $4c ; 76, 'L', next
|
|
push0
|
|
lat temp[$4]
|
|
send $4
|
|
bnot
|
|
sat temp[$5]
|
|
bnt code_0322
|
|
push1
|
|
push1
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
lat temp[$0]
|
|
sub
|
|
push
|
|
callk kernel_61, $2
|
|
bnot
|
|
sat temp[$3]
|
|
pushi $343 ; 835, pOwner
|
|
push0
|
|
lat temp[$5]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $0
|
|
eq?
|
|
bnt code_02e5
|
|
lst temp[$1]
|
|
lat temp[$3]
|
|
gt?
|
|
bnt code_02e5
|
|
lat temp[$3]
|
|
sat temp[$1]
|
|
lat temp[$5]
|
|
sat temp[$2]
|
|
jmp code_02e5
|
|
|
|
code_0322: lat temp[$2]
|
|
ret
|
|
|
|
ContainerButton::init:
|
|
link $1
|
|
pushi $94 ; 148, init
|
|
push0
|
|
&rest $1
|
|
super Button, $4
|
|
bnot
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BCarryable
|
|
push
|
|
pToa pObj
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
bnt code_0349
|
|
pushi $4b0 ; 1200, pContainerButton
|
|
push1
|
|
pushSelf
|
|
send $6
|
|
bnot
|
|
code_0349: ret
|
|
|
|
ContainerButton::dispose:
|
|
link $1
|
|
push1
|
|
pTos pObj
|
|
calle export60000_0, $2
|
|
bnot
|
|
bnt code_037b
|
|
push1
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BCarryable
|
|
push
|
|
pToa pObj
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
push
|
|
calle export60000_0, $2
|
|
bnot
|
|
bnt code_037b
|
|
pushi $4b0 ; 1200, pContainerButton
|
|
push1
|
|
push0
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
code_037b: pushi $95 ; 149, dispose
|
|
push0
|
|
super Button, $4
|
|
bnot
|
|
ret
|
|
|
|
ContainerButton::onMe:
|
|
link $2
|
|
lsp param[$0]
|
|
ldi $1
|
|
eq?
|
|
bnt code_03a1
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
jmp code_03a9
|
|
|
|
code_03a1: lap param[$1]
|
|
sat temp[$0]
|
|
lap param[$2]
|
|
sat temp[$1]
|
|
code_03a9: pushi $4 ; scaleX
|
|
lst temp[$0]
|
|
lst temp[$1]
|
|
pushSelf
|
|
push1
|
|
callk kernel_23, $8
|
|
bnot
|
|
ret
|
|
|
|
ContainerButton::hide:
|
|
pushi $69 ; 105, 'i', hide
|
|
push0
|
|
&rest $1
|
|
super Button, $4
|
|
bnot
|
|
ldi $0
|
|
aTop pOldBM
|
|
ret
|
|
|
|
ContainerButton::draw:
|
|
link $1
|
|
pTos lastState
|
|
pToa state
|
|
ne?
|
|
bt code_03d3
|
|
lap param[$0]
|
|
bnt code_0406
|
|
lap param[$1]
|
|
code_03d3: bnt code_0406
|
|
pToa bitmap
|
|
bnt code_03e3
|
|
pushi $9f ; 159, add
|
|
push1
|
|
push
|
|
lag global[$66]
|
|
send $6
|
|
bnot
|
|
code_03e3: pushi $3aa ; 938, createDisplay
|
|
push1
|
|
pushi $21 ; 33, '!', key
|
|
pToa pObj
|
|
send $6
|
|
bnot
|
|
aTop bitmap
|
|
pToa state
|
|
aTop lastState
|
|
pToa pOldBM
|
|
bnt code_0400
|
|
push1
|
|
pushSelf
|
|
callk kernel_32, $2
|
|
bnot
|
|
jmp code_0406
|
|
|
|
code_0400: push1
|
|
pushSelf
|
|
callk kernel_30, $2
|
|
bnot
|
|
code_0406: ret
|
|
|
|
ContainerButton::doit:
|
|
pToa pOldBM
|
|
not
|
|
bnt code_0412
|
|
pushi $57 ; 87, 'W', draw
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_0412: pTos pOldBM
|
|
pushi $11 ; 17, bitmap
|
|
push0
|
|
pToa pObj
|
|
send $4
|
|
bnot
|
|
ne?
|
|
bnt code_0433
|
|
pushi $11 ; 17, bitmap
|
|
push0
|
|
pToa pObj
|
|
send $4
|
|
bnot
|
|
aTop pOldBM
|
|
ldi $ff ; 255, asInteger
|
|
aTop lastState
|
|
pushi $57 ; 87, 'W', draw
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_0433: ret
|
|
|
|
ContainerButton::handleEvent:
|
|
link $6
|
|
pushi $2b ; 43, '+', type
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
push0
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push0
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
eq?
|
|
sat temp[$2]
|
|
pushi $48 ; 72, 'H', modifiers
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$3]
|
|
pushi $25b ; 603, verb
|
|
push0
|
|
pushi $24f ; 591, curIcon
|
|
push0
|
|
lag global[$6]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
sat temp[$4]
|
|
pushi $32d ; 813, pObj
|
|
push0
|
|
class WDragger
|
|
send $4
|
|
bnot
|
|
sat temp[$5]
|
|
pushi $50 ; 80, 'P', claimed
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
bnt code_0488
|
|
ldi $0
|
|
jmp code_05fe
|
|
|
|
code_0488: lat temp[$2]
|
|
bnt code_0582
|
|
lst temp[$1]
|
|
ldi $1
|
|
eq?
|
|
bnt code_0582
|
|
lat temp[$3]
|
|
not
|
|
bnt code_0582
|
|
lat temp[$5]
|
|
not
|
|
bnt code_0582
|
|
pushi $eb ; 235, onMe
|
|
push1
|
|
lsp param[$1]
|
|
self $6
|
|
bnot
|
|
bnt code_0582
|
|
pushi $4b1 ; 1201, accept
|
|
push1
|
|
lsp param[$1]
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
bnt code_05fe
|
|
pushi $2b ; 43, '+', type
|
|
push1
|
|
pushi $4000 ; 16384
|
|
pushi $31 ; 49, '1', message
|
|
push1
|
|
lst temp[$4]
|
|
push1
|
|
push1
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push1
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push0
|
|
push1
|
|
push0
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class Event
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
send $1e
|
|
bnot
|
|
push1
|
|
push1
|
|
pTos x
|
|
push2
|
|
push1
|
|
pTos y
|
|
pToa pObj
|
|
send $c
|
|
bnot
|
|
lst temp[$4]
|
|
ldi $2
|
|
eq?
|
|
bnt code_0547
|
|
pushi $4b2 ; 1202, pTargetting
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
bnt code_0520
|
|
pushi $c8 ; 200, handleEvent
|
|
push2
|
|
lst temp[$0]
|
|
pTos pObj
|
|
lag global[$1]
|
|
send $8
|
|
bnot
|
|
jmp code_056d
|
|
|
|
code_0520: pushi $c3 ; 195, script
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
not
|
|
bnt code_056d
|
|
pushi $3f8 ; 1016, pMovieCmd
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
not
|
|
bnt code_056d
|
|
pushi $358 ; 856, startDragging
|
|
push2
|
|
pTos pObj
|
|
pTos bitmap
|
|
class WDragger
|
|
send $8
|
|
bnot
|
|
jmp code_056d
|
|
|
|
code_0547: pushi $25a ; 602, pFallThru
|
|
push0
|
|
pushi $24f ; 591, curIcon
|
|
push0
|
|
lag global[$6]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
bnt code_0562
|
|
pushi $ba ; 186, globalize
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
code_0562: pushi $c8 ; 200, handleEvent
|
|
push1
|
|
lst temp[$0]
|
|
pToa pObj
|
|
send $6
|
|
bnot
|
|
code_056d: pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push1
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
jmp code_05fe
|
|
|
|
code_0582: lat temp[$2]
|
|
bnt code_05fe
|
|
lst temp[$1]
|
|
ldi $2
|
|
eq?
|
|
bnt code_05fe
|
|
lat temp[$3]
|
|
not
|
|
bnt code_05fe
|
|
lat temp[$5]
|
|
bnt code_05fe
|
|
pushi $eb ; 235, onMe
|
|
push1
|
|
lsp param[$1]
|
|
self $6
|
|
bnot
|
|
bnt code_05fe
|
|
pushi $4b1 ; 1201, accept
|
|
push1
|
|
lst temp[$5]
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
bnt code_05fe
|
|
pushi $2b ; 43, '+', type
|
|
push1
|
|
pushi $4000 ; 16384
|
|
pushi $31 ; 49, '1', message
|
|
push1
|
|
lst temp[$4]
|
|
push1
|
|
push1
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push1
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class Event
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
send $18
|
|
bnot
|
|
pushi $c8 ; 200, handleEvent
|
|
push2
|
|
lst temp[$0]
|
|
pTos pObj
|
|
lag global[$1]
|
|
send $8
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push1
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
code_05fe: pushi $50 ; 80, 'P', claimed
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
ret
|
|
|
|
containerUpButton::doit:
|
|
link $2
|
|
pushi $4b3 ; 1203, pBtnList
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
bnt code_064a
|
|
pushi $bb ; 187, start
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $231 ; 561, row
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $232 ; 562, col
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
mul
|
|
sub
|
|
sat temp[$0]
|
|
push
|
|
ldi $0
|
|
lt?
|
|
bnt code_063f
|
|
ldi $0
|
|
sat temp[$0]
|
|
code_063f: pushi $1ad ; 429, update
|
|
push1
|
|
lst temp[$0]
|
|
lat temp[$1]
|
|
send $6
|
|
bnot
|
|
code_064a: ldi $0
|
|
ret
|
|
|
|
containerUpButton::onMe:
|
|
link $2
|
|
lsp param[$0]
|
|
ldi $1
|
|
eq?
|
|
bnt code_066a
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
jmp code_0672
|
|
|
|
code_066a: lap param[$1]
|
|
sat temp[$0]
|
|
lap param[$2]
|
|
sat temp[$1]
|
|
code_0672: pushi $4 ; scaleX
|
|
lst temp[$0]
|
|
lst temp[$1]
|
|
pushSelf
|
|
push1
|
|
callk kernel_23, $8
|
|
bnot
|
|
ret
|
|
|
|
containerUpButton::contains:
|
|
pushi $eb ; 235, onMe
|
|
push0
|
|
&rest $1
|
|
self $4
|
|
bnot
|
|
ret
|
|
|
|
containerDownButton::doit:
|
|
link $2
|
|
pushi $4b3 ; 1203, pBtnList
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
bnt code_06f0
|
|
pushi $bb ; 187, start
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $231 ; 561, row
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $232 ; 562, col
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
mul
|
|
add
|
|
sat temp[$0]
|
|
push
|
|
pushi $b4 ; 180, end
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
gt?
|
|
bnt code_06e5
|
|
pushi $b4 ; 180, end
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $231 ; 561, row
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $232 ; 562, col
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
mul
|
|
sub
|
|
sat temp[$0]
|
|
code_06e5: pushi $1ad ; 429, update
|
|
push1
|
|
lst temp[$0]
|
|
lat temp[$1]
|
|
send $6
|
|
bnot
|
|
code_06f0: ldi $0
|
|
ret
|
|
|
|
containerDownButton::onMe:
|
|
link $2
|
|
lsp param[$0]
|
|
ldi $1
|
|
eq?
|
|
bnt code_0710
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
jmp code_0718
|
|
|
|
code_0710: lap param[$1]
|
|
sat temp[$0]
|
|
lap param[$2]
|
|
sat temp[$1]
|
|
code_0718: pushi $4 ; scaleX
|
|
lst temp[$0]
|
|
lst temp[$1]
|
|
pushSelf
|
|
push1
|
|
callk kernel_23, $8
|
|
bnot
|
|
ret
|
|
|
|
containerDownButton::contains:
|
|
pushi $eb ; 235, onMe
|
|
push0
|
|
&rest $1
|
|
self $4
|
|
bnot
|
|
ret
|
|
|
|
containerCloseButton::process:
|
|
link $2
|
|
pushi $b9 ; 185, localize
|
|
push1
|
|
pTos plane
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push1
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $2b ; 43, '+', type
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_07ae
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
pushSelf
|
|
lag global[$4d]
|
|
send $6
|
|
bnot
|
|
pTos state
|
|
ldi $20 ; 32, ' ', name
|
|
and
|
|
bnt code_076e
|
|
pushi $1c9 ; 457, highlight
|
|
push2
|
|
push0
|
|
push0
|
|
self $8
|
|
bnot
|
|
code_076e: pushi $a3 ; 163, contains
|
|
push1
|
|
lsp param[$1]
|
|
self $6
|
|
bnot
|
|
bnt code_07a6
|
|
pushi $ba ; 186, globalize
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
pToa client
|
|
sat temp[$1]
|
|
pushi $1d4 ; 468, selectItem
|
|
push2
|
|
pushSelf
|
|
push1
|
|
pToa client
|
|
send $8
|
|
bnot
|
|
bnt code_07bd
|
|
pushi $3a5 ; 933, hideContents
|
|
push0
|
|
pushi $4b4 ; 1204, pContainer
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
ret
|
|
|
|
jmp code_07bd
|
|
|
|
code_07a6: pushi $57 ; 87, 'W', draw
|
|
push0
|
|
self $4
|
|
bnot
|
|
jmp code_07bd
|
|
|
|
code_07ae: dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_07bd
|
|
pushi $ed ; 237, trackDoit
|
|
push1
|
|
lsp param[$1]
|
|
self $6
|
|
bnot
|
|
code_07bd: toss
|
|
pushi $50 ; 80, 'P', claimed
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
ret
|
|
|
|
containerCloseButton::onMe:
|
|
link $2
|
|
lsp param[$0]
|
|
ldi $1
|
|
eq?
|
|
bnt code_07e4
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
jmp code_07ec
|
|
|
|
code_07e4: lap param[$1]
|
|
sat temp[$0]
|
|
lap param[$2]
|
|
sat temp[$1]
|
|
code_07ec: pushi $4 ; scaleX
|
|
lst temp[$0]
|
|
lst temp[$1]
|
|
pushSelf
|
|
push1
|
|
callk kernel_23, $8
|
|
bnot
|
|
ret
|
|
|
|
containerCloseButton::contains:
|
|
pushi $eb ; 235, onMe
|
|
push0
|
|
&rest $1
|
|
self $4
|
|
bnot
|
|
ret
|
|
|
|
ContainerDisplay::process:
|
|
pToa pDispose
|
|
bnt code_0815
|
|
pushi $3a5 ; 933, hideContents
|
|
push0
|
|
pToa pContainer
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
ret
|
|
|
|
jmp code_0820
|
|
|
|
code_0815: pushi $1ce ; 462, process
|
|
push0
|
|
&rest $1
|
|
super FancyDialog, $4
|
|
bnot
|
|
ret
|
|
|
|
code_0820: ret
|
|
|
|
ContainerDisplay::init:
|
|
link $15
|
|
pushi $94 ; 148, init
|
|
push0
|
|
super FancyDialog, $4
|
|
bnot
|
|
lap param[$1]
|
|
aTop pContainer
|
|
pushi $420 ; 1056, pContents
|
|
push0
|
|
send $4
|
|
bnot
|
|
sat temp[$2]
|
|
pushi $365 ; 869, pSelf
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$8]
|
|
pushi $35b ; 859, getOwner
|
|
push0
|
|
send $4
|
|
bnot
|
|
sat temp[$b]
|
|
lst temp[$8]
|
|
lag global[$1]
|
|
eq?
|
|
bnt code_0875
|
|
ldi $2
|
|
sat temp[$5]
|
|
ldi $5 ; scaleY
|
|
sat temp[$6]
|
|
ldi $0
|
|
sat temp[$7]
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
pushi $8d ; 141, new
|
|
push0
|
|
lag global[$8]
|
|
send $4
|
|
bnot
|
|
aTop plane
|
|
jmp code_08b1
|
|
|
|
code_0875: ldi $2
|
|
sat temp[$5]
|
|
ldi $2
|
|
sat temp[$6]
|
|
pushi $315 ; 789, pName
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
bnt code_08b1
|
|
pushi $17d ; 381, addItem
|
|
pushi $5 ; scaleY
|
|
class TitleItem
|
|
push
|
|
pushi $23 ; 35, '#', text
|
|
pushi $d0 ; 208, with
|
|
push1
|
|
pushi $315 ; 789, pName
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
class Str
|
|
send $6
|
|
bnot
|
|
push
|
|
pushi $25 ; 37, '%', fore
|
|
pushi $ff ; 255, asInteger
|
|
self $e
|
|
bnot
|
|
sat temp[$7]
|
|
code_08b1: lst temp[$b]
|
|
lat temp[$8]
|
|
eq?
|
|
bt code_08bd
|
|
lst temp[$b]
|
|
lag global[$1]
|
|
eq?
|
|
code_08bd: bnt code_08c3
|
|
ldi $1
|
|
aTop pIsRoot
|
|
code_08c3: pushi $231 ; 561, row
|
|
push1
|
|
lst temp[$5]
|
|
pushi $232 ; 562, col
|
|
push1
|
|
lst temp[$6]
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class BtnList
|
|
send $4
|
|
bnot
|
|
aTop pBtnList
|
|
send $c
|
|
bnot
|
|
ldi $0
|
|
sat temp[$3]
|
|
code_08e1: lst temp[$3]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
lat temp[$2]
|
|
send $4
|
|
bnot
|
|
lt?
|
|
bnt code_0906
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$3]
|
|
lat temp[$2]
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $4b7 ; 1207, addObj
|
|
push1
|
|
push
|
|
self $6
|
|
bnot
|
|
+at temp[$3]
|
|
jmp code_08e1
|
|
|
|
code_0906: pushi $233 ; 563, buttonW
|
|
push1
|
|
pushi $2a ; 42, '*', font
|
|
pushi $234 ; 564, buttonH
|
|
push1
|
|
pushi $2a ; 42, '*', font
|
|
pushi $dc ; 220, posn
|
|
push2
|
|
pushi $4 ; scaleX
|
|
lat temp[$7]
|
|
bnt code_0929
|
|
pushi $8a ; 138, bottom
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $a ; 10, inTop
|
|
add
|
|
jmp code_092b
|
|
|
|
code_0929: ldi $4 ; scaleX
|
|
code_092b: push
|
|
pushi $236 ; 566, upButton
|
|
push1
|
|
pushi $8d ; 141, new
|
|
push0
|
|
lofsa containerUpButton
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $237 ; 567, downButton
|
|
push1
|
|
pushi $8d ; 141, new
|
|
push0
|
|
lofsa containerDownButton
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pBtnList
|
|
send $20
|
|
bnot
|
|
pushi $94 ; 148, init
|
|
push1
|
|
pushSelf
|
|
pushi $23d ; 573, addPaging
|
|
push0
|
|
pToa pBtnList
|
|
send $a
|
|
bnot
|
|
pushi $1be ; 446, setSize
|
|
push0
|
|
self $4
|
|
bnot
|
|
pushi $88 ; 136, right
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
sat temp[$c]
|
|
pushi $8a ; 138, bottom
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
sat temp[$d]
|
|
pushi $237 ; 567, downButton
|
|
push0
|
|
pToa pBtnList
|
|
send $4
|
|
bnot
|
|
bnt code_0a00
|
|
pushi $3 ; z
|
|
pushi $e ; 14, view
|
|
push0
|
|
pushi $237 ; 567, downButton
|
|
push0
|
|
pToa pBtnList
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $f ; 15, loop
|
|
push0
|
|
pushi $237 ; 567, downButton
|
|
push0
|
|
pToa pBtnList
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
push0
|
|
callk kernel_28, $6
|
|
bnot
|
|
sat temp[$13]
|
|
pushi $3 ; z
|
|
pushi $e ; 14, view
|
|
push0
|
|
pushi $237 ; 567, downButton
|
|
push0
|
|
pToa pBtnList
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $f ; 15, loop
|
|
push0
|
|
pushi $237 ; 567, downButton
|
|
push0
|
|
pToa pBtnList
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
push0
|
|
callk kernel_29, $6
|
|
bnot
|
|
sat temp[$14]
|
|
pushi $249 ; 585, posnItem
|
|
pushi $3 ; z
|
|
pushi $237 ; 567, downButton
|
|
push0
|
|
pToa pBtnList
|
|
send $4
|
|
bnot
|
|
push
|
|
lst temp[$c]
|
|
lat temp[$13]
|
|
sub
|
|
push
|
|
lst temp[$d]
|
|
lat temp[$14]
|
|
sub
|
|
push
|
|
self $a
|
|
bnot
|
|
lst temp[$14]
|
|
ldi $1
|
|
add
|
|
sat temp[$e]
|
|
jmp code_0a04
|
|
|
|
code_0a00: ldi $0
|
|
sat temp[$e]
|
|
code_0a04: pushi $236 ; 566, upButton
|
|
push0
|
|
pToa pBtnList
|
|
send $4
|
|
bnot
|
|
bnt code_0a31
|
|
pushi $249 ; 585, posnItem
|
|
pushi $3 ; z
|
|
pushi $236 ; 566, upButton
|
|
push0
|
|
pToa pBtnList
|
|
send $4
|
|
bnot
|
|
push
|
|
lst temp[$c]
|
|
lat temp[$13]
|
|
sub
|
|
push
|
|
lst temp[$d]
|
|
lst temp[$e]
|
|
lat temp[$14]
|
|
add
|
|
sub
|
|
push
|
|
self $a
|
|
bnot
|
|
code_0a31: lat temp[$7]
|
|
bnt code_0a43
|
|
pushi $249 ; 585, posnItem
|
|
pushi $3 ; z
|
|
push
|
|
pushi $fb ; 251, subStr
|
|
pushi $4 ; scaleX
|
|
self $a
|
|
bnot
|
|
code_0a43: lsp param[$0]
|
|
ldi $2
|
|
lt?
|
|
bnt code_0b23
|
|
pToa pIsRoot
|
|
bnt code_0ad1
|
|
pushi $4ae ; 1198, findClosestSlot
|
|
push1
|
|
lst temp[$b]
|
|
lag global[$1]
|
|
eq?
|
|
bnt code_0a5f
|
|
lag global[$1]
|
|
jmp code_0a61
|
|
|
|
code_0a5f: lat temp[$8]
|
|
code_0a61: push
|
|
class CDSlotList
|
|
send $6
|
|
bnot
|
|
aTop pSlot
|
|
pToa pSlot
|
|
not
|
|
bnt code_0aaf
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
push0
|
|
lofsa CDActiveSlots
|
|
send $6
|
|
bnot
|
|
aTop pSlot
|
|
pushi $3a5 ; 933, hideContents
|
|
push0
|
|
pushi $343 ; 835, pOwner
|
|
push0
|
|
pToa pSlot
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
pushi $4ad ; 1197, setOwner
|
|
push1
|
|
push0
|
|
pToa pSlot
|
|
send $6
|
|
bnot
|
|
pushi $4ae ; 1198, findClosestSlot
|
|
push1
|
|
lst temp[$b]
|
|
lag global[$1]
|
|
eq?
|
|
bnt code_0aa4
|
|
lag global[$1]
|
|
jmp code_0aa6
|
|
|
|
code_0aa4: lat temp[$8]
|
|
code_0aa6: push
|
|
class CDSlotList
|
|
send $6
|
|
bnot
|
|
aTop pSlot
|
|
code_0aaf: pushi $4ad ; 1197, setOwner
|
|
push1
|
|
lst temp[$8]
|
|
pToa pSlot
|
|
send $6
|
|
bnot
|
|
pToa pSlot
|
|
sat temp[$0]
|
|
push1
|
|
push0
|
|
send $4
|
|
bnot
|
|
sat temp[$9]
|
|
push2
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
sat temp[$a]
|
|
jmp code_0b14
|
|
|
|
code_0ad1: pushi $45d ; 1117, pDisplay
|
|
push0
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BContainer
|
|
push
|
|
lat temp[$b]
|
|
send $6
|
|
bnot
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
bnt code_0b0c
|
|
pushi $87 ; 135, left
|
|
push0
|
|
push0
|
|
push0
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
sat temp[$9]
|
|
pushi $8a ; 138, bottom
|
|
push0
|
|
push0
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $6 ; maxScale
|
|
add
|
|
sat temp[$a]
|
|
jmp code_0b14
|
|
|
|
code_0b0c: ldi $a ; 10, inTop
|
|
sat temp[$9]
|
|
ldi $a ; 10, inTop
|
|
sat temp[$a]
|
|
code_0b14: pushi $db ; 219, moveTo
|
|
push2
|
|
lst temp[$9]
|
|
lst temp[$a]
|
|
pToa plane
|
|
send $8
|
|
bnot
|
|
jmp code_0b30
|
|
|
|
code_0b23: pushi $db ; 219, moveTo
|
|
push2
|
|
lsp param[$2]
|
|
lsp param[$3]
|
|
pToa plane
|
|
send $8
|
|
bnot
|
|
code_0b30: pushi $87 ; 135, left
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $0
|
|
lt?
|
|
bnt code_0b53
|
|
pushi $db ; 219, moveTo
|
|
push2
|
|
push0
|
|
pushi $89 ; 137, top
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa plane
|
|
send $8
|
|
bnot
|
|
code_0b53: pushi $89 ; 137, top
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $0
|
|
lt?
|
|
bnt code_0b76
|
|
pushi $db ; 219, moveTo
|
|
push2
|
|
pushi $87 ; 135, left
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
push
|
|
push0
|
|
pToa plane
|
|
send $8
|
|
bnot
|
|
code_0b76: push0
|
|
push0
|
|
lag global[$3]
|
|
send $4
|
|
bnot
|
|
sat temp[$4]
|
|
lst temp[$c]
|
|
pushi $88 ; 136, right
|
|
push0
|
|
send $4
|
|
bnot
|
|
gt?
|
|
bnt code_0ba3
|
|
pushi $dd ; 221, moveBy
|
|
push2
|
|
pushi $88 ; 136, right
|
|
push0
|
|
lat temp[$4]
|
|
send $4
|
|
bnot
|
|
push
|
|
lat temp[$c]
|
|
sub
|
|
push
|
|
push0
|
|
pToa plane
|
|
send $8
|
|
bnot
|
|
code_0ba3: lst temp[$d]
|
|
pushi $8a ; 138, bottom
|
|
push0
|
|
lat temp[$4]
|
|
send $4
|
|
bnot
|
|
gt?
|
|
bnt code_0bc9
|
|
pushi $dd ; 221, moveBy
|
|
push2
|
|
push0
|
|
pushi $8a ; 138, bottom
|
|
push0
|
|
lat temp[$4]
|
|
send $4
|
|
bnot
|
|
push
|
|
lat temp[$d]
|
|
sub
|
|
push
|
|
pToa plane
|
|
send $8
|
|
bnot
|
|
code_0bc9: pushi $1d3 ; 467, modal
|
|
push1
|
|
push0
|
|
pushi $248 ; 584, open
|
|
push0
|
|
self $a
|
|
bnot
|
|
lst temp[$8]
|
|
lag global[$1]
|
|
ne?
|
|
bnt code_0c91
|
|
lat temp[$7]
|
|
bnt code_0c37
|
|
pushi $11 ; 17, bitmap
|
|
push1
|
|
pushi $5 ; scaleY
|
|
push0
|
|
pushi $4e ; 78, 'N', width
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $8 ; fixPriority
|
|
add
|
|
push
|
|
push2
|
|
push0
|
|
pushi $ff ; 255, asInteger
|
|
callk kernel_35, $a
|
|
bnot
|
|
push
|
|
push1
|
|
push1
|
|
pushi $87 ; 135, left
|
|
push0
|
|
lat temp[$7]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $4 ; scaleX
|
|
sub
|
|
push
|
|
push2
|
|
push1
|
|
pushi $8a ; 138, bottom
|
|
push0
|
|
lat temp[$7]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
add
|
|
push
|
|
pushi $94 ; 148, init
|
|
push1
|
|
pushi $f2 ; 242, pCast
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class View
|
|
send $4
|
|
bnot
|
|
send $18
|
|
bnot
|
|
code_0c37: pushi $e ; 14, view
|
|
push1
|
|
pushi $29a ; 666, loopIsCorrect
|
|
pushi $4a ; 74, 'J', setPri
|
|
push1
|
|
pushi $7 ; priority
|
|
push0
|
|
pushi $4ba ; 1210, pBorderPlane
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $8 ; fixPriority
|
|
add
|
|
push
|
|
push1
|
|
push1
|
|
pushi $4e ; 78, 'N', width
|
|
push0
|
|
pushi $4ba ; 1210, pBorderPlane
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $12 ; 18, nsLeft
|
|
sub
|
|
push
|
|
push2
|
|
push1
|
|
pushi $b ; 11, inRight
|
|
pushi $94 ; 148, init
|
|
push1
|
|
pushi $f2 ; 242, pCast
|
|
push0
|
|
pushi $4ba ; 1210, pBorderPlane
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class View
|
|
send $4
|
|
bnot
|
|
aTop pCloseBtn
|
|
send $1e
|
|
bnot
|
|
code_0c91: lsp param[$0]
|
|
ldi $3 ; z
|
|
gt?
|
|
bnt code_0cfb
|
|
pushi $1bd ; 445, setBitmap
|
|
pushi $3 ; z
|
|
lsp param[$4]
|
|
lsp param[$5]
|
|
lsp param[$6]
|
|
pushi $1bc ; 444, scaleBitmap
|
|
push0
|
|
pushi $6d ; 109, 'm', picture
|
|
push1
|
|
pushi $fe ; 254, strIndex
|
|
pToa plane
|
|
send $14
|
|
bnot
|
|
pushi $dc ; 220, posn
|
|
push2
|
|
pushi $4 ; scaleX
|
|
push0
|
|
lsp param[$4]
|
|
lsp param[$5]
|
|
lsp param[$6]
|
|
callk kernel_34, $8
|
|
bnot
|
|
push
|
|
pushi $4 ; scaleX
|
|
push1
|
|
lsp param[$4]
|
|
lsp param[$5]
|
|
lsp param[$6]
|
|
callk kernel_34, $8
|
|
bnot
|
|
push
|
|
ldi $2
|
|
div
|
|
push
|
|
pushi $4a ; 74, 'J', setPri
|
|
push1
|
|
push0
|
|
pushi $11 ; 17, bitmap
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
send $e
|
|
bnot
|
|
push1
|
|
pTos plane
|
|
callk kernel_42, $2
|
|
bnot
|
|
push1
|
|
pushi $11 ; 17, bitmap
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
push
|
|
callk kernel_32, $2
|
|
bnot
|
|
code_0cfb: ret
|
|
|
|
ContainerDisplay::dispose:
|
|
pushi $45d ; 1117, pDisplay
|
|
push1
|
|
push0
|
|
pToa pContainer
|
|
send $6
|
|
bnot
|
|
pToa pSlot
|
|
bnt code_0d16
|
|
pushi $4ad ; 1197, setOwner
|
|
push1
|
|
push0
|
|
send $6
|
|
bnot
|
|
ldi $0
|
|
aTop pSlot
|
|
code_0d16: pushi $11 ; 17, bitmap
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
bnt code_0d2f
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
pushi $11 ; 17, bitmap
|
|
push0
|
|
pToa plane
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
code_0d2f: ldi $0
|
|
aTop pCloseBtn
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
super FancyDialog, $4
|
|
bnot
|
|
ret
|
|
|
|
ContainerDisplay::handleEvent:
|
|
link $7
|
|
pushi $c8 ; 200, handleEvent
|
|
push1
|
|
lsp param[$1]
|
|
super FancyDialog, $6
|
|
bnot
|
|
pushi $2b ; 43, '+', type
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
push0
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa plane
|
|
eq?
|
|
sat temp[$3]
|
|
pushi $48 ; 72, 'H', modifiers
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$4]
|
|
pushi $25b ; 603, verb
|
|
push0
|
|
pushi $24f ; 591, curIcon
|
|
push0
|
|
lag global[$6]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
pushi $32d ; 813, pObj
|
|
push0
|
|
class WDragger
|
|
send $4
|
|
bnot
|
|
sat temp[$5]
|
|
pushi $50 ; 80, 'P', claimed
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
bnt code_0d95
|
|
ldi $0
|
|
jmp code_0fba
|
|
|
|
code_0d95: lat temp[$3]
|
|
bnt code_0e50
|
|
lat temp[$5]
|
|
bnt code_0e50
|
|
lst temp[$4]
|
|
ldi $0
|
|
eq?
|
|
bnt code_0e50
|
|
lst temp[$0]
|
|
ldi $2
|
|
eq?
|
|
bnt code_0e50
|
|
pushi $ba ; 186, globalize
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
pushi $a3 ; 163, contains
|
|
push1
|
|
lsp param[$1]
|
|
pToa plane
|
|
send $6
|
|
bnot
|
|
bnt code_0e42
|
|
lst temp[$5]
|
|
pushi $365 ; 869, pSelf
|
|
push0
|
|
pToa pContainer
|
|
send $4
|
|
bnot
|
|
ne?
|
|
bnt code_0e42
|
|
pushi $3a9 ; 937, isOwnedBy
|
|
push1
|
|
lst temp[$5]
|
|
pushi $365 ; 869, pSelf
|
|
push0
|
|
pToa pContainer
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
not
|
|
bnt code_0e42
|
|
pushi $4b1 ; 1201, accept
|
|
push1
|
|
lst temp[$5]
|
|
self $6
|
|
bnot
|
|
bnt code_0e42
|
|
pushi $2b ; 43, '+', type
|
|
push1
|
|
pushi $4000 ; 16384
|
|
pushi $31 ; 49, '1', message
|
|
push1
|
|
lst temp[$1]
|
|
push1
|
|
push1
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push1
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class Event
|
|
send $4
|
|
bnot
|
|
sat temp[$2]
|
|
send $18
|
|
bnot
|
|
pushi $c8 ; 200, handleEvent
|
|
push2
|
|
lst temp[$2]
|
|
pushSelf
|
|
lag global[$1]
|
|
send $8
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$2]
|
|
send $4
|
|
bnot
|
|
pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push1
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
code_0e42: pushi $b9 ; 185, localize
|
|
push1
|
|
pTos plane
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
jmp code_0fba
|
|
|
|
code_0e50: lat temp[$3]
|
|
bnt code_0eff
|
|
lat temp[$5]
|
|
not
|
|
bnt code_0eff
|
|
lst temp[$4]
|
|
ldi $0
|
|
eq?
|
|
bnt code_0eff
|
|
lst temp[$0]
|
|
ldi $1
|
|
eq?
|
|
bnt code_0eff
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class Rect
|
|
send $4
|
|
bnot
|
|
sat temp[$6]
|
|
pToa pCloseBtn
|
|
bnt code_0e95
|
|
pushi $d3 ; 211, copy
|
|
push1
|
|
push
|
|
lat temp[$6]
|
|
send $6
|
|
bnot
|
|
pushi $b9 ; 185, localize
|
|
push1
|
|
push0
|
|
push0
|
|
pToa pCloseBtn
|
|
send $4
|
|
bnot
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
code_0e95: pToa pCloseBtn
|
|
bnt code_0eb6
|
|
pushi $a3 ; 163, contains
|
|
push1
|
|
lsp param[$1]
|
|
lat temp[$6]
|
|
send $6
|
|
bnot
|
|
bnt code_0eb6
|
|
ldi $1
|
|
aTop pDispose
|
|
pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push1
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
jmp code_0ef3
|
|
|
|
code_0eb6: pushi $ba ; 186, globalize
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
pushi $25a ; 602, pFallThru
|
|
push0
|
|
pushi $24f ; 591, curIcon
|
|
push0
|
|
lag global[$6]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
not
|
|
bnt code_0ee8
|
|
pushi $a3 ; 163, contains
|
|
push1
|
|
lsp param[$1]
|
|
pToa plane
|
|
send $6
|
|
bnot
|
|
bnt code_0ee8
|
|
pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push1
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
code_0ee8: pushi $b9 ; 185, localize
|
|
push1
|
|
pTos plane
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
code_0ef3: pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$6]
|
|
send $4
|
|
bnot
|
|
jmp code_0fba
|
|
|
|
code_0eff: lat temp[$3]
|
|
bnt code_0fba
|
|
pushi $365 ; 869, pSelf
|
|
push0
|
|
pToa pContainer
|
|
send $4
|
|
bnot
|
|
push
|
|
lag global[$1]
|
|
ne?
|
|
bnt code_0fba
|
|
lst temp[$4]
|
|
ldi $3 ; z
|
|
eq?
|
|
bnt code_0fba
|
|
lst temp[$0]
|
|
ldi $1
|
|
eq?
|
|
bnt code_0fba
|
|
lst temp[$5]
|
|
ldi $0
|
|
eq?
|
|
bnt code_0fba
|
|
lst temp[$1]
|
|
ldi $2
|
|
eq?
|
|
bnt code_0fba
|
|
pushi $ba ; 186, globalize
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
pushi $4b1 ; 1201, accept
|
|
push1
|
|
lsp param[$1]
|
|
self $6
|
|
bnot
|
|
bnt code_0faf
|
|
pushi $a3 ; 163, contains
|
|
push1
|
|
lsp param[$1]
|
|
pToa plane
|
|
send $6
|
|
bnot
|
|
bnt code_0faf
|
|
pushi $2b ; 43, '+', type
|
|
push1
|
|
pushi $4000 ; 16384
|
|
pushi $31 ; 49, '1', message
|
|
push1
|
|
push2
|
|
pushi $48 ; 72, 'H', modifiers
|
|
push1
|
|
pushi $3 ; z
|
|
push1
|
|
push1
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push1
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class Event
|
|
send $4
|
|
bnot
|
|
sat temp[$2]
|
|
send $1e
|
|
bnot
|
|
pushi $c8 ; 200, handleEvent
|
|
push2
|
|
lst temp[$2]
|
|
pushi $365 ; 869, pSelf
|
|
push0
|
|
pToa pContainer
|
|
send $4
|
|
bnot
|
|
push
|
|
lag global[$1]
|
|
send $8
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$2]
|
|
send $4
|
|
bnot
|
|
pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push1
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
code_0faf: pushi $b9 ; 185, localize
|
|
push1
|
|
pTos plane
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
code_0fba: pushi $50 ; 80, 'P', claimed
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
ret
|
|
|
|
ContainerDisplay::setSize:
|
|
link $2
|
|
pushi $1be ; 446, setSize
|
|
push0
|
|
super FancyDialog, $4
|
|
bnot
|
|
pushi $af ; 175, union
|
|
push1
|
|
pushi $23b ; 571, pRect
|
|
push0
|
|
pToa pBtnList
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa plane
|
|
send $6
|
|
bnot
|
|
pushi $365 ; 869, pSelf
|
|
push0
|
|
pToa pContainer
|
|
send $4
|
|
bnot
|
|
push
|
|
lag global[$1]
|
|
eq?
|
|
bnt code_1002
|
|
pushi $4e ; 78, 'N', width
|
|
push1
|
|
pushi $108 ; 264, pTimers
|
|
pushi $e1 ; 225, height
|
|
push1
|
|
pushi $4d ; 77, 'M', done
|
|
pToa plane
|
|
send $c
|
|
bnot
|
|
jmp code_1012
|
|
|
|
code_1002: pushi $4e ; 78, 'N', width
|
|
push1
|
|
pushi $7e ; 126, '~', dimmed
|
|
pushi $e1 ; 225, height
|
|
push1
|
|
pushi $60 ; 96, '`', sec
|
|
pToa plane
|
|
send $c
|
|
bnot
|
|
code_1012: ret
|
|
|
|
ContainerDisplay::addObj:
|
|
link $1
|
|
pushi $46e ; 1134, pShow
|
|
push0
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BCarryable
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
send $4
|
|
bnot
|
|
bnt code_1055
|
|
pushi $9f ; 159, add
|
|
push1
|
|
push0
|
|
push1
|
|
pTos plane
|
|
pushi $32d ; 813, pObj
|
|
push1
|
|
lsp param[$1]
|
|
pushi $1be ; 446, setSize
|
|
push0
|
|
pushi $9a ; 154, yourself
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class ContainerButton
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
send $14
|
|
bnot
|
|
push
|
|
pToa pBtnList
|
|
send $6
|
|
bnot
|
|
code_1055: ret
|
|
|
|
ContainerDisplay::deleteObj:
|
|
link $1
|
|
pushi $a1 ; 161, firstEqual
|
|
push2
|
|
pushi $32d ; 813, pObj
|
|
lsp param[$1]
|
|
pToa pBtnList
|
|
send $8
|
|
bnot
|
|
sat temp[$0]
|
|
bnt code_1087
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
push
|
|
pToa pBtnList
|
|
send $6
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
pTos curItem
|
|
lat temp[$0]
|
|
eq?
|
|
bnt code_1087
|
|
ldi $0
|
|
aTop curItem
|
|
code_1087: ret
|
|
|
|
ContainerDisplay::accept:
|
|
link $2
|
|
pushi $381 ; 897, pMode
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
ldi $1
|
|
sat temp[$1]
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class Event
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_10cd
|
|
lst temp[$0]
|
|
ldi $8 ; fixPriority
|
|
and
|
|
bnt code_110c
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pushi $365 ; 869, pSelf
|
|
push0
|
|
pToa pContainer
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
lag global[$1]
|
|
ne?
|
|
bnt code_110c
|
|
ldi $0
|
|
sat temp[$1]
|
|
jmp code_110c
|
|
|
|
code_10cd: pushi $97 ; 151, isKindOf
|
|
push1
|
|
class WorldObject
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_110c
|
|
lst temp[$0]
|
|
ldi $8 ; fixPriority
|
|
and
|
|
bnt code_110c
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pushi $365 ; 869, pSelf
|
|
push0
|
|
pToa pContainer
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
lag global[$1]
|
|
ne?
|
|
bt code_1106
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
lag global[$1]
|
|
ne?
|
|
code_1106: bnt code_110c
|
|
ldi $0
|
|
sat temp[$1]
|
|
code_110c: lat temp[$1]
|
|
ret
|
|
|
|
ContainerDisplay::getVerb:
|
|
pushi $a6 ; 166, release
|
|
push0
|
|
class VerbList
|
|
send $4
|
|
bnot
|
|
pushi $366 ; 870, buildVerbList
|
|
push1
|
|
pushSelf
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
class VerbList
|
|
send $4
|
|
bnot
|
|
not
|
|
bnt code_112e
|
|
ret
|
|
|
|
code_112e: pushi $8d ; 141, new
|
|
push1
|
|
class VerbList
|
|
push
|
|
class VerbDialog
|
|
send $6
|
|
bnot
|
|
ret
|
|
|
|
ContainerDisplay::buttonsDoit:
|
|
pushi $9d ; 157, eachElementDo
|
|
push1
|
|
pushi $45 ; 69, 'E', doit
|
|
pToa pBtnList
|
|
send $6
|
|
bnot
|
|
ret
|
|
|
|
BContainer::init:
|
|
pushi $94 ; 148, init
|
|
push0
|
|
&rest $1
|
|
super WorldObjectBase, $4
|
|
bnot
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class Set
|
|
send $4
|
|
bnot
|
|
aTop pContents
|
|
ret
|
|
|
|
BContainer::dispose:
|
|
pushi $3a5 ; 933, hideContents
|
|
push0
|
|
self $4
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
pToa pContents
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pContents
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
&rest $1
|
|
super WorldObjectBase, $4
|
|
bnot
|
|
ret
|
|
|
|
BContainer::doit:
|
|
pushi $9d ; 157, eachElementDo
|
|
push1
|
|
pushi $45 ; 69, 'E', doit
|
|
pToa pContents
|
|
send $6
|
|
bnot
|
|
pToa pDisplay
|
|
bnt code_1192
|
|
pushi $4b9 ; 1209, buttonsDoit
|
|
push0
|
|
send $4
|
|
bnot
|
|
code_1192: ret
|
|
|
|
BContainer::fromPacket:
|
|
link $4
|
|
pushi $135 ; 309, getWord
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
ldi $0
|
|
sat temp[$2]
|
|
code_11a4: lst temp[$2]
|
|
lat temp[$0]
|
|
lt?
|
|
bnt code_11dc
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class WorldObject
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
pushi $36c ; 876, fromPacket
|
|
push2
|
|
lsp param[$1]
|
|
pTos pSelf
|
|
send $8
|
|
bnot
|
|
bnt code_11cf
|
|
pushi $9f ; 159, add
|
|
push1
|
|
lst temp[$1]
|
|
self $6
|
|
bnot
|
|
jmp code_11d8
|
|
|
|
code_11cf: pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
code_11d8: +at temp[$2]
|
|
jmp code_11a4
|
|
|
|
code_11dc: ret
|
|
|
|
BContainer::getServIDs:
|
|
pushi $9d ; 157, eachElementDo
|
|
push2
|
|
pushi $36d ; 877, getServIDs
|
|
lsp param[$1]
|
|
pToa pContents
|
|
send $8
|
|
bnot
|
|
ret
|
|
|
|
BContainer::handlesAction:
|
|
pushi $7 ; priority
|
|
lsp param[$1]
|
|
pushi $38f ; 911, give
|
|
pushi $38e ; 910, take
|
|
pushi $390 ; 912, drop
|
|
pushi $39f ; 927, beExamined
|
|
pushi $3a4 ; 932, showContents
|
|
pushi $3a5 ; 933, hideContents
|
|
calle export60025_4, $e
|
|
bnot
|
|
ret
|
|
|
|
BContainer::addBulk:
|
|
link $1
|
|
pTos pBulk
|
|
lap param[$1]
|
|
add
|
|
aTop pBulk
|
|
pushi $35b ; 859, getOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
push
|
|
pToa pSelf
|
|
ne?
|
|
bnt code_1239
|
|
pushi $4bb ; 1211, addBulk
|
|
push1
|
|
lsp param[$1]
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BContainer
|
|
push
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
send $6
|
|
bnot
|
|
code_1239: ret
|
|
|
|
BContainer::addWeight:
|
|
link $1
|
|
pTos pWeight
|
|
lap param[$1]
|
|
add
|
|
aTop pWeight
|
|
pushi $35b ; 859, getOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
push
|
|
pToa pSelf
|
|
ne?
|
|
bnt code_1269
|
|
pushi $4bc ; 1212, addWeight
|
|
push1
|
|
lsp param[$1]
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BContainer
|
|
push
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
send $6
|
|
bnot
|
|
code_1269: ret
|
|
|
|
BContainer::subBulk:
|
|
link $1
|
|
pTos pBulk
|
|
lap param[$1]
|
|
sub
|
|
aTop pBulk
|
|
pushi $35b ; 859, getOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
push
|
|
pToa pSelf
|
|
ne?
|
|
bnt code_1299
|
|
pushi $4bd ; 1213, subBulk
|
|
push1
|
|
lsp param[$1]
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BContainer
|
|
push
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
send $6
|
|
bnot
|
|
code_1299: ret
|
|
|
|
BContainer::subWeight:
|
|
link $1
|
|
pTos pWeight
|
|
lap param[$1]
|
|
sub
|
|
aTop pWeight
|
|
pushi $35b ; 859, getOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
push
|
|
pToa pSelf
|
|
ne?
|
|
bnt code_12c9
|
|
pushi $4be ; 1214, subWeight
|
|
push1
|
|
lsp param[$1]
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BContainer
|
|
push
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
send $6
|
|
bnot
|
|
code_12c9: ret
|
|
|
|
BContainer::tooBulky:
|
|
link $1
|
|
pTos pBulk
|
|
pToa pBulkCap
|
|
gt?
|
|
bnt code_12d9
|
|
ldi $1
|
|
ret
|
|
|
|
jmp code_12fe
|
|
|
|
code_12d9: pushi $35b ; 859, getOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
push
|
|
pToa pSelf
|
|
ne?
|
|
bnt code_12fe
|
|
pushi $4bf ; 1215, tooBulky
|
|
push0
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BContainer
|
|
push
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
send $4
|
|
bnot
|
|
ret
|
|
|
|
code_12fe: ldi $0
|
|
ret
|
|
|
|
BContainer::tooHeavy:
|
|
link $1
|
|
pTos pWeight
|
|
pToa pWeightCap
|
|
gt?
|
|
bnt code_1310
|
|
ldi $1
|
|
ret
|
|
|
|
jmp code_1335
|
|
|
|
code_1310: pushi $35b ; 859, getOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
push
|
|
pToa pSelf
|
|
ne?
|
|
bnt code_1335
|
|
pushi $4c0 ; 1216, tooHeavy
|
|
push0
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BContainer
|
|
push
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
send $4
|
|
bnot
|
|
ret
|
|
|
|
code_1335: ldi $0
|
|
ret
|
|
|
|
BContainer::add:
|
|
link $1
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BCarryable
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
bnt code_1382
|
|
pushi $9f ; 159, add
|
|
push1
|
|
lsp param[$1]
|
|
pToa pContents
|
|
send $6
|
|
bnot
|
|
pushi $4 ; scaleX
|
|
pushi $15 ; 21, nsBottom
|
|
push2
|
|
pTos pSelf
|
|
lsp param[$1]
|
|
callk kernel_118, $8
|
|
bnot
|
|
pushi $4bb ; 1211, addBulk
|
|
push1
|
|
pushi $4c1 ; 1217, pBulk
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $4bc ; 1212, addWeight
|
|
push1
|
|
pushi $4c2 ; 1218, pWeight
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
push
|
|
self $c
|
|
bnot
|
|
code_1382: ret
|
|
|
|
BContainer::delete:
|
|
link $1
|
|
pushi $a3 ; 163, contains
|
|
push1
|
|
lsp param[$1]
|
|
pToa pContents
|
|
send $6
|
|
bnot
|
|
bnt code_13e4
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BCarryable
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
lsp param[$1]
|
|
pToa pContents
|
|
send $6
|
|
bnot
|
|
pushi $3 ; z
|
|
pushi $29 ; 41, ')', state
|
|
pushi $9 ; inLeft
|
|
lsp param[$1]
|
|
callk kernel_118, $6
|
|
bnot
|
|
pushi $4 ; scaleX
|
|
pushi $15 ; 21, nsBottom
|
|
pushi $3 ; z
|
|
pTos pSelf
|
|
lsp param[$1]
|
|
callk kernel_118, $8
|
|
bnot
|
|
pushi $4bd ; 1213, subBulk
|
|
push1
|
|
pushi $4c1 ; 1217, pBulk
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $4be ; 1214, subWeight
|
|
push1
|
|
pushi $4c2 ; 1218, pWeight
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
push
|
|
self $c
|
|
bnot
|
|
code_13e4: ret
|
|
|
|
BContainer::buildVerbList:
|
|
link $5
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class WorldObject
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_14cc
|
|
pushi $381 ; 897, pMode
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
and
|
|
bnt code_14cc
|
|
class VerbList
|
|
sat temp[$0]
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BOpenable
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
sat temp[$2]
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BWearable
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$3]
|
|
lat temp[$2]
|
|
not
|
|
bt code_1434
|
|
pushi $425 ; 1061, pOpen
|
|
push0
|
|
lat temp[$2]
|
|
send $4
|
|
bnot
|
|
code_1434: bnt code_1499
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BCarryable
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
bnt code_1499
|
|
pushi $343 ; 835, pOwner
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pSelf
|
|
ne?
|
|
bnt code_14cc
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class WorldActor
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
not
|
|
bnt code_14cc
|
|
pushi $3a9 ; 937, isOwnedBy
|
|
push1
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
bt code_1488
|
|
pushi $3a9 ; 937, isOwnedBy
|
|
push1
|
|
lsg global[$1]
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
code_1488: bnt code_14cc
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushi $b ; 11, inRight
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
jmp code_14cc
|
|
|
|
code_1499: pToa pDisplay
|
|
not
|
|
bnt code_14cc
|
|
lat temp[$2]
|
|
bnt code_14aa
|
|
pushi $425 ; 1061, pOpen
|
|
push0
|
|
send $4
|
|
bnot
|
|
code_14aa: bt code_14bf
|
|
lat temp[$2]
|
|
not
|
|
bnt code_14cc
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class WorldActor
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
not
|
|
code_14bf: bnt code_14cc
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushi $32 ; 50, '2', edit
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
code_14cc: ret
|
|
|
|
BContainer::take:
|
|
link $3
|
|
lap param[$1]
|
|
not
|
|
bnt code_14d7
|
|
ldi $2
|
|
ret
|
|
|
|
code_14d7: ldi $0
|
|
sat temp[$0]
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BCarryable
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$2]
|
|
bnt code_155c
|
|
pushi $343 ; 835, pOwner
|
|
push0
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
bnt code_1510
|
|
push
|
|
pToa pSelf
|
|
ne?
|
|
bnt code_1510
|
|
pushi $38f ; 911, give
|
|
push2
|
|
lsp param[$1]
|
|
pTos pSelf
|
|
lat temp[$1]
|
|
send $8
|
|
bnot
|
|
sat temp[$0]
|
|
jmp code_1560
|
|
|
|
code_1510: pushi $4ad ; 1197, setOwner
|
|
push1
|
|
pTos pSelf
|
|
lat temp[$2]
|
|
send $6
|
|
bnot
|
|
pushi $343 ; 835, pOwner
|
|
push0
|
|
lat temp[$2]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pSelf
|
|
eq?
|
|
bnt code_1560
|
|
pushi $9f ; 159, add
|
|
push1
|
|
lsp param[$1]
|
|
self $6
|
|
bnot
|
|
pushi $2fb ; 763, pCombatGroup
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
bnt code_1560
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
pushi $2fb ; 763, pCombatGroup
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
pushi $2fb ; 763, pCombatGroup
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
jmp code_1560
|
|
|
|
code_155c: ldi $4 ; scaleX
|
|
sat temp[$0]
|
|
code_1560: lat temp[$0]
|
|
ret
|
|
|
|
BContainer::give:
|
|
link $1
|
|
ldi $0
|
|
sat temp[$0]
|
|
pushi $3a9 ; 937, isOwnedBy
|
|
push1
|
|
pTos pSelf
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_15a0
|
|
pushi $390 ; 912, drop
|
|
push1
|
|
lsp param[$1]
|
|
self $6
|
|
bnot
|
|
pushi $38e ; 910, take
|
|
push1
|
|
lsp param[$1]
|
|
lap param[$2]
|
|
send $6
|
|
bnot
|
|
push
|
|
ldi $0
|
|
ne?
|
|
bnt code_15a4
|
|
pushi $38e ; 910, take
|
|
push1
|
|
lsp param[$1]
|
|
self $6
|
|
bnot
|
|
ldi $4 ; scaleX
|
|
sat temp[$0]
|
|
jmp code_15a4
|
|
|
|
code_15a0: ldi $4 ; scaleX
|
|
sat temp[$0]
|
|
code_15a4: lat temp[$0]
|
|
ret
|
|
|
|
BContainer::drop:
|
|
link $3
|
|
lap param[$1]
|
|
not
|
|
bnt code_15af
|
|
ret
|
|
|
|
code_15af: ldi $0
|
|
sat temp[$0]
|
|
pushi $3a9 ; 937, isOwnedBy
|
|
push1
|
|
pTos pSelf
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_160f
|
|
pushi $35b ; 859, getOwner
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$2]
|
|
push
|
|
pToa pSelf
|
|
eq?
|
|
bnt code_1600
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BCarryable
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
bnt code_15f9
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
lsp param[$1]
|
|
self $6
|
|
bnot
|
|
pushi $4ad ; 1197, setOwner
|
|
push1
|
|
push0
|
|
lat temp[$1]
|
|
send $6
|
|
bnot
|
|
jmp code_1613
|
|
|
|
code_15f9: ldi $4 ; scaleX
|
|
sat temp[$0]
|
|
jmp code_1613
|
|
|
|
code_1600: pushi $390 ; 912, drop
|
|
push1
|
|
lsp param[$1]
|
|
lat temp[$2]
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
jmp code_1613
|
|
|
|
code_160f: ldi $4 ; scaleX
|
|
sat temp[$0]
|
|
code_1613: ret
|
|
|
|
BContainer::beExamined:
|
|
pushi $3a4 ; 932, showContents
|
|
push0
|
|
self $4
|
|
bnot
|
|
ldi $0
|
|
ret
|
|
|
|
BContainer::showContents:
|
|
link $2
|
|
ldi $2
|
|
sat temp[$0]
|
|
pTos pSelf
|
|
lag global[$1]
|
|
ne?
|
|
bnt code_1650
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BCharacter
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
bnt code_1650
|
|
push2
|
|
lofsa string_0376 ; "%s showContents called on non-ego with BCharacter"
|
|
push
|
|
pushi $20 ; 32, ' ', name
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
callk kernel_132, $4
|
|
bnot
|
|
lat temp[$0]
|
|
ret
|
|
|
|
code_1650: lag global[$3]
|
|
bnt code_1688
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BOpenable
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
pToa pDisplay
|
|
not
|
|
bnt code_1688
|
|
lat temp[$1]
|
|
not
|
|
bt code_1677
|
|
pushi $425 ; 1061, pOpen
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
code_1677: bnt code_1688
|
|
pushi $3 ; z
|
|
pushi $15 ; 21, nsBottom
|
|
push0
|
|
pTos pSelf
|
|
callk kernel_118, $6
|
|
bnot
|
|
ldi $0
|
|
sat temp[$0]
|
|
code_1688: lat temp[$0]
|
|
ret
|
|
|
|
BContainer::hideContents:
|
|
link $1
|
|
ldi $0
|
|
sat temp[$0]
|
|
pushi $3 ; z
|
|
pushi $15 ; 21, nsBottom
|
|
push1
|
|
pTos pSelf
|
|
callk kernel_118, $6
|
|
bnot
|
|
pushi $9d ; 157, eachElementDo
|
|
push1
|
|
pushi $3a5 ; 933, hideContents
|
|
pToa pContents
|
|
send $6
|
|
bnot
|
|
lat temp[$0]
|
|
ret
|
|
|