This commit is contained in:
Johannes
2022-10-23 21:34:00 +02:00
16 changed files with 4999 additions and 194 deletions

View File

@@ -1,16 +1,5 @@
--- HMI/n2t-out
+++ HMI/US/landscape/n2t-out
├── file list
│ @@ -9,9 +9,8 @@
│ pageIcons.txt
│ pageStartup.txt
│ pageTest.txt
│ popupFan.txt
│ popupLight.txt
│ popupNotify.txt
│ popupShutter.txt
│ -popupThermo.txt
│ screensaver.txt
├── Program.s.txt
│ @@ -10,10 +10,7 @@
│ int sleepValue=0
@@ -51,62 +40,6 @@
│ Attributes
│ Scope : local
│ Text :
├── cardThermo.txt
│ @@ -779,30 +779,14 @@
│ crcputs tSend.txt,0
│ //send cmd
│ printh 55 bb
│ prints sys0,2
│ prints tSend.txt,0
│ prints crcval,2
│ -Dual-state Button btDetail
│ - Attributes
│ - Scope : local
│ - Dragging : 0
│ - Disable release event after dragging: 0
│ - Send Component ID : disabled
│ - State : pressed
│ - Text : 
│ - Max. Text Size : 10
│ -
│ - Events
│ - Touch Press Event
│ - pageIcons.tTmp1.txt=tHeading.txt
│ - pageIcons.tTmp2.txt=entn.txt
│ - page popupThermo
│ -
│ Hotspot mSwipeNext
│ Attributes
│ Scope : local
│ Dragging : 0
│ Disable release event after dragging: 0
│ Send Component ID : disabled
│ @@ -1094,23 +1078,14 @@
│ vis btDown1,1
│ vis tCF1,1
│ vis bUp2,1
│ vis xTempDest2,1
│ vis bDown2,1
│ vis tCF2,1
│ }
│ - //Show btDetail
│ - spstr strCommand.txt,tTmp.txt,"~",47
│ - if(tTmp.txt!="1")
│ - {
│ - vis btDetail,1
│ - }else
│ - {
│ - vis btDetail,0
│ - }
│ }
│ if(tInstruction.txt=="pageType")
│ {
│ sleepValue=0
│ //command format pageType,specialPageName
│ //write name of speical page to tId
│ spstr strCommand.txt,tId.txt,"~",1
├── pageStartup.txt
│ @@ -173,15 +173,15 @@
│ Max. Text Size : 10

View File

@@ -1453,6 +1453,44 @@ Dual-state Button btDown
prints tSend.txt,0
prints crcval,2
Dual-state Button btDetail
Attributes
ID : 52
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Opacity : 127
x coordinate : 409
y coordinate : 199
Width : 50
Height : 50
Effect : load
Effect Priority : 0
Effect Time : 300
Fill : solid color
Style : flat
Font ID : 3
Back. Color (Unpressed) : 6371
Back. Picture ID (Pressed) : 65535
Back. Color (Pressed) : 6371
Font Color (Unpressed) : 50712
Font Color (Pressed) : 50712
Horizontal Alignment : center
Vertical Alignment : center
State : pressed
Text : 
Max. Text Size : 10
Word wrap : disabled
Horizontal Spacing : 0
Vertical Spacing : 0
Events
Touch Press Event
pageIcons.tTmp1.txt=tHeading.txt
pageIcons.tTmp2.txt=entn.txt
page popupThermo
Hotspot mSwipeNext
Attributes
ID : 34
@@ -1780,6 +1818,15 @@ Timer tmSerial
vis bDown2,1
vis tCF2,1
}
//Show btDetail
spstr strCommand.txt,tTmp.txt,"~",47
if(tTmp.txt=="1")
{
vis btDetail,1
}else
{
vis btDetail,0
}
}
if(tInstruction.txt=="pageType")
{

View File

@@ -54,17 +54,21 @@ screensaver
38 Component(s)
338 Line(s) of event code
262 Unique line(s) of event code
cardThermo
52 Component(s)
585 Line(s) of event code
306 Unique line(s) of event code
popupThermo
44 Component(s)
515 Line(s) of event code
272 Unique line(s) of event code
cardEntities
65 Component(s)
1137 Line(s) of event code
522 Unique line(s) of event code
cardThermo
53 Component(s)
596 Line(s) of event code
313 Unique line(s) of event code
Total
15 Page(s)
484 Component(s)
5766 Line(s) of event code
1561 Unique line(s) of event code
16 Page(s)
529 Component(s)
6292 Line(s) of event code
1670 Unique line(s) of event code

File diff suppressed because it is too large Load Diff

View File

@@ -783,6 +783,22 @@ Dual-state Button btDown
prints tSend.txt,0
prints crcval,2
Dual-state Button btDetail
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : pressed
Text : 
Max. Text Size : 10
Events
Touch Press Event
pageIcons.tTmp1.txt=tHeading.txt
pageIcons.tTmp2.txt=entn.txt
page popupThermo
Hotspot mSwipeNext
Attributes
Scope : local
@@ -1082,6 +1098,15 @@ Timer tmSerial
vis bDown2,1
vis tCF2,1
}
//Show btDetail
spstr strCommand.txt,tTmp.txt,"~",47
if(tTmp.txt=="1")
{
vis btDetail,1
}else
{
vis btDetail,0
}
}
if(tInstruction.txt=="pageType")
{

View File

@@ -0,0 +1,989 @@
Page popupThermo
Attributes
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
dim=dimValueNormal
//get entitiy name
tEntity.txt=pageIcons.tTmp1.txt
//get entity id
entn.txt=pageIcons.tTmp2.txt
tIcon1.txt=pageIcons.tTmp3.txt
vis p0,0
vis tSend,0
vis tTmp,0
vis tInstruction,0
vis tId,0
vis bModeNext,0
vis cModeNext,0
vis dModeNext,0
//page open event
// event,pageOpenDetail,typeOfPage,tEntityName
// craft command
tSend.txt="event,pageOpenDetail,popupThermo,"+entn.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
popupThermo.bco=defaultBcoColor
for(sys0=0;sys0<24;sys0++)
{
if(b[sys0].type==98||b[sys0].type==116)
{
b[sys0].bco=defaultBcoColor
b[sys0].pco=defaultFontColor
}
if(b[sys0].type==53&&defaultBcoColor==0)
{
b[sys0].pic=10
b[sys0].pic2=11
}
}
Variable (string) strCommand
Attributes
Scope : local
Text :
Max. Text Size: 500
Variable (string) entn
Attributes
Scope : local
Text :
Max. Text Size: 80
Variable (int32) mode
Attributes
Scope: local
Value: 1
Variable (int32) mode_temp
Attributes
Scope: local
Value: 0
Variable (int32) vaModePos
Attributes
Scope: local
Value: 0
Variable (string) vaModeList
Attributes
Scope : local
Text :
Max. Text Size: 400
Variable (string) vaModeCur
Attributes
Scope : local
Text :
Max. Text Size: 40
Variable (string) tSend
Attributes
Scope : local
Text :
Max. Text Size: 200
Variable (string) tTmp
Attributes
Scope : local
Text :
Max. Text Size: 80
Variable (string) tInstruction
Attributes
Scope : local
Text :
Max. Text Size: 20
Variable (string) tId
Attributes
Scope : local
Text :
Max. Text Size: 20
Variable (int32) vaModePos2
Attributes
Scope: local
Value: 0
Variable (string) vaModeList2
Attributes
Scope : local
Text :
Max. Text Size: 400
Variable (string) vaModeCur2
Attributes
Scope : local
Text :
Max. Text Size: 40
Variable (string) vaModeCur3
Attributes
Scope : local
Text :
Max. Text Size: 40
Variable (string) vaModeList3
Attributes
Scope : local
Text :
Max. Text Size: 400
Variable (int32) vaModePos3
Attributes
Scope: local
Value: 0
Variable (string) vaType
Attributes
Scope : local
Text :
Max. Text Size: 20
Variable (string) vaType2
Attributes
Scope : local
Text :
Max. Text Size: 20
Variable (string) vaType3
Attributes
Scope : local
Text :
Max. Text Size: 20
Text tEntity
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Associated Keyboard : none
Text :
Max. Text Size : 25
Text tIcon1
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Associated Keyboard : none
Text :
Max. Text Size : 10
Text heading1
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Associated Keyboard : none
Text :
Max. Text Size : 25
Text heading2
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Associated Keyboard : none
Text :
Max. Text Size : 25
Text heading3
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Associated Keyboard : none
Text :
Max. Text Size : 25
Picture p0
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Button b0
Attributes
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
tSend.txt="event,buttonPress2,popupLight,bExit"
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button bMode1
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos.val-3
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button bMode3
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos.val-1
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button bMode2
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos.val-2
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button bModeNext
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text : 
Max. Text Size : 3
Events
Touch Press Event
//if(bMode3.txt=="")
spstr vaModeList.txt,tTmp.txt,"?",vaModePos.val
if(tTmp.txt=="")
{
vaModePos.val=0
spstr vaModeList.txt,bMode1.txt,"?",vaModePos.val
spstr vaModeList.txt,bMode2.txt,"?",vaModePos.val+1
spstr vaModeList.txt,bMode3.txt,"?",vaModePos.val+2
}
spstr vaModeList.txt,bMode1.txt,"?",vaModePos.val
spstr vaModeList.txt,bMode2.txt,"?",vaModePos.val+1
spstr vaModeList.txt,bMode3.txt,"?",vaModePos.val+2
vaModePos.val+=3
spstr vaModeList.txt,tTmp.txt,"?",3
if(tTmp.txt=="")
{
vis bModeNext,0
}else
{
vis bModeNext,1
}
bMode1.pco=defaultFontColor
bMode2.pco=defaultFontColor
bMode3.pco=defaultFontColor
if(bMode1.txt==vaModeCur.txt)
{
bMode1.pco=1374
}
if(bMode2.txt==vaModeCur.txt)
{
bMode2.pco=1374
}
if(bMode3.txt==vaModeCur.txt)
{
bMode3.pco=1374
}
Button cModeNext
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text : 
Max. Text Size : 3
Events
Touch Press Event
spstr vaModeList2.txt,tTmp.txt,"?",vaModePos2.val
if(tTmp.txt=="")
{
vaModePos2.val=0
spstr vaModeList2.txt,cMode1.txt,"?",vaModePos2.val
spstr vaModeList2.txt,cMode2.txt,"?",vaModePos2.val+1
spstr vaModeList2.txt,cMode3.txt,"?",vaModePos2.val+2
}
spstr vaModeList2.txt,cMode1.txt,"?",vaModePos2.val
spstr vaModeList2.txt,cMode2.txt,"?",vaModePos2.val+1
spstr vaModeList2.txt,cMode3.txt,"?",vaModePos2.val+2
vaModePos2.val+=3
spstr vaModeList2.txt,tTmp.txt,"?",3
if(tTmp.txt=="")
{
vis cModeNext,0
}else
{
vis cModeNext,1
}
cMode1.pco=defaultFontColor
cMode2.pco=defaultFontColor
cMode3.pco=defaultFontColor
if(cMode1.txt==vaModeCur.txt)
{
cMode1.pco=1374
}
if(cMode2.txt==vaModeCur.txt)
{
cMode2.pco=1374
}
if(cMode3.txt==vaModeCur.txt)
{
cMode3.pco=1374
}
Button cMode3
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos2.val-1
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType2.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button cMode2
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos2.val-2
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType2.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button cMode1
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos2.val-3
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType2.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button dModeNext
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text : 
Max. Text Size : 3
Events
Touch Press Event
spstr vaModeList3.txt,tTmp.txt,"?",vaModePos3.val
if(tTmp.txt=="")
{
vaModePos3.val=0
spstr vaModeList3.txt,dMode1.txt,"?",vaModePos3.val
spstr vaModeList3.txt,dMode2.txt,"?",vaModePos3.val+1
spstr vaModeList3.txt,dMode3.txt,"?",vaModePos3.val+2
}
spstr vaModeList3.txt,dMode1.txt,"?",vaModePos3.val
spstr vaModeList3.txt,dMode2.txt,"?",vaModePos3.val+1
spstr vaModeList3.txt,dMode3.txt,"?",vaModePos3.val+2
vaModePos3.val+=3
spstr vaModeList3.txt,tTmp.txt,"?",3
if(tTmp.txt=="")
{
vis dModeNext,0
}else
{
vis dModeNext,1
}
dMode1.pco=defaultFontColor
dMode2.pco=defaultFontColor
dMode3.pco=defaultFontColor
if(dMode1.txt==vaModeCur.txt)
{
dMode1.pco=1374
}
if(dMode2.txt==vaModeCur.txt)
{
dMode2.pco=1374
}
if(dMode3.txt==vaModeCur.txt)
{
dMode3.pco=1374
}
Button dMode3
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos3.val-1
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType3.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button dMode2
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos3.val-2
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType3.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button dMode1
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos3.val-3
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType3.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Timer tmSleep
Attributes
Scope : local
Period (ms): 1000
Enabled : yes
Events
Timer Event
if(sleepTimeout!=0)
{
sleepValue+=1
if(sleepTimeout<=sleepValue)
{
sleepValue=0
click b0,1
click b0,0
}
}
Timer tmSerial
Attributes
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
spstr strCommand.txt,tTmp.txt,"~",1
if(tInstruction.txt=="entityUpdateDetail"&&entn.txt==tTmp.txt)
{
// change icon
spstr strCommand.txt,tIcon1.txt,"~",2
vis tIcon1,1
// change icon color
spstr strCommand.txt,tTmp.txt,"~",3
covx tTmp.txt,sys0,0,0
tIcon1.pco=sys0
//mode 1 heading
spstr strCommand.txt,heading1.txt,"~",4
//mode 1 type
spstr strCommand.txt,vaType.txt,"~",5
//current mode
spstr strCommand.txt,vaModeCur.txt,"~",6
//mode list
spstr strCommand.txt,vaModeList.txt,"~",7
if(vaModeList.txt=="")
{
vis bMode1,0
vis bMode2,0
vis bMode3,0
vis bModeNext,0
}
if(bMode1.txt=="")
{
click bModeNext,1
click bModeNext,0
}
bMode1.pco=defaultFontColor
bMode2.pco=defaultFontColor
bMode3.pco=defaultFontColor
if(bMode1.txt==vaModeCur.txt)
{
bMode1.pco=1374
}
if(bMode2.txt==vaModeCur.txt)
{
bMode2.pco=1374
}
if(bMode3.txt==vaModeCur.txt)
{
bMode3.pco=1374
}
//mode 2 heading
spstr strCommand.txt,heading2.txt,"~",8
//mode 2 type
spstr strCommand.txt,vaType2.txt,"~",9
//current mode
spstr strCommand.txt,vaModeCur2.txt,"~",10
//mode list
spstr strCommand.txt,vaModeList2.txt,"~",11
if(vaModeList2.txt=="")
{
vis cMode1,0
vis cMode2,0
vis cMode3,0
vis cModeNext,0
}
if(cMode1.txt=="")
{
click cModeNext,1
click cModeNext,0
}
cMode1.pco=defaultFontColor
cMode2.pco=defaultFontColor
cMode3.pco=defaultFontColor
if(cMode1.txt==vaModeCur2.txt)
{
cMode1.pco=1374
}
if(cMode2.txt==vaModeCur2.txt)
{
cMode2.pco=1374
}
if(cMode3.txt==vaModeCur2.txt)
{
cMode3.pco=1374
}
//mode 3 heading
spstr strCommand.txt,heading3.txt,"~",12
//mode 3 type
spstr strCommand.txt,vaType3.txt,"~",13
//current mode
spstr strCommand.txt,vaModeCur3.txt,"~",14
//mode list
spstr strCommand.txt,vaModeList3.txt,"~",15
if(vaModeList3.txt=="")
{
vis dMode1,0
vis dMode2,0
vis dMode3,0
vis dModeNext,0
}
if(dMode1.txt=="")
{
click dModeNext,1
click dModeNext,0
}
dMode1.pco=defaultFontColor
dMode2.pco=defaultFontColor
dMode3.pco=defaultFontColor
if(dMode1.txt==vaModeCur3.txt)
{
dMode1.pco=1374
}
if(dMode2.txt==vaModeCur3.txt)
{
dMode2.pco=1374
}
if(dMode3.txt==vaModeCur3.txt)
{
dMode3.pco=1374
}
}
if(tInstruction.txt=="time")
{
// get set time to global variable
spstr strCommand.txt,pageIcons.vaTime.txt,"~",1
}
if(tInstruction.txt=="date")
{
// get set date to global variable
spstr strCommand.txt,pageIcons.vaDate.txt,"~",1
}
if(tInstruction.txt=="dimmode")
{
// get value
spstr strCommand.txt,tTmp.txt,"~",1
covx tTmp.txt,dimValue,0,0
// get value normal
spstr strCommand.txt,tTmp.txt,"~",2
covx tTmp.txt,dimValueNormal,0,0
dim=dimValueNormal
// get background color
spstr strCommand.txt,tTmp.txt,"~",3
if(tTmp.txt!="")
{
covx tTmp.txt,defaultBcoColor,0,0
}
// get font color
spstr strCommand.txt,tTmp.txt,"~",4
if(tTmp.txt!="")
{
covx tTmp.txt,defaultFontColor,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
//save third arg if there's one
spstr strCommand.txt,pageIcons.tTmp2.txt,"~",3
spstr strCommand.txt,pageIcons.tTmp3.txt,"~",4
//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 payloadLength-1
bufferPos=0
if(tId.txt=="pageStartup")
{
page pageStartup
}
if(tId.txt=="screensaver")
{
page screensaver
}
if(tId.txt=="cardEntities")
{
page cardEntities
}
if(tId.txt=="cardGrid")
{
page cardGrid
}
if(tId.txt=="popupLight")
{
pageIcons.tTmp1.txt=tTmp.txt
page popupLight
}
if(tId.txt=="popupShutter")
{
pageIcons.tTmp1.txt=tTmp.txt
page popupShutter
}
if(tId.txt=="popupNotify")
{
page popupNotify
}
if(tId.txt=="cardThermo")
{
page cardThermo
}
if(tId.txt=="cardMedia")
{
page cardMedia
}
if(tId.txt=="cardAlarm")
{
page cardAlarm
}
if(tId.txt=="cardQR")
{
page cardQR
}
if(tId.txt=="cardPower")
{
page cardPower
}
}
// end of user code
udelete payloadLength-1
bufferPos=0
}
}
}
}
// next character
bufferPos++
}
}
Timer tmCooldown
Attributes
Scope : local
Period (ms): 100
Enabled : no
Events
Timer Event
tmCooldown.en=0
TouchCap tc0
Attributes
Scope: local
Value: 0
Events
Touch Press Event
sleepValue=0

View File

@@ -1,16 +1,5 @@
--- HMI/n2t-out
+++ HMI/US/portrait/n2t-out
├── file list
│ @@ -9,9 +9,8 @@
│ pageIcons.txt
│ pageStartup.txt
│ pageTest.txt
│ popupFan.txt
│ popupLight.txt
│ popupNotify.txt
│ popupShutter.txt
│ -popupThermo.txt
│ screensaver.txt
├── Program.s.txt
│ @@ -10,10 +10,10 @@
│ int sleepValue=0
@@ -544,61 +533,23 @@
│ //write name of speical page to tId
│ spstr strCommand.txt,tId.txt,"~",1
├── cardThermo.txt
│ @@ -779,30 +779,14 @@
│ crcputs tSend.txt,0
│ //send cmd
│ printh 55 bb
│ prints sys0,2
│ prints tSend.txt,0
│ prints crcval,2
│ @@ -785,15 +785,15 @@
-Dual-state Button btDetail
│ - Attributes
│ - Scope : local
│ - Dragging : 0
│ - Disable release event after dragging: 0
│ - Send Component ID : disabled
│ - State : pressed
│ - Text : 
│ - Max. Text Size : 10
│ -
│ - Events
│ - Touch Press Event
│ - pageIcons.tTmp1.txt=tHeading.txt
│ - pageIcons.tTmp2.txt=entn.txt
│ - page popupThermo
│ -
│ Hotspot mSwipeNext
Dual-state Button btDetail
│ Attributes
│ Scope : local
│ Dragging : 0
│ Disable release event after dragging: 0
│ Send Component ID : disabled
│ - State : pressed
│ + State : unpressed
│ Text : 
│ Max. Text Size : 10
@@ -1094,23 +1078,14 @@
vis btDown1,1
vis tCF1,1
vis bUp2,1
│ vis xTempDest2,1
│ vis bDown2,1
│ vis tCF2,1
│ }
│ - //Show btDetail
│ - spstr strCommand.txt,tTmp.txt,"~",47
│ - if(tTmp.txt!="1")
│ - {
│ - vis btDetail,1
│ - }else
│ - {
│ - vis btDetail,0
│ - }
│ }
│ if(tInstruction.txt=="pageType")
│ {
│ sleepValue=0
│ //command format pageType,specialPageName
│ //write name of speical page to tId
│ spstr strCommand.txt,tId.txt,"~",1
Events
Touch Press Event
pageIcons.tTmp1.txt=tHeading.txt
pageIcons.tTmp2.txt=entn.txt
├── pageIcons.txt
│ @@ -15,15 +15,15 @@
│ Scope : global

View File

@@ -1,17 +1,6 @@
+++ /dev/fd/62 2022-10-23 18:52:01.421240024 +0000
++9,8 @@
+tify.txt
+utter.txt
+ermo.txt
+aver.txt
+++ /dev/fd/62 2022-10-23 19:22:42.287327915 +0000
+rdThermo.txt
+30 +779,14 @@
+ crcputs tSend.txt,0
+ //send cmd
+ printh 55 bb
+ prints sys0,2
+ prints tSend.txt,0
+ prints crcval,2
+15 +785,15 @@
+
+ate Button btDetail
+ributes
@@ -20,6 +9,7 @@
+ Disable release event after dragging: 0
+ Send Component ID : disabled
+ State : pressed
+ State : unpressed
+ Text : 
+ Max. Text Size : 10
+
@@ -27,39 +17,6 @@
+ Touch Press Event
+ pageIcons.tTmp1.txt=tHeading.txt
+ pageIcons.tTmp2.txt=entn.txt
+ page popupThermo
+
+ mSwipeNext
+ributes
+ Scope : local
+ Dragging : 0
+ Disable release event after dragging: 0
+ Send Component ID : disabled
+
+,23 +1078,14 @@
+ vis btDown1,1
+ vis tCF1,1
+ vis bUp2,1
+ vis xTempDest2,1
+ vis bDown2,1
+ vis tCF2,1
+ }
+ //Show btDetail
+ spstr strCommand.txt,tTmp.txt,"~",47
+ if(tTmp.txt!="1")
+ {
+ vis btDetail,1
+ }else
+ {
+ vis btDetail,0
+ }
+ }
+ if(tInstruction.txt=="pageType")
+ {
+ sleepValue=0
+ //command format pageType,specialPageName
+ //write name of speical page to tId
+ spstr strCommand.txt,tId.txt,"~",1
+geIcons.txt
+5 +15,15 @@
+ Scope : global

View File

@@ -1453,6 +1453,44 @@ Dual-state Button btDown
prints tSend.txt,0
prints crcval,2
Dual-state Button btDetail
Attributes
ID : 52
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Opacity : 127
x coordinate : 267
y coordinate : 306
Width : 50
Height : 50
Effect : load
Effect Priority : 0
Effect Time : 300
Fill : solid color
Style : flat
Font ID : 1
Back. Color (Unpressed) : 6371
Back. Picture ID (Pressed) : 65535
Back. Color (Pressed) : 6371
Font Color (Unpressed) : 50712
Font Color (Pressed) : 64512
Horizontal Alignment : center
Vertical Alignment : center
State : unpressed
Text : 
Max. Text Size : 10
Word wrap : disabled
Horizontal Spacing : 0
Vertical Spacing : 0
Events
Touch Press Event
pageIcons.tTmp1.txt=tHeading.txt
pageIcons.tTmp2.txt=entn.txt
page popupThermo
Hotspot mSwipeNext
Attributes
ID : 49
@@ -1780,6 +1818,15 @@ Timer tmSerial
vis bDown2,1
vis tCF2,1
}
//Show btDetail
spstr strCommand.txt,tTmp.txt,"~",47
if(tTmp.txt=="1")
{
vis btDetail,1
}else
{
vis btDetail,0
}
}
if(tInstruction.txt=="pageType")
{

View File

@@ -55,16 +55,20 @@ cardAlarm
427 Line(s) of event code
258 Unique line(s) of event code
cardThermo
52 Component(s)
585 Line(s) of event code
306 Unique line(s) of event code
53 Component(s)
596 Line(s) of event code
313 Unique line(s) of event code
cardEntities
77 Component(s)
1359 Line(s) of event code
608 Unique line(s) of event code
popupThermo
44 Component(s)
515 Line(s) of event code
272 Unique line(s) of event code
Total
15 Page(s)
496 Component(s)
5986 Line(s) of event code
1631 Unique line(s) of event code
16 Page(s)
541 Component(s)
6512 Line(s) of event code
1740 Unique line(s) of event code

File diff suppressed because it is too large Load Diff

View File

@@ -783,6 +783,22 @@ Dual-state Button btDown
prints tSend.txt,0
prints crcval,2
Dual-state Button btDetail
Attributes
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
pageIcons.tTmp1.txt=tHeading.txt
pageIcons.tTmp2.txt=entn.txt
page popupThermo
Hotspot mSwipeNext
Attributes
Scope : local
@@ -1082,6 +1098,15 @@ Timer tmSerial
vis bDown2,1
vis tCF2,1
}
//Show btDetail
spstr strCommand.txt,tTmp.txt,"~",47
if(tTmp.txt=="1")
{
vis btDetail,1
}else
{
vis btDetail,0
}
}
if(tInstruction.txt=="pageType")
{

View File

@@ -0,0 +1,989 @@
Page popupThermo
Attributes
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
dim=dimValueNormal
//get entitiy name
tEntity.txt=pageIcons.tTmp1.txt
//get entity id
entn.txt=pageIcons.tTmp2.txt
tIcon1.txt=pageIcons.tTmp3.txt
vis p0,0
vis tSend,0
vis tTmp,0
vis tInstruction,0
vis tId,0
vis bModeNext,0
vis cModeNext,0
vis dModeNext,0
//page open event
// event,pageOpenDetail,typeOfPage,tEntityName
// craft command
tSend.txt="event,pageOpenDetail,popupThermo,"+entn.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
popupThermo.bco=defaultBcoColor
for(sys0=0;sys0<24;sys0++)
{
if(b[sys0].type==98||b[sys0].type==116)
{
b[sys0].bco=defaultBcoColor
b[sys0].pco=defaultFontColor
}
if(b[sys0].type==53&&defaultBcoColor==0)
{
b[sys0].pic=10
b[sys0].pic2=11
}
}
Variable (string) strCommand
Attributes
Scope : local
Text :
Max. Text Size: 500
Variable (string) entn
Attributes
Scope : local
Text :
Max. Text Size: 80
Variable (int32) mode
Attributes
Scope: local
Value: 1
Variable (int32) mode_temp
Attributes
Scope: local
Value: 0
Variable (int32) vaModePos
Attributes
Scope: local
Value: 0
Variable (string) vaModeList
Attributes
Scope : local
Text :
Max. Text Size: 400
Variable (string) vaModeCur
Attributes
Scope : local
Text :
Max. Text Size: 40
Variable (string) tSend
Attributes
Scope : local
Text :
Max. Text Size: 200
Variable (string) tTmp
Attributes
Scope : local
Text :
Max. Text Size: 80
Variable (string) tInstruction
Attributes
Scope : local
Text :
Max. Text Size: 20
Variable (string) tId
Attributes
Scope : local
Text :
Max. Text Size: 20
Variable (int32) vaModePos2
Attributes
Scope: local
Value: 0
Variable (string) vaModeList2
Attributes
Scope : local
Text :
Max. Text Size: 400
Variable (string) vaModeCur2
Attributes
Scope : local
Text :
Max. Text Size: 40
Variable (string) vaModeCur3
Attributes
Scope : local
Text :
Max. Text Size: 40
Variable (string) vaModeList3
Attributes
Scope : local
Text :
Max. Text Size: 400
Variable (int32) vaModePos3
Attributes
Scope: local
Value: 0
Variable (string) vaType
Attributes
Scope : local
Text :
Max. Text Size: 20
Variable (string) vaType2
Attributes
Scope : local
Text :
Max. Text Size: 20
Variable (string) vaType3
Attributes
Scope : local
Text :
Max. Text Size: 20
Text tEntity
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Associated Keyboard : none
Text :
Max. Text Size : 25
Text tIcon1
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Associated Keyboard : none
Text :
Max. Text Size : 10
Text heading1
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Associated Keyboard : none
Text :
Max. Text Size : 25
Text heading2
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Associated Keyboard : none
Text :
Max. Text Size : 25
Text heading3
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Associated Keyboard : none
Text :
Max. Text Size : 25
Picture p0
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
Button b0
Attributes
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
tSend.txt="event,buttonPress2,popupLight,bExit"
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button bMode1
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos.val-3
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button bMode3
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos.val-1
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button bMode2
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos.val-2
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button bModeNext
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text : 
Max. Text Size : 3
Events
Touch Press Event
//if(bMode3.txt=="")
spstr vaModeList.txt,tTmp.txt,"?",vaModePos.val
if(tTmp.txt=="")
{
vaModePos.val=0
spstr vaModeList.txt,bMode1.txt,"?",vaModePos.val
spstr vaModeList.txt,bMode2.txt,"?",vaModePos.val+1
spstr vaModeList.txt,bMode3.txt,"?",vaModePos.val+2
}
spstr vaModeList.txt,bMode1.txt,"?",vaModePos.val
spstr vaModeList.txt,bMode2.txt,"?",vaModePos.val+1
spstr vaModeList.txt,bMode3.txt,"?",vaModePos.val+2
vaModePos.val+=3
spstr vaModeList.txt,tTmp.txt,"?",3
if(tTmp.txt=="")
{
vis bModeNext,0
}else
{
vis bModeNext,1
}
bMode1.pco=defaultFontColor
bMode2.pco=defaultFontColor
bMode3.pco=defaultFontColor
if(bMode1.txt==vaModeCur.txt)
{
bMode1.pco=1374
}
if(bMode2.txt==vaModeCur.txt)
{
bMode2.pco=1374
}
if(bMode3.txt==vaModeCur.txt)
{
bMode3.pco=1374
}
Button cModeNext
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text : 
Max. Text Size : 3
Events
Touch Press Event
spstr vaModeList2.txt,tTmp.txt,"?",vaModePos2.val
if(tTmp.txt=="")
{
vaModePos2.val=0
spstr vaModeList2.txt,cMode1.txt,"?",vaModePos2.val
spstr vaModeList2.txt,cMode2.txt,"?",vaModePos2.val+1
spstr vaModeList2.txt,cMode3.txt,"?",vaModePos2.val+2
}
spstr vaModeList2.txt,cMode1.txt,"?",vaModePos2.val
spstr vaModeList2.txt,cMode2.txt,"?",vaModePos2.val+1
spstr vaModeList2.txt,cMode3.txt,"?",vaModePos2.val+2
vaModePos2.val+=3
spstr vaModeList2.txt,tTmp.txt,"?",3
if(tTmp.txt=="")
{
vis cModeNext,0
}else
{
vis cModeNext,1
}
cMode1.pco=defaultFontColor
cMode2.pco=defaultFontColor
cMode3.pco=defaultFontColor
if(cMode1.txt==vaModeCur.txt)
{
cMode1.pco=1374
}
if(cMode2.txt==vaModeCur.txt)
{
cMode2.pco=1374
}
if(cMode3.txt==vaModeCur.txt)
{
cMode3.pco=1374
}
Button cMode3
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos2.val-1
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType2.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button cMode2
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos2.val-2
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType2.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button cMode1
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos2.val-3
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType2.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button dModeNext
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text : 
Max. Text Size : 3
Events
Touch Press Event
spstr vaModeList3.txt,tTmp.txt,"?",vaModePos3.val
if(tTmp.txt=="")
{
vaModePos3.val=0
spstr vaModeList3.txt,dMode1.txt,"?",vaModePos3.val
spstr vaModeList3.txt,dMode2.txt,"?",vaModePos3.val+1
spstr vaModeList3.txt,dMode3.txt,"?",vaModePos3.val+2
}
spstr vaModeList3.txt,dMode1.txt,"?",vaModePos3.val
spstr vaModeList3.txt,dMode2.txt,"?",vaModePos3.val+1
spstr vaModeList3.txt,dMode3.txt,"?",vaModePos3.val+2
vaModePos3.val+=3
spstr vaModeList3.txt,tTmp.txt,"?",3
if(tTmp.txt=="")
{
vis dModeNext,0
}else
{
vis dModeNext,1
}
dMode1.pco=defaultFontColor
dMode2.pco=defaultFontColor
dMode3.pco=defaultFontColor
if(dMode1.txt==vaModeCur.txt)
{
dMode1.pco=1374
}
if(dMode2.txt==vaModeCur.txt)
{
dMode2.pco=1374
}
if(dMode3.txt==vaModeCur.txt)
{
dMode3.pco=1374
}
Button dMode3
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos3.val-1
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType3.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button dMode2
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos3.val-2
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType3.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Button dMode1
Attributes
Scope : local
Dragging : 0
Disable release event after dragging: 0
Send Component ID : disabled
State : unpressed
Text :
Max. Text Size : 40
Events
Touch Press Event
//craft command
tSend.txt="event,buttonPress2,"
tSend.txt+=entn.txt+","
sys2=vaModePos3.val-3
covx sys2,tTmp.txt,0,0
tSend.txt+="mode-"+vaType3.txt+","+tTmp.txt
//send calc crc
btlen tSend.txt,sys0
crcrest 1,0xffff // reset CRC
crcputh 55 bb
crcputs sys0,2
crcputs tSend.txt,0
//send cmd
printh 55 bb
prints sys0,2
prints tSend.txt,0
prints crcval,2
Timer tmSleep
Attributes
Scope : local
Period (ms): 1000
Enabled : yes
Events
Timer Event
if(sleepTimeout!=0)
{
sleepValue+=1
if(sleepTimeout<=sleepValue)
{
sleepValue=0
click b0,1
click b0,0
}
}
Timer tmSerial
Attributes
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
spstr strCommand.txt,tTmp.txt,"~",1
if(tInstruction.txt=="entityUpdateDetail"&&entn.txt==tTmp.txt)
{
// change icon
spstr strCommand.txt,tIcon1.txt,"~",2
vis tIcon1,1
// change icon color
spstr strCommand.txt,tTmp.txt,"~",3
covx tTmp.txt,sys0,0,0
tIcon1.pco=sys0
//mode 1 heading
spstr strCommand.txt,heading1.txt,"~",4
//mode 1 type
spstr strCommand.txt,vaType.txt,"~",5
//current mode
spstr strCommand.txt,vaModeCur.txt,"~",6
//mode list
spstr strCommand.txt,vaModeList.txt,"~",7
if(vaModeList.txt=="")
{
vis bMode1,0
vis bMode2,0
vis bMode3,0
vis bModeNext,0
}
if(bMode1.txt=="")
{
click bModeNext,1
click bModeNext,0
}
bMode1.pco=defaultFontColor
bMode2.pco=defaultFontColor
bMode3.pco=defaultFontColor
if(bMode1.txt==vaModeCur.txt)
{
bMode1.pco=1374
}
if(bMode2.txt==vaModeCur.txt)
{
bMode2.pco=1374
}
if(bMode3.txt==vaModeCur.txt)
{
bMode3.pco=1374
}
//mode 2 heading
spstr strCommand.txt,heading2.txt,"~",8
//mode 2 type
spstr strCommand.txt,vaType2.txt,"~",9
//current mode
spstr strCommand.txt,vaModeCur2.txt,"~",10
//mode list
spstr strCommand.txt,vaModeList2.txt,"~",11
if(vaModeList2.txt=="")
{
vis cMode1,0
vis cMode2,0
vis cMode3,0
vis cModeNext,0
}
if(cMode1.txt=="")
{
click cModeNext,1
click cModeNext,0
}
cMode1.pco=defaultFontColor
cMode2.pco=defaultFontColor
cMode3.pco=defaultFontColor
if(cMode1.txt==vaModeCur2.txt)
{
cMode1.pco=1374
}
if(cMode2.txt==vaModeCur2.txt)
{
cMode2.pco=1374
}
if(cMode3.txt==vaModeCur2.txt)
{
cMode3.pco=1374
}
//mode 3 heading
spstr strCommand.txt,heading3.txt,"~",12
//mode 3 type
spstr strCommand.txt,vaType3.txt,"~",13
//current mode
spstr strCommand.txt,vaModeCur3.txt,"~",14
//mode list
spstr strCommand.txt,vaModeList3.txt,"~",15
if(vaModeList3.txt=="")
{
vis dMode1,0
vis dMode2,0
vis dMode3,0
vis dModeNext,0
}
if(dMode1.txt=="")
{
click dModeNext,1
click dModeNext,0
}
dMode1.pco=defaultFontColor
dMode2.pco=defaultFontColor
dMode3.pco=defaultFontColor
if(dMode1.txt==vaModeCur3.txt)
{
dMode1.pco=1374
}
if(dMode2.txt==vaModeCur3.txt)
{
dMode2.pco=1374
}
if(dMode3.txt==vaModeCur3.txt)
{
dMode3.pco=1374
}
}
if(tInstruction.txt=="time")
{
// get set time to global variable
spstr strCommand.txt,pageIcons.vaTime.txt,"~",1
}
if(tInstruction.txt=="date")
{
// get set date to global variable
spstr strCommand.txt,pageIcons.vaDate.txt,"~",1
}
if(tInstruction.txt=="dimmode")
{
// get value
spstr strCommand.txt,tTmp.txt,"~",1
covx tTmp.txt,dimValue,0,0
// get value normal
spstr strCommand.txt,tTmp.txt,"~",2
covx tTmp.txt,dimValueNormal,0,0
dim=dimValueNormal
// get background color
spstr strCommand.txt,tTmp.txt,"~",3
if(tTmp.txt!="")
{
covx tTmp.txt,defaultBcoColor,0,0
}
// get font color
spstr strCommand.txt,tTmp.txt,"~",4
if(tTmp.txt!="")
{
covx tTmp.txt,defaultFontColor,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
//save third arg if there's one
spstr strCommand.txt,pageIcons.tTmp2.txt,"~",3
spstr strCommand.txt,pageIcons.tTmp3.txt,"~",4
//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 payloadLength-1
bufferPos=0
if(tId.txt=="pageStartup")
{
page pageStartup
}
if(tId.txt=="screensaver")
{
page screensaver
}
if(tId.txt=="cardEntities")
{
page cardEntities
}
if(tId.txt=="cardGrid")
{
page cardGrid
}
if(tId.txt=="popupLight")
{
pageIcons.tTmp1.txt=tTmp.txt
page popupLight
}
if(tId.txt=="popupShutter")
{
pageIcons.tTmp1.txt=tTmp.txt
page popupShutter
}
if(tId.txt=="popupNotify")
{
page popupNotify
}
if(tId.txt=="cardThermo")
{
page cardThermo
}
if(tId.txt=="cardMedia")
{
page cardMedia
}
if(tId.txt=="cardAlarm")
{
page cardAlarm
}
if(tId.txt=="cardQR")
{
page cardQR
}
if(tId.txt=="cardPower")
{
page cardPower
}
}
// end of user code
udelete payloadLength-1
bufferPos=0
}
}
}
}
// next character
bufferPos++
}
}
Timer tmCooldown
Attributes
Scope : local
Period (ms): 100
Enabled : no
Events
Timer Event
tmCooldown.en=0
TouchCap tc0
Attributes
Scope: local
Value: 0
Events
Touch Press Event
sleepValue=0

View File

@@ -1820,7 +1820,7 @@ Timer tmSerial
}
//Show btDetail
spstr strCommand.txt,tTmp.txt,"~",47
if(tTmp.txt!="1")
if(tTmp.txt=="1")
{
vis btDetail,1
}else

View File

@@ -42,10 +42,6 @@ cardMedia
34 Component(s)
394 Line(s) of event code
213 Unique line(s) of event code
cardThermo
53 Component(s)
596 Line(s) of event code
314 Unique line(s) of event code
popupFan
27 Component(s)
347 Line(s) of event code
@@ -66,9 +62,13 @@ cardPower
43 Component(s)
423 Line(s) of event code
293 Unique line(s) of event code
cardThermo
53 Component(s)
596 Line(s) of event code
313 Unique line(s) of event code
Total
16 Page(s)
535 Component(s)
6360 Line(s) of event code
1692 Unique line(s) of event code
1691 Unique line(s) of event code

View File

@@ -1100,7 +1100,7 @@ Timer tmSerial
}
//Show btDetail
spstr strCommand.txt,tTmp.txt,"~",47
if(tTmp.txt!="1")
if(tTmp.txt=="1")
{
vis btDetail,1
}else