#!../../bin/linux-x86_64/radiatorMotion

< envPaths

cd ${TOP}

## Register all support components
dbLoadDatabase "dbd/radiatorMotion.dbd"
radiatorMotion_registerRecordDeviceDriver pdbbase

epicsEnvSet("PREFIX","")

# Load IOC status records
dbLoadRecords("db/iocAdminSoft.db","IOC=${PREFIX}RADMOTION")

epicsEnvSet("SCAN","$(PREFIX)taggerScan")
epicsEnvSet("MOTOR","${PREFIX}hd:radiator:motor")

# Load AMO motion coordinate records  
dbLoadRecords "db/amorphous_radiators.db", "pref=${PREFIX}, GONI_ID=HD:GONI:RADIATOR_INDEX,GONI_NAME=HD:GONI:RADIATOR_NAME,SCAN=$(SCAN)"

# Load DB for the radiator scan using sscan EPICS record
dbLoadRecords("db/standardScans.db","P=$(SCAN):,MAXPTS1=2000,MAXPTS2=1000,MAXPTS3=1000,MAXPTS4=10,MAXPTSH=2000")
dbLoadRecords("db/saveData.db","P=$(SCAN):")
dbLoadRecords("db/scanProgress.db","P=$(SCAN):scanProgress:")
dbLoadRecords("db/beamCheck4scan.db","PREF='',R=$(SCAN)")
dbLoadRecords("db/timer4scan.db","PREF='',R=$(SCAN)")
dbLoadRecords("db/tagElecHaloVoltagesScan.db","PREF=,HV_LFT=BEAM:HALO:hv:e:tag:l:v0set,HV_TOP=BEAM:HALO:hv:e:tag:t:v0set,HV_BOT=BEAM:HALO:hv:e:tag:b:v0set")

cd ${TOP}/iocBoot/${IOC}
asSetFilename("${TOP}/iocBoot/common/ca_security.acf")

< radiatorMotion_save_restore.cmd

set_pass0_restoreFile("radiatorMotion.sav")
set_pass1_restoreFile("radiatorMotion.sav")

# Initialize the IOC
iocInit

# autosave startup
create_monitor_set("radiatorMotion.req", 30, "PREF=${SCAN}")

# Handle autosave 'commands' contained in loaded databases.
makeAutosaveFiles()
#create_monitor_set("info_positions.req", 5, "P=xxx:")
#create_monitor_set("info_settings.req", 30, "P=xxx:")

# Launch sequencer for to do scan progress and save data
cd ${TOP}/iocBoot/iocxpsMotor
saveData_Init("saveData.req", "P=$(SCAN):")
seq &scanProgress, "S=$(SCAN):,P=$(SCAN):scanProgress:" 

# Setup scan parameters
#

dbpf("$(SCAN):scan1.R1PV", "$(MOTOR).RBV")
dbpf("$(SCAN):scan1.P1PV", "$(MOTOR).VAL")

dbpf("$(SCAN):scan1.D01PV", "$(MOTOR).RBV")
dbpf("$(SCAN):scan1.D02PV", "MTRTGR:TOD")
dbpf("$(SCAN):scan1.D03PV", "IBCAD00CRCUR6")
dbpf("$(SCAN):scan1.D04PV", "HALO:T:electron:tag:left:scaler_r1")
dbpf("$(SCAN):scan1.D05PV", "HALO:T:electron:tag:top:scaler_r1")
dbpf("$(SCAN):scan1.D06PV", "HALO:T:electron:tag:bottom:scaler_r1")
dbpf("$(SCAN):scan1.D07PV", "HALO:T:gamma:tag:left:scaler_r1")
dbpf("$(SCAN):scan1.D08PV", "HALO:T:gamma:tag:top:scaler_r1")
dbpf("$(SCAN):scan1.D09PV", "HALO:T:gamma:tag:right:scaler_r1")
dbpf("$(SCAN):scan1.D10PV", "HALO:T:gamma:tag:bottom:scaler_r1")
dbpf("$(SCAN):scan1.D11PV", "TAGH:T:232:scaler_r1")
dbpf("$(SCAN):scan1.D12PV", "TAGH:T:233:scaler_r1")
dbpf("$(SCAN):scan1.D13PV", "TAGH:A:232:scaler_r1")
dbpf("$(SCAN):scan1.D14PV", "TAGH:A:233:scaler_r1")
dbpf("$(SCAN):scan1.D15PV", "TAGH:T:1:scaler_r1")
dbpf("$(SCAN):scan1.D16PV", "TAGH:T:2:scaler_r1")
dbpf("$(SCAN):scan1.D17PV", "TAGH:T:3:scaler_r1")
dbpf("$(SCAN):scan1.D18PV", "TAGH:A:1:scaler_r1")
dbpf("$(SCAN):scan1.D19PV", "TAGH:A:2:scaler_r1")
dbpf("$(SCAN):scan1.D20PV", "TAGH:A:3:scaler_r1")
dbpf("$(SCAN):scan1.D21PV", "bpu:x:total_rate")
dbpf("$(SCAN):scan1.D22PV", "bpu:y:total_rate")
dbpf("$(SCAN):scan1.D23PV", "PSC:coinc:scaler:rate")
dbpf("$(SCAN):scan1.D24PV", "PS:coinc:scaler:rate")
dbpf("$(SCAN):scan1.D25PV", "activeTarget:rate")

dbpf("$(SCAN):scan1.T1PV", "$(SCAN):beamCheckBusy")

#dbpf("$(SCAN):scan1.P1SP", "30")
#dbpf("$(SCAN):scan1.P1EP", "90")
#dbpf("$(SCAN):scan1.P1SI", "0.05")
#dbpf("$(SCAN):scan1.PDLY", "1.2")
#dbpf("$(SCAN):scan1.DDLY", "0.5")

#dbpf("$(SCAN):saveData_fileSystem", "/gluex/data/HarpScans")
#dbpf("$(SCAN):saveData_fileSystem", "/home/hovanes/data/")
#dbpf("$(SCAN):saveData_subDir", "sscanData")
#dbpf("$(SCAN):saveData_baseName", "harp_electron_")
#