|
|
//S(Start)
HS7=("product%ninfo, se1, ac7");
PRESS(HS7)
LM("rear_beam_a0")
END
//END
//S(SOFTKEY_1)
HS1=("rear_beam%n_a0",SE1,AC6)
HS2=("",SE1)
HS3=("",SE1)
HS4=("",SE1)
HS5=("",SE1)
HS6=("",SE1)
HS7=("")
HS8=("BACK",SE1)
VS1=("",SE1)
VS2=("",SE1)
VS3=("change",SE1,ac4)
VS4=("",SE1)
VS5=(["OK","\\sk_ok.png"])
VS6=("",SE1)
VS7=("",SE1)
VS8=("",SE1)
PRESS(HS1)
LM("rear_beam_a0")
END_PRESS
PRESS(VS3)
LB("SUBS")
CALL(VN_WR0)
CALL(FOC)
CALL("VR_WR2")
END_PRESS
PRESS(VS5)
VR01.WR=1
VR02.WR=1
VR03.WR=1
LM("rear_beam_a0")
FOC="VN01"
END_PRESS
PRESS(HS8)
LM("rear_beam_a0")
END_PRESS
//END
//M(rear_beam_a0/"rear_beam_a0"/"rear_beam_a0.png")
DEF VR01=(R3/-1.0,1.0//,"Offset X"/wr1///350,065,080/452,065,049),
VR02=(R3/-1.0,1.0//,"Offset Y"/wr1///350,086,080/452,086,049),
VR03=(R3/-1.0,1.0//,"Offset Z"/wr1///350,107,080/452,107,049),
DEF VAR00=(I//0//wr0),
VAR01=(I////wr0),
DEF VN00=(R///"-0-"/wr2/"rear_beam_a0_0.png"///1,0,1,1),
VN01=(R///"0,0"/wr2/"rear_beam_a0_0.png"///1,1,1,1),
VN02=(R///"0,1"/wr2/"rear_beam_a0_1.png"///1,2,1,1),
VN03=(R///"0,2"/wr2/"rear_beam_a0_2.png"///1,3,1,1),
VN04=(R///"0,3"/wr2/"rear_beam_a0_3.png"///1,4,1,1),
VN05=(R///"0,4"/wr2/"rear_beam_a0_4.png"///1,5,1,1),
VN06=(R///"0,5"/wr2/"rear_beam_a0_5.png"///1,6,1,1),
VN07=(R///"0,6"/wr2/"rear_beam_a0_6.png"///1,7,1,1),
VN08=(R///"0,7"/wr2/"rear_beam_a0_7.png"///1,8,1,1),
VN09=(R///"0,8"/wr2/"rear_beam_a0_8.png"///1,9,1,1),
VN10=(R///"0,9"/wr2/"rear_beam_a0_9.png"///1,10,1,1),
VN11=(R///"0,10"/wr2/"rear_beam_a0_10.png"///1,11,1,1),
VN12=(R///"0,11"/wr2/"rear_beam_a0_11.png"///1,12,1,1),
VN13=(R///"0,12"/wr2/"rear_beam_a0_12.png"///1,13,1,1),
VN14=(R///"0,13"/wr2/"rear_beam_a0_13.png"///1,14,1,1),
VN15=(R///"0,14"/wr2/"rear_beam_a0_14.png"///1,15,1,1),
VN16=(R///"0,15"/wr2/"rear_beam_a0_15.png"///1,16,1,1),
VN17=(R///"0,16"/wr2/"rear_beam_a0_16.png"///1,17,1,1),
VN18=(R///"0,17"/wr2/"rear_beam_a0_17.png"///1,18,1,1),
VN19=(R///"0,18"/wr2/"rear_beam_a0_18.png"///1,19,1,1),
VN20=(R///"-20-"/wr2////1,20,1,1),
VN21=(R////wr0////1,21,1,1),
VN22=(R////wr0////1,22,1,1),
LOAD
LS("SOFTKEY_1")
LB("SUBS")
CALL("VR_WR1")
END_LOAD
FOCUS
IF (FOC<>"VR01") AND (FOC<>"VR02") AND (FOC<>"VR03")
LB("SUBS")
CALL("FOC")
CALL("VR_WR1")
ENDIF
END_FOCUS
//END
//B(SUBS)
SUB(VR_WR2)
VR01.WR=2
VR02.WR=2
VR03.WR=2
END_SUB
SUB(VR_WR1)
VR01.WR=1
VR02.WR=1
VR03.WR=1
END_SUB
SUB(VN_WR0)
VN01.wr=0
VN02.wr=0
VN03.wr=0
VN04.wr=0
VN05.wr=0
VN06.wr=0
VN07.wr=0
VN08.wr=0
VN09.wr=0
VN10.wr=0
VN11.wr=0
VN12.wr=0
VN13.wr=0
VN14.wr=0
VN15.wr=0
VN16.wr=0
VN17.wr=0
VN18.wr=0
VN19.wr=0
VN20.wr=0
VN21.wr=0
VN22.wr=0
END_SUB
SUB(FOC)
SWITCH(FOC)
CASE "VN00"
FOC="VN19"
CASE "VN20"
FOC="VN01"
CASE "VN01"
VAR01.VAL=0
CASE "VN02"
VAR01.VAL=1
CASE "VN03"
VAR01.VAL=2
CASE "VN04"
VAR01.VAL=3
CASE "VN05"
VAR01.VAL=4
CASE "VN06"
VAR01.VAL=5
CASE "VN07"
VAR01.VAL=6
CASE "VN08"
VAR01.VAL=7
CASE "VN09"
VAR01.VAL=8
CASE "VN10"
VAR01.VAL=9
CASE "VN11"
VAR01.VAL=10
CASE "VN12"
VAR01.VAL=11
CASE "VN13"
VAR01.VAL=12
CASE "VN14"
VAR01.VAL=13
CASE "VN15"
VAR01.VAL=14
CASE "VN16"
VAR01.VAL=15
CASE "VN17"
VAR01.VAL=16
CASE "VN18"
VAR01.VAL=17
CASE "VN19"
VAR01.VAL=18
END_SWITCH
;名称.var = 系统或者用户变量
VR01.VAR="_CORR["<<VAR00<<","<<VAR01<<",0]"
VR02.VAR="_CORR["<<VAR00<<","<<VAR01<<",1]"
VR03.VAR="_CORR["<<VAR00<<","<<VAR01<<",2]"
;名称.lt = 长文本
VR01.lt="_CORR["<<VAR00<<","<<VAR01<<",0]"
VR02.lt="_CORR["<<VAR00<<","<<VAR01<<",1]"
VR03.lt="_CORR["<<VAR00<<","<<VAR01<<",2]"
;名称.tt = 提示框
VR01.tt="_CORR["<<VAR00<<","<<VAR01<<",0]"
VR02.tt="_CORR["<<VAR00<<","<<VAR01<<",1]"
VR03.tt="_CORR["<<VAR00<<","<<VAR01<<",2]"
;HLP
VR01.hlp="rear_beam_a0_"<<VAR01<<".png"
VR02.hlp="rear_beam_a0_"<<VAR01<<".png"
VR03.hlp="rear_beam_a0_"<<VAR01<<".png"
END_SUB
//END
;--------------------------------------------------------
;--------------------------------------------------------
;se1 可见
;se2 不可操作
;se3 高亮
;输入模式:
;wr0:输入/输出栏不可见，短文本可见
;wr1:读取(没有输入中心)
;wr2:读取和写入(行以白色显示)
;wr3:wr1 带输入中心
;wr4:所有变量单元不可见，没有输入中心
;wr5:按下任何键立即保存输入的值(和 wr2 相反 - 该模式下，在退出栏或者按下返回键后才开始保存值)。
;预设置：wr2
;名称.ac = 存取级 (ac:access level)
;AC ACCESS LEVEL
;S_ALEVEL
;说明： 查询当前访问级
;返回值： 0: 系统
;1: 制造商
;2: 维修
;3: 用户
;4: 钥匙开关位置 3
;5: 钥匙开关位置 2
;6: 钥匙开关位置 1
;7: 钥匙开关位置 0
;变量更改属性
;名称.ac = 存取级 (ac:access level)
;名称.al = 文本对齐 (al:alignment)
;名称.bc = 输入/输出栏的背景色 (bc:back color)
;名称 bc_gt = 图形文本的背景色 (bc:back color)(gt:graphic text)
;名称.bc_st = 短文本的背景色 (bc:back color)(st:short text)
;名称.bc_ut = 单位文本的背景色 (bc:back color)(ut:unit text)
;名称 do = 显示选项 (do:display option)
;名称.dt = 显示模式 (dt:display type)
;名称 .fc = 输入/输出栏的前景色 (fc:front color)
;名称.fc_gt = 图形文本的前景色 (fc:front color)(gt:graphic text)
;名称.fc_st = 短文本的前景色 (fc:front color)(st:short text)
;名称.fc_ut = 单位文本的前景色 (fc:front color)(ut:unit text)
;名称.al = 字体大小 (fs:font size)
;名称.gt = 图形文本 (gt:graphic text)
;名称.hlp = 帮助图形 (hlp:help)
;名称.li = 极限值 (li:limit)
;名称.lt = 长文本 (lt:long text)
;名称.max = 最大极限值 (max:maximum)
;名称.min = 最小极限值 (min:minimum)
;名称.sc = 信号色 (sc:signal color)
;名称.st = 简要说明 (st:short text)
;名称.tg = 转换符号 (tg:toggle)
;名称.tt = 提示框 (tt:提示框
;名称.typ = 变量类型 (typ:type)
;名称.ur = 刷新速度 (ur:update rate)
;名称.ut = 单位文本 (ut:unit text)
;名称 val = 变量值 (val:value)
;名称.var = 系统或者用户变量 (var:variable)
;名称.vld = 变量状态 (vld:validation)
;名称.wr = 输入模式 (wr:write)
;图形与转换栏有关
;转换栏用替换的图像覆盖。如果标记字节值为 1 ，则显示 “bild1.png”；如果标记字节值为 2 ，则显示 “bild2.png
;DEF VAR1=(IDB/*1="\\bild1.png", 2="\\bild2.png"//,$85000/wr1//"MB[130]"//160,40,50,50)
;一个块有下列结构：
;//B(块名称)
;SUB(名称)
;END_SUB
;[SUB(名称)
;...
;END_SUB]
;...
;//END
;DEF 命名符=(/变量类型/极限值或转换栏/预设值/文本(长文本，短文本|图，图形文本，单位文本)/属性/帮助画面/系统变量或者用户变量/短文本位置/输入栏位置(左、上、宽度、高度)/颜色/在线帮助)
;DEF XXX=(R/-1,+1/0/TXT1,TXT2/WR2,AC7/HLP.PNG/H_SET[0]/0,0,100,20/0,0,150,20/颜色/在线帮助)
;定义 MSK=(字符串长度16//预设值"OVERVIEW_TOP"//wr0)，
;DEF MSK=(S16//"OVERVIEW_TOP"//wr0),
;存取对话框属性
;在方法（例如：PRESS 块）的范围内可以读取和写对话框的以下属性：
;• HD = 标题 (Header)
;• HLP = 辅助画面
;• VAR = 系统或用户变量
;• MC = 屏幕背景色
;• CM = 列对齐（只读）
;• CB = 打开方式（只读）
;• XG = 连接 X3d（只读）
;• AL = 屏幕标题对齐（只读）
;
|
|
发表于 2023-11-8 13:07:19