Rotatable Atom Element (#18440)

* initial work

* a much better way of doing this

* these are needed

* minimize change

* nope

* missing elements

* whitespace

* species cases

* reduce pasta in ghosts

* more small fixes

* fixes for windows and inventory

* unneeded

* protected

* circulator uses examine

---------

Co-authored-by: Cameron Lennox <killer65311@gmail.com>

code/modules/assembly/infrared.dm

@@ -15,6 +15,10 @@
 	var/visible = 0
 	var/list/i_beams = null
 
+/obj/item/assembly/infra/Initialize(mapload)
+	. = ..()
+	AddElement(/datum/element/rotatable)
+
 /obj/item/assembly/infra/activate()
 	if(!..())
 		return FALSE
@@ -132,21 +136,6 @@
 				CHECK_TICK
 			return TRUE
 
-/obj/item/assembly/infra/verb/rotate_clockwise()
-	set name = "Rotate Infrared Laser Clockwise"
-	set category = "Object"
-	set src in usr
-
-	set_dir(turn(dir, 270))
-
-//VOREstation edit: counter-clockwise rotation
-/obj/item/assembly/infra/verb/rotate_counterclockwise()
-	set name = "Rotate Infrared Laser Counter-Clockwise"
-	set category = "Object"
-	set src in usr
-
-	set_dir(turn(dir, 90))
-//VOREstation edit end
 
 /***************************IBeam*********************************/