From 8f834d20b3d79a19ebcdd1b6d9f441413b772e9c Mon Sep 17 00:00:00 2001 From: threememories Date: Mon, 27 Apr 2026 01:28:29 +0000 Subject: [PATCH] Upload files to "Script" --- Script/Script40004.txt | 1840 +++++++++ Script/Script40005.txt | 8074 ++++++++++++++++++++++++++++++++++++++++ Script/Script40009.txt | 90 + Script/Script40010.txt | 318 ++ Script/Script40011.txt | 166 + 5 files changed, 10488 insertions(+) create mode 100644 Script/Script40004.txt create mode 100644 Script/Script40005.txt create mode 100644 Script/Script40009.txt create mode 100644 Script/Script40010.txt create mode 100644 Script/Script40011.txt diff --git a/Script/Script40004.txt b/Script/Script40004.txt new file mode 100644 index 0000000..471ebd9 --- /dev/null +++ b/Script/Script40004.txt @@ -0,0 +1,1840 @@ +HandsOnCode::cue: + pushi $276 ; 630, handsOn + push0 + lag global[$2] + send $4 + bnot + ret + +::getNextVerb: + push2 + push0 + pushSelf + callk kernel_158, $4 + bnot + ret + +::clearQueue: + push1 + push1 + callk kernel_158, $2 + bnot + ret + +NullMover::doit: + pushi $64 ; 100, 'd', moveDone + push0 + self $4 + bnot + ret + +Money::buildBaseList: + pushi $387 ; 903, addBase + push1 + class BCarryable + push + pushi $387 ; 903, addBase + push1 + class BDescribed + push + self $c + bnot + ret + +Money::buildVerbList: + link $1 + pushi $366 ; 870, buildVerbList + push1 + lsp param[$1] + &rest $2 + super WorldObject, $6 + bnot + pushi $337 ; 823, pValue + push0 + pToa pOwner + send $4 + bnot + sat temp[$0] + not + bt code_04e3 + pushi $12b ; 299, lessEqual + push1 + push0 + lat temp[$0] + send $6 + bnot +code_04e3: bnt code_0503 + pushi $58 ; 88, 'X', delete + push1 + pushi $a ; 10, inTop + class VerbList + send $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pushi $1d ; 29, brTop + class VerbList + send $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pushi $b ; 11, inRight + class VerbList + send $6 + bnot +code_0503: ret + +Money::see: + link $2 + pushi $337 ; 823, pValue + push0 + pToa pOwner + send $4 + bnot + sat temp[$1] + bnt code_0531 + pushi $12d ; 301, greater + push1 + push0 + send $6 + bnot + bnt code_0531 + pushi $f5 ; 245, format + push2 + lofsa string_048d ; "You see %s in your money bag." + push + pTos pName + class Str + send $8 + bnot + sat temp[$0] + jmp code_0540 + +code_0531: pushi $d0 ; 208, with + push1 + lofsa string_04ab ; "You see your empty money bag!" + push + class Str + send $6 + bnot + sat temp[$0] +code_0540: pushi $4 ; scaleX + pushi $7 ; priority + push2 + pushSelf + lst temp[$0] + callk kernel_118, $8 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot + ret + +Mana::buildBaseList: + pushi $387 ; 903, addBase + push1 + class BCarryable + push + pushi $387 ; 903, addBase + push1 + class BDescribed + push + self $c + bnot + ret + +Mana::buildVerbList: + link $1 + pushi $366 ; 870, buildVerbList + push1 + lsp param[$1] + &rest $2 + super WorldObject, $6 + bnot + pushi $338 ; 824, pManaValue + push0 + pToa pOwner + send $4 + bnot + sat temp[$0] + not + bt code_058f + pushi $12b ; 299, lessEqual + push1 + push0 + lat temp[$0] + send $6 + bnot +code_058f: bnt code_05af + pushi $58 ; 88, 'X', delete + push1 + pushi $a ; 10, inTop + class VerbList + send $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pushi $1d ; 29, brTop + class VerbList + send $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pushi $b ; 11, inRight + class VerbList + send $6 + bnot +code_05af: ret + +Mana::see: + link $2 + pushi $338 ; 824, pManaValue + push0 + pToa pOwner + send $4 + bnot + sat temp[$1] + bnt code_05dd + pushi $12d ; 301, greater + push1 + push0 + send $6 + bnot + bnt code_05dd + pushi $f5 ; 245, format + push2 + lofsa string_04ce ; "You see %s in your crystal sack." + push + pTos pName + class Str + send $8 + bnot + sat temp[$0] + jmp code_05ec + +code_05dd: pushi $d0 ; 208, with + push1 + lofsa string_04ef ; "You see your empty crystal sack!" + push + class Str + send $6 + bnot + sat temp[$0] +code_05ec: pushi $4 ; scaleX + pushi $7 ; priority + push2 + pushSelf + lst temp[$0] + callk kernel_118, $8 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot + ret + +WorldEgo::init: + pushi $94 ; 148, init + push0 + &rest $1 + super WorldActor, $4 + bnot + class PolyPath + aTop pMover + pushi $8c ; 140, scratch + push1 + pushSelf + pushi $8d ; 141, new + push0 + class MovieSet + send $4 + bnot + aTop pOutgoingMovie + send $6 + bnot + pushi $1ac ; 428, setLooper + push1 + class Grooper + push + self $6 + bnot + ret + +WorldEgo::buildVerbList: + pushi $366 ; 870, buildVerbList + push0 + &rest $1 + super WorldActor, $4 + bnot + pushi $5a ; 90, 'Z', size + push0 + class SpellList + send $4 + bnot + bnt code_0666 + pushi $54f ; 1359, pFlags + push0 + pushi $c5 ; 197, pRoom + push0 + lag global[$1] + send $4 + bnot + send $4 + bnot + push + ldi $100 ; 256, strMax + and + not + bnt code_0666 + pushi $9f ; 159, add + push1 + pushi $3a ; 58, ':', b_i1 + class VerbList + send $6 + bnot +code_0666: pTos pAction + ldi $3 ; z + eq? + bnt code_067a + pushi $9f ; 159, add + push1 + pushi $50 ; 80, 'P', claimed + class VerbList + send $6 + bnot + jmp code_069a + +code_067a: pushi $2c8 ; 712, lookup + push1 + pushi $380 ; 896, pWhoToFollow + push0 + lag global[$1] + send $4 + bnot + push + lag global[$6a] + send $6 + bnot + bnt code_069a + pushi $9f ; 159, add + push1 + pushi $72 ; 114, 'r', skip + class VerbList + send $6 + bnot +code_069a: ret + +WorldEgo::fromPacket: + pushi $36c ; 876, fromPacket + push0 + &rest $1 + super WorldActor, $4 + bnot + pushi $343 ; 835, pOwner + push1 + pushSelf + pushi $94 ; 148, init + push0 + pushi $8d ; 141, new + push0 + class Money + send $4 + bnot + aTop pMoneyObj + send $a + bnot + pushi $343 ; 835, pOwner + push1 + pushSelf + pushi $94 ; 148, init + push0 + pushi $8d ; 141, new + push0 + class Mana + send $4 + bnot + aTop pManaObj + send $a + bnot + pushi $38e ; 910, take + push1 + pTos pMoneyObj + self $6 + bnot + pushi $38e ; 910, take + push1 + pTos pManaObj + self $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pTos pManaObj + pushi $420 ; 1056, pContents + push0 + pushi $35c ; 860, getBase + push1 + class BContainer + push + self $6 + bnot + send $4 + bnot + send $6 + bnot + pushi $aa ; 170, addToFront + push1 + pTos pManaObj + pushi $420 ; 1056, pContents + push0 + pushi $35c ; 860, getBase + push1 + class BContainer + push + self $6 + bnot + send $4 + bnot + send $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pTos pMoneyObj + pushi $420 ; 1056, pContents + push0 + pushi $35c ; 860, getBase + push1 + class BContainer + push + self $6 + bnot + send $4 + bnot + send $6 + bnot + pushi $aa ; 170, addToFront + push1 + pTos pMoneyObj + pushi $420 ; 1056, pContents + push0 + pushi $35c ; 860, getBase + push1 + class BContainer + push + self $6 + bnot + send $4 + bnot + send $6 + bnot + ret + +WorldEgo::setValue: + pushi $3d5 ; 981, setValue + push0 + &rest $1 + super WorldActor, $4 + bnot + pushi $3d5 ; 981, setValue + push0 + &rest $1 + pToa pMoneyObj + send $4 + bnot + ret + +WorldEgo::setManaValue: + pushi $3d8 ; 984, setManaValue + push0 + &rest $1 + super WorldActor, $4 + bnot + pushi $3d8 ; 984, setManaValue + push0 + &rest $1 + pToa pManaObj + send $4 + bnot + pushi $3 ; z + pushi $6 ; maxScale + pushi $4 ; scaleX + pushi $338 ; 824, pManaValue + push0 + self $4 + bnot + push + callk kernel_118, $6 + bnot + ret + +WorldEgo::hide: + pushi $383 ; 899, curPanel + push0 + lag global[$6] + send $4 + bnot + push + push2 + pushi $a410 ; -23536 + push0 + callk kernel_2, $4 + bnot + eq? + bnt code_07c2 + pushi $17c ; 380, isNotHidden + push0 + self $4 + bnot + bnt code_07cb + pTos signal + ldi $8 ; fixPriority + or + aTop signal + push1 + pushSelf + callk kernel_31, $2 + bnot + jmp code_07cb + +code_07c2: pushi $69 ; 105, 'i', hide + push0 + &rest $1 + super WorldActor, $4 + bnot +code_07cb: ret + +WorldEgo::startTargetting: + link $2 + ldi $0 + sat temp[$0] + lsp param[$0] + ldi $1 + gt? + bnt code_07e0 + lap param[$2] + aTop pClient + jmp code_07e5 + +code_07e0: ldi $0 + aTop pClient +code_07e5: lap param[$1] + aTop pTargetting + pTos pTargetting + dup + ldi $1 + eq? + bnt code_0804 + pushi $d0 ; 208, with + push1 + lofsa string_0510 ; "Choose target..." + push + class Str + send $6 + bnot + sat temp[$0] + jmp code_0830 + +code_0804: dup + ldi $2 + eq? + bnt code_081b + pushi $d0 ; 208, with + push1 + lofsa string_0521 ; "Choose grid location..." + push + class Str + send $6 + bnot + sat temp[$0] + jmp code_0830 + +code_081b: dup + ldi $3 ; z + eq? + bnt code_0830 + pushi $d0 ; 208, with + push1 + lofsa string_0539 ; "Choose location..." + push + class Str + send $6 + bnot + sat temp[$0] +code_0830: toss + ldi $0 + sat temp[$1] + lag global[$d3] + bnt code_083d + ldi $e ; 14, view + sat temp[$1] +code_083d: lat temp[$0] + bnt code_0860 + pushi $94 ; 148, init + pushi $4 ; scaleX + push + pushi $5 ; scaleY + pushi $1e ; 30, brRight + lat temp[$1] + add + push + pushi $ff ; 255, asInteger + pushi $8d ; 141, new + push0 + class ShadowText + send $4 + bnot + sal local[$0] + send $c + bnot +code_0860: ret + +WorldEgo::stopTargetting: + lap param[$0] + not + bt code_0868 + lap param[$1] +code_0868: bnt code_0879 + pToa pClient + bnt code_0879 + pushi $c7 ; 199, cue + push0 + pToa pClient + send $4 + bnot +code_0879: push1 + lsl local[$0] + calle export60000_0, $2 + bnot + bnt code_0892 + pushi $95 ; 149, dispose + push0 + lal local[$0] + send $4 + bnot + ldi $0 + sal local[$0] +code_0892: pToa pTargetting + bnt code_08b6 + pushi $271 ; 625, handsLevel + push0 + lag global[$2] + send $4 + bnot + not + bnt code_08b6 + pushi $1f5 ; 501, setIcon + push1 + pushi $483 ; 1155, pLastIcon + push0 + lag global[$6] + send $4 + bnot + push + lag global[$6] + send $6 + bnot +code_08b6: ldi $0 + aTop pTargetting + aTop pClient + ret + +WorldEgo::stopAction: + pushi $3a6 ; 934, stopAction + push0 + &rest $1 + super WorldActor, $4 + bnot + pushi $45c ; 1116, stopTargetting + push1 + push0 + self $6 + bnot + ret + +WorldEgo::handleEvent: + link $6 + pushi $2b ; 43, '+', type + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] + pTos pMode + ldi $2 + and + bnt code_08e8 + ldi $0 + ret + +code_08e8: pToa pMovieCmd + bt code_08f2 + pTos pAffectedLo + ldi $0 + and +code_08f2: bnt code_0900 + pushi $50 ; 80, 'P', claimed + push1 + push1 + lap param[$1] + send $6 + bnot + ldi $1 + ret + +code_0900: lsp param[$0] + ldi $2 + lt? + bt code_0918 + lap param[$2] + not + bt code_0918 + pushi $37d ; 893, servIDEquals + push2 + pushi $ff ; 255, asInteger + dup + lap param[$2] + send $8 + bnot +code_0918: bnt code_09d4 + pushi $b9 ; 185, localize + push1 + push0 + push0 + lag global[$3] + send $4 + bnot + push + lap param[$1] + send $6 + bnot + pushi $eb ; 235, onMe + push1 + lsp param[$1] + self $6 + bnot + bnt code_093d + selfID + sap param[$2] + jmp code_09d4 + +code_093d: ldi $0 + aTop pDirectObject + aTop pIndirectObject + pushi $3a6 ; 934, stopAction + push0 + self $4 + bnot + pushi $31 ; 49, '1', message + push0 + lap param[$1] + send $4 + bnot + push + ldi $33 ; 51, '3', play + eq? + bnt code_097a + pushi $120 ; 288, setBit + push1 + pushi $33 ; 51, '3', play + class VerbArray + send $6 + bnot + pushi $316 ; 790, handleVerb + push2 + pushi $33 ; 51, '3', play + pushi $279 ; 633, pFocusedRoom + push0 + lag global[$30] + send $4 + bnot + push + self $8 + bnot + jmp code_09d4 + +code_097a: lag global[$3] + bnt code_09a3 + push2 + push0 + lap param[$1] + send $4 + bnot + push + pushi $1ae ; 430, horizon + push0 + lag global[$3] + send $4 + bnot + lt? + bnt code_09a3 + push2 + push1 + pushi $1ae ; 430, horizon + push0 + lag global[$3] + send $4 + bnot + push + lap param[$1] + send $6 + bnot +code_09a3: pushi $120 ; 288, setBit + push1 + push1 + class VerbArray + send $6 + bnot + pushi $316 ; 790, handleVerb + pushi $3 ; z + push1 + push1 + push0 + lap param[$1] + send $4 + bnot + push + push2 + push0 + lap param[$1] + send $4 + bnot + push + self $a + bnot + pushi $50 ; 80, 'P', claimed + push1 + push1 + lap param[$1] + send $6 + bnot + ldi $1 + ret + +code_09d4: lsp param[$0] + ldi $2 + lt? + bnt code_09f6 + pushi $eb ; 235, onMe + push1 + lsp param[$1] + self $6 + bnot + bnt code_09eb + selfID + sap param[$2] + jmp code_09f6 + +code_09eb: pushi $c8 ; 200, handleEvent + push1 + lsp param[$1] + super WorldActor, $6 + bnot + ret + +code_09f6: lst temp[$0] + ldi $4000 ; 16384 + and + bnt code_0e56 + pushi $50 ; 80, 'P', claimed + push1 + push1 + lap param[$1] + send $6 + bnot + pushi $31 ; 49, '1', message + push0 + lap param[$1] + send $4 + bnot + aTop pLastVerb + pushi $31 ; 49, '1', message + push0 + lap param[$1] + send $4 + bnot + push + dup + ldi $3a ; 58, ':', b_i1 + eq? + bnt code_0a66 + pushi $3a6 ; 934, stopAction + push0 + self $4 + bnot + pushi $a3 ; 163, contains + push1 + lsp param[$1] + push0 + push0 + lag global[$3] + send $4 + bnot + send $6 + bnot + bnt code_0e53 + pushi $120 ; 288, setBit + push1 + pushi $3a ; 58, ':', b_i1 + class VerbArray + send $6 + bnot + pushi $316 ; 790, handleVerb + pushi $3 ; z + pushi $3a ; 58, ':', b_i1 + push1 + push0 + lap param[$1] + send $4 + bnot + push + push2 + push0 + lap param[$1] + send $4 + bnot + push + self $a + bnot + jmp code_0e53 + +code_0a66: dup + ldi $1b ; 27, illegalBits + eq? + bnt code_0b79 + pushi $3a6 ; 934, stopAction + push0 + self $4 + bnot + pushi $eb ; 235, onMe + push1 + lsp param[$1] + lap param[$2] + send $6 + bnot + bnt code_0e53 + pushi $97 ; 151, isKindOf + push1 + class WorldActor + push + lap param[$2] + send $6 + bnot + bnt code_0e53 + pTos pMode + ldi $2 + and + bnt code_0e53 + pushi $2fb ; 763, pCombatGroup + push0 + self $4 + bnot + bnt code_0e53 + pushi $2fb ; 763, pCombatGroup + push0 + lap param[$2] + send $4 + bnot + bnt code_0e53 + pushi $4cc ; 1228, pFriend + push0 + lap param[$2] + send $4 + bnot + not + bnt code_0e53 + lap param[$2] + aTop pDirectObject + ldi $0 + aTop pIndirectObject + push1 + pushi $40f ; 1039, pWeapon + push0 + self $4 + bnot + push + calle export60000_0, $2 + bnot + bnt code_0b15 + pushi $97 ; 151, isKindOf + push1 + class BWeapon + push + pushi $40f ; 1039, pWeapon + push0 + self $4 + bnot + send $6 + bnot + bnt code_0b15 + pushi $4e3 ; 1251, pDamageType + push0 + pushi $40f ; 1039, pWeapon + push0 + self $4 + bnot + send $4 + bnot + push + ldi $3 ; z + eq? + bnt code_0b15 + pushi $120 ; 288, setBit + push1 + pushi $1b ; 27, illegalBits + class VerbArray + send $6 + bnot + pushi $316 ; 790, handleVerb + push1 + pushi $1b ; 27, illegalBits + self $6 + bnot + jmp code_0e53 + +code_0b15: pushi $4 ; scaleX + pushi $43b ; 1083, pCombatX + push0 + lap param[$2] + send $4 + bnot + push + pushi $43c ; 1084, pCombatY + push0 + lap param[$2] + send $4 + bnot + push + pushi $43b ; 1083, pCombatX + push0 + self $4 + bnot + push + pushi $43c ; 1084, pCombatY + push0 + self $4 + bnot + push + callk kernel_64, $8 + bnot + push + ldi $1 + eq? + bnt code_0b5d + pushi $120 ; 288, setBit + push1 + pushi $1b ; 27, illegalBits + class VerbArray + send $6 + bnot + pushi $316 ; 790, handleVerb + push1 + pushi $1b ; 27, illegalBits + self $6 + bnot + jmp code_0e53 + +code_0b5d: pushi $d0 ; 208, with + push1 + lofsa string_054c ; "You are too far away to attack.\n" + push + class Str + send $6 + bnot + sat temp[$4] + pushi $9f ; 159, add + push1 + push + lag global[$9c] + send $6 + bnot + jmp code_0e53 + +code_0b79: dup + ldi $2 + eq? + bnt code_0db4 + pTos pTargetting + ldi $1 + eq? + bnt code_0bd6 + push1 + lsp param[$2] + calle export60000_0, $2 + bnot + not + bt code_0bb1 + pushi $99 ; 153, respondsTo + push1 + pushi $37d ; 893, servIDEquals + lap param[$2] + send $6 + bnot + not + bt code_0bb1 + pushi $37d ; 893, servIDEquals + push2 + pushi $ff ; 255, asInteger + dup + lap param[$2] + send $8 + bnot +code_0bb1: bnt code_0bd6 + pushi $3a6 ; 934, stopAction + push0 + self $4 + bnot + pushi $d0 ; 208, with + push1 + lofsa string_056d ; "That is not a valid target.\n" + push + class Str + send $6 + bnot + sat temp[$4] + pushi $9f ; 159, add + push1 + push + lag global[$9c] + send $6 + bnot + jmp code_0e53 + +code_0bd6: pTos pTargetting + ldi $2 + eq? + bnt code_0c5f + push1 + lsp param[$2] + calle export60000_0, $2 + bnot + bnt code_0c5f + pushi $eb ; 235, onMe + push1 + lsp param[$1] + lap param[$2] + send $6 + bnot + bnt code_0c5f + pushi $97 ; 151, isKindOf + push1 + class WorldActor + push + lap param[$2] + send $6 + bnot + bnt code_0c5f + pTos pMode + ldi $2 + and + bnt code_0c5f + pushi $2fb ; 763, pCombatGroup + push0 + self $4 + bnot + bnt code_0c5f + pushi $2fb ; 763, pCombatGroup + push0 + lap param[$2] + send $4 + bnot + bnt code_0c5f + pushi $43c ; 1084, pCombatY + push0 + lap param[$2] + send $4 + bnot + push + ldi $18 ; 24, lsRight + mul + push + pushi $43b ; 1083, pCombatX + push0 + lap param[$2] + send $4 + bnot + add + sat temp[$5] + push + ldi $1b0 ; 432, prevDir + lt? + bnt code_0e53 + lst temp[$5] + ldi $0 + ge? + bnt code_0e53 + lat temp[$5] + sag global[$dd] + aTop pDirectObject + pushi $45c ; 1116, stopTargetting + push0 + self $4 + bnot + jmp code_0e53 + +code_0c5f: pTos pTargetting + ldi $1 + eq? + bnt code_0cce + push1 + lsp param[$2] + calle export60000_0, $2 + bnot + bnt code_0cce + pushi $eb ; 235, onMe + push1 + lsp param[$1] + lap param[$2] + send $6 + bnot + bt code_0cb0 + pushi $97 ; 151, isKindOf + push1 + class WorldObject + push + lap param[$2] + send $6 + bnot + bnt code_0cce + pushi $35c ; 860, getBase + push1 + class BCarryable + push + lap param[$2] + send $6 + bnot + sat temp[$2] + bnt code_0cce + pushi $eb ; 235, onMe + push1 + lsp param[$1] + pushi $4b0 ; 1200, pContainerButton + push0 + send $4 + bnot + send $6 + bnot +code_0cb0: bnt code_0cce + pushi $99 ; 153, respondsTo + push1 + pushi $37d ; 893, servIDEquals + lap param[$2] + send $6 + bnot + bnt code_0cce + lap param[$2] + aTop pDirectObject + pushi $45c ; 1116, stopTargetting + push0 + self $4 + bnot + jmp code_0e53 + +code_0cce: pushi $32d ; 813, pObj + push0 + class WDragger + send $4 + bnot + bnt code_0d3e + pushi $3a6 ; 934, stopAction + push0 + self $4 + bnot + lap param[$2] + aTop pDirectObject + push + pushi $32d ; 813, pObj + push0 + class WDragger + send $4 + bnot + eq? + bnt code_0d03 + ldi $0 + aTop pIndirectObject + pushi $38a ; 906, getVerb + push1 + pushSelf + lap param[$2] + send $6 + bnot + jmp code_0e53 + +code_0d03: lsp param[$2] + selfID + eq? + bnt code_0d25 + pushi $32d ; 813, pObj + push0 + class WDragger + send $4 + bnot + aTop pDirectObject + ldi $0 + aTop pIndirectObject + pushi $38a ; 906, getVerb + push1 + pushSelf + pToa pDirectObject + send $6 + bnot + jmp code_0e53 + +code_0d25: pushi $32d ; 813, pObj + push0 + class WDragger + send $4 + bnot + aTop pIndirectObject + pushi $38a ; 906, getVerb + push1 + pTos pIndirectObject + lap param[$2] + send $6 + bnot + jmp code_0e53 + +code_0d3e: pushi $381 ; 897, pMode + push0 + lag global[$1] + send $4 + bnot + push + ldi $2 + and + not + bnt code_0d8a + pushi $48 ; 72, 'H', modifiers + push0 + lap param[$1] + send $4 + bnot + not + bnt code_0d8a + pushi $97 ; 151, isKindOf + push1 + class WorldObject + push + lap param[$2] + send $6 + bnot + bnt code_0d8a + pushi $35c ; 860, getBase + push1 + class BCarryable + push + lap param[$2] + send $6 + bnot + bnt code_0d8a + pushi $3a6 ; 934, stopAction + push0 + self $4 + bnot + pushi $358 ; 856, startDragging + push1 + lsp param[$2] + class WDragger + send $6 + bnot + jmp code_0e53 + +code_0d8a: pushi $eb ; 235, onMe + push1 + lsp param[$1] + lap param[$2] + send $6 + bnot + bnt code_0e53 + pushi $3a6 ; 934, stopAction + push0 + self $4 + bnot + lap param[$2] + aTop pDirectObject + ldi $0 + aTop pIndirectObject + pushi $38a ; 906, getVerb + push1 + pushSelf + lap param[$2] + send $6 + bnot + jmp code_0e53 + +code_0db4: dup + ldi $4b ; 75, 'K', at + eq? + bnt code_0de5 + pushi $99 ; 153, respondsTo + push1 + pushi $2f6 ; 758, zoom + lap param[$2] + send $6 + bnot + bnt code_0e53 + pushi $2f6 ; 758, zoom + push2 + push1 + push0 + lap param[$1] + send $4 + bnot + push + push2 + push0 + lap param[$1] + send $4 + bnot + push + lap param[$2] + send $8 + bnot + jmp code_0e53 + +code_0de5: dup + ldi $4c ; 76, 'L', next + eq? + bnt code_0e06 + pushi $99 ; 153, respondsTo + push1 + pushi $2f7 ; 759, unzoom + lap param[$2] + send $6 + bnot + bnt code_0e53 + pushi $2f7 ; 759, unzoom + push0 + lap param[$2] + send $4 + bnot + jmp code_0e53 + +code_0e06: dup + ldi $33 ; 51, '3', play + eq? + bnt code_0e3a + pushi $3a6 ; 934, stopAction + push0 + self $4 + bnot + ldi $0 + aTop pDirectObject + aTop pIndirectObject + pushi $120 ; 288, setBit + push1 + pushi $33 ; 51, '3', play + class VerbArray + send $6 + bnot + pushi $316 ; 790, handleVerb + push2 + pushi $33 ; 51, '3', play + pushi $279 ; 633, pFocusedRoom + push0 + lag global[$30] + send $4 + bnot + push + self $8 + bnot + jmp code_0e53 + +code_0e3a: pushi $50 ; 80, 'P', claimed + push1 + pushi $316 ; 790, handleVerb + push1 + pushi $31 ; 49, '1', message + push0 + lap param[$1] + send $4 + bnot + push + self $6 + bnot + push + lap param[$1] + send $6 + bnot +code_0e53: toss + jmp code_0e60 + +code_0e56: pushi $c8 ; 200, handleEvent + push1 + lsp param[$1] + super WorldActor, $6 + bnot +code_0e60: pushi $50 ; 80, 'P', claimed + push0 + lap param[$1] + send $4 + bnot + ret + +WorldEgo::handleVerb: + link $1 + push1 + pTos pDirectObject + calle export60000_0, $2 + bnot + bnt code_0e97 + pushi $97 ; 151, isKindOf + push1 + class ContainerDisplay + push + pToa pDirectObject + send $6 + bnot + bnt code_0e97 + pushi $365 ; 869, pSelf + push0 + pushi $4b4 ; 1204, pContainer + push0 + pToa pDirectObject + send $4 + bnot + send $4 + bnot + aTop pDirectObject +code_0e97: push1 + pTos pIndirectObject + calle export60000_0, $2 + bnot + bnt code_0ec3 + pushi $97 ; 151, isKindOf + push1 + class ContainerDisplay + push + pToa pIndirectObject + send $6 + bnot + bnt code_0ec3 + pushi $365 ; 869, pSelf + push0 + pushi $4b4 ; 1204, pContainer + push0 + pToa pIndirectObject + send $4 + bnot + send $4 + bnot + aTop pIndirectObject +code_0ec3: lsp param[$0] + ldi $1 + gt? + bnt code_0ed0 + lap param[$2] + sat temp[$0] + jmp code_0ed4 + +code_0ed0: ldi $0 + sat temp[$0] +code_0ed4: pToa pDirectObject + bnt code_0ef9 + lsp param[$1] + ldi $2 + eq? + bnt code_0ef9 + pushi $39b ; 923, goto + push2 + push1 + push0 + pToa pDirectObject + send $4 + bnot + push + push2 + push0 + pToa pDirectObject + send $4 + bnot + push + self $8 + bnot + ldi $1 + ret + +code_0ef9: lsp param[$1] + ldi $0 + ne? + bnt code_0f12 + pushi $123 ; 291, getBit + push1 + lsp param[$1] + class VerbArray + send $6 + bnot + not + bnt code_0f12 + ldi $0 + ret + +code_0f12: pushi $316 ; 790, handleVerb + push1 + lsp param[$1] + &rest $2 + super WorldActor, $6 + bnot + ret + +WorldEgo::showContents: + pushi $488 ; 1160, showInventoryPanel + push0 + lag global[$6] + send $4 + bnot + pushi $3a4 ; 932, showContents + push2 + pushi $16e ; 366, dynamic + pushi $16b ; 363, clip + super WorldActor, $8 + bnot + ret + +WorldEgo::setMode: + pushi $3ba ; 954, setMode + push1 + lsp param[$1] + &rest $2 + super WorldActor, $6 + bnot + pushi $487 ; 1159, replaceIcons + push2 + lsp param[$1] + push0 + lag global[$6] + send $8 + bnot + ret + +WorldEgo::clearMode: + pushi $3bb ; 955, clearMode + push1 + lsp param[$1] + &rest $2 + super WorldActor, $6 + bnot + pushi $487 ; 1159, replaceIcons + push2 + pTos pMode + push0 + lag global[$6] + send $8 + bnot + ret + +WorldEgo::restoreMode: + pushi $3bd ; 957, restoreMode + push0 + super WorldActor, $4 + bnot + pushi $487 ; 1159, replaceIcons + push2 + pTos pMode + push0 + lag global[$6] + send $8 + bnot + ret + +WorldEgo::isWizard: + lsg global[$d1] + ldi $64 ; 100, 'd', moveDone + eq? + ret + +WorldEgo::see: + pushi $c2 ; 194, register + push1 + pushSelf + pushi $94 ; 148, init + push0 + pushi $8d ; 141, new + push0 + lofsa LookAtCharacter + send $4 + bnot + send $a + bnot + ret + +WorldEgo::doit: + link $1 + pushi $45 ; 69, 'E', doit + push0 + &rest $1 + super WorldActor, $4 + bnot + pushi $271 ; 625, handsLevel + push0 + lag global[$2] + send $4 + bnot + bt code_0fb7 + pToa script + bt code_0fb7 + pToa pMovieCmd +code_0fb7: bnt code_0fba + ret + +code_0fba: pushi $625 ; 1573, getNextVerb + push0 + class + send $4 + bnot + bnt code_1003 + pushi $624 ; 1572, pVerbID + push0 + class + send $4 + bnot + sat temp[$0] + pushi $120 ; 288, setBit + push1 + push + class VerbArray + send $6 + bnot + pushi $31e ; 798, pDirectObject + push0 + class + send $4 + bnot + aTop pDirectObject + pushi $3e3 ; 995, pIndirectObject + push0 + class + send $4 + bnot + aTop pIndirectObject + pushi $316 ; 790, handleVerb + push2 + lst temp[$0] + lofsa HandsOnCode + push + self $8 + bnot +code_1003: ret + +WorldEgo::setPassword: + pushi $3a6 ; 934, stopAction + push0 + lag global[$1] + send $4 + bnot + pushi $31e ; 798, pDirectObject + push1 + lsg global[$1] + lag global[$1] + send $6 + bnot + pushi $c9 ; 201, setScript + push2 + pushi $8d ; 141, new + push0 + class WANetNewPassScript + send $4 + bnot + push + pushSelf + lag global[$1] + send $8 + bnot + ret + +LookAtCharacter::changeState: + link $3 + lap param[$1] + aTop state + push + dup + ldi $0 + eq? + bnt code_1061 + pushi $277 ; 631, controlOff + push0 + lag global[$2] + send $4 + bnot + pushi $8d ; 141, new + push0 + class Str + send $4 + bnot + aTop scratch + pushi $50e ; 1294, getBiography + pushi $3 ; z + pTos register + pTos scratch + pushSelf + lag global[$6a] + send $a + bnot + jmp code_10cc + +code_1061: dup + ldi $1 + eq? + bnt code_108b + pushi $4ca ; 1226, setBiography + push1 + pTos scratch + pushi $35c ; 860, getBase + push1 + class BCharacter + push + pToa register + send $6 + bnot + send $6 + bnot + pushi $549 ; 1353, getExtendedProps + push2 + pTos register + pushSelf + lag global[$6a] + send $8 + bnot + jmp code_10cc + +code_108b: dup + ldi $2 + eq? + bnt code_10b6 + push1 + pTos scratch + calle export60000_0, $2 + bnot + bnt code_10a6 + pushi $95 ; 149, dispose + push0 + pToa scratch + send $4 + bnot +code_10a6: pushi $45 ; 69, 'E', doit + push1 + pTos register + class CreateLookDialog + send $6 + bnot + ldi $1 + aTop cycles + jmp code_10cc + +code_10b6: dup + ldi $3 ; z + eq? + bnt code_10cc + pushi $278 ; 632, controlOn + push0 + lag global[$2] + send $4 + bnot + pushi $95 ; 149, dispose + push0 + self $4 + bnot +code_10cc: toss + ret + diff --git a/Script/Script40005.txt b/Script/Script40005.txt new file mode 100644 index 0000000..d9cc0ee --- /dev/null +++ b/Script/Script40005.txt @@ -0,0 +1,8074 @@ +export40005_0 = catchUpOnMessages +export40005_1 = code_086a +export40005_2 = code_08b8 + +GPolyBitmap::init: + link $e + ret + + pToa bitmap + bnt code_047f + pushi $9f ; 159, add + push1 + push + lag global[$66] + send $6 + bnot + ldi $0 + aTop bitmap +code_047f: pushi $5 ; scaleY + push0 + pushi $280 ; 640, disposeWhenDone + pushi $1e0 ; 480, isControl + push0 + push0 + callk kernel_35, $a + bnot + aTop bitmap + lap param[$0] + bnt code_04a1 + pushi $16d ; 365, obstacles + push0 + lap param[$1] + send $4 + bnot + sat temp[$1] + jmp code_04b3 + +code_04a1: pushi $16d ; 365, obstacles + push0 + pushi $c5 ; 197, pRoom + push0 + lag global[$1] + send $4 + bnot + send $4 + bnot + sat temp[$1] +code_04b3: lat temp[$1] + not + bnt code_04b9 + ret + +code_04b9: pushi $5a ; 90, 'Z', size + push0 + lat temp[$1] + send $4 + bnot + sat temp[$2] + ldi $0 + sat temp[$0] +code_04c7: lst temp[$0] + lat temp[$2] + lt? + bnt code_0651 + pushi $4b ; 75, 'K', at + push1 + lst temp[$0] + lat temp[$1] + send $6 + bnot + sat temp[$3] + pushi $5b ; 91, '[', points + push0 + send $4 + bnot + sat temp[$4] + pushi $5a ; 90, 'Z', size + push0 + lat temp[$3] + send $4 + bnot + sat temp[$5] + pushi $4b ; 75, 'K', at + push1 + push0 + lat temp[$4] + send $6 + bnot + sat temp[$7] + pushi $4b ; 75, 'K', at + push1 + push1 + lat temp[$4] + send $6 + bnot + sat temp[$8] + lat temp[$7] + sat temp[$a] + lat temp[$8] + sat temp[$b] + pushi $2b ; 43, '+', type + push0 + lat temp[$3] + send $4 + bnot + push + ldi $4 ; scaleX + gt? + bnt code_051f + ldi $3f ; 63, '?', xStep + sat temp[$c] + jmp code_0523 + +code_051f: ldi $2b ; 43, '+', type + sat temp[$c] +code_0523: ldi $1 + sat temp[$6] +code_0527: lst temp[$6] + lat temp[$5] + lt? + bnt code_05e1 + pushi $94 ; 148, init + pushi $4 ; scaleX + lst temp[$7] + lst temp[$8] + pushi $4b ; 75, 'K', at + push1 + lst temp[$6] + ldi $2 + mul + push + lat temp[$4] + send $6 + bnot + push + pushi $4b ; 75, 'K', at + push1 + lst temp[$6] + ldi $2 + mul + push + ldi $1 + add + push + lat temp[$4] + send $6 + bnot + push + pushi $8d ; 141, new + push0 + class Line + send $4 + bnot + sat temp[$d] + send $c + bnot + pushi $16b ; 363, clip + push1 + push0 + push0 + lap param[$1] + send $4 + bnot + push + lat temp[$d] + send $6 + bnot + bnt code_05af + pushi $7 ; priority + push2 + pTos bitmap + pushi $167 ; 359, pX1 + push0 + lat temp[$d] + send $4 + bnot + push + pushi $168 ; 360, pY1 + push0 + lat temp[$d] + send $4 + bnot + push + pushi $169 ; 361, pX2 + push0 + lat temp[$d] + send $4 + bnot + push + pushi $16a ; 362, pY2 + push0 + lat temp[$d] + send $4 + bnot + push + lst temp[$c] + callk kernel_35, $e + bnot +code_05af: pushi $95 ; 149, dispose + push0 + lat temp[$d] + send $4 + bnot + pushi $4b ; 75, 'K', at + push1 + lst temp[$6] + ldi $2 + mul + push + lat temp[$4] + send $6 + bnot + sat temp[$7] + pushi $4b ; 75, 'K', at + push1 + lst temp[$6] + ldi $2 + mul + push + ldi $1 + add + push + lat temp[$4] + send $6 + bnot + sat temp[$8] + +at temp[$6] + jmp code_0527 + +code_05e1: pushi $94 ; 148, init + pushi $4 ; scaleX + lst temp[$7] + lst temp[$8] + lst temp[$a] + lst temp[$b] + pushi $8d ; 141, new + push0 + class Line + send $4 + bnot + sat temp[$d] + send $c + bnot + pushi $16b ; 363, clip + push1 + push0 + push0 + lap param[$1] + send $4 + bnot + push + lat temp[$d] + send $6 + bnot + bnt code_0643 + pushi $7 ; priority + push2 + pTos bitmap + pushi $167 ; 359, pX1 + push0 + lat temp[$d] + send $4 + bnot + push + pushi $168 ; 360, pY1 + push0 + lat temp[$d] + send $4 + bnot + push + pushi $169 ; 361, pX2 + push0 + lat temp[$d] + send $4 + bnot + push + pushi $16a ; 362, pY2 + push0 + lat temp[$d] + send $4 + bnot + push + lst temp[$c] + callk kernel_35, $e + bnot +code_0643: pushi $95 ; 149, dispose + push0 + lat temp[$d] + send $4 + bnot + +at temp[$0] + jmp code_04c7 + +code_0651: ldi $1e0 ; 480, isControl + aTop y + aTop z + pushi $94 ; 148, init + push0 + &rest $2 + super View, $4 + bnot + push1 + pushSelf + callk kernel_32, $2 + bnot + ret + +VerbArray::setBit: + link $4 + pToa data + not + bnt code_067e + pushi $3 ; z + push0 + pushi $c8 ; 200, handleEvent + pTos type + callk kernel_91, $6 + bnot + aTop data +code_067e: lsp param[$1] + ldi $8 ; fixPriority + div + sat temp[$0] + push2 + lsp param[$1] + pushi $8 ; fixPriority + calle export60025_1, $4 + bnot + sat temp[$1] + push1 + shl + sat temp[$2] + pushi $4b ; 75, 'K', at + push1 + lst temp[$0] + self $6 + bnot + sat temp[$3] + push + lat temp[$2] + or + sat temp[$3] + pushi $4b ; 75, 'K', at + push2 + lst temp[$0] + push + self $8 + bnot + ret + +VerbArray::getBit: + link $4 + pToa data + not + bnt code_06c6 + pushi $3 ; z + push0 + pushi $c8 ; 200, handleEvent + pTos type + callk kernel_91, $6 + bnot + aTop data +code_06c6: lsp param[$1] + ldi $8 ; fixPriority + div + sat temp[$0] + push2 + lsp param[$1] + pushi $8 ; fixPriority + calle export60025_1, $4 + bnot + sat temp[$1] + push1 + shl + sat temp[$2] + pushi $4b ; 75, 'K', at + push1 + lst temp[$0] + self $6 + bnot + sat temp[$3] + push + lat temp[$2] + and + ret + +VerbArray::clearBit: + link $4 + pToa data + not + bnt code_0703 + pushi $3 ; z + push0 + pushi $c8 ; 200, handleEvent + pTos type + callk kernel_91, $6 + bnot + aTop data +code_0703: lsp param[$1] + ldi $8 ; fixPriority + div + sat temp[$0] + push2 + lsp param[$1] + pushi $8 ; fixPriority + calle export60025_1, $4 + bnot + sat temp[$1] + push1 + shl + sat temp[$2] + push + ldi $ff ; 255, asInteger + xor + sat temp[$2] + pushi $4b ; 75, 'K', at + push1 + lst temp[$0] + self $6 + bnot + sat temp[$3] + push + lat temp[$2] + and + sat temp[$3] + pushi $4b ; 75, 'K', at + push2 + lst temp[$0] + push + self $8 + bnot + ret + +VerbArray::fill: + link $1 + pToa data + sat temp[$0] + pushi $3 ; z + push0 + pushi $c8 ; 200, handleEvent + pTos type + callk kernel_91, $6 + bnot + aTop data + lat temp[$0] + bnt code_075c + push2 + pushi $4 ; scaleX + push + callk kernel_91, $4 + bnot +code_075c: pushi $d6 ; 214, fill + push0 + &rest $1 + super ByteArray, $4 + bnot + ret + +VerbList::add: + link $1 + ldi $0 + sat temp[$0] + pushi $5a ; 90, 'Z', size + push0 + self $4 + bnot + not + bnt code_077e + pToa elements + sat temp[$0] + ldi $0 + aTop elements +code_077e: pushi $120 ; 288, setBit + push1 + lsp param[$1] + class VerbArray + send $6 + bnot + pushi $9f ; 159, add + push1 + lsp param[$1] + super Set, $6 + bnot + lat temp[$0] + bnt code_079f + push2 + push1 + push + callk kernel_90, $4 + bnot +code_079f: ret + +VerbList::release: + pushi $94 ; 148, init + push1 + push0 + class VerbArray + send $6 + bnot + pushi $a6 ; 166, release + push0 + super Set, $4 + bnot + ret + +catchUpOnMessages::doit: + link $a + lag global[$d5] + sat temp[$0] + ldi $0 + sag global[$4f] + push0 + callk kernel_121, $0 + bnot + sat temp[$5] + ldi $1 + sat temp[$9] +code_07c9: lag global[$32] + not + bnt code_0861 + pushi $5a ; 90, 'Z', size + push0 + class MovieCmdList + send $4 + bnot + sat temp[$2] + bnt code_0861 + lat temp[$9] + bnt code_0861 + ldi $0 + sat temp[$1] +code_07e5: lst temp[$1] + lat temp[$2] + lt? + bnt code_084f + pushi $4b ; 75, 'K', at + push1 + lst temp[$1] + class MovieCmdList + send $6 + bnot + sat temp[$3] + pushi $33f ; 831, pClient + push0 + send $4 + bnot + sat temp[$4] + ldi $0 + sat temp[$9] + lat temp[$4] + bnt code_084b + push1 + push + calle export60000_0, $2 + bnot + bnt code_084b + pushi $97 ; 151, isKindOf + push1 + class WorldObject + push + lat temp[$4] + send $6 + bnot + bnt code_0827 + lst temp[$4] + lag global[$1] + ne? +code_0827: bt code_0843 + pushi $97 ; 151, isKindOf + push1 + class LongInt + push + lat temp[$4] + send $6 + bnot + bnt code_084b + pushi $37d ; 893, servIDEquals + push1 + lst temp[$4] + lag global[$1] + send $6 + bnot + not +code_0843: bnt code_084b + ldi $1 + sat temp[$9] + jmp code_084f + +code_084b: +at temp[$1] + jmp code_07e5 + +code_084f: lat temp[$9] + not + bnt code_0856 + jmp code_0861 + +code_0856: pushi $45 ; 69, 'E', doit + push0 + lag global[$2] + send $4 + bnot + jmp code_07c9 + +code_0861: ldi $1 + sag global[$4f] + lat temp[$0] + sag global[$d5] +code_0869: ret + +; export40005_1 +code_086a: lal local[$0] + not + bnt code_08b5 + pushi $9f ; 159, add + push2 + pushi $fe ; 254, strIndex + pushi $4b ; 75, 'K', at + class Remaps + send $8 + bnot + pushi $9f ; 159, add + push2 + pushi $f0 ; 240, drawSelected + pushi $32 ; 50, '2', edit + class Remaps + send $8 + bnot + pushi $9f ; 159, add + push2 + pushi $f1 ; 241, scale + pushi $41 ; 65, 'A', moveSpeed + class Remaps + send $8 + bnot + pushi $9f ; 159, add + push2 + pushi $f2 ; 242, pCast + pushi $50 ; 80, 'P', claimed + class Remaps + send $8 + bnot + pushi $9f ; 159, add + push2 + pushi $f3 ; 243, nextEvent + pushi $5f ; 95, '_', min + class Remaps + send $8 + bnot +code_08b5: +al local[$0] +code_08b7: ret + +; export40005_2 +code_08b8: -al local[$0] + not + bnt code_08f4 + pushi $58 ; 88, 'X', delete + push1 + pushi $fe ; 254, strIndex + class Remaps + send $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pushi $f0 ; 240, drawSelected + class Remaps + send $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pushi $f1 ; 241, scale + class Remaps + send $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pushi $f2 ; 242, pCast + class Remaps + send $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pushi $f3 ; 243, nextEvent + class Remaps + send $6 + bnot +code_08f4: ret + +WorldObject::init: + ldi $0 + aTop pAffectedLo + aTop pAffectedHi + pTos pBaseView + ldi $ff ; 255, asInteger + eq? + bnt code_0906 + pToa view + aTop pBaseView +code_0906: pTos pBaseView + ldi $ff ; 255, asInteger + ne? + bnt code_0914 + pTos pBaseView + pToa pAction + add + aTop view +code_0914: ldi $5 ; scaleY + aTop approachX + aTop approachY + pToa pMover + not + bnt code_0923 + class MoveTo + aTop pMover +code_0923: pushi $373 ; 883, setAction + push1 + pTos pAction + pushi $3c8 ; 968, matchScaler + push1 + lsg global[$3] + self $c + bnot + pushi $94 ; 148, init + push0 + &rest $1 + super Act, $4 + bnot + pushi $389 ; 905, buildBaseList + push0 + pushi $19d ; 413, setSignal + push1 + pushi $1000 ; 4096, -objID- + pushi $3ae ; 942, setColor + push1 + pTos pColor + pushi $3c2 ; 962, generatePolygon + push0 + pushi $3c3 ; 963, submitPolygon + push0 + self $18 + bnot + pushi $35c ; 860, getBase + push1 + class BCarryable + push + self $6 + bnot + bt code_0972 + pushi $97 ; 151, isKindOf + push1 + class WorldActor + push + self $6 + bnot + bt code_0972 + pToa pClutStart +code_0972: aTop pBitmapBased + lag global[$f3] + not + bnt code_0996 + pToa pName + bnt code_0996 + push1 + push + calle export60000_0, $2 + bnot + not + bnt code_0996 + pushi $d0 ; 208, with + push1 + pTos pName + class Str + send $6 + bnot + aTop pName +code_0996: ret + +WorldObject::dispose: + link $7 + push2 + push2 + pushSelf + callk kernel_158, $4 + bnot + pushi $3 ; z + pushi $12 ; 18, nsLeft + push1 + pushSelf + callk kernel_118, $6 + bnot + push1 + pTos pMovieCmd + calle export60000_0, $2 + bnot + bnt code_09fb + pushi $97 ; 151, isKindOf + push1 + class MovieCmd + push + pToa pMovieCmd + send $6 + bnot + bnt code_09fb + pushi $418 ; 1048, pCmd + push0 + pToa pMovieCmd + send $4 + bnot + push + ldi $2710 ; 10000 + ne? + bnt code_09fb + pushi $418 ; 1048, pCmd + push0 + pToa pMovieCmd + send $4 + bnot + push + ldi $3e ; 62, '>', b_incr + ne? + bnt code_09fb + pushi $5 ; scaleY + lofsa string_02a2 ; "%s(0x%x) is being disposed while a movie command is active on it.\n" + push + pTos pName + pushSelf + pushi $20 ; 32, ' ', name + push0 + pToa pMovieCmd + send $4 + bnot + push + pTos pMovieCmd + callk kernel_132, $a + bnot +code_09fb: pushi $9d ; 157, eachElementDo + pushi $3 ; z + pushi $9c ; 156, handleError + class DisposeNotifyList + push + pushSelf + class DisposeNotifyList + send $a + bnot + lag global[$1] + bnt code_0a54 + pushi $c3 ; 195, script + push0 + send $4 + bnot + bnt code_0a54 + pushi $97 ; 151, isKindOf + push1 + class WANetScript + push + pushi $c3 ; 195, script + push0 + lag global[$1] + send $4 + bnot + send $6 + bnot + bnt code_0a54 + pushi $31e ; 798, pDirectObject + push0 + lag global[$1] + send $4 + bnot + push + selfID + eq? + bt code_0a49 + pushi $3e3 ; 995, pIndirectObject + push0 + lag global[$1] + send $4 + bnot + push + selfID + eq? +code_0a49: bnt code_0a54 + pushi $3a6 ; 934, stopAction + push0 + lag global[$1] + send $4 + bnot +code_0a54: push1 + pTos pInvisibleClut + calle export60000_0, $2 + bnot + bnt code_0a85 + pushi $97 ; 151, isKindOf + push1 + class Clut + push + pToa pInvisibleClut + send $6 + bnot + bnt code_0a85 + pushi $95 ; 149, dispose + push0 + pToa pInvisibleClut + send $4 + bnot + ldi $0 + aTop pInvisibleClut + push0 + call code_08b7, $0 + bnot +code_0a85: push1 + pTos pFrozenClut + calle export60000_0, $2 + bnot + bnt code_0ab0 + pushi $97 ; 151, isKindOf + push1 + class Clut + push + pToa pFrozenClut + send $6 + bnot + bnt code_0ab0 + pushi $95 ; 149, dispose + push0 + pToa pFrozenClut + send $4 + bnot + ldi $0 + aTop pFrozenClut +code_0ab0: push1 + pTos clut + calle export60000_0, $2 + bnot + bnt code_0ad7 + pushi $97 ; 151, isKindOf + push1 + class Clut + push + pToa clut + send $6 + bnot + bnt code_0ad7 + pushi $95 ; 149, dispose + push0 + pToa clut + send $4 + bnot + ldi $0 + aTop clut +code_0ad7: pushi $3c6 ; 966, deleteFromRoom + push0 + self $4 + bnot + ldi $0 + sat temp[$3] +code_0ae2: lst temp[$3] + pushi $5a ; 90, 'Z', size + push0 + class gDialogList + send $4 + bnot + lt? + bnt code_0b3f + pushi $4b ; 75, 'K', at + push1 + lst temp[$3] + class gDialogList + send $6 + bnot + sat temp[$6] + push1 + push + calle export60000_0, $2 + bnot + bnt code_0b3b + pushi $97 ; 151, isKindOf + push1 + class VerbDialog + push + lat temp[$6] + send $6 + bnot + bnt code_0b3b + pushi $142 ; 322, pObject + push0 + lat temp[$6] + send $4 + bnot + push + selfID + eq? + bnt code_0b3b + pushi $58 ; 88, 'X', delete + push1 + lst temp[$6] + class gDialogList + send $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$6] + send $4 + bnot + jmp code_0b3f + +code_0b3b: +at temp[$3] + jmp code_0ae2 + +code_0b3f: pushi $32d ; 813, pObj + push0 + class WDragger + send $4 + bnot + push + selfID + eq? + bnt code_0b56 + pushi $359 ; 857, stopDragging + push0 + class WDragger + send $4 + bnot +code_0b56: pToa pBaseList + bnt code_0b66 + pushi $3 ; z + pushi $13 ; 19, nsTop + push + pushi $36e ; 878, preDispose + callk kernel_90, $6 + bnot +code_0b66: pushi $3dc ; 988, deleteFromServer + push0 + self $4 + bnot + pToa pBaseList + bnt code_0bd8 + push1 + push0 + callk kernel_90, $2 + bnot + sat temp[$1] + ldi $0 + sat temp[$3] +code_0b7e: lst temp[$3] + push2 + pushi $17 ; 23, lsTop + pTos pBaseList + callk kernel_90, $4 + bnot + lt? + bnt code_0ba7 + pushi $3 ; z + pushi $b ; 11, inRight + lst temp[$1] + pushi $3 ; z + pushi $11 ; 17, bitmap + pTos pBaseList + lst temp[$3] + callk kernel_90, $6 + bnot + push + callk kernel_90, $6 + bnot + +at temp[$3] + jmp code_0b7e + +code_0ba7: push2 + push1 + pTos pBaseList + callk kernel_90, $4 + bnot + push1 + push0 + callk kernel_90, $2 + bnot + aTop pBaseList + pushi $3 ; z + pushi $13 ; 19, nsTop + lst temp[$1] + pushi $95 ; 149, dispose + callk kernel_90, $6 + bnot + push2 + push1 + lst temp[$1] + callk kernel_90, $4 + bnot + push2 + push1 + pTos pBaseList + callk kernel_90, $4 + bnot + ldi $0 + aTop pBaseList +code_0bd8: pToa pUpdatorList + bnt code_0beb + pushi $a6 ; 166, release + push0 + pushi $95 ; 149, dispose + push0 + send $8 + bnot + ldi $0 + aTop pUpdatorList +code_0beb: pToa pOutgoingMovie + bnt code_0bfa + pushi $95 ; 149, dispose + push0 + send $4 + bnot + ldi $0 + aTop pOutgoingMovie +code_0bfa: pushi $3b0 ; 944, disposeBitmap + push0 + self $4 + bnot + pushi $3c4 ; 964, removePolygon + push0 + self $4 + bnot + pToa pPolygon + bnt code_0c24 + push + ldi $ff ; 255, asInteger + ne? + bnt code_0c24 + pushi $16f ; 367, pDispose + push1 + push1 + pushi $95 ; 149, dispose + push0 + pToa pPolygon + send $a + bnot + ldi $0 + aTop pPolygon +code_0c24: pToa pValue + bnt code_0c33 + pushi $95 ; 149, dispose + push0 + send $4 + bnot + ldi $0 + aTop pValue +code_0c33: pToa pManaValue + bnt code_0c42 + pushi $95 ; 149, dispose + push0 + send $4 + bnot + ldi $0 + aTop pManaValue +code_0c42: pushi $3df ; 991, setServID + push2 + pushi $ff ; 255, asInteger + dup + self $8 + bnot + pToa pCombatGroup + bnt code_0c5d + pushi $95 ; 149, dispose + push0 + send $4 + bnot + ldi $0 + aTop pCombatGroup +code_0c5d: pushi $38c ; 908, setMessage + push1 + push0 + self $6 + bnot + pushi $3db ; 987, setName + push1 + push0 + self $6 + bnot + pToa pAffectedHi + bnt code_0c7c + pushi $95 ; 149, dispose + push0 + send $4 + bnot + ldi $0 + aTop pAffectedHi +code_0c7c: pushi $95 ; 149, dispose + push0 + &rest $1 + super Act, $4 + bnot + ret + +WorldObject::handleEvent: + pushi $2b ; 43, '+', type + push0 + lap param[$1] + send $4 + bnot + push + ldi $4000 ; 16384 + and + bnt code_0ca3 + pushi $c8 ; 200, handleEvent + push2 + lsp param[$1] + pushSelf + lag global[$1] + send $8 + bnot + ret + +code_0ca3: ldi $0 + ret + +WorldObject::onMe: + pTos pServIDLo + ldi $ff ; 255, asInteger + eq? + bnt code_0cb7 + pTos pServIDHi + ldi $ff ; 255, asInteger + eq? + bnt code_0cb7 + ldi $0 + ret + +code_0cb7: pushi $eb ; 235, onMe + push0 + &rest $1 + super Act, $4 + bnot + ret + +WorldObject::doit: + link $1 + pToa pDispose + bnt code_0cea + pToa pMovieCmd + sat temp[$0] + pushi $95 ; 149, dispose + push0 + self $4 + bnot + push1 + lst temp[$0] + calle export60000_0, $2 + bnot + bnt code_0cf8 + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot + jmp code_0cf8 + +code_0cea: pToa pPaused + not + bnt code_0cf8 + pushi $45 ; 69, 'E', doit + push0 + &rest $1 + super Act, $4 + bnot +code_0cf8: ret + +WorldObject::update: + pToa pMsgStr + bnt code_0d05 + pushi $32e ; 814, follow + push1 + pushSelf + send $6 + bnot +code_0d05: lag global[$64] + not + bnt code_0d12 + pushi $36a ; 874, updateDisplay + push1 + push1 + self $6 + bnot +code_0d12: pushi $1ad ; 429, update + push0 + super Act, $4 + bnot + ret + +WorldObject::getBitmap: + link $1 + pToa pBitmapBased + bnt code_0d2e + pushi $3aa ; 938, createDisplay + push1 + pushi $1d ; 29, brTop + self $6 + bnot + sat temp[$0] + jmp code_0d42 + +code_0d2e: pushi $7 ; priority + pushi $9 ; inLeft + pTos view + pTos loop + pTos cel + pushi $ff ; 255, asInteger + dup + push1 + callk kernel_35, $e + bnot + sat temp[$0] +code_0d42: pushi $9f ; 159, add + push1 + lst temp[$0] + lag global[$66] + send $6 + bnot + lat temp[$0] + ret + +WorldObject::buildVerbList: + link $1 + pushi $a6 ; 166, release + push0 + class VerbList + send $4 + bnot + pTos pServIDLo + ldi $ff ; 255, asInteger + eq? + bnt code_0d86 + pTos pServIDHi + ldi $ff ; 255, asInteger + eq? + bnt code_0d86 + pushi $97 ; 151, isKindOf + push1 + class Money + push + self $6 + bnot + not + bnt code_0d86 + pushi $97 ; 151, isKindOf + push1 + class Mana + push + self $6 + bnot + not + bnt code_0d86 + ldi $0 + ret + +code_0d86: pToa pBaseList + bnt code_0e10 + pushi $3 ; z + pushi $13 ; 19, nsTop + push + pushi $366 ; 870, buildVerbList + &rest $1 + callk kernel_90, $6 + bnot + pushi $35b ; 859, getOwner + push0 + self $4 + bnot + push + selfID + ne? + bnt code_0e10 + pushi $54f ; 1359, pFlags + push0 + pushi $c5 ; 197, pRoom + push0 + lag global[$1] + send $4 + bnot + send $4 + bnot + push + ldi $400 ; 1024, pEndurance + and + bnt code_0de5 + pushi $58 ; 88, 'X', delete + push1 + pushi $11 ; 17, bitmap + class VerbList + send $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pushi $12 ; 18, nsLeft + class VerbList + send $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pushi $7 ; priority + class VerbList + send $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pushi $1d ; 29, brTop + class VerbList + send $6 + bnot +code_0de5: pushi $54f ; 1359, pFlags + push0 + pushi $c5 ; 197, pRoom + push0 + lag global[$1] + send $4 + bnot + send $4 + bnot + push + ldi $200 ; 512, bottomValue + and + bnt code_0e10 + pushi $58 ; 88, 'X', delete + push1 + pushi $a ; 10, inTop + class VerbList + send $6 + bnot + pushi $58 ; 88, 'X', delete + push1 + pushi $1d ; 29, brTop + class VerbList + send $6 + bnot +code_0e10: pushi $97 ; 151, isKindOf + push1 + class WorldEgo + push + lap param[$1] + send $6 + bnot + bnt code_0e8a + pushi $9f ; 159, add + push1 + pushi $3 ; z + class VerbList + send $6 + bnot + pushSelf + lag global[$1] + ne? + bnt code_0e54 + pushSelf + pushi $3a7 ; 935, getBaseOwner + push0 + self $4 + bnot + eq? + bnt code_0e54 + pushi $3ec ; 1004, pAction + push0 + lap param[$1] + send $4 + bnot + push + ldi $3 ; z + ne? + bnt code_0e54 + pushi $9f ; 159, add + push1 + push2 + class VerbList + send $6 + bnot +code_0e54: pushi $35c ; 860, getBase + push1 + class BDye + push + self $6 + bnot + sat temp[$0] + bnt code_0e8a + pushi $631 ; 1585, pHairDye + push0 + send $4 + bnot + bnt code_0e8a + pushi $3a9 ; 937, isOwnedBy + push1 + lsg global[$1] + self $6 + bnot + bnt code_0e8a + lsg global[$1] + lap param[$1] + eq? + bnt code_0e8a + pushi $9f ; 159, add + push1 + pushi $2b8e ; 11150 + class VerbList + send $6 + bnot +code_0e8a: ret + +WorldObject::handleVerb: + ldi $0 + ret + +WorldObject::getVerb: + pushi $366 ; 870, buildVerbList + push1 + lsp param[$1] + self $6 + bnot + pushi $5a ; 90, 'Z', size + push0 + class VerbList + send $4 + bnot + not + bnt code_0ea3 + ret + +code_0ea3: pushi $8d ; 141, new + push2 + class VerbList + push + pushSelf + class VerbDialog + send $8 + bnot + ret + +WorldObject::cue: + pToa pMsgStr + bnt code_0eb9 + ldi $0 + aTop pMsgStr +code_0eb9: ret + +WorldObject::setMessage: + link $1 + lag global[$1] + not + bt code_0ed9 + pushi $17c ; 380, isNotHidden + push0 + self $4 + bnot + not + bt code_0ed9 + push0 + push0 + self $4 + bnot + push + push0 + push0 + lag global[$1] + send $4 + bnot + ne? +code_0ed9: bnt code_0ef1 + push1 + lsp param[$1] + calle export60000_0, $2 + bnot + bnt code_0ef0 + pushi $95 ; 149, dispose + push0 + lap param[$1] + send $4 + bnot +code_0ef0: ret + +code_0ef1: pToa pMsgStr + bnt code_0f18 + push1 + push + calle export60000_0, $2 + bnot + bnt code_0f18 + pushi $97 ; 151, isKindOf + push1 + class ShadowText + push + pToa pMsgStr + send $6 + bnot + bnt code_0f18 + pushi $95 ; 149, dispose + push0 + pToa pMsgStr + send $4 + bnot +code_0f18: ldi $0 + aTop pMsgStr + lap param[$1] + bnt code_0f9d + push2 + push1 + push2 + pushi $9 ; inLeft + push + callk kernel_91, $4 + bnot + push + callk kernel_92, $4 + bnot + push + ldi $2 + div + sat temp[$0] + push + ldi $3 ; z + lt? + bnt code_0f40 + ldi $3 ; z + sat temp[$0] +code_0f40: lst temp[$0] + ldi $8 ; fixPriority + gt? + bnt code_0f4b + ldi $8 ; fixPriority + sat temp[$0] +code_0f4b: pushi $8d ; 141, new + push0 + class ShadowText + send $4 + bnot + aTop pMsgStr + lsp param[$0] + ldi $1 + gt? + bnt code_0f67 + pushi $25 ; 37, '%', fore + push1 + lsp param[$2] + pToa pMsgStr + send $6 + bnot +code_0f67: pushi $94 ; 148, init + pushi $4 ; scaleX + lsp param[$1] + push0 + push0 + lst temp[$0] + pushi $df ; 223, centerOn + push1 + pushi $3a7 ; 935, getBaseOwner + push0 + self $4 + bnot + push + pToa pMsgStr + send $12 + bnot + push1 + lsp param[$1] + calle export60000_0, $2 + bnot + bnt code_0f9d + pushi $95 ; 149, dispose + push0 + lap param[$1] + send $4 + bnot + ldi $0 + sap param[$1] +code_0f9d: ret + +WorldObject::perform: + link $6 + ldi $1 + sat temp[$1] + pToa pBaseList + bnt code_1030 + pushi $4 ; scaleX + pushi $14 ; 20, nsRight + push + pushi $367 ; 871, handlesAction + lsp param[$1] + callk kernel_90, $8 + bnot + sat temp[$0] + push2 + pushi $17 ; 23, lsTop + pTos pBaseList + callk kernel_90, $4 + bnot + sat temp[$4] + ldi $0 + sat temp[$5] +code_0fc8: lst temp[$5] + lat temp[$4] + lt? + bnt code_1019 + pushi $3 ; z + pushi $11 ; 17, bitmap + pTos pBaseList + lst temp[$5] + callk kernel_90, $6 + bnot + sat temp[$3] + push + lat temp[$0] + ne? + bnt code_1015 + pushi $99 ; 153, respondsTo + push1 + lsp param[$1] + lat temp[$3] + send $6 + bnot + bnt code_1015 + pushi $367 ; 871, handlesAction + push1 + lsp param[$1] + lat temp[$3] + send $6 + bnot + not + bnt code_1015 + lsp param[$1] + push0 + &rest $2 + lat temp[$3] + send $4 + bnot + sat temp[$1] + push + ldi $1 + ne? + bnt code_1015 + jmp code_1019 + +code_1015: +at temp[$5] + jmp code_0fc8 + +code_1019: lst temp[$1] + dup + ldi $1 + eq? + bnt code_102f + lat temp[$0] + bnt code_102f + lsp param[$1] + push0 + &rest $2 + send $4 + bnot + sat temp[$1] +code_102f: toss +code_1030: lat temp[$1] + ret + +WorldObject::getBase: + pToa pBaseList + bnt code_1046 + pushi $4 ; scaleX + pushi $14 ; 20, nsRight + push + pushi $97 ; 151, isKindOf + lsp param[$1] + callk kernel_90, $8 + bnot + ret + +code_1046: ldi $0 + ret + +WorldObject::getBaseCharacter: + pToa pBaseList + bnt code_105d + pushi $4 ; scaleX + pushi $14 ; 20, nsRight + push + pushi $97 ; 151, isKindOf + class BCharacter + push + callk kernel_90, $8 + bnot + ret + +code_105d: ldi $0 + ret + +WorldObject::hasBase: + link $1 + pushi $2bb ; 699, pType + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] + push + ldi $10 ; 16, cel + ge? + bnt code_1083 + lst temp[$0] + ldi $10 ; 16, cel + sub + sat temp[$0] + pTos pBaseBitsHi + push1 + shl + and + ret + + jmp code_108c + +code_1083: pTos pBaseBitsLo + push1 + lat temp[$0] + shl + and + ret + +code_108c: ret + +WorldObject::addBase: + link $2 + pushi $365 ; 869, pSelf + push1 + pushSelf + pushi $315 ; 789, pName + push1 + pushi $315 ; 789, pName + push0 + self $4 + bnot + push + pushi $94 ; 148, init + push0 + &rest $2 + pushi $9a ; 154, yourself + push0 + pushi $8d ; 141, new + push0 + lap param[$1] + send $4 + bnot + send $14 + bnot + sat temp[$0] + pToa pBaseList + not + bnt code_10c5 + push1 + push0 + callk kernel_90, $2 + bnot + aTop pBaseList +code_10c5: pushi $3 ; z + pushi $b ; 11, inRight + pTos pBaseList + lst temp[$0] + callk kernel_90, $6 + bnot + lat temp[$0] + ret + +WorldObject::deleteBase: + link $1 + pushi $35c ; 860, getBase + push1 + lsp param[$1] + self $6 + bnot + sat temp[$0] + bnt code_10f8 + pushi $3 ; z + pushi $10 ; 16, cel + pTos pBaseList + push + callk kernel_90, $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot +code_10f8: lat temp[$0] + ret + +WorldObject::buildBaseList: + ret + +WorldObject::open: + pushi $63 ; 99, 'c', perform + push1 + pushi $248 ; 584, open + self $6 + bnot + ret + +WorldObject::close: + pushi $63 ; 99, 'c', perform + push1 + pushi $253 ; 595, close + self $6 + bnot + ret + +WorldObject::lock: + pushi $63 ; 99, 'c', perform + push2 + pushi $34a ; 842, lock + lsp param[$1] + self $8 + bnot + ret + +WorldObject::unlock: + pushi $63 ; 99, 'c', perform + push2 + pushi $38d ; 909, unlock + lsp param[$1] + self $8 + bnot + ret + +WorldObject::take: + pushi $63 ; 99, 'c', perform + push2 + pushi $38e ; 910, take + lsp param[$1] + self $8 + bnot + ret + +WorldObject::give: + pushi $63 ; 99, 'c', perform + pushi $3 ; z + pushi $38f ; 911, give + lsp param[$1] + lsp param[$2] + self $a + bnot + ret + +WorldObject::drop: + pushi $63 ; 99, 'c', perform + push2 + pushi $390 ; 912, drop + lsp param[$1] + self $8 + bnot + ret + +WorldObject::see: + link $4 + pushi $63 ; 99, 'c', perform + push1 + pushi $2fd ; 765, see + self $6 + bnot + sat temp[$0] + ret + +WorldObject::look: + link $1 + pushi $63 ; 99, 'c', perform + push2 + pushi $391 ; 913, look + lsp param[$1] + self $8 + bnot + sat temp[$0] + push + ldi $1 + eq? + bnt code_1180 + pushi $2fd ; 765, see + push0 + lap param[$1] + send $4 + bnot + ldi $0 + sat temp[$0] +code_1180: lat temp[$0] + ret + +WorldObject::putOn: + link $1 + pushi $63 ; 99, 'c', perform + push2 + pushi $392 ; 914, putOn + lsp param[$1] + self $8 + bnot + sat temp[$0] + push + ldi $1 + eq? + bnt code_11ba + pushi $3a8 ; 936, owns + push1 + lsp param[$1] + self $6 + bnot + not + bnt code_11ae + pushi $38e ; 910, take + push1 + lsp param[$1] + self $6 + bnot +code_11ae: pushi $393 ; 915, bePutOn + push1 + pushSelf + lap param[$1] + send $6 + bnot + sat temp[$0] +code_11ba: lat temp[$0] + ret + +WorldObject::bePutOn: + pushi $63 ; 99, 'c', perform + push2 + pushi $393 ; 915, bePutOn + lsp param[$1] + self $8 + bnot + ret + +WorldObject::takeOff: + link $1 + pushi $63 ; 99, 'c', perform + push2 + pushi $394 ; 916, takeOff + lsp param[$1] + self $8 + bnot + sat temp[$0] + push + ldi $1 + eq? + bnt code_1205 + push1 + lsp param[$1] + calle export60000_0, $2 + bnot + bnt code_1205 + pushi $97 ; 151, isKindOf + push1 + class WorldObject + push + lap param[$1] + send $6 + bnot + bnt code_1205 + pushi $395 ; 917, beTakenOff + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] +code_1205: lat temp[$0] + ret + +WorldObject::beTakenOff: + pushi $63 ; 99, 'c', perform + push2 + pushi $395 ; 917, beTakenOff + lsp param[$1] + self $8 + bnot + ret + +WorldObject::eat: + link $1 + pushi $63 ; 99, 'c', perform + push2 + pushi $396 ; 918, eat + lsp param[$1] + self $8 + bnot + sat temp[$0] + push + ldi $1 + eq? + bnt code_1235 + pushi $397 ; 919, beEaten + push1 + pushSelf + lap param[$1] + send $6 + bnot + sat temp[$0] +code_1235: lat temp[$0] + ret + +WorldObject::beEaten: + pushi $63 ; 99, 'c', perform + push2 + pushi $397 ; 919, beEaten + lsp param[$1] + self $8 + bnot + ret + +WorldObject::drink: + link $1 + pushi $63 ; 99, 'c', perform + push2 + pushi $398 ; 920, drink + lsp param[$1] + self $8 + bnot + sat temp[$0] + push + ldi $1 + eq? + bnt code_1265 + pushi $399 ; 921, beDrunk + push1 + pushSelf + lap param[$1] + send $6 + bnot + sat temp[$0] +code_1265: lat temp[$0] + ret + +WorldObject::beDrunk: + pushi $63 ; 99, 'c', perform + push2 + pushi $399 ; 921, beDrunk + lsp param[$1] + self $8 + bnot + ret + +WorldObject::trigger: + pushi $63 ; 99, 'c', perform + push2 + pushi $39a ; 922, trigger + lsp param[$1] + self $8 + bnot + ret + +WorldObject::goto: + lap param[$1] + aTop x + lap param[$2] + aTop y + ldi $0 + ret + +WorldObject::approach: + link $a + ldi $2 + sat temp[$0] + push1 + lsp param[$1] + calle export60000_0, $2 + bnot + not + bt code_12ab + pushi $97 ; 151, isKindOf + push1 + class WorldObject + push + lap param[$1] + send $6 + bnot + not +code_12ab: bnt code_12b0 + lat temp[$0] + ret + +code_12b0: pushi $3a7 ; 935, getBaseOwner + push0 + lap param[$1] + send $4 + bnot + sat temp[$1] + bnt code_12bf + sap param[$1] +code_12bf: pushi $4 ; scaleX + push1 + push0 + lap param[$1] + send $4 + bnot + push + push2 + push0 + lap param[$1] + send $4 + bnot + push + pTos x + pTos y + callk kernel_63, $8 + bnot + sat temp[$4] + pushi $4 ; scaleX + push1 + push0 + lap param[$1] + send $4 + bnot + push + push2 + push0 + lap param[$1] + send $4 + bnot + push + pTos x + pTos y + callk kernel_64, $8 + bnot + sat temp[$5] + pushi $4 ; scaleX + push0 + lap param[$1] + send $4 + bnot + push + ldi $4e ; 78, 'N', width + mul + push + ldi $64 ; 100, 'd', moveDone + div + sat temp[$7] + push + pToa approachDist + mul + push + ldi $64 ; 100, 'd', moveDone + div + sat temp[$6] + push + ldi $64 ; 100, 'd', moveDone + mul + push + ldi $85 ; 133, roll + div + sat temp[$8] + push1 + push2 + lst temp[$4] + pushi $64 ; 100, 'd', moveDone + callk kernel_67, $4 + bnot + push + callk kernel_61, $2 + bnot + sat temp[$7] + lst temp[$6] + push + lst temp[$6] + lat temp[$8] + sub + mul + push + ldi $64 ; 100, 'd', moveDone + div + sub + sat temp[$6] + lsp param[$2] + dup + ldi $3 ; z + eq? + bnt code_1351 + lst temp[$6] + ldi $a ; 10, inTop + mul + sat temp[$6] + jmp code_13d5 + +code_1351: dup + ldi $3f ; 63, '?', xStep + eq? + bnt code_1362 + lst temp[$6] + ldi $4 ; scaleX + mul + sat temp[$6] + jmp code_13d5 + +code_1362: dup + ldi $49 ; 73, 'I', replay + eq? + bnt code_1373 + lst temp[$6] + ldi $4 ; scaleX + mul + sat temp[$6] + jmp code_13d5 + +code_1373: dup + ldi $7c ; 124, '|', titleBack + eq? + bnt code_1384 + lst temp[$6] + ldi $4 ; scaleX + mul + sat temp[$6] + jmp code_13d5 + +code_1384: dup + ldi $4 ; scaleX + eq? + bnt code_1395 + lst temp[$6] + ldi $4 ; scaleX + mul + sat temp[$6] + jmp code_13d5 + +code_1395: dup + ldi $c ; 12, inBottom + eq? + bnt code_13a6 + lst temp[$6] + ldi $2 + mul + sat temp[$6] + jmp code_13d5 + +code_13a6: dup + ldi $d ; 13, seenRect + eq? + bnt code_13b7 + lst temp[$6] + ldi $2 + mul + sat temp[$6] + jmp code_13d5 + +code_13b7: dup + ldi $7 ; priority + eq? + bnt code_13c8 + lst temp[$6] + ldi $4 ; scaleX + mul + sat temp[$6] + jmp code_13d5 + +code_13c8: dup + ldi $1d ; 29, brTop + eq? + bnt code_13d5 + lst temp[$6] + ldi $2 + mul + sat temp[$6] +code_13d5: toss + lsp param[$2] + dup + ldi $6d ; 109, 'm', picture + eq? + bnt code_13f8 + push1 + push0 + lap param[$1] + send $4 + bnot + sat temp[$2] + push2 + push0 + lap param[$1] + send $4 + bnot + push + ldi $7 ; priority + add + sat temp[$3] + jmp code_1428 + +code_13f8: push1 + push0 + lap param[$1] + send $4 + bnot + push + push2 + lst temp[$4] + lst temp[$6] + ldi $2 + sub + push + callk kernel_66, $4 + bnot + add + sat temp[$2] + push2 + push0 + lap param[$1] + send $4 + bnot + push + push2 + lst temp[$4] + lst temp[$6] + ldi $2 + sub + push + callk kernel_67, $4 + bnot + sub + sat temp[$3] +code_1428: toss + lsp param[$1] + selfID + ne? + bnt code_148d + lst temp[$5] + lat temp[$6] + gt? + bnt code_148d + pushi $3ec ; 1004, pAction + push0 + self $4 + bnot + push + ldi $3 ; z + ne? + bnt code_148d + pushi $41b ; 1051, pApproachX + push1 + lst temp[$2] + pushi $41c ; 1052, pApproachY + push1 + lst temp[$3] + pushi $41d ; 1053, pDistance + push1 + lst temp[$6] + pushi $142 ; 322, pObject + push1 + lsp param[$1] + pushi $33f ; 831, pClient + push1 + pushSelf + pushi $c4 ; 196, caller + push1 + lsp param[$0] + ldi $2 + gt? + bnt code_1472 + lap param[$3] + jmp code_1474 + +code_1472: ldi $0 +code_1474: push + pushi $94 ; 148, init + push0 + pushi $8d ; 141, new + push0 + lofsa ApproachScript + send $4 + bnot + send $28 + bnot + ldi $0 + sat temp[$0] + jmp code_14c8 + +code_148d: lsp param[$0] + ldi $2 + gt? + bnt code_14c8 + lap param[$3] + bnt code_14c8 + lsp param[$1] + selfID + ne? + bnt code_14bf + lst temp[$5] + lat temp[$6] + gt? + bnt code_14bf + pushi $9c ; 156, handleError + pushi $3 ; z + lsp param[$1] + pushi $c350 ; -15536 + pushi $c351 ; -15535 + lap param[$3] + send $a + bnot + jmp code_14c8 + +code_14bf: pushi $c7 ; 199, cue + push0 + lap param[$3] + send $4 + bnot +code_14c8: lat temp[$0] + ret + +WorldObject::face: + link $4 + ldi $0 + sat temp[$1] + lap param[$1] + bnt code_14e5 + pushi $3a7 ; 935, getBaseOwner + push0 + send $4 + bnot + sat temp[$1] + bnt code_14e5 + lat temp[$1] + sap param[$1] +code_14e5: lap param[$1] + not + bt code_14fd + lsp param[$1] + selfID + eq? + bt code_14fd + pushi $3ec ; 1004, pAction + push0 + self $4 + bnot + push + ldi $3 ; z + eq? +code_14fd: bnt code_1519 + lsp param[$0] + ldi $1 + gt? + bnt code_153f + lap param[$2] + bnt code_153f + pushi $c7 ; 199, cue + push0 + lap param[$2] + send $4 + bnot + jmp code_153f + +code_1519: pushi $4 ; scaleX + pTos x + pTos y + push1 + push0 + lap param[$1] + send $4 + bnot + push + push2 + push0 + lap param[$1] + send $4 + bnot + push + callk kernel_63, $8 + bnot + sat temp[$2] + pushi $15a ; 346, setHeading + push1 + push + &rest $2 + self $6 + bnot +code_153f: ldi $0 + sat temp[$0] + ret + +WorldObject::saveMover: + pToa pMover + aTop pLastMover + ret + +WorldObject::restoreMover: + pToa pLastMover + aTop pMover + ret + +WorldObject::showContents: + link $1 + pushi $63 ; 99, 'c', perform + push1 + pushi $3a4 ; 932, showContents + &rest $1 + self $6 + bnot + sat temp[$0] + ret + +WorldObject::hideContents: + pushi $63 ; 99, 'c', perform + push1 + pushi $3a5 ; 933, hideContents + self $6 + bnot + ret + +WorldObject::modifyProp: + pushi $63 ; 99, 'c', perform + pushi $3 ; z + pushi $368 ; 872, modifyProp + lsp param[$1] + lsp param[$2] + self $a + bnot + ret + +WorldObject::getProp: + pushi $63 ; 99, 'c', perform + push2 + pushi $369 ; 873, getProp + lsp param[$1] + self $8 + bnot + ret + +WorldObject::buy: + pushi $63 ; 99, 'c', perform + push2 + pushi $3a0 ; 928, buy + lsp param[$1] + self $8 + bnot + ret + +WorldObject::sell: + pushi $63 ; 99, 'c', perform + push2 + pushi $3a1 ; 929, sell + lsp param[$1] + self $8 + bnot + ret + +WorldObject::examine: + link $1 + pushi $63 ; 99, 'c', perform + push2 + pushi $39e ; 926, examine + lsp param[$1] + &rest $2 + self $8 + bnot + sat temp[$0] + push + ldi $1 + eq? + bnt code_15c2 + pushi $39f ; 927, beExamined + push1 + pushSelf + lap param[$1] + send $6 + bnot + ldi $0 + sat temp[$0] +code_15c2: lat temp[$0] + ret + +WorldObject::beExamined: + pushi $63 ; 99, 'c', perform + push2 + pushi $39f ; 927, beExamined + lsp param[$1] + &rest $2 + self $8 + bnot + ret + +WorldObject::stopAction: + pToa pMovieCmd + bnt code_1674 + pToa mover + bt code_15f7 + push1 + pTos script + calle export60000_0, $2 + bnot + bnt code_1674 + pushi $97 ; 151, isKindOf + push1 + class WANetScript + push + pToa script + send $6 + bnot + not +code_15f7: bnt code_1674 + pushi $7 ; priority + lofsa string_02f9 ; "Object(%s, %s[$%x], %s[%d], %s) stopped at bad place. The programmers have been made aware of this and it will be fixed very soon." + push + pTos name + push1 + pTos pMovieCmd + calle export60000_0, $2 + bnot + bnt code_1619 + pushi $20 ; 32, ' ', name + push0 + pToa pMovieCmd + send $4 + bnot + jmp code_161c + +code_1619: lofsa string_037c ; "" +code_161c: push + pTos pMovieCmd + push1 + pTos script + calle export60000_0, $2 + bnot + bnt code_1636 + pushi $20 ; 32, ' ', name + push0 + pToa script + send $4 + bnot + jmp code_1639 + +code_1636: lofsa string_0388 ; "" +code_1639: push + push1 + pTos script + calle export60000_0, $2 + bnot + bnt code_1651 + pushi $29 ; 41, ')', state + push0 + pToa script + send $4 + bnot + jmp code_1653 + +code_1651: ldi $ff ; 255, asInteger +code_1653: push + push1 + pTos mover + calle export60000_0, $2 + bnot + bnt code_166c + pushi $20 ; 32, ' ', name + push0 + pToa mover + send $4 + bnot + jmp code_166f + +code_166c: lofsa string_0394 ; "" +code_166f: push + callk kernel_132, $e + bnot +code_1674: pushi $15c ; 348, setMotion + push1 + push0 + pushi $c9 ; 201, setScript + push1 + push0 + self $c + bnot + pToa pApproachScript + bnt code_168e + pushi $95 ; 149, dispose + push0 + send $4 + bnot +code_168e: ldi $1 + ret + +WorldObject::getOwner: + link $2 + selfID + sat temp[$1] + pushi $35c ; 860, getBase + push1 + class BCarryable + push + self $6 + bnot + sat temp[$0] + bnt code_16ae + pushi $343 ; 835, pOwner + push0 + send $4 + bnot + sat temp[$1] +code_16ae: lst temp[$1] + ldi $0 + eq? + bnt code_16b9 + selfID + sat temp[$1] +code_16b9: lat temp[$1] + ret + +WorldObject::getBaseOwner: + link $2 + selfID + sat temp[$0] + selfID + sat temp[$1] +code_16c4: lst temp[$1] + ldi $ff ; 255, asInteger + ne? + bnt code_16e3 + lst temp[$0] + pushi $35b ; 859, getOwner + push0 + lat temp[$1] + send $4 + bnot + sat temp[$1] + ne? + bnt code_16e3 + lat temp[$1] + sat temp[$0] + jmp code_16c4 + +code_16e3: lat temp[$0] + ret + +WorldObject::owns: + push1 + lsp param[$1] + calle export60000_0, $2 + bnot + bnt code_170f + pushi $97 ; 151, isKindOf + push1 + class WorldObject + push + lap param[$1] + send $6 + bnot + bnt code_170f + pushi $3a9 ; 937, isOwnedBy + push1 + pushSelf + &rest $2 + lap param[$1] + send $6 + bnot + ret + +code_170f: ldi $0 + ret + +WorldObject::isOwnedBy: + link $3 + push1 + lsp param[$1] + calle export60000_0, $2 + bnot + bnt code_172d + pushi $97 ; 151, isKindOf + push1 + class WorldObject + push + lap param[$1] + send $6 + bnot +code_172d: not + bnt code_1734 + ldi $0 + ret + +code_1734: selfID + sat temp[$0] + selfID + sat temp[$1] + lsp param[$0] + ldi $1 + gt? + bnt code_1749 + lap param[$2] + sat temp[$2] + jmp code_174e + +code_1749: ldi $2710 ; 10000 + sat temp[$2] +code_174e: lat temp[$2] + bnt code_1777 + lst temp[$1] + pushi $35b ; 859, getOwner + push0 + lat temp[$0] + send $4 + bnot + sat temp[$0] + ne? + bnt code_1777 + lst temp[$0] + lap param[$1] + eq? + bnt code_176f + ldi $1 + ret + +code_176f: lat temp[$0] + sat temp[$1] + -at temp[$2] + jmp code_174e + +code_1777: ldi $0 + ret + +WorldObject::updateDisplay: + link $1 + pTos pBaseView + ldi $ff ; 255, asInteger + eq? + bt code_179d + pTos view + ldi $ff ; 255, asInteger + eq? + bt code_179d + pToa pBitmapBased + not + bt code_179d + push2 + pushi $80 ; 128, lastKey + pTos view + callk kernel_5, $4 + bnot + not +code_179d: bnt code_17a0 + ret + +code_17a0: pToa bitmap + sat temp[$0] + pushi $7 ; priority + pushi $9 ; inLeft + pTos view + pTos loop + pTos cel + pushi $ff ; 255, asInteger + dup + push1 + callk kernel_35, $e + bnot + aTop bitmap + pushi $4 ; scaleX + pushi $8 ; fixPriority + pTos bitmap + pushi $4 ; scaleX + push0 + pTos view + pTos loop + pTos cel + callk kernel_34, $8 + bnot + push + pushi $4 ; scaleX + push1 + pTos view + pTos loop + pTos cel + callk kernel_34, $8 + bnot + push + callk kernel_35, $8 + bnot + pToa clut + bnt code_17ee + pushi $3 ; z + pushi $a ; 10, inTop + pTos bitmap + push + callk kernel_35, $6 + bnot +code_17ee: lat temp[$0] + bnt code_17fd + pushi $9f ; 159, add + push1 + push + lag global[$66] + send $6 + bnot +code_17fd: push1 + pushSelf + callk kernel_32, $2 + bnot + ret + +WorldObject::createDisplay: + link $6 + pToa -info- + sat temp[$3] + pToa pUpdateClient + bnt code_1818 + pushi $1007 ; 4103, -info- + push0 + send $4 + bnot + sat temp[$4] +code_1818: pToa pAction + sat temp[$0] + pushi $373 ; 883, setAction + push1 + lsp param[$1] + self $6 + bnot + lsp param[$0] + ldi $1 + gt? + bnt code_1831 + lap param[$2] + aTop cel +code_1831: pToa bitmap + sat temp[$1] + ldi $0 + aTop bitmap + pushi $36a ; 874, updateDisplay + push1 + pushi $ff ; 255, asInteger + self $6 + bnot + lsp param[$1] + ldi $21 ; 33, '!', key + eq? + bnt code_1871 + pushi $35c ; 860, getBase + push1 + class BWearable + push + self $6 + bnot + sat temp[$5] + bnt code_1871 + pushi $41e ; 1054, pIsWorn + push0 + send $4 + bnot + bnt code_1871 + pushi $3b3 ; 947, addCel + pushi $3 ; z + pushi $233c ; 9020 + push0 + push0 + self $a + bnot +code_1871: pToa pUpdateClient + bnt code_187d + pushi $3b1 ; 945, remapBitmap + push0 + self $4 + bnot +code_187d: pToa bitmap + sat temp[$2] + not + bnt code_1898 + push0 + callk kernel_129, $0 + bnot + push2 + lofsa string_039f ; "createDisplay generated a NULL bitmap (view == %d)" + push + pTos view + calle export60029_1, $4 + bnot +code_1898: pushi $373 ; 883, setAction + push1 + lst temp[$0] + self $6 + bnot + lat temp[$1] + aTop bitmap + push1 + pushSelf + callk kernel_32, $2 + bnot + lat temp[$3] + aTop -info- + pToa pUpdateClient + bnt code_18bd + pushi $1007 ; 4103, -info- + push1 + lst temp[$4] + send $6 + bnot +code_18bd: lat temp[$2] + ret + +WorldObject::createBitmap: + link $1 + pToa bitmap + sat temp[$0] + pToa plane + bnt code_1939 + pTos pBaseView + ldi $ff ; 255, asInteger + ne? + bnt code_1939 + push2 + pushi $80 ; 128, lastKey + pTos view + callk kernel_5, $4 + bnot + bnt code_1939 + pushi $7 ; priority + pushi $9 ; inLeft + pTos view + pTos loop + pTos cel + pushi $ff ; 255, asInteger + dup + push1 + callk kernel_35, $e + bnot + aTop bitmap + pushi $4 ; scaleX + pushi $8 ; fixPriority + pTos bitmap + pushi $4 ; scaleX + push0 + pTos view + pTos loop + pTos cel + callk kernel_34, $8 + bnot + push + pushi $4 ; scaleX + push1 + pTos view + pTos loop + pTos cel + callk kernel_34, $8 + bnot + push + callk kernel_35, $8 + bnot + pushi $17c ; 380, isNotHidden + push0 + self $4 + bnot + bnt code_192a + push1 + pushSelf + callk kernel_32, $2 + bnot +code_192a: lat temp[$0] + bnt code_1939 + pushi $9f ; 159, add + push1 + push + lag global[$66] + send $6 + bnot +code_1939: ret + +WorldObject::disposeBitmap: + pToa bitmap + bnt code_194d + pushi $9f ; 159, add + push1 + push + lag global[$66] + send $6 + bnot + ldi $0 + aTop bitmap +code_194d: ret + +WorldObject::addBitmap: + pToa bitmap + bnt code_1967 + lap param[$1] + bnt code_1967 + pushi $5 ; scaleY + pushi $6 ; maxScale + pTos bitmap + lsp param[$1] + pushi $ff ; 255, asInteger + dup + callk kernel_35, $a + bnot +code_1967: ret + +WorldObject::addCel: + pToa bitmap + bnt code_199e + lsp param[$2] + ldi $ff ; 255, asInteger + gt? + bnt code_199e + lsp param[$3] + ldi $ff ; 255, asInteger + gt? + bnt code_199e + push2 + pushi $80 ; 128, lastKey + lsp param[$1] + callk kernel_5, $4 + bnot + bnt code_199e + pushi $8 ; fixPriority + pushi $3 ; z + pTos bitmap + lsp param[$1] + lsp param[$2] + lsp param[$3] + pushi $ff ; 255, asInteger + dup + push1 + callk kernel_35, $10 + bnot +code_199e: ret + +WorldObject::addLinkedCel: + pToa bitmap + bnt code_19e2 + push2 + pushi $80 ; 128, lastKey + lsp param[$1] + callk kernel_5, $4 + bnot + bnt code_19e2 + pushi $7 ; priority + pushi $3 ; z + pTos bitmap + lsp param[$1] + lsp param[$2] + lsp param[$3] + pushi $5 ; scaleY + push2 + pTos view + pTos loop + pTos cel + lsp param[$4] + callk kernel_36, $a + bnot + push + pushi $5 ; scaleY + pushi $3 ; z + pTos view + pTos loop + pTos cel + lsp param[$4] + callk kernel_36, $a + bnot + push + callk kernel_35, $e + bnot +code_19e2: ret + +WorldObject::addLinkedBitmap: + link $2 + pToa bitmap + bnt code_1aa0 + lap param[$1] + bnt code_1aa0 + lsp param[$0] + ldi $3 ; z + gt? + bnt code_1a25 + pushi $5 ; scaleY + push2 + pTos view + pTos loop + pTos cel + lsp param[$2] + callk kernel_36, $a + bnot + push + lap param[$3] + sub + sat temp[$0] + pushi $5 ; scaleY + pushi $3 ; z + pTos view + pTos loop + pTos cel + lsp param[$2] + callk kernel_36, $a + bnot + push + lap param[$4] + sub + sat temp[$1] + jmp code_1a90 + +code_1a25: pushi $5 ; scaleY + push2 + pTos view + pTos loop + pTos cel + lsp param[$2] + callk kernel_36, $a + bnot + push + pushi $4 ; scaleX + push0 + pushi $e ; 14, view + push0 + lap param[$3] + send $4 + bnot + push + pushi $f ; 15, loop + push0 + lap param[$3] + send $4 + bnot + push + pushi $10 ; 16, cel + push0 + lap param[$3] + send $4 + bnot + push + callk kernel_34, $8 + bnot + sub + sat temp[$0] + pushi $5 ; scaleY + pushi $3 ; z + pTos view + pTos loop + pTos cel + lsp param[$2] + callk kernel_36, $a + bnot + push + pushi $4 ; scaleX + push1 + pushi $e ; 14, view + push0 + lap param[$3] + send $4 + bnot + push + pushi $f ; 15, loop + push0 + lap param[$3] + send $4 + bnot + push + pushi $10 ; 16, cel + push0 + lap param[$3] + send $4 + bnot + push + callk kernel_34, $8 + bnot + sub + sat temp[$1] +code_1a90: pushi $6 ; maxScale + dup + pTos bitmap + lsp param[$1] + lst temp[$0] + lst temp[$1] + push1 + callk kernel_35, $c + bnot +code_1aa0: ret + +WorldObject::insertLinkedBitmap: + link $1 + pToa bitmap + bnt code_1b41 + push2 + pushi $b ; 11, inRight + push + callk kernel_35, $4 + bnot + sat temp[$0] + pushi $6 ; maxScale + dup + pTos bitmap + lsp param[$1] + pushi $5 ; scaleY + push2 + pTos view + pTos loop + pTos cel + lsp param[$2] + callk kernel_36, $a + bnot + push + pushi $4 ; scaleX + push0 + pushi $e ; 14, view + push0 + lap param[$3] + send $4 + bnot + push + pushi $f ; 15, loop + push0 + lap param[$3] + send $4 + bnot + push + pushi $10 ; 16, cel + push0 + lap param[$3] + send $4 + bnot + push + callk kernel_34, $8 + bnot + sub + push + pushi $5 ; scaleY + pushi $3 ; z + pTos view + pTos loop + pTos cel + lsp param[$2] + callk kernel_36, $a + bnot + push + pushi $4 ; scaleX + push1 + pushi $e ; 14, view + push0 + lap param[$3] + send $4 + bnot + push + pushi $f ; 15, loop + push0 + lap param[$3] + send $4 + bnot + push + pushi $10 ; 16, cel + push0 + lap param[$3] + send $4 + bnot + push + callk kernel_34, $8 + bnot + sub + push + push1 + callk kernel_35, $c + bnot + pushi $5 ; scaleY + pushi $6 ; maxScale + pTos bitmap + lst temp[$0] + pushi $ff ; 255, asInteger + dup + callk kernel_35, $a + bnot + pushi $9f ; 159, add + push1 + lst temp[$0] + lag global[$66] + send $6 + bnot +code_1b41: ret + +WorldObject::insertLinkedCel: + link $1 + pToa bitmap + bnt code_1bac + push2 + pushi $80 ; 128, lastKey + lsp param[$1] + callk kernel_5, $4 + bnot + bnt code_1bac + push2 + pushi $b ; 11, inRight + pTos bitmap + callk kernel_35, $4 + bnot + sat temp[$0] + pushi $7 ; priority + pushi $3 ; z + pTos bitmap + lsp param[$1] + lsp param[$2] + lsp param[$3] + pushi $5 ; scaleY + push2 + pTos view + pTos loop + pTos cel + lsp param[$4] + callk kernel_36, $a + bnot + push + pushi $5 ; scaleY + pushi $3 ; z + pTos view + pTos loop + pTos cel + lsp param[$4] + callk kernel_36, $a + bnot + push + callk kernel_35, $e + bnot + pushi $5 ; scaleY + pushi $6 ; maxScale + pTos bitmap + lst temp[$0] + pushi $ff ; 255, asInteger + dup + callk kernel_35, $a + bnot + pushi $9f ; 159, add + push1 + lst temp[$0] + lag global[$66] + send $6 + bnot +code_1bac: ret + +WorldObject::remapBitmap: + pToa bitmap + bnt code_1bef + pToa clut + bnt code_1bef + pToa pFrozenClut + bnt code_1bcb + pushi $3 ; z + pushi $a ; 10, inTop + pTos bitmap + push + callk kernel_35, $6 + bnot + jmp code_1bef + +code_1bcb: pToa pInvisibleClut + bnt code_1bdf + pushi $3 ; z + pushi $a ; 10, inTop + pTos bitmap + push + callk kernel_35, $6 + bnot + jmp code_1bef + +code_1bdf: pToa clut + bnt code_1bef + pushi $3 ; z + pushi $a ; 10, inTop + pTos bitmap + push + callk kernel_35, $6 + bnot +code_1bef: ret + +WorldObject::addUpdator: + link $2 + pTos pUpdatorList + ldi $0 + eq? + bnt code_1c10 + pushi $340 ; 832, pSortSelector + push1 + pushi $2fe ; 766, pLayer + pushi $8d ; 141, new + push0 + class SortedList + send $4 + bnot + aTop pUpdatorList + send $6 + bnot +code_1c10: pushi $9f ; 159, add + push1 + lsp param[$1] + pToa pUpdatorList + send $6 + bnot + pushi $365 ; 869, pSelf + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] + pushi $3e9 ; 1001, pUpdateObj + push1 + pushSelf + send $6 + bnot + selfID + sat temp[$1] +code_1c31: pushi $3e8 ; 1000, pUpdateClient + push0 + lat temp[$1] + send $4 + bnot + bnt code_1c4a + pushi $3e8 ; 1000, pUpdateClient + push0 + lat temp[$1] + send $4 + bnot + sat temp[$1] + jmp code_1c31 + +code_1c4a: pushi $3e8 ; 1000, pUpdateClient + push1 + lst temp[$1] + lat temp[$0] + send $6 + bnot + pushi $3ac ; 940, inheritClut + push1 + lst temp[$0] + self $6 + bnot + pushi $36a ; 874, updateDisplay + push1 + push1 + self $6 + bnot + ret + +WorldObject::deleteUpdator: + link $1 + pushi $58 ; 88, 'X', delete + push1 + lsp param[$1] + pToa pUpdatorList + send $6 + bnot + pushi $5a ; 90, 'Z', size + push0 + pToa pUpdatorList + send $4 + bnot + push + ldi $0 + eq? + bnt code_1c8f + pushi $95 ; 149, dispose + push0 + pToa pUpdatorList + send $4 + bnot + ldi $0 + aTop pUpdatorList +code_1c8f: pushi $365 ; 869, pSelf + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] + pushi $3e8 ; 1000, pUpdateClient + push1 + push0 + pushi $3e9 ; 1001, pUpdateObj + push1 + push0 + send $c + bnot + pushi $36a ; 874, updateDisplay + push1 + push1 + self $6 + bnot + ret + +WorldObject::createClut: + pToa pClutStart + bnt code_1cc6 + pToa clut + not + bnt code_1cc6 + pushi $8d ; 141, new + push0 + class Clut + send $4 + bnot + aTop clut +code_1cc6: ret + +WorldObject::inheritClut: + link $b + pushi $3ab ; 939, createClut + push0 + self $4 + bnot + pushi $17a ; 378, clut + push0 + lap param[$1] + send $4 + bnot + sat temp[$1] + bnt code_1dac + pushi $3ea ; 1002, pClutStart + push0 + lap param[$1] + send $4 + bnot + sat temp[$4] + pushi $330 ; 816, pColor + push0 + lap param[$1] + send $4 + bnot + push + ldi $ff ; 255, asInteger + and + sat temp[$2] + pushi $330 ; 816, pColor + push0 + lap param[$1] + send $4 + bnot + push + ldi $8 ; fixPriority + shr + sat temp[$3] + bnt code_1d17 + pushi $45 ; 69, 'E', doit + push2 + lsp param[$1] + push + class SetScale + send $8 + bnot +code_1d17: lst temp[$4] + ldi $ff ; 255, asInteger + eq? + bnt code_1d2e + push2 + pTos clut + lst temp[$2] + calle export40206_0, $4 + bnot + jmp code_1dac + +code_1d2e: lst temp[$4] + ldi $4 ; scaleX + add + sat temp[$5] + pushi $71 ; 113, 'q', data + push0 + lat temp[$1] + send $4 + bnot + sat temp[$8] + pToa clut + sat temp[$a] +code_1d43: pushi $97 ; 151, isKindOf + push1 + class ClutOverride + push + lat temp[$a] + send $6 + bnot + bnt code_1d5f + pushi $41f ; 1055, pClut + push0 + lat temp[$a] + send $4 + bnot + sat temp[$a] + jmp code_1d43 + +code_1d5f: pushi $71 ; 113, 'q', data + push0 + lat temp[$a] + send $4 + bnot + sat temp[$9] + ldi $0 + sat temp[$0] +code_1d6d: lst temp[$0] + ldi $ff ; 255, asInteger + lt? + bnt code_1dac + pushi $3 ; z + push2 + lst temp[$8] + lst temp[$0] + callk kernel_91, $6 + bnot + sat temp[$2] + push + lat temp[$0] + ne? + bt code_1d97 + lst temp[$0] + lat temp[$4] + ge? + bnt code_1da8 + lst temp[$0] + lat temp[$5] + lt? +code_1d97: bnt code_1da8 + pushi $4 ; scaleX + pushi $3 ; z + lst temp[$9] + lst temp[$0] + lst temp[$2] + callk kernel_91, $8 + bnot +code_1da8: +at temp[$0] + jmp code_1d6d + +code_1dac: pToa pUpdateObj + bnt code_1dba + pushi $3ac ; 940, inheritClut + push1 + lsp param[$1] + send $6 + bnot +code_1dba: pushi $36a ; 874, updateDisplay + push1 + push1 + self $6 + bnot + ret + +WorldObject::removeClut: + pToa clut + bnt code_1dd3 + pushi $95 ; 149, dispose + push0 + send $4 + bnot + ldi $0 + aTop clut +code_1dd3: ret + +WorldObject::setColor: + link $5 + lsp param[$0] + ldi $1 + gt? + bnt code_1de3 + lap param[$2] + jmp code_1de5 + +code_1de3: pToa pClutStart +code_1de5: sat temp[$2] + pTos pColor + ldi $ff ; 255, asInteger + and + sat temp[$0] + pTos pColor + ldi $8 ; fixPriority + shr + sat temp[$1] + bnt code_1e04 + pushi $45 ; 69, 'E', doit + push2 + pushSelf + push + class SetScale + send $8 + bnot +code_1e04: pushi $3ab ; 939, createClut + push0 + self $4 + bnot + lst temp[$2] + ldi $ff ; 255, asInteger + eq? + bnt code_1e22 + push2 + pTos clut + lst temp[$0] + calle export40206_0, $4 + bnot + jmp code_1e78 + +code_1e22: lap param[$1] + aTop pColor + sat temp[$0] + lst temp[$2] + lsp param[$0] + ldi $2 + gt? + bnt code_1e37 + lap param[$3] + jmp code_1e39 + +code_1e37: ldi $4 ; scaleX +code_1e39: add + sat temp[$3] + push1 + pTos clut + calle export60000_0, $2 + bnot + not + bt code_1e57 + pushi $97 ; 151, isKindOf + push1 + class Clut + push + pToa clut + send $6 + bnot + not +code_1e57: bnt code_1e5a + ret + +code_1e5a: lat temp[$2] + sat temp[$4] +code_1e5e: lst temp[$4] + lat temp[$3] + lt? + bnt code_1e78 + pushi $4b ; 75, 'K', at + push2 + lst temp[$4] + lst temp[$0] + pToa clut + send $8 + bnot + +at temp[$0] + +at temp[$4] + jmp code_1e5e + +code_1e78: lat temp[$2] + bnt code_1e8a + pToa pUpdateObj + bnt code_1e8a + pushi $3ac ; 940, inheritClut + push1 + pushSelf + send $6 + bnot +code_1e8a: ret + +WorldObject::setMode: + pTos pMode + lap param[$1] + or + aTop pMode + ret + +WorldObject::clearMode: + lap param[$0] + bnt code_1ea3 + pTos pMode + lap param[$1] + bnot + and + aTop pMode + jmp code_1ea7 + +code_1ea3: ldi $0 + aTop pMode +code_1ea7: ret + +WorldObject::saveMode: + pToa pMode + aTop pLastMode + ret + +WorldObject::restoreMode: + pToa pLastMode + aTop pMode + ret + +WorldObject::pause: + ipToa pPaused + ret + +WorldObject::unpause: + pToa pPaused + bnt code_1ebc + dpToa pPaused +code_1ebc: ret + +WorldObject::setAction: + link $1 + pushi $63 ; 99, 'c', perform + push2 + pushi $373 ; 883, setAction + lsp param[$1] + self $8 + bnot + sat temp[$0] + push + ldi $1 + eq? + bnt code_1f65 + lsp param[$1] + ldi $1c ; 28, brLeft + eq? + bnt code_1ef1 + push2 + pushi $80 ; 128, lastKey + pTos pBaseView + lap param[$1] + add + push + callk kernel_5, $4 + bnot + not + bnt code_1ef1 + ldi $1d ; 29, brTop + sap param[$1] +code_1ef1: push2 + pushi $80 ; 128, lastKey + pTos pBaseView + lap param[$1] + add + push + callk kernel_5, $4 + bnot + not + bnt code_1f14 + push2 + pushi $80 ; 128, lastKey + pTos pBaseView + callk kernel_5, $4 + bnot + bnt code_1f14 + ldi $0 + sap param[$1] +code_1f14: lap param[$1] + aTop pAction + pTos pBaseView + ldi $ff ; 255, asInteger + ne? + bnt code_1f32 + pTos pBaseView + pToa pAction + add + aTop view + pToa pMoney + not + bnt code_1f32 + ldi $0 + aTop cel +code_1f32: pToa pUpdatorList + bnt code_1f61 + push1 + push + calle export60000_0, $2 + bnot + bnt code_1f61 + pushi $97 ; 151, isKindOf + push1 + class SortedList + push + pToa pUpdatorList + send $6 + bnot + bnt code_1f61 + pushi $9d ; 157, eachElementDo + push2 + pushi $36b ; 875, updateAction + lsp param[$1] + pToa pUpdatorList + send $8 + bnot +code_1f61: ldi $0 + sat temp[$0] +code_1f65: lat temp[$0] + ret + +WorldObject::hide: + pushSelf + lag global[$1] + ne? + bnt code_1f83 + pushi $3a9 ; 937, isOwnedBy + push1 + lsg global[$1] + self $6 + bnot + not + bnt code_1f83 + pushi $3a5 ; 933, hideContents + push0 + self $4 + bnot +code_1f83: pushi $17c ; 380, isNotHidden + push0 + self $4 + bnot + bnt code_1f9a + pTos signal + ldi $8 ; fixPriority + or + aTop signal + push1 + pushSelf + callk kernel_31, $2 + bnot +code_1f9a: ret + +WorldObject::show: + pushi $3e0 ; 992, setVisible + push0 + self $4 + bnot + ret + +WorldObject::lastCel: + link $2 + pToa view + sat temp[$0] + pTos pBaseView + ldi $ff ; 255, asInteger + ne? + bnt code_1fb8 + pTos pBaseView + pToa pAction + add + aTop view +code_1fb8: push2 + pushi $80 ; 128, lastKey + pTos view + callk kernel_5, $4 + bnot + bnt code_1fd2 + pushi $161 ; 353, lastCel + push0 + super Act, $4 + bnot + sat temp[$1] + jmp code_1fd6 + +code_1fd2: ldi $0 + sat temp[$1] +code_1fd6: lat temp[$0] + aTop view + lat temp[$1] + ret + +WorldObject::generatePolygon: + link $10 + ldi $2 + sat temp[$0] + pTos view + ldi $ff ; 255, asInteger + eq? + bnt code_1fee + lat temp[$0] + ret + +code_1fee: pToa pPolygon + not + bnt code_1fff + pushi $63 ; 99, 'c', perform + push1 + pushi $3c2 ; 962, generatePolygon + self $6 + bnot + sat temp[$0] +code_1fff: lag global[$1] + not + bt code_2025 + pTos cel + ldi $ff ; 255, asInteger + eq? + bt code_2025 + pTos view + ldi $ff ; 255, asInteger + eq? + bt code_2025 + pToa pPolygon + bt code_2025 + push2 + pushi $80 ; 128, lastKey + pTos view + callk kernel_5, $4 + bnot + not +code_2025: bnt code_202e + lat temp[$0] + ret + + jmp code_220f + +code_202e: lst temp[$0] + ldi $2 + ne? + bnt code_220f + pushi $8d ; 141, new + push0 + class Polygon + send $4 + bnot + aTop pPolygon + ldi $0 + sat temp[$2] + ldi $0 + sat temp[$3] +code_2049: lst temp[$2] + ldi $9 ; inLeft + lt? + bnt code_20a5 + pushi $5 ; scaleY + push2 + pTos view + pTos loop + pTos cel + lst temp[$2] + callk kernel_36, $a + bnot + sat temp[$4] + pushi $5 ; scaleY + pushi $3 ; z + pTos view + pTos loop + pTos cel + lst temp[$2] + callk kernel_36, $a + bnot + sat temp[$5] + lst temp[$4] + ldi $ff ; 255, asInteger + ne? + bt code_2081 + lst temp[$5] + ldi $ff ; 255, asInteger + ne? +code_2081: bnt code_20a1 + pushi $4b ; 75, 'K', at + pushi $3 ; z + lst temp[$3] + lst temp[$4] + lst temp[$5] + pushi $5b ; 91, '[', points + push0 + pToa pPolygon + send $4 + bnot + send $a + bnot + lst temp[$3] + ldi $2 + add + sat temp[$3] +code_20a1: +at temp[$2] + jmp code_2049 + +code_20a5: lst temp[$3] + ldi $2 + div + push + ldi $3 ; z + ge? + bnt code_20bf + pushi $5a ; 90, 'Z', size + push1 + lst temp[$3] + ldi $2 + div + push + pToa pPolygon + send $6 + bnot +code_20bf: pushi $5a ; 90, 'Z', size + push0 + pToa pPolygon + send $4 + bnot + not + bnt code_21c5 + pushi $3 ; z + pushi $e ; 14, view + push0 + lag global[$1] + send $4 + bnot + push + pushi $f ; 15, loop + push0 + lag global[$1] + send $4 + bnot + push + pushi $10 ; 16, cel + push0 + lag global[$1] + send $4 + bnot + push + callk kernel_29, $6 + bnot + push + pushi $3 ; z + pTos view + pTos loop + pTos cel + callk kernel_29, $6 + bnot + lt? + bnt code_2143 + pushi $d1 ; 209, newWith + pushi $6 ; maxScale + pushi $4 ; scaleX + push0 + pushi $3 ; z + pTos view + pTos loop + pTos cel + callk kernel_29, $6 + bnot + push + pushi $3 ; z + pushi $e ; 14, view + push0 + lag global[$1] + send $4 + bnot + push + pushi $f ; 15, loop + push0 + lag global[$1] + send $4 + bnot + push + pushi $10 ; 16, cel + push0 + lag global[$1] + send $4 + bnot + push + callk kernel_29, $6 + bnot + sub + push + push0 + push0 + push0 + class IntArray + send $10 + bnot + sat temp[$1] + jmp code_2156 + +code_2143: pushi $d1 ; 209, newWith + pushi $5 ; scaleY + pushi $4 ; scaleX + push0 + push0 + push0 + push0 + class IntArray + send $e + bnot + sat temp[$1] +code_2156: pushi $6 ; maxScale + pushi $71 ; 113, 'q', data + push0 + lat temp[$1] + send $4 + bnot + push + pTos view + pTos loop + pTos cel + push0 + push0 + callk kernel_27, $c + bnot + pushi $b5 ; 181, set + pushi $4 ; scaleX + pushi $4b ; 75, 'K', at + push1 + push0 + lat temp[$1] + send $6 + bnot + push + ldi $14 ; 20, nsRight + sub + push + pushi $fa ; 250, lower + pushi $4b ; 75, 'K', at + push1 + push2 + lat temp[$1] + send $6 + bnot + push + ldi $14 ; 20, nsRight + add + push + pushi $6 ; maxScale + pushi $9a ; 154, yourself + push0 + pushi $8d ; 141, new + push0 + class Rect + send $4 + bnot + send $10 + bnot + sat temp[$6] + pushi $95 ; 149, dispose + push0 + lat temp[$1] + send $4 + bnot + pushi $172 ; 370, fromRect + push1 + lst temp[$6] + pToa pPolygon + send $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$6] + send $4 + bnot + jmp code_220f + +code_21c5: pushi $dd ; 221, moveBy + push2 + push0 + pushi $4 ; scaleX + push0 + pTos view + pTos loop + pTos cel + callk kernel_34, $8 + bnot + sub + push + push0 + pushi $4 ; scaleX + push1 + pTos view + pTos loop + pTos cel + callk kernel_34, $8 + bnot + sub + push + pToa pPolygon + send $8 + bnot + push1 + pTos pPolygon + callk kernel_137, $2 + bnot + sat temp[$d] + push + ldi $1 + eq? + bnt code_2206 + push2 + pTos pPolygon + push1 + callk kernel_137, $4 + bnot +code_2206: push1 + pTos pPolygon + callk kernel_137, $2 + bnot + sat temp[$d] +code_220f: lat temp[$0] + ret + +WorldObject::submitPolygon: + link $3 + pToa pRoom + not + bt code_2232 + pToa pPolygon + not + bt code_2232 + pTos pPolygon + ldi $ff ; 255, asInteger + eq? + bt code_2232 + pushi $35c ; 860, getBase + push1 + class BCarryable + push + self $6 + bnot +code_2232: bnt code_2239 + ret + + jmp code_227b + +code_2239: pushi $2b ; 43, '+', type + push1 + push2 + pushi $d3 ; 211, copy + push1 + pTos pPolygon + pushi $8d ; 141, new + push0 + class Polygon + send $4 + bnot + sat temp[$0] + send $c + bnot + pushi $f1 ; 241, scale + push1 + pTos scaleX + lat temp[$0] + send $6 + bnot + pushi $dd ; 221, moveBy + push2 + pTos x + pTos y + pToa z + sub + push + lat temp[$0] + send $8 + bnot + lat temp[$0] + aTop pAddedPolygon + pushi $2bd ; 701, addPolygon + push1 + push + pToa pRoom + send $6 + bnot +code_227b: ret + +WorldObject::removePolygon: + pToa pAddedPolygon + bnt code_229d + pushi $2be ; 702, deletePolygon + push1 + push + pToa pRoom + send $6 + bnot + pushi $16f ; 367, pDispose + push1 + push1 + pushi $95 ; 149, dispose + push0 + pToa pAddedPolygon + send $a + bnot + ldi $0 + aTop pAddedPolygon +code_229d: ret + +WorldObject::addToCast: + link $2 + ldi $0 + sat temp[$0] + lap param[$0] + bnt code_22ad + lap param[$1] + sat temp[$0] +code_22ad: lat temp[$0] + not + bnt code_22c1 + lag global[$3] + bnt code_22c1 + pushi $f2 ; 242, pCast + push0 + send $4 + bnot + sat temp[$0] +code_22c1: lat temp[$0] + not + bnt code_22c8 + ret + +code_22c8: pushi $17b ; 379, addToCast + push1 + lsp param[$1] + super Act, $6 + bnot + ret + +WorldObject::deleteFromCast: + link $1 + pToa client + bnt code_2355 + pushi $35c ; 860, getBase + push1 + class BContainer + push + self $6 + bnot + sat temp[$0] + bnt code_22f9 + pushi $9d ; 157, eachElementDo + push1 + pushi $69 ; 105, 'i', hide + pushi $420 ; 1056, pContents + push0 + send $4 + bnot + send $6 + bnot +code_22f9: pToa pRoom + bnt code_230e + pushi $3c4 ; 964, removePolygon + push0 + self $4 + bnot + pushi $58 ; 88, 'X', delete + push1 + pushSelf + pToa pRoom + send $6 + bnot +code_230e: push1 + pTos client + calle export60000_0, $2 + bnot + bnt code_2332 + pushi $99 ; 153, respondsTo + push1 + pushi $58 ; 88, 'X', delete + pToa client + send $6 + bnot + bnt code_2332 + pushi $58 ; 88, 'X', delete + push1 + pushSelf + pToa client + send $6 + bnot +code_2332: pushi $69 ; 105, 'i', hide + push0 + self $4 + bnot + pToa scaler + bnt code_234f + pushi $95 ; 149, dispose + push0 + send $4 + bnot + ldi $0 + aTop scaler + ldi $80 ; 128, lastKey + aTop scaleY + aTop scaleX +code_234f: ldi $0 + aTop client + aTop pRoom +code_2355: ret + +WorldObject::addToRoom: + link $1 + lsp param[$1] + pToa pRoom + eq? + bnt code_236e + pushi $99 ; 153, respondsTo + push1 + pushi $319 ; 793, pHead + self $6 + bnot + bnt code_236e + ret + +code_236e: push1 + pushSelf + callk kernel_31, $2 + bnot + lap param[$1] + bnt code_23dd + pushi $3c7 ; 967, deleteFromCast + push0 + self $4 + bnot + lap param[$1] + aTop pRoom + pushi $9f ; 159, add + push1 + pushSelf + pushi $421 ; 1057, pWObjectList + push0 + send $4 + bnot + send $6 + bnot + pushi $17b ; 379, addToCast + push1 + pushi $f2 ; 242, pCast + push0 + lap param[$1] + send $4 + bnot + push + pushi $3c8 ; 968, matchScaler + push1 + lsp param[$1] + pushi $3c2 ; 962, generatePolygon + push0 + pushi $3c3 ; 963, submitPolygon + push0 + pushi $36a ; 874, updateDisplay + push1 + push1 + self $1a + bnot + pushi $3e0 ; 992, setVisible + push0 + self $4 + bnot + pToa script + sat temp[$0] +code_23c2: lat temp[$0] + bnt code_23dd + pushi $c5 ; 197, pRoom + push1 + lsp param[$1] + send $6 + bnot + pushi $c3 ; 195, script + push0 + lat temp[$0] + send $4 + bnot + sat temp[$0] + jmp code_23c2 + +code_23dd: ret + +WorldObject::deleteFromRoom: + pushSelf + lag global[$1] + ne? + bnt code_23ec + pushi $3a5 ; 933, hideContents + push0 + self $4 + bnot +code_23ec: pushi $3c7 ; 967, deleteFromCast + push0 + self $4 + bnot + ret + +WorldObject::matchScaler: + pToa pDoScaler + bnt code_243f + lap param[$1] + bnt code_243f + pushi $144 ; 324, scaler + push0 + send $4 + bnot + bnt code_243f + pTos scaleSignal + ldi $1 + or + aTop scaleSignal + pTos scaleSignal + ldi $fd ; 253, strip + and + aTop scaleSignal + pToa scaler + bnt code_2422 + pushi $95 ; 149, dispose + push0 + send $4 + bnot +code_2422: pushi $36 ; 54, '6', client + push1 + pushSelf + pushi $94 ; 148, init + push0 + pushi $8d ; 141, new + push0 + pushi $144 ; 324, scaler + push0 + lap param[$1] + send $4 + bnot + send $4 + bnot + aTop scaler + send $a + bnot +code_243f: ret + +WorldObject::validatePosn: + link $1 + pushi $97 ; 151, isKindOf + push1 + class WorldActor + push + self $6 + bnot + bnt code_249b + pTos pAction + ldi $3 ; z + lt? + bnt code_249b + pushi $45 ; 69, 'E', doit + pushi $4 ; scaleX + pushi $422 ; 1058, pSafeX + push0 + pToa pRoom + send $4 + bnot + push + pushi $423 ; 1059, pSafeY + push0 + pToa pRoom + send $4 + bnot + push + pTos x + pTos y + push2 + pushi $eac4 ; -5436 + push1 + callk kernel_2, $4 + bnot + send $c + bnot + sat temp[$0] + push1 + push0 + send $4 + bnot + aTop x + push2 + push0 + lat temp[$0] + send $4 + bnot + aTop y + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot +code_249b: ret + +WorldObject::setVisible: + pushi $144 ; 324, scaler + push0 + self $4 + bnot + bnt code_24b3 + pushi $45 ; 69, 'E', doit + push0 + pushi $144 ; 324, scaler + push0 + self $4 + bnot + send $4 + bnot +code_24b3: pToa pHidden + bnt code_24c1 + pushi $69 ; 105, 'i', hide + push0 + self $4 + bnot + jmp code_2592 + +code_24c1: pushi $3a7 ; 935, getBaseOwner + push0 + self $4 + bnot + push + selfID + ne? + bnt code_24d7 + pushi $69 ; 105, 'i', hide + push0 + self $4 + bnot + jmp code_2592 + +code_24d7: lag global[$1] + bnt code_2508 + pToa pCombatGroup + bnt code_2508 + pushi $97 ; 151, isKindOf + push1 + class CombatRoom + push + lag global[$3] + send $6 + bnot + not + bt code_24fc + pushi $2fb ; 763, pCombatGroup + push0 + lag global[$1] + send $4 + bnot + not +code_24fc: bnt code_2508 + pushi $69 ; 105, 'i', hide + push0 + self $4 + bnot + jmp code_2592 + +code_2508: lag global[$1] + bnt code_2548 + pToa pCombatGroup + bnt code_2548 + pushi $97 ; 151, isKindOf + push1 + class CombatRoom + push + lag global[$3] + send $6 + bnot + not + bt code_253c + pushi $128 ; 296, equalLong + push1 + pushi $2fb ; 763, pCombatGroup + push0 + lag global[$1] + send $4 + bnot + push + pushi $2fb ; 763, pCombatGroup + push0 + self $4 + bnot + send $6 + bnot + not +code_253c: bnt code_2548 + pushi $69 ; 105, 'i', hide + push0 + self $4 + bnot + jmp code_2592 + +code_2548: lag global[$1] + bnt code_2582 + pushSelf + ne? + bnt code_2582 + pushi $35f ; 863, getAffectedState + push1 + pushi $12 ; 18, nsLeft + self $6 + bnot + bt code_2567 + pushi $35f ; 863, getAffectedState + push1 + pushi $15 ; 21, nsBottom + self $6 + bnot +code_2567: bnt code_2582 + pushi $35f ; 863, getAffectedState + push1 + pushi $11 ; 17, bitmap + lag global[$1] + send $6 + bnot + not + bnt code_2582 + pushi $69 ; 105, 'i', hide + push0 + self $4 + bnot + jmp code_2592 + +code_2582: pushi $75 ; 117, 'u', show + push0 + &rest $1 + super Act, $4 + bnot + pushi $36a ; 874, updateDisplay + push0 + self $4 + bnot +code_2592: ret + +WorldObject::fromPacket: + link $14 + push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + not + bnt code_25a4 + ldi $0 + ret + +code_25a4: ldi $0 + sat temp[$d] + sat temp[$0] + lsp param[$0] + ldi $1 + gt? + bnt code_25ca + lap param[$2] + sat temp[$0] + push1 + push + calle export60000_0, $2 + bnot + not + bnt code_25ce + ldi $0 + sat temp[$0] + jmp code_25ce + +code_25ca: ldi $0 + sat temp[$0] +code_25ce: ldi $ff ; 255, asInteger + aTop pPolygon + ldi $0 + sat temp[$8] + pushi $94 ; 148, init + push0 + pushi $3c6 ; 966, deleteFromRoom + push0 + self $8 + bnot + ldi $0 + aTop pPolygon + push2 + pushi $4 ; scaleX + lsp param[$1] + callk kernel_156, $4 + bnot + sat temp[$9] + pushi $4b ; 75, 'K', at + push1 + push + push2 + pushi $9cb6 ; -25418 + push0 + callk kernel_2, $4 + bnot + send $6 + bnot + sat temp[$a] + bnt code_260c + pushi $45 ; 69, 'E', doit + push1 + pushSelf + send $6 + bnot +code_260c: pushi $373 ; 883, setAction + push1 + pTos pAction + self $6 + bnot + pushi $35c ; 860, getBase + push1 + class BCarryable + push + self $6 + bnot + bt code_2624 + pToa pClutStart +code_2624: aTop pBitmapBased + push2 + pushi $4 ; scaleX + lsp param[$1] + callk kernel_156, $4 + bnot + aTop pServIDLo + push2 + pushi $4 ; scaleX + lsp param[$1] + callk kernel_156, $4 + bnot + aTop pServIDHi + pushi $386 ; 902, hasBase + push1 + class BCharacter + push + self $6 + bnot + not + bnt code_2655 + push2 + pushi $4 ; scaleX + lsp param[$1] + callk kernel_156, $4 + bnot + aTop pColor +code_2655: pushi $2c8 ; 712, lookup + push2 + pTos pServIDLo + pTos pServIDHi + lag global[$6a] + send $8 + bnot + sat temp[$1] + bnt code_2671 + pushi $3df ; 991, setServID + push2 + pushi $ff ; 255, asInteger + dup + self $8 + bnot +code_2671: push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + bnt code_26b2 + pushi $8d ; 141, new + push0 + class Str + send $4 + bnot + sat temp[$12] + push2 + pushi $4 ; scaleX + pushi $71 ; 113, 'q', data + push0 + send $4 + bnot + push + callk kernel_91, $4 + bnot + pushi $71 ; 113, 'q', data + push1 + pushi $3 ; z + pushi $8 ; fixPriority + lsp param[$1] + push0 + callk kernel_156, $6 + bnot + push + lat temp[$12] + send $6 + bnot + pushi $3db ; 987, setName + push1 + lst temp[$12] + self $6 + bnot +code_26b2: push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + sat temp[$b] + push + ldi $ff ; 255, asInteger + ne? + bnt code_26cf + pushi $3d3 ; 979, setAffectedState + push1 + lst temp[$b] + self $6 + bnot + jmp code_26b2 + +code_26cf: push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + push + dup + ldi $1 + eq? + bnt code_2706 + ldi $1 + aTop pMoney + pushi $8d ; 141, new + push0 + class LongInt + send $4 + bnot + sat temp[$b] + pushi $b5 ; 181, set + push2 + push2 + pushi $4 ; scaleX + lsp param[$1] + callk kernel_156, $4 + bnot + push + push0 + lat temp[$b] + send $8 + bnot + jmp code_2728 + +code_2706: dup + ldi $2 + eq? + bnt code_2728 + ldi $1 + aTop pMoney + pushi $8d ; 141, new + push0 + class LongInt + send $4 + bnot + sat temp[$b] + pushi $3 ; z + pushi $6 ; maxScale + lsp param[$1] + push + callk kernel_156, $6 + bnot +code_2728: toss + pushi $3dd ; 989, addToServer + push0 + self $4 + bnot + pushi $35c ; 860, getBase + push1 + class BCharacter + push + self $6 + bnot + sat temp[$4] + bnt code_277c + push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + sag global[$e3] + push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + sag global[$e4] + pushi $1a9 ; 425, setStep + push2 + lsg global[$e3] + push + self $8 + bnot + push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + aTop xScaleAdj + push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + aTop yScaleAdj + pushi $36c ; 876, fromPacket + push1 + lsp param[$1] + lat temp[$4] + send $6 + bnot +code_277c: pToa pClutStart + bnt code_278a + pushi $3ae ; 942, setColor + push1 + pTos pColor + self $6 + bnot +code_278a: push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + sat temp[$13] + push + ldi $10 ; 16, cel + and + bnt code_27a6 + ldi $0 + aTop pDoScaler + lst temp[$13] + ldi $ef ; 239, dragDoit + and + sat temp[$13] +code_27a6: lat temp[$13] + bnt code_2831 + pushi $8d ; 141, new + push0 + class LongInt + send $4 + bnot + sat temp[$c] + lst temp[$13] + dup + ldi $1 + eq? + bnt code_27d6 + pushi $b5 ; 181, set + push2 + push2 + pushi $4 ; scaleX + lsp param[$1] + callk kernel_156, $4 + bnot + push + push0 + lat temp[$c] + send $8 + bnot + jmp code_27e9 + +code_27d6: dup + ldi $2 + eq? + bnt code_27e9 + pushi $3 ; z + pushi $6 ; maxScale + lsp param[$1] + lst temp[$c] + callk kernel_156, $6 + bnot +code_27e9: toss + pushi $2c6 ; 710, findRoom + push2 + lst temp[$c] + push0 + lag global[$30] + send $8 + bnot + sat temp[$8] + push2 + pushi $4 ; scaleX + lsp param[$1] + callk kernel_156, $4 + bnot + aTop x + push2 + pushi $4 ; scaleX + lsp param[$1] + callk kernel_156, $4 + bnot + aTop y + push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + aTop loop + pTos loop + push1 + pushSelf + callk kernel_21, $2 + bnot + ge? + bnt code_2828 + ldi $0 + aTop loop +code_2828: pushi $95 ; 149, dispose + push0 + lat temp[$c] + send $4 + bnot +code_2831: pushi $35c ; 860, getBase + push1 + class BCarryable + push + self $6 + bnot + sat temp[$4] + bnt code_2856 + pushi $36c ; 876, fromPacket + push1 + lsp param[$1] + send $6 + bnot + lat temp[$0] + bnt code_2856 + pushi $38e ; 910, take + push1 + pushSelf + send $6 + bnot +code_2856: pushi $35c ; 860, getBase + push1 + class BWeapon + push + self $6 + bnot + sat temp[$4] + bnt code_288c + push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + bnt code_28da + lat temp[$0] + bnt code_28da + pushi $424 ; 1060, pWearer + push1 + lst temp[$0] + lat temp[$4] + send $6 + bnot + pushi $393 ; 915, bePutOn + push1 + lst temp[$0] + self $6 + bnot + jmp code_28da + +code_288c: pushi $35c ; 860, getBase + push1 + class BHead + push + self $6 + bnot + sat temp[$4] + bnt code_28a7 + pushi $36c ; 876, fromPacket + push1 + lsp param[$1] + send $6 + bnot + jmp code_28da + +code_28a7: pushi $35c ; 860, getBase + push1 + class BWearable + push + self $6 + bnot + sat temp[$4] + bnt code_28da + push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + bnt code_28da + lat temp[$0] + bnt code_28da + pushi $424 ; 1060, pWearer + push1 + lst temp[$0] + lat temp[$4] + send $6 + bnot + pushi $393 ; 915, bePutOn + push1 + lst temp[$0] + self $6 + bnot +code_28da: pushi $35c ; 860, getBase + push1 + class BDescribed + push + self $6 + bnot + sat temp[$4] + bnt code_290e + push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + bnt code_2901 + pushi $645 ; 1605, pIsBook + push1 + push1 + lat temp[$4] + send $6 + bnot + jmp code_2916 + +code_2901: pushi $645 ; 1605, pIsBook + push1 + push0 + lat temp[$4] + send $6 + bnot + jmp code_2916 + +code_290e: push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot +code_2916: pushi $35c ; 860, getBase + push1 + class BContainer + push + self $6 + bnot + sat temp[$4] + bnt code_292e + pushi $36c ; 876, fromPacket + push1 + lsp param[$1] + send $6 + bnot +code_292e: pushi $35c ; 860, getBase + push1 + class BOpenable + push + self $6 + bnot + sat temp[$4] + bnt code_296c + push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + bnt code_296c + pushi $425 ; 1061, pOpen + push1 + push1 + lat temp[$4] + send $6 + bnot + pushi $373 ; 883, setAction + push1 + pushi $1e ; 30, brRight + self $6 + bnot + pushi $10 ; 16, cel + push1 + push1 + pushSelf + callk kernel_22, $2 + bnot + push + ldi $1 + sub + push + self $6 + bnot +code_296c: pushi $35c ; 860, getBase + push1 + class BSwitch + push + self $6 + bnot + sat temp[$4] + bnt code_2997 + push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + bnt code_2997 + pushi $425 ; 1061, pOpen + push1 + push1 + lat temp[$4] + send $6 + bnot + pushi $10 ; 16, cel + push1 + push1 + self $6 + bnot +code_2997: push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + sat temp[$11] + bnt code_29f2 + pushi $35c ; 860, getBase + push1 + class BLockable + push + self $6 + bnot + sat temp[$4] + not + bnt code_29c0 + pushi $387 ; 903, addBase + push1 + class BLockable + push + self $6 + bnot + sat temp[$4] +code_29c0: pushi $426 ; 1062, pLocked + push1 + lst temp[$11] + ldi $2 + and + bnt code_29d1 + ldi $1 + jmp code_29d3 + +code_29d1: ldi $0 +code_29d3: push + lat temp[$4] + send $6 + bnot + pushi $427 ; 1063, pAutoLock + push1 + lst temp[$11] + ldi $4 ; scaleX + and + bnt code_29ea + ldi $1 + jmp code_29ec + +code_29ea: ldi $0 +code_29ec: push + lat temp[$4] + send $6 + bnot +code_29f2: push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + bnt code_2a50 + pushi $373 ; 883, setAction + push1 + pushi $3 ; z + self $6 + bnot + pushi $10 ; 16, cel + push1 + push1 + pushSelf + callk kernel_22, $2 + bnot + push + ldi $1 + sub + push + self $6 + bnot + pushi $8d ; 141, new + push0 + class LongInt + send $4 + bnot + sat temp[$c] + pushi $3 ; z + pushi $6 ; maxScale + lsp param[$1] + push + callk kernel_156, $6 + bnot + pushi $384 ; 900, pSittingOn + push1 + pushi $2c8 ; 712, lookup + push1 + lst temp[$c] + lag global[$6a] + send $6 + bnot + push + pushi $9a ; 154, yourself + push0 + self $4 + bnot + send $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$c] + send $4 + bnot +code_2a50: push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + bnt code_2a73 + pushi $35c ; 860, getBase + push1 + class BTalk + push + self $6 + bnot + not + bnt code_2a73 + pushi $387 ; 903, addBase + push1 + class BTalk + push + self $6 + bnot +code_2a73: push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + bnt code_2a86 + pushi $3fb ; 1019, pHidden + push1 + push1 + self $6 + bnot +code_2a86: push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + bnt code_2b67 + pToa pCombatGroup + not + bnt code_2aa7 + pushi $8d ; 141, new + push2 + pushi $ff ; 255, asInteger + dup + class LongInt + send $8 + bnot + aTop pCombatGroup +code_2aa7: pushi $3 ; z + pushi $6 ; maxScale + lsp param[$1] + pTos pCombatGroup + callk kernel_156, $6 + bnot + pushi $97 ; 151, isKindOf + push1 + class CombatRoom + push + lag global[$3] + send $6 + bnot + not + bt code_2ad8 + pushi $128 ; 296, equalLong + push1 + pTos pCombatGroup + pushi $2ca ; 714, pServID + push0 + lag global[$3] + send $4 + bnot + send $6 + bnot + not +code_2ad8: not + bnt code_2ae0 + lag global[$3] + sat temp[$8] +code_2ae0: lag global[$1] + bnt code_2b5f + pushi $c5 ; 197, pRoom + push0 + send $4 + bnot + bnt code_2b5f + pushi $2fb ; 763, pCombatGroup + push0 + lag global[$1] + send $4 + bnot + bnt code_2b5f + pushi $128 ; 296, equalLong + push1 + pushi $2fb ; 763, pCombatGroup + push0 + lag global[$1] + send $4 + bnot + push + pToa pCombatGroup + send $6 + bnot + bnt code_2b5f + pushi $99 ; 153, respondsTo + push1 + pushi $319 ; 793, pHead + self $6 + bnot + bnt code_2b54 + push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + bnt code_2b3f + pushi $31b ; 795, addCombatant + push2 + pushSelf + push0 + pushi $c5 ; 197, pRoom + push0 + lag global[$1] + send $4 + bnot + send $8 + bnot + jmp code_2b67 + +code_2b3f: pushi $31b ; 795, addCombatant + push2 + pushSelf + push1 + pushi $c5 ; 197, pRoom + push0 + lag global[$1] + send $4 + bnot + send $8 + bnot + jmp code_2b67 + +code_2b54: push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot + jmp code_2b67 + +code_2b5f: push2 + push2 + lsp param[$1] + callk kernel_156, $4 + bnot +code_2b67: pushi $35c ; 860, getBase + push1 + class BCharacter + push + self $6 + bnot + sat temp[$1] + bnt code_2bc0 + push2 + push1 + push2 + pushi $9 ; inLeft + pushi $35d ; 861, pProperName + push0 + send $4 + bnot + push + callk kernel_91, $4 + bnot + push + callk kernel_92, $4 + bnot + bnt code_2bad + pushi $3db ; 987, setName + push1 + pushi $d0 ; 208, with + push1 + pushi $35d ; 861, pProperName + push0 + lat temp[$1] + send $4 + bnot + push + class Str + send $6 + bnot + push + self $6 + bnot + jmp code_2bc0 + +code_2bad: pushi $3db ; 987, setName + push1 + pushi $d0 ; 208, with + push1 + pTos pName + class Str + send $6 + bnot + push + self $6 + bnot +code_2bc0: pToa pMoney + bnt code_2bed + pTos pBaseView + ldi $c5a8 ; -14936 + eq? + bnt code_2bdb + pushi $3d8 ; 984, setManaValue + push1 + lst temp[$b] + self $6 + bnot + jmp code_2be4 + +code_2bdb: pushi $3d5 ; 981, setValue + push1 + lst temp[$b] + self $6 + bnot +code_2be4: pushi $95 ; 149, dispose + push0 + lat temp[$b] + send $4 + bnot +code_2bed: lat temp[$8] + bnt code_2bfa + pushi $3c5 ; 965, addToRoom + push1 + push + self $6 + bnot +code_2bfa: pushi $3e0 ; 992, setVisible + push0 + self $4 + bnot + pushi $3c2 ; 962, generatePolygon + push0 + pushi $3c3 ; 963, submitPolygon + push0 + pushi $36a ; 874, updateDisplay + push1 + push1 + self $e + bnot + pTos pServIDLo + pToa pServIDHi + eq? + bnt code_2c1d + pprev + ldi $ff ; 255, asInteger + eq? +code_2c1d: bt code_2c30 + lat temp[$0] + not + bnt code_2c36 + lsp param[$0] + ldi $1 + gt? + bnt code_2c36 + lap param[$2] +code_2c30: bnt code_2c36 + ldi $0 + ret + +code_2c36: ldi $1 + ret + +WorldObject::fromExtendedPacket: + link $5 + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + sat temp[$4] + push + ldi $2 + and + bnt code_2ccb + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pStrength + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pDexterity + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pIntelligence + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pEndurance + pushi $3d5 ; 981, setValue + push1 + pushi $136 ; 310, getLong + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] + push + self $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot + pushi $3d8 ; 984, setManaValue + push1 + pushi $136 ; 310, getLong + push0 + lap param[$1] + send $4 + bnot + sat temp[$0] + push + self $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot + pushi $135 ; 309, getWord + push0 + lap param[$1] + send $4 + bnot + aTop pLevel + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pAlignment + jmp code_2cfb + +code_2ccb: pushi $8d ; 141, new + push2 + push0 + push0 + class LongInt + send $8 + bnot + sat temp[$0] + ldi $0 + aTop pStrength + aTop pDexterity + aTop pIntelligence + aTop pEndurance + pushi $3d5 ; 981, setValue + push1 + lst temp[$0] + self $6 + bnot + pushi $3d8 ; 984, setManaValue + push1 + lst temp[$0] + self $6 + bnot + ldi $0 + aTop pLevel + aTop pAlignment +code_2cfb: pushi $135 ; 309, getWord + push0 + lap param[$1] + send $4 + bnot + aTop pHealth + pushi $135 ; 309, getWord + push0 + lap param[$1] + send $4 + bnot + aTop pHealthHi + pushi $135 ; 309, getWord + push0 + lap param[$1] + send $4 + bnot + aTop pHealthMax + pushi $135 ; 309, getWord + push0 + lap param[$1] + send $4 + bnot + aTop pHealthMaxHi + pushi $35c ; 860, getBase + push1 + class BCharacter + push + self $6 + bnot + sat temp[$1] + bnt code_2f9a + pushi $139 ; 313, getString + push0 + lap param[$1] + send $4 + bnot + sat temp[$3] + pushi $42a ; 1066, setTitle + push1 + push + lat temp[$1] + send $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$3] + send $4 + bnot + lst temp[$4] + ldi $2 + and + bnt code_2e8d + pushi $42b ; 1067, pExperience + push0 + lat temp[$1] + send $4 + bnot + bnt code_2d7e + pushi $136 ; 310, getLong + push1 + pushi $42b ; 1067, pExperience + push0 + lat temp[$1] + send $4 + bnot + push + lap param[$1] + send $6 + bnot + jmp code_2d91 + +code_2d7e: pushi $42b ; 1067, pExperience + push1 + pushi $136 ; 310, getLong + push0 + lap param[$1] + send $4 + bnot + push + lat temp[$1] + send $6 + bnot +code_2d91: pushi $42c ; 1068, pStealingCount + push1 + pushi $136 ; 310, getLong + push0 + lap param[$1] + send $4 + bnot + push + lat temp[$1] + send $6 + bnot + pushi $42d ; 1069, pStealingUnserved + push1 + pushi $136 ; 310, getLong + push0 + lap param[$1] + send $4 + bnot + push + lat temp[$1] + send $6 + bnot + pushi $42e ; 1070, pKillingCount + push1 + pushi $136 ; 310, getLong + push0 + lap param[$1] + send $4 + bnot + push + lat temp[$1] + send $6 + bnot + pushi $42f ; 1071, pKillingUnserved + push1 + pushi $136 ; 310, getLong + push0 + lap param[$1] + send $4 + bnot + push + lat temp[$1] + send $6 + bnot + ldi $0 + sat temp[$2] +code_2de1: lst temp[$2] + ldi $1f ; 31, brBottom + lt? + bnt code_2e08 + pushi $4b ; 75, 'K', at + push2 + lst temp[$2] + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + push + pushi $430 ; 1072, pSkillArray + push0 + lat temp[$1] + send $4 + bnot + send $8 + bnot + +at temp[$2] + jmp code_2de1 + +code_2e08: ldi $0 + sat temp[$2] +code_2e0c: lst temp[$2] + ldi $94 ; 148, init + lt? + bnt code_2e34 + pushi $4b ; 75, 'K', at + push2 + lst temp[$2] + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + push + pushi $431 ; 1073, pSpellArray + push0 + lat temp[$1] + send $4 + bnot + send $8 + bnot + +at temp[$2] + jmp code_2e0c + +code_2e34: ldi $0 + sat temp[$2] +code_2e38: lst temp[$2] + ldi $64 ; 100, 'd', moveDone + lt? + bnt code_2e77 + pushi $322 ; 802, pStatusArray + push0 + class CharInfo + send $4 + bnot + bnt code_2e6a + pushi $4b ; 75, 'K', at + push2 + lst temp[$2] + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + push + pushi $322 ; 802, pStatusArray + push0 + class CharInfo + send $4 + bnot + send $8 + bnot + jmp code_2e73 + +code_2e6a: pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot +code_2e73: +at temp[$2] + jmp code_2e38 + +code_2e77: pushi $432 ; 1074, pBuildPoints + push1 + pushi $135 ; 309, getWord + push0 + lap param[$1] + send $4 + bnot + push + lat temp[$1] + send $6 + bnot + jmp code_2f78 + +code_2e8d: pushi $42b ; 1067, pExperience + push1 + pushi $8d ; 141, new + push2 + push0 + push0 + class LongInt + send $8 + bnot + push + lat temp[$1] + send $6 + bnot + pushi $42c ; 1068, pStealingCount + push1 + pushi $8d ; 141, new + push2 + push0 + push0 + class LongInt + send $8 + bnot + push + lat temp[$1] + send $6 + bnot + pushi $42d ; 1069, pStealingUnserved + push1 + pushi $8d ; 141, new + push2 + push0 + push0 + class LongInt + send $8 + bnot + push + lat temp[$1] + send $6 + bnot + pushi $42e ; 1070, pKillingCount + push1 + pushi $8d ; 141, new + push2 + push0 + push0 + class LongInt + send $8 + bnot + push + lat temp[$1] + send $6 + bnot + pushi $42f ; 1071, pKillingUnserved + push1 + pushi $8d ; 141, new + push2 + push0 + push0 + class LongInt + send $8 + bnot + push + lat temp[$1] + send $6 + bnot + ldi $0 + sat temp[$2] +code_2efa: lst temp[$2] + ldi $1f ; 31, brBottom + lt? + bnt code_2f18 + pushi $4b ; 75, 'K', at + push2 + lst temp[$2] + push0 + pushi $430 ; 1072, pSkillArray + push0 + lat temp[$1] + send $4 + bnot + send $8 + bnot + +at temp[$2] + jmp code_2efa + +code_2f18: ldi $0 + sat temp[$2] +code_2f1c: lst temp[$2] + ldi $94 ; 148, init + lt? + bnt code_2f3b + pushi $4b ; 75, 'K', at + push2 + lst temp[$2] + push0 + pushi $431 ; 1073, pSpellArray + push0 + lat temp[$1] + send $4 + bnot + send $8 + bnot + +at temp[$2] + jmp code_2f1c + +code_2f3b: ldi $0 + sat temp[$2] +code_2f3f: lst temp[$2] + ldi $64 ; 100, 'd', moveDone + lt? + bnt code_2f6e + pushi $322 ; 802, pStatusArray + push0 + class CharInfo + send $4 + bnot + bnt code_2f68 + pushi $4b ; 75, 'K', at + push2 + lst temp[$2] + push0 + pushi $322 ; 802, pStatusArray + push0 + class CharInfo + send $4 + bnot + send $8 + bnot + jmp code_2f6a + +code_2f68: ldi $0 +code_2f6a: +at temp[$2] + jmp code_2f3f + +code_2f6e: pushi $432 ; 1074, pBuildPoints + push1 + push0 + lat temp[$1] + send $6 + bnot +code_2f78: pushi $135 ; 309, getWord + push0 + lap param[$1] + send $4 + bnot + aTop pArmorClass + selfID + sat temp[$1] + pushi $433 ; 1075, pPeaceful + push1 + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + push + lat temp[$1] + send $6 + bnot +code_2f9a: ret + +WorldObject::buildExtendedPacket: + link $1 + pushi $13a ; 314, putByte + push1 + pTos pStrength + lap param[$1] + send $6 + bnot + pushi $13a ; 314, putByte + push1 + pTos pDexterity + lap param[$1] + send $6 + bnot + pushi $13a ; 314, putByte + push1 + pTos pIntelligence + lap param[$1] + send $6 + bnot + pushi $13a ; 314, putByte + push1 + pTos pEndurance + lap param[$1] + send $6 + bnot + pushi $13a ; 314, putByte + push1 + pTos pAlignment + lap param[$1] + send $6 + bnot + pushi $13a ; 314, putByte + push1 + pTos xScaleAdj + lap param[$1] + send $6 + bnot + pushi $13a ; 314, putByte + push1 + pTos yScaleAdj + lap param[$1] + send $6 + bnot + ret + +WorldObject::getServIDs: + push1 + lofsa string_03d2 ; "getServIDs called" + push + calle export60029_0, $2 + bnot + ret + +WorldObject::nextFeature: + pushi $63 ; 99, 'c', perform + push1 + pushi $3a2 ; 930, nextFeature + &rest $1 + self $6 + bnot + ret + +WorldObject::prevFeature: + pushi $63 ; 99, 'c', perform + push1 + pushi $3a3 ; 931, prevFeature + &rest $1 + self $6 + bnot + ret + +WorldObject::setView: + lap param[$1] + aTop pBaseView + pTos pBaseView + pToa pAction + add + aTop view + ret + +WorldObject::changed: + link $1 + pToa pMovieCmd + bnt code_3042 + pushi $434 ; 1076, pDone + push0 + send $4 + bnot + bnt code_303a + pushi $95 ; 149, dispose + push0 + pToa pMovieCmd + send $4 + bnot + jmp code_3042 + +code_303a: pushi $45 ; 69, 'E', doit + push0 + pToa pMovieCmd + send $4 + bnot +code_3042: pToa pBaseList + bnt code_3078 + pushi $4 ; scaleX + pushi $14 ; 20, nsRight + push + pushi $97 ; 151, isKindOf + class BContainer + push + callk kernel_90, $8 + bnot + sat temp[$0] + bnt code_3078 + pushi $420 ; 1056, pContents + push0 + send $4 + bnot + bnt code_3078 + pushi $9d ; 157, eachElementDo + push1 + pushi $3cb ; 971, changed + pushi $420 ; 1056, pContents + push0 + lat temp[$0] + send $4 + bnot + send $6 + bnot +code_3078: ret + +WorldObject::sendMovie: + link $3 + pToa pSendMovie + bt code_308a + lsp param[$0] + ldi $0 + gt? + bnt code_3131 + lap param[$1] +code_308a: bnt code_3131 + pToa mover + bnt code_309d + pushi $3ce ; 974, recordMotion + push2 + pTos x + pTos y + self $8 + bnot +code_309d: pToa pOutgoingMovie + bnt code_3131 + pushi $5a ; 90, 'Z', size + push0 + send $4 + bnot + bnt code_3131 + pushi $2f8 ; 760, buildPacket + push0 + pToa pOutgoingMovie + send $4 + bnot + sat temp[$1] + pToa pRoom + bnt code_30f4 + pushi $97 ; 151, isKindOf + push1 + class CombatRoom + push + pToa pRoom + send $6 + bnot + bnt code_30e6 + pushi $2f5 ; 757, pNumber + push0 + pushi $4b ; 75, 'K', at + push1 + push0 + pushi $2c1 ; 705, pRoomList + push0 + lag global[$30] + send $4 + bnot + send $6 + bnot + send $4 + bnot + sat temp[$2] + jmp code_30f8 + +code_30e6: pushi $2f5 ; 757, pNumber + push0 + pToa pRoom + send $4 + bnot + sat temp[$2] + jmp code_30f8 + +code_30f4: ldi $0 + sat temp[$2] +code_30f8: pushi $7 ; priority + pushi $e ; 14, view + lofsa string_03e4 ; "tpla" + push + pushi $29 ; 41, ')', state + pushSelf + lst temp[$2] + pushi $5a ; 90, 'Z', size + push0 + lat temp[$1] + send $4 + bnot + push + pushi $71 ; 113, 'q', data + push0 + lat temp[$1] + send $4 + bnot + push + callk kernel_128, $e + bnot + ldi $0 + aTop pSendMovie + pushi $95 ; 149, dispose + push0 + lat temp[$1] + send $4 + bnot + pushi $435 ; 1077, toss + push0 + pToa pOutgoingMovie + send $4 + bnot +code_3131: ret + +WorldObject::moveDone: + pToa pPlayMovie + not + bnt code_3143 + pushi $3ce ; 974, recordMotion + push2 + pTos x + pTos y + self $8 + bnot +code_3143: ret + +WorldObject::recordPosn: + pToa pOutgoingMovie + bnt code_317d + pToa pPlayMovie + not + bnt code_317d + pushi $9f ; 159, add + push1 + pushi $94 ; 148, init + pushi $3 ; z + pTos x + pTos y + pTos loop + pushi $9a ; 154, yourself + push0 + pushi $8d ; 141, new + push1 + push1 + push2 + pushi $9ca5 ; -25435 + push0 + callk kernel_2, $4 + bnot + send $6 + bnot + send $e + bnot + push + pToa pOutgoingMovie + send $6 + bnot +code_317d: ret + +WorldObject::recordMotion: + pToa pOutgoingMovie + bnt code_31b9 + pToa pPlayMovie + not + bnt code_31b9 + pToa pRecordMotion + bnt code_31b9 + pushi $9f ; 159, add + push1 + pushi $94 ; 148, init + push2 + lsp param[$1] + lsp param[$2] + pushi $9a ; 154, yourself + push0 + pushi $8d ; 141, new + push1 + push1 + push2 + pushi $9ca5 ; -25435 + push1 + callk kernel_2, $4 + bnot + send $6 + bnot + send $c + bnot + push + pToa pOutgoingMovie + send $6 + bnot +code_31b9: ret + +WorldObject::recordHide: + pToa pOutgoingMovie + bnt code_31ec + pToa pPlayMovie + not + bnt code_31ec + pushi $9f ; 159, add + push1 + pushi $94 ; 148, init + push0 + pushi $9a ; 154, yourself + push0 + pushi $8d ; 141, new + push1 + push1 + push2 + pushi $9ca5 ; -25435 + pushi $3 ; z + callk kernel_2, $4 + bnot + send $6 + bnot + send $8 + bnot + push + pToa pOutgoingMovie + send $6 + bnot +code_31ec: ret + +WorldObject::recordShow: + pToa pOutgoingMovie + bnt code_321e + pToa pPlayMovie + not + bnt code_321e + pushi $9f ; 159, add + push1 + pushi $94 ; 148, init + push0 + pushi $9a ; 154, yourself + push0 + pushi $8d ; 141, new + push1 + push1 + push2 + pushi $9ca5 ; -25435 + push2 + callk kernel_2, $4 + bnot + send $6 + bnot + send $8 + bnot + push + pToa pOutgoingMovie + send $6 + bnot +code_321e: ret + +WorldObject::recordHeading: + pToa pOutgoingMovie + bnt code_3259 + pToa pPlayMovie + not + bnt code_3259 + pToa pRecordMotion + bnt code_3259 + pushi $9f ; 159, add + push1 + pushi $94 ; 148, init + push1 + lsp param[$1] + pushi $9a ; 154, yourself + push0 + pushi $8d ; 141, new + push1 + push1 + push2 + pushi $9ca5 ; -25435 + pushi $4 ; scaleX + callk kernel_2, $4 + bnot + send $6 + bnot + send $a + bnot + push + pToa pOutgoingMovie + send $6 + bnot +code_3259: ret + +WorldObject::setHeading: + link $1 + pToa loop + sat temp[$0] + push2 + pushSelf + lsp param[$1] + callk kernel_95, $4 + bnot + lst temp[$0] + pToa loop + ne? + bnt code_3292 + pToa pPlayMovie + not + bnt code_327f + pushi $3d1 ; 977, recordHeading + push1 + lsp param[$1] + self $6 + bnot +code_327f: lat temp[$0] + aTop loop + pushi $15a ; 346, setHeading + push1 + lsp param[$1] + &rest $2 + super Act, $6 + bnot + jmp code_32a5 + +code_3292: lsp param[$0] + ldi $1 + gt? + bnt code_32a5 + pushi $c7 ; 199, cue + push0 + ldi $1 + lapi param[$1] + send $4 + bnot +code_32a5: ret + +WorldObject::getAffectedState: + pToa pAffectedHi + bnt code_32b4 + pushi $4b ; 75, 'K', at + push1 + lsp param[$1] + send $6 + bnot + ret + +code_32b4: ldi $0 + ret + +WorldObject::setAffectedState: + link $3 + pToa pAffectedHi + not + bnt code_32cc + pushi $8d ; 141, new + push1 + pushi $64 ; 100, 'd', moveDone + class ByteArray + send $6 + bnot + aTop pAffectedHi +code_32cc: pushi $4b ; 75, 'K', at + push2 + lsp param[$1] + push1 + pToa pAffectedHi + send $8 + bnot + lsp param[$1] + ldi $12 ; 18, nsLeft + eq? + bt code_32e4 + lsp param[$1] + ldi $15 ; 21, nsBottom + eq? +code_32e4: bnt code_332d + pushi $97 ; 151, isKindOf + push1 + class WorldEgo + push + self $6 + bnot + bt code_3302 + lag global[$1] + bnt code_3345 + pushi $35f ; 863, getAffectedState + push1 + pushi $11 ; 17, bitmap + send $6 + bnot +code_3302: bnt code_3345 + pushi $94 ; 148, init + push0 + pushi $8d ; 141, new + push0 + class InvisibleClut + send $4 + bnot + sat temp[$0] + send $4 + bnot + lat temp[$0] + aTop pInvisibleClut + push0 + call code_0869, $0 + bnot + pushi $36a ; 874, updateDisplay + push1 + push1 + self $6 + bnot + jmp code_3345 + +code_332d: lsp param[$1] + ldi $58 ; 88, 'X', delete + ge? + bnt code_3345 + lsp param[$1] + ldi $62 ; 98, 'b', vol + le? + bnt code_3345 + pushi $36a ; 874, updateDisplay + push1 + push1 + self $6 + bnot +code_3345: pushi $35c ; 860, getBase + push1 + class BCarryable + push + self $6 + bnot + sat temp[$1] + bnt code_335b + pushi $436 ; 1078, updateContainerButton + push0 + send $4 + bnot +code_335b: pushi $3e0 ; 992, setVisible + push0 + self $4 + bnot + ret + +WorldObject::clearAffectedState: + link $2 + pToa pAffectedHi + not + bnt code_336c + ret + +code_336c: pushi $4b ; 75, 'K', at + push2 + lsp param[$1] + push0 + pToa pAffectedHi + send $8 + bnot + lsp param[$1] + ldi $12 ; 18, nsLeft + eq? + bt code_3384 + lsp param[$1] + ldi $15 ; 21, nsBottom + eq? +code_3384: bnt code_33aa + pToa pInvisibleClut + bnt code_33dd + pushi $95 ; 149, dispose + push0 + send $4 + bnot + ldi $0 + aTop pInvisibleClut + push0 + call code_08b7, $0 + bnot + pushi $36a ; 874, updateDisplay + push1 + push1 + self $6 + bnot + jmp code_33dd + +code_33aa: lsp param[$1] + ldi $58 ; 88, 'X', delete + ge? + bnt code_33c5 + lsp param[$1] + ldi $62 ; 98, 'b', vol + le? + bnt code_33c5 + pushi $36a ; 874, updateDisplay + push1 + push1 + self $6 + bnot + jmp code_33dd + +code_33c5: lsp param[$1] + ldi $58 ; 88, 'X', delete + ge? + bnt code_33dd + lsp param[$1] + ldi $62 ; 98, 'b', vol + le? + bnt code_33dd + pushi $36a ; 874, updateDisplay + push1 + push1 + self $6 + bnot +code_33dd: pushi $35c ; 860, getBase + push1 + class BCarryable + push + self $6 + bnot + sat temp[$0] + bnt code_33f3 + pushi $436 ; 1078, updateContainerButton + push0 + send $4 + bnot +code_33f3: pushi $3e0 ; 992, setVisible + push0 + self $4 + bnot + ret + +WorldObject::setValue: + link $4 + pToa pValue + not + bnt code_340e + pushi $8d ; 141, new + push0 + class LongInt + send $4 + bnot + aTop pValue +code_340e: pushi $b5 ; 181, set + push2 + pushi $10d ; 269, lowWord + push0 + lap param[$1] + send $4 + bnot + push + pushi $10e ; 270, hiWord + push0 + lap param[$1] + send $4 + bnot + push + pToa pValue + send $8 + bnot + pushi $129 ; 297, less + push1 + push0 + pToa pValue + send $6 + bnot + bnt code_3443 + pushi $b5 ; 181, set + push2 + push0 + push0 + pToa pValue + send $8 + bnot +code_3443: pToa pMoney + bnt code_354f + pushi $131 ; 305, asStr + push0 + pToa pValue + send $4 + bnot + sat temp[$2] + pushi $3db ; 987, setName + push1 + pushi $f5 ; 245, format + pushi $3 ; z + lofsa string_03e9 ; "%s gold coin%s" + push + lst temp[$2] + pushi $127 ; 295, equal + push1 + push1 + pToa pValue + send $6 + bnot + bnt code_3477 + lofsa string_03f8 ; "" + jmp code_347a + +code_3477: lofsa string_03f9 ; "s" +code_347a: push + class Str + send $a + bnot + push + self $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$2] + send $4 + bnot + pushi $8d ; 141, new + push0 + class LongInt + send $4 + bnot + sat temp[$0] + pushi $110 ; 272, addLong + push1 + pTos pValue + send $6 + bnot + pushi $127 ; 295, equal + push2 + push0 + push0 + lat temp[$0] + send $8 + bnot + not + bnt code_3524 + pushi $113 ; 275, mul + push1 + pushi $a ; 10, inTop + lat temp[$0] + send $6 + bnot + pushi $115 ; 277, div + push1 + pushi $32 ; 50, '2', edit + lat temp[$0] + send $6 + bnot + pushi $129 ; 297, less + push1 + push0 + lat temp[$0] + send $6 + bnot + bnt code_34de + pushi $b5 ; 181, set + push1 + pushi $64 ; 100, 'd', moveDone + lat temp[$0] + send $6 + bnot +code_34de: pushi $12d ; 301, greater + push1 + pushi $64 ; 100, 'd', moveDone + lat temp[$0] + send $6 + bnot + bnt code_34f7 + pushi $b5 ; 181, set + push1 + pushi $64 ; 100, 'd', moveDone + lat temp[$0] + send $6 + bnot +code_34f7: pushi $113 ; 275, mul + push1 + push1 + pushSelf + callk kernel_22, $2 + bnot + push + lat temp[$0] + send $6 + bnot + pushi $115 ; 277, div + push1 + pushi $64 ; 100, 'd', moveDone + lat temp[$0] + send $6 + bnot + pushi $10d ; 269, lowWord + push0 + lat temp[$0] + send $4 + bnot + push + ldi $1 + add + aTop cel + jmp code_3528 + +code_3524: ldi $0 + aTop cel +code_3528: pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot + pushi $36a ; 874, updateDisplay + push1 + push1 + self $6 + bnot + pushi $35c ; 860, getBase + push1 + class BCarryable + push + self $6 + bnot + sat temp[$1] + bnt code_354f + pushi $436 ; 1078, updateContainerButton + push0 + send $4 + bnot +code_354f: pushSelf + lag global[$1] + eq? + bnt code_3593 + push1 + pushi $437 ; 1079, pMoneyObj + push0 + lag global[$1] + send $4 + bnot + push + calle export60000_0, $2 + bnot + bnt code_3593 + pushi $97 ; 151, isKindOf + push1 + class Money + push + pushi $437 ; 1079, pMoneyObj + push0 + lag global[$1] + send $4 + bnot + send $6 + bnot + bnt code_3593 + pushi $3d5 ; 981, setValue + push1 + pTos pValue + pushi $437 ; 1079, pMoneyObj + push0 + lag global[$1] + send $4 + bnot + send $6 + bnot +code_3593: ret + +WorldObject::setManaValue: + link $4 + pToa pManaValue + not + bnt code_35a7 + pushi $8d ; 141, new + push0 + class LongInt + send $4 + bnot + aTop pManaValue +code_35a7: pushi $b5 ; 181, set + push2 + pushi $10d ; 269, lowWord + push0 + lap param[$1] + send $4 + bnot + push + pushi $10e ; 270, hiWord + push0 + lap param[$1] + send $4 + bnot + push + pToa pManaValue + send $8 + bnot + pushi $129 ; 297, less + push1 + push0 + pToa pManaValue + send $6 + bnot + bnt code_35dc + pushi $b5 ; 181, set + push2 + push0 + push0 + pToa pManaValue + send $8 + bnot +code_35dc: pToa pMoney + bnt code_36e8 + pushi $131 ; 305, asStr + push0 + pToa pManaValue + send $4 + bnot + sat temp[$2] + pushi $3db ; 987, setName + push1 + pushi $f5 ; 245, format + pushi $3 ; z + lofsa string_03fb ; "%s mana crystal%s" + push + lst temp[$2] + pushi $127 ; 295, equal + push1 + push1 + pToa pManaValue + send $6 + bnot + bnt code_3610 + lofsa string_03f8 ; "" + jmp code_3613 + +code_3610: lofsa string_03f9 ; "s" +code_3613: push + class Str + send $a + bnot + push + self $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$2] + send $4 + bnot + pushi $8d ; 141, new + push0 + class LongInt + send $4 + bnot + sat temp[$0] + pushi $110 ; 272, addLong + push1 + pTos pManaValue + send $6 + bnot + pushi $127 ; 295, equal + push2 + push0 + push0 + lat temp[$0] + send $8 + bnot + not + bnt code_36bd + pushi $113 ; 275, mul + push1 + pushi $a ; 10, inTop + lat temp[$0] + send $6 + bnot + pushi $115 ; 277, div + push1 + pushi $32 ; 50, '2', edit + lat temp[$0] + send $6 + bnot + pushi $129 ; 297, less + push1 + push0 + lat temp[$0] + send $6 + bnot + bnt code_3677 + pushi $b5 ; 181, set + push1 + pushi $64 ; 100, 'd', moveDone + lat temp[$0] + send $6 + bnot +code_3677: pushi $12d ; 301, greater + push1 + pushi $64 ; 100, 'd', moveDone + lat temp[$0] + send $6 + bnot + bnt code_3690 + pushi $b5 ; 181, set + push1 + pushi $64 ; 100, 'd', moveDone + lat temp[$0] + send $6 + bnot +code_3690: pushi $113 ; 275, mul + push1 + push1 + pushSelf + callk kernel_22, $2 + bnot + push + lat temp[$0] + send $6 + bnot + pushi $115 ; 277, div + push1 + pushi $64 ; 100, 'd', moveDone + lat temp[$0] + send $6 + bnot + pushi $10d ; 269, lowWord + push0 + lat temp[$0] + send $4 + bnot + push + ldi $1 + add + aTop cel + jmp code_36c1 + +code_36bd: ldi $0 + aTop cel +code_36c1: pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot + pushi $36a ; 874, updateDisplay + push1 + push1 + self $6 + bnot + pushi $35c ; 860, getBase + push1 + class BCarryable + push + self $6 + bnot + sat temp[$1] + bnt code_36e8 + pushi $436 ; 1078, updateContainerButton + push0 + send $4 + bnot +code_36e8: pushSelf + lag global[$1] + eq? + bnt code_372c + push1 + pushi $438 ; 1080, pManaObj + push0 + lag global[$1] + send $4 + bnot + push + calle export60000_0, $2 + bnot + bnt code_372c + pushi $97 ; 151, isKindOf + push1 + class Mana + push + pushi $438 ; 1080, pManaObj + push0 + lag global[$1] + send $4 + bnot + send $6 + bnot + bnt code_372c + pushi $3d8 ; 984, setManaValue + push1 + pTos pValue + pushi $438 ; 1080, pManaObj + push0 + lag global[$1] + send $4 + bnot + send $6 + bnot +code_372c: ret + +WorldObject::addValue: + link $1 + pToa pValue + bnt code_3765 + pushi $8d ; 141, new + push0 + class LongInt + send $4 + bnot + sat temp[$0] + pushi $110 ; 272, addLong + push1 + pTos pValue + send $6 + bnot + pushi $110 ; 272, addLong + push1 + lsp param[$1] + lat temp[$0] + send $6 + bnot + pushi $3d5 ; 981, setValue + push1 + lst temp[$0] + self $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot +code_3765: ret + +WorldObject::subValue: + link $1 + pToa pValue + bnt code_379e + pushi $8d ; 141, new + push0 + class LongInt + send $4 + bnot + sat temp[$0] + pushi $110 ; 272, addLong + push1 + pTos pValue + send $6 + bnot + pushi $112 ; 274, subLong + push1 + lsp param[$1] + lat temp[$0] + send $6 + bnot + pushi $3d5 ; 981, setValue + push1 + lst temp[$0] + self $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot +code_379e: ret + +WorldObject::addManaValue: + link $1 + pToa pManaValue + bnt code_37d7 + pushi $8d ; 141, new + push0 + class LongInt + send $4 + bnot + sat temp[$0] + pushi $110 ; 272, addLong + push1 + pTos pManaValue + send $6 + bnot + pushi $110 ; 272, addLong + push1 + lsp param[$1] + lat temp[$0] + send $6 + bnot + pushi $3d8 ; 984, setManaValue + push1 + lst temp[$0] + self $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot +code_37d7: ret + +WorldObject::subManaValue: + link $1 + pToa pManaValue + bnt code_3810 + pushi $8d ; 141, new + push0 + class LongInt + send $4 + bnot + sat temp[$0] + pushi $110 ; 272, addLong + push1 + pTos pManaValue + send $6 + bnot + pushi $112 ; 274, subLong + push1 + lsp param[$1] + lat temp[$0] + send $6 + bnot + pushi $3d8 ; 984, setManaValue + push1 + lst temp[$0] + self $6 + bnot + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot +code_3810: ret + +WorldObject::setName: + link $1 + push1 + pTos pName + calle export60000_0, $2 + bnot + bnt code_382d + pushi $95 ; 149, dispose + push0 + pToa pName + send $4 + bnot + ldi $0 + aTop pName +code_382d: lap param[$1] + bnt code_3852 + push1 + push + calle export60000_0, $2 + bnot + bnt code_3845 + lap param[$1] + aTop pName + jmp code_3852 + +code_3845: pushi $d0 ; 208, with + push1 + lsp param[$1] + class Str + send $6 + bnot + aTop pName +code_3852: pushi $35c ; 860, getBase + push1 + class BCarryable + push + self $6 + bnot + sat temp[$0] + bnt code_3868 + pushi $436 ; 1078, updateContainerButton + push0 + send $4 + bnot +code_3868: pToa pName + ret + +WorldObject::setServID: + lap param[$1] + aTop pServIDLo + lap param[$2] + aTop pServIDHi + ret + +WorldObject::servIDEquals: + lsp param[$0] + ldi $1 + eq? + bnt code_388d + pushi $127 ; 295, equal + push2 + pTos pServIDLo + pTos pServIDHi + lap param[$1] + send $8 + bnot + ret + + jmp code_389d + +code_388d: pTos pServIDLo + lap param[$1] + eq? + bnt code_389c + pTos pServIDHi + ldi $1 + lapi param[$1] + eq? +code_389c: ret + +code_389d: ret + +WorldObject::matchServID: + pushi $127 ; 295, equal + push2 + pTos pServIDLo + pTos pServIDHi + lap param[$1] + send $8 + bnot + ret + +WorldObject::setCombatGroup: + pToa pCombatGroup + not + bnt code_38c2 + pushi $8d ; 141, new + push2 + pushi $ff ; 255, asInteger + dup + class LongInt + send $8 + bnot + aTop pCombatGroup +code_38c2: pushi $10f ; 271, setLong + push1 + lsp param[$1] + pToa pCombatGroup + send $6 + bnot + ret + +WorldObject::deleteFromServer: + link $1 + lag global[$6a] + bnt code_38ef + pTos pServIDLo + pToa pServIDHi + eq? + bnt code_38e2 + pprev + ldi $ff ; 255, asInteger + eq? +code_38e2: not + bnt code_38ef + pushi $58 ; 88, 'X', delete + push1 + pushSelf + lag global[$6a] + send $6 + bnot +code_38ef: pushi $35c ; 860, getBase + push1 + class BContainer + push + self $6 + bnot + sat temp[$0] + bnt code_391b + pushi $420 ; 1056, pContents + push0 + send $4 + bnot + bnt code_391b + pushi $9d ; 157, eachElementDo + push1 + pushi $3dc ; 988, deleteFromServer + pushi $420 ; 1056, pContents + push0 + lat temp[$0] + send $4 + bnot + send $6 + bnot +code_391b: pushi $3df ; 991, setServID + push2 + pushi $ff ; 255, asInteger + dup + self $8 + bnot + ret + +WorldObject::addToServer: + link $2 + lag global[$6a] + bnt code_3947 + pTos pServIDLo + pToa pServIDHi + eq? + bnt code_3939 + pprev + ldi $ff ; 255, asInteger + eq? +code_3939: not + bnt code_3947 + pushi $9f ; 159, add + push1 + pushSelf + lag global[$6a] + send $6 + bnot +code_3947: pushi $35c ; 860, getBase + push1 + class BContainer + push + self $6 + bnot + sat temp[$0] + bnt code_3973 + pushi $420 ; 1056, pContents + push0 + send $4 + bnot + bnt code_3973 + pushi $9d ; 157, eachElementDo + push1 + pushi $3dd ; 989, addToServer + pushi $420 ; 1056, pContents + push0 + lat temp[$0] + send $4 + bnot + send $6 + bnot +code_3973: ret + +WorldObject::getName: + pToa pIDName + bnt code_39a4 + pushi $35f ; 863, getAffectedState + push1 + pushi $20 ; 32, ' ', name + self $6 + bnot + bt code_398e + pushi $35f ; 863, getAffectedState + push1 + pushi $57 ; 87, 'W', draw + self $6 + bnot +code_398e: bnt code_39a4 + pushi $35f ; 863, getAffectedState + push1 + pushi $4a ; 74, 'J', setPri + self $6 + bnot + not + bnt code_39a4 + pToa pIDName + ret + + jmp code_39a7 + +code_39a4: pToa pName + ret + +code_39a7: ret + + link $1 + lsp param[$1] + ldi $30 ; 48, '0', who + sub + sap param[$1] + push + ldi $4 ; scaleX + div + push + ldi $3 ; z + mul + push + ldi $b ; 11, inRight + add + sat temp[$0] + ret + + link $2 + push2 + pushi $9 ; inLeft + lsp param[$1] + callk kernel_91, $4 + bnot + sat temp[$1] + pushi $b ; 11, inRight + pushi $3 ; z + push2 + push + push0 + callk kernel_91, $6 + bnot + push + pushi $61 ; 97, 'a', frame + pushi $65 ; 101, 'e', topString + pushi $69 ; 105, 'i', hide + pushi $6f ; 111, 'o', resY + pushi $75 ; 117, 'u', show + pushi $41 ; 65, 'A', moveSpeed + pushi $45 ; 69, 'E', doit + pushi $49 ; 73, 'I', replay + pushi $4f ; 79, 'O', pragmaFail + pushi $55 ; 85, 'U', button + calle export60025_4, $16 + bnot + bnt code_3a0b + pushi $f5 ; 245, format + push2 + lofsa string_0419 ; "n %s" + push + lst temp[$1] + class Str + send $8 + bnot + sat temp[$0] + jmp code_3a1c + +code_3a0b: pushi $f5 ; 245, format + push2 + lofsa string_041e ; " %s" + push + lst temp[$1] + class Str + send $8 + bnot + sat temp[$0] +code_3a1c: lat temp[$0] + ret + +ApproachScript::init: + pToa pClient + bnt code_3a2c + pushi $40c ; 1036, pApproachScript + push1 + pushSelf + send $6 + bnot +code_3a2c: pushi $94 ; 148, init + push0 + &rest $1 + super DemonsScript, $4 + bnot + ret + +ApproachScript::dispose: + pToa pClient + bnt code_3a44 + pushi $40c ; 1036, pApproachScript + push1 + push0 + send $6 + bnot +code_3a44: pushi $95 ; 149, dispose + push0 + &rest $1 + super DemonsScript, $4 + bnot + ret + +ApproachScript::changeState: + lap param[$1] + aTop state + push + dup + ldi $0 + eq? + bnt code_3a88 + pushi $381 ; 897, pMode + push0 + pToa pClient + send $4 + bnot + push + ldi $2 + and + bnt code_3a75 + pushi $95 ; 149, dispose + push0 + self $4 + bnot + jmp code_3ae2 + +code_3a75: pushi $39b ; 923, goto + pushi $3 ; z + pTos pApproachX + pTos pApproachY + pushSelf + pToa pClient + send $a + bnot + jmp code_3ae2 + +code_3a88: dup + ldi $1 + eq? + bnt code_3ae2 + lsg global[$ff] + ldi $1f ; 31, brBottom + and + not + bnt code_3adb + pToa caller + bnt code_3adb + pushi $4 ; scaleX + push1 + push0 + pToa pClient + send $4 + bnot + push + push2 + push0 + pToa pClient + send $4 + bnot + push + push1 + push0 + pToa pObject + send $4 + bnot + push + push2 + push0 + pToa pObject + send $4 + bnot + push + callk kernel_64, $8 + bnot + push + pToa pDistance + gt? + bnt code_3adb + pushi $9c ; 156, handleError + pushi $3 ; z + pTos pClient + pushi $c350 ; -15536 + dup + pToa caller + send $a + bnot +code_3adb: pushi $95 ; 149, dispose + push0 + self $4 + bnot +code_3ae2: toss + ret + diff --git a/Script/Script40009.txt b/Script/Script40009.txt new file mode 100644 index 0000000..d9632fc --- /dev/null +++ b/Script/Script40009.txt @@ -0,0 +1,90 @@ +WorldObjectBase::dispose: + push1 + pushSelf + callk kernel_11, $2 + bnot + ret + +WorldObjectBase::buildVerbList: + ret + +WorldObjectBase::handlesAction: + ldi $0 + ret + +WorldObjectBase::modifyProp: + link $1 + ldi $1 + sat temp[$0] + pushi $99 ; 153, respondsTo + push1 + lsp param[$1] + self $6 + bnot + bnt code_008d + lsp param[$1] + push1 + lsp param[$1] + push0 + self $4 + bnot + push + lap param[$2] + add + push + self $6 + bnot +code_008d: lat temp[$0] + ret + +WorldObjectBase::getProp: + link $1 + ldi $fd66 ; -666 + sat temp[$0] + pushi $99 ; 153, respondsTo + push1 + lsp param[$1] + self $6 + bnot + bnt code_00aa + lsp param[$1] + push0 + self $4 + bnot + sat temp[$0] +code_00aa: lat temp[$0] + ret + +WorldObjectBase::updateDisplay: + ret + +WorldObjectBase::updateAction: + pushi $373 ; 883, setAction + push1 + lsp param[$1] + pToa pSelf + send $6 + bnot + ret + +WorldObjectBase::fromPacket: + ret + +WorldObjectBase::getServIDs: + ret + +WorldObjectBase::preDispose: + ret + +WorldObjectBase::editProps: + ret + +WorldObjectBase::readProps: + ret + +WorldObjectBase::writeProps: + ret + +WorldObjectBase::getPropList: + ret + diff --git a/Script/Script40010.txt b/Script/Script40010.txt new file mode 100644 index 0000000..ce1f724 --- /dev/null +++ b/Script/Script40010.txt @@ -0,0 +1,318 @@ +BOpenable::buildVerbList: + link $1 + pushi $97 ; 151, isKindOf + push1 + class WorldObject + push + lap param[$1] + send $6 + bnot + bnt code_010a + pushi $381 ; 897, pMode + push0 + lap param[$1] + send $4 + bnot + push + ldi $1 + and + bnt code_010a + class VerbList + sat temp[$0] + pushi $97 ; 151, isKindOf + push1 + class WorldActor + push + lap param[$1] + send $6 + bnot + bnt code_010a + pushi $35b ; 859, getOwner + push0 + pToa pSelf + send $4 + bnot + push + pToa pSelf + eq? + bnt code_010a + pToa pOpen + bnt code_00ff + pushi $9f ; 159, add + push1 + pushi $d ; 13, seenRect + lat temp[$0] + send $6 + bnot + jmp code_010a + +code_00ff: pushi $9f ; 159, add + push1 + pushi $c ; 12, inBottom + lat temp[$0] + send $6 + bnot +code_010a: ret + +BOpenable::handlesAction: + pushi $3 ; z + lsp param[$1] + pushi $248 ; 584, open + pushi $253 ; 595, close + calle export60025_4, $6 + bnot + ret + +BOpenable::open: + link $3 + ldi $0 + sat temp[$0] + pToa pOpen + bnt code_012d + ldi $4 ; scaleX + sat temp[$0] + jmp code_0131 + +code_012d: ldi $1 + aTop pOpen +code_0131: lat temp[$0] + ret + +BOpenable::close: + link $2 + ldi $0 + sat temp[$0] + pToa pOpen + bnt code_0166 + ldi $0 + aTop pOpen + pushi $35c ; 860, getBase + push1 + class BLockable + push + pToa pSelf + send $6 + bnot + sat temp[$1] + bnt code_016a + pushi $427 ; 1063, pAutoLock + push0 + send $4 + bnot + bnt code_016a + pushi $34a ; 842, lock + push0 + lat temp[$1] + send $4 + bnot + jmp code_016a + +code_0166: ldi $4 ; scaleX + sat temp[$0] +code_016a: lat temp[$0] + ret + +BOpenable::fromPacket: + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pOpen + pToa pOpen + bnt code_019b + pushi $373 ; 883, setAction + push1 + pushi $1e ; 30, brRight + pToa pSelf + send $6 + bnot + pushi $10 ; 16, cel + push1 + push1 + pTos pSelf + callk kernel_22, $2 + bnot + push + ldi $1 + sub + push + pToa pSelf + send $6 + bnot +code_019b: ret + +BKey::fromPacket: + pushi $136 ; 310, getLong + push0 + lap param[$1] + send $4 + bnot + aTop pLockValue + pushi $136 ; 310, getLong + push0 + lap param[$1] + send $4 + bnot + aTop pUnlockValue + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pSkeletonLock + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pSkeletonUnlock + ret + +BLockable::handlesAction: + pushi $3 ; z + lsp param[$1] + pushi $34a ; 842, lock + pushi $38d ; 909, unlock + calle export60025_4, $6 + bnot + ret + +BLockable::buildVerbList: + link $3 + pushi $97 ; 151, isKindOf + push1 + class WorldObject + push + lap param[$1] + send $6 + bnot + bnt code_0262 + pushi $381 ; 897, pMode + push0 + lap param[$1] + send $4 + bnot + push + ldi $1 + and + bnt code_0262 + class VerbList + sat temp[$0] + pTos pLocked + dup + ldi $0 + eq? + bnt code_0211 + pToa pLockValue + sat temp[$1] + ldi $29 ; 41, ')', state + sat temp[$2] + jmp code_021f + +code_0211: dup + ldi $1 + eq? + bnt code_021f + pToa pUnlockValue + sat temp[$1] + ldi $28 ; 40, '(', style + sat temp[$2] +code_021f: toss + pushi $97 ; 151, isKindOf + push1 + class WorldActor + push + lap param[$1] + send $6 + bnot + bnt code_0242 + lst temp[$1] + ldi $ff ; 255, asInteger + eq? + bnt code_0242 + pushi $9f ; 159, add + push1 + lst temp[$2] + lat temp[$0] + send $6 + bnot + jmp code_0262 + +code_0242: pushi $35c ; 860, getBase + push1 + class BKey + push + lap param[$1] + send $6 + bnot + bnt code_0262 + lst temp[$1] + ldi $ff ; 255, asInteger + ne? + bnt code_0262 + pushi $9f ; 159, add + push1 + lst temp[$2] + lat temp[$0] + send $6 + bnot +code_0262: ret + +BLockable::lock: + link $3 + ldi $0 + sat temp[$0] + ldi $1 + aTop pLocked + lat temp[$0] + ret + +BLockable::unlock: + link $3 + ldi $0 + sat temp[$0] + ldi $0 + aTop pLocked + lat temp[$0] + ret + +BLockable::fromPacket: + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pLocked + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pAutoLock + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pSkeletonLock + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pSkeletonUnlock + pushi $136 ; 310, getLong + push0 + lap param[$1] + send $4 + bnot + aTop pLockValue + pushi $136 ; 310, getLong + push0 + lap param[$1] + send $4 + bnot + aTop pUnlockValue + ret + diff --git a/Script/Script40011.txt b/Script/Script40011.txt new file mode 100644 index 0000000..9623935 --- /dev/null +++ b/Script/Script40011.txt @@ -0,0 +1,166 @@ +BWeapon::bePutOn: + link $3 + pushi $3ec ; 1004, pAction + push0 + lap param[$1] + send $4 + bnot + push + dup + ldi $a ; 10, inTop + eq? + bnt code_0060 + ldi $1 + sat temp[$2] + jmp code_007c + +code_0060: dup + ldi $d ; 13, seenRect + eq? + bnt code_006c + ldi $1 + sat temp[$2] + jmp code_007c + +code_006c: dup + ldi $11 ; 17, bitmap + eq? + bnt code_0078 + ldi $1 + sat temp[$2] + jmp code_007c + +code_0078: ldi $0 + sat temp[$2] +code_007c: toss + pushi $3ed ; 1005, pBaseView + push0 + pToa pSelf + send $4 + bnot + sat temp[$1] + push2 + pushi $80 ; 128, lastKey + push + ldi $a ; 10, inTop + add + push + callk kernel_5, $4 + bnot + bnt code_00ac + ldi $0 + aTop pDamageType + lat temp[$2] + bnt code_00f6 + pushi $373 ; 883, setAction + push1 + pushi $a ; 10, inTop + lap param[$1] + send $6 + bnot + jmp code_00f6 + +code_00ac: push2 + pushi $80 ; 128, lastKey + lst temp[$1] + ldi $d ; 13, seenRect + add + push + callk kernel_5, $4 + bnot + bnt code_00d1 + ldi $1 + aTop pDamageType + lat temp[$2] + bnt code_00f6 + pushi $373 ; 883, setAction + push1 + pushi $d ; 13, seenRect + lap param[$1] + send $6 + bnot + jmp code_00f6 + +code_00d1: push2 + pushi $80 ; 128, lastKey + lst temp[$1] + ldi $11 ; 17, bitmap + add + push + callk kernel_5, $4 + bnot + bnt code_00f6 + ldi $2 + aTop pDamageType + lat temp[$2] + bnt code_00f6 + pushi $373 ; 883, setAction + push1 + pushi $11 ; 17, bitmap + lap param[$1] + send $6 + bnot + jmp code_00f6 + +code_00f6: pushi $393 ; 915, bePutOn + push1 + lsp param[$1] + &rest $2 + super BWearable, $6 + bnot + sat temp[$0] + pushi $40f ; 1039, pWeapon + push1 + pushSelf + pToa pWearer + send $6 + bnot + lat temp[$0] + ret + +BWeapon::fromPacket: + link $1 + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pSize + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pDamageType + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pSpeed + pushi $134 ; 308, getByte + push0 + lap param[$1] + send $4 + bnot + aTop pPointBonus + 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_015e + pushi $393 ; 915, bePutOn + push1 + push + self $6 + bnot +code_015e: ret +