Pile of Stuff::buildBaseList: pushi $387 ; 903, addBase push1 class BContainer push pushi $387 ; 903, addBase push1 class BDescribed push self $c bnot pushi $46c ; 1132, pWeightCap push1 pushi $3e8 ; 1000, pUpdateClient pushi $46d ; 1133, pBulkCap push1 pushi $10e ; 270, hiWord pushi $35c ; 860, getBase push1 class BContainer push self $6 bnot send $c bnot ret Pile of Stuff::centerOn: link $2 push1 lsp param[$1] callk kernel_20, $2 bnot pushi $4e ; 78, 'N', width push0 lap param[$1] send $4 bnot sat temp[$0] pushi $df ; 223, centerOn push2 pushi $88 ; 136, right push0 lap param[$1] send $4 bnot push lst temp[$0] ldi $2 div sub push pushi $89 ; 137, top push0 lap param[$1] send $4 bnot push super WorldObject, $8 bnot pTos left ldi $0 lt? bnt code_01bc pushi $db ; 219, moveTo push2 push0 pTos top self $8 bnot code_01bc: pTos top ldi $0 lt? bnt code_01cd pushi $db ; 219, moveTo push2 pTos left push0 self $8 bnot code_01cd: push0 push0 lag global[$3] send $4 bnot sat temp[$1] pTos right ldi $3c ; 60, '<', b_di add push pushi $88 ; 136, right push0 lat temp[$1] send $4 bnot gt? bnt code_0201 pushi $dd ; 221, moveBy push2 pushi $88 ; 136, right push0 lat temp[$1] send $4 bnot push pTos right ldi $3c ; 60, '<', b_di add sub push push0 self $8 bnot code_0201: pTos bottom ldi $3c ; 60, '<', b_di add push pushi $8a ; 138, bottom push0 lat temp[$1] send $4 bnot gt? bnt code_022c pushi $dd ; 221, moveBy push2 push0 pushi $8a ; 138, bottom push0 lat temp[$1] send $4 bnot push pTos bottom ldi $3c ; 60, '<', b_di add sub push self $8 bnot code_022c: pToa left aTop x pToa top aTop y pToa bitmap bnt code_023e push1 pushSelf callk kernel_32, $2 bnot code_023e: ret Pile of Stuff::give: link $4 pushi $38f ; 911, give push0 &rest $1 super WorldObject, $4 bnot pushi $35c ; 860, getBase push1 class BContainer push self $6 bnot sat temp[$0] pushi $5a ; 90, 'Z', size push0 pushi $420 ; 1056, pContents push0 send $4 bnot send $4 bnot sat temp[$2] push pToa pThresholdCount lt? bnt code_0276 pushi $46b ; 1131, unMakePile push0 self $4 bnot jmp code_027e code_0276: pushi $36a ; 874, updateDisplay push1 push1 self $6 bnot code_027e: ret Pile of Stuff::unMakePile: link $4 pushi $35c ; 860, getBase push1 class BContainer push self $6 bnot sat temp[$0] pushi $5a ; 90, 'Z', size push0 pushi $420 ; 1056, pContents push0 send $4 bnot send $4 bnot sat temp[$2] ldi $0 sat temp[$3] code_02a0: lst temp[$3] lat temp[$2] lt? bnt code_02e8 pushi $4b ; 75, 'K', at push1 lst temp[$3] pushi $420 ; 1056, pContents push0 lat temp[$0] send $4 bnot send $6 bnot sat temp[$1] pushi $40d ; 1037, pMoney push0 send $4 bnot bnt code_02d7 pushi $46e ; 1134, pShow push1 push0 pushi $35c ; 860, getBase push1 class BCarryable push lat temp[$1] send $6 bnot send $6 bnot code_02d7: pushi $390 ; 912, drop push1 lst temp[$1] self $6 bnot -at temp[$3] -at temp[$2] +at temp[$3] jmp code_02a0 code_02e8: pushi $95 ; 149, dispose push0 self $4 bnot ret Pile of Stuff::makePiles: link $a pushi $8d ; 141, new push0 class Set send $4 bnot sat temp[$6] pushi $8d ; 141, new push0 class Set send $4 bnot sat temp[$4] pushi $8d ; 141, new push0 class Set send $4 bnot sat temp[$7] ldi $0 sat temp[$0] code_0317: lst temp[$0] pushi $5a ; 90, 'Z', size push0 pushi $421 ; 1057, pWObjectList push0 lag global[$3] send $4 bnot send $4 bnot lt? bnt code_0380 pushi $4b ; 75, 'K', at push1 lst temp[$0] pushi $421 ; 1057, pWObjectList push0 lag global[$3] send $4 bnot send $6 bnot sat temp[$2] pushi $97 ; 151, isKindOf push1 class Pile of Stuff push lat temp[$2] send $6 bnot bnt code_0358 pushi $9f ; 159, add push1 lst temp[$2] lat temp[$6] send $6 bnot code_0358: pushi $35c ; 860, getBase push1 class BCarryable push lat temp[$2] send $6 bnot bnt code_037c pushi $17c ; 380, isNotHidden push0 lat temp[$2] send $4 bnot bnt code_037c pushi $9f ; 159, add push1 lst temp[$2] lat temp[$4] send $6 bnot code_037c: +at temp[$0] jmp code_0317 code_0380: ldi $0 sat temp[$0] code_0384: lst temp[$0] pushi $5a ; 90, 'Z', size push0 lat temp[$6] send $4 bnot lt? bnt code_0424 ldi $0 sat temp[$9] pushi $4b ; 75, 'K', at push1 lst temp[$0] lat temp[$6] send $6 bnot sat temp[$3] ldi $0 sat temp[$1] code_03a6: lst temp[$1] pushi $5a ; 90, 'Z', size push0 lat temp[$4] send $4 bnot lt? bnt code_040d pushi $4b ; 75, 'K', at push1 lst temp[$1] lat temp[$4] send $6 bnot sat temp[$2] push lat temp[$3] ne? bnt code_0409 pushi $165 ; 357, distanceTo push1 lst temp[$3] lat temp[$2] send $6 bnot push pushi $467 ; 1127, pMergeDistance push0 self $4 bnot le? bnt code_0409 pushi $40d ; 1037, pMoney push0 lat temp[$2] send $4 bnot bnt code_03fa pushi $46e ; 1134, pShow push1 push1 pushi $35c ; 860, getBase push1 class BCarryable push lat temp[$2] send $6 bnot send $6 bnot code_03fa: pushi $38e ; 910, take push1 lst temp[$2] lat temp[$3] send $6 bnot ldi $1 sat temp[$9] code_0409: +at temp[$1] jmp code_03a6 code_040d: lat temp[$9] bnt code_041f pushi $36a ; 874, updateDisplay push1 push1 lat temp[$3] send $6 bnot ldi $0 sat temp[$9] code_041f: +at temp[$0] jmp code_0384 code_0424: pushi $a6 ; 166, release push0 lat temp[$4] send $4 bnot pushi $a6 ; 166, release push0 pushi $95 ; 149, dispose push0 lat temp[$6] send $8 bnot ldi $0 sat temp[$0] code_043e: lst temp[$0] pushi $5a ; 90, 'Z', size push0 pushi $421 ; 1057, pWObjectList push0 lag global[$3] send $4 bnot send $4 bnot lt? bnt code_048d pushi $4b ; 75, 'K', at push1 lst temp[$0] pushi $421 ; 1057, pWObjectList push0 lag global[$3] send $4 bnot send $6 bnot sat temp[$2] pushi $35c ; 860, getBase push1 class BCarryable push lat temp[$2] send $6 bnot bnt code_0489 pushi $17c ; 380, isNotHidden push0 lat temp[$2] send $4 bnot bnt code_0489 pushi $9f ; 159, add push1 lst temp[$2] lat temp[$4] send $6 bnot code_0489: +at temp[$0] jmp code_043e code_048d: pushi $8d ; 141, new push0 class Set send $4 bnot sat temp[$8] ldi $0 sat temp[$0] code_049c: lst temp[$0] pushi $5a ; 90, 'Z', size push0 lat temp[$4] send $4 bnot lt? bnt code_05c4 ldi $1 sat temp[$9] pushi $a6 ; 166, release push0 lat temp[$7] send $4 bnot pushi $4b ; 75, 'K', at push1 lst temp[$0] lat temp[$4] send $6 bnot sat temp[$2] ldi $0 sat temp[$1] code_04c7: lst temp[$1] pushi $5a ; 90, 'Z', size push0 lat temp[$4] send $4 bnot lt? bnt code_052b pushi $4b ; 75, 'K', at push1 lst temp[$1] lat temp[$4] send $6 bnot sat temp[$3] lst temp[$2] ne? bnt code_0527 pushi $a3 ; 163, contains push1 lst temp[$3] lat temp[$8] send $6 bnot not bnt code_0527 pushi $165 ; 357, distanceTo push1 lst temp[$3] lat temp[$2] send $6 bnot push pushi $467 ; 1127, pMergeDistance push0 self $4 bnot le? bnt code_0527 lat temp[$9] bnt code_051c pushi $9f ; 159, add push1 lst temp[$2] lat temp[$7] send $6 bnot ldi $0 sat temp[$9] code_051c: pushi $9f ; 159, add push1 lst temp[$3] lat temp[$7] send $6 bnot code_0527: +at temp[$1] jmp code_04c7 code_052b: pushi $5a ; 90, 'Z', size push0 lat temp[$7] send $4 bnot push pushi $468 ; 1128, pMergeCount push0 self $4 bnot ge? bnt code_05bf pushi $94 ; 148, init push0 pushi $df ; 223, centerOn push1 pushi $4b ; 75, 'K', at push1 push0 lat temp[$7] send $6 bnot push pushi $8d ; 141, new push0 class Pile of Stuff send $4 bnot sat temp[$5] send $a bnot ldi $0 sat temp[$0] code_0564: lst temp[$0] pushi $5a ; 90, 'Z', size push0 lat temp[$7] send $4 bnot lt? bnt code_05b4 pushi $4b ; 75, 'K', at push1 lst temp[$0] lat temp[$7] send $6 bnot sat temp[$2] pushi $40d ; 1037, pMoney push0 send $4 bnot bnt code_059a pushi $46e ; 1134, pShow push1 push1 pushi $35c ; 860, getBase push1 class BCarryable push lat temp[$2] send $6 bnot send $6 bnot code_059a: pushi $38e ; 910, take push1 lst temp[$2] lat temp[$5] send $6 bnot pushi $9f ; 159, add push1 lst temp[$2] lat temp[$8] send $6 bnot +at temp[$0] jmp code_0564 code_05b4: pushi $3c5 ; 965, addToRoom push1 lsg global[$3] lat temp[$5] send $6 bnot code_05bf: +at temp[$0] jmp code_049c code_05c4: pushi $a6 ; 166, release push0 pushi $95 ; 149, dispose push0 lat temp[$8] send $8 bnot pushi $a6 ; 166, release push0 pushi $95 ; 149, dispose push0 lat temp[$7] send $8 bnot pushi $a6 ; 166, release push0 pushi $95 ; 149, dispose push0 lat temp[$4] send $8 bnot ret Pile of Stuff::updateDisplay: link $4 pTos signal ldi $df ; 223, centerOn and aTop signal pToa bitmap bnt code_060d pushi $9f ; 159, add push1 push lag global[$66] send $6 bnot ldi $0 aTop bitmap push1 pushSelf callk kernel_31, $2 bnot code_060d: ldi $0 sat temp[$1] pushi $35c ; 860, getBase push1 class BContainer push self $6 bnot sat temp[$2] pushi $420 ; 1056, pContents push0 send $4 bnot bnt code_076b pushi $5 ; scaleY push0 pushi $3c ; 60, '<', b_di dup pushi $ff ; 255, asInteger dup callk kernel_35, $a bnot aTop bitmap pushi $4 ; scaleX pushi $8 ; fixPriority pTos bitmap pushi $1e ; 30, brRight dup callk kernel_35, $8 bnot push1 pushSelf callk kernel_30, $2 bnot ldi $0 sat temp[$0] code_064d: lst temp[$0] pushi $5a ; 90, 'Z', size push0 pushi $420 ; 1056, pContents push0 lat temp[$2] send $4 bnot send $4 bnot lt? bnt code_076b pushi $4b ; 75, 'K', at push1 lst temp[$0] pushi $420 ; 1056, pContents push0 lat temp[$2] send $4 bnot send $6 bnot sat temp[$3] lst temp[$0] ldi $0 eq? bnt code_0685 pushi $3c8 ; 968, matchScaler push1 lsg global[$3] self $6 bnot code_0685: pushi $35c ; 860, getBase push1 class BWeapon push lat temp[$3] send $6 bnot bnt code_069c lst temp[$1] ldi $1 or sat temp[$1] jmp code_06e5 code_069c: pushi $35c ; 860, getBase push1 class BWearable push lat temp[$3] send $6 bnot bnt code_06b3 lst temp[$1] ldi $2 or sat temp[$1] jmp code_06e5 code_06b3: pushi $35c ; 860, getBase push1 class BConsume push lat temp[$3] send $6 bnot bnt code_06ca lst temp[$1] ldi $4 ; scaleX or sat temp[$1] jmp code_06e5 code_06ca: pushi $40d ; 1037, pMoney push0 lat temp[$3] send $4 bnot bnt code_06de lst temp[$1] ldi $8 ; fixPriority or sat temp[$1] jmp code_06e5 code_06de: lst temp[$1] ldi $10 ; 16, cel or sat temp[$1] code_06e5: lst temp[$1] ldi $2 and bnt code_06ff pushi $7 ; priority pushi $3 ; z pTos bitmap pushi $2791 ; 10129 push0 push0 pushi $20 ; 32, ' ', name pushi $13 ; 19, nsTop callk kernel_35, $e bnot code_06ff: lst temp[$1] ldi $1 and bnt code_0719 pushi $7 ; priority pushi $3 ; z pTos bitmap pushi $3be1 ; 15329 push0 push0 pushi $f ; 15, loop pushi $3 ; z callk kernel_35, $e bnot code_0719: lst temp[$1] ldi $4 ; scaleX and bnt code_0732 pushi $7 ; priority pushi $3 ; z pTos bitmap pushi $cba1 ; -13407 push0 push0 push2 pushi $1e ; 30, brRight callk kernel_35, $e bnot code_0732: lst temp[$1] ldi $8 ; fixPriority and bnt code_074c pushi $7 ; priority pushi $3 ; z pTos bitmap pushi $c5c5 ; -14907 push0 push0 pushi $14 ; 20, nsRight pushi $20 ; 32, ' ', name callk kernel_35, $e bnot code_074c: lst temp[$1] ldi $10 ; 16, cel and bnt code_0766 pushi $7 ; priority pushi $3 ; z pTos bitmap pushi $d5c9 ; -10807 push0 push0 pushi $29 ; 41, ')', state pushi $5 ; scaleY callk kernel_35, $e bnot code_0766: +at temp[$0] jmp code_064d code_076b: ret