=TalkNpc,Gargola;
        -ifvarless(MonkQuest,40);
        +jump(HossStep0);
        -ifvarless(MonkQuest,50);
        +jump(HossStep40);
        -ifvarless(MonkQuest,60);
        +jump(HossStep50);
        -jump(HossStep100);

=Label,GargStep0;
      *say("Are you the leader of these red caped men?");
      *npcsay("Yes, I lead this small band of worthless monks, and who wants to know?");
      *multi3("I was just interested in the arts of Dark Magic.",Garg0_a,"Don't you think thats... well.. Evil?",Garg0_b,"I will leave you to your torturing",Garg0_c);

=Label,Garg0_a;
      *say("I was just interested in the arts of Dark Magic.");
      *npcsay("You came to the right person.");
      *npcsay("I am in the process of tormenting a soul right now.");
      *say("Who is this poor soul?");
      *npcsay("The head monk of the monestary near the mine. Abbot Hoss.");
      *ifvarless(MonkQuest,30);

      +say("How are you doing this, and what are you doing?");
      +npcsay("That is something you will have to find out yourself");
	+end()

      -say("I know how you are doing this, Its that amulet you wear");
      -npcsay("Yes, this is a magical amulet of chaos and destruction.");
      -npcsay("With it I can cause pain and horror to whoever I wish.");
      -say("May i see it?");
      -npcsay("HA! I do not think so.");
      -npcsay("Only initiates to the red monks are permitted to hold it, during our  ceremonies");
      -npcsay("We do sometimes accept true dark wizard apprentices into our order");
      -npcsay("If you can come back properly attired, we may admit you");
      -npcsay("Oh, and bring us 10 jugs full of wine so we can continue our ritual");
      -say("Alright, ten jars of wine. And the proper clothing?");
      -npcsay("I think you can figure that out.");
      -npcsay("May the evil one fill you with great speed.");
      -say("Umm, right.");
      -Setvar(MonkQuest,40);

=Label,Garg0_b;
      *say("Don't you think thats... well.. Evil?");
      *npcsay("Yes");
      *npcsay("Your point being?");
      *say("oh, nothing, I will leave you to it");
      *npcsay("Very wise. It does not make sense to anger a Red monk");

=Label,Garg0_c;
      *say("I will leave you to your torturing");
      *npcsay("I shall continue until his mind is mine");

=Label,GargStep_40;
      *say("May I join your order now");
	*Ifworn(Black Robe);
	+Ifworn(RedCape);
	+npcsay("You are wearing the robes of the initiate, good");
	-npcsay("You may not join unless you are wearing the robes of the initiate");
      *npcsay("And do you have wine to help us prepare for the initiation?");
	*Ifheld(Wine,1);
	+Jump(Garg40_Wine);
	-say("No, I dont have all the wine yet");
	
=Label,Garg40_Wine;
	*Remove(Wine,1);
	*Mes("You hand a jug of wine to Gargola");
	*Addvar(MonkQuest,1);
	*Ifvarmore(MonkQuest,49);
	+Jump(Garg40_WineGot);
	+End();
	-Ifheld(Wine,1);
	+Jump(Garg40_Wine);
	-say("That is all the wine I have gathered so far");
	-npcsay("Well come back when you have them all, dressed appropriately");

=Label,Garg40_WineGot;
	*npcsay("That is all the wine we need");
	*Ifworn(Black Robe);
	+Ifworn(RedCape);
	+npcsay("And you have the necessary robes of humiliation");
	+jump(GargStop_50);
	-npcsay("Now you just need to be dressed as an initiate should");

=Label,GargStep_50;
	*Ifworn(Black Robe);
	+Ifworn(RedCape);
	+npcsay("You are ready to take part in the ritual");
	-npcsay("You are not properly dressed for the ritual");
	-end()
	*ifheld(Wizard's mind bomb,1);
	-mes("You have nothing to destroy the amulet");
	-Say("I am not quite ready for the ritual, I will be right back");
	-Say("Your arrogance in halting the ritual is evil");
	-Say("With that attitude you could go far in this order");
	-end()
	*npcsay("Swear loyalty by the order");
	*npcsay("Touch the sacred amulet and nevermore leave your brothers");
	*mes("Gargola holds out the amulet for for you to touch");
	*mes("You grab the amulet, and pull it into the Wizards mind bomb");
	*mes("The amulet melts into the drink, destroyed");
	*Remove(Wizard's mind bomb,1);
	*npcsay("What have you done? The amulet is ruined!");
	*npcsay("It was the only one of its kind. Get out, get out get");
	*Setvar(MonkQuest,60);

=Label,Garg_Step100;
	*npcsay("It is you that destroyed the amulet!");
	*npcsay("Kill the deciever!");