char a,b,c,d
sub write(char a,char b,char c,char d)
SetData(a, "Local HMI", LW, 0, 1)
SetData(b, "Local HMI", LW, 1, 1)
SetData(c, "Local HMI", LW, 2, 1)
SetData(d, "Local HMI", LW, 3, 1)
end sub
sub INC_0180()
a = '0'
b = '1'
c = '8'
d = '0'
write(a,b,c,d)
end sub
macro_command main()
char result
while(1)
INC_0180()
wend
end macro_command |