92 lines
1.3 KiB
Plaintext
92 lines
1.3 KiB
Plaintext
BSwitch::buildVerbList:
|
|
link $1
|
|
class VerbList
|
|
sat temp[$0]
|
|
pToa pOwner
|
|
not
|
|
bnt code_0073
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class WorldEgo
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_0073
|
|
pToa pOpen
|
|
bnt code_0068
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushi $7f ; 127, frameOut
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
jmp code_0073
|
|
|
|
code_0068: pushi $9f ; 159, add
|
|
push1
|
|
pushi $7e ; 126, '~', dimmed
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
code_0073: ret
|
|
|
|
BSwitch::handlesAction:
|
|
pushi $3 ; z
|
|
lsp param[$1]
|
|
pushi $248 ; 584, open
|
|
pushi $253 ; 595, close
|
|
calle export60025_4, $6
|
|
bnot
|
|
ret
|
|
|
|
BSwitch::open:
|
|
link $3
|
|
ldi $0
|
|
sat temp[$0]
|
|
pToa pOpen
|
|
bnt code_0096
|
|
ldi $4 ; scaleX
|
|
sat temp[$0]
|
|
jmp code_009a
|
|
|
|
code_0096: ldi $1
|
|
aTop pOpen
|
|
code_009a: lat temp[$0]
|
|
ret
|
|
|
|
BSwitch::close:
|
|
link $2
|
|
ldi $0
|
|
sat temp[$0]
|
|
pToa pOpen
|
|
bnt code_00cf
|
|
ldi $0
|
|
aTop pOpen
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BLockable
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
bnt code_00d3
|
|
pushi $427 ; 1063, pAutoLock
|
|
push0
|
|
send $4
|
|
bnot
|
|
bnt code_00d3
|
|
pushi $34a ; 842, lock
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
jmp code_00d3
|
|
|
|
code_00cf: ldi $4 ; scaleX
|
|
sat temp[$0]
|
|
code_00d3: lat temp[$0]
|
|
ret
|
|
|