Action Buttons and fixes for minebots (#19718)

* Added verbs for sentient minebots.

* Changed minebot verbs into action buttons.

code/modules/mining/minebot.dm

@@ -1,4 +1,6 @@
 /**********************Mining drone**********************/
+#define MINEDRONE_COLLECT 1
+#define MINEDRONE_ATTACK 2
 
 /mob/living/simple_animal/hostile/mining_drone
 	name = "nanotrasen minebot"
@@ -37,6 +39,30 @@
 						  /obj/item/weapon/ore/plasma,  /obj/item/weapon/ore/uranium,    /obj/item/weapon/ore/iron,
 						  /obj/item/weapon/ore/bananium, /obj/item/weapon/ore/titanium)
 	healable = 0
+	var/mode = MINEDRONE_COLLECT
+	var/light_on = 0
+
+	var/datum/action/innate/minedrone/toggle_light/toggle_light_action
+	var/datum/action/innate/minedrone/toggle_meson_vision/toggle_meson_vision_action
+	var/datum/action/innate/minedrone/toggle_mode/toggle_mode_action
+	var/datum/action/innate/minedrone/dump_ore/dump_ore_action
+
+/mob/living/simple_animal/hostile/mining_drone/New()
+	..()
+	toggle_light_action = new()
+	toggle_light_action.Grant(src)
+	toggle_meson_vision_action = new()
+	toggle_meson_vision_action.Grant(src)
+	toggle_mode_action = new()
+	toggle_mode_action.Grant(src)
+	dump_ore_action = new()
+	dump_ore_action.Grant(src)
+
+	SetCollectBehavior()
+
+/mob/living/simple_animal/hostile/mining_drone/sentience_act()
+	AIStatus = AI_OFF
+	check_friendly_fire = 0
 
 /mob/living/simple_animal/hostile/mining_drone/attackby(obj/item/I, mob/user, params)
 	if(istype(I, /obj/item/weapon/weldingtool))
@@ -61,27 +87,23 @@
 	..()
 	visible_message("<span class='danger'>[src] is destroyed!</span>")
 	new /obj/effect/decal/cleanable/robot_debris(src.loc)
-	DropOre()
+	DropOre(0)
 	qdel(src)
 	return
 
-/mob/living/simple_animal/hostile/mining_drone/New()
-	..()
-	SetCollectBehavior()
-
 /mob/living/simple_animal/hostile/mining_drone/attack_hand(mob/living/carbon/human/M)
 	if(M.a_intent == "help")
-		switch(search_objects)
-			if(0)
-				SetCollectBehavior()
+		toggle_mode()
+		switch(mode)
+			if(MINEDRONE_COLLECT)
 				M << "<span class='info'>[src] has been set to search and store loose ore.</span>"
-			if(2)
-				SetOffenseBehavior()
+			if(MINEDRONE_ATTACK)
 				M << "<span class='info'>[src] has been set to attack hostile wildlife.</span>"
 		return
 	..()
 
 /mob/living/simple_animal/hostile/mining_drone/proc/SetCollectBehavior()
+	mode = MINEDRONE_COLLECT
 	idle_vision_range = 9
 	search_objects = 2
 	wander = 1
@@ -89,8 +111,10 @@
 	minimum_distance = 1
 	retreat_distance = null
 	icon_state = "mining_drone"
+	src << "<span class='info'>You are set to collect mode. You can now collect loose ore.</span>"
 
 /mob/living/simple_animal/hostile/mining_drone/proc/SetOffenseBehavior()
+	mode = MINEDRONE_ATTACK
 	idle_vision_range = 7
 	search_objects = 0
 	wander = 0
@@ -98,9 +122,10 @@
 	retreat_distance = 1
 	minimum_distance = 2
 	icon_state = "mining_drone_offense"
+	src << "<span class='info'>You are set to attack mode. You can now attack from range.</span>"
 
 /mob/living/simple_animal/hostile/mining_drone/AttackingTarget()
-	if(istype(target, /obj/item/weapon/ore))
+	if(istype(target, /obj/item/weapon/ore) && mode ==  MINEDRONE_COLLECT)
 		CollectOre()
 		return
 	..()
@@ -115,19 +140,86 @@
 			O.loc = src
 	return
 
-/mob/living/simple_animal/hostile/mining_drone/proc/DropOre()
+/mob/living/simple_animal/hostile/mining_drone/proc/DropOre(message = 1)
 	if(!contents.len)
+		if(message)
+			src << "<span class='notice'>You attempt to dump your stored ore, but you have none.</span>"
 		return
+	if(message)
+		src << "<span class='notice'>You dump your stored ore.</span>"
 	for(var/obj/item/weapon/ore/O in contents)
 		contents -= O
 		O.loc = src.loc
 	return
 
-/mob/living/simple_animal/hostile/mining_drone/adjustHealth()
-	if(search_objects)
+/mob/living/simple_animal/hostile/mining_drone/adjustHealth(amount)
+	if(mode != MINEDRONE_ATTACK && amount > 0)
 		SetOffenseBehavior()
 	. = ..()
 
+/mob/living/simple_animal/hostile/mining_drone/proc/toggle_mode()
+	switch(mode)
+		if(MINEDRONE_COLLECT)
+			SetOffenseBehavior()
+		if(MINEDRONE_ATTACK)
+			SetCollectBehavior()
+		else //This should never happen.
+			mode = MINEDRONE_COLLECT
+			SetCollectBehavior()
+
+//Actions for sentient minebots
+
+/datum/action/innate/minedrone
+	check_flags = AB_CHECK_CONSCIOUS
+	background_icon_state = "bg_default"
+
+/datum/action/innate/minedrone/toggle_light
+	name = "Toggle Light"
+	button_icon_state = "mech_lights_off"
+
+/datum/action/innate/minedrone/toggle_light/Activate()
+	var/mob/living/simple_animal/hostile/mining_drone/user = owner
+
+	if(user.light_on)
+		user.AddLuminosity(-6)
+	else
+		user.AddLuminosity(6)
+	user.light_on = !user.light_on
+	user << "<span class='notice'>You toggle your light [user.light_on ? "on" : "off"].</span>"
+
+/datum/action/innate/minedrone/toggle_meson_vision
+	name = "Toggle Meson Vision"
+	button_icon_state = "meson"
+
+/datum/action/innate/minedrone/toggle_meson_vision/Activate()
+	var/mob/living/simple_animal/hostile/mining_drone/user = owner
+
+	if(user.sight & SEE_TURFS)
+		user.sight &= ~SEE_TURFS
+		user.see_invisible = SEE_INVISIBLE_LIVING
+	else
+		user.sight |= SEE_TURFS
+		user.see_invisible = SEE_INVISIBLE_MINIMUM
+
+	user << "<span class='notice'>You toggle your meson vision [(user.sight & SEE_TURFS) ? "on" : "off"].</span>"
+
+/datum/action/innate/minedrone/toggle_mode
+	name = "Toggle Mode"
+	button_icon_state = "mech_cycle_equip_off"
+
+/datum/action/innate/minedrone/toggle_mode/Activate()
+	var/mob/living/simple_animal/hostile/mining_drone/user = owner
+	user.toggle_mode()
+
+/datum/action/innate/minedrone/dump_ore
+	name = "Dump Ore"
+	button_icon_state = "mech_eject"
+
+/datum/action/innate/minedrone/dump_ore/Activate()
+	var/mob/living/simple_animal/hostile/mining_drone/user = owner
+	user.DropOre()
+
+
 /**********************Minebot Upgrades**********************/
 
 //Melee
@@ -185,4 +277,7 @@
 	icon_state = "door_electronics"
 	icon = 'icons/obj/module.dmi'
 	sentience_type = SENTIENCE_MINEBOT
-	origin_tech = "programming=6"
+	origin_tech = "programming=6"
+
+#undef MINEDRONE_COLLECT
+#undef MINEDRONE_ATTACK