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