From a0599bdd08051382e34ad5927ae4722ca6ff144a Mon Sep 17 00:00:00 2001
From: Matias de la Fuente <fuente@hia.rwth-aachen.de>
Date: Tue, 2 Jul 2013 16:30:34 +0200
Subject: [PATCH] Added function to set/unset the RTS flag

---
 macros/setRTS.sci | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100644 macros/setRTS.sci

diff --git a/macros/setRTS.sci b/macros/setRTS.sci
new file mode 100644
index 0000000..003b874
--- /dev/null
+++ b/macros/setRTS.sci
@@ -0,0 +1,9 @@
+function result=setRTS(h,rts)
+// ------------------------------------------------------
+// Function to set the RTS-flag
+// h - handle of serial port
+// rts - 0 (off), 1 (on)
+//---------------------------------------------------------------//
+   TCL_EvalStr("fconfigure "+h+" -ttycontrol  [list  RTS "+rts+"]")
+   result=1;
+endfunction