2015-08-05 20:38:05 +00:00
|
|
|
|
NEW
|
2019-05-02 09:52:32 +00:00
|
|
|
|
AUTO 3,1
|
2015-08-05 20:38:05 +00:00
|
|
|
|
.LIST OFF
|
|
|
|
|
.OP 65C02
|
|
|
|
|
.OR $2000
|
2020-02-23 20:46:25 +00:00
|
|
|
|
.TF bin/rm
|
2015-08-05 20:38:05 +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
|
2015-08-05 20:38:05 +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 0
|
2017-02-22 16:32:02 +00:00
|
|
|
|
X.DELETE.SOURCE .EQ 1
|
2016-10-30 18:19:43 +00:00
|
|
|
|
*--------------------------------------
|
2020-08-25 14:54:30 +00:00
|
|
|
|
.INB usr/src/shared/x.cpmvrm.s
|
|
|
|
|
.INB usr/src/shared/x.fileenum.s
|
2015-08-05 20:38:05 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
CS.END
|
2016-10-30 18:19:43 +00:00
|
|
|
|
*--------------------------------------
|
2021-06-26 20:24:25 +00:00
|
|
|
|
OptionList .AS "CcQqRr"
|
|
|
|
|
OptionVars .DA #bContinue,#bContinue
|
|
|
|
|
.DA #bQuiet,#bQuiet
|
|
|
|
|
.DA #bRecurse,#bRecurse
|
2016-10-30 18:19:43 +00:00
|
|
|
|
*--------------------------------------
|
2019-02-28 09:55:51 +00:00
|
|
|
|
MSG.USAGE .AS "Usage : RM [File/Dir, *,? wildcards allowed]\r\n"
|
|
|
|
|
.AS " -C : Continue on error\r\n"
|
|
|
|
|
.AS " -Q : Quiet\r\n"
|
|
|
|
|
.AZ " -R : Recurse subdirectories\r\n"
|
2019-01-17 15:05:48 +00:00
|
|
|
|
MSG.DIR .AZ "RM Dir :%s..."
|
2020-02-29 14:06:28 +00:00
|
|
|
|
MSG.REG .AZ "RM File:%s..."
|
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) Removed.\r\n"
|
2015-08-05 20:38:05 +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
|
2021-06-26 20:24:25 +00:00
|
|
|
|
DS.END .ED
|
2015-08-05 20:38:05 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
MAN
|
2020-05-21 12:55:49 +00:00
|
|
|
|
SAVE usr/src/bin/rm.s
|
2015-08-05 20:38:05 +00:00
|
|
|
|
ASM
|