rename query to avoid name clashing

1 files changed, 20 insertions, 0 deletions

diff --git a/query_usbtmc.m b/query_usbtmc.m
new file mode 100644
index 0000000..266e579
--- /dev/null
+++ b/query_usbtmc.m
@@ -0,0 +1,20 @@
+function [out_str] = query_usbtmc(fname, in_str)
+    fname = '/dev/usbtmc0';
+
+    string_terminator = 10;
+
+    fhr = fopen( fname, 'r');
+    fhw = fopen( fname, 'w');
+    fwrite(fhw, in_str);
+
+    out_str = [];
+    [out_byte, cnt] = fread(fhr,1,'*uint8');
+    while (out_byte ~= string_terminator) & (cnt ~= 0)
+        out_str = [ out_str, char(out_byte) ];
+        out_byte = fread(fhr,1,'*uint8');
+    end
+
+    fclose(fhr);
+    fclose(fhw);
+
+end