$!========================================================================
$!
$! Name      : BUILD_LSMP
$!
$! Purpose   : Build the Lookup System Manager program
$!             NOTE: The logicals D0$LEVEL1$LSMPROG, 
$!                   and D0$LEVEL1$LSMLIB must have been defined.
$!                   Also, the sources for the LSM library must be in the
$!                   directory D0$LEVEL1$LSMLIB.
$!
$! Arguments : 
$!
$! Created  14-SEP-1990   MICHIGAN STATE UNIVERSITY, TRIGGER CONTROL SOFTWARE
$!
$!========================================================================
$   ON ERROR     THEN $ GOTO EXIT
$   ON CONTROL_Y THEN $ GOTO EXIT
$
$ WRITE SYS$OUTPUT "LSMP uses LSMLIB D0$LEVEL1, D0$INC, D0$PARAMS"
$ SHOW LOGICAL          D0$LEVEL1$ROOT, D0$INC$ROOT, D0$PARAMS$ROOT 
$ 
$   @AUTO_DEF_LOCAL 
$   
$   cd LSMP$BASE:
$   
$   IF ( P1 .NES. "DEBUG" ) THEN debug = "NODEBUG"
$   IF ( P1 .NES. "DEBUG" ) THEN DEB = ""
$   IF ( P1 .NES. "DEBUG" ) THEN DEBLINK = ""
$   
$   IF ( P1 .EQS. "DEBUG" ) THEN DEBUG = "DEBUG=ALL/NOOP"
$   IF ( P1 .EQS. "DEBUG" ) THEN DEB = "DEB_"
$   IF ( P1 .EQS. "DEBUG" ) THEN DEBLINK = "/DEBUG"
$   
$   IF ( P2 .EQS. "LINK" ) THEN GOTO link
$   
$   PIPE FORTRAN/'DEBUG' LSMP$SOURCE:*.FOR
$   
$   LIB 'DEB'LSMPROG.OLB/CREATE
$   PURGE 'DEB'LSMPROG.OLB
$   LIB 'DEB'LSMPROG *.OBJ
$   DELE/NOCONF *.OBJ;*
$link:   
$   link'DEBLINK' 'DEB'lsmprog/lib/INCLUDE=LSMPROG, -
D0$LEVEL1:'DEB'LEVEL1/LIB, -
d0$general:'DEB'general/lib, -
d0$cernlib:npacklib/lib, -
d0$cernlib:kernlib/lib
$   
$  S = $STATUS
$  S[0,5] := ""
$  IF ( S .NES. "      0001") THEN $ GOTO EXIT
$
$   mendirect LSMP$SOURCE:lsm_menm.set
$   mendirect LSMP$SOURCE:prom_lsm.set
$   mendirect LSMP$SOURCE:simu_lsm.set
$   
$EXIT:
$   EXIT