2361 lines
35 KiB
Plaintext
2361 lines
35 KiB
Plaintext
BHead::init:
|
|
pushi $94 ; 148, init
|
|
push0
|
|
&rest $1
|
|
super BWearable, $4
|
|
bnot
|
|
ldi $0
|
|
lsli local[$0]
|
|
ldi $ff ; 255, asInteger
|
|
eq?
|
|
bnt code_00e7
|
|
push0
|
|
call code_1008, $0
|
|
bnot
|
|
code_00e7: pushi $8d ; 141, new
|
|
push1
|
|
pushi $4 ; scaleX
|
|
class IntArray
|
|
send $6
|
|
bnot
|
|
aTop pBitmapArray
|
|
pushi $8d ; 141, new
|
|
push1
|
|
pushi $8 ; fixPriority
|
|
class IntArray
|
|
send $6
|
|
bnot
|
|
aTop pOriginPoints
|
|
pushi $45b ; 1115, calcViews
|
|
push0
|
|
self $4
|
|
bnot
|
|
pushi $4ee ; 1262, setEyeColor
|
|
push1
|
|
pTos pEyeColor
|
|
pushi $4ef ; 1263, setSkinColor
|
|
push1
|
|
pTos pSkinColor
|
|
pushi $4ed ; 1261, setHairColor
|
|
push1
|
|
pTos pHairColor
|
|
self $12
|
|
bnot
|
|
ret
|
|
|
|
BHead::dispose:
|
|
link $2
|
|
ldi $0
|
|
sat temp[$0]
|
|
code_0124: lst temp[$0]
|
|
ldi $4 ; scaleX
|
|
lt?
|
|
bnt code_0143
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
pToa pBitmapArray
|
|
send $6
|
|
bnot
|
|
push
|
|
lag global[$66]
|
|
send $6
|
|
bnot
|
|
+at temp[$0]
|
|
jmp code_0124
|
|
|
|
code_0143: pushi $95 ; 149, dispose
|
|
push0
|
|
pToa pBitmapArray
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pBitmapArray
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
pToa pOriginPoints
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pOriginPoints
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
pushi $3ea ; 1002, pClutStart
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $ff ; 255, asInteger
|
|
eq?
|
|
bnt code_017d
|
|
push0
|
|
calle export40005_2, $0
|
|
bnot
|
|
code_017d: pushi $95 ; 149, dispose
|
|
push0
|
|
&rest $1
|
|
super BWearable, $4
|
|
bnot
|
|
ret
|
|
|
|
BHead::calcViews:
|
|
pushi $30d ; 781, pHeadView
|
|
push1
|
|
pushi $4ec ; 1260, calcView
|
|
push2
|
|
push1
|
|
pTos pHeadNum
|
|
self $8
|
|
bnot
|
|
push
|
|
pushi $30e ; 782, pHairView
|
|
push1
|
|
pushi $4ec ; 1260, calcView
|
|
push2
|
|
push2
|
|
pTos pHairNum
|
|
self $8
|
|
bnot
|
|
push
|
|
pushi $30f ; 783, pBrowView
|
|
push1
|
|
pushi $4ec ; 1260, calcView
|
|
push2
|
|
pushi $3 ; z
|
|
pTos pBrowNum
|
|
self $8
|
|
bnot
|
|
push
|
|
pushi $310 ; 784, pEyeView
|
|
push1
|
|
pushi $4ec ; 1260, calcView
|
|
push2
|
|
pushi $4 ; scaleX
|
|
pTos pEyeNum
|
|
self $8
|
|
bnot
|
|
push
|
|
pushi $311 ; 785, pNoseView
|
|
push1
|
|
pushi $4ec ; 1260, calcView
|
|
push2
|
|
pushi $5 ; scaleY
|
|
pTos pNoseNum
|
|
self $8
|
|
bnot
|
|
push
|
|
pushi $312 ; 786, pEarView
|
|
push1
|
|
pushi $4ec ; 1260, calcView
|
|
push2
|
|
pushi $6 ; maxScale
|
|
pTos pEarNum
|
|
self $8
|
|
bnot
|
|
push
|
|
pushi $313 ; 787, pMouthView
|
|
push1
|
|
pushi $4ec ; 1260, calcView
|
|
push2
|
|
pushi $7 ; priority
|
|
pTos pMouthNum
|
|
self $8
|
|
bnot
|
|
push
|
|
pushi $314 ; 788, pFaceHairView
|
|
push1
|
|
pushi $4ec ; 1260, calcView
|
|
push2
|
|
pushi $8 ; fixPriority
|
|
pTos pFaceHairNum
|
|
self $8
|
|
bnot
|
|
push
|
|
self $30
|
|
bnot
|
|
pushi $4de ; 1246, updateBitmaps
|
|
push0
|
|
self $4
|
|
bnot
|
|
ret
|
|
|
|
BHead::calcView:
|
|
link $3
|
|
lsp param[$1]
|
|
ldi $8 ; fixPriority
|
|
gt?
|
|
bnt code_021d
|
|
ldi $ff ; 255, asInteger
|
|
ret
|
|
|
|
code_021d: pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $46 ; 70, 'F', isBlocked
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_0347
|
|
pTos pRace
|
|
dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_028c
|
|
pTos pSex
|
|
dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_0269
|
|
lsp param[$1]
|
|
dup
|
|
ldi $4 ; scaleX
|
|
eq?
|
|
bnt code_0250
|
|
ldi $7 ; priority
|
|
sap param[$2]
|
|
jmp code_0266
|
|
|
|
code_0250: dup
|
|
ldi $5 ; scaleY
|
|
eq?
|
|
bnt code_025c
|
|
ldi $1
|
|
sap param[$2]
|
|
jmp code_0266
|
|
|
|
code_025c: dup
|
|
ldi $7 ; priority
|
|
eq?
|
|
bnt code_0266
|
|
ldi $6 ; maxScale
|
|
sap param[$2]
|
|
code_0266: toss
|
|
jmp code_0288
|
|
|
|
code_0269: dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_0288
|
|
lsp param[$1]
|
|
dup
|
|
ldi $5 ; scaleY
|
|
eq?
|
|
bnt code_027d
|
|
ldi $11 ; 17, bitmap
|
|
sap param[$2]
|
|
jmp code_0287
|
|
|
|
code_027d: dup
|
|
ldi $7 ; priority
|
|
eq?
|
|
bnt code_0287
|
|
ldi $3 ; z
|
|
sap param[$2]
|
|
code_0287: toss
|
|
code_0288: toss
|
|
jmp code_0346
|
|
|
|
code_028c: dup
|
|
ldi $3 ; z
|
|
eq?
|
|
bnt code_02d8
|
|
pTos pSex
|
|
dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_02b5
|
|
lsp param[$1]
|
|
dup
|
|
ldi $4 ; scaleX
|
|
eq?
|
|
bnt code_02a8
|
|
ldi $9 ; inLeft
|
|
sap param[$2]
|
|
jmp code_02b2
|
|
|
|
code_02a8: dup
|
|
ldi $7 ; priority
|
|
eq?
|
|
bnt code_02b2
|
|
ldi $a ; 10, inTop
|
|
sap param[$2]
|
|
code_02b2: toss
|
|
jmp code_02d4
|
|
|
|
code_02b5: dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_02d4
|
|
lsp param[$1]
|
|
dup
|
|
ldi $4 ; scaleX
|
|
eq?
|
|
bnt code_02c9
|
|
ldi $4 ; scaleX
|
|
sap param[$2]
|
|
jmp code_02d3
|
|
|
|
code_02c9: dup
|
|
ldi $7 ; priority
|
|
eq?
|
|
bnt code_02d3
|
|
ldi $5 ; scaleY
|
|
sap param[$2]
|
|
code_02d3: toss
|
|
code_02d4: toss
|
|
jmp code_0346
|
|
|
|
code_02d8: dup
|
|
ldi $4 ; scaleX
|
|
eq?
|
|
bnt code_0346
|
|
pTos pSex
|
|
dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_031a
|
|
lsp param[$1]
|
|
dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_02f5
|
|
ldi $8 ; fixPriority
|
|
sap param[$2]
|
|
jmp code_0317
|
|
|
|
code_02f5: dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_0301
|
|
ldi $2
|
|
sap param[$2]
|
|
jmp code_0317
|
|
|
|
code_0301: dup
|
|
ldi $5 ; scaleY
|
|
eq?
|
|
bnt code_030d
|
|
ldi $0
|
|
sap param[$2]
|
|
jmp code_0317
|
|
|
|
code_030d: dup
|
|
ldi $7 ; priority
|
|
eq?
|
|
bnt code_0317
|
|
ldi $4 ; scaleX
|
|
sap param[$2]
|
|
code_0317: toss
|
|
jmp code_0345
|
|
|
|
code_031a: dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_0345
|
|
lsp param[$1]
|
|
dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_032e
|
|
ldi $2
|
|
sap param[$2]
|
|
jmp code_0344
|
|
|
|
code_032e: dup
|
|
ldi $7 ; priority
|
|
eq?
|
|
bnt code_033a
|
|
ldi $0
|
|
sap param[$2]
|
|
jmp code_0344
|
|
|
|
code_033a: dup
|
|
ldi $5 ; scaleY
|
|
eq?
|
|
bnt code_0344
|
|
ldi $4 ; scaleX
|
|
sap param[$2]
|
|
code_0344: toss
|
|
code_0345: toss
|
|
code_0346: toss
|
|
code_0347: lsp param[$1]
|
|
ldi $1
|
|
sub
|
|
push
|
|
ldi $4 ; scaleX
|
|
mul
|
|
push
|
|
pTos pRace
|
|
ldi $1
|
|
sub
|
|
add
|
|
push
|
|
pTos pSex
|
|
ldi $1
|
|
sub
|
|
push
|
|
ldi $20 ; 32, ' ', name
|
|
mul
|
|
add
|
|
sat temp[$0]
|
|
lali local[$0]
|
|
sat temp[$0]
|
|
push
|
|
ldi $1
|
|
add
|
|
lali local[$40]
|
|
sat temp[$2]
|
|
bnt code_038d
|
|
push2
|
|
lsp param[$2]
|
|
push
|
|
calle export60025_1, $4
|
|
bnot
|
|
sap param[$2]
|
|
lat temp[$0]
|
|
lsli local[$40]
|
|
lsp param[$2]
|
|
ldi $2
|
|
mul
|
|
add
|
|
sat temp[$1]
|
|
jmp code_0391
|
|
|
|
code_038d: ldi $ff ; 255, asInteger
|
|
sat temp[$1]
|
|
code_0391: lat temp[$1]
|
|
ret
|
|
|
|
BHead::updateDisplay:
|
|
link $7
|
|
pushi $3ec ; 1004, pAction
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $f ; 15, loop
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sat temp[$1]
|
|
push
|
|
ldi $3 ; z
|
|
gt?
|
|
bnt code_03b2
|
|
ret
|
|
|
|
code_03b2: lst temp[$0]
|
|
ldi $1
|
|
eq?
|
|
bnt code_0416
|
|
lst temp[$1]
|
|
ldi $2
|
|
mul
|
|
sat temp[$6]
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
push
|
|
pToa pOriginPoints
|
|
send $6
|
|
bnot
|
|
sat temp[$4]
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$6]
|
|
ldi $1
|
|
add
|
|
push
|
|
pToa pOriginPoints
|
|
send $6
|
|
bnot
|
|
sat temp[$5]
|
|
lsp param[$1]
|
|
pToa pSelf
|
|
eq?
|
|
bnt code_03f9
|
|
pushi $11 ; 17, bitmap
|
|
push1
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$1]
|
|
pToa pBitmapArray
|
|
send $6
|
|
bnot
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
jmp code_0451
|
|
|
|
code_03f9: pushi $3b5 ; 949, addLinkedBitmap
|
|
pushi $4 ; scaleX
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$1]
|
|
pToa pBitmapArray
|
|
send $6
|
|
bnot
|
|
push
|
|
push1
|
|
lst temp[$4]
|
|
lst temp[$5]
|
|
lap param[$1]
|
|
send $c
|
|
bnot
|
|
jmp code_0451
|
|
|
|
code_0416: pushi $466 ; 1126, generateBitmap
|
|
push2
|
|
lst temp[$0]
|
|
lst temp[$1]
|
|
self $8
|
|
bnot
|
|
sat temp[$3]
|
|
lsp param[$1]
|
|
pToa pSelf
|
|
eq?
|
|
bnt code_0436
|
|
pushi $11 ; 17, bitmap
|
|
push1
|
|
lst temp[$3]
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
jmp code_0451
|
|
|
|
code_0436: pushi $3b5 ; 949, addLinkedBitmap
|
|
pushi $3 ; z
|
|
lst temp[$3]
|
|
push1
|
|
pTos pSelf
|
|
lap param[$1]
|
|
send $a
|
|
bnot
|
|
pushi $9f ; 159, add
|
|
push1
|
|
lst temp[$3]
|
|
lag global[$66]
|
|
send $6
|
|
bnot
|
|
code_0451: ret
|
|
|
|
BHead::updateBitmaps:
|
|
link $2
|
|
pushi $4ef ; 1263, setSkinColor
|
|
push1
|
|
pTos pSkinColor
|
|
pushi $4ed ; 1261, setHairColor
|
|
push1
|
|
pTos pHairColor
|
|
pushi $4ee ; 1262, setEyeColor
|
|
push1
|
|
pTos pEyeColor
|
|
self $12
|
|
bnot
|
|
ldi $0
|
|
sat temp[$0]
|
|
code_046d: lst temp[$0]
|
|
ldi $4 ; scaleX
|
|
lt?
|
|
bnt code_049b
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lst temp[$0]
|
|
pToa pBitmapArray
|
|
send $6
|
|
bnot
|
|
sat temp[$1]
|
|
bnt code_0497
|
|
pushi $9f ; 159, add
|
|
push1
|
|
push
|
|
lag global[$66]
|
|
send $6
|
|
bnot
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
lst temp[$0]
|
|
push0
|
|
pToa pBitmapArray
|
|
send $8
|
|
bnot
|
|
code_0497: +at temp[$0]
|
|
jmp code_046d
|
|
|
|
code_049b: ldi $0
|
|
sat temp[$0]
|
|
code_049f: lst temp[$0]
|
|
ldi $4 ; scaleX
|
|
lt?
|
|
bnt code_04bf
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
lst temp[$0]
|
|
pushi $466 ; 1126, generateBitmap
|
|
push2
|
|
push1
|
|
lst temp[$0]
|
|
self $8
|
|
bnot
|
|
push
|
|
pToa pBitmapArray
|
|
send $8
|
|
bnot
|
|
+at temp[$0]
|
|
jmp code_049f
|
|
|
|
code_04bf: ret
|
|
|
|
BHead::generateBitmap:
|
|
link $6
|
|
pToa pHeadView
|
|
sat temp[$2]
|
|
pTos pHairNum
|
|
ldi $1f ; 31, brBottom
|
|
eq?
|
|
bnt code_0580
|
|
pToa pHeadNum
|
|
lsli local[$154]
|
|
ldi $1
|
|
sub
|
|
sat temp[$2]
|
|
lsp param[$1]
|
|
ldi $0
|
|
eq?
|
|
bnt code_04e7
|
|
ldi $1
|
|
sap param[$1]
|
|
ldi $2
|
|
sap param[$2]
|
|
code_04e7: pushi $3ed ; 1005, pBaseView
|
|
push1
|
|
lst temp[$2]
|
|
pushi $e ; 14, view
|
|
push1
|
|
lst temp[$2]
|
|
lap param[$1]
|
|
add
|
|
push
|
|
pushi $f ; 15, loop
|
|
push1
|
|
lsp param[$2]
|
|
pushi $3af ; 943, createBitmap
|
|
push0
|
|
pToa pSelf
|
|
send $16
|
|
bnot
|
|
pushi $11 ; 17, bitmap
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $11 ; 17, bitmap
|
|
push1
|
|
push0
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
lsp param[$2]
|
|
ldi $2
|
|
mul
|
|
push
|
|
pushi $4 ; scaleX
|
|
push0
|
|
pushi $e ; 14, view
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $f ; 15, loop
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $10 ; 16, cel
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
callk kernel_34, $8
|
|
bnot
|
|
push
|
|
pToa pOriginPoints
|
|
send $8
|
|
bnot
|
|
pushi $4b ; 75, 'K', at
|
|
push2
|
|
lsp param[$2]
|
|
ldi $2
|
|
mul
|
|
push
|
|
ldi $1
|
|
add
|
|
push
|
|
pushi $4 ; scaleX
|
|
push1
|
|
pushi $e ; 14, view
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $f ; 15, loop
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $10 ; 16, cel
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
push
|
|
callk kernel_34, $8
|
|
bnot
|
|
push
|
|
pToa pOriginPoints
|
|
send $8
|
|
bnot
|
|
jmp code_05d6
|
|
|
|
code_0580: pushi $3ed ; 1005, pBaseView
|
|
push1
|
|
lst temp[$2]
|
|
pushi $e ; 14, view
|
|
push1
|
|
lst temp[$2]
|
|
lap param[$1]
|
|
add
|
|
push
|
|
pushi $f ; 15, loop
|
|
push1
|
|
lsp param[$2]
|
|
pToa pSelf
|
|
send $12
|
|
bnot
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
sat temp[$3]
|
|
ldi $1
|
|
sat temp[$5]
|
|
pushi $7 ; priority
|
|
pushi $d ; 13, seenRect
|
|
lsp param[$1]
|
|
lsp param[$2]
|
|
push
|
|
pTos pSelf
|
|
lat temp[$3]
|
|
eq?
|
|
bnt code_05bc
|
|
ldi $ff ; 255, asInteger
|
|
jmp code_05c5
|
|
|
|
code_05bc: pushi $4d3 ; 1235, pHelmetView
|
|
push0
|
|
lat temp[$3]
|
|
send $4
|
|
bnot
|
|
code_05c5: push
|
|
pushSelf
|
|
pushi $71 ; 113, 'q', data
|
|
push0
|
|
pToa pOriginPoints
|
|
send $4
|
|
bnot
|
|
push
|
|
callk kernel_35, $e
|
|
bnot
|
|
sat temp[$0]
|
|
code_05d6: lat temp[$0]
|
|
ret
|
|
|
|
BHead::fromPacket:
|
|
link $1
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
add
|
|
aTop pRace
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $1
|
|
add
|
|
aTop pSex
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pHeadNum
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pHairNum
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pBrowNum
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pEyeNum
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pNoseNum
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pEarNum
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pMouthNum
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pFaceHairNum
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pSkinColor
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pHairColor
|
|
pushi $134 ; 308, getByte
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pEyeColor
|
|
pushi $4f5 ; 1269, checkFeatureRanges
|
|
push0
|
|
self $4
|
|
bnot
|
|
pushi $4ef ; 1263, setSkinColor
|
|
push1
|
|
pTos pSkinColor
|
|
pushi $4ed ; 1261, setHairColor
|
|
push1
|
|
pTos pHairColor
|
|
pushi $4ee ; 1262, setEyeColor
|
|
push1
|
|
pTos pEyeColor
|
|
self $12
|
|
bnot
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
bnt code_06c0
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class WorldActor
|
|
push
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
bnt code_06c0
|
|
pushi $319 ; 793, pHead
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
not
|
|
bnt code_06c0
|
|
pushi $4f9 ; 1273, setHead
|
|
push1
|
|
pTos pSelf
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
code_06c0: pushi $45b ; 1115, calcViews
|
|
push0
|
|
self $4
|
|
bnot
|
|
ret
|
|
|
|
BHead::buildPacket:
|
|
pushi $13a ; 314, putByte
|
|
push1
|
|
pTos pRace
|
|
ldi $1
|
|
sub
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $13a ; 314, putByte
|
|
push1
|
|
pTos pSex
|
|
ldi $1
|
|
sub
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $13a ; 314, putByte
|
|
push1
|
|
pTos pHeadNum
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $13a ; 314, putByte
|
|
push1
|
|
pTos pHairNum
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $13a ; 314, putByte
|
|
push1
|
|
pTos pBrowNum
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $13a ; 314, putByte
|
|
push1
|
|
pTos pEyeNum
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $13a ; 314, putByte
|
|
push1
|
|
pTos pNoseNum
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $13a ; 314, putByte
|
|
push1
|
|
pTos pEarNum
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $13a ; 314, putByte
|
|
push1
|
|
pTos pMouthNum
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $13a ; 314, putByte
|
|
push1
|
|
pTos pFaceHairNum
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $13a ; 314, putByte
|
|
push1
|
|
pTos pSkinColor
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $13a ; 314, putByte
|
|
push1
|
|
pTos pHairColor
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
pushi $13a ; 314, putByte
|
|
push1
|
|
pTos pEyeColor
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
ret
|
|
|
|
BHead::updateAction:
|
|
pushi $373 ; 883, setAction
|
|
push1
|
|
lsp param[$1]
|
|
ldi $0
|
|
eq?
|
|
bnt code_076f
|
|
ldi $0
|
|
jmp code_0771
|
|
|
|
code_076f: ldi $1
|
|
code_0771: push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
ret
|
|
|
|
BHead::setHairColor:
|
|
push2
|
|
lsp param[$1]
|
|
ldi $0
|
|
lsli local[$100]
|
|
calle export60025_1, $4
|
|
bnot
|
|
sap param[$1]
|
|
aTop pHairColor
|
|
pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $59 ; 89, 'Y', printLang
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_07e2
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $3b ; 59, ';', b_i2
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $62 ; 98, 'b', vol
|
|
pushi $59 ; 89, 'Y', printLang
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $62 ; 98, 'b', vol
|
|
pushi $5a ; 90, 'Z', size
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $62 ; 98, 'b', vol
|
|
pushi $5b ; 91, '[', points
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
jmp code_0933
|
|
|
|
code_07e2: pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $58 ; 88, 'X', delete
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_0839
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $54 ; 84, 'T', title
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $67 ; 103, 'g', quitGame
|
|
pushi $59 ; 89, 'Y', printLang
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $67 ; 103, 'g', quitGame
|
|
pushi $5a ; 90, 'Z', size
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $67 ; 103, 'g', quitGame
|
|
pushi $5b ; 91, '[', points
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
jmp code_0933
|
|
|
|
code_0839: pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $5c ; 92, '\', palette
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_0871
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $36 ; 54, '6', client
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $65 ; 101, 'e', topString
|
|
pushi $59 ; 89, 'Y', printLang
|
|
pushi $3 ; z
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
jmp code_0933
|
|
|
|
code_0871: pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $61 ; 97, 'a', frame
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_08c9
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $66 ; 102, 'f', flags
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $67 ; 103, 'g', quitGame
|
|
pushi $59 ; 89, 'Y', printLang
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $67 ; 103, 'g', quitGame
|
|
pushi $5a ; 90, 'Z', size
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $67 ; 103, 'g', quitGame
|
|
pushi $5b ; 91, '[', points
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
jmp code_0933
|
|
|
|
code_08c9: pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $62 ; 98, 'b', vol
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_0920
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $63 ; 99, 'c', perform
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $62 ; 98, 'b', vol
|
|
pushi $59 ; 89, 'Y', printLang
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $62 ; 98, 'b', vol
|
|
pushi $5a ; 90, 'Z', size
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $62 ; 98, 'b', vol
|
|
pushi $5b ; 91, '[', points
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
jmp code_0933
|
|
|
|
code_0920: pushi $3ae ; 942, setColor
|
|
push2
|
|
lsp param[$1]
|
|
ldi $1
|
|
add
|
|
lsli local[$100]
|
|
pushi $58 ; 88, 'X', delete
|
|
pToa pSelf
|
|
send $8
|
|
bnot
|
|
code_0933: ret
|
|
|
|
BHead::setEyeColor:
|
|
push2
|
|
lsp param[$1]
|
|
ldi $0
|
|
lsli local[$11d]
|
|
calle export60025_1, $4
|
|
bnot
|
|
sap param[$1]
|
|
aTop pEyeColor
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
push
|
|
ldi $1
|
|
add
|
|
lsli local[$11d]
|
|
pushi $f ; 15, loop
|
|
push2
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
ret
|
|
|
|
BHead::setSkinColor:
|
|
link $1
|
|
pTos pRace
|
|
dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_097d
|
|
push2
|
|
lsp param[$1]
|
|
ldi $0
|
|
lsli local[$127]
|
|
calle export60025_1, $4
|
|
bnot
|
|
sap param[$1]
|
|
aTop pSkinColor
|
|
jmp code_09cc
|
|
|
|
code_097d: dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_0998
|
|
push2
|
|
lsp param[$1]
|
|
ldi $0
|
|
lsli local[$12c]
|
|
calle export60025_1, $4
|
|
bnot
|
|
sap param[$1]
|
|
aTop pSkinColor
|
|
jmp code_09cc
|
|
|
|
code_0998: dup
|
|
ldi $3 ; z
|
|
eq?
|
|
bnt code_09b3
|
|
push2
|
|
lsp param[$1]
|
|
ldi $0
|
|
lsli local[$133]
|
|
calle export60025_1, $4
|
|
bnot
|
|
sap param[$1]
|
|
aTop pSkinColor
|
|
jmp code_09cc
|
|
|
|
code_09b3: dup
|
|
ldi $4 ; scaleX
|
|
eq?
|
|
bnt code_09cc
|
|
push2
|
|
lsp param[$1]
|
|
ldi $0
|
|
lsli local[$138]
|
|
calle export60025_1, $4
|
|
bnot
|
|
sap param[$1]
|
|
aTop pSkinColor
|
|
code_09cc: toss
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $3ea ; 1002, pClutStart
|
|
push0
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $ff ; 255, asInteger
|
|
eq?
|
|
bnt code_0a0b
|
|
pushi $3ea ; 1002, pClutStart
|
|
push1
|
|
pushi $ff ; 255, asInteger
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
pushi $330 ; 816, pColor
|
|
push1
|
|
pushi $330 ; 816, pColor
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa pSelf
|
|
send $6
|
|
bnot
|
|
push0
|
|
calle export40005_1, $0
|
|
bnot
|
|
code_0a0b: pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $5a ; 90, 'Z', size
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_0a63
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $55 ; 85, 'U', button
|
|
pushi $68 ; 104, 'h', restart
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $65 ; 101, 'e', topString
|
|
pushi $69 ; 105, 'i', hide
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $66 ; 102, 'f', flags
|
|
pushi $6a ; 106, 'j', scaleSignal
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $56 ; 86, 'V', icon
|
|
pushi $6b ; 107, 'k', vanishingX
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
jmp code_0bee
|
|
|
|
code_0a63: pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $5b ; 91, '[', points
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_0abb
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $3c ; 60, '<', b_di
|
|
pushi $68 ; 104, 'h', restart
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $65 ; 101, 'e', topString
|
|
pushi $69 ; 105, 'i', hide
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $66 ; 102, 'f', flags
|
|
pushi $6a ; 106, 'j', scaleSignal
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $3e ; 62, '>', b_incr
|
|
pushi $6b ; 107, 'k', vanishingX
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
jmp code_0bee
|
|
|
|
code_0abb: pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $5d ; 93, ']', dataInc
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_0b13
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $37 ; 55, '7', dx
|
|
pushi $68 ; 104, 'h', restart
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $65 ; 101, 'e', topString
|
|
pushi $69 ; 105, 'i', hide
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $66 ; 102, 'f', flags
|
|
pushi $6a ; 106, 'j', scaleSignal
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
pushi $3ae ; 942, setColor
|
|
pushi $3 ; z
|
|
pushi $38 ; 56, '8', dy
|
|
pushi $6b ; 107, 'k', vanishingX
|
|
push1
|
|
pToa pSelf
|
|
send $a
|
|
bnot
|
|
jmp code_0bee
|
|
|
|
code_0b13: pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $5e ; 94, '^', handle
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_0b37
|
|
pushi $3ae ; 942, setColor
|
|
push2
|
|
pushi $53 ; 83, 'S', restore
|
|
pushi $68 ; 104, 'h', restart
|
|
pToa pSelf
|
|
send $8
|
|
bnot
|
|
jmp code_0bee
|
|
|
|
code_0b37: pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $5f ; 95, '_', min
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_0b5b
|
|
pushi $3ae ; 942, setColor
|
|
push2
|
|
pushi $3f ; 63, '?', xStep
|
|
pushi $68 ; 104, 'h', restart
|
|
pToa pSelf
|
|
send $8
|
|
bnot
|
|
jmp code_0bee
|
|
|
|
code_0b5b: pushi $35f ; 863, getAffectedState
|
|
push1
|
|
pushi $60 ; 96, '`', sec
|
|
pushi $3a7 ; 935, getBaseOwner
|
|
push0
|
|
pToa pSelf
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
bnt code_0b7f
|
|
pushi $3ae ; 942, setColor
|
|
push2
|
|
pushi $64 ; 100, 'd', moveDone
|
|
pushi $68 ; 104, 'h', restart
|
|
pToa pSelf
|
|
send $8
|
|
bnot
|
|
jmp code_0bee
|
|
|
|
code_0b7f: pTos pRace
|
|
dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_0b9d
|
|
pushi $3ae ; 942, setColor
|
|
push2
|
|
lsp param[$1]
|
|
ldi $1
|
|
add
|
|
lsli local[$127]
|
|
pushi $68 ; 104, 'h', restart
|
|
pToa pSelf
|
|
send $8
|
|
bnot
|
|
jmp code_0bed
|
|
|
|
code_0b9d: dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_0bb9
|
|
pushi $3ae ; 942, setColor
|
|
push2
|
|
lsp param[$1]
|
|
ldi $1
|
|
add
|
|
lsli local[$12c]
|
|
pushi $68 ; 104, 'h', restart
|
|
pToa pSelf
|
|
send $8
|
|
bnot
|
|
jmp code_0bed
|
|
|
|
code_0bb9: dup
|
|
ldi $3 ; z
|
|
eq?
|
|
bnt code_0bd4
|
|
pushi $3ae ; 942, setColor
|
|
push2
|
|
lsp param[$1]
|
|
ldi $1
|
|
add
|
|
lsli local[$133]
|
|
pushi $68 ; 104, 'h', restart
|
|
pToa pSelf
|
|
send $8
|
|
bnot
|
|
jmp code_0bed
|
|
|
|
code_0bd4: dup
|
|
ldi $4 ; scaleX
|
|
eq?
|
|
bnt code_0bed
|
|
pushi $3ae ; 942, setColor
|
|
push2
|
|
lsp param[$1]
|
|
ldi $1
|
|
add
|
|
lsli local[$138]
|
|
pushi $68 ; 104, 'h', restart
|
|
pToa pSelf
|
|
send $8
|
|
bnot
|
|
code_0bed: toss
|
|
code_0bee: ret
|
|
|
|
BHead::nextFeature:
|
|
code_0bef: pushi $4f2 ; 1266, deltaFeatureSelect
|
|
push2
|
|
lsp param[$1]
|
|
push1
|
|
self $8
|
|
bnot
|
|
not
|
|
bnt code_0bfe
|
|
jmp code_0bef
|
|
|
|
code_0bfe: ldi $0
|
|
ret
|
|
|
|
BHead::prevFeature:
|
|
code_0c01: pushi $4f2 ; 1266, deltaFeatureSelect
|
|
push2
|
|
lsp param[$1]
|
|
pushi $ff ; 255, asInteger
|
|
self $8
|
|
bnot
|
|
not
|
|
bnt code_0c11
|
|
jmp code_0c01
|
|
|
|
code_0c11: ldi $0
|
|
ret
|
|
|
|
BHead::deltaFeatureSelect:
|
|
link $4
|
|
lap param[$1]
|
|
lali local[$13f]
|
|
sat temp[$0]
|
|
lsp param[$1]
|
|
ldi $8 ; fixPriority
|
|
le?
|
|
bnt code_0c50
|
|
lsp param[$1]
|
|
ldi $1
|
|
sub
|
|
push
|
|
ldi $4 ; scaleX
|
|
mul
|
|
push
|
|
pTos pRace
|
|
ldi $1
|
|
sub
|
|
add
|
|
push
|
|
pTos pSex
|
|
ldi $1
|
|
sub
|
|
push
|
|
ldi $20 ; 32, ' ', name
|
|
mul
|
|
add
|
|
sat temp[$1]
|
|
lali local[$0]
|
|
sat temp[$1]
|
|
push
|
|
ldi $1
|
|
add
|
|
lali local[$40]
|
|
sat temp[$2]
|
|
jmp code_0cc2
|
|
|
|
code_0c50: lsp param[$1]
|
|
dup
|
|
ldi $9 ; inLeft
|
|
eq?
|
|
bnt code_0c9a
|
|
pTos pRace
|
|
dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_0c6b
|
|
ldi $0
|
|
lali local[$127]
|
|
sat temp[$2]
|
|
jmp code_0c96
|
|
|
|
code_0c6b: dup
|
|
ldi $2
|
|
eq?
|
|
bnt code_0c7a
|
|
ldi $0
|
|
lali local[$12c]
|
|
sat temp[$2]
|
|
jmp code_0c96
|
|
|
|
code_0c7a: dup
|
|
ldi $3 ; z
|
|
eq?
|
|
bnt code_0c89
|
|
ldi $0
|
|
lali local[$133]
|
|
sat temp[$2]
|
|
jmp code_0c96
|
|
|
|
code_0c89: dup
|
|
ldi $4 ; scaleX
|
|
eq?
|
|
bnt code_0c96
|
|
ldi $0
|
|
lali local[$138]
|
|
sat temp[$2]
|
|
code_0c96: toss
|
|
jmp code_0cc1
|
|
|
|
code_0c9a: dup
|
|
ldi $a ; 10, inTop
|
|
eq?
|
|
bnt code_0ca6
|
|
ldi $b ; 11, inRight
|
|
sat temp[$2]
|
|
jmp code_0cc1
|
|
|
|
code_0ca6: dup
|
|
ldi $b ; 11, inRight
|
|
eq?
|
|
bnt code_0cb5
|
|
ldi $0
|
|
lali local[$11d]
|
|
sat temp[$2]
|
|
jmp code_0cc1
|
|
|
|
code_0cb5: push1
|
|
lofsa string_0334 ; "BHead::deltaFeatureSelect (unknown color feature)"
|
|
push
|
|
calle export60029_0, $2
|
|
bnot
|
|
code_0cc1: toss
|
|
code_0cc2: lat temp[$2]
|
|
bnt code_0cf2
|
|
lst temp[$0]
|
|
push0
|
|
self $4
|
|
bnot
|
|
sat temp[$3]
|
|
push
|
|
lap param[$2]
|
|
add
|
|
sat temp[$3]
|
|
push2
|
|
push
|
|
lst temp[$2]
|
|
calle export60025_1, $4
|
|
bnot
|
|
sat temp[$3]
|
|
lst temp[$0]
|
|
push1
|
|
push
|
|
self $6
|
|
bnot
|
|
pushi $4f7 ; 1271, updateFeature
|
|
push1
|
|
lsp param[$1]
|
|
self $6
|
|
bnot
|
|
code_0cf2: pushi $4f4 ; 1268, checkExclusions
|
|
push0
|
|
self $4
|
|
bnot
|
|
push
|
|
ldi $ff ; 255, asInteger
|
|
eq?
|
|
ret
|
|
|
|
BHead::checkExclusions:
|
|
link $1
|
|
ldi $1
|
|
sat temp[$0]
|
|
code_0d04: lst temp[$0]
|
|
ldi $8 ; fixPriority
|
|
le?
|
|
bnt code_0d1d
|
|
pushi $4f3 ; 1267, checkExclusion
|
|
push1
|
|
lst temp[$0]
|
|
self $6
|
|
bnot
|
|
bnt code_0d19
|
|
lat temp[$0]
|
|
ret
|
|
|
|
code_0d19: +at temp[$0]
|
|
jmp code_0d04
|
|
|
|
code_0d1d: ldi $ff ; 255, asInteger
|
|
ret
|
|
|
|
BHead::checkExclusion:
|
|
link $b
|
|
lap param[$1]
|
|
lali local[$13f]
|
|
sat temp[$1]
|
|
push
|
|
push0
|
|
self $4
|
|
bnot
|
|
sat temp[$a]
|
|
lsp param[$1]
|
|
ldi $1
|
|
sub
|
|
push
|
|
ldi $4 ; scaleX
|
|
mul
|
|
push
|
|
pTos pRace
|
|
ldi $1
|
|
sub
|
|
add
|
|
push
|
|
pTos pSex
|
|
ldi $1
|
|
sub
|
|
push
|
|
ldi $20 ; 32, ' ', name
|
|
mul
|
|
add
|
|
sat temp[$0]
|
|
lsli local[$0]
|
|
ldi $2
|
|
add
|
|
sat temp[$0]
|
|
lali local[$40]
|
|
sat temp[$4]
|
|
+at temp[$0]
|
|
ldi $0
|
|
sat temp[$5]
|
|
code_0d5e: lst temp[$5]
|
|
ldi $7 ; priority
|
|
lt?
|
|
bnt code_0e0d
|
|
lst temp[$5]
|
|
ldi $1
|
|
add
|
|
lali local[$13f]
|
|
sat temp[$1]
|
|
lst temp[$4]
|
|
push1
|
|
lat temp[$5]
|
|
shl
|
|
and
|
|
bnt code_0e08
|
|
lst temp[$0]
|
|
ldi $2
|
|
add
|
|
sat temp[$6]
|
|
ldi $0
|
|
sat temp[$7]
|
|
code_0d85: lst temp[$7]
|
|
ldi $2
|
|
lt?
|
|
bnt code_0e04
|
|
lat temp[$0]
|
|
lali local[$40]
|
|
sat temp[$9]
|
|
ldi $0
|
|
sat temp[$8]
|
|
code_0d97: lst temp[$8]
|
|
ldi $10 ; 16, cel
|
|
lt?
|
|
bnt code_0dfd
|
|
lst temp[$9]
|
|
push1
|
|
lat temp[$8]
|
|
shl
|
|
and
|
|
bnt code_0df9
|
|
ldi $0
|
|
sat temp[$2]
|
|
code_0dad: lst temp[$2]
|
|
ldi $2
|
|
lt?
|
|
bnt code_0df9
|
|
ldi $0
|
|
sat temp[$3]
|
|
code_0db9: lst temp[$3]
|
|
ldi $10 ; 16, cel
|
|
lt?
|
|
bnt code_0df3
|
|
lat temp[$6]
|
|
lsli local[$40]
|
|
push1
|
|
lat temp[$3]
|
|
shl
|
|
and
|
|
bnt code_0def
|
|
lst temp[$a]
|
|
lst temp[$8]
|
|
lst temp[$7]
|
|
ldi $5 ; scaleY
|
|
shl
|
|
add
|
|
eq?
|
|
bnt code_0def
|
|
lst temp[$1]
|
|
push0
|
|
self $4
|
|
bnot
|
|
push
|
|
lst temp[$3]
|
|
lst temp[$2]
|
|
ldi $5 ; scaleY
|
|
shl
|
|
add
|
|
eq?
|
|
bnt code_0def
|
|
ldi $1
|
|
ret
|
|
|
|
code_0def: +at temp[$3]
|
|
jmp code_0db9
|
|
|
|
code_0df3: +at temp[$2]
|
|
+at temp[$6]
|
|
jmp code_0dad
|
|
|
|
code_0df9: +at temp[$8]
|
|
jmp code_0d97
|
|
|
|
code_0dfd: +at temp[$7]
|
|
+at temp[$0]
|
|
jmp code_0d85
|
|
|
|
code_0e04: lat temp[$6]
|
|
sat temp[$0]
|
|
code_0e08: +at temp[$5]
|
|
jmp code_0d5e
|
|
|
|
code_0e0d: ldi $0
|
|
ret
|
|
|
|
BHead::updateFeature:
|
|
link $2
|
|
lsp param[$1]
|
|
ldi $8 ; fixPriority
|
|
le?
|
|
bnt code_0e41
|
|
lap param[$1]
|
|
lali local[$14b]
|
|
sat temp[$0]
|
|
lap param[$1]
|
|
lali local[$13f]
|
|
sat temp[$1]
|
|
lst temp[$0]
|
|
push1
|
|
pushi $4ec ; 1260, calcView
|
|
push2
|
|
lsp param[$1]
|
|
push
|
|
push0
|
|
self $4
|
|
bnot
|
|
push
|
|
self $8
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
jmp code_0e76
|
|
|
|
code_0e41: lsp param[$1]
|
|
dup
|
|
ldi $9 ; inLeft
|
|
eq?
|
|
bnt code_0e55
|
|
pushi $4ef ; 1263, setSkinColor
|
|
push1
|
|
pTos pSkinColor
|
|
self $6
|
|
bnot
|
|
jmp code_0e75
|
|
|
|
code_0e55: dup
|
|
ldi $a ; 10, inTop
|
|
eq?
|
|
bnt code_0e66
|
|
pushi $4ed ; 1261, setHairColor
|
|
push1
|
|
pTos pHairColor
|
|
self $6
|
|
bnot
|
|
jmp code_0e75
|
|
|
|
code_0e66: dup
|
|
ldi $b ; 11, inRight
|
|
eq?
|
|
bnt code_0e75
|
|
pushi $4ee ; 1262, setEyeColor
|
|
push1
|
|
pTos pEyeColor
|
|
self $6
|
|
bnot
|
|
code_0e75: toss
|
|
code_0e76: pushi $4de ; 1246, updateBitmaps
|
|
push0
|
|
self $4
|
|
bnot
|
|
ret
|
|
|
|
BHead::setSex:
|
|
lap param[$1]
|
|
aTop pSex
|
|
pushi $4f5 ; 1269, checkFeatureRanges
|
|
push0
|
|
pushi $4f8 ; 1272, fixExclusions
|
|
push0
|
|
pushi $45b ; 1115, calcViews
|
|
push0
|
|
self $c
|
|
bnot
|
|
ret
|
|
|
|
BHead::setRace:
|
|
lap param[$1]
|
|
aTop pRace
|
|
pushi $4f5 ; 1269, checkFeatureRanges
|
|
push0
|
|
pushi $4f8 ; 1272, fixExclusions
|
|
push0
|
|
pushi $45b ; 1115, calcViews
|
|
push0
|
|
self $c
|
|
bnot
|
|
ret
|
|
|
|
BHead::checkFeatureRanges:
|
|
pushi $4f6 ; 1270, checkFeatureRange
|
|
push1
|
|
push1
|
|
pushi $4f6 ; 1270, checkFeatureRange
|
|
push1
|
|
push2
|
|
pushi $4f6 ; 1270, checkFeatureRange
|
|
push1
|
|
pushi $3 ; z
|
|
pushi $4f6 ; 1270, checkFeatureRange
|
|
push1
|
|
pushi $4 ; scaleX
|
|
pushi $4f6 ; 1270, checkFeatureRange
|
|
push1
|
|
pushi $5 ; scaleY
|
|
pushi $4f6 ; 1270, checkFeatureRange
|
|
push1
|
|
pushi $6 ; maxScale
|
|
pushi $4f6 ; 1270, checkFeatureRange
|
|
push1
|
|
pushi $7 ; priority
|
|
pushi $4f6 ; 1270, checkFeatureRange
|
|
push1
|
|
pushi $8 ; fixPriority
|
|
self $30
|
|
bnot
|
|
ret
|
|
|
|
BHead::checkFeatureRange:
|
|
link $3
|
|
pTos pHairNum
|
|
ldi $1f ; 31, brBottom
|
|
eq?
|
|
bnt code_0ee2
|
|
ret
|
|
|
|
code_0ee2: lsp param[$1]
|
|
ldi $1
|
|
sub
|
|
push
|
|
ldi $4 ; scaleX
|
|
mul
|
|
push
|
|
pTos pRace
|
|
ldi $1
|
|
sub
|
|
add
|
|
push
|
|
pTos pSex
|
|
ldi $1
|
|
sub
|
|
push
|
|
ldi $20 ; 32, ' ', name
|
|
mul
|
|
add
|
|
sat temp[$0]
|
|
lali local[$0]
|
|
sat temp[$0]
|
|
push
|
|
ldi $1
|
|
add
|
|
lali local[$40]
|
|
sat temp[$1]
|
|
lap param[$1]
|
|
lali local[$13f]
|
|
sat temp[$2]
|
|
push
|
|
push0
|
|
self $4
|
|
bnot
|
|
push
|
|
lat temp[$1]
|
|
ge?
|
|
bnt code_0f29
|
|
lst temp[$2]
|
|
push1
|
|
lst temp[$1]
|
|
ldi $1
|
|
sub
|
|
push
|
|
self $6
|
|
bnot
|
|
code_0f29: ret
|
|
|
|
BHead::fixExclusions:
|
|
link $1
|
|
code_0f2c: pushi $4f4 ; 1268, checkExclusions
|
|
push0
|
|
self $4
|
|
bnot
|
|
sat temp[$0]
|
|
push
|
|
ldi $ff ; 255, asInteger
|
|
ne?
|
|
bnt code_0f46
|
|
pushi $3a2 ; 930, nextFeature
|
|
push1
|
|
lst temp[$0]
|
|
self $6
|
|
bnot
|
|
jmp code_0f2c
|
|
|
|
code_0f46: ret
|
|
|
|
BHead::handlesAction:
|
|
pushi $3 ; z
|
|
lsp param[$1]
|
|
pushi $3a3 ; 931, prevFeature
|
|
pushi $3a2 ; 930, nextFeature
|
|
calle export60025_4, $6
|
|
bnot
|
|
ret
|
|
|
|
BHead::copy:
|
|
link $1
|
|
pushi $300 ; 768, pHeadNum
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pHeadNum
|
|
pushi $301 ; 769, pHairNum
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pHairNum
|
|
pushi $302 ; 770, pBrowNum
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pBrowNum
|
|
pushi $303 ; 771, pEyeNum
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pEyeNum
|
|
pushi $304 ; 772, pNoseNum
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pNoseNum
|
|
pushi $305 ; 773, pEarNum
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pEarNum
|
|
pushi $306 ; 774, pMouthNum
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pMouthNum
|
|
pushi $307 ; 775, pFaceHairNum
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
aTop pFaceHairNum
|
|
pushi $4ef ; 1263, setSkinColor
|
|
push1
|
|
pushi $308 ; 776, pSkinColor
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
pushi $4ed ; 1261, setHairColor
|
|
push1
|
|
pushi $309 ; 777, pHairColor
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
pushi $4ee ; 1262, setEyeColor
|
|
push1
|
|
pushi $30a ; 778, pEyeColor
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
pushi $4f1 ; 1265, setRace
|
|
push1
|
|
pushi $30b ; 779, pRace
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
pushi $4f0 ; 1264, setSex
|
|
push1
|
|
pushi $30c ; 780, pSex
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
self $6
|
|
bnot
|
|
code_1008: ret
|
|
|
|
link $8
|
|
ldi $0
|
|
sat temp[$3]
|
|
ldi $0
|
|
sat temp[$4]
|
|
ldi $1
|
|
sat temp[$0]
|
|
code_1017: lst temp[$0]
|
|
ldi $2
|
|
le?
|
|
bnt code_10a0
|
|
ldi $1
|
|
sat temp[$1]
|
|
code_1023: lst temp[$1]
|
|
ldi $8 ; fixPriority
|
|
le?
|
|
bnt code_109b
|
|
ldi $1
|
|
sat temp[$2]
|
|
code_102f: lst temp[$2]
|
|
ldi $4 ; scaleX
|
|
le?
|
|
bnt code_1097
|
|
lst temp[$4]
|
|
lat temp[$3]
|
|
sali local[$0]
|
|
lst temp[$4]
|
|
ldi $2
|
|
add
|
|
sat temp[$4]
|
|
push1
|
|
lsli local[$40]
|
|
calle export60025_7, $2
|
|
bnot
|
|
sat temp[$5]
|
|
+at temp[$4]
|
|
lat temp[$5]
|
|
bnt code_1091
|
|
ldi $0
|
|
sat temp[$7]
|
|
code_105b: lst temp[$7]
|
|
lat temp[$5]
|
|
lt?
|
|
bnt code_1091
|
|
push1
|
|
lat temp[$4]
|
|
lsli local[$40]
|
|
calle export60025_7, $2
|
|
bnot
|
|
sat temp[$6]
|
|
+at temp[$4]
|
|
lst temp[$6]
|
|
push1
|
|
lsli local[$40]
|
|
calle export60025_7, $2
|
|
bnot
|
|
add
|
|
sat temp[$6]
|
|
+at temp[$4]
|
|
push
|
|
lst temp[$6]
|
|
ldi $2
|
|
mul
|
|
add
|
|
sat temp[$4]
|
|
+at temp[$7]
|
|
jmp code_105b
|
|
|
|
code_1091: +at temp[$3]
|
|
+at temp[$2]
|
|
jmp code_102f
|
|
|
|
code_1097: +at temp[$1]
|
|
jmp code_1023
|
|
|
|
code_109b: +at temp[$0]
|
|
jmp code_1017
|
|
|
|
code_10a0: ret
|
|
|