thqs_quests.txt

RO游戏服务器最新代码,直接运行即可.数据库采用mysql

	mes "Thank you for this delivery.";
	next;
	mes "[Charles]";
	mes "Here take this Treasure Token as a reward.";
	set seven_qset,0;
	delitem 1082,1;
	set On_Quest,0;
	set #Treasure_Token,#Treasure_Token+1;
	close;
N_QuestStart:
	mes "[Charles]";
	mes "So where is my package?";
	close;
}
//7-3
function	script	seven_qset-3	{
	if (seven_qset == 3 && countitem(969) > 0) goto N_QuestComp2;
	mes "[Sewer Managment]";
	mes "Well there have been reports of a Golden Thief Bug running around the bottem on the Culvert";
	mes " ";
	mes "Bring me 1 Gold Bar from him.";
	close;
N_QuestComp2:
	mes "[Sewer Managment]";
	mes "Thank you for helping me.";
	next;
	mes "[Sewer Managment]";
	mes "Here take these 4 Treasure Tokens.";
	set seven_qset,0;
	set On_Quest,0;
	delitem 969,1;
	set #Treasure_Token,#Treasure_Token+4;
	close;
}
//7-4;
alb2trea,94,102,6	script	Scarlet	725,{
	if (seven_qset == 4 && countitem(1127) > 0) goto N_QuestComp;
	if (seven_qset == 4) goto N_QuestStart;
	mes "[Scarlet]";
	mes "Sorry, busy.";
	close;
N_QuestComp:
	mes "[Scarlet]";
	mes "Thank you for helping me, I presume the worse.";
	next;
	mes "[Scarlet]";
	mes "Here take these 4 Treasure Tokens.";
	set seven_qset,0;
	set On_Quest,0;
	delitem 1127,1;
	set #Treasure_Token,#Treasure_Token+4;
	close;
N_QuestStart:
	mes "[Scarlet]";
	mes "Good your here. Ok there are reports of an old captain named Drake abored this ship. Kill Him!";
	mes " ";
	mes "Bring me his Saber as proof!";
	close;
}
///////Job list 8///////
//8-1
function	script	eight_qset1	{
	if (eight_qset == 1 && countitem(532) > 4) goto N_QuestComp2;
	mes "[Girl]";
	mes "Hi mister person. Can you get me some Banana juice?";
	mes "I want 5 of them.";
	close;
N_QuestComp2:
	mes "[Girl]";
	mes "Thank you so much!";
	next;
	mes "[Girl]";
	mes "Have these 1 Treasure Tokens.";
	set eight_qset,0;
	set On_Quest,0;
	delitem 532,5;
	set #Treasure_Token,#Treasure_Token+1;
	close;
}
//8-2;
morocc,165,55,6	script	Klye	48,{
	if (eight_qset == 2 && countitem(1081) > 0) goto N_QuestComp;
	if (eight_qset == 2) goto N_QuestStart;
	mes "[Klye]";
	mes "Hello "+strcharinfo(0)+".";
	close;
N_QuestComp:
	mes "[Klye]";
	mes "Thank you for this delivery.";
	next;
	mes "[Klye]";
	mes "Here take this Treasure Token as a reward.";
	set eight_qset,0;
	delitem 1081,1;
	set On_Quest,0;
	set #Treasure_Token,#Treasure_Token+1;
	close;
N_QuestStart:
	mes "[Kyle]";
	mes "So where's my Delivery";
	close;

}
//8-3;
prt_maze02,103,86,6	script	Zack	751,{
	if (eight_qset == 3 && countitem(923) > 0) goto N_QuestComp;
	if (eight_qset == 3) goto N_QuestStart;
	mes "[Zack]";
	mes "Hello, have you seen my Whisper friend?";
	close;
N_QuestComp:
	mes "[Zack]";
	mes "Thank you for helping me, I presume the worse.";
	next;
	mes "[Zack]";
	mes "Here take these 5 Treasure Tokens.";
	set eight_qset,0;
	set On_Quest,0;
	delitem 923,1;
	set #Treasure_Token,#Treasure_Token+5;
	close;
N_QuestStart:
	mes "[Zack]";
	mes "Hello,the reason why I brought you here was because of a very strange monster known as Baphomet.";
	mes "People say that Baphomet guilds the gate to the under-world but I don't belive them, Kill Baphomet!";
	mes " ";
	mes "Bring me his Evil Horn!";
	close;
}
//8-4;
payon,136,129,6	script	Flower	703,{
	if (eight_qset == 4 && countitem(746) > 9) goto N_QuestComp;
	if (eight_qset == 4) goto N_QuestStart;
	mes "[Flower]";
	mes "Sorry I'm waiting for someone. You will have to come back later.";
	close;
N_QuestComp:
	mes "[Flower]";
	mes "Thank you for helping me, I presume the worse.";
	next;
	mes "[Flower]";
	mes "Here take these 2 Treasure Tokens.";
	set eight_qset,0;
	set On_Quest,0;
	delitem 746,10;
	set #Treasure_Token,#Treasure_Token+2;
	close;
N_QuestStart:
	mes "[Flower]";
	mes "Help, help I have lost my Beads!! My brother Bush is going to kill me please help";
	mes " ";
	mes "Bring me 10 Glass Beads!";
	close;
}
///////Job list 9///////
//9-1;
geffen_in,168,124,6	script	Mage	48,{
	if (nine_qset == 1 && countitem(1082) > 0) goto N_QuestComp;
	if (nine_qset == 1) goto N_QuestStart;
	mes "[Mage]";
	mes "Hello "+strcharinfo(0)+" welcome to the Mage Guild.";
	close;
N_QuestComp:
	mes "[Mage]";
	mes "Thank you for this delivery. Sorry about the smell, Its a box of Toad Tounges";
	next;
	mes "[Mage]";
	mes "Here take this Treasure Token as a reward.";
	set nine_qset,0;
	delitem 1082,1;
	set On_Quest,0;
	set #Treasure_Token,#Treasure_Token+1;
	close;
N_QuestStart:
	mes "[Mage]";
	mes "Hello "+strcharinfo(0)+", Where is my box of Toad Tounges?.";
	close;
}
//9-2;
pay_arche,98,74,6	script	School Girl	703,{
	if (nine_qset == 2 && countitem(1020) > 19) goto N_QuestComp;
	if (nine_qset == 2) goto N_QuestStart;
	mes "[School Girl]";
	mes "Sorry I'm waiting for someone, you will have to come back later";
	close;
N_QuestComp:
	mes "[School Girl]";
	mes "Thank you for helping me.";
	next;
	mes "[School Girl]";
	mes "Here take these 4 Treasure Tokens.";
	set nine_qset,0;
	set On_Quest,0;
	delitem 1020,20;
	set #Treasure_Token,#Treasure_Token+4;
	close;
N_QuestStart:
	mes "[School Girl]";
	mes "Help, Well what we know about Payon is that a while ago there was a freak fire that burnt down the old school.";
	next;
	mes "[School Girl]";
	mes "The strange thing about what happened was that the children inside did not seem to die from the flames. They have taken over the entire 3rd floor of Payon Cave.";
	mes " ";
	mes "Bring me 20 Black Hair!";
	close;
}
//9-3
payon_in02,19,33,6	script	Jack	740,{
	if (nine_qset == 3 && countitem(1022) > 0) goto N_QuestComp;
	if (nine_qset == 3) goto N_QuestStart;
	if (nine_qset == 4) goto N_QuestStart2;
	mes "[Jack]";
	mes "Sorry I'm waiting for someone, you will have to come back later";
	close;
N_QuestComp:
	mes "[Jack]";
	mes "Thank you for helping me.";
	next;
	mes "[Jack]";
	mes "Here take these 4 Treasure Tokens.";
	set nine_qset,0;
	set On_Quest,0;
	delitem 1022,1;
	set #Treasure_Token,#Treasure_Token+4;
	close;
N_QuestStart:
	mes "[Jack]";
	mes "Well I don't know much about this, it has to do with the deepest reagions of Payon Cave. We don't know much because no one ever seems to make it back alive. We suspect a monster we call the Moonlight Flower";
	mes " ";
	mes "Bring me back 1 Nine Tales!";
	close;
N_QuestStart2:
//9-4
	if (nine_qset == 4 && countitem(901) > 39) goto N_QuestComp2;
	mes "[Jack]";
	mes "Hello, we need you to investigate some crap in the 3rd level of payon.";
	mes " ";
	mes "Bring me back 40 Daenggie's.";
	close;
N_QuestComp2:
	mes "[Jack]";
	mes "Thank you for helping me.";
	next;
	mes "[Jack]";
	mes "Here take these 3 Treasure Tokens.";
	set nine_qset,0;
	set On_Quest,0;
	delitem 901,40;
	set #Treasure_Token,#Treasure_Token+3;
	close;
}
///////Job list 10///////
//10-1
morocc,193,51,6	script	Kreg	48,{
	if (ten_qset == 1 && countitem(1082) > 0) goto N_QuestComp;
	if (ten_qset == 1) goto N_QuestStart;
	mes "[Kreg]";
	mes "Hello "+strcharinfo(0)+" welcome to Morroc.";
	close;
N_QuestComp:
	mes "[Kreg]";
	mes "Thank you for this delivery.";
	next;
	mes "[Kreg]";
	mes "Here take this Treasure Token as a reward.";
	set ten_qset,0;
	delitem 1082,1;
	set On_Quest,0;
	set #Treasure_Token,#Treasure_Token+1;
	close;
N_QuestStart:
	mes "[Kreg]";
	mes "So where's my Delivery";
	close;
}
//10-2;
pay_fild10,145,252,6	script	Man#02	122,{
	if (ten_qset == 2 && countitem(1029) > 0) goto N_QuestComp;
	if (ten_qset == 2) goto N_QuestStart;
	mes "[Man]";
	mes "Sorry I'm waiting for someone, you will have to come back later";
	close;
N_QuestComp:
	mes "[Man]";
	mes "Thank you for helping me.";
	next;
	mes "[Man]";
	mes "Here take these 4 Treasure Tokens.";
	set ten_qset,0;
	set On_Quest,0;
	delitem 1029,1;
	set #Treasure_Token,#Treasure_Token+4;
	close;
N_QuestStart:
	mes "[Man]";
	mes "Tony the Tiger is on Crack! He must be stoped, KILL HIM!";
	mes " ";
	mes "Bring me back 1 Tiger's_Skin!";
	close;
}
//10-3;
moc_fild04,193,51,6	script	Caral	119,{
	if (ten_qset == 3 && countitem(1015) > 0) goto N_QuestComp;
	if (ten_qset == 3) goto N_QuestStart;
	mes "[Caral]";
	mes "Sorry I'm waiting for someone, you will have to come back later.";
	close;
N_QuestComp:
	mes "[Caral]";
	mes "Thank you for helping me.";
	next;
	mes "[Caral]";
	mes "Here take these 4 Treasure Tokens.";
	set ten_qset,0;
	set On_Quest,0;
	delitem 1015,1;
	set #Treasure_Token,#Treasure_Token+4;
	close;
N_QuestStart:
	mes "[Caral]";
	mes "Phreeoni the Pink Fluff is terrorizing little novices! He must be stoped, KILL HIM!";
	mes " ";
	mes "Bring me back 1 Tounge!";
	close;
}
//10-4
moc_fild15,250,251,6	script	Jeni	727,{
	if (ten_qset == 4 && countitem(1096) > 0) goto N_QuestComp;
	if (ten_qset == 4) goto N_QuestStart;
	mes "[Jeni]";
	mes "Sorry I'm waiting for someone, You will have to come back later";
	close;
N_QuestComp:
	mes "[Jeni]";
	mes "Thank you for helping me.";
	next;
	mes "[Jeni]";
	mes "Here take these 3 Treasure Tokens.";
	set ten_qset,0;
	set On_Quest,0;
	delitem 1096,1;
	set #Treasure_Token,#Treasure_Token+3;
	close;
N_QuestStart:
	mes "[Jeni]";
	mes "This half naked freak need an army to take down, now its your job,good luck.";
	mes " ";
	mes "Bring me back 1 Round Shell!";
	close;
}