# File: day_load.src
# PURPOSE: To load the IP and DEP with the necessary pieces of code
#	   to run structure 
# HISTORY: Written 5-Oct-95
#	24-Oct-95 (MDM) - Added non-interactive starting capability by using
#			  GI0
#	30-Oct-95 (CED) - Removed "cd" evil, and moved to eof/src/gsct4 directory
#
#
program "%Z% MODULE: %M% RELEASE: %R%.%L% CREATED: %G% %U%"
source "/mdisw/cfl/dev/src/day_load.src"
descr "day_load - load IP and DEP with code to run struct"

if !GI0 > 0 then
    setstr !LS2 = "Y"
    setstr !LS3 = "Y"
    setstr !LS4 = "Y"
else 
    ask !LS2 "Would you like to load Structure? (Y/N)"
    ask !LS3 "Would you like to load IP Campaign? (Y/N)"
    ask !LS4 "Would you like to load DEP Campaign? (Y/N)"
end if


perf reset		## MDM added 17-Oct-95

if !LS2 = "Y" then

 # -------------------- General stuff
## cd c "sim"
## perf pat100a2		## The command echo DEP patch

 # -------------------- Mathur structure stuff
# cd c "dev" ## BEGONE CD DEMONS! YOU VEX ME! --CED
 perf ldstr		## Load the IP structure program and lists
 perf lrbin4x4
 wait time 4
 perf lrbin8x8
 wait time 4
 perf lrbin2x2		## Load the 2x2 binning table (LRBIN)
 wait time 4
end if


if !LS3 = "Y" then

 # -------------------- Morrison IP campaign stuff
# cd c "dev2" ## BEGONE CD DEMONS! YOU VEX ME! --CED

 perf test_all		## load all subroutines and registers

end if

if !LS4 = "Y" then

 # -------------------- Morrison DEP campaign stuff
# cd c "dev2"  ## BEGONE CD DEMONS! YOU VEX ME! --CED
 perf tap_cont1		## load the frame list (obs#8 for VC2 cam),  ID = CCC
 perf tap_cont2		## load the frame list (obs#14 for VC3 cam), ID = CC2
 perf tap_cont3		## load the frame list (obs#15 for New Cam), ID = CC3
 perf tap_burst1	## load the frame list (obs#7  (not used) )
 perf fltgram_obs1	## load the frame list (obs#16 (not used) ), ID = DDD

 perf cam_alt30mag	## load campaign list (Addr = '0000', obs#3),  ID = 001
 perf cam_tapcont	## load campaign list (Addr = '0020', obs#8 ), ID = 021
 perf cam_tapcont2	## load campaign list (Addr = '0040', obs#14), ID = 022
 perf cam_tapcont3	## load campaign list (Addr = '0060', obs#15), ID = 023
 perf cam_tapburst	## load campaign list (Addr = '0080', obs#7),  ID = 002
 perf cam_fltgram	## load campaign list (Addr = '00a0', obs#16), ID = 0d1
end if

 # -------------------- Back to where we were (would like that to be dynamic)
# cd c "dev" ## BEGONE CD DEMONS! YOU VEX ME! --CED
