Page cardThermo
    Attributes
        ID                                  : 0
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Locked                              : no
        Swide up page ID                    : disabled
        Swide down page ID                  : disabled
        Swide left page ID                  : disabled
        Swide right page ID                 : disabled
    
    Events
        Preinitialize Event
            vis p0,0
            vis tSend,0
            vis tInstruction,0
            vis tTmp,0
            vis tId,0
            vis nPageDisp,0
            vis xTempMin,0
            vis xTempMax,0
            vis xTempStep,0
            //tEntity.txt=tHeading.txt
            //disable buttons that are not implemented
            vis t7,0
            vis t6,0
            vis t5,0
            //
            //page open event
            // event,pageOpen,cardThermo,pageNumber
            // craft command
            // convert pageNumber and write to tTmp
            covx nPage,tTmp.txt,0,0
            tSend.txt="event,pageOpen,"+tTmp.txt
            //send calc crc
            btlen tSend.txt,sys0
            crcrest 1,0xffff // reset CRC
            crcputh 55 bb
            crcputs sys0,1
            crcputs tSend.txt,0
            //send cmd
            printh 55 bb
            prints sys0,2
            prints tSend.txt,0
            prints crcval,2
            //display current page from global var
            nPageDisp.val=nPage
        
Variable (string) strCommand
    Attributes
        ID            : 8
        Scope         : local
        Text          : 
        Max. Text Size: 100
    
Variable (string) entn
    Attributes
        ID            : 26
        Scope         : local
        Text          : 
        Max. Text Size: 50
    
Number nPageDisp
    Attributes
        ID                                  : 6
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Value                               : 0
    
XFloat xTempCurr
    Attributes
        ID                                  : 18
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Value                               : 215
    
XFloat xTempDest
    Attributes
        ID                                  : 20
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Value                               : 215
    
XFloat xTempMin
    Attributes
        ID                                  : 21
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Value                               : 0
    
XFloat xTempMax
    Attributes
        ID                                  : 22
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Value                               : 0
    
XFloat xTempStep
    Attributes
        ID                                  : 23
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Value                               : 0
    
Text tSend
    Attributes
        ID                                  : 2
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Text                                : newtxt
        Max. Text Size                      : 100
    
Text tTmp
    Attributes
        ID                                  : 3
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Text                                : 
        Max. Text Size                      : 10
    
Text tInstruction
    Attributes
        ID                                  : 9
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Text                                : 
        Max. Text Size                      : 20
    
Text tId
    Attributes
        ID                                  : 10
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Text                                : 
        Max. Text Size                      : 20
    
Text tHeading
    Attributes
        ID                                  : 11
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Text                                : 
        Max. Text Size                      : 40
    
Text tStatus
    Attributes
        ID                                  : 12
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Text                                : Heizung
        Max. Text Size                      : 10
    
Text t5
    Attributes
        ID                                  : 13
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Text                                : 
        Max. Text Size                      : 10
    
Text t6
    Attributes
        ID                                  : 14
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Text                                : 
        Max. Text Size                      : 10
    
Text t7
    Attributes
        ID                                  : 15
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Text                                : 
        Max. Text Size                      : 10
    
Text t2
    Attributes
        ID                                  : 19
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        Associated Keyboard                 : none
        Text                                : 
        Max. Text Size                      : 10
    
Picture p0
    Attributes
        ID                                  : 1
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
    
Button bNext
    Attributes
        ID                                  : 4
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        State                               : unpressed
        Text                                : 
        Max. Text Size                      : 10
    
    Events
        Touch Press Event
            nPage=nPage+1
            nPageDisp.val=nPage
            //page open event
            // event,pageOpen,cardEntities,pageNumber
            // craft command
            // convert pageNumber and write to tTmp
            covx nPage,tTmp.txt,0,0
            tSend.txt="event,pageOpen,"+tTmp.txt
            //send calc crc
            btlen tSend.txt,sys0
            crcrest 1,0xffff // reset CRC
            crcputh 55 bb
            crcputs sys0,1
            crcputs tSend.txt,0
            //send cmd
            printh 55 bb
            prints sys0,2
            prints tSend.txt,0
            prints crcval,2
        
Button bPrev
    Attributes
        ID                                  : 5
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        State                               : unpressed
        Text                                : 
        Max. Text Size                      : 10
    
    Events
        Touch Press Event
            nPage=nPage-1
            nPageDisp.val=nPage
            //page open event
            // event,pageOpen,cardEntities,pageNumber
            // craft command
            // convert pageNumber and write to tTmp
            covx nPage,tTmp.txt,0,0
            tSend.txt="event,pageOpen,"+tTmp.txt
            //send calc crc
            btlen tSend.txt,sys0
            crcrest 1,0xffff // reset CRC
            crcputh 55 bb
            crcputs sys0,1
            crcputs tSend.txt,0
            //send cmd
            printh 55 bb
            prints sys0,2
            prints tSend.txt,0
            prints crcval,2
        
Button bDown
    Attributes
        ID                                  : 16
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        State                               : unpressed
        Text                                : 
        Max. Text Size                      : 10
    
    Events
        Touch Press Event
            if(xTempDest.val>xTempMin.val)
            {
                xTempDest.val=xTempDest.val-xTempStep.val
            }
            // temp chane event
            // event,tempUpd,pageNumber,entityName,temperature
            //craft command
            // convert pageNumber and write to tTmp
            covx nPage,tTmp.txt,0,0
            tSend.txt="event,tempUpd,"+tTmp.txt+","
            tSend.txt+=entn.txt+","
            //convert temperature
            covx xTempDest.val,tTmp.txt,0,0
            tSend.txt+=tTmp.txt
            //send calc crc
            btlen tSend.txt,sys0
            crcrest 1,0xffff // reset CRC
            crcputh 55 bb
            crcputs sys0,1
            crcputs tSend.txt,0
            //send cmd
            printh 55 bb
            prints sys0,2
            prints tSend.txt,0
            prints crcval,2
        
Button bUp
    Attributes
        ID                                  : 17
        Scope                               : local
        Dragging                            : 0
        Disable release event after dragging: 0
        Send Component ID                   : disabled
        State                               : unpressed
        Text                                : 
        Max. Text Size                      : 10
    
    Events
        Touch Press Event
            if(xTempDest.val<xTempMax.val)
            {
                xTempDest.val=xTempDest.val+xTempStep.val
            }
            // temp chane event
            // event,tempUpd,pageNumber,entityName,temperature
            //craft command
            tSend.txt="event,tempUpd,"+tTmp.txt+","
            tSend.txt+=entn.txt+","
            //convert temperature
            covx xTempDest.val,tTmp.txt,0,0
            tSend.txt+=tTmp.txt
            //send calc crc
            btlen tSend.txt,sys0
            crcrest 1,0xffff // reset CRC
            crcputh 55 bb
            crcputs sys0,1
            crcputs tSend.txt,0
            //send cmd
            printh 55 bb
            prints sys0,2
            prints tSend.txt,0
            prints crcval,2
        
Timer tmSerial
    Attributes
        ID         : 7
        Scope      : local
        Period (ms): 50
        Enabled    : yes
    
    Events
        Timer Event
            // data available
            if(usize>1)
            {
                bufferPos=0
                while(bufferPos<usize)
                {
                    // check for 0x55 0xBB - Command Init Secuence
                    if(u[bufferPos]==187&&u[bufferPos-1]==85)
                    {
                        //remove garbage at the start of the buffer if there's any to free buffer for command
                        if(u[bufferPos]!=1)
                        {
                            udelete bufferPos-1
                        }
                        //instruction is now aligned with buffer, because we deleted garbage before instrcution
                        //get length after init sequence (check if there are more than to bytes in buffer)
                        if(3<usize)
                        {
                            // check if serial buffer has reached the announced length
                            ucopy payloadLength,2,2,0
                            // we are only checking payload length so we have to skip first 3 bytes (init+payload length) (-1 because of < instead of <=)
                            payloadLength+=3
                            // payload length does also not contain crc, so we are adding another 2 bytes for crc
                            payloadLength+=2
                            if(payloadLength<usize)
                            {
                                // calculate crc
                                crcrest 1,0xFFFF
                                // u[2] contains payload legth at 3rd pos in buffer, we are calculating crc from 3rd pos with number of bytes from payload length
                                //crcputu 3,u[2]
                                // u[2] cotnains payload length, we are calculating a crc over the whole message, so we have to add 3 to the length from u[2]
                                crcputu 0,payloadLength-1
                                // get recived crc to be able to compare it
                                ucopy recvCrc,payloadLength-1,2,0
                                // compare crc with recived value
                                if(crcval==recvCrc)
                                {
                                    // crc is okay
                                    // here is the location where acual code should be
                                    // write command to variable strCommand
                                    ucopy strCommand.txt,4,payloadLength-5,0
                                    // write instruction to tInstuction (debug output, but used as variable here, ui elements will be disabled by default)
                                    spstr strCommand.txt,tInstruction.txt,",",0
                                    if(tInstruction.txt=="entityUpd")
                                    {
                                        //entity name
                                        spstr strCommand.txt,entn.txt,",",1
                                        //heading
                                        spstr strCommand.txt,tHeading.txt,",",2
                                        //currentTemp
                                        spstr strCommand.txt,tTmp.txt,",",3
                                        covx tTmp.txt,xTempCurr.val,0,0
                                        //dstTemp
                                        spstr strCommand.txt,tTmp.txt,",",4
                                        covx tTmp.txt,xTempDest.val,0,0
                                        //status
                                        spstr strCommand.txt,tStatus.txt,",",5
                                        //minTemp
                                        spstr strCommand.txt,tTmp.txt,",",6
                                        covx tTmp.txt,xTempMin.val,0,0
                                        //maxTemp
                                        spstr strCommand.txt,tTmp.txt,",",7
                                        covx tTmp.txt,xTempMax.val,0,0
                                        //tempStep
                                        spstr strCommand.txt,tTmp.txt,",",8
                                        covx tTmp.txt,xTempStep.val,0,0
                                    }
                                    if(tInstruction.txt=="time")
                                    {
                                        // get set time to global variable
                                        spstr strCommand.txt,screensaver.vaTime.txt,",",1
                                    }
                                    if(tInstruction.txt=="date")
                                    {
                                        // get set date to global variable
                                        spstr strCommand.txt,screensaver.vaDate.txt,"?",1
                                    }
                                    if(tInstruction.txt=="dimmode")
                                    {
                                        // get value
                                        spstr strCommand.txt,tTmp.txt,",",1
                                        covx tTmp.txt,dimValue,0,0
                                    }
                                    if(tInstruction.txt=="timeout")
                                    {
                                        //set timeout to global var
                                        spstr strCommand.txt,tTmp.txt,",",1
                                        covx tTmp.txt,sleepTimeout,0,0
                                    }
                                    if(tInstruction.txt=="pageType")
                                    {
                                        //command format pageType,specialPageName
                                        //write name of speical page to tId
                                        spstr strCommand.txt,tId.txt,",",1
                                        //save second arg if there's one
                                        spstr strCommand.txt,tTmp.txt,",",2
                                        if(tId.txt=="cardThermo")
                                        {
                                            //yay, we are already on the correct page
                                        }else
                                        {
                                            //we are going to exit this page with this command, so we have to clear the buffer, so we are not getting into a stupid loop ...
                                            udelete u[2]+3
                                            bufferPos=0
                                        }
                                        if(tId.txt=="popupLight")
                                        {
                                            pageIcons.tTmp1.txt=tTmp.txt
                                            page popupLight
                                        }
                                        if(tId.txt=="cardEntities")
                                        {
                                            page cardEntities
                                        }
                                        if(tId.txt=="cardMedia")
                                        {
                                            page cardMedia
                                        }
                                        if(tId.txt=="pageStartup")
                                        {
                                            page pageStartup
                                        }
                                    }
                                    // end of user code
                                    udelete payloadLength-1
                                    bufferPos=0
                                }
                            }
                        }
                    }
                    // next character
                    bufferPos++
                }
                if(bufferPos==usize)
                {
                    // copy whole buffer to t1.txt, for debugging
                    //ucopy t2.txt,0,usize,0
                    // ucopy n2.val,0,usize,0
                    // clear whole buffer
                    //code_c
                    //bufferPos=0
                }
            }
        
Timer tmSleep
    Attributes
        ID         : 24
        Scope      : local
        Period (ms): 1000
        Enabled    : yes
    
    Events
        Timer Event
            if(sleepTimeout!=0)
            {
                sleepValue+=1
                if(sleepTimeout<=sleepValue)
                {
                    screensaver.originPage.val=dp
                    sleepValue=0
                    page screensaver
                }
            }
        
TouchCap tc0
    Attributes
        ID   : 25
        Scope: local
        Value: 0
    
    Events
        Touch Press Event
            sleepValue=0