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
|
//===== Hercules Script ======================================
//= Treasure Hunter Quests
//===== By: ==================================================
//= Fredzilla
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= Hercules
//===== 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 108,{
mes "[Keegan]";
mes "What brings you here? Have something to say?";
next;
menu "I want to be a Treasure Hunter",-,"Take a New Quest.",N_NQuest,"Take me to the Official Shop.",N_OShop,"Nevermind.",N_NVM;
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;
menu "Pay ^FF000025,000z^000000.",-,"Thats way to high!!",N_HighPrice;
if (zeny < 25000) goto N_NoZeny;
set Zeny,Zeny-25000;
//getitem 7950, 1;
//getitem 7951, 1;
set Event_THQS,1;
mes "[Keegan]";
mes "Congratulations!";
emotion 46;
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;
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_HighPrice:
mes "[Keegan]";
mes "Well if you can't afford a small ^FF000025,000z^000000 you shouldent be a Treasure Hunter yet.";
close;
N_AlreadyReg:
mes "[Keegan]";
mes "Ha ha ha...you are already a member.";
close;
N_NQuest:
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;
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_OShop:
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;
end;
N_NeedMem:
mes "[Keegan]";
mes "Im sorry only members may visit our private shop.";
close;
N_NVM:
mes "[Keegan]";
mes "Alright come back when you have the free time to spare.";
close;
}
|