IF
AreaCheck("AR8500")
Dead("jadruid8a")
Dead("jadruid8b")
Dead("jadruid6a")
Dead("jadruid6b")
Dead("jadruid6")
!See([ENEMY])
InParty(Myself)
!Dead("beador")
Global("X#JaheiraSen","GLOBAL",15)
THEN
RESPONSE #100
SetGlobal("X#JaheiraSen","GLOBAL",16)
StartDialogueNoSet(Player1)
END

IF
AreaCheck("AR8500")
Dead("jadruid8a")
Dead("jadruid8b")
Dead("jadruid6a")
Dead("jadruid6b")
Dead("jadruid6")
!See([ENEMY])
InParty(Myself)
Dead("beador")
Global("X#JaheiraSen","GLOBAL",15)
THEN
RESPONSE #100
SetGlobal("X#JaheiraSen","GLOBAL",21)
StartDialogueNoSet(Player1)
END

IF
OR(2)
AreaCheck("AR8400")
AreaCheck("AR8401")
InParty(Myself)
Global("X#JaheiraSen","GLOBAL",29)
THEN
RESPONSE #100
SetGlobal("X#JaheiraSen","GLOBAL",30)
StartDialogueNoSet(Player1)
END

//Intro of Cutscene with Healing Beador
IF
InParty("Jaheira")
Global("X#JaheiraSen","GLOBAL",17)
THEN
RESPONSE #100
ClearAllActions()
SetGlobal("X#JaheiraSen","GLOBAL",18)
StartCutSceneMode()
StartCutScene("X#JABE1")
END

IF
Dead("andarthe")
AreaCheck("AR8400")
InParty(Myself)
Global("X#AndSurrender","GLOBAL",3)
THEN
RESPONSE #100
SetGlobal("X#AndSurrender","GLOBAL",6)
StartDialogueNoSet(Player1)
END

IF
InParty(Myself)
OR(2)
Global("X#JaheiraSen","GLOBAL",20)
Global("X#JaheiraSen","GLOBAL",22)
Global("X#AndartheExist","AR8400",0)
AreaCheck("AR8400")
THEN
RESPONSE #100
SetGlobal("X#AndartheExist","AR8400",1)
CreateCreature("X#ANDART",[874.2176],3)
CreateCreature("X#SHDR8A",[934.2174],3)
END

IF
InParty(Myself)
AreaCheck("AR8401")
GlobalGT("X#JaheiraSen","GLOBAL",19)
Global("X#MarethaExist","FW1601",0)
THEN
RESPONSE #100
SetGlobal("X#MarethaExist","FW1601",1)
CreateCreature("X#MARETH",[369.273],3)
END
