BitMap::init: pTos signal ldi $f7 ; 247, cat and aTop signal pushi $17b ; 379, addToCast push1 lap param[$0] bnt code_009d lap param[$1] jmp code_009f code_009d: ldi $0 code_009f: push self $6 bnot ret BitMap::dispose: link $1 push1 pushSelf callk kernel_31, $2 bnot pToa plane bnt code_00d3 pushi $a3 ; 163, contains push1 push lag global[$25] send $6 bnot bnt code_00d3 pushi $9d ; 157, eachElementDo push2 pushi $58 ; 88, 'X', delete pushSelf pushi $cf ; 207, casts push0 pToa plane send $4 bnot send $8 bnot ldi $0 aTop plane code_00d3: pToa seenRect bnt code_00e2 pushi $95 ; 149, dispose push0 send $4 bnot ldi $0 aTop seenRect code_00e2: pToa bitmap sat temp[$0] ldi $0 aTop bitmap lat temp[$0] bnt code_00f8 pushi $9f ; 159, add push1 push lag global[$66] send $6 bnot code_00f8: pushi $95 ; 149, dispose push0 &rest $1 super Rect, $4 bnot ret BitMap::addToCast: link $1 lap param[$0] bnt code_0111 lap param[$1] bnt code_0111 lap param[$1] jmp code_0126 code_0111: pushi $4b ; 75, 'K', at push1 push0 pushi $cf ; 207, casts push0 push0 push0 lag global[$3] send $4 bnot send $4 bnot send $6 bnot code_0126: sat temp[$0] pushi $9f ; 159, add push1 pushSelf aTop client send $6 bnot push0 push0 lat temp[$0] send $4 bnot aTop plane bnt code_0170 pushi $a3 ; 163, contains push1 pTos plane lag global[$25] send $6 bnot bnt code_0170 pTos view ldi $ff ; 255, asInteger ne? bnt code_015b push2 pushi $80 ; 128, lastKey pTos view callk kernel_5, $4 bnot code_015b: bt code_015f pToa bitmap code_015f: bnt code_0170 pushi $17c ; 380, isNotHidden push0 self $4 bnot bnt code_0170 push1 pushSelf callk kernel_30, $2 bnot code_0170: ret BitMap::handleEvent: ldi $0 ret BitMap::isNotHidden: pTos signal ldi $8 ; fixPriority and not ret BitMap::addItem: link $4 pToa bitmap not bnt code_019f pushi $5 ; scaleY push0 pushi $4e ; 78, 'N', width push0 self $4 bnot push pushi $e1 ; 225, height push0 self $4 bnot push pushi $fe ; 254, strIndex lsg global[$54] callk kernel_35, $a bnot aTop bitmap code_019f: lap param[$0] bnt code_029e lsp param[$1] dup ldi $1 eq? bnt code_01b9 push2 push2 pTos bitmap &rest $2 callk kernel_35, $4 bnot jmp code_029d code_01b9: dup ldi $2 eq? bnt code_01cd push2 pushi $3 ; z pTos bitmap &rest $2 callk kernel_35, $4 bnot jmp code_029d code_01cd: dup ldi $3 ; z eq? bnt code_0279 lsp param[$0] ldi $6 ; maxScale gt? bnt code_01e1 ldi $5 ; scaleY lapi param[$2] jmp code_01e3 code_01e1: lag global[$3a] code_01e3: sat temp[$1] pushi $8d ; 141, new push0 class Rect send $4 bnot sat temp[$0] pushi $e5 ; 229, sizeToStr pushi $3 ; z push2 pushi $9 ; inLeft ldi $0 lspi param[$2] callk kernel_91, $4 bnot push lst temp[$1] pushi $ff ; 255, asInteger lat temp[$0] send $a bnot pushi $4e ; 78, 'N', width push0 lat temp[$0] send $4 bnot sat temp[$2] pushi $e1 ; 225, height push0 lat temp[$0] send $4 bnot sat temp[$3] pushi $95 ; 149, dispose push0 lat temp[$0] send $4 bnot pushi $e ; 14, view pushi $4 ; scaleX pTos bitmap push2 pushi $9 ; inLeft ldi $0 lspi param[$2] callk kernel_91, $4 bnot push ldi $1 lspi param[$2] ldi $2 lspi param[$2] ldi $1 lspi param[$2] lat temp[$2] add push ldi $2 lspi param[$2] lat temp[$3] add push ldi $3 ; z lspi param[$2] ldi $4 ; scaleX lspi param[$2] pushi $fe ; 254, strIndex lst temp[$1] lsp param[$0] ldi $7 ; priority gt? bnt code_026d ldi $6 ; maxScale lapi param[$2] jmp code_026f code_026d: ldi $0 code_026f: push pushi $ff ; 255, asInteger push0 callk kernel_35, $1c bnot jmp code_029d code_0279: dup ldi $4 ; scaleX eq? bnt code_028c push2 pushi $5 ; scaleY pTos bitmap &rest $2 callk kernel_35, $4 bnot jmp code_029d code_028c: dup ldi $5 ; scaleY eq? bnt code_029d push2 pushi $6 ; maxScale pTos bitmap &rest $2 callk kernel_35, $4 bnot code_029d: toss code_029e: ret BitMap::show: pushi $17c ; 380, isNotHidden push0 self $4 bnot not bnt code_02b6 pTos signal ldi $f7 ; 247, cat and aTop signal push1 pushSelf callk kernel_30, $2 bnot code_02b6: ret BitMap::hide: pushi $17c ; 380, isNotHidden push0 self $4 bnot bnt code_02e9 pTos signal ldi $8 ; fixPriority or aTop signal push1 pushSelf callk kernel_31, $2 bnot pToa bitmap bnt code_02e9 lap param[$0] not bt code_02d8 lap param[$1] code_02d8: bnt code_02e9 pushi $9f ; 159, add push1 pTos bitmap lag global[$66] send $6 bnot ldi $0 aTop bitmap code_02e9: ret BitMap::moveTo: pTos right lsp param[$1] pToa left sub add aTop right pTos bottom lsp param[$2] pToa top sub add aTop bottom lap param[$2] aTop top aTop y lap param[$1] aTop left aTop x pTos -info- ldi $8 ; fixPriority or aTop -info- ret BitMap::width: lap param[$0] bt code_031f pTos view ldi $ff ; 255, asInteger eq? bt code_031f pToa right code_031f: bnt code_032d pushi $4e ; 78, 'N', width push0 &rest $1 super Rect, $4 bnot ret jmp code_033a code_032d: pushi $3 ; z pTos view pTos loop pTos cel callk kernel_28, $6 bnot ret code_033a: ret BitMap::height: link $1 lap param[$0] bt code_034a pTos view ldi $ff ; 255, asInteger eq? bt code_034a pToa bottom code_034a: bnt code_0359 pushi $e1 ; 225, height push0 &rest $1 super Rect, $4 bnot ret jmp code_0366 code_0359: pushi $3 ; z pTos view pTos loop pTos cel callk kernel_29, $6 bnot ret code_0366: ret BitMap::setPri: lsp param[$0] ldi $0 eq? bnt code_0374 ldi $1 aTop fixPriority jmp code_0389 code_0374: lsp param[$1] ldi $ff ; 255, asInteger eq? bnt code_0381 ldi $0 aTop fixPriority jmp code_0389 code_0381: lap param[$1] aTop priority ldi $1 aTop fixPriority code_0389: ret BitMap::draw: ret