Various ERP verb fixes (#53)

sandcode/code/datums/interactions/interaction_interface.dm

@@ -0,0 +1,84 @@
+/mob/proc/try_interaction()
+	return
+
+/*
+/mob/living/carbon/human/MouseDrop(var/mob/living/carbon/human/dropped_on, mob/living/carbon/human/user as mob)
+	if(src != dropped_on && !src.restrained())
+		try_interaction(dropped_on)
+		return
+	return ..()
+*/
+
+/mob/living/MouseDrop_T(mob/M as mob, mob/living/user as mob)
+	. = ..()
+	if(M == src || src == usr || M != usr)
+		return
+	if(usr.restrained())
+		return
+
+	user.try_interaction(src)
+
+/mob/living/verb/interact_with()
+	set name = "Interact With"
+	set desc = "Perform an interaction with someone."
+	set category = "IC"
+	set src in view()
+
+	if(!usr.restrained())
+		usr.try_interaction(src)
+
+/mob/living/silicon/robot/verb/toggle_gender() //Change to add silicon genderchanges. Experimental.
+	set category = "IC"
+	set name = "Set Gender"
+	set desc = "Allows you to set your gender."
+
+	if(stat != CONSCIOUS)
+		to_chat(usr, "<span class='warning'>You cannot toggle your gender while unconcious!</span>")
+		return
+		
+	var/choice = alert(src, "Select Gender.", "Gender", "Both", "Male", "Female")
+	switch(choice)
+		if("Both")
+			src.has_penis = TRUE
+			src.has_vagina = TRUE
+		if("Male")
+			src.has_penis = TRUE
+			src.has_vagina = FALSE
+		if("Female")
+			src.has_penis = FALSE
+			src.has_vagina = TRUE
+
+/mob/living/try_interaction(mob/living/partner)
+	var/dat
+	if(partner != src)
+		dat = "<B><HR><FONT size=3>Interacting with \the [partner]...</FONT></B><HR>"
+	else
+		dat = "<B><HR><FONT size=3>Interacting with yourself...</FONT></B><HR>"
+
+	dat += "You...<br>[list_interaction_attributes(src)]<hr>"
+	if(partner != src)
+		dat += "They...<br>[partner.list_interaction_attributes(src)]<hr>"
+
+	make_interactions()
+	for(var/interaction_key in interactions)
+		var/datum/interaction/I = interactions[interaction_key]
+		if(I.evaluate_user(src) && I.evaluate_target(src, partner))
+			dat += I.get_action_link_for(src, partner)
+
+	var/datum/browser/popup = new(usr, "interactions", "Interactions", 340, 480)
+	popup.set_content(dat)
+	popup.open()
+
+/*
+/atom/movable/attack_hand(mob/living/carbon/human/user)
+	. = ..()
+	if(can_buckle && buckled_mob)
+		if(user_unbuckle_mob(user))
+			return 1
+
+/atom/movable/MouseDrop_T(mob/living/carbon/human/M, mob/living/carbon/human/user)
+	. = ..()
+	if(can_buckle && istype(M) && !buckled_mob)
+		if(user_buckle_mob(M, user))
+			return 1
+*/