aboutsummaryrefslogtreecommitdiffstats
path: root/engine/slots/game_corner_slots.asm
diff options
context:
space:
mode:
authorRangi <35663410+Rangi42@users.noreply.github.com>2020-07-03 09:38:52 -0400
committerGitHub <noreply@github.com>2020-07-03 09:38:52 -0400
commitc85050497c1bd062e9cd40bf5b32fa3beca366cc (patch)
tree9593ddd3ab820223ab580d5fc0ae133b485b8315 /engine/slots/game_corner_slots.asm
parentActually run .travis/webhook.sh (diff)
parentAdd engine/movie/oak_speech/ subdirectory (diff)
downloadpokeyellow-c85050497c1bd062e9cd40bf5b32fa3beca366cc.tar.gz
pokeyellow-c85050497c1bd062e9cd40bf5b32fa3beca366cc.tar.xz
pokeyellow-c85050497c1bd062e9cd40bf5b32fa3beca366cc.zip
Merge pull request #256 from Rangi42/master
Add subdirectories to engine/ similar to pokecrystal
Diffstat (limited to 'engine/slots/game_corner_slots.asm')
-rwxr-xr-xengine/slots/game_corner_slots.asm54
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 "@"