# Example vxWorks startup file

# Following must be added for many board support packages
#cd <full path to target bin directory>
cd "/SCSpro/can/iocBoot/iocexample"
< cdCommands

#< ../nfsCommands
cd appbin
ld < iocCore
ld < seq


cd share
ld < ipacLib
ld < tip810Lib
ld < tyGSOctal.o

cd appbin
ld < exampleLib

tyGSOctalDrv 1
# now some CANbus stuff
#ipacAddCarrier(&ipmv162,"A:l=5,3")
#ipacAddCarrier(&ipmv162,"A:l=5,3;C:l=4,4 m=0xe0000000,64")
ipacAddCarrier(&ipmv162,"A:l=6,7;B:l=4,5;C:l=3,3 m=0xe0000000,64")
#ipacAddCarrier(&ipmv162,"A:l=5,3;B:l=7,6;C:l=4,4 m=0xe0000000,64")
#ipacAddCarrier(&ipmv162,"C:l=4,4 m=0xe0000000,64")

ipacReport(2)
#STR7201Config(0,32,1024)


# Create devices
MOD0 = tyGSOctalModuleInit("GSIP_OCTAL232", 0x70, 0, 2)

PORT00 = tyGSOctalDevCreate("/tyGS/0/0", MOD0, 0, 512, 512)
PORT01 = tyGSOctalDevCreate("/tyGS/0/1", MOD0, 1, 512, 512)
PORT02 = tyGSOctalDevCreate("/tyGS/0/2", MOD0, 2, 512, 512)
PORT03 = tyGSOctalDevCreate("/tyGS/0/3", MOD0, 3, 512, 512)

# Config ports
# baud, parity(N/E/O), stop, bits, flow(N/H)
tyGSOctalConfig PORT00, 9600, 'N', 1, 8, 'N'
tyGSOctalConfig PORT01, 9600, 'N', 1, 8, 'N'
tyGSOctalConfig PORT02, 9600, 'N', 1, 8, 'N'
tyGSOctalConfig PORT03, 9600, 'N', 1, 8, 'N'

#
# The following uses the EPICS drvNode/devNode support
#
# Create NODEs - device support uses these names
WAAGE1 = drvNodeInit("/tyGS/0/0")
#WAAGE1 = drvNodeInit("/tyCo/1")
WAAGE2 = drvNodeInit("/tyGS/0/1")
WAAGE3 = drvNodeInit("/tyGS/0/2")
WAAGE4 = drvNodeInit("/tyGS/0/3")

# Configure NODE delimiters
drvNodeSetDelim WAAGE1, 0, 2, "\015\012", 0x00
drvNodeSetDelim WAAGE2, 0, 2, "\015\012", 0x00
drvNodeSetDelim WAAGE3, 0, 2, "\015\012", 0x00
drvNodeSetDelim WAAGE4, 0, 2, "\015\012", 0x00
#

t810Create("can1",0,0,250)
t810Create("can2",0,1,250)
#t810Report(1)
callbackSetQueueSize(2500)
cd startup
dbLoadDatabase("../../dbd/exampleApp.dbd")
#dbLoadDatabase("../../dbd/mcaRecord.dbd")
dbLoadRecords("../../db/VMEcrate.db")
#dbLoadRecords("../../db/CAMACcrate.db")
#dbLoadRecords("../../db/cansvcd.db")
#dbLoadRecords("../../db/momops.db")
#dbLoadRecords("../../db/shopomo.db")
#dbLoadRecords("../../db/momops_single.db","PRE=HAD, plane=1, sector=1, id=0, OPER=mdc")
dbLoadRecords("/SCSpro/camac/db/vxStats.db","IOC=HAD:hadsc1")
dbLoadRecords("../../db/t810status.db")
dbLoadRecords("../../db/ArchiverDisable.db")
dbLoadRecords("../../db/siam.db")
#dbLoadRecords("../../db/scaler.db")
#dbLoadRecords("../../db/dbExample2.db")
dbLoadRecords("../../db/MDCgaswaage.db")
#dbLoadRecords("../../db/seqtest.db")
dbLoadRecords("../../db/XYCOM566.db")
dbLoadRecords("../../db/spill.db")
dbLoadRecords("../../db/interlck.db")
dbLoadRecords("../../db/interlckgasA.db")
dbLoadRecords("../../db/interlcktemp.db")
#dbLoadRecords("../../db/sde.db")
#dbLoadRecords("../../db/RICHLV.db")
dbLoadRecords("../../db/RICHHVcurr.db")
dbLoadRecords("../../db/RICHGAS.db")
dbLoadRecords("../../db/message.db")
#dbLoadRecords("../../db/MDCMUX.db")
#t810Report(1)
#t810Report(2)

# load the old discriminators registers
#discriminator
asSetFilename("../../../hades.acf")
iocInit
#seq &dtu_ctrl
dbpf "HAD:waage_3_net.HIGH","60"
dbpf "HAD:waage_3_net.HIHI","60"
dbpf "HAD:waage_1_out","<A>"
dbpf "HAD:waage_2_out","<A>"
dbpf "HAD:waage_3_out","<A>"
dbpf "HAD:waage_4_out","<A>"
dbpf "HAD:waage_1_tar","65.6"
dbpf "HAD:waage_2_tar","64.25"
dbpf "HAD:waage_3_tar","27.3"
dbpf "HAD:waage_4_tar","65.7"
dbpf "HAD:SHW:O2rangein1","1000."
dbpf "HAD:MDC:O2rangein","1000."
dbpf "HAD:SHW:O2rangein2","1000."
dbpf "HAD:RPC:O2rangein","1000."
taskDelay(200)
dbpf "HAD:hadsc1:btime.PROC","1"
#t810Report(1)
#t810Report(2)