.;**-
	.;	Module name: MAKDOS - CREATE TECO DISTRIBUTION TAPE
	.;
	.;	Version X01.01	Last edit: 28-OCT-80 09:47
	.;	Status: Development/Debugging
	.;
	.;	Revision history:
	.;
	.;		Version X01.00 12-MAR-80 09:54 - 28-OCT-80 09:47
	.;		Created by: K.J. CROSS
	.;
	.;		Version X01.01 28-OCT-80 09:47 - 28-OCT-80 09:47
	.;		Modified by: KJC
	.;		ADDED MACRO FILES
	.;
	.;**-
	.ENABLE	SUBSTITUTION
	.ENABLE	GLOBAL
	.ASKS	$OUTTP WHERE IS THE TAPE MOUNTED [MMN:]
	.XQT	FLX '$OUTTP'/DO/ZE/DNS:800
	PIP FILCOP.CMD;*/DE/NM,TAPFILCOP.CMD;*
	MUN MAKFILCOP
	.WAIT	FLX
	FLX '$OUTTP'/DO=TECGEN.CMD,MAKDOS.CMD/RS
	FLX '$OUTTP'/DO/-RW=TECBLD.CMD/RS,TECBLD.ODL,TECFCS.CMD,TECFCS.ODL
	FLX '$OUTTP'/DO/-RW=TEC.OLB/RS,PIPUTL.OLB,FILCOP.CMD,LB:[1,54]TEC.TSK
	FLX '$OUTTP'/DO/-RW=TECPRE.MAC/RS,CRTRUB.MAC,GETFLS.MAC,TTYOUT.MAC
	@TAPFILCOP
	.IFINS	MTA	MTA '$OUTTP'/RW