: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
echo 欢迎再次使用！谢谢！
cscript.exe showplan.vbe "" %str8% %Time_Delay2% "Y" //nologo
del showplan.vbe
exit
