2016-05-01 21:13:54 +00:00
|
|
|
|
NEW
|
2019-07-26 14:23:07 +00:00
|
|
|
|
AUTO 3,1
|
2016-05-01 21:13:54 +00:00
|
|
|
|
.LIST OFF
|
|
|
|
|
|
.OP 65C02
|
|
|
|
|
|
.OR $2000
|
2020-02-23 20:46:25 +00:00
|
|
|
|
.TF bin/cp
|
2016-05-01 21:13:54 +00:00
|
|
|
|
*--------------------------------------
|
2020-05-21 12:55:49 +00:00
|
|
|
|
.INB inc/macros.i
|
|
|
|
|
|
.INB inc/a2osx.i
|
|
|
|
|
|
.INB inc/mli.i
|
|
|
|
|
|
.INB inc/mli.e.i
|
2016-05-01 21:13:54 +00:00
|
|
|
|
*--------------------------------------
|
2019-04-29 15:47:17 +00:00
|
|
|
|
X.ENTER.SUBDIR .EQ 0
|
2017-02-21 17:01:30 +00:00
|
|
|
|
X.COPY.TO.DEST .EQ 1
|
2016-11-01 21:37:12 +00:00
|
|
|
|
X.DELETE.SOURCE .EQ 0
|
2016-05-01 21:13:54 +00:00
|
|
|
|
*--------------------------------------
|
2020-08-25 14:54:30 +00:00
|
|
|
|
.INB usr/src/shared/x.cpmvrm.s
|
|
|
|
|
|
.INB usr/src/shared/x.fileenum.s
|
2016-05-01 21:13:54 +00:00
|
|
|
|
*--------------------------------------
|
2016-11-01 21:37:12 +00:00
|
|
|
|
CS.END
|
2016-05-01 21:13:54 +00:00
|
|
|
|
*--------------------------------------
|
2021-06-26 20:24:25 +00:00
|
|
|
|
OptionList .AS "CcQqRrYy"
|
|
|
|
|
|
OptionVars .DA #bContinue,#bContinue
|
|
|
|
|
|
.DA #bQuiet,#bQuiet
|
|
|
|
|
|
.DA #bRecurse,#bRecurse
|
|
|
|
|
|
.DA #bNoConfirm,#bNoConfirm
|
2016-05-01 21:13:54 +00:00
|
|
|
|
*--------------------------------------
|
2019-10-28 06:32:12 +00:00
|
|
|
|
MSG.USAGE .AS "Usage : CP [Src File/Dir, *,? wildcards allowed]\r\n"
|
|
|
|
|
|
.AS " -C : Continue on error\r\n"
|
|
|
|
|
|
.AS " -Q : Quiet\r\n"
|
|
|
|
|
|
.AS " -R : Recurse subdirectories\r\n"
|
2021-06-26 20:24:25 +00:00
|
|
|
|
.AZ " -Y : Don't prompt for override\r\n"
|
2018-04-11 15:35:51 +00:00
|
|
|
|
MSG.DIR .AZ "CP Dir :%s to %s..."
|
2020-02-29 14:06:28 +00:00
|
|
|
|
MSG.REG .AZ "CP File:%s to %s..."
|
2018-04-11 15:35:51 +00:00
|
|
|
|
MSG.OVERWRITE .AZ "Overwrite %s [Yes,No,All]?"
|
2018-08-23 15:16:20 +00:00
|
|
|
|
MSG.OK .AZ "[OK]"
|
2019-10-28 06:32:12 +00:00
|
|
|
|
MSG.ERR .AS "[%h]"
|
|
|
|
|
|
MSG.CRLF .AZ "\r\n"
|
2018-04-11 15:35:51 +00:00
|
|
|
|
MSG.DONE .AZ "%D File(s) Copied.\r\n"
|
2016-05-01 21:13:54 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
|
.DUMMY
|
|
|
|
|
|
.OR 0
|
2021-06-26 20:24:25 +00:00
|
|
|
|
DS.START .INB usr/src/shared/x.cpmvrm.g
|
2020-08-25 14:54:30 +00:00
|
|
|
|
.INB usr/src/shared/x.fileenum.g
|
|
|
|
|
|
DS.END .ED
|
2016-05-01 21:13:54 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
|
MAN
|
2020-05-21 12:55:49 +00:00
|
|
|
|
SAVE usr/src/bin/cp.s
|
2016-05-01 21:13:54 +00:00
|
|
|
|
ASM
|
