From c6c0c9582f486f805c98ecfa51a803ed62a23918 Mon Sep 17 00:00:00 2001
From: scnorton <scnorton@biociphers.org>
Date: Tue, 26 Mar 2019 15:11:55 -0400
Subject: [PATCH] Port menews_jisan.c from FireRed

---
 asm/mevent_news.s        | 312 ---------------------------------------
 include/constants/vars.h |   2 +-
 ld_script.txt            |   2 +-
 src/mevent_news.c        | 147 ++++++++++++++++++
 4 files changed, 149 insertions(+), 314 deletions(-)
 delete mode 100644 asm/mevent_news.s
 create mode 100644 src/mevent_news.c

diff --git a/asm/mevent_news.s b/asm/mevent_news.s
deleted file mode 100644
index b49676ddb..000000000
--- a/asm/mevent_news.s
+++ /dev/null
@@ -1,312 +0,0 @@
-	.include "asm/macros.inc"
-	.include "constants/constants.inc"
-
-	.syntax unified
-
-	.text
-
-	thumb_func_start sub_801DB68
-sub_801DB68: @ 801DB68
-	push {r4,r5,lr}
-	adds r4, r0, 0
-	bl sub_801B044
-	adds r5, r0, 0
-	movs r0, 0x3
-	adds r1, r4, 0
-	ands r1, r0
-	ldrb r2, [r5]
-	movs r0, 0x4
-	negs r0, r0
-	ands r0, r2
-	orrs r0, r1
-	strb r0, [r5]
-	cmp r4, 0x2
-	bhi _0801DB8E
-	cmp r4, 0x1
-	bcs _0801DB94
-	b _0801DBB8
-_0801DB8E:
-	cmp r4, 0x3
-	beq _0801DBA6
-	b _0801DBB8
-_0801DB94:
-	bl Random
-	lsls r0, 16
-	lsrs r0, 16
-	movs r1, 0xF
-	bl __umodsi3
-	adds r0, 0x10
-	b _0801DBB6
-_0801DBA6:
-	bl Random
-	lsls r0, 16
-	lsrs r0, 16
-	movs r1, 0xF
-	bl __umodsi3
-	adds r0, 0x1
-_0801DBB6:
-	strb r0, [r5, 0x1]
-_0801DBB8:
-	pop {r4,r5}
-	pop {r0}
-	bx r0
-	thumb_func_end sub_801DB68
-
-	thumb_func_start sub_801DBC0
-sub_801DBC0: @ 801DBC0
-	push {lr}
-	bl sub_801B044
-	movs r1, 0
-	strb r1, [r0]
-	strb r1, [r0, 0x1]
-	ldr r0, =0x0000402e
-	bl VarSet
-	pop {r0}
-	bx r0
-	.pool
-	thumb_func_end sub_801DBC0
-
-	thumb_func_start sub_801DBDC
-sub_801DBDC: @ 801DBDC
-	push {r4,lr}
-	ldr r0, =0x0000402e
-	bl GetVarPointer
-	adds r4, r0, 0
-	bl sub_801B044
-	adds r2, r0, 0
-	ldr r0, [r2]
-	lsls r0, 24
-	lsrs r0, 29
-	cmp r0, 0x4
-	bls _0801DC10
-	ldrh r0, [r4]
-	adds r0, 0x1
-	strh r0, [r4]
-	lsls r0, 16
-	ldr r1, =0x01f30000
-	cmp r0, r1
-	bls _0801DC10
-	ldrb r0, [r2]
-	movs r1, 0x1F
-	ands r1, r0
-	strb r1, [r2]
-	movs r0, 0
-	strh r0, [r4]
-_0801DC10:
-	pop {r4}
-	pop {r0}
-	bx r0
-	.pool
-	thumb_func_end sub_801DBDC
-
-	thumb_func_start sub_801DC20
-sub_801DC20: @ 801DC20
-	push {r4-r6,lr}
-	ldr r6, =gSpecialVar_Result
-	bl sub_801B044
-	adds r4, r0, 0
-	bl IsMysteryEventEnabled
-	cmp r0, 0
-	beq _0801DC3A
-	bl sub_801B0CC
-	cmp r0, 0
-	bne _0801DC44
-_0801DC3A:
-	movs r0, 0
-	b _0801DCA6
-	.pool
-_0801DC44:
-	adds r0, r4, 0
-	bl sub_801DD44
-	lsls r0, 16
-	lsrs r5, r0, 16
-	cmp r5, 0x6
-	bhi _0801DCA4
-	lsls r0, r5, 2
-	ldr r1, =_0801DC60
-	adds r0, r1
-	ldr r0, [r0]
-	mov pc, r0
-	.pool
-	.align 2, 0
-_0801DC60:
-	.4byte _0801DCA4
-	.4byte _0801DC7C
-	.4byte _0801DC7C
-	.4byte _0801DCA4
-	.4byte _0801DC86
-	.4byte _0801DC96
-	.4byte _0801DCA4
-_0801DC7C:
-	adds r0, r4, 0
-	bl sub_801DCAC
-	strh r0, [r6]
-	b _0801DCA4
-_0801DC86:
-	adds r0, r4, 0
-	bl sub_801DCAC
-	strh r0, [r6]
-	adds r0, r4, 0
-	bl sub_801DCD8
-	b _0801DCA4
-_0801DC96:
-	adds r0, r4, 0
-	bl sub_801DCAC
-	strh r0, [r6]
-	adds r0, r4, 0
-	bl sub_801DCCC
-_0801DCA4:
-	adds r0, r5, 0
-_0801DCA6:
-	pop {r4-r6}
-	pop {r1}
-	bx r1
-	thumb_func_end sub_801DC20
-
-	thumb_func_start sub_801DCAC
-sub_801DCAC: @ 801DCAC
-	push {r4,lr}
-	ldrb r2, [r0]
-	movs r1, 0x4
-	negs r1, r1
-	ands r1, r2
-	strb r1, [r0]
-	ldrb r4, [r0, 0x1]
-	adds r4, 0x84
-	movs r1, 0
-	strb r1, [r0, 0x1]
-	bl sub_801DD10
-	adds r0, r4, 0
-	pop {r4}
-	pop {r1}
-	bx r1
-	thumb_func_end sub_801DCAC
-
-	thumb_func_start sub_801DCCC
-sub_801DCCC: @ 801DCCC
-	ldrb r2, [r0]
-	movs r1, 0x1D
-	negs r1, r1
-	ands r1, r2
-	strb r1, [r0]
-	bx lr
-	thumb_func_end sub_801DCCC
-
-	thumb_func_start sub_801DCD8
-sub_801DCD8: @ 801DCD8
-	push {r4,lr}
-	adds r3, r0, 0
-	ldr r0, [r3]
-	lsls r0, 27
-	lsrs r0, 29
-	adds r0, 0x1
-	movs r1, 0x7
-	ands r0, r1
-	lsls r0, 2
-	ldrb r1, [r3]
-	movs r4, 0x1D
-	negs r4, r4
-	adds r2, r4, 0
-	ands r2, r1
-	orrs r2, r0
-	strb r2, [r3]
-	ldr r0, [r3]
-	lsls r0, 27
-	lsrs r0, 29
-	cmp r0, 0x4
-	bls _0801DD0A
-	ands r2, r4
-	movs r0, 0x10
-	orrs r2, r0
-	strb r2, [r3]
-_0801DD0A:
-	pop {r4}
-	pop {r0}
-	bx r0
-	thumb_func_end sub_801DCD8
-
-	thumb_func_start sub_801DD10
-sub_801DD10: @ 801DD10
-	push {r4,lr}
-	adds r3, r0, 0
-	ldr r0, [r3]
-	lsls r0, 24
-	lsrs r0, 29
-	adds r0, 0x1
-	lsls r0, 5
-	ldrb r1, [r3]
-	movs r4, 0x1F
-	adds r2, r4, 0
-	ands r2, r1
-	orrs r2, r0
-	strb r2, [r3]
-	ldr r0, [r3]
-	lsls r0, 24
-	lsrs r0, 29
-	cmp r0, 0x5
-	bls _0801DD3C
-	ands r2, r4
-	movs r0, 0xA0
-	orrs r2, r0
-	strb r2, [r3]
-_0801DD3C:
-	pop {r4}
-	pop {r0}
-	bx r0
-	thumb_func_end sub_801DD10
-
-	thumb_func_start sub_801DD44
-sub_801DD44: @ 801DD44
-	push {lr}
-	adds r2, r0, 0
-	ldrb r1, [r2]
-	movs r0, 0xE0
-	ands r0, r1
-	cmp r0, 0xA0
-	bne _0801DD56
-	movs r0, 0x6
-	b _0801DD92
-_0801DD56:
-	ldr r1, [r2]
-	lsls r0, r1, 30
-	lsrs r0, 30
-	cmp r0, 0x1
-	beq _0801DD78
-	cmp r0, 0x1
-	bgt _0801DD6A
-	cmp r0, 0
-	beq _0801DD74
-	b _0801DD90
-_0801DD6A:
-	cmp r0, 0x2
-	beq _0801DD7C
-	cmp r0, 0x3
-	beq _0801DD80
-	b _0801DD90
-_0801DD74:
-	movs r0, 0x3
-	b _0801DD92
-_0801DD78:
-	movs r0, 0x1
-	b _0801DD92
-_0801DD7C:
-	movs r0, 0x2
-	b _0801DD92
-_0801DD80:
-	lsls r0, r1, 27
-	lsrs r0, 29
-	cmp r0, 0x2
-	bhi _0801DD8C
-	movs r0, 0x4
-	b _0801DD92
-_0801DD8C:
-	movs r0, 0x5
-	b _0801DD92
-_0801DD90:
-	movs r0, 0
-_0801DD92:
-	pop {r1}
-	bx r1
-	thumb_func_end sub_801DD44
-
-	.align 2, 0 @ don't pad with nop
diff --git a/include/constants/vars.h b/include/constants/vars.h
index 81ae99e1e..20524611b 100644
--- a/include/constants/vars.h
+++ b/include/constants/vars.h
@@ -60,7 +60,7 @@
 #define VAR_POISON_STEP_COUNTER              0x402B
 #define VAR_RESET_RTC_ENABLE                 0x402C
 #define VAR_ENIGMA_BERRY_AVAILABLE           0x402D
-#define VAR_UNUSED_0x402E                    0x402E // Unused Var
+#define VAR_0x402E                           0x402E
 
 #define VAR_FRONTIER_MANIAC_FACILITY         0x402F
 #define VAR_FRONTIER_GAMBLER_FACILITY        0x4030
diff --git a/ld_script.txt b/ld_script.txt
index b4f99d606..7f2fb8733 100644
--- a/ld_script.txt
+++ b/ld_script.txt
@@ -61,7 +61,7 @@ SECTIONS {
         asm/mevent_server.o(.text);
         asm/mevent_server_ish.o(.text);
         asm/mevent_server_helpers.o(.text);
-        asm/mevent_news.o(.text);
+        src/mevent_news.o(.text);
         asm/union_room_chat.o(.text);
         asm/berry_crush.o(.text);
         src/berry_powder.o(.text);
diff --git a/src/mevent_news.c b/src/mevent_news.c
new file mode 100644
index 000000000..f5a061c84
--- /dev/null
+++ b/src/mevent_news.c
@@ -0,0 +1,147 @@
+#include "global.h"
+#include "mevent.h"
+#include "random.h"
+#include "event_data.h"
+#include "mevent_news.h"
+
+static u32 sub_801DCAC(struct MysteryEventStruct *);
+static void sub_801DD10(struct MysteryEventStruct *);
+static u32 sub_801DD44(struct MysteryEventStruct *);
+static void sub_801DCD8(struct MysteryEventStruct *);
+static void sub_801DCCC(struct MysteryEventStruct *);
+
+void sub_801DB68(u32 a0)
+{
+    struct MysteryEventStruct *r5 = sub_801B044();
+
+    r5->unk_0_0 = a0;
+    switch (a0)
+    {
+    case 0:
+        break;
+    case 1:
+    case 2:
+        r5->unk_1 = (Random() % 15) + 16;
+        break;
+    case 3:
+        r5->unk_1 = (Random() % 15) + 1;
+        break;
+    }
+}
+
+void sub_801DBC0(void)
+{
+    struct MysteryEventStruct *r5 = sub_801B044();
+
+    r5->unk_0_0 = 0;
+    r5->unk_0_2 = 0;
+    r5->unk_0_5 = 0;
+    r5->unk_1 = 0;
+    VarSet(VAR_0x402E, 0);
+}
+
+void sub_801DBDC(void)
+{
+    u16 *r4 = GetVarPointer(VAR_0x402E);
+    struct MysteryEventStruct *r2 = sub_801B044();
+    struct MysteryEventStruct r0 = *r2;
+
+    if ((u8)r0.unk_0_5 > 4 && ++(*r4) > 0x1f3)
+    {
+        r2->unk_0_5 = 0;
+        *r4 = 0;
+    }
+}
+
+u16 sub_801DC20(void)
+{
+    u16 *r6 = &gSpecialVar_Result;
+    struct MysteryEventStruct *r4 = sub_801B044();
+    u16 r5;
+
+    if (!IsMysteryEventEnabled() || !sub_801B0CC())
+        return 0;
+
+    r5 = sub_801DD44(r4);
+
+    switch (r5)
+    {
+    case 0:
+        break;
+    case 1:
+        *r6 = sub_801DCAC(r4);
+        break;
+    case 2:
+        *r6 = sub_801DCAC(r4);
+        break;
+    case 3:
+        break;
+    case 4:
+        *r6 = sub_801DCAC(r4);
+        sub_801DCD8(r4);
+        break;
+    case 5:
+        *r6 = sub_801DCAC(r4);
+        sub_801DCCC(r4);
+        break;
+    case 6:
+        break;
+    }
+
+    return r5;
+}
+
+static u32 sub_801DCAC(struct MysteryEventStruct *a0)
+{
+    u32 r4;
+
+    a0->unk_0_0 = 0;
+    r4 = a0->unk_1 + 0x84;
+    a0->unk_1 = 0;
+    sub_801DD10(a0);
+    return r4;
+}
+
+static void sub_801DCCC(struct MysteryEventStruct *a0)
+{
+    a0->unk_0_2 = 0;
+}
+
+static void sub_801DCD8(struct MysteryEventStruct *a0)
+{
+    a0->unk_0_2++;
+    if ((u8)a0->unk_0_2 > 4)
+        a0->unk_0_2 = 4;
+}
+
+static void sub_801DD10(struct MysteryEventStruct *a0)
+{
+    a0->unk_0_5++;
+    if ((u8)a0->unk_0_5 > 5)
+        a0->unk_0_5 = 5;
+}
+
+static u32 sub_801DD44(struct MysteryEventStruct *a0)
+{
+    struct MysteryEventStruct r0;
+    if ((u8)a0->unk_0_5 == 5)
+        return 6;
+
+    r0 = *a0;
+    switch (r0.unk_0_0)
+    {
+    case 0:
+        return 3;
+    case 1:
+        return 1;
+    case 2:
+        return 2;
+    case 3:
+        if ((u8)r0.unk_0_2 < 3)
+            return 4;
+        return 5;
+    default:
+        AGB_ASSERT(0);
+        return 0;
+    }
+}