RealmFiles/Script/Script45011.txt

1080 lines
16 KiB
Plaintext

export45011_0 = code_0430
; export45011_0
code_0430: pushi $db ; 219, moveTo
push2
pushi $13f ; 319, putString
pushi $3 ; z
pushi $e ; 14, view
push0
lap param[$1]
send $4
bnot
push
pushi $f ; 15, loop
push0
lap param[$1]
send $4
bnot
push
pushi $10 ; 16, cel
push0
lap param[$1]
send $4
bnot
push
callk kernel_28, $6
bnot
push
ldi $2
div
sub
push
lsp param[$2]
lap param[$1]
send $8
bnot
ret
fNShirt::buildBaseList:
link $1
pushi $387 ; 903, addBase
push1
class BCarryable
push
pushi $387 ; 903, addBase
push1
class BWearable
push
self $c
bnot
pushi $4d1 ; 1233, setAreaWorn
push1
push1
pushi $4d0 ; 1232, pMask
push1
pushi $ff ; 255, asInteger
pushi $2fe ; 766, pLayer
push1
pushi $3 ; z
pushi $35c ; 860, getBase
push1
class BWearable
push
self $6
bnot
sat temp[$0]
send $12
bnot
ret
fNPants::buildBaseList:
link $1
pushi $387 ; 903, addBase
push1
class BCarryable
push
pushi $387 ; 903, addBase
push1
class BWearable
push
self $c
bnot
pushi $4d1 ; 1233, setAreaWorn
push1
pushi $6 ; maxScale
pushi $4d0 ; 1232, pMask
push1
pushi $ff ; 255, asInteger
pushi $2fe ; 766, pLayer
push1
push1
pushi $35c ; 860, getBase
push1
class BWearable
push
self $6
bnot
sat temp[$0]
send $12
bnot
ret
fNShoes::buildBaseList:
link $1
pushi $387 ; 903, addBase
push1
class BCarryable
push
pushi $387 ; 903, addBase
push1
class BWearable
push
self $c
bnot
pushi $4d1 ; 1233, setAreaWorn
push1
pushi $7 ; priority
pushi $4d0 ; 1232, pMask
push1
pushi $ff ; 255, asInteger
pushi $2fe ; 766, pLayer
push1
push2
pushi $35c ; 860, getBase
push1
class BWearable
push
self $6
bnot
sat temp[$0]
send $12
bnot
ret
fNFace::buildBaseList:
link $1
pushi $387 ; 903, addBase
push1
class BHead
push
self $6
bnot
pushi $46e ; 1134, pShow
push1
push0
pushi $35c ; 860, getBase
push1
class BCarryable
push
self $6
bnot
send $6
bnot
ret
fNFace::new:
link $1
pushi $8d ; 141, new
push0
&rest $1
super WorldObject, $4
bnot
sat temp[$0]
pushi $94 ; 148, init
push0
send $4
bnot
lat temp[$0]
ret
fNBody::buildBaseList:
link $1
pushi $387 ; 903, addBase
push1
class BCharacter
push
pushi $387 ; 903, addBase
push1
class BDescribed
push
self $c
bnot
pushi $46d ; 1133, pBulkCap
push1
pushi $12c ; 300, lessEqualLong
pushi $46c ; 1132, pWeightCap
push1
pushi $5dc ; 1500, pDelta
pushi $387 ; 903, addBase
push1
class BContainer
push
self $6
bnot
send $c
bnot
ret
fNBody::getHeadBitmap:
link $2
pushi $35c ; 860, getBase
push1
class BHead
push
pToa pHead
send $6
bnot
sat temp[$0]
pushi $466 ; 1126, generateBitmap
push2
push0
push0
send $8
bnot
sat temp[$1]
pushi $3 ; z
pushi $a ; 10, inTop
push
pushi $17a ; 378, clut
push0
pToa pHead
send $4
bnot
push
callk kernel_35, $6
bnot
pushi $9f ; 159, add
push1
lst temp[$1]
lag global[$66]
send $6
bnot
lat temp[$1]
ret
fNBody::getStanceBitmap:
link $2
pushi $3aa ; 938, createDisplay
push1
push1
self $6
bnot
sat temp[$1]
pushi $9f ; 159, add
push1
push
lag global[$66]
send $6
bnot
lat temp[$1]
ret
fNBody::getAttackBitmap:
link $5
pToa loop
sat temp[$2]
pToa cel
sat temp[$3]
pToa pAction
sat temp[$4]
pToa pCombatGroup
sat temp[$1]
ldi $1
aTop pCombatGroup
pushi $373 ; 883, setAction
push1
push1
pushSelf
calle export40111_0, $2
bnot
push
self $6
bnot
lat temp[$1]
aTop pCombatGroup
pushi $f ; 15, loop
push1
push2
pushi $10 ; 16, cel
push1
push0
pushi $36a ; 874, updateDisplay
push0
self $10
bnot
push2
pushi $b ; 11, inRight
pTos bitmap
callk kernel_35, $4
bnot
sat temp[$0]
pushi $373 ; 883, setAction
push1
lst temp[$4]
pushi $f ; 15, loop
push1
lst temp[$2]
pushi $10 ; 16, cel
push1
lst temp[$3]
pushi $36a ; 874, updateDisplay
push0
self $16
bnot
pushi $9f ; 159, add
push1
lst temp[$0]
lag global[$66]
send $6
bnot
lat temp[$0]
ret
fNBody::new:
link $1
pushi $8d ; 141, new
push0
&rest $1
super WorldEgo, $4
bnot
sat temp[$0]
pushi $94 ; 148, init
push0
send $4
bnot
pushi $3ae ; 942, setColor
push1
pushi $6a ; 106, 'j', scaleSignal
pushi $8d ; 141, new
push0
class fNFace
send $4
bnot
sag global[$9f]
send $6
bnot
pushi $94 ; 148, init
push0
pushi $3ae ; 942, setColor
push1
pushi $64 ; 100, 'd', moveDone
pushi $8d ; 141, new
push0
lofsa fNPants
send $4
bnot
sag global[$a1]
send $a
bnot
pushi $94 ; 148, init
push0
pushi $3ae ; 942, setColor
push1
pushi $64 ; 100, 'd', moveDone
pushi $8d ; 141, new
push0
lofsa fNShirt
send $4
bnot
sag global[$a2]
send $a
bnot
pushi $94 ; 148, init
push0
pushi $3ae ; 942, setColor
push1
pushi $64 ; 100, 'd', moveDone
pushi $8d ; 141, new
push0
lofsa fNShoes
send $4
bnot
sag global[$a3]
send $a
bnot
pushi $4f0 ; 1264, setSex
push1
push0
pushi $4f1 ; 1265, setRace
push1
push0
pushi $4f9 ; 1273, setHead
push1
lsg global[$9f]
pushi $1a9 ; 425, setStep
push2
pushi $b ; 11, inRight
pushi $6 ; maxScale
pushi $3ae ; 942, setColor
push1
pushi $6a ; 106, 'j', scaleSignal
pushi $38e ; 910, take
push1
lsg global[$a2]
pushi $38e ; 910, take
push1
lsg global[$a1]
pushi $38e ; 910, take
push1
lsg global[$a3]
pushi $392 ; 914, putOn
push1
lsg global[$a2]
pushi $392 ; 914, putOn
push1
lsg global[$a1]
pushi $392 ; 914, putOn
push1
lsg global[$a3]
lat temp[$0]
send $44
bnot
lat temp[$0]
ret
fNBody::showContents:
pushi $554 ; 1364, pShowGameBar
push0
lag global[$3]
send $4
bnot
bnt code_0700
pushi $3a4 ; 932, showContents
push0
&rest $1
super WorldEgo, $4
bnot
code_0700: ret
Heraldry::setInfo:
lsp param[$0]
ldi $0
gt?
bnt code_070e
ldi $0
lapi param[$1]
aTop loop
code_070e: lsp param[$0]
ldi $1
gt?
bnt code_071b
ldi $1
lapi param[$1]
aTop x
code_071b: lsp param[$0]
ldi $2
gt?
bnt code_0728
ldi $2
lapi param[$1]
aTop y
code_0728: lsp param[$0]
ldi $3 ; z
gt?
bnt code_0739
pushi $245f ; 9311
ldi $3 ; z
lapi param[$1]
add
aTop pCrest
code_0739: lsp param[$0]
ldi $4 ; scaleX
gt?
bnt code_074a
pushi $2469 ; 9321
ldi $4 ; scaleX
lapi param[$1]
add
aTop pAffiliation
code_074a: lsp param[$0]
ldi $5 ; scaleY
gt?
bnt code_075b
pushi $247d ; 9341
ldi $5 ; scaleY
lapi param[$1]
add
aTop pSupporter
code_075b: lsp param[$0]
ldi $6 ; maxScale
gt?
bnt code_076c
pushi $2487 ; 9351
ldi $6 ; maxScale
lapi param[$1]
add
aTop pPlaces
code_076c: lsp param[$0]
ldi $7 ; priority
gt?
bnt code_077d
pushi $24af ; 9391
ldi $7 ; priority
lapi param[$1]
add
aTop pAbility
code_077d: lsp param[$0]
ldi $8 ; fixPriority
gt?
bnt code_0793
pushi $d0 ; 208, with
push1
ldi $8 ; fixPriority
lspi param[$1]
class Str
send $6
bnot
aTop pMotto1
code_0793: lsp param[$0]
ldi $9 ; inLeft
gt?
bnt code_07a9
pushi $d0 ; 208, with
push1
ldi $9 ; inLeft
lspi param[$1]
class Str
send $6
bnot
aTop pMotto2
code_07a9: lsp param[$0]
ldi $a ; 10, inTop
ge?
bnt code_07bf
pushi $d0 ; 208, with
push1
ldi $a ; 10, inTop
lspi param[$1]
class Str
send $6
bnot
aTop pMotto3
code_07bf: ret
Heraldry::setColor:
link $4
pToa clut
not
bnt code_07d2
pushi $8d ; 141, new
push0
class Clut
send $4
bnot
aTop clut
code_07d2: pToa pClutStart
bnt code_0803
lap param[$1]
aTop pColor
sat temp[$0]
pToa pClutStart
sat temp[$1]
push
ldi $4 ; scaleX
add
sat temp[$2]
lat temp[$1]
sat temp[$3]
code_07ea: lst temp[$3]
lat temp[$2]
lt?
bnt code_0803
pushi $4b ; 75, 'K', at
push2
lst temp[$3]
lst temp[$0]
pToa clut
send $8
bnot
+at temp[$0]
+at temp[$3]
jmp code_07ea
code_0803: pushi $3 ; z
pushi $a ; 10, inTop
pushi $11 ; 17, bitmap
push0
self $4
bnot
push
pTos clut
callk kernel_35, $6
bnot
ret
Heraldry::hide:
pushi $69 ; 105, 'i', hide
push0
pToa pSupporterR
send $4
bnot
pushi $69 ; 105, 'i', hide
push0
pToa pSupporterL
send $4
bnot
pushi $69 ; 105, 'i', hide
push0
pToa pCrestView
send $4
bnot
pushi $69 ; 105, 'i', hide
push1
push0
pToa pBannerView
send $6
bnot
pushi $69 ; 105, 'i', hide
push1
push0
super View, $6
bnot
ret
Heraldry::show:
pushi $75 ; 117, 'u', show
push0
pToa pSupporterR
send $4
bnot
pushi $75 ; 117, 'u', show
push0
pToa pSupporterL
send $4
bnot
pushi $75 ; 117, 'u', show
push0
pToa pCrestView
send $4
bnot
pushi $75 ; 117, 'u', show
push0
pToa pBannerView
send $4
bnot
pushi $75 ; 117, 'u', show
push0
&rest $1
super View, $4
bnot
ret
Heraldry::init:
link $8
push1
push0
self $4
bnot
sat temp[$2]
push2
push0
self $4
bnot
sat temp[$3]
pushi $11 ; 17, bitmap
push1
pushi $4 ; scaleX
pushi $9 ; inLeft
pTos view
pTos loop
push0
callk kernel_35, $8
bnot
push
self $6
bnot
pushi $4 ; scaleX
push0
pTos view
pTos loop
push0
callk kernel_34, $8
bnot
sat temp[$0]
pushi $4 ; scaleX
push1
pTos view
pTos loop
push0
callk kernel_34, $8
bnot
sat temp[$1]
pushi $4 ; scaleX
pushi $8 ; fixPriority
pushi $11 ; 17, bitmap
push0
self $4
bnot
push
lst temp[$0]
lst temp[$1]
callk kernel_35, $8
bnot
pushi $7 ; priority
pushi $3 ; z
pushi $11 ; 17, bitmap
push0
self $4
bnot
push
pTos pBend
pTos loop
push0
lst temp[$0]
lst temp[$1]
callk kernel_35, $e
bnot
pushi $3ae ; 942, setColor
push1
pushi $35 ; 53, '5', nodePtr
self $6
bnot
pushi $7 ; priority
pushi $3 ; z
pushi $11 ; 17, bitmap
push0
self $4
bnot
push
pTos pAffiliation
pTos loop
push0
lst temp[$0]
lst temp[$1]
callk kernel_35, $e
bnot
pushi $7 ; priority
pushi $3 ; z
pushi $11 ; 17, bitmap
push0
self $4
bnot
push
pTos pPlaces
pTos loop
push0
lst temp[$0]
lst temp[$1]
callk kernel_35, $e
bnot
pushi $7 ; priority
pushi $3 ; z
pushi $11 ; 17, bitmap
push0
self $4
bnot
push
pTos pAbility
pTos loop
push0
lst temp[$0]
lst temp[$1]
callk kernel_35, $e
bnot
pushi $94 ; 148, init
push0
&rest $1
super View, $4
bnot
push1
push1
lst temp[$2]
push2
push1
lst temp[$3]
pushi $e ; 14, view
push1
pTos pSupporter
pushi $8d ; 141, new
push0
class View
send $4
bnot
aTop pSupporterR
send $12
bnot
pushi $94 ; 148, init
push0
&rest $1
pToa pSupporterR
send $4
bnot
push1
push1
lst temp[$2]
lst temp[$0]
ldi $2
mul
sub
push
ldi $2
add
push
push2
push1
lst temp[$3]
pushi $e ; 14, view
push1
pTos pSupporter
pushi $f ; 15, loop
push1
push1
pushi $8d ; 141, new
push0
class View
send $4
bnot
aTop pSupporterL
send $18
bnot
pushi $94 ; 148, init
push0
&rest $1
pToa pSupporterL
send $4
bnot
push1
push1
lst temp[$2]
push2
push1
lst temp[$3]
pushi $e ; 14, view
push1
pTos pCrest
pushi $8d ; 141, new
push0
class View
send $4
bnot
aTop pCrestView
send $12
bnot
pushi $94 ; 148, init
push0
&rest $1
pToa pCrestView
send $4
bnot
push1
push1
lst temp[$2]
pushi $3 ; z
pTos pBanner
push0
push0
callk kernel_28, $6
bnot
push
ldi $2
div
sub
push
push2
push1
lst temp[$3]
ldi $4 ; scaleX
sub
push
pushi $11 ; 17, bitmap
push1
pushi $4 ; scaleX
pushi $9 ; inLeft
pTos pBanner
push0
push0
callk kernel_35, $8
bnot
push
pushi $8d ; 141, new
push0
class View
send $4
bnot
aTop pBannerView
send $12
bnot
ldi $d ; 13, seenRect
sat temp[$5]
ldi $4a ; 74, 'J', setPri
sat temp[$6]
pushi $3 ; z
push1
push2
pushi $9 ; inLeft
pTos pMotto1
callk kernel_91, $4
bnot
push
pushi $3e7 ; 999, pUpdatorList
callk kernel_70, $6
bnot
sat temp[$7]
push
lst temp[$6]
lat temp[$5]
sub
gt?
bnt code_0a1f
push1
lofsa string_078b ; "Bitmap::Motto[1]::String too long for bitmap!"
push
calle export60029_1, $2
bnot
jmp code_0a50
code_0a1f: pushi $f ; 15, loop
pushi $4 ; scaleX
pushi $11 ; 17, bitmap
push0
pToa pBannerView
send $4
bnot
push
pushi $71 ; 113, 'q', data
push0
pToa pMotto1
send $4
bnot
push
lst temp[$5]
pushi $8 ; fixPriority
lst temp[$6]
pushi $f ; 15, loop
pushi $a ; 10, inTop
pushi $ff ; 255, asInteger
dup
pushi $3e7 ; 999, pUpdatorList
push1
pushi $ff ; 255, asInteger
push0
push0
callk kernel_35, $1e
bnot
code_0a50: ldi $51 ; 81, 'Q', value
sat temp[$5]
ldi $8c ; 140, scratch
sat temp[$6]
pushi $3 ; z
push1
push2
pushi $9 ; inLeft
pTos pMotto2
callk kernel_91, $4
bnot
push
pushi $3e7 ; 999, pUpdatorList
callk kernel_70, $6
bnot
sat temp[$7]
push
lst temp[$6]
lat temp[$5]
sub
gt?
bnt code_0a86
push1
lofsa string_07b9 ; "Bitmap::Motto[2]::String too long for bitmap!"
push
calle export60029_1, $2
bnot
jmp code_0ab7
code_0a86: pushi $f ; 15, loop
pushi $4 ; scaleX
pushi $11 ; 17, bitmap
push0
pToa pBannerView
send $4
bnot
push
pushi $71 ; 113, 'q', data
push0
pToa pMotto2
send $4
bnot
push
lst temp[$5]
pushi $d ; 13, seenRect
lst temp[$6]
pushi $14 ; 20, nsRight
pushi $a ; 10, inTop
pushi $ff ; 255, asInteger
dup
pushi $3e7 ; 999, pUpdatorList
push1
pushi $ff ; 255, asInteger
push0
push0
callk kernel_35, $1e
bnot
code_0ab7: ldi $93 ; 147, pLine
sat temp[$5]
ldi $ce ; 206, pList
sat temp[$6]
pushi $3 ; z
push1
push2
pushi $9 ; inLeft
pTos pMotto3
callk kernel_91, $4
bnot
push
pushi $3e7 ; 999, pUpdatorList
callk kernel_70, $6
bnot
sat temp[$7]
push
lst temp[$6]
lat temp[$5]
sub
gt?
bnt code_0aee
push1
lofsa string_07e7 ; "Bitmap::Motto[3]::String too long for bitmap!"
push
calle export60029_1, $2
bnot
jmp code_0b1f
code_0aee: pushi $f ; 15, loop
pushi $4 ; scaleX
pushi $11 ; 17, bitmap
push0
pToa pBannerView
send $4
bnot
push
pushi $71 ; 113, 'q', data
push0
pToa pMotto3
send $4
bnot
push
lst temp[$5]
pushi $8 ; fixPriority
lst temp[$6]
pushi $f ; 15, loop
pushi $a ; 10, inTop
pushi $ff ; 255, asInteger
dup
pushi $3e7 ; 999, pUpdatorList
push1
pushi $ff ; 255, asInteger
push0
push0
callk kernel_35, $1e
bnot
code_0b1f: pushi $94 ; 148, init
push0
&rest $1
pToa pBannerView
send $4
bnot
ret
Heraldry::dispose:
pushi $95 ; 149, dispose
push0
pToa pMotto1
send $4
bnot
pushi $95 ; 149, dispose
push0
pToa pMotto2
send $4
bnot
pushi $95 ; 149, dispose
push0
pToa pMotto3
send $4
bnot
pushi $95 ; 149, dispose
push0
&rest $1
super View, $4
bnot
ret