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
|
DanaPhoneCalleeScript:
gettrainername STRING_BUFFER_3, LASS, DANA1
checkflag ENGINE_DANA_READY_FOR_REMATCH
iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Female
checkflag ENGINE_DANA_THURSDAY_NIGHT
iftrue .NotThursday
checkflag ENGINE_DANA_HAS_THUNDERSTONE
iftrue .HasThunderstone
readvar VAR_WEEKDAY
ifnotequal THURSDAY, .NotThursday
checktime NITE
iftrue DanaThursdayNight
.NotThursday:
farsjump DanaHangUpScript
.WantsBattle:
getlandmarkname STRING_BUFFER_5, LANDMARK_ROUTE_38
farsjump DanaReminderScript
.HasThunderstone:
getlandmarkname STRING_BUFFER_5, LANDMARK_ROUTE_38
farsjump DanaComePickUpScript
DanaPhoneCallerScript:
gettrainername STRING_BUFFER_3, LASS, DANA1
farscall PhoneScript_GreetPhone_Female
checkflag ENGINE_DANA_READY_FOR_REMATCH
iftrue .Generic
checkflag ENGINE_DANA_THURSDAY_NIGHT
iftrue .Generic
checkflag ENGINE_DANA_HAS_THUNDERSTONE
iftrue .Generic
farscall PhoneScript_Random3
ifequal 0, DanaWantsBattle
checkevent EVENT_DANA_GAVE_THUNDERSTONE
iftrue .Thunderstone
farscall PhoneScript_Random2
ifequal 0, DanaHasThunderstone
.Thunderstone:
farscall PhoneScript_Random11
ifequal 0, DanaHasThunderstone
.Generic:
farscall PhoneScript_Random3
ifequal 0, DanaFoundRare
farsjump Phone_GenericCall_Female
DanaThursdayNight:
setflag ENGINE_DANA_THURSDAY_NIGHT
DanaWantsBattle:
getlandmarkname STRING_BUFFER_5, LANDMARK_ROUTE_38
setflag ENGINE_DANA_READY_FOR_REMATCH
farsjump PhoneScript_WantsToBattle_Female
DanaFoundRare:
farsjump Phone_CheckIfUnseenRare_Female
DanaHasThunderstone:
setflag ENGINE_DANA_HAS_THUNDERSTONE
getlandmarkname STRING_BUFFER_5, LANDMARK_ROUTE_38
farsjump PhoneScript_FoundItem_Female
|
