Upload files to "Script"
This commit is contained in:
parent
1d2c636c4f
commit
1f369ca131
|
|
@ -0,0 +1,591 @@
|
|||
export45010_0 = IncDecButton
|
||||
|
||||
CharButton::init:
|
||||
pushi $25 ; 37, '%', fore
|
||||
push1
|
||||
lsg global[$54]
|
||||
pushi $1e7 ; 487, normalColor
|
||||
push1
|
||||
lsg global[$54]
|
||||
pushi $1e8 ; 488, selectColor
|
||||
push1
|
||||
lsg global[$61]
|
||||
pushi $1e9 ; 489, chosenColor
|
||||
push1
|
||||
pushi $ff ; 255, asInteger
|
||||
pushi $27 ; 39, ''', mode
|
||||
push1
|
||||
push1
|
||||
pushi $1f6 ; 502, setText
|
||||
push1
|
||||
pTos text
|
||||
pushi $1ef ; 495, textOffsetX
|
||||
push1
|
||||
push2
|
||||
pushi $1f0 ; 496, textOffsetY
|
||||
push1
|
||||
push2
|
||||
self $30
|
||||
bnot
|
||||
pushi $94 ; 148, init
|
||||
push0
|
||||
&rest $1
|
||||
super Button, $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
CharButton::hide:
|
||||
pushi $69 ; 105, 'i', hide
|
||||
push1
|
||||
push0
|
||||
super Button, $6
|
||||
bnot
|
||||
ret
|
||||
|
||||
CharButton::draw:
|
||||
ldi $ff ; 255, asInteger
|
||||
aTop lastState
|
||||
pushi $57 ; 87, 'W', draw
|
||||
push0
|
||||
&rest $1
|
||||
super Button, $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
NextPrevButton::choose:
|
||||
pushi $1cb ; 459, choose
|
||||
push0
|
||||
&rest $1
|
||||
super Button, $4
|
||||
bnot
|
||||
pTos pDirection
|
||||
ldi $0
|
||||
gt?
|
||||
bnt code_0393
|
||||
pushi $3a2 ; 930, nextFeature
|
||||
push1
|
||||
pTos pFeature
|
||||
lag global[$9f]
|
||||
send $6
|
||||
bnot
|
||||
jmp code_039e
|
||||
|
||||
code_0393: pushi $3a3 ; 931, prevFeature
|
||||
push1
|
||||
pTos pFeature
|
||||
lag global[$9f]
|
||||
send $6
|
||||
bnot
|
||||
code_039e: pToa pCenterButton
|
||||
bnt code_03a9
|
||||
pushi $1cb ; 459, choose
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
code_03a9: ret
|
||||
|
||||
GroupedButton::init:
|
||||
pushi $94 ; 148, init
|
||||
push0
|
||||
&rest $1
|
||||
super CharButton, $4
|
||||
bnot
|
||||
pToa pMakeButtons
|
||||
bnt code_03e1
|
||||
pushi $5ca ; 1482, pCenterButton
|
||||
push1
|
||||
pTos pCenterButton
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
pToa pButtonType
|
||||
send $4
|
||||
bnot
|
||||
aTop pLeftButton
|
||||
send $6
|
||||
bnot
|
||||
pushi $5ca ; 1482, pCenterButton
|
||||
push1
|
||||
pTos pCenterButton
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
pToa pButtonType
|
||||
send $4
|
||||
bnot
|
||||
aTop pRightButton
|
||||
send $6
|
||||
bnot
|
||||
code_03e1: ret
|
||||
|
||||
GroupedButton::show:
|
||||
pushi $75 ; 117, 'u', show
|
||||
push0
|
||||
super CharButton, $4
|
||||
bnot
|
||||
pushi $75 ; 117, 'u', show
|
||||
push0
|
||||
pToa pLeftButton
|
||||
send $4
|
||||
bnot
|
||||
pushi $75 ; 117, 'u', show
|
||||
push0
|
||||
pToa pRightButton
|
||||
send $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
GroupedButton::hide:
|
||||
pushi $69 ; 105, 'i', hide
|
||||
push1
|
||||
push0
|
||||
super CharButton, $6
|
||||
bnot
|
||||
pushi $69 ; 105, 'i', hide
|
||||
push0
|
||||
pToa pLeftButton
|
||||
send $4
|
||||
bnot
|
||||
pushi $69 ; 105, 'i', hide
|
||||
push0
|
||||
pToa pRightButton
|
||||
send $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
TextButton::init:
|
||||
link $1
|
||||
lofsa IncDecButton
|
||||
aTop pButtonType
|
||||
pToa helpStr
|
||||
bnt code_044a
|
||||
pushi $4e ; 78, 'N', width
|
||||
push1
|
||||
pTos pHelpW
|
||||
pushi $e1 ; 225, height
|
||||
push1
|
||||
pTos pHelpH
|
||||
pushi $1c8 ; 456, helpStr
|
||||
push1
|
||||
push
|
||||
pushi $94 ; 148, init
|
||||
push0
|
||||
pushi $db ; 219, moveTo
|
||||
push2
|
||||
pTos pHelpX
|
||||
pTos pHelpY
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Button
|
||||
send $4
|
||||
bnot
|
||||
aTop pHelpButton
|
||||
send $1e
|
||||
bnot
|
||||
code_044a: pushi $94 ; 148, init
|
||||
push0
|
||||
&rest $1
|
||||
super Button, $4
|
||||
bnot
|
||||
pToa pMakeButtons
|
||||
bnt code_0480
|
||||
pushi $5ca ; 1482, pCenterButton
|
||||
push1
|
||||
pTos pCenterButton
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
pToa pButtonType
|
||||
send $4
|
||||
bnot
|
||||
aTop pLeftButton
|
||||
send $6
|
||||
bnot
|
||||
pushi $5ca ; 1482, pCenterButton
|
||||
push1
|
||||
pTos pCenterButton
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
pToa pButtonType
|
||||
send $4
|
||||
bnot
|
||||
aTop pRightButton
|
||||
send $6
|
||||
bnot
|
||||
code_0480: ret
|
||||
|
||||
TextButton::onMe:
|
||||
link $2
|
||||
pToa pHelpW
|
||||
bnt code_04c8
|
||||
lap param[$1]
|
||||
sat temp[$0]
|
||||
lap param[$2]
|
||||
sat temp[$1]
|
||||
pushi $87 ; 135, left
|
||||
push0
|
||||
pToa pHelpButton
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
lat temp[$0]
|
||||
le?
|
||||
bnt code_04c5
|
||||
pprev
|
||||
pushi $88 ; 136, right
|
||||
push0
|
||||
pToa pHelpButton
|
||||
send $4
|
||||
bnot
|
||||
le?
|
||||
bnt code_04c5
|
||||
pushi $89 ; 137, top
|
||||
push0
|
||||
pToa pHelpButton
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
lat temp[$1]
|
||||
le?
|
||||
bnt code_04c5
|
||||
pprev
|
||||
pushi $8a ; 138, bottom
|
||||
push0
|
||||
pToa pHelpButton
|
||||
send $4
|
||||
bnot
|
||||
le?
|
||||
code_04c5: ret
|
||||
|
||||
jmp code_04d2
|
||||
|
||||
code_04c8: pushi $eb ; 235, onMe
|
||||
push0
|
||||
&rest $3 ; z
|
||||
super Button, $4
|
||||
bnot
|
||||
code_04d2: ret
|
||||
|
||||
TextButton::show:
|
||||
pushi $75 ; 117, 'u', show
|
||||
push0
|
||||
super Button, $4
|
||||
bnot
|
||||
pushi $75 ; 117, 'u', show
|
||||
push0
|
||||
pToa pLeftButton
|
||||
send $4
|
||||
bnot
|
||||
pushi $75 ; 117, 'u', show
|
||||
push0
|
||||
pToa pRightButton
|
||||
send $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
TextButton::hide:
|
||||
pushi $69 ; 105, 'i', hide
|
||||
push1
|
||||
push0
|
||||
super Button, $6
|
||||
bnot
|
||||
pushi $69 ; 105, 'i', hide
|
||||
push0
|
||||
pToa pLeftButton
|
||||
send $4
|
||||
bnot
|
||||
pushi $69 ; 105, 'i', hide
|
||||
push0
|
||||
pToa pRightButton
|
||||
send $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
IncDecButton::choose:
|
||||
link $4
|
||||
pushi $1cb ; 459, choose
|
||||
push0
|
||||
&rest $1
|
||||
super Button, $4
|
||||
bnot
|
||||
pToa pPointSelector
|
||||
sat temp[$1]
|
||||
push
|
||||
push0
|
||||
pToa pPoints
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$3]
|
||||
pToa pSelector
|
||||
sat temp[$1]
|
||||
pTos pPlusMinus
|
||||
ldi $0
|
||||
gt?
|
||||
bnt code_05e1
|
||||
lat temp[$3]
|
||||
bnt code_0570
|
||||
lst temp[$1]
|
||||
push0
|
||||
pToa pBase
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
ldi $1
|
||||
add
|
||||
push
|
||||
pToa pMax
|
||||
le?
|
||||
bnt code_0570
|
||||
-at temp[$3]
|
||||
lst temp[$1]
|
||||
push1
|
||||
lst temp[$1]
|
||||
push0
|
||||
pToa pBase
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pToa pPlusMinus
|
||||
add
|
||||
push
|
||||
pToa pBase
|
||||
send $6
|
||||
bnot
|
||||
pushi $5dc ; 1500, pDelta
|
||||
push1
|
||||
pushi $5dc ; 1500, pDelta
|
||||
push0
|
||||
pToa pPoints
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pToa pPlusMinus
|
||||
add
|
||||
push
|
||||
pToa pPoints
|
||||
send $6
|
||||
bnot
|
||||
jmp code_0621
|
||||
|
||||
code_0570: lst temp[$1]
|
||||
push0
|
||||
pToa pBase
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
ldi $1
|
||||
add
|
||||
push
|
||||
pToa pMax
|
||||
ge?
|
||||
bnt code_05c4
|
||||
lst temp[$3]
|
||||
ldi $0
|
||||
gt?
|
||||
bnt code_05c4
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Str
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$2]
|
||||
pushi $f5 ; 245, format
|
||||
push2
|
||||
lofsa string_0315 ; "You can only assign %d points maximum"
|
||||
push
|
||||
pTos pMax
|
||||
lat temp[$2]
|
||||
send $8
|
||||
bnot
|
||||
pushi $f7 ; 247, cat
|
||||
push1
|
||||
lofsa string_033b ; "\n"
|
||||
push
|
||||
lat temp[$2]
|
||||
send $6
|
||||
bnot
|
||||
pushi $4 ; scaleX
|
||||
lst temp[$2]
|
||||
pushi $77 ; 119, 'w', textTop
|
||||
lofsa string_0364 ; "Okay"
|
||||
push
|
||||
push1
|
||||
calle export60029_0, $8
|
||||
bnot
|
||||
jmp code_0621
|
||||
|
||||
code_05c4: lst temp[$3]
|
||||
ldi $0
|
||||
eq?
|
||||
bnt code_0621
|
||||
pushi $4 ; scaleX
|
||||
lofsa string_0369 ; "You've used all of your available points."
|
||||
push
|
||||
pushi $77 ; 119, 'w', textTop
|
||||
lofsa string_0364 ; "Okay"
|
||||
push
|
||||
push1
|
||||
calle export60029_0, $8
|
||||
bnot
|
||||
jmp code_0621
|
||||
|
||||
code_05e1: lst temp[$1]
|
||||
push0
|
||||
pToa pBase
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
ldi $1
|
||||
sub
|
||||
push
|
||||
pToa pMin
|
||||
ge?
|
||||
bnt code_0621
|
||||
+at temp[$3]
|
||||
lst temp[$1]
|
||||
push1
|
||||
lst temp[$1]
|
||||
push0
|
||||
pToa pBase
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pToa pPlusMinus
|
||||
add
|
||||
push
|
||||
pToa pBase
|
||||
send $6
|
||||
bnot
|
||||
pushi $5dc ; 1500, pDelta
|
||||
push1
|
||||
pushi $5dc ; 1500, pDelta
|
||||
push0
|
||||
pToa pPoints
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pToa pPlusMinus
|
||||
add
|
||||
push
|
||||
pToa pPoints
|
||||
send $6
|
||||
bnot
|
||||
code_0621: pToa pAvailableText
|
||||
bnt code_0661
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
pushi $23 ; 35, '#', text
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
send $4
|
||||
bnot
|
||||
pushi $23 ; 35, '#', text
|
||||
push1
|
||||
pushi $f5 ; 245, format
|
||||
push2
|
||||
pushi $8c ; 140, scratch
|
||||
push0
|
||||
pToa pAvailableText
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
lst temp[$3]
|
||||
class Str
|
||||
send $8
|
||||
bnot
|
||||
push
|
||||
pToa pAvailableText
|
||||
send $6
|
||||
bnot
|
||||
pushi $1be ; 446, setSize
|
||||
push0
|
||||
pToa pAvailableText
|
||||
send $4
|
||||
bnot
|
||||
pushi $57 ; 87, 'W', draw
|
||||
push0
|
||||
pToa pAvailableText
|
||||
send $4
|
||||
bnot
|
||||
code_0661: pToa pTextItem
|
||||
bnt code_06b3
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
pushi $23 ; 35, '#', text
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
send $4
|
||||
bnot
|
||||
pushi $23 ; 35, '#', text
|
||||
push1
|
||||
pushi $f5 ; 245, format
|
||||
push2
|
||||
pushi $8c ; 140, scratch
|
||||
push0
|
||||
pToa pTextItem
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
lst temp[$1]
|
||||
push0
|
||||
pToa pBase
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
class Str
|
||||
send $8
|
||||
bnot
|
||||
push
|
||||
pToa pTextItem
|
||||
send $6
|
||||
bnot
|
||||
pushi $1be ; 446, setSize
|
||||
push0
|
||||
pToa pTextItem
|
||||
send $4
|
||||
bnot
|
||||
pushi $1ee ; 494, lastState
|
||||
push1
|
||||
pushi $ff ; 255, asInteger
|
||||
pToa pTextItem
|
||||
send $6
|
||||
bnot
|
||||
pushi $57 ; 87, 'W', draw
|
||||
push0
|
||||
pToa pTextItem
|
||||
send $4
|
||||
bnot
|
||||
code_06b3: pToa pPointSelector
|
||||
sat temp[$1]
|
||||
push
|
||||
push1
|
||||
lst temp[$3]
|
||||
pToa pPoints
|
||||
send $6
|
||||
bnot
|
||||
ret
|
||||
|
||||
IncDecButton::new:
|
||||
lap param[$1]
|
||||
aTop pBase
|
||||
lap param[$2]
|
||||
aTop pSelector
|
||||
lap param[$4]
|
||||
aTop pTextItem
|
||||
lap param[$3]
|
||||
aTop pPlusMinus
|
||||
lap param[$6]
|
||||
aTop pMax
|
||||
lap param[$5]
|
||||
aTop pMin
|
||||
lsp param[$0]
|
||||
ldi $6 ; maxScale
|
||||
gt?
|
||||
bnt code_06e4
|
||||
lap param[$7]
|
||||
aTop pAvailableText
|
||||
code_06e4: pushi $8d ; 141, new
|
||||
push0
|
||||
super Button, $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
|
|
@ -0,0 +1,763 @@
|
|||
export45014_0 = CharMenu
|
||||
|
||||
CharMenu::init:
|
||||
link $c
|
||||
pushi $94 ; 148, init
|
||||
push0
|
||||
&rest $1
|
||||
super StaticRealmRoom, $4
|
||||
bnot
|
||||
ldi $0
|
||||
sag global[$f7]
|
||||
ldi $1
|
||||
sag global[$d3]
|
||||
pushi $8d ; 141, new
|
||||
push2
|
||||
pushi $ff ; 255, asInteger
|
||||
dup
|
||||
class LongInt
|
||||
send $8
|
||||
bnot
|
||||
sal local[$0]
|
||||
pushi $33 ; 51, '3', play
|
||||
push1
|
||||
lofsa string_00fe ; "charmenu.mid"
|
||||
push
|
||||
class MusicMgr
|
||||
send $6
|
||||
bnot
|
||||
pushi $9d ; 157, eachElementDo
|
||||
push2
|
||||
pushi $f ; 15, loop
|
||||
push2
|
||||
class StockCharacters
|
||||
send $8
|
||||
bnot
|
||||
pushi $9d ; 157, eachElementDo
|
||||
push1
|
||||
pushi $36a ; 874, updateDisplay
|
||||
class StockCharacters
|
||||
send $6
|
||||
bnot
|
||||
push2
|
||||
push2
|
||||
push1
|
||||
callk kernel_118, $4
|
||||
bnot
|
||||
pushi $3 ; z
|
||||
push1
|
||||
push0
|
||||
pushi $24 ; 36, '$', elements
|
||||
push0
|
||||
class StockCharacters
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
callk kernel_118, $6
|
||||
bnot
|
||||
pushi $9f ; 159, add
|
||||
push1
|
||||
pushSelf
|
||||
class WinDialogSet
|
||||
send $6
|
||||
bnot
|
||||
pushi $276 ; 630, handsOn
|
||||
push0
|
||||
lag global[$2]
|
||||
send $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
CharMenu::dispose:
|
||||
lag global[$9e]
|
||||
bnt code_00b4
|
||||
pushi $3c6 ; 966, deleteFromRoom
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
code_00b4: pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
class StockCharacters
|
||||
send $4
|
||||
bnot
|
||||
bnt code_00ca
|
||||
pushi $9d ; 157, eachElementDo
|
||||
push1
|
||||
pushi $3c6 ; 966, deleteFromRoom
|
||||
class StockCharacters
|
||||
send $6
|
||||
bnot
|
||||
code_00ca: pushi $58 ; 88, 'X', delete
|
||||
push1
|
||||
pushSelf
|
||||
class WinDialogSet
|
||||
send $6
|
||||
bnot
|
||||
push2
|
||||
push1
|
||||
push1
|
||||
callk kernel_118, $4
|
||||
bnot
|
||||
push2
|
||||
push2
|
||||
push0
|
||||
callk kernel_118, $4
|
||||
bnot
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
&rest $1
|
||||
super StaticRealmRoom, $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
CharMenu::handleEvent:
|
||||
pushi $2b ; 43, '+', type
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
dup
|
||||
ldi $100 ; 256, strMax
|
||||
eq?
|
||||
bnt code_01ce
|
||||
pushi $31 ; 49, '1', message
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
dup
|
||||
ldi $0
|
||||
eq?
|
||||
bnt code_014d
|
||||
pushi $48 ; 72, 'H', modifiers
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
sag global[$1]
|
||||
pushi $58 ; 88, 'X', delete
|
||||
push1
|
||||
push
|
||||
class StockCharacters
|
||||
send $6
|
||||
bnot
|
||||
pushi $9d ; 157, eachElementDo
|
||||
push1
|
||||
pushi $95 ; 149, dispose
|
||||
class StockCharacters
|
||||
send $6
|
||||
bnot
|
||||
pushi $a6 ; 166, release
|
||||
push0
|
||||
class StockCharacters
|
||||
send $4
|
||||
bnot
|
||||
ldi $0
|
||||
sag global[$9e]
|
||||
ldi $1
|
||||
sag global[$fe]
|
||||
pushi $c9 ; 201, setScript
|
||||
push1
|
||||
lofsa loginScript
|
||||
push
|
||||
lag global[$3]
|
||||
send $6
|
||||
bnot
|
||||
jmp code_01cd
|
||||
|
||||
code_014d: dup
|
||||
ldi $1
|
||||
eq?
|
||||
bnt code_0173
|
||||
pushi $24e ; 590, handsOff
|
||||
push0
|
||||
lag global[$2]
|
||||
send $4
|
||||
bnot
|
||||
ldi $0
|
||||
sag global[$9e]
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class fNBody
|
||||
send $4
|
||||
bnot
|
||||
sag global[$9e]
|
||||
ldi $afd7 ; -20521
|
||||
sag global[$36]
|
||||
jmp code_01cd
|
||||
|
||||
code_0173: dup
|
||||
ldi $f ; 15, loop
|
||||
eq?
|
||||
bnt code_01b6
|
||||
pushi $24e ; 590, handsOff
|
||||
push0
|
||||
lag global[$2]
|
||||
send $4
|
||||
bnot
|
||||
pushi $48 ; 72, 'H', modifiers
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
sag global[$9e]
|
||||
pushi $b5 ; 181, set
|
||||
push2
|
||||
pushi $2cb ; 715, pServIDLo
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pushi $2cc ; 716, pServIDHi
|
||||
push0
|
||||
lag global[$9e]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
lal local[$0]
|
||||
send $8
|
||||
bnot
|
||||
pushi $c9 ; 201, setScript
|
||||
push1
|
||||
lofsa eraseScript
|
||||
push
|
||||
lag global[$3]
|
||||
send $6
|
||||
bnot
|
||||
jmp code_01cd
|
||||
|
||||
code_01b6: dup
|
||||
ldi $e ; 14, view
|
||||
eq?
|
||||
bnt code_01cd
|
||||
pushi $45 ; 69, 'E', doit
|
||||
push1
|
||||
pushi $48 ; 72, 'H', modifiers
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
class CreateLookDialog
|
||||
send $6
|
||||
bnot
|
||||
code_01cd: toss
|
||||
code_01ce: toss
|
||||
ret
|
||||
|
||||
loginScript::dispose:
|
||||
pushi $276 ; 630, handsOn
|
||||
push0
|
||||
lag global[$2]
|
||||
send $4
|
||||
bnot
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
&rest $1
|
||||
super Script, $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
loginScript::handleError:
|
||||
link $1
|
||||
lsp param[$1]
|
||||
lag global[$6a]
|
||||
eq?
|
||||
bnt code_0220
|
||||
pushi $f5 ; 245, format
|
||||
push1
|
||||
lofsa string_0114 ; "Server Error: Unable to login."
|
||||
push
|
||||
class Str
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$0]
|
||||
pushi $6 ; maxScale
|
||||
push
|
||||
pushi $65 ; 101, 'e', topString
|
||||
push1
|
||||
pushi $77 ; 119, 'w', textTop
|
||||
lofsa string_0133 ; "Okay"
|
||||
push
|
||||
push0
|
||||
calle export60029_0, $c
|
||||
bnot
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
lat temp[$0]
|
||||
send $4
|
||||
bnot
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
code_0220: ret
|
||||
|
||||
loginScript::changeState:
|
||||
link $6
|
||||
lap param[$1]
|
||||
aTop state
|
||||
push
|
||||
dup
|
||||
ldi $0
|
||||
eq?
|
||||
bnt code_0246
|
||||
pushi $24e ; 590, handsOff
|
||||
push0
|
||||
lag global[$2]
|
||||
send $4
|
||||
bnot
|
||||
pushi $549 ; 1353, getExtendedProps
|
||||
push2
|
||||
lsg global[$1]
|
||||
pushSelf
|
||||
lag global[$6a]
|
||||
send $8
|
||||
bnot
|
||||
jmp code_03d5
|
||||
|
||||
code_0246: dup
|
||||
ldi $1
|
||||
eq?
|
||||
bnt code_02b6
|
||||
pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BCharacter
|
||||
push
|
||||
lag global[$1]
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$3]
|
||||
ldi $0
|
||||
sat temp[$2]
|
||||
code_025e: lst temp[$2]
|
||||
ldi $94 ; 148, init
|
||||
lt?
|
||||
bnt code_0299
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
lst temp[$2]
|
||||
pushi $431 ; 1073, pSpellArray
|
||||
push0
|
||||
lat temp[$3]
|
||||
send $4
|
||||
bnot
|
||||
send $6
|
||||
bnot
|
||||
bnt code_0295
|
||||
pushi $9f ; 159, add
|
||||
push1
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
lst temp[$2]
|
||||
push2
|
||||
pushi $9cac ; -25428
|
||||
pushi $6 ; maxScale
|
||||
callk kernel_2, $4
|
||||
bnot
|
||||
send $6
|
||||
bnot
|
||||
push
|
||||
class SpellList
|
||||
send $6
|
||||
bnot
|
||||
code_0295: +at temp[$2]
|
||||
jmp code_025e
|
||||
|
||||
code_0299: pushi $5a5 ; 1445, loginCharacter
|
||||
push2
|
||||
lsg global[$1]
|
||||
pushSelf
|
||||
lag global[$6a]
|
||||
send $8
|
||||
bnot
|
||||
push1
|
||||
pushi $16 ; 22, lsLeft
|
||||
callk kernel_118, $2
|
||||
bnot
|
||||
push1
|
||||
pushi $3 ; z
|
||||
callk kernel_118, $2
|
||||
bnot
|
||||
jmp code_03d5
|
||||
|
||||
code_02b6: dup
|
||||
ldi $2
|
||||
eq?
|
||||
bnt code_02fc
|
||||
pushi $6 ; maxScale
|
||||
dup
|
||||
pushi $5 ; scaleY
|
||||
pushi $406 ; 1030, pHealth
|
||||
push0
|
||||
lag global[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pushi $632 ; 1586, pHealthHi
|
||||
push0
|
||||
lag global[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pushi $407 ; 1031, pHealthMax
|
||||
push0
|
||||
lag global[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pushi $633 ; 1587, pHealthMaxHi
|
||||
push0
|
||||
lag global[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
callk kernel_118, $c
|
||||
bnot
|
||||
pushi $5b6 ; 1462, getStartingPosn
|
||||
push2
|
||||
lsg global[$1]
|
||||
pushSelf
|
||||
lag global[$6a]
|
||||
send $8
|
||||
bnot
|
||||
jmp code_03d5
|
||||
|
||||
code_02fc: dup
|
||||
ldi $3 ; z
|
||||
eq?
|
||||
bnt code_03d5
|
||||
pushi $127 ; 295, equal
|
||||
push2
|
||||
pushi $ff ; 255, asInteger
|
||||
dup
|
||||
lag global[$d7]
|
||||
send $8
|
||||
bnot
|
||||
not
|
||||
bnt code_0324
|
||||
push1
|
||||
push1
|
||||
lsg global[$d8]
|
||||
push2
|
||||
push1
|
||||
lsg global[$d9]
|
||||
pushi $f ; 15, loop
|
||||
push1
|
||||
lsg global[$da]
|
||||
lag global[$1]
|
||||
send $12
|
||||
bnot
|
||||
code_0324: pushi $3bb ; 955, clearMode
|
||||
push1
|
||||
push2
|
||||
pushi $3bb ; 955, clearMode
|
||||
push1
|
||||
pushi $4 ; scaleX
|
||||
pushi $3ba ; 954, setMode
|
||||
push1
|
||||
push1
|
||||
pushi $3cd ; 973, recordPosn
|
||||
push0
|
||||
pushi $3cc ; 972, sendMovie
|
||||
push1
|
||||
push1
|
||||
lag global[$1]
|
||||
send $1c
|
||||
bnot
|
||||
ldi $0
|
||||
sat temp[$0]
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Str
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$1]
|
||||
push2
|
||||
lofsa string_0138 ; "firstRoom"
|
||||
push
|
||||
lst temp[$1]
|
||||
callk kernel_125, $4
|
||||
bnot
|
||||
bnt code_036b
|
||||
pushi $ff ; 255, asInteger
|
||||
push0
|
||||
lat temp[$1]
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$0]
|
||||
jmp code_0378
|
||||
|
||||
code_036b: push2
|
||||
pushi $13b ; 315, putWord
|
||||
pushi $140 ; 320, pHandle
|
||||
callk kernel_60, $4
|
||||
bnot
|
||||
sat temp[$0]
|
||||
code_0378: pushi $95 ; 149, dispose
|
||||
push0
|
||||
lat temp[$1]
|
||||
send $4
|
||||
bnot
|
||||
pushi $141 ; 321, stop
|
||||
push0
|
||||
class MusicMgr
|
||||
send $4
|
||||
bnot
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class LongInt
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$4]
|
||||
pushi $10f ; 271, setLong
|
||||
push1
|
||||
lsg global[$d7]
|
||||
send $6
|
||||
bnot
|
||||
pushi $127 ; 295, equal
|
||||
push2
|
||||
pushi $ff ; 255, asInteger
|
||||
dup
|
||||
lat temp[$4]
|
||||
send $8
|
||||
bnot
|
||||
bnt code_03c3
|
||||
pushi $5a6 ; 1446, firstRoom
|
||||
push1
|
||||
pushi $8d ; 141, new
|
||||
push1
|
||||
lst temp[$0]
|
||||
class LongInt
|
||||
send $6
|
||||
bnot
|
||||
push
|
||||
lag global[$6a]
|
||||
send $6
|
||||
bnot
|
||||
jmp code_03ce
|
||||
|
||||
code_03c3: pushi $5a6 ; 1446, firstRoom
|
||||
push1
|
||||
lst temp[$4]
|
||||
lag global[$6a]
|
||||
send $6
|
||||
bnot
|
||||
code_03ce: pushi $95 ; 149, dispose
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
code_03d5: toss
|
||||
ret
|
||||
|
||||
eraseScript::handleError:
|
||||
link $1
|
||||
pushi $276 ; 630, handsOn
|
||||
push0
|
||||
lag global[$2]
|
||||
send $4
|
||||
bnot
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
eraseScript::changeState:
|
||||
link $6
|
||||
lap param[$1]
|
||||
aTop state
|
||||
push
|
||||
dup
|
||||
ldi $0
|
||||
eq?
|
||||
bnt code_0409
|
||||
lag global[$9e]
|
||||
aTop register
|
||||
pushi $5a3 ; 1443, destroyCharacter
|
||||
push2
|
||||
pTos register
|
||||
pushSelf
|
||||
lag global[$6a]
|
||||
send $8
|
||||
bnot
|
||||
jmp code_043c
|
||||
|
||||
code_0409: dup
|
||||
ldi $1
|
||||
eq?
|
||||
bnt code_043c
|
||||
pushi $69 ; 105, 'i', hide
|
||||
push0
|
||||
pToa register
|
||||
send $4
|
||||
bnot
|
||||
pushi $58 ; 88, 'X', delete
|
||||
push1
|
||||
pTos register
|
||||
class StockCharacters
|
||||
send $6
|
||||
bnot
|
||||
pushi $3 ; z
|
||||
push1
|
||||
pushi $3 ; z
|
||||
pushi $24 ; 36, '$', elements
|
||||
push0
|
||||
class StockCharacters
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
callk kernel_118, $6
|
||||
bnot
|
||||
pushi $276 ; 630, handsOn
|
||||
push0
|
||||
lag global[$2]
|
||||
send $4
|
||||
bnot
|
||||
code_043c: toss
|
||||
ret
|
||||
|
||||
LookAtCharacter::changeState:
|
||||
link $3
|
||||
lap param[$1]
|
||||
aTop state
|
||||
push
|
||||
dup
|
||||
ldi $0
|
||||
eq?
|
||||
bnt code_0490
|
||||
pushi $24e ; 590, handsOff
|
||||
push0
|
||||
lag global[$2]
|
||||
send $4
|
||||
bnot
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Str
|
||||
send $4
|
||||
bnot
|
||||
aTop scratch
|
||||
pushi $319 ; 793, pHead
|
||||
push0
|
||||
pToa register
|
||||
send $4
|
||||
bnot
|
||||
bnt code_047d
|
||||
pushi $50e ; 1294, getBiography
|
||||
pushi $3 ; z
|
||||
pTos register
|
||||
pTos scratch
|
||||
pushSelf
|
||||
lag global[$6a]
|
||||
send $a
|
||||
bnot
|
||||
jmp code_0535
|
||||
|
||||
code_047d: pushi $4fa ; 1274, getDescription
|
||||
pushi $3 ; z
|
||||
pTos register
|
||||
pTos scratch
|
||||
pushSelf
|
||||
lag global[$6a]
|
||||
send $a
|
||||
bnot
|
||||
jmp code_0535
|
||||
|
||||
code_0490: dup
|
||||
ldi $1
|
||||
eq?
|
||||
bnt code_04e9
|
||||
pushi $319 ; 793, pHead
|
||||
push0
|
||||
pToa register
|
||||
send $4
|
||||
bnot
|
||||
bnt code_04c5
|
||||
pushi $4ca ; 1226, setBiography
|
||||
push1
|
||||
pTos scratch
|
||||
pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BCharacter
|
||||
push
|
||||
pToa register
|
||||
send $6
|
||||
bnot
|
||||
send $6
|
||||
bnot
|
||||
pushi $549 ; 1353, getExtendedProps
|
||||
push2
|
||||
pTos register
|
||||
pushSelf
|
||||
lag global[$6a]
|
||||
send $8
|
||||
bnot
|
||||
jmp code_0535
|
||||
|
||||
code_04c5: pushi $6 ; maxScale
|
||||
push2
|
||||
pushi $9 ; inLeft
|
||||
pTos scratch
|
||||
callk kernel_91, $4
|
||||
bnot
|
||||
push
|
||||
pushi $77 ; 119, 'w', textTop
|
||||
lofsa string_0133 ; "Okay"
|
||||
push
|
||||
push0
|
||||
pushi $91 ; 145, bitPutIndex
|
||||
push2
|
||||
calle export60029_0, $c
|
||||
bnot
|
||||
ldi $1
|
||||
aTop cycles
|
||||
jmp code_0535
|
||||
|
||||
code_04e9: dup
|
||||
ldi $2
|
||||
eq?
|
||||
bnt code_051f
|
||||
push1
|
||||
pTos scratch
|
||||
calle export60000_0, $2
|
||||
bnot
|
||||
bnt code_0504
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
pToa scratch
|
||||
send $4
|
||||
bnot
|
||||
code_0504: pushi $319 ; 793, pHead
|
||||
push0
|
||||
pToa register
|
||||
send $4
|
||||
bnot
|
||||
bnt code_0519
|
||||
pushi $45 ; 69, 'E', doit
|
||||
push1
|
||||
pTos register
|
||||
class CreateLookDialog
|
||||
send $6
|
||||
bnot
|
||||
code_0519: ldi $1
|
||||
aTop cycles
|
||||
jmp code_0535
|
||||
|
||||
code_051f: dup
|
||||
ldi $3 ; z
|
||||
eq?
|
||||
bnt code_0535
|
||||
pushi $276 ; 630, handsOn
|
||||
push0
|
||||
lag global[$2]
|
||||
send $4
|
||||
bnot
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
code_0535: toss
|
||||
ret
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
Loading…
Reference in New Issue