IF
	Class(LastSummonerOf(Myself),MONK)
	Race(LastSummonerOf(Myself),HUMAN)
	Global("GelVa70","GLOBAL",1)
	Kit(LastSummonerOf(Myself),GeVaKit)
THEN
    RESPONSE #100
		//ActionOverride(LastSummonerOf(Myself),ChangeRace(Vampire))
		ChangeRace(LastSummonerOf(Myself),Vampire)
		SetGlobal("GelVa70","GLOBAL",2)
END

IF
	Global("GelVa70","GLOBAL",2)
	Gender(LastSummonerOf(Myself),MALE)
THEN
	RESPONSE #100
		ReallyForceSpellRES("GelVa71",LastSummonerOf(Myself))
		SetGlobal("GelVa70","GLOBAL",3)
END

IF
	Global("GelVa70","GLOBAL",2)
	Gender(LastSummonerOf(Myself),FEMALE)
THEN
	RESPONSE #100
		ReallyForceSpellRES("GelVa72",LastSummonerOf(Myself))
		SetGlobal("GelVa70","GLOBAL",3)
END

IF		
	Global("GelVa70","GLOBAL",3)
THEN
	RESPONSE #100
        	DestroySelf()
END