Sake! (#5538)

* Sake!

🆑 Fel and LeonDuvall
add: You can now drink sake! Can be found in the bar, or made with rice
and sugar.
/🆑

Sprites and idea courtesy of LeonDuvall.
Can be made with 15u rice and 5u sugar at 400k.

* Does the thing

Modularization of vending machines would require a lot more effort than
is remotely worth for such a simple change. Fortunately, not a lot of
new alcohols are added to it often, so it should be fine.

code/citadel/cit_reagents.dm

@@ -235,3 +235,40 @@
 	required_reagents = list("anaphro" = 5, "acetone" = 1)
 	required_temp = 300
 	mix_message = "The mixture thickens and heats up slighty..."
+
+//=========Drinks and Stuff!============//
+
+/datum/reagent/consumable/ethanol/sake
+	name = "Sake"
+	id = "sake"
+	description = "A sweet rice wine of questionable legality and extreme potency."
+	color = "#DDDDDD"
+	boozepwr = 70
+	taste_description = "sweet rice wine"
+	glass_icon_state = "sakecup"
+	glass_name = "glass of sake"
+	glass_desc = "A traditional cup of sake."
+
+/datum/chemical_reaction/sake
+	name = "sake"
+	id = "sake"
+	results = list("sake" = 20)
+	required_reagents = list("rice" = 15, "sugar" = 5)
+	required_temp = 400
+	mix_message = "The rice grains ferment with the sugar into a clear, sweet-smelling liquid."
+
+/obj/item/reagent_containers/food/drinks/bottle/sake
+	name = "Traditional Sake"
+	desc = "Sweet as can be, and burns like foxfire going down."
+	icon = 'code/citadel/icons/drinks.dmi'
+	icon_state = "sakebottle"
+	list_reagents = list("sake" = 100)
+
+/obj/item/reagent_containers/food/drinks/bottle/sake/Initialize()
+	. = ..()
+	if(prob(30))
+		name = "Tetravulpine Sake"
+		desc += " On the bottle is a picture of a kitsune with four tails."
+	else if(prob(30))
+		name = "Inubashiri's Home Brew"
+		desc += " Awoo."