Context Navigation

priest.txt @ 1

Revision 1, 62.1 kB (checked in by jinshiro, 17 years ago)

Rev	Line
[1]	1	//===== eAthena Script =======================================
	2	//= Priest Quest
	3	//===== By: ==================================================
	4	//= Translated By: Pgro Team (OwNaGe)(Aegis)
	5	//= Converted by: kobra_k88.
	6	//= Further bugfixed and tested by Lupus
	7	//===== Current Version: =====================================
	8	//= 2.4b
	9	//===== Compatible With: =====================================
	10	//= eAthena SVN
	11	//===== Description: =========================================
	12	//= [Aegis Conversion]
	13	//= Job Change quest for Priest class.
	14	//===== Additional Comments: =================================
	15	//= Fully working. Changed the way Priests enter the test room to help Acos.
	16	//= Must use this with the included Acolyte quest to work properely.
	17	//= 1.3 Added Baby Class support, fixed 3 wrong constants bugs [Lupus]
	18	//= 1.5 Fixed possible EXP abuse [Lupus]
	19	//= 1.6 Added a func which prevent advanced classes passing
	20	//= 2nd Job Quests again. It also guides adv classes where
	21	//= to go. [Lupus]
	22	//= 2.0 Changed numbers to constants. [Vicious]
	23	//= 2.1 Merged JFunc [Lupus]
	24	//= 2.1a Fixed typo [KarLaeda]
	25	//= 2.2 Rescripted to Aegis 10.3 standards. [L0ne_W0lf]
	26	//= 2.3 Several bugfixes with the help of Barron-Monster. [L0ne_W0lf]
	27	//= 2.3a More bug fixes. [L0ne_W0lf]
	28	//= 2.4 Changed Marthilda to Mathilda. [L0ne_W0llf]
	29	//= 2.4a Deleted unused variables. [Samuray22]
	30	//= 2.4b Corrected a Typo error ";;". [Samuray22]
	31	//==========================================================
	32
	33	prt_church,16,41,4 script High Bishop#prst 60,{
	34	// Uncomment the following 'if' statement to allow High Priests to assist Acolytes with the job change quest.
	35	// Officially High Priests are blocked from helping by an indiscriminate check if you are a transcended character.
	36	//if (Class == Job_High_Priest) set .@AllowHPAssist,1;
	37	if (Upper == 1 && .@AllowHPAssist != 1) {
	38	mes "[Bishop Paul]";
	39	mes "Hm...?";
	40	mes "Ah, I sense that you are a warrior that has been to Valhalla. You who have been reborn... We are here to look after you.";
	41	next;
	42	mes "[Bishop Paul]";
	43	mes "Do not let evil conquer your soul. You have enough courage and power to overcome the hardest situation. May God bless you...";
	44	close;
	45	}
	46	if (BaseJob != Job_Acolyte) {
	47	if (BaseJob == Job_Priest) {
	48	mes "[Bishop Paul]";
	49	mes "Ah...";
	50	if (sex)
	51	mes "It is good to see you again, Brother " + strcharinfo(0) + ". Once again, God's grace has caused our paths to cross.";
	52	else
	53	mes "It is good to see you once again, Sister " + strcharinfo(0) + ". The grace of God has brought you once more before me.";
	54	next;
	55	mes "[Bishop Paul]";
	56	mes "I'm pleased to see that you are continuing to lead the children of God on the right path. Is there anything I can help you with today?";
	57	next;
	58	switch(select("How is your health?:I want to help this Acolyte.:Father, I need your help.")) {
	59	case 1:
	60	mes "[Bishop Paul]";
	61	mes "Thank you for your concern. I'm doing fine and am in good health. Please give my regards to your brothers and sisters.";
	62	next;
	63	mes "[Bishop Paul]";
	64	mes "Keep in mind that we are God's messengers on this Earth. Always remember that we must always help others.";
	65	close;
	66	case 2:
	67	mes "[Bishop Paul]";
	68	mes "Ah, that's a good idea. Helping young Acolytes should also be one of a Priest's priorities.";
	69	next;
	70	mes "[Bishop Paul]";
	71	mes "However, there are certain things that an Acolyte must do alone. All Acolytes must complete their divine test by themselves.";
	72	next;
	73	mes "[Bishop Paul]";
	74	mes "I hope you will assist your Acolyte friend in the second test, the spiritual training.";
	75	next;
	76	mes "[Bishop Paul]";
	77	mes "You need to bring ^0000FF1 Rosary^000000 in order to accompany an Acolyte in spiritual training. If you have one of those, I can send you to the test area now.";
	78	next;
	79	mes "[Bishop Paul]";
	80	mes "Do you wish to help him out during the spiritual training?";
	81	next;
	82	if (select("Yes, I do.:Give me a second.") == 1) {
	83	if (countitem(2608) > 0) {
	84	mes "[Bishop Paul]";
	85	mes "I will now send you to the training place for Acolytes. Please send my regards to Brother Peter...";
	86	next;
	87	mes "[Bishop Paul]";
	88	mes "I hope you will assist this Acolyte in becoming a Priest.";
	89	close2;
	90	warp "job_prist",26,178;
	91	end;
	92	}
	93	mes "[Bishop Paul]";
	94	mes "Unfortunately you didn't bring a ^0000FFRosary^000000. You need one of those in order to be in the testing area.";
	95	close;
	96	}
	97	mes "[Bishop Paul]";
	98	mes "I see, take your time. Don't forget to bring a ^0000FFRosary^000000...";
	99	close;
	100	case 3:
	101	mes "[Bishop Paul]";
	102	mes "You must be strong. Have faith, as you are loved by God. I pray the wounds of the body are healed soon...";
	103	next;
	104	percentheal 90,0;
	105	mes "[Bishop Paul]";
	106	mes "God, please look after your poor children. Help them overcome their hardships and difficulties. Refresh their spirits...";
	107	next;
	108	percentheal 0,90;
	109	mes "[Bishop Paul]";
	110	mes "I hope my invocation has eased your pain. Now please go forth and spread God's message. May God be with you...";
	111	close;
	112	}
	113	}
	114	else if (BaseClass == Job_Novice) {
	115	mes "[Bishop Paul]";
	116	mes "May God be";
	117	if (sex)
	118	mes "with you, brother.";
	119	else
	120	mes "with you, sister.";
	121	next;
	122	mes "[Bishop Paul]";
	123	mes "You are in";
	124	mes "the Sanctuary.";
	125	mes "What brings you here?";
	126	next;
	127	switch(select("I want to be an Acolyte.:I want to be a Priest.:Nothing, really.")) {
	128	case 1:
	129	mes "[Bishop Paul]";
	130	mes "Oh I see...";
	131	mes "If you wish to become an Acolyte, please visit the other room.";
	132	break;
	133	case 2:
	134	mes "[Bishop Paul]";
	135	mes "Oh I see. However, you must first become an Acolyte before becoming a Priest. Please visit the other room.";
	136	break;
	137	case 3:
	138	mes "[Bishop Paul]";
	139	mes "Please make yourself at home. On Earth, nowhere is safer than this Sanctuary.";
	140	break;
	141	}
	142	next;
	143	mes "[Bishop Paul]";
	144	mes "May God bless you.";
	145	close;
	146	}
	147	else {
	148	mes "[Bishop Paul]";
	149	mes "May God be";
	150	if (sex)
	151	mes "with you, brother.";
	152	else
	153	mes "with you, sister.";
	154	next;
	155	mes "[Bishop Paul]";
	156	mes "What brings you here";
	157	mes "to Prontera Sanctuary?";
	158	next;
	159	switch(select("Information about Priests.:Nothing.")) {
	160	case 1:
	161	mes "[Bishop Paul]";
	162	mes "Priests have the authority to perform and administer religious rites.";
	163	next;
	164	mes "[Bishop Paul]";
	165	mes "You must first be thoroughly disciplined as an Acolyte before you can be promoted to the position of Priest.";
	166	next;
	167	mes "[Bishop Paul]";
	168	mes "When you reach Acolyte Job level 40, you will be able to apply for the Priest test.";
	169	next;
	170	mes "[Bishop Paul]";
	171	mes "If you pass the test, you will be able to use more powerful skills that will be effective against Demon and Undead creatures...";
	172	next;
	173	mes "[Bishop Paul]";
	174	mes "With all of your ability, you will play an important role in towns and dungeons.";
	175	next;
	176	mes "[Bishop Paul]";
	177	mes "Our duty and obligation as Priests is to devote ourselves to helping others without expecting reward.";
	178	next;
	179	mes "[Bishop Paul]";
	180	mes "As we help others, we must not expect to treat us in a similar fashion. To be a great Priest is your choice and responsibility, not anyone else's.";
	181	next;
	182	mes "[Bishop Paul]";
	183	mes "However, those who receive should be polite. You should give an outstanding example, but you should also have your limits as a human.";
	184	next;
	185	mes "[Bishop Paul]";
	186	mes "I hope I explained enough of the class. Why don't you go outside and talk to some of the other Priests if you want to learn more about our way of life?";
	187	next;
	188	break;
	189	case 2:
	190	mes "[Bishop Paul]";
	191	mes "Please make yourself at home. Nowhere on Earth is safer than the Prontera Sanctuary.";
	192	next;
	193	break;
	194	}
	195	mes "[Bishop Paul]";
	196	mes "Well...";
	197	mes "May God";
	198	mes "bless you.";
	199	close;
	200	}
	201	}
	202	if (PRIEST_Q == 0) {
	203	mes "[Bishop Paul]";
	204	mes "May God bless";
	205	if (sex)
	206	mes "you, Brother.";
	207	else
	208	mes "you, Sister.";
	209	mes "What brings";
	210	mes "you to me?";
	211	next;
	212	switch(select("I want to be a Priest.:How are you, Father?")) {
	213	case 1:
	214	mes "[Bishop Paul]";
	215	mes "I see. So you wish to be a Priest. God will be delighted by your decision and will bless you.";
	216	next;
	217	mes "[Bishop Paul]";
	218	mes "I am Bishop Paul Cervantes, and am in charge of the Prontera Parish.";
	219	mes "I am glad to meet a person as eager and devoted to God such as yourself.";
	220	next;
	221	mes "[Bishop Paul]";
	222	mes "If you set your mind on becoming a Priest, you must undergo several tests. Only Acolytes who reach job level 40 are qualified for testing.";
	223	next;
	224	mes "[Bishop Paul]";
	225	mes "If you satisfy the requirements, I suggest that you apply for the Priest job first. Do you wish to apply now?";
	226	next;
	227	if (select("Yes, I do.:I need some time to think about it...") == 1) {
	228	if (JobLevel < 40) {
	229	mes "[Bishop Paul]";
	230	mes "You are not yet qualified to be a Priest. Please go out into the world and broaden your experiences.";
	231	next;
	232	mes "[Bishop Paul]";
	233	mes "There are still things that you must learn as an Acolyte. However, I look forward to meeting you again very soon.";
	234	close;
	235	}
	236	if (SkillPoint) {
	237	mes "[Bishop Paul]";
	238	mes "You have skill points left.";
	239	mes "I strongly recommend that you use all of these skill points before you apply for the Priest job change test.";
	240	close;
	241	}
	242	set PRIEST_Q,1;
	243	mes "[Bishop Paul]";
	244	if (sex)
	245	mes "Now I will explain the Three Trials of Priesthood. These tribulations will bring you much suffering, but I hope you can complete them, Brother " + strcharinfo(0) + ".";
	246	else
	247	mes "Now I will explain the Three Trials of Priesthood. These tribulations will bring you much suffering, but I hope you can complete them, Sister " + strcharinfo(0) + ".";
	248	next;
	249	mes "[Bishop Paul]";
	250	mes "For the First Trial, you will make a pilgrimage, and visit three acscetic Priests in a specific order.";
	251	next;
	252	mes "[Bishop Paul]";
	253	mes "The Second Trial will consist of spiritual training. You must resist the temptations of Demons and the Undead.";
	254	next;
	255	mes "[Bishop Paul]";
	256	mes "In the Final Trial, you will promise your devotion to God. Your willingness to sacrifice yourself will also be questioned.";
	257	next;
	258	mes "[Bishop Paul]";
	259	mes "Acolytes that have reached Job Level 50 will be exempt from the First Trial, the pilgrimage, as they have already demonstrated their enthusiasm and devotion.";
	260	next;
	261	if (JobLevel == 50) {
	262	mes "[Bishop Paul]";
	263	mes "I can see the great effort you have exerted to reach job level 50. You have been a loyal servant to God.";
	264	next;
	265	mes "[Bishop Paul]";
	266	mes "Now, you may go directly go to the Second Trial: Spiritual Training. For this training, you may bring a Priest with you.";
	267	next;
	268	mes "[Bishop Paul]";
	269	mes "I have no doubt that you will do a good job by yourself. However, it will be easier with the aid of a Brother or Sister that has already become a Priest.";
	270	next;
	271	set PRIEST_Q,5;
	272	mes "[Bishop Paul]";
	273	mes "Well, are you ready for the Spiritual Training?";
	274	next;
	275	if (select("I am ready.:Give me a minute.") == 1) {
	276	mes "[Bishop Paul]";
	277	mes "Good. I will send you to the training ground. When you get there, please speak to Brother Peter who is in charge of the training.";
	278	next;
	279	warp "job_prist",24,180;
	280	end;
	281	}
	282	mes "[Bishop Paul]";
	283	mes "No problem, take your time.";
	284	mes "May God give you the strength to overcome your fears...";
	285	close;
	286	}
	287	mes "[Bishop Paul]";
	288	mes "Well, let me tell you the order of the ascetic Priests that you must visit for your pilgrimage.";
	289	next;
	290	mes "[Bishop Paul]";
	291	mes "First, please visit Father";
	292	mes "Rubalkabara who is Northeast";
	293	mes "of the Prontera Ruins.";
	294	next;
	295	mes "[Bishop Paul]";
	296	mes "Second, please visit Sister Mathilda. She is located in";
	297	mes "an area near Morroc, Southwest of Prontera.";
	298	next;
	299	mes "[Bishop Paul]";
	300	mes "The third Priest you must visit is Father Yosuke. He is in a field Northwest of Prontera.";
	301	next;
	302	mes "[Bishop Paul]";
	303	mes "Well then, I wish you a safe journey. If you have any questions, please ask Sister Cecilia.";
	304	next;
	305	mes "[Bishop Paul]";
	306	mes "When you return from your pilgrimage, I will let you know";
	307	mes "of the next test.";
	308	next;
	309	mes "[Bishop Paul]";
	310	mes "May God";
	311	mes "bless you...";
	312	close;
	313	}
	314	mes "[Bishop Paul]";
	315	mes "Please take your time.";
	316	mes "You are always welcomed.";
	317	mes "May God bless you...";
	318	close;
	319	case 2:
	320	mes "[Bishop Paul]";
	321	mes "I see...";
	322	mes "I am doing fine";
	323	mes "and am in good health.";
	324	mes "Thank you for asking.";
	325	next;
	326	mes "[Bishop Paul]";
	327	if (sex)
	328	mes "I hope you will continue to go on your mission as God's servant, brother.";
	329	else
	330	mes "I hope you will continue to go on your mission as God's servant, sister.";
	331	next;
	332	mes "[Bishop Paul]";
	333	mes "Hopefully, our paths";
	334	mes "will cross again.";
	335	mes "May God bless you...";
	336	close;
	337	}
	338	}
	339	else if (PRIEST_Q == 1) {
	340	mes "[Bishop Paul]";
	341	mes "May I ask you the reason you're still here? You didn't forget your pilgrimage, did you?";
	342	next;
	343	if (select("Sorry father, I need to check the order.:No no no, not at all.") == 1) {
	344	mes "[Bishop Paul]";
	345	mes "Ah, I see. I will let you know the order of pilgrimage again, and hope that you will have a safe journey.";
	346	next;
	347	mes "[Bishop Paul]";
	348	mes "First, meet Father Rubalkabara. He's at the Northeast of the Prontera ruins.";
	349	next;
	350	mes "[Bishop Paul]";
	351	mes "Then, remember to meet Sister Mathilda. She's somewhere near the town of Morroc, Southwest of Prontera.";
	352	next;
	353	mes "[Bishop Paul]";
	354	mes "And lastly, please seek out Father Yosuke. He is in the a field Northwest of Prontera.";
	355	next;
	356	mes "[Bishop Paul]";
	357	mes "Well then, I shall pray for your safe journey. If you want more information, please ask Sister Cecilia.";
	358	next;
	359	mes "[Bishop Paul]";
	360	mes "When you get back from the pilgrimage, I will let you know the next test.";
	361	next;
	362	mes "[Bishop Paul]";
	363	mes "May God bless you...";
	364	close;
	365	}
	366	mes "[Bishop Paul]";
	367	mes "I see. But still, if you have any questions, you may wish to ask Sister Cecilia. She will address any of your concerns.";
	368	next;
	369	mes "[Bishop Paul]";
	370	mes "Well then, I shall pray for your safe journey. May God bless you...";
	371	close;
	372	}
	373	else if (PRIEST_Q == 2) {
	374	mes "[Bishop Paul]";
	375	mes "I see you have returned from your meeting with Father Rubalkabara. How is he doing? I am worried about his health, since he's been there all alone... ";
	376	next;
	377	mes "[Bishop Paul]";
	378	mes "For your next quest, you should meet Sister Mathilda. I shall be awaiting your safe return.";
	379	close;
	380	}
	381	else if (PRIEST_Q == 3) {
	382	mes "[Bishop Paul]";
	383	mes "I see that you have returned from your journey to meet Sister Mathilda. She has been meditating in the hot, dry desert for a long time.";
	384	next;
	385	mes "[Bishop Paul]";
	386	mes "Finally, it is now time for you to meet Father Yosuke. He is doing penance somewhere around a field Northwest of Prontera. Please seek him out, and then return here to me.";
	387	close;
	388	}
	389	else if (PRIEST_Q == 4) {
	390	set PRIEST_Q,5;
	391	mes "[Bishop Paul]";
	392	mes "You've accomplished";
	393	mes "your pilgrimage.";
	394	mes "Congratulations.";
	395	next;
	396	mes "[Bishop Paul]";
	397	mes "Now it is time to begin your spiritual training. As I mentioned before, you may bring a Priest to help you during this training.";
	398	next;
	399	mes "[Bishop Paul]";
	400	mes "Although you cannot receive their help throughout all of the testing, they can at least help you during the spiritual training.";
	401	next;
	402	mes "[Bishop Paul]";
	403	mes "Well, are you ready for";
	404	mes "the spiritual training?";
	405	next;
	406	if (select("I'm ready.:Give me a minute.") == 1) {
	407	mes "[Bishop Paul]";
	408	mes "Good. I will send you to the training ground. When you get there, please speak to Brother Peter who is in charge of the training.";
	409	next;
	410	warp "job_prist",24,180;
	411	end;
	412	}
	413	mes "[Bishop Paul]";
	414	mes "No problem,";
	415	mes "take your time.";
	416	mes "May God grant you";
	417	mes "the strength to";
	418	mes "overcome your fears...";
	419	close;
	420	}
	421	else if (PRIEST_Q == 5) {
	422	mes "[Bishop Paul]";
	423	mes "You seem confident about the spiritual training. Shall we begin?";
	424	next;
	425	if (select("I'm ready.:Give me a minute.") == 1) {
	426	mes "[Bishop Paul]";
	427	mes "Good. I will send you to the training ground. When you get there, please speak to Brother Peter who is in charge of the training.";
	428	next;
	429	warp "job_prist",24,180;
	430	end;
	431	}
	432	mes "[Bishop Paul]";
	433	mes "No problem,";
	434	mes "take your time.";
	435	mes "May God grant you";
	436	mes "the strength to";
	437	mes "overcome your fears...";
	438	close;
	439	}
	440	else if (PRIEST_Q == 6) {
	441	mes "[Bishop Paul]";
	442	mes "You look tired and exhausted. However, you must endure even more suffering once you become a Priest.";
	443	next;
	444	mes "[Bishop Paul]";
	445	mes "Please endure these trials for the sake of your dream. Why don't you challenge the spiritual training again?";
	446	next;
	447	if (select("I'll try again.:Give me a minute.") == 1) {
	448	mes "[Bishop Paul]";
	449	mes "Good. I will send you to the training ground. Please ask for help from Brother Peter.";
	450	next;
	451	warp "job_prist",24,180;
	452	end;
	453	}
	454	mes "[Bishop Paul]";
	455	mes "No problem,";
	456	mes "take your time.";
	457	mes "May God grant you";
	458	mes "the strength to";
	459	mes "overcome your fears...";
	460	close;
	461	}
	462	else if (PRIEST_Q == 7) {
	463	mes "[Bishop Paul]";
	464	mes "I am glad that you've done well with the spiritual training. Congratulations. You are now qualified to be called a Priest.";
	465	next;
	466	mes "[Bishop Paul]";
	467	mes "Now, you must go and swear your devotion to God with Sister Cecilia. Don't be nervous...";
	468	next;
	469	mes "[Bishop Paul]";
	470	mes "Just answer honestly, and listen to the voice of God that speaks quietly in your heart.";
	471	next;
	472	mes "[Bishop Paul]";
	473	mes "Well then...";
	474	mes "I will be here";
	475	mes "waiting for you.";
	476	close;
	477	}
	478	else if (PRIEST_Q == 8) {
	479	mes "[Bishop Paul]";
	480	mes "Hmm? You haven't made your oath yet...? Without the conviction of an oath to God, you may be tempted by evil at anytime.";
	481	next;
	482	mes "[Bishop Paul]";
	483	mes "You should go to sister Cecilia and promise your devotion to God. Return here with honor, and listen to the voice of God that speaks quietly in your heart.";
	484	close;
	485	}
	486	else if (PRIEST_Q == 9) {
	487	if (SkillPoint) {
	488	mes "[Bishop Paul]";
	489	mes "You have remaining skills points. Please use these skill points to upgrade your skills, and then return to me.";
	490	close;
	491	}
	492	mes "[Bishop Paul]";
	493	mes "Congratulations, you have completed the trials required of all Priests. Let me promote you to the position of Priest right away.";
	494	next;
	495	mes "[Bishop Paul]";
	496	mes "God, grant your power to your servant standing before you.";
	497	if (sex)
	498	mes "Let him send your message throughout the ends of the earth.";
	499	else
	500	mes "Let her send your message throughout the ends of the earth.";
	501	next;
	502	mes "[Bishop Paul]";
	503	mes "Make this servant of yours an instrument of your miraculous works...";
	504	next;
	505	set .@joblvl,JobLevel;
	506	callfunc "Job_Change",Job_Priest;
	507	callfunc "F_ClearJobVar"; // clears all job variables for the current player
	508	mes "[Bishop Paul]";
	509	mes "Now you are born again as a Priest. I congratulate you, and hope you will greatly help other people for the rest of your life.";
	510	next;
	511	mes "[Bishop Paul]";
	512	if (.@joblvl < 50) {
	513	getitem 1550,1; //Book
	514	mes "This book is for you. I hope it will aid you in spreading God's message on earth.";
	515	}
	516	else {
	517	getitem 1551,1; //Bible
	518	mes "In commemoration of your job change, I am giving you a bible. This will lighten your way to the path of righteousness.";
	519	}
	520	next;
	521	mes "[Bishop Paul]";
	522	mes "You've shown great effort, and have made admirable progress in your personal quest for holiness. Please lead your life as a sincere Priest...";
	523	close;
	524	}
	525	}
	526
	527	prt_church,27,24,1 script Sister Cecilia 79,{
	528	mes "[Sister Cecilia]";
	529	if (BaseJob != Job_Acolyte) {
	530	if (BaseJob == Job_Priest) {
	531	if (sex)
	532	mes "May god bless you, brother. It brings my heart joy to see that you working hard to carry out the will of God.";
	533	else
	534	mes "May god bless you, sister. It brings my heart joy to see that you working hard to carry out the will of God.";
	535	}
	536	else if (Class == Job_Novice) {
	537	if (sex)
	538	mes "May god bless you, brother.";
	539	else
	540	mes "May god bless you, sister.";
	541	mes "Prontera parish welcomes you.";
	542	next;
	543	mes "[Sister Cecilia]";
	544	mes "Oh, you haven't chosen a job yet? Why don't you consider devoting your life to God?";
	545	next;
	546	mes "[Sister Cecilia]";
	547	mes "You can lead a fulfilling life as an Acolyte, helping out other people in need.";
	548	next;
	549	mes "[Sister Cecilia]";
	550	mes "If you're interested, please ask the Priest in the other room. You won't ever regret the choice to become an Acolyte.";
	551	next;
	552	mes "[Sister Cecilia]";
	553	mes "When you reach Job level 40 as an Acolyte, you can be promoted to a Priest.";
	554	next;
	555	mes "[Sister Cecilia]";
	556	mes "But please...";
	557	mes "Take your time, and decide what job will be the best for you.";
	558	}
	559	else {
	560	if (sex)
	561	mes "May god bless you, brother.";
	562	else
	563	mes "May god bless you, sister.";
	564	mes "Welcome to Prontera parish. How may I help you?";
	565	next;
	566	if (select("Tell me more about Priests.:Nothing.") == 1) {
	567	mes "[Sister Cecilia]";
	568	mes "Messengers of God are usually known as Priests. After becoming an Acolyte, you can train with the goal of becoming a Priest.";
	569	next;
	570	mes "[Sister Cecilia]";
	571	mes "Servants of God are prohibited to use weapons based on blades. For us, the meaning of battle with monsters is not in the killing, but in the enlightening of their souls.";
	572	if (BaseJob == Job_Acolyte) {
	573	next;
	574	mes "[Sister Cecilia]";
	575	mes "Well, it will be better that you meet Priests for yourself and speak with them. If you are ready to become a Priest, speak with Bishop Paul in this room.";
	576	next;
	577	mes "[Sister Cecilia]";
	578	mes "I believe he can give you specific requirement information about the Priest class. Yes, I think it's a good idea.";
	579	next;
	580	}
	581	}
	582	mes "[Sister Cecilia]";
	583	mes "I see. Well, feel free to relax and make yourself at home. Nowhere on earth is safer than the Prontera Sanctuary.";
	584	next;
	585	mes "[Sister Cecilia]";
	586	mes "May God bless you...";
	587	close;
	588	}
	589	}
	590	if (PRIEST_Q == 0) {
	591	if (sex)
	592	mes "May God bless you, brother.";
	593	else
	594	mes "May God bless you, sister.";
	595	mes "May I ask what brings you here?";
	596	next;
	597	switch(select("I wish to become a Priest.:Nothing.")) {
	598	case 1:
	599	mes "[Sister Cecilia]";
	600	mes "I see. You've devoted yourself to God. Many Acolytes wish to become Priests to continue on their personal journey towards holiness.";
	601	next;
	602	mes "[Sister Cecilia]";
	603	mes "Let me introduce myself. I am Cecilia Margarita, and I am in charge of part of the Priest job change process.";
	604	next;
	605	mes "[Sister Cecilia]";
	606	mes "I've been supporting many people in becoming Priests ever since I joined the Prontera Parish. That is one of my main responsibilities.";
	607	next;
	608	mes "[Sister Cecilia]";
	609	mes "In order to become a Priest, you must complete 3 trials. A pilgrimage, a session of spiritual training, and an oath of devotion to God.";
	610	next;
	611	mes "[Sister Cecilia]";
	612	mes "If you wish to become a servant of God, please apply for the Priest job with Bishop Paul, and complete all 3 trials.";
	613	next;
	614	mes "[Sister Cecilia]";
	615	mes "If you experience a problem during any of your trials, feel free to visit me. I will help you as much as I can.";
	616	close;
	617	case 2:
	618	mes "[Sister Cecilia]";
	619	mes "Make yourself at home. I insist that you recover and take a rest in this Sanctuary. May God bless you...";
	620	close;
	621	}
	622	}
	623	else if (PRIEST_Q == 1) {
	624	mes "Ah, you've started your pilgrimage. Please do your best to accomplish this first trial.";
	625	next;
	626	mes "[Sister Cecilia]";
	627	mes "The first Priest you must meet is Father Rubalkabara. He is in the ruins Northeast of Prontera.";
	628	next;
	629	mes "[Sister Cecilia]";
	630	mes "Travel one field North from Prontera, and then three fields East, and you will arrive at the ruins.";
	631	next;
	632	mes "[Sister Cecilia]";
	633	mes "Of course, you can also head 1 field East from Prontera, then go 1 field north, and then go 2 fields East...";
	634	next;
	635	mes "[Sister Cecilia]";
	636	mes "Father Rubalkabara will be at the entrance of the Prontera Ruins. Be careful. That place is a habitat for aggressive Chocos.";
	637	next;
	638	mes "[Sister Cecilia]";
	639	mes "After meeting Father Rubalkabara, please visit Sister Mathilda and Father Yosuke. You can check your quest progress with me if you have any questions later.";
	640	next;
	641	mes "[Sister Cecilia]";
	642	mes "Well then, have a good journey. Please don't give up to short lived tribulations, and I hope that you accomplish your goals.";
	643	close;
	644	}
	645	else if (PRIEST_Q == 2) {
	646	mes "Oh, you've met Father Rubalkabara. Now it's time for you to visit Sister Mathilda. She is near a town named Morroc.";
	647	next;
	648	mes "[Sister Cecilia]";
	649	mes "She has been training her religious discipline somewhere in a field North of Morroc. If you look around that field, you will be able to find her.";
	650	next;
	651	mes "[Sister Cecilia]";
	652	mes "Of course, sometimes I want to devote myself to training like those other Priests, but I have my duty to assist those Acolytes applying for the Priest job.";
	653	next;
	654	mes "[Sister Cecilia]";
	655	mes "But I believe this is God's will, and that this is the work he has intended me to do as his servant. Have a safe journey, and come back safely.";
	656	close;
	657	}
	658	else if (PRIEST_Q == 3) {
	659	mes "Now, the final Priest that you must meet is Father Yosuke. I've heard that he is training near a lake located Northwest of Prontera.";
	660	next;
	661	mes "[Sister Cecilia]";
	662	mes "From Prontera, travel one field North, and then two fields towards the West. You may also travel two fields West first, and then travel one field to the North.";
	663	next;
	664	mes "[Sister Cecilia]";
	665	mes "Although there are still two trials awaiting you, I have faith that you will be able to accomplish your goal of becoming a Priest...";
	666	close;
	667	}
	668	else if (PRIEST_Q == 4) {
	669	mes "Welcome. You demonstrated great effort to accomplish your first trial. Now, speak to Bishop Paul so that you can begin your next trial on your path to Priesthood.";
	670	next;
	671	mes "[Sister Cecilia]";
	672	if (sex)
	673	mes "Brother "+ strcharinfo(0) +"...";
	674	else
	675	mes "Sister "+ strcharinfo(0) +"...";
	676	mes "The spiritual training is much more difficult than the pilgrimage, but I believe in you.";
	677	next;
	678	mes "[Sister Cecilia]";
	679	mes "I hope that you find someone who has already become a Priest to help during the spiritual training. Good luck, and have faith.";
	680	close;
	681	}
	682	else if (PRIEST_Q == 5) {
	683	mes "Oh, you haven't finished the spiritual training yet?";
	684	next;
	685	mes "[Sister Cecilia]";
	686	mes "I cannot let you know the specific details, but as long as you believe in yourself and have faith in all that is good, you will succeed.";
	687	next;
	688	mes "[Sister Cecilia]";
	689	mes "Please speak to Father Peter in the test hall for more details. He is a close friend of Bishop Paul and may give you some useful tips for the spiritual training.";
	690	close;
	691	}
	692	else if (PRIEST_Q == 6) {
	693	mes "Yes, I understand that you've been through a really difficult situation. However, do not give up and succumb to temptation. You must be able to resist evil to become a Priest.";
	694	next;
	695	mes "[Sister Cecilia]";
	696	mes "If you know somebody who has already become a Priest, ask them to help you during your spiritual training.";
	697	next;
	698	mes "[Sister Cecilia]";
	699	mes "May God give you guidance and protection. When you complete your training, please come back to me.";
	700	close;
	701	}
	702	else if (PRIEST_Q == 7) {
	703	mes "Welcome! I'm so glad to see you've come back! Now, there is one last trial left for you to complete.";
	704	next;
	705	L_AskQuestions:
	706	mes "[Sister Cecilia]";
	707	if (sex)
	708	mes "Brother "+ strcharinfo(0) +"...";
	709	else
	710	mes "Sister "+ strcharinfo(0) +"...";
	711	mes "We will now begin your formal oath for the Priesthood. Make yourself comfortable, and just answer with your heart.";
	712	next;
	713	mes "[Sister Cecilia]";
	714	if (sex)
	715	mes "Brother "+ strcharinfo(0) +",";
	716	else
	717	mes "Sister "+ strcharinfo(0) +",";
	718	mes "Are you willing";
	719	mes "to give your life to God?";
	720	next;
	721	if (select("Yes.:No!") == 2) {
	722	mes "[Sister Cecilia]";
	723	mes "Aw...? How could you give me that kind of answer? I assume you're not ready to be a Priest yet...";
	724	next;
	725	set PRIEST_Q,8;
	726	mes "[Sister Cecilia]";
	727	mes "You should reflect a little more on the teachings of holiness and come back later. You can't be a Priest if your spirit is weak.";
	728	close;
	729	}
	730	mes "[Sister Cecilia]";
	731	mes "Will you take advantage of the holy abilities given by God for selfish, destructive or greedy ends?";
	732	next;
	733	if (select("Yes.:No.") == 1) {
	734	mes "[Sister Cecilia]";
	735	mes "Aw...? God won't grant you the power of holiness if your goals aren't just and pure. Meditate on your motivations for a while, and then come back to me.";
	736	next;
	737	set PRIEST_Q,8;
	738	mes "[Sister Cecilia]";
	739	mes "Think about the qualities that make Priests people of respect. You can't be a Priest if your spirit is not in accordance with God.";
	740	close;
	741	}
	742	mes "[Sister Cecilia]";
	743	mes "Will you help aid others, even complete strangers, in battles by easing their suffering?";
	744	next;
	745	if (select("Yes.:No.") == 2) {
	746	mes "[Sister Cecilia]";
	747	mes "No, no. You've got the wrong idea. God authorizes us to use his power to support his children. You must help people in danger: it is your obligation.";
	748	next;
	749	set PRIEST_Q,8;
	750	mes "[Sister Cecilia]";
	751	mes "Go and observe the adventurers that are fighting for peace in this world. They will teach you what you must do in order to help them.";
	752	close;
	753	}
	754	mes "[Sister Cecilia]";
	755	mes "Are you willing to sacrifice yourself for the sake of others?";
	756	next;
	757	if (select("Yes.:No.") == 2) {
	758	mes "[Sister Cecilia]";
	759	mes "How can you say no...? That's one of the basic principles of Priesthood. You must value the welfare of others over your own safety.";
	760	next;
	761	set PRIEST_Q,8;
	762	mes "[Sister Cecilia]";
	763	mes "Go and think about the value of suffering and the meaning of sacrifice. When you think you understand more about helping those in need, come back to me.";
	764	close;
	765	}
	766	mes "[Sister Cecilia]";
	767	mes "Will you repeatly say the same phrase in public in order to send God's message to his children?";
	768	next;
	769	if (select("Yes.:No.") == 1) {
	770	mes "[Sister Cecilia]";
	771	mes "No no no... You've got it wrong. Even though your purpose is to spread God's message, no one will eagerly accept what you say when you spam text.";
	772	next;
	773	set PRIEST_Q,8;
	774	mes "[Sister Cecilia]";
	775	mes "Remember...";
	776	mes "You must be a moral person, and display maturity and respect to other players. This kind of attitude applies for all classes,";
	777	mes "I believe.";
	778	close;
	779	}
	780	mes "[Sister Cecilia]";
	781	mes "Will you lure many monsters to help your party members level up?";
	782	next;
	783	if (select("Yes.:No.") == 1) {
	784	mes "[Sister Cecilia]";
	785	mes "No, you won't. Luring many monsters does more harm than good. There is no exception. That behavior is totally unacceptable.";
	786	next;
	787	set PRIEST_Q,8;
	788	mes "[Sister Cecilia]";
	789	mes "Even if it looks like you are aiding your party members, such action results in bad karma. Please reflect on that for a while.";
	790	close;
	791	}
	792	mes "[Sister Cecilia]";
	793	mes "Will you follow God, no matter what it takes, even if he demands you to kill yourself?";
	794	next;
	795	if (select("Yes.:No.") == 2) {
	796	mes "[Sister Cecilia]";
	797	mes "With that spirit, you can't be a Priest. If it is God's will to sacrifice yourself for a good purpose, you must carry out God's will as his servant.";
	798	next;
	799	set PRIEST_Q,8;
	800	mes "[Sister Cecilia]";
	801	mes "Besides, God has also given Priests the resurrection power. Think about the meaning of life and death again, and then come back to me.";
	802	close;
	803	}
	804	mes "[Sister Cecilia]";
	805	if (sex)
	806	mes "Brother "+ strcharinfo(0) +"...";
	807	else
	808	mes "Sister "+ strcharinfo(0) +"...";
	809	mes "You have demonstrated your devotion to God. Will you swear to adhere to his teachings for the rest of your days?";
	810	next;
	811	if (select("I do.:No.") == 1) {
	812	set PRIEST_Q,9;
	813	mes "[Sister Cecilia]";
	814	mes "Now, you have completed your oath of Priesthood and accomplished all three trials required to become a Priest.";
	815	next;
	816	mes "[Sister Cecilia]";
	817	mes "Now go to Bishop Paul. And remember, we are all brothers and sisters in the eyes of God. Peace be with you...";
	818	close;
	819	}
	820	mes "[Sister Cecilia]";
	821	mes "...";
	822	next;
	823	mes "[Sister Cecilia]";
	824	mes "...";
	825	mes "......";
	826	next;
	827	set PRIEST_Q,8;
	828	mes "[Sister Cecilia]";
	829	mes "You've come so far...";
	830	mes "Why would you want";
	831	mes "to throw this all away...?";
	832	close;
	833	}
	834	else if (PRIEST_Q == 8) {
	835	mes "...";
	836	next;
	837	mes "[Sister Cecilia]";
	838	mes "Welcome back.";
	839	mes "I hope that you've reflected on what you've said last time, and that you now have the attitude to become a Priest.";
	840	next;
	841	goto L_AskQuestions;
	842	}
	843	else if (PRIEST_Q == 9) {
	844	mes "Congratulations.";
	845	mes "You've completed all three trials required for the Priesthood. Bishop Paul is now waiting for you.";
	846	next;
	847	mes "[Sister Cecilia]";
	848	mes "Peace be with you...";
	849	close;
	850	}
	851	}
	852
	853	// 2nd Test
	854	//==========================================================
	855	job_prist,24,187,4 script Peter S. Alberto 110,{
	856	mes "[Father Peter]";
	857	if (BaseJob == Job_Priest) {
	858	mes "Welcome!";
	859	if (sex)
	860	mes "Brother "+ strcharinfo(0) +"!";
	861	else
	862	mes "Sister "+ strcharinfo(0) +"!";
	863	mes "So good to see you again!";
	864	next;
	865	mes "[Father Peter]";
	866	mes "Are you here to help an Acolyte friend for the spiritual training? That's great~ I think you'll do a good job.";
	867	next;
	868	mes "[Father Peter]";
	869	mes "Remember, no matter how much you want to help this Acolyte, this is not your quest.";
	870	next;
	871	mes "[Father Peter]";
	872	mes "You may assist and lighten your friend's burden, but you take upon this task for yourself.";
	873	next;
	874	mes "[Father Peter]";
	875	mes "So...";
	876	mes "Are you gonna help him right now?";
	877	next;
	878	switch(select("Yes, I am.:Give me a minute.:I changed my mind.")) {
	879	case 1:
	880	mes "[Father Peter]";
	881	mes "Go for it! As your Acolyte enters, the test will begin. Now, I will send you to the testing area.";
	882	close2;
	883	warp "job_prist",24,44;
	884	end;
	885	case 2:
	886	mes "[Father Peter]";
	887	mes "Hm...?";
	888	mes "What for?";
	889	mes "Well, so long as you arrive in time to help your friend, it will be okay.";
	890	close;
	891	case 3:
	892	mes "[Father Peter]";
	893	mes "Oh...?";
	894	mes "Then please,";
	895	mes "go ahead. God bless";
	896	mes "you, and take care!";
	897	close2;
	898	warp "prontera",234,318;
	899	end;
	900	}
	901	}
	902	if (PRIEST_Q == 5) {
	903	mes "Welcome~!";
	904	mes "I congratulate you";
	905	mes "for passing the first trail.";
	906	next;
	907	mes "[Father Peter]";
	908	mes "My name is";
	909	mes "Peter S. Alberto.";
	910	mes "How is my buddy Paul?";
	911	mes "Is he doing alright";
	912	mes "these days?";
	913	next;
	914	mes "[Father Peter]";
	915	mes "Oh, I keep forgetting that he was promoted to Bishop. I think I'm supposed to call him Bishop Paul, or 'His Excellency.' Haha~";
	916	next;
	917	mes "[Father Peter]";
	918	mes "Anyway, let me give you a brief explanation of the spiritual training. Are you familiar with what the spiritual training is for Priests?";
	919	next;
	920	switch(select("Yes, I do.:Sorry...")) {
	921	case 1:
	922	mes "[Father Peter]";
	923	mes "Haha, I like you! But it never hurts to have too much information. The more well informed you are, the more easily you'll pass the test!";
	924	next;
	925	break;
	926	case 2:
	927	mes "[Father Peter]";
	928	mes "Oh, no need to be sorry. I'm here to give you the information you need anyway. So, don't worry.";
	929	next;
	930	break;
	931	}
	932	mes "[Father Peter]";
	933	mes "In spiritual training, you will be defeating evil creatures. Creatures of the Undead and Demons are all evil. In choosing to serve darkness, they are our enemies!";
	934	next;
	935	mes "[Father Peter]";
	936	mes "There are too many evil creatures that roam this world against the will of God. Innocents suffer as a result of their malignance.";
	937	next;
	938	mes "[Father Peter]";
	939	mes "We, as Priests, are obligated to exterminate all those creatures, thus spreading love and peace.";
	940	next;
	941	mes "[Father Peter]";
	942	mes "This training will test your ability to eliminate evil. Since this trial is pretty difficult to be accomplished by yourself,";
	943	mes "I recommend getting help from a Priest if you can.";
	944	next;
	945	mes "[Father Peter]";
	946	mes "If you are close to a Priest, you'd better ask him to assist you during this trial. Now, are you ready?";
	947	next;
	948	switch(select("I'm ready.:Please hold on.:I want to go back.")) {
	949	case 1:
	950	mes "[Father Peter]";
	951	mes "Now, let the spiritual training begin. It's simple. Just kill them all. Show no mercy to the creatures of darkness!";
	952	next;
	953	mes "[Father Peter]";
	954	mes "Now...";
	955	mes "Go for it!";
	956	close2;
	957	warp "job_prist",24,44;
	958	donpcevent "Zombie_Generator#prst::OnEnable";
	959	donpcevent "Peter S. Alberto::OnDisable";
	960	donpcevent "Peter S. Alberto#2::OnEnable";
	961	end;
	962	case 2:
	963	set PRIEST_Q,6;
	964	mes "[Father Peter]";
	965	mes "Hm? What is it you need?";
	966	mes "Well, no problem. You can";
	967	mes "afford to take your time.";
	968	close;
	969	case 3:
	970	set PRIEST_Q,6;
	971	mes "[Father Peter]";
	972	mes "What...?";
	973	mes "You wanna go back??";
	974	next;
	975	mes "[Father Peter]";
	976	mes "I understand. I suppose you have some important reason or business that you must attend to. Come back whenever you can.";
	977	close2;
	978	warp "prontera",234,318;
	979	end;
	980	}
	981	}
	982	else if (PRIEST_Q == 6) {
	983	mes "Are you ready this time?";
	984	mes "Complete this trial quickly,";
	985	mes "and become a Priest!";
	986	next;
	987	mes "[Father Peter]";
	988	mes "Are you ready then?";
	989	next;
	990	switch(select("I'm ready.:Please hold on.:I want to go back.")) {
	991	case 1:
	992	mes "[Father Peter]";
	993	mes "Now, let the spiritual training begin. For the glory of God, for peace on earth, and goodwill towards all men...";
	994	next;
	995	mes "[Father Peter]";
	996	mes "Go...";
	997	mes "Kill those";
	998	mes "misbegotten creatures!";
	999	close2;
	1000	warp "job_prist",24,44;
	1001	donpcevent "Zombie_Generator#prst::OnEnable";
	1002	donpcevent "Peter S. Alberto::OnDisable";
	1003	donpcevent "Peter S. Alberto#2::OnEnable";
	1004	end;
	1005	case 2:
	1006	mes "[Father Peter]";
	1007	mes "Hm? What is it you need?";
	1008	mes "Well, no problem. You can";
	1009	mes "afford to take your time.";
	1010	close;
	1011	case 3:
	1012	mes "[Father Peter]";
	1013	mes "What...?";
	1014	mes "You wanna go back??";
	1015	next;
	1016	mes "[Father Peter]";
	1017	mes "I understand. I suppose you have some important reason or business that you must attend to. Come back whenever you can.";
	1018	close2;
	1019	warp "prontera",234,318;
	1020	end;
	1021	}
	1022	}
	1023	else {
	1024	mes "Go back!";
	1025	close2;
	1026	warp "prontera",234,318;
	1027	end;
	1028	}
	1029
	1030	OnEnable:
	1031	enablenpc "Peter S. Alberto";
	1032	end;
	1033
	1034	OnDisable:
	1035	disablenpc "Peter S. Alberto";
	1036	end;
	1037	}
	1038
	1039	job_prist,23,187,1 script Peter S. Alberto#2 110,{
	1040	mes "[Father Peter]";
	1041	if (BaseJob == Job_Priest) {
	1042	mes "Welcome!";
	1043	if (sex)
	1044	mes "Brother "+ strcharinfo(0) +"!";
	1045	else
	1046	mes "Sister "+ strcharinfo(0) +"!";
	1047	mes "So good to see you!";
	1048	next;
	1049	mes "[Father Peter]";
	1050	mes "Are you here to help an Acolyte friend for the spiritual training? That's great~ I think you'll do a good job.";
	1051	next;
	1052	mes "[Father Peter]";
	1053	mes "Well, another Acolyte is in the training ground right now. You'll need to wait a little bit longer...";
	1054	next;
	1055	mes "[Father Peter]";
	1056	mes "Please come back a little later. If this acolyte's done with the training, I will send you to the training area.";
	1057	close;
	1058	}
	1059	if (PRIEST_Q == 5) {
	1060	mes "Please hold on for a while. Another acolyte is in the training ground right now.";
	1061	next;
	1062	mes "[Father Peter]";
	1063	mes "If you want to take the test, please wait a while and talk to me again.";
	1064	close;
	1065	}
	1066	else if (PRIEST_Q == 6) {
	1067	mes "Please hold on for a while. Another acolyte is in the training ground right now.";
	1068	next;
	1069	mes "[Father Peter]";
	1070	mes "If you want to take the test, please wait a while and talk to me again.";
	1071	close;
	1072	}
	1073	else {
	1074	mes "Peace...";
	1075	mes "Be with you.";
	1076	close2;
	1077	warp "prontera",234,318;
	1078	end;
	1079	}
	1080
	1081	OnInit:
	1082	disablenpc "Peter S. Alberto#2";
	1083	end;
	1084
	1085	OnEnable:
	1086	enablenpc "Peter S. Alberto#2";
	1087	end;
	1088
	1089	OnDisable:
	1090	disablenpc "Peter S. Alberto#2";
	1091	end;
	1092	}
	1093
	1094	- script Zombie_Generator#prst 110,{
	1095	OnInit:
	1096	disablenpc "Zombie_Generator#prst";
	1097	end;
	1098
	1099	OnEnable:
	1100	donpcevent "Zombie1_1::OnEnable";
	1101	donpcevent "Zombie2_1::OnEnable";
	1102	donpcevent "Zombie3_1::OnEnable";
	1103	donpcevent "Zombie4_1::OnEnable";
	1104	donpcevent "Zombie5_1::OnEnable";
	1105	initnpctimer;
	1106	end;
	1107
	1108	Onm1:
	1109	set .MyMobs,13;
	1110	monster "job_prist",24,52,"Theft",1015,1,"Z_C#prst::OnMyMobDead";
	1111	monster "job_prist",18,52,"Want of Virtue",1015,1,"Z_C#prst::OnMyMobDead";
	1112	monster "job_prist",30,52,"Jealousy",1015,1,"Z_C#prst::OnMyMobDead";
	1113	end;
	1114
	1115	Onm2:
	1116	monster "job_prist",21,62,"Fury",1015,1,"Z_C#prst::OnMyMobDead";
	1117	monster "job_prist",27,62,"Envy",1015,1,"Z_C#prst::OnMyMobDead";
	1118	end;
	1119
	1120	Onm3:
	1121	monster "job_prist",24,72,"Arrogance",1015,1,"Z_C#prst::OnMyMobDead";
	1122	monster "job_prist",18,72,"Lewdness",1015,1,"Z_C#prst::OnMyMobDead";
	1123	monster "job_prist",30,72,"Sloth",1015,1,"Z_C#prst::OnMyMobDead";
	1124	end;
	1125
	1126	Onm4:
	1127	monster "job_prist",21,82,"Gluttony",1015,1,"Z_C#prst::OnMyMobDead";
	1128	monster "job_prist",27,82,"Greed",1015,1,"Z_C#prst::OnMyMobDead";
	1129	end;
	1130
	1131	Onm5:
	1132	monster "job_prist",24,92,"Despair",1015,1,"Z_C#prst::OnMyMobDead";
	1133	monster "job_prist",18,92,"Distrust",1015,1,"Z_C#prst::OnMyMobDead";
	1134	monster "job_prist",30,92,"Fear",1015,1,"Z_C#prst::OnMyMobDead";
	1135	end;
	1136
	1137	OnDisable:
	1138	disablenpc "Zombie_Generator#prst";
	1139	killmonsterall "job_prist";
	1140	end;
	1141
	1142	OnTimer300000:
	1143	areawarp "job_prist",8,34,39,109,"prontera",234,318;
	1144	end;
	1145
	1146	OnTimer300500:
	1147	donpcevent "Zombie_Generator#prst::OnDisable";
	1148	end;
	1149
	1150	OnTimer301500:
	1151	donpcevent "Zombie_Generator#prst::OnDisable";
	1152	donpcevent "Peter S. Alberto#2::OnDisable";
	1153	donpcevent "Peter S. Alberto::OnEnable";
	1154	end;
	1155
	1156	OnTimer302000:
	1157	stopnpctimer;
	1158	end;
	1159	}
	1160
	1161	- script Z_C#prst -1,{
	1162	end;
	1163
	1164	OnMyMobDead:
	1165	set getvariableofnpc(.MyMobs,"Zombie_Generator#prst"),getvariableofnpc(.MyMobs,"Zombie_Generator#prst") - 1;
	1166	end;
	1167	}
	1168
	1169	job_prist,24,44,0 script Zombie Info -1,1,1,{
	1170	OnTouch:
	1171	if (BaseJob == Job_Priest) {
	1172	mes "[Father Peter]";
	1173	mes "When the Priest applicant enters, 5 minutes will be given to complete this trial. Proceed slowly and help your Acolyte.";
	1174	next;
	1175	mes "[Father Peter]";
	1176	mes "Enter through the warp at the end of the hall, where you will be lead to the next test hall.";
	1177	next;
	1178	mes "[Father Peter]";
	1179	mes "Remember...";
	1180	mes "This trial must be";
	1181	mes "completed within";
	1182	mes "5 minutes. Best of luck~";
	1183	close;
	1184	}
	1185	else if (BaseJob == Job_Acolyte){
	1186	mes "[Father Peter]";
	1187	mes "I will give you exactly 5 minutes! You must proceed slowly and eliminate the Zombies.";
	1188	next;
	1189	mes "[Father Peter]";
	1190	mes "Slay all the zombies and go through the warp at the end of the hall. Make sure that you kill them all.";
	1191	close;
	1192	}
	1193	end;
	1194	}
	1195
	1196	job_prist,24,52,0 script Zombie1_1 -1,14,1,{
	1197	OnInit:
	1198	disablenpc "Zombie1_1";
	1199	end;
	1200
	1201	OnTouch:
	1202	if (BaseJob == Job_Acolyte) {
	1203	donpcevent "Zombie_Generator#prst::Onm1";
	1204	donpcevent "Zombie1_1::OnDisable";
	1205	}
	1206	end;
	1207
	1208	OnEnable:
	1209	enablenpc "Zombie1_1";
	1210	end;
	1211
	1212	OnDisable:
	1213	disablenpc "Zombie1_1";
	1214	end;
	1215	}
	1216
	1217	job_prist,21,62,0 script Zombie2_1 -1,17,1,{
	1218	OnInit:
	1219	disablenpc "Zombie2_1";
	1220	end;
	1221
	1222	OnTouch:
	1223	if (BaseJob == Job_Acolyte) {
	1224	donpcevent "Zombie_Generator#prst::Onm2";
	1225	donpcevent "Zombie2_1::OnDisable";
	1226	}
	1227	end;
	1228
	1229	OnEnable:
	1230	enablenpc "Zombie2_1";
	1231	end;
	1232
	1233	OnDisable:
	1234	disablenpc "Zombie2_1";
	1235	end;
	1236	}
	1237
	1238	job_prist,24,72,0 script Zombie3_1 -1,14,1,{
	1239	OnInit:
	1240	disablenpc "Zombie3_1";
	1241	end;
	1242
	1243	OnTouch:
	1244	if (BaseJob == Job_Acolyte) {
	1245	donpcevent "Zombie_Generator#prst::Onm3";
	1246	donpcevent "Zombie3_1::OnDisable";
	1247	}
	1248	end;
	1249
	1250	OnEnable:
	1251	enablenpc "Zombie3_1";
	1252	end;
	1253
	1254	OnDisable:
	1255	disablenpc "Zombie3_1";
	1256	end;
	1257	}
	1258
	1259	job_prist,21,82,0 script Zombie4_1 -1,17,1,{
	1260	OnInit:
	1261	disablenpc "Zombie4_1";
	1262	end;
	1263
	1264	OnTouch:
	1265	if (BaseJob == Job_Acolyte) {
	1266	donpcevent "Zombie_Generator#prst::Onm4";
	1267	donpcevent "Zombie4_1::OnDisable";
	1268	}
	1269	end;
	1270
	1271	OnEnable:
	1272	enablenpc "Zombie4_1";
	1273	end;
	1274
	1275	OnDisable:
	1276	disablenpc "Zombie4_1";
	1277	}
	1278
	1279	job_prist,24,92,0 script Zombie5_1 -1,14,1,{
	1280	OnInit:
	1281	disablenpc "Zombie5_1";
	1282	end;
	1283
	1284	OnTouch:
	1285	if (BaseJob == Job_Acolyte) {
	1286	donpcevent "Zombie_Generator#prst::Onm5";
	1287	donpcevent "Zombie5_1::OnDisable";
	1288	}
	1289	end;
	1290
	1291	OnEnable:
	1292	enablenpc "Zombie5_1";
	1293	end;
	1294
	1295	OnDisable:
	1296	disablenpc "Zombie5_1";
	1297	}
	1298
	1299	job_prist,24,109,4 script prst1_1 45,3,3,{
	1300	OnTouch:
	1301	set .@mobs,getvariableofnpc(.MyMobs,"Zombie_Generator#prst");
	1302	if (BaseJob == Job_Priest) warp "job_prist",168,17;
	1303	else if (BaseClass == Job_Acolyte && .@mobs < 1) {
	1304	warp "job_prist",168,17;
	1305	donpcevent "Zombie_Generator#prst::OnDisable";
	1306	donpcevent "Peter S. Alberto#2::OnDisable";
	1307	donpcevent "Peter S. Alberto::OnEnable";
	1308	donpcevent "Zombie_Generator#prst::OnDisable";
	1309	}
	1310	end;
	1311	}
	1312
	1313	// 3rd Test
	1314	//==========================================================
	1315	job_prist,168,45,4 script Deviruchi#prst 1109,8,1,{
	1316	OnTouch:
	1317	if (BaseJob == Job_Priest) {
	1318	mes "[Deviruchi]";
	1319	mes "Whaaaaat...?";
	1320	mes "What are you";
	1321	mes "doing back here?";
	1322	next;
	1323	mes "[Deviruchi]";
	1324	mes "Well, look who's the ^660000BMOC^000000 now. That's '^660000B^000000ig ^660000M^000000an ^660000O^000000n ^660000C^000000ampus,' if you didn't know. By the way, I was being sarcastic. You know, if you didn't notice.";
	1325	next;
	1326	mes "[Deviruchi]";
	1327	mes "Are you really";
	1328	mes "happy being a Priest?";
	1329	mes "There's no possible way.";
	1330	next;
	1331	mes "[Deviruchi]";
	1332	mes "Alright, alright, for old time's sake, I'll let you pass me. But only this once. But I better not catch you again! This is evil turf, you hear?!";
	1333	close;
	1334	}
	1335	if (BaseClass == Job_Acolyte) {
	1336	mes "[Deviruchi]";
	1337	mes "Why...";
	1338	mes "Hello little Aco.";
	1339	next;
	1340	mes "[Deviruchi]";
	1341	mes "You must be here training hard to be a Priest. Funny, I know a lot of God's servants, actually. They tell me that it's really tough serving that God guy all the time. So... So ^666666tiring^000000 and ^666666unrewarding^000000.";
	1342	next;
	1343	mes "[Deviruchi]";
	1344	mes "I mean, people are always crying to Priests for help no matter where they are. And Priests never get anything in return...";
	1345	next;
	1346	mes "[Deviruchi]";
	1347	mes "It's tragic really, how unappreciated Priests are.";
	1348	mes "It's so clear that any job is better. Anything at all...";
	1349	next;
	1350	mes "[Deviruchi]";
	1351	mes "Wouldn't life be so much easier if you weren't a Priest? And it'd be so easy. All you'd have to do is quit right now...";
	1352	next;
	1353	if (select("You're right, I quit!:Out of my sight, demon!") == 1) {
	1354	mes "[Deviruchi]";
	1355	mes "^660000YES~!^000000 I mean...";
	1356	mes "Good for you!";
	1357	next;
	1358	mes "[Deviruchi]";
	1359	mes "Oh...?";
	1360	mes "Look at the ^660000time^000000.";
	1361	mes "You better get going.";
	1362	next;
	1363	mes "[Deviruchi]";
	1364	mes "BWAHAHAHAHAHAH!";
	1365	mes "GET THE JOKE!?";
	1366	close2;
	1367	warp "c_tower2",168,33;
	1368	end;
	1369	}
	1370	mes "[Deviruchi]";
	1371	mes "Out of your sight?";
	1372	mes "I guess I'm not the";
	1373	mes "cutest thing you've";
	1374	mes "ever seen, huh?";
	1375	next;
	1376	mes "[Deviruchi]";
	1377	mes "But how about this...? Now, isn't this an attractive sight? A nice, shiny new card. Mint condition. Not too many people have this you know. But I happen to have soooo many, my pockets hurt.";
	1378	next;
	1379	cutin "¹ÌœºÆ®·¹œºÄ«µå.bmp",4;
	1380	mes "[Deviruchi]";
	1381	mes "Isn't it everyone's dream to have one of these? Think about it, being a Priest can only bring you suffering...";
	1382	next;
	1383	if (select("You're right, I'll take it!:Silence!") == 1) {
	1384	mes "[Deviruchi]";
	1385	mes "Good choice!";
	1386	mes "This card can";
	1387	mes "can be yours...";
	1388	next;
	1389	cutin "¹ÌœºÆ®·¹œºÄ«µå.bmp",255;
	1390	mes "[Deviruchi]";
	1391	mes "Theoretically!";
	1392	mes "BWAHAHAHAHAHAHAHA!";
	1393	mes "Go and earn it yourself!";
	1394	close2;
	1395	warp "mjolnir_05",200,200;
	1396	end;
	1397	}
	1398	cutin "¹ÌœºÆ®·¹œºÄ«µå.bmp",255;
	1399	mes "[Deviruchi]";
	1400	mes "Did...";
	1401	mes "Did you just tell";
	1402	mes "me to shut up?";
	1403	mes "Oh my God...";
	1404	next;
	1405	mes "[Deviruchi]";
	1406	mes "Sorry...";
	1407	mes "Oh ^660000your^000000 God.";
	1408	mes "Fine, get going.";
	1409	mes "But you'll regret";
	1410	mes "your decision later!";
	1411	close;
	1412	}
	1413	end;
	1414	}
	1415
	1416	job_prist,168,80,4 script Doppelganger#prst 1046,8,1,{
	1417	OnTouch:
	1418	if (BaseJob == Job_Priest) {
	1419	mes "[Doppelganger]";
	1420	mes "What are you doing here? You've already made your choice, there's no going back... Priest.";
	1421	next;
	1422	mes "[Doppelganger]";
	1423	mes "Besides, this is none of your business. Whether or not this Acolyte becomes a Priest isn't up to you. Now get out of here, before I get violent.";
	1424	close;
	1425	}
	1426	else if (BaseClass == Job_Acolyte) {
	1427	mes "[Doppelganger]";
	1428	mes "Hold on there, Acolyte.";
	1429	mes "I'm not like Deviruchi,";
	1430	mes "so I won't mince";
	1431	mes "words with you.";
	1432	next;
	1433	mes "[Doppelganger]";
	1434	mes "Now, why would you want to become a Priest? It's such a worthless, thankless job. If you want, I'll give you the chance to become a Novice. Then you can become something much better!";
	1435	next;
	1436	mes "[Doppelganger]";
	1437	mes "Of course, I'll let you redistribute your stat points by your base level. Now, isn't that a sweet deal...?";
	1438	next;
	1439	if (select("Deal, Deal!:No deal... Doppelganger.") == 1) {
	1440	mes "[Doppelganger]";
	1441	mes "Good choice~";
	1442	mes "I shall return your";
	1443	mes "job to a Novice";
	1444	mes "as you wish.";
	1445	next;
	1446	mes "[Doppelganger]";
	1447	mes "Now go!!";
	1448	mes "Never step into";
	1449	mes "the light again!";
	1450	close2;
	1451	warp "gef_dun02",210,177;
	1452	end;
	1453	}
	1454	mes "[Doppelganger]";
	1455	mes "I don't think you understood what I just offered. Think about it again. I mean, this is your one and only chance to undo your life mistakes. I mean, becoming an Acolyte?";
	1456	next;
	1457	mes "[Doppelganger]";
	1458	mes "Just don't become a Priest. I won't ask you more than once. Then you can choose a better job... perhaps a Swordman like me.";
	1459	next;
	1460	if (select("I don't want to be a Priest!:I'll never listen to you!") == 1) {
	1461	mes "[Doppelganger]";
	1462	mes "Excellent choice. Now, never return to this place. I shall return your job to Novice as you wish.";
	1463	next;
	1464	mes "[Doppelganger]";
	1465	mes "Now go!!";
	1466	mes "Never step into";
	1467	mes "the light again!";
	1468	close2;
	1469	warp "gef_dun02",210,177;
	1470	end;
	1471	}
	1472	mes "[Doppelganger]";
	1473	mes "Hmpf. I admire";
	1474	mes "your determination.";
	1475	mes "Okay, you can pass.";
	1476	mes "For now.";
	1477	next;
	1478	mes "[Doppelganger]";
	1479	mes "But if by chance we meet again,";
	1480	mes "I assure you... You won't be happy at all to see me.";
	1481	close;
	1482	}
	1483	}
	1484
	1485	job_prist,168,115,4 script Dark Lord#prst 1272,8,1,{
	1486	OnTouch:
	1487	if (BaseJob == Job_Priest) {
	1488	mes "[Dark Lord]";
	1489	mes "^330033All is doom, darkness and despair! Those who love you will betray you, and all that will be left is grieving and fury!^000000";
	1490	next;
	1491	mes "[Dark Lord]";
	1492	mes "^330033To choose to become a servant of God is to choose eternal pain!";
	1493	mes "I shall personally see to that, mortal.^000000";
	1494	close;
	1495	}
	1496	else if (BaseClass == Job_Acolyte) {
	1497	mes "[Dark Lord]";
	1498	mes "^330033Halt, human.";
	1499	mes "Who has granted";
	1500	mes "you passage?^000000";
	1501	next;
	1502	mes "[Dark Lord]";
	1503	mes "^330033You still wish to become a Priest?! Fool! Then, I shall not let you pass. Go back. Otherwise, you will not survive.^000000";
	1504	next;
	1505	mes "[Dark Lord]";
	1506	mes "^330033It would be so easy for me to snap your fragile body in twain and grind your bones to dust.";
	1507	mes "Now, go back mortal!^000000";
	1508	next;
	1509	if (select("I'm so sorry. Spare me!:God will protect me.") == 1) {
	1510	mes "[Dark Lord]";
	1511	mes "^330033Don't ever come back!^000000";
	1512	close2;
	1513	warp "gl_church",145,170;
	1514	end;
	1515	}
	1516	mes "[Dark Lord]";
	1517	mes "^330033It is no use to feign strength and courage. You are completely helpless before me. Your skills are laughable, and your weapons are but mere toys compared to my power.^000000";
	1518	next;
	1519	mes "[Dark Lord]";
	1520	mes "^330033With just a wave of my hand, you will cease to exist. And no one will remember you. Tremble before the might of my infinite magic!^000000";
	1521	next;
	1522	if (select("I beg you, don't...!:Begone, vile fiend!") == 1) {
	1523	mes "[Dark Lord]";
	1524	mes "^330033Don't ever come back!^000000";
	1525	close2;
	1526	warp "gl_church",145,170;
	1527	end;
	1528	}
	1529	mes "[Dark Lord]";
	1530	mes "^330033Why...";
	1531	mes "Why don't you fear me?!";
	1532	mes "For a frail mortal, you";
	1533	mes "are quite annoying.^000000";
	1534	next;
	1535	mes "[Dark Lord]";
	1536	mes "^330033When next we meet, I will shall escort you to a realm of suffering where you shall spend years immersed in excruciating pain.";
	1537	mes "Mark my words...^000000";
	1538	close;
	1539	}
	1540	}
	1541
	1542	job_prist,168,150,4 script Baphomet#prst 736,8,1,{
	1543	OnTouch:
	1544	if (BaseJob == Job_Priest) {
	1545	mes "[Baphomet]";
	1546	mes "I hate";
	1547	mes "Priests...";
	1548	next;
	1549	mes "[Baphomet]";
	1550	mes "I don't have any business with you, servant of God. Just pass through.";
	1551	close;
	1552	}
	1553	else if (BaseClass == Job_Acolyte) {
	1554	mes "[Baphomet]";
	1555	mes "Greetings.";
	1556	next;
	1557	mes "[Baphomet]";
	1558	mes "..."+ strcharinfo(0) +".";
	1559	next;
	1560	mes "[Baphomet]";
	1561	mes "Yes, human,";
	1562	mes "I know who you are.";
	1563	next;
	1564	mes "[Baphomet]";
	1565	mes "I also know that Deviruchi, Doppelganger and the Dark Lord have all failed to convince you to turn away from the Priesthood.";
	1566	mes "Now, I stand before";
	1567	mes "you to offer a deal.";
	1568	next;
	1569	mes "[Baphomet]";
	1570	mes "I can grant you any treasure you desire and infinite power at your fingertips. Powerful weapons that humans have never before seen...";
	1571	next;
	1572	mes "[Baphomet]";
	1573	mes "Mountains of zeny that you cannot possibly hope to spend in a lifetime. Though, who's to say that your lifespan should be limited? Fame, power, immortality: It can all be yours.";
	1574	next;
	1575	mes "[Baphomet]";
	1576	mes "I will be yours to summon at anytime. All other humans will dread making you their enemy. You will become the most powerful person in all of history!";
	1577	next;
	1578	mes "[Baphomet]";
	1579	mes "Cease this foolishness of pursuing the Priesthood. Make a contract with me. The entire world is yours for the taking.";
	1580	next;
	1581	if (select("Deal.:No, Baphomet. You lose.") == 1) {
	1582	mes "[Baphomet]";
	1583	mes "Then we shall form a contract. You won't ever regret this moment...";
	1584	next;
	1585	mes "[Baphomet]";
	1586	mes "Follow me.";
	1587	mes "We will make the";
	1588	mes "contract in my";
	1589	mes "sanctum of darkness.";
	1590	close2;
	1591	warp "glast_01",200,203;
	1592	end;
	1593	}
	1594	mes "[Baphomet]";
	1595	mes "Foolish human...";
	1596	mes "You have made your choice. I will leave you alone for now, then. However, your training won't be as easy as you think.";
	1597	next;
	1598	mes "[Baphomet]";
	1599	mes "I shall be preparing my troops for you. The day will come when I shall enjoy watching you writhe in agony as my fiends slowly devour you.";
	1600	close;
	1601	}
	1602	}
	1603
	1604	job_prist,168,180,4 script prst2_1 45,3,3,{
	1605	OnTouch:
	1606	if (BaseJob == Job_Priest) warp "job_prist",98,40;
	1607	else if (BaseClass == Job_Acolyte) {
	1608	warp "job_prist",98,40;
	1609	donpcevent "Mummy_Generator::OnEnable";
	1610	}
	1611	end;
	1612	}
	1613
	1614	// 4th Test
	1615	//==========================================================
	1616	job_prist,1,2,1 script Mummy_Generator 110,1,1,{
	1617	OnInit:
	1618	disablenpc "Mummy_Generator";
	1619	end;
	1620
	1621	OnEnable:
	1622	donpcevent "Mummy1_1::OnEnable";
	1623	donpcevent "Mummy2_1::OnEnable";
	1624	donpcevent "Mummy3_1::OnEnable";
	1625	end;
	1626
	1627	Onm1:
	1628	monster "job_prist",90,55,"Khamoz",1041,1;
	1629	monster "job_prist",105,55,"Amocsis",1041,1;
	1630	end;
	1631
	1632	Onm2:
	1633	monster "job_prist",90,70,"Mentuhoteph",1041,1;
	1634	monster "job_prist",105,70,"Akenaten",1041,1;
	1635	end;
	1636
	1637	Onm3:
	1638	monster "job_prist",90,85,"Mehnes",1041,1;
	1639	monster "job_prist",105,85,"Snepheru",1041,1;
	1640	end;
	1641
	1642	OnDisable:
	1643	disablenpc "Mummy_Generator";
	1644	killmonsterall "job_prist";
	1645	end;
	1646	}
	1647
	1648	job_prist,90,55,0 script Mummy1_1 -1,15,1,{
	1649	OnInit:
	1650	disablenpc "Mummy1_1";
	1651	end;
	1652
	1653	OnTouch:
	1654	if (BaseJob == Job_Acolyte) {
	1655	donpcevent "Mummy_Generator::Onm1";
	1656	donpcevent "Mummy1_1::OnDisable";
	1657	}
	1658	end;
	1659
	1660	OnEnable:
	1661	enablenpc "Mummy1_1";
	1662	end;
	1663
	1664	OnDisable:
	1665	disablenpc "Mummy1_1";
	1666	end;
	1667	}
	1668
	1669	job_prist,90,70,0 script Mummy2_1 -1,15,1,{
	1670	OnInit:
	1671	disablenpc "Mummy2_1";
	1672	end;
	1673
	1674	OnTouch:
	1675	if (BaseJob == Job_Acolyte) {
	1676	donpcevent "Mummy_Generator::Onm2";
	1677	donpcevent "Mummy2_1::OnDisable";
	1678	}
	1679	end;
	1680
	1681	OnEnable:
	1682	enablenpc "Mummy2_1";
	1683	end;
	1684
	1685	OnDisable:
	1686	disablenpc "Mummy2_1";
	1687	end;
	1688	}
	1689
	1690	job_prist,90,85,0 script Mummy3_1 -1,15,1,{
	1691	OnInit:
	1692	disablenpc "Mummy3_1";
	1693	end;
	1694
	1695	OnTouch:
	1696	if (BaseJob == Job_Acolyte) {
	1697	donpcevent "Mummy_Generator::Onm3";
	1698	donpcevent "Mummy3_1::OnDisable";
	1699	}
	1700	end;
	1701
	1702	OnEnable:
	1703	enablenpc "Mummy3_1";
	1704	end;
	1705
	1706	OnDisable:
	1707	disablenpc "Mummy3_1";
	1708	end;
	1709	}
	1710
	1711	job_prist,98,105,4 script prst3_1 45,3,3,{
	1712	OnTouch:
	1713	if (BaseJob == Job_Priest) {
	1714	warp "prt_church",15,36;
	1715	end;
	1716	}
	1717	else if (BaseClass == Job_Acolyte) {
	1718	set PRIEST_Q,7;
	1719	warp "prt_church",16,37;
	1720	donpcevent "Mummy_Generator::OnDisable";
	1721	}
	1722	end;
	1723	}
	1724
	1725	// Functions
	1726	//==========================================================
	1727	function script F_FatherRub {
	1728	if (PRIEST_Q != 0) {
	1729	if (PRIEST_Q == 1) {
	1730	mes "Ah yes, so you're the young Acolyte who wishes to become a Priest.";
	1731	next;
	1732	mes "[Father Rubalkabara]";
	1733	mes "I've received the message from Bishop Paul. Since you made the pilgrimage, I hope you accomplish your goal of becoming a Priest.";
	1734	next;
	1735	mes "[Father Rubalkabara]";
	1736	mes "Also, if you have a chance, please visit this abbey again. It's a sacred place for our Church.";
	1737	next;
	1738	mes "[Father Rubalkabara]";
	1739	mes "Well then, please head to your next destination for your pilgrimage. Be safe in your travels.";
	1740	close2;
	1741	savepoint "prt_fild03",361,255;
	1742	set PRIEST_Q,2;
	1743	end;
	1744	}
	1745	else if (PRIEST_Q == 2) {
	1746	mes "Please be hurry to the next destination for your pilgrimage. I hope you become a Priest soon.";
	1747	close;
	1748	}
	1749	mes "May I ask why you have returned? Please go back and continue your religious practice.";
	1750	close;
	1751	}
	1752	mes "I have no idea what brought you here, but please excuse me.";
	1753	close;
	1754	}
	1755
	1756	function script F_MotherMart {
	1757	if (PRIEST_Q != 0) {
	1758	if (PRIEST_Q == 1) {
	1759	mes "Hmm...";
	1760	mes "It seems you're";
	1761	mes "training to become";
	1762	mes "a Priest.";
	1763	next;
	1764	mes "[Mother Mathilda]";
	1765	mes "However, at this point in your pilgrimage, I am not the person that you should be visiting.";
	1766	next;
	1767	mes "[Mother Mathilda]";
	1768	mes "Perhaps you should ask Bishop Paul or Sister Cecilia once again. Well, may God be with you...";
	1769	close;
	1770	}
	1771	else if (PRIEST_Q == 2) {
	1772	mes "Ah, are you";
	1773	mes "a Priest trainee...?";
	1774	mes "Welcome!";
	1775	next;
	1776	mes "[Mother Mathilda]";
	1777	mes "We Priests are obliged to spread the message of God to";
	1778	mes "the peoples of the Earth.";
	1779	next;
	1780	mes "[Mother Mathilda]";
	1781	mes "After you become a Priest, your travels may take you to the Morroc Pyramids. I hope that you may release the Undead there from the evil to which they are bound.";
	1782	next;
	1783	mes "[Mother Mathilda]";
	1784	mes "Well then...";
	1785	mes "I shall pray to";
	1786	mes "God for safety";
	1787	mes "on your journey.";
	1788	close2;
	1789	savepoint "moc_fild07",35,355;
	1790	set PRIEST_Q,3;
	1791	end;
	1792	}
	1793	else if (PRIEST_Q == 3) {
	1794	mes "Please leave soon, and";
	1795	mes "continue your training.";
	1796	close;
	1797	}
	1798	mes "May I ask you the reason you came back? Please continue your training.";
	1799	close;
	1800	}
	1801	mes "May God";
	1802	mes "be with you...";
	1803	close;
	1804	}
	1805
	1806	function script F_FatherYos {
	1807	if (PRIEST_Q != 0) {
	1808	if (PRIEST_Q == 1) {
	1809	mes "Hmm...";
	1810	mes "A Priest trainee, eh?";
	1811	next;
	1812	mes "[Father Yosuke]";
	1813	mes "Well, you got the wrong person. If you're supposed to meet up with me at all, it'd be later.";
	1814	next;
	1815	mes "[Father Yosuke]";
	1816	mes "But that's your own fault.";
	1817	mes "Now, go back to Church, kid.";
	1818	close;
	1819	}
	1820	else if (PRIEST_Q == 2) {
	1821	mes "Hmm...";
	1822	mes "A Priest trainee, eh?";
	1823	next;
	1824	mes "[Father Yosuke]";
	1825	mes "Well, you got the wrong person. If you're supposed to meet up with me at all, it'd be later.";
	1826	next;
	1827	mes "[Father Yosuke]";
	1828	mes "But that's your own fault. Go back to Church.";
	1829	close;
	1830	}
	1831	else if (PRIEST_Q == 3) {
	1832	mes "Hmm.";
	1833	mes "A Priest";
	1834	mes "trainee, eh? ";
	1835	mes "Welcome.";
	1836	next;
	1837	mes "[Father Yosuke]";
	1838	mes "I won't say";
	1839	mes "anything more.";
	1840	mes "Just devote your";
	1841	mes "life to God.";
	1842	next;
	1843	mes "[Father Yosuke]";
	1844	mes "Now go back to church.";
	1845	mes "Hereby, the first of";
	1846	mes "your trials is now";
	1847	mes "completed.";
	1848	close2;
	1849	savepoint "prt_fild00",206,230;
	1850	set PRIEST_Q,4;
	1851	end;
	1852	}
	1853	else if (PRIEST_Q == 4) {
	1854	mes "I told you to go back to church.";
	1855	mes "Or do you want to live with me here for the rest of your life...?";
	1856	close;
	1857	}
	1858	mes "Just go be a Priest. This isn't a playground for kids.";
	1859	close;
	1860	}
	1861	mes "...Acolyte, you don't have any business with me here.";
	1862	close;
	1863	}
	1864

Note: See TracBrowser for help on using the browser.

Context Navigation

root/npc/jobs/2-1/priest.txt @ 1

Download in other formats: