Preliminary new drugs

baystation12.dme

@@ -1361,6 +1361,7 @@
 #include "code\modules\reagents\Chemistry-Machinery.dm"
 #include "code\modules\reagents\Chemistry-Readme.dm"
 #include "code\modules\reagents\Chemistry-Reagents-Antidepressants.dm"
+#include "code\modules\reagents\Chemistry-Reagents-Recreational.dm"
 #include "code\modules\reagents\Chemistry-Reagents.dm"
 #include "code\modules\reagents\Chemistry-Recipes.dm"
 #include "code\modules\reagents\dartgun.dm"

code/game/gamemodes/vampire/vampire.dm

@@ -279,12 +279,12 @@ You are weak to holy things and starlight. Don't go into space and avoid the Cha
 			src << "\red They've got no blood left to give."
 			break
 		if(H.stat < 2) //alive
-			blood = min(10, H.vessel.get_reagent_amount("blood"))// if they have less than 10 blood, give them the remnant else they get 10 blood
-			src.mind.vampire.bloodtotal += blood
-			src.mind.vampire.bloodusable += blood
-			H.adjustCloneLoss(10) // beep boop 10 damage
+			blood = min(20, H.vessel.get_reagent_amount("blood"))	// if they have less than 20 blood, give them the remnant else they get 20 blood
+			src.mind.vampire.bloodtotal += blood/2	//divide by 2 to counted the double suction since removing cloneloss -Melandor0
+			src.mind.vampire.bloodusable += blood/2
+			//H.adjust CloneLoss(10)	No cloneloss -Melandor0
 		else
-			blood = min(5, H.vessel.get_reagent_amount("blood"))// The dead only give 5 bloods
+			blood = min(5, H.vessel.get_reagent_amount("blood"))	// The dead only give 5 bloods
 			src.mind.vampire.bloodtotal += blood
 		if(bloodtotal != src.mind.vampire.bloodtotal)
 			src << "\blue <b>You have accumulated [src.mind.vampire.bloodtotal] [src.mind.vampire.bloodtotal > 1 ? "units" : "unit"] of blood[src.mind.vampire.bloodusable != bloodusable ?", and have [src.mind.vampire.bloodusable] left to use" : "."]"

code/modules/reagents/Chemistry-Reagents-Recreational.dm

@@ -0,0 +1,37 @@
+/datum/reagent/antidepressant/dextromethorphan
+	name = "Dextromethorphan"
+	id = "dextromethorphan"
+	description = "Cough medicine."
+	reagent_state = LIQUID
+	color = "#FF1111"
+	custom_metabolism = 0.25
+	data = 0
+
+	on_mob_life(var/mob/living/M as mob)
+		if(!M) M = holder.my_atom
+		if(!data) data = 1
+		data++
+
+		switch(data)
+			if(1 to 20)
+				M << "\red Light Dose.."
+			if(20 to 40)
+				M << "\red Medium Dose.."
+				if(prob(10)) M.emote(pick("giggle"))
+			if(40 to 80)
+				M << "\red High Dose.."
+				M.druggy = max(M.druggy, 30)
+				if(prob(5)) M.emote(pick("twitch_s", "giggle"))
+			if(80 to INFINITY)
+				M << "\red Overdose.."
+				M.druggy = max(M.druggy, 30)
+				if(prob(10)) M.emote(pick("twitch","giggle"))
+				M:paralysis = max(M:paralysis, 30)
+				M.hallucination = max(M.hallucination, 30)
+
+/datum/chemical_reaction/dextromethorphan
+	name = "Dextromethorphan"
+	id = "dextromethorphan"
+	result = "dextromethorphan"
+	required_reagents = list("cryptobiolin" = 1, "hydrogen" = 1, "carbon" = 1)
+	result_amount = 3