[MIRROR] Tesla Component Examine Tweaks (#6904)

Co-authored-by: Heroman3003 <31296024+Heroman3003@users.noreply.github.com>
Co-authored-by: CHOMPStation2 <chompsation2@gmail.com>

code/modules/power/singularity/emitter.dm

@@ -30,7 +30,6 @@
 
 	var/integrity = 80
 
-
 /obj/machinery/power/emitter/verb/rotate_clockwise()
 	set name = "Rotate Emitter Clockwise"
 	set category = "Object"
@@ -42,6 +41,17 @@
 	src.set_dir(turn(src.dir, 270))
 	return 1
 
+/obj/machinery/power/emitter/verb/rotate_counterclockwise()
+	set name = "Rotate Emitter Counter-Clockwise"
+	set category = "Object"
+	set src in oview(1)
+
+	if (src.anchored || usr:stat)
+		to_chat(usr, "It is fastened to the floor!")
+		return 0
+	src.set_dir(turn(src.dir, 90))
+	return 1
+
 /obj/machinery/power/emitter/Initialize()
 	. = ..()
 	if(state == 2 && anchored)
@@ -274,7 +284,7 @@
 	. = ..()
 	switch(state)
 		if(0)
-			. += "<span class='warning'>It is not secured in place at all!</span>"
+			. += "<span class='warning'>It is not secured in place!</span>"
 		if(1)
 			. += "<span class='warning'>It has been bolted down securely, but not welded into place.</span>"
 		if(2)

code/modules/power/singularity/field_generator.dm

@@ -44,7 +44,7 @@ field_generator power level display
 	. = ..()
 	switch(state)
 		if(0)
-			. += "<span class='warning'>It is not secured in place at all!</span>"
+			. += "<span class='warning'>It is not secured in place!</span>"
 		if(1)
 			. += "<span class='warning'>It has been bolted down securely, but not welded into place.</span>"
 		if(2)

code/modules/power/singularity/generator.dm

@@ -12,7 +12,10 @@
 
 /obj/machinery/the_singularitygen/examine()
 	. = ..()
-	. += "<span class='notice'>It is [anchored ? "secured" : "not secured"]!</span>"
+	if(anchored)
+		. += "<span class='warning'>It is not secured!</span>"
+	else
+		. += "<span class='notice'>It has been securely bolted down and is ready for operation.</span>"
 
 /obj/machinery/the_singularitygen/process()
 	var/turf/T = get_turf(src)