黑子船长的机器人
认证:普通会员
作者动态
KUKA机器人与西门子S7-1200 PLC同时进行Profinet和Ethernet IP通讯(第一篇)
03-13 11:48
西门子PLC 与 KUKA 机器人通过西门子偶合器进行Profinet通讯配置
03-12 15:56
FANUC机器人与西门子S7-1200 Ethernet/IP通讯
03-11 13:52
KUKA机器人之俄罗斯方块——工作游戏两不误
03-01 14:13
KUKA机器人和COGNEX In-Sight IS8XXX系列相机Profinet的通讯
02-29 10:35

KUKA新版本的smartPAD 左侧上的 4 个状态键编程

前些天一个公众号的朋友留言...................

新版本的UserTech的可编程按键,不得不说KUKA是真的有点烦呀,确实与之前的版本不太一样,之前也有三篇文章介绍说明过:KUKA 机器人UserTech 联机表格--自定义指令KUKA机器人自定义4个工艺按键、KUKA机器人自定义按键输出信号置位复位(按键状态切换),大家可以参考看看。相比较大体上逻辑出入不太大,但是还是花了点时间,试了一下KUKA机器人自定义按键输出信号置位复位(按键状态切换)这个新版本的功能。直接修改自带的TestStat.kfdx文件,代码如下,修改完成后,以重新读入文件的方式重启。

<?xml version="1.0" encoding="utf-8"?>
<!--For an example how to add menu entries for UserTech StatkeyBars see file C:\KRC\TP\UserTech\SmartHMI\SmartHMI.exe.UserTech.KeyBar.config-->
<KukaTechDescription xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
  <Application Name="StatkeyTest" SOT="TRUE" SOC="TRUE">
    <Param Name="BildNr" ShortName="" ShortCut="" Unit="" Var="" Enable="">
      <Value Type="Number" Default="1" Min="0" Max="2" Step="" Autolimit="" />
    </Param>
    <Param Name="StatKeyNr" ShortName="" ShortCut="" Unit="" Var="" Enable="">
      <Value Type="Number" Default="1" Min="0" Max="3" Step="" Autolimit="" />
    </Param>
    <StatKey Name="Stat1" Enable="" UserMode="" Style="" Next="">
      <Picture Default="C:\KRC\TP\UserTech\Template\Bild11.ICO" KeyDown="" KeyDownMinus="" />
      <Text Top="" Center="" Bottom="" />
      <Needs SafetySwitch="" DrivesOk="" Prostate0="" Prostate="" ModeOp="" />
      <Scripts OnKeyDown="ST1" OnKeyUp="" OnKeyShow="" OnKeyDownMinus="" OnKeyUpMinus="" OnKeyRepeat="" OnKeyRepeatMinus="" />
    </StatKey>
    <StatKey Name="Stat2" Enable="" UserMode="" Style="" Next="">
      <Picture Default="C:\KRC\TP\UserTech\Template\Bild21.ICO" KeyDown="" KeyDownMinus="" />
      <Text Top="" Center="" Bottom="" />
      <Needs SafetySwitch="" DrivesOk="" Prostate0="" Prostate="" ModeOp="" />
      <Scripts OnKeyDown="ST2" OnKeyUp="" OnKeyShow="" OnKeyDownMinus="" OnKeyUpMinus="" OnKeyRepeat="" OnKeyRepeatMinus="" />
    </StatKey>
    <StatKey Name="Stat3" Enable="" UserMode="" Style="" Next="">
      <Picture Default="C:\KRC\TP\UserTech\Template\Bild31.ICO" KeyDown="" KeyDownMinus="" />
      <Text Top="" Center="" Bottom="" />
      <Needs SafetySwitch="" DrivesOk="" Prostate0="" Prostate="" ModeOp="" />
      <Scripts OnKeyDown="ST3" OnKeyUp="" OnKeyShow="" OnKeyDownMinus="" OnKeyUpMinus="" OnKeyRepeat="" OnKeyRepeatMinus="" />
    </StatKey>
    <StatKey Name="Stat4" Enable="" UserMode="" Style="" Next="">
      <Picture Default="C:\KRC\TP\UserTech\Template\Bild41.ICO" KeyDown="" KeyDownMinus="" />
      <Text Top="" Center="" Bottom="" />
      <Needs SafetySwitch="" DrivesOk="" Prostate0="" Prostate="" ModeOp="" />
      <Scripts OnKeyDown="CHGStatkey" OnKeyUp="" OnKeyShow="" OnKeyDownMinus="" OnKeyUpMinus="" OnKeyRepeat="" OnKeyRepeatMinus="" />
    </StatKey>
    
    <Script Name="StatKeyTrue">
      <Message Text="$OUT %StatkeyNr = ON" />
</Script>
    
    <Script Name="StatKeyFlase">
      <Message Text="$OUT %StatkeyNr = OFF" />
</Script>
    
    <Script Name="StatKeyBool">
      <Switch Dialog="FALSE" Condition="%BildNr">
        <Case Value="1" Do="StatKeyTrue" />
        <Case Value="2" Do="StatKeyFlase" />
      </Switch>      
</Script>
    
    <Script Name="OUT1TRUE">
      <SetVar Fullpath="$OUT[1]" Value="True" />
</Script>
    <Script Name="OUT1FALSE">
      <SetVar Fullpath="$OUT[1]" Value="FALSE" />
</Script>

    <Script Name="OUT2TRUE">
      <SetVar Fullpath="$OUT[2]" Value="True" />
</Script>
    <Script Name="OUT2FALSE">
      <SetVar Fullpath="$OUT[2]" Value="FALSE" />
</Script>   
    
    <Script Name="OUT3TRUE">
      <SetVar Fullpath="$OUT[3]" Value="True" />
</Script>
    <Script Name="OUT3FALSE">
      <SetVar Fullpath="$OUT[3]" Value="FALSE" />
</Script>
    
    
    <Script Name="ST1">   
      <ShowVar Fullpath="1" Param="StatKeyNr" />
      <Switch Dialog="FALSE" Condition="%BildNr">
        <Case Value="1" Do="OUT1TRUE" />
        <Case Value="2" Do="OUT1FALSE" />
      </Switch>  
      <Do Script="StatKeyBool" />
</Script>
    
    <Script Name="ST2">
      <ShowVar Fullpath="2" Param="StatKeyNr" />
      <Switch Dialog="FALSE" Condition="%BildNr">
        <Case Value="1" Do="OUT2TRUE" />
        <Case Value="2" Do="OUT2FALSE" />
      </Switch>  
      <Do Script="StatKeyBool" />
</Script>
    
    <Script Name="ST3">
      <ShowVar Fullpath="3" Param="StatKeyNr" />
      <Switch Dialog="FALSE" Condition="%BildNr">
        <Case Value="1" Do="OUT3TRUE" />
        <Case Value="2" Do="OUT3FALSE" />
      </Switch>  
      <Do Script="StatKeyBool" />
</Script>
    
    <Script Name="SKB1">
      <ShowVar Fullpath="1" Param="BildNr" />
      <Set Name="Stat1" Enable="" UserMode="" Style="" Next="">
        <Picture Default="C:\KRC\TP\UserTech\Template\Bild11.ICO" KeyDown="" KeyDownMinus="" />
        <Text Top="" Center="ON" Bottom="" />
        <Needs SafetySwitch="" DrivesOk="" Prostate0="" Prostate="" ModeOp="" />
        <Scripts OnKeyDown="" OnKeyUp="" OnKeyShow="" OnKeyDownMinus="" OnKeyUpMinus="" OnKeyRepeat="" OnKeyRepeatMinus="" />
      </Set>
      <Set Name="Stat2" Enable="" UserMode="" Style="" Next="">
        <Picture Default="C:\KRC\TP\UserTech\Template\Bild21.ICO" KeyDown="" KeyDownMinus="" />
        <Text Top="" Center="ON" Bottom="" />
        <Needs SafetySwitch="" DrivesOk="" Prostate0="" Prostate="" ModeOp="" />
        <Scripts OnKeyDown="" OnKeyUp="" OnKeyShow="" OnKeyDownMinus="" OnKeyUpMinus="" OnKeyRepeat="" OnKeyRepeatMinus="" />
      </Set>
      <Set Name="Stat3" Enable="" UserMode="" Style="" Next="">
        <Picture Default="C:\KRC\TP\UserTech\Template\Bild31.ICO" KeyDown="" KeyDownMinus="" />
        <Text Top="" Center="ON" Bottom="" />
        <Needs SafetySwitch="" DrivesOk="" Prostate0="" Prostate="" ModeOp="" />
        <Scripts OnKeyDown="" OnKeyUp="" OnKeyShow="" OnKeyDownMinus="" OnKeyUpMinus="" OnKeyRepeat="" OnKeyRepeatMinus="" />
      </Set>
</Script>
    
    <Script Name="SKB2">
      <ShowVar Fullpath="2" Param="BildNr" />
      <Set Name="Stat1" Enable="" UserMode="" Style="" Next="">
        <Picture Default="C:\KRC\TP\UserTech\Template\Bild12.ICO" KeyDown="" KeyDownMinus="" />
        <Text Top="" Center="OFF" Bottom="" />
        <Needs SafetySwitch="" DrivesOk="" Prostate0="" Prostate="" ModeOp="" />
        <Scripts OnKeyDown="" OnKeyUp="" OnKeyShow="" OnKeyDownMinus="" OnKeyUpMinus="" OnKeyRepeat="" OnKeyRepeatMinus="" />
      </Set>
      <Set Name="Stat2" Enable="" UserMode="" Style="" Next="">
        <Picture Default="C:\KRC\TP\UserTech\Template\Bild22.ICO" KeyDown="" KeyDownMinus="" />
        <Text Top="" Center="OFF" Bottom="" />
        <Needs SafetySwitch="" DrivesOk="" Prostate0="" Prostate="" ModeOp="" />
        <Scripts OnKeyDown="" OnKeyUp="" OnKeyShow="" OnKeyDownMinus="" OnKeyUpMinus="" OnKeyRepeat="" OnKeyRepeatMinus="" />
      </Set>
声明:本内容为作者独立观点,不代表电子星球立场。未经允许不得转载。授权事宜与稿件投诉,请联系:editor@netbroad.com
觉得内容不错的朋友,别忘了一键三连哦!
赞 1
收藏 2
关注 13
成为作者 赚取收益
全部留言
0/200
成为第一个和作者交流的人吧