summaryrefslogtreecommitdiff
path: root/npc/custom/quests/thq
diff options
context:
space:
mode:
Diffstat (limited to 'npc/custom/quests/thq')
-rw-r--r--npc/custom/quests/thq/THQS_ChatingNPC.txt22
-rw-r--r--npc/custom/quests/thq/THQS_GuildNPC.txt8
-rw-r--r--npc/custom/quests/thq/THQS_QuestNPC.txt16
-rw-r--r--npc/custom/quests/thq/THQS_Quests.txt74
-rw-r--r--npc/custom/quests/thq/THQS_TTShop.txt638
5 files changed, 219 insertions, 539 deletions
diff --git a/npc/custom/quests/thq/THQS_ChatingNPC.txt b/npc/custom/quests/thq/THQS_ChatingNPC.txt
index 752681e39..8ade6d8fd 100644
--- a/npc/custom/quests/thq/THQS_ChatingNPC.txt
+++ b/npc/custom/quests/thq/THQS_ChatingNPC.txt
@@ -4,8 +4,6 @@
//= Fredzilla
//===== Current Version: =====================================
//= 1.0
-//===== Compatible With: =====================================
-//= Hercules
//===== Description: =========================================
//= Start for Treasure hunter quests
//===== Additional Comments: =================================
@@ -14,7 +12,7 @@
//============================================================
//Entrance Flags
-yuno,48,101,6 script Notice 722,{
+yuno,48,101,6 script Notice GUILD_FLAG,{
mes "^FF0000[ Treasure Hunter Guild House ]^000000";
mes " ";
mes "Welcome to the Treasure Hunter's Guild House.";
@@ -26,7 +24,7 @@ yuno,48,101,6 script Notice 722,{
close;
}
//Saver Girl;
-yuno_in01,32,178,3 script Ahlma 94,{
+yuno_in01,32,178,3 script Ahlma 4_F_MAID,{
mes "[Ahlma]";
if (Event_THQS == 0) goto N_Member;
mes "Welcome to The Treasure Hunter Guild.";
@@ -46,7 +44,7 @@ N_Member:
close;
}
//Retired Smile mask girl;
-yuno_in01,33,162,3 script Smile Helper 92,{
+yuno_in01,33,162,3 script Smile Helper 4_F_03,{
mes "[Smile Gal]";
mes "Oh man...I am so sick of";
mes "trading Mr. Smile masks for crap.";
@@ -55,15 +53,15 @@ yuno_in01,33,162,3 script Smile Helper 92,{
close;
}
//Usless Female Assasin;
-yuno_in01,22,162,6 script Female Assasin 725,{
+yuno_in01,22,162,6 script Female Assasin 4_F_JOB_ASSASSIN,{
mes "[Sharlet]";
if (Event_THQS > 0) goto N_Member;
mes "Umm sorry I'm not gona waste my time talking to you if you arn't even a member!";
close;
N_Member:
- set @TEMP,rand(1,2);
- if (@TEMP == 1) goto N_Chat1;
- if (@TEMP == 2) goto N_Chat2;
+ set @temp,rand(1,2);
+ if (@temp == 1) goto N_Chat1;
+ if (@temp == 2) goto N_Chat2;
mes "How are you reading this???";
mes "Well unless you are reading the code :)";
close;
@@ -76,14 +74,14 @@ N_Chat2:
close;
}
//another usless member
-yuno_in01,25,162,6 script Female Wizard 123,{
+yuno_in01,25,162,6 script Female Wizard 2_F_MAGICMASTER,{
mes "[Sasha]";
if (Event_THQS > 0) goto N_Member;
mes "Umm sorry I'm not gona waste my time talking to you if you arn't even a member!";
close;
N_Member:
- set @TEMP,rand(2);
- if (@TEMP == 1) goto N_Chat;
+ set @temp,rand(2);
+ if (@temp == 1) goto N_Chat;
mes "Ahh welcome fellow Treasure Hunter "+strcharinfo(0)+".";
mes "Did you hear about that goat man running around in the trees?";
mes " ";
diff --git a/npc/custom/quests/thq/THQS_GuildNPC.txt b/npc/custom/quests/thq/THQS_GuildNPC.txt
index 01b14687f..326735a7a 100644
--- a/npc/custom/quests/thq/THQS_GuildNPC.txt
+++ b/npc/custom/quests/thq/THQS_GuildNPC.txt
@@ -4,8 +4,6 @@
//= Fredzilla
//===== Current Version: =====================================
//= 1.0
-//===== Compatible With: =====================================
-//= Hercules
//===== Description: =========================================
//= Start for Treasure hunter quests
//===== Additional Comments: =================================
@@ -13,7 +11,7 @@
//= #Treasure_Token - used to keep track of tokens
//============================================================
-yuno_in01,124,164,6 script Guild Leader 108,{
+yuno_in01,124,164,6 script Guild Leader 1_M_PRON_KING,{
mes "[Keegan]";
mes "What brings you here? Have something to say?";
next;
@@ -27,8 +25,8 @@ yuno_in01,124,164,6 script Guild Leader 108,{
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;
+ if (Zeny < 25000) goto N_NoZeny;
+ Zeny -= 25000;
//getitem 7950, 1;
//getitem 7951, 1;
set Event_THQS,1;
diff --git a/npc/custom/quests/thq/THQS_QuestNPC.txt b/npc/custom/quests/thq/THQS_QuestNPC.txt
index 5b4d98a27..76790221b 100644
--- a/npc/custom/quests/thq/THQS_QuestNPC.txt
+++ b/npc/custom/quests/thq/THQS_QuestNPC.txt
@@ -4,8 +4,6 @@
//= Fredzilla
//===== Current Version: =====================================
//= 1.4
-//===== Compatible With: =====================================
-//= Hercules
//===== Description: =========================================
//= Start for Treasure hunter quests
//===== Additional Comments: =================================
@@ -18,7 +16,7 @@
//= 1.4 Fixed typos. (bugreport:2607) [Kisuka]
//============================================================
-yuno_in01,112,151,6 script Quest Manager 62,{
+yuno_in01,112,151,6 script Quest Manager 1_M_SIZ,{
mes "[Guy]";
mes "Welcome to the Treasure Hunters Guild "+strcharinfo(0)+".";
next;
@@ -32,7 +30,7 @@ yuno_in01,112,151,6 script Quest Manager 62,{
mes "Good well get back out there.";
close;
N_PayZeny:
- if (zeny < 2500) goto N_ZenyFail;
+ if (Zeny < 2500) goto N_ZenyFail;
set one_qset, 0;
set two_qset, 0;
set three_qset, 0;
@@ -44,9 +42,9 @@ N_PayZeny:
set nine_qset, 0;
set ten_qset, 0;
set On_Quest, 0;
- set Zeny,Zeny-2500;
+ Zeny -= 2500;
//add time delay penalty. You can get another quest after 2 - 3 hours. [Lupus]
- set #THQ_DELAY, (GetTime(7)*12*31*24+GetTime(6)*31*24+GetTime(5)*24+GetTime(3)+rand(2,3));
+ set #THQ_DELAY, (gettime(7)*12*31*24+gettime(6)*31*24+gettime(5)*24+gettime(3)+rand(2,3));
mes "[Guy]";
mes "Its sad to see someone give a quest up...";
mes "Shame on you.";
@@ -61,7 +59,7 @@ N_ZenyFail:
N_NewQuest:
if (Event_THQS == 0) goto N_Signup;
//checking if time penalty is over [Lupus]
- if (#THQ_DELAY > (GetTime(7)*12*31*24 + GetTime(6)*31*24 + GetTime(5)*24 + GetTime(3)) ) goto L_NoQuestsForYet;
+ if (#THQ_DELAY > (gettime(7)*12*31*24 + gettime(6)*31*24 + gettime(5)*24 + gettime(3)) ) goto L_NoQuestsForYet;
mes "[Guy]";
mes "Ahh welcome fellow Treasure Hunter.";
mes "You currently have ^FF0000"+#Treasure_Token+"^000000 treasure tokens!!!";
@@ -73,7 +71,7 @@ N_NewQuest:
mes "Ok lets see what quest we can give you today.";
mes "The quest names in ^FF0000This Colour^000000 mean that they are more challanging then the rest, but have better rewards.";
next;
- set #THQ_DELAY,(GetTime(7)*12*31*24+GetTime(6)*31*24+GetTime(5)*24+GetTime(3) + 1); //you can get another quest after 1 hour [Lupus]
+ set #THQ_DELAY,(gettime(7)*12*31*24+gettime(6)*31*24+gettime(5)*24+gettime(3) + 1); //you can get another quest after 1 hour [Lupus]
emotion 21;
if(@treasure_job==0) set @treasure_job,rand(1,10); //doesn't allow cheaters to pick any quest they want
if(@treasure_job==2) goto N_JobList2;
@@ -102,7 +100,7 @@ N_Signup:
L_NoQuestsForYet:
mes "[Guy]";
mes "I'm afraid there aren't any Quests for you yet.";
- mes "Call in "+ (#THQ_DELAY - (GetTime(7)*12*31*24+GetTime(6)*31*24+GetTime(5)*24+GetTime(3)) )+" hours later.";
+ mes "Call in "+ (#THQ_DELAY - (gettime(7)*12*31*24+gettime(6)*31*24+gettime(5)*24+gettime(3)) )+" hours later.";
emotion 17;
close;
diff --git a/npc/custom/quests/thq/THQS_Quests.txt b/npc/custom/quests/thq/THQS_Quests.txt
index 70494ab9b..40e89c18b 100644
--- a/npc/custom/quests/thq/THQS_Quests.txt
+++ b/npc/custom/quests/thq/THQS_Quests.txt
@@ -4,8 +4,6 @@
//= Fredzilla
//===== Current Version: =====================================
//= 1.6
-//===== Compatible With: =====================================
-//= Hercules
//===== Description: =========================================
//= Start for Treasure hunter quests
//===== Additional Comments: =================================
@@ -21,7 +19,7 @@
///////Job list 1///////
//1-1
-mjolnir_09,187,189,6 script Old Man 107,{
+mjolnir_09,187,189,6 script Old Man 1_M_PAY_ELDER,{
if (one_qset==1) goto N_QuestStart;
mes "[Old Man]";
mes "Eh! Can't and old man walk in peace anymore?!";
@@ -39,7 +37,7 @@ N_QuestStart:
close;
}
//1-2;
-pay_arche,86,129,6 script Archer 732,{
+pay_arche,86,129,6 script Archer 4_M_JOB_HUNTER,{
if (one_qset == 2) goto N_QuestStart;
mes "[Kieth]";
mes "Sorry can't talk, I'm a busy man, I'm waiting for my package.";
@@ -60,7 +58,7 @@ N_QuestStart:
close;
}
//1-3
-prt_fild06,37,192,6 script Farmer 125,{
+prt_fild06,37,192,6 script Farmer 4_M_TELEPORTER,{
if (one_qset == 3 && countitem(909) > 19 && countitem(955) > 19 && countitem(914) > 19 && countitem(705) > 19) goto N_QuestComp;
if (one_qset==3) goto N_QuestStart;
mes "[Billy-Bob]";
@@ -87,7 +85,7 @@ N_QuestStart:
close;
}
//1-4
-prontera,264,353,6 script Old Lady#thq 103,{
+prontera,264,353,6 script Old Lady#thq 8_F_GRANDMOTHER,{
if (one_qset == 4 && countitem(934) > 14) goto N_QuestComp;
if (one_qset == 4) goto N_QuestStart;
mes "[Old Lady]";
@@ -116,7 +114,7 @@ N_QuestStart:
}
///////Job list 2///////
//2-1;
-morocc,59,109,6 script Erika 700,{
+morocc,59,109,6 script Erika 8_F_GIRL,{
if (two_qset == 1 && countitem(1072) > 0) goto N_QuestComp;
if (two_qset == 1) goto N_QuestStart;
mes "[Erika]";
@@ -151,7 +149,7 @@ N_QuestStart:
close;
}
//2-2;
-in_moc_16,15,30,6 script Jeramiah 730,{
+in_moc_16,15,30,6 script Jeramiah 4_M_JOB_ASSASSIN,{
if (two_qset == 2 && countitem(1998) > 0) goto N_QuestComp;
if (two_qset == 2) goto N_QuestStart;
mes "[Jeramiah]";
@@ -174,7 +172,7 @@ N_QuestStart:
close;
}
//2-3;
-prt_fild07,316,263,6 script Marsh Man 84,{
+prt_fild07,316,263,6 script Marsh Man 4_M_02,{
if (two_qset == 3 && countitem(518) > 19) goto N_QuestComp;
if (two_qset == 3) goto N_QuestStart;
mes "[Lenith]";
@@ -199,7 +197,7 @@ N_QuestStart:
close;
}
//2-4;
-payon,161,72,6 script Molly 714,{
+payon,161,72,6 script Molly 4_F_06,{
if (two_qset == 4 && countitem(7005) > 0) goto N_QuestComp;
if (two_qset == 4) goto N_QuestStart;
mes "[Molly]";
@@ -229,7 +227,7 @@ N_QuestStart:
}
///////Job list 3///////
//3-1;
-moc_fild04,208,322,6 script Clark 65,{
+moc_fild04,208,322,6 script Clark 1_M_YOUNGKNIGHT,{
if (three_qset == 1 && countitem(1040) > 29) goto N_QuestComp;
if (three_qset == 1) goto N_QuestStart;
mes "[Clark]";
@@ -258,7 +256,7 @@ N_QuestStart:
close;
}
//3-2;
-yuno_fild01,186,162,6 script Flank 73,{
+yuno_fild01,186,162,6 script Flank 1_F_MERCHANT_01,{
if (three_qset == 2 && countitem(1082) > 0) goto N_QuestComp;
if (three_qset == 2) goto N_QuestStart;
mes "[Flank]";
@@ -283,7 +281,7 @@ N_QuestStart:
close;
}
//3-3 Goes to 7-3 using callfunc
-prt_sewb1,120,245,6 script Sewer Managment Knight 705,{
+prt_sewb1,120,245,6 script Sewer Managment Knight 4_M_GEF_SOLDIER,{
if (three_qset == 3 && countitem(955) > 149) goto N_QuestComp;
if (three_qset == 3) goto N_QuestStart;
if (seven_qset == 3) goto N_QuestStart2;
@@ -311,7 +309,7 @@ N_QuestStart2:
close;
}
//3-4
-mjolnir_02,87,357,6 script Man#01 51,{
+mjolnir_02,87,357,6 script Man#01 1_M_BARD,{
if (three_qset == 4 && countitem(1041) > 49) goto N_QuestComp;
if (three_qset == 4) goto N_QuestStart;
mes "[Rudolfo]";
@@ -339,7 +337,7 @@ N_QuestStart:
}
///////Job list 4///////
//4-1;
-pay_arche,45,138,6 script Flora 724,{
+pay_arche,45,138,6 script Flora 4_F_07,{
if (four_qset == 1 && countitem(957) > 49) goto N_QuestComp;
if (four_qset == 1) goto N_QuestStart;
mes "[Flora]";
@@ -373,7 +371,7 @@ OnMobDead:
end;
}
//4-2;
-yuno,45,138,6 script Zed 735,{
+yuno,45,138,6 script Zed 4_M_JOB_WIZARD,{
if (four_qset == 2 && countitem(1999) > 0) goto N_QuestComp;
if (four_qset == 2) goto N_QuestStart;
mes "[Zed]";
@@ -398,7 +396,7 @@ N_QuestStart:
close;
}
//4-3;
-prontera,176,204,6 script Dassy 95,{
+prontera,176,204,6 script Dassy 4_F_SISTER,{
if (four_qset == 3 && countitem(711) > 19) goto N_QuestComp;
if (four_qset == 3) goto N_QuestStart;
mes "[Dassy]";
@@ -424,7 +422,7 @@ N_QuestStart:
close;
}
//4-4;
-prt_gld,157,99,6 script Czhore 752,{
+prt_gld,157,99,6 script Czhore 4_M_CRU_OLD,{
if (four_qset == 4 && countitem(714) > 0) goto N_QuestComp;
if (four_qset == 4) goto N_QuestStart;
mes "[Czhore]";
@@ -457,7 +455,7 @@ N_QuestStart:
}
///////Job list 5///////
//5-1;
-prt_maze01,18,184,6 script Lithin#01 752,{
+prt_maze01,18,184,6 script Lithin#01 4_M_CRU_OLD,{
if (five_qset == 1 && countitem(1028) > 14) goto N_QuestComp;
if (five_qset == 1) goto N_QuestStart;
mes "[Lithin]";
@@ -484,7 +482,7 @@ N_QuestStart:
close;
}
//5-2 goes to 6-2 using callfunc;
-moc_ruins,75,167,6 script Lithin#02 87,{
+moc_ruins,75,167,6 script Lithin#02 4_M_BARBER,{
if (five_qset == 2 && countitem(932) > 29) goto N_QuestComp;
if (five_qset == 2) goto N_QuestStart;
if (six_qset == 2) goto N_QuestStart2;
@@ -512,7 +510,7 @@ N_QuestStart2:
callfunc "six_qset2";
}
//5-3;
-geffen,57,130,6 script Blonde Girl 724,{
+geffen,57,130,6 script Blonde Girl 4_F_07,{
if (five_qset == 3 && countitem(744) > 0) goto N_QuestComp;
if (five_qset == 3) goto N_QuestStart;
mes "[Blonde Girl]";
@@ -536,7 +534,7 @@ N_QuestStart:
close;
}
//5-4;
-gef_tower,49,27,6 script Wizard#01 735,{
+gef_tower,49,27,6 script Wizard#01 4_M_JOB_WIZARD,{
if (five_qset == 4 && countitem(1059) > 49) goto N_QuestComp;
if (five_qset == 4) goto N_QuestStart;
mes "[Wizard]";
@@ -564,7 +562,7 @@ N_QuestStart:
}
///////Job list 6///////
//6-1;
-moc_prydb1,47,132,6 script Thief 48,{
+moc_prydb1,47,132,6 script Thief 1_M_02,{
if (six_qset == 1 && countitem(1083) > 0) goto N_QuestComp;
if (six_qset == 1) goto N_QuestStart;
mes "[Thief]";
@@ -610,7 +608,7 @@ N_QuestComp2:
close;
}
//6-3;
-xmas,144,136,6 script Chirach 48,{
+xmas,144,136,6 script Chirach 1_M_02,{
if (six_qset == 3 && countitem(1083) > 0) goto N_QuestComp;
if (six_qset == 3) goto N_QuestStart;
mes "[Chirach]";
@@ -633,7 +631,7 @@ N_QuestStart:
close;
}
//6-4;
-gef_tower,52,87,6 script Wizard#02 735,{
+gef_tower,52,87,6 script Wizard#02 4_M_JOB_WIZARD,{
if (six_qset == 4 && countitem(944) > 19) goto N_QuestComp;
if (six_qset == 4) goto N_QuestStart;
mes "[Zuuzuu]";
@@ -665,7 +663,7 @@ N_QuestStart:
}
///////Job list 7///////
//7-1 goes to 8-1 using callfunc;
-prontera,123,208,6 script Little Girl#thq 717,{
+prontera,123,208,6 script Little Girl#thq 4_F_KID3,{
if (seven_qset == 1 && countitem(531) > 4) goto N_QuestComp;
if (seven_qset == 1) goto N_QuestStart;
if (eight_qset == 1) goto N_QuestStart2;
@@ -692,7 +690,7 @@ N_QuestStart2:
callfunc "eight_qset1";
}
//7-2;
-alberta,101,84,6 script Charles 48,{
+alberta,101,84,6 script Charles 1_M_02,{
if (seven_qset == 2 && countitem(1082) > 0) goto N_QuestComp;
if (seven_qset == 2) goto N_QuestStart;
mes "[Charles]";
@@ -735,7 +733,7 @@ N_QuestComp2:
close;
}
//7-4;
-alb2trea,94,102,6 script Scarlet 725,{
+alb2trea,94,102,6 script Scarlet 4_F_JOB_ASSASSIN,{
if (seven_qset == 4 && countitem(1127) > 0) goto N_QuestComp;
if (seven_qset == 4) goto N_QuestStart;
mes "[Scarlet]";
@@ -780,7 +778,7 @@ N_QuestComp2:
close;
}
//8-2;
-morocc,165,55,6 script Klye 48,{
+morocc,165,55,6 script Klye 1_M_02,{
if (eight_qset == 2 && countitem(1081) > 0) goto N_QuestComp;
if (eight_qset == 2) goto N_QuestStart;
mes "[Klye]";
@@ -804,7 +802,7 @@ N_QuestStart:
}
//8-3;
-prt_maze02,103,86,6 script Zack 751,{
+prt_maze02,103,86,6 script Zack 4_M_CRU,{
if (eight_qset == 3 && countitem(923) > 0) goto N_QuestComp;
if (eight_qset == 3) goto N_QuestStart;
mes "[Zack]";
@@ -830,7 +828,7 @@ N_QuestStart:
close;
}
//8-4;
-payon,136,129,6 script Flower 703,{
+payon,136,129,6 script Flower 4_F_KID2,{
if (eight_qset == 4 && countitem(746) > 9) goto N_QuestComp;
if (eight_qset == 4) goto N_QuestStart;
mes "[Flower]";
@@ -856,7 +854,7 @@ N_QuestStart:
}
///////Job list 9///////
//9-1;
-geffen_in,168,124,6 script Mage 48,{
+geffen_in,168,124,6 script Mage 1_M_02,{
if (nine_qset == 1 && countitem(1082) > 0) goto N_QuestComp;
if (nine_qset == 1) goto N_QuestStart;
mes "[Mage]";
@@ -879,7 +877,7 @@ N_QuestStart:
close;
}
//9-2;
-pay_arche,98,74,6 script School Girl 703,{
+pay_arche,98,74,6 script School Girl 4_F_KID2,{
if (nine_qset == 2 && countitem(1020) > 19) goto N_QuestComp;
if (nine_qset == 2) goto N_QuestStart;
mes "[School Girl]";
@@ -907,7 +905,7 @@ N_QuestStart:
close;
}
//9-3
-payon_in02,19,33,6 script Jack 740,{
+payon_in02,19,33,6 script Jack 2_M_ALCHE,{
if (nine_qset == 3 && countitem(1022) > 0) goto N_QuestComp;
if (nine_qset == 3) goto N_QuestStart;
if (nine_qset == 4) goto N_QuestStart2;
@@ -953,7 +951,7 @@ N_QuestComp2:
}
///////Job list 10///////
//10-1
-morocc,193,51,6 script Kreg 48,{
+morocc,193,51,6 script Kreg 1_M_02,{
if (ten_qset == 1 && countitem(1082) > 0) goto N_QuestComp;
if (ten_qset == 1) goto N_QuestStart;
mes "[Kreg]";
@@ -976,7 +974,7 @@ N_QuestStart:
close;
}
//10-2;
-pay_fild10,145,252,6 script Man#02 122,{
+pay_fild10,145,252,6 script Man#02 2_M_DYEINGER,{
if (ten_qset == 2 && countitem(1029) > 0) goto N_QuestComp;
if (ten_qset == 2) goto N_QuestStart;
mes "[Man]";
@@ -1001,7 +999,7 @@ N_QuestStart:
close;
}
//10-3;
-cmd_fild08,328,349,4 script Caral 119,{
+cmd_fild08,328,349,4 script Caral 2_M_SWORDMASTER,{
if (ten_qset == 3 && countitem(1015) > 0) goto N_QuestComp;
if (ten_qset == 3) goto N_QuestStart;
mes "[Caral]";
@@ -1026,7 +1024,7 @@ N_QuestStart:
close;
}
//10-4
-moc_fild15,250,251,6 script Jeni 727,{
+moc_fild15,250,251,6 script Jeni 4_F_JOB_HUNTER,{
if (ten_qset == 4 && countitem(1096) > 0) goto N_QuestComp;
if (ten_qset == 4) goto N_QuestStart;
mes "[Jeni]";
diff --git a/npc/custom/quests/thq/THQS_TTShop.txt b/npc/custom/quests/thq/THQS_TTShop.txt
index 0a706869b..c92c375ec 100644
--- a/npc/custom/quests/thq/THQS_TTShop.txt
+++ b/npc/custom/quests/thq/THQS_TTShop.txt
@@ -3,9 +3,7 @@
//===== By: ==================================================
//= Fredzilla
//===== Current Version: =====================================
-//= 1.1
-//===== Compatible With: =====================================
-//= Hercules
+//= 1.2a
//===== Description: =========================================
//= Start for Treasure hunter quests
//===== Additional Comments: =================================
@@ -14,503 +12,193 @@
//= 1.0 - Straight conversion of Aegis NPC file
//= 1.1 - balanced some prices, fixed 1 missing label
//= removed Executioner&Mysteltain swords [Lupus]
+//= 1.2 - Optmized and fixed small error [Panikon]
+//= 1.2a - Fixed zeny formula [Panikon]
//============================================================
prt_in,159,172,0 warp thqwrp 3,3,yuno_in01,123,155
-prt_in,164,174,1 script Treasure Hunter's Shop 65,{
- mes "[Ash]";
- mes "Ahh, "+strcharinfo(0)+"! Welcome to the Offical Treasure Hunter's Guild Shop.";
- mes "You currently have ^FF0000"+#Treasure_Token+"^000000 treasure tokens!!!";
- next;
- menu "How does this place work?",-,"What do you have in stock?",N_Shop,"Nevermind",N_NVM;
- mes "[Ash]";
- mes "Well you see here you can exchange your treasure hunter tokens for zeny or rare weapons forged by our blacksmiths.";
- mes " ";
- mes "Everything has its own price value and the only way you can get the tokens is by completing quests assigned to you,the system normally works like this.";
- mes " ";
- mes "The harder the mission the more Tokens you will earn. All red quests are worth 4-8 Tokens, and the rest are worth 1-5.";
- mes " ";
- mes "Hope that solves your problem and questions.";
- close;
-N_NVM:
- close;
+// Main configuration object
+- script THQS#Configuration -1,{
+OnInit:
+ // Axes
+ setarray $THQS_menu_weapons_1[0], Sabbath, Slaughter, Tomahawk, Great_Axe, Guillotine;
+ setarray $THQS_menu_price_1[0], 160, 160, 180, 200, 200;
+ // One Handed Swords
+ setarray $THQS_menu_weapons_2[0], Edge, Solar_Sword, Scissores_Sword, Nagan, Immaterial_Sword, Excalibur, Byeorrun_Gum, Tale_Fing_;
+ setarray $THQS_menu_price_2[0], 130, 150, 170, 180, 200, 200, 240, 320;
+ // Two Handed Swords
+ setarray $THQS_menu_weapons_3[0],Dragon_Slayer, Schweizersabel, Katzbalger, Muramasa, Masamune, Balmung;
+ setarray $THQS_menu_price_3[0], 140,200,300,300,400,2000;
+ // Books
+ setarray $THQS_menu_weapons_4[0],Book_Of_Blazing_Sun, Book_Of_Billows, Book_Of_Gust_Of_Wind, Book_Of_Mother_Earth, Book_Of_The_Apocalypse, Bible, Tablet;
+ setarray $THQS_menu_price_4[0], 80, 80, 80, 80, 80, 90, 120;
+ // Bows
+ setarray $THQS_menu_weapons_5[0], Bow_Of_Rudra, Bow_Of_Roguemaster;
+ setarray $THQS_menu_price_5[0], 150, 150;
+ // Katars
+ setarray $THQS_menu_weapons_6[0], Katar_Of_Cold_Icicle,Katar_Of_Thornbush,Katar_Of_Raging_Blaze,Katar_Of_Piercing_Wind,Ghoul_Leg,Infiltrator;
+ setarray $THQS_menu_price_6[0],70,70,70,70,125,150;
+ // Knuckles
+ setarray $THQS_menu_weapons_7[0],Kaiser_Knuckle,Berserk;
+ setarray $THQS_menu_price_7[0],75,75;
+ // Maces
+ setarray $THQS_menu_weapons_8[0],Spike,Slash,Grand_Cross,Quadrille,Mjolnir;
+ setarray $THQS_menu_price_8[0],65,90,100,110,1000;
+ // Whips
+ setarray $THQS_menu_weapons_9[0],Rapture_Rose,Chemeti;
+ setarray $THQS_menu_price_9[0],50,65;
+ // Wands
+ setarray $THQS_menu_weapons_10[0],Mighty_Staff,Wizardy_Staff,Bone_Wand,Staff_Of_Soul;
+ setarray $THQS_menu_price_10[0],90,150,110,120;
+ // Cards
+ setarray $THQS_menu_cards[0],Poring_Card, Pasana_Card, Dokebi_Card, Sword_Fish_Card, Sand_Man_Card, Drainliar_Card,
+ Kaho_Card,Mandragora_Card,Vadon_Card,Mummy_Card,Zenorc_Card,Condor_Card, Zombie_Card;
+ setarray $THQS_menu_price[0],2,420,420,420,420,360,360,360,360,540,240,240,210;
end;
-N_Shop:
-//This is when it gets hard :)
- mes "[Ash]";
- mes "Ok here is our Big list of goods.";
- mes " ";
- mes "(Note T stands for a Treasure Token.)";
- next;
- menu "Trade for Zeny",-,"Trade for Weapons",N_BuyWeps,"Trade for Cards",N_BuyCards,"Nevermind",N_NVM;
- mes "[Ash]";
- mes "This is what we have to offer.";
- next;
- menu "1000z - 1T",-,"10000z - 10T",N_10T,"100000z - 100T",N_100T,"Nevermind",N_NVM;
- if (#Treasure_Token > 0) goto N_GetZeny1k;
- mes "You don't have enough tokens!";
- close;
-N_GetZeny1k:
- set #Treasure_Token,#Treasure_Token-1;
- set zeny,zeny+1000;
- close;
-N_10T:
- if (#Treasure_Token > 9) goto N_GetZeny10k;
- mes "You don't have enough tokens!";
- close;
-N_GetZeny10k:
- set #Treasure_Token,#Treasure_Token-10;
- set zeny,zeny+10000;
- close;
-N_100T:
- if (#Treasure_Token > 99) goto N_GetZeny100k;
- mes "You don't have enough tokens!";
- close;
-N_GetZeny100k:
- set #Treasure_Token,#Treasure_Token-100;
- set zeny,zeny+100000;
- close;
-
-N_BuyWeps:
- mes "[Ash]";
- mes "This is what we have to offer.";
- next;
- menu "Axe's",-,"1 Handed Swords",N_1HandSword,"2 Handed Swords",N_2HandSword,"Book's",N_Book,"Bow's",N_Bow,"Katar's",N_Katar,"Knuckle's",N_Knuckle,"Mace's",N_Mace,"Whips",N_Whip,"Wands",N_Wand,"Nevermind",N_NVM;
-
- mes "[Ash]";
- mes "This is what we have to offer.";
- next;
- menu "Sabbath - 160T",-,"Slaughter - 160T",N_Slau,"Tomahawk - 180T",N_Toma,"Great Axe - 200T",N_GreatA,"Guillotine - 200T",N_Guill,"Nevermind",N_NVM;
-
- if (#Treasure_Token < 160) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-160;
- getitem 1365,1;
- logmes "Treasure Token: Bought a Sabbath";
- close;
-N_Slau:
- if (#Treasure_Token < 160) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-160;
- getitem 1367,1;
- logmes "Treasure Token: Bought a Slaughter";
- close;
-N_Toma:
- if (#Treasure_Token < 180) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-180;
- getitem 1368,1;
- logmes "Treasure Token: Bought a Tomahawk";
- close;
-N_GreatA:
- if (#Treasure_Token < 200) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-200;
- getitem 1364,1;
- logmes "Treasure Token: Bought a Great Axe";
- close;
-N_Guill:
- if (#Treasure_Token < 200) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-200;
- getitem 1369,1;
- logmes "Treasure Token: Bought a Guillotine";
- close;
-N_NeedToken:
- mes "[Ash]";
- mes "You don't have enough tokens!";
- close;
-
-
-N_1HandSword:
- mes "[Ash]";
- mes "This is what we have to offer.";
- next;
- menu "Edge - 130T",-,"Solar Sword - 150T",N_SolarS,"Caesar's Sword - 170T",N_CaesarS,"Nagan - 180T",N_Nagan,"Immaterial Sword - 200T",N_ImmatS,"Excalibur - 200T",N_Excal,"Byeollungum - 240T",N_Byeoll,"Talefing - 320T",N_Talef,"Nevermind",N_NVM;
-
- if (#Treasure_Token < 130) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-130;
- getitem 1132,1;
- logmes "Treasure Token: Bought a Edge";
- close;
-N_SolarS:
- if (#Treasure_Token < 150) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-150;
- logmes "Treasure Token: Bought a Solar Sword";
- getitem 1136,1;
- close;
-N_CaesarS:
- if (#Treasure_Token < 170) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-170;
- logmes "Treasure Token: Bought a Caesars Sword";
- getitem 1134,1;
- close;
-N_Nagan:
- if (#Treasure_Token < 180) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-180;
- logmes "Treasure Token: Bought a Nagan";
- getitem 1130,1;
- close;
-N_ImmatS:
- if (#Treasure_Token < 200) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-200;
- logmes "Treasure Token: Bought a Immaterial Sword";
- getitem 1141,1;
- close;
-N_Excal:
- if (#Treasure_Token < 200) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-200;
- logmes "Treasure Token: Bought a Excalibur";
- getitem 1137,1;
- close;
-N_Byeoll:
- if (#Treasure_Token < 240) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-240;
- logmes "Treasure Token: Bought a Byeollungum";
- getitem 1140,1;
- close;
-N_Talef:
- if (#Treasure_Token < 320) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-320;
- logmes "Treasure Token: Bought a Talefing";
- getitem 1139,1;
- close;
+}
+// Trades tokens
+// getarg(0) - number of tokens to be traded
+function script thqs_trade_token {
+ @type = getarg(0);
+ if( @type == 4 )
+ close;
-N_2HandSword:
- mes "[Ash]";
- mes "This is what we have to offer.";
- next;
- menu "Dragon Slayer - 140T",-,"Schweizersabel - 200T",N_Schwe,"Katzbalger - 300T",N_Katzb,"Muramasa - 300T",N_Murama,"Masamune - 400T",N_Masamu,"Balmung - 2000T",N_Balmu,"Nevermind",N_NVM;
+ // 10^0, 10^1, 10^2
+ @type -= 1;
+ @price = pow(10, @type);
- if (#Treasure_Token < 140) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-140;
- logmes "Treasure Token: Bought a Dragon Slayer";
- getitem 1166,1;
- close;
-N_Schwe:
- if (#Treasure_Token < 200) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-200;
- logmes "Treasure Token: Bought a Schweizersabel";
- getitem 1167,1;
- close;
-N_Katzb:
- if (#Treasure_Token < 300) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-300;
- logmes "Treasure Token: Bought a Katzbalger";
- getitem 1170,1;
- close;
-N_Murama:
- if (#Treasure_Token < 300) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-300;
- logmes "Treasure Token: Bought a Muramasa";
- getitem 1164,1;
- close;
-N_Masamu:
- if (#Treasure_Token < 400) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-400;
- logmes "Treasure Token: Bought a Masamune";
- getitem 1165,1;
- close;
-N_Balmu:
- if (#Treasure_Token < 2000) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-2000;
- logmes "Treasure Token: Bought a Balmung";
- getitem 1161,1;
- close;
-
-
-N_Book:
- mes "[Ash]";
- mes "This is what we have to offer.";
- next;
- menu "Book of the Burning Sun - 80T",-,"Book of the Rough Seas - 80T",N_RoughSea,"Book of the Dry Winds - 80T",N_DryWinds,"Book of the Ripe Earth - 80T",N_RipeEarth,"Book of the Revelations - 80T",N_Revela,"Bible - 90T",N_Bible,"Tablet - 120T",N_Tablet,"Nevermind",N_NVM;
+ // 10^3, 10^4, 10^5
+ @type += 3; // So we can use pow later to determine the qt of Zeny
+ @prize = pow(10, @type);
- if (#Treasure_Token < 80) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-80;
- logmes "Treasure Token: Bought a Book of the Burning Sun";
- getitem 1555,1;
- close;
-N_RoughSea:
- if (#Treasure_Token < 80) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-80;
- logmes "Treasure Token: Bought a Book of the Rough Seas";
- getitem 1553,1;
- close;
-N_DryWinds:
- if (#Treasure_Token < 80) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-80;
- logmes "Treasure Token: Bought a Book of the Dry Winds";
- getitem 1556,1;
- close;
-N_RipeEarth:
- if (#Treasure_Token < 80) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-80;
- logmes "Treasure Token: Bought a Book of the Ripe Earth";
- getitem 1554,1;
- close;
-N_Revela:
- if (#Treasure_Token < 80) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-80;
- logmes "Treasure Token: Bought a Book of the Revelations";
- getitem 1557,1;
- close;
-N_Bible:
- if (#Treasure_Token < 90) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-90;
- logmes "Treasure Token: Bought a Bible";
- getitem 1551,1;
- close;
-N_Tablet:
- if (#Treasure_Token < 120) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-120;
- logmes "Treasure Token: Bought a Tablet";
- getitem 1552,1;
- close;
+ if( #Treasure_Token < @price ) {
+ mes "You don't have enough tokens!";
+ close;
+ }
-N_Bow:
- mes "[Ash]";
- mes "This is what we have to offer.";
- next;
- menu "Rudra's Bow - 150T",-,"Roguemaster's Bow - 150T",N_Rogue,"Nevermind",N_NVM;
+ if( Zeny == MAX_ZENY ) {
+ mes "You can't add more zeny to your character";
+ close;
+ }
- if (#Treasure_Token < 150) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-150;
- logmes "Treasure Token: Bought a Rudra Bow";
- getitem 1720,1;
+ Zeny += @prize;
+ #Treasure_Token -= @price;
close;
-N_Rogue:
- if (#Treasure_Token < 150) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-150;
- logmes "Treasure Token: Bought a Roguemaster Bow";
- getitem 1719,1;
- close;
-
-N_Katar:
- mes "[Ash]";
- mes "This is what we have to offer.";
- next;
- menu "Katar of the Blazing Rage - 70T",-,"Katar of the Cold Icicle - 70T",N_ColdIce,"Katar of the Piercing Wind - 70T",N_PiercWind,"Katar of the Dusty Thornbush - 70T",N_DustyT,"Sharpened Legbone of Ghoul - 125T",N_Legbone,"Infiltrator - 150T",N_Infiltra,"Nevermind",N_NVM;
+}
- if (#Treasure_Token < 70) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-70;
- logmes "Treasure Token: Bought a Katar of the Blazing Rage";
- getitem 1258,1;
- close;
-N_ColdIce:
- if (#Treasure_Token < 70) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-70;
- logmes "Treasure Token: Bought a Katar of the Cold Icicle";
- getitem 1256,1;
- close;
-N_PiercWind:
- if (#Treasure_Token < 70) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-70;
- logmes "Treasure Token: Bought a Katar of the Piercing Wind";
- getitem 1259,1;
- close;
-N_DustyT:
- if (#Treasure_Token < 70) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-70;
- logmes "Treasure Token: Bought a Katar of the Dusty Thornbush";
- getitem 1257,1;
- close;
-N_Legbone:
- if (#Treasure_Token < 125) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-125;
- logmes "Treasure Token: Bought a Sharpened Legbone of Ghoul";
- getitem 1260,1;
- close;
-N_Infiltra:
- if (#Treasure_Token < 150) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-150;
- logmes "Treasure Token: Bought a Infiltrator";
- getitem 1261,1;
+// Creates a buying menu
+// getarg(0) - .@mw$ -> ID
+// getarg(1) - .@mp$ -> PRICE
+function script thqs_menu_buy {
+ if( getargcount() != 2 ) {
+ debugmes "thqs_menu_buy: Wrong number of arguments!!";
+ close;
+ }
+
+ .@mw$ = getarg(0);
+ .@mp$ = getarg(1);
+
+ if( getarraysize( getd(.@mw$) ) != getarraysize( getd(.@mp$) ) ) {
+ debugmes "thqs_menu_buy: Missing entries in data!";
+ close;
+ }
+
+ // Dynamic menu
+ // Uses a dynamic string and then applies it to a *select
+ .@select_menu$ = "";
+ for( .@i = 0; .@i < getarraysize( getd(.@mw$) ); .@i++ ) {
+ .@price = getd(.@mp$+"["+.@i+"]");
+
+ if( .@select_menu$ != "")
+ .@select_menu$ = .@select_menu$+":"+getitemname( getd(.@mw$+"["+.@i+"]") )+" - "+.@price+"T";
+ else
+ .@select_menu$ = getitemname( getd(.@mw$+"["+.@i+"]") )+" - "+.@price+"T";
+ }
+ .@select_menu$ = .@select_menu$ + ":Nevermind";
+ select(.@select_menu$);
+
+ if( @menu == (.@i+1) )
+ close;
+
+ @index = @menu - 1; // Arrays are 0 indexed while our menu is not
+ @item_id = getd(.@mw$+"["+@index+"]");
+ @price = getd(.@mp$+"["+@index+"]");
+ if( #Treasure_Token < @price ) {
+ mes "You don't have enough tokens!";
+ close;
+ }
+ #Treasure_Token -= @price;
+ logmes "Treasure Token: Bought a "+getitemname(@item_id);
+ getitem @item_id,1;
close;
+}
-N_Knuckle:
+// Creates the first weapon menu
+// getarg(0) - @menu
+function script ths_menu_weapons {
+ @first_option = getarg(0);
+ if( @first_option == 11 )
+ close;
mes "[Ash]";
- mes "This is what we have to offer.";
+ mes "This is what we have to offer."+@first_option;
next;
- menu "Kaiser Knuckle - 75T",-,"Berserk - 75T",N_Berserk,"Nevermind",N_NVM;
+ // Array names so they can be used by thqs_menu_buy
+ .@mw$ = "$THQS_menu_weapons_"+@first_option;
+ .@mp$ = "$THQS_menu_price_"+@first_option;
- if (#Treasure_Token < 75) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-75;
- logmes "Treasure Token: Bought a Kaiser Knuckle";
- getitem 1813,1;
- close;
-N_Berserk:
- if (#Treasure_Token < 75) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-75;
- logmes "Treasure Token: Bought a Berserk";
- getitem 1814,1;
- close;
+ thqs_menu_buy(.@mw$,.@mp$);
+}
-N_Mace:
+// Main script
+prt_in,164,174,1 script Treasure Hunter's Shop 1_M_YOUNGKNIGHT,{
mes "[Ash]";
- mes "This is what we have to offer.";
+ mes "Ahh, "+strcharinfo(0)+"! Welcome to the Offical Treasure Hunter's Guild Shop.";
+ mes "You currently have ^FF0000"+#Treasure_Token+"^000000 treasure tokens!!!";
next;
- menu "Spike - 65T",-,"Slash - 90T",N_Slash,"Grand Cross - 100T",N_GrandC,"Quadrille - 110T",N_Quadr,"Mjolnir - 1000T",N_MJ,"Nevermind",N_NVM;
-
- if (#Treasure_Token < 65) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-65;
- logmes "Treasure Token: Bought a Spike";
- getitem 1523,1;
- close;
-N_Slash:
- if (#Treasure_Token < 90) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-90;
- logmes "Treasure Token: Bought a Slash";
- getitem 1526,1;
- close;
-N_GrandC:
- if (#Treasure_Token < 100) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-100;
- logmes "Treasure Token: Bought a Grand Cross";
- getitem 1528,1;
- close;
-N_Quadr:
- if (#Treasure_Token < 110) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-110;
- logmes "Treasure Token: Bought a Quadrille";
- getitem 1527,1;
- close;
-N_MJ:
- if (#Treasure_Token < 1000) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-1000;
- logmes "Treasure Token: Bought a Mjolnir";
- getitem 1530,1;
- close;
+ switch( select("How does this place work?","What do you have in stock?","Nevermind") ) {
+ case 1:
+ mes "[Ash]";
+ mes "Well you see here you can exchange your treasure hunter tokens for zeny or rare weapons forged by our blacksmiths.";
+ mes " ";
+ mes "Everything has its own price value and the only way you can get the tokens is by completing quests assigned to you,the system normally works like this.";
+ mes " ";
+ mes "The harder the mission the more Tokens you will earn. All red quests are worth 4-8 Tokens, and the rest are worth 1-5.";
+ mes " ";
+ mes "Hope that solves your problem and questions.";
+ close;
+ case 2:
+ break;
+ case 3:
+ close;
+ }
-N_Whip:
mes "[Ash]";
- mes "This is what we have to offer.";
+ mes "Ok here is our Big list of goods.";
+ mes " ";
+ mes "(Note T stands for a Treasure Token.)";
next;
- menu "Rapture Rose - 50T",-,"Chemeti - 65T",N_Chemeti,"Nevermind",N_NVM;
-
- if (#Treasure_Token < 50) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-50;
- logmes "Treasure Token: Bought a Rapture Rose";
- getitem 1963,1;
- close;
-N_Chemeti:
- if (#Treasure_Token < 65) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-65;
- logmes "Treasure Token: Bought a Chemeti";
- getitem 1964,1;
- close;
-
-N_Wand:
mes "[Ash]";
mes "This is what we have to offer.";
next;
- menu "Mighty Staff - 90T",-,"Wizardry Staff - 150T",N_Wizardry,"Bone Wand - 110T",N_BoneW,"Staff of Soul - 120T",N_SOSoul,"Nevermind",N_NVM;
-
- if (#Treasure_Token < 90) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-90;
- logmes "Treasure Token: Bought a Mighty Staff";
- getitem 1613,1;//Items: Mighty_Staff,
- close;
-N_Wizardry:
- if (#Treasure_Token < 150) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-150;
- logmes "Treasure Token: Bought a Wizardry Staff";
- getitem 1473,1;//Items: Wizardy_Staff,
- close;
-N_BoneW:
- if (#Treasure_Token < 110) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-110;
- logmes "Treasure Token: Bought a Bone Wand";
- getitem 1615,1;//Items: Bone_Wand,
- close;
-N_SOSoul:
- if (#Treasure_Token < 120) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-120;
- logmes "Treasure Token: Bought a Staff of Soul";
- getitem 1472,1;//Items: Staff_of_Soul,
- close;
-
-N_BuyCards:
- mes "[Ash]";
- mes "This is what we have to offer. All Cards are 300T";
- next;
- menu "Poring Card - 2T",-,"Pasana Card - 420T",N_CPasana,"Dokebi Card - 420T",N_CDok,"Swordfish Card - 420T",N_CSFish,
- "Sandman Card - 420T",N_CSMan,"Drainliar Card - 360T",N_CDrain,"Kaho Card - 360T",N_CKaho,"Mandragora Card - 360T",N_CMand,
- "Vadon Card - 360T",N_CVadon,"Mummy Card - 540T",N_CMummy,"Zenorc Card - 240T",N_CZeno,"Condor Card - 240T",N_CCond,
- "Zombie Card - 210T",N_CZomb,"Nevermind",N_NVM;
-
- if (#Treasure_Token < 2) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-2;
- logmes "Treasure Token: Bought a Poring Card";
- getitem 4001,1;//Items: Poring_Card,
- close;
-
-N_CPasana:
- if (#Treasure_Token < 420) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-420;
- logmes "Treasure Token: Bought a Pasana Card";
- getitem 4099,1;//Items: Pasana_Card,
- close;
-N_CDok:
- if (#Treasure_Token < 420) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-420;
- logmes "Treasure Token: Bought a Dokebi Card";
- getitem 4098,1;//Items: Dokebi_Card,
- close;
-N_CSFish:
- if (#Treasure_Token < 420) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-420;
- logmes "Treasure Token: Bought a Swordfish Card";
- getitem 4089,1;//Items: Sword_Fish_Card,
- close;
-N_CSMan:
- if (#Treasure_Token < 420) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-420;
- logmes "Treasure Token: Bought a Sandman Card";
- getitem 4101,1;//Items: Sand_Man_Card,
- close;
-N_CDrain:
- if (#Treasure_Token < 360) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-360;
- logmes "Treasure Token: Bought a Drainliar Card";
- getitem 4069,1;//Items: Drainliar_Card,
- close;
-N_CKaho:
- if (#Treasure_Token < 360) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-360;
- logmes "Treasure Token: Bought a Kaho Card";
- getitem 4065,1;//Items: Kaho_Card,
- close;
-N_CMand:
- if (#Treasure_Token < 360) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-360;
- logmes "Treasure Token: Bought a Mandragora Card";
- getitem 4030,1;//Items: Mandragora_Card,
- close;
-N_CVadon:
- if (#Treasure_Token < 360) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-360;
- logmes "Treasure Token: Bought a Vadon Card";
- getitem 4049,1;//Items: Vadon_Card,
- close;
-N_CMummy:
- if (#Treasure_Token < 540) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-540;
- logmes "Treasure Token: Bought a Mummy Card";
- getitem 4106,1;//Items: Mummy_Card,
- close;
-N_CZeno:
- if (#Treasure_Token < 240) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-240;
- logmes "Treasure Token: Bought a Zenorc Card";
- getitem 4096,1;//Items: Zenorc_Card,
- close;
-N_CCond:
- if (#Treasure_Token < 240) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-240;
- logmes "Treasure Token: Bought a Condor Card";
- getitem 4015,1;//Items: Condor_Card,
- close;
-N_CZomb:
- if (#Treasure_Token < 210) goto N_NeedToken;
- set #Treasure_Token,#Treasure_Token-210;
- logmes "Treasure Token: Bought a Zombie Card";
- getitem 4038,1;//Items: Zombie_Card,
- close;
+ switch( select("Trade for zeny", "Trade for Weapons", "Trade for Cards", "Nevermind") ) {
+ case 1:
+ select("1000z - 1T","10000z - 10T","100000z - 100T","Nevermind");
+ thqs_trade_token(@menu);
+ case 2:
+ mes "[Ash]";
+ mes "This is what we have to offer.";
+ next;
+ select("Axe's","1 Handed Swords","2 Handed Swords","Book's","Bow's","Katar's","Knuckle's","Mace's","Whips","Wands","Nevermind");
+ ths_menu_weapons(@menu);
+ case 3:
+ mes "[Ash]";
+ mes "This is what we have to offer.";
+ next;
+ thqs_menu_buy("$THQS_menu_cards","$THQS_menu_price");
+ case 4:
+ close;
+ }
+ end;
}
generated by cgit v1.2.3-60-g2f50 (git 2.42.0) at 2024-07-04 17:56:42 +0000