actor Pinky_Sex : SexActor
{
	Radius 30
	Height 56
	ActiveSound "pinky/finish" // After sex
	PainSound   "pinky/faint"  // Too late
	Damage 2 // Monster has 2 sex scenes
	States
	{
	Spawn:
		SARG H 5
        SARG I 5 A_PlaySound("pinky/moan")
	Spawn2:
		SPNK ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		SPNK ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		SPNK ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		SPNK ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		SPNK ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		SPNK ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		SPNK ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		SPNK ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		SPNK ABCDEF 5 A_SpawnItemEx("PrettyHeart", random(-20, 20), random(-20, 20), 0, 0, 0, random(1, 4), 0, SXF_CLIENTSIDE | SXF_NOCHECKPOSITION, 64)
		SPNK ABCDEF 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:
		TNT1 A 0 A_FadeIn(1.0)
        SARG OPQ 4
        SARG R -1
        stop
	
	// Anal 1
	SexScene_1_1: // Normal
		TNT1 A 1 A_Jump(160, 2)
        TNT1 A 0 A_PlaySound("pinky/moan")
		SXPK ABCDEF 4
		loop
	SexScene_1_2: // Fast
		TNT1 A 1 A_Jump(160, 2)
        TNT1 A 0 A_PlaySound("pinky/moan")
		SXPK ABCDEF 3
		loop
	SexScene_1_3: // Faster
		TNT1 A 1 A_Jump(160, 2)
        TNT1 A 0 A_PlaySound("pinky/moan")
		SXPK ABCDEF 2
		loop
	
	// Anal 2
	SexScene_2_1: // Normal
		TNT1 A 0 A_Jump(16, "SexScene_2_Cum")
		TNT1 A 0 A_Jump(160, 2)
        TNT1 A 0 A_PlaySound("pinky/moan")
		SXP2 ABCDEFGH 4
		loop
	SexScene_2_2: // Fast
		TNT1 A 0 A_Jump(16, "SexScene_2_Cum")
		TNT1 A 0 A_Jump(160, 2)
        TNT1 A 0 A_PlaySound("pinky/moan")
		SXP2 ABCDEFGH 3
		loop
	SexScene_2_3: // Faster
		TNT1 A 0 A_Jump(16, "SexScene_2_Cum")
		TNT1 A 0 A_Jump(160, 2)
        TNT1 A 0 A_PlaySound("pinky/moan")
		SXP2 ABCDEFGH 2
		loop
	SexScene_2_Cum:
		SXP3 ABCDEFGH 3
        TNT1 A 0 A_PlaySound("helldame/titsplooge")
        SXP3 IJKLMNOPQRSTUVWXYZ 3
        SXP4 ABCDEFGHIJK 3
		goto Super::ChangeState
	}
}

actor HSpectre_Sex : Pinky_Sex
{
	Alpha 0.2
	States
	{
	Spawn:
		SARG H 2 A_FadeIn(0.15)
        SARG H 2 A_FadeIn(0.15)
        SARG H 2 A_FadeIn(0.15)
        TNT1 A 0 A_FadeIn(0.15)
        SARG I 2 A_PlaySound("pinky/moan")
        SARG I 2 A_FadeIn(0.15)
        SARG I 2 A_FadeIn(0.25)
		goto Super::Spawn2
	}
}