Differences

This shows you the differences between two versions of the page.

--- helvar [2023/05/20 21:12] – emozolyak
+++ helvar [2023/09/22 14:33] (current) – emozolyak
@@ Line 1: / Line 1: @@
-====== Helvar light control comm. protocol ======
+====== Helvar light control communication protocol ======
 Please refer to the [[https://aca.im/driver_docs/Helvar/HelvarNet-Overview.pdf|HelvarNet communication protocol]] for usage.
@@ Line 16: / Line 16: @@
 The usage of this protocol is as follows:
-  - Your application logic, e.g. recipe selection boxes on the dashboards chooses scenario id and writes it to the register
+  *Your application logic, e.g. recipe selection boxes on the dashboards chooses scenario id and writes it to the register
-  - Lua script monitors scenes ids written and converts them to the strings according to the HelvarNet protocol
+  *Lua script monitors scenes ids written and converts them to the strings according to the HelvarNet protocol and application logic
+<WRAP center round important 80%>
+Please be informed this protocol relays your HelvarNet string to the TCP address:port. It does not provide your application logic. Prepare proper dictionaries, templates or mapping rules to compose messages in your application.
+</WRAP>
+<WRAP center round box 80%>
+For example, in the command Recall Group 1234, Block 5, Scene 6, Fade Time 32 s, the string is
+sent as follows, including the delimiters and the start character '>' and stop character '#':
+">V:1,C:11,G:1234,B:5,S:6,F:3200#"
+</WRAP>
+  *So the string like ">V:1,C:11,G:1234,B:5,S:6,F:3200#" should be written to the register named CMD0 in the project.
+  *Once the string is written to the CMD0 register, it is sent to the remote device to the TCP port assigned in the connection settings.
+  *The response (which can be multipart) is stored in the same register
@@ Line 26: / Line 39: @@
 PARTIAL_ETX = '$'
 FULL_ETX    = '#'
 function onScanStart ()
     now = os.time()
@@ Line 34: / Line 47: @@
    addDevice{name = "CMD",     shift = 0, base = 10, xtraFields = {} }
 end
 function readRegister (reg, device, unitId)
     if (not readBuffer) then
         readBuffer = 'no data'
     end
+    return readBuffer
-    return readBuffer -- will be assinged in writeRegister
 end
 function writeRegister (reg, device, unitId, newValue)
-    sendString_(newValue) -- expects string to be written externally
+   sendString_(newValue) -- expects string to be written externally
    local buf = {}
+   local tryCount = 0
    repeat
+       tryCount = tryCount + 1 ; DEBUG('tryCount = ' .. tryCount)
        local currentFrame = readUntil(PARTIAL_ETX, FULL_ETX)
-       local lastChar
        if currentFrame then
            table.insert(buf, currentFrame)
            lastChar = currentFrame[#currentFrame]
        end
+    until (lastChar == FULL_ETX or tryCount > 3)
-   until (not lastChar or (lastChar == FULL_ETX))
-   if (#buf > 0) then
+    if (lastChar == FULL_ETX) then
-        readBuffer = table.concat(buf)
+        readBuffer = buf
-   end
+        return true
+    end
-   return true
+    readBuffer = 'read bad data!'
+    return true
 end
 -------------------------- Helpers --------------------------
 function sendString_(s) -- new sendString version
     local sendBuf = {}
@@ Line 78: / Line 92: @@
     sendBytes(sendBuf)
 end
 function readUntil(endByte1, endByte2) -- read input buffer untils endByte(s) or timeout
+    DEBUG("Entered readUntil.")
     local ONE_BYTE = 1
-    local buf = {}
+    local buf, rb = {}, nil
     repeat
-        local rb = readBytes(ONE_BYTE)
+        rb = readBytes(ONE_BYTE)
         if rb then
-            rb = rb[ONE_BYTE]
+            rb = rb[ONE_BYTE]          ; DEBUG('read byte: ' .. string.char(rb))
             table.insert(buf, rb)
         end
     until (not rb or (rb == endByte1 or rb == endByte2))
-    return ((#buf >= ONE_BYTE) and buf) or false
+    DEBUG("Exit on rb = " .. tostring(rb) )
+    DEBUG('buf = ' .. table.concat(buf, ' '))
+    if (#buf > 0) and (buf[#buf] == endByte1 or buf[#buf] == endByte2) then
+        DEBUG('Got right frame : ') return buf
+    else
+        DEBUG('Got wrong frame : ') ; return false
+    end
 end
 </code>