prt_church,184,41,4 script Cleric#aco 60,{
 if (Upper == 1) {
  if (ADVJOB == Job_High_Priest || ADVJOB == Job_Champion) {
   if (Class == Job_Novice_High) {
    mes "[Father Mareusis]";
    mes "Ah, I sense you have endured";
    mes "a past life experience. You must have learned many things before entering Valhalla.";
    next;
    if (getskilllv("NV_BASIC") < 9) {
     mes "[Father Mareusis]";
     mes "Unfortunately, I don't think you're ready to become an Acolyte yet. Please finish learning all of the Basic Skills first.";
     next;
     mes "[Father Mareusis]";
     mes "In the meantime,";
     mes "I will wait until";
     mes "you are ready.";
     mes "May God be";
     mes "with you.";
     close;
    }
    mes "[Father Mareusis]";
    mes "Well, I welcome you";
    mes "back from Valhalla and";
    mes "wish you luck on your";
    mes "new life's journey.";
    next;
    skill 143,0,0;
    jobchange Job_Acolyte_High;
    skill 156,1,0;
    mes "[Father Mareusis]";
    mes "Now, venture forth and seek those who need your help. May God light your path.";
    close;
   }
   else {
    mes "[Father Mareusis]";
    mes "Now, venture forth to seek people who need your help. May God enlighten your way.";
    close;
   }
  }
  else {
   mes "[Father Mareusis]";
   mes "I sense that you have endured a past life experience. You must have learned many things before entering Valhalla.";
   next;
   mes "[Father Mareusis]";
   mes "However, I can tell that you are not suited to be an Acolyte. Please remember who you were in your past life and find your path.";
   close;
  }
 }
 mes "[Father Mareusis]";
 mes "What is it that you seek?";
 next;
 switch(select("Father, I want to be a Acolyte.:Acolyte Requirements.:Just looking around.")) {
 case 1:
  mes "[Father Mareusis]";
  if (BaseJob == Job_Acolyte) {
   mes "Are you feeling okay today? I can tell by your attire that you are already an Acolyte. You're not joking around, are you?";
   close;
  }
  else if (BaseJob != Job_Novice) {
   mes "I'm sorry, but we can only accept Novices as applicants for the job change to Acolyte.";
   close;
  }
  if (job_acolyte_q == 0) {
   mes "Do you truly";
   mes "wish to become";
   mes "a servant of God?";
   next;
   if (select("Yes Father, I do.:Nope, I lied.") == 1) {
    mes "[Father Mareusis]";
    mes "Good. I accept " + strcharinfo(0) + "'s will to become an Acolyte. You understand that you must do penance before you can become a servant of God, right?";
    next;
    mes "[Father Mareusis]";
    mes "Well, I will";
    mes "give you a mission...";
    switch(rand(3)) {
    default:
     set job_acolyte_q,1; // SET 2
     mes "Please visit ^000077Father Rubalkabara^000000, a member of the Prontera Parish, and return here. He has been practicing asceticism in the ^000077Relics NorthEast of Prontera City^000000.";
     setquest 1001;
     break;
    case 1:
     set job_acolyte_q,2; // SET 3
     mes "Please visit ^000077Mother Mathilda^000000 and then return to me. She has been practicing asceticism near ^000077Morroc Town, SouthWest of Prontera City^000000.";
     setquest 1002;
     break;
    case 2:
     set job_acolyte_q,4; // SET 4
     mes "Please visit ^000077Father Yosuke^000000 and return here. He has been practicing asceticism around ^000077a bridge somewhere NorthWest of Prontera^000000.";
     setquest 1003;
     break;
    }
    next;
    mes "[Father Mareusis]";
    mes "May the grace of God light your path and guide you during your journey of penance.";
    close;
   }
   mes "[Father Mareusis]";
   mes "You lied?";
   mes "It is good that you";
   mes "have confessed your";
   mes "wrongdoing. Go in";
   mes "peace, my son.";
   close;
  }
  mes "Oh, you've come back. Let me check and see if you are ready to serve God. Let's see...";
  next;
  mes "[Father Mareusis]";
  if (getskilllv("NV_BASIC") < 9) {
   mes "Good Lord! Haven't you accomplished the Basic Training yet?! It's important that you finish that!";
   next;
   mes "[Father Mareusis]";
   mes "You should have trained more! Go back and make sure you reach Novice Job Level 9 and learn all of the Basic Skills!";
   close;
  }
  if ( job_acolyte_q & 1 | job_acolyte_q & 2 | job_acolyte_q & 4 ) { // job_acolyte_q < 5
   mes "Oh? I can't find your name on the Registration List.";
   next;
   switch(job_acolyte_q) {
   case 1:
    mes "[Father Mareusis]";
    mes "Please visit ^000077Father Rubalkabara^000000, a member of the Prontera Parish, and return here.";
    next;
    mes "[Father Mareusis]";
    mes "He has been practicing asceticism in the ^000077Relics at the NorthEast of Prontera City^000000.";
    break;
   case 2:
    mes "[Father Mareusis]";
    mes "Please Visit ^000077Mother Mathilda^000000 and return here to me.";
    next;
    mes "[Father Mareusis]";
    mes "She has been practicing asceticism near ^000077Morroc Town, located SouthWest of Prontera City^000000.";
    break;
   case 4:
    mes "[Father Mareusis]";
    mes "Please visit ^000077 Father Yosuke ^000000 and return here to me.";
    next;
    mes "[Father Mareusis]";
    mes "He has been practicing asceticism near a ^000077bridge somewhere to the NorthWest of Prontera^000000.";
    break;
   }
   next;
   mes "[Father Mareusis]";
   mes "May the grace of God brighten your path and guide you on your journey of penance.";
   close;
  }
  mes "Hmm...";
  mes "Your name is on the list and you've proven your qualification.";
  next;
  mes "[Father Mareusis]";
  mes "I am proud to say that you are now ready to become an Acolyte!";
  next;
  skill 143,0,0;
  callfunc "Job_Change",Job_Acolyte;
  callfunc "F_ClearJobVar";
  if(checkquest(1001) != -1) {
   completequest 1001;
  }
  else if(checkquest(1002) != -1) {
   completequest 1002;
  }
  else {
   completequest 1003;
  }
  mes "[Father Mareusis]";
  mes "Always remember to be thankful to God, who is taking care of us all the time.";
  next;
  mes "[Father Mareusis]";
  mes "Always use your gifts to serve Him by helping others. In chaos and times of difficulty, face your hardships with unwavering faith.";
  next;
  mes "[Father Mareusis]";
  mes "Lastly, I want to sincerely congratulate you on persevering through your trial of penance.";
  close;
 case 2:
  mes "[Father Mareusis]";
  mes "Do you wish to become an Acolyte? You must fulfill two requirements.";
  next;
  mes "[Father Mareusis]";
  mes "First, you have to reach at least Novice Job Level 9 and learn all of the Basic Skills. Second, you will be given a trial of penance to overcome.";
  next;
  mes "[Father Mareusis]";
  if (job_acolyte_q) {
   switch(job_acolyte_q) {
   case 1:
    mes "For your trial, please visit ^000077Father Rubalkabara ^000000 and then return here to me.";
    next;
    mes "[Father Mareusis]";
    mes "He is practicing asceticism in the ^000077Relics at the NorthEast of Prontera City^000000.";
    break;
   case 2:
    mes "For your trial, please visit ^000077Mother Mathilda^000000 and return here to me.";
    next;
    mes "[Father Mareusis]";
    mes "She has been practicing asceticism near ^000077Morroc, located to the SouthWest of Prontera City^000000.";
    break;
   default:
    mes "For your trial, please visit ^000077Father Yosuke^000000 and return here to me.";
    next;
    mes "[Father Mareusis]";
    mes "He has been practicing asceticism around a bridge somewhere ^000077NorthWest of Prontera^000000.";
    break;
   }
   next;
   mes "[Father Mareusis]";
   mes "May the grace of God light your path and guide you on your journey of penance.";
  }
  else {
   mes "The destination for this trial will be decided once you fill the application form.";
  }
  next;
  mes "[Father Mareusis]";
  mes "Please come back after fulfilling the two requirements I've asked of you. As long as your desire to serve God and others is sincere, you will be able to make it.";
  close;
 case 3:
  close;
 }
}