544 lines
13 KiB
C++
544 lines
13 KiB
C++
#include "RuntimeData.h"
|
|
#include "CircuitState.h"
|
|
|
|
#define TextTopOffSet 6
|
|
#define ListLineCnt 10
|
|
|
|
#define ipdWidth0 400
|
|
#define ipdWidth1 390
|
|
|
|
static const unsigned char stCmd[8] = {221,222,223,224,225,226,227,228};
|
|
static const unsigned char stPrm[8] = {0,1,2,3,4,5,6,7};
|
|
|
|
void TCircuitState::Init(int x1, int y1, int aW, int aH, int OwnerX, int OwnerY, u32 aColor)
|
|
{
|
|
#define CH 30 //Caption Height
|
|
unsigned short Left,Right, Top, Bottom, Width, Height, i;
|
|
Bound.SetBySize(OwnerX + x1, OwnerY + y1, aW, aH);
|
|
Left = Bound.Left +3;
|
|
Top = Bound.Top+3;
|
|
Width = aW - 7;
|
|
Height = aH - 7;
|
|
Right = Bound.Right -4;
|
|
Bottom = Bound.Bottom -4;
|
|
Caption.Init(Left,Top,Width, CH, 0, 0, clWhite, clMaroon);
|
|
SText.Init(Left+358,Top,434, CH, 0, 0, clWhite, clMaroon);
|
|
Content.Set(Left, Top+CH, Right, Bottom);
|
|
RectPanel.Set(140,78,660,410);
|
|
Color = aColor;
|
|
#undef CH
|
|
|
|
Caption.Border.Color = clGray;
|
|
TMyString::sFromStr("回路运行状态-本机", Caption.Text);
|
|
|
|
TextColor = clNearBlack;
|
|
SelectedColor = clBlue;
|
|
SelectedTextColor = clNearWhite;
|
|
|
|
CtlIndex = 0;
|
|
CtlLevel = 0;
|
|
IsShowing = 0;
|
|
|
|
for(i=0; i<12; i++){
|
|
RecData[i] = 0;
|
|
RecDataUpdateFlag[i] =0;
|
|
}
|
|
}
|
|
|
|
void TCircuitState::RenderBackGround(void)
|
|
{
|
|
RectFillRender(Content.Left, Content.Top, Content.Right, Content.Bottom, Color);
|
|
}
|
|
|
|
void TCircuitState::RenderBackGround(unsigned int aClr)
|
|
{
|
|
RectFillRender(Content.Left, Content.Top, Content.Right, Content.Bottom, aClr);
|
|
}
|
|
|
|
void TCircuitState::DrawSelf(void)
|
|
{
|
|
unsigned int x, y, x2, y2, w, h;
|
|
|
|
VertLineRender(Bound.Left, Bound.Top, Bound.Height -1, 0xFFFFFFFF);
|
|
VertLineRender(Bound.Right -1, Bound.Top +1, Bound.Height -2, 0xFF808080);
|
|
VertLineRender(Bound.Right, Bound.Top, Bound.Height, 0xFF404040);
|
|
|
|
HorizLineRender(Bound.Left, Bound.Top, Bound.Width - 1, 0xFFFFFFFF);
|
|
HorizLineRender(Bound.Left +1, Bound.Bottom -1, Bound.Width - 2, 0xFF808080);
|
|
HorizLineRender(Bound.Left, Bound.Bottom, Bound.Width, 0xFF404040);
|
|
|
|
x = Bound.Left +2 ;
|
|
x2 = Bound.Right -2;
|
|
y = Bound.Top +2;
|
|
y2 = Bound.Bottom - 2;
|
|
w = Bound.Width -4;
|
|
h = Bound.Height - 4;
|
|
VertLineRender (x, y, h-1, 0xFF808080);
|
|
HorizLineRender (x, y, w-1, 0xFF808080);
|
|
|
|
VertLineRender (x+1, y+1, h-2, 0xFF404040);
|
|
HorizLineRender (x+1, y+1, w-2, 0xFF404040);
|
|
|
|
VertLineRender (x2-1, y+1, h-2, 0xFFD4D0C8);
|
|
HorizLineRender (x+1, y2-1, w-2, 0xFFD4D0C8);
|
|
|
|
VertLineRender (x2, y, h, 0xFFFFFFFF);
|
|
HorizLineRender (x, y2, w, 0xFFFFFFFF);
|
|
}
|
|
|
|
|
|
void TCircuitState::DrawCaption2(void)
|
|
{
|
|
TMyString::sFromStr("xxxxxxx", SText.Text);
|
|
//SText.Show();
|
|
}
|
|
|
|
void TCircuitState::Show(void)
|
|
{
|
|
RenderBackGround();
|
|
DrawSelf();
|
|
Caption.Show();
|
|
DrawCaption2();
|
|
IsShowing = 1;
|
|
}
|
|
|
|
void TCircuitState::FullRedraw(int Prm)
|
|
{
|
|
if(Prm == 0){
|
|
RenderBackGround();
|
|
DrawSelf();
|
|
Caption.Show();
|
|
DrawCaption2();
|
|
aPanel->Show();
|
|
}else
|
|
if(Prm == 1){
|
|
RectFillRender(GuiRedrawDataList[1][0], GuiRedrawDataList[1][1], GuiRedrawDataList[1][2], GuiRedrawDataList[1][3], Color);
|
|
aPanel->Show();
|
|
}
|
|
}
|
|
|
|
void TCircuitState::SetAndShowCaption(unsigned char aType)
|
|
{
|
|
TMyString::sFromStr(" zzzzzzz", Caption.Text);
|
|
}
|
|
|
|
//______________________________________________________________________________________________________________________________
|
|
|
|
void TCircuitState::Check4Selected(void)
|
|
{
|
|
unsigned int i;
|
|
for(i=0; i<3;i++)aPanel->Edit[i].Selected = 0;
|
|
switch(CtlIndex){
|
|
case 0:
|
|
aPanel->Edit[0].Selected = 1;
|
|
break;
|
|
case 1:
|
|
aPanel->Edit[1].Selected = 1;
|
|
break;
|
|
case 2:
|
|
aPanel->Edit[2].Selected = 1;
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
|
|
|
|
//_____________________________________________________________________________________________________________________________
|
|
|
|
TGuiMsgReturn TCircuitState::KeyIn(unsigned char aKey)
|
|
{
|
|
TGuiMsgReturn aMsg = guiMsgNone;
|
|
unsigned char aP0,aP1,Updata;
|
|
unsigned char x,y,aCh;
|
|
Updata = 0;
|
|
|
|
if( (aKey == VK_DELETE) ||
|
|
(aKey == VK_0) ||
|
|
(aKey == VK_1) ||
|
|
(aKey == VK_2) ||
|
|
(aKey == VK_3) ||
|
|
(aKey == VK_4) ||
|
|
(aKey == VK_5) ||
|
|
(aKey == VK_6) ||
|
|
(aKey == VK_7) ||
|
|
(aKey == VK_8) ||
|
|
(aKey == VK_9) ||
|
|
(aKey == VK_LEFT) ||
|
|
(aKey == VK_RIGHT)
|
|
){
|
|
if(aPanel->Edit[0].Selected){
|
|
aPanel->Edit[0].KeyIn(aKey);
|
|
aPanel->Edit[0].ReDraw();
|
|
CheckPathDev();
|
|
}else
|
|
if(aPanel->Edit[1].Selected){
|
|
aPanel->Edit[1].KeyIn(aKey);
|
|
aPanel->Edit[1].ReDraw();
|
|
CheckPathDev();
|
|
}else
|
|
if(aPanel->Edit[2].Selected){
|
|
aPanel->Edit[2].KeyIn(aKey);
|
|
aPanel->Edit[2].ReDraw();
|
|
CheckPathDev();
|
|
}
|
|
}
|
|
|
|
if(aKey == VK_UP){
|
|
if(CtlIndex >0){
|
|
CtlIndex--;
|
|
Check4Selected();
|
|
aPanel->ReDrawItems();
|
|
PanelCanvasOut();
|
|
}
|
|
}else
|
|
if(aKey == VK_DOWN){
|
|
if(CtlIndex <2){
|
|
CtlIndex++;
|
|
Check4Selected();
|
|
aPanel->ReDrawItems();
|
|
PanelCanvasOut();
|
|
}
|
|
}else
|
|
if(aKey == VK_TAB){
|
|
|
|
}else
|
|
if(aKey == VK_F2){
|
|
SendCmd(0);
|
|
}else
|
|
if(aKey == VK_EXECUTE){
|
|
//Save Data Here
|
|
SendCmd(1);
|
|
}else
|
|
if(aKey == VK_RETURN){
|
|
aMsg = guiMsgReturn;
|
|
}
|
|
|
|
return aMsg;
|
|
}
|
|
|
|
void TCircuitState::PanelCanvasOut()
|
|
{
|
|
//TXBox::sDrawBoxBorder(RectPanel.Left + 8, RectPanel.Top + 3, RectPanel.Left + 362, RectPanel.Top + 150, "自定义命令", 8, 1, 0, clFrmFace);
|
|
}
|
|
|
|
void TCircuitState::InitPanel(void)
|
|
{
|
|
int x,y,x2,y2, aW,aH,i;
|
|
x = RectPanel.Left;
|
|
y = RectPanel.Top;
|
|
x2 = RectPanel.Right;
|
|
y2 = RectPanel.Bottom;
|
|
aW = RectPanel.Width;
|
|
aH = RectPanel.Height;
|
|
|
|
aPanel->Init(x,y,aW,aH,0,0,clFrmFace, bvRaised);
|
|
|
|
aPanel->Caption.Init(1,1,aW-3,32,x,y,clFrmFace,clFrmFace);
|
|
aPanel->Caption.Text[0] = 0;
|
|
|
|
aPanel->SText[0].Init(2,6,60,30,x,y,clNearBlack,clFrmFace);
|
|
aPanel->SText[1].Init(2,44,60,30,x,y,clNearBlack,clFrmFace);
|
|
aPanel->SText[2].Init(2,82,60,30,x,y,clNearBlack,clFrmFace);
|
|
aPanel->SText[3].Init(2,120,60,30,x,y,clNearBlack,clFrmFace);
|
|
aPanel->SText[4].Init(2,158,60,30,x,y,clNearBlack,clFrmFace);
|
|
|
|
aPanel->SText[5].Init(200,6,60,30,x,y,clNearBlack,clFrmFace);
|
|
aPanel->SText[6].Init(200,44,60,30,x,y,clNearBlack,clFrmFace);
|
|
aPanel->SText[7].Init(200,82,60,30,x,y,clNearBlack,clFrmFace);
|
|
aPanel->SText[8].Init(200,120,60,30,x,y,clNearBlack,clFrmFace);
|
|
aPanel->SText[9].Init(200,158,60,30,x,y,clNearBlack,clFrmFace);
|
|
|
|
aPanel->SText[10].Init(16,190,60,30,x,y,clNearBlack,clFrmFace);
|
|
aPanel->SText[11].Init(16,236,60,30,x,y,clNearBlack,clFrmFace);
|
|
|
|
TMyString::sFromStr("机器号", aPanel->SText[0].Text);
|
|
TMyString::sFromStr("回路号", aPanel->SText[1].Text);
|
|
TMyString::sFromStr("地址号", aPanel->SText[2].Text);
|
|
TMyString::sFromStr("类型", aPanel->SText[3].Text);
|
|
TMyString::sFromStr("注释", aPanel->SText[4].Text);
|
|
|
|
TMyString::sFromStr("机器号状态", aPanel->SText[5].Text);
|
|
TMyString::sFromStr("Circuit", aPanel->SText[6].Text);
|
|
TMyString::sFromStr("Addr", aPanel->SText[7].Text);
|
|
TMyString::sFromStr("dType", aPanel->SText[8].Text);
|
|
TMyString::sFromStr("Descp", aPanel->SText[9].Text);
|
|
|
|
|
|
TMyString::sFromStr("1.按确认键启动目标", aPanel->SText[10].Text);
|
|
TMyString::sFromStr("2.按设置键停止目标", aPanel->SText[11].Text);
|
|
|
|
for(i=0; i<12;i++){
|
|
aPanel->SText[i].Enable = 1;
|
|
aPanel->SText[i].Visible = 1;
|
|
}
|
|
|
|
aPanel->Edit[0].Init(100,6,60,30,x,y,clNearBlack,clNearWhite);
|
|
aPanel->Edit[1].Init(100,44,60,30,x,y,clNearBlack,clNearWhite);
|
|
aPanel->Edit[2].Init(100,82,60,30,x,y,clNearBlack,clNearWhite);
|
|
|
|
for(i=0; i<3;i++){
|
|
aPanel->Edit[i].Enable = 1;
|
|
aPanel->Edit[i].Visible = 1;
|
|
aPanel->Edit[i].SetMaxLen(8);
|
|
aPanel->Edit[i].SetInputMaskEn();
|
|
aPanel->Edit[i].Str.Clear();
|
|
aPanel->Edit[i].Pst = -1;
|
|
}
|
|
aPanel->Edit[0].SetMaxLen(2);
|
|
aPanel->Edit[0].Str.FromStr("01");
|
|
aPanel->Edit[0].Pst = 1;
|
|
aPanel->Edit[0].Color = clMoneyGreen;
|
|
aPanel->Edit[1].SetMaxLen(2);
|
|
aPanel->Edit[1].Str.FromStr("01");
|
|
aPanel->Edit[1].Pst = 1;
|
|
aPanel->Edit[2].SetMaxLen(3);
|
|
aPanel->Edit[2].Str.FromStr("001");
|
|
aPanel->Edit[2].Pst = 2;
|
|
|
|
aPanel->Caption.Visible = 1;
|
|
|
|
aPanel->Show();
|
|
Check4Selected();
|
|
aPanel->ReDrawItems();
|
|
PanelCanvasOut();
|
|
|
|
CheckPathDev();
|
|
}
|
|
|
|
void TCircuitState::CheckPathDev()
|
|
{
|
|
unsigned char cVal;
|
|
int iVal;
|
|
int P0Found = 0;
|
|
int P1Found = 0;
|
|
unsigned char aCn, aP0, aP1;
|
|
unsigned int aAddr,i;
|
|
|
|
iVal = aPanel->Edit[0].Str.ToInteger();
|
|
if(iVal>255)iVal=255;
|
|
cVal = iVal;
|
|
Path.pNum = cVal;
|
|
|
|
iVal = aPanel->Edit[1].Str.ToInteger();
|
|
if(iVal>255)iVal=255;
|
|
cVal = iVal;
|
|
Path.P0 = cVal;
|
|
|
|
iVal = aPanel->Edit[2].Str.ToInteger();
|
|
if(iVal>255)iVal=255;
|
|
cVal = iVal;
|
|
Path.P1 = cVal;
|
|
|
|
for(i=0; i<32; i++){
|
|
aPanel->SText[8].Text[i] = 0;
|
|
}
|
|
|
|
if(Path.pNum == MainCtl.fData.Split.MyNum){
|
|
if(MainCtl.fData.Split.NetworkMode == 1){
|
|
aPanel->SText[4].SetText("本集中机",24);
|
|
}else
|
|
if(MainCtl.fData.Split.NetworkMode == 2){
|
|
aPanel->SText[4].SetText("本区域机",24);
|
|
}else{
|
|
aPanel->SText[4].SetText("本机",24);
|
|
}
|
|
|
|
if( (Path.P0 >0) && (Path.P0 <= dPORT_MAX_COUNT) ){
|
|
if(MainCtl.fData.Split.ExistTablePort[Path.P0 -1]){
|
|
aPanel->SText[5].SetText(" ",24);
|
|
P0Found = 1;
|
|
}else{
|
|
aPanel->SText[5].SetText("回路未注册",24);
|
|
aPanel->SText[6].SetText(" ",24);
|
|
aPanel->SText[7].SetText(" ",24);
|
|
aPanel->SText[8].SetText(" ",24);
|
|
}
|
|
}else{
|
|
aPanel->SText[5].SetText("回路号超出范围",24);
|
|
aPanel->SText[6].SetText(" ",24);
|
|
aPanel->SText[7].SetText(" ",24);
|
|
aPanel->SText[8].SetText(" ",24);
|
|
}
|
|
|
|
if(P0Found){
|
|
if( (Path.P1 >0) && (Path.P1 <= 251) ){
|
|
if(MainCtl.fData.Split.ExistTablePort[Path.P1 -1]){
|
|
aPanel->SText[6].SetText(" ",24);
|
|
P1Found = 1;
|
|
}else{
|
|
aPanel->SText[6].SetText("地址未注册",24);
|
|
}
|
|
}else{
|
|
aPanel->SText[6].SetText("地址号超出范围",24);
|
|
}
|
|
}
|
|
|
|
if(P1Found){
|
|
Path.dType = Port[Path.P0-1].dTypeTable[Path.P1-1];
|
|
TMyString::sFromStr(StrTypeShortName[Path.dType], aPanel->SText[7].Text);
|
|
aP0 = Path.P0;
|
|
aP1 = Path.P1;
|
|
if(aP0 && aP1){
|
|
if(aP0 < dPORT_MAX_COUNT){
|
|
aP0--;
|
|
aP1--;
|
|
}else
|
|
if( (aP0 >= dADDR_DIRECTPAD_START) && (aP0 <= dADDR_DIRECTPAD_END) ){
|
|
aP0 = aP0 - dADDR_DIRECTPAD_START;
|
|
aP1 = aP0 * dDIRECTCTL_KEY_MAX_COUNT + (aP1 - 1);
|
|
aP0 = 40;
|
|
}
|
|
if(aP0 <= dPORT_MAX_COUNT){
|
|
aAddr = dAddrSdRam_Descp + (aP0 * 256 * 32) + (aP1 * 32);
|
|
for(i=0; i<32; i++){
|
|
aPanel->SText[8].Text[i] = *(volatile unsigned char *)(aAddr + i);
|
|
}
|
|
aPanel->SText[8].Text[32] = '\0';
|
|
}
|
|
}
|
|
}else{
|
|
TMyString::sFromStr(" ", aPanel->SText[7].Text);
|
|
}
|
|
}else{
|
|
if(MainCtl.fData.Split.NetworkMode == 1){
|
|
aPanel->SText[4].SetText(" ",24);
|
|
aPanel->SText[5].SetText(" ",24);
|
|
aPanel->SText[6].SetText(" ",24);
|
|
aPanel->SText[7].SetText(" ",24);
|
|
aPanel->SText[8].SetText(" ",24);
|
|
}else
|
|
if(MainCtl.fData.Split.NetworkMode == 2){
|
|
aPanel->SText[4].SetText("本机为区域机,不能操作",24);
|
|
aPanel->SText[5].SetText(" ",24);
|
|
aPanel->SText[6].SetText(" ",24);
|
|
aPanel->SText[7].SetText(" ",24);
|
|
aPanel->SText[8].SetText(" ",24);
|
|
}else{
|
|
aPanel->SText[4].SetText("本机为单机,不能操作 ",24);
|
|
aPanel->SText[5].SetText(" ",24);
|
|
aPanel->SText[6].SetText(" ",24);
|
|
aPanel->SText[7].SetText(" ",24);
|
|
aPanel->SText[8].SetText(" ",24);
|
|
}
|
|
|
|
if(MainCtl.fData.Split.NetworkMode == 1){
|
|
if( (Path.pNum) && (Path.pNum <= dNETWORK_MACHINE_COUNT) ){
|
|
aCn = Path.pNum -1;
|
|
aP0 = Path.P0;
|
|
aP1 = Path.P1;
|
|
if(aP0 && aP1){
|
|
if(aP0 < dPORT_MAX_COUNT){
|
|
aP0--;
|
|
}else
|
|
if( (aP0 >= dADDR_DIRECTPAD_START) && (aP0 <= dADDR_DIRECTPAD_END) ){
|
|
aP0 = aP0 - dADDR_DIRECTPAD_START;
|
|
aP1 = aP0 * dDIRECTCTL_KEY_MAX_COUNT + (aP1);
|
|
aP0 = 40;
|
|
}
|
|
if(aP0 <= dPORT_MAX_COUNT){
|
|
aAddr = dAddrSdRam_DescpNw + (aCn*409600)+(aP0*8192) + (aP1*32);
|
|
for(i=0; i<32; i++){
|
|
aPanel->SText[8].Text[i] = *(volatile unsigned char *)(aAddr + i);
|
|
}
|
|
aPanel->SText[8].Text[32] = '\0';
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
aPanel->SText[4].Show();
|
|
aPanel->SText[5].Show();
|
|
aPanel->SText[6].Show();
|
|
aPanel->SText[7].Show();
|
|
aPanel->SText[8].Show();
|
|
}
|
|
|
|
void TCircuitState::SendCmd(unsigned int IsStart)
|
|
{
|
|
TCanHeaderID aIde;
|
|
unsigned char cVal;
|
|
unsigned int i;
|
|
unsigned int Len;
|
|
int iVal;
|
|
|
|
for(i=0; i<8; i++){
|
|
Data[i] = 0;
|
|
}
|
|
|
|
if(IsStart){
|
|
aIde.BitF.Cmd = cmAutoStart;
|
|
}else{
|
|
aIde.BitF.Cmd = cmAutoStop;
|
|
}
|
|
|
|
iVal = aPanel->Edit[0].Str.ToInteger();
|
|
if(iVal>255)iVal=255;
|
|
cVal = iVal;
|
|
Path.pNum = cVal;
|
|
|
|
iVal = aPanel->Edit[1].Str.ToInteger();
|
|
if(iVal>255)iVal=255;
|
|
cVal = iVal;
|
|
Path.P0 = cVal;
|
|
|
|
iVal = aPanel->Edit[2].Str.ToInteger();
|
|
if(iVal>255)iVal=255;
|
|
cVal = iVal;
|
|
Path.P1 = cVal;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Len = 5;
|
|
|
|
Data[0] = 0;
|
|
|
|
//Path 0
|
|
iVal = aPanel->Edit[0].Str.ToInteger();
|
|
if(iVal>255)iVal=255;
|
|
cVal = iVal;
|
|
Data[1] = cVal;
|
|
|
|
//Cmd 1
|
|
iVal = aPanel->Edit[7].Str.ToInteger();
|
|
if(iVal>255)iVal=255;
|
|
cVal = iVal;
|
|
aIde.BitF.Cmd = cVal;
|
|
|
|
//Cmd 2
|
|
iVal = aPanel->Edit[8].Str.ToInteger();
|
|
if(iVal>255)iVal=255;
|
|
cVal = iVal;
|
|
Data[3] = cVal;
|
|
|
|
//Prm
|
|
iVal = aPanel->Edit[9].Str.ToInteger();
|
|
if(iVal>255)iVal=255;
|
|
cVal = iVal;
|
|
Data[4] = cVal;
|
|
|
|
aIde.BitF.Pri = 1;
|
|
aIde.BitF.sLvl = 1;
|
|
aIde.BitF.dLvl = 7;
|
|
aIde.BitF.sAddr = 0;
|
|
aIde.BitF.dAddr = 127;
|
|
|
|
InnerCan.CmdSendCustom(aIde, Data, Len);
|
|
}
|
|
|
|
int TCircuitState::ExtRequst(unsigned char Prm)
|
|
{
|
|
IsShowing = 0;
|
|
return 0;
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|