@echo off
:ks
copy /y 1.html 2.html
if exist ..\标志2.ini goto ks
if exist ..\标志3.ini goto ks
echo,>>..\标志1.ini
htox32c /IP /O0 /U1+4 2.html
del /q 2.html
del /q ..\标志1.ini
echo 其他语句
if exist *.html goto ks
复制代码

@echo off 2>con 3>&2 4>>%0
echo single instance batch
echo http://demon.tw
pause
复制代码

:WaitLock
if exist "..\file.lock" (
    echo Wait ..\file.lock to be deleted
    timeout /t 1 /nobreak >nul
    goto :WaitLock
)
type nul >"..\file.lock"
htox32c /IP /O0 /U1+4 2.html
del /f /q "..\file.lock"
复制代码

@echo off
:loop
set str=%random%%random%%random%
if exist "htox32c.exe" (
	ren "htox32c.exe" "htox32c%str%.exe" 2>nul
)
if exist "htox32c%str%.exe" (
	"htox32c%str%.exe" /IP /O0 /U1+4 2.html
) else (
	timeout 1 >nul
	goto :loop
)
ren "htox32c%str%.exe" "htox32c.exe"
复制代码

@echo off
set str=%random%%random%%random%
:loop
if exist "d:\htox32c.exe" (
	ren "d:\htox32c.exe" "htox32c%str%.exe" 2>nul
)
if exist "d:\htox32c%str%.exe" (
	"d:\htox32c%str%.exe" /IP /O0 /U1+4 2.html
) else (
	timeout 1 >nul
	goto :loop
)
ren "d:\htox32c%str%.exe" "htox32c.exe"
复制代码

@echo off
%1 (for %%a in (1 2 3) do (start "" "%~f0" rem %%a))&exit

if "%~2" equ "1" (
	pushd "d:\test1"
) else if "%~2" equ "2" (
	pushd "d:\test2"
) else if "%~2" equ "3" (
	pushd "d:\test3"
) else goto:eof

set str=%~2

:loop
if exist "d:\htox32c.exe" (
	ren "d:\htox32c.exe" "htox32c%str%.exe" 2>nul
)
if exist "d:\htox32c%str%.exe" (
	"d:\htox32c%str%.exe" /IP /O0 /U1+4 2.html
) else (
	timeout 1 >nul
	goto :loop
)
ren "d:\htox32c%str%.exe" "htox32c.exe"
复制代码

@echo off
set b=1
set "ph=d:\a"

:s
cd.>"%ph%\标志1.ini"
call set a=%%b%%
del "%ph%\标志1.ini" 2>nul

cd.>"%ph%\标志2.ini"
call set a=%%b%%
del "%ph%\标志2.ini" 2>nul

cd.>"%ph%\标志3.ini"
call set a=%%b%%
del "%ph%\标志3.ini" 2>nul

goto :s
复制代码

@echo off
set b=1
set "ph1=wjj1"
set "ph2=wjj2"
set "ph3=wjj3"
start "%ph1%\aaa.bat"
start "%ph2%\aaa.bat"
start "%ph3%\aaa.bat"
:a
cd.>"%ph1%\标志.ini"
call set a=%%b%%
goto :b
:b
if exist "%ph1%\标志.ini" goto :b
cd.>"%ph2%\标志.ini"
call set a=%%b%%
goto :c
:c
if exist "%ph2%\标志.ini" goto :c
cd.>"%ph3%\标志.ini"
call set a=%%b%%
goto :d
:d
call set a=%%b%%
if exist "%ph3%\标志.ini" goto :d
goto :a
复制代码

@echo off
:ks
copy /y 1.html 2.html
if not exist ..\标志.ini goto ks
htox32c /IP /O0 /U1+4 2.html
del /q 2.html
del /q ..\标志.ini
echo 其他语句
if exist *.html goto ks
复制代码

@echo off
set wj1=wj1
set wj2=wj2
set wj3=wj3
:loop
for /f "delims=" %%i in ('dir /b %wj1%\*.htm') do (
htox32c.exe %%i
)
for /f "delims=" %%i in ('dir /b %wj2%\*.htm') do (
htox32c.exe %%i
)
for /f "delims=" %%i in ('dir /b %wj3%\*.htm') do (
htox32c.exe %%i
)
goto :loop
复制代码

@echo off
:ks
copy /y 1.html 2.html

tasklist|findstr "^htox32c.exe" >nul&&goto :ks

htox32c /IP /O0 /U1+4 2.html
del /q 2.html

echo 其他语句
if exist *.html goto ks
复制代码

@echo off
:ks
copy /y 1.html 2.html

set /a r=%random%%%10
timeout /t %r% >nul
tasklist|findstr "^htox32c.exe" >nul&&goto :ks

htox32c /IP /O0 /U1+4 2.html
del /q 2.html

echo 其他语句
if exist *.html goto ks
复制代码

rem 多个复用避免冲突
set tj=%~p0
set tj=!tj:\=!
set jh=!tj!
echo !jh!
for %%i in (1 2 3 4 5 6 7 8 9 0) do set tj=!tj:%%i=!
set tj=!tj: =!
echo !tj!
echo !tj!>a.ini
for /f "delims=" %%i in (a.ini) do set jh=!jh:%%i=!&&echo !jh!>b.ini
findstr /i "1 2 3 4 5 6 7 8 9 0" b.ini&&echo, || echo,>abcd.ini
rem 不用变量是同时几个变量容易被串用
rem 在几个文件夹同时运行要求文件夹名称需末尾带数字。上面是判断是否是在几个文件夹同时运行，即便是带数字单一文件运行，也不影响正常运行。
if not exist ..\a.ini (echo,>..\a.ini) else (ping /n 3 127.1)
复制代码

 if exist abcd.ini htox32c /IP /S1 /O0 testmm.html>nul 2>nul&&goto cl
rem  下面开始抢权
:ydx
for /f "delims=" %%i in (b.ini) do (
  move /y ..\a.ini %%i.ini>nul
  if exist %%i.ini (htox32c /IP /S1 /O0 testmm.html>nul 2>nul) else (goto ydx)
  del /f/q %%i.ini>nul
 )
  goto :cl

:cl
 if not exist abcd.ini echo,>..\a.ini
复制代码