summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat
-rw-r--r--asm/slot_machine.s401
-rw-r--r--src/slot_machine.c141
2 files changed, 134 insertions, 408 deletions
diff --git a/asm/slot_machine.s b/asm/slot_machine.s
index df42b5d5c..0e3a7d8a7 100644
--- a/asm/slot_machine.s
+++ b/asm/slot_machine.s
@@ -5,407 +5,6 @@
.text
- thumb_func_start sub_81408F4
-sub_81408F4: @ 81408F4
- push {lr}
- adds r2, r1, 0
- cmp r0, 0x6
- bhi _08140966
- lsls r0, 2
- ldr r1, _08140908 @ =_0814090C
- adds r0, r1
- ldr r0, [r0]
- mov pc, r0
- .align 2, 0
-_08140908: .4byte _0814090C
- .align 2, 0
-_0814090C:
- .4byte _08140928
- .4byte _08140934
- .4byte _08140934
- .4byte _0814093E
- .4byte _08140944
- .4byte _08140952
- .4byte _0814095C
-_08140928:
- movs r1, 0x4
- eors r1, r2
- negs r0, r1
- orrs r0, r1
- lsrs r0, 31
- b _08140968
-_08140934:
- movs r0, 0
- cmp r2, 0x4
- bne _08140968
- movs r0, 0x1
- b _08140968
-_0814093E:
- movs r1, 0
- subs r0, r2, 0x5
- b _08140948
-_08140944:
- movs r1, 0
- subs r0, r2, 0x2
-_08140948:
- cmp r0, 0x1
- bhi _0814094E
- movs r1, 0x1
-_0814094E:
- adds r0, r1, 0
- b _08140968
-_08140952:
- movs r0, 0
- cmp r2, 0x1
- bne _08140968
- movs r0, 0x1
- b _08140968
-_0814095C:
- movs r0, 0
- cmp r2, 0
- bne _08140968
- movs r0, 0x1
- b _08140968
-_08140966:
- movs r0, 0
-_08140968:
- pop {r1}
- bx r1
- thumb_func_end sub_81408F4
-
- thumb_func_start sub_814096C
-sub_814096C: @ 814096C
- push {lr}
- cmp r0, 0x6
- bhi _0814099C
- lsls r0, 2
- ldr r1, _0814097C @ =_08140980
- adds r0, r1
- ldr r0, [r0]
- mov pc, r0
- .align 2, 0
-_0814097C: .4byte _08140980
- .align 2, 0
-_08140980:
- .4byte _081409AC
- .4byte _081409A8
- .4byte _081409A4
- .4byte _081409A4
- .4byte _0814099C
- .4byte _081409A0
- .4byte _081409A0
-_0814099C:
- movs r0, 0x1
- b _081409AE
-_081409A0:
- movs r0, 0x3
- b _081409AE
-_081409A4:
- movs r0, 0x4
- b _081409AE
-_081409A8:
- movs r0, 0x5
- b _081409AE
-_081409AC:
- movs r0, 0x6
-_081409AE:
- pop {r1}
- bx r1
- thumb_func_end sub_814096C
-
- thumb_func_start sub_81409B4
-sub_81409B4: @ 81409B4
- push {r4-r6,lr}
- bl Random
- lsls r0, 16
- lsrs r2, r0, 18
- ldr r0, _08140A60 @ =sSlotMachineState
- ldr r0, [r0]
- ldrh r1, [r0, 0x4]
- lsls r0, r1, 3
- subs r0, r1
- lsls r0, 1
- ldr r1, _08140A64 @ =gUnknown_84648D2
- adds r4, r0, r1
- movs r5, 0
- ldrh r0, [r4]
- cmp r2, r0
- bcc _081409E6
- adds r0, r4, 0
-_081409D8:
- adds r0, 0x2
- adds r5, 0x1
- cmp r5, 0x5
- bgt _081409E6
- ldrh r1, [r0]
- cmp r2, r1
- bcs _081409D8
-_081409E6:
- ldr r6, _08140A60 @ =sSlotMachineState
- ldr r1, [r6]
- ldrh r0, [r1, 0x8]
- cmp r0, 0x4
- bhi _08140A5A
- ldrh r0, [r1, 0xC]
- cmp r0, 0
- bne _08140A22
- bl Random
- ldr r1, _08140A68 @ =0x00003fff
- ands r1, r0
- ldrh r4, [r4, 0xC]
- cmp r1, r4
- bcs _08140A18
- ldr r4, [r6]
- bl Random
- movs r1, 0x1
- ands r1, r0
- movs r0, 0x3C
- cmp r1, 0
- beq _08140A16
- movs r0, 0x5
-_08140A16:
- strh r0, [r4, 0xC]
-_08140A18:
- ldr r0, _08140A60 @ =sSlotMachineState
- ldr r1, [r0]
- ldrh r1, [r1, 0xC]
- cmp r1, 0
- beq _08140A56
-_08140A22:
- cmp r5, 0
- bne _08140A4A
- bl Random
- ldr r1, _08140A68 @ =0x00003fff
- ands r1, r0
- ldr r0, _08140A6C @ =0x00002ccb
- cmp r1, r0
- bhi _08140A4A
- ldr r0, _08140A60 @ =sSlotMachineState
- ldr r4, [r0]
- bl Random
- movs r1, 0x1
- ands r1, r0
- movs r0, 0x3C
- cmp r1, 0
- beq _08140A48
- movs r0, 0x5
-_08140A48:
- strh r0, [r4, 0xC]
-_08140A4A:
- ldr r2, _08140A60 @ =sSlotMachineState
- ldr r1, [r2]
- ldrh r0, [r1, 0xC]
- subs r0, 0x1
- strh r0, [r1, 0xC]
- adds r0, r2, 0
-_08140A56:
- ldr r0, [r0]
- strh r5, [r0, 0x8]
-_08140A5A:
- pop {r4-r6}
- pop {r0}
- bx r0
- .align 2, 0
-_08140A60: .4byte sSlotMachineState
-_08140A64: .4byte gUnknown_84648D2
-_08140A68: .4byte 0x00003fff
-_08140A6C: .4byte 0x00002ccb
- thumb_func_end sub_81409B4
-
- thumb_func_start sub_8140A70
-sub_8140A70: @ 8140A70
- ldr r0, _08140A7C @ =sSlotMachineState
- ldr r1, [r0]
- movs r0, 0
- strh r0, [r1, 0x8]
- bx lr
- .align 2, 0
-_08140A7C: .4byte sSlotMachineState
- thumb_func_end sub_8140A70
-
- thumb_func_start sub_8140A80
-sub_8140A80: @ 8140A80
- push {r4-r7,lr}
- mov r7, r9
- mov r6, r8
- push {r6,r7}
- sub sp, 0xC
- mov r0, sp
- movs r1, 0
- movs r2, 0x9
- bl memset
- movs r5, 0
- ldr r2, _08140B58 @ =sSlotMachineState
- movs r3, 0
- adds r4, r2, 0
-_08140A9C:
- ldr r0, [r2]
- lsls r1, r5, 2
- adds r0, 0x3C
- adds r0, r1
- str r3, [r0]
- adds r5, 0x1
- cmp r5, 0x4
- ble _08140A9C
- movs r0, 0
- mov r9, r0
- ldr r0, [r4]
- movs r1, 0x20
- ldrsh r4, [r0, r1]
- movs r7, 0x22
- ldrsh r3, [r0, r7]
- movs r1, 0x24
- ldrsh r2, [r0, r1]
- ldr r6, _08140B5C @ =gUnknown_8464926
- movs r7, 0x2A
- adds r7, r6
- mov r8, r7
- mov r1, sp
- movs r0, 0x15
- adds r0, r6
- mov r12, r0
- movs r5, 0x2
-_08140AD0:
- adds r4, 0x1
- cmp r4, 0x14
- ble _08140AD8
- movs r4, 0
-_08140AD8:
- adds r3, 0x1
- cmp r3, 0x14
- ble _08140AE0
- movs r3, 0
-_08140AE0:
- adds r2, 0x1
- cmp r2, 0x14
- ble _08140AE8
- movs r2, 0
-_08140AE8:
- adds r0, r4, r6
- ldrb r0, [r0]
- strb r0, [r1]
- mov r7, r12
- adds r0, r3, r7
- ldrb r0, [r0]
- strb r0, [r1, 0x3]
- mov r7, r8
- adds r0, r2, r7
- ldrb r0, [r0]
- strb r0, [r1, 0x6]
- adds r1, 0x1
- subs r5, 0x1
- cmp r5, 0
- bge _08140AD0
- ldr r0, _08140B58 @ =sSlotMachineState
- ldr r0, [r0]
- adds r0, 0x50
- movs r1, 0
- strh r1, [r0]
- ldr r7, _08140B60 @ =gUnknown_84648BD
- mov r8, r7
- movs r6, 0
- movs r5, 0x4
-_08140B18:
- ldr r0, _08140B58 @ =sSlotMachineState
- ldr r1, [r0]
- mov r0, r8
- adds r0, 0x3
- adds r0, r6, r0
- ldrh r1, [r1, 0xE]
- ldrb r0, [r0]
- cmp r1, r0
- bcc _08140BB6
- ldrb r0, [r7]
- mov r1, sp
- adds r4, r1, r0
- ldrb r1, [r4]
- movs r0, 0x1
- bl sub_81408F4
- cmp r0, 0
- beq _08140B64
- mov r0, r8
- adds r0, 0x1
- adds r0, r6, r0
- ldrb r0, [r0]
- add r0, sp
- ldrb r1, [r0]
- movs r0, 0x2
- bl sub_81408F4
- movs r3, 0x1
- cmp r0, 0
- beq _08140B8E
- movs r3, 0x2
- b _08140B92
- .align 2, 0
-_08140B58: .4byte sSlotMachineState
-_08140B5C: .4byte gUnknown_8464926
-_08140B60: .4byte gUnknown_84648BD
-_08140B64:
- mov r0, r8
- adds r0, 0x1
- adds r0, r6, r0
- ldrb r0, [r0]
- add r0, sp
- ldrb r1, [r4]
- ldrb r0, [r0]
- cmp r1, r0
- bne _08140B8C
- ldrb r0, [r7, 0x2]
- add r0, sp
- ldrb r0, [r0]
- cmp r1, r0
- bne _08140B8C
- adds r0, r1, 0
- bl sub_814096C
- lsls r0, 24
- lsrs r3, r0, 24
- b _08140B8E
-_08140B8C:
- movs r3, 0
-_08140B8E:
- cmp r3, 0
- beq _08140BB0
-_08140B92:
- ldr r0, _08140BD4 @ =sSlotMachineState
- ldr r2, [r0]
- adds r0, r2, 0
- adds r0, 0x3C
- adds r0, r6
- movs r1, 0x1
- str r1, [r0]
- adds r2, 0x50
- ldr r1, _08140BD8 @ =gUnknown_8464966
- lsls r0, r3, 1
- adds r0, r1
- ldrh r0, [r0]
- ldrh r1, [r2]
- adds r0, r1
- strh r0, [r2]
-_08140BB0:
- cmp r3, r9
- ble _08140BB6
- mov r9, r3
-_08140BB6:
- adds r7, 0x4
- adds r6, 0x4
- subs r5, 0x1
- cmp r5, 0
- bge _08140B18
- mov r7, r9
- lsls r0, r7, 16
- lsrs r0, 16
- add sp, 0xC
- pop {r3,r4}
- mov r8, r3
- mov r9, r4
- pop {r4-r7}
- pop {r1}
- bx r1
- .align 2, 0
-_08140BD4: .4byte sSlotMachineState
-_08140BD8: .4byte gUnknown_8464966
- thumb_func_end sub_8140A80
-
thumb_func_start sub_8140BDC
sub_8140BDC: @ 8140BDC
ldr r0, _08140BE8 @ =sSlotMachineState
diff --git a/src/slot_machine.c b/src/slot_machine.c
index 064105bba..172a4014a 100644
--- a/src/slot_machine.c
+++ b/src/slot_machine.c
@@ -19,7 +19,7 @@ struct SlotMachineState
u16 field_06;
u16 field_08;
u16 slotRewardClass;
- u8 filler_0C[2];
+ u16 field_0C;
u16 bet;
u8 field_10;
u8 field_11;
@@ -29,7 +29,7 @@ struct SlotMachineState
s16 field_2C[3];
s16 field_32[3];
u32 field_38;
- u8 filler_3C[0x14];
+ u32 field_3C[5];
u16 payout;
};
@@ -98,11 +98,11 @@ const u8 gUnknown_84648AE[][3] = {
};
const u8 gUnknown_84648BD[][4] = {
- {0x00, 0x04, 0x08, 0x03},
- {0x00, 0x03, 0x06, 0x02},
- {0x01, 0x04, 0x07, 0x01},
- {0x02, 0x05, 0x08, 0x02},
- {0x02, 0x04, 0x06, 0x03}
+ {0x00, 0x04, 0x08, 0x03}, // tl-br
+ {0x00, 0x03, 0x06, 0x02}, // top row
+ {0x01, 0x04, 0x07, 0x01}, // middle row
+ {0x02, 0x05, 0x08, 0x02}, // bottom row
+ {0x02, 0x04, 0x06, 0x03} // bl-tr
};
const u16 gUnknown_84648D2[][7] = {
@@ -1195,3 +1195,130 @@ bool32 sub_81406E8(s32 a0, s32 a1, s32 a2)
"_081408F0: .4byte gUnknown_84648AE");
}
#endif //NONMATCHING
+
+bool32 sub_81408F4(s32 a0, s32 a1)
+{
+ switch (a0)
+ {
+ case 0:
+ return a1 ^ 4 ? TRUE : FALSE;
+ case 1:
+ case 2:
+ return a1 == 4 ? TRUE : FALSE;
+ case 3:
+ return a1 == 5 || a1 == 6 ? TRUE : FALSE;
+ case 4:
+ return a1 == 2 || a1 == 3 ? TRUE : FALSE;
+ case 5:
+ return a1 == 1 ? TRUE : FALSE;
+ case 6:
+ return a1 == 0 ? TRUE : FALSE;
+ default:
+ return FALSE;
+ }
+}
+
+u8 sub_814096C(s32 a0)
+{
+ switch (a0)
+ {
+ default:
+ case 4:
+ return 1;
+ case 5:
+ case 6:
+ return 3;
+ case 2:
+ case 3:
+ return 4;
+ case 1:
+ return 5;
+ case 0:
+ return 6;
+ }
+}
+
+void sub_81409B4(void)
+{
+ u16 r2 = Random() / 4;
+ s32 i;
+ const u16 * r4 = gUnknown_84648D2[sSlotMachineState->machineidx];
+ for (i = 0; i < 6; i++)
+ {
+ if (r2 < r4[i])
+ break;
+ }
+ if (sSlotMachineState->field_08 < 5)
+ {
+ if (sSlotMachineState->field_0C == 0)
+ {
+ if ((Random() & 0x3FFF) < r4[6])
+ sSlotMachineState->field_0C = (Random() & 1) ? 5 : 60;
+ }
+ if (sSlotMachineState->field_0C != 0)
+ {
+ if (i == 0 && (Random() & 0x3FFF) < 0x2CCC)
+ sSlotMachineState->field_0C = (Random() & 1) ? 5 : 60;
+ sSlotMachineState->field_0C--;
+ }
+ sSlotMachineState->field_08 = i;
+ }
+}
+
+void sub_8140A70(void)
+{
+ sSlotMachineState->field_08 = 0;
+}
+
+u16 sub_8140A80(void)
+{
+ u8 sp0[9] = {};
+ s32 i;
+ s32 r4, r3, r2;
+ s32 r9;
+
+ for (i = 0; i < 5; i++)
+ sSlotMachineState->field_3C[i] = 0;
+
+ r9 = 0;
+ r4 = sSlotMachineState->field_20[0];
+ r3 = sSlotMachineState->field_20[1];
+ r2 = sSlotMachineState->field_20[2];
+
+ for (i = 0; i < 3; i++)
+ {
+ r4++;
+ if (r4 >= 21)
+ r4 = 0;
+ r3++;
+ if (r3 >= 21)
+ r3 = 0;
+ r2++;
+ if (r2 >= 21)
+ r2 = 0;
+ sp0[0 * 3 + i] = gUnknown_8464926[0][r4];
+ sp0[1 * 3 + i] = gUnknown_8464926[1][r3];
+ sp0[2 * 3 + i] = gUnknown_8464926[2][r2];
+ }
+ sSlotMachineState->payout = 0;
+ for (i = 0; i < 5; i++)
+ {
+ if (sSlotMachineState->bet >= gUnknown_84648BD[i][3])
+ {
+ if (sub_81408F4(1, sp0[gUnknown_84648BD[i][0]]))
+ r3 = sub_81408F4(2, sp0[gUnknown_84648BD[i][1]]) ? 2 : 1;
+ else if (sp0[gUnknown_84648BD[i][0]] == sp0[gUnknown_84648BD[i][1]] && sp0[gUnknown_84648BD[i][0]] == sp0[gUnknown_84648BD[i][2]])
+ r3 = sub_814096C(sp0[gUnknown_84648BD[i][0]]);
+ else
+ r3 = 0;
+ if (r3 != 0)
+ {
+ sSlotMachineState->field_3C[i] = 1;
+ sSlotMachineState->payout += gUnknown_8464966[r3];
+ }
+ if (r3 > r9)
+ r9 = r3;
+ }
+ }
+ return r9;
+}
generated by cgit v1.2.3 (git 2.25.1) at 2025-10-31 19:36:18 +0000