西门子Prodave5.5使用说明及VC示例

西门子PLC的通信协议主要是PPI、MPI、Profibus、CP243/CP343/CP443 网络协议,prodave是早期完成的程序接口,除了网络协议外其它的主要协议都支持,SoftNet是西门子最新推出的通信协议接口,稳定,并且大而全,目前西门子所有主流的协议都支持(我的blog文章:西门子Softnet驱动的成功开发已经做了简单介绍),由于好多朋友对prodave都比较关注,所以我这里专门写篇blog来简单介绍一下。

我所知道的最新的Prodave的版本是V5.5,完整版的要45兆左右,由于出的比较早,所以动态库“W95_s7.dll”的名称保留至今,我最早接触是在01~02年,不过当时版本好像不到V5.5,与S7-200通信很不稳定,并且访问周期比较长。给我的感觉Prodave好像专门为S7-300制作的(从库函数的声明可以看出),连S7-300相对而言比较顺利。

组态王、力控好多主流工控软件访问西门子PLC都是通过Prodave或Softnet的,可以在驱动程序中看到熟悉的W95_s7.dll,所以通信能力大家还是应该放心的。

题外话,对嵌入式系统,如WinCE,由于不能直接使用Prodave和Softnet,所以要实现与西门子PLC通信,一般只有破解了(西门子的通信协议都是保密的,并且也是加密的,一般不公开给客户),目前实现的较好的主要有PPI,MPI(需要MPI适配器,不同适配器通信协议有一定区别),CP243,CP343/CP443。

下面是我在开发相关西门子通信程序时,做的一个VC测试程序,仅供参考(Prodave简版驱动和相关测试代码,我已经上传,文章后面附下载连接)。

void CTestDlg::OnProdave()
{
int iRes;
CStringmyStr;
signed
char Buffer[ 2048 ];

WORD
* Buffer_int = (WORD * )Buffer;
unsigned
char * Buffer_byte = (unsigned char * )Buffer; // WORDwValue;

// m_field_readMB200
iRes = m_field_read( 200 , 1 ,Buffer);

if (iRes == 0 )
{
m_Dis.SetSel(
100000 , 100000 );
m_Dis.ReplaceSel(
" " );

myStr.Format(
" MB200=%3d " ,Buffer_byte[ 0 ]);
m_Dis.ReplaceSel(myStr);

UpdateData(
false );
}
else
{
// myStr.Format("m_field_readerrorno:%d",iRes);
AfxMessageBox(ErrString(iRes));
}

// m_field_read
iRes = m_field_read( 100 , 1 ,Buffer);

if (iRes == 0 )
{
m_Dis.SetSel(
100000 , 100000 );
m_Dis.ReplaceSel(
" " );
myStr.Format(
" MB100=%3d " ,Buffer_byte[ 0 ]);

m_Dis.ReplaceSel(myStr);

UpdateData(
false );
}
else
{
AfxMessageBox(ErrString(iRes));
}

// m_field_read
iRes = a_field_read( 0 , 1 ,Buffer);

if (iRes == 0 )
{
m_Dis.SetSel(
100000 , 100000 );
m_Dis.ReplaceSel(
" " );
myStr.Format(
" QB0=%3d " ,Buffer_byte[ 0 ]);

m_Dis.ReplaceSel(myStr);

UpdateData(
false );
}
else
{
AfxMessageBox(ErrString(iRes));
}

// 写数据MB110
unsigned long value;
value
= 100 ;
memcpy(Buffer,
& value, 4 );

iRes
= m_field_write( 111 , 1 ,Buffer);
if (iRes == 0 )
{
m_Dis.SetSel(
100000 , 100000 );
m_Dis.ReplaceSel(
" " );
myStr.Format(
" MB110=%3d " ,Buffer[ 0 ]);
m_Dis.ReplaceSel(myStr);
UpdateData(
false );
}
else
{
AfxMessageBox(ErrString(iRes));
}

// 写数据MB4
BYTEvalue1;
value1
= 33 ;
memcpy(Buffer,
& value, 1 );
iRes
= m_field_write( 4 , 1 ,Buffer);
if (iRes == 0 )
{
m_Dis.SetSel(
100000 , 100000 );
m_Dis.ReplaceSel(
" " );
myStr.Format(
" MD4=%3d " ,Buffer[ 0 ]);
m_Dis.ReplaceSel(myStr);
UpdateData(
false );
}
else
{
AfxMessageBox(ErrString(iRes));
}
}

void CTestDlg::OnLoad()
{
adr_table_typemyTable[
2 ];
myTable[
0 ].adr = 3 ;
myTable[
0 ].segmentid = 0 ;
myTable[
0 ].slotno = 2 ;
myTable[
0 ].rackno = 0 ;
myTable[
1 ].adr = 0 ;
myTable[
1 ].segmentid = 0 ;
myTable[
1 ].slotno = 2 ;
myTable[
1 ].rackno = 0 ;
int iRes;
CStringmyStr;
// 初始化ProDave300
iRes = load_tool( 1 , " S7ONLINE " ,myTable);
if (iRes == 0 )
{
m_Dis.SetSel(
30000 , 30000 );
m_Dis.ReplaceSel(
" " );
m_Dis.ReplaceSel(
" load_toolok! " );
UpdateData(
false );
}
else
{
AfxMessageBox(ErrString(iRes));
unload_tool();
return ;
}
}

void CTestDlg::OnUnloadtool()
{
int iRes;
CStringmyStr;
iRes
= unload_tool();
if (iRes == 0 )
{
m_Dis.SetSel(
30000 , 30000 );
m_Dis.ReplaceSel(
" " );
m_Dis.ReplaceSel(
" unload_toolok! " );
m_Dis.ReplaceSel(
" " );
UpdateData(
false );
}
else
{
AfxMessageBox(ErrString(iRes));
}
}

void CTestDlg::OnStatus()
{
int iRes;
CStringmyStr;
char myInfo[ 512 ];
iRes
= ag_zustand(myInfo);
if (iRes == 0 )
{
m_Dis.SetSel(
30000 , 30000 );
m_Dis.ReplaceSel(
" " );
m_Dis.ReplaceSel(
" ag_zustandok! " );
UpdateData(
false );
if (myInfo[ 0 ] == 0 )
{
m_Dis.ReplaceSel(
" " );
m_Dis.ReplaceSel(
" RUN " );
}
else
{
m_Dis.ReplaceSel(
" " );
m_Dis.ReplaceSel(
" STOP " );
}
UpdateData(
false );
}
else
{
AfxMessageBox(ErrString(iRes));
}
}
LPSTRCTestDlg::ErrString(WORDwErrCode)
{
LPSTRmyStr1;
switch (wErrCode)
{
case 517 :
{
return " PRODAVEnotinitialized. " ;
break ;
}
case 787 :
{
return " Incorrectrate/Interruptvector. " ;
break ;
}
case 789 :
{
return " MPIAddresserror. " ;
break ;
}
case 800 :
case 818 :
{
return " hardwarefault. " ;
break ;
}
case 820 :
{
return " comnotavaliable. " ;
break ;
}
case 898 :
case 900 :
{
return " nodriverordevicefound. " ;
break ;
}
case 16386 :
{
return " Connectionnotestablished. " ;
break ;
}
default :
{
CStringmyStr;
myStr.Format(
" %d " ,wErrCode);
myStr1
= myStr.GetBuffer( 0 );
myStr.ReleaseBuffer();
return myStr1;
}
}
}

void CTestDlg::OnNewss()
{
// 激活连接
int iRes;
iRes
= new_ss( 1 );
if (iRes == 0 )
{
m_Dis.SetSel(
100000 , 100000 );
m_Dis.ReplaceSel(
" " );
m_Dis.ReplaceSel(
" new_ssok! " );
UpdateData(
false );
}
else
{
AfxMessageBox(ErrString(iRes));
unload_tool();
return ;
}
}

void CTestDlg::OnAginfo()
{
// 读PLC信息
int iRes;
char myInfo[ 512 ];
iRes
= ag_info( & myInfo[ 0 ]);
if (iRes == 0 )
{
m_Dis.SetSel(
100000 , 100000 );
m_Dis.ReplaceSel(
" " );
m_Dis.ReplaceSel(
" ag_infook! " );
UpdateData(
false );

m_Dis.ReplaceSel(
" " );
m_Dis.ReplaceSel(
& myInfo[ 4 ]);

UpdateData(
false );
}
else
{
AfxMessageBox(ErrString(iRes));
unload_tool();
return ;
}
}

prodave 测试程序:http://download.csdn.net/source/228758

Prodave简版驱动:http://download.csdn.net/source/228765

你可能感兴趣的:(VC)