diff --git a/Script/Script40012.txt b/Script/Script40012.txt new file mode 100644 index 0000000..8950528 --- /dev/null +++ b/Script/Script40012.txt @@ -0,0 +1,1382 @@ +BWearable::preDispose: + pushi $395 ; 917, beTakenOff + push0 + self $4 + bnot + ret + +BWearable::init: + pushi $94 ; 148, init + push0 + &rest $1 + super WorldObjectBase, $4 + bnot + pushi $35c ; 860, getBase + push1 + class BCarryable + push + pToa pSelf + send $6 + bnot + not + bnt code_00cf + pushi $387 ; 903, addBase + push1 + class BCarryable + push + pToa pSelf + send $6 + bnot +code_00cf: ret + +BWearable::buildVerbList: + link $1 + pushi $97 ; 151, isKindOf + push1 + class WorldObject + push + lap param[$1] + send $6 + bnot + bnt code_019d + pushi $381 ; 897, pMode + push0 + lap param[$1] + send $4 + bnot + push + ldi $1 + and + bnt code_019d + pushi $97 ; 151, isKindOf + push1 + class WorldActor + push + lap param[$1] + send $6 + bnot + bnt code_014a + pushi $35b ; 859, getOwner + push0 + pToa pSelf + send $4 + bnot + sat temp[$0] + push + lap param[$1] + eq? + bnt code_014a + pToa pIsWorn + bnt code_0122 + pushi $9f ; 159, add + push1 + pushi $2f ; 47, '/', mark + class VerbList + send $6 + bnot + jmp code_019d + +code_0122: pushi $35c ; 860, getBase + push1 + class BWeapon + push + pToa pSelf + send $6 + bnot + bnt code_013d + pushi $9f ; 159, add + push1 + pushi $3d ; 61, '=', b_xAxis + class VerbList + send $6 + bnot + jmp code_019d + +code_013d: pushi $9f ; 159, add + push1 + pushi $16 ; 22, lsLeft + class VerbList + send $6 + bnot + jmp code_019d + +code_014a: pushi $35c ; 860, getBase + push1 + class BDye + push + lap param[$1] + send $6 + bnot + sat temp[$0] + bnt code_019d + pushi $631 ; 1585, pHairDye + push0 + send $4 + bnot + not + bnt code_019d + pushi $386 ; 902, hasBase + push1 + class BWearable + push + lap param[$1] + send $6 + bnot + not + bnt code_019d + pushi $386 ; 902, hasBase + push1 + class BDye + push + pToa pSelf + send $6 + bnot + not + bnt code_019d + pushi $3a9 ; 937, isOwnedBy + push1 + lsg global[$1] + lap param[$1] + send $6 + bnot + bnt code_019d + pushi $9f ; 159, add + push1 + pushi $80 ; 128, lastKey + class VerbList + send $6 + bnot +code_019d: ret + +BWearable::handlesAction: + pushi $3 ; z + lsp param[$1] + pushi $393 ; 915, bePutOn + pushi $395 ; 917, beTakenOff + calle export60025_4, $6 + bnot + ret + +BWearable::updateDisplay: + pToa pSelf + bnt code_0238 + pToa pWearer + bnt code_0238 + pushi $e ; 14, view + push0 + pToa pSelf + send $4 + bnot + push + ldi $ff ; 255, asInteger + ne? + bnt code_0238 + pushi $3e7 ; 999, pUpdatorList + push0 + pToa pSelf + send $4 + bnot + bnt code_020e + pushi $f ; 15, loop + push1 + pushi $f ; 15, loop + push0 + pToa pWearer + send $4 + bnot + push + pushi $10 ; 16, cel + push1 + pushi $10 ; 16, cel + push0 + pToa pWearer + send $4 + bnot + push + pToa pSelf + send $c + bnot + pushi $36a ; 874, updateDisplay + push1 + push1 + pToa pSelf + send $6 + bnot + pushi $3b2 ; 946, addBitmap + push1 + pushi $11 ; 17, bitmap + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot + jmp code_0238 + +code_020e: pushi $3b3 ; 947, addCel + pushi $3 ; z + pushi $e ; 14, view + push0 + pToa pSelf + send $4 + bnot + push + pToa pActionOffset + add + push + pushi $f ; 15, loop + push0 + pToa pWearer + send $4 + bnot + push + pushi $10 ; 16, cel + push0 + pToa pWearer + send $4 + bnot + push + lap param[$1] + send $a + bnot +code_0238: ret + +BWearable::setAreaWorn: + lap param[$1] + aTop pAreaWorn + ret + +BWearable::bePutOn: + link $7 + pushi $97 ; 151, isKindOf + push1 + class WorldActor + push + lap param[$1] + send $6 + bnot + bnt code_0284 + pTos pMask + ldi $3 ; z + and + bnt code_0284 + pushi $4d2 ; 1234, getSex + push0 + lap param[$1] + send $4 + bnot + push + dup + ldi $1 + eq? + bnt code_0279 + pTos pMask + ldi $fe ; 254, strIndex + eq? + bnt code_0272 + ldi $0 + aTop pActionOffset + jmp code_0283 + +code_0272: ldi $2710 ; 10000 + aTop pActionOffset + jmp code_0283 + +code_0279: dup + ldi $0 + eq? + bnt code_0283 + ldi $0 + aTop pActionOffset +code_0283: toss +code_0284: ldi $1 + sat temp[$3] + pushi $36b ; 875, updateAction + push1 + pushi $3ec ; 1004, pAction + push0 + lap param[$1] + send $4 + bnot + push + self $6 + bnot + pushi $3e9 ; 1001, pUpdateObj + push1 + lsp param[$1] + pToa pSelf + send $6 + bnot + ldi $1 + aTop pIsWorn + lap param[$1] + aTop pWearer + pushi $99 ; 153, respondsTo + push1 + pushi $318 ; 792, pShirtView + send $6 + bnot + bnt code_0541 + pTos pAreaWorn + dup + ldi $0 + eq? + bnt code_02d7 + pushi $4d3 ; 1235, pHelmetView + push1 + pushi $3ed ; 1005, pBaseView + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot + jmp code_0540 + +code_02d7: dup + ldi $1 + eq? + bnt code_038b + pushi $318 ; 792, pShirtView + push1 + pushi $3ed ; 1005, pBaseView + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot + pushi $4d4 ; 1236, pRobeView + push0 + pToa pWearer + send $4 + bnot + push + ldi $ff ; 255, asInteger + ne? + bnt code_0540 + pushi $35c ; 860, getBase + push1 + class BContainer + push + pToa pWearer + send $6 + bnot + sat temp[$4] + bnt code_0540 + pushi $420 ; 1056, pContents + push0 + send $4 + bnot + sat temp[$6] + ldi $0 + sat temp[$5] +code_031f: lst temp[$5] + pushi $5a ; 90, 'Z', size + push0 + lat temp[$6] + send $4 + bnot + lt? + bnt code_0540 + pushi $4d4 ; 1236, pRobeView + push0 + pToa pWearer + send $4 + bnot + push + pushi $3ed ; 1005, pBaseView + push0 + pushi $4b ; 75, 'K', at + push1 + lst temp[$5] + lat temp[$6] + send $6 + bnot + send $4 + bnot + eq? + bnt code_0384 + pushi $35c ; 860, getBase + push1 + class BWearable + push + pushi $4b ; 75, 'K', at + push1 + lst temp[$5] + lat temp[$6] + send $6 + bnot + send $6 + bnot + sat temp[$4] + bnt code_0384 + pushi $41e ; 1054, pIsWorn + push0 + send $4 + bnot + bnt code_0384 + pushi $3ac ; 940, inheritClut + push1 + pushi $4b ; 75, 'K', at + push1 + lst temp[$5] + lat temp[$6] + send $6 + bnot + push + pToa pWearer + send $6 + bnot + ldi $0 + sat temp[$3] +code_0384: +at temp[$5] + jmp code_031f + + jmp code_0540 + +code_038b: dup + ldi $2 + eq? + bnt code_03a7 + pushi $4d4 ; 1236, pRobeView + push1 + pushi $3ed ; 1005, pBaseView + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot + jmp code_0540 + +code_03a7: dup + ldi $6 ; maxScale + eq? + bnt code_0466 + pushi $4d5 ; 1237, pPantsView + push1 + pushi $3ed ; 1005, pBaseView + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot + pushi $3ac ; 940, inheritClut + push1 + pTos pSelf + lap param[$1] + send $6 + bnot + pushi $4d6 ; 1238, pSkirtView + push0 + pToa pWearer + send $4 + bnot + push + ldi $ff ; 255, asInteger + ne? + bnt code_0540 + pushi $35c ; 860, getBase + push1 + class BContainer + push + pToa pWearer + send $6 + bnot + sat temp[$4] + bnt code_0540 + pushi $420 ; 1056, pContents + push0 + send $4 + bnot + sat temp[$6] + ldi $0 + sat temp[$5] +code_03fa: lst temp[$5] + pushi $5a ; 90, 'Z', size + push0 + lat temp[$6] + send $4 + bnot + lt? + bnt code_0540 + pushi $4d6 ; 1238, pSkirtView + push0 + pToa pWearer + send $4 + bnot + push + pushi $3ed ; 1005, pBaseView + push0 + pushi $4b ; 75, 'K', at + push1 + lst temp[$5] + lat temp[$6] + send $6 + bnot + send $4 + bnot + eq? + bnt code_045f + pushi $35c ; 860, getBase + push1 + class BWearable + push + pushi $4b ; 75, 'K', at + push1 + lst temp[$5] + lat temp[$6] + send $6 + bnot + send $6 + bnot + sat temp[$4] + bnt code_045f + pushi $41e ; 1054, pIsWorn + push0 + send $4 + bnot + bnt code_045f + pushi $3ac ; 940, inheritClut + push1 + pushi $4b ; 75, 'K', at + push1 + lst temp[$5] + lat temp[$6] + send $6 + bnot + push + pToa pWearer + send $6 + bnot + ldi $0 + sat temp[$3] +code_045f: +at temp[$5] + jmp code_03fa + + jmp code_0540 + +code_0466: dup + ldi $7 ; priority + eq? + bnt code_0482 + pushi $4d7 ; 1239, pShoesView + push1 + pushi $3ed ; 1005, pBaseView + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot + jmp code_0540 + +code_0482: dup + ldi $8 ; fixPriority + eq? + bnt code_049e + pushi $4d8 ; 1240, pBeltView + push1 + pushi $3ed ; 1005, pBaseView + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot + jmp code_0540 + +code_049e: dup + ldi $9 ; inLeft + eq? + bnt code_04ba + pushi $4d6 ; 1238, pSkirtView + push1 + pushi $3ed ; 1005, pBaseView + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot + jmp code_0540 + +code_04ba: dup + ldi $3 ; z + eq? + bnt code_04d6 + pushi $4d9 ; 1241, pCowlView + push1 + pushi $3ed ; 1005, pBaseView + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot + jmp code_0540 + +code_04d6: dup + ldi $63 ; 99, 'c', perform + eq? + bnt code_04f1 + pushi $4da ; 1242, pBaldricView + push1 + pushi $3ed ; 1005, pBaseView + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot + jmp code_0540 + +code_04f1: dup + ldi $4 ; scaleX + eq? + bnt code_050c + pushi $4db ; 1243, pWristView + push1 + pushi $3ed ; 1005, pBaseView + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot + jmp code_0540 + +code_050c: dup + ldi $11 ; 17, bitmap + eq? + bnt code_0527 + pushi $4dc ; 1244, pShieldView + push1 + pushi $3ed ; 1005, pBaseView + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot + jmp code_0540 + +code_0527: dup + ldi $64 ; 100, 'd', moveDone + eq? + bnt code_0540 + pushi $4dd ; 1245, pWeaponView + push1 + pushi $3ed ; 1005, pBaseView + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot +code_0540: toss +code_0541: lat temp[$3] + bnt code_0550 + pushi $3ac ; 940, inheritClut + push1 + pTos pSelf + lap param[$1] + send $6 + bnot +code_0550: pTos pAreaWorn + ldi $0 + eq? + bnt code_059c + pushi $99 ; 153, respondsTo + push1 + pushi $319 ; 793, pHead + lap param[$1] + send $6 + bnot + bnt code_059c + push1 + pushi $319 ; 793, pHead + push0 + pToa pWearer + send $4 + bnot + push + calle export60000_0, $2 + bnot + bnt code_059c + pushi $4de ; 1246, updateBitmaps + push0 + pushi $35c ; 860, getBase + push1 + class BHead + push + pushi $319 ; 793, pHead + push0 + lap param[$1] + send $4 + bnot + send $6 + bnot + send $4 + bnot + pushi $36a ; 874, updateDisplay + push0 + lap param[$1] + send $4 + bnot +code_059c: pushi $436 ; 1078, updateContainerButton + push0 + self $4 + bnot + ret + +BWearable::beTakenOff: + link $3 + pToa pIsWorn + bnt code_0837 + pushi $99 ; 153, respondsTo + push1 + pushi $318 ; 792, pShirtView + pToa pWearer + send $6 + bnot + bnt code_07db + pTos pAreaWorn + dup + ldi $0 + eq? + bnt code_05d0 + pushi $4d3 ; 1235, pHelmetView + push1 + pushi $ff ; 255, asInteger + pToa pWearer + send $6 + bnot + jmp code_07da + +code_05d0: dup + ldi $1 + eq? + bnt code_05e4 + pushi $318 ; 792, pShirtView + push1 + pushi $ff ; 255, asInteger + pToa pWearer + send $6 + bnot + jmp code_07da + +code_05e4: dup + ldi $2 + eq? + bnt code_068c + pushi $4d4 ; 1236, pRobeView + push1 + pushi $ff ; 255, asInteger + pToa pWearer + send $6 + bnot + pushi $318 ; 792, pShirtView + push0 + pToa pWearer + send $4 + bnot + push + ldi $ff ; 255, asInteger + ne? + bnt code_07da + pushi $35c ; 860, getBase + push1 + class BContainer + push + pToa pWearer + send $6 + bnot + sat temp[$0] + bnt code_07da + pushi $420 ; 1056, pContents + push0 + send $4 + bnot + sat temp[$1] + ldi $0 + sat temp[$2] +code_0624: lst temp[$2] + pushi $5a ; 90, 'Z', size + push0 + lat temp[$1] + send $4 + bnot + lt? + bnt code_07da + pushi $318 ; 792, pShirtView + push0 + pToa pWearer + send $4 + bnot + push + pushi $3ed ; 1005, pBaseView + push0 + pushi $4b ; 75, 'K', at + push1 + lst temp[$2] + lat temp[$1] + send $6 + bnot + send $4 + bnot + eq? + bnt code_0685 + pushi $35c ; 860, getBase + push1 + class BWearable + push + pushi $4b ; 75, 'K', at + push1 + lst temp[$2] + lat temp[$1] + send $6 + bnot + send $6 + bnot + sat temp[$0] + bnt code_0685 + pushi $41e ; 1054, pIsWorn + push0 + send $4 + bnot + bnt code_0685 + pushi $3ac ; 940, inheritClut + push1 + pushi $4b ; 75, 'K', at + push1 + lst temp[$2] + lat temp[$1] + send $6 + bnot + push + pToa pWearer + send $6 + bnot +code_0685: +at temp[$2] + jmp code_0624 + + jmp code_07da + +code_068c: dup + ldi $6 ; maxScale + eq? + bnt code_06a0 + pushi $4d5 ; 1237, pPantsView + push1 + pushi $ff ; 255, asInteger + pToa pWearer + send $6 + bnot + jmp code_07da + +code_06a0: dup + ldi $7 ; priority + eq? + bnt code_06b4 + pushi $4d7 ; 1239, pShoesView + push1 + pushi $ff ; 255, asInteger + pToa pWearer + send $6 + bnot + jmp code_07da + +code_06b4: dup + ldi $8 ; fixPriority + eq? + bnt code_06c8 + pushi $4d8 ; 1240, pBeltView + push1 + pushi $ff ; 255, asInteger + pToa pWearer + send $6 + bnot + jmp code_07da + +code_06c8: dup + ldi $9 ; inLeft + eq? + bnt code_0770 + pushi $4d6 ; 1238, pSkirtView + push1 + pushi $ff ; 255, asInteger + pToa pWearer + send $6 + bnot + pushi $4d5 ; 1237, pPantsView + push0 + pToa pWearer + send $4 + bnot + push + ldi $ff ; 255, asInteger + ne? + bnt code_07da + pushi $35c ; 860, getBase + push1 + class BContainer + push + pToa pWearer + send $6 + bnot + sat temp[$0] + bnt code_07da + pushi $420 ; 1056, pContents + push0 + send $4 + bnot + sat temp[$1] + ldi $0 + sat temp[$2] +code_0708: lst temp[$2] + pushi $5a ; 90, 'Z', size + push0 + lat temp[$1] + send $4 + bnot + lt? + bnt code_07da + pushi $4d5 ; 1237, pPantsView + push0 + pToa pWearer + send $4 + bnot + push + pushi $3ed ; 1005, pBaseView + push0 + pushi $4b ; 75, 'K', at + push1 + lst temp[$2] + lat temp[$1] + send $6 + bnot + send $4 + bnot + eq? + bnt code_0769 + pushi $35c ; 860, getBase + push1 + class BWearable + push + pushi $4b ; 75, 'K', at + push1 + lst temp[$2] + lat temp[$1] + send $6 + bnot + send $6 + bnot + sat temp[$0] + bnt code_0769 + pushi $41e ; 1054, pIsWorn + push0 + send $4 + bnot + bnt code_0769 + pushi $3ac ; 940, inheritClut + push1 + pushi $4b ; 75, 'K', at + push1 + lst temp[$2] + lat temp[$1] + send $6 + bnot + push + pToa pWearer + send $6 + bnot +code_0769: +at temp[$2] + jmp code_0708 + + jmp code_07da + +code_0770: dup + ldi $3 ; z + eq? + bnt code_0784 + pushi $4d9 ; 1241, pCowlView + push1 + pushi $ff ; 255, asInteger + pToa pWearer + send $6 + bnot + jmp code_07da + +code_0784: dup + ldi $63 ; 99, 'c', perform + eq? + bnt code_0798 + pushi $4da ; 1242, pBaldricView + push1 + pushi $ff ; 255, asInteger + pToa pWearer + send $6 + bnot + jmp code_07da + +code_0798: dup + ldi $4 ; scaleX + eq? + bnt code_07ab + pushi $4db ; 1243, pWristView + push1 + pushi $ff ; 255, asInteger + pToa pWearer + send $6 + bnot + jmp code_07da + +code_07ab: dup + ldi $11 ; 17, bitmap + eq? + bnt code_07be + pushi $4dc ; 1244, pShieldView + push1 + pushi $ff ; 255, asInteger + pToa pWearer + send $6 + bnot + jmp code_07da + +code_07be: dup + ldi $64 ; 100, 'd', moveDone + eq? + bnt code_07da + pushi $40f ; 1039, pWeapon + push1 + pushi $ff ; 255, asInteger + pToa pWearer + send $6 + bnot + pushi $4dd ; 1245, pWeaponView + push1 + pushi $ff ; 255, asInteger + pToa pWearer + send $6 + bnot +code_07da: toss +code_07db: pTos pAreaWorn + ldi $0 + eq? + bnt code_081e + pushi $99 ; 153, respondsTo + push1 + pushi $319 ; 793, pHead + pToa pWearer + send $6 + bnot + bnt code_081e + push1 + pushi $319 ; 793, pHead + push0 + pToa pWearer + send $4 + bnot + push + calle export60000_0, $2 + bnot + bnt code_081e + pushi $4de ; 1246, updateBitmaps + push0 + pushi $35c ; 860, getBase + push1 + class BHead + push + pushi $319 ; 793, pHead + push0 + pToa pWearer + send $4 + bnot + send $6 + bnot + send $4 + bnot +code_081e: ldi $0 + aTop pIsWorn + pushi $3e9 ; 1001, pUpdateObj + push1 + push0 + pToa pSelf + send $6 + bnot + pushi $436 ; 1078, updateContainerButton + push0 + self $4 + bnot + ldi $0 + aTop pWearer +code_0837: ldi $0 + ret + +BWearable::updateAction: + pushi $373 ; 883, setAction + push1 + lsp param[$1] + pToa pSelf + send $6 + bnot + ret + +BWearable::updateContainerButton: + link $1 + pushi $35c ; 860, getBase + push1 + class BCarryable + push + pToa pSelf + send $6 + bnot + sat temp[$0] + bnt code_085f + pushi $436 ; 1078, updateContainerButton + push0 + send $4 + bnot +code_085f: ret + +BWearable::fromPacket: + link $1 + pushi $135 ; 309, getWord + push0 + lap param[$1] + send $4 + bnot + aTop pMask + pushi $2c8 ; 712, lookup + push1 + pushi $136 ; 310, getLong + push0 + lap param[$1] + send $4 + bnot + push + lag global[$6a] + send $6 + bnot + sat temp[$0] + bnt code_088c + pushi $393 ; 915, bePutOn + push1 + push + self $6 + bnot +code_088c: ret + +BLinkedWearable::updateDisplay: + link $2 + pushi $e ; 14, view + push0 + pToa pSelf + send $4 + bnot + push + ldi $ff ; 255, asInteger + ne? + bnt code_09a3 + pToa pGrabLoop + bnt code_08c8 + pToa pWearer + bnt code_08c8 + pTos pGrabAction + ldi $ff ; 255, asInteger + eq? + bt code_08ba + pushi $3ec ; 1004, pAction + push0 + pToa pSelf + send $4 + bnot + push + pToa pGrabAction + eq? +code_08ba: bnt code_08c8 + pushi $f ; 15, loop + push0 + pToa pWearer + send $4 + bnot + sat temp[$1] + jmp code_08cc + +code_08c8: ldi $0 + sat temp[$1] +code_08cc: push1 + pTos pSelf + callk kernel_21, $2 + bnot + push + lst temp[$1] + ldi $1 + add + ge? + bnt code_09a3 + pushi $3e7 ; 999, pUpdatorList + push0 + pToa pSelf + send $4 + bnot + push + ldi $0 + ne? + sat temp[$0] + bnt code_08f8 + pushi $f ; 15, loop + push1 + lst temp[$1] + pToa pSelf + send $6 + bnot +code_08f8: push1 + pTos pSelf + callk kernel_22, $2 + bnot + push + ldi $2 + eq? + bnt code_095a + lat temp[$0] + bnt code_0941 + pushi $10 ; 16, cel + push1 + push1 + pToa pSelf + send $6 + bnot + pushi $36a ; 874, updateDisplay + push1 + push1 + pToa pSelf + send $6 + bnot + pushi $3b6 ; 950, insertLinkedBitmap + pushi $3 ; z + pushi $11 ; 17, bitmap + push0 + pToa pSelf + send $4 + bnot + push + pTos pLinkPoint + pTos pSelf + lap param[$1] + send $a + bnot + pushi $10 ; 16, cel + push1 + push0 + pToa pSelf + send $6 + bnot + jmp code_095a + +code_0941: pushi $3b7 ; 951, insertLinkedCel + pushi $4 ; scaleX + pushi $e ; 14, view + push0 + pToa pSelf + send $4 + bnot + push + lst temp[$1] + push1 + pTos pLinkPoint + lap param[$1] + send $c + bnot +code_095a: lat temp[$0] + bnt code_0982 + pushi $36a ; 874, updateDisplay + push1 + push1 + pToa pSelf + send $6 + bnot + pushi $3b5 ; 949, addLinkedBitmap + pushi $3 ; z + pushi $11 ; 17, bitmap + push0 + pToa pSelf + send $4 + bnot + push + pTos pLinkPoint + pTos pSelf + lap param[$1] + send $a + bnot + jmp code_09a3 + +code_0982: pushi $3b4 ; 948, addLinkedCel + pushi $4 ; scaleX + pushi $e ; 14, view + push0 + pToa pSelf + send $4 + bnot + push + lst temp[$1] + pushi $10 ; 16, cel + push0 + pToa pSelf + send $4 + bnot + push + pTos pLinkPoint + lap param[$1] + send $c + bnot +code_09a3: ret + +BLinkedWearable::updateAction: + pushi $373 ; 883, setAction + push1 + lsp param[$1] + dup + ldi $0 + eq? + bnt code_09b4 + ldi $0 + jmp code_09b6 + +code_09b4: ldi $1 +code_09b6: toss + push + pToa pSelf + send $6 + bnot + ret + diff --git a/Script/Script40013.txt b/Script/Script40013.txt new file mode 100644 index 0000000..988405e --- /dev/null +++ b/Script/Script40013.txt @@ -0,0 +1,491 @@ +BCarryable::preDispose: + link $1 + pToa pOwner + bnt code_0076 + pushi $35c ; 860, getBase + push1 + class BContainer + push + pToa pOwner + send $6 + bnot + sat temp[$0] + bnt code_0076 + pushi $58 ; 88, 'X', delete + push1 + pTos pSelf + lat temp[$0] + send $6 + bnot +code_0076: ret + +BCarryable::dispose: + pToa pContainerButton + bnt code_008a + pushi $4b8 ; 1208, deleteObj + push1 + pTos pSelf + pushi $36 ; 54, '6', client + push0 + send $4 + bnot + send $6 + bnot +code_008a: pushi $95 ; 149, dispose + push0 + super WorldObjectBase, $4 + bnot + ret + +BCarryable::fromPacket: + link $2 + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pShow + ret + +BCarryable::generatePolygon: + ldi $2 + ret + +BCarryable::buildVerbList: + link $3 + pushi $97 ; 151, isKindOf + push1 + class WorldObject + push + lap param[$1] + send $6 + bnot + bnt code_0141 + pushi $381 ; 897, pMode + push0 + lap param[$1] + send $4 + bnot + push + ldi $1 + and + bnt code_0141 + pushi $381 ; 897, pMode + push0 + lap param[$1] + send $4 + bnot + push + ldi $8 ; fixPriority + and + not + bnt code_0141 + class VerbList + sat temp[$1] + pushi $35c ; 860, getBase + push1 + class BWearable + push + pToa pSelf + send $6 + bnot + sat temp[$2] + bnt code_00f0 + pushi $41e ; 1054, pIsWorn + push0 + send $4 + bnot +code_00f0: not + bnt code_0141 + pushi $35c ; 860, getBase + push1 + class BSit + push + pToa pSelf + send $6 + bnot + sat temp[$2] + bnt code_010a + pushi $343 ; 835, pOwner + push0 + send $4 + bnot +code_010a: not + bnt code_0141 + pushi $97 ; 151, isKindOf + push1 + class WorldActor + push + lap param[$1] + send $6 + bnot + bnt code_0141 + pushi $3a9 ; 937, isOwnedBy + push2 + lsp param[$1] + push1 + pToa pSelf + send $8 + bnot + bnt code_0136 + pushi $9f ; 159, add + push1 + pushi $a ; 10, inTop + lat temp[$1] + send $6 + bnot + jmp code_0141 + +code_0136: pushi $9f ; 159, add + push1 + pushi $8 ; fixPriority + lat temp[$1] + send $6 + bnot +code_0141: pushi $97 ; 151, isKindOf + push1 + class ContainerDisplay + push + lap param[$1] + send $6 + bnot + bnt code_019e + class VerbList + sat temp[$1] + pushi $35b ; 859, getOwner + push0 + pToa pSelf + send $4 + bnot + push + pushi $365 ; 869, pSelf + push0 + pushi $4b4 ; 1204, pContainer + push0 + lap param[$1] + send $4 + bnot + send $4 + bnot + ne? + bnt code_019e + pushi $365 ; 869, pSelf + push0 + pushi $4b4 ; 1204, pContainer + push0 + lap param[$1] + send $4 + bnot + send $4 + bnot + push + lag global[$1] + eq? + bnt code_0193 + pushi $9f ; 159, add + push1 + pushi $8 ; fixPriority + lat temp[$1] + send $6 + bnot + jmp code_019e + +code_0193: pushi $9f ; 159, add + push1 + pushi $b ; 11, inRight + lat temp[$1] + send $6 + bnot +code_019e: ret + +BCarryable::setOwner: + link $4 + ldi $0 + sat temp[$3] +code_01a5: lst temp[$3] + pushi $5a ; 90, 'Z', size + push0 + class gDialogList + send $4 + bnot + lt? + bnt code_0201 + pushi $4b ; 75, 'K', at + push1 + lst temp[$3] + class gDialogList + send $6 + bnot + sat temp[$2] + push1 + push + calle export60000_0, $2 + bnot + bnt code_01fd + pushi $97 ; 151, isKindOf + push1 + class VerbDialog + push + lat temp[$2] + send $6 + bnot + bnt code_01fd + pushi $142 ; 322, pObject + push0 + lat temp[$2] + send $4 + bnot + push + selfID + eq? + bnt code_01fd + pushi $58 ; 88, 'X', delete + push1 + lst temp[$2] + class gDialogList + send $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$2] + send $4 + bnot + jmp code_0201 + +code_01fd: +at temp[$3] + jmp code_01a5 + +code_0201: pushi $32d ; 813, pObj + push0 + class WDragger + send $4 + bnot + push + pToa pSelf + eq? + bnt code_0219 + pushi $359 ; 857, stopDragging + push0 + class WDragger + send $4 + bnot +code_0219: lap param[$1] + bnt code_0251 + pToa pOwner + not + bnt code_024a + pushi $3c6 ; 966, deleteFromRoom + push0 + pToa pSelf + send $4 + bnot + pToa pShow + bnt code_023a + pushi $373 ; 883, setAction + push1 + pushi $21 ; 33, '!', key + pToa pSelf + send $6 + bnot +code_023a: lsp param[$1] + lag global[$1] + ne? + bnt code_024a + pushi $3a5 ; 933, hideContents + push0 + pToa pSelf + send $4 + bnot +code_024a: lap param[$1] + aTop pOwner + jmp code_0327 + +code_0251: pToa pOwner + bnt code_0323 + pushi $f ; 15, loop + push0 + send $4 + bnot + push + dup + ldi $0 + eq? + bnt code_0287 + push1 + push1 + push1 + push0 + pToa pOwner + send $4 + bnot + push + ldi $8 ; fixPriority + add + push + push2 + push1 + push2 + push0 + pToa pOwner + send $4 + bnot + push + ldi $3 ; z + sub + push + pToa pSelf + send $c + bnot + jmp code_02f0 + +code_0287: dup + ldi $1 + eq? + bnt code_02b0 + push1 + push1 + push1 + push0 + pToa pOwner + send $4 + bnot + push + ldi $8 ; fixPriority + sub + push + push2 + push1 + push2 + push0 + pToa pOwner + send $4 + bnot + push + ldi $3 ; z + sub + push + pToa pSelf + send $c + bnot + jmp code_02f0 + +code_02b0: dup + ldi $2 + eq? + bnt code_02d1 + push1 + push1 + push1 + push0 + pToa pOwner + send $4 + bnot + push + push2 + push1 + push2 + push0 + pToa pOwner + send $4 + bnot + push + pToa pSelf + send $c + bnot + jmp code_02f0 + +code_02d1: dup + ldi $3 ; z + eq? + bnt code_02f0 + push1 + push1 + push1 + push0 + pToa pOwner + send $4 + bnot + push + push2 + push1 + push2 + push0 + pToa pOwner + send $4 + bnot + push + pToa pSelf + send $c + bnot +code_02f0: toss + lap param[$1] + aTop pOwner + pushi $373 ; 883, setAction + push1 + pushi $1d ; 29, brTop + pushi $3c5 ; 965, addToRoom + push1 + lsg global[$3] + pushi $3c8 ; 968, matchScaler + push1 + lsg global[$3] + pushi $36a ; 874, updateDisplay + push1 + push1 + pToa pSelf + send $18 + bnot + pTos pOwner + lag global[$1] + ne? + bnt code_0327 + pushi $3a5 ; 933, hideContents + push0 + pToa pSelf + send $4 + bnot + jmp code_0327 + +code_0323: lap param[$1] + aTop pOwner +code_0327: ret + +BCarryable::canApproach: + link $1 + ldi $1 + sat temp[$0] + lsp param[$1] + pToa pOwner + eq? + bnt code_0339 + ldi $2 + sat temp[$0] +code_0339: lat temp[$0] + ret + +BCarryable::canFace: + link $1 + ldi $1 + sat temp[$0] + lsp param[$1] + pToa pOwner + eq? + bnt code_034d + ldi $2 + sat temp[$0] +code_034d: lat temp[$0] + ret + +BCarryable::updateContainerButton: + link $1 + pToa pOwner + bnt code_0363 + pushi $4 ; scaleX + pushi $15 ; 21, nsBottom + pushi $4 ; scaleX + push + pTos pSelf + callk kernel_118, $8 + bnot +code_0363: ret + diff --git a/Script/Script40014.txt b/Script/Script40014.txt new file mode 100644 index 0000000..f56191c --- /dev/null +++ b/Script/Script40014.txt @@ -0,0 +1,3149 @@ +CDSlot::init: + lap param[$1] + aTop x + lap param[$2] + aTop y + ret + +CDSlot::setOwner: + lap param[$1] + bnt code_0248 + pushi $9f ; 159, add + push1 + pushSelf + lofsa CDActiveSlots + send $6 + bnot + jmp code_0252 + +code_0248: pushi $58 ; 88, 'X', delete + push1 + pushSelf + lofsa CDActiveSlots + send $6 + bnot +code_0252: lap param[$1] + aTop pOwner + ret + +CDSlotList::init: + link $2 + pushi $94 ; 148, init + push0 + super Set, $4 + bnot + ldi $0 + sat temp[$0] +code_0265: lst temp[$0] + ldi $4 ; scaleX + lt? + bnt code_0299 + pushi $94 ; 148, init + push2 + lst temp[$0] + ldi $9f ; 159, add + mul + push + ldi $7 ; priority + add + push + pushi $6 ; maxScale + pushi $8d ; 141, new + push0 + class CDSlot + send $4 + bnot + sat temp[$1] + send $8 + bnot + pushi $9f ; 159, add + push1 + lst temp[$1] + self $6 + bnot + +at temp[$0] + jmp code_0265 + +code_0299: ret + +CDSlotList::findSlot: + pToa size + not + bnt code_02a6 + pushi $94 ; 148, init + push0 + self $4 + bnot +code_02a6: pushi $a1 ; 161, firstEqual + push2 + pushi $343 ; 835, pOwner + push0 + self $8 + bnot + ret + +CDSlotList::findClosestSlot: + link $6 + pToa size + not + bnt code_02c0 + pushi $94 ; 148, init + push0 + self $4 + bnot +code_02c0: ldi $2710 ; 10000 + sat temp[$1] + ldi $0 + sat temp[$2] + push1 + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] + pushi $b3 ; 179, begin + push0 + pushi $8d ; 141, new + push1 + pushSelf + class Sequence + send $6 + bnot + sat temp[$4] + send $4 + bnot +code_02e5: pushi $4c ; 76, 'L', next + push0 + lat temp[$4] + send $4 + bnot + sat temp[$5] + bnt code_0322 + push1 + push1 + push0 + send $4 + bnot + push + lat temp[$0] + sub + push + callk kernel_61, $2 + bnot + sat temp[$3] + pushi $343 ; 835, pOwner + push0 + lat temp[$5] + send $4 + bnot + push + ldi $0 + eq? + bnt code_02e5 + lst temp[$1] + lat temp[$3] + gt? + bnt code_02e5 + lat temp[$3] + sat temp[$1] + lat temp[$5] + sat temp[$2] + jmp code_02e5 + +code_0322: lat temp[$2] + ret + +ContainerButton::init: + link $1 + pushi $94 ; 148, init + push0 + &rest $1 + super Button, $4 + bnot + pushi $35c ; 860, getBase + push1 + class BCarryable + push + pToa pObj + send $6 + bnot + sat temp[$0] + bnt code_0349 + pushi $4b0 ; 1200, pContainerButton + push1 + pushSelf + send $6 + bnot +code_0349: ret + +ContainerButton::dispose: + link $1 + push1 + pTos pObj + calle export60000_0, $2 + bnot + bnt code_037b + push1 + pushi $35c ; 860, getBase + push1 + class BCarryable + push + pToa pObj + send $6 + bnot + sat temp[$0] + push + calle export60000_0, $2 + bnot + bnt code_037b + pushi $4b0 ; 1200, pContainerButton + push1 + push0 + lat temp[$0] + send $6 + bnot +code_037b: pushi $95 ; 149, dispose + push0 + super Button, $4 + bnot + ret + +ContainerButton::onMe: + link $2 + lsp param[$0] + ldi $1 + eq? + bnt code_03a1 + push1 + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] + push2 + push0 + lap param[$1] + send $4 + bnot + sat temp[$1] + jmp code_03a9 + +code_03a1: lap param[$1] + sat temp[$0] + lap param[$2] + sat temp[$1] +code_03a9: pushi $4 ; scaleX + lst temp[$0] + lst temp[$1] + pushSelf + push1 + callk kernel_23, $8 + bnot + ret + +ContainerButton::hide: + pushi $69 ; 105, 'i', hide + push0 + &rest $1 + super Button, $4 + bnot + ldi $0 + aTop pOldBM + ret + +ContainerButton::draw: + link $1 + pTos lastState + pToa state + ne? + bt code_03d3 + lap param[$0] + bnt code_0406 + lap param[$1] +code_03d3: bnt code_0406 + pToa bitmap + bnt code_03e3 + pushi $9f ; 159, add + push1 + push + lag global[$66] + send $6 + bnot +code_03e3: pushi $3aa ; 938, createDisplay + push1 + pushi $21 ; 33, '!', key + pToa pObj + send $6 + bnot + aTop bitmap + pToa state + aTop lastState + pToa pOldBM + bnt code_0400 + push1 + pushSelf + callk kernel_32, $2 + bnot + jmp code_0406 + +code_0400: push1 + pushSelf + callk kernel_30, $2 + bnot +code_0406: ret + +ContainerButton::doit: + pToa pOldBM + not + bnt code_0412 + pushi $57 ; 87, 'W', draw + push0 + self $4 + bnot +code_0412: pTos pOldBM + pushi $11 ; 17, bitmap + push0 + pToa pObj + send $4 + bnot + ne? + bnt code_0433 + pushi $11 ; 17, bitmap + push0 + pToa pObj + send $4 + bnot + aTop pOldBM + ldi $ff ; 255, asInteger + aTop lastState + pushi $57 ; 87, 'W', draw + push0 + self $4 + bnot +code_0433: ret + +ContainerButton::handleEvent: + link $6 + pushi $2b ; 43, '+', type + push0 + lap param[$1] + send $4 + bnot + sat temp[$1] + push0 + push0 + lap param[$1] + send $4 + bnot + push + push0 + push0 + pToa client + send $4 + bnot + eq? + sat temp[$2] + pushi $48 ; 72, 'H', modifiers + push0 + lap param[$1] + send $4 + bnot + sat temp[$3] + pushi $25b ; 603, verb + push0 + pushi $24f ; 591, curIcon + push0 + lag global[$6] + send $4 + bnot + send $4 + bnot + sat temp[$4] + pushi $32d ; 813, pObj + push0 + class WDragger + send $4 + bnot + sat temp[$5] + pushi $50 ; 80, 'P', claimed + push0 + lap param[$1] + send $4 + bnot + bnt code_0488 + ldi $0 + jmp code_05fe + +code_0488: lat temp[$2] + bnt code_0582 + lst temp[$1] + ldi $1 + eq? + bnt code_0582 + lat temp[$3] + not + bnt code_0582 + lat temp[$5] + not + bnt code_0582 + pushi $eb ; 235, onMe + push1 + lsp param[$1] + self $6 + bnot + bnt code_0582 + pushi $4b1 ; 1201, accept + push1 + lsp param[$1] + pToa client + send $6 + bnot + bnt code_05fe + pushi $2b ; 43, '+', type + push1 + pushi $4000 ; 16384 + pushi $31 ; 49, '1', message + push1 + lst temp[$4] + push1 + push1 + push1 + push0 + lap param[$1] + send $4 + bnot + push + push2 + push1 + push2 + push0 + lap param[$1] + send $4 + bnot + push + push0 + push1 + push0 + push0 + lap param[$1] + send $4 + bnot + push + pushi $8d ; 141, new + push0 + class Event + send $4 + bnot + sat temp[$0] + send $1e + bnot + push1 + push1 + pTos x + push2 + push1 + pTos y + pToa pObj + send $c + bnot + lst temp[$4] + ldi $2 + eq? + bnt code_0547 + pushi $4b2 ; 1202, pTargetting + push0 + lag global[$1] + send $4 + bnot + bnt code_0520 + pushi $c8 ; 200, handleEvent + push2 + lst temp[$0] + pTos pObj + lag global[$1] + send $8 + bnot + jmp code_056d + +code_0520: pushi $c3 ; 195, script + push0 + lag global[$1] + send $4 + bnot + not + bnt code_056d + pushi $3f8 ; 1016, pMovieCmd + push0 + lag global[$1] + send $4 + bnot + not + bnt code_056d + pushi $358 ; 856, startDragging + push2 + pTos pObj + pTos bitmap + class WDragger + send $8 + bnot + jmp code_056d + +code_0547: pushi $25a ; 602, pFallThru + push0 + pushi $24f ; 591, curIcon + push0 + lag global[$6] + send $4 + bnot + send $4 + bnot + bnt code_0562 + pushi $ba ; 186, globalize + push0 + lat temp[$0] + send $4 + bnot +code_0562: pushi $c8 ; 200, handleEvent + push1 + lst temp[$0] + pToa pObj + send $6 + bnot +code_056d: pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot + pushi $50 ; 80, 'P', claimed + push1 + push1 + lap param[$1] + send $6 + bnot + jmp code_05fe + +code_0582: lat temp[$2] + bnt code_05fe + lst temp[$1] + ldi $2 + eq? + bnt code_05fe + lat temp[$3] + not + bnt code_05fe + lat temp[$5] + bnt code_05fe + pushi $eb ; 235, onMe + push1 + lsp param[$1] + self $6 + bnot + bnt code_05fe + pushi $4b1 ; 1201, accept + push1 + lst temp[$5] + pToa client + send $6 + bnot + bnt code_05fe + pushi $2b ; 43, '+', type + push1 + pushi $4000 ; 16384 + pushi $31 ; 49, '1', message + push1 + lst temp[$4] + push1 + push1 + push1 + push0 + lap param[$1] + send $4 + bnot + push + push2 + push1 + push2 + push0 + lap param[$1] + send $4 + bnot + push + pushi $8d ; 141, new + push0 + class Event + send $4 + bnot + sat temp[$0] + send $18 + bnot + pushi $c8 ; 200, handleEvent + push2 + lst temp[$0] + pTos pObj + lag global[$1] + send $8 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot + pushi $50 ; 80, 'P', claimed + push1 + push1 + lap param[$1] + send $6 + bnot +code_05fe: pushi $50 ; 80, 'P', claimed + push0 + lap param[$1] + send $4 + bnot + ret + +containerUpButton::doit: + link $2 + pushi $4b3 ; 1203, pBtnList + push0 + pToa client + send $4 + bnot + sat temp[$1] + bnt code_064a + pushi $bb ; 187, start + push0 + send $4 + bnot + push + pushi $231 ; 561, row + push0 + lat temp[$1] + send $4 + bnot + push + pushi $232 ; 562, col + push0 + lat temp[$1] + send $4 + bnot + mul + sub + sat temp[$0] + push + ldi $0 + lt? + bnt code_063f + ldi $0 + sat temp[$0] +code_063f: pushi $1ad ; 429, update + push1 + lst temp[$0] + lat temp[$1] + send $6 + bnot +code_064a: ldi $0 + ret + +containerUpButton::onMe: + link $2 + lsp param[$0] + ldi $1 + eq? + bnt code_066a + push1 + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] + push2 + push0 + lap param[$1] + send $4 + bnot + sat temp[$1] + jmp code_0672 + +code_066a: lap param[$1] + sat temp[$0] + lap param[$2] + sat temp[$1] +code_0672: pushi $4 ; scaleX + lst temp[$0] + lst temp[$1] + pushSelf + push1 + callk kernel_23, $8 + bnot + ret + +containerUpButton::contains: + pushi $eb ; 235, onMe + push0 + &rest $1 + self $4 + bnot + ret + +containerDownButton::doit: + link $2 + pushi $4b3 ; 1203, pBtnList + push0 + pToa client + send $4 + bnot + sat temp[$1] + bnt code_06f0 + pushi $bb ; 187, start + push0 + send $4 + bnot + push + pushi $231 ; 561, row + push0 + lat temp[$1] + send $4 + bnot + push + pushi $232 ; 562, col + push0 + lat temp[$1] + send $4 + bnot + mul + add + sat temp[$0] + push + pushi $b4 ; 180, end + push0 + lat temp[$1] + send $4 + bnot + gt? + bnt code_06e5 + pushi $b4 ; 180, end + push0 + lat temp[$1] + send $4 + bnot + push + pushi $231 ; 561, row + push0 + lat temp[$1] + send $4 + bnot + push + pushi $232 ; 562, col + push0 + lat temp[$1] + send $4 + bnot + mul + sub + sat temp[$0] +code_06e5: pushi $1ad ; 429, update + push1 + lst temp[$0] + lat temp[$1] + send $6 + bnot +code_06f0: ldi $0 + ret + +containerDownButton::onMe: + link $2 + lsp param[$0] + ldi $1 + eq? + bnt code_0710 + push1 + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] + push2 + push0 + lap param[$1] + send $4 + bnot + sat temp[$1] + jmp code_0718 + +code_0710: lap param[$1] + sat temp[$0] + lap param[$2] + sat temp[$1] +code_0718: pushi $4 ; scaleX + lst temp[$0] + lst temp[$1] + pushSelf + push1 + callk kernel_23, $8 + bnot + ret + +containerDownButton::contains: + pushi $eb ; 235, onMe + push0 + &rest $1 + self $4 + bnot + ret + +containerCloseButton::process: + link $2 + pushi $b9 ; 185, localize + push1 + pTos plane + lap param[$1] + send $6 + bnot + pushi $50 ; 80, 'P', claimed + push1 + push1 + lap param[$1] + send $6 + bnot + pushi $2b ; 43, '+', type + push0 + lap param[$1] + send $4 + bnot + push + dup + ldi $2 + eq? + bnt code_07ae + pushi $58 ; 88, 'X', delete + push1 + pushSelf + lag global[$4d] + send $6 + bnot + pTos state + ldi $20 ; 32, ' ', name + and + bnt code_076e + pushi $1c9 ; 457, highlight + push2 + push0 + push0 + self $8 + bnot +code_076e: pushi $a3 ; 163, contains + push1 + lsp param[$1] + self $6 + bnot + bnt code_07a6 + pushi $ba ; 186, globalize + push0 + lap param[$1] + send $4 + bnot + pToa client + sat temp[$1] + pushi $1d4 ; 468, selectItem + push2 + pushSelf + push1 + pToa client + send $8 + bnot + bnt code_07bd + pushi $3a5 ; 933, hideContents + push0 + pushi $4b4 ; 1204, pContainer + push0 + pToa client + send $4 + bnot + send $4 + bnot + ret + + jmp code_07bd + +code_07a6: pushi $57 ; 87, 'W', draw + push0 + self $4 + bnot + jmp code_07bd + +code_07ae: dup + ldi $0 + eq? + bnt code_07bd + pushi $ed ; 237, trackDoit + push1 + lsp param[$1] + self $6 + bnot +code_07bd: toss + pushi $50 ; 80, 'P', claimed + push0 + lap param[$1] + send $4 + bnot + ret + +containerCloseButton::onMe: + link $2 + lsp param[$0] + ldi $1 + eq? + bnt code_07e4 + push1 + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] + push2 + push0 + lap param[$1] + send $4 + bnot + sat temp[$1] + jmp code_07ec + +code_07e4: lap param[$1] + sat temp[$0] + lap param[$2] + sat temp[$1] +code_07ec: pushi $4 ; scaleX + lst temp[$0] + lst temp[$1] + pushSelf + push1 + callk kernel_23, $8 + bnot + ret + +containerCloseButton::contains: + pushi $eb ; 235, onMe + push0 + &rest $1 + self $4 + bnot + ret + +ContainerDisplay::process: + pToa pDispose + bnt code_0815 + pushi $3a5 ; 933, hideContents + push0 + pToa pContainer + send $4 + bnot + ldi $0 + ret + + jmp code_0820 + +code_0815: pushi $1ce ; 462, process + push0 + &rest $1 + super FancyDialog, $4 + bnot + ret + +code_0820: ret + +ContainerDisplay::init: + link $15 + pushi $94 ; 148, init + push0 + super FancyDialog, $4 + bnot + lap param[$1] + aTop pContainer + pushi $420 ; 1056, pContents + push0 + send $4 + bnot + sat temp[$2] + pushi $365 ; 869, pSelf + push0 + lap param[$1] + send $4 + bnot + sat temp[$8] + pushi $35b ; 859, getOwner + push0 + send $4 + bnot + sat temp[$b] + lst temp[$8] + lag global[$1] + eq? + bnt code_0875 + ldi $2 + sat temp[$5] + ldi $5 ; scaleY + sat temp[$6] + ldi $0 + sat temp[$7] + pushi $95 ; 149, dispose + push0 + pToa plane + send $4 + bnot + pushi $8d ; 141, new + push0 + lag global[$8] + send $4 + bnot + aTop plane + jmp code_08b1 + +code_0875: ldi $2 + sat temp[$5] + ldi $2 + sat temp[$6] + pushi $315 ; 789, pName + push0 + lap param[$1] + send $4 + bnot + bnt code_08b1 + pushi $17d ; 381, addItem + pushi $5 ; scaleY + class TitleItem + push + pushi $23 ; 35, '#', text + pushi $d0 ; 208, with + push1 + pushi $315 ; 789, pName + push0 + lap param[$1] + send $4 + bnot + push + class Str + send $6 + bnot + push + pushi $25 ; 37, '%', fore + pushi $ff ; 255, asInteger + self $e + bnot + sat temp[$7] +code_08b1: lst temp[$b] + lat temp[$8] + eq? + bt code_08bd + lst temp[$b] + lag global[$1] + eq? +code_08bd: bnt code_08c3 + ldi $1 + aTop pIsRoot +code_08c3: pushi $231 ; 561, row + push1 + lst temp[$5] + pushi $232 ; 562, col + push1 + lst temp[$6] + pushi $8d ; 141, new + push0 + class BtnList + send $4 + bnot + aTop pBtnList + send $c + bnot + ldi $0 + sat temp[$3] +code_08e1: lst temp[$3] + pushi $5a ; 90, 'Z', size + push0 + lat temp[$2] + send $4 + bnot + lt? + bnt code_0906 + pushi $4b ; 75, 'K', at + push1 + lst temp[$3] + lat temp[$2] + send $6 + bnot + sat temp[$0] + pushi $4b7 ; 1207, addObj + push1 + push + self $6 + bnot + +at temp[$3] + jmp code_08e1 + +code_0906: pushi $233 ; 563, buttonW + push1 + pushi $2a ; 42, '*', font + pushi $234 ; 564, buttonH + push1 + pushi $2a ; 42, '*', font + pushi $dc ; 220, posn + push2 + pushi $4 ; scaleX + lat temp[$7] + bnt code_0929 + pushi $8a ; 138, bottom + push0 + send $4 + bnot + push + ldi $a ; 10, inTop + add + jmp code_092b + +code_0929: ldi $4 ; scaleX +code_092b: push + pushi $236 ; 566, upButton + push1 + pushi $8d ; 141, new + push0 + lofsa containerUpButton + send $4 + bnot + push + pushi $237 ; 567, downButton + push1 + pushi $8d ; 141, new + push0 + lofsa containerDownButton + send $4 + bnot + push + pToa pBtnList + send $20 + bnot + pushi $94 ; 148, init + push1 + pushSelf + pushi $23d ; 573, addPaging + push0 + pToa pBtnList + send $a + bnot + pushi $1be ; 446, setSize + push0 + self $4 + bnot + pushi $88 ; 136, right + push0 + pToa plane + send $4 + bnot + sat temp[$c] + pushi $8a ; 138, bottom + push0 + pToa plane + send $4 + bnot + sat temp[$d] + pushi $237 ; 567, downButton + push0 + pToa pBtnList + send $4 + bnot + bnt code_0a00 + pushi $3 ; z + pushi $e ; 14, view + push0 + pushi $237 ; 567, downButton + push0 + pToa pBtnList + send $4 + bnot + send $4 + bnot + push + pushi $f ; 15, loop + push0 + pushi $237 ; 567, downButton + push0 + pToa pBtnList + send $4 + bnot + send $4 + bnot + push + push0 + callk kernel_28, $6 + bnot + sat temp[$13] + pushi $3 ; z + pushi $e ; 14, view + push0 + pushi $237 ; 567, downButton + push0 + pToa pBtnList + send $4 + bnot + send $4 + bnot + push + pushi $f ; 15, loop + push0 + pushi $237 ; 567, downButton + push0 + pToa pBtnList + send $4 + bnot + send $4 + bnot + push + push0 + callk kernel_29, $6 + bnot + sat temp[$14] + pushi $249 ; 585, posnItem + pushi $3 ; z + pushi $237 ; 567, downButton + push0 + pToa pBtnList + send $4 + bnot + push + lst temp[$c] + lat temp[$13] + sub + push + lst temp[$d] + lat temp[$14] + sub + push + self $a + bnot + lst temp[$14] + ldi $1 + add + sat temp[$e] + jmp code_0a04 + +code_0a00: ldi $0 + sat temp[$e] +code_0a04: pushi $236 ; 566, upButton + push0 + pToa pBtnList + send $4 + bnot + bnt code_0a31 + pushi $249 ; 585, posnItem + pushi $3 ; z + pushi $236 ; 566, upButton + push0 + pToa pBtnList + send $4 + bnot + push + lst temp[$c] + lat temp[$13] + sub + push + lst temp[$d] + lst temp[$e] + lat temp[$14] + add + sub + push + self $a + bnot +code_0a31: lat temp[$7] + bnt code_0a43 + pushi $249 ; 585, posnItem + pushi $3 ; z + push + pushi $fb ; 251, subStr + pushi $4 ; scaleX + self $a + bnot +code_0a43: lsp param[$0] + ldi $2 + lt? + bnt code_0b23 + pToa pIsRoot + bnt code_0ad1 + pushi $4ae ; 1198, findClosestSlot + push1 + lst temp[$b] + lag global[$1] + eq? + bnt code_0a5f + lag global[$1] + jmp code_0a61 + +code_0a5f: lat temp[$8] +code_0a61: push + class CDSlotList + send $6 + bnot + aTop pSlot + pToa pSlot + not + bnt code_0aaf + pushi $4b ; 75, 'K', at + push1 + push0 + lofsa CDActiveSlots + send $6 + bnot + aTop pSlot + pushi $3a5 ; 933, hideContents + push0 + pushi $343 ; 835, pOwner + push0 + pToa pSlot + send $4 + bnot + send $4 + bnot + pushi $4ad ; 1197, setOwner + push1 + push0 + pToa pSlot + send $6 + bnot + pushi $4ae ; 1198, findClosestSlot + push1 + lst temp[$b] + lag global[$1] + eq? + bnt code_0aa4 + lag global[$1] + jmp code_0aa6 + +code_0aa4: lat temp[$8] +code_0aa6: push + class CDSlotList + send $6 + bnot + aTop pSlot +code_0aaf: pushi $4ad ; 1197, setOwner + push1 + lst temp[$8] + pToa pSlot + send $6 + bnot + pToa pSlot + sat temp[$0] + push1 + push0 + send $4 + bnot + sat temp[$9] + push2 + push0 + lat temp[$0] + send $4 + bnot + sat temp[$a] + jmp code_0b14 + +code_0ad1: pushi $45d ; 1117, pDisplay + push0 + pushi $35c ; 860, getBase + push1 + class BContainer + push + lat temp[$b] + send $6 + bnot + send $4 + bnot + sat temp[$0] + bnt code_0b0c + pushi $87 ; 135, left + push0 + push0 + push0 + send $4 + bnot + send $4 + bnot + sat temp[$9] + pushi $8a ; 138, bottom + push0 + push0 + push0 + lat temp[$0] + send $4 + bnot + send $4 + bnot + push + ldi $6 ; maxScale + add + sat temp[$a] + jmp code_0b14 + +code_0b0c: ldi $a ; 10, inTop + sat temp[$9] + ldi $a ; 10, inTop + sat temp[$a] +code_0b14: pushi $db ; 219, moveTo + push2 + lst temp[$9] + lst temp[$a] + pToa plane + send $8 + bnot + jmp code_0b30 + +code_0b23: pushi $db ; 219, moveTo + push2 + lsp param[$2] + lsp param[$3] + pToa plane + send $8 + bnot +code_0b30: pushi $87 ; 135, left + push0 + pToa plane + send $4 + bnot + push + ldi $0 + lt? + bnt code_0b53 + pushi $db ; 219, moveTo + push2 + push0 + pushi $89 ; 137, top + push0 + pToa plane + send $4 + bnot + push + pToa plane + send $8 + bnot +code_0b53: pushi $89 ; 137, top + push0 + pToa plane + send $4 + bnot + push + ldi $0 + lt? + bnt code_0b76 + pushi $db ; 219, moveTo + push2 + pushi $87 ; 135, left + push0 + pToa plane + send $4 + bnot + push + push0 + pToa plane + send $8 + bnot +code_0b76: push0 + push0 + lag global[$3] + send $4 + bnot + sat temp[$4] + lst temp[$c] + pushi $88 ; 136, right + push0 + send $4 + bnot + gt? + bnt code_0ba3 + pushi $dd ; 221, moveBy + push2 + pushi $88 ; 136, right + push0 + lat temp[$4] + send $4 + bnot + push + lat temp[$c] + sub + push + push0 + pToa plane + send $8 + bnot +code_0ba3: lst temp[$d] + pushi $8a ; 138, bottom + push0 + lat temp[$4] + send $4 + bnot + gt? + bnt code_0bc9 + pushi $dd ; 221, moveBy + push2 + push0 + pushi $8a ; 138, bottom + push0 + lat temp[$4] + send $4 + bnot + push + lat temp[$d] + sub + push + pToa plane + send $8 + bnot +code_0bc9: pushi $1d3 ; 467, modal + push1 + push0 + pushi $248 ; 584, open + push0 + self $a + bnot + lst temp[$8] + lag global[$1] + ne? + bnt code_0c91 + lat temp[$7] + bnt code_0c37 + pushi $11 ; 17, bitmap + push1 + pushi $5 ; scaleY + push0 + pushi $4e ; 78, 'N', width + push0 + send $4 + bnot + push + ldi $8 ; fixPriority + add + push + push2 + push0 + pushi $ff ; 255, asInteger + callk kernel_35, $a + bnot + push + push1 + push1 + pushi $87 ; 135, left + push0 + lat temp[$7] + send $4 + bnot + push + ldi $4 ; scaleX + sub + push + push2 + push1 + pushi $8a ; 138, bottom + push0 + lat temp[$7] + send $4 + bnot + push + ldi $1 + add + push + pushi $94 ; 148, init + push1 + pushi $f2 ; 242, pCast + push0 + pToa plane + send $4 + bnot + push + pushi $8d ; 141, new + push0 + class View + send $4 + bnot + send $18 + bnot +code_0c37: pushi $e ; 14, view + push1 + pushi $29a ; 666, loopIsCorrect + pushi $4a ; 74, 'J', setPri + push1 + pushi $7 ; priority + push0 + pushi $4ba ; 1210, pBorderPlane + push0 + pToa plane + send $4 + bnot + send $4 + bnot + push + ldi $8 ; fixPriority + add + push + push1 + push1 + pushi $4e ; 78, 'N', width + push0 + pushi $4ba ; 1210, pBorderPlane + push0 + pToa plane + send $4 + bnot + send $4 + bnot + push + ldi $12 ; 18, nsLeft + sub + push + push2 + push1 + pushi $b ; 11, inRight + pushi $94 ; 148, init + push1 + pushi $f2 ; 242, pCast + push0 + pushi $4ba ; 1210, pBorderPlane + push0 + pToa plane + send $4 + bnot + send $4 + bnot + push + pushi $8d ; 141, new + push0 + class View + send $4 + bnot + aTop pCloseBtn + send $1e + bnot +code_0c91: lsp param[$0] + ldi $3 ; z + gt? + bnt code_0cfb + pushi $1bd ; 445, setBitmap + pushi $3 ; z + lsp param[$4] + lsp param[$5] + lsp param[$6] + pushi $1bc ; 444, scaleBitmap + push0 + pushi $6d ; 109, 'm', picture + push1 + pushi $fe ; 254, strIndex + pToa plane + send $14 + bnot + pushi $dc ; 220, posn + push2 + pushi $4 ; scaleX + push0 + lsp param[$4] + lsp param[$5] + lsp param[$6] + callk kernel_34, $8 + bnot + push + pushi $4 ; scaleX + push1 + lsp param[$4] + lsp param[$5] + lsp param[$6] + callk kernel_34, $8 + bnot + push + ldi $2 + div + push + pushi $4a ; 74, 'J', setPri + push1 + push0 + pushi $11 ; 17, bitmap + push0 + pToa plane + send $4 + bnot + send $e + bnot + push1 + pTos plane + callk kernel_42, $2 + bnot + push1 + pushi $11 ; 17, bitmap + push0 + pToa plane + send $4 + bnot + push + callk kernel_32, $2 + bnot +code_0cfb: ret + +ContainerDisplay::dispose: + pushi $45d ; 1117, pDisplay + push1 + push0 + pToa pContainer + send $6 + bnot + pToa pSlot + bnt code_0d16 + pushi $4ad ; 1197, setOwner + push1 + push0 + send $6 + bnot + ldi $0 + aTop pSlot +code_0d16: pushi $11 ; 17, bitmap + push0 + pToa plane + send $4 + bnot + bnt code_0d2f + pushi $95 ; 149, dispose + push0 + pushi $11 ; 17, bitmap + push0 + pToa plane + send $4 + bnot + send $4 + bnot +code_0d2f: ldi $0 + aTop pCloseBtn + pushi $95 ; 149, dispose + push0 + super FancyDialog, $4 + bnot + ret + +ContainerDisplay::handleEvent: + link $7 + pushi $c8 ; 200, handleEvent + push1 + lsp param[$1] + super FancyDialog, $6 + bnot + pushi $2b ; 43, '+', type + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] + push0 + push0 + lap param[$1] + send $4 + bnot + push + pToa plane + eq? + sat temp[$3] + pushi $48 ; 72, 'H', modifiers + push0 + lap param[$1] + send $4 + bnot + sat temp[$4] + pushi $25b ; 603, verb + push0 + pushi $24f ; 591, curIcon + push0 + lag global[$6] + send $4 + bnot + send $4 + bnot + sat temp[$1] + pushi $32d ; 813, pObj + push0 + class WDragger + send $4 + bnot + sat temp[$5] + pushi $50 ; 80, 'P', claimed + push0 + lap param[$1] + send $4 + bnot + bnt code_0d95 + ldi $0 + jmp code_0fba + +code_0d95: lat temp[$3] + bnt code_0e50 + lat temp[$5] + bnt code_0e50 + lst temp[$4] + ldi $0 + eq? + bnt code_0e50 + lst temp[$0] + ldi $2 + eq? + bnt code_0e50 + pushi $ba ; 186, globalize + push0 + lap param[$1] + send $4 + bnot + pushi $a3 ; 163, contains + push1 + lsp param[$1] + pToa plane + send $6 + bnot + bnt code_0e42 + lst temp[$5] + pushi $365 ; 869, pSelf + push0 + pToa pContainer + send $4 + bnot + ne? + bnt code_0e42 + pushi $3a9 ; 937, isOwnedBy + push1 + lst temp[$5] + pushi $365 ; 869, pSelf + push0 + pToa pContainer + send $4 + bnot + send $6 + bnot + not + bnt code_0e42 + pushi $4b1 ; 1201, accept + push1 + lst temp[$5] + self $6 + bnot + bnt code_0e42 + pushi $2b ; 43, '+', type + push1 + pushi $4000 ; 16384 + pushi $31 ; 49, '1', message + push1 + lst temp[$1] + push1 + push1 + push1 + push0 + lap param[$1] + send $4 + bnot + push + push2 + push1 + push2 + push0 + lap param[$1] + send $4 + bnot + push + pushi $8d ; 141, new + push0 + class Event + send $4 + bnot + sat temp[$2] + send $18 + bnot + pushi $c8 ; 200, handleEvent + push2 + lst temp[$2] + pushSelf + lag global[$1] + send $8 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$2] + send $4 + bnot + pushi $50 ; 80, 'P', claimed + push1 + push1 + lap param[$1] + send $6 + bnot +code_0e42: pushi $b9 ; 185, localize + push1 + pTos plane + lap param[$1] + send $6 + bnot + jmp code_0fba + +code_0e50: lat temp[$3] + bnt code_0eff + lat temp[$5] + not + bnt code_0eff + lst temp[$4] + ldi $0 + eq? + bnt code_0eff + lst temp[$0] + ldi $1 + eq? + bnt code_0eff + pushi $8d ; 141, new + push0 + class Rect + send $4 + bnot + sat temp[$6] + pToa pCloseBtn + bnt code_0e95 + pushi $d3 ; 211, copy + push1 + push + lat temp[$6] + send $6 + bnot + pushi $b9 ; 185, localize + push1 + push0 + push0 + pToa pCloseBtn + send $4 + bnot + push + lap param[$1] + send $6 + bnot +code_0e95: pToa pCloseBtn + bnt code_0eb6 + pushi $a3 ; 163, contains + push1 + lsp param[$1] + lat temp[$6] + send $6 + bnot + bnt code_0eb6 + ldi $1 + aTop pDispose + pushi $50 ; 80, 'P', claimed + push1 + push1 + lap param[$1] + send $6 + bnot + jmp code_0ef3 + +code_0eb6: pushi $ba ; 186, globalize + push0 + lap param[$1] + send $4 + bnot + pushi $25a ; 602, pFallThru + push0 + pushi $24f ; 591, curIcon + push0 + lag global[$6] + send $4 + bnot + send $4 + bnot + not + bnt code_0ee8 + pushi $a3 ; 163, contains + push1 + lsp param[$1] + pToa plane + send $6 + bnot + bnt code_0ee8 + pushi $50 ; 80, 'P', claimed + push1 + push1 + lap param[$1] + send $6 + bnot +code_0ee8: pushi $b9 ; 185, localize + push1 + pTos plane + lap param[$1] + send $6 + bnot +code_0ef3: pushi $95 ; 149, dispose + push0 + lat temp[$6] + send $4 + bnot + jmp code_0fba + +code_0eff: lat temp[$3] + bnt code_0fba + pushi $365 ; 869, pSelf + push0 + pToa pContainer + send $4 + bnot + push + lag global[$1] + ne? + bnt code_0fba + lst temp[$4] + ldi $3 ; z + eq? + bnt code_0fba + lst temp[$0] + ldi $1 + eq? + bnt code_0fba + lst temp[$5] + ldi $0 + eq? + bnt code_0fba + lst temp[$1] + ldi $2 + eq? + bnt code_0fba + pushi $ba ; 186, globalize + push0 + lap param[$1] + send $4 + bnot + pushi $4b1 ; 1201, accept + push1 + lsp param[$1] + self $6 + bnot + bnt code_0faf + pushi $a3 ; 163, contains + push1 + lsp param[$1] + pToa plane + send $6 + bnot + bnt code_0faf + pushi $2b ; 43, '+', type + push1 + pushi $4000 ; 16384 + pushi $31 ; 49, '1', message + push1 + push2 + pushi $48 ; 72, 'H', modifiers + push1 + pushi $3 ; z + push1 + push1 + push1 + push0 + lap param[$1] + send $4 + bnot + push + push2 + push1 + push2 + push0 + lap param[$1] + send $4 + bnot + push + pushi $8d ; 141, new + push0 + class Event + send $4 + bnot + sat temp[$2] + send $1e + bnot + pushi $c8 ; 200, handleEvent + push2 + lst temp[$2] + pushi $365 ; 869, pSelf + push0 + pToa pContainer + send $4 + bnot + push + lag global[$1] + send $8 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$2] + send $4 + bnot + pushi $50 ; 80, 'P', claimed + push1 + push1 + lap param[$1] + send $6 + bnot +code_0faf: pushi $b9 ; 185, localize + push1 + pTos plane + lap param[$1] + send $6 + bnot +code_0fba: pushi $50 ; 80, 'P', claimed + push0 + lap param[$1] + send $4 + bnot + ret + +ContainerDisplay::setSize: + link $2 + pushi $1be ; 446, setSize + push0 + super FancyDialog, $4 + bnot + pushi $af ; 175, union + push1 + pushi $23b ; 571, pRect + push0 + pToa pBtnList + send $4 + bnot + push + pToa plane + send $6 + bnot + pushi $365 ; 869, pSelf + push0 + pToa pContainer + send $4 + bnot + push + lag global[$1] + eq? + bnt code_1002 + pushi $4e ; 78, 'N', width + push1 + pushi $108 ; 264, pTimers + pushi $e1 ; 225, height + push1 + pushi $4d ; 77, 'M', done + pToa plane + send $c + bnot + jmp code_1012 + +code_1002: pushi $4e ; 78, 'N', width + push1 + pushi $7e ; 126, '~', dimmed + pushi $e1 ; 225, height + push1 + pushi $60 ; 96, '`', sec + pToa plane + send $c + bnot +code_1012: ret + +ContainerDisplay::addObj: + link $1 + pushi $46e ; 1134, pShow + push0 + pushi $35c ; 860, getBase + push1 + class BCarryable + push + lap param[$1] + send $6 + bnot + send $4 + bnot + bnt code_1055 + pushi $9f ; 159, add + push1 + push0 + push1 + pTos plane + pushi $32d ; 813, pObj + push1 + lsp param[$1] + pushi $1be ; 446, setSize + push0 + pushi $9a ; 154, yourself + push0 + pushi $8d ; 141, new + push0 + class ContainerButton + send $4 + bnot + sat temp[$0] + send $14 + bnot + push + pToa pBtnList + send $6 + bnot +code_1055: ret + +ContainerDisplay::deleteObj: + link $1 + pushi $a1 ; 161, firstEqual + push2 + pushi $32d ; 813, pObj + lsp param[$1] + pToa pBtnList + send $8 + bnot + sat temp[$0] + bnt code_1087 + pushi $58 ; 88, 'X', delete + push1 + push + pToa pBtnList + send $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot + pTos curItem + lat temp[$0] + eq? + bnt code_1087 + ldi $0 + aTop curItem +code_1087: ret + +ContainerDisplay::accept: + link $2 + pushi $381 ; 897, pMode + push0 + lag global[$1] + send $4 + bnot + sat temp[$0] + ldi $1 + sat temp[$1] + pushi $97 ; 151, isKindOf + push1 + class Event + push + lap param[$1] + send $6 + bnot + bnt code_10cd + lst temp[$0] + ldi $8 ; fixPriority + and + bnt code_110c + pushi $3a7 ; 935, getBaseOwner + push0 + pushi $365 ; 869, pSelf + push0 + pToa pContainer + send $4 + bnot + send $4 + bnot + push + lag global[$1] + ne? + bnt code_110c + ldi $0 + sat temp[$1] + jmp code_110c + +code_10cd: pushi $97 ; 151, isKindOf + push1 + class WorldObject + push + lap param[$1] + send $6 + bnot + bnt code_110c + lst temp[$0] + ldi $8 ; fixPriority + and + bnt code_110c + pushi $3a7 ; 935, getBaseOwner + push0 + pushi $365 ; 869, pSelf + push0 + pToa pContainer + send $4 + bnot + send $4 + bnot + push + lag global[$1] + ne? + bt code_1106 + pushi $3a7 ; 935, getBaseOwner + push0 + lap param[$1] + send $4 + bnot + push + lag global[$1] + ne? +code_1106: bnt code_110c + ldi $0 + sat temp[$1] +code_110c: lat temp[$1] + ret + +ContainerDisplay::getVerb: + pushi $a6 ; 166, release + push0 + class VerbList + send $4 + bnot + pushi $366 ; 870, buildVerbList + push1 + pushSelf + lap param[$1] + send $6 + bnot + pushi $5a ; 90, 'Z', size + push0 + class VerbList + send $4 + bnot + not + bnt code_112e + ret + +code_112e: pushi $8d ; 141, new + push1 + class VerbList + push + class VerbDialog + send $6 + bnot + ret + +ContainerDisplay::buttonsDoit: + pushi $9d ; 157, eachElementDo + push1 + pushi $45 ; 69, 'E', doit + pToa pBtnList + send $6 + bnot + ret + +BContainer::init: + pushi $94 ; 148, init + push0 + &rest $1 + super WorldObjectBase, $4 + bnot + pushi $8d ; 141, new + push0 + class Set + send $4 + bnot + aTop pContents + ret + +BContainer::dispose: + pushi $3a5 ; 933, hideContents + push0 + self $4 + bnot + pushi $95 ; 149, dispose + push0 + pToa pContents + send $4 + bnot + ldi $0 + aTop pContents + pushi $95 ; 149, dispose + push0 + &rest $1 + super WorldObjectBase, $4 + bnot + ret + +BContainer::doit: + pushi $9d ; 157, eachElementDo + push1 + pushi $45 ; 69, 'E', doit + pToa pContents + send $6 + bnot + pToa pDisplay + bnt code_1192 + pushi $4b9 ; 1209, buttonsDoit + push0 + send $4 + bnot +code_1192: ret + +BContainer::fromPacket: + link $4 + pushi $135 ; 309, getWord + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] + ldi $0 + sat temp[$2] +code_11a4: lst temp[$2] + lat temp[$0] + lt? + bnt code_11dc + pushi $8d ; 141, new + push0 + class WorldObject + send $4 + bnot + sat temp[$1] + pushi $36c ; 876, fromPacket + push2 + lsp param[$1] + pTos pSelf + send $8 + bnot + bnt code_11cf + pushi $9f ; 159, add + push1 + lst temp[$1] + self $6 + bnot + jmp code_11d8 + +code_11cf: pushi $95 ; 149, dispose + push0 + lat temp[$1] + send $4 + bnot +code_11d8: +at temp[$2] + jmp code_11a4 + +code_11dc: ret + +BContainer::getServIDs: + pushi $9d ; 157, eachElementDo + push2 + pushi $36d ; 877, getServIDs + lsp param[$1] + pToa pContents + send $8 + bnot + ret + +BContainer::handlesAction: + pushi $7 ; priority + lsp param[$1] + pushi $38f ; 911, give + pushi $38e ; 910, take + pushi $390 ; 912, drop + pushi $39f ; 927, beExamined + pushi $3a4 ; 932, showContents + pushi $3a5 ; 933, hideContents + calle export60025_4, $e + bnot + ret + +BContainer::addBulk: + link $1 + pTos pBulk + lap param[$1] + add + aTop pBulk + pushi $35b ; 859, getOwner + push0 + pToa pSelf + send $4 + bnot + sat temp[$0] + push + pToa pSelf + ne? + bnt code_1239 + pushi $4bb ; 1211, addBulk + push1 + lsp param[$1] + pushi $35c ; 860, getBase + push1 + class BContainer + push + lat temp[$0] + send $6 + bnot + send $6 + bnot +code_1239: ret + +BContainer::addWeight: + link $1 + pTos pWeight + lap param[$1] + add + aTop pWeight + pushi $35b ; 859, getOwner + push0 + pToa pSelf + send $4 + bnot + sat temp[$0] + push + pToa pSelf + ne? + bnt code_1269 + pushi $4bc ; 1212, addWeight + push1 + lsp param[$1] + pushi $35c ; 860, getBase + push1 + class BContainer + push + lat temp[$0] + send $6 + bnot + send $6 + bnot +code_1269: ret + +BContainer::subBulk: + link $1 + pTos pBulk + lap param[$1] + sub + aTop pBulk + pushi $35b ; 859, getOwner + push0 + pToa pSelf + send $4 + bnot + sat temp[$0] + push + pToa pSelf + ne? + bnt code_1299 + pushi $4bd ; 1213, subBulk + push1 + lsp param[$1] + pushi $35c ; 860, getBase + push1 + class BContainer + push + lat temp[$0] + send $6 + bnot + send $6 + bnot +code_1299: ret + +BContainer::subWeight: + link $1 + pTos pWeight + lap param[$1] + sub + aTop pWeight + pushi $35b ; 859, getOwner + push0 + pToa pSelf + send $4 + bnot + sat temp[$0] + push + pToa pSelf + ne? + bnt code_12c9 + pushi $4be ; 1214, subWeight + push1 + lsp param[$1] + pushi $35c ; 860, getBase + push1 + class BContainer + push + lat temp[$0] + send $6 + bnot + send $6 + bnot +code_12c9: ret + +BContainer::tooBulky: + link $1 + pTos pBulk + pToa pBulkCap + gt? + bnt code_12d9 + ldi $1 + ret + + jmp code_12fe + +code_12d9: pushi $35b ; 859, getOwner + push0 + pToa pSelf + send $4 + bnot + sat temp[$0] + push + pToa pSelf + ne? + bnt code_12fe + pushi $4bf ; 1215, tooBulky + push0 + pushi $35c ; 860, getBase + push1 + class BContainer + push + lat temp[$0] + send $6 + bnot + send $4 + bnot + ret + +code_12fe: ldi $0 + ret + +BContainer::tooHeavy: + link $1 + pTos pWeight + pToa pWeightCap + gt? + bnt code_1310 + ldi $1 + ret + + jmp code_1335 + +code_1310: pushi $35b ; 859, getOwner + push0 + pToa pSelf + send $4 + bnot + sat temp[$0] + push + pToa pSelf + ne? + bnt code_1335 + pushi $4c0 ; 1216, tooHeavy + push0 + pushi $35c ; 860, getBase + push1 + class BContainer + push + lat temp[$0] + send $6 + bnot + send $4 + bnot + ret + +code_1335: ldi $0 + ret + +BContainer::add: + link $1 + pushi $35c ; 860, getBase + push1 + class BCarryable + push + lap param[$1] + send $6 + bnot + sat temp[$0] + bnt code_1382 + pushi $9f ; 159, add + push1 + lsp param[$1] + pToa pContents + send $6 + bnot + pushi $4 ; scaleX + pushi $15 ; 21, nsBottom + push2 + pTos pSelf + lsp param[$1] + callk kernel_118, $8 + bnot + pushi $4bb ; 1211, addBulk + push1 + pushi $4c1 ; 1217, pBulk + push0 + lat temp[$0] + send $4 + bnot + push + pushi $4bc ; 1212, addWeight + push1 + pushi $4c2 ; 1218, pWeight + push0 + lat temp[$0] + send $4 + bnot + push + self $c + bnot +code_1382: ret + +BContainer::delete: + link $1 + pushi $a3 ; 163, contains + push1 + lsp param[$1] + pToa pContents + send $6 + bnot + bnt code_13e4 + pushi $35c ; 860, getBase + push1 + class BCarryable + push + lap param[$1] + send $6 + bnot + sat temp[$0] + pushi $58 ; 88, 'X', delete + push1 + lsp param[$1] + pToa pContents + send $6 + bnot + pushi $3 ; z + pushi $29 ; 41, ')', state + pushi $9 ; inLeft + lsp param[$1] + callk kernel_118, $6 + bnot + pushi $4 ; scaleX + pushi $15 ; 21, nsBottom + pushi $3 ; z + pTos pSelf + lsp param[$1] + callk kernel_118, $8 + bnot + pushi $4bd ; 1213, subBulk + push1 + pushi $4c1 ; 1217, pBulk + push0 + lat temp[$0] + send $4 + bnot + push + pushi $4be ; 1214, subWeight + push1 + pushi $4c2 ; 1218, pWeight + push0 + lat temp[$0] + send $4 + bnot + push + self $c + bnot +code_13e4: ret + +BContainer::buildVerbList: + link $5 + pushi $97 ; 151, isKindOf + push1 + class WorldObject + push + lap param[$1] + send $6 + bnot + bnt code_14cc + pushi $381 ; 897, pMode + push0 + lap param[$1] + send $4 + bnot + push + ldi $1 + and + bnt code_14cc + class VerbList + sat temp[$0] + pushi $35c ; 860, getBase + push1 + class BOpenable + push + pToa pSelf + send $6 + bnot + sat temp[$2] + pushi $35c ; 860, getBase + push1 + class BWearable + push + lap param[$1] + send $6 + bnot + sat temp[$3] + lat temp[$2] + not + bt code_1434 + pushi $425 ; 1061, pOpen + push0 + lat temp[$2] + send $4 + bnot +code_1434: bnt code_1499 + pushi $35c ; 860, getBase + push1 + class BCarryable + push + lap param[$1] + send $6 + bnot + sat temp[$1] + bnt code_1499 + pushi $343 ; 835, pOwner + push0 + lat temp[$1] + send $4 + bnot + push + pToa pSelf + ne? + bnt code_14cc + pushi $97 ; 151, isKindOf + push1 + class WorldActor + push + pToa pSelf + send $6 + bnot + not + bnt code_14cc + pushi $3a9 ; 937, isOwnedBy + push1 + pushi $3a7 ; 935, getBaseOwner + push0 + pToa pSelf + send $4 + bnot + push + lap param[$1] + send $6 + bnot + bt code_1488 + pushi $3a9 ; 937, isOwnedBy + push1 + lsg global[$1] + lap param[$1] + send $6 + bnot +code_1488: bnt code_14cc + pushi $9f ; 159, add + push1 + pushi $b ; 11, inRight + lat temp[$0] + send $6 + bnot + jmp code_14cc + +code_1499: pToa pDisplay + not + bnt code_14cc + lat temp[$2] + bnt code_14aa + pushi $425 ; 1061, pOpen + push0 + send $4 + bnot +code_14aa: bt code_14bf + lat temp[$2] + not + bnt code_14cc + pushi $97 ; 151, isKindOf + push1 + class WorldActor + push + pToa pSelf + send $6 + bnot + not +code_14bf: bnt code_14cc + pushi $9f ; 159, add + push1 + pushi $32 ; 50, '2', edit + lat temp[$0] + send $6 + bnot +code_14cc: ret + +BContainer::take: + link $3 + lap param[$1] + not + bnt code_14d7 + ldi $2 + ret + +code_14d7: ldi $0 + sat temp[$0] + pushi $35c ; 860, getBase + push1 + class BCarryable + push + lap param[$1] + send $6 + bnot + sat temp[$2] + bnt code_155c + pushi $343 ; 835, pOwner + push0 + send $4 + bnot + sat temp[$1] + bnt code_1510 + push + pToa pSelf + ne? + bnt code_1510 + pushi $38f ; 911, give + push2 + lsp param[$1] + pTos pSelf + lat temp[$1] + send $8 + bnot + sat temp[$0] + jmp code_1560 + +code_1510: pushi $4ad ; 1197, setOwner + push1 + pTos pSelf + lat temp[$2] + send $6 + bnot + pushi $343 ; 835, pOwner + push0 + lat temp[$2] + send $4 + bnot + push + pToa pSelf + eq? + bnt code_1560 + pushi $9f ; 159, add + push1 + lsp param[$1] + self $6 + bnot + pushi $2fb ; 763, pCombatGroup + push0 + lap param[$1] + send $4 + bnot + bnt code_1560 + pushi $95 ; 149, dispose + push0 + pushi $2fb ; 763, pCombatGroup + push0 + lap param[$1] + send $4 + bnot + send $4 + bnot + pushi $2fb ; 763, pCombatGroup + push1 + push0 + lap param[$1] + send $6 + bnot + jmp code_1560 + +code_155c: ldi $4 ; scaleX + sat temp[$0] +code_1560: lat temp[$0] + ret + +BContainer::give: + link $1 + ldi $0 + sat temp[$0] + pushi $3a9 ; 937, isOwnedBy + push1 + pTos pSelf + lap param[$1] + send $6 + bnot + bnt code_15a0 + pushi $390 ; 912, drop + push1 + lsp param[$1] + self $6 + bnot + pushi $38e ; 910, take + push1 + lsp param[$1] + lap param[$2] + send $6 + bnot + push + ldi $0 + ne? + bnt code_15a4 + pushi $38e ; 910, take + push1 + lsp param[$1] + self $6 + bnot + ldi $4 ; scaleX + sat temp[$0] + jmp code_15a4 + +code_15a0: ldi $4 ; scaleX + sat temp[$0] +code_15a4: lat temp[$0] + ret + +BContainer::drop: + link $3 + lap param[$1] + not + bnt code_15af + ret + +code_15af: ldi $0 + sat temp[$0] + pushi $3a9 ; 937, isOwnedBy + push1 + pTos pSelf + lap param[$1] + send $6 + bnot + bnt code_160f + pushi $35b ; 859, getOwner + push0 + lap param[$1] + send $4 + bnot + sat temp[$2] + push + pToa pSelf + eq? + bnt code_1600 + pushi $35c ; 860, getBase + push1 + class BCarryable + push + lap param[$1] + send $6 + bnot + sat temp[$1] + bnt code_15f9 + pushi $58 ; 88, 'X', delete + push1 + lsp param[$1] + self $6 + bnot + pushi $4ad ; 1197, setOwner + push1 + push0 + lat temp[$1] + send $6 + bnot + jmp code_1613 + +code_15f9: ldi $4 ; scaleX + sat temp[$0] + jmp code_1613 + +code_1600: pushi $390 ; 912, drop + push1 + lsp param[$1] + lat temp[$2] + send $6 + bnot + sat temp[$0] + jmp code_1613 + +code_160f: ldi $4 ; scaleX + sat temp[$0] +code_1613: ret + +BContainer::beExamined: + pushi $3a4 ; 932, showContents + push0 + self $4 + bnot + ldi $0 + ret + +BContainer::showContents: + link $2 + ldi $2 + sat temp[$0] + pTos pSelf + lag global[$1] + ne? + bnt code_1650 + pushi $35c ; 860, getBase + push1 + class BCharacter + push + pToa pSelf + send $6 + bnot + bnt code_1650 + push2 + lofsa string_0376 ; "%s showContents called on non-ego with BCharacter" + push + pushi $20 ; 32, ' ', name + push0 + pToa pSelf + send $4 + bnot + push + callk kernel_132, $4 + bnot + lat temp[$0] + ret + +code_1650: lag global[$3] + bnt code_1688 + pushi $35c ; 860, getBase + push1 + class BOpenable + push + pToa pSelf + send $6 + bnot + sat temp[$1] + pToa pDisplay + not + bnt code_1688 + lat temp[$1] + not + bt code_1677 + pushi $425 ; 1061, pOpen + push0 + lat temp[$1] + send $4 + bnot +code_1677: bnt code_1688 + pushi $3 ; z + pushi $15 ; 21, nsBottom + push0 + pTos pSelf + callk kernel_118, $6 + bnot + ldi $0 + sat temp[$0] +code_1688: lat temp[$0] + ret + +BContainer::hideContents: + link $1 + ldi $0 + sat temp[$0] + pushi $3 ; z + pushi $15 ; 21, nsBottom + push1 + pTos pSelf + callk kernel_118, $6 + bnot + pushi $9d ; 157, eachElementDo + push1 + pushi $3a5 ; 933, hideContents + pToa pContents + send $6 + bnot + lat temp[$0] + ret + diff --git a/Script/Script40015.txt b/Script/Script40015.txt new file mode 100644 index 0000000..aeee993 --- /dev/null +++ b/Script/Script40015.txt @@ -0,0 +1,2360 @@ +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 + diff --git a/Script/Script40016.txt b/Script/Script40016.txt new file mode 100644 index 0000000..30ad6e4 --- /dev/null +++ b/Script/Script40016.txt @@ -0,0 +1,165 @@ +BDescribed::init: + pushi $94 ; 148, init + push0 + &rest $1 + super WorldObjectBase, $4 + bnot + lofsa blankText + aTop pText + ret + +BDescribed::dispose: + pToa pText + bnt code_0074 + push + lofsa blankText + ne? + bnt code_0070 + pushi $95 ; 149, dispose + push0 + pToa pText + send $4 + bnot +code_0070: ldi $0 + aTop pText +code_0074: pushi $95 ; 149, dispose + push0 + &rest $1 + super WorldObjectBase, $4 + bnot + ret + +BDescribed::handlesAction: + push2 + lsp param[$1] + pushi $2fd ; 765, see + calle export60025_4, $4 + bnot + ret + +BDescribed::see: + pushi $c3 ; 195, script + push0 + pToa pSelf + send $4 + bnot + bnt code_00a6 + push1 + lofsa string_0085 ; "Trying to see a BDescribed with script attached to pSelf." + push + calle export60029_0, $2 + bnot + jmp code_00ba + +code_00a6: pushi $c9 ; 201, setScript + push1 + pushi $8d ; 141, new + push0 + lofsa GetDescriptionScript + send $4 + bnot + push + pToa pSelf + send $6 + bnot +code_00ba: ldi $0 + ret + +BDescribed::setText: + pToa pText + bnt code_00d5 + push + lofsa blankText + ne? + bnt code_00d1 + pushi $95 ; 149, dispose + push0 + pToa pText + send $4 + bnot +code_00d1: ldi $0 + aTop pText +code_00d5: lap param[$1] + bnt code_00ed + pushi $d0 ; 208, with + push1 + push2 + pushi $9 ; inLeft + push + callk kernel_91, $4 + bnot + push + class Str + send $6 + bnot + aTop pText +code_00ed: ret + +BDescribed::fromPacket: + ret + +GetDescriptionScript::changeState: + lap param[$1] + aTop state + push + dup + ldi $0 + eq? + bnt code_0120 + pushi $277 ; 631, controlOff + push0 + lag global[$2] + send $4 + bnot + pushi $8d ; 141, new + push0 + class Str + send $4 + bnot + aTop register + pushi $4fa ; 1274, getDescription + pushi $3 ; z + pTos client + pTos register + pushSelf + lag global[$6a] + send $a + bnot + jmp code_015d + +code_0120: dup + ldi $1 + eq? + bnt code_015d + pushi $278 ; 632, controlOn + push0 + lag global[$2] + send $4 + bnot + pushi $6 ; maxScale + push2 + pushi $9 ; inLeft + pTos register + callk kernel_91, $4 + bnot + push + pushi $77 ; 119, 'w', textTop + lofsa string_00ca ; "Okay" + push + push0 + pushi $91 ; 145, bitPutIndex + push2 + calle export60029_0, $c + bnot + pushi $95 ; 149, dispose + push0 + pToa register + send $4 + bnot + pushi $95 ; 149, dispose + push0 + self $4 + bnot +code_015d: toss + ret +