IF
	GlobalGT("Chapter","GLOBAL",2)
	Global("BG1Dream","GLOBAL",0)
	ReputationGT(Player1,9)
	Global("EndOfBG1","GLOBAL",0)
THEN
	RESPONSE #100
		TextScreen("DRMTXT-2")
		IncrementGlobal("BG1Dream","GLOBAL",1)
		SetGlobalTimer("BG1DreamReset","GLOBAL",1)
		ApplySpellRES("GOODDRM2",Player1)  // No such index
		RestParty()
END

IF
	GlobalGT("Chapter","GLOBAL",2)
	Global("BG1Dream","GLOBAL",0)
	ReputationLT(Player1,10)
	Global("EndOfBG1","GLOBAL",0)
THEN
	RESPONSE #100
		TextScreen("DRMTXT-2")
		IncrementGlobal("BG1Dream","GLOBAL",1)
		SetGlobalTimer("BG1DreamReset","GLOBAL",1)
		ApplySpellRES("BADDRM2",Player1)  // No such index
		RestParty()
END

IF
	GlobalGT("Chapter","GLOBAL",3)
	Global("BG1Dream","GLOBAL",1)
	ReputationGT(Player1,9)
	Global("EndOfBG1","GLOBAL",0)
	GlobalTimerExpired("BG1DreamReset","GLOBAL")
THEN
	RESPONSE #100
		TextScreen("DRMTXT-3")
		IncrementGlobal("BG1Dream","GLOBAL",1)
		SetGlobalTimer("BG1DreamReset","GLOBAL",1)
		ApplySpellRES("GOODDRM2",Player1)  // No such index
		RestParty()
END

IF
	GlobalGT("Chapter","GLOBAL",3)
	Global("BG1Dream","GLOBAL",1)
	ReputationLT(Player1,10)
	Global("EndOfBG1","GLOBAL",0)
	GlobalTimerExpired("BG1DreamReset","GLOBAL")
THEN
	RESPONSE #100
		TextScreen("DRMTXT-3")
		IncrementGlobal("BG1Dream","GLOBAL",1)
		SetGlobalTimer("BG1DreamReset","GLOBAL",1)
		ApplySpellRES("BADDRM2",Player1)  // No such index
		RestParty()
END

IF
	GlobalGT("Chapter","GLOBAL",4)
	Global("BG1Dream","GLOBAL",2)
	ReputationGT(Player1,9)
	Global("EndOfBG1","GLOBAL",0)
	GlobalTimerExpired("BG1DreamReset","GLOBAL")
THEN
	RESPONSE #100
		TextScreen("DRMTXT-4")
		IncrementGlobal("BG1Dream","GLOBAL",1)
		SetGlobalTimer("BG1DreamReset","GLOBAL",1)
		ApplySpellRES("GOODDRM4",Player1)  // No such index
		RestParty()
END

IF
	GlobalGT("Chapter","GLOBAL",4)
	Global("BG1Dream","GLOBAL",2)
	ReputationLT(Player1,10)
	Global("EndOfBG1","GLOBAL",0)
	GlobalTimerExpired("BG1DreamReset","GLOBAL")
THEN
	RESPONSE #100
		TextScreen("DRMTXT-4")
		IncrementGlobal("BG1Dream","GLOBAL",1)
		SetGlobalTimer("BG1DreamReset","GLOBAL",1)
		ApplySpellRES("BADDRM4",Player1)  // No such index
		RestParty()
END

IF
	GlobalGT("Chapter","GLOBAL",5)
	Global("BG1Dream","GLOBAL",3)
	ReputationGT(Player1,9)
	Global("EndOfBG1","GLOBAL",0)
	GlobalTimerExpired("BG1DreamReset","GLOBAL")
THEN
	RESPONSE #100
		TextScreen("DRMTXT-5")
		IncrementGlobal("BG1Dream","GLOBAL",1)
		SetGlobalTimer("BG1DreamReset","GLOBAL",1)
		ApplySpellRES("GOODDRM4",Player1)  // No such index
		RestParty()
END

IF
	GlobalGT("Chapter","GLOBAL",5)
	Global("BG1Dream","GLOBAL",3)
	ReputationLT(Player1,10)
	Global("EndOfBG1","GLOBAL",0)
	GlobalTimerExpired("BG1DreamReset","GLOBAL")
THEN
	RESPONSE #100
		TextScreen("DRMTXT-5")
		IncrementGlobal("BG1Dream","GLOBAL",1)
		SetGlobalTimer("BG1DreamReset","GLOBAL",1)
		ApplySpellRES("BADDRM4",Player1)  // No such index
		RestParty()
END

IF
	GlobalGT("Chapter","GLOBAL",6)
	Global("BG1Dream","GLOBAL",4)
	ReputationGT(Player1,9)
	Global("EndOfBG1","GLOBAL",0)
	GlobalTimerExpired("BG1DreamReset","GLOBAL")
THEN
	RESPONSE #100
		TextScreen("DRMTXT-6")
		IncrementGlobal("BG1Dream","GLOBAL",1)
		SetGlobalTimer("BG1DreamReset","GLOBAL",1)
		ApplySpellRES("GOODDRM6",Player1)  // No such index
		RestParty()
END

IF
	GlobalGT("Chapter","GLOBAL",6)
	Global("BG1Dream","GLOBAL",4)
	ReputationLT(Player1,10)
	Global("EndOfBG1","GLOBAL",0)
	GlobalTimerExpired("BG1DreamReset","GLOBAL")
THEN
	RESPONSE #100
		TextScreen("DRMTXT-6")
		IncrementGlobal("BG1Dream","GLOBAL",1)
		SetGlobalTimer("BG1DreamReset","GLOBAL",1)
		ApplySpellRES("BADDRM6",Player1)  // No such index
		RestParty()
END

IF
	GlobalGT("Chapter","GLOBAL",7)
	Global("BG1Dream","GLOBAL",5)
	ReputationGT(Player1,9)
	Global("EndOfBG1","GLOBAL",0)
	GlobalTimerExpired("BG1DreamReset","GLOBAL")
THEN
	RESPONSE #100
		TextScreen("DRMTXT-7")
		IncrementGlobal("BG1Dream","GLOBAL",1)
		SetGlobalTimer("BG1DreamReset","GLOBAL",1)
		ApplySpellRES("GOODDRM6",Player1)  // No such index
		RestParty()
END

IF
	GlobalGT("Chapter","GLOBAL",7)
	Global("BG1Dream","GLOBAL",5)
	ReputationLT(Player1,10)
	Global("EndOfBG1","GLOBAL",0)
	GlobalTimerExpired("BG1DreamReset","GLOBAL")
THEN
	RESPONSE #100
		TextScreen("DRMTXT-7")
		IncrementGlobal("BG1Dream","GLOBAL",1)
		SetGlobalTimer("BG1DreamReset","GLOBAL",1)
		ApplySpellRES("BADDRM6",Player1)  // No such index
		RestParty()
END

IF
	GlobalTimerExpired("ImoenDream1","GLOBAL")
	Global("HadImoenDream1","GLOBAL",0)
	GlobalLT("Chapter","GLOBAL",4)
THEN
	RESPONSE #100
		SetGlobal("HadImoenDream1","GLOBAL",1)
		SetGlobalTimer("JonDream1","GLOBAL",ONE_DAY)
		StartCutSceneMode()
		StartCutScene("Cut28a")
END

IF
	GlobalGT("DrowTalk","GLOBAL",3)
	Global("HadSlayerDream","GLOBAL",0)
	GlobalGT("AsylumPlot","GLOBAL",54)
THEN
	RESPONSE #100
		SetGlobal("HadSlayerDream","GLOBAL",1)
		StartCutSceneMode()
		StartCutScene("Cut49a")
END

IF
	GlobalTimerExpired("JonDream1","GLOBAL")
	Global("HadJonDream1","GLOBAL",0)
	GlobalLT("Chapter","GLOBAL",4)
THEN
	RESPONSE #100
		SetGlobal("HadJonDream1","GLOBAL",1)
		SetGlobalTimer("JonDream2","GLOBAL",ONE_DAY)
		StartCutSceneMode()
		StartCutScene("Cut67a")
END

IF
	GlobalTimerExpired("JonDream2","GLOBAL")
	Global("HadJonDream2","GLOBAL",0)
	GlobalLT("Chapter","GLOBAL",4)
THEN
	RESPONSE #100
		SetGlobal("HadJonDream2","GLOBAL",1)
		StartCutSceneMode()
		StartCutScene("Cut69a")
END

IF
	GlobalTimerExpired("EllesimeDream1","GLOBAL")
	Global("HadEllesimeDream1","GLOBAL",0)
THEN
	RESPONSE #100
		SetGlobalTimer("EllesimeDream2","GLOBAL",ONE_DAY)
		SetGlobal("HadEllesimeDream1","GLOBAL",1)
		StartCutSceneMode()
		StartCutScene("Cut68a")
END