Merge pull request #8684 from Aurorablade/Arntyougoingtosayhello

Adds FloorCluwnes so you can float too

code/modules/admin/admin_verbs.dm

@@ -77,6 +77,7 @@ var/list/admin_verbs_admin = list(
 	/client/proc/toggle_advanced_interaction, /*toggle admin ability to interact with not only machines, but also atoms such as buttons and doors*/
 	/client/proc/list_ssds,
 	/client/proc/cmd_admin_headset_message,
+	/client/proc/spawn_floor_cluwne,
 )
 var/list/admin_verbs_ban = list(
 	/client/proc/unban_panel,

code/modules/admin/topic.dm

@@ -1853,6 +1853,7 @@
 			ptypes += "Assassin"
 			ptypes += "Hunter"
 			ptypes += "Crew Traitor"
+			ptypes += "Floor Cluwne"
 		var/punishment = input(owner, "How would you like to smite [M]?", "Its good to be baaaad...", "") as null|anything in ptypes
 		if(!(punishment in ptypes))
 			return
@@ -1960,6 +1961,12 @@
 			if("Gib")
 				logmsg = "gibbed."
 				M.gib(FALSE)
+			if("Floor Cluwne")
+				logmsg = "floor cluwne"
+				var/turf/T = get_turf(M)
+				var/mob/living/simple_animal/hostile/floor_cluwne/FC = new /mob/living/simple_animal/hostile/floor_cluwne(T)
+				FC.smiting = TRUE
+				FC.Acquire_Victim(M)
 		if(logmsg)
 			log_admin("[key_name(owner)] answered [key_name(M)]'s prayer with a smiting: [logmsg]")
 			message_admins("[key_name_admin(owner)] answered [key_name_admin(M)]'s prayer with a smiting: [logmsg]")

code/modules/admin/verbs/spawnfloorcluwne.dm

@@ -0,0 +1,26 @@
+/client/proc/spawn_floor_cluwne()
+	set category = "Event"
+	set name = "Unleash Floor Cluwne"
+	set desc = "Pick a specific target or just let it select randomly and spawn the floor cluwne mob on the station. Be warned: spawning more than one may cause issues!"
+	var/target
+
+	if(!check_rights(R_EVENT))
+		return
+
+	var/confirm = alert("Are you sure you want to release a floor cluwne and kill alot of people?", "Confirm Massacre", "Yes", "No")
+	if(confirm == "Yes")
+
+		var/turf/T = get_turf(usr)
+		target = input("Any specific target in mind? Please note only live, non cluwned, human targets are valid.", "Target", target) as null|anything in GLOB.player_list
+		if(isnull(target))
+			return
+		if(target && ishuman(target))
+			var/mob/living/carbon/human/H = target
+			var/mob/living/simple_animal/hostile/floor_cluwne/FC = new /mob/living/simple_animal/hostile/floor_cluwne(T)
+			FC.Acquire_Victim(H)
+		else
+			new /mob/living/simple_animal/hostile/floor_cluwne(T)
+		log_admin("[key_name(usr)] spawned floor cluwne.")
+		message_admins("[key_name(usr)] spawned floor cluwne.")
+	else
+		return