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