4655 lines
69 KiB
Plaintext
4655 lines
69 KiB
Plaintext
export40111_0 = code_20ba
|
|
export40111_1 = WACombatMoveScript
|
|
|
|
ShowCombatAction::doit:
|
|
link $1
|
|
ldi $f1 ; 241, scale
|
|
sat temp[$0]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
class SpellList
|
|
send $4
|
|
bnot
|
|
bnt code_024e
|
|
lst temp[$0]
|
|
ldi $2
|
|
or
|
|
sat temp[$0]
|
|
code_024e: pushi $45 ; 69, 'E', doit
|
|
pushi $3 ; z
|
|
lofsa ItemList
|
|
push
|
|
lsg global[$1]
|
|
lofsa EdibleCode
|
|
push
|
|
lofsa MakeItemList
|
|
send $a
|
|
bnot
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
lofsa ItemList
|
|
send $4
|
|
bnot
|
|
bnt code_0275
|
|
lst temp[$0]
|
|
ldi $4 ; scaleX
|
|
or
|
|
sat temp[$0]
|
|
code_0275: pushi $95 ; 149, dispose
|
|
push0
|
|
lofsa ItemList
|
|
send $4
|
|
bnot
|
|
pushi $45 ; 69, 'E', doit
|
|
pushi $3 ; z
|
|
lofsa ItemList
|
|
push
|
|
lsg global[$1]
|
|
lofsa UseableCode
|
|
push
|
|
lofsa MakeItemList
|
|
send $a
|
|
bnot
|
|
pushi $45 ; 69, 'E', doit
|
|
pushi $4 ; scaleX
|
|
lofsa ItemList
|
|
push
|
|
lsg global[$1]
|
|
lofsa EquipCode
|
|
push
|
|
push0
|
|
lofsa MakeItemList
|
|
send $c
|
|
bnot
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
lofsa ItemList
|
|
send $4
|
|
bnot
|
|
bnt code_02bc
|
|
lst temp[$0]
|
|
ldi $8 ; fixPriority
|
|
or
|
|
sat temp[$0]
|
|
code_02bc: pushi $95 ; 149, dispose
|
|
push0
|
|
lofsa ItemList
|
|
send $4
|
|
bnot
|
|
pushi $3 ; z
|
|
pushi $9 ; inLeft
|
|
push2
|
|
lst temp[$0]
|
|
callk kernel_118, $6
|
|
bnot
|
|
ret
|
|
|
|
BasicCursorController::doit:
|
|
link $1
|
|
pushi $271 ; 625, handsLevel
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
bnt code_02e4
|
|
ldi $ff ; 255, asInteger
|
|
aTop pLastCursor
|
|
ret
|
|
|
|
code_02e4: pushi $f4 ; 244, curEvent
|
|
push0
|
|
lag global[$e]
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $2b ; 43, '+', type
|
|
push0
|
|
send $4
|
|
bnot
|
|
not
|
|
bnt code_0358
|
|
pTos pActiveCursor
|
|
pToa pLastCursor
|
|
ne?
|
|
bnt code_0303
|
|
ldi $ff ; 255, asInteger
|
|
aTop pOnScreen
|
|
code_0303: pushi $a3 ; 163, contains
|
|
push1
|
|
lst temp[$0]
|
|
push0
|
|
push0
|
|
lag global[$3]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_0338
|
|
pTos pOnScreen
|
|
ldi $1
|
|
ne?
|
|
bnt code_0358
|
|
pushi $1b3 ; 435, setCursor
|
|
push2
|
|
pushi $270d ; 9997
|
|
pTos pActiveCursor
|
|
pushi $57 ; 87, 'W', draw
|
|
push0
|
|
lofsa combatCursor
|
|
send $c
|
|
bnot
|
|
pToa pActiveCursor
|
|
aTop pLastCursor
|
|
ldi $1
|
|
aTop pOnScreen
|
|
jmp code_0358
|
|
|
|
code_0338: pTos pOnScreen
|
|
ldi $0
|
|
ne?
|
|
bnt code_0358
|
|
pushi $1b3 ; 435, setCursor
|
|
push2
|
|
pushi $270d ; 9997
|
|
push0
|
|
pushi $57 ; 87, 'W', draw
|
|
push0
|
|
lofsa combatCursor
|
|
send $c
|
|
bnot
|
|
pToa pActiveCursor
|
|
aTop pLastCursor
|
|
ldi $0
|
|
aTop pOnScreen
|
|
code_0358: ret
|
|
|
|
CombatDragItem::track:
|
|
pushi $b9 ; 185, localize
|
|
push1
|
|
push0
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pOfsX
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pOfsY
|
|
pushi $ba ; 186, globalize
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
pushi $ec ; 236, track
|
|
push1
|
|
lsp param[$1]
|
|
super Button, $6
|
|
bnot
|
|
ret
|
|
|
|
CombatDragItem::trackDoit:
|
|
pushi $ba ; 186, globalize
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
pushi $db ; 219, moveTo
|
|
push2
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pOfsX
|
|
sub
|
|
push
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pOfsY
|
|
sub
|
|
push
|
|
push0
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $8
|
|
bnot
|
|
push1
|
|
push0
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
callk kernel_42, $2
|
|
bnot
|
|
ret
|
|
|
|
cancelButton::doit:
|
|
ldi $1
|
|
sal local[$a]
|
|
lal local[$e]
|
|
bnt code_03e0
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$e]
|
|
code_03e0: ret
|
|
|
|
HelpText::doit:
|
|
lal local[$9]
|
|
bnt code_03f0
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$9]
|
|
code_03f0: lap param[$1]
|
|
not
|
|
bnt code_03f6
|
|
ret
|
|
|
|
code_03f6: pushi $11 ; 17, bitmap
|
|
lsp param[$1]
|
|
pushi $64 ; 100, 'd', moveDone
|
|
pushi $170 ; 368, display
|
|
pushi $148 ; 328, divisions
|
|
pushi $6a ; 106, 'j', scaleSignal
|
|
pushi $fb ; 251, subStr
|
|
pushi $90 ; 144, bitGetIndex
|
|
pushi $64 ; 100, 'd', moveDone
|
|
pushi $74 ; 116, 't', all
|
|
lofsa string_0943 ; "Help"
|
|
push
|
|
pushi $91 ; 145, bitPutIndex
|
|
push0
|
|
pushi $81 ; 129, magnifier
|
|
lofsa cancelButton
|
|
push
|
|
pushi $fdea ; -534
|
|
pushi $3c ; 60, '<', b_di
|
|
pushi $47 ; 71, 'G', looper
|
|
calle export60029_0, $22
|
|
bnot
|
|
sal local[$9]
|
|
ret
|
|
|
|
CastSpell::doit:
|
|
ldi $0
|
|
sal local[$e]
|
|
lsp param[$1]
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_0441
|
|
ldi $1
|
|
sal local[$a]
|
|
jmp code_050d
|
|
|
|
code_0441: pushi $2bb ; 699, pType
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $10 ; 16, cel
|
|
and
|
|
bnt code_04af
|
|
pushi $321 ; 801, pID
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sal local[$b]
|
|
pushi $2bb ; 699, pType
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sal local[$c]
|
|
push2
|
|
pushi $9 ; inLeft
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
push1
|
|
pushi $c ; 12, inBottom
|
|
callk kernel_118, $2
|
|
bnot
|
|
pushi $9 ; inLeft
|
|
pushi $e ; 14, view
|
|
lofsa string_0951 ; "tbwppbb"
|
|
push
|
|
pushi $70 ; 112, 'p', coordType
|
|
pushi $5 ; scaleY
|
|
lsl local[$b]
|
|
lsl local[$d]
|
|
dup
|
|
push0
|
|
push0
|
|
callk kernel_128, $12
|
|
bnot
|
|
lal local[$f]
|
|
bnt code_049b
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$f]
|
|
code_049b: push2
|
|
pushi $1f ; 31, brBottom
|
|
pushi $5 ; scaleY
|
|
callk kernel_118, $4
|
|
bnot
|
|
pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
jmp code_050d
|
|
|
|
code_04af: pushi $2bb ; 699, pType
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $4 ; scaleX
|
|
and
|
|
bnt code_04df
|
|
pushi $321 ; 801, pID
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sal local[$b]
|
|
pushi $2bb ; 699, pType
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sal local[$c]
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
pushi $3 ; z
|
|
callk kernel_118, $4
|
|
bnot
|
|
jmp code_050d
|
|
|
|
code_04df: pushi $2bb ; 699, pType
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $8 ; fixPriority
|
|
and
|
|
bnt code_050d
|
|
pushi $321 ; 801, pID
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sal local[$b]
|
|
pushi $2bb ; 699, pType
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sal local[$c]
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
pushi $3 ; z
|
|
callk kernel_118, $4
|
|
bnot
|
|
code_050d: toss
|
|
ldi $1
|
|
ret
|
|
|
|
ChooseItemToEat::doit:
|
|
ldi $0
|
|
sal local[$e]
|
|
lsp param[$1]
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_0523
|
|
ldi $1
|
|
sal local[$a]
|
|
jmp code_056d
|
|
|
|
code_0523: push2
|
|
pushi $9 ; inLeft
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
push1
|
|
pushi $c ; 12, inBottom
|
|
callk kernel_118, $2
|
|
bnot
|
|
pushi $5 ; scaleY
|
|
pushi $e ; 14, view
|
|
lofsa string_0963 ; "tbp"
|
|
push
|
|
pushi $70 ; 112, 'p', coordType
|
|
pushi $6 ; maxScale
|
|
pushi $8c ; 140, scratch
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
callk kernel_128, $a
|
|
bnot
|
|
lal local[$f]
|
|
bnt code_055b
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$f]
|
|
code_055b: push2
|
|
pushi $1f ; 31, brBottom
|
|
pushi $5 ; scaleY
|
|
callk kernel_118, $4
|
|
bnot
|
|
pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
code_056d: toss
|
|
ldi $1
|
|
ret
|
|
|
|
ChooseItemToEquip::doit:
|
|
ldi $0
|
|
sal local[$e]
|
|
lsp param[$1]
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_0583
|
|
ldi $1
|
|
sal local[$a]
|
|
jmp code_05cd
|
|
|
|
code_0583: push2
|
|
pushi $9 ; inLeft
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
push1
|
|
pushi $c ; 12, inBottom
|
|
callk kernel_118, $2
|
|
bnot
|
|
pushi $5 ; scaleY
|
|
pushi $e ; 14, view
|
|
lofsa string_0963 ; "tbp"
|
|
push
|
|
pushi $70 ; 112, 'p', coordType
|
|
pushi $8 ; fixPriority
|
|
pushi $8c ; 140, scratch
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
callk kernel_128, $a
|
|
bnot
|
|
lal local[$f]
|
|
bnt code_05bb
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$f]
|
|
code_05bb: push2
|
|
pushi $1f ; 31, brBottom
|
|
pushi $5 ; scaleY
|
|
callk kernel_118, $4
|
|
bnot
|
|
pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
code_05cd: toss
|
|
ldi $1
|
|
ret
|
|
|
|
ChooseItemToUse::doit:
|
|
link $2
|
|
ldi $0
|
|
sal local[$e]
|
|
lsp param[$1]
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_05e6
|
|
ldi $1
|
|
sal local[$a]
|
|
jmp code_0686
|
|
|
|
code_05e6: push2
|
|
pushi $9 ; inLeft
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
push1
|
|
pushi $c ; 12, inBottom
|
|
callk kernel_118, $2
|
|
bnot
|
|
pushi $8c ; 140, scratch
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sap param[$1]
|
|
pushi $45 ; 69, 'E', doit
|
|
push1
|
|
push
|
|
lofsa UseableCode
|
|
send $6
|
|
bnot
|
|
bnt code_0653
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BUse
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $454 ; 1108, pSpell
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $ff ; 255, asInteger
|
|
ne?
|
|
bnt code_0686
|
|
lap param[$1]
|
|
sal local[$d]
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
pushi $454 ; 1108, pSpell
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
pushi $9cac ; -25428
|
|
pushi $6 ; maxScale
|
|
callk kernel_2, $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
pushi $45 ; 69, 'E', doit
|
|
push1
|
|
push
|
|
lofsa CastSpell
|
|
send $6
|
|
bnot
|
|
jmp code_0686
|
|
|
|
code_0653: pushi $5 ; scaleY
|
|
pushi $e ; 14, view
|
|
lofsa string_0963 ; "tbp"
|
|
push
|
|
pushi $70 ; 112, 'p', coordType
|
|
pushi $8 ; fixPriority
|
|
lsp param[$1]
|
|
callk kernel_128, $a
|
|
bnot
|
|
lal local[$f]
|
|
bnt code_0674
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$f]
|
|
code_0674: push2
|
|
pushi $1f ; 31, brBottom
|
|
pushi $5 ; scaleY
|
|
callk kernel_118, $4
|
|
bnot
|
|
pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
code_0686: toss
|
|
ldi $1
|
|
ret
|
|
|
|
HandleCombatAction::doit:
|
|
link $2
|
|
lap param[$1]
|
|
aTop scratch
|
|
push
|
|
dup
|
|
ldi $2bfa ; 11258
|
|
eq?
|
|
bnt code_06c1
|
|
pushi $3a6 ; 934, stopAction
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
class gDialogList
|
|
send $4
|
|
bnot
|
|
pushi $497 ; 1175, exitCombat
|
|
push1
|
|
pushSelf
|
|
lag global[$6a]
|
|
send $6
|
|
bnot
|
|
jmp code_07fb
|
|
|
|
code_06c1: dup
|
|
ldi $2bf2 ; 11250
|
|
eq?
|
|
bnt code_0702
|
|
push2
|
|
pushi $9 ; inLeft
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
push1
|
|
pushi $c ; 12, inBottom
|
|
callk kernel_118, $2
|
|
bnot
|
|
pushi $4 ; scaleX
|
|
pushi $e ; 14, view
|
|
lofsa string_0999 ; "tb"
|
|
push
|
|
pushi $70 ; 112, 'p', coordType
|
|
pushi $4 ; scaleX
|
|
callk kernel_128, $8
|
|
bnot
|
|
lal local[$f]
|
|
bnt code_06f6
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$f]
|
|
code_06f6: pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
jmp code_07fb
|
|
|
|
code_0702: dup
|
|
ldi $2bf9 ; 11257
|
|
eq?
|
|
bnt code_0742
|
|
push2
|
|
pushi $9 ; inLeft
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
push1
|
|
pushi $c ; 12, inBottom
|
|
callk kernel_118, $2
|
|
bnot
|
|
pushi $4 ; scaleX
|
|
pushi $e ; 14, view
|
|
lofsa string_0999 ; "tb"
|
|
push
|
|
pushi $70 ; 112, 'p', coordType
|
|
push2
|
|
callk kernel_128, $8
|
|
bnot
|
|
lal local[$f]
|
|
bnt code_0736
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$f]
|
|
code_0736: pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
jmp code_07fb
|
|
|
|
code_0742: dup
|
|
ldi $2bf7 ; 11255
|
|
eq?
|
|
bnt code_0758
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
push2
|
|
callk kernel_118, $4
|
|
bnot
|
|
ldi $1
|
|
sal local[$10]
|
|
jmp code_07fb
|
|
|
|
code_0758: dup
|
|
ldi $2bf8 ; 11256
|
|
eq?
|
|
bnt code_076e
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
push2
|
|
callk kernel_118, $4
|
|
bnot
|
|
ldi $7 ; priority
|
|
sal local[$10]
|
|
jmp code_07fb
|
|
|
|
code_076e: dup
|
|
ldi $2bf6 ; 11254
|
|
eq?
|
|
bnt code_0781
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
pushi $4 ; scaleX
|
|
callk kernel_118, $4
|
|
bnot
|
|
jmp code_07fb
|
|
|
|
code_0781: dup
|
|
ldi $2bf4 ; 11252
|
|
eq?
|
|
bnt code_07af
|
|
pushi $45 ; 69, 'E', doit
|
|
push2
|
|
lofsa EdibleCode
|
|
push
|
|
lofsa ChooseItemToEat
|
|
push
|
|
lofsa MakeContainerDialog
|
|
send $8
|
|
bnot
|
|
bnt code_07a9
|
|
pushi $55d ; 1373, pActiveCursor
|
|
push1
|
|
push2
|
|
class BasicCursorController
|
|
send $6
|
|
bnot
|
|
jmp code_07fb
|
|
|
|
code_07a9: ldi $1
|
|
sal local[$a]
|
|
jmp code_07fb
|
|
|
|
code_07af: dup
|
|
ldi $2bf5 ; 11253
|
|
eq?
|
|
bnt code_07e2
|
|
pushi $45 ; 69, 'E', doit
|
|
pushi $3 ; z
|
|
lofsa UseableCode
|
|
push
|
|
lofsa ChooseItemToUse
|
|
push
|
|
lofsa EquipCode
|
|
push
|
|
lofsa MakeContainerDialog
|
|
send $a
|
|
bnot
|
|
bnt code_07dc
|
|
pushi $55d ; 1373, pActiveCursor
|
|
push1
|
|
push2
|
|
class BasicCursorController
|
|
send $6
|
|
bnot
|
|
jmp code_07fb
|
|
|
|
code_07dc: ldi $1
|
|
sal local[$a]
|
|
jmp code_07fb
|
|
|
|
code_07e2: dup
|
|
ldi $2bf3 ; 11251
|
|
eq?
|
|
bnt code_07fb
|
|
lag global[$1]
|
|
sal local[$d]
|
|
pushi $3 ; z
|
|
pushi $e ; 14, view
|
|
lofsa CastSpell
|
|
push
|
|
pushi $45 ; 69, 'E', doit
|
|
callk kernel_118, $6
|
|
bnot
|
|
code_07fb: toss
|
|
ldi $ff ; 255, asInteger
|
|
ret
|
|
|
|
HandleTimerEnd::cue:
|
|
ldi $0
|
|
sal local[$f]
|
|
lal local[$e]
|
|
bnt code_0812
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$e]
|
|
code_0812: push2
|
|
pushi $9 ; inLeft
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
push1
|
|
pushi $c ; 12, inBottom
|
|
callk kernel_118, $2
|
|
bnot
|
|
pushi $55d ; 1373, pActiveCursor
|
|
push1
|
|
push2
|
|
class BasicCursorController
|
|
send $6
|
|
bnot
|
|
pushi $45 ; 69, 'E', doit
|
|
push1
|
|
pushi $2bf9 ; 11257
|
|
lofsa HandleCombatAction
|
|
send $6
|
|
bnot
|
|
ret
|
|
|
|
GetCombatAction::doit:
|
|
link $1
|
|
pushi $45 ; 69, 'E', doit
|
|
push0
|
|
lofsa ShowCombatAction
|
|
send $4
|
|
bnot
|
|
pushi $276 ; 630, handsOn
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
ldi $708 ; 1800, BAD SELECTOR
|
|
sat temp[$0]
|
|
lsg global[$ee]
|
|
dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_0861
|
|
ldi $12c ; 300, lessEqualLong
|
|
sat temp[$0]
|
|
jmp code_0893
|
|
|
|
code_0861: dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_086e
|
|
ldi $258 ; 600, setOpenRect
|
|
sat temp[$0]
|
|
jmp code_0893
|
|
|
|
code_086e: dup
|
|
ldi $3 ; z
|
|
eq?
|
|
bnt code_087b
|
|
ldi $4b0 ; 1200, pContainerButton
|
|
sat temp[$0]
|
|
jmp code_0893
|
|
|
|
code_087b: dup
|
|
ldi $4 ; scaleX
|
|
eq?
|
|
bnt code_0888
|
|
ldi $708 ; 1800, BAD SELECTOR
|
|
sat temp[$0]
|
|
jmp code_0893
|
|
|
|
code_0888: dup
|
|
ldi $5 ; scaleY
|
|
eq?
|
|
bnt code_0893
|
|
ldi $a8c ; 2700, BAD SELECTOR
|
|
sat temp[$0]
|
|
code_0893: toss
|
|
pushi $20 ; 32, ' ', name
|
|
push1
|
|
lofsa string_09be ; "lTurnTimer"
|
|
push
|
|
pushi $107 ; 263, setTicks
|
|
push2
|
|
lst temp[$0]
|
|
lofsa HandleTimerEnd
|
|
push
|
|
class DisplayTimer
|
|
send $8
|
|
bnot
|
|
sal local[$f]
|
|
send $6
|
|
bnot
|
|
ret
|
|
|
|
CombatRoom::init:
|
|
link $f
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
pushi $5 ; scaleY
|
|
callk kernel_118, $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$6]
|
|
ldi $0
|
|
sal local[$7]
|
|
ldi $0
|
|
sal local[$8]
|
|
ldi $0
|
|
sal local[$40]
|
|
push2
|
|
pushi $6 ; maxScale
|
|
dup
|
|
callk kernel_118, $4
|
|
bnot
|
|
pushi $55d ; 1373, pActiveCursor
|
|
push1
|
|
push0
|
|
class BasicCursorController
|
|
send $6
|
|
bnot
|
|
pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
pushi $141 ; 321, stop
|
|
push0
|
|
class MusicMgr
|
|
send $4
|
|
bnot
|
|
push2
|
|
push0
|
|
push1
|
|
callk kernel_60, $4
|
|
bnot
|
|
push
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_090d
|
|
pushi $33 ; 51, '3', play
|
|
push1
|
|
lofsa string_09d9 ; "engage1.mid"
|
|
push
|
|
class MusicMgr
|
|
send $6
|
|
bnot
|
|
jmp code_091f
|
|
|
|
code_090d: dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_091f
|
|
pushi $33 ; 51, '3', play
|
|
push1
|
|
lofsa string_09e5 ; "engage2.mid"
|
|
push
|
|
class MusicMgr
|
|
send $6
|
|
bnot
|
|
code_091f: toss
|
|
pushi $b5 ; 181, set
|
|
pushi $4 ; scaleX
|
|
push0
|
|
push0
|
|
pushi $27f ; 639, rename
|
|
pushi $13d ; 317, putArray
|
|
pToa plane
|
|
send $c
|
|
bnot
|
|
pushi $dd ; 221, moveBy
|
|
push2
|
|
push0
|
|
pushi $e3 ; 227, expand
|
|
pToa plane
|
|
send $8
|
|
bnot
|
|
pushi $7 ; priority
|
|
push1
|
|
push2
|
|
pToa plane
|
|
send $6
|
|
bnot
|
|
push1
|
|
pTos plane
|
|
callk kernel_42, $2
|
|
bnot
|
|
ldi $1
|
|
aTop pInitted
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class Set
|
|
send $4
|
|
bnot
|
|
aTop pLeftGroup
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class Set
|
|
send $4
|
|
bnot
|
|
aTop pRightGroup
|
|
pushi $aa ; 170, addToFront
|
|
push1
|
|
pushSelf
|
|
lag global[$27]
|
|
send $6
|
|
bnot
|
|
pushi $94 ; 148, init
|
|
push0
|
|
pushi $4a ; 74, 'J', setPri
|
|
push1
|
|
pushi $3e8 ; 1000, pUpdateClient
|
|
pushi $69 ; 105, 'i', hide
|
|
push0
|
|
lofsa GridBox
|
|
send $e
|
|
bnot
|
|
pushi $44a ; 1098, pRoomPic
|
|
push0
|
|
pToa pMovieParams
|
|
send $4
|
|
bnot
|
|
aTop picture
|
|
pTos picture
|
|
ldi $fa0 ; 4000, BAD SELECTOR
|
|
eq?
|
|
bnt code_099e
|
|
ldi $bb8 ; 3000, BAD SELECTOR
|
|
aTop picture
|
|
code_099e: pushi $a1 ; 161, firstEqual
|
|
push2
|
|
pushi $6d ; 109, 'm', picture
|
|
pTos picture
|
|
push2
|
|
pushi $9cac ; -25428
|
|
pushi $5 ; scaleY
|
|
callk kernel_2, $4
|
|
bnot
|
|
send $8
|
|
bnot
|
|
sat temp[$7]
|
|
pushi $1ae ; 430, horizon
|
|
push1
|
|
pushi $1ae ; 430, horizon
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
ldi $0
|
|
aTop horizon
|
|
sat temp[$0]
|
|
code_09ca: lst temp[$0]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
pushi $428 ; 1064, pLeftGroup
|
|
push0
|
|
pToa pMovieParams
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
lt?
|
|
bnt code_09fc
|
|
pushi $31b ; 795, addCombatant
|
|
push2
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
pushi $428 ; 1064, pLeftGroup
|
|
push0
|
|
pToa pMovieParams
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
push
|
|
push0
|
|
self $8
|
|
bnot
|
|
+at temp[$0]
|
|
jmp code_09ca
|
|
|
|
code_09fc: ldi $0
|
|
sat temp[$0]
|
|
code_0a00: lst temp[$0]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
pushi $429 ; 1065, pRightGroup
|
|
push0
|
|
pToa pMovieParams
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
lt?
|
|
bnt code_0a32
|
|
pushi $31b ; 795, addCombatant
|
|
push2
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
pushi $429 ; 1065, pRightGroup
|
|
push0
|
|
pToa pMovieParams
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
push
|
|
push1
|
|
self $8
|
|
bnot
|
|
+at temp[$0]
|
|
jmp code_0a00
|
|
|
|
code_0a32: pushi $44b ; 1099, pCloudX
|
|
push0
|
|
pToa pMovieParams
|
|
send $4
|
|
bnot
|
|
aTop prevX
|
|
pushi $44c ; 1100, pCloudY
|
|
push0
|
|
pToa pMovieParams
|
|
send $4
|
|
bnot
|
|
aTop prevY
|
|
pushi $1bb ; 443, drawPic
|
|
push1
|
|
pTos picture
|
|
self $6
|
|
bnot
|
|
pushi $19a ; 410, setScale
|
|
pushi $4 ; scaleX
|
|
pushi $40 ; 64, '@', yStep
|
|
dup
|
|
pushi $1e0 ; 480, isControl
|
|
push0
|
|
self $c
|
|
bnot
|
|
push1
|
|
pushi $8c ; 140, scratch
|
|
push0
|
|
pToa pMovieParams
|
|
send $4
|
|
bnot
|
|
push
|
|
callk kernel_60, $2
|
|
bnot
|
|
push2
|
|
pushi $5 ; scaleY
|
|
pushi $f ; 15, loop
|
|
callk kernel_60, $4
|
|
bnot
|
|
sat temp[$d]
|
|
ldi $0
|
|
sat temp[$0]
|
|
code_0a7f: lst temp[$0]
|
|
lat temp[$d]
|
|
lt?
|
|
bnt code_0bc0
|
|
push2
|
|
push0
|
|
pushi $17 ; 23, lsTop
|
|
callk kernel_60, $4
|
|
bnot
|
|
sat temp[$9]
|
|
push2
|
|
push0
|
|
pushi $11 ; 17, bitmap
|
|
callk kernel_60, $4
|
|
bnot
|
|
sat temp[$a]
|
|
lst temp[$9]
|
|
ldi $1a ; 26, signal
|
|
mul
|
|
sat temp[$b]
|
|
lst temp[$a]
|
|
ldi $b ; 11, inRight
|
|
mul
|
|
sat temp[$c]
|
|
lst temp[$b]
|
|
ldi $d ; 13, seenRect
|
|
add
|
|
sat temp[$b]
|
|
lst temp[$c]
|
|
ldi $5 ; scaleY
|
|
add
|
|
sat temp[$c]
|
|
pTos picture
|
|
dup
|
|
ldi $bb8 ; 3000, BAD SELECTOR
|
|
eq?
|
|
bnt code_0ad7
|
|
push2
|
|
push0
|
|
push1
|
|
callk kernel_60, $4
|
|
bnot
|
|
push2
|
|
pushi $413 ; 1043, pDestLoop
|
|
pushi $41b ; 1051, pApproachX
|
|
callk kernel_60, $4
|
|
bnot
|
|
sat temp[$e]
|
|
jmp code_0b80
|
|
|
|
code_0ad7: dup
|
|
ldi $d4c ; 3404, BAD SELECTOR
|
|
eq?
|
|
bnt code_0b14
|
|
push2
|
|
push0
|
|
push1
|
|
callk kernel_60, $4
|
|
bnot
|
|
bnt code_0b04
|
|
push2
|
|
pushi $427 ; 1063, pAutoLock
|
|
pushi $429 ; 1065, pRightGroup
|
|
callk kernel_60, $4
|
|
bnot
|
|
sat temp[$e]
|
|
push
|
|
ldi $429 ; 1065, pRightGroup
|
|
eq?
|
|
bnt code_0b80
|
|
ldi $450 ; 1104, pCombatants
|
|
sat temp[$e]
|
|
jmp code_0b80
|
|
|
|
code_0b04: push2
|
|
pushi $9e2 ; 2530, BAD SELECTOR
|
|
pushi $9e9 ; 2537, BAD SELECTOR
|
|
callk kernel_60, $4
|
|
bnot
|
|
sat temp[$e]
|
|
jmp code_0b80
|
|
|
|
code_0b14: dup
|
|
ldi $d4d ; 3405, BAD SELECTOR
|
|
eq?
|
|
bnt code_0b50
|
|
push2
|
|
push0
|
|
push1
|
|
callk kernel_60, $4
|
|
bnot
|
|
bnt code_0b41
|
|
push2
|
|
pushi $427 ; 1063, pAutoLock
|
|
pushi $429 ; 1065, pRightGroup
|
|
callk kernel_60, $4
|
|
bnot
|
|
sat temp[$e]
|
|
push
|
|
ldi $429 ; 1065, pRightGroup
|
|
eq?
|
|
bnt code_0b80
|
|
ldi $450 ; 1104, pCombatants
|
|
sat temp[$e]
|
|
jmp code_0b80
|
|
|
|
code_0b41: push2
|
|
pushi $9e2 ; 2530, BAD SELECTOR
|
|
pushi $9e9 ; 2537, BAD SELECTOR
|
|
callk kernel_60, $4
|
|
bnot
|
|
sat temp[$e]
|
|
jmp code_0b80
|
|
|
|
code_0b50: dup
|
|
ldi $bff ; 3071, BAD SELECTOR
|
|
eq?
|
|
bnt code_0b6c
|
|
push2
|
|
push0
|
|
push1
|
|
callk kernel_60, $4
|
|
bnot
|
|
push2
|
|
push0
|
|
pushi $9 ; inLeft
|
|
callk kernel_60, $4
|
|
bnot
|
|
lali local[$36]
|
|
sat temp[$e]
|
|
jmp code_0b80
|
|
|
|
code_0b6c: push2
|
|
push0
|
|
push1
|
|
callk kernel_60, $4
|
|
bnot
|
|
push2
|
|
pushi $413 ; 1043, pDestLoop
|
|
pushi $41b ; 1051, pApproachX
|
|
callk kernel_60, $4
|
|
bnot
|
|
sat temp[$e]
|
|
code_0b80: toss
|
|
pushi $e ; 14, view
|
|
push1
|
|
lst temp[$e]
|
|
push1
|
|
push1
|
|
lst temp[$b]
|
|
ldi $5 ; scaleY
|
|
add
|
|
push
|
|
push2
|
|
push1
|
|
lst temp[$c]
|
|
ldi $6e ; 110, 'n', resX
|
|
add
|
|
push
|
|
pushi $19a ; 410, setScale
|
|
push0
|
|
pushi $19d ; 413, setSignal
|
|
push1
|
|
pushi $1000 ; 4096, -objID-
|
|
pushi $4 ; scaleX
|
|
push1
|
|
pushi $40 ; 64, '@', yStep
|
|
pushi $5 ; scaleY
|
|
push1
|
|
pushi $40 ; 64, '@', yStep
|
|
pushi $94 ; 148, init
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class Prop
|
|
send $4
|
|
bnot
|
|
send $2c
|
|
bnot
|
|
+at temp[$0]
|
|
jmp code_0a7f
|
|
|
|
code_0bc0: pTos picture
|
|
dup
|
|
ldi $bb8 ; 3000, BAD SELECTOR
|
|
eq?
|
|
bnt code_0bec
|
|
pushi $e ; 14, view
|
|
push1
|
|
pushi $4e0 ; 1248, pGrabLoop
|
|
push1
|
|
push1
|
|
push0
|
|
push2
|
|
push1
|
|
push1
|
|
pushi $3 ; z
|
|
push1
|
|
push1
|
|
pushi $94 ; 148, init
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class View
|
|
send $4
|
|
bnot
|
|
send $1c
|
|
bnot
|
|
jmp code_0c3c
|
|
|
|
code_0bec: dup
|
|
ldi $bb9 ; 3001, BAD SELECTOR
|
|
eq?
|
|
bnt code_0c15
|
|
pushi $e ; 14, view
|
|
push1
|
|
pushi $4e1 ; 1249, pGrabAction
|
|
push1
|
|
push1
|
|
push0
|
|
push2
|
|
push1
|
|
push1
|
|
pushi $3 ; z
|
|
push1
|
|
push1
|
|
pushi $94 ; 148, init
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class View
|
|
send $4
|
|
bnot
|
|
send $1c
|
|
bnot
|
|
jmp code_0c3c
|
|
|
|
code_0c15: dup
|
|
ldi $fa0 ; 4000, BAD SELECTOR
|
|
eq?
|
|
bnt code_0c3c
|
|
pushi $e ; 14, view
|
|
push1
|
|
pushi $4e0 ; 1248, pGrabLoop
|
|
push1
|
|
push1
|
|
push0
|
|
push2
|
|
push1
|
|
push1
|
|
pushi $3 ; z
|
|
push1
|
|
push1
|
|
pushi $94 ; 148, init
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class View
|
|
send $4
|
|
bnot
|
|
send $1c
|
|
bnot
|
|
code_0c3c: toss
|
|
pushi $9d ; 157, eachElementDo
|
|
push1
|
|
pushi $94 ; 148, init
|
|
lofsa LocatorList
|
|
send $6
|
|
bnot
|
|
pushi $9d ; 157, eachElementDo
|
|
push1
|
|
pushi $63 ; 99, 'c', perform
|
|
lofsa LocatorList
|
|
send $6
|
|
bnot
|
|
ldi $0
|
|
aTop pMovieParams
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushSelf
|
|
class WinDialogSet
|
|
send $6
|
|
bnot
|
|
pushi $c9 ; 201, setScript
|
|
push1
|
|
pushi $8d ; 141, new
|
|
push0
|
|
lofsa ReadyingForCombatScript
|
|
send $4
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
ret
|
|
|
|
CombatRoom::dispose:
|
|
link $2
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
lal local[$f]
|
|
bnt code_0c90
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$f]
|
|
code_0c90: pushi $58 ; 88, 'X', delete
|
|
push1
|
|
pushSelf
|
|
class WinDialogSet
|
|
send $6
|
|
bnot
|
|
push2
|
|
pushi $9 ; inLeft
|
|
pushi $5 ; scaleY
|
|
callk kernel_118, $4
|
|
bnot
|
|
push2
|
|
pushi $9 ; inLeft
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
push2
|
|
pushi $6 ; maxScale
|
|
pushi $7 ; priority
|
|
callk kernel_118, $4
|
|
bnot
|
|
push1
|
|
pushi $c ; 12, inBottom
|
|
callk kernel_118, $2
|
|
bnot
|
|
pushi $2c4 ; 708, pRestart
|
|
push0
|
|
lag global[$30]
|
|
send $4
|
|
bnot
|
|
not
|
|
bnt code_0ccf
|
|
pushi $55f ; 1375, restoreCombatant
|
|
push1
|
|
lsg global[$1]
|
|
self $6
|
|
bnot
|
|
code_0ccf: pushi $58 ; 88, 'X', delete
|
|
push1
|
|
pushSelf
|
|
lag global[$27]
|
|
send $6
|
|
bnot
|
|
pushi $a6 ; 166, release
|
|
push0
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
pToa pLeftGroup
|
|
send $8
|
|
bnot
|
|
pushi $a6 ; 166, release
|
|
push0
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
pToa pRightGroup
|
|
send $8
|
|
bnot
|
|
ldi $0
|
|
aTop pRightGroup
|
|
aTop pLeftGroup
|
|
pToa pServID
|
|
bnt code_0d07
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pServID
|
|
code_0d07: pushi $45 ; 69, 'E', doit
|
|
push0
|
|
class RestoreMusic
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sag global[$eb]
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
super NetRoom, $4
|
|
bnot
|
|
ret
|
|
|
|
CombatRoom::delete:
|
|
pushi $2c4 ; 708, pRestart
|
|
push0
|
|
lag global[$30]
|
|
send $4
|
|
bnot
|
|
not
|
|
bnt code_0d33
|
|
pushi $31c ; 796, delCombatant
|
|
push1
|
|
lsp param[$1]
|
|
&rest $2
|
|
self $6
|
|
bnot
|
|
code_0d33: pushi $58 ; 88, 'X', delete
|
|
push1
|
|
lsp param[$1]
|
|
&rest $2
|
|
super NetRoom, $6
|
|
bnot
|
|
ret
|
|
|
|
CombatRoom::endCombatMode:
|
|
link $2
|
|
push2
|
|
pushi $9 ; inLeft
|
|
pushi $4 ; scaleX
|
|
callk kernel_118, $4
|
|
bnot
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
ldi $0
|
|
sat temp[$0]
|
|
code_0d56: lst temp[$0]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
lt?
|
|
bnt code_0dd6
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
pushi $4cc ; 1228, pFriend
|
|
push1
|
|
push0
|
|
send $6
|
|
bnot
|
|
pushi $3ec ; 1004, pAction
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1c ; 28, brLeft
|
|
ne?
|
|
bnt code_0dd1
|
|
pushi $3a6 ; 934, stopAction
|
|
push0
|
|
pushi $3bb ; 955, clearMode
|
|
push1
|
|
push2
|
|
pushi $3ba ; 954, setMode
|
|
push1
|
|
pushi $4 ; scaleX
|
|
pushi $373 ; 883, setAction
|
|
push1
|
|
push1
|
|
lat temp[$1]
|
|
send $16
|
|
bnot
|
|
pushi $36a ; 874, updateDisplay
|
|
push1
|
|
push1
|
|
lat temp[$1]
|
|
send $6
|
|
bnot
|
|
lst temp[$1]
|
|
lag global[$1]
|
|
eq?
|
|
bnt code_0dd1
|
|
pushi $33 ; 51, '3', play
|
|
push1
|
|
lofsa string_09f1 ; "victory.mid"
|
|
push
|
|
class MusicMgr
|
|
send $6
|
|
bnot
|
|
pushi $69 ; 105, 'i', hide
|
|
push0
|
|
lofsa GridBox
|
|
send $4
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lofsa SpellBtnList
|
|
send $4
|
|
bnot
|
|
code_0dd1: +at temp[$0]
|
|
jmp code_0d56
|
|
|
|
code_0dd6: ldi $1
|
|
sal local[$4]
|
|
ret
|
|
|
|
CombatRoom::doit:
|
|
link $5
|
|
pushi $45 ; 69, 'E', doit
|
|
push0
|
|
super NetRoom, $4
|
|
bnot
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
push0
|
|
callk kernel_118, $4
|
|
bnot
|
|
sat temp[$3]
|
|
lal local[$a]
|
|
bnt code_0e0a
|
|
pushi $55d ; 1373, pActiveCursor
|
|
push1
|
|
push0
|
|
class BasicCursorController
|
|
send $6
|
|
bnot
|
|
pushi $45 ; 69, 'E', doit
|
|
push0
|
|
lofsa ShowCombatAction
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$a]
|
|
code_0e0a: pushi $381 ; 897, pMode
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $2
|
|
and
|
|
bnt code_0e22
|
|
pushi $45 ; 69, 'E', doit
|
|
push0
|
|
class BasicCursorController
|
|
send $4
|
|
bnot
|
|
code_0e22: pushi $f4 ; 244, curEvent
|
|
push0
|
|
lag global[$e]
|
|
send $4
|
|
bnot
|
|
sat temp[$4]
|
|
push1
|
|
push1
|
|
push1
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push1
|
|
push2
|
|
push0
|
|
lat temp[$4]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $2b ; 43, '+', type
|
|
push1
|
|
pushi $2b ; 43, '+', type
|
|
push0
|
|
lat temp[$4]
|
|
send $4
|
|
bnot
|
|
push
|
|
lofsa CombatEvent
|
|
send $12
|
|
bnot
|
|
push2
|
|
lofsa CombatEvent
|
|
push
|
|
pTos plane
|
|
callk kernel_81, $4
|
|
bnot
|
|
pushi $2b ; 43, '+', type
|
|
push0
|
|
lat temp[$4]
|
|
send $4
|
|
bnot
|
|
bnt code_0e6b
|
|
ldi $0
|
|
jmp code_0f86
|
|
|
|
code_0e6b: pToa script
|
|
bnt code_0e74
|
|
ldi $0
|
|
jmp code_0f86
|
|
|
|
code_0e74: pushi $381 ; 897, pMode
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $2
|
|
and
|
|
bnt code_0f7d
|
|
pushi $271 ; 625, handsLevel
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
not
|
|
bnt code_0f7d
|
|
lst temp[$3]
|
|
ldi $4 ; scaleX
|
|
eq?
|
|
bt code_0ea5
|
|
lst temp[$3]
|
|
ldi $3 ; z
|
|
eq?
|
|
bnt code_0f7d
|
|
lsl local[$c]
|
|
ldi $8 ; fixPriority
|
|
and
|
|
code_0ea5: bnt code_0f7d
|
|
pushi $564 ; 1380, getGridX
|
|
push1
|
|
push1
|
|
push0
|
|
lofsa CombatEvent
|
|
send $4
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
sal local[$2]
|
|
push
|
|
ldi $ff ; 255, asInteger
|
|
ne?
|
|
bnt code_0f7d
|
|
pushi $565 ; 1381, getGridY
|
|
push1
|
|
push2
|
|
push0
|
|
lofsa CombatEvent
|
|
send $4
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
sal local[$3]
|
|
push
|
|
ldi $ff ; 255, asInteger
|
|
ne?
|
|
bnt code_0f7d
|
|
push1
|
|
push0
|
|
lofsa GridBox
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $562 ; 1378, getXFromGrid
|
|
push1
|
|
lsl local[$2]
|
|
self $6
|
|
bnot
|
|
ne?
|
|
bt code_0f02
|
|
push2
|
|
push0
|
|
lofsa GridBox
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $563 ; 1379, getYFromGrid
|
|
push1
|
|
lsl local[$3]
|
|
self $6
|
|
bnot
|
|
ne?
|
|
code_0f02: bnt code_0f22
|
|
pushi $dc ; 220, posn
|
|
push2
|
|
pushi $562 ; 1378, getXFromGrid
|
|
push1
|
|
lsl local[$2]
|
|
self $6
|
|
bnot
|
|
push
|
|
pushi $563 ; 1379, getYFromGrid
|
|
push1
|
|
lsl local[$3]
|
|
self $6
|
|
bnot
|
|
push
|
|
lofsa GridBox
|
|
send $8
|
|
bnot
|
|
code_0f22: pushi $560 ; 1376, isLegalMove
|
|
pushi $3 ; z
|
|
lsg global[$1]
|
|
lsl local[$2]
|
|
lsl local[$3]
|
|
self $a
|
|
bnot
|
|
bt code_0f40
|
|
pushi $f ; 15, loop
|
|
push0
|
|
lofsa combatCursor
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $2
|
|
eq?
|
|
code_0f40: bnt code_0f48
|
|
ldi $0
|
|
sat temp[$2]
|
|
jmp code_0f4c
|
|
|
|
code_0f48: ldi $1
|
|
sat temp[$2]
|
|
code_0f4c: lst temp[$2]
|
|
pushi $10 ; 16, cel
|
|
push0
|
|
lofsa GridBox
|
|
send $4
|
|
bnot
|
|
ne?
|
|
bnt code_0f65
|
|
pushi $10 ; 16, cel
|
|
push1
|
|
lst temp[$2]
|
|
lofsa GridBox
|
|
send $6
|
|
bnot
|
|
code_0f65: pushi $7 ; priority
|
|
push1
|
|
push0
|
|
callk kernel_44, $0
|
|
bnot
|
|
push
|
|
ldi $1
|
|
add
|
|
push
|
|
pushi $75 ; 117, 'u', show
|
|
push0
|
|
lofsa GridBox
|
|
send $a
|
|
bnot
|
|
jmp code_0f86
|
|
|
|
code_0f7d: pushi $69 ; 105, 'i', hide
|
|
push0
|
|
lofsa GridBox
|
|
send $4
|
|
bnot
|
|
code_0f86: ret
|
|
|
|
CombatRoom::handleEvent:
|
|
link $2
|
|
pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $2b ; 43, '+', type
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $100 ; 256, strMax
|
|
eq?
|
|
bnt code_0fc1
|
|
pushi $31 ; 49, '1', message
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $8 ; fixPriority
|
|
eq?
|
|
bnt code_0fc1
|
|
pushi $45 ; 69, 'E', doit
|
|
push1
|
|
pushi $48 ; 72, 'H', modifiers
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
lofsa HandleCombatAction
|
|
send $6
|
|
bnot
|
|
code_0fc1: pushi $381 ; 897, pMode
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $2
|
|
and
|
|
bnt code_1364
|
|
pushi $632 ; 1586, pHealthHi
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $0
|
|
ge?
|
|
bnt code_1364
|
|
pushi $406 ; 1030, pHealth
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
bnt code_1364
|
|
pushi $2b ; 43, '+', type
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
eq?
|
|
bnt code_133a
|
|
pushi $48 ; 72, 'H', modifiers
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
not
|
|
bnt code_133a
|
|
pushi $b9 ; 185, localize
|
|
push1
|
|
pTos plane
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
push0
|
|
callk kernel_118, $4
|
|
bnot
|
|
push
|
|
dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_10d8
|
|
pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push1
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
lsg global[$1]
|
|
pToa pWObjectList
|
|
send $6
|
|
bnot
|
|
pushi $a0 ; 160, firstTrue
|
|
pushi $3 ; z
|
|
pushi $eb ; 235, onMe
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pWObjectList
|
|
send $a
|
|
bnot
|
|
sat temp[$1]
|
|
pushi $9f ; 159, add
|
|
push1
|
|
lsg global[$1]
|
|
pToa pWObjectList
|
|
send $6
|
|
bnot
|
|
lat temp[$1]
|
|
bnt code_132b
|
|
pushi $3ec ; 1004, pAction
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1c ; 28, brLeft
|
|
ne?
|
|
bnt code_132b
|
|
pushi $2cb ; 715, pServIDLo
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $ff ; 255, asInteger
|
|
ne?
|
|
bt code_1090
|
|
pushi $2cc ; 716, pServIDHi
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $ff ; 255, asInteger
|
|
ne?
|
|
code_1090: bnt code_132b
|
|
pushi $5 ; scaleY
|
|
pushi $e ; 14, view
|
|
lofsa string_0963 ; "tbp"
|
|
push
|
|
pushi $70 ; 112, 'p', coordType
|
|
lsl local[$10]
|
|
lst temp[$1]
|
|
callk kernel_128, $a
|
|
bnot
|
|
lal local[$f]
|
|
bnt code_10b4
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$f]
|
|
code_10b4: push2
|
|
pushi $9 ; inLeft
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
push1
|
|
pushi $c ; 12, inBottom
|
|
callk kernel_118, $2
|
|
bnot
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
pushi $5 ; scaleY
|
|
callk kernel_118, $4
|
|
bnot
|
|
pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
jmp code_132b
|
|
|
|
code_10d8: dup
|
|
ldi $3 ; z
|
|
eq?
|
|
bnt code_1288
|
|
lsl local[$c]
|
|
ldi $8 ; fixPriority
|
|
and
|
|
bnt code_1154
|
|
pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push1
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
lsl local[$2]
|
|
ldi $0
|
|
lt?
|
|
bt code_10fc
|
|
lsl local[$3]
|
|
ldi $0
|
|
lt?
|
|
code_10fc: bnt code_1107
|
|
pushi $50 ; 80, 'P', claimed
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
ret
|
|
|
|
code_1107: pushi $9 ; inLeft
|
|
pushi $e ; 14, view
|
|
lofsa string_0951 ; "tbwppbb"
|
|
push
|
|
pushi $70 ; 112, 'p', coordType
|
|
pushi $5 ; scaleY
|
|
lsl local[$b]
|
|
lsl local[$d]
|
|
lsg global[$1]
|
|
lsl local[$2]
|
|
lsl local[$3]
|
|
callk kernel_128, $12
|
|
bnot
|
|
lal local[$f]
|
|
bnt code_1130
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$f]
|
|
code_1130: push2
|
|
pushi $9 ; inLeft
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
push1
|
|
pushi $c ; 12, inBottom
|
|
callk kernel_118, $2
|
|
bnot
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
pushi $5 ; scaleY
|
|
callk kernel_118, $4
|
|
bnot
|
|
pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
jmp code_132b
|
|
|
|
code_1154: pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push1
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
ldi $0
|
|
sat temp[$1]
|
|
not
|
|
bnt code_11b5
|
|
lsl local[$c]
|
|
ldi $20 ; 32, ' ', name
|
|
and
|
|
bnt code_11b5
|
|
lag global[$db]
|
|
bnt code_1195
|
|
pushi $a0 ; 160, firstTrue
|
|
pushi $3 ; z
|
|
pushi $eb ; 235, onMe
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pLeftGroup
|
|
send $a
|
|
bnot
|
|
sat temp[$1]
|
|
jmp code_11b5
|
|
|
|
code_1195: pushi $a0 ; 160, firstTrue
|
|
pushi $3 ; z
|
|
pushi $eb ; 235, onMe
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pRightGroup
|
|
send $a
|
|
bnot
|
|
sat temp[$1]
|
|
code_11b5: lat temp[$1]
|
|
not
|
|
bnt code_120b
|
|
lsl local[$c]
|
|
ldi $40 ; 64, '@', yStep
|
|
and
|
|
bnt code_120b
|
|
lag global[$db]
|
|
bnt code_11eb
|
|
pushi $a0 ; 160, firstTrue
|
|
pushi $3 ; z
|
|
pushi $eb ; 235, onMe
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pRightGroup
|
|
send $a
|
|
bnot
|
|
sat temp[$1]
|
|
jmp code_120b
|
|
|
|
code_11eb: pushi $a0 ; 160, firstTrue
|
|
pushi $3 ; z
|
|
pushi $eb ; 235, onMe
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pLeftGroup
|
|
send $a
|
|
bnot
|
|
sat temp[$1]
|
|
code_120b: lat temp[$1]
|
|
bnt code_132b
|
|
pushi $3ec ; 1004, pAction
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1c ; 28, brLeft
|
|
ne?
|
|
bnt code_132b
|
|
pushi $2cb ; 715, pServIDLo
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $ff ; 255, asInteger
|
|
ne?
|
|
bt code_123a
|
|
pushi $2cc ; 716, pServIDHi
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $ff ; 255, asInteger
|
|
ne?
|
|
code_123a: bnt code_132b
|
|
pushi $9 ; inLeft
|
|
pushi $e ; 14, view
|
|
lofsa string_0951 ; "tbwppbb"
|
|
push
|
|
pushi $70 ; 112, 'p', coordType
|
|
pushi $5 ; scaleY
|
|
lsl local[$b]
|
|
lsl local[$d]
|
|
lst temp[$1]
|
|
push0
|
|
push0
|
|
callk kernel_128, $12
|
|
bnot
|
|
lal local[$f]
|
|
bnt code_1264
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$f]
|
|
code_1264: push2
|
|
pushi $9 ; inLeft
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
push1
|
|
pushi $c ; 12, inBottom
|
|
callk kernel_118, $2
|
|
bnot
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
pushi $5 ; scaleY
|
|
callk kernel_118, $4
|
|
bnot
|
|
pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
jmp code_132b
|
|
|
|
code_1288: dup
|
|
ldi $4 ; scaleX
|
|
eq?
|
|
bnt code_132b
|
|
pushi $50 ; 80, 'P', claimed
|
|
push1
|
|
push1
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $10 ; 16, cel
|
|
push0
|
|
lofsa GridBox
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $0
|
|
eq?
|
|
bnt code_132b
|
|
pushi $17c ; 380, isNotHidden
|
|
push0
|
|
lofsa GridBox
|
|
send $4
|
|
bnot
|
|
bnt code_132b
|
|
pushi $564 ; 1380, getGridX
|
|
push1
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
sal local[$0]
|
|
pushi $565 ; 1381, getGridY
|
|
push1
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
sal local[$1]
|
|
pushi $560 ; 1376, isLegalMove
|
|
pushi $3 ; z
|
|
lsg global[$1]
|
|
lsl local[$0]
|
|
push
|
|
self $a
|
|
bnot
|
|
bnt code_132b
|
|
pushi $6 ; maxScale
|
|
pushi $e ; 14, view
|
|
lofsa string_09fd ; "tbbb"
|
|
push
|
|
pushi $70 ; 112, 'p', coordType
|
|
push0
|
|
lsl local[$0]
|
|
lsl local[$1]
|
|
callk kernel_128, $c
|
|
bnot
|
|
lal local[$f]
|
|
bnt code_130a
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$f]
|
|
code_130a: push2
|
|
pushi $9 ; inLeft
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
push1
|
|
pushi $c ; 12, inBottom
|
|
callk kernel_118, $2
|
|
bnot
|
|
push2
|
|
pushi $1f ; 31, brBottom
|
|
pushi $5 ; scaleY
|
|
callk kernel_118, $4
|
|
bnot
|
|
pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
code_132b: toss
|
|
pushi $ba ; 186, globalize
|
|
push1
|
|
pTos plane
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
jmp code_1364
|
|
|
|
code_133a: lal local[$9]
|
|
bnt code_1364
|
|
pushi $2b ; 43, '+', type
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $4 ; scaleX
|
|
eq?
|
|
bnt code_1364
|
|
pushi $31 ; 49, '1', message
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1b ; 27, illegalBits
|
|
eq?
|
|
bnt code_1364
|
|
pushi $45 ; 69, 'E', doit
|
|
push0
|
|
lofsa ShowCombatAction
|
|
send $4
|
|
bnot
|
|
code_1364: pushi $50 ; 80, 'P', claimed
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
ret
|
|
|
|
CombatRoom::addCombatant:
|
|
lsp param[$2]
|
|
ldi $0
|
|
eq?
|
|
bnt code_1381
|
|
pushi $9f ; 159, add
|
|
push1
|
|
lsp param[$1]
|
|
pToa pLeftGroup
|
|
send $6
|
|
bnot
|
|
jmp code_138c
|
|
|
|
code_1381: pushi $9f ; 159, add
|
|
push1
|
|
lsp param[$1]
|
|
pToa pRightGroup
|
|
send $6
|
|
bnot
|
|
code_138c: ret
|
|
|
|
CombatRoom::delCombatant:
|
|
pToa pLeftGroup
|
|
bnt code_13c1
|
|
pushi $a3 ; 163, contains
|
|
push1
|
|
lsp param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_13aa
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
lsp param[$1]
|
|
pToa pLeftGroup
|
|
send $6
|
|
bnot
|
|
jmp code_13c1
|
|
|
|
code_13aa: pushi $a3 ; 163, contains
|
|
push1
|
|
lsp param[$1]
|
|
pToa pRightGroup
|
|
send $6
|
|
bnot
|
|
bnt code_13c1
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
lsp param[$1]
|
|
pToa pRightGroup
|
|
send $6
|
|
bnot
|
|
code_13c1: ret
|
|
|
|
CombatRoom::restoreCombatant:
|
|
link $4
|
|
code_13c4: pushi $a0 ; 160, firstTrue
|
|
push2
|
|
pushi $97 ; 151, isKindOf
|
|
class Pile of Stuff
|
|
push
|
|
pToa pWObjectList
|
|
send $8
|
|
bnot
|
|
sat temp[$2]
|
|
bnt code_13e1
|
|
pushi $46b ; 1131, unMakePile
|
|
push0
|
|
send $4
|
|
bnot
|
|
jmp code_13c4
|
|
|
|
code_13e1: pushi $b1 ; 177, duplicate
|
|
push0
|
|
pToa pWObjectList
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
ldi $0
|
|
sat temp[$3]
|
|
code_13f0: lst temp[$3]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
lt?
|
|
bnt code_141d
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$3]
|
|
lat temp[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$2]
|
|
push
|
|
lag global[$1]
|
|
ne?
|
|
bnt code_1419
|
|
pushi $3e0 ; 992, setVisible
|
|
push0
|
|
lat temp[$2]
|
|
send $4
|
|
bnot
|
|
code_1419: +at temp[$3]
|
|
jmp code_13f0
|
|
|
|
code_141d: pushi $4b ; 75, 'K', at
|
|
push1
|
|
push0
|
|
pushi $2c1 ; 705, pRoomList
|
|
push0
|
|
lag global[$30]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $9d ; 157, eachElementDo
|
|
push1
|
|
pushi $3c6 ; 966, deleteFromRoom
|
|
lat temp[$1]
|
|
send $6
|
|
bnot
|
|
pushi $9d ; 157, eachElementDo
|
|
push2
|
|
pushi $3c5 ; 965, addToRoom
|
|
lst temp[$0]
|
|
lat temp[$1]
|
|
send $8
|
|
bnot
|
|
pushi $a6 ; 166, release
|
|
push0
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$1]
|
|
send $8
|
|
bnot
|
|
ret
|
|
|
|
CombatRoom::isLegalMove:
|
|
link $7
|
|
ldi $0
|
|
sat temp[$0]
|
|
code_145d: lst temp[$0]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
pToa pLeftGroup
|
|
send $4
|
|
bnot
|
|
lt?
|
|
bnt code_14ae
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
pToa pLeftGroup
|
|
send $6
|
|
bnot
|
|
sat temp[$3]
|
|
push
|
|
lap param[$1]
|
|
ne?
|
|
bnt code_14aa
|
|
push1
|
|
lst temp[$3]
|
|
calle export60000_0, $2
|
|
bnot
|
|
bnt code_14aa
|
|
lsp param[$2]
|
|
pushi $43b ; 1083, pCombatX
|
|
push0
|
|
lat temp[$3]
|
|
send $4
|
|
bnot
|
|
eq?
|
|
bnt code_14aa
|
|
lsp param[$3]
|
|
pushi $43c ; 1084, pCombatY
|
|
push0
|
|
lat temp[$3]
|
|
send $4
|
|
bnot
|
|
eq?
|
|
bnt code_14aa
|
|
ldi $0
|
|
ret
|
|
|
|
code_14aa: +at temp[$0]
|
|
jmp code_145d
|
|
|
|
code_14ae: ldi $0
|
|
sat temp[$0]
|
|
code_14b2: lst temp[$0]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
pToa pRightGroup
|
|
send $4
|
|
bnot
|
|
lt?
|
|
bnt code_1504
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
pToa pRightGroup
|
|
send $6
|
|
bnot
|
|
sat temp[$3]
|
|
push
|
|
lap param[$1]
|
|
ne?
|
|
bnt code_1500
|
|
push1
|
|
lst temp[$3]
|
|
calle export60000_0, $2
|
|
bnot
|
|
bnt code_1500
|
|
lsp param[$2]
|
|
pushi $43b ; 1083, pCombatX
|
|
push0
|
|
lat temp[$3]
|
|
send $4
|
|
bnot
|
|
eq?
|
|
bnt code_1500
|
|
lsp param[$3]
|
|
pushi $43c ; 1084, pCombatY
|
|
push0
|
|
lat temp[$3]
|
|
send $4
|
|
bnot
|
|
eq?
|
|
bnt code_1500
|
|
ldi $0
|
|
ret
|
|
|
|
code_1500: +at temp[$0]
|
|
jmp code_14b2
|
|
|
|
code_1504: pushi $564 ; 1380, getGridX
|
|
push1
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
sat temp[$1]
|
|
pushi $565 ; 1381, getGridY
|
|
push1
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
sat temp[$2]
|
|
ldi $1
|
|
ret
|
|
|
|
CombatRoom::posnOnGrid:
|
|
pushi $dc ; 220, posn
|
|
push2
|
|
pushi $562 ; 1378, getXFromGrid
|
|
push1
|
|
lsp param[$2]
|
|
self $6
|
|
bnot
|
|
push
|
|
ldi $d ; 13, seenRect
|
|
add
|
|
push
|
|
pushi $563 ; 1379, getYFromGrid
|
|
push1
|
|
lsp param[$3]
|
|
self $6
|
|
bnot
|
|
push
|
|
ldi $5 ; scaleY
|
|
add
|
|
push
|
|
lap param[$1]
|
|
send $8
|
|
bnot
|
|
ret
|
|
|
|
CombatRoom::getXFromGrid:
|
|
pushi $5 ; scaleY
|
|
lsp param[$1]
|
|
ldi $1a ; 26, signal
|
|
mul
|
|
add
|
|
ret
|
|
|
|
CombatRoom::getYFromGrid:
|
|
pushi $6e ; 110, 'n', resX
|
|
lsp param[$1]
|
|
ldi $b ; 11, inRight
|
|
mul
|
|
add
|
|
ret
|
|
|
|
CombatRoom::getGridX:
|
|
pushi $275 ; 629, notify
|
|
lap param[$1]
|
|
ge?
|
|
bnt code_157c
|
|
pprev
|
|
ldi $5 ; scaleY
|
|
ge?
|
|
bnt code_157c
|
|
lsp param[$1]
|
|
ldi $5 ; scaleY
|
|
sub
|
|
push
|
|
ldi $1a ; 26, signal
|
|
div
|
|
ret
|
|
|
|
jmp code_157f
|
|
|
|
code_157c: ldi $ff ; 255, asInteger
|
|
ret
|
|
|
|
code_157f: ret
|
|
|
|
CombatRoom::getGridY:
|
|
pushi $134 ; 308, getByte
|
|
lap param[$1]
|
|
ge?
|
|
bnt code_159b
|
|
pprev
|
|
ldi $6e ; 110, 'n', resX
|
|
ge?
|
|
bnt code_159b
|
|
lsp param[$1]
|
|
ldi $6e ; 110, 'n', resX
|
|
sub
|
|
push
|
|
ldi $b ; 11, inRight
|
|
div
|
|
ret
|
|
|
|
jmp code_159e
|
|
|
|
code_159b: ldi $ff ; 255, asInteger
|
|
ret
|
|
|
|
code_159e: ret
|
|
|
|
CombatRoom::getGridNum:
|
|
link $2
|
|
ldi $ff ; 255, asInteger
|
|
sat temp[$0]
|
|
pushi $f4 ; 244, curEvent
|
|
push0
|
|
lag global[$e]
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
push1
|
|
push1
|
|
push1
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push1
|
|
push2
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $2b ; 43, '+', type
|
|
push1
|
|
pushi $2b ; 43, '+', type
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
lofsa CombatEvent
|
|
send $12
|
|
bnot
|
|
push2
|
|
lofsa CombatEvent
|
|
push
|
|
pTos plane
|
|
callk kernel_81, $4
|
|
bnot
|
|
push2
|
|
push0
|
|
lofsa CombatEvent
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $6e ; 110, 'n', resX
|
|
ge?
|
|
bnt code_1611
|
|
pushi $18 ; 24, lsRight
|
|
push2
|
|
push0
|
|
lofsa CombatEvent
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $6e ; 110, 'n', resX
|
|
sub
|
|
mul
|
|
push
|
|
ldi $b ; 11, inRight
|
|
div
|
|
push
|
|
push1
|
|
push0
|
|
lofsa CombatEvent
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1a ; 26, signal
|
|
div
|
|
add
|
|
sat temp[$0]
|
|
code_1611: lat temp[$0]
|
|
ret
|
|
|
|
ReadyingForCombatScript::handleError:
|
|
lsp param[$1]
|
|
lag global[$6a]
|
|
eq?
|
|
bnt code_1631
|
|
push1
|
|
lofsa string_0a0d ; "Error in starting combat."
|
|
push
|
|
calle export60029_0, $2
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
code_1631: ret
|
|
|
|
ReadyingForCombatScript::dispose:
|
|
lal local[$40]
|
|
not
|
|
bnt code_1640
|
|
pushi $278 ; 632, controlOn
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
code_1640: pushi $95 ; 149, dispose
|
|
push0
|
|
super Script, $4
|
|
bnot
|
|
ret
|
|
|
|
ReadyingForCombatScript::changeState:
|
|
link $5
|
|
lap param[$1]
|
|
aTop state
|
|
push
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_1915
|
|
pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
pushi $94 ; 148, init
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class CombatWaitText
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
sal local[$4]
|
|
ldi $0
|
|
sal local[$5]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
pushi $428 ; 1064, pLeftGroup
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
not
|
|
bt code_169c
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
pushi $429 ; 1065, pRightGroup
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
not
|
|
code_169c: bnt code_16bd
|
|
pushi $278 ; 632, controlOn
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
push1
|
|
lofsa string_0a27 ; "Error in starting combat. No opponents."
|
|
push
|
|
calle export60029_0, $2
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
code_16bd: pushi $d0 ; 208, with
|
|
push1
|
|
lofsa string_0a4f ; "Waiting to start combat...\n"
|
|
push
|
|
class Str
|
|
send $6
|
|
bnot
|
|
sat temp[$3]
|
|
pushi $9f ; 159, add
|
|
push1
|
|
push
|
|
lag global[$9c]
|
|
send $6
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$3]
|
|
send $4
|
|
bnot
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushi $94 ; 148, init
|
|
push1
|
|
lsg global[$1]
|
|
pushi $9a ; 154, yourself
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push1
|
|
push1
|
|
push2
|
|
pushi $9ca5 ; -25435
|
|
pushi $16 ; 22, lsLeft
|
|
callk kernel_2, $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
send $a
|
|
bnot
|
|
push
|
|
pushi $3f6 ; 1014, pOutgoingMovie
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
pushi $3cc ; 972, sendMovie
|
|
push1
|
|
push1
|
|
lag global[$1]
|
|
send $6
|
|
bnot
|
|
ldi $0
|
|
sat temp[$0]
|
|
code_171d: lst temp[$0]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
pushi $428 ; 1064, pLeftGroup
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
lt?
|
|
bnt code_17f7
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
pushi $428 ; 1064, pLeftGroup
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
bnt code_17f2
|
|
pushi $2fb ; 763, pCombatGroup
|
|
push0
|
|
send $4
|
|
bnot
|
|
bnt code_17df
|
|
pushi $128 ; 296, equalLong
|
|
push1
|
|
pushi $2fb ; 763, pCombatGroup
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $2fb ; 763, pCombatGroup
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_17df
|
|
pushi $561 ; 1377, posnOnGrid
|
|
pushi $3 ; z
|
|
lst temp[$1]
|
|
pushi $43b ; 1083, pCombatX
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $43c ; 1084, pCombatY
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa client
|
|
send $a
|
|
bnot
|
|
pushi $f ; 15, loop
|
|
push1
|
|
push0
|
|
pushi $105 ; 261, setCycle
|
|
push1
|
|
class End
|
|
push
|
|
pushi $373 ; 883, setAction
|
|
push1
|
|
push1
|
|
lst temp[$1]
|
|
call code_20b9, $2
|
|
bnot
|
|
push
|
|
pushi $4cc ; 1228, pFriend
|
|
push1
|
|
pushi $a3 ; 163, contains
|
|
push1
|
|
lsg global[$1]
|
|
pushi $428 ; 1064, pLeftGroup
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_17c4
|
|
ldi $1
|
|
jmp code_17c6
|
|
|
|
code_17c4: ldi $0
|
|
code_17c6: push
|
|
lat temp[$1]
|
|
send $18
|
|
bnot
|
|
pushi $3c5 ; 965, addToRoom
|
|
push1
|
|
pTos client
|
|
pushi $36a ; 874, updateDisplay
|
|
push1
|
|
push1
|
|
lat temp[$1]
|
|
send $c
|
|
bnot
|
|
jmp code_17f2
|
|
|
|
code_17df: pushi $58 ; 88, 'X', delete
|
|
push1
|
|
lst temp[$1]
|
|
pushi $428 ; 1064, pLeftGroup
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
-at temp[$0]
|
|
code_17f2: +at temp[$0]
|
|
jmp code_171d
|
|
|
|
code_17f7: ldi $0
|
|
sat temp[$0]
|
|
code_17fb: lst temp[$0]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
pushi $429 ; 1065, pRightGroup
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
lt?
|
|
bnt code_18d5
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
pushi $429 ; 1065, pRightGroup
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
bnt code_18d0
|
|
pushi $2fb ; 763, pCombatGroup
|
|
push0
|
|
send $4
|
|
bnot
|
|
bnt code_18bd
|
|
pushi $128 ; 296, equalLong
|
|
push1
|
|
pushi $2fb ; 763, pCombatGroup
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $2fb ; 763, pCombatGroup
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_18bd
|
|
pushi $561 ; 1377, posnOnGrid
|
|
pushi $3 ; z
|
|
lst temp[$1]
|
|
pushi $43b ; 1083, pCombatX
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $43c ; 1084, pCombatY
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa client
|
|
send $a
|
|
bnot
|
|
pushi $f ; 15, loop
|
|
push1
|
|
push1
|
|
pushi $105 ; 261, setCycle
|
|
push1
|
|
class End
|
|
push
|
|
pushi $373 ; 883, setAction
|
|
push1
|
|
push1
|
|
lst temp[$1]
|
|
call code_20b9, $2
|
|
bnot
|
|
push
|
|
pushi $4cc ; 1228, pFriend
|
|
push1
|
|
pushi $a3 ; 163, contains
|
|
push1
|
|
lsg global[$1]
|
|
pushi $429 ; 1065, pRightGroup
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_18a2
|
|
ldi $1
|
|
jmp code_18a4
|
|
|
|
code_18a2: ldi $0
|
|
code_18a4: push
|
|
lat temp[$1]
|
|
send $18
|
|
bnot
|
|
pushi $3c5 ; 965, addToRoom
|
|
push1
|
|
pTos client
|
|
pushi $36a ; 874, updateDisplay
|
|
push1
|
|
push1
|
|
lat temp[$1]
|
|
send $c
|
|
bnot
|
|
jmp code_18d0
|
|
|
|
code_18bd: pushi $58 ; 88, 'X', delete
|
|
push1
|
|
lst temp[$1]
|
|
pushi $429 ; 1065, pRightGroup
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
-at temp[$0]
|
|
code_18d0: +at temp[$0]
|
|
jmp code_17fb
|
|
|
|
code_18d5: pushi $d0 ; 208, with
|
|
push1
|
|
lofsa string_0a6b ; "Combat begins!\n"
|
|
push
|
|
class Str
|
|
send $6
|
|
bnot
|
|
sat temp[$3]
|
|
pushi $9f ; 159, add
|
|
push1
|
|
push
|
|
lag global[$9c]
|
|
send $6
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$3]
|
|
send $4
|
|
bnot
|
|
pushi $278 ; 632, controlOn
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
pushi $33e ; 830, pHandleActions
|
|
push1
|
|
push1
|
|
class ActionQMgr
|
|
send $6
|
|
bnot
|
|
ldi $1
|
|
sal local[$40]
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_1915: toss
|
|
ret
|
|
|
|
WANetCombatMoveScript::handleError:
|
|
ldi $1
|
|
aTop pDone
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
self $4
|
|
bnot
|
|
ret
|
|
|
|
WANetCombatMoveScript::changeState:
|
|
lap param[$1]
|
|
aTop state
|
|
push
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_1951
|
|
pushi $277 ; 631, controlOff
|
|
push0
|
|
lag global[$2]
|
|
send $4
|
|
bnot
|
|
ldi $1
|
|
aTop pHandsOff
|
|
pushi $c9 ; 201, setScript
|
|
push2
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class WAReady
|
|
send $4
|
|
bnot
|
|
push
|
|
pushSelf
|
|
self $8
|
|
bnot
|
|
jmp code_19e1
|
|
|
|
code_1951: dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_19cf
|
|
lag global[$db]
|
|
bnt code_19a1
|
|
pushi $381 ; 897, pMode
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $2
|
|
and
|
|
bnt code_19a1
|
|
pushi $a3 ; 163, contains
|
|
push1
|
|
push2
|
|
pushi $a410 ; -23536
|
|
push1
|
|
callk kernel_2, $4
|
|
bnot
|
|
push
|
|
lag global[$6]
|
|
send $6
|
|
bnot
|
|
bnt code_19a1
|
|
pushi $486 ; 1158, swapIcons
|
|
push2
|
|
push2
|
|
pushi $a410 ; -23536
|
|
push1
|
|
callk kernel_2, $4
|
|
bnot
|
|
push
|
|
push2
|
|
pushi $a410 ; -23536
|
|
pushi $3 ; z
|
|
callk kernel_2, $4
|
|
bnot
|
|
push
|
|
lag global[$6]
|
|
send $8
|
|
bnot
|
|
code_19a1: pushi $381 ; 897, pMode
|
|
push0
|
|
lag global[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $2
|
|
and
|
|
bnt code_19c8
|
|
ldi $0
|
|
aTop pHandsOff
|
|
pushi $56a ; 1386, combatMove
|
|
pushi $3 ; z
|
|
lsl local[$0]
|
|
lsl local[$1]
|
|
pushSelf
|
|
lag global[$6a]
|
|
send $a
|
|
bnot
|
|
jmp code_19e1
|
|
|
|
code_19c8: ldi $1
|
|
aTop cycles
|
|
jmp code_19e1
|
|
|
|
code_19cf: dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_19e1
|
|
ldi $1
|
|
aTop pDone
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_19e1: toss
|
|
ret
|
|
|
|
MakeItemList::doit:
|
|
link $4
|
|
lsp param[$0]
|
|
ldi $4 ; scaleX
|
|
lt?
|
|
bt code_19ee
|
|
lap param[$4]
|
|
code_19ee: bnt code_19fa
|
|
pushi $a6 ; 166, release
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
code_19fa: pushi $35c ; 860, getBase
|
|
push1
|
|
class BContainer
|
|
push
|
|
lap param[$2]
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
pushi $420 ; 1056, pContents
|
|
push0
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
ldi $0
|
|
sat temp[$3]
|
|
code_1a1b: lst temp[$3]
|
|
lat temp[$1]
|
|
lt?
|
|
bnt code_1a8c
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$3]
|
|
pushi $420 ; 1056, pContents
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
sat temp[$2]
|
|
pushi $45 ; 69, 'E', doit
|
|
push1
|
|
push
|
|
lap param[$3]
|
|
send $6
|
|
bnot
|
|
bnt code_1a67
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushi $94 ; 148, init
|
|
push0
|
|
pushi $8c ; 140, scratch
|
|
push1
|
|
lst temp[$2]
|
|
pushi $9a ; 154, yourself
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push0
|
|
lofsa objectDisplay
|
|
send $4
|
|
bnot
|
|
send $e
|
|
bnot
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
code_1a67: pushi $386 ; 902, hasBase
|
|
push1
|
|
class BContainer
|
|
push
|
|
lat temp[$2]
|
|
send $6
|
|
bnot
|
|
bnt code_1a88
|
|
pushi $45 ; 69, 'E', doit
|
|
pushi $4 ; scaleX
|
|
lsp param[$1]
|
|
lst temp[$2]
|
|
lsp param[$3]
|
|
push0
|
|
lofsa MakeItemList
|
|
send $c
|
|
bnot
|
|
code_1a88: +at temp[$3]
|
|
jmp code_1a1b
|
|
|
|
code_1a8c: ret
|
|
|
|
objectDisplay::init:
|
|
pushi $94 ; 148, init
|
|
push0
|
|
&rest $1
|
|
super BitMap, $4
|
|
bnot
|
|
pushi $4e ; 78, 'N', width
|
|
push1
|
|
pushi $aa ; 170, addToFront
|
|
pushi $e1 ; 225, height
|
|
push1
|
|
pushi $2a ; 42, '*', font
|
|
self $c
|
|
bnot
|
|
ret
|
|
|
|
objectDisplay::draw:
|
|
link $2
|
|
lap param[$1]
|
|
bnt code_1ab4
|
|
ldi $1
|
|
sat temp[$0]
|
|
jmp code_1ab8
|
|
|
|
code_1ab4: lag global[$54]
|
|
sat temp[$0]
|
|
code_1ab8: pushi $5 ; scaleY
|
|
push0
|
|
pushi $4e ; 78, 'N', width
|
|
push0
|
|
self $4
|
|
bnot
|
|
push
|
|
pushi $e1 ; 225, height
|
|
push0
|
|
self $4
|
|
bnot
|
|
push
|
|
pushi $fe ; 254, strIndex
|
|
lst temp[$0]
|
|
callk kernel_35, $a
|
|
bnot
|
|
aTop bitmap
|
|
pushi $3aa ; 938, createDisplay
|
|
push1
|
|
pushi $21 ; 33, '!', key
|
|
pToa scratch
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
pushi $5 ; scaleY
|
|
pushi $6 ; maxScale
|
|
pTos bitmap
|
|
push
|
|
push0
|
|
push0
|
|
callk kernel_35, $a
|
|
bnot
|
|
push2
|
|
push1
|
|
lst temp[$1]
|
|
callk kernel_35, $4
|
|
bnot
|
|
pushi $1ad ; 429, update
|
|
push0
|
|
pToa scratch
|
|
send $4
|
|
bnot
|
|
pushi $17d ; 381, addItem
|
|
pushi $6 ; maxScale
|
|
pushi $3 ; z
|
|
pushi $35e ; 862, pIDName
|
|
push0
|
|
pToa scratch
|
|
send $4
|
|
bnot
|
|
bnt code_1b3c
|
|
pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $20 ; 32, ' ', name
|
|
pToa scratch
|
|
send $6
|
|
bnot
|
|
bt code_1b2d
|
|
pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $57 ; 87, 'W', draw
|
|
pToa scratch
|
|
send $6
|
|
bnot
|
|
code_1b2d: bnt code_1b3c
|
|
pushi $35e ; 862, pIDName
|
|
push0
|
|
pToa scratch
|
|
send $4
|
|
bnot
|
|
jmp code_1b45
|
|
|
|
code_1b3c: pushi $315 ; 789, pName
|
|
push0
|
|
pToa scratch
|
|
send $4
|
|
bnot
|
|
code_1b45: push
|
|
pushi $32 ; 50, '2', edit
|
|
pushi $a ; 10, inTop
|
|
lsg global[$55]
|
|
lst temp[$0]
|
|
self $10
|
|
bnot
|
|
ret
|
|
|
|
objectSelector::selectItem:
|
|
link $1
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lsp param[$1]
|
|
pToa elements
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
bnt code_1b79
|
|
pushi $1b4 ; 436, enable
|
|
push1
|
|
push1
|
|
lofsa chooseBtn
|
|
send $6
|
|
bnot
|
|
pushi $51 ; 81, 'Q', value
|
|
push1
|
|
lst temp[$0]
|
|
lofsa chooseBtn
|
|
send $6
|
|
bnot
|
|
code_1b79: pushi $1d4 ; 468, selectItem
|
|
push1
|
|
lsp param[$1]
|
|
&rest $2
|
|
super Selector, $6
|
|
bnot
|
|
ret
|
|
|
|
ChooseObjectDialog::init:
|
|
link $5
|
|
pushi $94 ; 148, init
|
|
push0
|
|
&rest $2
|
|
super FancyDialog, $4
|
|
bnot
|
|
pushi $26 ; 38, '&', back
|
|
push1
|
|
push0
|
|
pToa plane
|
|
send $6
|
|
bnot
|
|
pushi $17d ; 381, addItem
|
|
push1
|
|
lofsa objectSelector
|
|
push
|
|
self $6
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $21f ; 543, setList
|
|
push1
|
|
lofsa ItemList
|
|
push
|
|
pushi $94 ; 148, init
|
|
push1
|
|
pushSelf
|
|
pushi $db ; 219, moveTo
|
|
push2
|
|
pushi $a ; 10, inTop
|
|
pushi $28 ; 40, '(', style
|
|
lat temp[$0]
|
|
send $14
|
|
bnot
|
|
pushi $17d ; 381, addItem
|
|
push1
|
|
lofsa chooseCancelBtn
|
|
push
|
|
self $6
|
|
bnot
|
|
sat temp[$3]
|
|
pushi $249 ; 585, posnItem
|
|
pushi $3 ; z
|
|
push
|
|
pushi $50 ; 80, 'P', claimed
|
|
pushi $e6 ; 230, sizeToCel
|
|
self $a
|
|
bnot
|
|
pushi $17d ; 381, addItem
|
|
push1
|
|
lofsa chooseBtn
|
|
push
|
|
self $6
|
|
bnot
|
|
sat temp[$3]
|
|
pushi $249 ; 585, posnItem
|
|
pushi $3 ; z
|
|
push
|
|
pushi $a ; 10, inTop
|
|
pushi $e6 ; 230, sizeToCel
|
|
self $a
|
|
bnot
|
|
pushi $1b4 ; 436, enable
|
|
push1
|
|
push0
|
|
lofsa chooseBtn
|
|
send $6
|
|
bnot
|
|
pushi $1be ; 446, setSize
|
|
push0
|
|
self $4
|
|
bnot
|
|
pushi $e0 ; 224, widen
|
|
push1
|
|
pushi $5 ; scaleY
|
|
pToa plane
|
|
send $6
|
|
bnot
|
|
pushi $17d ; 381, addItem
|
|
pushi $5 ; scaleY
|
|
class TitleItem
|
|
push
|
|
pushi $23 ; 35, '#', text
|
|
lofsa string_0afd ; "Choose An Object"
|
|
push
|
|
pushi $25 ; 37, '%', fore
|
|
pushi $2b ; 43, '+', type
|
|
self $e
|
|
bnot
|
|
sat temp[$1]
|
|
pushi $17d ; 381, addItem
|
|
pushi $3 ; z
|
|
class UnderlineItem
|
|
push
|
|
pushi $8c ; 140, scratch
|
|
lst temp[$1]
|
|
self $a
|
|
bnot
|
|
sat temp[$2]
|
|
pushi $249 ; 585, posnItem
|
|
pushi $3 ; z
|
|
lst temp[$1]
|
|
pushi $fb ; 251, subStr
|
|
pushi $5 ; scaleY
|
|
self $a
|
|
bnot
|
|
pushi $249 ; 585, posnItem
|
|
pushi $3 ; z
|
|
lst temp[$2]
|
|
pushi $87 ; 135, left
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $8a ; 138, bottom
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
add
|
|
push
|
|
self $a
|
|
bnot
|
|
pushi $de ; 222, centerIn
|
|
push1
|
|
push0
|
|
push0
|
|
lag global[$3]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $dd ; 221, moveBy
|
|
push2
|
|
push0
|
|
pushi $e ; 14, view
|
|
pToa plane
|
|
send $e
|
|
bnot
|
|
lap param[$1]
|
|
aTop retObject
|
|
ldi $45 ; 69, 'E', doit
|
|
aTop retSelector
|
|
pushi $1d3 ; 467, modal
|
|
push1
|
|
push2
|
|
pushi $248 ; 584, open
|
|
push0
|
|
self $a
|
|
bnot
|
|
ret
|
|
|
|
ChooseObjectDialog::dispose:
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lofsa ItemList
|
|
send $4
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
&rest $1
|
|
super FancyDialog, $4
|
|
bnot
|
|
ret
|
|
|
|
MakeContainerDialog::doit:
|
|
link $3
|
|
pushi $45 ; 69, 'E', doit
|
|
pushi $3 ; z
|
|
lofsa ItemList
|
|
push
|
|
lsg global[$1]
|
|
lsp param[$1]
|
|
lofsa MakeItemList
|
|
send $a
|
|
bnot
|
|
lsp param[$0]
|
|
ldi $2
|
|
gt?
|
|
bnt code_1cec
|
|
lap param[$3]
|
|
bnt code_1cec
|
|
pushi $45 ; 69, 'E', doit
|
|
pushi $4 ; scaleX
|
|
lofsa ItemList
|
|
push
|
|
lsg global[$1]
|
|
lsp param[$3]
|
|
push0
|
|
lofsa MakeItemList
|
|
send $c
|
|
bnot
|
|
code_1cec: pushi $5a ; 90, 'Z', size
|
|
push0
|
|
lofsa ItemList
|
|
send $4
|
|
bnot
|
|
bnt code_1d09
|
|
pushi $3 ; z
|
|
pushi $14 ; 20, nsRight
|
|
lofsa ItemList
|
|
push
|
|
lsp param[$2]
|
|
callk kernel_118, $6
|
|
bnot
|
|
ldi $1
|
|
ret
|
|
|
|
code_1d09: ldi $0
|
|
ret
|
|
|
|
EdibleCode::doit:
|
|
pushi $386 ; 902, hasBase
|
|
push1
|
|
class BConsume
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
ret
|
|
|
|
EquipCode::doit:
|
|
link $1
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BWearable
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
bnt code_1d4d
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BHead
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
not
|
|
bnt code_1d4d
|
|
pushi $3a8 ; 936, owns
|
|
push2
|
|
lsp param[$1]
|
|
push1
|
|
lag global[$1]
|
|
send $8
|
|
bnot
|
|
bnt code_1d4d
|
|
ldi $1
|
|
ret
|
|
|
|
code_1d4d: ldi $0
|
|
ret
|
|
|
|
UseableCode::doit:
|
|
link $2
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BUse
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BCharacter
|
|
push
|
|
lag global[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
lat temp[$0]
|
|
bnt code_1dd1
|
|
lat temp[$1]
|
|
bnt code_1dd1
|
|
pushi $454 ; 1108, pSpell
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $ff ; 255, asInteger
|
|
ne?
|
|
bnt code_1dd1
|
|
pushi $2bb ; 699, pType
|
|
push0
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
pushi $454 ; 1108, pSpell
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
pushi $9cac ; -25428
|
|
pushi $6 ; maxScale
|
|
callk kernel_2, $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
and
|
|
bnt code_1dd1
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
pushi $10 ; 16, cel
|
|
pushi $430 ; 1072, pSkillArray
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
push
|
|
pushi $501 ; 1281, pTheurgism
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
ge?
|
|
bnt code_1dd1
|
|
ldi $1
|
|
ret
|
|
|
|
code_1dd1: ldi $0
|
|
ret
|
|
|
|
WACombatMoveScript::changeState:
|
|
link $a
|
|
lap param[$1]
|
|
aTop state
|
|
push
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_205d
|
|
lsl local[$6]
|
|
ldi $0
|
|
eq?
|
|
bnt code_1e31
|
|
push2
|
|
push0
|
|
pushi $64 ; 100, 'd', moveDone
|
|
callk kernel_60, $4
|
|
bnot
|
|
sat temp[$9]
|
|
push
|
|
ldi $19 ; 25, lsBottom
|
|
lt?
|
|
bnt code_1e0a
|
|
pushi $33 ; 51, '3', play
|
|
push1
|
|
lofsa string_0b56 ; "battle3.mid"
|
|
push
|
|
class MusicMgr
|
|
send $6
|
|
bnot
|
|
jmp code_1e2d
|
|
|
|
code_1e0a: lst temp[$9]
|
|
ldi $32 ; 50, '2', edit
|
|
lt?
|
|
bnt code_1e21
|
|
pushi $33 ; 51, '3', play
|
|
push1
|
|
lofsa string_0b62 ; "battle2.mid"
|
|
push
|
|
class MusicMgr
|
|
send $6
|
|
bnot
|
|
jmp code_1e2d
|
|
|
|
code_1e21: pushi $33 ; 51, '3', play
|
|
push1
|
|
lofsa string_0b6e ; "battle1.mid"
|
|
push
|
|
class MusicMgr
|
|
send $6
|
|
bnot
|
|
code_1e2d: ldi $1
|
|
sal local[$6]
|
|
code_1e31: pTos client
|
|
lag global[$1]
|
|
eq?
|
|
bnt code_1e43
|
|
pushi $3ee ; 1006, pPlayMovie
|
|
push1
|
|
push1
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
code_1e43: pushi $43d ; 1085, pDestX
|
|
push0
|
|
pToa pMovieCmd
|
|
send $4
|
|
bnot
|
|
sat temp[$2]
|
|
pushi $43e ; 1086, pDestY
|
|
push0
|
|
pToa pMovieCmd
|
|
send $4
|
|
bnot
|
|
sat temp[$3]
|
|
pushi $43b ; 1083, pCombatX
|
|
push1
|
|
lst temp[$2]
|
|
pushi $43c ; 1084, pCombatY
|
|
push1
|
|
push
|
|
pToa client
|
|
send $c
|
|
bnot
|
|
pushi $562 ; 1378, getXFromGrid
|
|
push1
|
|
lst temp[$2]
|
|
pushi $c5 ; 197, pRoom
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
push
|
|
ldi $d ; 13, seenRect
|
|
add
|
|
sat temp[$6]
|
|
pushi $563 ; 1379, getYFromGrid
|
|
push1
|
|
lst temp[$3]
|
|
pushi $c5 ; 197, pRoom
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
push
|
|
ldi $5 ; scaleY
|
|
add
|
|
sat temp[$7]
|
|
push1
|
|
lst temp[$6]
|
|
push1
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
sub
|
|
push
|
|
callk kernel_61, $2
|
|
bnot
|
|
sat temp[$4]
|
|
push1
|
|
lst temp[$7]
|
|
push2
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
sub
|
|
push
|
|
callk kernel_61, $2
|
|
bnot
|
|
sat temp[$5]
|
|
push2
|
|
pTos client
|
|
pushi $4 ; scaleX
|
|
push1
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
lst temp[$6]
|
|
lst temp[$7]
|
|
callk kernel_63, $8
|
|
bnot
|
|
push
|
|
callk kernel_95, $4
|
|
bnot
|
|
push1
|
|
pushi $40f ; 1039, pWeapon
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
calle export60000_0, $2
|
|
bnot
|
|
bnt code_1f1f
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class BWeapon
|
|
push
|
|
pushi $40f ; 1039, pWeapon
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_1f1f
|
|
pushi $4e3 ; 1251, pDamageType
|
|
push0
|
|
pushi $40f ; 1039, pWeapon
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
aTop scratch
|
|
jmp code_1f23
|
|
|
|
code_1f1f: ldi $ff ; 255, asInteger
|
|
aTop scratch
|
|
code_1f23: pTos scratch
|
|
ldi $0
|
|
eq?
|
|
bnt code_1f39
|
|
pushi $373 ; 883, setAction
|
|
push1
|
|
pushi $b ; 11, inRight
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
jmp code_1f86
|
|
|
|
code_1f39: pTos scratch
|
|
ldi $2
|
|
eq?
|
|
bnt code_1f4f
|
|
pushi $373 ; 883, setAction
|
|
push1
|
|
pushi $12 ; 18, nsLeft
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
jmp code_1f86
|
|
|
|
code_1f4f: pTos scratch
|
|
ldi $1
|
|
eq?
|
|
bnt code_1f65
|
|
pushi $373 ; 883, setAction
|
|
push1
|
|
pushi $e ; 14, view
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
jmp code_1f86
|
|
|
|
code_1f65: pTos scratch
|
|
ldi $3 ; z
|
|
eq?
|
|
bnt code_1f7b
|
|
pushi $373 ; 883, setAction
|
|
push1
|
|
pushi $e ; 14, view
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
jmp code_1f86
|
|
|
|
code_1f7b: pushi $373 ; 883, setAction
|
|
push1
|
|
pushi $12 ; 18, nsLeft
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
code_1f86: pushi $6a ; 106, 'j', scaleSignal
|
|
push1
|
|
pushi $6a ; 106, 'j', scaleSignal
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $4 ; scaleX
|
|
or
|
|
push
|
|
pushi $105 ; 261, setCycle
|
|
push1
|
|
class Fwd
|
|
push
|
|
pushi $15c ; 348, setMotion
|
|
pushi $4 ; scaleX
|
|
class MoveTo
|
|
push
|
|
lst temp[$6]
|
|
lst temp[$7]
|
|
pushSelf
|
|
pToa client
|
|
send $18
|
|
bnot
|
|
push1
|
|
pTos client
|
|
callk kernel_22, $2
|
|
bnot
|
|
sat temp[$8]
|
|
pushi $507 ; 1287, saveStep
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
pushi $1a9 ; 425, setStep
|
|
push2
|
|
push2
|
|
lst temp[$4]
|
|
lat temp[$8]
|
|
div
|
|
push
|
|
push1
|
|
calle export60025_3, $4
|
|
bnot
|
|
push
|
|
push2
|
|
lst temp[$5]
|
|
lat temp[$8]
|
|
div
|
|
push
|
|
push1
|
|
calle export60025_3, $4
|
|
bnot
|
|
push
|
|
pToa client
|
|
send $8
|
|
bnot
|
|
pushi $3ed ; 1005, pBaseView
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $64 ; 100, 'd', moveDone
|
|
eq?
|
|
bt code_2009
|
|
pushi $3ed ; 1005, pBaseView
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $c8 ; 200, handleEvent
|
|
eq?
|
|
code_2009: bnt code_20b8
|
|
push2
|
|
push0
|
|
push2
|
|
callk kernel_60, $4
|
|
bnot
|
|
push
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_202c
|
|
pushi $33 ; 51, '3', play
|
|
push2
|
|
lofsa string_0b7a ; "step1.wav"
|
|
push
|
|
pTos client
|
|
class SoundMgr
|
|
send $8
|
|
bnot
|
|
jmp code_2059
|
|
|
|
code_202c: dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_2044
|
|
pushi $33 ; 51, '3', play
|
|
push2
|
|
lofsa string_0b84 ; "step2.wav"
|
|
push
|
|
pTos client
|
|
class SoundMgr
|
|
send $8
|
|
bnot
|
|
jmp code_2059
|
|
|
|
code_2044: dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_2059
|
|
pushi $33 ; 51, '3', play
|
|
push2
|
|
lofsa string_0b84 ; "step2.wav"
|
|
push
|
|
pTos client
|
|
class SoundMgr
|
|
send $8
|
|
bnot
|
|
code_2059: toss
|
|
jmp code_20b8
|
|
|
|
code_205d: dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_20b8
|
|
pushi $6a ; 106, 'j', scaleSignal
|
|
push1
|
|
pushi $6a ; 106, 'j', scaleSignal
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $fb ; 251, subStr
|
|
and
|
|
push
|
|
pushi $105 ; 261, setCycle
|
|
push1
|
|
push0
|
|
pushi $373 ; 883, setAction
|
|
push1
|
|
push1
|
|
pTos client
|
|
call code_20b9, $2
|
|
bnot
|
|
push
|
|
pushi $508 ; 1288, restoreStep
|
|
push0
|
|
pToa client
|
|
send $16
|
|
bnot
|
|
pTos client
|
|
lag global[$1]
|
|
eq?
|
|
bnt code_20a1
|
|
pushi $3ee ; 1006, pPlayMovie
|
|
push1
|
|
push0
|
|
lag global[$1]
|
|
send $6
|
|
bnot
|
|
code_20a1: pushi $9d ; 157, eachElementDo
|
|
push1
|
|
pushi $63 ; 99, 'c', perform
|
|
lofsa LocatorList
|
|
send $6
|
|
bnot
|
|
ldi $1
|
|
aTop pDone
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_20b8: toss
|
|
code_20b9: ret
|
|
|
|
; export40111_0
|
|
code_20ba: link $2
|
|
pushi $3ec ; 1004, pAction
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1c ; 28, brLeft
|
|
eq?
|
|
bnt code_20cf
|
|
ldi $1c ; 28, brLeft
|
|
ret
|
|
|
|
code_20cf: pushi $2fb ; 763, pCombatGroup
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
not
|
|
bnt code_20df
|
|
ldi $1
|
|
ret
|
|
|
|
code_20df: push1
|
|
pushi $40f ; 1039, pWeapon
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
calle export60000_0, $2
|
|
bnot
|
|
bnt code_211f
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class BWeapon
|
|
push
|
|
pushi $40f ; 1039, pWeapon
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_211f
|
|
pushi $4e3 ; 1251, pDamageType
|
|
push0
|
|
pushi $40f ; 1039, pWeapon
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
jmp code_2123
|
|
|
|
code_211f: ldi $ff ; 255, asInteger
|
|
sat temp[$0]
|
|
code_2123: lst temp[$0]
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_2133
|
|
ldi $a ; 10, inTop
|
|
sat temp[$1]
|
|
jmp code_2161
|
|
|
|
code_2133: dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_2141
|
|
ldi $11 ; 17, bitmap
|
|
sat temp[$1]
|
|
jmp code_2161
|
|
|
|
code_2141: dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_214f
|
|
ldi $d ; 13, seenRect
|
|
sat temp[$1]
|
|
jmp code_2161
|
|
|
|
code_214f: dup
|
|
ldi $3 ; z
|
|
eq?
|
|
bnt code_215d
|
|
ldi $d ; 13, seenRect
|
|
sat temp[$1]
|
|
jmp code_2161
|
|
|
|
code_215d: ldi $11 ; 17, bitmap
|
|
sat temp[$1]
|
|
code_2161: toss
|
|
lat temp[$1]
|
|
ret
|
|
|