⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 zfdcf5.cpp

📁 这是一个在正实际应用当中运行的电力监控系统软件源代码
💻 CPP
📖 第 1 页 / 共 2 页
字号:
     {
      yxbv = *(rxb+(rdp+i+1)%rxbuflen);
      if (flag) yxbv = ByteRotate(yxbv);
      for (j=0, yxtb=0x80; j<8; j++, yxtb>>=1)
          {
           yxv[j] = 0;
           if (yxbv&yxtb) yxv[j]=1;
          }
	  SetBatchValue(YXDB, lpChP->StaNo, yxbOrd*32+i*8, 8, (char huge *)yxv);
	 }
 return 6;
}

BYTE Pkwh(WORD rdp)
{
 BYTE FAR *rxb = lpChP->RecBuff;
 int kwhOrd = *(rxb+rdp) - 0xA3;
 DWORD kwhValue = (DWORD)*(rxb+(rdp+4)%rxbuflen)+(DWORD)*(rxb+(rdp+3)%rxbuflen)*256l
                 + (DWORD)*(rxb+(rdp+2)%rxbuflen)*256l*256l;
 SetValue(KWHDB, lpChP->StaNo, kwhOrd, kwhValue);
 return 6;
}

BYTE Pyk(WORD rdp)
{     
 if ((lpChP->RxWriteP+rxbuflen - lpChP->RxReadP)%rxbuflen <18 ) return 0;

 COMMAND cmdrcd;

 BYTE FAR *rxb = lpChP->RecBuff;
 BYTE rp = (lpStaP->DownCmdRP-1) & 3;
 WORD rtuno = lpStaP->DownCmd[rp].Cmd[0]+lpStaP->DownCmd[rp].Cmd[1]*256;
 if ((lpStaP->DownCmd[rp].Cmd[0]==DCMDYK0) && (lpChP->StaNo == rtuno))
    {
     cmdrcd.CmdContent[0] = 0x44;  //遥控返校
     cmdrcd.CmdContent[1] = lpStaP->DownCmd[rp].Cmd[1];
     cmdrcd.CmdContent[2] = lpStaP->DownCmd[rp].Cmd[2];
     cmdrcd.CmdContent[3] = *(rxb+(rdp+3)%rxbuflen);
     cmdrcd.CmdContent[4] = *(rxb+(rdp+4)%rxbuflen);
     cmdrcd.CmdContent[5] = *(rxb+(rdp+1)%rxbuflen);
     cmdrcd.CmdContent[6] = 0xAA;  //遥控返校错:0x55  遥控返校正确:0xAA
     cmdrcd.SubCmdType = TCZYKCMD;
     cmdrcd.DataLen = 0;
     cmdrcd.DataPt = 0;
     WriteACommand(COMMANDDB, SENDCMDBUF, &cmdrcd, NULL);
     lpStaP->DownCmd[rp].Cmd[0]=0;
	}

 return 18;
}

BYTE Psj(WORD rdp)
{
 if ((lpChP->RxWriteP+rxbuflen - lpChP->RxReadP)%rxbuflen <18 ) return 0;

 COMMAND cmdrcd;

 BYTE FAR *rxb = lpChP->RecBuff;
 BYTE rp = (lpStaP->DownCmdRP-1) & 3;
 WORD rtuno = lpStaP->DownCmd[rp].Cmd[0]+lpStaP->DownCmd[rp].Cmd[1]*256;
 if ((lpStaP->DownCmd[rp].Cmd[0]==DCMDSJ0) && (lpChP->StaNo == rtuno))
    {
     cmdrcd.CmdContent[0] = 0x44;  //遥调返校
     cmdrcd.CmdContent[1] = lpStaP->DownCmd[rp].Cmd[1];
     cmdrcd.CmdContent[2] = lpStaP->DownCmd[rp].Cmd[2];
     cmdrcd.CmdContent[3] = *(rxb+(rdp+3)%rxbuflen);
     cmdrcd.CmdContent[4] = *(rxb+(rdp+4)%rxbuflen);
     cmdrcd.CmdContent[5] = *(rxb+(rdp+1)%rxbuflen);
     cmdrcd.CmdContent[6] = 0xAA;  //遥调返校错:0x55  遥调返校正确:0xAA
     cmdrcd.SubCmdType = TCZYTCMD;
     cmdrcd.DataLen = 0;
     cmdrcd.DataPt = 0;
     WriteACommand(COMMANDDB, SENDCMDBUF, &cmdrcd, NULL);
     lpStaP->DownCmd[rp].Cmd[0]=0;
    }

 return 18;
}

BYTE Psoe(WORD rdp)
{
 if ((lpChP->RxWriteP+rxbuflen - lpChP->RxReadP)%rxbuflen <12 ) return 0;

 char bchdata[6];
 struct dosdate_t d;
 struct dostime_t t;
 int temp=0;
 BYTE FAR *rxb = lpChP->RecBuff;
 BYTE yxord, ret;
 DWORD yxattr;
 if ((*(rxb+rdp%rxbuflen)>=0x80) && (*(rxb+rdp%rxbuflen)<0x90)
     && (*(rxb+(rdp+6)%rxbuflen)>=0x90) && (*(rxb+(rdp+6)%rxbuflen)<0xa0))
    {
     for (int i=0; i<6; i++) bchdata[i] = *(rxb+(rdp+i+6)%rxbuflen);
     if (CDT_BCH(bchdata)==bchdata[5])
        {
		 if (*(rxb+(rdp+9)%rxbuflen)==0xff)
			 yxord = *(rxb+(rdp+10)%rxbuflen);
		 else yxord = *(rxb+(rdp+10)%rxbuflen)/16*10+*(rxb+(rdp+10)%rxbuflen)%16;
		 yxattr = GetAttr(YXDB, lpChP->StaNo+temp, yxord);
		 if ((yxattr&YXCREATESOE) && (yxattr&RECRTUSOE) )
			{
             EVENT evercd;
			 BYTE yxtype = GetType(YXDB, lpChP->StaNo+temp, yxord);
			 if (yxtype&YXSWITCH) evercd.EventType = KGEVENT;
             else if (yxtype&YXLINKER) evercd.EventType = DZEVENT;
			 else if (yxtype&YXPROTECT) evercd.EventType = BHEVENT;
			 evercd.EventType =1;
			 evercd.Station = lpChP->StaNo;
             evercd.Order = yxord;
			 evercd.Status = *(rxb+(rdp+1)%rxbuflen);
			 evercd.Hour=*(rxb+(rdp+2)%rxbuflen)/16*10+*(rxb+(rdp+2)%rxbuflen)%16;
			 evercd.Min=*(rxb+(rdp+3)%rxbuflen)/16*10+*(rxb+(rdp+3)%rxbuflen)%16;
			 evercd.Sec=*(rxb+(rdp+4)%rxbuflen)/16*10+*(rxb+(rdp+4)%rxbuflen)%16;
			 evercd.Ms=*(rxb+(rdp+7)%rxbuflen)%16*100+*(rxb+(rdp+8)%rxbuflen)/16*10+*(rxb+(rdp+8)%rxbuflen)%16;;
			 if (yxattr&YXXOR) evercd.Status ^= 0xff;
             evercd.EventAttr &= ~SGFLAG;
             if (GetTimerValue(RTUDB, evercd.Station))
                {
				 if (evercd.Status==0x33)
                    {
                     if ((yxtype==YXSWITCH) || (yxtype==YXLINKER))
						 evercd.EventType|=0x80;//evercd.EventAttr |= SGFLAG;
                    }
				   else if (yxtype==YXPROTECT) evercd.EventType|=0x80;//evercd.EventAttr |= SGFLAG;
                }
			  _dos_getdate(&d);
              _dos_gettime(&t);
//              evercd.Year = d.year;
//              evercd.Mon = d.month;
//              evercd.Day = d.day;
/*
              evercd.Hour = t.hour;
              evercd.Min = t.minute;
              evercd.Sec = t.second;
			  evercd.Ms = 0;
*/
			  evercd.data[0]=evercd.Status;

			  if (
				   ((lpStaP+lpChP->StaNo)->Soe[0].ORDER!=yxord)||
				   ((lpStaP+lpChP->StaNo)->Soe[0].TIME!=evercd.Hour)||
				   ((lpStaP+lpChP->StaNo)->Soe[0].MINUTE!=evercd.Min)||
				   ((lpStaP+lpChP->StaNo)->Soe[0].SECOND!=evercd.Sec)||
				   ((lpStaP+lpChP->StaNo)->Soe[0].MSH!=evercd.Ms/100)||
				   ((lpStaP+lpChP->StaNo)->Soe[0].MSL!=evercd.Ms%100)||
				   ((lpStaP+lpChP->StaNo)->Soe[0].STATUS!=evercd.Status)
				  )


				{
				   (lpStaP+lpChP->StaNo)->Soe[0].ORDER=yxord;
				   (lpStaP+lpChP->StaNo)->Soe[0].TIME=evercd.Hour;
				   (lpStaP+lpChP->StaNo)->Soe[0].MINUTE=evercd.Min;
				   (lpStaP+lpChP->StaNo)->Soe[0].SECOND=evercd.Sec;
				   (lpStaP+lpChP->StaNo)->Soe[0].MSH=evercd.Ms/100;
				   (lpStaP+lpChP->StaNo)->Soe[0].MSL=evercd.Ms%100;
				   (lpStaP+lpChP->StaNo)->Soe[0].STATUS=evercd.Status;
		
					 WriteAEvent(EVENTDB, &evercd);
				}
            }
         ret=12;
        }
       else ret=6;
    }
   else ret=6;
 return ret;
}


//-----------------------------------------------------------------------------
WORD iTime(WORD wrp)
{
 struct time Time;
 BYTE bchdata[6]={0x70, 0xd9, 1, 1, 0, 0};
 BYTE FAR *txb = lpChP->SendBuff;

 bchdata[4] = lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[1];
 bchdata[5] = CDT_BCH(bchdata);
 for (int i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;
 gettime (&Time);
 bchdata[0]=(Time.ti_hour/10*16)+Time.ti_hour%10;
 bchdata[1]=(Time.ti_min/10*16)+Time.ti_min%10;
 bchdata[2]=(Time.ti_sec/10*16)+Time.ti_sec%10;
 bchdata[3]=((Time.ti_hund*10)/256/10*16)+(Time.ti_hund*10)/256%10;
 bchdata[4]=((Time.ti_hund*10)%256/10*16+Time.ti_hund*10)%256%10;
 bchdata[5] = CDT_BCH(bchdata);
 for (i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;

 return wrp;
}

WORD msYk(WORD wrp)
{
 BYTE bchdata[6]={0x70, 0x61, 3, 1, 0, 0};
 BYTE FAR *txb = lpChP->SendBuff;

 BYTE yktype = lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[0];
 if (yktype==DCMDYK0) bchdata[1] = 0x61;
   else if (yktype==DCMDYK1) bchdata[1] = 0xc2;
   else bchdata[1] = 0xb3;
 bchdata[4] = lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[1];
 bchdata[5] = CDT_BCH(bchdata);
 for (int i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;

 bchdata[0]=0xe0;
 bchdata[1]=lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[5];
 bchdata[2]=0;
 bchdata[3]=lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[3];
 bchdata[4]=lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[4];
 bchdata[5] = CDT_BCH(bchdata);
 for (i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;

 bchdata[0]=0xe1;
 bchdata[5] = CDT_BCH(bchdata);
 for (i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;

 bchdata[0]=0xe2;
 bchdata[5] = CDT_BCH(bchdata);
 for (i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;
/*
 EVENT evercd;
 struct date Date;
 struct time Time;

 evercd.EventType = YKEVENT;
 evercd.EventAttr = 0;
 if (yktype==DCMDYK0) evercd.EventAttr |= YKSET;
   else if (yktype==DCMDYK1) evercd.EventAttr |= YKEXEC;
   else evercd.EventAttr |= YKERASE;
 evercd.Station = (WORD)lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[1];
 evercd.Order = (WORD)lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[3];
 evercd.Status = (WORD)lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[5];
 getdate (&Date);
 evercd.Year = Date.da_year;
 evercd.Mon = Date.da_mon;
 evercd.Day = Date.da_day;
 gettime (&Time);
 evercd.Hour = Time.ti_hour;
 evercd.Min = Time.ti_min;
 evercd.Sec = Time.ti_sec;
 evercd.Ms = Time.ti_hund*10;
 WriteAEvent(EVENTDB, &evercd);
*/
 return wrp;
}

WORD msSj(WORD wrp)
{
 BYTE bchdata[6]={0x70, 0x61, 3, 1, 0, 0};
 BYTE FAR *txb = lpChP->SendBuff;

 BYTE yktype = lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[0];
 if (yktype==DCMDSJ0) bchdata[1] = 0x61;
   else if (yktype==DCMDSJ1) bchdata[1] = 0xc2;
   else bchdata[1] = 0xb3;
 bchdata[4] = lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[1];
 bchdata[5] = CDT_BCH(bchdata);
 for (int i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;

 bchdata[0]=0xe9;
 if (lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[5]==0xcc) bchdata[1]=0xaa;
   else if (lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[5]==0x33) bchdata[1]=0x55;
   else bchdata[1]=0xff;
 bchdata[2]=0;
 bchdata[3]=lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[3];
 bchdata[4]=lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[4];
 bchdata[5] = CDT_BCH(bchdata);
 for (i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;

 bchdata[0]=0xea;
 bchdata[5] = CDT_BCH(bchdata);
 for (i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;

 bchdata[0]=0xeb;
 bchdata[5] = CDT_BCH(bchdata);
 for (i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;

 return wrp;
}

WORD msGb(WORD wrp)
{
 BYTE bchdata[6]={0x70, 0xb, 0, 1, 0, 0};
 BYTE FAR *txb = lpChP->SendBuff;

 bchdata[4] = lpStaP->DownCmd[lpStaP->DownCmdRP].Cmd[1];
 bchdata[5] = CDT_BCH(bchdata);
 for (int i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;

 return wrp;
}



WORD	YcProc(BYTE FrameNum,WORD wrp,int Station)
{
 WORD YcValue;
 WORD ycvalue;
 WORD YcNum=GetRcdNum(YCDB, Station);
// if (YcNum>64) YcNum=64;
 if (YcNum<=FrameNum*3) return wrp;
 BYTE FAR *txb = lpChP->SendBuff;
 BYTE bchdata[6]={0xeb, 0x90, 0xeb,0x90,0xeb,0x90};
 for (int i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;
 bchdata[0]=0x70;bchdata[1]=0x61;bchdata[2]=0x20;bchdata[3]=0x88;bchdata[4]=0x22;
 if (FrameNum==1) bchdata[1]=0xc2;
 if (FrameNum>=2) bchdata[1]=0xb3;
 bchdata[5] = CDT_BCH(bchdata);
 for (i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;
 for (int ycnum=FrameNum*32;ycnum<(FrameNum+1)*32;ycnum++)
	{
	 if (ycnum>YcNum) break;
	 bchdata[0]=ycnum+1;
	 YcValue=GetValue(YCDB, Station,ycnum*2);
   //	 if (YcValue&0x8000) {ycvalue=~(YcValue&0x7fff);ycvalue/=10;ycvalue&=0x7ff;ycvalue|=0x800;}
   //  else ycvalue=YcValue/10;
   ycvalue=YcValue;
	 bchdata[1]=(ycvalue/256);
	 bchdata[2]=ycvalue%256;

	 YcValue=GetValue(YCDB, Station,ycnum*2+1);
   //	 if (YcValue&0x8000) {ycvalue=~(YcValue&0x7fff);ycvalue/=10;ycvalue&=0x7ff;ycvalue|=0x800;}
   //	 else ycvalue=YcValue/10;
   ycvalue=YcValue;
	 bchdata[3]=(ycvalue/256);
	 bchdata[4]=ycvalue%256;

	 bchdata[5] = CDT_BCH(bchdata);
     for (i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
	 wrp = (wrp+6)%txbuflen;
	}
return wrp;
}
WORD	YxProc(WORD wrp,int Station)
{
 char yxv[16];
 WORD yxw;
 DWORD YxValue;
 WORD YxNum=GetRcdNum(YXDB, Station);
 YxNum=64;
 BYTE FAR *txb = lpChP->SendBuff;
 BYTE bchdata[6]={0xeb, 0x90, 0xeb,0x90,0xeb,0x90};
 for (int i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;
 bchdata[0]=0x70;bchdata[1]=0xf8;bchdata[2]=0x2;bchdata[3]=0x88;bchdata[4]=0x22;
 bchdata[5] = CDT_BCH(bchdata);
 for (i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;
	for (int yxnum=0;yxnum<YxNum/32;yxnum++)
		{
          bchdata[0]=0xf8+yxnum;
		  yxw = 0;
          GetBatchValue(YXDB, Station, 16*yxnum, 16, (char huge *)yxv);
          for (i=0; i<16; i++)
              {
               yxw >>= 1;
               if (yxv[i] & bit0) yxw |= bit15;
              }
          bchdata[1] = LOBYTE(yxw);
		  bchdata[2] = HIBYTE(yxw);

		  yxw = 0;
          GetBatchValue(YXDB, Station, 16*yxnum+1, 16, (char huge *)yxv);
          for (i=0; i<16; i++)
              {
               yxw >>= 1;
               if (yxv[i] & bit0) yxw |= bit15;
              }
          bchdata[3] = LOBYTE(yxw);
		  bchdata[4] = HIBYTE(yxw);
		  bchdata[5] = CDT_BCH(bchdata);
          for (i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
          wrp = (wrp+6)%txbuflen;
		}
return wrp;
}
WORD	KwhProc(BYTE FrameNum,WORD wrp,int Station)
{
 DWORD KwhValue;
 WORD KwhNum=GetRcdNum(KWHDB, Station);
 FrameNum&=1;
 if (KwhNum<FrameNum*32) return wrp;
 BYTE FAR *txb = lpChP->SendBuff;
 BYTE bchdata[6]={0xeb, 0x90, 0xeb,0x90,0xeb,0x90};
 for (int i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;
 bchdata[0]=0x71;bchdata[1]=0x85;bchdata[2]=0x10;bchdata[3]=0x88;bchdata[4]=0x22;
 bchdata[5] = CDT_BCH(bchdata);
 for (i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
 wrp = (wrp+6)%txbuflen;
 for (int kwhnum=FrameNum*32;kwhnum<=(FrameNum+1)*32;kwhnum++)
	{
	 if (kwhnum>KwhNum) break;
	 bchdata[0]=kwhnum+0xa0;
     KwhValue=GetValue(KWHDB,Station,kwhnum);
	 bchdata[1] = 0;KwhValue%256l;
	 bchdata[2] = (KwhValue/100000)*16+(KwhValue%100000/10000);
	 bchdata[3] = (KwhValue%10000/1000)*16+(KwhValue%1000/100);
	 bchdata[4] = (KwhValue%100/10)*16+(KwhValue%10);
	 bchdata[5] = CDT_BCH(bchdata);
     for (i=0; i<6; i++) *(txb+(wrp+i)%txbuflen) = bchdata[i];
	 wrp = (wrp+6)%txbuflen;
	}
return wrp;
}

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -