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
|
//===== Hercules Script ======================================
//= Treasure Hunter Quests
//===== By: ==================================================
//= Fredzilla
//===== Current Version: =====================================
//= 1.0
//===== Description: =========================================
//= Start for Treasure hunter quests
//===== Additional Comments: =================================
//= Event_THQS - Used to check if you have already registered
//= #Treasure_Token - used to keep track of tokens
//============================================================
yuno_in01,124,164,6 script Guild Leader 1_M_PRON_KING,{
mes "[Keegan]";
mes "What brings you here? Have something to say?";
next;
switch (select("I want to be a Treasure Hunter", "Take a New Quest.", "Take me to the Official Shop.", "Nevermind.",N_NVM)) {
case 1:
if (Event_THQS==1)
goto N_AlreadyReg;
mes "[Keegan]";
mes "Well "+strcharinfo(0)+" if you want to be a Treasure Hunter first you must.";
mes " ";
mes "^FF00001.^000000 You well be changed ^FF000025,000z^000000 for basic training and your proof of being a member.";
mes " ";
mes "Umm... Well that is all you need to do. Hahaha.";
next;
if (select("Pay ^FF000025,000z^000000.", "Thats way to high!!") != 1) {
mes "[Keegan]";
mes "Well if you can't afford a small ^FF000025,000z^000000 you shouldent be a Treasure Hunter yet.";
close;
}
if (Zeny < 25000)
goto N_NoZeny;
Zeny -= 25000;
//getitem 7950, 1;
//getitem 7951, 1;
Event_THQS = 1;
mes "[Keegan]";
mes "Congratulations!";
emotion(e_grat);
next;
mes "[Keegan]";
mes "Welcome to the Guild of Treasure Hunters.";
mes "You may now take a Treasure Hunting Quest as you see fit.";
close;
case 2:
if (Event_THQS!=1)
goto A_NeedReg;
mes "[Keegan]";
mes "Well "+strcharinfo(0)+" if you wish to take a quest go talk to the fellow Treasure Hunter in the other room there.";
close;
case 3:
if (Event_THQS!=1)
goto N_NeedMem;
mes "[Keegan]";
mes "Yes "+strcharinfo(0)+" I will take you to our shop right away!";
next;
warp "prt_in",166,171;
close;
case 4:
mes "[Keegan]";
mes "Alright come back when you have the free time to spare.";
close;
}
N_NoZeny:
mes "[Keegan]";
mes "Hmmm you don't seem to have ^FF000025,000z^000000 "+strcharinfo(0)+". Please come back when you do.";
close;
N_AlreadyReg:
mes "[Keegan]";
mes "Ha ha ha...you are already a member.";
close;
A_NeedReg:
mes "[Keegan]";
mes "Sorry you must be a member of the Treasure Hunter Guild if you wish to take a quest.";
mes " ";
mes "Also now that you are a member feel free to use our shops anytime you wish.They are all located on this floor.";
mes " ";
mes "We also have another shop for members only,in which we use little metal diamonds called Treasure Hunter Tokens to exchange for rare goods.";
mes " ";
mes "You will even have access to our exclusive personal Dungeon.";
close;
N_NeedMem:
mes "[Keegan]";
mes "Im sorry only members may visit our private shop.";
close;
}
|
