actor Baroness_Sex : SexActor
{
	Radius 24
	Height 64
	ActiveSound "baroness/finish" // After sex
	PainSound   "baroness/faint"  // Too late
	Damage 3 // Monster has 3 sex scenes
	States
	{
	Spawn:
		BOSS I 5
        BOSS J 5 A_PlaySound("helldame/moan")
        BOSS K 5
        BOSS L 5
        BOSS M 5
		STBS ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		STBS ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		STBS ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		STBS ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		STBS ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		STBS ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		STBS ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		STBS ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		STBS ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		STBS ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
        BOSS PQ 4
		goto TooLate
	Finish:
        BOSS RSTU 3
        BOSS V -1 ACS_NamedExecuteAlways("BossDeath", 0)
        stop
	
	// Suck
	SexScene_1_1: // Normal
		TNT1 A 0 A_PlaySound("impse/blow")
		SXB5 ABCDEFG 4
		TNT1 A 0 A_Jump(16, "SexScene_1_Cum")
		loop
	SexScene_1_2: // Fast
		TNT1 A 0 A_PlaySound("impse/blow")
		SXB5 ABCDEFG 3
		TNT1 A 0 A_Jump(16, "SexScene_1_Cum")
		loop
	SexScene_1_3: // Faster
		TNT1 A 0 A_PlaySound("impse/blow")
		SXB5 ABCDEFG 2
		TNT1 A 0 A_Jump(16, "SexScene_1_Cum")
		loop
	
	// Lick
	SexScene_2_1: // Normal
		TNT1 A 0 A_PlaySound("baroness/lick")
        SXB5 HIJKLMNOPQRSTUV 4
		TNT1 A 0 A_Jump(16, "SexScene_2_Cum")
		loop
	SexScene_2_2: // Fast
		TNT1 A 0 A_PlaySound("baroness/lick")
        SXB5 HIJKLMNOPQRSTUV 4
		TNT1 A 0 A_Jump(16, "SexScene_2_Cum")
		loop
	SexScene_2_3: // Faster
		TNT1 A 0 A_PlaySound("baroness/lick")
        SXB5 HIJKLMNOPQRSTUV 4
		TNT1 A 0 A_Jump(16, "SexScene_2_Cum")
		loop
	
	SexScene_3_1: // Normal
		TNT1 A 0 A_PlaySound("helldame/moan")
        SXB8 ABCDEFGH 4
		loop
	SexScene_3_2: // Fast
		TNT1 A 0 A_PlaySound("helldame/moan")
        SXB8 ABCDEFGH 4
		loop
	SexScene_3_3: // Faster
		TNT1 A 0 A_PlaySound("helldame/moan")
        SXB8 ABCDEFGH 4
		loop
	
	SexScene_1_Cum:
	SexScene_2_Cum:
		SXB5 WXYZ 3
        SXB6 ABCDEF 3
        TNT1 A 0 A_PlaySound("helldame/titsplooge")
        SXB6 GHIJKLMNOPQRSTUVVVWXYZZ 4
        SXB7 ABCDE 4
		goto Super::ChangeState
	}
}