Bay12 examine overhaul.

This commit overhauls the examine system to baystation's latest system,
including a more efficient verb approach, and a new status panel tab,
which shows more information for pre-defined objects.

code/game/objects/items/devices/lightreplacer.dm

@@ -66,10 +66,9 @@
 	failmsg = "The [name]'s refill light blinks red."
 	..()
 
-/obj/item/device/lightreplacer/examine()
-	set src in view(2)
-	..()
-	usr << "It has [uses] lights remaining."
+/obj/item/device/lightreplacer/examine(mob/user)
+	if(..(user, 2))
+		user << "It has [uses] lights remaining."
 
 /obj/item/device/lightreplacer/attackby(obj/item/W, mob/user, params)
 	if(istype(W, /obj/item/stack/sheet/glass))

code/game/objects/items/devices/modkit.dm

@@ -62,9 +62,9 @@
 		user.unEquip(src)
 		qdel(src)
 
-/obj/item/device/modkit/examine()
-	..()
-	usr << "It looks as though it modifies hardsuits to fit [target_species] users."
+/obj/item/device/modkit/examine(mob/user)
+	..(user)
+	user << "It looks as though it modifies hardsuits to fit [target_species] users."
 
 /obj/item/device/modkit/tajaran
 	name = "Tajaran hardsuit modification kit"

code/game/objects/items/devices/pipe_painter.dm

@@ -28,6 +28,6 @@
 /obj/item/device/pipe_painter/attack_self(mob/user as mob)
 	mode = input("Which colour do you want to use?", "Pipe painter", mode) in modes
 
-/obj/item/device/pipe_painter/examine()
-	..()
-	usr << "It is in [mode] mode."
+/obj/item/device/pipe_painter/examine(mob/user)
+	..(user)
+	user << "It is in [mode] mode."

code/game/objects/items/devices/radio/radio.dm

@@ -66,7 +66,7 @@ var/global/list/default_medbay_channels = list(
 	wires = new(src)
 	if(radio_controller)
 		initialize()
-		
+
 	internal_channels = default_internal_channels.Copy()
 
 /obj/item/device/radio/initialize()
@@ -78,8 +78,8 @@ var/global/list/default_medbay_channels = list(
 		secure_radio_connections[ch_name] = radio_controller.add_object(src, radiochannels[ch_name],  RADIO_CHAT)
 
 /obj/item/device/radio/attack_ghost(mob/user)
-	interact(user)		
-		
+	interact(user)
+
 /obj/item/device/radio/attack_self(mob/user as mob)
 	user.set_machine(src)
 	interact(user)
@@ -141,18 +141,18 @@ var/global/list/default_medbay_channels = list(
 		return 0
 
 	return user.has_internal_radio_channel_access(user, internal_channels[freq])
-	
-/mob/proc/has_internal_radio_channel_access(var/mob/user, var/list/req_one_accesses)	
+
+/mob/proc/has_internal_radio_channel_access(var/mob/user, var/list/req_one_accesses)
 	var/obj/item/weapon/card/id/I = user.get_id_card()
 	return has_access(list(), req_one_accesses, I ? I.GetAccess() : list())
-	
-/mob/living/silicon/has_internal_radio_channel_access(var/mob/user, var/list/req_one_accesses)	
+
+/mob/living/silicon/has_internal_radio_channel_access(var/mob/user, var/list/req_one_accesses)
 	var/list/access = get_all_accesses()
 	return has_access(list(), req_one_accesses, access)
-	
+
 /mob/dead/observer/has_internal_radio_channel_access(var/mob/user, var/list/req_one_accesses)
 	return can_admin_interact()
-	
+
 /obj/item/device/radio/proc/text_wires()
 	if (b_stat)
 		return wires.GetInteractWindow()
@@ -515,7 +515,7 @@ var/global/list/default_medbay_channels = list(
 
 
 /obj/item/device/radio/examine(mob/user)
-	. = ..()
+	..(user)
 	if ((in_range(src, user) || loc == user))
 		if (b_stat)
 			user.show_message("\blue \the [src] can be attached and modified!")
@@ -564,11 +564,11 @@ var/global/list/default_medbay_channels = list(
 /obj/item/device/radio/borg/syndicate
 	syndie = 1
 	keyslot = new /obj/item/device/encryptionkey/syndicate
-	
+
 /obj/item/device/radio/borg/Destroy()
 	myborg = null
 	return ..()
-	
+
 /obj/item/device/radio/borg/list_channels(var/mob/user)
 	return list_secure_channels(user)
 
@@ -732,7 +732,7 @@ var/global/list/default_medbay_channels = list(
 
 /obj/item/device/radio/off
 	listening = 0
-	
+
 /obj/item/device/radio/phone
 	broadcasting = 0
 	icon = 'icons/obj/items.dmi'

code/game/objects/items/devices/taperecorder.dm

@@ -23,10 +23,9 @@
 	update_icon()
 
 
-/obj/item/device/taperecorder/examine()
-	set src in view(1)
-	..()
-	usr << "The wire panel is [open_panel ? "opened" : "closed"]."
+/obj/item/device/taperecorder/examine(mob/user)
+	if(..(user, 1))
+		user << "The wire panel is [open_panel ? "opened" : "closed"]."
 
 
 /obj/item/device/taperecorder/attackby(obj/item/I, mob/user)