npc_1stjob.txt

CS反恐精英1.6的部分C源代码。

			jobchange Job_Merchant;
			delitem 1073,1;
			close;
		LnoB:
			mes "Okay, now you need to pay me 1000z for this quest.";
			next;
			menu "Agree",Lagree,"Disagree",Ldisagree;

			Lagree:
				if(Zeny<1000) goto NoGold;
				set Zeny,0-1000;

				mes "[NPC Guild]";
				mes "Okay now go talk to the Guildsman on the other room. He will give you a quest.";
				close;

			Ldisagree:
				goto LnoA;
		LnoA:
			mes "[NPC Guild]";
			mes "Thank you for your interesting.";
			close;
	NoGold:
		mes "[NPC Guild]";
		mes "You need 1000z to do this quest. Come back later.";
		close;

	LnoLvl:
		mes "[NPC Guild]";
		mes "Oh, you does not have can't qualify the required conditions to become a Merchant. You need Job Skill at level 10 before trying to become a Merchant. Come back later.";
		close;

	Llessitem:
		mes "[NPC Guild]";
		mes "You don't have the Voucher. You need the Voucher to become a Merchant.";
		mes "Go talk to the Guildsman on the other room. He will give you a quest.";
		close;
	LNotNovice:
		mes "sorry you need to be a novice to do it";
		close;
close; }

//Merchat job change NPC 2
alberta_in.gat,27,58,0	script	Guildman	88,{
mes "[Guildman]";
mes "Hi, so you came for the delivery right?";
next;
menu "Yes",Lyes,"No",Lno;
	Lyes:
		if(getjob!=Job_Novice) goto LNotNovice;

		mes "[Guildman]";
		mes "Okay then, I need you to deviler this boxes to the Town of Izlude.";
		mes "Go to the Weapons and Armor shop and deliver them to the man at the entrance.";
		next;

		if(countitem(1081)<1) goto Get1;
		if(countitem(1082)<1) goto Get2;
		if(countitem(1083)<1) goto Get3;
		if(countitem(1091)<1) goto Get4;

		mes "[Guildman]";
		mes "When you get the Voucher go see the first NPC at the entrance of this building.";
		mes "He will turn you into a Merchant.";
		close;
	Lno:
		mes "[Guildman]";
		mes "Oh sorry wrong guy.";
		close;

	Get1:
		getitem 1081,1;
	Get2:
		getitem 1082,1;
	Get3:
		getitem 1083,1;
	Get4:
		getitem 1091,1;
	LNotNovice:
		mes "You must be kidding me! You already have a job.";
		close;
close; }

//Merchat job change NPC 3
izlude_in.gat,71,103,0	script	Merchant	156,{
mes "[Merchant]";
mes "Hi, are you the delivery man?";
next;
menu "Yes",Lyes,"No",Lno;
	Lyes:
		if(countitem(1081)<1) goto Llessitem;
		if(countitem(1082)<1) goto Llessitem;
		if(countitem(1083)<1) goto Llessitem;
		if(countitem(1091)<1) goto Llessitem;

		mes "[Merchant]";
		mes "Thank you for the delivery. Take this Voucher back to the NPC Guild.";

		delitem 1081,1;
		delitem 1082,1;
		delitem 1083,1;
		delitem 1091,1;

		getitem 1073,1;
		close;
	Lno:
		mes "[Merchant]";
		mes "Sorry wrong guy.";
		close;

	Llessitem:
		mes "[Merchant]";
		mes "Sorry, you don't have all the packages needed.";
		close;
close; }

//Acolyte Job Change NPC 1
prt_church.gat,184,41,4	script	Cleric	60,{
	if(countitem(1009)>0) goto LChange;
	if(countitem(7015)>0) goto LStill1;
	if(countitem(7023)>0) goto LStill3;
	if(countitem(7024)>0) goto LStill2;
	mes "[Father Mareusis]";
	mes "What is it my son?";
	next;
	menu "Father, I want to be an Acolyte.",LCheck,"Requirements.",LInfo,"I'm just looking around.",LCancel;

LCheck:
	if(joblevel<10) goto LDenny;
	if(getjob!=Job_Novice) goto LNotNovice;
	goto LProceed;

LProceed:	mes "[Father Mareusis]";
		mes "Right my son,";
		mes "So you heard the call of god.";
		mes "Let me explain what you have to do.";
		next;
		mes "[Father Mareusis]";
		mes "I have 3 errands for you to choose,complete 1 of these errands to show your faith, and if you truly qualify to be an Acolyte of this church.";
		next;
		mes "[Father Mareusis]";
		mes "Please choose wich errand you want to take.";
		next;
		menu "Errand #1.",LErrand1,"Errand #2.",LErrand2,"Errand #3.",LErrand3;

	LErrand1:
			mes "[Father Mareusis]";
			mes "So you choose the #1, very well.";
			mes "Here is what you have to do...";
			next;
			getitem 7015,1;
			mes "[Father Mareusis]";
			mes "Give this Bookclip to ^000077Father Rubalkabara^000000, he's a member of the Prontera Parish and is practicing asceticism in the ^000077Relics at the Nothern East of Prontera City^000000.";
			mes "May god bless you on your way.";
			close;

	LErrand2:
			mes "[Father Mareusis]";
			mes "So you choose the #2, very well.";
			mes "Here is what you have to do...";
			next;
			getitem 7023,1;
			mes "[Father Mareusis]";
			mes "Give this blade to ^000077Mother Mathilda^000000 purify, she been practicing asceticism ^000077near Morroc Town, the Southern West of Prontera City^000000.";
			mes "May god bless you on your way.";
			close;

	LErrand3:
			mes "[Father Mareusis]";
			mes "So you choose the #3, very well.";
			mes "Here is what you have to do...";
			next;
			getitem 7023,1;
			mes "[Father Mareusis]";
			mes "Give this blade to ^000077Father Yosuke^000000 purify, he has been practicing asceticism ^000077around a Bridge in Somewhere near Northern West Prontera^000000.";
			mes "May god bless you on your way.";
			close;


LStill1:
	mes "[Father Mareusis]";
	mes "Go see ^000077Father Rubalkabara in the Relics at the Northern East of Prontera City^000000.";
	mes "May god aid you on your guest.";
	close;

LStill2:
	mes "[Father Mareusis]";
	mes "Go see ^000077Mother Mathilda near Morroc Town^000000.";
	mes "May god aid you on your guest.";
	close;

LStill3:
	mes "[Father Mareusis]";
	mes "Go see ^000077Father Yosuke around a Bridge in somewhere near Northern West Prontera^000000.";
	mes "May god aid you on your guest.";
	close;

Lalrdy:
	mes "[Father Mareusis]";
	mes "You are already a servant of god, go show the way of god to others";
	close;

LDenny:
	mes "[Father Mareusis]";
	mes "I'm sorry my son but you don't have ";
	mes "the abilities to be an Acolyte.";
	mes "You need ^FF0000Novice and have Job Lv 10^000000.";
	close;

LInfo:
	mes "[Father Mareusis]";
	mes "My son you need ^FF0000Novice Job Lv 10^000000 ";
	mes "to be a servant of god in Rune Midgard.";
	close;

LChange:
	delitem 1009,1;
	mes "[Father Mareusis]";
	mes "Congratulations, you are now qualified ";
	mes "to be an Acolyte of this church.";
	next;
	jobchange Job_Acolyte;
	mes "[Father Mareusis]";
	mes "May god bless you on your quest.";
	close;

LCancel:
	mes "[Father Mareusis]";
	mes "May god light your path.";
	close;
LNotNovice:
	mes "You arent novice... cant be an acolyte.";
	close;
close; }

//Acolyte Job Change NPC 2
prt_fild03.gat,365,255,5	script	Ascetic	89,{
	if(countitem(7015)==1) goto LErrand;
	mes "[Father Rubalkabara]";
	mes "I have nothing to say to you.";
	mes "Get lost.";
	close;

LErrand:	mes "[Father Rubalkabara]";
		mes "Oh I see you want to be an Acolyte.";
		mes "Thank you for bringing me this bookclip.";
		mes "It'll aid me on my studies.";
		next;
		delitem 7015,1;
		getitem 1009,1;
		mes "Give this item to Father Mareusis.";
		mes "Good Luck my friend.";
close; }

//Acolyte Job Change NPC 3
moc_fild07.gat,41,355,4	script	Nun of Penance	95,{
	if(countitem(7023)==1) goto LErrand;
	mes "[Mother Mathilda]";
	mes "Sorry but i have nothing to say to you.";
	close;

LErrand:	mes "[Mother Mathilda]";
		mes "So you heard the call.";
		mes "I'll purify this blade.";
		next;
		delitem 7024,1;
		getitem 1009,1;
		mes "Show this to Father Mareusis.";
		mes "God bless you.";
		close;	}

//Acolyte Job Change NPC 4
prt_fild00.gat,208,218,6	script	Ascetic	98,{
	if(countitem(7023)==1) goto LErrand;
	mes "[Father Yosuke]";
	mes "Who are you? What you want?";
	mes "Get out of here!";
	close;

LErrand:	mes "[Father Yosuke]";
		mes "I see, I see, Father Mareusis sent you huh?";
		mes "Very well...";
		next;
		delitem 7023,1;
		getitem 1009,1;
		mes "Show him this.";
		mes "Now get out of here, you are distracting me.";
close; }
// ACOLYTE - END