Slider::init: link $6 lap param[$0] bnt code_00e2 lap param[$1] bnt code_00e2 lap param[$1] jmp code_00f4 code_00e2: pToa client not bnt code_00f2 pushi $1d0 ; 464, pScreen push0 lag global[$3] send $4 bnot jmp code_00f4 code_00f2: pToa client code_00f4: aTop client pushi $1be ; 446, setSize push0 self $4 bnot pTos back ldi $ff ; 255, asInteger eq? bnt code_0108 lag global[$5d] aTop back code_0108: pTos fore ldi $ff ; 255, asInteger eq? bnt code_0113 lag global[$5c] aTop fore code_0113: pushi $8d ; 141, new push0 class Cast send $4 bnot aTop pCast push0 push0 pToa client send $4 bnot aTop plane pushi $57 ; 87, 'W', draw push0 self $4 bnot pushi $1b8 ; 440, addCast push1 pTos pCast push0 push0 pToa client send $4 bnot send $6 bnot pushi $9f ; 159, add push1 pushSelf pToa client send $6 bnot push1 pushSelf callk kernel_30, $2 bnot pToa thumb not bnt code_02c7 pToa left sat temp[$2] pToa top sat temp[$3] pToa thumbView bnt code_01ad pushi $e ; 14, view push1 push pushi $f ; 15, loop push1 pTos thumbLoop pushi $10 ; 16, cel push1 pTos thumbCel pushi $4a ; 74, 'J', setPri push1 push1 push0 push0 pToa client send $4 bnot push callk kernel_45, $2 bnot push ldi $64 ; 100, 'd', moveDone add push pushi $e6 ; 230, sizeToCel pushi $3 ; z pTos thumbView pTos thumbLoop pTos thumbCel pushi $db ; 219, moveTo push2 lst temp[$2] lst temp[$3] pushi $94 ; 148, init push1 pTos pCast pushi $8d ; 141, new push0 class View send $4 bnot aTop thumb send $30 bnot jmp code_0272 code_01ad: pushi $4e ; 78, 'N', width push0 self $4 bnot sat temp[$4] pushi $e1 ; 225, height push0 self $4 bnot sat temp[$5] pToa vTracking bnt code_01eb pToa thumbSize bnt code_01ca sat temp[$5] jmp code_0212 code_01ca: push2 pushi $8 ; fixPriority lst temp[$5] push1 pTos topValue pToa bottomValue sub push callk kernel_61, $2 bnot push ldi $1 add div push calle export60025_3, $4 bnot sat temp[$5] jmp code_0212 code_01eb: pToa thumbSize bnt code_01f3 sat temp[$4] jmp code_0212 code_01f3: push2 pushi $8 ; fixPriority lst temp[$4] push1 pTos topValue pToa bottomValue sub push callk kernel_61, $2 bnot push ldi $1 add div push calle export60025_3, $4 bnot sat temp[$4] code_0212: pushi $d3 ; 211, copy push1 pushSelf pushi $dc ; 220, posn push2 lst temp[$2] lst temp[$3] pushi $25 ; 37, '%', fore push1 pTos fore pushi $26 ; 38, '&', back push1 pushi $fe ; 254, strIndex pushi $e1 ; 225, height push1 lst temp[$5] pushi $4e ; 78, 'N', width push1 lst temp[$4] pushi $11 ; 17, bitmap push1 pushi $5 ; scaleY push0 lst temp[$4] lst temp[$5] pushi $fe ; 254, strIndex pTos fore callk kernel_35, $a bnot push pushi $4a ; 74, 'J', setPri push1 push1 push0 push0 pToa client send $4 bnot push callk kernel_45, $2 bnot push ldi $64 ; 100, 'd', moveDone add push pushi $94 ; 148, init push1 pTos pCast pushi $8d ; 141, new push0 class send $4 bnot aTop thumb send $38 bnot code_0272: pToa vTracking bnt code_028a pTos bottom pushi $e1 ; 225, height push0 pToa thumb send $4 bnot sub aTop maximum pToa top aTop minimum jmp code_029b code_028a: pTos right pushi $4e ; 78, 'N', width push0 pToa thumb send $4 bnot sub aTop maximum pToa left aTop minimum code_029b: pToa value bnt code_02bc pushi $20e ; 526, valueToPosn push1 push self $6 bnot sat temp[$0] bnt code_02bc pToa vTracking bnt code_02b8 lst temp[$3] lat temp[$0] add sat temp[$3] jmp code_02bc code_02b8: lat temp[$0] sat temp[$2] code_02bc: pushi $20b ; 523, drawThumb push2 lst temp[$2] lst temp[$3] self $8 bnot code_02c7: ret Slider::dispose: pushi $95 ; 149, dispose push0 pToa thumb send $4 bnot ldi $0 aTop thumb pToa pCast bnt code_02e8 pushi $a6 ; 166, release push0 pushi $95 ; 149, dispose push0 send $8 bnot ldi $0 aTop pCast code_02e8: pushi $95 ; 149, dispose push0 &rest $1 super , $4 bnot ret Slider::handleEvent: link $1 pushi $50 ; 80, 'P', claimed push0 lap param[$1] send $4 bnot bnt code_0302 ldi $0 ret code_0302: pushi $2b ; 43, '+', type push0 lap param[$1] send $4 bnot sat temp[$0] pushi $1d3 ; 467, modal push0 pToa client send $4 bnot push ldi $0 eq? bnt code_037a pToa pIsTracking bnt code_0335 lst temp[$0] ldi $2 eq? bnt code_0335 ldi $0 aTop pIsTracking pushi $50 ; 80, 'P', claimed push1 push0 lap param[$1] send $6 bnot jmp code_037a code_0335: lst temp[$0] ldi $1 eq? bnt code_034d pushi $eb ; 235, onMe push1 lsp param[$1] self $6 bnot bnt code_034d ldi $1 aTop pIsTracking jmp code_037a code_034d: pToa pIsTracking bnt code_0362 lst temp[$0] ldi $0 eq? bnt code_0362 pushi $20c ; 524, trackSlider push1 push1 self $6 bnot jmp code_037a code_0362: pToa pIsTracking bnt code_037a lst temp[$0] ldi $1 eq? bnt code_037a ldi $0 aTop pIsTracking pushi $50 ; 80, 'P', claimed push1 push0 lap param[$1] send $6 bnot code_037a: lst temp[$0] ldi $1 eq? bnt code_048c pushi $eb ; 235, onMe push1 lsp param[$1] self $6 bnot bnt code_048c pushi $50 ; 80, 'P', claimed push1 push1 lap param[$1] send $6 bnot pushi $a3 ; 163, contains push1 lsp param[$1] pToa thumb send $6 bnot bnt code_03b8 pushi $20c ; 524, trackSlider push1 push1 self $6 bnot pushi $50 ; 80, 'P', claimed push1 push1 lap param[$1] send $6 bnot jmp code_0484 code_03b8: pushi $b9 ; 185, localize push1 pTos plane lap param[$1] send $6 bnot pToa vTracking bnt code_0428 pToa pSnapTo bnt code_03fb pushi $20d ; 525, posnToValue push1 push2 push0 lap param[$1] send $4 bnot push self $6 bnot aTop value pushi $20b ; 523, drawThumb push2 pushi $87 ; 135, left push0 pToa thumb send $4 bnot push pushi $20e ; 526, valueToPosn push1 pTos value self $6 bnot push self $8 bnot jmp code_0484 code_03fb: pushi $20b ; 523, drawThumb push2 pushi $87 ; 135, left push0 pToa thumb send $4 bnot push push2 push0 lap param[$1] send $4 bnot push self $8 bnot pushi $20d ; 525, posnToValue push1 push2 push0 lap param[$1] send $4 bnot push self $6 bnot aTop value jmp code_0484 code_0428: pToa pSnapTo bnt code_045a pushi $20d ; 525, posnToValue push1 push1 push0 lap param[$1] send $4 bnot push self $6 bnot aTop value pushi $20b ; 523, drawThumb push2 pushi $20e ; 526, valueToPosn push1 pTos value self $6 bnot push pushi $89 ; 137, top push0 pToa thumb send $4 bnot push self $8 bnot jmp code_0484 code_045a: pushi $20b ; 523, drawThumb push2 push1 push0 lap param[$1] send $4 bnot push pushi $89 ; 137, top push0 pToa thumb send $4 bnot push self $8 bnot pushi $20d ; 525, posnToValue push1 push1 push0 lap param[$1] send $4 bnot push self $6 bnot aTop value code_0484: pushi $45 ; 69, 'E', doit push1 pTos value self $6 bnot code_048c: pushi $50 ; 80, 'P', claimed push0 lap param[$1] send $4 bnot ret Slider::moveTo: link $3 lsp param[$1] pToa left sub sat temp[$0] lsp param[$2] pToa top sub sat temp[$1] pToa vTracking bnt code_04ad lat temp[$1] jmp code_04af code_04ad: lat temp[$0] code_04af: sat temp[$2] pTos maximum add aTop maximum pTos minimum lat temp[$2] add aTop minimum pushi $db ; 219, moveTo push2 lsp param[$1] lsp param[$2] super , $8 bnot pToa thumb bnt code_04ed pToa thumbView bnt code_04e0 pushi $dd ; 221, moveBy push2 lst temp[$0] lst temp[$1] pToa thumb send $8 bnot jmp code_04ed code_04e0: pushi $dd ; 221, moveBy push2 lst temp[$0] lst temp[$1] pToa thumb send $8 bnot code_04ed: ret Slider::draw: link $1 pushi $57 ; 87, 'W', draw push0 super , $4 bnot bnt code_04fa ret code_04fa: pToa bitmap sat temp[$0] bnt code_0511 push1 pushSelf callk kernel_31, $2 bnot pushi $9f ; 159, add push1 pTos bitmap lag global[$66] send $6 bnot code_0511: pTos view ldi $ff ; 255, asInteger ne? bnt code_0548 pushi $5 ; scaleY push0 pushi $4e ; 78, 'N', width push0 self $4 bnot push pushi $e1 ; 225, height push0 self $4 bnot push pTos skip pTos back callk kernel_35, $a bnot aTop bitmap pushi $7 ; priority pushi $3 ; z pTos bitmap pTos view pTos loop pTos cel push0 push0 callk kernel_35, $e bnot jmp code_0564 code_0548: pushi $5 ; scaleY push0 pushi $4e ; 78, 'N', width push0 self $4 bnot push pushi $e1 ; 225, height push0 self $4 bnot push pTos skip pTos back callk kernel_35, $a bnot aTop bitmap code_0564: lat temp[$0] bnt code_056e push1 pushSelf callk kernel_30, $2 bnot code_056e: ret Slider::drawThumb: link $2 pToa thumb bnt code_05e6 lap param[$0] bnt code_057e lap param[$1] jmp code_0587 code_057e: pushi $87 ; 135, left push0 pToa thumb send $4 bnot code_0587: sat temp[$0] lap param[$0] bnt code_0591 lap param[$2] jmp code_059a code_0591: pushi $89 ; 137, top push0 pToa thumb send $4 bnot code_059a: sat temp[$1] pToa vTracking bnt code_05ba lst temp[$1] pToa minimum lt? bnt code_05ad pToa minimum sat temp[$1] jmp code_05d2 code_05ad: lst temp[$1] pToa maximum gt? bnt code_05d2 pToa maximum sat temp[$1] jmp code_05d2 code_05ba: lst temp[$0] pToa minimum lt? bnt code_05c7 pToa minimum sat temp[$0] jmp code_05d2 code_05c7: lst temp[$0] pToa maximum gt? bnt code_05d2 pToa maximum sat temp[$0] code_05d2: pushi $db ; 219, moveTo push2 lst temp[$0] lst temp[$1] pToa thumb send $8 bnot push1 pTos thumb callk kernel_32, $2 bnot code_05e6: ret Slider::trackSlider: link $5 lap param[$0] bnt code_07c0 lap param[$1] bnt code_07c0 pToa thumb bnt code_07c0 pTos state ldi $1 and bnt code_07c0 push1 push0 pushi $f4 ; 244, curEvent push0 lag global[$e] send $4 bnot send $4 bnot push pushi $87 ; 135, left push0 pToa thumb send $4 bnot sub sat temp[$3] push2 push0 pushi $f4 ; 244, curEvent push0 lag global[$e] send $4 bnot send $4 bnot push pushi $89 ; 137, top push0 pToa thumb send $4 bnot sub sat temp[$4] code_0636: pushi $2b ; 43, '+', type push0 pushi $f3 ; 243, nextEvent push1 pushi $7fff ; 32767 lag global[$e] send $6 bnot sat temp[$0] send $4 bnot push ldi $2 ne? bnt code_072c pushi $b9 ; 185, localize push1 pTos plane lat temp[$0] send $6 bnot pToa vTracking bnt code_06a5 push2 push0 lat temp[$0] send $4 bnot sat temp[$1] pushi $89 ; 137, top push0 pToa thumb send $4 bnot push lat temp[$4] add sat temp[$2] lst temp[$1] pToa top lt? bnt code_0684 pToa top sat temp[$1] code_0684: lst temp[$1] pToa bottom gt? bnt code_068f pToa bottom sat temp[$1] code_068f: pushi $20b ; 523, drawThumb push2 pushi $87 ; 135, left push0 pToa thumb send $4 bnot push lst temp[$1] self $8 bnot jmp code_06e6 code_06a5: push1 push0 lat temp[$0] send $4 bnot sat temp[$1] pushi $87 ; 135, left push0 pToa thumb send $4 bnot push lat temp[$3] add sat temp[$2] lst temp[$1] pToa left lt? bnt code_06c8 pToa left sat temp[$1] code_06c8: lst temp[$1] pToa right gt? bnt code_06d3 pToa right sat temp[$1] code_06d3: pushi $20b ; 523, drawThumb push2 lst temp[$1] pushi $89 ; 137, top push0 pToa thumb send $4 bnot push self $8 bnot code_06e6: pushi $20d ; 525, posnToValue push1 pToa vTracking bnt code_06f9 pushi $89 ; 137, top push0 pToa thumb send $4 bnot jmp code_0702 code_06f9: pushi $87 ; 135, left push0 pToa thumb send $4 bnot code_0702: push self $6 bnot aTop value pushi $45 ; 69, 'E', doit push1 pTos value self $6 bnot pushi $1d3 ; 467, modal push0 pToa client send $4 bnot push ldi $0 eq? bnt code_0724 jmp code_072c jmp code_0636 code_0724: push0 callk kernel_33, $0 bnot jmp code_0636 code_072c: pushi $20d ; 525, posnToValue push1 lst temp[$1] self $6 bnot aTop value pToa pSnapTo bnt code_077d pToa vTracking bnt code_075d pushi $20b ; 523, drawThumb push2 pushi $87 ; 135, left push0 pToa thumb send $4 bnot push pushi $20e ; 526, valueToPosn push1 pTos value self $6 bnot push self $8 bnot jmp code_0778 code_075d: pushi $20b ; 523, drawThumb push2 pushi $20e ; 526, valueToPosn push1 pTos value self $6 bnot push pushi $89 ; 137, top push0 pToa thumb send $4 bnot push self $8 bnot code_0778: push0 callk kernel_33, $0 bnot code_077d: pTos value pToa topValue lt? bnt code_079e pTos value pToa bottomValue lt? bnt code_079e pTos bottomValue pToa topValue lt? bnt code_0798 pToa bottomValue aTop value jmp code_07bd code_0798: pToa topValue aTop value jmp code_07bd code_079e: pTos value pToa topValue gt? bnt code_07bd pTos value pToa bottomValue gt? bnt code_07bd pTos bottomValue pToa topValue lt? bnt code_07b9 pToa topValue aTop value jmp code_07bd code_07b9: pToa bottomValue aTop value code_07bd: ldi $1 ret code_07c0: ret Slider::highlight: ret Slider::move: link $4 push1 lsp param[$1] calle export60025_0, $2 bnot sat temp[$1] ldi $1 aTop stepSize lap param[$1] sat temp[$0] code_07d8: pTos stepSize push1 lst temp[$0] callk kernel_61, $2 bnot le? bnt code_087f pushi $87 ; 135, left push0 pToa thumb send $4 bnot sat temp[$2] pushi $89 ; 137, top push0 pToa thumb send $4 bnot sat temp[$3] pToa vTracking bnt code_0820 lst temp[$3] lst temp[$1] pToa stepSize mul add sat temp[$3] push pToa maximum gt? bnt code_0813 pToa maximum sat temp[$3] code_0813: lst temp[$3] pToa minimum lt? bnt code_083f pToa minimum sat temp[$3] jmp code_083f code_0820: lst temp[$2] lst temp[$1] pToa stepSize mul add sat temp[$2] push pToa maximum gt? bnt code_0834 pToa maximum sat temp[$2] code_0834: lst temp[$2] pToa minimum lt? bnt code_083f pToa minimum sat temp[$2] code_083f: pushi $20b ; 523, drawThumb push2 lst temp[$2] lst temp[$3] self $8 bnot pushi $20d ; 525, posnToValue push1 pToa vTracking bnt code_0856 lat temp[$3] jmp code_0858 code_0856: lat temp[$2] code_0858: push self $6 bnot aTop value lsp param[$0] ldi $2 lt? bt code_0868 lap param[$2] not code_0868: bnt code_0872 pushi $45 ; 69, 'E', doit push1 pTos value self $6 bnot code_0872: lst temp[$0] pTos stepSize lat temp[$1] mul sub sat temp[$0] jmp code_07d8 code_087f: pToa value ret Slider::doit: pToa handler bnt code_088d pushi $45 ; 69, 'E', doit push1 pushSelf send $6 bnot code_088d: pToa theObj bnt code_08a0 push2 push pTos theSelector &rest $1 calle export60025_5, $4 bnot jmp code_08a2 code_08a0: pToa value code_08a2: ret Slider::posnToValue: link $2 lap param[$0] bnt code_08ad lap param[$1] jmp code_08c5 code_08ad: pToa vTracking bnt code_08bc pushi $89 ; 137, top push0 pToa thumb send $4 bnot jmp code_08c5 code_08bc: pushi $87 ; 135, left push0 pToa thumb send $4 bnot code_08c5: sat temp[$0] pToa vTracking bnt code_08e5 pushi $e1 ; 225, height push0 self $4 bnot push push1 pTos topValue pToa bottomValue sub push callk kernel_61, $2 bnot push ldi $1 add div jmp code_08fc code_08e5: pushi $4e ; 78, 'N', width push0 self $4 bnot push push1 pTos topValue pToa bottomValue sub push callk kernel_61, $2 bnot push ldi $1 add div code_08fc: sat temp[$1] pTos bottomValue pToa pSnapTo bnt code_0913 pTos maximum lat temp[$1] add push ldi $ff ; 255, asInteger add push lat temp[$0] sub jmp code_0923 code_0913: pTos maximum lst temp[$1] ldi $2 div add push ldi $ff ; 255, asInteger add push lat temp[$0] sub code_0923: push pTos topValue pToa bottomValue sub mul push pTos maximum pToa minimum sub div add ret Slider::valueToPosn: link $1 lap param[$0] bnt code_093d lap param[$1] jmp code_0943 code_093d: pushi $45 ; 69, 'E', doit push0 self $4 bnot code_0943: sat temp[$0] push pToa topValue lt? bnt code_0963 lst temp[$0] pToa bottomValue lt? bnt code_0963 pTos bottomValue pToa topValue lt? bnt code_095e pToa maximum jmp code_09a5 code_095e: pToa minimum jmp code_09a5 code_0963: lst temp[$0] pToa topValue gt? bnt code_0983 lst temp[$0] pToa bottomValue gt? bnt code_0983 pTos bottomValue pToa topValue lt? bnt code_097e pToa minimum jmp code_09a5 code_097e: pToa maximum jmp code_09a5 code_0983: pTos minimum push1 pTos topValue lat temp[$0] sub push callk kernel_61, $2 bnot push pTos maximum pToa minimum sub mul push push1 pTos topValue pToa bottomValue sub push callk kernel_61, $2 bnot div add code_09a5: ret Slider::update: link $1 pushi $20e ; 526, valueToPosn push0 self $4 bnot push pToa vTracking bnt code_09bf pushi $89 ; 137, top push0 pToa thumb send $4 bnot jmp code_09c8 code_09bf: pushi $87 ; 135, left push0 pToa thumb send $4 bnot code_09c8: sub sat temp[$0] bnt code_09d6 pushi $d7 ; 215, move push2 push push1 self $8 bnot code_09d6: ret Slider::setSize: pTos view ldi $ff ; 255, asInteger ne? bnt code_09ed pushi $e6 ; 230, sizeToCel pushi $3 ; z pTos view pTos loop pTos cel self $a bnot code_09ed: ret Slider::advance: link $1 pushi $45 ; 69, 'E', doit push0 self $4 bnot push push1 pTos bottomValue pToa topValue sub push calle export60025_0, $2 bnot add sat temp[$0] pushi $d7 ; 215, move push2 push2 push0 pushi $20e ; 526, valueToPosn push1 push self $6 bnot push pToa vTracking bnt code_0a26 pushi $89 ; 137, top push0 pToa thumb send $4 bnot jmp code_0a2f code_0a26: pushi $87 ; 135, left push0 pToa thumb send $4 bnot code_0a2f: sub push calle export60025_3, $4 bnot push push1 self $8 bnot pushi $45 ; 69, 'E', doit push1 lst temp[$0] self $6 bnot ret Slider::retreat: link $1 pushi $45 ; 69, 'E', doit push0 self $4 bnot push push1 pTos bottomValue pToa topValue sub push calle export60025_0, $2 bnot sub sat temp[$0] pushi $d7 ; 215, move push2 push2 push0 pushi $20e ; 526, valueToPosn push1 push self $6 bnot push pToa vTracking bnt code_0a7e pushi $89 ; 137, top push0 pToa thumb send $4 bnot jmp code_0a87 code_0a7e: pushi $87 ; 135, left push0 pToa thumb send $4 bnot code_0a87: sub push calle export60025_2, $4 bnot push push1 self $8 bnot pushi $45 ; 69, 'E', doit push1 lst temp[$0] self $6 bnot ret Slider::updateThumb: lap param[$0] bnt code_0aa6 lap param[$1] aTop value code_0aa6: pToa vTracking bnt code_0ac9 pushi $20b ; 523, drawThumb push2 pushi $87 ; 135, left push0 pToa thumb send $4 bnot push pushi $20e ; 526, valueToPosn push1 pTos value self $6 bnot push self $8 bnot jmp code_0ae4 code_0ac9: pushi $20b ; 523, drawThumb push2 pushi $20e ; 526, valueToPosn push1 pTos value self $6 bnot push pushi $89 ; 137, top push0 pToa thumb send $4 bnot push self $8 bnot code_0ae4: ret