// creator  : weidu.exe (version 23100)
// argument : _BENTAN.DLG
// game		 : .
// source	 : ./override/_BENTAN.DLG
// dialog	 : ./DIALOG.TLK
// dialogF  : (none)

BEGIN ~_BENTAN~
//////////////////////////////////////////////////
// WARNING: this file contains non-trivial WEIGHTs
//////////////////////////////////////////////////

IF WEIGHT #0 ~NumberOfTimesTalkedTo(0)
~ THEN BEGIN 0 // from:
  SAY #77596 /* ~Ho there!  I am Bentan, most devout follower of the great, broken Ilmater.  I wonder if any of you follow the path of the Crying God?~ */
  IF ~~ THEN REPLY #77597 /* ~Why would we have any reason to follow such a boring and pointless god?~ */ GOTO 1
  IF ~~ THEN REPLY #77598 /* ~No, none of us worship Ilmater.~ */ GOTO 2
  IF ~~ THEN REPLY #77599 /* ~Yes, a few of us do offer daily prayers to the One Who Endures All.~ */ GOTO 3
  IF ~~ THEN REPLY #77600 /* ~Of course!  Not one among our party would think of venerating any but the great god Ilmater.~ */ GOTO 4
  IF ~Global("X#VicBentan","GLOBAL",0)
InParty("viconia")
InMyArea("viconia")
!StateCheck("viconia",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#VicBentan","GLOBAL",1)~ EXTERN ~_VICONJ~ 85
END

IF ~~ THEN BEGIN 1 // from: 0.0
  SAY #77601 /* ~I will forgive your rudeness, for the lot of you must simply be misled.  I wish to explain to you the wonders of Ilmater, so listen closely.~ */
  IF ~~ THEN GOTO 5
END

IF ~~ THEN BEGIN 2 // from: 0.1
  SAY #77602 /* ~So none of you venerate Ilmater.  Well then, we must rectify this at once.  Listen closely while I tell you the wonders that will come once you have converted to Ilmater's faith.~ */
  IF ~~ THEN GOTO 5
END

IF ~~ THEN BEGIN 3 // from: 0.2
  SAY #77603 /* ~Some of you worship Ilmater, but not all?!  Well, all I can say is that those among you who venerate the Crying God must be lax in your duties.  For those among you who have not been enlightened to the true faith, listen closely.~ */
  IF ~~ THEN GOTO 5
END

IF ~~ THEN BEGIN 4 // from: 0.3
  SAY #77604 /* ~Why. I am so pleased to have met such a group!  I am giddy with joy, I think I will have to administer some self-flagellation just to calm myself down.  I would stick around to swap stories, but you know how it is, so many to convert, so little time!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
  IF ~Global("X#BENTAN4","GLOBAL",0)
InParty("imoen")
InMyArea("imoen")
!StateCheck("imoen",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#BENTAN4","GLOBAL",1)~ GOTO 15
  IF ~Global("X#BENTAN4","GLOBAL",0)
InParty("imoen")
InMyArea("imoen")
!StateCheck("imoen",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#BENTAN4","GLOBAL",1)~ EXTERN ~_IMOEN2~ 444
  IF ~Global("X#BENTAN4","GLOBAL",0)
InParty("garrick")
InMyArea("garrick")
!StateCheck("garrick",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#BENTAN4","GLOBAL",1)~ GOTO 17
  IF ~Global("X#BENTAN4","GLOBAL",0)
InParty("garrick")
InMyArea("garrick")
!StateCheck("garrick",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#BENTAN4","GLOBAL",1)~ EXTERN ~_GARRIJ~ 224
END

IF ~~ THEN BEGIN 5 // from: 3.0 2.0 1.0
  SAY #77605 /* ~Now, as you've probably heard, Ilmater is the god of suffering.  Most people immediately perceive this as the suffering one must endure themselves, but trust me, the stories you have heard are most likely wild and unrealistic.  Suffering in the service of Ilmater does eventually come, but Lo!  It is the most joyful of sensations, and opens your eyes to wisdom.  Once you have suffered in the service of Ilmater, you will have your eyes opened to the evils of the world.  Evils such as avarice, greed, lust, perversity, and most especially magic!  By magic, I mean not the holy power granted by Ilmater, but rather the wicked powers wielded by sorcerers!~ */
  IF ~~ THEN REPLY #77606 /* ~You're very boring old man, I think we'll be leaving.~ */ GOTO 6
  IF ~~ THEN REPLY #77607 /* ~Excuse us, but some of us are sorcerers.~ */ GOTO 7
  IF ~~ THEN REPLY #77608 /* ~Keep talking.~ */ GOTO 8
END

IF ~~ THEN BEGIN 6 // from: 5.0
  SAY #77609 /* ~Boring!?  You think that Ilmater is boring?!  WHY you... you... I should... I will be leaving now!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END

IF ~~ THEN BEGIN 7 // from: 5.1
  SAY #77610 /* ~Some of you are Sorcerers!  By all that's good and holy, you must stop your evil ways.  Magic only leads to pain and misery, it is a wicked art I tell you... a wicked art.  Though I find it painful to stand in the presence of such vile necromancers, I will continue my sermon.~ */
  IF ~~ THEN GOTO 8
  IF ~Global("X#QuaBent","GLOBAL",0)
InParty("quayle")
InMyArea("quayle")
!StateCheck("quayle",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#QuaBent","GLOBAL",1)~ EXTERN ~_QUAYLJ~ 22
END

IF ~~ THEN BEGIN 8 // from: 7.0 5.2
  SAY #77611 /* ~All you have to do to become a faithful of Ilmater, is to cast off your worldly possessions.  You will wander the world, and suffer in the place of others.  You will spread the word as I have spread it to you.  Well, what think you?  Will you cast off your possessions and become a faithful of Ilmater?~ */
  IF ~~ THEN REPLY #77612 /* ~Sorry old man, but we have better things to do.~ */ GOTO 9
  IF ~~ THEN REPLY #77613 /* ~What you speak of is intriguing, but we just don't have the time or inclination.~ */ GOTO 10
  IF ~~ THEN REPLY #77614 /* ~Certainly!  We'll get rid of everything we own, right NOW!  You may consider us faithful to Ilmater!~ */ GOTO 11
END

IF ~~ THEN BEGIN 9 // from: 8.0
  SAY #77615 /* ~You are foolish in your decision; your minds obviously clouded by the numerous vices all of you must engage in.  I pity the whole lot of you, goodbye!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END

IF ~~ THEN BEGIN 10 // from: 8.1
  SAY #77616 /* ~I am sorry that you feel that way.  I tried, Ilmater knows I tried!  I hope that your young and gullible minds aren't perverted by the evil forces that roam the world.  Goodbye.~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END

IF ~~ THEN BEGIN 11 // from: 8.2
  SAY #77617 /* ~I am so joyous!  You have made the most important decisions of your lives.  I wish I could guide you in your coming journeys, but that is Ilmater's duty.  Ilmater bless all of you, goodbye!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END

IF WEIGHT #2 /* Triggers after states #: 13 even though they appear after this state */
~True()
~ THEN BEGIN 12 // from:
  SAY #77618 /* ~I am sorry, but I don't have time to stop and chat. I still have to spread the faith.~ */
  IF ~~ THEN EXIT
END

IF WEIGHT #1 ~StateCheck(Myself,STATE_CHARMED)
~ THEN BEGIN 13 // from:
  SAY #77619 /* ~I am but a simple priest.  All I wish to do in my life is convert as many as possible to the faith of Ilmater.~ */
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 14 // from:
  SAY #77620 /* ~I suppose it is appropriate for my faith that I must suffer your company.  I'll not prolong it though.~ */
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 15 // from: 4.1
  SAY #103490 /* ~What was that? Never mind! Farewell!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END

IF ~~ THEN BEGIN 16 // from:
  SAY #103490 /* ~What was that? Never mind! Farewell!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END

IF ~~ THEN BEGIN 17 // from: 4.3
  SAY #103488 /* ~It's very refreshing! You should try it sometime!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
  IF ~  InParty("imoen")
InMyArea("imoen")
!StateCheck("imoen",CD_STATE_NOTVALID)
~ THEN GOTO 18
  IF ~  InParty("imoen")
InMyArea("imoen")
!StateCheck("imoen",CD_STATE_NOTVALID)
~ THEN EXTERN ~_IMOEN2~ 445
END

IF ~~ THEN BEGIN 18 // from: 17.1
  SAY #103490 /* ~What was that? Never mind! Farewell!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END

IF ~~ THEN BEGIN 19 // from:
  SAY #103488 /* ~It's very refreshing! You should try it sometime!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
  IF ~  InParty("imoen")
InMyArea("imoen")
!StateCheck("imoen",CD_STATE_NOTVALID)
~ THEN GOTO 20
  IF ~  InParty("imoen")
InMyArea("imoen")
!StateCheck("imoen",CD_STATE_NOTVALID)
~ THEN EXTERN ~_IMOEN2~ 446
END

IF ~~ THEN BEGIN 20 // from: 19.1
  SAY #103490 /* ~What was that? Never mind! Farewell!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END
