521 lines
6.7 KiB
Plaintext
521 lines
6.7 KiB
Plaintext
Jump::init:
|
|
link $1
|
|
lap param[$1]
|
|
aTop client
|
|
lsp param[$0]
|
|
ldi $2
|
|
eq?
|
|
bnt code_00c5
|
|
lap param[$2]
|
|
aTop caller
|
|
code_00c5: pushi $1a ; 26, signal
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
aTop signal
|
|
pushi $4a ; 74, 'J', setPri
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
pTos xStep
|
|
ldi $4e20 ; 20000
|
|
eq?
|
|
bnt code_0127
|
|
pushi $43 ; 67, 'C', heading
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
sat temp[$0]
|
|
push
|
|
ldi $14a ; 330, cycleSpeed
|
|
gt?
|
|
bt code_0104
|
|
lst temp[$0]
|
|
ldi $1e ; 30, brRight
|
|
lt?
|
|
bt code_0104
|
|
pushi $96 ; 150, isClass
|
|
lat temp[$0]
|
|
lt?
|
|
bnt code_010a
|
|
pprev
|
|
ldi $d2 ; 210, copyToFrom
|
|
lt?
|
|
code_0104: bnt code_010a
|
|
ldi $0
|
|
jmp code_0125
|
|
|
|
code_010a: lst temp[$0]
|
|
ldi $b4 ; 180, end
|
|
lt?
|
|
bnt code_011c
|
|
pushi $3f ; 63, '?', xStep
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
jmp code_0125
|
|
|
|
code_011c: pushi $3f ; 63, '?', xStep
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
neg
|
|
code_0125: aTop xStep
|
|
code_0127: pToa waitApogeeX
|
|
bnt code_0134
|
|
pTos xStep
|
|
pToa gx
|
|
mul
|
|
push
|
|
ldi $0
|
|
lt?
|
|
code_0134: not
|
|
bnt code_013b
|
|
ldi $0
|
|
aTop waitApogeeX
|
|
code_013b: pToa waitApogeeY
|
|
bnt code_0148
|
|
pTos yStep
|
|
pToa gy
|
|
mul
|
|
push
|
|
ldi $0
|
|
lt?
|
|
code_0148: not
|
|
bnt code_014f
|
|
ldi $0
|
|
aTop waitApogeeY
|
|
code_014f: lag global[$40]
|
|
aTop b_moveCnt
|
|
pushi $179 ; 377, setTest
|
|
push0
|
|
self $4
|
|
bnot
|
|
ret
|
|
|
|
Jump::doit:
|
|
link $2
|
|
push1
|
|
lsg global[$40]
|
|
pToa b_moveCnt
|
|
sub
|
|
push
|
|
callk kernel_61, $2
|
|
bnot
|
|
push
|
|
pushi $41 ; 65, 'A', moveSpeed
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
ge?
|
|
bnt code_027e
|
|
lag global[$40]
|
|
aTop b_moveCnt
|
|
push1
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
aTop xLast
|
|
push2
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
aTop yLast
|
|
push1
|
|
push1
|
|
pTos xLast
|
|
pToa xStep
|
|
add
|
|
push
|
|
push2
|
|
push1
|
|
pTos yLast
|
|
pToa yStep
|
|
add
|
|
push
|
|
pToa client
|
|
send $c
|
|
bnot
|
|
pToa xStep
|
|
sat temp[$0]
|
|
pToa yStep
|
|
sat temp[$1]
|
|
pTos xStep
|
|
pToa gx
|
|
add
|
|
aTop xStep
|
|
pTos yStep
|
|
pToa gy
|
|
add
|
|
aTop yStep
|
|
pToa waitApogeeX
|
|
not
|
|
bnt code_01f9
|
|
pTos x
|
|
ldi $4e20 ; 20000
|
|
ne?
|
|
bnt code_01f9
|
|
push0
|
|
pTos dx
|
|
push1
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa x
|
|
sub
|
|
mul
|
|
le?
|
|
bnt code_01f9
|
|
push1
|
|
push1
|
|
pTos x
|
|
pushi $1007 ; 4103, -info-
|
|
push1
|
|
pushi $1007 ; 4103, -info-
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $8 ; fixPriority
|
|
or
|
|
push
|
|
pToa client
|
|
send $c
|
|
bnot
|
|
pushi $64 ; 100, 'd', moveDone
|
|
push0
|
|
self $4
|
|
bnot
|
|
jmp code_027e
|
|
|
|
code_01f9: pToa waitApogeeY
|
|
not
|
|
bnt code_023b
|
|
pTos y
|
|
ldi $4e20 ; 20000
|
|
ne?
|
|
bnt code_023b
|
|
push0
|
|
pTos dy
|
|
push2
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa y
|
|
sub
|
|
mul
|
|
le?
|
|
bnt code_023b
|
|
push2
|
|
push1
|
|
pTos y
|
|
pushi $1007 ; 4103, -info-
|
|
push1
|
|
pushi $1007 ; 4103, -info-
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $8 ; fixPriority
|
|
or
|
|
push
|
|
pToa client
|
|
send $c
|
|
bnot
|
|
pushi $64 ; 100, 'd', moveDone
|
|
push0
|
|
self $4
|
|
bnot
|
|
jmp code_027e
|
|
|
|
code_023b: lst temp[$0]
|
|
pToa xStep
|
|
mul
|
|
push
|
|
ldi $0
|
|
le?
|
|
bnt code_0251
|
|
ldi $0
|
|
aTop waitApogeeX
|
|
pushi $179 ; 377, setTest
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_0251: lst temp[$1]
|
|
pToa yStep
|
|
mul
|
|
push
|
|
ldi $0
|
|
le?
|
|
bnt code_0267
|
|
ldi $0
|
|
aTop waitApogeeY
|
|
pushi $179 ; 377, setTest
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_0267: pushi $1007 ; 4103, -info-
|
|
push1
|
|
pushi $1007 ; 4103, -info-
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
ldi $8 ; fixPriority
|
|
or
|
|
push
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
code_027e: ret
|
|
|
|
Jump::moveDone:
|
|
pushi $1a ; 26, signal
|
|
push1
|
|
pTos signal
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
pToa caller
|
|
bnt code_0298
|
|
ldi $1
|
|
aTop completed
|
|
pushi $159 ; 345, motionCue
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_0298: ret
|
|
|
|
Jump::setTest:
|
|
push1
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa x
|
|
gt?
|
|
bt code_02b8
|
|
push1
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa x
|
|
eq?
|
|
bnt code_02be
|
|
pTos xStep
|
|
ldi $0
|
|
gt?
|
|
code_02b8: bnt code_02be
|
|
ldi $ff ; 255, asInteger
|
|
jmp code_02c0
|
|
|
|
code_02be: ldi $1
|
|
code_02c0: aTop dx
|
|
push2
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa y
|
|
gt?
|
|
bt code_02e1
|
|
push2
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
push
|
|
pToa y
|
|
eq?
|
|
bnt code_02e7
|
|
pTos yStep
|
|
ldi $0
|
|
gt?
|
|
code_02e1: bnt code_02e7
|
|
ldi $ff ; 255, asInteger
|
|
jmp code_02e9
|
|
|
|
code_02e7: ldi $1
|
|
code_02e9: aTop dy
|
|
ret
|
|
|
|
Jump::motionCue:
|
|
pushi $44 ; 68, 'D', mover
|
|
push1
|
|
push0
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
pToa completed
|
|
bnt code_0324
|
|
pToa caller
|
|
bnt code_0324
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushi $cb ; 203, cuee
|
|
push1
|
|
pTos caller
|
|
pushi $9a ; 154, yourself
|
|
push0
|
|
pushi $8d ; 141, new
|
|
push0
|
|
class Cue
|
|
send $4
|
|
bnot
|
|
send $a
|
|
bnot
|
|
push
|
|
pushi $ca ; 202, pCuees
|
|
push0
|
|
lag global[$3]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
code_0324: pushi $95 ; 149, dispose
|
|
push0
|
|
self $4
|
|
bnot
|
|
ret
|
|
|
|
JumpTo::init:
|
|
link $36
|
|
lap param[$1]
|
|
aTop client
|
|
lap param[$2]
|
|
aTop x
|
|
lap param[$3]
|
|
aTop y
|
|
pTos x
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
eq?
|
|
bnt code_0363
|
|
pTos y
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
eq?
|
|
bnt code_0363
|
|
pushi $1a ; 26, signal
|
|
push0
|
|
pToa client
|
|
send $4
|
|
bnot
|
|
aTop signal
|
|
pushi $64 ; 100, 'd', moveDone
|
|
push0
|
|
self $4
|
|
bnot
|
|
ret
|
|
|
|
code_0363: pTos x
|
|
push1
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sub
|
|
sat temp[$0]
|
|
pTos y
|
|
push2
|
|
push0
|
|
lap param[$1]
|
|
send $4
|
|
bnot
|
|
sub
|
|
sat temp[$1]
|
|
pushi $4 ; scaleX
|
|
pushSelf
|
|
lst temp[$0]
|
|
push
|
|
pTos gy
|
|
callk kernel_99, $8
|
|
bnot
|
|
lat temp[$0]
|
|
not
|
|
bnt code_0391
|
|
ldi $4e20 ; 20000
|
|
aTop x
|
|
code_0391: lat temp[$1]
|
|
not
|
|
bnt code_039b
|
|
ldi $4e20 ; 20000
|
|
aTop y
|
|
code_039b: lsp param[$0]
|
|
dup
|
|
ldi $3 ; z
|
|
eq?
|
|
bnt code_03af
|
|
pushi $94 ; 148, init
|
|
push1
|
|
lsp param[$1]
|
|
super Jump, $6
|
|
bnot
|
|
jmp code_03c1
|
|
|
|
code_03af: dup
|
|
ldi $4 ; scaleX
|
|
eq?
|
|
bnt code_03c1
|
|
pushi $94 ; 148, init
|
|
push2
|
|
lsp param[$1]
|
|
lsp param[$4]
|
|
super Jump, $8
|
|
bnot
|
|
code_03c1: toss
|
|
ret
|
|
|
|
JumpTo::moveDone:
|
|
pTos x
|
|
ldi $4e20 ; 20000
|
|
ne?
|
|
bnt code_03d4
|
|
push1
|
|
push1
|
|
pTos x
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
code_03d4: pTos y
|
|
ldi $4e20 ; 20000
|
|
ne?
|
|
bnt code_03e5
|
|
push2
|
|
push1
|
|
pTos y
|
|
pToa client
|
|
send $6
|
|
bnot
|
|
code_03e5: pushi $64 ; 100, 'd', moveDone
|
|
push0
|
|
super Jump, $4
|
|
bnot
|
|
ret
|
|
|