上海署晓自动化科技有限公司
专销售西门子各系列产品；西门子PLC；S7-200S7-300 S7-400 S7-1200触摸屏，变频器，6FC，6SNS120 V10 V60 V80伺服数控备件：原装进口电机，电线，电缆。
西门子全新原装现货PLC；S7-200S7-300 S7-400 S7-1200 触摸屏，变频器，6FC，6SNS120 V10V60V80伺服数控备件：原装进口电机（1LA7、1LG4、1LA9、1LE1），国产电机（1LG0，1LE0）大型电机（1LA8，1LA4，1PQ8）伺服电机（1PH，1PM，1FT，1FK，1FS）西门子保内全新原装产品‘质保一年。一年内因产品质量问题免费更换新产品；不收取任何费。
实体公司，诚信经营，价格优势，品质保证，库存量大，现货供应！！
采购西门子产品就选；上海署晓自动化科技有限公司
我们承诺七天内无理由退换！
西门子代理商，西门子一级代理商，上海西门子代理商，中国西门子总代理，西门子PLC代理商，西门子变频器代理商，西门子触摸屏代理商
西门子PLC模块6ES7214-1BD23-0XB8工厂直销
三相逆变桥U, V, W分别接电机的三相绕组的引出端；
三相逆变桥的工作原理这里简单介绍一下，逆变桥的上端接的是直流电压的正端，下端接的是直流电压的负端，这里该直流电压为VDC。三相桥由三个桥臂组成，如上图中U1,U2控制的IGBT组成一个桥臂；V1,V2控制的IGBT组成第二个桥臂；W1,VW2控制的IGBT组成第三个桥臂；当U1是高电平，且U2是低电平时，上臂的IGBT开通，下臂的IGBT关断，这样的话电机的U相对逆变桥的负端电压就约为该逆变桥的直流电压值，即为VDC。当U1是低电平，且U2是电电平时，上臂的IGBT关断，下臂的IGBT开通，这样的话电机的U相对逆变桥的负端电压就约为0V。其它两相的功能相同。
三相逆变桥工作时，如果用示波器去测量U与直流电源的负端之间的电压时，看到的电压波形是占空比一直在变化的PWM波形，该PWM波的高电平电压值约为VDC，如下图中的Up1-，Up2-，Up2-，该PWM波的就是题主所说的载波，其频率就是载波频率。
由于载波的占空比是一直在变化的，在一个周期中其平均电压或者说是等效电压也是变化的。占空比越小，等效电压也越小，占空比越大，其等效电压也越大。这个等效电压就是下图中的Up1-G，Up2-G，Up3-G，这个波形就是基波，该基波的频率就是基波频率。如果用示波器测试该电压波形，只要将探头的带宽改小到一个合适的值就能到到该基波波形
1 项目简介
原升降平台可将一层的货物送到二层，但一层和二层的防护门都要靠人员手工关闭，防护门是否完全关闭，不会影响升降机的运行。如果操作人员疏忽，忘记关闭防护门，或防护门没有关紧，这样就留下了安全上的隐患，整个公司有这样的升降机十多台，并且，该升降机为其生产中的设备。因为这点，该公司无法通过其美国客户的安全认证，之前也有他人为该升降机做出过解决方案，但经实际测试无法满足安全性、**性的要求。无奈之下，客户找到我方，希望我方能为其解决该问题。
2 工艺流程介绍
详细考察该升降平台现场，升降平台采用硬线路控制，而要实现较为复杂的安全联锁，较好采用可编程控制器。其容易编程，接线简单。我们提出了如下解决方案：当升降平台位于下层时，下层的门可以打开，而此时，上层门处于被锁定状态，操作人员不能开启此门。当操作启动升降平台上升时，下层门自动锁紧。升降平台上升到位后，上层门自动开锁。当操作启动升降平台下降时，上层门自动锁紧。
升降平台下降到位后，下层门自动开锁。所有电子，电气元件需要跟外界环境隔离（车间空气含有酸气），执行元件不能直接装在地面。平台到达上或下层时门关启灵活，如果在运行过程中，上层门或下层门中任一个开启，则升降机停止运行。
图一、升降机上升过程流程图
升降机下降过程与之类似，不在此处赘述。
3 方案确定及产品硬件配置
经过反复权衡比较，较终选用西门子LOGO!控制器作为该系统的可编程控制器，其体积小，性能稳定，价格便宜，编程方便。在该系统中，LOGO!控制器点数也正好够用，较大限度上避免了投资的浪费。通过输出点串、并连升降机的停止、启动按钮，达到控制升降机的目的。并将上、下限位开关、门限位开关信号接入LOGO!输入点。
门控锁定采用直线电机来控制，LOGO！控制器通过控制直线的正反转，使得电机中轴的伸出和缩回。该轴相当于门的“锁销”。轴伸出，则锁紧“锁销”，操作人员是无法打开门的，当升降机到位后，“锁销”缩回，则门可自由打开。
在升降机升到位后，“锁销”自动缩回，并且自动生成一个延时信号，通过控制急停（急停采用串接原升降机停止常闭线路控制），达到断开停止升降机继续上升的目的。由于上升限位的开关安装位置不一定合适，其升降机需要停止的位置可能比上限位位置要高。在调试过程中，通过调整T1 的延时时间值可以达到调整升降机的停止位置，方便工人推车上下。
5 应用体会
经过长达一年的使用，该系统赢得了客户的赞誉，并成功通过了其美国客户的安全认证。有力的**
操作人员的生产安全。并且在使用器件，西门子 LOGO!控制器表现稳定，其车间现场具有湿度大，酸性强
等特点，但迄今为止，LOGO!控制器在这十几个车间中无一出现故障，体现了西门子产品一贯的**
Do '循环等待接收数据
DoEvents
If MSComm1.InBufferCount > 0 Then '串口有数据了
ReDataLen = MSComm1.InBufferCount '取数据长度
av = MSComm1.bbbbb '将串口数据取出来
For i = 0 To ReDataLen - 1
FGetData = FGetData & Right("00" & Hex(av(i)), 2)
Next i
End If
If Len(FGetData) >= 6 Then
If Len(FGetData) > Val("&H" & Mid(FGetData, 5, 2)) * 2 + 8Then
ReceiveData = FGetData
Exit Function
End If
End If
If GetTickCount - t1 > 2000 Then '2秒没收完就不收了
ReceiveData = ""
Exit Function
End If
Loop
End Function
Private Function IReceiveData() As bbbbbb '反回I状态
Dim FGetData As bbbbbb
Dim t1 As Long
Dim av As Variant
Dim i As Integer
Dim ReDataLen As Integer
FGetData = ""
t1 = GetTickCount() '取时间，做延时用
Do '循环等待接收数据
DoEvents
If MSComm1.InBufferCount > 0 Then '串口有数据了
ReDataLen = MSComm1.InBufferCount '取数据长度
av = MSComm1.bbbbb '将串口数据取出来
For i = 0 To ReDataLen - 1
FGetData = FGetData & Right("00" & Hex(av(i)), 2)
Next i
End If
If Len(FGetData) >= 6 Then
If Len(FGetData) > Val("&H" & Mid(FGetData, 5, 2)) * 2 + 8Then
IReceiveData = FGetData
Exit Function
End If
End If
If GetTickCount - t1 > 2000 Then '2秒没收完就不收了
IReceiveData = ""
Exit Function
End If
Loop
End Function
Private Function QReceiveData() As bbbbbb '反回Q状态
Dim FGetData As bbbbbb
Dim t1 As Long
Dim av As Variant
Dim i As Integer
Dim ReDataLen As Integer
FGetData = ""
t1 = GetTickCount() '取时间，做延时用
Do '循环等待接收数据
DoEvents
If MSComm1.InBufferCount > 0 Then '串口有数据了
ReDataLen = MSComm1.InBufferCount '取数据长度
av = MSComm1.bbbbb '将串口数据取出来
For i = 0 To ReDataLen - 1
FGetData = FGetData & Right("00" & Hex(av(i)), 2)
Next i
End If
If Len(FGetData) >= 6 Then
If Len(FGetData) > Val("&H" & Mid(FGetData, 5, 2)) * 2 + 8Then
QReceiveData = FGetData
Exit Function
End If
End If
If GetTickCount - t1 > 2000 Then '2秒没收完就不收了
QReceiveData = ""
Exit Function
End If
Loop
End Function
Private Sub Timer2_Timer()
x1 = x1 + 1
Text10.Text = str(x1)
Text1.Text = str(p11)
Text2.Text = str(p12)
Text3.Text = str(p13)
Text4.Text = str(p14)
Text7.Text = str(p15)
If Text7.Text = 1 Then Text7.BackColor = RGB(255, 0, 255)
If Text7.Text = 0 Then Text7.BackColor = RGB(0, 255, 255)
'Text6.Text = str(p16)
Text9.Text = str(p17)
If Text9.Text = 1 Then Text9.BackColor = RGB(255, 0, 255)
If Text9.Text = 0 Then Text9.BackColor = RGB(0, 255, 255)
'Text8.Text = str(p18)
