2014-05-22 22:13:20 +00:00
|
|
|
StartSlotMachine: ; 37e2d (d:7e2d)
|
|
|
|
ld a, [wTrainerSpriteOffset]
|
|
|
|
cp $fd
|
|
|
|
jr z, .printOutOfOrder
|
|
|
|
cp $fe
|
|
|
|
jr z, .printOutToLunch
|
|
|
|
cp $ff
|
|
|
|
jr z, .printSomeonesKeys
|
|
|
|
callba AbleToPlaySlotsCheck
|
|
|
|
ld a, [wTrainerSpriteOffset]
|
|
|
|
and a
|
|
|
|
ret z
|
2015-02-07 10:43:08 +00:00
|
|
|
ld a, [wUnknownSlotVar]
|
2014-05-22 22:13:20 +00:00
|
|
|
ld b, a
|
|
|
|
ld a, [wTrainerFacingDirection]
|
|
|
|
inc a
|
|
|
|
cp b
|
|
|
|
jr z, .asm_37e58
|
|
|
|
ld a, $fd
|
|
|
|
jr .asm_37e5a
|
|
|
|
.asm_37e58
|
|
|
|
ld a, $fa
|
|
|
|
.asm_37e5a
|
2014-05-26 21:04:56 +00:00
|
|
|
ld [wcc5b], a
|
2014-05-22 22:13:20 +00:00
|
|
|
ld a, [H_LOADEDROMBANK]
|
2014-05-26 21:04:56 +00:00
|
|
|
ld [wcc5e], a
|
2014-05-22 22:13:20 +00:00
|
|
|
call PromptUserToPlaySlots
|
|
|
|
ret
|
|
|
|
.printOutOfOrder
|
|
|
|
ld a, $28
|
|
|
|
jr .printText
|
|
|
|
.printOutToLunch
|
|
|
|
ld a, $29
|
|
|
|
jr .printText
|
|
|
|
.printSomeonesKeys
|
|
|
|
ld a, $2a
|
|
|
|
.printText
|
|
|
|
push af
|
|
|
|
call EnableAutoTextBoxDrawing
|
|
|
|
pop af
|
|
|
|
call PrintPredefTextID
|
|
|
|
ret
|
|
|
|
|
|
|
|
GameCornerOutOfOrderText: ; 37e79 (d:7e79)
|
|
|
|
TX_FAR _GameCornerOutOfOrderText
|
|
|
|
db "@"
|
|
|
|
|
|
|
|
GameCornerOutToLunchText: ; 37e7e (d:7e7e)
|
|
|
|
TX_FAR _GameCornerOutToLunchText
|
|
|
|
db "@"
|
|
|
|
|
|
|
|
GameCornerSomeonesKeysText: ; 37e83 (d:7e83)
|
|
|
|
TX_FAR _GameCornerSomeonesKeysText
|
|
|
|
db "@"
|