! MMS description file for STRATEGO
!		Gordon Howell @Hughes SCG     9/83
!
DEBUG = /NODEBUG
NOOP = /OPT
FFLAGS = /NOLIST $(NOOP) $(DEBUG)
LINKFLAGS = /NOMAP $(DEBUG)
PRINTFLAGS = /noDELETE

.SUFFIXES : .LIS 

STRATEGO : stratego.opt, stratego.exe, stratego.txt, stratego.dat, -
		stratego.hlp,stratego.qck
	! That's all she wrote...

ALL : STRATEGO, print, CLEANUP
	! performed a system build, hardcopy and cleanup

STRATEGO.EXE : stratego.obj, -
   STRATEGO.OLB(CANMOVE),-
   STRATEGO.OLB(CLOSEUP),-
   STRATEGO.OLB(COMLINK),-
   STRATEGO.OLB(WELCOME),-
   STRATEGO.OLB(DISPLAY),-
   STRATEGO.OLB(S_ERROR=ERROR.OBJ),-
   STRATEGO.OLB(FIRST_MOVE=FIRSTMOVE.OBJ),-
   STRATEGO.OLB(HELP),-
   STRATEGO.OLB(GETPIECE),-
   STRATEGO.OLB(INIT),-
   STRATEGO.OLB(IWAIT),-
   STRATEGO.OLB(LINKUP),-
   STRATEGO.OLB(MAIL),-
   STRATEGO.OLB(MOVE),-
   STRATEGO.OLB(MOVEPIECE),-
   STRATEGO.OLB(OUTPUT),-
   STRATEGO.OLB(POINT),-
   STRATEGO.OLB(RECAP),-
   STRATEGO.OLB(SETUP),-
   STRATEGO.OLB(STRIKE),-
   STRATEGO.OLB(GET_CHAR=KEYQIO.OBJ)
	- $(LINK) $(LINKFLAGS) stratego.obj, stratego/lib, stratego.opt/opt

CANMOVE.obj : stratego.inc
CLOSEUP.obj : stratego.inc
COMLINK.obj : stratego.inc
WELCOME.obj : stratego.inc
DISPLAY.obj : stratego.inc
ERROR.obj : stratego.inc
FIRSTMOVE.obj : stratego.inc
HELP.obj : stratego.inc
GETPIECE.obj : stratego.inc
INIT.obj : stratego.inc
IWAIT.obj : stratego.inc
LINKUP.obj : stratego.inc
MAIL.obj : stratego.inc
MOVE.obj : stratego.inc
MOVEPIECE.obj : stratego.inc
OUTPUT.obj : stratego.inc
POINT.obj : stratego.inc
RECAP.obj : stratego.inc
SETUP.obj : stratego.inc
STRIKE.obj : stratego.inc
KEYQIO.obj : stratego.inc
STRATEGO.inc : 
	! INCLUDE file for STRATEGO modules

STRATEGO.DAT : 
	! text file containing messages
STRATEGO.TXT : 
	! text file defining screen layout
STRATEGO.QCK : 
	! quick reference help file
STRATEGO.TXT : 
	! help file
STRATEGO.OPT : 
	! linker options file


CLEANUP : 
     library/replace stratego *.obj
     library/replace/text stratego *.for
  @- delete *.obj.*,*.for.*,*.lis.*,*.fdl.*,*.mms.*,STRATEGO.DAT.*,*.map.*
  @- purge

PRINT :     MOVE.LIS,-
    IWAIT.LIS,-
    GETPIECE.LIS,-
    CANMOVE.LIS,-
    MOVEPIECE.LIS,-
    POINT.LIS,-
    KEYQIO.LIS,-
    STRIKE.LIS,-
    RECAP.LIS,-
    ERROR.LIS,-
    CLOSEUP.LIS,-
    OUTPUT.LIS,-
    STRATEGO.DAT,-
    PRINT1
	! creating dummy file...
	@- COPY NL: PRINT1.DAT
	PRINT $(PRINTFLAGS)/NOTIFY $?

PRINT1 :  STRATEGO.LIS,-
    COMLINK.LIS,-
    WELCOME.LIS,-
    LINKUP.LIS,-
    INIT.LIS,-
    SETUP.LIS,-
    DISPLAY.LIS,-
    FIRSTMOVE.LIS,-
    HELP.LIS,-
    MAIL.LIS
	PRINT $(PRINTFLAGS)/NOTIFY $?

! Default used for the PRINT target 
.DEFAULT :		
	element_name = "$@"
	file_type = f$parse(element_name,,,"TYPE")
	if file_type .eqs. ".LIS" then -
	   element_name = element_name - ".LIS" +".FOR"
	if file_type .eqs. ".LIS" then -
	   $(FORT) /LIST/NOOBJECT 'element_name'