From c8b02b28a6f4a4ce4fd9660bed162a44595aa802 Mon Sep 17 00:00:00 2001 From: threememories Date: Mon, 27 Apr 2026 01:32:52 +0000 Subject: [PATCH] Upload files to "Script" --- Script/Script60050.txt | 154 +++++++++++++++++++++++++++++++++++++++++ Script/Script60051.txt | 140 +++++++++++++++++++++++++++++++++++++ Script/Script60052.txt | 64 +++++++++++++++++ Script/Script60053.txt | 18 +++++ Script/Script60054.txt | 58 ++++++++++++++++ 5 files changed, 434 insertions(+) create mode 100644 Script/Script60050.txt create mode 100644 Script/Script60051.txt create mode 100644 Script/Script60052.txt create mode 100644 Script/Script60053.txt create mode 100644 Script/Script60054.txt diff --git a/Script/Script60050.txt b/Script/Script60050.txt new file mode 100644 index 0000000..d43006d --- /dev/null +++ b/Script/Script60050.txt @@ -0,0 +1,154 @@ +DPath::init: + link $1 + lsp param[$0] + ldi $1 + sub + sat temp[$0] + push + ldi $2 + mod + bnt code_00b8 + -at temp[$0] + -ap param[$0] + lat temp[$0] + lapi param[$2] + aTop caller + pushi $8000 ; -32768 + lat temp[$0] + sapi param[$2] +code_00b8: pToa points + bnt code_00c3 + pushi $95 ; 149, dispose + push0 + send $4 + bnot +code_00c3: pushi $d1 ; 209, newWith + push2 + lst temp[$0] + ldi $1 + add + push + &rest $3 ; z + lsp param[$2] + class IntArray + send $8 + bnot + aTop points + pushi $4b ; 75, 'K', at + push2 + lst temp[$0] + ldi $1 + sub + push + pushi $8000 ; -32768 + pToa points + send $8 + bnot + pushi $157 ; 343, setTarget + push0 + self $4 + bnot + pushi $94 ; 148, init + push0 + super MoveTo, $4 + bnot + ret + +DPath::dispose: + pToa points + bnt code_0104 + pushi $95 ; 149, dispose + push0 + send $4 + bnot +code_0104: pushi $95 ; 149, dispose + push0 + super MoveTo, $4 + bnot + ret + +DPath::setTarget: + pushi $4b ; 75, 'K', at + push1 + pTos value + pToa points + send $6 + bnot + push + ldi $8000 ; -32768 + ne? + bnt code_0139 + pushi $4b ; 75, 'K', at + push1 + pTos value + pToa points + send $6 + bnot + aTop x + pushi $4b ; 75, 'K', at + push1 + ipToa value + push + pToa points + send $6 + bnot + aTop y + ipToa value +code_0139: ret + +DPath::moveDone: + pushi $4b ; 75, 'K', at + push1 + pTos value + pToa points + send $6 + bnot + push + ldi $8000 ; -32768 + eq? + bnt code_0154 + pushi $64 ; 100, 'd', moveDone + push0 + super MoveTo, $4 + bnot + jmp code_015b + +code_0154: pushi $94 ; 148, init + push0 + self $4 + bnot +code_015b: ret + +RelDPath::setTarget: + pushi $4b ; 75, 'K', at + push1 + pTos value + pToa points + send $6 + bnot + push + ldi $8000 ; -32768 + ne? + bnt code_018f + pTos x + pushi $4b ; 75, 'K', at + push1 + pTos value + pToa points + send $6 + bnot + add + aTop x + ipToa value + pTos y + pushi $4b ; 75, 'K', at + push1 + pTos value + pToa points + send $6 + bnot + add + aTop y + ipToa value +code_018f: ret + diff --git a/Script/Script60051.txt b/Script/Script60051.txt new file mode 100644 index 0000000..7233517 --- /dev/null +++ b/Script/Script60051.txt @@ -0,0 +1,140 @@ +Orbit::init: + link $4 + lsp param[$0] + ldi $1 + ge? + bnt code_00b2 + lap param[$1] + aTop client + lsp param[$0] + ldi $2 + ge? + bnt code_00b2 + lap param[$2] + aTop centerObj + lsp param[$0] + ldi $3 ; z + ge? + bnt code_00b2 + lap param[$3] + aTop radius + lsp param[$0] + ldi $4 ; scaleX + ge? + bnt code_00b2 + lap param[$4] + aTop xTilt + lsp param[$0] + ldi $5 ; scaleY + ge? + bnt code_00b2 + lap param[$5] + aTop yTilt + lsp param[$0] + ldi $6 ; maxScale + ge? + bnt code_00b2 + lap param[$6] + aTop angleStep + lsp param[$0] + ldi $7 ; priority + ge? + bnt code_00b2 + lap param[$7] + aTop winding + lsp param[$0] + ldi $8 ; fixPriority + ge? + bnt code_00b2 + lap param[$8] + aTop curAngle +code_00b2: pToa centerObj + bnt code_00c8 + push1 + push0 + send $4 + bnot + sat temp[$0] + push2 + push0 + pToa centerObj + send $4 + bnot + sat temp[$1] + jmp code_00d2 + +code_00c8: ldi $140 ; 320, pHandle + sat temp[$0] + ldi $f0 ; 240, drawSelected + sat temp[$1] +code_00d2: push2 + pTos curAngle + pTos radius + callk kernel_66, $4 + bnot + sat temp[$2] + push2 + pTos yTilt + lag global[$3f] + add + push + push2 + pTos curAngle + pTos radius + callk kernel_67, $4 + bnot + push + callk kernel_67, $4 + bnot + sat temp[$3] + pToa xTilt + bnt code_010f + push2 + push + lst temp[$2] + callk kernel_67, $4 + bnot + sat temp[$2] + lst temp[$3] + push2 + pTos xTilt + push + callk kernel_66, $4 + bnot + add + sat temp[$3] +code_010f: lst temp[$0] + lat temp[$2] + add + aTop x + lst temp[$1] + lat temp[$3] + sub + aTop y + push2 + pTos curAngle + pTos winding + pToa angleStep + mul + add + push + pushi $168 ; 360, pY1 + calle export60025_1, $4 + bnot + aTop curAngle + pushi $94 ; 148, init + pushi $3 ; z + pTos client + pTos x + pTos y + super MoveTo, $a + bnot + ret + +Orbit::moveDone: + pushi $94 ; 148, init + push0 + self $4 + bnot + ret + diff --git a/Script/Script60052.txt b/Script/Script60052.txt new file mode 100644 index 0000000..ff09e79 --- /dev/null +++ b/Script/Script60052.txt @@ -0,0 +1,64 @@ +Follow::doit: + pushi $165 ; 357, distanceTo + push1 + pTos who + pToa client + send $6 + bnot + push + pToa distance + le? + bnt code_009f + push1 + push0 + pToa client + send $4 + bnot + aTop xLast + push2 + push0 + pToa client + send $4 + bnot + aTop yLast + pushi $166 ; 358, dirLoop + push1 + pushi $4 ; scaleX + push1 + push0 + pToa client + send $4 + bnot + push + push2 + push0 + pToa client + send $4 + bnot + push + push1 + push0 + pToa who + send $4 + bnot + push + push2 + push0 + pToa who + send $4 + bnot + push + callk kernel_63, $8 + bnot + push + pToa client + send $6 + bnot + jmp code_00a6 + +code_009f: pushi $45 ; 69, 'E', doit + push0 + super Chase, $4 + bnot +code_00a6: ret + diff --git a/Script/Script60053.txt b/Script/Script60053.txt new file mode 100644 index 0000000..faac785 --- /dev/null +++ b/Script/Script60053.txt @@ -0,0 +1,18 @@ +Approach::doit: + pushi $158 ; 344, onTarget + push0 + self $4 + bnot + bnt code_005b + pushi $64 ; 100, 'd', moveDone + push0 + self $4 + bnot + jmp code_0062 + +code_005b: pushi $45 ; 69, 'E', doit + push0 + super Chase, $4 + bnot +code_0062: ret + diff --git a/Script/Script60054.txt b/Script/Script60054.txt new file mode 100644 index 0000000..e34085c --- /dev/null +++ b/Script/Script60054.txt @@ -0,0 +1,58 @@ +MoveFwd::init: + lap param[$0] + bnt code_00a0 + pushi $94 ; 148, init + pushi $4 ; scaleX + lsp param[$1] + push1 + push0 + lap param[$1] + send $4 + bnot + push + push2 + pushi $43 ; 67, 'C', heading + push0 + lap param[$1] + send $4 + bnot + push + lsp param[$2] + callk kernel_66, $4 + bnot + add + push + push2 + push0 + lap param[$1] + send $4 + bnot + push + push2 + pushi $43 ; 67, 'C', heading + push0 + lap param[$1] + send $4 + bnot + push + lsp param[$2] + callk kernel_67, $4 + bnot + sub + push + lsp param[$0] + ldi $3 ; z + ge? + bnt code_0099 + lap param[$3] +code_0099: push + super PolyPath, $c + bnot + jmp code_00a8 + +code_00a0: pushi $94 ; 148, init + push0 + super PolyPath, $4 + bnot +code_00a8: ret +