HONK-A-TONK Update:

- Food items don't make you goddamn fat so easily.
- Bananas are now edible but still leave a banana peel.
- New Disease: Pierrot's Throat. While infected, random words you say are replaced with "honk." At the later stages, you'll randomly say honk as well. See your local doctor with a health analyzer to find the cure. Virus added to virus crate and random/badmin disease event.

git-svn-id: http://tgstation13.googlecode.com/svn/trunk@753 316c924e-a436-60f5-8080-3fe189b3f50e

code/modules/admin/admin.dm

@@ -1180,7 +1180,7 @@ var/showadminmessages = 1
 						viral_outbreak()
 						message_admins("[key_name_admin(usr)] has triggered a virus outbreak", 1)
 					else
-						var/list/viruses = list("fake gbs","gbs","magnitis","wizarditis",/*"beesease",*/"brain rot","cold","retrovirus","flu")
+						var/list/viruses = list("fake gbs","gbs","magnitis","wizarditis",/*"beesease",*/"brain rot","cold","retrovirus","flu","pierrot's throat")
 						var/V = input("Choose the virus to spread", "BIOHAZARD") in viruses
 						viral_outbreak(V)
 						message_admins("[key_name_admin(usr)] has triggered a virus outbreak of [V]", 1)

code/modules/mob/living/carbon/human/say.dm

@@ -2,6 +2,18 @@
 	if(src.mutantrace == "lizard")
 		if(copytext(message, 1, 2) != "*")
 			message = dd_replaceText(message, "s", stutter("ss"))
+	if(istype(src.virus, /datum/disease/pierrot_throat))
+		var/list/temp_message = dd_text2list(message, " ")
+		var/list/pick_list = list()
+		for(var/i = 1, i <= temp_message.len, i++)
+			pick_list += i
+		for(var/i=1, ((i <= src.virus.stage) && (i <= temp_message.len)), i++)
+			if(prob(5 * src.virus.stage))
+				var/H = pick(pick_list)
+				if(findtext(temp_message[H], "*") || findtext(temp_message[H], ";") || findtext(temp_message[H], ":")) continue
+				temp_message[H] = "HONK"
+				pick_list -= H
+		message = dd_list2text(temp_message, " ")
 	..(message)
 
 /mob/living/carbon/human/say_understands(var/other)