FileSelector::init: link $2 pToa curFileStr bnt code_010b ret code_010b: pToa searchStr not bnt code_0115 lofsa string_00c2 ; "*.*" aTop searchStr code_0115: pToa font not bnt code_011e lag global[$3b] aTop font code_011e: pushi $8d ; 141, new push0 class Rect send $4 bnot sat temp[$0] pushi $e5 ; 229, sizeToStr pushi $3 ; z lofsa string_00c6 ; "M" push pTos font pushi $ff ; 255, asInteger lat temp[$0] send $a bnot pushi $4e ; 78, 'N', width push0 lat temp[$0] send $4 bnot push ldi $b ; 11, inRight mul aTop itemWidth pushi $95 ; 149, dispose push0 lat temp[$0] send $4 bnot pToa homeStr not bnt code_0177 pushi $8d ; 141, new push1 pushi $80 ; 128, lastKey class Str send $6 bnot aTop homeStr push2 pushi $12 ; 18, nsLeft push2 pushi $9 ; inLeft pTos homeStr callk kernel_91, $4 bnot push callk kernel_93, $4 bnot code_0177: pushi $4b ; 75, 'K', at push1 pushi $5a ; 90, 'Z', size push0 pToa homeStr send $4 bnot push ldi $1 sub push pToa homeStr send $6 bnot push ldi $5c ; 92, '\', palette ne? bnt code_01a8 pushi $4b ; 75, 'K', at pushi $3 ; z pushi $5a ; 90, 'Z', size push0 pToa homeStr send $4 bnot push pushi $5c ; 92, '\', palette push0 pToa homeStr send $a bnot code_01a8: pushi $d3 ; 211, copy push1 pTos homeStr class Str send $6 bnot aTop curDirStr pushi $d3 ; 211, copy push1 pTos searchStr class Str send $6 bnot aTop curFileStr pushi $22d ; 557, readDirectory push2 pTos curDirStr pTos curFileStr self $8 bnot pushi $23 ; 35, '#', text push1 lofsa string_00c8 ; "" push pushi $2a ; 42, '*', font push1 lsg global[$3b] pushi $4e ; 78, 'N', width push1 pushi $78 ; 120, 'x', textRight pushi $e1 ; 225, height push1 pushi $c ; 12, inBottom pushi $25 ; 37, '%', fore push1 pTos fore pushi $26 ; 38, '&', back push1 pTos back pushi $db ; 219, moveTo push2 pTos left pTos top pushi $1c7 ; 455, handler push1 pushSelf pushi $8d ; 141, new push0 class TextItem send $4 bnot aTop directoryI send $32 bnot pushi $23 ; 35, '#', text push1 push2 pTos directoryI pTos curDirStr call code_0ecc, $4 bnot push pToa directoryI send $6 bnot pushi $23 ; 35, '#', text push1 pTos curFileStr pushi $2a ; 42, '*', font push1 lsg global[$3b] pushi $2e ; 46, '.', max push1 pushi $1e ; 30, brRight pushi $db ; 219, moveTo push2 pTos left pushi $8a ; 138, bottom push0 pToa directoryI send $4 bnot push ldi $6 ; maxScale add push pushi $1be ; 446, setSize push0 pushi $1c7 ; 455, handler push1 pushSelf pushi $8d ; 141, new push0 class EditItem send $4 bnot aTop fileNameI send $24 bnot pushi $29 ; 41, ')', state push1 pushi $29 ; 41, ')', state push0 pToa fileNameI send $4 bnot push ldi $200 ; 512, bottomValue or push pToa fileNameI send $6 bnot pushi $1be ; 446, setSize push0 self $4 bnot pushi $e2 ; 226, heighten push1 pushi $6 ; maxScale self $6 bnot pushi $94 ; 148, init push0 &rest $1 super Selector, $4 bnot pushi $8 ; fixPriority pushi $1c1 ; 449, borderSize push0 lag global[$9] send $4 bnot add sat temp[$1] pushi $23 ; 35, '#', text push1 lofsa string_00c9 ; "..\\" push pushi $1c8 ; 456, helpStr push1 lofsa string_00cd ; " Select to go one directory up towards the root." push pushi $2a ; 42, '*', font push1 lsg global[$3b] pushi $e1 ; 225, height push1 pushi $c ; 12, inBottom pushi $4e ; 78, 'N', width push1 pushi $1a ; 26, signal pushi $51 ; 81, 'Q', value push1 pushi $3 ; z pushi $29 ; 41, ')', state push1 push1 pushi $1c7 ; 455, handler push1 pushSelf pushi $8d ; 141, new push0 lag global[$9] send $4 bnot aTop upDirBtn send $30 bnot pushi $db ; 219, moveTo push2 pushi $88 ; 136, right push0 pToa upArrow send $4 bnot push lat temp[$1] add push pushi $89 ; 137, top push0 pToa scrollBox send $4 bnot push pushi $1c1 ; 449, borderSize push0 pToa upDirBtn send $4 bnot add push pToa upDirBtn send $8 bnot pushi $23 ; 35, '#', text push1 lofsa string_00c2 ; "*.*" push pushi $1c8 ; 456, helpStr push1 lofsa string_0100 ; " Select to change the search mask." push pushi $2a ; 42, '*', font push1 lsg global[$3b] pushi $e1 ; 225, height push1 pushi $c ; 12, inBottom pushi $4e ; 78, 'N', width push1 pushi $1a ; 26, signal pushi $51 ; 81, 'Q', value push1 push2 pushi $db ; 219, moveTo push2 pushi $88 ; 136, right push0 pToa upDirBtn send $4 bnot push pushi $1c1 ; 449, borderSize push0 pToa upDirBtn send $4 bnot add push ldi $6 ; maxScale add push pushi $89 ; 137, top push0 pToa upDirBtn send $4 bnot push pushi $29 ; 41, ')', state push1 push1 pushi $1c7 ; 455, handler push1 pushSelf pushi $8d ; 141, new push0 lag global[$9] send $4 bnot aTop fileMaskBtn send $38 bnot pushi $23 ; 35, '#', text push1 lofsa string_0125 ; "Home" push pushi $1c8 ; 456, helpStr push1 lofsa string_012a ; " Select to go back to your original home directory." push pushi $2a ; 42, '*', font push1 lsg global[$3b] pushi $e1 ; 225, height push1 pushi $c ; 12, inBottom pushi $4e ; 78, 'N', width push1 pushi $40 ; 64, '@', yStep pushi $51 ; 81, 'Q', value push1 pushi $4 ; scaleX pushi $db ; 219, moveTo push2 pushi $87 ; 135, left push0 pToa upDirBtn send $4 bnot push pushi $8a ; 138, bottom push0 pToa upDirBtn send $4 bnot push lat temp[$1] add push pushi $29 ; 41, ')', state push1 push1 pushi $1c7 ; 455, handler push1 pushSelf pushi $8d ; 141, new push0 lag global[$9] send $4 bnot aTop homeBtn send $38 bnot pushi $23 ; 35, '#', text push1 lofsa string_0160 ; " OK " push pushi $1c8 ; 456, helpStr push1 lofsa string_0165 ; " Select to use this selection." push pushi $2a ; 42, '*', font push1 lsg global[$3b] pushi $e1 ; 225, height push1 pushi $c ; 12, inBottom pushi $4e ; 78, 'N', width push1 pushi $40 ; 64, '@', yStep pushi $51 ; 81, 'Q', value push1 push1 pushi $db ; 219, moveTo push2 pushi $87 ; 135, left push0 pToa upDirBtn send $4 bnot push pushi $8a ; 138, bottom push0 pToa homeBtn send $4 bnot push lat temp[$1] add push pushi $29 ; 41, ')', state push1 pushi $3 ; z pushi $1c7 ; 455, handler push1 pushSelf pushi $8d ; 141, new push0 lag global[$9] send $4 bnot aTop okBtn send $38 bnot pushi $23 ; 35, '#', text push1 lofsa string_0186 ; "Cancel" push pushi $1c8 ; 456, helpStr push1 lofsa string_018d ; " Select to abort this operation." push pushi $2a ; 42, '*', font push1 lsg global[$3b] pushi $e1 ; 225, height push1 pushi $c ; 12, inBottom pushi $4e ; 78, 'N', width push1 pushi $40 ; 64, '@', yStep pushi $51 ; 81, 'Q', value push1 push0 pushi $db ; 219, moveTo push2 pushi $87 ; 135, left push0 pToa okBtn send $4 bnot push pushi $8a ; 138, bottom push0 pToa okBtn send $4 bnot push lat temp[$1] add push pushi $29 ; 41, ')', state push1 pushi $3 ; z pushi $1c7 ; 455, handler push1 pushSelf pushi $8d ; 141, new push0 lag global[$9] send $4 bnot aTop cancelBtn send $38 bnot pushi $4e ; 78, 'N', width push1 pushi $88 ; 136, right push0 pToa cancelBtn send $4 bnot push pTos left ldi $6 ; maxScale add sub push pToa directoryI send $6 bnot pushi $4e ; 78, 'N', width push1 pushi $4e ; 78, 'N', width push0 pToa directoryI send $4 bnot push pToa fileNameI send $6 bnot pushi $1be ; 446, setSize push0 self $4 bnot pTos client pushi $1d0 ; 464, pScreen push0 lag global[$3] send $4 bnot eq? bnt code_04ef pushi $94 ; 148, init push1 pTos client pToa directoryI send $6 bnot pushi $94 ; 148, init push1 pTos client pToa fileNameI send $6 bnot pushi $94 ; 148, init push1 pTos client pToa homeBtn send $6 bnot pushi $94 ; 148, init push1 pTos client pToa okBtn send $6 bnot pushi $94 ; 148, init push1 pTos client pToa cancelBtn send $6 bnot pushi $94 ; 148, init push1 pTos client pToa fileMaskBtn send $6 bnot pushi $94 ; 148, init push1 pTos client pToa scrollBox send $6 bnot jmp code_050f code_04ef: pToa client bnt code_050f pushi $ad ; 173, addBefore push2 pushSelf pTos fileNameI pushi $9f ; 159, add pushi $6 ; maxScale pTos directoryI pTos upDirBtn pTos fileMaskBtn pTos homeBtn pTos okBtn pTos cancelBtn send $18 bnot code_050f: pToa curItem bnt code_052c pToa elements bnt code_052c pushi $a3 ; 163, contains push1 pTos curItem send $6 bnot not bnt code_052c pushi $95 ; 149, dispose push0 pToa curItem send $4 bnot code_052c: ldi $0 aTop curItem ret FileSelector::dispose: pToa homeStr bnt code_0540 pushi $95 ; 149, dispose push0 send $4 bnot ldi $0 aTop homeStr code_0540: pToa curFileStr bnt code_054f pushi $95 ; 149, dispose push0 send $4 bnot ldi $0 aTop curFileStr code_054f: pToa curDirStr bnt code_055e pushi $95 ; 149, dispose push0 send $4 bnot ldi $0 aTop curDirStr code_055e: pToa elements bnt code_056d pushi $95 ; 149, dispose push0 send $4 bnot ldi $0 aTop elements code_056d: pushi $95 ; 149, dispose push0 super Selector, $4 bnot ldi $0 aTop upDirBtn aTop fileMaskBtn aTop cancelBtn aTop okBtn aTop homeBtn aTop fileNameI aTop directoryI ret FileSelector::moveTo: link $2 pToa directoryI bnt code_060b lsp param[$1] pToa left sub sat temp[$0] lsp param[$2] pToa top sub sat temp[$1] lsp param[$0] ldi $3 ; z lt? bnt code_060b pToa directoryI bnt code_05b1 pushi $dd ; 221, moveBy push2 lst temp[$0] lst temp[$1] send $8 bnot code_05b1: pToa fileNameI bnt code_05c0 pushi $dd ; 221, moveBy push2 lst temp[$0] lst temp[$1] send $8 bnot code_05c0: pToa upDirBtn bnt code_05cf pushi $dd ; 221, moveBy push2 lst temp[$0] lst temp[$1] send $8 bnot code_05cf: pToa fileMaskBtn bnt code_05de pushi $dd ; 221, moveBy push2 lst temp[$0] lst temp[$1] send $8 bnot code_05de: pToa homeBtn bnt code_05ed pushi $dd ; 221, moveBy push2 lst temp[$0] lst temp[$1] send $8 bnot code_05ed: pToa okBtn bnt code_05fc pushi $dd ; 221, moveBy push2 lst temp[$0] lst temp[$1] send $8 bnot code_05fc: pToa cancelBtn bnt code_060b pushi $dd ; 221, moveBy push2 lst temp[$0] lst temp[$1] send $8 bnot code_060b: pushi $db ; 219, moveTo push2 lsp param[$1] lsp param[$2] super Selector, $8 bnot ret FileSelector::setSize: link $1 pushi $d3 ; 211, copy push1 pushSelf pushi $8d ; 141, new push0 class Rect send $4 bnot sat temp[$0] send $6 bnot pToa directoryI bnt code_063b pushi $af ; 175, union push1 push lat temp[$0] send $6 bnot code_063b: pToa fileNameI bnt code_0649 pushi $af ; 175, union push1 push lat temp[$0] send $6 bnot code_0649: pToa scrollBox bnt code_0657 pushi $af ; 175, union push1 push lat temp[$0] send $6 bnot code_0657: pToa downArrow bnt code_0665 pushi $af ; 175, union push1 push lat temp[$0] send $6 bnot code_0665: pToa cancelBtn bnt code_0673 pushi $af ; 175, union push1 push lat temp[$0] send $6 bnot code_0673: pushi $d3 ; 211, copy push1 lst temp[$0] self $6 bnot pushi $95 ; 149, dispose push0 lat temp[$0] send $4 bnot ret FileSelector::draw: pToa directoryI bnt code_0690 pushi $57 ; 87, 'W', draw push0 send $4 bnot code_0690: pToa fileNameI bnt code_069a pushi $57 ; 87, 'W', draw push0 send $4 bnot code_069a: pToa homeBtn bnt code_06a4 pushi $57 ; 87, 'W', draw push0 send $4 bnot code_06a4: pToa okBtn bnt code_06ae pushi $57 ; 87, 'W', draw push0 send $4 bnot code_06ae: pToa cancelBtn bnt code_06b8 pushi $57 ; 87, 'W', draw push0 send $4 bnot code_06b8: pToa fileMaskBtn bnt code_06c2 pushi $57 ; 87, 'W', draw push0 send $4 bnot code_06c2: pToa upDirBtn bnt code_06cc pushi $57 ; 87, 'W', draw push0 send $4 bnot code_06cc: pushi $57 ; 87, 'W', draw push0 super Selector, $4 bnot ret FileSelector::selectItem: link $1 pToa curItem sat temp[$0] pushi $1d4 ; 468, selectItem push0 &rest $1 super Selector, $4 bnot pTos curItem lat temp[$0] ne? bnt code_0721 lsp param[$0] ldi $2 lt? bnt code_0721 pushi $d3 ; 211, copy push1 pushi $23 ; 35, '#', text push0 pToa curItem send $4 bnot push pToa curFileStr send $6 bnot pToa fileNameI bnt code_0721 pushi $23 ; 35, '#', text push1 pTos curFileStr pushi $2d ; 45, '-', cursor push1 pushi $5a ; 90, 'Z', size push0 pToa curFileStr send $4 bnot push pushi $57 ; 87, 'W', draw push0 pToa fileNameI send $10 bnot code_0721: ret FileSelector::sort: link $3 pushi $221 ; 545, pSelector push1 pushSelf pushi $94 ; 148, init push1 lsp param[$1] pushi $8d ; 141, new push0 class SelectorText send $4 bnot sat temp[$1] send $c bnot pushi $a4 ; 164, isEmpty push0 pToa elements send $4 bnot bnt code_0756 pushi $9f ; 159, add push1 lst temp[$1] pToa elements send $6 bnot jmp code_07cf code_0756: pushi $8d ; 141, new push1 pTos elements class Sequence send $6 bnot sat temp[$0] code_0763: pushi $4c ; 76, 'L', next push0 lat temp[$0] send $4 bnot sat temp[$2] bnt code_07a9 pushi $22f ; 559, test push1 pushi $10 ; 16, cel pushi $23 ; 35, '#', text push0 send $4 bnot send $6 bnot push pushi $22f ; 559, test push1 pushi $10 ; 16, cel lap param[$1] send $6 bnot ne? bt code_07a3 pushi $d5 ; 213, compare push1 pushi $23 ; 35, '#', text push0 lat temp[$2] send $4 bnot push lap param[$1] send $6 bnot push ldi $0 lt? code_07a3: bnt code_07a9 ldi $0 jmp code_0763 code_07a9: pushi $95 ; 149, dispose push0 lat temp[$0] send $4 bnot lat temp[$2] bnt code_07c4 pushi $ad ; 173, addBefore push2 push lst temp[$1] pToa elements send $8 bnot jmp code_07cf code_07c4: pushi $9f ; 159, add push1 lst temp[$1] pToa elements send $6 bnot code_07cf: ret FileSelector::readDirectory: link $5 pToa elements bnt code_07e4 pushi $9d ; 157, eachElementDo push1 pushi $95 ; 149, dispose pushi $a6 ; 166, release push0 send $a bnot code_07e4: pushi $8d ; 141, new push0 class Set send $4 bnot aTop elements pushi $d3 ; 211, copy push1 lsp param[$1] class Str send $6 bnot sat temp[$1] pushi $8d ; 141, new push1 pushi $d ; 13, seenRect lofsa send $6 bnot sat temp[$0] pushi $8d ; 141, new push0 class Set send $4 bnot sat temp[$2] pushi $8d ; 141, new push0 class Set send $4 bnot sat temp[$3] push2 lst temp[$1] lofsa string_00c2 ; "*.*" push call code_1040, $4 bnot pushi $4 ; scaleX pushi $8 ; fixPriority pushi $71 ; 113, 'q', data push0 lat temp[$1] send $4 bnot push push2 pushi $9 ; inLeft lst temp[$0] callk kernel_91, $4 bnot push pushi $10 ; 16, cel callk kernel_93, $8 bnot bnt code_08b9 code_084c: pushi $22f ; 559, test push1 pushi $10 ; 16, cel lat temp[$0] send $6 bnot bnt code_08a3 pushi $d5 ; 213, compare push1 lofsa string_01b0 ; "." push lat temp[$0] send $6 bnot push ldi $0 eq? bt code_087d pushi $d5 ; 213, compare push1 lofsa string_01b2 ; ".." push lat temp[$0] send $6 bnot push ldi $0 eq? code_087d: bnt code_088a pushi $95 ; 149, dispose push0 lat temp[$0] send $4 bnot jmp code_0895 code_088a: pushi $9f ; 159, add push1 lst temp[$0] lat temp[$2] send $6 bnot code_0895: pushi $8d ; 141, new push1 pushi $d ; 13, seenRect lofsa send $6 bnot sat temp[$0] code_08a3: push2 pushi $9 ; inLeft push2 pushi $9 ; inLeft lst temp[$0] callk kernel_91, $4 bnot push callk kernel_93, $4 bnot not bt code_08b9 jmp code_084c code_08b9: lsp param[$0] ldi $1 gt? bnt code_08ca push2 lst temp[$1] lsp param[$2] call code_1040, $4 bnot code_08ca: pushi $4 ; scaleX pushi $8 ; fixPriority pushi $71 ; 113, 'q', data push0 lat temp[$1] send $4 bnot push pushi $71 ; 113, 'q', data push0 lat temp[$0] send $4 bnot push push0 callk kernel_93, $8 bnot bnt code_0923 code_08e7: pushi $22f ; 559, test push1 push0 lat temp[$0] send $6 bnot not bnt code_090d pushi $9f ; 159, add push1 lst temp[$0] lat temp[$3] send $6 bnot pushi $8d ; 141, new push1 pushi $d ; 13, seenRect lofsa send $6 bnot sat temp[$0] code_090d: push2 pushi $9 ; inLeft push2 pushi $9 ; inLeft lst temp[$0] callk kernel_91, $4 bnot push callk kernel_93, $4 bnot not bt code_0923 jmp code_08e7 code_0923: pushi $95 ; 149, dispose push0 lat temp[$1] send $4 bnot pushi $95 ; 149, dispose push0 lat temp[$0] send $4 bnot ldi $0 sat temp[$4] code_0939: lst temp[$4] pushi $5a ; 90, 'Z', size push0 lat temp[$2] send $4 bnot lt? bnt code_0997 pushi $29 ; 41, ')', state push1 pushi $29 ; 41, ')', state push0 pushi $4b ; 75, 'K', at push1 lst temp[$4] lat temp[$2] send $6 bnot send $4 bnot push pushi $f5 ; 245, format push2 lofsa string_01b5 ; "<%s>" push pushi $4b ; 75, 'K', at push1 lst temp[$4] lat temp[$2] send $6 bnot push lofsa send $8 bnot sat temp[$0] send $6 bnot pushi $22e ; 558, sort push1 lst temp[$0] self $6 bnot pushi $95 ; 149, dispose push0 pushi $4b ; 75, 'K', at push1 lst temp[$4] lat temp[$2] send $6 bnot send $4 bnot +at temp[$4] jmp code_0939 code_0997: pushi $a6 ; 166, release push0 pushi $95 ; 149, dispose push0 lat temp[$2] send $8 bnot ldi $0 sat temp[$4] code_09a8: lst temp[$4] pushi $5a ; 90, 'Z', size push0 lat temp[$3] send $4 bnot lt? bnt code_09cb pushi $22e ; 558, sort push1 pushi $4b ; 75, 'K', at push1 lst temp[$4] lat temp[$3] send $6 bnot push self $6 bnot +at temp[$4] jmp code_09a8 code_09cb: pushi $a6 ; 166, release push0 pushi $95 ; 149, dispose push0 lat temp[$3] send $8 bnot ret FileSelector::update: link $3 lap param[$0] bnt code_0a26 pushi $d3 ; 211, copy push1 lsp param[$1] pToa curFileStr send $6 bnot pushi $22d ; 557, readDirectory push2 pTos curDirStr pTos curFileStr self $8 bnot ldi $0 aTop start aTop curItem pushi $5a ; 90, 'Z', size push0 pToa elements send $4 bnot push pToa itemsPerPage sub sat temp[$1] pushi $200 ; 512, bottomValue push1 push ldi $0 lt? bnt code_0a17 ldi $0 jmp code_0a19 code_0a17: lat temp[$1] code_0a19: push pushi $94 ; 148, init push0 pushi $57 ; 87, 'W', draw push0 pToa scrollBar send $e bnot code_0a26: pToa directoryI bnt code_0a7e push2 push pTos curDirStr call code_0ecc, $4 bnot sat temp[$0] pushi $23 ; 35, '#', text push0 pToa directoryI send $4 bnot bnt code_0a4f pushi $95 ; 149, dispose push0 pushi $23 ; 35, '#', text push0 pToa directoryI send $4 bnot send $4 bnot code_0a4f: pushi $26 ; 38, '&', back push1 lsg global[$58] pushi $25 ; 37, '%', fore push1 lsg global[$54] pToa directoryI send $c bnot pushi $23 ; 35, '#', text push1 pushi $d0 ; 208, with push1 lst temp[$0] class Str send $6 bnot push pushi $57 ; 87, 'W', draw push0 pToa directoryI send $a bnot pushi $95 ; 149, dispose push0 lat temp[$0] send $4 bnot code_0a7e: pToa fileNameI bnt code_0a9b pushi $23 ; 35, '#', text push1 pTos curFileStr pushi $2d ; 45, '-', cursor push1 pushi $5a ; 90, 'Z', size push0 pToa curFileStr send $4 bnot push pushi $57 ; 87, 'W', draw push0 pToa fileNameI send $10 bnot code_0a9b: pushi $1ad ; 429, update push0 super Selector, $4 bnot ret FileSelector::handleEvent: link $6 ldi $0 sat temp[$0] pToa fileNameI bnt code_0b30 pushi $29 ; 41, ')', state push0 send $4 bnot push ldi $8 ; fixPriority and bnt code_0b30 pushi $2b ; 43, '+', type push0 lap param[$1] send $4 bnot push ldi $4 ; scaleX eq? bnt code_0b30 pushi $31 ; 49, '1', message push0 lap param[$1] send $4 bnot push ldi $d ; 13, seenRect eq? bnt code_0b30 pushi $23 ; 35, '#', text push0 pToa fileNameI send $4 bnot sat temp[$2] pushi $ae ; 174, indexOf push1 pushi $2a ; 42, '*', font send $6 bnot push ldi $ff ; 255, asInteger ne? bt code_0b02 pushi $ae ; 174, indexOf push1 pushi $3f ; 63, '?', xStep lat temp[$2] send $6 bnot push ldi $ff ; 255, asInteger ne? code_0b02: bnt code_0b19 pushi $1ad ; 429, update push1 lst temp[$2] self $6 bnot pushi $50 ; 80, 'P', claimed push1 push1 lap param[$1] send $6 bnot jmp code_0d2c code_0b19: pushi $50 ; 80, 'P', claimed push1 push1 lap param[$1] send $6 bnot pushi $1d4 ; 468, selectItem push1 pTos okBtn pToa client send $6 bnot jmp code_0d2c code_0b30: pushi $50 ; 80, 'P', claimed push0 lap param[$1] send $4 bnot bt code_0b40 pTos state ldi $1 and not code_0b40: bnt code_0b47 ldi $0 jmp code_0d2c code_0b47: pushi $2b ; 43, '+', type push0 lap param[$1] send $4 bnot push ldi $1 and bnt code_0c92 pushi $eb ; 235, onMe push1 lsp param[$1] pToa scrollBox send $6 bnot bnt code_0c92 pushi $50 ; 80, 'P', claimed push1 push1 lap param[$1] send $6 bnot ldi $0 sat temp[$0] push2 push0 lap param[$1] send $4 bnot push pushi $89 ; 137, top push0 pToa scrollBox send $4 bnot sub push pushi $e1 ; 225, height push0 pToa scrollBox send $4 bnot push pToa itemsPerPage div div sat temp[$3] push pToa start add sat temp[$1] push pushi $5a ; 90, 'Z', size push0 pToa elements send $4 bnot lt? bnt code_0d2c pushi $4b ; 75, 'K', at push1 lst temp[$1] pToa elements send $6 bnot sat temp[$5] pushi $29 ; 41, ')', state push1 pushi $29 ; 41, ')', state push0 pushi $23 ; 35, '#', text push0 send $4 bnot send $4 bnot push pushi $d3 ; 211, copy push1 pushi $23 ; 35, '#', text push0 lat temp[$5] send $4 bnot push lofsa send $6 bnot sat temp[$2] send $6 bnot pushi $22f ; 559, test push1 pushi $10 ; 16, cel lat temp[$2] send $6 bnot bnt code_0c20 pushi $f8 ; 248, translate push2 lofsa string_01ba ; "<" push lofsa string_00c8 ; "" push lat temp[$2] send $8 bnot pushi $f8 ; 248, translate push2 lofsa string_01bc ; ">" push lofsa string_00c8 ; "" push lat temp[$2] send $8 bnot push2 pTos curDirStr lst temp[$2] call code_10fa, $4 bnot pushi $1ad ; 429, update push1 pTos curFileStr self $6 bnot jmp code_0c81 code_0c20: pToa allowDoubleClick bnt code_0c6d pTos curItem pushi $4b ; 75, 'K', at push1 lst temp[$1] pToa elements send $6 bnot eq? bnt code_0c6d push0 callk kernel_121, $0 bnot push pToa doubleClickTime sub push ldi $14 ; 20, nsRight lt? bnt code_0c6d pushi $51 ; 81, 'Q', value push0 pToa okBtn send $4 bnot aTop value pushi $1d4 ; 468, selectItem push1 pTos okBtn pToa client send $6 bnot pushi $2b ; 43, '+', type push1 pushi $4 ; scaleX pushi $31 ; 49, '1', message push1 pushi $d ; 13, seenRect pushi $50 ; 80, 'P', claimed push1 push0 lap param[$1] send $12 bnot jmp code_0c81 code_0c6d: push0 callk kernel_121, $0 bnot aTop doubleClickTime pushi $1d4 ; 468, selectItem push1 lst temp[$1] self $6 bnot ldi $0 sat temp[$0] code_0c81: pushi $95 ; 149, dispose push0 lat temp[$2] send $4 bnot push0 callk kernel_33, $0 bnot jmp code_0d2c code_0c92: pTos state ldi $8 ; fixPriority and bnt code_0d1e pushi $2b ; 43, '+', type push0 lap param[$1] send $4 bnot push ldi $10 ; 16, cel eq? bnt code_0d1e pToa curItem sat temp[$4] pushi $c8 ; 200, handleEvent push1 lsp param[$1] super Selector, $6 bnot pushi $31 ; 49, '1', message push0 lap param[$1] send $4 bnot push dup ldi $1 eq? bnt code_0cef lst temp[$4] pToa curItem ne? bnt code_0d1b pushi $d3 ; 211, copy push1 pToa curItem bnt code_0cde pushi $23 ; 35, '#', text push0 send $4 bnot jmp code_0ce0 code_0cde: pToa searchStr code_0ce0: push pToa curFileStr send $6 bnot pushi $1ad ; 429, update push0 self $4 bnot jmp code_0d1b code_0cef: dup ldi $5 ; scaleY eq? bnt code_0d1b lst temp[$4] pToa curItem ne? bnt code_0d1b pushi $d3 ; 211, copy push1 pToa curItem bnt code_0d0c pushi $23 ; 35, '#', text push0 send $4 bnot jmp code_0d0e code_0d0c: pToa searchStr code_0d0e: push pToa curFileStr send $6 bnot pushi $1ad ; 429, update push0 self $4 bnot code_0d1b: toss jmp code_0d2c code_0d1e: pushi $c8 ; 200, handleEvent push1 lsp param[$1] super Selector, $6 bnot bnt code_0d2c ldi $0 code_0d2c: lat temp[$0] ret FileSelector::doit: link $2 lsp param[$0] ldi $1 gt? bnt code_0e72 lsp param[$2] ldi $45 ; 69, 'E', doit eq? bnt code_0e72 lsp param[$1] dup pToa fileNameI eq? bnt code_0d4e ldi $0 jmp code_0e6f code_0d4e: dup pToa homeBtn eq? bnt code_0d6b pushi $d3 ; 211, copy push1 pTos homeStr pToa curDirStr send $6 bnot pushi $1ad ; 429, update push1 pTos curFileStr self $6 bnot jmp code_0e6f code_0d6b: dup pToa fileMaskBtn eq? bnt code_0df8 pushi $d0 ; 208, with push1 lofsa string_00c2 ; "*.*" push class Str send $6 bnot sat temp[$0] pushi $d0 ; 208, with push1 pushi $23 ; 35, '#', text push0 pToa fileMaskBtn send $4 bnot push class Str send $6 bnot sat temp[$1] pushi $d5 ; 213, compare push1 lst temp[$0] send $6 bnot push ldi $0 eq? bnt code_0dbb pushi $d3 ; 211, copy push1 lst temp[$0] pToa curFileStr send $6 bnot pushi $23 ; 35, '#', text push1 pTos searchStr pToa fileMaskBtn send $6 bnot jmp code_0dd2 code_0dbb: pushi $d3 ; 211, copy push1 pTos searchStr pToa curFileStr send $6 bnot pushi $23 ; 35, '#', text push1 lofsa string_00c2 ; "*.*" push pToa fileMaskBtn send $6 bnot code_0dd2: pushi $95 ; 149, dispose push0 lat temp[$0] send $4 bnot pushi $95 ; 149, dispose push0 lat temp[$1] send $4 bnot pushi $57 ; 87, 'W', draw push0 pToa fileMaskBtn send $4 bnot pushi $1ad ; 429, update push1 pTos curFileStr self $6 bnot jmp code_0e6f code_0df8: dup pToa upDirBtn eq? bnt code_0e12 push1 pTos curDirStr call code_113b, $2 bnot pushi $1ad ; 429, update push1 pTos curFileStr self $6 bnot jmp code_0e6f code_0e12: dup pToa okBtn eq? bnt code_0e4e pushi $d3 ; 211, copy push1 pTos curDirStr pToa homeStr send $6 bnot pushi $51 ; 81, 'Q', value push0 pToa okBtn send $4 bnot aTop value pushi $94 ; 148, init push1 pushi $d0 ; 208, with push1 pTos curFileStr class Str send $6 bnot push pushi $8d ; 141, new push0 class SelectorText send $4 bnot aTop curItem send $6 bnot jmp code_0e6f code_0e4e: dup pToa cancelBtn eq? bnt code_0e64 pushi $51 ; 81, 'Q', value push0 pToa cancelBtn send $4 bnot aTop value ldi $0 aTop curItem jmp code_0e6f code_0e64: pushi $45 ; 69, 'E', doit push2 lsp param[$1] lsp param[$2] super Selector, $8 bnot code_0e6f: toss jmp code_0e76 code_0e72: pToa curItem aTop value code_0e76: ldi $1 ret ::set: pTos state lap param[$1] or aTop state ret ::clear: pTos state lap param[$1] bnot and aTop state ret ::test: pTos state lap param[$1] and ret ::compare: link $3 lap param[$1] bnt code_0ec1 ldi $0 sat temp[$0] code_0e9b: pushi $4b ; 75, 'K', at push1 lst temp[$0] lap param[$1] send $6 bnot sat temp[$1] push pushi $4b ; 75, 'K', at push1 lst temp[$0] self $6 bnot sat temp[$2] eq? bnt code_0eb9 +at temp[$0] jmp code_0e9b code_0eb9: lst temp[$1] lat temp[$2] sub ret jmp code_0ecc code_0ec1: pushi $d5 ; 213, compare push1 lsp param[$1] super Str, $6 bnot ret code_0ecc: ret link $7 pushi $d0 ; 208, with push1 lsp param[$2] class Str send $6 bnot sat temp[$1] pushi $8d ; 141, new push0 class Rect send $4 bnot sat temp[$0] pushi $2a ; 42, '*', font push0 lap param[$1] send $4 bnot sat temp[$5] pushi $d0 ; 208, with push1 lofsa string_01cb ; "..." push class Str send $6 bnot sat temp[$2] pushi $e5 ; 229, sizeToStr pushi $3 ; z push lst temp[$5] pushi $ff ; 255, asInteger lat temp[$0] send $a bnot pushi $95 ; 149, dispose push0 lat temp[$2] send $4 bnot pushi $4e ; 78, 'N', width push0 lap param[$1] send $4 bnot push pushi $4e ; 78, 'N', width push0 lat temp[$0] send $4 bnot sub sat temp[$4] ldi $0 sat temp[$3] push2 push0 lst temp[$5] callk kernel_73, $4 bnot sat temp[$6] code_0f3b: pushi $e5 ; 229, sizeToStr pushi $3 ; z lst temp[$1] lst temp[$5] lst temp[$4] lat temp[$0] send $a bnot pushi $e1 ; 225, height push0 lat temp[$0] send $4 bnot push lat temp[$6] le? bnt code_0f60 jmp code_0f8a jmp code_0f3b code_0f60: ldi $1 sat temp[$3] lat temp[$1] sat temp[$2] pushi $fb ; 251, subStr push2 push1 pushi $5a ; 90, 'Z', size push0 send $4 bnot push ldi $1 sub push lat temp[$2] send $8 bnot sat temp[$1] pushi $95 ; 149, dispose push0 lat temp[$2] send $4 bnot jmp code_0f3b code_0f8a: pushi $95 ; 149, dispose push0 lat temp[$0] send $4 bnot lat temp[$3] bnt code_0fb5 lat temp[$1] sat temp[$2] pushi $f5 ; 245, format push2 lofsa string_01cf ; "...%s" push lst temp[$2] class Str send $8 bnot sat temp[$1] pushi $95 ; 149, dispose push0 lat temp[$2] send $4 bnot code_0fb5: lat temp[$1] code_0fb7: ret link $1 pushi $ae ; 174, indexOf push2 pushi $5c ; 92, '\', palette push1 lap param[$1] send $8 bnot sat temp[$0] push ldi $ff ; 255, asInteger gt? bnt code_0fe2 pushi $d7 ; 215, move pushi $3 ; z push0 +at temp[$0] push pushi $ff ; 255, asInteger lap param[$1] send $a bnot jmp code_1007 code_0fe2: pushi $ae ; 174, indexOf push2 pushi $3a ; 58, ':', b_i1 push1 lap param[$1] send $8 bnot sat temp[$0] push ldi $ff ; 255, asInteger gt? bnt code_1007 pushi $d7 ; 215, move pushi $3 ; z push0 +at temp[$0] push pushi $ff ; 255, asInteger lap param[$1] send $a bnot code_1007: lap param[$1] code_1009: ret link $1 pushi $ae ; 174, indexOf push2 pushi $5c ; 92, '\', palette push1 lap param[$1] send $8 bnot sat temp[$0] push ldi $ff ; 255, asInteger gt? bt code_1032 pushi $ae ; 174, indexOf push2 pushi $3a ; 58, ':', b_i1 push1 lap param[$1] send $8 bnot sat temp[$0] push ldi $ff ; 255, asInteger gt? code_1032: pushi $4b ; 75, 'K', at push2 +at temp[$0] push push0 lap param[$1] send $8 bnot lap param[$1] code_1040: ret link $1 pushi $5a ; 90, 'Z', size push0 lap param[$1] send $4 bnot not bnt code_1065 pushi $4b ; 75, 'K', at pushi $3 ; z push0 pushi $5c ; 92, '\', palette push0 pushi $f7 ; 247, cat push1 lsp param[$2] lap param[$1] send $10 bnot jmp code_10fa code_1065: pushi $ae ; 174, indexOf push2 pushi $5c ; 92, '\', palette push1 lap param[$1] send $8 bnot sat temp[$0] push ldi $ff ; 255, asInteger gt? bt code_108b pushi $ae ; 174, indexOf push2 pushi $3a ; 58, ':', b_i1 push1 lap param[$1] send $8 bnot sat temp[$0] push ldi $ff ; 255, asInteger gt? code_108b: bnt code_10a5 pushi $4b ; 75, 'K', at push2 lst temp[$0] ldi $1 add push push0 pushi $f7 ; 247, cat push1 lsp param[$2] lap param[$1] send $e bnot jmp code_10fa code_10a5: push2 pushi $13 ; 19, nsTop lsp param[$1] callk kernel_93, $4 bnot bnt code_10ef pushi $4b ; 75, 'K', at push1 pushi $5a ; 90, 'Z', size push0 lap param[$1] send $4 bnot push ldi $1 sub push lap param[$1] send $6 bnot push ldi $5c ; 92, '\', palette ne? bnt code_10e2 pushi $4b ; 75, 'K', at pushi $3 ; z pushi $5a ; 90, 'Z', size push0 lap param[$1] send $4 bnot push pushi $5c ; 92, '\', palette push0 lap param[$1] send $a bnot code_10e2: pushi $f7 ; 247, cat push1 lsp param[$2] lap param[$1] send $6 bnot jmp code_10fa code_10ef: pushi $d3 ; 211, copy push1 lsp param[$2] lap param[$1] send $6 bnot code_10fa: ret link $1 pushi $d3 ; 211, copy push1 lsp param[$1] class Str send $6 bnot sat temp[$0] push1 push call code_0fb7, $2 bnot push1 lsp param[$1] call code_1009, $2 bnot pushi $f7 ; 247, cat push1 lsp param[$2] pushi $f7 ; 247, cat push1 lofsa string_01d5 ; "\\" push pushi $f7 ; 247, cat push1 lst temp[$0] lap param[$1] send $12 bnot pushi $95 ; 149, dispose push0 lat temp[$0] send $4 bnot code_113b: ret link $2 pushi $d3 ; 211, copy push1 lsp param[$1] class Str send $6 bnot sat temp[$0] push1 push call code_0fb7, $2 bnot push1 lsp param[$1] call code_1009, $2 bnot pushi $5a ; 90, 'Z', size push0 lap param[$1] send $4 bnot not bnt code_1173 pushi $4b ; 75, 'K', at pushi $3 ; z push0 pushi $5c ; 92, '\', palette push0 lap param[$1] send $a bnot code_1173: pushi $4b ; 75, 'K', at push2 pushi $5a ; 90, 'Z', size push0 lap param[$1] send $4 bnot push ldi $1 sub push push0 pushi $ae ; 174, indexOf push2 pushi $5c ; 92, '\', palette push1 lap param[$1] send $10 bnot sat temp[$1] push ldi $1 lt? bnt code_11c7 pushi $4b ; 75, 'K', at push1 push1 lap param[$1] send $6 bnot push ldi $3a ; 58, ':', b_i1 eq? bnt code_11b6 pushi $4b ; 75, 'K', at push2 push2 pushi $5c ; 92, '\', palette lap param[$1] send $8 bnot jmp code_11f8 code_11b6: pushi $4b ; 75, 'K', at pushi $3 ; z push0 pushi $5c ; 92, '\', palette push0 lap param[$1] send $a bnot jmp code_11f8 code_11c7: lst temp[$1] ldi $2 eq? bnt code_11ec pushi $4b ; 75, 'K', at push1 push1 lap param[$1] send $6 bnot push ldi $3a ; 58, ':', b_i1 eq? bnt code_11ec pushi $4b ; 75, 'K', at push2 +at temp[$1] push push0 lap param[$1] send $8 bnot jmp code_11f8 code_11ec: pushi $4b ; 75, 'K', at push2 +at temp[$1] push push0 lap param[$1] send $8 bnot code_11f8: pushi $f7 ; 247, cat push1 lst temp[$0] lap param[$1] send $6 bnot ret