开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > Internet/IE编程 > 查看源码
PrtIEC101.cpp
资源名称：IEC101-104RTU.rar　[点击查看]
上传用户：asikq0571
上传日期：2014-07-12
资源大小：528k
文件大小：37k
源码类别：

Internet/IE编程

开发平台：

Visual C++

PrtIEC101.cpp：源码内容
  1. // PrtIEC101.cpp: implementation of the CPrtIEC101 class.
  2. //
  3. //////////////////////////////////////////////////////////////////////
  5. #include "stdafx.h"
  6. #include "Peugeot.h"
  7. #include "PrtIEC101.h"
  9. #include "MainFrm.h"
  10. #include "PeugeotDoc.h"
  11. #include "PeugeotView.h"
  13. #ifdef _DEBUG
  14. #undef THIS_FILE
  15. static char THIS_FILE[]=__FILE__;
  16. #define new DEBUG_NEW
  17. #endif
  19. //////////////////////////////////////////////////////////////////////
  20. // Construction/Destruction
  21. //////////////////////////////////////////////////////////////////////
  23. CPrtIEC101::CPrtIEC101()
  24. {
  25.   //初始化变量
  26.     m_Addr           = 0x01;
  27.     m_CauseOfTranLen = 0x01; 
  28. m_CommAddrLen    = 0x01;     
  29.     m_MsgAddrLen     = 0x02;      
  31. m_YXChara = YX_SINGLE | TIME24;
  32.     m_YCChara = YC_TYPEA  | TIME24;
  33. m_YKChara = YK_SINGLE | YK_S_ACK | YK_E_ACK;
  34. m_FCBFlag = 0x00;
  35. m_ACDFlag = 0x00; 
  36.     
  37. int i;
  38. for (i=0; i<21; i++)
  39.    m_SRecByte[i] = 0x00;    
  40.     
  41. for (i=0; i<261; i++)
  42.        m_SSendByte[i] = 0x00;
  43.     
  44.     m_SReadState = StartByte;
  45. m_MsgIndex   = 0; 
  46. }
  48. CPrtIEC101::~CPrtIEC101()
  49. {
  51. }
  53. void CPrtIEC101::StartTimer()
  54. {
  55.   //启动主站召唤时钟
  56. //pView->SetTimer(1,m_CallIntv,NULL);
  57. }
  59. void CPrtIEC101::CloseTimer()
  60. {
  62. //关闭主站召唤时钟
  63.  // pView->KillTimer(m_CallTimerID);
  64. }
  66. void CPrtIEC101::MasterSend(UINT nIDEvent)
  67. {
  68.  //if (m_CallYXFlag)
  69.  
  70.  // CString s1;
  71.  // s1.Format ("%d",nIDEvent);
  72.  // AfxMessageBox(s1);
  73. }
  75. void CPrtIEC101::InitPrt()
  76. {
  77. // 规约初始化
  78.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;             //框架窗口指针;
  79.    CPeugeotDoc* pDoc      = (CPeugeotDoc*) pMainFrame->GetActiveDocument();  //视图指针
  80.    ASSERT_VALID(pDoc);
  82.     m_SSendLv1      = None;            //子站发送1级数据的流程
  83.     m_SYXAddrToSend = pDoc->m_YXAddr;
  84. m_SYCAddrToSend = pDoc->m_YCAddr;
  85.     m_SYMAddrToSend = pDoc->m_YMAddr;
  87. int i = 0;
  88.   //链路复位应答报文
  89.    m_SAck_LinkR[0] = 0x10;
  90.    m_SAck_LinkR[1] = 0x80;         //最高位为传输方向，以下各帧同
  91.    m_SAck_LinkR[2] = m_Addr;
  92.    m_SAck_LinkR[3] = m_SAck_LinkR[1] + m_SAck_LinkR[2];
  93.    m_SAck_LinkR[4] = 0x16;
  95.   //请求链路状态应答报文
  96.    m_SAck_LinkS[0] = 0x10;
  97.    m_SAck_LinkS[1] = 0x8b;
  98.    m_SAck_LinkS[2] = m_Addr;
  99.    m_SAck_LinkS[3] = m_SAck_LinkS[1] + m_SAck_LinkS[2];
  100.    m_SAck_LinkS[4] = 0x16;
  102.    //应答2级数据
  103.    m_SAck_Lv2[0] = 0x10;
  104.    m_SAck_Lv2[1] = 0x89;
  105.    m_SAck_Lv2[2] = m_Addr;
  106.    m_SAck_Lv2[3] = m_SAck_Lv2[1] + m_SAck_Lv2[2];
  107.    m_SAck_Lv2[4] = 0x16;
  108.    
  109.    //总召唤应答
  110.    m_SAck_IC[0] = 0x68;
  111.    m_SAck_IC[1] = 0x05 + m_CauseOfTranLen + m_CommAddrLen + m_MsgAddrLen;
  112.    m_SAck_IC[2] = m_SAck_IC[1];
  113.    m_SAck_IC[3] = 0x68;
  115.    m_SAck_IC[4] = 0xa0;     //传输方向，及要求访问位1010 0000
  116.    m_SAck_IC[5] = m_Addr;
  117.    m_SAck_IC[6] = 0x64;     //类型标识
  118.    m_SAck_IC[7] = 0x01;
  120.    m_SAck_IC[8] = 0x07;                    //传送原因:激活确认
  121.    m_SAck_IC[9] = m_Addr;                  //如与实际字节数不符，后面仍能覆盖
  122.    
  123.    for (i=0; i<m_CommAddrLen; i++)                              //ASDU公共地址               
  124.        m_SAck_IC[8+m_CauseOfTranLen+i] = m_Addr;
  126.    for (i=0; i<m_MsgAddrLen; i++)
  127.        m_SAck_IC[8+m_CauseOfTranLen+m_CommAddrLen+i] = 0x00;  //信息体公共地址 
  129.    m_SAck_IC[3+m_SAck_IC[1]] = 0x14;     //站召唤
  130.    m_SAck_IC[4+m_SAck_IC[1]] = GetAddByte(m_SAck_IC,m_SAck_IC[1],4);     //和校验
  131.    m_SAck_IC[5+m_SAck_IC[1]] = 0x16;
  133.    //总召唤结束
  134.    m_SAck_IC_End[0] = 0x68;
  135.    m_SAck_IC_End[1] = 0x05 + m_CauseOfTranLen + m_CommAddrLen + m_MsgAddrLen;
  136.    m_SAck_IC_End[2] = m_SAck_IC_End[1];
  137.    m_SAck_IC_End[3] = 0x68;
  139.    m_SAck_IC_End[4] = 0x80 + 0x08;     //传输方向，要求访问位为0
  140.    m_SAck_IC_End[5] = m_Addr;
  141.    m_SAck_IC_End[6] = 0x64;     //类型标识
  142.    m_SAck_IC_End[7] = 0x01;
  144.    m_SAck_IC_End[8] = 0x0a;            //传送原因:激活中止
  145.    m_SAck_IC_End[9] = m_Addr;          //如与实际字节数不符，后面仍能覆盖
  146.                 
  147.    
  148.    for (i=0; i<m_CommAddrLen; i++)                              //ASDU公共地址               
  149.        m_SAck_IC_End[8+m_CauseOfTranLen+i] = m_Addr;
  151.    for (i=0; i<m_MsgAddrLen; i++)
  152.        m_SAck_IC_End[8+m_CauseOfTranLen+m_CommAddrLen+i] = 0x00; //信息体公共地址 
  154.    m_SAck_IC_End[3+m_SAck_IC_End[1]] = 0x14;     //站召唤
  155.    m_SAck_IC_End[4+m_SAck_IC_End[1]] = GetAddByte(m_SAck_IC_End,m_SAck_IC_End[1],4);  //和校验
  156.    m_SAck_IC_End[5+m_SAck_IC_End[1]] = 0x16;
  158. }
  160. void CPrtIEC101::MasterRec(BYTE recByte)
  161. {
  163. }
  165. //子站接收主站报文
  166. void CPrtIEC101::SlaveRec(BYTE recByte)
  167. {
  168.   CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;        //框架窗口指针;
  169.   CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView(); //视图指针
  170.   ASSERT_VALID(pView);  
  172.   switch (m_SReadState)
  173.   {
  174.   case StartByte:
  175.    m_SRecByte[0] = recByte;
  177.    if (m_SRecByte[0] == 0x10)
  178.            m_SReadState = CtrlByte;
  179.        else if (m_SRecByte[0] == 0x68)
  180.            m_SReadState = Num_68H_1;
  182.        break;
  184.   //===========  启动字符为10H  ==========//
  185.   case CtrlByte:
  186.        m_SRecByte[1] = recByte;
  187.        m_SReadState  = AddrByte;
  188.        break;
  190.   case AddrByte:
  191.    if ( recByte == m_Addr)
  192.    {
  193.  m_SRecByte[2] = recByte;
  194.          m_SReadState  = CheckByte;
  195.    }
  196.    else
  197.          m_SReadState  = StartByte; 
  198.    break;
  200.   case CheckByte:
  201.    m_SRecByte[3] = recByte;
  203.        BYTE b1 ;
  204.    b1 = m_SRecByte[1] + m_SRecByte[2];
  205.        if (m_SRecByte[3] == b1)
  206.        m_SReadState  = EndByte;
  207.    else
  208.            m_SReadState  = StartByte;
  209.    break;
  211.   case EndByte:                  //启动字符为10H的报文接收完毕，解包
  212.    m_SRecByte[4] = recByte;
  214.       if (m_SRecByte[4] == 0X16)
  215.    SUnPack_Start10H();        //解包
  217.        m_SReadState = StartByte;
  218.    break;
  220.       //===========  启动字符为68H  ==========//
  221.   case Num_68H_1:
  222.    m_SRecByte[1] = recByte;
  223.        m_SReadState  = Num_68H_2;
  224.    break;
  226.   case Num_68H_2:
  227.    m_SRecByte[2] = recByte;
  228.    if (m_SRecByte[2] == m_SRecByte[1])
  229.            m_SReadState = Start_68H_2;
  230.    else
  231.            m_SReadState = StartByte;
  232.    break;
  234.   case Start_68H_2:
  235.    m_SRecByte[3] = recByte;
  236.        if (m_SRecByte[3] == 0x68)
  237.    {
  238.    m_MsgIndex   = 0;
  239.    m_SReadState = Msg_68H;
  240.    }
  241.    else
  242.            m_SReadState = StartByte;
  243.    break;
  245.   case Msg_68H:
  246.    m_SRecByte[4+m_MsgIndex] = recByte;
  247.    if (m_MsgIndex < (m_SRecByte[1]-1))   // 如读取的字节数小于信息字节数，则继续读取
  248.    m_MsgIndex++;
  249.    else
  250.    { 
  251.    m_SReadState = Check_68H;
  252.    m_MsgIndex   = 0;
  253.    }
  254.    break;
  256.   case Check_68H:
  257.        m_SRecByte[4+m_SRecByte[1]] = recByte;
  259.        BYTE tembyte;
  260.        tembyte = GetAddByte(m_SRecByte,m_SRecByte[1],4);
  262.    if (m_SRecByte[4+m_SRecByte[1]] == tembyte)
  263.            m_SReadState = End_68H;
  264.    else
  265.            m_SReadState = StartByte;
  267.    break;
  269.   case End_68H:              //启动字符为68H的报文接收完毕，解包
  270.    m_SRecByte[5+m_SRecByte[1]] = recByte;
  272.    if (m_SRecByte[5+m_SRecByte[1]] == 0X16 && 
  273.    m_SRecByte[5] == m_Addr)
  274.    SUnPack_Start68H();    //解包
  275.    
  276.    m_SReadState = StartByte;
  277.    break;
  278.   ///////////////////////////////////////////////   
  279.   default:
  280.        m_SReadState = StartByte;      //重新从地址码读取
  281.    break;
  282.   }
  283. }
  285. void CPrtIEC101::SlaveSend()
  286. {
  288. }
  290. //解包 10H
  291. void CPrtIEC101::SUnPack_Start10H()
  292. {
  293.    switch (m_SRecByte[1] & 0x0f)
  294.    {
  295.    case 0x00:
  296.    SUnPack_FC00H();
  297.    break;
  298.   
  299.    case 0x09:
  300.    SUnPack_FC09H();
  301.    break;
  303.    case 0x0b:
  304.        SUnPack_FC0bH();
  305.    break;
  307.    case 0x0a:
  308.    SUnPack_FC0aH();
  309.    break;
  311.    default:
  312.        SUnPack_Start10H_Unknow();
  313.    break;
  314.    }
  315. }
  317. //解包 68H
  318. void CPrtIEC101::SUnPack_Start68H()
  319. {
  320.    switch (m_SRecByte[6])       //类型标识
  321.    {
  322.    case 0x64:                   //总召唤
  323.    SUnPack_TypeID64H();
  324.    break;
  326.    case 0x67:
  327.        SUnPack_TypeID67H();     //主站对时
  328.    break;
  330.    case 0x2d:    
  331.    SUnPack_TypeID2DH();     //单点遥控
  332.    break;
  334.    case 0x2e:
  335.    SUnPack_TypeID2EH();     //双点遥控
  336.    break;
  338.    case 0x65:                   
  339.    SUnPack_TypeID65H();    //二进制计数器读数(BCR) -- 电度累计量
  340.    break;
  342.    default:
  343.        SUnPack_Start68H_Unknow();
  344.    break;
  345.    }
  346. }
  348. //接收/应答主站总召唤
  349. void CPrtIEC101::SUnPack_TypeID64H()
  350. {
  351.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  352.    CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  353.    ASSERT_VALID(pView);
  355.    DWORD dwBytesSended = 0;
  356.    CString s1 = "";
  358.    s1 = "<Rec>: 101主站--总召唤";
  359.    s1 = s1 + "rn" + ByteArrayToString(m_SRecByte,6+m_SRecByte[1]) + "rn";
  360.    pView->DisplayMsg(s1);                             //显示召唤报文
  362.    if (pView->Send(m_SAck_IC,6+m_SAck_IC[1],dwBytesSended))     //发送应答报文并显示
  363.    {
  364.          s1 = "<Send>:101子站--总召唤确认";
  365.  s1 = s1 + "rn" + ByteArrayToString(m_SAck_IC,6+m_SAck_IC[1]) + "rn";
  366.          pView->DisplayMsg(s1);
  368.  m_SSendLv1 = YX;
  369.  m_ACDFlag  = 0x20;
  370.    }
  371. }
  373. void CPrtIEC101::SUnPack_Start68H_Unknow()
  374. {
  375.   CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  376.   CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  377.   ASSERT_VALID(pView);
  379.   CString s1 = "";
  380.   s1 = "<Rec>: 101主站--未知命令";
  381.   s1 = s1 + "rn" + ByteArrayToString(m_SRecByte,6+m_SRecByte[1]) + "rn";
  382.   pView->DisplayMsg(s1);     //显示召唤报文
  383. }
  385. void CPrtIEC101::SUnPack_Start10H_Unknow()
  386. {
  387.   CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  388.   CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  389.   ASSERT_VALID(pView);
  391.   CString s1 = "";
  392.   s1 = "<Rec>: 101主站--未知命令";
  393.   s1 = s1 + "rn" + ByteArrayToString(m_SRecByte,5) + "rn";
  394.   pView->DisplayMsg(s1);     //显示召唤报文
  395. }
  397. void CPrtIEC101::SUnPack_FC00H()
  398. {
  399.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  400.    CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  401.    ASSERT_VALID(pView);
  403.    DWORD dwBytesSended = 0;
  404.    CString s1 = "";
  405.     
  406.    s1 = "<Rec>: 101主站--远方复位链路";
  407.    s1 = s1 + "rn" + ByteArrayToString(m_SRecByte,5) + "rn";
  408.    pView->DisplayMsg(s1);     //显示召唤报文
  409.   
  410.    if (pView->Send(m_SAck_LinkR,5,dwBytesSended))     //发送应答报文并显示
  411.    {
  412.        s1 = "<Send>:101子站--复位链路确认";
  413.    s1 = s1 + "rn" + ByteArrayToString(m_SAck_LinkR,5) + "rn";
  414.        pView->DisplayMsg(s1);
  415.    }
  417. }
  419. void CPrtIEC101::SUnPack_FC09H()
  420. {
  421.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  422.    CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  423.    ASSERT_VALID(pView);
  425.    DWORD dwBytesSended = 0;
  426.    CString s1 = "";
  428.    s1 = "<Rec>:101主站--请求链路状态";
  429.    s1 = s1 + "rn" + ByteArrayToString(m_SRecByte,5) + "rn";
  430.    pView->DisplayMsg(s1);     //显示召唤报文
  432.    if (pView->Send(m_SAck_LinkS,5,dwBytesSended))     //发送应答报文并显示
  433.    {
  434.        s1 = "<Send>:101子站--链路状态应答";
  435.    s1 = s1 + "rn" + ByteArrayToString(m_SAck_LinkS,5) + "rn";
  436.        pView->DisplayMsg(s1);
  437.    }
  438. }
  440. //接收/应答 ‘召2级数据’
  441. void CPrtIEC101::SUnPack_FC0bH()
  442. {
  443.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  444.    CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  445.    ASSERT_VALID(pView);
  447.    DWORD dwBytesSended = 0;
  448.    CString s1 = "";
  450.    s1 = "<Rec>:101主站--召2级数据";
  451.    s1 = s1 + "rn" + ByteArrayToString(m_SRecByte,5) + "rn";
  452.    pView->DisplayMsg(s1);     //显示召唤报文
  454.    if (pView->Send(m_SAck_Lv2,5,dwBytesSended))     //发送应答报文并显示
  455.    {
  456.        s1 = "<Send>:101子站--无数据";
  457.    s1 = s1 + "rn" + ByteArrayToString(m_SAck_Lv2,5) + "rn";
  458.        pView->DisplayMsg(s1);
  459.    }
  460. }
  462. //接收/应答 ‘召1级数据’
  463. void CPrtIEC101::SUnPack_FC0aH()
  464. {
  465.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  466.    CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  467.    ASSERT_VALID(pView);
  469.    DWORD dwBytesSended = 0;
  470.    CString s1 = "";
  472.    s1 = "<Rec>:101主站--召1级数据";
  473.    s1 = s1 + "rn" + ByteArrayToString(m_SRecByte,5) + "rn";
  474.    pView->DisplayMsg(s1);     //显示召唤报文 
  476.    switch (m_SSendLv1)
  477.    {
  478.    case YX:
  479.    SlaveSend_Lv1YX();
  480.    break;
  482.    case YC:
  483.        SlaveSend_Lv1YC();
  484.    break;
  486.    case None:
  487.        SlaveSend_Lv1End();
  488.    break;
  490.    default:
  491.    m_SSendLv1 = None;
  492.        break;
  493.    }
  494. }
  496. void CPrtIEC101::SlaveSend_Lv1YX()
  497. {
  498.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  499.    CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  500.    ASSERT_VALID(pView);
  502.    DWORD dwBytesSended = 0;
  503.    CString s1 = "";
  505.    SPack_M_SP_DP_NA();     //打遥信包
  506.  
  507.    if((m_YXChara & 0x01) == YX_SINGLE)
  508.    s1 = "<Send>:101子站--单点信息 M_SP_NA";
  509.    else
  510.        s1 = "<Send>:101子站--双点信息 M_DP_NA";
  512.    s1 = s1 + "rn" + ByteArrayToString(m_SSendByte,6+m_SSendByte[1]) + "rn";
  514.    if (pView->Send(m_SSendByte,6+m_SSendByte[1],dwBytesSended))     //发送应答报文并显示
  515.        pView->DisplayMsg(s1);
  516. }
  518. void CPrtIEC101::SlaveSend_Lv1YC()
  519. {
  520.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  521.    CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  522.    ASSERT_VALID(pView);
  524.    DWORD dwBytesSended = 0;
  525.    CString s1 = "";
  527.    SPack_M_ME_ND();     //打遥测包，目前总召唤遥测按不带品质的归一化类型
  528.  
  529.    s1 = "<Send>:101子站--遥测值，不带品质描述的归一化值 M_ME_ND";
  530.    s1 = s1 + "rn" + ByteArrayToString(m_SSendByte,6+m_SSendByte[1]) + "rn";
  532.    if (pView->Send(m_SSendByte,6+m_SSendByte[1],dwBytesSended))     //发送应答报文并显示
  533.        pView->DisplayMsg(s1);
  534. }
  536. void CPrtIEC101::SPack_M_SP_DP_NA()
  537. {
  538.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;             //框架窗口指针;
  539.    CPeugeotDoc* pDoc      = (CPeugeotDoc*) pMainFrame->GetActiveDocument();   //文档指针
  540.    ASSERT_VALID(pDoc);
  541.    //int nMaxNumToSend;              //1帧最大发送的遥信个数
  542.    int nYXNumToSend;               //
  543.    BOOL IsFullSended = false;      //遥信点信息是否全部发送
  544.   // nMaxNumToSend = 255-2-1-1-m_CauseOfTranLen-m_CommAddrLen-m_MsgAddrLen;
  545.    nYXNumToSend  = pDoc->m_YXNum - (m_SYXAddrToSend - pDoc->m_YXAddr);
  546.    
  547.    if (nYXNumToSend > 0x7f)
  548.        nYXNumToSend = 0x7f; 
  549.    else
  550.        IsFullSended   = true;              //本帧能全部发送遥信
  552.    m_SSendByte[0] = 0x68;
  553.    m_SSendByte[1] = nYXNumToSend+2+1+1+m_CauseOfTranLen+m_CommAddrLen+m_MsgAddrLen;
  554.    m_SSendByte[2] = m_SSendByte[1];
  555.    m_SSendByte[3] = 0x68;
  556.    m_SSendByte[4] = 0x80 + m_ACDFlag + 0x08;   //功能码
  557.    m_SSendByte[5] = m_Addr;
  558.  //m_SSendByte[6] = TypeID:Single OR Double 
  559.    m_SSendByte[7] = 0x80 + nYXNumToSend;   //SQ=1
  561.    m_SSendByte[8] = 0x14;                  //传送原因：响应站召唤
  562.    m_SSendByte[9] = m_Addr;                //如与实际字节数不符，后面仍能覆盖
  564.    m_SSendByte[8+m_CauseOfTranLen]   = m_Addr;
  565.    m_SSendByte[8+m_CauseOfTranLen+1] = m_Addr;   //如与实际字节数不符，后面仍能覆盖
  567.    WORD temVar = 0x0000;
  568.    temVar = (WORD)m_SYXAddrToSend;      //信息体地址
  570.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen]   = LOBYTE(temVar);
  571.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen+1] = HIBYTE(temVar);    //如与实际字节数不符，后面仍能覆盖
  572.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen+2] = 0x00;
  573.    
  574.    for (int i=0; i<nYXNumToSend; i++)
  575.         m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen+m_MsgAddrLen+i] 
  576. = pDoc->m_pYXData[m_SYXAddrToSend-pDoc->m_YXAddr+i];
  578.    if ((m_YXChara & 0x01) == 0)
  579.        m_SSendByte[6] = 0x01;
  580.    else
  581.         m_SSendByte[6] = 0x03;
  583.    m_SSendByte[4+m_SSendByte[1]] = GetAddByte(m_SSendByte,m_SSendByte[1],4);
  584.    m_SSendByte[5+m_SSendByte[1]] = 0x16;
  585.    /////////////////////////////////////////////////////////
  586.    if (IsFullSended)
  587.    {
  588.    m_SSendLv1      = YC;
  589.        m_SYXAddrToSend = pDoc->m_YXAddr;
  590.    }
  591.    else
  592.    m_SYXAddrToSend = m_SYXAddrToSend + 0x7f;
  594. }
  596. void CPrtIEC101::SPack_M_ME_ND()
  597. {
  598.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;             //框架窗口指针;
  599.    CPeugeotDoc* pDoc      = (CPeugeotDoc*) pMainFrame->GetActiveDocument();   //文档指针
  600.    ASSERT_VALID(pDoc);
  602.    int nMaxNumToSend;              //1帧最大发送的遥测个数
  603.    int nYCNumToSend;               //
  604.    BOOL IsFullSended = false;      //遥测点信息是否全部发送
  605.    nMaxNumToSend = (255-2-1-1-m_CauseOfTranLen-m_CommAddrLen-m_MsgAddrLen)/2;  //每个遥测两个字节
  606.    nYCNumToSend  = pDoc->m_YCNum - (m_SYCAddrToSend - pDoc->m_YCAddr);
  607.    
  608.    if (nYCNumToSend > nMaxNumToSend)
  609.        nYCNumToSend = nMaxNumToSend; 
  610.    else
  611.        IsFullSended   = true;              //本帧能全部发送遥测
  613.    m_SSendByte[0] = 0x68;
  614.    m_SSendByte[1] = nYCNumToSend*2+2+1+1+m_CauseOfTranLen+m_CommAddrLen+m_MsgAddrLen;
  615.    m_SSendByte[2] = m_SSendByte[1];
  616.    m_SSendByte[3] = 0x68;
  617.    m_SSendByte[4] = 0x80 + m_ACDFlag + 0x08;   //功能码
  618.    m_SSendByte[5] = m_Addr;
  619.    m_SSendByte[6] = 0x15;                  //类型标识 21 
  620.    m_SSendByte[7] = 0x80 + nYCNumToSend;   //SQ=1
  622.    m_SSendByte[8] = 0x14;                  //传送原因：响应站召唤
  623.    m_SSendByte[9] = m_Addr;                //如与实际字节数不符，后面仍能覆盖
  625.    m_SSendByte[8+m_CauseOfTranLen]   = m_Addr;
  626.    m_SSendByte[8+m_CauseOfTranLen+1] = m_Addr;   //如与实际字节数不符，后面仍能覆盖
  628.    WORD temVar = 0x0000;
  629.    temVar = (WORD)m_SYCAddrToSend;      //信息体地址
  631.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen]   = LOBYTE(temVar);
  632.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen+1] = HIBYTE(temVar);    //如与实际字节数不符，后面仍能覆盖
  633.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen+2] = 0x00;
  634.    
  635.    int i,j;
  636.    j = 8+m_CauseOfTranLen+m_CommAddrLen+m_MsgAddrLen;
  638.    for (i=0; i<nYCNumToSend; i++)
  639.    {
  640.        temVar = pDoc->m_pYCData[m_SYCAddrToSend-pDoc->m_YCAddr+i];
  641.    m_SSendByte[j+i*2]   = LOBYTE(temVar);
  642.    m_SSendByte[j+i*2+1] = HIBYTE(temVar);
  643.    }
  645.    m_SSendByte[4+m_SSendByte[1]] = GetAddByte(m_SSendByte,m_SSendByte[1],4);
  646.    m_SSendByte[5+m_SSendByte[1]] = 0x16;
  647.    /////////////////////////////////////////////////////////
  648.    if (IsFullSended)
  649.    {
  650.    m_SSendLv1      = None;
  651.        m_SYCAddrToSend = pDoc->m_YCAddr;
  652.    }
  653.    else
  654.    m_SYCAddrToSend = m_SYCAddrToSend + nYCNumToSend;
  655. }
  657. //void CPrtIEC101::SPack_M_DP_NA()
  658. //{
  659. //}
  661. void CPrtIEC101::SlaveSend_Lv1End()
  662. {
  663.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  664.    CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  665.    ASSERT_VALID(pView);
  667.    DWORD dwBytesSended = 0;
  668.    CString s1 = "";
  669.    s1 = "<Send>:101子站--总召唤结束";
  670.    s1 = s1 + "rn" + ByteArrayToString(m_SAck_IC_End,6+m_SAck_IC_End[1]) + "rn";
  672.    if (pView->Send(m_SAck_IC_End,6+m_SAck_IC_End[1],dwBytesSended))     //发送应答报文并显示
  673.        pView->DisplayMsg(s1);
  674. }
  676. //接收时钟同步命令
  677. void CPrtIEC101::SUnPack_TypeID67H()
  678. {
  679.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  680.    CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  681.    ASSERT_VALID(pView);
  683.    BYTE nYear, nMonth, nDay, nHour, nMin; //nSec, nSec_m
  684.    WORD wSec;
  685.    float fSec;
  687.    nYear  = m_SRecByte[m_SRecByte[1]+3];
  688.    nMonth = m_SRecByte[m_SRecByte[1]+2];
  689.    nDay   = m_SRecByte[m_SRecByte[1]+1] & 0x1f;
  690.    nHour  = m_SRecByte[m_SRecByte[1]];
  691.    nMin   = m_SRecByte[m_SRecByte[1]-1];
  692.    wSec   = (m_SRecByte[m_SRecByte[1]-2]<<8) | m_SRecByte[m_SRecByte[1]-3];
  693.    fSec   = (float)wSec/1000;
  694.    
  695.    DWORD dwBytesSended = 0;
  696.    CString s1 = "";
  697.   
  698.    if (nYear < 0x0a)
  699.    s1.Format("时钟同步 200%d-%d-%d %d:%d:%2.3f",nYear,nMonth,nDay,nHour,nMin,fSec);//%2.3f 保留三位小数点
  700.    else
  701.    s1.Format("时钟同步 20%d-%d-%d %d:%d:%2.3f",nYear,nMonth,nDay,nHour,nMin,fSec);
  703.    pMainFrame->DisplayEvent(1,s1);    //消息窗口显示
  705.    s1 = "<Rec>: 101主站--" + s1 + "rn" + ByteArrayToString(m_SRecByte,6+m_SRecByte[1]) + "rn";
  706.    pView->DisplayMsg(s1);    
  707.    
  708.    //应答时钟同步
  709.    m_SSendByte[0] = 0x68;
  710.    m_SSendByte[1] = 2+1+1+m_CauseOfTranLen+m_CommAddrLen+m_MsgAddrLen+7;
  711.    m_SSendByte[2] = m_SSendByte[1];
  712.    m_SSendByte[3] = 0x68;
  713.    m_SSendByte[4] = 0x80;     //功能码0x80+0x00
  714.    m_SSendByte[5] = m_Addr;
  715.    m_SSendByte[6] = 0x67;     //类型标识 103 
  716.    m_SSendByte[7] = 0x01;     //SQ=0
  718.    m_SSendByte[8] = 0x07;                  //传送原因：激活确认
  719.    m_SSendByte[9] = m_Addr;                //如与实际字节数不符，后面仍能覆盖
  721.    m_SSendByte[8+m_CauseOfTranLen]   = m_Addr;
  722.    m_SSendByte[8+m_CauseOfTranLen+1] = m_Addr;   //如与实际字节数不符，后面仍能覆盖
  724.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen] = 0x00;   //信息体公共地址 
  725.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen+1] = 0x00; //如与实际字节数不符，后面仍能覆盖
  726.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen+2] = 0x00;
  728.    for (int i=0; i<7; i++)
  729.         m_SSendByte[m_SSendByte[1]-3+i] = m_SRecByte[m_SRecByte[1]-3+i];
  730.  
  731.    m_SSendByte[4+m_SSendByte[1]] = GetAddByte(m_SSendByte,m_SSendByte[1],4);
  732.    m_SSendByte[5+m_SSendByte[1]] = 0x16;
  734.    s1 ="<Send>: 101子站--时钟同步确认";
  735.    s1 = s1 + "rn" + ByteArrayToString(m_SSendByte,6+m_SSendByte[1]) + "rn";
  737.    if (pView->Send(m_SSendByte,6+m_SSendByte[1],dwBytesSended))
  738.        pView->DisplayMsg(s1);  
  739. }
  741. //24位时标的单点/双点信息报文
  742. void CPrtIEC101::SPack_M_SP_DP_TA(int nIndex, int nNumber)
  743. {
  744.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;             //框架窗口指针;
  745.    CPeugeotDoc* pDoc      = (CPeugeotDoc*) pMainFrame->GetActiveDocument();   //文档指针
  746.    ASSERT_VALID(pDoc);
  748.    m_SSendByte[0] = 0x68;
  749.    m_SSendByte[1] = 2+1+1+m_CauseOfTranLen+m_CommAddrLen+(m_MsgAddrLen+4)*nNumber;
  750.    m_SSendByte[2] = m_SSendByte[1];
  751.    m_SSendByte[3] = 0x68;
  752.    m_SSendByte[4] = 0x80 + 0x08;   //功能码
  753.    m_SSendByte[5] = m_Addr;
  754.  //m_SSendByte[6] = TypeID:Single OR Double 
  755.    m_SSendByte[7] = 0x00 + nNumber;   //SQ=0
  757.    m_SSendByte[8] = 0x03;                  //传送原因：自发（突发）
  758.    m_SSendByte[9] = m_Addr;                //如与实际字节数不符，后面仍能覆盖
  760.    m_SSendByte[8+m_CauseOfTranLen]   = m_Addr;   //公共体地址
  761.    m_SSendByte[8+m_CauseOfTranLen+1] = m_Addr;   //如与实际字节数不符，后面仍能覆盖
  763.    WORD wtemVar = 0x0000;
  764.    WORD wSec;
  765.    int  ntemVar;
  766.    ntemVar = 8+m_CauseOfTranLen+m_CommAddrLen;    //信息体之前的字节数
  767.    SYSTEMTIME t1;             //时间结构
  768.    GetLocalTime(&t1);
  769.    wSec = t1.wSecond*1000 + t1.wMilliseconds;      //毫秒
  771.    for (int i=0; i<nNumber; i++)
  772.    {
  773.   wtemVar = (WORD)(pDoc->m_YXAddr + nIndex + i);      //第nIndex+i信息体地址
  774.       
  775.   m_SSendByte[ntemVar+(m_MsgAddrLen+4)*i]   = LOBYTE(wtemVar);    
  776.       m_SSendByte[ntemVar+(m_MsgAddrLen+4)*i+1] = HIBYTE(wtemVar);    //如与实际字节数不符，后面仍能覆盖
  777.       m_SSendByte[ntemVar+(m_MsgAddrLen+4)*i+2] = 0x00;
  778.    
  779.   m_SSendByte[ntemVar+(m_MsgAddrLen+4)*i+m_MsgAddrLen]   = pDoc->m_pYXData[nIndex+i];
  780.   
  781.       m_SSendByte[ntemVar+(m_MsgAddrLen+4)*i+m_MsgAddrLen+1] = LOBYTE(wSec);      //3字节时标CTime
  782.   m_SSendByte[ntemVar+(m_MsgAddrLen+4)*i+m_MsgAddrLen+2] = HIBYTE(wSec);
  783.   m_SSendByte[ntemVar+(m_MsgAddrLen+4)*i+m_MsgAddrLen+3] = (BYTE)t1.wMinute;
  784.    }
  786.    if ((m_YXChara & 0x01) == 0)
  787.        m_SSendByte[6] = 0x02;
  788.    else
  789.         m_SSendByte[6] = 0x04;
  791.    m_SSendByte[4+m_SSendByte[1]] = GetAddByte(m_SSendByte,m_SSendByte[1],4);
  792.    m_SSendByte[5+m_SSendByte[1]] = 0x16;
  793. }
  795. //56位时标的单点/双点信息报文
  796. void CPrtIEC101::SPack_M_SP_DP_TB(int nIndex, int nNumber)
  797. {
  798.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;             //框架窗口指针;
  799.    CPeugeotDoc* pDoc      = (CPeugeotDoc*) pMainFrame->GetActiveDocument();   //文档指针
  800.    ASSERT_VALID(pDoc);
  802.    m_SSendByte[0] = 0x68;
  803.    m_SSendByte[1] = 2+1+1+m_CauseOfTranLen+m_CommAddrLen+(m_MsgAddrLen+8)*nNumber;
  804.    m_SSendByte[2] = m_SSendByte[1];
  805.    m_SSendByte[3] = 0x68;
  806.    m_SSendByte[4] = 0x80 + 0x08;   //功能码
  807.    m_SSendByte[5] = m_Addr;
  808.  //m_SSendByte[6] = TypeID:Single OR Double 
  809.    m_SSendByte[7] = 0x00 + nNumber;   //SQ=0
  811.    m_SSendByte[8] = 0x03;                  //传送原因：自发（突发）
  812.    m_SSendByte[9] = m_Addr;                //如与实际字节数不符，后面仍能覆盖
  814.    m_SSendByte[8+m_CauseOfTranLen]   = m_Addr;   //公共体地址
  815.    m_SSendByte[8+m_CauseOfTranLen+1] = m_Addr;   //如与实际字节数不符，后面仍能覆盖
  817.    WORD wtemVar = 0x0000;
  818.    WORD wSec;
  819.    int  ntemVar;
  820.    ntemVar = 8+m_CauseOfTranLen+m_CommAddrLen;    //信息体之前的字节数
  821.    SYSTEMTIME t1;             //时间结构
  822.    GetLocalTime(&t1);
  823.    wSec = t1.wSecond*1000 + t1.wMilliseconds;      //毫秒
  825.    for (int i=0; i<nNumber; i++)
  826.    {
  827.   wtemVar = (WORD)(pDoc->m_YXAddr + nIndex + i);      //第nIndex+i信息体地址
  828.       
  829.   m_SSendByte[ntemVar+(m_MsgAddrLen+8)*i]   = LOBYTE(wtemVar);    
  830.       m_SSendByte[ntemVar+(m_MsgAddrLen+8)*i+1] = HIBYTE(wtemVar);    //如与实际字节数不符，后面仍能覆盖
  831.       m_SSendByte[ntemVar+(m_MsgAddrLen+8)*i+2] = 0x00;
  832.    
  833.   m_SSendByte[ntemVar+(m_MsgAddrLen+8)*i+m_MsgAddrLen]   = pDoc->m_pYXData[nIndex+i];
  834.   
  835.       m_SSendByte[ntemVar+(m_MsgAddrLen+8)*i+m_MsgAddrLen+1] = LOBYTE(wSec);      //3字节时标CTime 
  836.   m_SSendByte[ntemVar+(m_MsgAddrLen+8)*i+m_MsgAddrLen+2] = HIBYTE(wSec);
  837.   m_SSendByte[ntemVar+(m_MsgAddrLen+8)*i+m_MsgAddrLen+3] = (BYTE)t1.wMinute;  //分
  838.       m_SSendByte[ntemVar+(m_MsgAddrLen+8)*i+m_MsgAddrLen+4] = (BYTE)t1.wHour;    //时
  839.   m_SSendByte[ntemVar+(m_MsgAddrLen+8)*i+m_MsgAddrLen+5] = (BYTE)t1.wDayOfWeek<<5 | (BYTE)t1.wDay;  //日
  840.   m_SSendByte[ntemVar+(m_MsgAddrLen+8)*i+m_MsgAddrLen+6] = (BYTE)t1.wMonth;   //月
  841.   m_SSendByte[ntemVar+(m_MsgAddrLen+8)*i+m_MsgAddrLen+7] = (BYTE)(t1.wYear % 100);  //年（余除100）
  842.    }
  844.    if ((m_YXChara & 0x01) == 0)
  845.        m_SSendByte[6] = 0x1e;    //typeid:30
  846.    else
  847.         m_SSendByte[6] = 0x1f;    //typeid:31
  849.    m_SSendByte[4+m_SSendByte[1]] = GetAddByte(m_SSendByte,m_SSendByte[1],4);
  850.    m_SSendByte[5+m_SSendByte[1]] = 0x16;
  851. }
  853. void CPrtIEC101::SlaveSend_ChangeYX(UINT nIndex, UINT nNumber)
  854. {
  855.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  856.    CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  857.    ASSERT_VALID(pView);
  859.    DWORD dwBytesSended = 0;
  860.    CString s1 = "";
  862.    if ((m_YXChara & 0x02) == TIME24)
  863.    {
  864.       s1 = "<Send>:101子站--带24位时标的";
  865.   SPack_M_SP_DP_TA(nIndex,nNumber);     //24位时标单（双）点遥信打包
  866.    }
  867.    else
  868.    {
  869.   s1 = "<Send>:101子站--带56位时标的";
  870.   SPack_M_SP_DP_TB(nIndex,nNumber);     //56位时标单（双）点遥信打包
  871.    }
  872.    
  873.    if ((m_YXChara & 0x01) == YX_SINGLE)
  874.       s1 = s1+"单点遥信(突发)";
  875.    else
  876.   s1 = s1+"双点遥信(突发)";
  878.    s1 = s1 + "rn" + ByteArrayToString(m_SSendByte,6+m_SSendByte[1]) + "rn";
  880.    if (pView->Send(m_SSendByte,6+m_SSendByte[1],dwBytesSended))     //发送应答报文并显示
  881.        pView->DisplayMsg(s1);
  882. }
  884. void CPrtIEC101::SUnPack_TypeID2DH()
  885. {
  886.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  887.    CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  888.    ASSERT_VALID(pView);
  890.    DWORD dwBytesSended = 0;
  891.    CString s1 = "";
  893.    if ((m_SRecByte[m_SRecByte[1]+3] & 0x80) == 0x80)   //遥控选择
  894.        s1 = "<Rec>: 101主站--单点命令:遥控选择"; 
  895.    else
  896.        s1 = "<Rec>: 101主站--单点命令:遥控执行"; 
  898.    if ((m_SRecByte[m_SRecByte[1]+3] & 0x01) == 0x01)    //合闸
  899.        s1 = s1 + "(合闸)";
  900.    else
  901.        s1 = s1 + "(分闸)";
  903.    CString s2;
  904.    if (m_MsgAddrLen == 2)
  905.       s2 = ByteToString(m_SRecByte[m_SRecByte[1]+2]) + ByteToString(m_SRecByte[m_SRecByte[1]+1]);
  906.    else //信息体地址为3字节
  907.       s2 = ByteToString(m_SRecByte[m_SRecByte[1]+2]) + ByteToString(m_SRecByte[m_SRecByte[1]+1])
  908.          + ByteToString(m_SRecByte[m_SRecByte[1]]);
  910.    s1 = s1 + " Addr:" + s2;
  911.    s1 = s1 + "rn" + ByteArrayToString(m_SRecByte,6+m_SRecByte[1]) + "rn";
  912.    pView->DisplayMsg(s1);  
  914.    SPack_C_SC_DC_Echo();   //遥控应答打包
  916.    if ((m_SSendByte[4] & 0x01) == 0)
  917.       s1 = "<Send>: 101子站--单点命令:确认";
  918.    else
  919.       s1 = "<Send>: 101子站--单点命令:否定应答";
  921.    s1 = s1 + "rn" + ByteArrayToString(m_SSendByte,6+m_SSendByte[1]) + "rn";
  923.    if (pView->Send(m_SSendByte,6+m_SSendByte[1],dwBytesSended))     //发送应答报文并显示
  924.        pView->DisplayMsg(s1);
  925. }
  927. void CPrtIEC101::SUnPack_TypeID2EH()
  928. {
  929.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  930.    CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  931.    ASSERT_VALID(pView);
  933.    DWORD dwBytesSended = 0;
  934.    CString s1 = "";
  936.    if ((m_SRecByte[m_SRecByte[1]+3] & 0x80) == 0x80)   //遥控选择
  937.        s1 = "<Rec>: 101主站--双点命令:遥控选择"; 
  938.    else
  939.        s1 = "<Rec>: 101主站--双点命令:遥控执行"; 
  941.    if ((m_SRecByte[m_SRecByte[1]+3] & 0x03) == 0x02)         //合闸
  942.        s1 = s1 + "(合闸)";
  943.    else if ((m_SRecByte[m_SRecByte[1]+3] & 0x03) == 0x01)    //分闸
  944.        s1 = s1 + "(分闸)";
  945.    else
  946.    {
  947.    s1 = s1 + "(不允许)";
  948.        s1 = s1 + "rn" + ByteArrayToString(m_SRecByte,6+m_SRecByte[1]) + "rn";
  949.        pView->DisplayMsg(s1); 
  950.    return;
  951.    }
  953.    CString s2;
  954.    if (m_MsgAddrLen == 2)
  955.       s2 = ByteToString(m_SRecByte[m_SRecByte[1]+2]) + ByteToString(m_SRecByte[m_SRecByte[1]+1]);
  956.    else //信息体地址为3字节
  957.       s2 = ByteToString(m_SRecByte[m_SRecByte[1]+2]) + ByteToString(m_SRecByte[m_SRecByte[1]+1])
  958.          + ByteToString(m_SRecByte[m_SRecByte[1]]);
  960.    s1 = s1 + " Addr:" + s2;
  961.    s1 = s1 + "rn" + ByteArrayToString(m_SRecByte,6+m_SRecByte[1]) + "rn";
  962.    pView->DisplayMsg(s1);  
  964.    SPack_C_SC_DC_Echo();   //遥控应答打包
  966.    if ((m_SSendByte[4] & 0x01) == 0)
  967.       s1 = "<Send>: 101子站--双点命令:确认";
  968.    else
  969.       s1 = "<Send>: 101子站--双点命令:否定应答";
  971.    s1 = s1 + "rn" + ByteArrayToString(m_SSendByte,6+m_SSendByte[1]) + "rn";
  973.    if (pView->Send(m_SSendByte,6+m_SSendByte[1],dwBytesSended))     //发送应答报文并显示
  974.        pView->DisplayMsg(s1);
  975. }
  977. //子站应答遥控命令（单点/双点）m_SRecByte  m_SSendByte
  978. void CPrtIEC101::SPack_C_SC_DC_Echo()
  979. {
  980.    m_SSendByte[0] = 0x68;
  981.    m_SSendByte[1] = 0x05 + m_CauseOfTranLen + m_CommAddrLen + m_MsgAddrLen;
  982.    m_SSendByte[2] = m_SSendByte[1];
  983.    m_SSendByte[3] = 0x68;
  985.    if ((m_SRecByte[m_SRecByte[1]+3] & 0x80) == 0x80)        //‘选择’应答
  986.        m_SSendByte[4] = 0x80 | ((m_YKChara & 0x02)>>1);     //传输方向+应答方式
  987.    else    //‘执行’应答                                                 
  988.        m_SSendByte[4] = 0x80 | ((m_YKChara & 0x04)>>2); 
  989.    
  990.    m_SSendByte[5] = m_Addr;
  991.    m_SSendByte[6] = m_SRecByte[6];     //类型标识
  992.    m_SSendByte[7] = 0x01;
  994.    m_SSendByte[8] = 0x07;                    //传送原因:激活确认
  995.    m_SSendByte[9] = m_Addr;                  //如与实际字节数不符，后面仍能覆盖
  996.    
  997.    m_SSendByte[8+m_CauseOfTranLen]   = m_Addr;  //ASDU公共地址             
  998.    m_SSendByte[8+m_CauseOfTranLen+1] = m_Addr;  //如与实际字节数不符，后面仍能覆盖
  1000.    if (m_MsgAddrLen == 2)
  1001.    {    
  1002.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen]   = m_SRecByte[m_SRecByte[1]+1];
  1003.        m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen+1] = m_SRecByte[m_SRecByte[1]+2];
  1004.    }
  1005.    else //信息体地址为3字节
  1006.    {    
  1007.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen]   = m_SRecByte[m_SRecByte[1]];
  1008.        m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen+1] = m_SRecByte[m_SRecByte[1]+1];
  1009.        m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen+2] = m_SRecByte[m_SRecByte[1]+2];
  1010.    }
  1012.    m_SSendByte[3+m_SSendByte[1]] = m_SRecByte[m_SRecByte[1]+3];     //SCO OR DC0
  1014.    m_SSendByte[4+m_SSendByte[1]] = GetAddByte(m_SSendByte,m_SSendByte[1],4);     //和校验
  1015.    m_SSendByte[5+m_SSendByte[1]] = 0x16;
  1016. }
  1018. void CPrtIEC101::SUnPack_TypeID65H()
  1019. {
  1020.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;           //框架窗口指针;
  1021.    CPeugeotView* pView    = (CPeugeotView*) pMainFrame->GetActiveView();    //视图指针
  1022.    ASSERT_VALID(pView);
  1024.    DWORD dwBytesSended = 0;
  1025.    CString s1 = "";
  1026.    CString s2 = "";
  1028.    if ((m_SRecByte[m_SRecByte[1]+3] & 0x07) < 0x04)   //计数量召唤命令限定词(QCC)->RQT  仅取低3位
  1029.    s1.Format("计数量召唤：第%d组",m_SRecByte[m_SRecByte[1]+3] & 0x07);
  1030.    else if((m_SRecByte[m_SRecByte[1]+3] & 0x07) == 0x05)
  1031.        s1 = "计数量召唤：总请求";
  1032.    else
  1033.    s1 = "计数量召唤：未知命令(保留)";
  1035.    switch (m_SRecByte[m_SRecByte[1]+3] & 0xc0)        //计数量召唤命令限定词(QCC)->FRZ bit7~8
  1036.    {
  1037.    case 0x00:
  1038.    s2 =  "(读命令)";
  1039.    break;
  1040.    
  1041.    case 0x40:
  1042.    s2 =  "(冻结不带复位)";
  1043.    break;
  1045.    case 0x80:
  1046.    s2 =  "(冻结带复位)";
  1047.    break;
  1049.    case 0xc0:
  1050.    s2 =  "(复位命令)";
  1051.    break;
  1053.    default:
  1054.    s2 =  "(读命令)";
  1055.    break;
  1056.    }
  1058.    s1 = "<Rec>: 101主站--" + s1 + s2 + "rn" + ByteArrayToString(m_SRecByte,6+m_SRecByte[1]) + "rn";
  1059.    pView->DisplayMsg(s1);
  1061.    if (m_SRecByte[m_SRecByte[1]+3] & 0xc0 == 0x00)
  1062.    {
  1063.    SPack_IT_NA();
  1064.    s2 = "脉冲数据";
  1065.    }
  1066.    else
  1067.    {
  1068.        SPack_C_CI_ACK();
  1069.    s2 = s2 + "确认应答";
  1070.    }
  1072.    s1 = "<Send>: 101子站--" + s2 + "rn" + ByteArrayToString(m_SSendByte,6+m_SSendByte[1]) + "rn";
  1073.    if (pView->Send(m_SSendByte,6+m_SSendByte[1],dwBytesSended))     //发送应答报文并显示
  1074.        pView->DisplayMsg(s1);
  1075. }
  1077. //子站发送脉冲电度（不带时标）SQ = 1
  1078. void CPrtIEC101::SPack_IT_NA()
  1079. {
  1080.    CMainFrame* pMainFrame = (CMainFrame*)AfxGetApp()->m_pMainWnd;             //框架窗口指针;
  1081.    CPeugeotDoc* pDoc      = (CPeugeotDoc*) pMainFrame->GetActiveDocument();   //文档指针
  1082.    ASSERT_VALID(pDoc);
  1084.    int nMaxNumToSend;              //1帧最大发送的电度个数
  1085.    int nYMNumToSend;               //
  1086.    BOOL IsFullSended = false;      //脉冲点信息是否全部发送
  1087.    //nMaxNumToSend = (255-2-1-1-m_CauseOfTranLen-m_CommAddrLen) / (m_MsgAddrLen+5);  // SQ = 0
  1088.    nMaxNumToSend = (255-2-1-1-m_CauseOfTranLen-m_CommAddrLen-m_MsgAddrLen) / 5;  // SQ = 1
  1089.    nYMNumToSend  = pDoc->m_YMNum - (m_SYMAddrToSend - pDoc->m_YMAddr);
  1090.    
  1091.    BYTE b1;   //请求发送标志，如果是最后一帧，置0
  1092.    if (nYMNumToSend > nMaxNumToSend)
  1093.    { 
  1094.    nYMNumToSend = nMaxNumToSend;
  1095.    b1 = 0x02;
  1096.    }
  1097.    else
  1098.    {
  1099.    IsFullSended   = true;              //本帧能全部发送脉冲
  1100.    b1 = 0x00;
  1101.    }
  1103.    m_SSendByte[0] = 0x68;
  1104.    m_SSendByte[1] = nYMNumToSend*5+2+1+1+m_CauseOfTranLen+m_CommAddrLen+m_MsgAddrLen;  // 按SQ =1
  1105.    m_SSendByte[2] = m_SSendByte[1];
  1106.    m_SSendByte[3] = 0x68;
  1107.    m_SSendByte[4] = 0x80  + 0x08 + b1;   //功能码
  1108.    m_SSendByte[5] = m_Addr;
  1109.    m_SSendByte[6] = 0x0f;                  //类型标识 15 
  1110.    m_SSendByte[7] = 0x80 + nYMNumToSend;   //SQ=1
  1112.    if ((m_SRecByte[m_SRecByte[1]+3] & 0x07) < 0x04)   //计数量召唤命令限定词(QCC)->RQT  仅取低3位
  1113.    m_SSendByte[8] = 37 + (m_SRecByte[m_SRecByte[1]+3] & 0x07);   //传送原因：响应第i组召唤
  1114.    else 
  1115.        m_SSendByte[8] = 37;         //传送原因：响应计量总召唤
  1117.    m_SSendByte[9] = m_Addr;                //如与实际字节数不符，后面仍能覆盖
  1119.    m_SSendByte[8+m_CauseOfTranLen]   = m_Addr;   //公共地址
  1120.    m_SSendByte[8+m_CauseOfTranLen+1] = m_Addr;   //如与实际字节数不符，后面仍能覆盖
  1122.    WORD temVar = 0x0000;
  1123.    temVar = (WORD)m_SYCAddrToSend;      //信息体地址
  1125.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen]   = LOBYTE(temVar);
  1126.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen+1] = HIBYTE(temVar);    //如与实际字节数不符，后面仍能覆盖
  1127.    m_SSendByte[8+m_CauseOfTranLen+m_CommAddrLen+2] = 0x00;
  1128.    
  1129.    int i,j;
  1130.    j = 8+m_CauseOfTranLen+m_CommAddrLen+m_MsgAddrLen;    
  1132.    for (i=0; i<nYMNumToSend; i++)
  1133.    {
  1134.        temVar = LOWORD(pDoc->m_pYMData[m_SYMAddrToSend-pDoc->m_YMAddr+i]);  //低2字节
  1135.    m_SSendByte[j+i*5]   = LOBYTE(temVar);
  1136.    m_SSendByte[j+i*5+1] = HIBYTE(temVar);
  1137.        temVar = HIWORD(pDoc->m_pYMData[m_SYMAddrToSend-pDoc->m_YMAddr+i]);  //高2字节
  1138.        m_SSendByte[j+i*5+2] = LOBYTE(temVar);
  1139.    m_SSendByte[j+i*5+3] = HIBYTE(temVar);
  1141.        m_SSendByte[j+i*5+4] = i;
  1142.    }
  1144.    m_SSendByte[4+m_SSendByte[1]] = GetAddByte(m_SSendByte,m_SSendByte[1],4);
  1145.    m_SSendByte[5+m_SSendByte[1]] = 0x16;
  1146.    /////////////////////////////////////////////////////////
  1147.    if (IsFullSended)
  1148.        m_SYMAddrToSend = pDoc->m_YMAddr;
  1149.    else
  1150.    m_SYMAddrToSend = m_SYMAddrToSend + nYMNumToSend;
  1151. }
  1153. //应答主站召记数量（确认应答）
  1154. void CPrtIEC101::SPack_C_CI_ACK()
  1155. {
  1156.    for (int i=0; i<m_SRecByte[1]+6; i++)
  1157.    m_SSendByte[i] = m_SRecByte[i];
  1158.        
  1159.    m_SSendByte[4] = 0x80 + 0x20;   //传输方向+ACD标志
  1160.    m_SSendByte[8] = 0x07;          //传送原因
  1161.    
  1162.    m_SSendByte[4+m_SSendByte[1]] = GetAddByte(m_SSendByte,m_SSendByte[1],4);     //和校验
  1163. }