# Database for converter positions
#
# V.K.  July 16, 2012
# Macro paramters:
#   $(P)        - XPS Controller name 
#   $(R)        - Motor (R=m1)

#alias("$(P)$(R)","$(pref)hd:converter:motor")

record(ao,"$(pref)hd:converter:motionCondit"){
  field(DTYP,"Soft Channel")
  field(VAL,"0.1")
  field(SCAN, "Passive")
}
record(ao,"$(pref)hd:converter:home"){
  field(DTYP,"Soft Channel")
  field(VAL,"0.")
  field(PINI, "YES")
  field(SCAN, "Passive")
}
record(ao,"$(pref)hd:converter:home:proc"){
  field(DTYP,"Soft Channel")
  field(DOL,"$(pref)hd:converter:home")
  field(OMSL,"closed_loop")
  field(OUT,"$(pref)hd:converter:motor.VAL PP NMS")
  field(SCAN, "Passive")
}
record(calc, "$(pref)hd:converter_at_home") {
  field(INPA, "$(pref)hd:converter:motor.RBV")
  field(INPB, "$(pref)hd:converter:home")
  field(INPC, "$(pref)hd:converter:motor.DMOV")
  field(INPE, "$(pref)hd:converter:motionCondit")
  field(SCAN, ".2 second")
  field(CALC, "(ABS(A-B)<E)&&(C=1)?1:0")
}
record(ao,"$(pref)hd:converter:a"){
  field(DTYP,"Soft Channel")
  field(VAL,"133.581")
  field(PINI, "YES")
  field(SCAN, "Passive")
}
record(ao,"$(pref)hd:converter:a:proc"){
  field(DTYP,"Soft Channel")
  field(DOL,"$(pref)hd:converter:a")
  field(OMSL,"closed_loop")
  field(OUT,"$(pref)hd:converter:motor.VAL PP NMS")
  field(SCAN, "Passive")
}
record(calc, "$(pref)hd:converter_at_a") {
  field(INPA, "$(pref)hd:converter:motor.RBV")
  field(INPB, "$(pref)hd:converter:a")
  field(INPC, "$(pref)hd:converter:motor.DMOV")
  field(INPE, "$(pref)hd:converter:motionCondit")
  field(SCAN, ".2 second")
  field(CALC, "(ABS(A-B)<E)&&(C=1)?1:0")
}
record(ao,"$(pref)hd:converter:b"){
  field(DTYP,"Soft Channel")
  field(VAL,"163.695")
  field(PINI, "YES")
  field(SCAN, "Passive")
}
record(ao,"$(pref)hd:converter:b:proc"){
  field(DTYP,"Soft Channel")
  field(DOL,"$(pref)hd:converter:b")
  field(OMSL,"closed_loop")
  field(OUT,"$(pref)hd:converter:motor.VAL PP NMS")
  field(SCAN, "Passive")
}
record(calc, "$(pref)hd:converter_at_b") {
  field(INPA, "$(pref)hd:converter:motor.RBV")
  field(INPB, "$(pref)hd:converter:b")
  field(INPC, "$(pref)hd:converter:motor.DMOV")
  field(INPE, "$(pref)hd:converter:motionCondit")
  field(SCAN, ".2 second")
  field(CALC, "(ABS(A-B)<E)&&(C=1)?1:0")
}
record(ao,"$(pref)hd:converter:c"){
  field(DTYP,"Soft Channel")
  field(VAL,"193.738")
  field(PINI, "YES")
  field(SCAN, "Passive")
}
record(ao,"$(pref)hd:converter:c:proc"){
  field(DTYP,"Soft Channel")
  field(DOL,"$(pref)hd:converter:c")
  field(OMSL,"closed_loop")
  field(OUT,"$(pref)hd:converter:motor.VAL PP NMS")
  field(SCAN, "Passive")
}
record(calc, "$(pref)hd:converter_at_c") {
  field(INPA, "$(pref)hd:converter:motor.RBV")
  field(INPB, "$(pref)hd:converter:c")
  field(INPC, "$(pref)hd:converter:motor.DMOV")
  field(INPE, "$(pref)hd:converter:motionCondit")
  field(SCAN, ".2 second")
  field(CALC, "(ABS(A-B)<E)&&(C=1)?1:0")
}