// creator  : weidu.exe (version 23100)
// argument : DEGROD.DLG
// game		 : .
// source	 : ./DATA/DIALOG.BIF
// dialog	 : ./DIALOG.TLK
// dialogF  : (none)

BEGIN ~DEGROD~

IF ~NumTimesTalkedTo(0)
~ THEN BEGIN 0 // from:
  SAY #10327 /* ~Your... brother saved you?  I take it you were close?~ */
  IF ~~ THEN REPLY #10382 /* ~Tell me something... did you have much of a family?~ [VICONI84] */ GOTO 1
  IF ~~ THEN REPLY #10383 /* ~Nay, my love. We both yet live and perhaps each of us more fully than before.~ [KELDOR90] */ GOTO 1
  IF ~~ THEN REPLY #10384 /* ~Viconia, you're talking again. I've got no desire to do the same.~ */ GOTO 2
END

IF ~~ THEN BEGIN 1 // from: 0.1 0.0
  SAY #10385 /* ~I've always thought of Gorion as a father and often of Imoen as a sister.~ */
  IF ~~ THEN DO ~CreateCreature("HELMHO",[371.427])
CreateCreature("DOOMGU",[418.460])
CreateCreature("DOOMGU",[326.489])
CreateCreature("STALKE",[351.605])
Enemy()
~ EXIT
END

IF ~~ THEN BEGIN 2 // from: 0.2
  SAY #10386 /* ~Why?  What brings this on?~ */
  IF ~~ THEN REPLY #10389 /* ~To love you is honor enough for any man, Maria.~ */ GOTO 4
  IF ~~ THEN REPLY #10391 /* ~But did not your honor dictate...~ */ GOTO 5
  IF ~~ THEN REPLY #10392 /* ~<CHARNAME>?~ */ GOTO 3
END

IF ~~ THEN BEGIN 3 // from: 4.1 2.2
  SAY #10393 /* ~I wouldn't dare to stand in the way of love. I release you from my service.~ */
  IF ~~ THEN REPLY #10395 /* ~Okay, okay, you have a day but after that I'm going to need your help.~ */ GOTO 4
  IF ~~ THEN REPLY #10396 /* ~My task must not go unfinished. Please, Keldorn, serve until we save Imoen.~ */ GOTO 5
END

IF ~~ THEN BEGIN 4 // from: 3.0 2.0
  SAY #10397 /* ~Thank you, <CHARNAME>. I... I know you were not to blame for his long absence.~ */
  IF ~~ THEN REPLY #10398 /* ~Vesper, Leona, come... I hear that they are holding a circus in the Promenade.~ */ GOTO 5
  IF ~~ THEN REPLY #10399 /* ~A day is more than we have had in years, <CHARNAME>. It's not perfect but it's a start.~ */ GOTO 3
END

IF ~~ THEN BEGIN 5 // from: 4.0 3.1 2.1
  SAY #10400 /* ~And when <CHARNAME>'s friend is found...?~ */
  IF ~~ THEN DO ~SetGlobal("Baldurian","GLOBAL",1)
GiveItem("SCRLPET",LastTalkedToBy)
GiveItem("SCRLPET",LastTalkedToBy)
GiveItem("SCRLPET",LastTalkedToBy)
GiveItem("SCRLPET",LastTalkedToBy)
GiveItem("SCRLPET",LastTalkedToBy)
GiveItem("SCRLPET",LastTalkedToBy)
~ JOURNAL #10414 /* ~~ */ EXIT
END

IF ~!PartyHasItem("HELM07")
~ THEN BEGIN 6 // from:
  SAY #10416 /* ~It shall be my final quest. In fact, I shall submit my resignation to the Order this very week... <CHARNAME>, you know where to find me tomorrow... right here at my estate.~ */
  IF ~~ THEN EXIT
END

IF ~PartyHasItem("HELM07")
~ THEN BEGIN 7 // from:
  SAY #10417 /* ~I... I understand. He is honor-bound to serve you until your quest is done. And when it is, Keldorn, will you take another?~ */
  IF ~~ THEN DO ~GiveGoldForce(5000)
TakePartyItem("HELM07")
CreateCreature("HELMHO",[371.427])
CreateCreature("DOOMGU",[418.460])
CreateCreature("DOOMGU",[326.489])
CreateCreature("STALKE",[351.605])
EscapeArea()
~ EXIT
END
