//PARSE WITH NORMAL TADS OPERATORS
#pragma C-



FinalRoom:  room
  sdesc = "Marble Hall"
  ldesc = 
  {
    "You blink in suprise as you enter the room. Standing before you is Grand Maester Torval with the heads
    of the four orders behind him, how they arrived here ahead of you is a mystery. ";
    if( Desc.list = [1 1 1 1] ) //GRAND MAESTER
    {
      "The Grand Maester smiles at you with something that can only be described as pride.\n\t<q>You have done 
      well, your actions have shown that you listen to your teachers. That you listen to all of them. The vast 
      majority of students who go through training tend toward one or another of the Sects, often ignoring the 
      teachings of any Maester who does not belong to their chosen Order. A very few though listen and learn 
      from all. I was the last novice to do as you have just done, well over a hundred years ago.</q> Grand 
      Maester Torval chuckles softly to himself, <q>How does it feel to be the next Grand Maester?</q>\n\tYou 
      stare in shocked silence as the words slowly sink in. It isn&rsquo;t until days later that you finally 
      begin to believe. ";
    }
    else if( Desc.Seer = 4 or Desc.Warrior = 4 or Desc.Alchemist = 4 or Desc.Artisan = 4 ) //MAESTER
    {
      "Grand Maester Torval smiles at you and gestures to Maester <<Desc.current.Maester>> who steps forward
      to greet you.\n\t<q>Welcome to the <<Desc.current.sdesc>> Sect.</q> Maester <<Desc.current.Maester>> 
      smiles, <q>You have done well. In every obstacle you faced you behaved as a true <<Desc.current.sdesc>>.
      Very few manage to complete the testing without resorting to the teachings of one of the other Sects. 
      You will go far in our Order, perhaps one day you will even take my place.</q> Maester 
      <<Desc.current.Maester>> turns and leads you toward the <<Desc.current.sdesc>> wing of the Tower. Just
      yesterday you had been forbidden access to these rooms. Much will change now that you are a Maester
      <<Desc.current.sdesc>>. ";
    }
    else if( Desc.Seer = 3 or Desc.Warrior = 3 or Desc.Alchemist = 3 or Desc.Artisan = 3 ) //MAESTER, SECONDARY
    {
      if( Desc.Seer = 3) self.primary := MaesterSeer;  //DESC.CURRENT DOESN'T WORK SO WE SET A NEW PROPERTY
      if( Desc.Warrior = 3) self.primary := MaesterWarrior;
      if( Desc.Alchemist = 3) self.primary := MaesterAlchemist;
      if( Desc.Artisan = 3) self.primary := MaesterArtisan;
      "Maester <<self.primary.Maester>> steps forward and laughs, <q>Well three out of four isn&rsquo;t bad at 
      all. You definitely show an inclination towards the <<self.primary.sdesc>> Sect.</q> He looks at you
      consideringly, <q>Yes, I think you will do well indeed. Perhaps you will even bring new ideas into our
      Sect and increase our knowledge. Well, you have a long day ahead of you, Maester&rsquo;s robes will need
      to be made for you and you&rsquo;ll need to choose a room from those available in the 
      <<self.primary.sdesc>> wing of the tower. Follow me.</q> And with that Maester <<self.primary.Maester>> 
      turns and leads the way to your new life. ";
    }
    else if( Desc.list = [2 2 0 0] or Desc.list = [2 0 2 0] or Desc.list = [2 0 0 2] or Desc.list = [0 2 2 0] or 
             Desc.list = [0 2 0 2] or Desc.list = [0 0 2 2] ) //SPLIT PERSONALITY
    {
      if( Desc.Seer = 2) self.primary := MaesterSeer;  //DESC.CURRENT DOESN'T WORK SO WE SET A NEW PROPERTY
      if( Desc.Warrior = 2) 
      {
        if( self.primary = nil )
          self.primary := MaesterWarrior;
        else
          self.secondary := MaesterWarrior; //AND ANOTHER BECAUSE THERE ARE TWO SECTS INVOLVED NOT ONE
      }
      if( Desc.Alchemist = 2) 
      {
        if( self.primary = nil )
          self.primary := MaesterAlchemist;
        else
          self.secondary := MaesterAlchemist;
      }
      if( Desc.Artisan = 2) self.secondary := MaesterArtisan;
      "Maester <<self.primary.Maester>> and Maester <<self.secondary.Maester>> step forward to either side of
      Grand Maester Torval looking at you approvingly. <q>There is a great need for people like yourself in
      the Tower,</q> Grand Maester Torval begins. <q>Unlike others who show a propensity for a single order,
      you have shown yourself equally knowledgable in both the ways of the <<self.primary.sdesc>> Sect and the
      <<self.secondary.sdesc>> Sect. You will be set apart, studying as you will with any Sect you choose with
      the one goal of increasing understanding between the Orders always before you. Many will look up to you
      and often you will be called upon to make judgements on cases involving more than one Order. Consider
      carefully, and know that the strength of the Tower is on your shoulders for me must always be a single
      whole to make true progress.</q> Maester Torval turns and leads you to your new rooms while the other
      Maesters look on with respect apparent in their eyes. Quite a change from this morning you think. Though
      there are probably a large number of changes coming up in your life now. ";
    }
    else //THIS ACCOUNTS FOR ALL OF THE 211 COMBINATIONS - A WEAK INCLINATION TOWARD A SECT
    {
      if( Desc.Seer = 2) self.primary := MaesterSeer;  //DESC.CURRENT DOESN'T WORK SO WE SET A NEW PROPERTY
      if( Desc.Warrior = 2) self.primary := MaesterWarrior;
      if( Desc.Alchemist = 2) self.primary := MaesterAlchemist;
      if( Desc.Artisan = 2) self.primary := MaesterArtisan;
      "<q>Well,</q> Grand Maester Torval says as he gestures toward <<self.primary.Maester>>, <q>You seem to
      posses a variety of talents in the various Orders.</q> Maester <<self.primary.Maester>> steps forward
      and seems to weigh you with his eyes as Grand Maester Torval continues. <q>Though you favor the
      <<self.primary.sdesc>> Sect your knowledge is not confined to their teachings. Perhaps you will usher
      in a new era in understanding between Orders.</q> Maester <<self.primary.Maester>> eyes Grand Maester
      Torval a bit askance as if he did not like that last statement but smiles at you encouragingly 
      nonetheless. Apparently he is satisfied with the new addition to his Order.\n\tMaester 
      <<self.primary.Maester>> clasps you on the shoulder and begins leading you toward the 
      <<self.primary.sdesc>> wing of the Tower. <q>You have a long road ahead of you today,</q> He says, 
      <q>there is always much to do for a new Maester.</q> ";
    }
    end(); //GAME COMPLETE
  }
;