$ ! FINDLOCK.BLD - BUILDS FINDLOCK.EXE $ ON WARNING THEN EXIT $STATUS $ IF F$SEARCH("SHOW_LOCK.OBJ") .EQS. "" THEN GOTO NOSHOW $ WRITE SYS$OUTPUT "(Using Existing SHOW_LOCK.OBJ...)" $ GOTO TSTFIN $NOSHOW:WRITE SYS$OUTPUT "Compiling SHOW_LOCK..." $ BASIC/LONG SHOW_LOCK.BAS $TSTFIN:IF F$SEARCH("FINDLOCK.OBJ") .EQS. "" THEN GOTO NOFIND $ WRITE SYS$OUTPUT "(Using Existing FINDLOCK.OBJ...)" $ GOTO DOLNK $NOFIND:WRITE SYS$OUTPUT "Compiling FINDLOCK..." $ BASIC/LONG FINDLOCK $DOLNK: LINK/NOTRACEBACK FINDLOCK,SHOW_LOCK $ PURGE/NOLOG/NOCONFIRM FINDLOCK.EXE $ WRITE SYS$OUTPUT "Note: FINDLOCK should be installed with", - " WORLD,CMEXEC privs"