add utag demo
This commit is contained in:
5
iocBoot/iocutag/Makefile
Normal file
5
iocBoot/iocutag/Makefile
Normal file
@ -0,0 +1,5 @@
|
||||
TOP = ../..
|
||||
include $(TOP)/configure/CONFIG
|
||||
ARCH = linux-x86_64-debug
|
||||
TARGETS = envPaths
|
||||
include $(TOP)/configure/RULES.ioc
|
5
iocBoot/iocutag/st.cmd
Executable file
5
iocBoot/iocutag/st.cmd
Executable file
@ -0,0 +1,5 @@
|
||||
#!../../bin/linux-x86_64-debug/softIocPVA
|
||||
|
||||
dbLoadRecords("utag.db","N=TST:")
|
||||
|
||||
iocInit()
|
23
iocBoot/iocutag/utag.db
Normal file
23
iocBoot/iocutag/utag.db
Normal file
@ -0,0 +1,23 @@
|
||||
|
||||
record(calc, "$(N)Cnt-I") {
|
||||
field(SCAN, "1 second")
|
||||
field(CALC, "(VAL+1)%10")
|
||||
field(FLNK, "$(N)Cnt:T-I")
|
||||
}
|
||||
|
||||
record(calc, "$(N)Cnt:T-I") {
|
||||
field(INPA, "$(N)Cnt-I NPP")
|
||||
field(CALC, "A%2")
|
||||
field(FLNK, "$(N)UTag-I")
|
||||
}
|
||||
|
||||
record(longin, "$(N)UTag-I") {
|
||||
field(DTYP, "QSRV Set UTag")
|
||||
field(INP , "$(N)Cnt:T-I")
|
||||
field(FLNK, "$(N)Val-I")
|
||||
}
|
||||
|
||||
record(longin, "$(N)Val-I") {
|
||||
field(INP , "$(N)Cnt-I")
|
||||
field(TSEL, "$(N)UTag-I.TIME")
|
||||
}
|
Reference in New Issue
Block a user