IF
	Global("bd_plot","global",591)
	!GlobalTimerNotExpired("bd_mdd1352_ot_timer","bd4100")
	Global("bd_VVDAHLIA_ot","bd4100",0)
	IfValidForPartyDialog("VVDAHLIA")
	Race("VVDAHLIA",VAMPIRE)
THEN
	RESPONSE #100
		SetGlobal("bd_VVDAHLIA_ot","bd4100",1)
		SetGlobalTimer("bd_mdd1352_ot_timer","bd4100",8)
		DisplayStringHead("VVDAHLIA",~<CHARNAME>, I will be on your side no matter you do. Of cause you will manage to escape. I will wait you there.~) 
END

IF
	Global("bd_plot","global",591)
	!GlobalTimerNotExpired("bd_mdd1352_ot_timer","bd4100")
	Global("bd_VVDAHLIA_ot","bd4100",0)
	IfValidForPartyDialog("VVDAHLIA")	
	!Race("VVDAHLIA",VAMPIRE)
THEN
	RESPONSE #100
		SetGlobal("bd_VVDAHLIA_ot","bd4100",1)
		SetGlobalTimer("bd_mdd1352_ot_timer","bd4100",ONE_ROUND)
		DisplayStringHead("VVDAHLIA",~<CHARNAME>, what you have done? Remember what you have promised me. I will wait you there for sometime, but you have to sort things yourself.~)
END