Reworks the poison pen (#20353)

* paperwork so boring it kills you

* it's worth a bit more now

* Backup in case you poison yourself

* Virologist gets it, accurate description

* I promise im literate

Co-authored-by: Henri215 <77684085+Henri215@users.noreply.github.com>

* No more charcoal, time for gloves

* Turns comments into auto-doc

---------

Co-authored-by: Henri215 <77684085+Henri215@users.noreply.github.com>

code/modules/paperwork/paper.dm

@@ -785,10 +785,10 @@
 	if(contact_poison && ishuman(user))
 		var/mob/living/carbon/human/H = user
 		var/obj/item/clothing/gloves/G = H.gloves
-		if(!istype(G) || G.transfer_prints)
+		if(!istype(G) || !G.safe_from_poison)
 			H.reagents.add_reagent(contact_poison, contact_poison_volume)
+			add_attack_logs(src, user, "Picked up [src], coated with [contact_poison] by [contact_poison_poisoner]")
 			contact_poison = null
-			add_attack_logs(src, user, "Picked up [src], the paper poisoned by [contact_poison_poisoner]")
 	. = ..()
 
 /obj/item/paper/researchnotes

code/modules/paperwork/pen.dm

@@ -211,18 +211,30 @@
 /obj/item/proc/on_write(obj/item/paper/P, mob/user)
 	return
 
-/obj/item/pen/poison
-	var/uses_left = 3
+/obj/item/pen/multi/poison
+	var/current_poison = null
 
-/obj/item/pen/poison/on_write(obj/item/paper/P, mob/user)
-	if(P.contact_poison_volume)
-		to_chat(user, "<span class='warning'>[P] is already coated.</span>")
-	else if(uses_left)
-		uses_left--
-		P.contact_poison = "amanitin"
-		P.contact_poison_volume = 15
-		P.contact_poison_poisoner = user.name
-		add_attack_logs(user, P, "Poison pen'ed")
-		to_chat(user, "<span class='warning'>You apply the poison to [P].</span>")
-	else
-		to_chat(user, "<span class='warning'>[src] clicks. It seems to be depleted.</span>")
+/obj/item/pen/multi/poison/attack_self(mob/living/user)
+	. = ..()
+	switch(colour)
+		if("black")
+			current_poison = null
+		if("red")
+			current_poison = "amanitin"
+		if("green")
+			current_poison = "polonium"
+		if("blue")
+			current_poison = "teslium"
+		if("yellow")
+			current_poison = "pancuronium"
+
+/obj/item/pen/multi/poison/on_write(obj/item/paper/P, mob/user)
+	if(current_poison)
+		if(P.contact_poison)
+			to_chat(user, "<span class='warning'>[P] is already coated.</span>")
+		else
+			P.contact_poison = current_poison
+			P.contact_poison_volume = 20
+			P.contact_poison_poisoner = user.name
+			add_attack_logs(user, P, "Poison pen'ed")
+			to_chat(user, "<span class='warning'>You apply the poison to [P].</span>")