547 lines
8.0 KiB
Plaintext
547 lines
8.0 KiB
Plaintext
ActionQueue::dispose:
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
pushSelf
|
|
lofsa ActionQMgr
|
|
send $6
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
&rest $1
|
|
super Set, $4
|
|
bnot
|
|
ret
|
|
|
|
ActionQueue::cue:
|
|
link $4
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
push0
|
|
self $6
|
|
bnot
|
|
sat temp[$0]
|
|
bnt code_00a3
|
|
pushi $33a ; 826, pActionQueue
|
|
push1
|
|
pushSelf
|
|
send $6
|
|
bnot
|
|
lat temp[$0]
|
|
sag global[$f0]
|
|
pushi $1ce ; 462, process
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
code_00a3: ret
|
|
|
|
ActionQueue::delete:
|
|
link $2
|
|
pushi $58 ; 88, 'X', delete
|
|
push0
|
|
&rest $1
|
|
super Set, $4
|
|
bnot
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
self $4
|
|
bnot
|
|
not
|
|
bnt code_00f4
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
lofsa pendingActions
|
|
send $4
|
|
bnot
|
|
bnt code_00ea
|
|
code_00c3: pushi $33b ; 827, addAction
|
|
push2
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
push0
|
|
lofsa pendingActions
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
push
|
|
push0
|
|
lofsa ActionQMgr
|
|
send $8
|
|
bnot
|
|
bnt code_00ea
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
lst temp[$1]
|
|
lofsa pendingActions
|
|
send $6
|
|
bnot
|
|
jmp code_00c3
|
|
|
|
code_00ea: pushi $9f ; 159, add
|
|
push1
|
|
pushSelf
|
|
class DeadObjects
|
|
send $6
|
|
bnot
|
|
code_00f4: ret
|
|
|
|
ActionQueue::isDependent:
|
|
link $3
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
ldi $0
|
|
sat temp[$1]
|
|
code_0105: lst temp[$1]
|
|
lat temp[$0]
|
|
lt?
|
|
bnt code_012c
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$1]
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$2]
|
|
pushi $a0 ; 160, firstTrue
|
|
push2
|
|
pushi $339 ; 825, isDependent
|
|
push
|
|
self $8
|
|
bnot
|
|
bnt code_0128
|
|
ldi $1
|
|
ret
|
|
|
|
code_0128: +at temp[$1]
|
|
jmp code_0105
|
|
|
|
code_012c: ldi $0
|
|
ret
|
|
|
|
ActionQMgr::addAction:
|
|
link $5
|
|
lsp param[$0]
|
|
ldi $1
|
|
gt?
|
|
bnt code_013e
|
|
lap param[$2]
|
|
sat temp[$4]
|
|
jmp code_0142
|
|
|
|
code_013e: ldi $1
|
|
sat temp[$4]
|
|
code_0142: lsp param[$1]
|
|
ldi $0
|
|
eq?
|
|
bnt code_014c
|
|
ldi $0
|
|
ret
|
|
|
|
code_014c: lat temp[$4]
|
|
bnt code_016d
|
|
pushi $339 ; 825, isDependent
|
|
push1
|
|
lsp param[$1]
|
|
lofsa pendingActions
|
|
send $6
|
|
bnot
|
|
bnt code_016d
|
|
pushi $9f ; 159, add
|
|
push1
|
|
lsp param[$1]
|
|
lofsa pendingActions
|
|
send $6
|
|
bnot
|
|
ldi $0
|
|
ret
|
|
|
|
code_016d: pushi $5a ; 90, 'Z', size
|
|
push0
|
|
self $4
|
|
bnot
|
|
sat temp[$3]
|
|
pushi $a6 ; 166, release
|
|
push0
|
|
lofsa scratchList
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sat temp[$0]
|
|
code_0183: lst temp[$0]
|
|
lat temp[$3]
|
|
lt?
|
|
bnt code_01af
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
self $6
|
|
bnot
|
|
sat temp[$1]
|
|
pushi $339 ; 825, isDependent
|
|
push1
|
|
lsp param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_01ab
|
|
pushi $9f ; 159, add
|
|
push1
|
|
lst temp[$1]
|
|
lofsa scratchList
|
|
send $6
|
|
bnot
|
|
code_01ab: +at temp[$0]
|
|
jmp code_0183
|
|
|
|
code_01af: ldi $0
|
|
sat temp[$1]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
lofsa scratchList
|
|
send $4
|
|
bnot
|
|
push
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_01e0
|
|
pushi $94 ; 148, init
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class ActionQueue
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
send $4
|
|
bnot
|
|
pushi $9f ; 159, add
|
|
push1
|
|
lst temp[$1]
|
|
self $6
|
|
bnot
|
|
jmp code_0203
|
|
|
|
code_01e0: dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_01f4
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
push0
|
|
lofsa scratchList
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
jmp code_0203
|
|
|
|
code_01f4: pushi $9f ; 159, add
|
|
push1
|
|
lsp param[$1]
|
|
lofsa pendingActions
|
|
send $6
|
|
bnot
|
|
ldi $0
|
|
ret
|
|
|
|
code_0203: toss
|
|
pushi $9f ; 159, add
|
|
push1
|
|
lsp param[$1]
|
|
lat temp[$1]
|
|
send $6
|
|
bnot
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
eq?
|
|
bnt code_0229
|
|
pushi $9f ; 159, add
|
|
push1
|
|
lst temp[$1]
|
|
lofsa kickStartList
|
|
send $6
|
|
bnot
|
|
code_0229: ldi $1
|
|
ret
|
|
|
|
ActionQMgr::doit:
|
|
link $2
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
lofsa kickStartList
|
|
send $4
|
|
bnot
|
|
bnt code_0250
|
|
pushi $9d ; 157, eachElementDo
|
|
push1
|
|
pushi $c7 ; 199, cue
|
|
lofsa kickStartList
|
|
send $6
|
|
bnot
|
|
pushi $a6 ; 166, release
|
|
push0
|
|
lofsa kickStartList
|
|
send $4
|
|
bnot
|
|
code_0250: pushi $4b ; 75, 'K', at
|
|
push1
|
|
push0
|
|
class MovieCmdList
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
push0
|
|
callk kernel_121, $0
|
|
bnot
|
|
sat temp[$1]
|
|
push
|
|
lal local[$1]
|
|
ugt?
|
|
not
|
|
bnt code_026d
|
|
lat temp[$1]
|
|
sal local[$1]
|
|
code_026d: lat temp[$0]
|
|
bnt code_03d2
|
|
lsl local[$0]
|
|
eq?
|
|
bnt code_03d2
|
|
push0
|
|
callk kernel_121, $0
|
|
bnot
|
|
push
|
|
lal local[$1]
|
|
sub
|
|
push
|
|
ldi $1c20 ; 7200
|
|
gt?
|
|
bnt code_03dd
|
|
pushi $b ; 11, inRight
|
|
lofsa string_00d7 ; "The Realm seems to have locked up on you... the following debug data will help us to track the problem.\n"
|
|
push
|
|
lat temp[$0]
|
|
bnt code_029b
|
|
pushi $20 ; 32, ' ', name
|
|
push0
|
|
send $4
|
|
bnot
|
|
jmp code_029e
|
|
|
|
code_029b: lofsa string_01d6 ; "<none>"
|
|
code_029e: push
|
|
lst temp[$0]
|
|
lat temp[$0]
|
|
bnt code_02c8
|
|
push1
|
|
pushi $33f ; 831, pClient
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
calle export60000_0, $2
|
|
bnot
|
|
bnt code_02c8
|
|
pushi $20 ; 32, ' ', name
|
|
push0
|
|
pushi $33f ; 831, pClient
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
jmp code_02cb
|
|
|
|
code_02c8: lofsa string_01d6 ; "<none>"
|
|
code_02cb: push
|
|
push1
|
|
lst temp[$0]
|
|
calle export60000_0, $2
|
|
bnot
|
|
bnt code_02e3
|
|
pushi $33f ; 831, pClient
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
jmp code_02e5
|
|
|
|
code_02e3: ldi $0
|
|
code_02e5: push
|
|
lat temp[$0]
|
|
bnt code_0338
|
|
push1
|
|
pushi $33f ; 831, pClient
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
calle export60000_0, $2
|
|
bnot
|
|
bnt code_0338
|
|
pushi $99 ; 153, respondsTo
|
|
push1
|
|
pushi $44 ; 68, 'D', mover
|
|
pushi $33f ; 831, pClient
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_0338
|
|
pushi $44 ; 68, 'D', mover
|
|
push0
|
|
pushi $33f ; 831, pClient
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
bnt code_0338
|
|
pushi $20 ; 32, ' ', name
|
|
push0
|
|
pushi $44 ; 68, 'D', mover
|
|
push0
|
|
pushi $33f ; 831, pClient
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
jmp code_033b
|
|
|
|
code_0338: lofsa string_01d6 ; "<none>"
|
|
code_033b: push
|
|
lat temp[$0]
|
|
bnt code_0377
|
|
push1
|
|
pushi $33f ; 831, pClient
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
calle export60000_0, $2
|
|
bnot
|
|
bnt code_0377
|
|
pushi $99 ; 153, respondsTo
|
|
push1
|
|
pushi $44 ; 68, 'D', mover
|
|
pushi $33f ; 831, pClient
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_0377
|
|
pushi $44 ; 68, 'D', mover
|
|
push0
|
|
pushi $33f ; 831, pClient
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
jmp code_0379
|
|
|
|
code_0377: ldi $0
|
|
code_0379: push
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
class MovieCmdList
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $c3 ; 195, script
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
bnt code_039f
|
|
pushi $20 ; 32, ' ', name
|
|
push0
|
|
pushi $c3 ; 195, script
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
jmp code_03a2
|
|
|
|
code_039f: lofsa string_01d6 ; "<none>"
|
|
code_03a2: push
|
|
pushi $c3 ; 195, script
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $c3 ; 195, script
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
bnt code_03c9
|
|
pushi $29 ; 41, ')', state
|
|
push0
|
|
pushi $c3 ; 195, script
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
jmp code_03cb
|
|
|
|
code_03c9: ldi $ff ; 255, asInteger
|
|
code_03cb: push
|
|
callk kernel_132, $16
|
|
bnot
|
|
jmp code_03dd
|
|
|
|
code_03d2: lat temp[$0]
|
|
sal local[$0]
|
|
push0
|
|
callk kernel_121, $0
|
|
bnot
|
|
sal local[$1]
|
|
code_03dd: ret
|
|
|
|
ActionQMgr::flush:
|
|
pushi $9d ; 157, eachElementDo
|
|
push1
|
|
pushi $95 ; 149, dispose
|
|
self $6
|
|
bnot
|
|
pushi $a6 ; 166, release
|
|
push0
|
|
self $4
|
|
bnot
|
|
pushi $a6 ; 166, release
|
|
push0
|
|
lofsa kickStartList
|
|
send $4
|
|
bnot
|
|
pushi $a6 ; 166, release
|
|
push0
|
|
lofsa pendingActions
|
|
send $4
|
|
bnot
|
|
ret
|
|
|