RealmFiles/Script/Script60055.txt

96 lines
1.2 KiB
Plaintext

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