SICS-796: Bring GIT up to date with changes made on ics1-dingo.

site_ansto/instrument/dingo/config/plc/plc.tcl

@@ -5,8 +5,6 @@ if {$sim_mode == "false"} {
   MakeSafetyPLC plc plc_chan 0
 
 }
-makesctcontroller sct_shutter std 137.157.204.213:30000
-
 # Configuration Note:
 #
 # A default setting has been set in safetyplc.c code. following configuration
@@ -51,14 +49,38 @@ proc focuslight {args} {
   sct_shutter transact $cmd
 }
 
-proc tertiary_shutter {args} {
-  set cmd "set tertiary shutter=$args\r\n"
-  sct_shutter transact $cmd
+proc tertiary {sw} {
+  set sw [string tolower $sw]
+  switch $sw {
+		"open" {
+		  wait 1
+			plc_chan send set output=0
+	    wait 1
+			plc_chan send set output=3
+	    wait 1
+			plc_chan send set output=1
+	    wait 1
+			plc_chan send set output=3
+		}
+		"close" {
+		  wait 1
+			plc_chan send set output=0
+	    wait 1
+			plc_chan send set output=3
+	    wait 1
+			plc_chan send set output=2
+	    wait 1
+			plc_chan send set output=3
+		}
+		default {
+			clientput ERROR: [info level 0] command should be open or close not $sw
+		}
+  }
 }
 
 publish shutter    user
 publish focuslight user
-publish tertiary_shutter user
+publish tertiary user
 
 source $cfPath(plc)/plc_common_1.tcl