我改了- @echo off
- :生成vbs脚本,用来显示动画
- echo CD=Wscript.Arguments(1)>showplan.vbe
- echo Str=Wscript.Arguments(0)>>showplan.vbe
- echo Time_Delay=Wscript.Arguments(2)>>showplan.vbe
- echo Switch1=Wscript.Arguments(3)>>showplan.vbe
- echo Switch2=Wscript.Arguments(4)>>showplan.vbe
- echo Str_Len=len(Str)>>showplan.vbe
- echo Show_Str Str,Str_Len,CD,Time_Delay,Switch1,Switch2>>showplan.vbe
- echo wscript.stdout.write vbcrlf>>showplan.vbe
- echo Function Show_Str(str,strlen,CD,Speed,Switch1,Switch2)>>showplan.vbe
- echo IF Ucase(Switch2)=^"Y^" then>>showplan.vbe
- echo Show_Cursor 8,CD>>showplan.vbe
- echo End if>>showplan.vbe
- echo IF str^<^>^"^" then>>showplan.vbe
- echo For i=1 to strlen>>showplan.vbe
- echo if i mod 2=0 then>>showplan.vbe
- echo Cursor=^" ^">>showplan.vbe
- echo else>>showplan.vbe
- echo Cursor=^"_^">>showplan.vbe
- echo end if>>showplan.vbe
- echo IF i=strlen then>>showplan.vbe
- echo Cursor=^" ^">>showplan.vbe
- echo End if>>showplan.vbe
- echo IF Ucase(Switch1)=^"Y^" then>>showplan.vbe
- echo str1=str1 ^& ^"^>^">>showplan.vbe
- echo wscript.stdout.write chr(13) ^& CD ^& str1^&Left(str,79-i) ^& chr(8)>>showplan.vbe
- echo Else>>showplan.vbe
- echo wscript.stdout.write chr(13) ^& CD ^& Left(str,i)^&Cursor^& chr(8)>>showplan.vbe
- echo End if>>showplan.vbe
- echo wscript.sleep Speed>>showplan.vbe
- echo Next>>showplan.vbe
- echo Else>>showplan.vbe
- echo Exit Function>>showplan.vbe
- echo End if>>showplan.vbe
- echo End Function>>showplan.vbe
- echo Function Show_Cursor(Num,CD)>>showplan.vbe
- echo for i=1 to Num>>showplan.vbe
- echo if i mod 2=0 then>>showplan.vbe
- echo Cursor=^" ^">>showplan.vbe
- echo else>>showplan.vbe
- echo Cursor=^"_^">>showplan.vbe
- echo end if>>showplan.vbe
- echo wscript.stdout.write chr(13) ^& CD ^& Cursor ^& chr(8)>>showplan.vbe
- echo wscript.sleep 200>>showplan.vbe
- echo Next>>showplan.vbe
- echo End Function>>showplan.vbe
- :初始设置;
- set str1=开机
- set str2=快开机
- set str3=他开机
- set str4=你他妈到底开不开机
- set str5=操!!再不开机老子砸了你!!
- set str6=不是内部或外部命令,也不是可运行的程序
- set str7=或批处理文件。
- set str8================================================================================
- :zkxx
- cscript.exe showplan.vbe %str1% "%~dp0>" 120 "" "Y" //nologo
- ping -n 2 127.0.0.1>nul &echo '%str1%' %str6% &echo %str7% &echo.
- cscript.exe showplan.vbe %str2% "%~dp0>" 100 "" "Y" //nologo
- ping -n 2 127.0.0.1>nul &echo '%str2%' %str6% &echo %str7% &echo.
- cscript.exe showplan.vbe %str3% "%~dp0>" 180 "" "Y" //nologo
- ping -n 2 127.0.0.1>nul &echo '%str3%' %str6% &echo %str7% &echo.
- cscript.exe showplan.vbe %str4% "%~dp0>" 180 "" "Y" //nologo
- ping -n 2 127.0.0.1>nul &echo '%str4%' %str6% &echo %str7% &echo.
- cscript.exe showplan.vbe %str5% "%~dp0>" 80 "" "Y" //nologo
- cscript.exe showplan.vbe "" "" 100 "" "Y" //nologo
- del showplan.vbe
- echo Windows ME系统预启动中,请稍后……
- ping -n 2 127.1 >nul
- set ks1m=┌────┐────────────────────────────────┐
- set ks2m=└────┘────────────────────────────────┘
- cls&mode con cols=80 lines=19
- title Windows ME
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo. Microsoft Windows ME
- echo.
- echo Starting system...
- echo.
- for /l %%i in (1,1,4) do echo.
- set /p a=">=============================================================================="<nul
- for /l %%i in (1,1,80) do (
- set /p aa=<nul
- )
- for /l %%i in (1,1,80) do (
- set /p aa=^><nul
- ping/n 0 127.1 >nul
- )
- echo.
- ping -n 2 127.1 >nul&cls&ping -n 2 127.1 >nul&set a=↖卍
- :a
- cls
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo %a%
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- ping -n 2 127.1 >nul&if "%a%"=="↖卍" set a=↖&goto a
- set a=&set b=↖
- :hc
- cls
- echo.
- echo.
- echo.
- echo ┏━━━━━━━━━━━━━━━━━┓
- echo ┃○系统道歉 ┃
- echo ┃━━━━━━━━━━━━━━━━━┃
- echo ┃对不起,请不要把我砸了。 ┃
- echo ┃为了道歉,我做一个介绍主人的vbs。 ┃
- echo ┗━━━━━━━━━━━━━━━━━┛
- echo.
- echo. %b%
- echo.
- echo.
- echo.
- echo.
- echo %ks1m%
- echo │ 开始 │○系统道歉│ %time:~0,5%│
- echo %ks2m%
- ping -n 3 127.1 >nul
- :b
- cls
- echo.
- echo ╔══╗
- echo ║ vbs║
- echo ║文件║
- echo ╚══╝%c%
- echo Dr.ma.vbs
- echo.
- echo. %a%
- echo.
- echo.
- echo. %b%
- echo.
- echo.
- echo.
- echo.
- echo %ks1m%
- echo │ 开始 │ %time:~0,5%│
- echo %ks2m%
- ping -n 2 127.1 >nul
- if "%b%"=="↖" set b=&set a=↖&goto b
- if "%a%"=="↖" set a=&set c=↖&goto b
- if "%c%"=="↖" set c=↖卍&goto b
- set d=┃&set c=↖
- :c
- cls
- echo.
- echo ╔══╗
- echo ║ vbs║
- echo ║文件║
- echo ╚══╝%c%
- echo Dr.ma.vbs
- echo ┏━━━━━━━━━━━━━━┓
- echo ┃Dr.ma制作 │X%d%
- echo ┃━━━━━━━━━━━━━━┃
- echo ┃~\(≧▽≦)/~ Dr.ma制作 ┃
- echo ┃谢谢使用 ┃
- echo ┗━━━━━━━━━━━━━━┛
- echo.
- echo.
- echo.
- echo %ks1m%
- echo │ 开始 │○Dr.ma制作│ %time:~0,5%│
- echo %ks2m%
- ping -n 2 127.1 >nul
- if "%d%"=="┃" set d=↖&set c=&goto c
- set a=↖&set b=
- :d
- cls
- echo.
- echo ╔══╗
- echo ║ vbs║
- echo ║文件║
- echo ╚══╝
- echo Dr.ma.vbs
- echo.
- echo. %a%
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo %ks1m%
- echo │ 开始%b%│ %time:~0,5%│
- echo %ks2m%
- ping -n 2 127.1 >nul
- if "%a%"=="↖" set b=↖&set a=&goto d
- if "%b%"=="↖" set b=卍&goto d
- set b=↖
- :e
- cls
- echo.
- echo ╔══╗
- echo ║ vbs║
- echo ║文件║
- echo ╚══╝
- echo Dr.ma.vbs
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo ┌────┐
- echo │¢程序 │
- echo │⊙关机%b%│
- echo %ks1m%
- echo │ 开始 │ %time:~0,5%│
- echo %ks2m%
- ping -n 2 127.1 >nul
- if "%b%"=="↖" set b=卍&goto e
- :f
- cls
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo 卍
- ping -n 2 127.1 >nul
- cls
- ping -n 3 127.1 >nul
- exit
复制代码
|