Add subdirectories to engine/ similar to pokecrystal

1 files changed, 54 insertions, 0 deletions

diff --git a/engine/slots/game_corner_slots.asm b/engine/slots/game_corner_slots.asm
new file mode 100755
index 00000000..2108695f
--- /dev/null
+++ b/engine/slots/game_corner_slots.asm
@@ -0,0 +1,54 @@
+StartSlotMachine:
+	ld a, [wHiddenObjectFunctionArgument]
+	cp $fd
+	jr z, .printOutOfOrder
+	cp $fe
+	jr z, .printOutToLunch
+	cp $ff
+	jr z, .printSomeonesKeys
+	callba AbleToPlaySlotsCheck
+	ld a, [wCanPlaySlots]
+	and a
+	ret z
+	ld a, [wLuckySlotHiddenObjectIndex]
+	ld b, a
+	ld a, [wHiddenObjectIndex]
+	inc a
+	cp b
+	jr z, .match
+	ld a, 253
+	jr .next
+.match
+	ld a, 250
+.next
+	ld [wSlotMachineSevenAndBarModeChance], a
+	ld a, [H_LOADEDROMBANK]
+	ld [wSlotMachineSavedROMBank], a
+	call PromptUserToPlaySlots
+	ret
+.printOutOfOrder
+	tx_pre_id GameCornerOutOfOrderText
+	jr .printText
+.printOutToLunch
+	tx_pre_id GameCornerOutToLunchText
+	jr .printText
+.printSomeonesKeys
+	tx_pre_id GameCornerSomeonesKeysText
+.printText
+	push af
+	call EnableAutoTextBoxDrawing
+	pop af
+	call PrintPredefTextID
+	ret
+
+GameCornerOutOfOrderText::
+	TX_FAR _GameCornerOutOfOrderText
+	db "@"
+
+GameCornerOutToLunchText::
+	TX_FAR _GameCornerOutToLunchText
+	db "@"
+
+GameCornerSomeonesKeysText::
+	TX_FAR _GameCornerSomeonesKeysText
+	db "@"