summaryrefslogtreecommitdiff
path: root/data/scripts/pc_transfer.inc
blob: c04c2d0cde24f20b7cf717aa0ddc7a6e0b2249b6 (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
EventScript_GetGiftMonPartySlot:: @ 81A8C27
	getpartysize
	subvar VAR_RESULT, 1
	copyvar VAR_0x8004, VAR_RESULT
	return

EventScript_NameReceivedBoxMon:: @ 81A8C33
	fadescreen FADE_TO_BLACK
	special ChangeBoxPokemonNickname
	waitstate
	lock
	faceplayer
	return

EventScript_TransferredToPC:: @ 81A8C3C
	bufferboxname 0, VAR_PC_BOX_TO_SEND_MON
	getspeciesname 1, VAR_TEMP_1
	call_if_unset FLAG_SYS_NOT_SOMEONES_PC, EventScript_TransferredSomeonesPC
	call_if_set FLAG_SYS_NOT_SOMEONES_PC, EventScript_TransferredBillsPC
	return

EventScript_TransferredSomeonesPC:: @ 81A8C57
	specialvar VAR_RESULT, ShouldShowBoxWasFullMessage
	compare VAR_RESULT, TRUE
	goto_if_eq EventScript_TransferredSomeonesPCBoxFull
	msgbox Text_MonSentToBoxInSomeonesPC
	return

EventScript_TransferredSomeonesPCBoxFull:: @ 81A8C70
	specialvar VAR_RESULT, GetPCBoxToSendMon
	bufferboxname 2, VAR_RESULT
	msgbox Text_MonSentToBoxSomeonesBoxFull
	return

EventScript_TransferredBillsPC:: @ 81A8C82
	specialvar VAR_RESULT, ShouldShowBoxWasFullMessage
	compare VAR_RESULT, TRUE
	goto_if_eq EventScript_TransferredBillsPCBoxFull
	msgbox Text_MonSentToBoxInBillsPC
	return

EventScript_TransferredBillsPCBoxFull:: @ 81A8C9B
	specialvar VAR_RESULT, GetPCBoxToSendMon
	bufferboxname 2, VAR_RESULT
	msgbox Text_MonSentToBoxBillsBoxFull
	return