// creator  : weidu.exe (version 23600)
// argument : DRYAD.DLG
// game     : .
// source   : ./override/DRYAD.DLG
// dialog   : lang\en_us/dialog.tlk
// dialogF  : (none)

BEGIN ~DRYAD~

IF ~  NumberOfTimesTalkedTo(0)
~ THEN BEGIN 0 // from:
  SAY #694 /* ~Please, kind spirits, a wondrous ancient oak is in peril. It is about to be attacked by two who would defile the majesty of nature. They have avoided my charms and must be stopped before irreparable harm is done. Would you heed my plea?~ */
  IF ~~ THEN REPLY #5005 /* ~Only the basest villains would take advantage of a gentle forest spirit! Lead on, and I will deal with them!~ */ GOTO 3
  IF ~~ THEN REPLY #5006 /* ~What is one more tree? I have more important tasks!~ */ GOTO 9
  IF ~~ THEN REPLY #5007 /* ~What is my payment for helping you? I don't take risks for free you know.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
  IF ~Global("X#DRYAD0","GLOBAL",0)
InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#DRYAD0","GLOBAL",1)~ GOTO 27
  IF ~Global("X#DRYAD0","GLOBAL",0)
InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#DRYAD0","GLOBAL",1)~ EXTERN ~FALDOJ~ 182
  IF ~Global("X#DRYAD0","GLOBAL",0)
InParty("viconia")
InMyArea("viconia")
!StateCheck("viconia",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#DRYAD0","GLOBAL",1)~ GOTO 29
  IF ~Global("X#DRYAD0","GLOBAL",0)
InParty("viconia")
InMyArea("viconia")
!StateCheck("viconia",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#DRYAD0","GLOBAL",1)~ EXTERN ~VICONJ~ 245
  IF ~Global("X#DRYAD0","GLOBAL",0)
InParty("garrick")
InMyArea("garrick")
!StateCheck("garrick",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#DRYAD0","GLOBAL",1)~ GOTO 33
  IF ~Global("X#DRYAD0","GLOBAL",0)
InParty("garrick")
InMyArea("garrick")
!StateCheck("garrick",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#DRYAD0","GLOBAL",1)~ EXTERN ~GARRIJ~ 237
END

IF ~~ THEN BEGIN 1 // from: 38.2 37.2 36.2 35.2 34.2 33.2 32.2 31.2 30.2 29.2 28.2 27.2 9.1 0.2
  SAY #695 /* ~I have little need or use for treasure you would value. Please! There is little time! Help me?~ */
  IF ~~ THEN REPLY #5008 /* ~As you wish, though I seldom work for charity. Lead on.~ */ GOTO 11
  IF ~~ THEN REPLY #5010 /* ~If there is to be no reward, there will be no help.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",2)
~ GOTO 2
  IF ~Global("X#JaheiraDryad1","GLOBAL",0)
InParty("jaheira")
InMyArea("jaheira")
!StateCheck("jaheira",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#JaheiraDryad1","GLOBAL",1)~ EXTERN ~JAHEIJ~ 122
END

IF ~~ THEN BEGIN 2 // from: 16.1 1.1
  SAY #696 /* ~But I possess nothing but my knowledge of the wood! Wait, I could give you information! I have heard from the birds of a "shiny pile" not far from here! I do not know what is there because neither I nor the birds have ever cared to know. Will this be enough?~ */
  IF ~~ THEN REPLY #5011 /* ~Your offer is now to my liking. I am always glad to help those in need. Especially for a good price.~ */ GOTO 12
  IF ~~ THEN REPLY #5013 /* ~The rumors of birds have no interest for me. If you've nothing tangible then I am leaving.~ */ GOTO 4
END

IF ~~ THEN BEGIN 3 // from: AJANTJ:116.0 38.0 37.0 36.0 35.0 34.0 33.0 32.0 31.0 30.0 29.0 28.0 27.0 9.0 0.0
  SAY #697 /* ~I thank you, for although they seem dim of wit, they still could do much damage. This way.~ */
  IF ~~ THEN UNSOLVED_JOURNAL #27005 /* ~Dryad of the Cloud Peaks
While traveling the Cloud Peaks I met a dryad. She asked that I help protect her tree. How could I refuse such a request?~ */ GOTO 13
END

IF ~~ THEN BEGIN 4 // from: 9.2 2.1
  SAY #699 /* ~I shall find aid elsewhere. Do not tarry in my wood, for it will not be a restful stay.~ */
  IF ~  OR(3)
!InParty("ajantis")
!InMyArea("ajantis")
StateCheck("ajantis",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("SPRITE_IS_DEADCDryad","GLOBAL",1)
EraseJournalEntry(27005)
EscapeArea()
~ SOLVED_JOURNAL #27006 /* ~Dryad of the Cloud Peaks
I have angered a dryad near the Cloud Peaks and have been warned out of "her" wood. It's of little concern. She also directed me to look into a wolf cave just to the south, where a treasure cache is hidden.~ */ EXIT
  IF ~  InParty("ajantis")
InMyArea("ajantis")
!StateCheck("ajantis",CD_STATE_NOTVALID)
Global("X#AjantisProtectDryade","GLOBAL",0)
~ THEN EXTERN ~AJANTJ~ 116
  IF ~Global("X#DRYAD4","GLOBAL",0)
InParty("jaheira")
InMyArea("jaheira")
!StateCheck("jaheira",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#DRYAD4","GLOBAL",1)~ GOTO 39
  IF ~Global("X#DRYAD4","GLOBAL",0)
InParty("jaheira")
InMyArea("jaheira")
!StateCheck("jaheira",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#DRYAD4","GLOBAL",1)~ EXTERN ~JAHEIJ~ 437
  IF ~Global("X#DRYAD4","GLOBAL",0)
InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#DRYAD4","GLOBAL",1)~ GOTO 41
  IF ~Global("X#DRYAD4","GLOBAL",0)
InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#DRYAD4","GLOBAL",1)~ EXTERN ~BFALDO~ 339
END

IF ~~ THEN BEGIN 5 // from:
  SAY #700 /* ~Leave at once foul creatures! Lay not a finger upon this place or suffer the consequences!~ */
  IF ~~ THEN EXTERN ~CALDO~ 10
END

IF ~  OR(2)
!InParty("xzar")
Dead("xzar")
Dead("Caldo")
Dead("Krumm")
Global("AskedDryad","GLOBAL",0)
~ THEN BEGIN 6 // from:
  SAY #701 /* ~Thanks be to you! Here is a potion that might help you on your journeys.~ */
  IF ~~ THEN DO ~GiveItem("POTN20",LastTalkedToBy)
AddexperienceParty(500)
ReputationInc(1)
EraseJournalEntry(27005)
EscapeAreaDestroy(5)
~ SOLVED_JOURNAL #27007 /* ~Dryad of the Cloud Peaks
I have curried the favor of a dryad in the Cloud Peak mountains. Pleasing such spirits of nature will bring me no end of luck.~ */ EXIT
END

IF ~  OR(2)
!InParty("xzar")
Dead("xzar")
Dead("Caldo")
Dead("Krumm")
Global("AskedDryad","GLOBAL",1)
~ THEN BEGIN 7 // from:
  SAY #702 /* ~I thank you, though grudgingly. Perhaps I have something to give you, though it is not much. Please, leave me to fix what damage was done.~ */
  IF ~~ THEN DO ~GiveItem("POTN08",LastTalkedToBy)
AddexperienceParty(500)
ReputationInc(1)
EraseJournalEntry(27005)
EscapeAreaDestroy(5)
~ SOLVED_JOURNAL #27007 /* ~Dryad of the Cloud Peaks
I have curried the favor of a dryad in the Cloud Peak mountains. Pleasing such spirits of nature will bring me no end of luck.~ */ EXIT
END

IF ~  OR(2)
!InParty("xzar")
Dead("xzar")
Dead("Caldo")
Dead("Krumm")
Global("AskedDryad","GLOBAL",2)
~ THEN BEGIN 8 // from:
  SAY #703 /* ~You have done as you said you would, and here is the price you have exacted: directions to the cache and a cold farewell. Do not stay long in my wood. You are not welcome. You will find the treasure cache in the wolf cave just 100 feet south of my tree.~ */
  IF ~~ THEN DO ~GivePartyGold(20)
AddexperienceParty(300)
EraseJournalEntry(27005)
EscapeAreaDestroy(5)
~ SOLVED_JOURNAL #27006 /* ~Dryad of the Cloud Peaks
I have angered a dryad near the Cloud Peaks and have been warned out of "her" wood. It's of little concern. She also directed me to look into a wolf cave just to the south, where a treasure cache is hidden.~ */ EXIT
END

IF ~~ THEN BEGIN 9 // from: 38.1 37.1 36.1 35.1 34.1 33.1 32.1 31.1 30.1 29.1 28.1 27.1 0.1
  SAY #5009 /* ~One more tree?! Even if this were just "one more tree," it would still be priceless to me! As it is, it is the tree to which I am bonded! If it dies, I die. Please help.~ */
  IF ~~ THEN REPLY #5012 /* ~My apologies, I will do whatever I can to help.~ */ GOTO 3
  IF ~~ THEN REPLY #5015 /* ~So it is extra important to you? Then certainly you should be willing to pay well for my help!~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
  IF ~~ THEN REPLY #5016 /* ~Linked with you or not, it is still none of my concern. I must leave now.~ */ GOTO 4
END

IF ~~ THEN BEGIN 10 // from:
  SAY #5036 /* ~I shall find aid elsewhere. Do not tarry in my wood, for it will not be a restful stay.~ */
  IF ~  OR(3)
!InParty("ajantis")
!InMyArea("ajantis")
StateCheck("ajantis",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("SPRITE_IS_DEADCDryad","GLOBAL",1)
EraseJournalEntry(27005)
EscapeArea()
~ SOLVED_JOURNAL #27006 /* ~Dryad of the Cloud Peaks
I have angered a dryad near the Cloud Peaks and have been warned out of "her" wood. It's of little concern. She also directed me to look into a wolf cave just to the south, where a treasure cache is hidden.~ */ EXIT
  IF ~  InParty("ajantis")
InMyArea("ajantis")
!StateCheck("ajantis",CD_STATE_NOTVALID)
Global("X#AjantisProtectDryade","GLOBAL",0)
~ THEN EXTERN ~AJANTJ~ 116
END

IF ~~ THEN BEGIN 11 // from: 16.0 1.0
  SAY #5037 /* ~And I seldom wish to deal with those of such mercantile persuasion. I thank you regardless. This way.~ */
  IF ~~ THEN UNSOLVED_JOURNAL #27005 /* ~Dryad of the Cloud Peaks
While traveling the Cloud Peaks I met a dryad. She asked that I help protect her tree. How could I refuse such a request?~ */ GOTO 14
END

IF ~~ THEN BEGIN 12 // from: 2.0
  SAY #5038 /* ~I thank you, though your greed has cost precious time. Please come now, as these intruders do not seem to understand the damage they could do. This way.~ */
  IF ~~ THEN UNSOLVED_JOURNAL #27005 /* ~Dryad of the Cloud Peaks
While traveling the Cloud Peaks I met a dryad. She asked that I help protect her tree. How could I refuse such a request?~ */ GOTO 15
END

IF ~  False()
~ THEN BEGIN 13 // from: 3.0
  SAY #5039 /* ~There, they are just ahead. I implore you, do what you must to make them leave.~ */
  IF ~~ THEN DO ~MoveToPoint([3236.2157])
~ EXIT
END

IF ~  False()
~ THEN BEGIN 14 // from: 11.0
  SAY #5040 /* ~There, they are just ahead. I implore you, do what you must to make them leave.~ */
  IF ~~ THEN DO ~MoveToPoint([3236.2157])
~ EXIT
END

IF ~  False()
~ THEN BEGIN 15 // from: 12.0
  SAY #5041 /* ~There, they are just ahead. I implore you, do what you must to make them leave.~ */
  IF ~~ THEN DO ~MoveToPoint([3236.2157])
~ EXIT
END

IF ~~ THEN BEGIN 16 // from:
  SAY #45260 /* ~If pay I must, I will!~ */
  IF ~~ THEN REPLY #5008 /* ~As you wish, though I seldom work for charity. Lead on.~ */ GOTO 11
  IF ~~ THEN REPLY #5010 /* ~If there is to be no reward, there will be no help.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",2)
~ GOTO 2
END

IF ~~ THEN BEGIN 17 // from: AJANTJ:116.1
  SAY #46140 /* ~So shall it be. May the spirits of the forest haunt you.~ */
  IF ~~ THEN DO ~SetGlobal("SPRITE_IS_DEADCDryad","GLOBAL",1)
EraseJournalEntry(27005)
EscapeArea()
~ SOLVED_JOURNAL #27006 /* ~Dryad of the Cloud Peaks
I have angered a dryad near the Cloud Peaks and have been warned out of "her" wood. It's of little concern. She also directed me to look into a wolf cave just to the south, where a treasure cache is hidden.~ */ EXIT
END

IF ~  Dead("caldo")
Dead("krumm")
Global("AskedDryad","GLOBAL",0)
InParty("xzar")
InMyArea("xzar")
!StateCheck("xzar",CD_STATE_NOTVALID)
Global("X#XzarDryad","GLOBAL",0)
~ THEN BEGIN 18 // from:
  SAY #49418 /* ~Thanks be to you! ~ */
  IF ~~ THEN EXTERN ~XZARJ~ 188
END

IF ~  Global("X#XzarDryad","GLOBAL",2)
~ THEN BEGIN 19 // from: AJANTJ:201.1 AJANTJ:200.1 AJANTJ:199.1 DYNAHJ:132.1 DYNAHJ:131.1 DYNAHJ:130.1
  SAY #49430 /* ~But... why... you helped me! Why?~ */
  IF ~~ THEN EXTERN ~XZARJ~ 190
END

IF ~  Global("X#XzarDryad","GLOBAL",5)
~ THEN BEGIN 20 // from:
  SAY #49432 /* ~No... no... my lifeblood... my soul... I am dying...~ */
  IF ~~ THEN DO ~SetGlobal("X#XzarDryad","GLOBAL",6)
SetGlobal("X#SummonForest","GLOBAL",1)
Enemy()
ActionOverride("jaheira",LeaveParty())
ActionOverride("jaheira",Enemy())
ActionOverride("kivan",LeaveParty())
ActionOverride("kivan",Enemy())
ActionOverride("faldorn",LeaveParty())
ActionOverride("faldorn",Enemy())
ActionOverride("minsc",LeaveParty())
ActionOverride("minsc",Enemy())
ActionOverride("khalid",LeaveParty())
ActionOverride("khalid",Enemy())
ActionOverride("ajantis",LeaveParty())
ActionOverride("ajantis",Enemy())
ActionOverride("dynaheir",LeaveParty())
ActionOverride("dynaheir",Enemy())
~ SOLVED_JOURNAL #49433 /* ~Dryad's Blood

Xzar, my companion, drained blood of a Dryad in the Cloudpeak mountains. She then attacked us, stupid cow.~ */ EXIT
END

IF ~~ THEN BEGIN 21 // from:
  SAY #49472 /* ~Eeehh! These mortals be more wicked than the last!~ */
  IF ~~ THEN DO ~SetGlobal("X#XzarDryad","GLOBAL",3)
AddexperienceParty(500)
EscapeAreaDestroy(5)
~ SOLVED_JOURNAL #49473 /* ~Dryad of Cloudpeaks

I tried to help a Dryad in the Cloudpeak mountains. Pleasing such nature spirits would normally bring me no end of luck, yet Xzar sort of mucked up the overall impression...~ */ EXTERN ~XZARJ~ 212
END

IF ~  Dead("caldo")
Dead("krumm")
Global("AskedDryad","GLOBAL",1)
InParty("xzar")
InMyArea("xzar")
!StateCheck("xzar",CD_STATE_NOTVALID)
Global("X#XzarDryad","GLOBAL",0)
~ THEN BEGIN 22 // from:
  SAY #49475 /* ~I thank you, though grudgingly.~ */
  IF ~~ THEN EXTERN ~XZARJ~ 213
END

IF ~~ THEN BEGIN 23 // from:
  SAY #49472 /* ~Eeehh! These mortals be more wicked than the last!~ */
  IF ~~ THEN DO ~SetGlobal("X#XzarDryad","GLOBAL",3)
AddexperienceParty(500)
EscapeAreaDestroy(5)
~ SOLVED_JOURNAL #49473 /* ~Dryad of Cloudpeaks

I tried to help a Dryad in the Cloudpeak mountains. Pleasing such nature spirits would normally bring me no end of luck, yet Xzar sort of mucked up the overall impression...~ */ EXTERN ~XZARJ~ 212
END

IF ~  Dead("caldo")
Dead("krumm")
Global("AskedDryad","GLOBAL",2)
InParty("xzar")
InMyArea("xzar")
!StateCheck("xzar",CD_STATE_NOTVALID)
Global("X#XzarDryad","GLOBAL",0)
~ THEN BEGIN 24 // from:
  SAY #49478 /* ~You have done as you said you would.~ */
  IF ~~ THEN EXTERN ~XZARJ~ 216
END

IF ~~ THEN BEGIN 25 // from:
  SAY #49472 /* ~Eeehh! These mortals be more wicked than the last!~ */
  IF ~~ THEN GOTO 26
END

IF ~~ THEN BEGIN 26 // from: 25.0
  SAY #49479 /* ~As... as for the price you have exacted... Directions to the cache, and a cold farewell. Do not stay long in my wood. You are not welcome. You will find the treasure cache in the wolf cave just hundred feet south of my tree.~ */
  IF ~~ THEN DO ~SetGlobal("X#XzarDryad","GLOBAL",3)
AddexperienceParty(500)
EscapeAreaDestroy(5)
~ SOLVED_JOURNAL #49480 /* ~Dryad of Cloudpeaks

I have angered a Dryad near the Cloudpeaks, and have been warned out of "her" wood. Xzar with his crazy ideas did not help any. Ah, well, it's of little concern. She also directed me to look into a wolf cave just to the south, where a treasure cache hidden.~ */ EXTERN ~XZARJ~ 212
END

IF ~~ THEN BEGIN 27 // from: 0.3
  SAY #50320 /* ~Thank you, O servant of Silvanus.~ */
  IF ~~ THEN REPLY #5005 /* ~Only the basest villains would take advantage of a gentle forest spirit! Lead on, and I will deal with them!~ */ GOTO 3
  IF ~~ THEN REPLY #5006 /* ~What is one more tree? I have more important tasks!~ */ GOTO 9
  IF ~~ THEN REPLY #5007 /* ~What is my payment for helping you? I don't take risks for free you know.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
END

IF ~~ THEN BEGIN 28 // from:
  SAY #50320 /* ~Thank you, O servant of Silvanus.~ */
  IF ~~ THEN REPLY #5005 /* ~Only the basest villains would take advantage of a gentle forest spirit! Lead on, and I will deal with them!~ */ GOTO 3
  IF ~~ THEN REPLY #5006 /* ~What is one more tree? I have more important tasks!~ */ GOTO 9
  IF ~~ THEN REPLY #5007 /* ~What is my payment for helping you? I don't take risks for free you know.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
END

IF ~~ THEN BEGIN 29 // from: 0.5
  SAY #50318 /* ~Oh, please, I am in peril and need the help of brave adventurers like yourselves!~ */
  IF ~~ THEN REPLY #5005 /* ~Only the basest villains would take advantage of a gentle forest spirit! Lead on, and I will deal with them!~ */ GOTO 3
  IF ~~ THEN REPLY #5006 /* ~What is one more tree? I have more important tasks!~ */ GOTO 9
  IF ~~ THEN REPLY #5007 /* ~What is my payment for helping you? I don't take risks for free you know.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN GOTO 30
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN EXTERN ~FALDOJ~ 183
END

IF ~~ THEN BEGIN 30 // from: 29.3
  SAY #50320 /* ~Thank you, O servant of Silvanus.~ */
  IF ~~ THEN REPLY #5005 /* ~Only the basest villains would take advantage of a gentle forest spirit! Lead on, and I will deal with them!~ */ GOTO 3
  IF ~~ THEN REPLY #5006 /* ~What is one more tree? I have more important tasks!~ */ GOTO 9
  IF ~~ THEN REPLY #5007 /* ~What is my payment for helping you? I don't take risks for free you know.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
END

IF ~~ THEN BEGIN 31 // from:
  SAY #50318 /* ~Oh, please, I am in peril and need the help of brave adventurers like yourselves!~ */
  IF ~~ THEN REPLY #5005 /* ~Only the basest villains would take advantage of a gentle forest spirit! Lead on, and I will deal with them!~ */ GOTO 3
  IF ~~ THEN REPLY #5006 /* ~What is one more tree? I have more important tasks!~ */ GOTO 9
  IF ~~ THEN REPLY #5007 /* ~What is my payment for helping you? I don't take risks for free you know.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN GOTO 32
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN EXTERN ~FALDOJ~ 184
END

IF ~~ THEN BEGIN 32 // from: 31.3
  SAY #50320 /* ~Thank you, O servant of Silvanus.~ */
  IF ~~ THEN REPLY #5005 /* ~Only the basest villains would take advantage of a gentle forest spirit! Lead on, and I will deal with them!~ */ GOTO 3
  IF ~~ THEN REPLY #5006 /* ~What is one more tree? I have more important tasks!~ */ GOTO 9
  IF ~~ THEN REPLY #5007 /* ~What is my payment for helping you? I don't take risks for free you know.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
END

IF ~~ THEN BEGIN 33 // from: 0.7
  SAY #50316 /* ~You speak truth, even if you are dressed like a city-dweller.~ */
  IF ~~ THEN REPLY #5005 /* ~Only the basest villains would take advantage of a gentle forest spirit! Lead on, and I will deal with them!~ */ GOTO 3
  IF ~~ THEN REPLY #5006 /* ~What is one more tree? I have more important tasks!~ */ GOTO 9
  IF ~~ THEN REPLY #5007 /* ~What is my payment for helping you? I don't take risks for free you know.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN GOTO 35
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN EXTERN ~FALDOJ~ 185
  IF ~  InParty("viconia")
InMyArea("viconia")
!StateCheck("viconia",CD_STATE_NOTVALID)
~ THEN GOTO 34
  IF ~  InParty("viconia")
InMyArea("viconia")
!StateCheck("viconia",CD_STATE_NOTVALID)
~ THEN EXTERN ~VICONJ~ 246
END

IF ~~ THEN BEGIN 34 // from: 33.5
  SAY #50318 /* ~Oh, please, I am in peril and need the help of brave adventurers like yourselves!~ */
  IF ~~ THEN REPLY #5005 /* ~Only the basest villains would take advantage of a gentle forest spirit! Lead on, and I will deal with them!~ */ GOTO 3
  IF ~~ THEN REPLY #5006 /* ~What is one more tree? I have more important tasks!~ */ GOTO 9
  IF ~~ THEN REPLY #5007 /* ~What is my payment for helping you? I don't take risks for free you know.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN GOTO 35
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN EXTERN ~FALDOJ~ 185
END

IF ~~ THEN BEGIN 35 // from: 34.3 33.3
  SAY #50320 /* ~Thank you, O servant of Silvanus.~ */
  IF ~~ THEN REPLY #5005 /* ~Only the basest villains would take advantage of a gentle forest spirit! Lead on, and I will deal with them!~ */ GOTO 3
  IF ~~ THEN REPLY #5006 /* ~What is one more tree? I have more important tasks!~ */ GOTO 9
  IF ~~ THEN REPLY #5007 /* ~What is my payment for helping you? I don't take risks for free you know.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
END

IF ~~ THEN BEGIN 36 // from:
  SAY #50316 /* ~You speak truth, even if you are dressed like a city-dweller.~ */
  IF ~~ THEN REPLY #5005 /* ~Only the basest villains would take advantage of a gentle forest spirit! Lead on, and I will deal with them!~ */ GOTO 3
  IF ~~ THEN REPLY #5006 /* ~What is one more tree? I have more important tasks!~ */ GOTO 9
  IF ~~ THEN REPLY #5007 /* ~What is my payment for helping you? I don't take risks for free you know.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN GOTO 38
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN EXTERN ~FALDOJ~ 186
  IF ~  InParty("viconia")
InMyArea("viconia")
!StateCheck("viconia",CD_STATE_NOTVALID)
~ THEN GOTO 37
  IF ~  InParty("viconia")
InMyArea("viconia")
!StateCheck("viconia",CD_STATE_NOTVALID)
~ THEN EXTERN ~VICONJ~ 247
END

IF ~~ THEN BEGIN 37 // from: 36.5
  SAY #50318 /* ~Oh, please, I am in peril and need the help of brave adventurers like yourselves!~ */
  IF ~~ THEN REPLY #5005 /* ~Only the basest villains would take advantage of a gentle forest spirit! Lead on, and I will deal with them!~ */ GOTO 3
  IF ~~ THEN REPLY #5006 /* ~What is one more tree? I have more important tasks!~ */ GOTO 9
  IF ~~ THEN REPLY #5007 /* ~What is my payment for helping you? I don't take risks for free you know.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN GOTO 38
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN EXTERN ~FALDOJ~ 186
END

IF ~~ THEN BEGIN 38 // from: 37.3 36.3
  SAY #50320 /* ~Thank you, O servant of Silvanus.~ */
  IF ~~ THEN REPLY #5005 /* ~Only the basest villains would take advantage of a gentle forest spirit! Lead on, and I will deal with them!~ */ GOTO 3
  IF ~~ THEN REPLY #5006 /* ~What is one more tree? I have more important tasks!~ */ GOTO 9
  IF ~~ THEN REPLY #5007 /* ~What is my payment for helping you? I don't take risks for free you know.~ */ DO ~SetGlobal("AskedDryad","GLOBAL",1)
~ GOTO 1
END

IF ~~ THEN BEGIN 39 // from: 4.2
  SAY #50324 /* ~I must find help!~ */
  IF ~  OR(3)
!InParty("ajantis")
!InMyArea("ajantis")
StateCheck("ajantis",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("SPRITE_IS_DEADCDryad","GLOBAL",1)
EraseJournalEntry(27005)
EscapeArea()
~ SOLVED_JOURNAL #27006 /* ~Dryad of the Cloud Peaks
I have angered a dryad near the Cloud Peaks and have been warned out of "her" wood. It's of little concern. She also directed me to look into a wolf cave just to the south, where a treasure cache is hidden.~ */ EXIT
  IF ~  InParty("ajantis")
InMyArea("ajantis")
!StateCheck("ajantis",CD_STATE_NOTVALID)
Global("X#AjantisProtectDryade","GLOBAL",0)
~ THEN EXTERN ~AJANTJ~ 116
END

IF ~~ THEN BEGIN 40 // from:
  SAY #50324 /* ~I must find help!~ */
  IF ~  OR(3)
!InParty("ajantis")
!InMyArea("ajantis")
StateCheck("ajantis",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("SPRITE_IS_DEADCDryad","GLOBAL",1)
EraseJournalEntry(27005)
EscapeArea()
~ SOLVED_JOURNAL #27006 /* ~Dryad of the Cloud Peaks
I have angered a dryad near the Cloud Peaks and have been warned out of "her" wood. It's of little concern. She also directed me to look into a wolf cave just to the south, where a treasure cache is hidden.~ */ EXIT
  IF ~  InParty("ajantis")
InMyArea("ajantis")
!StateCheck("ajantis",CD_STATE_NOTVALID)
Global("X#AjantisProtectDryade","GLOBAL",0)
~ THEN EXTERN ~AJANTJ~ 116
END

IF ~~ THEN BEGIN 41 // from: 4.4
  SAY #50322 /* ~Please, help me, druid!~ */
  IF ~  OR(3)
!InParty("ajantis")
!InMyArea("ajantis")
StateCheck("ajantis",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("SPRITE_IS_DEADCDryad","GLOBAL",1)
EraseJournalEntry(27005)
EscapeArea()
SetGlobal("X#FaDryadQuit","GLOBAL",1)
~ SOLVED_JOURNAL #27006 /* ~Dryad of the Cloud Peaks
I have angered a dryad near the Cloud Peaks and have been warned out of "her" wood. It's of little concern. She also directed me to look into a wolf cave just to the south, where a treasure cache is hidden.~ */ EXIT
  IF ~  InParty("ajantis")
InMyArea("ajantis")
!StateCheck("ajantis",CD_STATE_NOTVALID)
Global("X#AjantisProtectDryade","GLOBAL",0)
~ THEN DO ~SetGlobal("X#FaDryadQuit","GLOBAL",1)
~ EXTERN ~AJANTJ~ 116
  IF ~  InParty("jaheira")
InMyArea("jaheira")
!StateCheck("jaheira",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#FaDryadQuit","GLOBAL",1)
~ GOTO 42
  IF ~  InParty("jaheira")
InMyArea("jaheira")
!StateCheck("jaheira",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#FaDryadQuit","GLOBAL",1)
~ EXTERN ~JAHEIJ~ 438
END

IF ~~ THEN BEGIN 42 // from: 41.2
  SAY #50324 /* ~I must find help!~ */
  IF ~  OR(3)
!InParty("ajantis")
!InMyArea("ajantis")
StateCheck("ajantis",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("SPRITE_IS_DEADCDryad","GLOBAL",1)
EraseJournalEntry(27005)
EscapeArea()
~ SOLVED_JOURNAL #27006 /* ~Dryad of the Cloud Peaks
I have angered a dryad near the Cloud Peaks and have been warned out of "her" wood. It's of little concern. She also directed me to look into a wolf cave just to the south, where a treasure cache is hidden.~ */ EXIT
  IF ~  InParty("ajantis")
InMyArea("ajantis")
!StateCheck("ajantis",CD_STATE_NOTVALID)
Global("X#AjantisProtectDryade","GLOBAL",0)
~ THEN EXTERN ~AJANTJ~ 116
END

IF ~~ THEN BEGIN 43 // from: BFALDO:339.4
  SAY #50322 /* ~Please, help me, druid!~ */
  IF ~  OR(3)
!InParty("ajantis")
!InMyArea("ajantis")
StateCheck("ajantis",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("SPRITE_IS_DEADCDryad","GLOBAL",1)
EraseJournalEntry(27005)
EscapeArea()
SetGlobal("X#FaDryadQuit","GLOBAL",1)
~ SOLVED_JOURNAL #27006 /* ~Dryad of the Cloud Peaks
I have angered a dryad near the Cloud Peaks and have been warned out of "her" wood. It's of little concern. She also directed me to look into a wolf cave just to the south, where a treasure cache is hidden.~ */ EXIT
  IF ~  InParty("ajantis")
InMyArea("ajantis")
!StateCheck("ajantis",CD_STATE_NOTVALID)
Global("X#AjantisProtectDryade","GLOBAL",0)
~ THEN DO ~SetGlobal("X#FaDryadQuit","GLOBAL",1)
~ EXTERN ~AJANTJ~ 116
  IF ~  InParty("jaheira")
InMyArea("jaheira")
!StateCheck("jaheira",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#FaDryadQuit","GLOBAL",1)
~ GOTO 44
  IF ~  InParty("jaheira")
InMyArea("jaheira")
!StateCheck("jaheira",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#FaDryadQuit","GLOBAL",1)
~ EXTERN ~JAHEIJ~ 439
END

IF ~~ THEN BEGIN 44 // from: BFALDO:339.2 43.2
  SAY #50324 /* ~I must find help!~ */
  IF ~  OR(3)
!InParty("ajantis")
!InMyArea("ajantis")
StateCheck("ajantis",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("SPRITE_IS_DEADCDryad","GLOBAL",1)
EraseJournalEntry(27005)
EscapeArea()
~ SOLVED_JOURNAL #27006 /* ~Dryad of the Cloud Peaks
I have angered a dryad near the Cloud Peaks and have been warned out of "her" wood. It's of little concern. She also directed me to look into a wolf cave just to the south, where a treasure cache is hidden.~ */ EXIT
  IF ~  InParty("ajantis")
InMyArea("ajantis")
!StateCheck("ajantis",CD_STATE_NOTVALID)
Global("X#AjantisProtectDryade","GLOBAL",0)
~ THEN EXTERN ~AJANTJ~ 116
END
