LTCD_070816.ISO

LT/Demo/CommTerminal.CPZ

@@ -0,0 +1,19 @@
+// COM port Terminal
+void CommTerm(I8 port=1,U8 baud=9600)
+{
+  U8 sc;
+  U8 ch=0;
+  coutln "ESC to exit";
+  CommOpen8N1(port,baud);
+  while (ch!=CH_ESC) {
+    if (CommScanChar(port,&ch))
+      PutChar(ch);
+    ch=0;
+    if (ScanKey(&ch,&sc))
+      CommPutChar(port,ch);
+    SwapInNext;
+  }
+  CommClose(port);
+}
+
+CommTerm;