00001 #! Generated by VisualDCT v2.6 00002 #! DBDSTART 00003 #! DBD("../../dbd/pmacCoord_vdct.dbd") 00004 #! DBDEND 00005 00006 00007 # # \file 00008 # # This template allows setting of variables for a 2jack CS. It requires 00009 # # PROG10_CS_motion.pmc and an instantiation of CS_2jack.pmc with the variables 00010 # # shown in the image below: 00011 # # \image html 2jack-help.png "Setup of 2 jack CS" 00012 # # Build instructions for an example IOC are available 00013 # # \ref build_instructions_CS2jack "here", with a pmc file containing 00014 # # the CS definition available in iocs/CS2jack/defs.pmc 00015 # % macro, __doc__, Supporting template that allows setting of variables for a 00016 # 2jack CS 00017 # % macro, P, Pv Prefix 00018 # % macro, PORT, Motor controller serial port 00019 # % macro, COORD, Co-ordinate system number 00020 # % macro, PREC, Precision to display variables 00021 # % macro, J1PV, Pv of real Jack1 motor, e.g. $(P):J1 00022 # % macro, J2PV, Pv of real Jack1 motor, e.g. $(P):J2 00023 # % macro, name, Object name and gui association name 00024 # This associates an edm screen with the template 00025 # % gui, $(name=), edm, 2jack.edl, 2jack=$(P) 00026 # # This record will zero J1 and J2 when processed 00027 record(fanout, "$(P):ZERO") { 00028 field(LNK1, "$(P):ZEROJ1") 00029 field(LNK2, "$(P):ZEROJ2") 00030 } 00031 00032 record(calcout, "$(P):ZEROJ1") { 00033 field(CALC, "-A") 00034 field(INPA, "$(J1PV=$(P):J1).DRBV") 00035 field(OUT, "$(J1PV=$(P):J1).OFF PP") 00036 } 00037 00038 record(calcout, "$(P):ZEROJ2") { 00039 field(CALC, "-A") 00040 field(INPA, "$(J2PV=$(P):J2).DRBV") 00041 field(OUT, "$(J2PV=$(P):J2).OFF PP") 00042 } 00043 00044 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync1) { 00045 macro(VAR, "&$(COORD)Q20") 00046 macro(Q, ":DIST") 00047 macro(EGU, "mm") 00048 macro(PREC, "$(PREC=3)") 00049 } 00050 00051 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync2) { 00052 macro(VAR, "&$(COORD)Q21") 00053 macro(Q, ":PIVOT") 00054 macro(EGU, "mm") 00055 macro(PREC, "$(PREC=3)") 00056 } 00057 00058 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync3) { 00059 macro(VAR, "&$(COORD)Q22") 00060 macro(Q, ":DEPTH") 00061 macro(EGU, "mm") 00062 macro(PREC, "$(PREC=3)") 00063 } 00064 00065 #! Further lines contain data used by VisualDCT 00066 #! View(0,0,1.0) 00067 #! Record("$(P):ZERO",200,296,0,0,"$(P):ZERO") 00068 #! Field("$(P):ZERO.LNK1",16777215,0,"$(P):ZERO.LNK1") 00069 #! Link("$(P):ZERO.LNK1","$(P):ZEROJ1") 00070 #! Field("$(P):ZERO.LNK2",16777215,1,"$(P):ZERO.LNK2") 00071 #! Link("$(P):ZERO.LNK2","$(P):ZEROJ2") 00072 #! Record("$(P):ZEROJ1",20,22,0,0,"$(P):ZEROJ1") 00073 #! Field("$(P):ZEROJ1.INPA",16777215,1,"$(P):ZEROJ1.INPA") 00074 #! Field("$(P):ZEROJ1.OUT",16777215,1,"$(P):ZEROJ1.OUT") 00075 #! Record("$(P):ZEROJ2",260,22,0,1,"$(P):ZEROJ2") 00076 #! Field("$(P):ZEROJ2.INPA",16777215,1,"$(P):ZEROJ2.INPA") 00077 #! Field("$(P):ZEROJ2.OUT",16777215,1,"$(P):ZEROJ2.OUT") 00078 00079 #! TemplateInstance("pmacVariableWriteSync1",200,380,0,"") 00080 #! TemplateField("pmacVariableWriteSync1","VAR",16777215,0,1) 00081 #! TemplateField("pmacVariableWriteSync1","EGU",16777215,0,1) 00082 #! TemplateField("pmacVariableWriteSync1","Q",16777215,0,1) 00083 #! TemplateField("pmacVariableWriteSync1","PORT",16777215,0,1) 00084 #! TemplateField("pmacVariableWriteSync1","P",16777215,0,1) 00085 #! TemplateField("pmacVariableWriteSync1","PREC",16777215,0,1) 00086 00087 00088 #! TemplateInstance("pmacVariableWriteSync2",420,380,0,"") 00089 #! TemplateField("pmacVariableWriteSync2","VAR",16777215,0,1) 00090 #! TemplateField("pmacVariableWriteSync2","EGU",16777215,0,1) 00091 #! TemplateField("pmacVariableWriteSync2","Q",16777215,0,1) 00092 #! TemplateField("pmacVariableWriteSync2","PORT",16777215,0,1) 00093 #! TemplateField("pmacVariableWriteSync2","P",16777215,0,1) 00094 #! TemplateField("pmacVariableWriteSync2","PREC",16777215,0,1) 00095 00096 00097 #! TemplateInstance("pmacVariableWriteSync3",640,380,0,"") 00098 #! TemplateField("pmacVariableWriteSync3","VAR",16777215,0,1) 00099 #! TemplateField("pmacVariableWriteSync3","EGU",16777215,0,1) 00100 #! TemplateField("pmacVariableWriteSync3","Q",16777215,0,1) 00101 #! TemplateField("pmacVariableWriteSync3","PORT",16777215,0,1) 00102 #! TemplateField("pmacVariableWriteSync3","P",16777215,0,1) 00103 #! TemplateField("pmacVariableWriteSync3","PREC",16777215,0,1) 00104