649 lines
9.5 KiB
Plaintext
649 lines
9.5 KiB
Plaintext
BCharacter::init:
|
|
pushi $94 ; 148, init
|
|
push0
|
|
&rest $1
|
|
super WorldObjectBase, $4
|
|
bnot
|
|
pushi $42a ; 1066, setTitle
|
|
push1
|
|
lofsa string_0044 ; ""
|
|
push
|
|
self $6
|
|
bnot
|
|
pushi $4c9 ; 1225, setProperName
|
|
push1
|
|
lofsa string_0044 ; ""
|
|
push
|
|
self $6
|
|
bnot
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class ByteArray
|
|
send $4
|
|
bnot
|
|
aTop pSpellArray
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class ByteArray
|
|
send $4
|
|
bnot
|
|
aTop pSkillArray
|
|
ret
|
|
|
|
BCharacter::dispose:
|
|
pushi $4c9 ; 1225, setProperName
|
|
push1
|
|
push0
|
|
self $6
|
|
bnot
|
|
pushi $42a ; 1066, setTitle
|
|
push1
|
|
push0
|
|
self $6
|
|
bnot
|
|
pushi $4ca ; 1226, setBiography
|
|
push1
|
|
push0
|
|
self $6
|
|
bnot
|
|
pToa pSpellArray
|
|
bnt code_00c6
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pSpellArray
|
|
code_00c6: pToa pSkillArray
|
|
bnt code_00d5
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pSkillArray
|
|
code_00d5: pToa pExperience
|
|
bnt code_00e4
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pExperience
|
|
code_00e4: pToa pStealingCount
|
|
bnt code_00f3
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pStealingCount
|
|
code_00f3: pToa pStealingUnserved
|
|
bnt code_0102
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pStealingUnserved
|
|
code_0102: pToa pKillingUnserved
|
|
bnt code_0111
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pKillingUnserved
|
|
code_0111: pToa pKillingCount
|
|
bnt code_0120
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pKillingCount
|
|
code_0120: pushi $95 ; 149, dispose
|
|
push0
|
|
&rest $1
|
|
super WorldObjectBase, $4
|
|
bnot
|
|
ret
|
|
|
|
BCharacter::setProperName:
|
|
pToa pProperName
|
|
bnt code_013a
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pProperName
|
|
code_013a: lap param[$1]
|
|
bnt code_014a
|
|
pushi $d0 ; 208, with
|
|
push1
|
|
push
|
|
class Str
|
|
send $6
|
|
bnot
|
|
aTop pProperName
|
|
code_014a: ret
|
|
|
|
BCharacter::setTitle:
|
|
pToa pTitle
|
|
bnt code_015a
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pTitle
|
|
code_015a: lap param[$1]
|
|
bnt code_016a
|
|
pushi $d0 ; 208, with
|
|
push1
|
|
push
|
|
class Str
|
|
send $6
|
|
bnot
|
|
aTop pTitle
|
|
code_016a: ret
|
|
|
|
BCharacter::setBiography:
|
|
pToa pBiography
|
|
bnt code_017a
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pBiography
|
|
code_017a: lap param[$1]
|
|
bnt code_018a
|
|
pushi $d0 ; 208, with
|
|
push1
|
|
push
|
|
class Str
|
|
send $6
|
|
bnot
|
|
aTop pBiography
|
|
code_018a: ret
|
|
|
|
BCharacter::fromPacket:
|
|
link $2
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pProfession
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pRace
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pSex
|
|
pushi $3ed ; 1005, pBaseView
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $64 ; 100, 'd', moveDone
|
|
eq?
|
|
bt code_01cb
|
|
pushi $3ed ; 1005, pBaseView
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $c8 ; 200, handleEvent
|
|
eq?
|
|
code_01cb: bnt code_01eb
|
|
pToa pSex
|
|
not
|
|
bnt code_01df
|
|
pushi $3ed ; 1005, pBaseView
|
|
push1
|
|
pushi $64 ; 100, 'd', moveDone
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
jmp code_01eb
|
|
|
|
code_01df: pushi $3ed ; 1005, pBaseView
|
|
push1
|
|
pushi $c8 ; 200, handleEvent
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
code_01eb: pushi $139 ; 313, getString
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $4c9 ; 1225, setProperName
|
|
push1
|
|
push
|
|
self $6
|
|
bnot
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pPeaceful
|
|
pushi $99 ; 153, respondsTo
|
|
push1
|
|
pushi $433 ; 1075, pPeaceful
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
bnt code_0222
|
|
pushi $433 ; 1075, pPeaceful
|
|
push1
|
|
pTos pPeaceful
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
code_0222: pushi $406 ; 1030, pHealth
|
|
push1
|
|
pushi $135 ; 309, getWord
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
pushi $632 ; 1586, pHealthHi
|
|
push1
|
|
pushi $135 ; 309, getWord
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
pushi $407 ; 1031, pHealthMax
|
|
push1
|
|
pushi $135 ; 309, getWord
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
pushi $633 ; 1587, pHealthMaxHi
|
|
push1
|
|
pushi $135 ; 309, getWord
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
ret
|
|
|
|
BCharacter::fromFullPacket:
|
|
link $2
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pProfession
|
|
pushi $136 ; 310, getLong
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pExperience
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pRace
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pSex
|
|
pushi $139 ; 313, getString
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $4c9 ; 1225, setProperName
|
|
push1
|
|
push
|
|
self $6
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
pushi $139 ; 313, getString
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
pushi $42a ; 1066, setTitle
|
|
push1
|
|
push
|
|
self $6
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
ret
|
|
|
|
BCharacter::buildVerbList:
|
|
link $3
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class WorldActor
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_04c8
|
|
pTos pSelf
|
|
lag global[$1]
|
|
ne?
|
|
bnt code_04c8
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BCharacter
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
sat temp[$2]
|
|
bnt code_04c8
|
|
class VerbList
|
|
sat temp[$0]
|
|
pushi $381 ; 897, pMode
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $2
|
|
and
|
|
bnt code_036f
|
|
pushi $4 ; scaleX
|
|
pushi $43b ; 1083, pCombatX
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $43c ; 1084, pCombatY
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $43b ; 1083, pCombatX
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $43c ; 1084, pCombatY
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
callk kernel_64, $8
|
|
bnot
|
|
push
|
|
ldi $1
|
|
eq?
|
|
bnt code_04c8
|
|
pushi $4cc ; 1228, pFriend
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $0
|
|
eq?
|
|
bnt code_04c8
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushi $1b ; 27, illegalBits
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
jmp code_04c8
|
|
|
|
code_036f: lsg global[$e6]
|
|
ldi $1
|
|
and
|
|
bnt code_03b8
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BNPC
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
not
|
|
bnt code_03b8
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BGatekeeper
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
not
|
|
bnt code_03b8
|
|
pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $2f ; 47, '/', mark
|
|
lag global[$1]
|
|
send $6
|
|
bnot
|
|
not
|
|
bnt code_03b8
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
pushi $19 ; 25, lsBottom
|
|
pushi $430 ; 1072, pSkillArray
|
|
push0
|
|
lat temp[$2]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
push
|
|
ldi $0
|
|
gt?
|
|
code_03b8: bt code_0406
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BNPC
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
bnt code_0413
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BGatekeeper
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
not
|
|
bnt code_0413
|
|
pushi $319 ; 793, pHead
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
bnt code_0413
|
|
pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $2f ; 47, '/', mark
|
|
lag global[$1]
|
|
send $6
|
|
bnot
|
|
not
|
|
bnt code_0413
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
pushi $19 ; 25, lsBottom
|
|
pushi $430 ; 1072, pSkillArray
|
|
push0
|
|
lat temp[$2]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
push
|
|
ldi $0
|
|
gt?
|
|
code_0406: bnt code_0413
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushi $78 ; 120, 'x', textRight
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
code_0413: pushi $8d ; 141, new
|
|
push0
|
|
class LongInt
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
pushi $b5 ; 181, set
|
|
push2
|
|
pushi $2cb ; 715, pServIDLo
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $2cc ; 716, pServIDHi
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
lat temp[$1]
|
|
send $8
|
|
bnot
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BShop
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
not
|
|
bnt code_04bf
|
|
lsg global[$e6]
|
|
ldi $4 ; scaleX
|
|
and
|
|
bt code_04b2
|
|
lsg global[$e6]
|
|
ldi $1
|
|
and
|
|
bnt code_0482
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BNPC
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
not
|
|
bnt code_0482
|
|
pushi $37f ; 895, findByServID
|
|
push1
|
|
lst temp[$1]
|
|
class GroupList
|
|
send $6
|
|
bnot
|
|
not
|
|
bnt code_0482
|
|
pushi $433 ; 1075, pPeaceful
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
not
|
|
code_0482: bt code_04b2
|
|
lsg global[$e6]
|
|
ldi $2
|
|
and
|
|
bnt code_04bf
|
|
pushi $35c ; 860, getBase
|
|
push1
|
|
class BNPC
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
bnt code_04bf
|
|
pushi $37f ; 895, findByServID
|
|
push1
|
|
lst temp[$1]
|
|
class GroupList
|
|
send $6
|
|
bnot
|
|
not
|
|
bnt code_04bf
|
|
pushi $433 ; 1075, pPeaceful
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
not
|
|
code_04b2: bnt code_04bf
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushi $70 ; 112, 'p', coordType
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
code_04bf: pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$1]
|
|
send $4
|
|
bnot
|
|
code_04c8: ret
|
|
|