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 3jack CS with an angled 00009 # # mirror mount on top. The 3 jacks can be constructed in any geometry, and 00010 # # should be numbered in a clockwise order looking from the top with J1 having 00011 # # the smallest Z value of the jacks. It requires PROG10_CS_motion.pmc and an 00012 # # instantiation of CS_3jack_mirror.pmc with the variables shown in the image 00013 # # below: 00014 # # \image html 3jack_mirror-help.png "Setup of 3 jack with mirror CS" 00015 # # Build instructions for an example IOC are available 00016 # # \ref build_instructions_CS3jack_mirror "here", with a pmc file containing 00017 # # the CS definition available in iocs/CS3jack_mirror/defs.pmc 00018 # % macro, __doc__, Supporting template that allows setting of variables for a 00019 # 3jack mirror CS 00020 # % macro, P, Pv Prefix 00021 # % macro, PORT, Motor controller serial port 00022 # % macro, COORD, Co-ordinate system number 00023 # % macro, PREC, Precision to display variables 00024 # % macro, AEGU, EGU for angular variables 00025 # % macro, J1PV, Pv of real Jack1 motor, e.g. $(P):J1 00026 # % macro, J2PV, Pv of real Jack1 motor, e.g. $(P):J2 00027 # % macro, J3PV, Pv of real Jack1 motor, e.g. $(P):J3 00028 # % macro, name, Object name and gui association name 00029 # This associates an edm screen with the template 00030 # % gui, $(name=), edm, 3jack_mirror.edl, 3jack=$(P) 00031 # # This record will zero J1, J2 and J3 when processed 00032 record(fanout, "$(P):ZERO") { 00033 field(LNK1, "$(P):ZEROJ1") 00034 field(LNK2, "$(P):ZEROJ2") 00035 field(LNK3, "$(P):ZEROJ3") 00036 } 00037 00038 record(calcout, "$(P):ZEROJ1") { 00039 field(CALC, "-A") 00040 field(INPA, "$(J1PV=$(P):J1).DRBV") 00041 field(OUT, "$(J1PV=$(P):J1).OFF PP") 00042 } 00043 00044 record(calcout, "$(P):ZEROJ2") { 00045 field(CALC, "-A") 00046 field(INPA, "$(J2PV=$(P):J2).DRBV") 00047 field(OUT, "$(J2PV=$(P):J2).OFF PP") 00048 } 00049 00050 record(calcout, "$(P):ZEROJ3") { 00051 field(CALC, "-A") 00052 field(INPA, "$(J3PV=$(P):J3).DRBV") 00053 field(OUT, "$(J3PV=$(P):J3).OFF PP") 00054 } 00055 00056 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync1) { 00057 macro(VAR, "&$(COORD)Q20") 00058 macro(Q, ":J1X") 00059 macro(EGU, "mm") 00060 macro(PREC, "$(PREC=3)") 00061 } 00062 00063 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync2) { 00064 macro(VAR, "&$(COORD)Q21") 00065 macro(Q, ":J1Z") 00066 macro(EGU, "mm") 00067 macro(PREC, "$(PREC=3)") 00068 } 00069 00070 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync3) { 00071 macro(VAR, "&$(COORD)Q22") 00072 macro(Q, ":J2X") 00073 macro(EGU, "mm") 00074 macro(PREC, "$(PREC=3)") 00075 } 00076 00077 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync4) { 00078 macro(VAR, "&$(COORD)Q23") 00079 macro(Q, ":J2Z") 00080 macro(EGU, "mm") 00081 macro(PREC, "$(PREC=3)") 00082 } 00083 00084 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync5) { 00085 macro(VAR, "&$(COORD)Q24") 00086 macro(Q, ":J3X") 00087 macro(EGU, "mm") 00088 macro(PREC, "$(PREC=3)") 00089 } 00090 00091 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync6) { 00092 macro(VAR, "&$(COORD)Q25") 00093 macro(Q, ":J3Z") 00094 macro(EGU, "mm") 00095 macro(PREC, "$(PREC=3)") 00096 } 00097 00098 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync7) { 00099 macro(VAR, "&$(COORD)Q26") 00100 macro(Q, ":JTX") 00101 macro(EGU, "mm") 00102 macro(PREC, "$(PREC=3)") 00103 } 00104 00105 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync8) { 00106 macro(VAR, "&$(COORD)Q27") 00107 macro(Q, ":JTZ") 00108 macro(EGU, "mm") 00109 macro(PREC, "$(PREC=3)") 00110 } 00111 00112 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync9) { 00113 macro(VAR, "&$(COORD)Q28") 00114 macro(Q, ":MP") 00115 macro(EGU, "$(AEGU=deg)") 00116 macro(PREC, "$(PREC=3)") 00117 } 00118 00119 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync10) { 00120 macro(VAR, "&$(COORD)Q29") 00121 macro(Q, ":MR") 00122 macro(EGU, "$(AEGU=deg)") 00123 macro(PREC, "$(PREC=3)") 00124 } 00125 00126 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync11) { 00127 macro(VAR, "&$(COORD)Q30") 00128 macro(Q, ":MD") 00129 macro(EGU, "mm") 00130 macro(PREC, "$(PREC=3)") 00131 } 00132 00133 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync12) { 00134 macro(VAR, "&$(COORD)Q31") 00135 macro(Q, ":MCX") 00136 macro(EGU, "mm") 00137 macro(PREC, "$(PREC=3)") 00138 } 00139 00140 expand("pmacVariableWriteSync.vdb", pmacVariableWriteSync13) { 00141 macro(VAR, "&$(COORD)Q32") 00142 macro(Q, ":MCZ") 00143 macro(EGU, "mm") 00144 macro(PREC, "$(PREC=3)") 00145 } 00146 00147 #! Further lines contain data used by VisualDCT 00148 #! View(175,553,1.0) 00149 #! Record("$(P):ZERO",220,702,0,0,"$(P):ZERO") 00150 #! Field("$(P):ZERO.LNK1",16777215,1,"$(P):ZERO.LNK1") 00151 #! Link("$(P):ZERO.LNK1","$(P):ZEROJ1") 00152 #! Field("$(P):ZERO.LNK2",16777215,1,"$(P):ZERO.LNK2") 00153 #! Link("$(P):ZERO.LNK2","$(P):ZEROJ2") 00154 #! Field("$(P):ZERO.LNK3",16777215,1,"$(P):ZERO.LNK3") 00155 #! Link("$(P):ZERO.LNK3","$(P):ZEROJ3") 00156 #! Record("$(P):ZEROJ1",520,702,0,0,"$(P):ZEROJ1") 00157 #! Field("$(P):ZEROJ1.INPA",16777215,1,"$(P):ZEROJ1.INPA") 00158 #! Field("$(P):ZEROJ1.OUT",16777215,1,"$(P):ZEROJ1.OUT") 00159 #! Record("$(P):ZEROJ2",520,862,0,0,"$(P):ZEROJ2") 00160 #! Field("$(P):ZEROJ2.INPA",16777215,1,"$(P):ZEROJ2.INPA") 00161 #! Field("$(P):ZEROJ2.OUT",16777215,1,"$(P):ZEROJ2.OUT") 00162 #! Record("$(P):ZEROJ3",500,1022,0,0,"$(P):ZEROJ3") 00163 #! Field("$(P):ZEROJ3.INPA",16777215,1,"$(P):ZEROJ3.INPA") 00164 #! Field("$(P):ZEROJ3.OUT",16777215,1,"$(P):ZEROJ3.OUT") 00165 00166 #! TemplateInstance("pmacVariableWriteSync1",740,580,0,"") 00167 #! TemplateField("pmacVariableWriteSync1","VAR",16777215,0,1) 00168 #! TemplateField("pmacVariableWriteSync1","EGU",16777215,0,1) 00169 #! TemplateField("pmacVariableWriteSync1","Q",16777215,0,1) 00170 #! TemplateField("pmacVariableWriteSync1","PORT",16777215,0,1) 00171 #! TemplateField("pmacVariableWriteSync1","P",16777215,0,1) 00172 #! TemplateField("pmacVariableWriteSync1","PREC",16777215,0,1) 00173 00174 00175 #! TemplateInstance("pmacVariableWriteSync2",960,580,0,"") 00176 #! TemplateField("pmacVariableWriteSync2","VAR",16777215,0,1) 00177 #! TemplateField("pmacVariableWriteSync2","EGU",16777215,0,1) 00178 #! TemplateField("pmacVariableWriteSync2","Q",16777215,0,1) 00179 #! TemplateField("pmacVariableWriteSync2","PORT",16777215,0,1) 00180 #! TemplateField("pmacVariableWriteSync2","P",16777215,0,1) 00181 #! TemplateField("pmacVariableWriteSync2","PREC",16777215,0,1) 00182 00183 00184 #! TemplateInstance("pmacVariableWriteSync3",1180,580,0,"") 00185 #! TemplateField("pmacVariableWriteSync3","VAR",16777215,0,1) 00186 #! TemplateField("pmacVariableWriteSync3","EGU",16777215,0,1) 00187 #! TemplateField("pmacVariableWriteSync3","Q",16777215,0,1) 00188 #! TemplateField("pmacVariableWriteSync3","PORT",16777215,0,1) 00189 #! TemplateField("pmacVariableWriteSync3","P",16777215,0,1) 00190 #! TemplateField("pmacVariableWriteSync3","PREC",16777215,0,1) 00191 00192 00193 #! TemplateInstance("pmacVariableWriteSync4",1400,580,0,"") 00194 #! TemplateField("pmacVariableWriteSync4","VAR",16777215,0,1) 00195 #! TemplateField("pmacVariableWriteSync4","EGU",16777215,0,1) 00196 #! TemplateField("pmacVariableWriteSync4","Q",16777215,0,1) 00197 #! TemplateField("pmacVariableWriteSync4","PORT",16777215,0,1) 00198 #! TemplateField("pmacVariableWriteSync4","P",16777215,0,1) 00199 #! TemplateField("pmacVariableWriteSync4","PREC",16777215,0,1) 00200 00201 00202 #! TemplateInstance("pmacVariableWriteSync5",1620,580,0,"") 00203 #! TemplateField("pmacVariableWriteSync5","VAR",16777215,0,1) 00204 #! TemplateField("pmacVariableWriteSync5","EGU",16777215,0,1) 00205 #! TemplateField("pmacVariableWriteSync5","Q",16777215,0,1) 00206 #! TemplateField("pmacVariableWriteSync5","PORT",16777215,0,1) 00207 #! TemplateField("pmacVariableWriteSync5","P",16777215,0,1) 00208 #! TemplateField("pmacVariableWriteSync5","PREC",16777215,0,1) 00209 00210 00211 #! TemplateInstance("pmacVariableWriteSync6",740,920,0,"") 00212 #! TemplateField("pmacVariableWriteSync6","VAR",16777215,0,1) 00213 #! TemplateField("pmacVariableWriteSync6","EGU",16777215,0,1) 00214 #! TemplateField("pmacVariableWriteSync6","Q",16777215,0,1) 00215 #! TemplateField("pmacVariableWriteSync6","PORT",16777215,0,1) 00216 #! TemplateField("pmacVariableWriteSync6","P",16777215,0,1) 00217 #! TemplateField("pmacVariableWriteSync6","PREC",16777215,0,1) 00218 00219 00220 #! TemplateInstance("pmacVariableWriteSync7",960,920,0,"") 00221 #! TemplateField("pmacVariableWriteSync7","VAR",16777215,0,1) 00222 #! TemplateField("pmacVariableWriteSync7","EGU",16777215,0,1) 00223 #! TemplateField("pmacVariableWriteSync7","Q",16777215,0,1) 00224 #! TemplateField("pmacVariableWriteSync7","PORT",16777215,0,1) 00225 #! TemplateField("pmacVariableWriteSync7","P",16777215,0,1) 00226 #! TemplateField("pmacVariableWriteSync7","PREC",16777215,0,1) 00227 00228 00229 #! TemplateInstance("pmacVariableWriteSync8",1180,920,0,"") 00230 #! TemplateField("pmacVariableWriteSync8","VAR",16777215,0,1) 00231 #! TemplateField("pmacVariableWriteSync8","EGU",16777215,0,1) 00232 #! TemplateField("pmacVariableWriteSync8","Q",16777215,0,1) 00233 #! TemplateField("pmacVariableWriteSync8","PORT",16777215,0,1) 00234 #! TemplateField("pmacVariableWriteSync8","P",16777215,0,1) 00235 #! TemplateField("pmacVariableWriteSync8","PREC",16777215,0,1) 00236 00237 00238 #! TemplateInstance("pmacVariableWriteSync9",1400,920,0,"") 00239 #! TemplateField("pmacVariableWriteSync9","VAR",16777215,0,1) 00240 #! TemplateField("pmacVariableWriteSync9","EGU",16777215,0,1) 00241 #! TemplateField("pmacVariableWriteSync9","Q",16777215,0,1) 00242 #! TemplateField("pmacVariableWriteSync9","PORT",16777215,0,1) 00243 #! TemplateField("pmacVariableWriteSync9","P",16777215,0,1) 00244 #! TemplateField("pmacVariableWriteSync9","PREC",16777215,0,1) 00245 00246 00247 #! TemplateInstance("pmacVariableWriteSync10",1620,920,0,"") 00248 #! TemplateField("pmacVariableWriteSync10","VAR",16777215,0,1) 00249 #! TemplateField("pmacVariableWriteSync10","EGU",16777215,0,1) 00250 #! TemplateField("pmacVariableWriteSync10","Q",16777215,0,1) 00251 #! TemplateField("pmacVariableWriteSync10","PORT",16777215,0,1) 00252 #! TemplateField("pmacVariableWriteSync10","P",16777215,0,1) 00253 #! TemplateField("pmacVariableWriteSync10","PREC",16777215,0,1) 00254 00255 00256 #! TemplateInstance("pmacVariableWriteSync11",740,1260,0,"") 00257 #! TemplateField("pmacVariableWriteSync11","VAR",16777215,0,1) 00258 #! TemplateField("pmacVariableWriteSync11","EGU",16777215,0,1) 00259 #! TemplateField("pmacVariableWriteSync11","Q",16777215,0,1) 00260 #! TemplateField("pmacVariableWriteSync11","PORT",16777215,0,1) 00261 #! TemplateField("pmacVariableWriteSync11","P",16777215,0,1) 00262 #! TemplateField("pmacVariableWriteSync11","PREC",16777215,0,1) 00263 00264 00265 #! TemplateInstance("pmacVariableWriteSync12",960,1260,0,"") 00266 #! TemplateField("pmacVariableWriteSync12","VAR",16777215,0,1) 00267 #! TemplateField("pmacVariableWriteSync12","EGU",16777215,0,1) 00268 #! TemplateField("pmacVariableWriteSync12","Q",16777215,0,1) 00269 #! TemplateField("pmacVariableWriteSync12","PORT",16777215,0,1) 00270 #! TemplateField("pmacVariableWriteSync12","P",16777215,0,1) 00271 #! TemplateField("pmacVariableWriteSync12","PREC",16777215,0,1) 00272 00273 00274 #! TemplateInstance("pmacVariableWriteSync13",1180,1260,0,"") 00275 #! TemplateField("pmacVariableWriteSync13","VAR",16777215,0,1) 00276 #! TemplateField("pmacVariableWriteSync13","EGU",16777215,0,1) 00277 #! TemplateField("pmacVariableWriteSync13","Q",16777215,0,1) 00278 #! TemplateField("pmacVariableWriteSync13","PORT",16777215,0,1) 00279 #! TemplateField("pmacVariableWriteSync13","P",16777215,0,1) 00280 #! TemplateField("pmacVariableWriteSync13","PREC",16777215,0,1) 00281