View::init: link $1 pTos signal ldi $f7 ; 247, cat and aTop signal pushi $94 ; 148, init push0 &rest $1 super Feature, $4 bnot pTos view ldi $ff ; 255, asInteger ne? bnt code_00fc pTos signal ldi $20 ; 32, ' ', name and bnt code_00fc push2 pushi $80 ; 128, lastKey pTos view callk kernel_5, $4 bnot bnt code_00fc pushi $19c ; 412, doBaseRect push0 self $4 bnot code_00fc: pToa plane bnt code_010d pTos view ldi $ff ; 255, asInteger ne? bnt code_010d push1 pushSelf callk kernel_20, $2 bnot code_010d: ret View::dispose: link $1 ldi $0 aTop clut pushi $95 ; 149, dispose push0 super Feature, $4 bnot ret View::doit: pTos signal ldi $8000 ; -32768 and bnt code_0138 pushi $7 ; priority pushSelf pTos view pTos loop pTos cel pTos x pTos y pTos z callk kernel_26, $e bnot code_0138: pTos -info- ldi $8 ; fixPriority and bnt code_0155 pushi $17c ; 380, isNotHidden push0 self $4 bnot bnt code_0155 push1 pushSelf callk kernel_32, $2 bnot pTos -info- ldi $f7 ; 247, cat and aTop -info- code_0155: ret View::posn: lsp param[$0] ldi $1 ge? bnt code_0177 lap param[$1] aTop x lsp param[$0] ldi $2 ge? bnt code_0177 lap param[$2] aTop y lsp param[$0] ldi $3 ; z ge? bnt code_0177 lap param[$3] aTop z code_0177: pTos -info- ldi $8 ; fixPriority or aTop -info- pTos signal ldi $20 ; 32, ' ', name and bnt code_018c pushi $19c ; 412, doBaseRect push0 self $4 bnot code_018c: ret View::setLoop: lsp param[$0] ldi $0 eq? bnt code_019e pTos signal ldi $800 ; 2048, BAD SELECTOR or aTop signal jmp code_01d0 code_019e: lsp param[$1] ldi $ff ; 255, asInteger eq? bnt code_01af pTos signal ldi $f7ff ; -2049 and aTop signal jmp code_01d0 code_01af: lap param[$1] aTop loop lsp param[$0] ldi $1 gt? bnt code_01d0 lap param[$2] bnt code_01c8 pTos signal ldi $800 ; 2048, BAD SELECTOR or aTop signal jmp code_01d0 code_01c8: pTos signal ldi $f7ff ; -2049 and aTop signal code_01d0: ret View::setCel: lap param[$1] aTop cel ret View::ignoreActors: push0 lap param[$0] eq? bt code_01de lap param[$1] code_01de: bnt code_01ea pTos signal ldi $4000 ; 16384 or aTop signal jmp code_01f2 code_01ea: pTos signal ldi $bfff ; -16385 and aTop signal code_01f2: ret View::lastLoop: push1 pushSelf callk kernel_21, $2 bnot push ldi $1 sub ret View::lastCel: push1 pushSelf callk kernel_22, $2 bnot push ldi $1 sub ret View::motionCue: ret View::checkDetail: ret View::onMe: link $2 lsp param[$0] ldi $1 eq? bnt code_0228 push1 push0 lap param[$1] send $4 bnot sat temp[$0] push2 push0 lap param[$1] send $4 bnot sat temp[$1] jmp code_0230 code_0228: lap param[$1] sat temp[$0] lap param[$2] sat temp[$1] code_0230: pTos signal ldi $8 ; fixPriority and bnt code_023b ldi $0 jmp code_0260 code_023b: pToa onMeCheck not bnt code_0254 pushi $4 ; scaleX lst temp[$0] lst temp[$1] pushSelf pTos signal ldi $1000 ; 4096, -objID- and push callk kernel_23, $8 bnot jmp code_0260 code_0254: pushi $eb ; 235, onMe push2 lst temp[$0] lst temp[$1] super Feature, $8 bnot code_0260: ret View::setScale: link $6 lap param[$0] not bnt code_0279 pTos scaleSignal ldi $1 or aTop scaleSignal pTos scaleSignal ldi $fd ; 253, strip and aTop scaleSignal jmp code_037b code_0279: lsp param[$0] ldi $5 ; scaleY eq? bnt code_02b9 pushi $8d ; 141, new push0 lap param[$1] send $4 bnot sat temp[$5] pTos scaleSignal ldi $1 or aTop scaleSignal pTos scaleSignal ldi $fd ; 253, strip and aTop scaleSignal pushi $94 ; 148, init pushi $5 ; scaleY pushSelf lsp param[$2] lsp param[$3] lsp param[$4] lsp param[$5] lat temp[$5] send $e bnot pushi $95 ; 149, dispose push0 lat temp[$5] send $4 bnot jmp code_037b code_02b9: lsp param[$0] ldi $2 eq? bnt code_031a pushi $3 ; z pTos view pTos loop pTos cel callk kernel_28, $6 bnot sat temp[$3] pushi $3 ; z pTos view pTos loop pTos cel callk kernel_29, $6 bnot sat temp[$4] lsp param[$1] ldi $ff ; 255, asInteger eq? bnt code_02e7 lat temp[$3] sap param[$1] code_02e7: lsp param[$2] ldi $ff ; 255, asInteger eq? bnt code_02f2 lat temp[$4] sap param[$2] code_02f2: lsp param[$1] ldi $80 ; 128, lastKey mul push lat temp[$3] div aTop scaleX lsp param[$2] ldi $80 ; 128, lastKey mul push lat temp[$4] div aTop scaleY pTos scaleSignal ldi $1 or aTop scaleSignal push1 pushSelf callk kernel_32, $2 bnot jmp code_037b code_031a: lap param[$1] not bnt code_0328 pTos scaleSignal ldi $fc ; 252, getToken and aTop scaleSignal jmp code_037b code_0328: lsp param[$1] pushi $6c ; 108, 'l', vanishingY push0 lag global[$3] send $4 bnot lt? bnt code_0345 push2 lofsa string_007c ; "<%s setScale:> y value less than vanishingY" push pTos name calle export60029_1, $4 bnot jmp code_037b code_0345: lsp param[$1] pushi $6c ; 108, 'l', vanishingY push0 lag global[$3] send $4 bnot sub sat temp[$0] pushi $be ; 190, seconds lap param[$1] sub sat temp[$1] push ldi $64 ; 100, 'd', moveDone mul push lat temp[$0] div push ldi $64 ; 100, 'd', moveDone add sat temp[$2] pTos scaleSignal ldi $3 ; z or aTop scaleSignal lst temp[$2] ldi $80 ; 128, lastKey mul push ldi $64 ; 100, 'd', moveDone div aTop maxScale code_037b: ret View::setMagnifier: pTos signal ldi $8 ; fixPriority and not bnt code_03a5 pToa magnifier bnt code_038f pushi $95 ; 149, dispose push0 send $4 bnot code_038f: lap param[$0] bnt code_03a5 lap param[$1] bnt code_03a5 pushi $94 ; 148, init push1 pushSelf &rest $2 lap param[$1] aTop magnifier send $6 bnot code_03a5: ret View::celRect: pushi $e7 ; 231, celRect pushi $6 ; maxScale pTos view pTos loop pTos cel pTos x pTos y pTos z lap param[$1] send $10 bnot ret View::doBaseRect: pToa baseSetter bnt code_03cb pushi $45 ; 69, 'E', doit push1 pushSelf send $6 bnot jmp code_03d1 code_03cb: push1 pushSelf callk kernel_94, $2 bnot code_03d1: ret View::setSignal: link $1 lsp param[$0] ldi $1 gt? bnt code_03df lap param[$2] jmp code_03e1 code_03df: ldi $1 code_03e1: sat temp[$0] bnt code_03ee pTos signal lap param[$1] or aTop signal jmp code_03f6 code_03ee: pTos signal lap param[$1] bnot and aTop signal code_03f6: ret View::dragDoit: push1 pushSelf callk kernel_20, $2 bnot pushi $dc ; 220, posn push2 push1 push0 lap param[$1] send $4 bnot push pTos x pToa left sub add push push2 push0 lap param[$1] send $4 bnot push pTos y pToa top sub add push self $8 bnot push1 pushSelf callk kernel_32, $2 bnot ret