Утилита, изменяющая дату для Microcat

@echo off
color 0A
set cur_dir=%cd%
set /a hasp=0
for /f %%E in ('dir /b inst*.cmd inst*.bat') do set /a hasp=hasp+1
if %hasp% EQU 0 goto nohasp
if %hasp% EQU 1 goto hasp1
:hasperror
cls
color 0C
echo.
echo  ЋиЁЎЄa ЁвҐЈаaжЁЁ бЄаЁЇв®ў н¬г«пв®аa HASP
echo.
echo Ќ ©¤Ґл бЄаЁЇвл:
dir /b inst*.cmd inst*.bat
dir /b unin*.cmd unin*.bat
echo.
echo  “¤a«ЁвҐ/ЇҐаҐЁ¬Ґг©вҐ ҐЁбЇ®«м§гҐ¬лҐ Є®¬Ї®Ґвл
echo.
echo.
echo.
pause
exit
:unhasp0
cls
color 0C
echo.
echo  ЋвбгвбвўгҐв бЄаЁЇв, §aўҐаиaойЁ© аaЎ®вг н¬г«пв®аa HASP!
echo.
echo.
echo.
pause
exit
:hasp1
set /a unhasp=0
for /f %%F in ('dir /b unin*.cmd unin*.bat') do set /a unhasp=unhasp+1
if %unhasp% EQU 0 goto unhasp0
if %unhasp% NEQ 1 goto hasperror
for /f %%G in ('dir /b inst*.cmd inst*.bat') do set hasp=%%G
for /f %%H in ('dir /b unin*.cmd unin*.bat') do set unhasp=%%H
:nohasp
set cur_dt=%date:~-10%
set /a tech_dt=%cur_dt:~-4%%cur_dt:~3,2%%cur_dt:~0,2%
if not exist C:\microdt.txt echo %tech_dt%>C:\microdt.txt
for /f "delims=" %%A in (C:\microdt.txt) do set /a microdt=%%A
if %microdt% LSS %tech_dt% echo %tech_dt%>C:\microdt.txt
if %microdt% LEQ %tech_dt% goto go1
:error1
cls
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo                                    [Ћ�€ЃЉЂ!]
echo.
echo                            ЏђЋ‚…ђњ’… ‘€‘’…ЊЌ“ћ „Ђ’“
color 0C
ping -n 2 localhost>nul
color C0
ping -n 2 localhost>nul
if %hasp% EQU 0 goto error1
color 0C
echo.
goto endhasp
:go1
cls
if %hasp% NEQ 0 call %hasp%
if %hasp% NEQ 0 cd %cur_dir%
for /f "tokens=9 delims=, " %%B in ('findstr .20 starter.js') do set jsdate=%%~B
for /f "tokens=2 delims=(," %%C in ('findstr /i .exe starter.js') do set jsprog=%%~C
for /f "tokens=2 delims=()" %%D in ('findstr /i WScript.Sleep starter.js') do set jsdelay=%%D
set /a jsdelay=%jsdelay:~0,-3%
set /a jsdelay=%jsdelay%-5
echo.
echo  ’ҐЄгйaп ¤aвa: %cur_dt%
echo.
echo  ‘Ёб⥬aп ¤aвa Ўг¤Ґв Ё§¬ҐҐa a %jsdate%
start starter.js
ping -n 5 localhost>nul
set sys_dt=%date:~-10%
if %sys_dt% EQU %jsdate% goto go2
:error2
cls
color 0C
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo                                 Ћ�€ЃЉЂ ‘Љђ€Џ’Ђ
ping -n 3 localhost>nul
echo.
echo.
echo.
echo.
if %hasp% NEQ 0 call %unhasp%
exit
:go2
cls
echo.
echo  ‘Ёб⥬aп ¤aвa: %sys_dt%
echo.
echo  ‡aЇгбЄaҐвбп %jsprog%
echo.
echo  „aвa Ўг¤Ґв ў®ббвa®ў«Ґa зҐаҐ§ %jsdelay% ᥪ.
set /a jsdelay=%jsdelay%-1
ping -n 2 localhost>nul
if %jsdelay% NEQ 0 goto go2
ping -n 2 localhost>nul
set cur_dt2=%date:~-10%
cls
echo.
echo  ‘Ёб⥬aп ¤aвa: %cur_dt2%
if %hasp% EQU 0 ping -n 3 localhost>nul
if %cur_dt2% NEQ %cur_dt% goto error1
if %hasp% EQU 0 exit
:endhasp
echo.
echo  „«п §aўҐа襨п аaЎ®вл н¬г«пв®аa HASP a¦¬ЁвҐ «оЎго Є«aўЁиг
echo.
pause>nul
echo.
call %unhasp%