492 lines
6.7 KiB
Plaintext
492 lines
6.7 KiB
Plaintext
BCarryable::preDispose:
|
|
link $1
|
|
pToa pOwner
|
|
bnt code_0076
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BContainer
|
|
push
|
|
pToa pOwner
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
bnt code_0076
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
pTos pSelf
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
code_0076: ret
|
|
|
|
BCarryable::dispose:
|
|
pToa pContainerButton
|
|
bnt code_008a
|
|
pushi $4b8 ; 1208, deleteObj
|
|
push1
|
|
pTos pSelf
|
|
pushi $36 ; 54, '6', client
|
|
push0
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
code_008a: pushi $95 ; 149, dispose
|
|
push0
|
|
super WorldObjectBase, $4
|
|
bnot
|
|
ret
|
|
|
|
BCarryable::fromPacket:
|
|
link $2
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pShow
|
|
ret
|
|
|
|
BCarryable::generatePolygon:
|
|
ldi $2
|
|
ret
|
|
|
|
BCarryable::buildVerbList:
|
|
link $3
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class WorldObject
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_0141
|
|
pushi $381 ; 897, pMode
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
and
|
|
bnt code_0141
|
|
pushi $381 ; 897, pMode
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $8 ; fixPriority
|
|
and
|
|
not
|
|
bnt code_0141
|
|
class VerbList
|
|
sat temp[$1]
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BWearable
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
sat temp[$2]
|
|
bnt code_00f0
|
|
pushi $41e ; 1054, pIsWorn
|
|
push0
|
|
send $4
|
|
bnot
|
|
code_00f0: not
|
|
bnt code_0141
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BSit
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
sat temp[$2]
|
|
bnt code_010a
|
|
pushi $343 ; 835, pOwner
|
|
push0
|
|
send $4
|
|
bnot
|
|
code_010a: not
|
|
bnt code_0141
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class WorldActor
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_0141
|
|
pushi $3a9 ; 937, isOwnedBy
|
|
push2
|
|
lsp param[$1]
|
|
push1
|
|
pToa pSelf
|
|
send $8
|
|
bnot
|
|
bnt code_0136
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushi $a ; 10, inTop
|
|
lat temp[$1]
|
|
send $6
|
|
bnot
|
|
jmp code_0141
|
|
|
|
code_0136: pushi $9f ; 159, add
|
|
push1
|
|
pushi $8 ; fixPriority
|
|
lat temp[$1]
|
|
send $6
|
|
bnot
|
|
code_0141: pushi $97 ; 151, isKindOf
|
|
push1
|
|
class ContainerDisplay
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_019e
|
|
class VerbList
|
|
sat temp[$1]
|
|
pushi $35b ; 859, getOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $365 ; 869, pSelf
|
|
push0
|
|
pushi $4b4 ; 1204, pContainer
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
ne?
|
|
bnt code_019e
|
|
pushi $365 ; 869, pSelf
|
|
push0
|
|
pushi $4b4 ; 1204, pContainer
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
lag global[$1]
|
|
eq?
|
|
bnt code_0193
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushi $8 ; fixPriority
|
|
lat temp[$1]
|
|
send $6
|
|
bnot
|
|
jmp code_019e
|
|
|
|
code_0193: pushi $9f ; 159, add
|
|
push1
|
|
pushi $b ; 11, inRight
|
|
lat temp[$1]
|
|
send $6
|
|
bnot
|
|
code_019e: ret
|
|
|
|
BCarryable::setOwner:
|
|
link $4
|
|
ldi $0
|
|
sat temp[$3]
|
|
code_01a5: lst temp[$3]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
class gDialogList
|
|
send $4
|
|
bnot
|
|
lt?
|
|
bnt code_0201
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$3]
|
|
class gDialogList
|
|
send $6
|
|
bnot
|
|
sat temp[$2]
|
|
push1
|
|
push
|
|
calle export60000_0, $2
|
|
bnot
|
|
bnt code_01fd
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class VerbDialog
|
|
push
|
|
lat temp[$2]
|
|
send $6
|
|
bnot
|
|
bnt code_01fd
|
|
pushi $142 ; 322, pObject
|
|
push0
|
|
lat temp[$2]
|
|
send $4
|
|
bnot
|
|
push
|
|
selfID
|
|
eq?
|
|
bnt code_01fd
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
lst temp[$2]
|
|
class gDialogList
|
|
send $6
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$2]
|
|
send $4
|
|
bnot
|
|
jmp code_0201
|
|
|
|
code_01fd: +at temp[$3]
|
|
jmp code_01a5
|
|
|
|
code_0201: pushi $32d ; 813, pObj
|
|
push0
|
|
class WDragger
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pSelf
|
|
eq?
|
|
bnt code_0219
|
|
pushi $359 ; 857, stopDragging
|
|
push0
|
|
class WDragger
|
|
send $4
|
|
bnot
|
|
code_0219: lap param[$1]
|
|
bnt code_0251
|
|
pToa pOwner
|
|
not
|
|
bnt code_024a
|
|
pushi $3c6 ; 966, deleteFromRoom
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
pToa pShow
|
|
bnt code_023a
|
|
pushi $373 ; 883, setAction
|
|
push1
|
|
pushi $21 ; 33, '!', key
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
code_023a: lsp param[$1]
|
|
lag global[$1]
|
|
ne?
|
|
bnt code_024a
|
|
pushi $3a5 ; 933, hideContents
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
code_024a: lap param[$1]
|
|
aTop pOwner
|
|
jmp code_0327
|
|
|
|
code_0251: pToa pOwner
|
|
bnt code_0323
|
|
pushi $f ; 15, loop
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_0287
|
|
push1
|
|
push1
|
|
push1
|
|
push0
|
|
pToa pOwner
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $8 ; fixPriority
|
|
add
|
|
push
|
|
push2
|
|
push1
|
|
push2
|
|
push0
|
|
pToa pOwner
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $3 ; z
|
|
sub
|
|
push
|
|
pToa pSelf
|
|
send $c
|
|
bnot
|
|
jmp code_02f0
|
|
|
|
code_0287: dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_02b0
|
|
push1
|
|
push1
|
|
push1
|
|
push0
|
|
pToa pOwner
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $8 ; fixPriority
|
|
sub
|
|
push
|
|
push2
|
|
push1
|
|
push2
|
|
push0
|
|
pToa pOwner
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $3 ; z
|
|
sub
|
|
push
|
|
pToa pSelf
|
|
send $c
|
|
bnot
|
|
jmp code_02f0
|
|
|
|
code_02b0: dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_02d1
|
|
push1
|
|
push1
|
|
push1
|
|
push0
|
|
pToa pOwner
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push1
|
|
push2
|
|
push0
|
|
pToa pOwner
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pSelf
|
|
send $c
|
|
bnot
|
|
jmp code_02f0
|
|
|
|
code_02d1: dup
|
|
ldi $3 ; z
|
|
eq?
|
|
bnt code_02f0
|
|
push1
|
|
push1
|
|
push1
|
|
push0
|
|
pToa pOwner
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push1
|
|
push2
|
|
push0
|
|
pToa pOwner
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pSelf
|
|
send $c
|
|
bnot
|
|
code_02f0: toss
|
|
lap param[$1]
|
|
aTop pOwner
|
|
pushi $373 ; 883, setAction
|
|
push1
|
|
pushi $1d ; 29, brTop
|
|
pushi $3c5 ; 965, addToRoom
|
|
push1
|
|
lsg global[$3]
|
|
pushi $3c8 ; 968, matchScaler
|
|
push1
|
|
lsg global[$3]
|
|
pushi $36a ; 874, updateDisplay
|
|
push1
|
|
push1
|
|
pToa pSelf
|
|
send $18
|
|
bnot
|
|
pTos pOwner
|
|
lag global[$1]
|
|
ne?
|
|
bnt code_0327
|
|
pushi $3a5 ; 933, hideContents
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
jmp code_0327
|
|
|
|
code_0323: lap param[$1]
|
|
aTop pOwner
|
|
code_0327: ret
|
|
|
|
BCarryable::canApproach:
|
|
link $1
|
|
ldi $1
|
|
sat temp[$0]
|
|
lsp param[$1]
|
|
pToa pOwner
|
|
eq?
|
|
bnt code_0339
|
|
ldi $2
|
|
sat temp[$0]
|
|
code_0339: lat temp[$0]
|
|
ret
|
|
|
|
BCarryable::canFace:
|
|
link $1
|
|
ldi $1
|
|
sat temp[$0]
|
|
lsp param[$1]
|
|
pToa pOwner
|
|
eq?
|
|
bnt code_034d
|
|
ldi $2
|
|
sat temp[$0]
|
|
code_034d: lat temp[$0]
|
|
ret
|
|
|
|
BCarryable::updateContainerButton:
|
|
link $1
|
|
pToa pOwner
|
|
bnt code_0363
|
|
pushi $4 ; scaleX
|
|
pushi $15 ; 21, nsBottom
|
|
pushi $4 ; scaleX
|
|
push
|
|
pTos pSelf
|
|
callk kernel_118, $8
|
|
bnot
|
|
code_0363: ret
|
|
|