[MIRROR] Add VV handlers for /mob/confused

baystation12.dme

@@ -2090,6 +2090,7 @@
 #include "code\modules\mob\say.dm"
 #include "code\modules\mob\transform_procs.dm"
 #include "code\modules\mob\update_icons.dm"
+#include "code\modules\mob\vv_handlers.dm"
 #include "code\modules\mob\grab\grab_datum.dm"
 #include "code\modules\mob\grab\grab_object.dm"
 #include "code\modules\mob\grab\grab_readme.dm"

code/_helpers/functional.dm

@@ -42,6 +42,11 @@
 	if(!. && feedback_receiver)
 		to_chat(feedback_receiver, SPAN_WARNING("Value must be a numeral."))
 
+/proc/is_int_predicate(value, feedback_receiver)
+	. = value == round(value)
+	if (!. && feedback_receiver)
+		to_chat(feedback_receiver, SPAN_WARNING("Value must be a whole number."))
+
 /proc/is_non_zero_predicate(value, feedback_receiver)
 	. = value != 0
 	if (!. && feedback_receiver)

code/modules/mob/vv_handlers.dm

@@ -0,0 +1,9 @@
+/singleton/vv_set_handler/mob_confused
+	handled_type = /mob
+	predicates = list(/proc/is_num_predicate, /proc/is_non_negative_predicate, /proc/is_int_predicate)
+	handled_vars = list("confused")
+
+
+/singleton/vv_set_handler/mob_confused/handle_set_var(datum/O, variable, var_value, client)
+	var/mob/mob = O
+	mob.set_confused(var_value)