69 lines
883 B
Plaintext
69 lines
883 B
Plaintext
WDragger::dispose:
|
|
pushi $359 ; 857, stopDragging
|
|
push0
|
|
self $4
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
&rest $1
|
|
super Obj, $4
|
|
bnot
|
|
ret
|
|
|
|
WDragger::startDragging:
|
|
link $2
|
|
pushi $f4 ; 244, curEvent
|
|
push0
|
|
lag global[$e]
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push1
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
sub
|
|
aTop pOfsX
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
push
|
|
push2
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
sub
|
|
aTop pOfsY
|
|
pushi $5 ; scaleY
|
|
pushi $19 ; 25, lsBottom
|
|
push0
|
|
lsp param[$1]
|
|
pTos pOfsX
|
|
pTos pOfsY
|
|
callk kernel_118, $a
|
|
bnot
|
|
ldi $1
|
|
aTop pDragging
|
|
ret
|
|
|
|
WDragger::stopDragging:
|
|
ldi $0
|
|
aTop pDragging
|
|
push2
|
|
pushi $19 ; 25, lsBottom
|
|
push1
|
|
callk kernel_118, $4
|
|
bnot
|
|
ret
|
|
|