Project

General

Profile

Bug #645 » 投入.txt

投入按钮 触发脚本 - lq Du, 07/27/2020 10:54 AM

 
1
A1=getsymbolstatus("0_0_???豸_111")
2
A2=getsymbolstatus("0_0_???豸_112")
3
A3=getsymbolstatus("0_0_???豸_113")
4
if A1==1 or A2==1 or A3==1 then
5
yt0("OCC_QX_AOJ","ȷ??ִ??35KV?ֶ?????Ͷ?룿",0)
6
D1=getvdataint(0)
7
if D1==1 then
8
if A1==1 then
9
yk("FDR_FD35KV_IN",1,0)
10
yk("BYR_FD35KV_IN",1,0)
11
yk("PDR_FD35KV_IN",1,0)
12
end
13
if A2==1 then
14
yk("JQS_FD35KV_IN",1,0)
15
yk("SJR_FD35KV_IN",1,0)
16
yk("JQT_FD35KV_IN",1,0)
17
yk("JHR_FD35KV_IN",1,0)
18
end
19
if A3==1 then
20
yk("GTR_FD35KV_IN",1,0)
21
yk("MLR_FD35KV_IN",1,0)
22
yk("CLS_FD35KV_IN",1,0)
23
end
24
pause(50000)
25
D1=getdval("FDR_FD35KV_IN")
26
D2=getdval("BYR_FD35KV_IN")
27
D3=getdval("PDR_FD35KV_IN")
28
D4=getdval("JQS_FD35KV_IN")
29
D5=getdval("SJR_FD35KV_IN")
30
D6=getdval("JQT_FD35KV_IN")
31
D7=getdval("JHR_FD35KV_IN")
32
D8=getdval("GTR_FD35KV_IN")
33
D9=getdval("MLR_FD35KV_IN")
34
D10=getdval("CLS_FD35KV_IN")
35
if A1==1 then
36
if D1~=1 then
37
setplugpara("0_0_???_226",10002,"????·վ35kV?ֶ?????Ͷ??ʧ??",28)
38
end
39
if D2~=1 then
40
setplugpara("0_0_???_226", 10002, "????·վ35kV?ֶ?????Ͷ??ʧ??",28)
41
end
42
if D3~=1 then
43
setplugpara("0_0_???_226", 10002, "̨??ׯ·վ35kV?ֶ?????Ͷ??ʧ??",30)
44
end
45
end
46
if A2==1 then
47
if D4~=1 then
48
setplugpara("0_0_???_226", 10002, "????վ35kV?ֶ?????Ͷ??ʧ??", 26)
49
end
50
if D5~=1 then
51
setplugpara("0_0_???_226", 10002, "??·վ35kV?ֶ?????Ͷ??ʧ??", 28)
52
end
53
if D6~=1 then
54
setplugpara("0_0_???_226", 10002, "????ͣ????35kV?ֶ?????Ͷ??ʧ??", 30)
55
end
56
if D7~=1 then
57
setplugpara("0_0_???_226", 10002, "??·վ35kV?ֶ?????Ͷ??ʧ??", 28)
58
end
59
end
60
if A3==1 then
61
if D8~=1 then
62
setplugpara("0_0_???_226", 10002, "????·վ35kV?ֶ?????Ͷ??ʧ??", 28)
63
end
64
if D9~=1 then
65
setplugpara("0_0_???_226", 10002, "????·վ35kV?ֶ?????Ͷ??ʧ??", 28)
66
end
67
if D10~=1 then
68
setplugpara("0_0_???_226", 10002, "??·վ35kV?ֶ?????Ͷ??ʧ??", 26)
69
end
70
end
71
yt0("OCC_QX_AOJ","35kV?ֶ?????Ͷ???????????",0)
72
end
73
end
(2-2/3)