--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lvC3mcc/db/mcc.proto	Wed Jun 19 15:34:43 2013 +0200
@@ -0,0 +1,39 @@
+# mcc.proto   Uwe Hoppe   Fritz-Haber-Institut der MPG   4/2013
+#
+# 0x05=ENQ
+# 0x06=ACK
+
+ReplyTimeout = 2000;
+InTerminator = CR LF;
+iWT = 20;
+
+getVersion {
+  out "PNR\r\n"; in ACK;
+  wait $iWT;
+  out ENQ; in "%s";
+}
+
+getUnit {
+  out "UNI\r\n"; in ACK;
+  wait $iWT;
+  out ENQ; in "%d";
+}
+
+getStatPres {
+  out "PR\$2\r\n"; in ACK;
+  wait $iWT; out ENQ;
+  in "%d,%(\$1\$2.VAL)E";
+}
+
+getSetpoint {
+  out "SP\$2\r\n"; in ACK;
+  wait $iWT; out ENQ;
+  in "%(\$1\$2.VAL)d,%(\$1\$2L.VAL)E,%(\$1\$2H.VAL)E";
+}
+
+setPoint {
+  out "SP\$2,%(\$1\$2.VAL)d,%(\$1\$2L.VAL)E,%(\$1\$2H.VAL)E\r\n"; in ACK;
+  wait $iWT; out ENQ;
+  in "%(\$1\$2.VAL)d,%(\$1\$2L.VAL)E,%(\$1\$2H.VAL)E";
+  @init { getSetpoint; }
+}