A2osX/BIN/MV.S.txt

NEW
PREFIX /A2OSX.BUILD
AUTO 4,1
				.LIST OFF
				.OP	65C02
				.OR	$2000
				.TF /A2OSX.BUILD/BIN/MV
*--------------------------------------
				.INB /A2OSX.BUILD/INC/MACROS.I
				.INB /A2OSX.BUILD/INC/A2OSX.I
				.INB /A2OSX.BUILD/INC/MLI.ERR.I				
*--------------------------------------
X.COPY.TO.DEST	.EQ 1
X.DELETE.SOURCE	.EQ 1				
*--------------------------------------
				.INB /A2OSX.SRC/BIN/X.CPMVRM.S
				.INB /A2OSX.SRC/BIN/X.FILEENUM.S
*--------------------------------------
CS.END
*--------------------------------------
OptionList		>PSTR "CRYQcryq"
OptionVars		.DA #bContinue,#bRecurse,#bNoConfirm,#bQuiet,#bContinue,#bRecurse,#bNoConfirm,#bQuiet
*--------------------------------------
MSG.USAGE		>CSTR "Usage : MV [Src File/Dir, *,? wildcards allowed]\r\n   -C : Continue on error\r\n   -Q : Quiet\r\n   -R : Recurse subdirectories\r\n   -Y : Dont't prompt for override\r\n"
MSG.DIR			>CSTR "MV Dir :%S to %S..."
MSG.FILE		>CSTR "MV File:%S to %S..."
MSG.OVERWRITE	>CSTR "Overwrite %S [Yes,No,All]?"
MSG.OK			>CSTR "[OK]\r\n"
MSG.ERR			>CSTR "[%h]\r\n"
MSG.DONE		>CSTR "%D File(s) Moved.\r\n"
*--------------------------------------
				.DUMMY
				.OR 0
DS.START
bContinue		.BS 1
bRecurse		.BS 1
bNoConfirm		.BS 1
bQuiet			.BS 1
				.INB /A2OSX.SRC/BIN/X.CPMVRM.G
				.INB /A2OSX.SRC/BIN/X.FILEENUM.G
				
DS.END
				.ED
*--------------------------------------
MAN
SAVE /A2OSX.SRC/BIN/MV.S
ASM