DosTips.com

Code: Select all

@echo off
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:set folder="C:\Users\DiskRetail\Desktop\New folder (3)" IS THE LOCATION
:TO DELEAT ALL FILES
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
set folder="C:\Documents and Settings\jjlyon\Desktop\Sign Files\Signs to Print"
cd /d %folder%
for /F "delims=" %%i in ('dir /b') do (rmdir "%%i" /s/q || del "%%i" /s/q)
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:CODE THAT ADDS '.bmp' AT THE END OF EACH LINE IN THE TEXT FILE
:Set _t0=C:\Users\DiskRetail\Desktop\New folder (TXT FILE DESTINATION)
:Set _t1=0names.txt (TXT FILE NAME)
:Set _t3=.bmp (WORD TO ADD AT THE END OF EACH LINE)
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
Set _t0=C:\Documents and Settings\jjlyon\Desktop\Sign Files
Set _t1=0names.txt
Set _t3=.bmp
PUSHD %_t0%
If EXIST tmp.txt del tmp.txt
For /F "usebackq delims=" %%A in ("%_t1%") do echo %%A%_t3% >>tmp.txt
del "%_t1%"
rename tmp.txt "%_t1%"
For %%A in (0 1 2) do Set _t%%A=
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:CODE THAT COPYS AND RENAMES FILES FROM ONE FOLDER INTO ANOTHER FROM A TEXT LIST
:set "target=C:\Users\DiskRetail\Desktop\New folder\names" (DESTINATION FOLDER)
:for /f "delims=" %%a in (names.txt) do (  (NAME OF TXT FILE)
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
setlocal EnableDelayedExpansion
set "target=C:\Documents and Settings\jjlyon\Desktop\Sign Files\Signs to Print"
set num=0
for /f "delims=" %%a in (0names.txt) do (
set /a num=num+1
set c=00!num!
set c=!c:~-2!
for /f "delims=" %%b in ('dir "%%a" /a:-d /o:n /b /s') do call :next "%%~fa"
)

pause
GOTO:EOF

:next
echo processing %1
pushd "%target%"
set fnum=
:loop
if exist "??%~n1!fnum!%~x1" (
set /a fnum=fnum+1
goto :loop
)
copy /b /y "%~1" "!c!%~n1!fnum!%~x1" >nul
popd

Code: Select all

@Echo OFF

REM ====[ settings ]==================
SET "Items=%userprofile%\desktop\1.txt"
SET "Amount=%userprofile%\desktop\2.txt"
SET "Total=%userprofile%\desktop\Total.txt"

REM ====[ Read Two Files and Multiply ]============
(
   For /F "delims=" %%A in ('Type "%Items%"') Do (
      Setlocal EnableDelayedExpansion
         Set /p line=
         rem !line! is the numbers from %Amount%
         CALL :Multiply "%%A" "!line!"
      Endlocal
   )
)<"%Amount%">>"%Total%"

Pause
Exit /B

:Multiply
For /L %%A In ( 1 1 %~2 ) Do (
   Echo %~1
   )
Goto :EOF

Code: Select all

@Echo OFF

REM ====[ settings ]==================
SET "Items=%userprofile%\desktop\1.txt"
SET "Amount=%userprofile%\desktop\2.txt"
SET "Total=%userprofile%\desktop\Total.txt"

REM ====[ Replace Empty Lines with Empty Word]=====
For /F %%A In ('Type "%Items%"^|find /v /c ""') Do Set "TotalLines=%%A"
Setlocal EnableDelayedExpansion
<"%Items%" (
   For /L %%A IN ( 1 1 %TotalLines% ) Do (
      SET "Line="
      SET /P "Line="
      IF "!line!" == "" ( Echo Empty
         ) Else ( Echo !Line! )
      )
   )>"Temp.tmp"
Endlocal

REM ====[ Read Two Files and Multiply ]============
(
   For /F "delims=" %%A in ('Type "Temp.tmp"') Do (
      Setlocal EnableDelayedExpansion
         Set /p line=
         rem !line! is the numbers from %Amount%
       CALL :Multiply "%%A" "!line!"
      Endlocal
   )
)<"%Amount%">>"%Total%"

REM ====[ Clean Temporary File ]===================
DEL /F /Q "Temp.tmp" >NUL
Pause
Exit /B

:Multiply
For /L %%A In ( 1 1 %~2 ) Do (
   Echo %~1
   )
Goto :EOF

Code: Select all

         ) Else ( Echo !Line! )

Code: Select all

         ) Else ( Echo !Line!)

Code: Select all

:Multiply
For /L %%A In ( 1 1 %~2 ) Do (
   Echo %~1
   )

Code: Select all

:Multiply
For /L %%A In ( 1 1 %~2 ) Do (
   for /f "delims=" %%z in ("%~1") do echo %%~z
   )