actor Cacodemoness_Sex : SexActor
{
	Radius 31
	Height 56
	ActiveSound "caco/finish" // After sex
	PainSound   "caco/faint"  // Too late
	Damage 1 // Monster has 1 sex scene
	States
	{
	Spawn:
		HEAD F 5
		HEAD F 5 A_PlaySound("caco/moan")
		HEAD F 5
		HEAD FFFFFF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		HEAD FFFFFF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		HEAD FFFFFF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		HEAD FFFFFF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		HEAD FFFFFF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		HEAD FFFFFF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		HEAD FFFFFF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		HEAD FFFFFF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		HEAD FFFFFF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		HEAD FFFFFF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		goto TooLate
	Finish:
        HEAD FGHIJ 8
		HEAD K -1 A_SetFloorClip
		stop
	
	// Sex 1
	SexScene_1_1: // Normal
		TNT1 A 1 A_Jump(128, 2)
        TNT1 A 0 A_PlaySound("caco/moan")
		CACF ABCDEFGH 4
		loop
	SexScene_1_2: // Fast
		TNT1 A 1 A_Jump(128, 2)
        TNT1 A 0 A_PlaySound("caco/moan")
		CACF ABCDEFGH 3
		loop
	SexScene_1_3: // Faster
		TNT1 A 1 A_Jump(128, 2)
        TNT1 A 0 A_PlaySound("caco/moan")
		CACF ABCDEFGH 2
		loop
	}
}