中国DOS联盟

But everyone's enthusiasm is worthy of recognition.

Originally posted by xiaoqiangzx at 2007-1-16 09:47:
First of all, I very much admire everyone's professional knowledge and enthusiasm for learning~~
　I, the younger brother, have something to say
DOS is not like C++, can it be simple? ~~~
　Don't make it seem very profound, be popular...

It is not okay to use the task scheduler to run the delete command every 100 days, because the LZ requires deleting files that are 100 days ago, not deleting files every 100 days. The difference between these should be very obvious, right?

For example: A file created on the 99th day should be deleted on the 199th day. If you don't calculate and judge, and directly kill everything every 100 days, a file created on the 99th day will be deleted the next day.

@ECHO OFF

:TOP0

FOR /L %%i IN (1,1,12) DO SET /A M%%i=30+(%%i+%%i/8)%%2

CALL :ALG M %DATE:~5,2%&&CALL :ALG ND %DATE:~8,2%

SET /A DAY=125-ND,NY=%DATE:~0,4%

:TOP1

CALL :CALC M2 ((NY-2000)%%4) -1)*-1+28 (

CALL :CALC M (M-1) -1)*-1*12+M-1 (

SET /A DAY-=M%M%,NY-=M/12

SET /A 1/((DAY+1)/DAY) 2>nul&&GOTO TOP1||GOTO START

:START

CALL :CALC DAY DAY *-DAY

CALL :CALC DM (M-1) -1)*-1*12*(((DAY*2/(DAY*2-1))-1)*-1)+(M+(DAY*2/(DAY*2-1)-1)) (

CALL :CALC DAY+ (M-DM)

SET /A DY=NY-DM/12

:TOOL

IF %DM% LSS 10 SET DM=0%DM%

IF %DAY% LSS 10 SET DAY=0%DAY%

ECHO %DY%-%DM%-%DAY%

FOR /R F: %%i IN (*.exe) DO CALL :CHKDEL %%i %%~ti

pause

GOTO :EOF



:CHKDEL

IF "%2" == "%DY%-%DM%-%DAY%" ECHO %2 -- %1

GOTO :EOF

:CALC

SET /A %1=%4((%2*2+1)%%2*%2*10)/%5((%2*2+1)%%2*%2*10-1)%3

GOTO :EOF

:ALG

SET CHKALG=%2

SET /A %1=%CHKALG:~0,1%*10+%CHKALG:~-1%

GOTO :EOF

Writing this is the most tiring

@ECHO OFF

:TOP0

FOR /L %%i IN (1,1,12) DO SET /A M%%i=30+(%%i+%%i/8)%%2

CALL :ALG M %DATE:~5,2%&&CALL :ALG ND %DATE:~8,2%

SET /A DAY=125-ND,NY=%DATE:~0,4%

:TOP1

CALL :CALC M2 ((NY-2000)%%4) -1)*-1+28 (

CALL :CALC M (M-1) -1)*-1*12+M-1 (

SET /A DAY-=M%M%,NY-=M/12

SET /A 1/((DAY+1)/DAY) 2>nul&&GOTO TOP1||GOTO START

:START

CALL :CALC DAY DAY *-DAY

CALL :CALC DM (M-1) -1)*-1*12*(((DAY*2/(DAY*2-1))-1)*-1)+(M+(DAY*2/(DAY*2-1)-1)) (

CALL :CALC DAY+ (M-DM)

SET /A DY=NY-DM/12

:TOOL

IF %DM% LSS 10 SET DM=0%DM%

IF %DAY% LSS 10 SET DAY=0%DAY%

ECHO %DY%-%DM%-%DAY%

FOR /R F: %%i IN (*.exe) DO CALL :CHKDEL %%i %%~ti

pause

GOTO :EOF



:CHKDEL

IF "%2" == "%DY%-%DM%-%DAY%" ECHO %2 -- %1

GOTO :EOF

:CALC

SET /A %1=%4((%2*2+1)%%2*%2*10)/%5((%2*2+1)%%2*%2*10-1)%3

GOTO :EOF

:ALG

SET CHKALG=%2

SET /A %1=%CHKALG:~0,1%*10+%CHKALG:~-1%

GOTO :EOF

Everyone thinks there should be code execution, and the thinking is a bit rigid. The brother on the 13th floor is very good.

forfiles /p D:\C1 /d -100 /c "cmd /c del @file"

For example, to delete the files under the D:\C1 folder. Using the forfiles that comes with Microsoft Windows 2003 is really a tenth of the effort but a hundred times the result.

forfiles /p D:\C1 /d -100 /c "cmd /c del @file"

Last edited by aspirer on 2007-1-20 at 10:32 PM ]

The understanding of building 13 is incorrect, but the idea is good.
The idea of building 20 is also not bad.
But it only runs under 2003.

A bit complicated, can't understand it very well, but still thank you.