Fix various bugs in RADIO

This is the first implementation that PLAY A SOUND !
The whole RADIO class isn't tested thoroughly though

Moose Test Missions/RAD - Radio/RAD-000 - Radio Test Mission/RAD-000 - Radio Test Mission.lua

@@ -1,6 +1,18 @@
+BASE:TraceAll(1)
+BASE:TraceLevel(3)
 local Player = UNIT:FindByName("Player")
-Player:MessageToAll("MainScript Started", 10, "")
+Player:MessageToAll("MainScript Started 2", 10, "")
 
-local PlayerRadio = Player:GetRadio()
-PlayerRadio:NewTransmission("Noise.ogg", "Subtitle", 10, 251000, 0, 0)
-PlayerRadio:Broadcast()
+local Transmiter = UNIT:FindByName("Transmiter")
+
+local TransmiterRadio = Transmiter:GetRadio()
+TransmiterRadio:NewUnitTransmission("Noise.ogg", "Subtitle", 10, 251000, 0, 0)
+TransmiterRadio:E({
+                  TransmiterRadio.Positionable,
+                  TransmiterRadio.FileName,
+                  TransmiterRadio.Subtitle,
+                  TransmiterRadio.SubtitleDuration,
+                  TransmiterRadio.Frequency,
+                  TransmiterRadio.Modulation,
+                  })
+TransmiterRadio:Broadcast()