Upload files to "Script"
This commit is contained in:
parent
cc3ce80a88
commit
23d5aa2253
File diff suppressed because it is too large
Load Diff
|
|
@ -0,0 +1,546 @@
|
||||||
|
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
|
||||||
|
|
||||||
Binary file not shown.
|
|
@ -0,0 +1,416 @@
|
||||||
|
ShadowText::centerOn:
|
||||||
|
link $4
|
||||||
|
push1
|
||||||
|
lsp param[$1]
|
||||||
|
calle export60000_0, $2
|
||||||
|
bnot
|
||||||
|
not
|
||||||
|
bnt code_00a4
|
||||||
|
ret
|
||||||
|
|
||||||
|
code_00a4: lap param[$1]
|
||||||
|
aTop pObj
|
||||||
|
push1
|
||||||
|
pTos pObj
|
||||||
|
callk kernel_20, $2
|
||||||
|
bnot
|
||||||
|
pushi $4e ; 78, 'N', width
|
||||||
|
push0
|
||||||
|
pToa pObj
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
sat temp[$0]
|
||||||
|
pushi $e1 ; 225, height
|
||||||
|
push0
|
||||||
|
pToa pObj
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
sat temp[$1]
|
||||||
|
pushi $89 ; 137, top
|
||||||
|
push0
|
||||||
|
pToa pObj
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
sat temp[$3]
|
||||||
|
pushi $df ; 223, centerOn
|
||||||
|
push2
|
||||||
|
pushi $88 ; 136, right
|
||||||
|
push0
|
||||||
|
pToa pObj
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
lst temp[$0]
|
||||||
|
ldi $2
|
||||||
|
div
|
||||||
|
sub
|
||||||
|
push
|
||||||
|
lst temp[$3]
|
||||||
|
super TextItem, $8
|
||||||
|
bnot
|
||||||
|
pushi $3 ; z
|
||||||
|
pushi $2335 ; 9013
|
||||||
|
push0
|
||||||
|
push0
|
||||||
|
callk kernel_29, $6
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $1
|
||||||
|
add
|
||||||
|
sat temp[$3]
|
||||||
|
pTos left
|
||||||
|
ldi $0
|
||||||
|
lt?
|
||||||
|
bnt code_010c
|
||||||
|
pushi $db ; 219, moveTo
|
||||||
|
push2
|
||||||
|
push0
|
||||||
|
pTos top
|
||||||
|
self $8
|
||||||
|
bnot
|
||||||
|
code_010c: pTos top
|
||||||
|
lat temp[$3]
|
||||||
|
lt?
|
||||||
|
bnt code_011e
|
||||||
|
pushi $db ; 219, moveTo
|
||||||
|
push2
|
||||||
|
pTos left
|
||||||
|
lst temp[$3]
|
||||||
|
self $8
|
||||||
|
bnot
|
||||||
|
code_011e: push0
|
||||||
|
push0
|
||||||
|
lag global[$3]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
sat temp[$2]
|
||||||
|
pTos right
|
||||||
|
pushi $88 ; 136, right
|
||||||
|
push0
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
gt?
|
||||||
|
bnt code_0149
|
||||||
|
pushi $dd ; 221, moveBy
|
||||||
|
push2
|
||||||
|
pushi $88 ; 136, right
|
||||||
|
push0
|
||||||
|
lat temp[$2]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pToa right
|
||||||
|
sub
|
||||||
|
push
|
||||||
|
push0
|
||||||
|
self $8
|
||||||
|
bnot
|
||||||
|
code_0149: pTos bottom
|
||||||
|
pushi $8a ; 138, bottom
|
||||||
|
push0
|
||||||
|
lat temp[$2]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
gt?
|
||||||
|
bnt code_016d
|
||||||
|
pushi $dd ; 221, moveBy
|
||||||
|
push2
|
||||||
|
push0
|
||||||
|
pushi $8a ; 138, bottom
|
||||||
|
push0
|
||||||
|
lat temp[$2]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pToa bottom
|
||||||
|
sub
|
||||||
|
push
|
||||||
|
self $8
|
||||||
|
bnot
|
||||||
|
code_016d: pToa left
|
||||||
|
aTop x
|
||||||
|
pToa top
|
||||||
|
aTop y
|
||||||
|
push1
|
||||||
|
pushSelf
|
||||||
|
callk kernel_32, $2
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
ShadowText::follow:
|
||||||
|
pushi $df ; 223, centerOn
|
||||||
|
push1
|
||||||
|
pTos pObj
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
ShadowText::init:
|
||||||
|
pushi $4a ; 74, 'J', setPri
|
||||||
|
push1
|
||||||
|
pushi $2710 ; 10000
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
pushi $d0 ; 208, with
|
||||||
|
push1
|
||||||
|
lsp param[$1]
|
||||||
|
class Str
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
aTop text
|
||||||
|
pushi $1be ; 446, setSize
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
lsp param[$0]
|
||||||
|
ldi $5 ; scaleY
|
||||||
|
gt?
|
||||||
|
bnt code_01b6
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push1
|
||||||
|
lsp param[$6]
|
||||||
|
super TextItem, $6
|
||||||
|
bnot
|
||||||
|
jmp code_01be
|
||||||
|
|
||||||
|
code_01b6: pushi $94 ; 148, init
|
||||||
|
push0
|
||||||
|
super TextItem, $4
|
||||||
|
bnot
|
||||||
|
code_01be: pushi $db ; 219, moveTo
|
||||||
|
push2
|
||||||
|
lsp param[$2]
|
||||||
|
lsp param[$3]
|
||||||
|
self $8
|
||||||
|
bnot
|
||||||
|
push1
|
||||||
|
pushSelf
|
||||||
|
callk kernel_32, $2
|
||||||
|
bnot
|
||||||
|
lsp param[$0]
|
||||||
|
ldi $3 ; z
|
||||||
|
gt?
|
||||||
|
bnt code_0200
|
||||||
|
lsp param[$4]
|
||||||
|
ldi $ff ; 255, asInteger
|
||||||
|
ne?
|
||||||
|
bnt code_01f5
|
||||||
|
pushi $104 ; 260, cueSelector
|
||||||
|
push1
|
||||||
|
pushi $95 ; 149, dispose
|
||||||
|
pushi $106 ; 262, setReal
|
||||||
|
push2
|
||||||
|
pushSelf
|
||||||
|
lsp param[$4]
|
||||||
|
class GlobalTimer
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
aTop pTimer
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_01f5: lsp param[$0]
|
||||||
|
ldi $4 ; scaleX
|
||||||
|
gt?
|
||||||
|
bnt code_0200
|
||||||
|
lap param[$5]
|
||||||
|
aTop caller
|
||||||
|
code_0200: ret
|
||||||
|
|
||||||
|
ShadowText::dispose:
|
||||||
|
pToa pTimer
|
||||||
|
bnt code_020c
|
||||||
|
pushi $36 ; 54, '6', client
|
||||||
|
push1
|
||||||
|
push0
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_020c: pToa caller
|
||||||
|
bnt code_021b
|
||||||
|
pushi $105 ; 261, setCycle
|
||||||
|
push2
|
||||||
|
push
|
||||||
|
push1
|
||||||
|
class GlobalTimer
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
code_021b: push1
|
||||||
|
pTos pObj
|
||||||
|
calle export60000_0, $2
|
||||||
|
bnot
|
||||||
|
bnt code_0251
|
||||||
|
pushi $97 ; 151, isKindOf
|
||||||
|
push1
|
||||||
|
class WorldObject
|
||||||
|
push
|
||||||
|
pToa pObj
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
bnt code_0251
|
||||||
|
pushi $32f ; 815, pMsgStr
|
||||||
|
push0
|
||||||
|
pToa pObj
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
selfID
|
||||||
|
eq?
|
||||||
|
bnt code_0251
|
||||||
|
pushi $32f ; 815, pMsgStr
|
||||||
|
push1
|
||||||
|
push0
|
||||||
|
pToa pObj
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
ldi $0
|
||||||
|
aTop pObj
|
||||||
|
code_0251: pushi $95 ; 149, dispose
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
super TextItem, $4
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
ShadowText::setSize:
|
||||||
|
pushi $1be ; 446, setSize
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
super TextItem, $4
|
||||||
|
bnot
|
||||||
|
pushi $e0 ; 224, widen
|
||||||
|
push1
|
||||||
|
push1
|
||||||
|
pushi $e2 ; 226, heighten
|
||||||
|
push1
|
||||||
|
push1
|
||||||
|
self $c
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
ShadowText::draw:
|
||||||
|
link $1
|
||||||
|
pToa bitmap
|
||||||
|
sat temp[$0]
|
||||||
|
bnt code_028d
|
||||||
|
push1
|
||||||
|
pushSelf
|
||||||
|
callk kernel_31, $2
|
||||||
|
bnot
|
||||||
|
pushi $9f ; 159, add
|
||||||
|
push1
|
||||||
|
pTos bitmap
|
||||||
|
lag global[$66]
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_028d: pushi $7 ; priority
|
||||||
|
push0
|
||||||
|
pushi $4e ; 78, 'N', width
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $20 ; 32, ' ', name
|
||||||
|
add
|
||||||
|
push
|
||||||
|
pushi $e1 ; 225, height
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $20 ; 32, ' ', name
|
||||||
|
add
|
||||||
|
push
|
||||||
|
pushi $72 ; 114, 'r', skip
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pushi $26 ; 38, '&', back
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pushi $6e ; 110, 'n', resX
|
||||||
|
push0
|
||||||
|
pToa plane
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pushi $6f ; 111, 'o', resY
|
||||||
|
push0
|
||||||
|
pToa plane
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
callk kernel_35, $e
|
||||||
|
bnot
|
||||||
|
aTop bitmap
|
||||||
|
pushi $f ; 15, loop
|
||||||
|
pushi $4 ; scaleX
|
||||||
|
pTos bitmap
|
||||||
|
push2
|
||||||
|
pushi $9 ; inLeft
|
||||||
|
pTos text
|
||||||
|
callk kernel_91, $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
push1
|
||||||
|
push1
|
||||||
|
pushi $4e ; 78, 'N', width
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pushi $e1 ; 225, height
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pTos pShadowColor
|
||||||
|
pTos back
|
||||||
|
pTos skip
|
||||||
|
pTos font
|
||||||
|
pTos mode
|
||||||
|
pTos borderColor
|
||||||
|
pTos dimmed
|
||||||
|
push0
|
||||||
|
callk kernel_35, $1e
|
||||||
|
bnot
|
||||||
|
pushi $f ; 15, loop
|
||||||
|
pushi $4 ; scaleX
|
||||||
|
pTos bitmap
|
||||||
|
push2
|
||||||
|
pushi $9 ; inLeft
|
||||||
|
pTos text
|
||||||
|
callk kernel_91, $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
push0
|
||||||
|
push0
|
||||||
|
pushi $4e ; 78, 'N', width
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pushi $e1 ; 225, height
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pTos fore
|
||||||
|
pTos back
|
||||||
|
pTos skip
|
||||||
|
pTos font
|
||||||
|
pTos mode
|
||||||
|
pTos borderColor
|
||||||
|
pTos dimmed
|
||||||
|
push0
|
||||||
|
callk kernel_35, $1e
|
||||||
|
bnot
|
||||||
|
lat temp[$0]
|
||||||
|
bnt code_033f
|
||||||
|
push1
|
||||||
|
pushSelf
|
||||||
|
callk kernel_30, $2
|
||||||
|
bnot
|
||||||
|
code_033f: ret
|
||||||
|
|
||||||
|
|
@ -0,0 +1,358 @@
|
||||||
|
InfoQueue::cue:
|
||||||
|
link $4
|
||||||
|
lag global[$3]
|
||||||
|
sat temp[$1]
|
||||||
|
lag global[$1]
|
||||||
|
bnt code_0055
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
sag global[$3]
|
||||||
|
code_0055: lag global[$3]
|
||||||
|
bnt code_0062
|
||||||
|
push0
|
||||||
|
push0
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
sat temp[$2]
|
||||||
|
jmp code_0066
|
||||||
|
|
||||||
|
code_0062: ldi $0
|
||||||
|
sat temp[$2]
|
||||||
|
code_0066: ldi $0
|
||||||
|
sat temp[$3]
|
||||||
|
pToa pText
|
||||||
|
bnt code_007e
|
||||||
|
pushi $58 ; 88, 'X', delete
|
||||||
|
push1
|
||||||
|
push
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
pushi $95 ; 149, dispose
|
||||||
|
push0
|
||||||
|
pToa pText
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
code_007e: lat temp[$2]
|
||||||
|
bnt code_01a4
|
||||||
|
pushi $4b ; 75, 'K', at
|
||||||
|
push1
|
||||||
|
push0
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
aTop pText
|
||||||
|
bnt code_01a4
|
||||||
|
lag global[$1]
|
||||||
|
bnt code_018b
|
||||||
|
pushi $1bf ; 447, isHidden
|
||||||
|
push0
|
||||||
|
push0
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
not
|
||||||
|
bnt code_018b
|
||||||
|
pushi $5a ; 90, 'Z', size
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $f ; 15, loop
|
||||||
|
gt?
|
||||||
|
bnt code_00b8
|
||||||
|
ldi $1
|
||||||
|
sat temp[$0]
|
||||||
|
jmp code_00e6
|
||||||
|
|
||||||
|
code_00b8: pushi $5a ; 90, 'Z', size
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $a ; 10, inTop
|
||||||
|
gt?
|
||||||
|
bnt code_00cd
|
||||||
|
pTos pDelay
|
||||||
|
ldi $3 ; z
|
||||||
|
div
|
||||||
|
sat temp[$0]
|
||||||
|
jmp code_00e6
|
||||||
|
|
||||||
|
code_00cd: pushi $5a ; 90, 'Z', size
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $5 ; scaleY
|
||||||
|
gt?
|
||||||
|
bnt code_00e2
|
||||||
|
pTos pDelay
|
||||||
|
ldi $2
|
||||||
|
div
|
||||||
|
sat temp[$0]
|
||||||
|
jmp code_00e6
|
||||||
|
|
||||||
|
code_00e2: pToa pDelay
|
||||||
|
sat temp[$0]
|
||||||
|
code_00e6: push1
|
||||||
|
pTos pText
|
||||||
|
calle export60000_0, $2
|
||||||
|
bnot
|
||||||
|
bnt code_0138
|
||||||
|
pushi $97 ; 151, isKindOf
|
||||||
|
push1
|
||||||
|
class Str
|
||||||
|
push
|
||||||
|
pToa pText
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
bnt code_0138
|
||||||
|
pushi $25 ; 37, '%', fore
|
||||||
|
push1
|
||||||
|
pTos pColor
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
pushi $5 ; scaleY
|
||||||
|
pTos pText
|
||||||
|
pushi $88 ; 136, right
|
||||||
|
push0
|
||||||
|
lat temp[$2]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pushi $8a ; 138, bottom
|
||||||
|
push0
|
||||||
|
lat temp[$2]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $10 ; 16, cel
|
||||||
|
add
|
||||||
|
push
|
||||||
|
lst temp[$0]
|
||||||
|
pushSelf
|
||||||
|
pushi $8d ; 141, new
|
||||||
|
push0
|
||||||
|
class ShadowText
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
sat temp[$3]
|
||||||
|
send $14
|
||||||
|
bnot
|
||||||
|
jmp code_01a4
|
||||||
|
|
||||||
|
code_0138: pushi $58 ; 88, 'X', delete
|
||||||
|
push1
|
||||||
|
pTos pText
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
pushi $d0 ; 208, with
|
||||||
|
push1
|
||||||
|
lofsa string_0032 ; "Bad string in InfoQueue."
|
||||||
|
push
|
||||||
|
class Str
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
aTop pText
|
||||||
|
pushi $aa ; 170, addToFront
|
||||||
|
push1
|
||||||
|
pTos pText
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
pushi $5 ; scaleY
|
||||||
|
pTos pText
|
||||||
|
pushi $88 ; 136, right
|
||||||
|
push0
|
||||||
|
lat temp[$2]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pushi $8a ; 138, bottom
|
||||||
|
push0
|
||||||
|
lat temp[$2]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $10 ; 16, cel
|
||||||
|
add
|
||||||
|
push
|
||||||
|
lst temp[$0]
|
||||||
|
pushSelf
|
||||||
|
pushi $8d ; 141, new
|
||||||
|
push0
|
||||||
|
class ShadowText
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
sat temp[$3]
|
||||||
|
send $e
|
||||||
|
bnot
|
||||||
|
jmp code_01a4
|
||||||
|
|
||||||
|
code_018b: ldi $0
|
||||||
|
aTop pText
|
||||||
|
pushi $104 ; 260, cueSelector
|
||||||
|
push1
|
||||||
|
pushi $c7 ; 199, cue
|
||||||
|
pushi $106 ; 262, setReal
|
||||||
|
push2
|
||||||
|
pushSelf
|
||||||
|
push1
|
||||||
|
class GlobalTimer
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_01a4: lat temp[$3]
|
||||||
|
bnt code_01e8
|
||||||
|
lat temp[$2]
|
||||||
|
bnt code_01e8
|
||||||
|
pushi $88 ; 136, right
|
||||||
|
push0
|
||||||
|
lat temp[$3]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pushi $88 ; 136, right
|
||||||
|
push0
|
||||||
|
lat temp[$2]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
gt?
|
||||||
|
bnt code_01e8
|
||||||
|
pushi $dd ; 221, moveBy
|
||||||
|
push2
|
||||||
|
pushi $88 ; 136, right
|
||||||
|
push0
|
||||||
|
lat temp[$2]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pushi $88 ; 136, right
|
||||||
|
push0
|
||||||
|
lat temp[$3]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
sub
|
||||||
|
push
|
||||||
|
push0
|
||||||
|
lat temp[$3]
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
push1
|
||||||
|
lst temp[$3]
|
||||||
|
callk kernel_32, $2
|
||||||
|
bnot
|
||||||
|
code_01e8: lat temp[$1]
|
||||||
|
sag global[$3]
|
||||||
|
ret
|
||||||
|
|
||||||
|
InfoQueue::add:
|
||||||
|
link $2
|
||||||
|
pToa pEnabled
|
||||||
|
not
|
||||||
|
bnt code_01fe
|
||||||
|
pushi $95 ; 149, dispose
|
||||||
|
push0
|
||||||
|
lap param[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
code_01fe: push1
|
||||||
|
lsp param[$1]
|
||||||
|
calle export60000_0, $2
|
||||||
|
bnot
|
||||||
|
bnt code_0245
|
||||||
|
pushi $97 ; 151, isKindOf
|
||||||
|
push1
|
||||||
|
class Str
|
||||||
|
push
|
||||||
|
lap param[$1]
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
bnt code_0245
|
||||||
|
pushi $9f ; 159, add
|
||||||
|
push1
|
||||||
|
lsp param[$1]
|
||||||
|
super Set, $6
|
||||||
|
bnot
|
||||||
|
pushi $5a ; 90, 'Z', size
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $1
|
||||||
|
eq?
|
||||||
|
bnt code_026d
|
||||||
|
pushi $104 ; 260, cueSelector
|
||||||
|
push1
|
||||||
|
pushi $c7 ; 199, cue
|
||||||
|
pushi $106 ; 262, setReal
|
||||||
|
push2
|
||||||
|
pushSelf
|
||||||
|
push1
|
||||||
|
class GlobalTimer
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
jmp code_026d
|
||||||
|
|
||||||
|
code_0245: pushi $f5 ; 245, format
|
||||||
|
push2
|
||||||
|
lofsa string_004b ; "Bad string added to InfoQueue (0x%x)"
|
||||||
|
push
|
||||||
|
lsp param[$1]
|
||||||
|
class Str
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
sat temp[$1]
|
||||||
|
pushi $6 ; maxScale
|
||||||
|
push
|
||||||
|
pushi $74 ; 116, 't', all
|
||||||
|
lofsa string_0070 ; "DOH!"
|
||||||
|
push
|
||||||
|
pushi $77 ; 119, 'w', textTop
|
||||||
|
lofsa string_0075 ; "Okay"
|
||||||
|
push
|
||||||
|
push0
|
||||||
|
calle export60029_0, $c
|
||||||
|
bnot
|
||||||
|
code_026d: ret
|
||||||
|
|
||||||
|
InfoQueue::clear:
|
||||||
|
pToa pText
|
||||||
|
bt code_0278
|
||||||
|
lap param[$0]
|
||||||
|
bnt code_02a3
|
||||||
|
lap param[$1]
|
||||||
|
code_0278: bnt code_02a3
|
||||||
|
pToa pText
|
||||||
|
bnt code_0285
|
||||||
|
pushi $58 ; 88, 'X', delete
|
||||||
|
push1
|
||||||
|
push
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
code_0285: pushi $9d ; 157, eachElementDo
|
||||||
|
push1
|
||||||
|
pushi $95 ; 149, dispose
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
pushi $a6 ; 166, release
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
pToa pText
|
||||||
|
bnt code_02a3
|
||||||
|
pushi $9f ; 159, add
|
||||||
|
push1
|
||||||
|
push
|
||||||
|
super Set, $6
|
||||||
|
bnot
|
||||||
|
code_02a3: ret
|
||||||
|
|
||||||
Loading…
Reference in New Issue