pokered/scripts/Museum1F.asm

248 lines
4.1 KiB
NASM
Raw Normal View History

Museum1F_Script:
ld a, TRUE
2014-09-13 07:50:56 +00:00
ld [wAutoTextBoxDrawingControl], a
2014-05-18 18:19:10 +00:00
xor a
2014-09-13 07:50:56 +00:00
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
ld hl, Museum1F_ScriptPointers
ld a, [wMuseum1FCurScript]
2014-05-18 18:19:10 +00:00
jp CallFunctionInTable
Museum1F_ScriptPointers:
2014-05-18 18:19:10 +00:00
dw Museum1FScript0
dw Museum1FScript1
2016-06-12 00:24:04 +00:00
Museum1FScript0:
2015-08-31 02:38:41 +00:00
ld a, [wYCoord]
cp 4
2014-05-18 18:19:10 +00:00
ret nz
2015-08-31 02:38:41 +00:00
ld a, [wXCoord]
cp 9
jr z, .asm_5c120
2015-08-31 02:38:41 +00:00
ld a, [wXCoord]
cp 10
2014-05-18 18:19:10 +00:00
ret nz
.asm_5c120
xor a
ldh [hJoyHeld], a
2014-05-18 18:19:10 +00:00
ld a, $1
ldh [hSpriteIndexOrTextID], a
2014-05-18 18:19:10 +00:00
jp DisplayTextID
2016-06-12 00:24:04 +00:00
Museum1FScript1:
2014-05-18 18:19:10 +00:00
ret
Museum1F_TextPointers:
2014-05-18 18:19:10 +00:00
dw Museum1FText1
dw Museum1FText2
dw Museum1FText3
dw Museum1FText4
dw Museum1FText5
2016-06-12 00:24:04 +00:00
Museum1FText1:
text_asm
2015-08-31 02:38:41 +00:00
ld a, [wYCoord]
cp 4
2014-05-18 18:19:10 +00:00
jr nz, .asm_8774b
2015-08-31 02:38:41 +00:00
ld a, [wXCoord]
cp 13
2014-05-18 18:19:10 +00:00
jp z, Museum1FScript_5c1f9
jr .asm_b8709
.asm_8774b
cp $3
jr nz, .asm_d49e7
2015-08-31 02:38:41 +00:00
ld a, [wXCoord]
cp 12
2014-05-18 18:19:10 +00:00
jp z, Museum1FScript_5c1f9
.asm_d49e7
2015-07-21 17:36:03 +00:00
CheckEvent EVENT_BOUGHT_MUSEUM_TICKET
2014-05-18 18:19:10 +00:00
jr nz, .asm_31a16
ld hl, Museum1FText_5c23d
call PrintText
jp Museum1FScriptEnd
2014-05-18 18:19:10 +00:00
.asm_b8709
2015-07-21 17:36:03 +00:00
CheckEvent EVENT_BOUGHT_MUSEUM_TICKET
2014-05-18 18:19:10 +00:00
jr z, .asm_3ded4
.asm_31a16
ld hl, Museum1FText_5c242
call PrintText
jp Museum1FScriptEnd
2014-05-18 18:19:10 +00:00
.asm_3ded4
2015-07-18 15:17:29 +00:00
ld a, MONEY_BOX
2015-02-07 10:43:08 +00:00
ld [wTextBoxID], a
2014-05-18 18:19:10 +00:00
call DisplayTextBoxID
xor a
ldh [hJoyHeld], a
2014-05-18 18:19:10 +00:00
ld hl, Museum1FText_5c21f
call PrintText
call YesNoChoice
ld a, [wCurrentMenuItem]
2014-05-18 18:19:10 +00:00
and a
jr nz, .asm_de133
xor a
ldh [hMoney], a
ldh [hMoney + 1], a
2014-05-18 18:19:10 +00:00
ld a, $50
ldh [hMoney + 2], a
2014-05-18 18:19:10 +00:00
call HasEnoughMoney
jr nc, .asm_0f3e3
ld hl, Museum1FText_5c229
call PrintText
jp .asm_de133
.asm_0f3e3
ld hl, Museum1FText_5c224
call PrintText
2015-07-21 17:36:03 +00:00
SetEvent EVENT_BOUGHT_MUSEUM_TICKET
2014-05-18 18:19:10 +00:00
xor a
2015-07-19 03:49:52 +00:00
ld [wPriceTemp], a
ld [wPriceTemp + 1], a
2014-05-18 18:19:10 +00:00
ld a, $50
2015-07-19 03:49:52 +00:00
ld [wPriceTemp + 2], a
ld hl, wPriceTemp + 2
ld de, wPlayerMoney + 2
2014-05-18 18:19:10 +00:00
ld c, $3
predef SubBCDPredef
2015-07-18 15:17:29 +00:00
ld a, MONEY_BOX
2015-02-07 10:43:08 +00:00
ld [wTextBoxID], a
2014-05-18 18:19:10 +00:00
call DisplayTextBoxID
2015-07-19 08:46:12 +00:00
ld a, SFX_PURCHASE
2014-05-18 18:19:10 +00:00
call PlaySoundWaitForCurrent
call WaitForSoundToFinish
jr .asm_0b094
.asm_de133
ld hl, Museum1FText_5c21a
2014-05-18 18:19:10 +00:00
call PrintText
ld a, $1
ld [wSimulatedJoypadStatesIndex], a
ld a, D_DOWN
ld [wSimulatedJoypadStatesEnd], a
call StartSimulatingJoypadStates
2014-05-18 18:19:10 +00:00
call UpdateSprites
jr Museum1FScriptEnd
2014-05-18 18:19:10 +00:00
.asm_0b094
ld a, $1
ld [wMuseum1FCurScript], a
jr Museum1FScriptEnd
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FScript_5c1f9:
2014-05-18 18:19:10 +00:00
ld hl, Museum1FText_5c22e
call PrintText
call YesNoChoice
ld a, [wCurrentMenuItem]
2014-05-18 18:19:10 +00:00
cp $0
jr nz, .asm_d1144
ld hl, Museum1FText_5c233
call PrintText
jr Museum1FScriptEnd
2014-05-18 18:19:10 +00:00
.asm_d1144
ld hl, Museum1FText_5c238
call PrintText
2016-06-12 00:24:04 +00:00
Museum1FScriptEnd:
2014-05-18 18:19:10 +00:00
jp TextScriptEnd
2016-06-12 00:24:04 +00:00
Museum1FText_5c21a:
text_far _Museum1FText_5c21a
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText_5c21f:
text_far _Museum1FText_5c21f
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText_5c224:
text_far _Museum1FText_5c224
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText_5c229:
text_far _Museum1FText_5c229
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText_5c22e:
text_far _Museum1FText_5c22e
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText_5c233:
text_far _Museum1FText_5c233
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText_5c238:
text_far _Museum1FText_5c238
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText_5c23d:
text_far _Museum1FText_5c23d
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText_5c242:
text_far _Museum1FText_5c242
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText2:
text_asm
2014-05-18 18:19:10 +00:00
ld hl, Museum1FText_5c251
call PrintText
jp TextScriptEnd
2016-06-12 00:24:04 +00:00
Museum1FText_5c251:
text_far _Museum1FText_5c251
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText3:
text_asm
2015-07-21 17:36:03 +00:00
CheckEvent EVENT_GOT_OLD_AMBER
jr nz, .got_item
2014-05-18 18:19:10 +00:00
ld hl, Museum1FText_5c28e
call PrintText
2015-08-05 21:20:29 +00:00
lb bc, OLD_AMBER, 1
2014-05-18 18:19:10 +00:00
call GiveItem
jr nc, .bag_full
2015-07-21 17:36:03 +00:00
SetEvent EVENT_GOT_OLD_AMBER
ld a, HS_OLD_AMBER
2015-07-25 03:27:59 +00:00
ld [wMissableObjectIndex], a
predef HideObject
2014-05-18 18:19:10 +00:00
ld hl, ReceivedOldAmberText
jr .done
.bag_full
2014-05-18 18:19:10 +00:00
ld hl, Museum1FText_5c29e
jr .done
.got_item
2014-05-18 18:19:10 +00:00
ld hl, Museum1FText_5c299
.done
2014-05-18 18:19:10 +00:00
call PrintText
jp TextScriptEnd
2016-06-12 00:24:04 +00:00
Museum1FText_5c28e:
text_far _Museum1FText_5c28e
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
ReceivedOldAmberText:
text_far _ReceivedOldAmberText
sound_get_item_1
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText_5c299:
text_far _Museum1FText_5c299
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText_5c29e:
text_far _Museum1FText_5c29e
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText4:
text_asm
2014-05-18 18:19:10 +00:00
ld hl, Museum1FText_5c2ad
call PrintText
jp TextScriptEnd
2016-06-12 00:24:04 +00:00
Museum1FText_5c2ad:
text_far _Museum1FText_5c2ad
text_end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
Museum1FText5:
text_asm
2014-05-18 18:19:10 +00:00
ld hl, Museum1FText_5c2bc
call PrintText
jp TextScriptEnd
2016-06-12 00:24:04 +00:00
Museum1FText_5c2bc:
text_far _Museum1FText_5c2bc
text_end