TPErase(清屏)


TPErase - 擦除在FlexPendant示教器上印刷的文本

TPErase(FlexPendant Erase)为,用于清除FlexPendant示教器的显示内容。

!示例

TPErase;
TPWrite "Execution started";

!写入Execution started前,清除FlexPendant示教器显示。
!彻底清除FlexPendant示教器显示器中的所有文本。下一次写入文本时,其将进入显示器的最高线。

TPWrite(在示教器操作界面写信息)

TPWrite - 写入FlexPendant示教器

TPWrite(FlexPendant Write)用于在FlexPendant示教器上写入文本。可将特定数据的值同文本一样写入。

格式 TPWrite String [\Num] | [\Bool] | [\Pos] | [\Orient] | [\Dnum]
参数 String 数据类型:string,有待写入的文本字符串(每行40个字符,最多80个字符)
[\Num] 数据类型:num,将在文本字符串后写入其数值的数据
[\Bool] 数据类型:bool,将在文本字符串后写入其逻辑值的数据
[\Pos] 数据类型:pos,将在文本字符串后写入其位置的数据
[\Orient] 数据类型:orient,将在文本字符串后写入其方位的数据
[\Dnum] 数据类型:dnum,将在文本字符串后写入其数值的数据
!例 1

TPWrite "Execution started";

在FlexPendant示教器上写入文本Execution started。

!例 2

TPWrite "No of produced parts="\Num:=reg1;

如果reg1保存值5,则在FlexPendant示教器上写入文本No of produced parts=5。

TPReadNum(互动的数字键盘操作)


TPReadNum - 从FlexPendant示教器读取编号

TPReadNum(FlexPendant Read Numerical)为,用于从FlexPendant示教器读取编号

格式 TPReadNum TPAnswer TPText
参数 TPAnswer 数据类型:num,返回用于通过FlexPendant示教器输入编号的变量
TPText 数据类型:string,有待写入FlexPendant示教器的信息文本(每行40个字符,最多80个字符)
!示例
TPReadNum reg1, "How many units should be produced?";

!将文本How many units should be produced?写入FlexPendant示教器显示器。程序执行进入等待,直至已经从FlexPendant示教器上的数字键盘输入编号。将该编号储存在reg1中。

综合案例


MODULE MainModule
    
    Var num n:=0;

    PROC main()
        !清屏
        TPErase; 
        !打印
        TPWrite "Hello World!";
        TPWrite "1.huayuan";
        TPWrite "2.zouzhixian";
        TPWrite "3.zhauqu";
        !互动的数字键盘操作
        TPReadNum n,"qingxuanze";
        !判断
        TEST n
        CASE 1:
        TPWrite "Don bully the poor";
        CASE 2:
        TPWrite "Don bully the poor";
        CASE 3:
        TPWrite "Don bully the poor";
        DEFAULT:
        TPWrite "Input error";
        ENDTEST
        
    ENDPROC
    
ENDMODULE

希望对你们有所帮助,如有不足之处,欢迎大家留言探讨,本文已经首发在个人微信公众号:龙猫YOU ,欢迎关注!

Logo

DAMO开发者矩阵,由阿里巴巴达摩院和中国互联网协会联合发起,致力于探讨最前沿的技术趋势与应用成果,搭建高质量的交流与分享平台,推动技术创新与产业应用链接,围绕“人工智能与新型计算”构建开放共享的开发者生态。

更多推荐