From 30ae209701dd2bf42192cbbf59c0f99340d3effc Mon Sep 17 00:00:00 2001
From: sup39 <sms@sup39.dev>
Date: Sat, 10 Sep 2022 18:09:12 +0800
Subject: [PATCH] add RecordMarioQFPosition

---
 NTSC-J 1.0/RecordMarioQFPosition.txt |  8 ++++++++
 src/RecordMarioQFPosition.s          | 14 ++++++++++++++
 2 files changed, 22 insertions(+)
 create mode 100644 NTSC-J 1.0/RecordMarioQFPosition.txt
 create mode 100644 src/RecordMarioQFPosition.s

diff --git a/NTSC-J 1.0/RecordMarioQFPosition.txt b/NTSC-J 1.0/RecordMarioQFPosition.txt
new file mode 100644
index 0000000..77aa7ac
--- /dev/null
+++ b/NTSC-J 1.0/RecordMarioQFPosition.txt	
@@ -0,0 +1,8 @@
+$ Record Mario QF Position (2022/09/10) [sup39]
+C20ECEDC 00000006
+3C80817F 538426B6
+806D98B8 80030010
+9404C000 80030014
+94040004 80030018
+94040004 3B9C0001
+60000000 00000000
diff --git a/src/RecordMarioQFPosition.s b/src/RecordMarioQFPosition.s
new file mode 100644
index 0000000..387d234
--- /dev/null
+++ b/src/RecordMarioQFPosition.s
@@ -0,0 +1,14 @@
+.set base, 0x817EC000
+
+_C20ECEDC_:
+  lis r4, base@ha
+  rlwimi r4, r28, 4, 0x30
+  lwz r3, -0x6748(r13)
+  lwz r0, 0x10(r3)
+  stwu r0, base@l(r4)
+  lwz r0, 0x14(r3)
+  stwu r0, 4(r4)
+  lwz r0, 0x18(r3)
+  stwu r0, 4(r4)
+## orig
+  addi r28, r28, 1