宿州西门子PLC代理商

变频器的工作原理?它由三部分构成，将工频电源变换为直流功率的“整流器"，吸收在变流器和逆变器产生的电压脉动的“平波回路"，以及将直流功率变换为交流功率的“逆变器"。主电路是给异步电动机提供调压调频电源的电力变换部分，变频器的主电路大体上可分为两类：电压型是将电压源的直流变换为交流的变频器，直流回路的滤波是电容。
　　电流型是将电流源的直流变换为交流的变频器，其直流回路滤波是电感。变频器是应用变频技术与微电子技术，通过改变电机工作电源频率方式来控制交流电动机的电力控制设备。变频器主要由整流、滤波、逆变、制动单元、驱动单元、检测单元微处理单元等组成。SIMATIC S7-300 通过 CP 342 和 CP 343 通信处理器可以连接到 PROFIBUS 和工业以太网总线系统。

(1) 上电后面板显现[F231]或[F002](MM3变频器)，这种毛病一般有两种可能。常见的是由于电源驱动板有问题，也有少部分是由于主控板形成的，能够先换一块主控板试一试，不然问题肯定在电源驱动板部分了。(2) 上电后面板无显现(MM4变频器)，面板下的指示灯[绿灯不亮，黄灯快闪]，这种现象阐明整流和开关电源作业根本正常，问题出在开关电源的某一路不正常(整流二极管击穿或开路，能够用万用表丈量开关电源的几路整流二极管，很简略发现问题。换一个相应的整流二极管问题就处理了。这种问题一般是二极管的耐压偏低，电源脉动冲击形成的。

(3) 有时显现[F0022,F0001,A0501]不定(MM4)，敲击机壳或动一动面板和主板时而能正常，一般归于接插件的问题，查看一下各部位接插件。也发现有单个机器是由于线路板上的阻容元件质量问题或焊接不良所形成的。

(4) 上电后显现[-----](MM4)，一般是主控板问题。大都情况下换一块主控板问题就处理了，一般是由于外围操控线路有强电搅扰形成主控板某些元件(如帖片电容、电阻等)损坏所至，我剖析与主控板散热欠好也有必定的。但也有单个问题出在电源板上。

(5) 上电后显现正常，一工作即显现过流。[F0001](MM4)[F002](MM3)即使空载也一样，一般这种现象阐明IGBT模块损坏或驱动板有问题，需替换IGBT模块并仔细查看驱动部分后才干再次上电，不然可能由于驱动板的问题形成IGBT模块再次损坏！这种问题的呈现，一般是由于变频器屡次过载或电源电压动摇较大(特别是偏低)使得变频器脉动电流过大主控板CPU来不及反映并采纳保护办法所形成的。 还有一些特别毛病(不常见但有一些普遍意义，能够触类旁通，希望到达抛砖引玉的作用)，

例如:

(6) 有一台变频器(MM3-30KW)，在运用的过程中常常“无故"停机。再次开机可能又是正常的，机器拿到我这儿来今后，开始我也没有发现问题所在。经过较长时间的调查，发现上电后主接触器吸合不正常--有时会掉电，乱跳。查毛病原因，成果发现是由于开关电源出来到接触器线包的一路电源的滤波电容漏电形成电压偏低，这时如果供电电源电压偏高还问题不大，如果供电电压偏低就会致使接触器吸合不正常形成无故停机。

(7) 还有一台变频器(MM4-22KW)，上电显现正常，一给工作信号就呈现[P----]或[-----]，经过仔细调查，发现电扇的转速有些不正常，把电扇拔掉又会显现[F0030]，在修理的过程中有时报警较乱，还呈现过[F0021F0001A0501]等。在我先给了工作信号然后再把电扇接上去就不呈现[P----]，但是，接上一个电扇时，电扇的转速是正常的，输出三相也正常，第二个电扇再接上时电扇的转速显着不正常。于是我剖析问题在电源板上。成果是开关电源出来的一路供电滤波电容漏电形成的，换上一个相同的电容问题就处理了。

目的：通过MSComm控件实现WINCC串口通讯（C脚本和VB脚本两种方式）
测试环境：操作系统  win7
          WINCC版本：V7.2
辅助工具：串口调试工具
               ASPD虚拟串口工具
测试WINCC组态画面：

测试实验过程画面：

1、通过VB实现串口通讯
画面对象“打开画面”VB事件脚本：
Sub onOpen()                                      
Dim objMSComm, tagConnection
Set objMSComm = hmiRuntime.Screens("串口通讯VB版").ScreenItems("COM")
    Set tagConnection = HMIRuntime.Tags("tagConnection1")
If objMSComm.PortOpen = False Then  
' Assign com port number
objMSComm.Commport = 4
' Values: 9600 Baud, N - No Parity, 8 - Databit, 1 - Stopbit
objMSComm.Settings = "9600,N,8,1"
objMSComm.RThreshold = 1
objMSComm.SThreshold = 0
objMSComm.InBufferCount = 0
objMSComm.InputLen = 0
objMSComm.PortOpen = True
tagConnection.Write (True)
HMIRuntime.Trace("Port open." & vbCrLf)
Else
HMIRuntime.Trace("Port is already opened." & vbCrLf)
End If
End Sub
MSComm控件OnComm对象事件：
Sub onOpen()                                      
Dim objMSComm, tagConnection
Set objMSComm = HMIRuntime.Screens("串口通讯VB版").ScreenItems("COM")
    Set tagConnection = HMIRuntime.Tags("tagConnection1")
If objMSComm.PortOpen = False Then
' Assign com port number
objMSComm.Commport = 4
' Values: 9600 Baud, N - No Parity, 8 - Databit, 1 - Stopbit
objMSComm.Settings = "9600,N,8,1"
objMSComm.RThreshold = 1
objMSComm.SThreshold = 0
objMSComm.InBufferCount = 0
objMSComm.InputLen = 0
objMSComm.PortOpen = True
tagConnection.Write (True)
HMIRuntime.Trace("Port open." & vbCrLf)
Else
HMIRuntime.Trace("Port is already opened." & vbCrLf)
End If
End Sub
“SEND按钮”鼠标左键按下事件：
Sub onLButtonDown(ByVal Item, ByVal Flags, ByVal x, ByVal y)           
Dim objMSComm
Dim strTemp,buffer
HMIRuntime.Trace("Communication!" & vbCrLf)
Set objMsComm = HMIRuntime.Screens("串口通讯VB版").ScreenItems("COM")
Set buffer = HMIRuntime.Tags("Buffer1")
strTemp = buffer.Read
If objMSComm.PortOpen = True Then
If strTemp<>"" then
objMSComm.Output=strTemp
End If
End If
End Sub
2、通过C脚本实现串口通讯
画面对象“打开画面”C事件脚本：
#include "apdefap.h"
void onOpenPicture(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)
{
#define GetObject GetObject
__object *pdl=NULL;
__object *pic=NULL;
__object *obj=NULL;
 int i,j;
pdl = __object_create("PDLRuntime");
if(pdl)
{
    printf("portopen get pdl ok ");
}
pic=pdl->GetPicture("串口通讯C版"); 
if(pic)
{
    printf("portopen get pic ok ");
}
obj=pic->GetObject("COM");
if(obj)
{
    printf("portopen get obj ok ");
}
if(obj->PortOpen==0)
{
    obj->Commport = 3;
    obj->Settings = "9600,N,8,1";
    obj->RThreshold = 1;
    obj->SThreshold = 0;
    obj->InBufferCount = 0;
    obj->InputLen = 0;
    obj->PortOpen = 1;
}


__object_delete(obj);
__object_delete(pic);
__object_delete(pdl);
}
MSComm控件OnComm对象事件：
#include "apdefap.h"
void onComm(char* lpszPictureName, char* lpszObjectName )
{
#define GetObject GetObject
__object *pdl=NULL;
__object *pic=NULL;
__object *obj=NULL;
char  *data="";
pdl = __object_create("PDLRuntime");
if(pdl)
{
    printf("portopen get pdl ok ");
}
pic=pdl->GetPicture("串口通讯C版"); 
if(pic)
{
    printf("portopen get pic ok ");
}
obj=pic->GetObject("COM");
if(obj)
{
    printf("portopen get obj ok ");
}
SetTagChar("BufferTemp",obj->Input);
printf("BufferTemp:%s ",GetTagChar("BufferTemp"));


if(strcmp(GetTagChar("BufferTemp"),""))
{
    SetTagChar("Buffer1",GetTagChar("BufferTemp"));
}
__object_delete(obj);
__object_delete(pic);
__object_delete(pdl);
}
“SEND按钮”鼠标左键按下事件：
#include "apdefap.h"
void onLButtonDown(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName, UINT nFlags, int x, int y)
{
#define GetObject GetObject
__object *pdl=NULL;
__object *pic=NULL;
__object *obj=NULL;
char  *data="";
pdl = __object_create("PDLRuntime");
if(pdl)
{
    printf("portopen get pdl ok ");
}
pic=pdl->GetPicture("串口通讯C版"); 
if(pic)
{
    printf("portopen get pic ok ");
}
obj=pic->GetObject("COM");
if(obj)
{
    printf("portopen get obj ok ");
}
if(strcmp(GetTagChar("Buffer1"),""))
{
    obj->Output=GetTagChar("Buffer1");
}
__object_delete(obj);
__object_delete(pic);
__object_delete(pdl);
}

MSComm控件.rar