ACTOR RD_BloodStarter replaces Blood
{
	radius 1
	height 2
	+NOGRAVITY
	+NOTELEPORT
	+ALLOWPARTICLES
	States
	{
		Spawn:
			EMPT A 1
			EMPT A 0 A_CustomMissile("RD_Blood", 0, 0, Random(110,250), CMF_AIMDIRECTION, random(-10, 70))
			Stop
	}
}


ACTOR RD_Blood
{
	Mass 1
	Renderstyle Translucent
	Speed 4
	Radius 2
	Height 1
	Alpha 0.5
	Scale 0.6
	Gravity 0.5
	PROJECTILE
	+NOCLIP
	-NOGRAVITY
	+NOTELEPORT
	States
	{
		Spawn:
			RBLD AA 3
			RBLD A 0 A_ChangeFlag("NOCLIP", FALSE)
		OnAir:
			RBLD BBBBBBBBBBBBBBBBBBBB 2 A_SpawnItemEx("RD_BloodTrail",0 ,0 ,0 ,0 ,0 ,0 ,128)
		Crash:
			RBLD B 1
			Stop
		Crush:
		Death:
			RBLD B 1 A_SpawnItem("RD_BloodFloor")
			Stop
	}
}

ACTOR RD_BloodTrail
{
	radius 2
	height 2
	Renderstyle Translucent
	Alpha 0.5                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                       
	Scale 0.4
	gravity 0.4
	+NOCLIP
	+NOTELEPORT
	-nogravity
	States
	{
		Spawn:
			RBLD A 1
			RBLD AABBB 2 A_FadeOut(0.1)
			Stop
	}
}


actor RD_BloodFloor
{
	Height 4
	radius 4
	scale 0.5
	alpha 0.5
	-SOLID
	-SHOOTABLE
	-NOGRAVITY
	Renderstyle Translucent
	States
	{
	Spawn:
		RBLD B 1
		RBLD B 0 A_Jump(72, "Blod2")
		RBLD B 0 A_Jump(72, "Blod3")
		RBLD B 0 A_Jump(88, "Blod4")
		GoTo Blod1
	Blod1:
		RBLD B 1 A_SpawnItemEx("RD_BloodFloor1")
		Stop
	Blod2:
		RBLD B 1 A_SpawnItemEx("RD_BloodFloor2")
		Stop
	Blod3:
		RBLD B 1 A_SpawnItemEx("RD_BloodFloor3")
		Stop
	Blod4:
		RBLD B 1 A_SpawnItemEx("RD_BloodFloor4")
		Stop
	}
}

actor RD_BloodFloor1
{
	Height 3
	radius 4
	-SOLID
	-SHOOTABLE
	-NOGRAVITY
	Renderstyle Translucent
	Scale 0.9
	Alpha 0.8
	States
	{
	Spawn:
		FBD1 A 50
		FBD1 AAAAAAAAAA 70 A_FadeOut(0.1)
		Stop
	}
}

actor RD_BloodFloor2 : RD_BloodFloor1
{
	scale 0.6
	Renderstyle Translucent
	States
	{
	Spawn:
		FBD2 A 50
		FBD2 AAAAAAAAAA 70 A_FadeOut(0.05)
		Stop
	}
}

actor RD_BloodFloor3 : RD_BloodFloor1
{
	scale 0.8
	Renderstyle Translucent
	States
	{
	Spawn:
		FBD3 A 50
		FBD3 AAAAAAAAAA 70 A_FadeOut(0.05)
		Stop
	}
}

actor RD_BloodFloor4 : RD_BloodFloor1
{
	scale 0.7
	Renderstyle Translucent
	States
	{
	Spawn:
		FBD4 A 50
		FBD4 AAAAAAAAAA 70 A_FadeOut(0.05)
		Stop
	}
}

actor RD_XBloodFloor
{
	Height 4
	radius 4
	scale 0.7
	alpha 0.5
	-SOLID
	-SHOOTABLE
	-NOGRAVITY
	Renderstyle Translucent
	States
	{
	Spawn:
		RBLD B 1
		RBLD B 0 A_Jump(128, "XBlod2")
		GoTo XBlod1
	XBlod1:
		RBLD B 1 A_SpawnItemEx("RD_XBloodFloor1")
		Stop
	XBlod2:
		RBLD B 1 A_SpawnItemEx("RD_XBloodFloor2")
		Stop

	}
}

actor RD_XBloodFloor1
{
	Height 3
	radius 4
	-SOLID
	-SHOOTABLE
	-NOGRAVITY
	Renderstyle Translucent
	Scale 0.8
	Alpha 0.8
	States
	{
	Spawn:
		XBL1 A -1
		Stop
	}
}

actor RD_XBloodFloor2 : RD_XBloodFloor1
{
	Height 3
	Renderstyle Translucent
	States
	{
	Spawn:
		XBL2 A -1
		Stop
	}
}


actor RD_XBloodDrop : RD_Blood
{
	Radius 2
	Height 3
	Alpha 0.6
	Scale 0.8
	PROJECTILE
	+NOCLIP
	-NOGRAVITY
	+NOTELEPORT
	States
	{
		Spawn:
			RBLD AAA 3
		Death:
			RBLD B 1 A_SpawnItem("RD_XBloodFloor")
			Stop
	}
}

ACTOR RD_GibTrail
{
	radius 2
	height 2
	Renderstyle Translucent
	Alpha 0.5                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                       
	Scale 0.4
	gravity 0.4
	+NOCLIP
	+NOTELEPORT
	-nogravity
	States
	{
		Spawn:
			RBLD AABBB 2
			RBLD A 1 A_SpawnItem("RD_BloodFloor")
			Stop
	}
}

