一个不错的优化系统的批处理

2019-09-19 07:09:50王旭

echo 咳咳,自己看…… 
pause 
goto help 
:new 
cls 
echo ver 1.0:一经写成便经过测试,漏洞百出! 
echo. 
echo ver 1.0bate1:解决返回主菜单漏洞,解决窗口大小漏洞,美化。加入进程结束器。制成exe。 
echo. 
echo ver 1.5:加入“自毁程序”;升级“系统清洁程序”;加入youxi01的设置文件权限工具。 
echo. 
echo ver 2.0:设置各部分颜色。编写完成帮助部分。更新漏洞。 
echo. 
echo ver 2.5:更新某些部件的问题。加入结束动画。 
pause 
goto help 

:end 
cls 
echo File_Path=wscript.arguments(0)>showplan.vbe 
echo Str=wscript.arguments(1)>>showplan.vbe 
echo Time_Delay=wscript.arguments(2)>>showplan.vbe 
echo Str_Len=len(Str)>>showplan.vbe 
echo if UCase(wscript.arguments(3))=^"^" then>>showplan.vbe 
echo wscript.stdout.write File_Path>>showplan.vbe 
echo for i=1 to Str_Len>>showplan.vbe 
echo wscript.stdout.write mid(Str,i,1)>>showplan.vbe 
echo wscript.sleep Time_Delay>>showplan.vbe 
echo next>>showplan.vbe 
echo else>>showplan.vbe 
echo for i=1 to Str_Len>>showplan.vbe 
echo Str1=Str1 ^& ^"^>^">>showplan.vbe 
echo wscript.stdout.write chr(13) ^& Str1 ^& right(Str,Str_Len-i) ^& chr(8)>>showplan.vbe 
echo wscript.sleep Time_Delay>>showplan.vbe 
echo next>>showplan.vbe 
echo end if>>showplan.vbe 
echo wscript.stdout.write vbcrlf>>showplan.vbe 
set /a Time_Delay1=380 
set /a Time_Delay2=50 
set str1=本程序有VCTU制作。。 
set str2=现已更新至2.5版 
set str3=请支持正版!!!! 
set str4=本动画为拿来主义产物 
set str5=谢谢使用本优化工具!!!! 
set str6=XP超级优化工具是我耗费很大精力制作的! 
set str7=感谢您的使用!谢谢! 
set str8================================================================================ 
for %%i in (%str1% %str2% %str3% %str4%) do ( 
cscript.exe showplan.vbe "%~dp0> " %%i %Time_Delay1% "" //nologo 
echo '%%i' %str6% 
echo %str7% 
echo.) 
cscript.exe showplan.vbe "%~dp0> " %str5% %Time_Delay1% "" //nologo 
相关文章 大家在看