Upload files to "Script"
This commit is contained in:
parent
c8b02b28a6
commit
4d8f3deff4
|
|
@ -0,0 +1,95 @@
|
|||
Path::init:
|
||||
link $2
|
||||
lap param[$1]
|
||||
aTop client
|
||||
push1
|
||||
push0
|
||||
pToa client
|
||||
send $4
|
||||
bnot
|
||||
aTop x
|
||||
push2
|
||||
push0
|
||||
pToa client
|
||||
send $4
|
||||
bnot
|
||||
aTop y
|
||||
lsp param[$0]
|
||||
ldi $2
|
||||
ge?
|
||||
bnt code_0079
|
||||
ldi $1
|
||||
lapi param[$1]
|
||||
aTop points
|
||||
code_0079: lsp param[$0]
|
||||
ldi $3 ; z
|
||||
ge?
|
||||
bnt code_0086
|
||||
ldi $2
|
||||
lapi param[$1]
|
||||
aTop caller
|
||||
code_0086: pushi $64 ; 100, 'd', moveDone
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
Path::dispose:
|
||||
pToa points
|
||||
bnt code_009c
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
ldi $0
|
||||
aTop points
|
||||
code_009c: pushi $95 ; 149, dispose
|
||||
push0
|
||||
super MoveTo, $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
Path::moveDone:
|
||||
pushi $290 ; 656, atEnd
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
bnt code_00b7
|
||||
pushi $64 ; 100, 'd', moveDone
|
||||
push0
|
||||
super MoveTo, $4
|
||||
bnot
|
||||
jmp code_00dd
|
||||
|
||||
code_00b7: pushi $b7 ; 183, get
|
||||
push0
|
||||
pToa points
|
||||
send $4
|
||||
bnot
|
||||
aTop x
|
||||
pushi $b7 ; 183, get
|
||||
push0
|
||||
pToa points
|
||||
send $4
|
||||
bnot
|
||||
aTop y
|
||||
pushi $94 ; 148, init
|
||||
pushi $3 ; z
|
||||
pTos client
|
||||
pTos x
|
||||
pTos y
|
||||
super MoveTo, $a
|
||||
bnot
|
||||
code_00dd: ret
|
||||
|
||||
Path::atEnd:
|
||||
pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
pToa points
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
ldi $0
|
||||
eq?
|
||||
ret
|
||||
|
||||
|
|
@ -0,0 +1,685 @@
|
|||
<NIL>::new:
|
||||
pushi $2a ; 42, '*', font
|
||||
push1
|
||||
pTos font
|
||||
ldi $0
|
||||
eq?
|
||||
bnt code_00d2
|
||||
lag global[$3a]
|
||||
jmp code_00d4
|
||||
|
||||
code_00d2: pToa font
|
||||
code_00d4: push
|
||||
pushi $9a ; 154, yourself
|
||||
push0
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
super BitMap, $4
|
||||
bnot
|
||||
send $a
|
||||
bnot
|
||||
ret
|
||||
|
||||
<NIL>::init:
|
||||
lap param[$0]
|
||||
bnt code_00f1
|
||||
lap param[$1]
|
||||
bnt code_00f1
|
||||
lap param[$1]
|
||||
jmp code_0103
|
||||
|
||||
code_00f1: pToa client
|
||||
not
|
||||
bnt code_0101
|
||||
pushi $1d0 ; 464, pScreen
|
||||
push0
|
||||
lag global[$3]
|
||||
send $4
|
||||
bnot
|
||||
jmp code_0103
|
||||
|
||||
code_0101: pToa client
|
||||
code_0103: aTop client
|
||||
pTos fore
|
||||
ldi $ff ; 255, asInteger
|
||||
eq?
|
||||
bnt code_0110
|
||||
lag global[$54]
|
||||
aTop fore
|
||||
code_0110: pTos top
|
||||
pToa bottom
|
||||
eq?
|
||||
bnt code_011e
|
||||
pushi $1be ; 446, setSize
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
code_011e: pToa font
|
||||
not
|
||||
bnt code_0127
|
||||
lag global[$3a]
|
||||
aTop font
|
||||
code_0127: push0
|
||||
push0
|
||||
pToa client
|
||||
send $4
|
||||
bnot
|
||||
aTop plane
|
||||
pushi $57 ; 87, 'W', draw
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
pushi $17b ; 379, addToCast
|
||||
push1
|
||||
pTos client
|
||||
self $6
|
||||
bnot
|
||||
ret
|
||||
|
||||
<NIL>::dispose:
|
||||
pToa client
|
||||
bnt code_014b
|
||||
pushi $58 ; 88, 'X', delete
|
||||
push1
|
||||
pushSelf
|
||||
send $6
|
||||
bnot
|
||||
code_014b: push1
|
||||
pTos helpStr
|
||||
calle export60000_0, $2
|
||||
bnot
|
||||
bnt code_0164
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
pToa helpStr
|
||||
send $4
|
||||
bnot
|
||||
ldi $0
|
||||
aTop helpStr
|
||||
code_0164: pushi $58 ; 88, 'X', delete
|
||||
push1
|
||||
pushSelf
|
||||
lag global[$4d]
|
||||
send $6
|
||||
bnot
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
super BitMap, $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
<NIL>::doit:
|
||||
pToa handler
|
||||
bnt code_0186
|
||||
pushi $45 ; 69, 'E', doit
|
||||
push2
|
||||
pushSelf
|
||||
pushi $45 ; 69, 'E', doit
|
||||
send $8
|
||||
bnot
|
||||
ret
|
||||
|
||||
jmp code_0189
|
||||
|
||||
code_0186: pToa value
|
||||
ret
|
||||
|
||||
code_0189: ret
|
||||
|
||||
<NIL>::hide:
|
||||
pushi $69 ; 105, 'i', hide
|
||||
push0
|
||||
&rest $1
|
||||
super BitMap, $4
|
||||
bnot
|
||||
pToa client
|
||||
bnt code_01a8
|
||||
pushi $58 ; 88, 'X', delete
|
||||
push1
|
||||
pushSelf
|
||||
send $6
|
||||
bnot
|
||||
pushi $1d1 ; 465, addToDisposeList
|
||||
push1
|
||||
pushSelf
|
||||
pToa client
|
||||
send $6
|
||||
bnot
|
||||
code_01a8: ret
|
||||
|
||||
<NIL>::show:
|
||||
pushi $75 ; 117, 'u', show
|
||||
push0
|
||||
&rest $1
|
||||
super BitMap, $4
|
||||
bnot
|
||||
pToa client
|
||||
bnt code_01d9
|
||||
pushi $9f ; 159, add
|
||||
push1
|
||||
pushSelf
|
||||
send $6
|
||||
bnot
|
||||
pushi $1d2 ; 466, disposeList
|
||||
push0
|
||||
pToa client
|
||||
send $4
|
||||
bnot
|
||||
bnt code_01d9
|
||||
pushi $58 ; 88, 'X', delete
|
||||
push1
|
||||
pushSelf
|
||||
pushi $1d2 ; 466, disposeList
|
||||
push0
|
||||
pToa client
|
||||
send $4
|
||||
bnot
|
||||
send $6
|
||||
bnot
|
||||
code_01d9: ret
|
||||
|
||||
<NIL>::draw:
|
||||
pTos signal
|
||||
ldi $f7 ; 247, cat
|
||||
and
|
||||
aTop signal
|
||||
pToa drawCode
|
||||
bnt code_01f1
|
||||
pushi $45 ; 69, 'E', doit
|
||||
push1
|
||||
pushSelf
|
||||
send $6
|
||||
bnot
|
||||
bnt code_01f1
|
||||
ldi $1
|
||||
ret
|
||||
|
||||
code_01f1: ldi $0
|
||||
ret
|
||||
|
||||
<NIL>::drawSelected:
|
||||
ret
|
||||
|
||||
<NIL>::enable:
|
||||
lap param[$1]
|
||||
bnt code_0202
|
||||
pTos state
|
||||
ldi $1
|
||||
or
|
||||
aTop state
|
||||
jmp code_0209
|
||||
|
||||
code_0202: pTos state
|
||||
ldi $fe ; 254, strIndex
|
||||
and
|
||||
aTop state
|
||||
code_0209: lsp param[$0]
|
||||
ldi $1
|
||||
eq?
|
||||
bt code_0213
|
||||
lap param[$2]
|
||||
not
|
||||
code_0213: bnt code_021b
|
||||
pushi $57 ; 87, 'W', draw
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
code_021b: ret
|
||||
|
||||
<NIL>::select:
|
||||
link $1
|
||||
lap param[$0]
|
||||
not
|
||||
bnt code_022b
|
||||
pTos state
|
||||
ldi $8 ; fixPriority
|
||||
and
|
||||
not
|
||||
jmp code_022d
|
||||
|
||||
code_022b: lap param[$1]
|
||||
code_022d: sat temp[$0]
|
||||
bnt code_023a
|
||||
pTos state
|
||||
ldi $8 ; fixPriority
|
||||
or
|
||||
aTop state
|
||||
jmp code_0241
|
||||
|
||||
code_023a: pTos state
|
||||
ldi $f7 ; 247, cat
|
||||
and
|
||||
aTop state
|
||||
code_0241: pushi $57 ; 87, 'W', draw
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
<NIL>::choose:
|
||||
pTos state
|
||||
ldi $4 ; scaleX
|
||||
xor
|
||||
aTop state
|
||||
pushi $57 ; 87, 'W', draw
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
<NIL>::checkState:
|
||||
pTos state
|
||||
lap param[$1]
|
||||
and
|
||||
ret
|
||||
|
||||
<NIL>::setSize:
|
||||
ldi $0
|
||||
ret
|
||||
|
||||
<NIL>::highlight:
|
||||
lap param[$1]
|
||||
bnt code_026c
|
||||
pTos state
|
||||
ldi $20 ; 32, ' ', name
|
||||
or
|
||||
aTop state
|
||||
jmp code_0273
|
||||
|
||||
code_026c: pTos state
|
||||
ldi $df ; 223, centerOn
|
||||
and
|
||||
aTop state
|
||||
code_0273: pushi $57 ; 87, 'W', draw
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
<NIL>::cycle:
|
||||
ret
|
||||
|
||||
<NIL>::help:
|
||||
pToa helpStr
|
||||
bnt code_0296
|
||||
pushi $6 ; maxScale
|
||||
push
|
||||
pushi $77 ; 119, 'w', textTop
|
||||
lofsa string_006c ; "Continue"
|
||||
push
|
||||
push1
|
||||
pushi $91 ; 145, bitPutIndex
|
||||
push2
|
||||
calle export60029_0, $c
|
||||
bnot
|
||||
jmp code_0299
|
||||
|
||||
code_0296: ldi $0
|
||||
ret
|
||||
|
||||
code_0299: ret
|
||||
|
||||
<NIL>::handleEvent:
|
||||
link $4
|
||||
pushi $50 ; 80, 'P', claimed
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
bnt code_02a9
|
||||
ldi $0
|
||||
ret
|
||||
|
||||
code_02a9: pushi $2b ; 43, '+', type
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$2]
|
||||
pushi $31 ; 49, '1', message
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$3]
|
||||
ldi $0
|
||||
sat temp[$0]
|
||||
lst temp[$2]
|
||||
ldi $1
|
||||
eq?
|
||||
bnt code_02d1
|
||||
pushi $eb ; 235, onMe
|
||||
push1
|
||||
lsp param[$1]
|
||||
self $6
|
||||
bnot
|
||||
code_02d1: sat temp[$1]
|
||||
bnt code_02e1
|
||||
pushi $48 ; 72, 'H', modifiers
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
ldi $3 ; z
|
||||
and
|
||||
code_02e1: bt code_02f7
|
||||
lst temp[$2]
|
||||
ldi $4 ; scaleX
|
||||
eq?
|
||||
bnt code_0330
|
||||
lst temp[$3]
|
||||
ldi $3b00 ; 15104
|
||||
eq?
|
||||
bnt code_0330
|
||||
pTos state
|
||||
ldi $8 ; fixPriority
|
||||
and
|
||||
code_02f7: bnt code_0330
|
||||
pushi $50 ; 80, 'P', claimed
|
||||
push1
|
||||
push1
|
||||
lap param[$1]
|
||||
send $6
|
||||
bnot
|
||||
lat temp[$1]
|
||||
bnt code_0316
|
||||
pToa canDrag
|
||||
bnt code_0316
|
||||
pushi $ee ; 238, drag
|
||||
push1
|
||||
lsp param[$1]
|
||||
self $6
|
||||
bnot
|
||||
jmp code_03d2
|
||||
|
||||
code_0316: pushi $191 ; 401, help
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
not
|
||||
bnt code_0329
|
||||
pushi $50 ; 80, 'P', claimed
|
||||
push1
|
||||
push0
|
||||
lap param[$1]
|
||||
send $6
|
||||
bnot
|
||||
code_0329: ldi $0
|
||||
sat temp[$0]
|
||||
jmp code_03d2
|
||||
|
||||
code_0330: pTos state
|
||||
ldi $1
|
||||
and
|
||||
not
|
||||
bnt code_033d
|
||||
ldi $0
|
||||
jmp code_03d2
|
||||
|
||||
code_033d: lst temp[$2]
|
||||
ldi $4 ; scaleX
|
||||
eq?
|
||||
bnt code_03b8
|
||||
pushi $1d3 ; 467, modal
|
||||
push0
|
||||
pToa client
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
ldi $0
|
||||
ne?
|
||||
bnt code_03b8
|
||||
push1
|
||||
lst temp[$3]
|
||||
calle export60027_0, $2
|
||||
bnot
|
||||
push
|
||||
pToa key
|
||||
eq?
|
||||
bt code_03a8
|
||||
pTos client
|
||||
pushi $1d0 ; 464, pScreen
|
||||
push0
|
||||
lag global[$3]
|
||||
send $4
|
||||
bnot
|
||||
ne?
|
||||
bnt code_039a
|
||||
pTos key
|
||||
ldi $ff ; 255, asInteger
|
||||
gt?
|
||||
bnt code_039a
|
||||
push1
|
||||
lst temp[$3]
|
||||
calle export60027_0, $2
|
||||
bnot
|
||||
push
|
||||
push1
|
||||
push1
|
||||
pTos key
|
||||
calle export60025_6, $2
|
||||
bnot
|
||||
push
|
||||
calle export60027_0, $2
|
||||
bnot
|
||||
eq?
|
||||
code_039a: bt code_03a8
|
||||
pTos state
|
||||
ldi $8 ; fixPriority
|
||||
and
|
||||
bnt code_03b8
|
||||
lst temp[$3]
|
||||
ldi $d ; 13, seenRect
|
||||
eq?
|
||||
code_03a8: bnt code_03b8
|
||||
pushi $50 ; 80, 'P', claimed
|
||||
push1
|
||||
push1
|
||||
lap param[$1]
|
||||
send $6
|
||||
bnot
|
||||
selfID
|
||||
sat temp[$0]
|
||||
jmp code_03d2
|
||||
|
||||
code_03b8: lat temp[$1]
|
||||
bnt code_03d2
|
||||
pushi $ec ; 236, track
|
||||
push1
|
||||
lsp param[$1]
|
||||
self $6
|
||||
bnot
|
||||
sat temp[$0]
|
||||
bnt code_03d2
|
||||
pushi $50 ; 80, 'P', claimed
|
||||
push1
|
||||
push1
|
||||
lap param[$1]
|
||||
send $6
|
||||
bnot
|
||||
code_03d2: lat temp[$0]
|
||||
ret
|
||||
|
||||
<NIL>::process:
|
||||
link $1
|
||||
pushi $b9 ; 185, localize
|
||||
push1
|
||||
pTos plane
|
||||
lap param[$1]
|
||||
send $6
|
||||
bnot
|
||||
pushi $50 ; 80, 'P', claimed
|
||||
push1
|
||||
push1
|
||||
lap param[$1]
|
||||
send $6
|
||||
bnot
|
||||
pushi $2b ; 43, '+', type
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
dup
|
||||
ldi $2
|
||||
eq?
|
||||
bnt code_043d
|
||||
pushi $58 ; 88, 'X', delete
|
||||
push1
|
||||
pushSelf
|
||||
lag global[$4d]
|
||||
send $6
|
||||
bnot
|
||||
pTos state
|
||||
ldi $20 ; 32, ' ', name
|
||||
and
|
||||
bnt code_0413
|
||||
pushi $1c9 ; 457, highlight
|
||||
push2
|
||||
push0
|
||||
push0
|
||||
self $8
|
||||
bnot
|
||||
code_0413: pushi $eb ; 235, onMe
|
||||
push1
|
||||
lsp param[$1]
|
||||
self $6
|
||||
bnot
|
||||
bnt code_044c
|
||||
pushi $1d4 ; 468, selectItem
|
||||
push2
|
||||
pushSelf
|
||||
push1
|
||||
pToa client
|
||||
send $8
|
||||
bnot
|
||||
bnt code_0431
|
||||
pushi $45 ; 69, 'E', doit
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
code_0431: pushi $1d5 ; 469, returnHandler
|
||||
push1
|
||||
pushSelf
|
||||
pToa client
|
||||
send $6
|
||||
bnot
|
||||
jmp code_044c
|
||||
|
||||
code_043d: dup
|
||||
ldi $0
|
||||
eq?
|
||||
bnt code_044c
|
||||
pushi $ed ; 237, trackDoit
|
||||
push1
|
||||
lsp param[$1]
|
||||
self $6
|
||||
bnot
|
||||
code_044c: toss
|
||||
ret
|
||||
|
||||
<NIL>::track:
|
||||
link $1
|
||||
pushi $1d3 ; 467, modal
|
||||
push0
|
||||
pToa client
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
ldi $1
|
||||
ne?
|
||||
bnt code_047f
|
||||
pushi $aa ; 170, addToFront
|
||||
push1
|
||||
pushSelf
|
||||
lag global[$4d]
|
||||
send $6
|
||||
bnot
|
||||
pushi $8c ; 140, scratch
|
||||
push1
|
||||
pushSelf
|
||||
lag global[$4d]
|
||||
send $6
|
||||
bnot
|
||||
pushi $50 ; 80, 'P', claimed
|
||||
push1
|
||||
push1
|
||||
lap param[$1]
|
||||
send $6
|
||||
bnot
|
||||
ldi $0
|
||||
ret
|
||||
|
||||
code_047f: pushi $ec ; 236, track
|
||||
push1
|
||||
lsp param[$1]
|
||||
&rest $2
|
||||
super BitMap, $6
|
||||
bnot
|
||||
sat temp[$0]
|
||||
pTos state
|
||||
ldi $20 ; 32, ' ', name
|
||||
and
|
||||
bnt code_049d
|
||||
pushi $1c9 ; 457, highlight
|
||||
push2
|
||||
push0
|
||||
push0
|
||||
self $8
|
||||
bnot
|
||||
code_049d: lat temp[$0]
|
||||
ret
|
||||
|
||||
<NIL>::trackDoit:
|
||||
link $1
|
||||
pushi $a3 ; 163, contains
|
||||
push1
|
||||
lsp param[$1]
|
||||
self $6
|
||||
bnot
|
||||
sat temp[$0]
|
||||
pTos state
|
||||
ldi $20 ; 32, ' ', name
|
||||
and
|
||||
bnt code_04b7
|
||||
lat temp[$0]
|
||||
not
|
||||
code_04b7: bt code_04c3
|
||||
pTos state
|
||||
ldi $20 ; 32, ' ', name
|
||||
and
|
||||
not
|
||||
bnt code_04d3
|
||||
lat temp[$0]
|
||||
code_04c3: bnt code_04d3
|
||||
pushi $1c9 ; 457, highlight
|
||||
push1
|
||||
lst temp[$0]
|
||||
self $6
|
||||
bnot
|
||||
push0
|
||||
callk kernel_33, $0
|
||||
bnot
|
||||
code_04d3: ret
|
||||
|
||||
<NIL>::showMouseOver:
|
||||
pTos state
|
||||
ldi $1
|
||||
and
|
||||
bnt code_04f0
|
||||
pushi $1c9 ; 457, highlight
|
||||
push1
|
||||
lap param[$0]
|
||||
bnt code_04e7
|
||||
lap param[$1]
|
||||
jmp code_04ec
|
||||
|
||||
code_04e7: pTos state
|
||||
ldi $20 ; 32, ' ', name
|
||||
and
|
||||
code_04ec: push
|
||||
self $6
|
||||
bnot
|
||||
code_04f0: ret
|
||||
|
||||
|
|
@ -0,0 +1,137 @@
|
|||
TextItem::draw:
|
||||
link $1
|
||||
pushi $57 ; 87, 'W', draw
|
||||
push0
|
||||
super <NIL>, $4
|
||||
bnot
|
||||
bnt code_00f8
|
||||
ret
|
||||
|
||||
code_00f8: pToa bitmap
|
||||
sat temp[$0]
|
||||
bnt code_010f
|
||||
push1
|
||||
pushSelf
|
||||
callk kernel_31, $2
|
||||
bnot
|
||||
pushi $9f ; 159, add
|
||||
push1
|
||||
pTos bitmap
|
||||
lag global[$66]
|
||||
send $6
|
||||
bnot
|
||||
code_010f: push1
|
||||
pushSelf
|
||||
calle export60026_1, $2
|
||||
bnot
|
||||
aTop bitmap
|
||||
lat temp[$0]
|
||||
bnt code_0124
|
||||
push1
|
||||
pushSelf
|
||||
callk kernel_30, $2
|
||||
bnot
|
||||
code_0124: ret
|
||||
|
||||
TextItem::setSize:
|
||||
link $4
|
||||
pToa text
|
||||
bnt code_01b3
|
||||
pToa left
|
||||
sat temp[$2]
|
||||
pToa top
|
||||
sat temp[$3]
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Rect
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$0]
|
||||
pushi $e5 ; 229, sizeToStr
|
||||
pushi $3 ; z
|
||||
push2
|
||||
pushi $9 ; inLeft
|
||||
pTos text
|
||||
callk kernel_91, $4
|
||||
bnot
|
||||
push
|
||||
pTos font
|
||||
lap param[$0]
|
||||
bnt code_0159
|
||||
lap param[$1]
|
||||
jmp code_015b
|
||||
|
||||
code_0159: lag global[$67]
|
||||
code_015b: push
|
||||
lat temp[$0]
|
||||
send $a
|
||||
bnot
|
||||
pTos view
|
||||
ldi $ff ; 255, asInteger
|
||||
ne?
|
||||
bnt code_0196
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Rect
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$1]
|
||||
pushi $e6 ; 230, sizeToCel
|
||||
pushi $3 ; z
|
||||
pTos view
|
||||
pTos loop
|
||||
pTos cel
|
||||
send $a
|
||||
bnot
|
||||
pushi $af ; 175, union
|
||||
push1
|
||||
lst temp[$1]
|
||||
lat temp[$0]
|
||||
send $6
|
||||
bnot
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
lat temp[$1]
|
||||
send $4
|
||||
bnot
|
||||
code_0196: pushi $d3 ; 211, copy
|
||||
push1
|
||||
lst temp[$0]
|
||||
self $6
|
||||
bnot
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
lat temp[$0]
|
||||
send $4
|
||||
bnot
|
||||
pushi $db ; 219, moveTo
|
||||
push2
|
||||
lst temp[$2]
|
||||
lst temp[$3]
|
||||
self $8
|
||||
bnot
|
||||
code_01b3: ret
|
||||
|
||||
TextItem::dispose:
|
||||
push2
|
||||
pushi $4 ; scaleX
|
||||
pTos text
|
||||
callk kernel_105, $4
|
||||
bnot
|
||||
push
|
||||
ldi $34 ; 52, '4', number
|
||||
eq?
|
||||
bnt code_01d0
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
pToa text
|
||||
send $4
|
||||
bnot
|
||||
ldi $0
|
||||
aTop text
|
||||
code_01d0: pushi $95 ; 149, dispose
|
||||
push0
|
||||
super <NIL>, $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
|
|
@ -0,0 +1,143 @@
|
|||
IconItem::init:
|
||||
pushi $94 ; 148, init
|
||||
push1
|
||||
lap param[$0]
|
||||
bnt code_00a8
|
||||
lap param[$1]
|
||||
jmp code_00aa
|
||||
|
||||
code_00a8: ldi $0
|
||||
code_00aa: push
|
||||
super <NIL>, $6
|
||||
bnot
|
||||
pToa cycler
|
||||
not
|
||||
bnt code_00d2
|
||||
lsp param[$0]
|
||||
ldi $1
|
||||
gt?
|
||||
bnt code_00d2
|
||||
lap param[$2]
|
||||
bnt code_00d2
|
||||
pushi $94 ; 148, init
|
||||
push1
|
||||
pushSelf
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Fwd
|
||||
send $4
|
||||
bnot
|
||||
aTop cycler
|
||||
send $6
|
||||
bnot
|
||||
code_00d2: ret
|
||||
|
||||
IconItem::cycle:
|
||||
link $1
|
||||
pToa cycler
|
||||
bnt code_00f2
|
||||
pToa cel
|
||||
sat temp[$0]
|
||||
pushi $45 ; 69, 'E', doit
|
||||
push0
|
||||
pToa cycler
|
||||
send $4
|
||||
bnot
|
||||
pTos cel
|
||||
lat temp[$0]
|
||||
ne?
|
||||
bnt code_00f2
|
||||
pushi $57 ; 87, 'W', draw
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
code_00f2: ret
|
||||
|
||||
IconItem::dispose:
|
||||
pToa cycler
|
||||
bnt code_00fe
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
code_00fe: pushi $95 ; 149, dispose
|
||||
push0
|
||||
super <NIL>, $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
IconItem::setSize:
|
||||
pTos view
|
||||
ldi $ff ; 255, asInteger
|
||||
ne?
|
||||
bnt code_011d
|
||||
pushi $e6 ; 230, sizeToCel
|
||||
pushi $3 ; z
|
||||
pTos view
|
||||
pTos loop
|
||||
pTos cel
|
||||
self $a
|
||||
bnot
|
||||
code_011d: ret
|
||||
|
||||
IconItem::draw:
|
||||
link $1
|
||||
pushi $57 ; 87, 'W', draw
|
||||
push0
|
||||
super <NIL>, $4
|
||||
bnot
|
||||
bnt code_012a
|
||||
ret
|
||||
|
||||
code_012a: pToa bitmap
|
||||
sat temp[$0]
|
||||
bnt code_0141
|
||||
push1
|
||||
pushSelf
|
||||
callk kernel_31, $2
|
||||
bnot
|
||||
pushi $9f ; 159, add
|
||||
push1
|
||||
pTos bitmap
|
||||
lag global[$66]
|
||||
send $6
|
||||
bnot
|
||||
code_0141: push1
|
||||
pushSelf
|
||||
calle export60026_1, $2
|
||||
bnot
|
||||
aTop bitmap
|
||||
lat temp[$0]
|
||||
bnt code_0156
|
||||
push1
|
||||
pushSelf
|
||||
callk kernel_30, $2
|
||||
bnot
|
||||
code_0156: ret
|
||||
|
||||
IconItem::showMouseOver:
|
||||
ldi $0
|
||||
ret
|
||||
|
||||
IconItem::handleEvent:
|
||||
ldi $0
|
||||
ret
|
||||
|
||||
IconItem::process:
|
||||
ldi $0
|
||||
ret
|
||||
|
||||
IconItem::contains:
|
||||
ldi $0
|
||||
ret
|
||||
|
||||
IconItem::lastCel:
|
||||
push1
|
||||
pushSelf
|
||||
callk kernel_22, $2
|
||||
bnot
|
||||
push
|
||||
ldi $1
|
||||
sub
|
||||
ret
|
||||
|
||||
|
|
@ -0,0 +1,953 @@
|
|||
EditItem::init:
|
||||
pToa client
|
||||
bnt code_00bd
|
||||
ret
|
||||
|
||||
code_00bd: lap param[$0]
|
||||
bnt code_00c9
|
||||
lap param[$1]
|
||||
bnt code_00c9
|
||||
lap param[$1]
|
||||
jmp code_00db
|
||||
|
||||
code_00c9: pToa client
|
||||
not
|
||||
bnt code_00d9
|
||||
pushi $1d0 ; 464, pScreen
|
||||
push0
|
||||
lag global[$3]
|
||||
send $4
|
||||
bnot
|
||||
jmp code_00db
|
||||
|
||||
code_00d9: pToa client
|
||||
code_00db: aTop client
|
||||
pTos fore
|
||||
ldi $ff ; 255, asInteger
|
||||
eq?
|
||||
bnt code_00e8
|
||||
lag global[$54]
|
||||
aTop fore
|
||||
code_00e8: pToa font
|
||||
not
|
||||
bnt code_00f1
|
||||
lag global[$3a]
|
||||
aTop font
|
||||
code_00f1: pTos back
|
||||
pushi $26 ; 38, '&', back
|
||||
push0
|
||||
class EditItem
|
||||
send $4
|
||||
bnot
|
||||
eq?
|
||||
bnt code_0102
|
||||
lag global[$5c]
|
||||
aTop back
|
||||
code_0102: push0
|
||||
push0
|
||||
pToa client
|
||||
send $4
|
||||
bnot
|
||||
aTop plane
|
||||
push2
|
||||
push1
|
||||
pushSelf
|
||||
callk kernel_74, $4
|
||||
bnot
|
||||
aTop editID
|
||||
pushi $94 ; 148, init
|
||||
push0
|
||||
&rest $2
|
||||
super <NIL>, $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
EditItem::dispose:
|
||||
pToa client
|
||||
bnt code_012a
|
||||
pushi $58 ; 88, 'X', delete
|
||||
push1
|
||||
pushSelf
|
||||
send $6
|
||||
bnot
|
||||
code_012a: ldi $0
|
||||
aTop plane
|
||||
pToa editID
|
||||
bnt code_0139
|
||||
push2
|
||||
push2
|
||||
push
|
||||
callk kernel_74, $4
|
||||
bnot
|
||||
code_0139: push1
|
||||
pushSelf
|
||||
callk kernel_11, $2
|
||||
bnot
|
||||
ret
|
||||
|
||||
EditItem::draw:
|
||||
pushi $f0 ; 240, drawSelected
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
pToa editID
|
||||
bnt code_015b
|
||||
pTos signal
|
||||
ldi $8 ; fixPriority
|
||||
or
|
||||
aTop signal
|
||||
push2
|
||||
pushi $3 ; z
|
||||
pTos editID
|
||||
callk kernel_74, $4
|
||||
bnot
|
||||
code_015b: ret
|
||||
|
||||
EditItem::hide:
|
||||
pToa editID
|
||||
bnt code_0170
|
||||
pTos signal
|
||||
ldi $f7 ; 247, cat
|
||||
and
|
||||
aTop signal
|
||||
push2
|
||||
pushi $4 ; scaleX
|
||||
pTos editID
|
||||
callk kernel_74, $4
|
||||
bnot
|
||||
code_0170: ret
|
||||
|
||||
EditItem::drawSelected:
|
||||
pToa editID
|
||||
bnt code_0196
|
||||
pTos state
|
||||
ldi $8 ; fixPriority
|
||||
and
|
||||
bnt code_018a
|
||||
pushi $3 ; z
|
||||
pushi $7 ; priority
|
||||
pTos editID
|
||||
lsg global[$59]
|
||||
callk kernel_74, $6
|
||||
bnot
|
||||
jmp code_0196
|
||||
|
||||
code_018a: pushi $3 ; z
|
||||
pushi $7 ; priority
|
||||
pTos editID
|
||||
pTos back
|
||||
callk kernel_74, $6
|
||||
bnot
|
||||
code_0196: ret
|
||||
|
||||
EditItem::handleEvent:
|
||||
link $4
|
||||
pushi $50 ; 80, 'P', claimed
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$0]
|
||||
bnt code_01a6
|
||||
ret
|
||||
|
||||
code_01a6: pushi $2b ; 43, '+', type
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
ldi $1
|
||||
eq?
|
||||
bnt code_01db
|
||||
pushi $a3 ; 163, contains
|
||||
push1
|
||||
lsp param[$1]
|
||||
self $6
|
||||
bnot
|
||||
bnt code_01db
|
||||
pTos state
|
||||
ldi $8 ; fixPriority
|
||||
and
|
||||
not
|
||||
bnt code_01db
|
||||
pushi $1d4 ; 468, selectItem
|
||||
push1
|
||||
pushSelf
|
||||
pToa client
|
||||
send $6
|
||||
bnot
|
||||
pushi $50 ; 80, 'P', claimed
|
||||
push1
|
||||
push1
|
||||
lap param[$1]
|
||||
send $6
|
||||
bnot
|
||||
ret
|
||||
|
||||
code_01db: pTos state
|
||||
pToa activeState
|
||||
and
|
||||
push
|
||||
pToa activeState
|
||||
eq?
|
||||
bnt code_03ba
|
||||
pushi $2b ; 43, '+', type
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
ldi $4 ; scaleX
|
||||
eq?
|
||||
bnt code_03c6
|
||||
pushi $31 ; 49, '1', message
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$1]
|
||||
pushi $1da ; 474, advanceSelect
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
bnt code_021b
|
||||
pushi $4 ; scaleX
|
||||
lst temp[$1]
|
||||
pushi $9 ; inLeft
|
||||
pushi $f00 ; 3840, BAD SELECTOR
|
||||
pushi $1b ; 27, illegalBits
|
||||
calle export60025_4, $8
|
||||
bnot
|
||||
code_021b: bt code_023a
|
||||
lst temp[$1]
|
||||
ldi $d ; 13, seenRect
|
||||
eq?
|
||||
bnt code_022c
|
||||
pushi $1d6 ; 470, crIsChar
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
not
|
||||
code_022c: bt code_023a
|
||||
pushi $48 ; 72, 'H', modifiers
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
ldi $8 ; fixPriority
|
||||
and
|
||||
code_023a: bnt code_0241
|
||||
ldi $0
|
||||
jmp code_03c6
|
||||
|
||||
code_0241: lst temp[$1]
|
||||
ldi $4800 ; 18432
|
||||
eq?
|
||||
bt code_024f
|
||||
lst temp[$1]
|
||||
ldi $5000 ; 20480
|
||||
eq?
|
||||
code_024f: bnt code_0256
|
||||
ldi $0
|
||||
jmp code_03c6
|
||||
|
||||
code_0256: pushi $f5 ; 245, format
|
||||
pushi $3 ; z
|
||||
lofsa string_0084 ; "%s%c."
|
||||
push
|
||||
pTos text
|
||||
lst temp[$1]
|
||||
class Str
|
||||
send $a
|
||||
bnot
|
||||
sat temp[$3]
|
||||
pushi $1df ; 479, validKey
|
||||
push2
|
||||
lst temp[$1]
|
||||
push
|
||||
self $8
|
||||
bnot
|
||||
bnt code_03af
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Rect
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$2]
|
||||
pushi $e5 ; 229, sizeToStr
|
||||
pushi $3 ; z
|
||||
lst temp[$3]
|
||||
pTos font
|
||||
pushi $ff ; 255, asInteger
|
||||
send $a
|
||||
bnot
|
||||
push1
|
||||
lst temp[$1]
|
||||
calle export60027_8, $2
|
||||
bnot
|
||||
bnt code_02ad
|
||||
pushi $3 ; z
|
||||
pushi $5 ; scaleY
|
||||
pTos editID
|
||||
lsp param[$1]
|
||||
callk kernel_74, $6
|
||||
bnot
|
||||
jmp code_039b
|
||||
|
||||
code_02ad: pTos numLines
|
||||
ldi $1
|
||||
gt?
|
||||
bnt code_0332
|
||||
pushi $e5 ; 229, sizeToStr
|
||||
pushi $3 ; z
|
||||
lst temp[$3]
|
||||
pTos font
|
||||
pushi $4e ; 78, 'N', width
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
push
|
||||
ldi $3 ; z
|
||||
sub
|
||||
push
|
||||
lat temp[$2]
|
||||
send $a
|
||||
bnot
|
||||
pToa max
|
||||
bnt code_030e
|
||||
push2
|
||||
push1
|
||||
push2
|
||||
pushi $9 ; inLeft
|
||||
pTos text
|
||||
callk kernel_91, $4
|
||||
bnot
|
||||
push
|
||||
callk kernel_92, $4
|
||||
bnot
|
||||
push
|
||||
pToa max
|
||||
lt?
|
||||
bnt code_039b
|
||||
pushi $e1 ; 225, height
|
||||
push0
|
||||
lat temp[$2]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pushi $e1 ; 225, height
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
lt?
|
||||
bnt code_039b
|
||||
pushi $3 ; z
|
||||
pushi $5 ; scaleY
|
||||
pTos editID
|
||||
lsp param[$1]
|
||||
callk kernel_74, $6
|
||||
bnot
|
||||
jmp code_039b
|
||||
|
||||
code_030e: pushi $e1 ; 225, height
|
||||
push0
|
||||
lat temp[$2]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pushi $e1 ; 225, height
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
le?
|
||||
bnt code_039b
|
||||
pushi $3 ; z
|
||||
pushi $5 ; scaleY
|
||||
pTos editID
|
||||
lsp param[$1]
|
||||
callk kernel_74, $6
|
||||
bnot
|
||||
jmp code_039b
|
||||
|
||||
code_0332: pushi $e5 ; 229, sizeToStr
|
||||
pushi $3 ; z
|
||||
lst temp[$3]
|
||||
pTos font
|
||||
pushi $ff ; 255, asInteger
|
||||
lat temp[$2]
|
||||
send $a
|
||||
bnot
|
||||
pToa max
|
||||
bnt code_037d
|
||||
push2
|
||||
push1
|
||||
push2
|
||||
pushi $9 ; inLeft
|
||||
pTos text
|
||||
callk kernel_91, $4
|
||||
bnot
|
||||
push
|
||||
callk kernel_92, $4
|
||||
bnot
|
||||
push
|
||||
pToa max
|
||||
lt?
|
||||
bnt code_039b
|
||||
pushi $4e ; 78, 'N', width
|
||||
push0
|
||||
lat temp[$2]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pushi $4e ; 78, 'N', width
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
lt?
|
||||
bnt code_039b
|
||||
pushi $3 ; z
|
||||
pushi $5 ; scaleY
|
||||
pTos editID
|
||||
lsp param[$1]
|
||||
callk kernel_74, $6
|
||||
bnot
|
||||
jmp code_039b
|
||||
|
||||
code_037d: pushi $4e ; 78, 'N', width
|
||||
push0
|
||||
lat temp[$2]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pushi $4e ; 78, 'N', width
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
lt?
|
||||
bnt code_039b
|
||||
pushi $3 ; z
|
||||
pushi $5 ; scaleY
|
||||
pTos editID
|
||||
lsp param[$1]
|
||||
callk kernel_74, $6
|
||||
bnot
|
||||
code_039b: pushi $95 ; 149, dispose
|
||||
push0
|
||||
lat temp[$2]
|
||||
send $4
|
||||
bnot
|
||||
pushi $50 ; 80, 'P', claimed
|
||||
push1
|
||||
push1
|
||||
lap param[$1]
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$0]
|
||||
code_03af: pushi $95 ; 149, dispose
|
||||
push0
|
||||
lat temp[$3]
|
||||
send $4
|
||||
bnot
|
||||
jmp code_03c6
|
||||
|
||||
code_03ba: pushi $c8 ; 200, handleEvent
|
||||
push1
|
||||
lsp param[$1]
|
||||
super <NIL>, $6
|
||||
bnot
|
||||
sat temp[$0]
|
||||
code_03c6: lat temp[$0]
|
||||
ret
|
||||
|
||||
EditItem::track:
|
||||
selfID
|
||||
ret
|
||||
|
||||
EditItem::setSize:
|
||||
link $3
|
||||
pToa left
|
||||
sat temp[$1]
|
||||
pToa top
|
||||
sat temp[$2]
|
||||
pToa pRightMargin
|
||||
bnt code_03dc
|
||||
lsp param[$1]
|
||||
eq?
|
||||
code_03dc: pToa editID
|
||||
bnt code_0446
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class IntArray
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$0]
|
||||
pushi $3 ; z
|
||||
pushi $6 ; maxScale
|
||||
pTos editID
|
||||
pushi $71 ; 113, 'q', data
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
callk kernel_74, $6
|
||||
bnot
|
||||
pushi $b5 ; 181, set
|
||||
pushi $4 ; scaleX
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
push0
|
||||
lat temp[$0]
|
||||
send $6
|
||||
bnot
|
||||
push
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
push1
|
||||
lat temp[$0]
|
||||
send $6
|
||||
bnot
|
||||
push
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
push2
|
||||
lat temp[$0]
|
||||
send $6
|
||||
bnot
|
||||
push
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
pushi $3 ; z
|
||||
lat temp[$0]
|
||||
send $6
|
||||
bnot
|
||||
push
|
||||
self $c
|
||||
bnot
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
lat temp[$0]
|
||||
send $4
|
||||
bnot
|
||||
pushi $db ; 219, moveTo
|
||||
push2
|
||||
pTos x
|
||||
pTos y
|
||||
self $8
|
||||
bnot
|
||||
jmp code_04ce
|
||||
|
||||
code_0446: pTos max
|
||||
ldi $0
|
||||
ne?
|
||||
bnt code_04ce
|
||||
pTos numLines
|
||||
ldi $0
|
||||
ne?
|
||||
bnt code_04ce
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Rect
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$0]
|
||||
pushi $e5 ; 229, sizeToStr
|
||||
pushi $3 ; z
|
||||
lofsa string_008a ; "M"
|
||||
push
|
||||
pTos font
|
||||
pushi $ff ; 255, asInteger
|
||||
lat temp[$0]
|
||||
send $a
|
||||
bnot
|
||||
pushi $e1 ; 225, height
|
||||
push1
|
||||
pushi $e1 ; 225, height
|
||||
push0
|
||||
lat temp[$0]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pToa numLines
|
||||
mul
|
||||
push
|
||||
lat temp[$0]
|
||||
send $6
|
||||
bnot
|
||||
pushi $4e ; 78, 'N', width
|
||||
push1
|
||||
lap param[$0]
|
||||
bnt code_0496
|
||||
lap param[$1]
|
||||
jmp code_04ab
|
||||
|
||||
code_0496: pToa pRightMargin
|
||||
bnt code_049c
|
||||
jmp code_04ab
|
||||
|
||||
code_049c: pushi $4e ; 78, 'N', width
|
||||
push0
|
||||
lat temp[$0]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pTos max
|
||||
pToa numLines
|
||||
div
|
||||
mul
|
||||
code_04ab: push
|
||||
lat temp[$0]
|
||||
send $6
|
||||
bnot
|
||||
pushi $e3 ; 227, expand
|
||||
push2
|
||||
push2
|
||||
push0
|
||||
lat temp[$0]
|
||||
send $8
|
||||
bnot
|
||||
pushi $d3 ; 211, copy
|
||||
push1
|
||||
lst temp[$0]
|
||||
self $6
|
||||
bnot
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
lat temp[$0]
|
||||
send $4
|
||||
bnot
|
||||
code_04ce: pushi $db ; 219, moveTo
|
||||
push2
|
||||
lst temp[$1]
|
||||
lst temp[$2]
|
||||
self $8
|
||||
bnot
|
||||
ret
|
||||
|
||||
EditItem::clear:
|
||||
link $1
|
||||
pushi $2b ; 43, '+', type
|
||||
push1
|
||||
pushi $4 ; scaleX
|
||||
pushi $31 ; 49, '1', message
|
||||
push1
|
||||
pushi $3 ; z
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Event
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$0]
|
||||
send $c
|
||||
bnot
|
||||
pushi $3 ; z
|
||||
pushi $5 ; scaleY
|
||||
pTos editID
|
||||
lst temp[$0]
|
||||
callk kernel_74, $6
|
||||
bnot
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
lat temp[$0]
|
||||
send $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
EditItem::matchSelected:
|
||||
link $9
|
||||
pToa matchSelector
|
||||
bnt code_06b7
|
||||
push2
|
||||
push1
|
||||
push2
|
||||
pushi $9 ; inLeft
|
||||
pTos text
|
||||
callk kernel_91, $4
|
||||
bnot
|
||||
push
|
||||
callk kernel_92, $4
|
||||
bnot
|
||||
sat temp[$8]
|
||||
bnt code_06b7
|
||||
pushi $24 ; 36, '$', elements
|
||||
push0
|
||||
pToa matchSelector
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$2]
|
||||
ldi $0
|
||||
sat temp[$5]
|
||||
sat temp[$4]
|
||||
pushi $1e1 ; 481, curItem
|
||||
push0
|
||||
pToa matchSelector
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$7]
|
||||
bnt code_05bc
|
||||
pushi $ae ; 174, indexOf
|
||||
push1
|
||||
push
|
||||
lat temp[$2]
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$4]
|
||||
push2
|
||||
lst temp[$8]
|
||||
push2
|
||||
push1
|
||||
pushi $71 ; 113, 'q', data
|
||||
push0
|
||||
lat temp[$7]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
callk kernel_92, $4
|
||||
bnot
|
||||
push
|
||||
calle export60025_2, $4
|
||||
bnot
|
||||
sat temp[$6]
|
||||
ldi $0
|
||||
sat temp[$1]
|
||||
code_0570: lst temp[$1]
|
||||
lat temp[$6]
|
||||
lt?
|
||||
bnt code_05bc
|
||||
push1
|
||||
pushi $3 ; z
|
||||
push2
|
||||
pushi $71 ; 113, 'q', data
|
||||
push0
|
||||
lat temp[$7]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
lst temp[$1]
|
||||
callk kernel_91, $6
|
||||
bnot
|
||||
push
|
||||
calle export60027_0, $2
|
||||
bnot
|
||||
push
|
||||
push1
|
||||
pushi $3 ; z
|
||||
push2
|
||||
push2
|
||||
pushi $9 ; inLeft
|
||||
pTos text
|
||||
callk kernel_91, $4
|
||||
bnot
|
||||
push
|
||||
lst temp[$1]
|
||||
callk kernel_91, $6
|
||||
bnot
|
||||
push
|
||||
calle export60027_0, $2
|
||||
bnot
|
||||
ne?
|
||||
bnt code_05b6
|
||||
jmp code_05bc
|
||||
|
||||
jmp code_05b8
|
||||
|
||||
code_05b6: +at temp[$5]
|
||||
code_05b8: +at temp[$1]
|
||||
jmp code_0570
|
||||
|
||||
code_05bc: ldi $0
|
||||
sat temp[$0]
|
||||
code_05c0: lst temp[$0]
|
||||
pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
lat temp[$2]
|
||||
send $4
|
||||
bnot
|
||||
lt?
|
||||
bnt code_0654
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
lst temp[$0]
|
||||
lat temp[$2]
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$3]
|
||||
push2
|
||||
lst temp[$8]
|
||||
push2
|
||||
push1
|
||||
pushi $71 ; 113, 'q', data
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
callk kernel_92, $4
|
||||
bnot
|
||||
push
|
||||
calle export60025_2, $4
|
||||
bnot
|
||||
sat temp[$6]
|
||||
ldi $0
|
||||
sat temp[$1]
|
||||
code_05f8: lst temp[$1]
|
||||
lat temp[$6]
|
||||
lt?
|
||||
bnt code_0640
|
||||
push1
|
||||
pushi $3 ; z
|
||||
push2
|
||||
pushi $71 ; 113, 'q', data
|
||||
push0
|
||||
lat temp[$3]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
lst temp[$1]
|
||||
callk kernel_91, $6
|
||||
bnot
|
||||
push
|
||||
calle export60027_0, $2
|
||||
bnot
|
||||
push
|
||||
push1
|
||||
pushi $3 ; z
|
||||
push2
|
||||
push2
|
||||
pushi $9 ; inLeft
|
||||
pTos text
|
||||
callk kernel_91, $4
|
||||
bnot
|
||||
push
|
||||
lst temp[$1]
|
||||
callk kernel_91, $6
|
||||
bnot
|
||||
push
|
||||
calle export60027_0, $2
|
||||
bnot
|
||||
ne?
|
||||
bnt code_063c
|
||||
jmp code_0640
|
||||
|
||||
code_063c: +at temp[$1]
|
||||
jmp code_05f8
|
||||
|
||||
code_0640: lst temp[$1]
|
||||
lat temp[$5]
|
||||
gt?
|
||||
bnt code_064f
|
||||
lat temp[$1]
|
||||
sat temp[$5]
|
||||
lat temp[$0]
|
||||
sat temp[$4]
|
||||
code_064f: +at temp[$0]
|
||||
jmp code_05c0
|
||||
|
||||
code_0654: lat temp[$5]
|
||||
bnt code_06b7
|
||||
lat temp[$7]
|
||||
not
|
||||
bt code_066c
|
||||
lst temp[$4]
|
||||
pushi $ae ; 174, indexOf
|
||||
push1
|
||||
lst temp[$7]
|
||||
lat temp[$2]
|
||||
send $6
|
||||
bnot
|
||||
ne?
|
||||
code_066c: bnt code_06b7
|
||||
pushi $bb ; 187, start
|
||||
push0
|
||||
pToa matchSelector
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
lat temp[$4]
|
||||
le?
|
||||
bnt code_06a6
|
||||
pprev
|
||||
pushi $bb ; 187, start
|
||||
push0
|
||||
pToa matchSelector
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pushi $1e2 ; 482, itemsPerPage
|
||||
push0
|
||||
pToa matchSelector
|
||||
send $4
|
||||
bnot
|
||||
add
|
||||
push
|
||||
ldi $1
|
||||
sub
|
||||
le?
|
||||
bnt code_06a6
|
||||
pushi $1d4 ; 468, selectItem
|
||||
push1
|
||||
lst temp[$4]
|
||||
pToa matchSelector
|
||||
send $6
|
||||
bnot
|
||||
jmp code_06b7
|
||||
|
||||
code_06a6: pushi $d7 ; 215, move
|
||||
push1
|
||||
lst temp[$4]
|
||||
pushi $1d4 ; 468, selectItem
|
||||
push1
|
||||
lst temp[$4]
|
||||
pToa matchSelector
|
||||
send $c
|
||||
bnot
|
||||
code_06b7: ret
|
||||
|
||||
EditItem::validKey:
|
||||
pushi $7c ; 124, '|', titleBack
|
||||
lap param[$1]
|
||||
ne?
|
||||
bnt code_06c9
|
||||
push1
|
||||
lsp param[$1]
|
||||
calle export60027_6, $2
|
||||
bnot
|
||||
code_06c9: bt code_06e5
|
||||
pushi $3 ; z
|
||||
lsp param[$1]
|
||||
pushi $20 ; 32, ' ', name
|
||||
pushi $8 ; fixPriority
|
||||
calle export60025_4, $6
|
||||
bnot
|
||||
bt code_06e5
|
||||
pushi $1e0 ; 480, isControl
|
||||
push1
|
||||
lsp param[$1]
|
||||
self $6
|
||||
bnot
|
||||
code_06e5: ret
|
||||
|
||||
EditItem::isControl:
|
||||
pushi $12 ; 18, nsLeft
|
||||
lsp param[$1]
|
||||
pushi $3 ; z
|
||||
pushi $1b ; 27, illegalBits
|
||||
pushi $d ; 13, seenRect
|
||||
pushi $9 ; inLeft
|
||||
pushi $f00 ; 3840, BAD SELECTOR
|
||||
pushi $4700 ; 18176
|
||||
pushi $4800 ; 18432
|
||||
pushi $4900 ; 18688
|
||||
pushi $4b00 ; 19200
|
||||
pushi $4c00 ; 19456
|
||||
pushi $4d00 ; 19712
|
||||
pushi $4f00 ; 20224
|
||||
pushi $5000 ; 20480
|
||||
pushi $5100 ; 20736
|
||||
pushi $5200 ; 20992
|
||||
pushi $5300 ; 21248
|
||||
pushi $8 ; fixPriority
|
||||
calle export60025_4, $24
|
||||
bnot
|
||||
ret
|
||||
|
||||
Loading…
Reference in New Issue