Plane::init: pToa casts not bnt code_009b pushi $9f ; 159, add push0 pushi $8d ; 141, new push0 class Cast send $4 bnot aTop casts send $4 bnot code_009b: push0 push1 pushSelf pToa casts send $6 bnot pushi $57 ; 87, 'W', draw push0 self $4 bnot lap param[$0] bnt code_00c4 pushi $b5 ; 181, set pushi $4 ; scaleX lsp param[$1] lsp param[$2] lsp param[$3] lsp param[$4] self $c bnot push1 pushSelf callk kernel_42, $2 bnot code_00c4: ret Plane::dispose: link $1 pToa casts bnt code_00e8 lag global[$3] bnt code_00df pushi $58 ; 88, 'X', delete push1 pushi $f2 ; 242, pCast push0 send $4 bnot push pToa casts send $6 bnot code_00df: pushi $95 ; 149, dispose push0 pToa casts send $4 bnot code_00e8: ldi $0 aTop bitmap aTop casts pushi $1ba ; 442, erase push0 self $4 bnot push1 pushSelf callk kernel_11, $2 bnot ret Plane::addCast: pToa casts bnt code_011a pushi $9f ; 159, add push1 pushi $9f ; 159, add push0 push0 push1 pushSelf pushi $9a ; 154, yourself push0 lap param[$1] send $e bnot push pToa casts send $6 bnot code_011a: ret Plane::deleteCast: pToa casts bnt code_0134 pushi $58 ; 88, 'X', delete push1 push0 push1 push0 pushi $9a ; 154, yourself push0 lap param[$1] send $a bnot push pToa casts send $6 bnot code_0134: ret Plane::draw: pushi $a3 ; 163, contains push1 pushSelf lag global[$25] send $6 bnot not bnt code_0154 push1 pushSelf callk kernel_40, $2 bnot pushi $9f ; 159, add push1 pushSelf lag global[$25] send $6 bnot jmp code_015a code_0154: push1 pushSelf callk kernel_42, $2 bnot code_015a: ret Plane::erase: pushi $a3 ; 163, contains push1 pushSelf lag global[$25] send $6 bnot bnt code_0176 pushi $58 ; 88, 'X', delete push1 pushSelf lag global[$25] send $6 bnot push1 pushSelf callk kernel_41, $2 bnot code_0176: ret Plane::drawPic: lap param[$1] aTop picture lsp param[$0] ldi $1 gt? bnt code_0186 lap param[$2] aTop style code_0186: pTos style ldi $400 ; 1024, pEndurance and bnt code_0192 ldi $1 jmp code_0194 code_0192: ldi $0 code_0194: aTop mirrored pushi $45 ; 69, 'E', doit push2 pushSelf pTos style class Styler send $8 bnot push1 pushSelf callk kernel_42, $2 bnot ret Plane::posn: link $8 lsp param[$0] ldi $2 gt? bnt code_01df pushi $87 ; 135, left push0 lap param[$3] send $4 bnot sat temp[$2] pushi $89 ; 137, top push0 lap param[$3] send $4 bnot sat temp[$3] pushi $88 ; 136, right push0 lap param[$3] send $4 bnot sat temp[$4] pushi $8a ; 138, bottom push0 lap param[$3] send $4 bnot sat temp[$5] jmp code_022c code_01df: lag global[$3] bnt code_021a push0 push0 send $4 bnot sat temp[$6] bnt code_021a pushi $87 ; 135, left push0 lat temp[$6] send $4 bnot sat temp[$2] pushi $89 ; 137, top push0 lat temp[$6] send $4 bnot sat temp[$3] pushi $88 ; 136, right push0 lat temp[$6] send $4 bnot sat temp[$4] pushi $8a ; 138, bottom push0 lat temp[$6] send $4 bnot sat temp[$5] jmp code_022c code_021a: ldi $0 sat temp[$2] ldi $0 sat temp[$3] ldi $27f ; 639, rename sat temp[$4] ldi $1df ; 479, validKey sat temp[$5] code_022c: pTos right pToa left sub sat temp[$0] pTos bottom pToa top sub sat temp[$1] lsp param[$1] ldi $ff ; 255, asInteger eq? bnt code_0255 lst temp[$2] lst temp[$4] lat temp[$2] sub push lat temp[$0] sub push ldi $2 div add sap param[$1] jmp code_025c code_0255: lsp param[$1] lat temp[$2] add sap param[$1] code_025c: lsp param[$2] ldi $ff ; 255, asInteger eq? bnt code_0277 lst temp[$3] lst temp[$5] lat temp[$3] sub push lat temp[$1] sub push ldi $2 div add sap param[$2] jmp code_027e code_0277: lsp param[$2] lat temp[$3] add sap param[$2] code_027e: pushi $b5 ; 181, set pushi $4 ; scaleX lsp param[$1] lsp param[$2] lsp param[$1] lat temp[$0] add push lsp param[$2] lat temp[$1] add push self $c bnot ret Plane::scaleBitmap: link $b lap param[$0] bnt code_02b0 lap param[$1] sat temp[$7] lap param[$2] sat temp[$8] lap param[$3] sat temp[$9] lap param[$4] sat temp[$a] jmp code_02c0 code_02b0: pToa left sat temp[$7] pToa top sat temp[$8] pToa right sat temp[$9] pToa bottom sat temp[$a] code_02c0: pushi $4e ; 78, 'N', width push0 pToa bitmap send $4 bnot sat temp[$1] pushi $e1 ; 225, height push0 pToa bitmap send $4 bnot sat temp[$3] lst temp[$9] lat temp[$7] sub push ldi $1 add sat temp[$0] lst temp[$a] lat temp[$8] sub push ldi $1 add sat temp[$2] lst temp[$0] ldi $fa ; 250, lower lt? bnt code_0301 lst temp[$0] ldi $80 ; 128, lastKey mul push lat temp[$1] div sat temp[$4] jmp code_0315 code_0301: lst temp[$0] ldi $2 div push ldi $80 ; 128, lastKey mul push lat temp[$1] div push ldi $2 mul sat temp[$4] code_0315: lst temp[$2] ldi $80 ; 128, lastKey mul push lat temp[$3] div sat temp[$5] pushi $6a ; 106, 'j', scaleSignal push1 push1 pushi $4 ; scaleX push1 lst temp[$4] pushi $5 ; scaleY push1 push pToa bitmap send $12 bnot push1 pTos bitmap callk kernel_32, $2 bnot ret Plane::setBitmap: link $4 pToa bitmap bnt code_034e pushi $95 ; 149, dispose push0 send $4 bnot ldi $0 aTop bitmap jmp code_0361 code_034e: pushi $8d ; 141, new push0 class Cast send $4 bnot sat temp[$0] pushi $1b8 ; 440, addCast push1 push self $6 bnot code_0361: lsp param[$0] ldi $3 ; z lt? bnt code_038f pushi $dc ; 220, posn push2 push0 push0 pushi $94 ; 148, init push1 lst temp[$0] pushi $8d ; 141, new push0 lap param[$1] send $4 bnot aTop bitmap send $e bnot lsp param[$0] ldi $1 gt? bnt code_03c3 lap param[$2] sat temp[$3] jmp code_03c3 code_038f: pushi $e ; 14, view push1 lsp param[$1] pushi $f ; 15, loop push1 lsp param[$2] pushi $10 ; 16, cel push1 lsp param[$3] pushi $dc ; 220, posn push2 push0 push0 pushi $94 ; 148, init push1 lst temp[$0] pushi $8d ; 141, new push0 class View send $4 bnot aTop bitmap send $20 bnot lsp param[$0] ldi $3 ; z gt? bnt code_03c3 lap param[$4] sat temp[$3] code_03c3: pushi $4e ; 78, 'N', width push0 pToa bitmap send $4 bnot sat temp[$1] pushi $e1 ; 225, height push0 pToa bitmap send $4 bnot sat temp[$2] lat temp[$3] bnt code_03e5 pushi $1bc ; 444, scaleBitmap push0 self $4 bnot jmp code_03fe code_03e5: pushi $b5 ; 181, set pushi $4 ; scaleX pTos left pTos top pTos left lat temp[$1] add push pTos top lat temp[$2] add push self $c bnot code_03fe: ret Plane::setSize: link $5 pToa casts bnt code_04c9 pushi $8d ; 141, new push0 class Rect send $4 bnot sat temp[$0] push2 pushi $3 ; z pushi $24 ; 36, '$', elements push0 pToa casts send $4 bnot push callk kernel_90, $4 bnot sat temp[$1] code_0423: lat temp[$1] bnt code_049a pushi $9e ; 158, nextNode push1 push2 pushi $6 ; maxScale push callk kernel_90, $4 bnot push pToa casts send $6 bnot push2 pushi $8 ; fixPriority lst temp[$1] callk kernel_90, $4 bnot sat temp[$3] push2 pushi $3 ; z pushi $24 ; 36, '$', elements push0 send $4 bnot push callk kernel_90, $4 bnot sat temp[$2] code_0455: lat temp[$2] bnt code_048d pushi $9e ; 158, nextNode push1 push2 pushi $6 ; maxScale push callk kernel_90, $4 bnot push lat temp[$3] send $6 bnot push2 pushi $8 ; fixPriority lst temp[$2] callk kernel_90, $4 bnot sat temp[$4] pushi $af ; 175, union push1 push lat temp[$0] send $6 bnot pushi $9e ; 158, nextNode push0 lat temp[$3] send $4 bnot sat temp[$2] jmp code_0455 code_048d: pushi $9e ; 158, nextNode push0 pToa casts send $4 bnot sat temp[$1] jmp code_0423 code_049a: pushi $b5 ; 181, set pushi $4 ; scaleX pTos left pTos top pTos left pushi $4e ; 78, 'N', width push0 lat temp[$0] send $4 bnot add push pTos top pushi $e1 ; 225, height push0 lat temp[$0] send $4 bnot add push self $c bnot pushi $95 ; 149, dispose push0 lat temp[$0] send $4 bnot code_04c9: ret Plane::hide: pTos priority ldi $ff ; 255, asInteger ne? bnt code_04df pToa priority aTop pOldPri ldi $ff ; 255, asInteger aTop priority push1 pushSelf callk kernel_42, $2 bnot code_04df: ret Plane::show: pTos priority ldi $ff ; 255, asInteger eq? bnt code_04f1 pToa pOldPri aTop priority push1 pushSelf callk kernel_42, $2 bnot code_04f1: ret Plane::isHidden: pTos priority ldi $ff ; 255, asInteger eq? ret