summaryrefslogtreecommitdiff
path: root/src/scripts/water_club_lobby.asm
blob: aa7cd56bd93890df5bd75e131a99977178ca722a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
WaterClubLobbyAfterDuel:
	ld hl, .after_duel_table
	call FindEndOfDuelScript
	ret

.after_duel_table
	db NPC_IMAKUNI
	db NPC_IMAKUNI
	dw Script_BeatImakuni
	dw Script_LostToImakuni
	db $00

Preload_ImakuniInWaterClubLobby:
	get_event_value EVENT_IMAKUNI_STATE
	cp IMAKUNI_TALKED
	jr c, .dont_load
	get_event_value EVENT_TEMP_DUELED_IMAKUNI
	jr nz, .dont_load
	get_event_value EVENT_IMAKUNI_ROOM
	cp IMAKUNI_WATER_CLUB
	jr z, .load_imakuni
.dont_load
	or a
	ret

.load_imakuni
	ld a, MUSIC_IMAKUNI
	ld [wDefaultSong], a
	scf
	ret

Script_Gal1:
	start_script
	jump_if_event_equal EVENT_GAL1_TRADE_STATE, GAL1_TRADE_COMPLETED, .ows_e10e
	test_if_event_equal EVENT_GAL1_TRADE_STATE, GAL1_TRADE_NOT_OFFERED
	print_variable_npc_text Gal1WantToTrade1Text, Gal1WantToTrade2Text
	set_event EVENT_GAL1_TRADE_STATE, GAL1_TRADE_OFFERED
	ask_question_jump Gal1WouldYouLikeToTradeText, .ows_e0eb
	print_npc_text Gal1DeclinedTradeText
	quit_script_fully

.ows_e0eb
	jump_if_card_owned LAPRAS, .ows_e0f3
	print_npc_text Gal1DontOwnCardText
	quit_script_fully

.ows_e0f3
	jump_if_card_in_collection LAPRAS, .ows_e0fb
	print_npc_text Gal1CardInDeckText
	quit_script_fully

.ows_e0fb
	set_event EVENT_GAL1_TRADE_STATE, GAL1_TRADE_COMPLETED
	print_npc_text Gal1LetsTradeText
	print_text Gal1TradeCompleteText
	take_card LAPRAS
	give_card ARCANINE1
	show_card_received_screen ARCANINE1
	print_npc_text Gal1ThanksText
	quit_script_fully

.ows_e10e
	print_text_quit_fully Gal1AfterTradeText

Script_Lass1:
	start_script
	jump_if_event_equal EVENT_LASS1_MENTIONED_IMAKUNI, TRUE, .ows_e121
	print_npc_text Text0427
	set_event EVENT_LASS1_MENTIONED_IMAKUNI, TRUE
	set_event EVENT_IMAKUNI_STATE, IMAKUNI_MENTIONED
	quit_script_fully

.ows_e121
	jump_if_event_not_equal EVENT_IMAKUNI_ROOM, IMAKUNI_WATER_CLUB, .ows_e12d
	jump_if_event_true EVENT_TEMP_DUELED_IMAKUNI, .ows_e12d
	print_text_quit_fully Text0428

.ows_e12d
	print_text_quit_fully Text0429

Preload_Man2:
	get_event_value EVENT_JOSHUA_STATE
	cp JOSHUA_DEFEATED
	ret

Script_Man2:
	start_script
	print_text_quit_fully Text042a

Script_Pappy2:
	start_script
	print_text_quit_fully Text042b