返回列表 发帖
学习了,谢谢分享

TOP

好强大哦。

TOP

哦~ 原来是个动画而已。

TOP

@echo off
cls&mode con cols=80 lines=18
title Windows ME Demo
echo Microsoft Windows ME
echo Starting system...
echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo (Demo Version)
ping -n 4 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=↖
:b
cls
echo.
echo ╔══╗
echo ║ vbs║
echo ║文件║
echo ╚══╝%c%
echo 小麦.vbs
echo.
echo.           %a%
echo.
echo.
echo.                      %b%
echo.
echo.
echo.
echo.
echo ┌────┐────────────────────────────────┐
echo │  开始  │                                                           %time:~0,5%
echo └────┘────────────────────────────────┘
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 小麦.vbs
echo          ┏━━━━━━━━━━━━━━┓
echo          ┃小麦制作                 │X%d%
echo          ┃━━━━━━━━━━━━━━┃
echo          ┃~\(≧▽≦)/~ 小麦制作       ┃
echo          ┃转载请注明出处,谢谢合作    ┃
echo          ┗━━━━━━━━━━━━━━┛
echo.
echo.
echo.
echo ┌────┐────────────────────────────────┐
echo │  开始  │○小麦制作│                                               %time:~0,5%
echo └────┘────────────────────────────────┘
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 小麦.vbs
echo.
echo.                                %a%
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo ┌────┐────────────────────────────────┐
echo │  开始%b%│                                                           %time:~0,5%
echo └────┘────────────────────────────────┘
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 小麦.vbs
echo.
echo.
echo.
echo.
echo.
echo.
echo ┌────┐
echo │¢程序﹥│
echo │⊙关机%b%
echo ┌────┐────────────────────────────────┐
echo │  开始  │                                                           %time:~0,5%
echo └────┘────────────────────────────────┘
ping -n 2 127.1 >nul
if "%b%"=="  " set b=↖&goto e
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
exitCOPY
源代码

TOP

又见小麦啦~~~~
我试试看

TOP

不赖嘛~
有创意~

TOP

好无聊,都是echo

TOP

有问题啊,一直在闪烁然后自己就关闭了啊!

TOP

想要代码,我发!不过版权稍微改了一下
@echo off
cls&mode con cols=80 lines=18
title Windows ME Demo
echo Microsoft Windows ME
echo Starting system...
echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo (Demo Version)
ping -n 4 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=↖
: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 ┌────┐────────────────────────────────┐
echo │  开始  │                                                           %time:~0,5%
echo └────┘────────────────────────────────┘
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 ┌────┐────────────────────────────────┐
echo │  开始  │○Dr.ma制作│                                              %time:~0,5%
echo └────┘────────────────────────────────┘
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 ┌────┐────────────────────────────────┐
echo │  开始%b%│                                                           %time:~0,5%
echo └────┘────────────────────────────────┘
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 ┌────┐────────────────────────────────┐
echo │  开始  │                                                           %time:~0,5%
echo └────┘────────────────────────────────┘
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
exitCOPY

TOP

我改了
@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
exitCOPY

TOP

感谢楼主分享,我厚颜无耻的来拿资源了

TOP

回回回回回

TOP

--------------------------------
@echo off
cls&mode con cols=80 lines=18
title Windows ME Demo
echo Microsoft Windows ME
echo Starting system...
echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo (Demo Version)
ping -n 4 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=↖
:b
cls
echo.
echo ╔══╗
echo ║ vbs║
echo ║文件║
echo ╚══╝%c%
echo 小麦.vbs
echo.
echo.           %a%
echo.
echo.
echo.                      %b%
echo.
echo.
echo.
echo.
echo ┌────┐────────────────────────────────┐
echo │  开始  │                                                           %time:~0,5%│
echo └────┘────────────────────────────────┘
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 小麦.vbs
echo          ┏━━━━━━━━━━━━━━┓
echo          ┃小麦制作                 │X%d%
echo          ┃━━━━━━━━━━━━━━┃
echo          ┃~\(≧▽≦)/~ 小麦制作       ┃
echo          ┃转载请注明出处,谢谢合作    ┃
echo          ┗━━━━━━━━━━━━━━┛
echo.
echo.
echo.
echo ┌────┐────────────────────────────────┐
echo │  开始  │○小麦制作│                                               %time:~0,5%│
echo └────┘────────────────────────────────┘
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 小麦.vbs
echo.
echo.                                %a%
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo ┌────┐────────────────────────────────┐
echo │  开始%b%│                                                           %time:~0,5%│
echo └────┘────────────────────────────────┘
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 小麦.vbs
echo.
echo.
echo.
echo.
echo.
echo.
echo ┌────┐
echo │¢程序﹥│
echo │⊙关机%b%│
echo ┌────┐────────────────────────────────┐
echo │  开始  │                                                           %time:~0,5%│
echo └────┘────────────────────────────────┘
ping -n 2 127.1 >nul
if "%b%"=="  " set b=↖&goto e
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
---------------------------------------------------

没看懂。。。

TOP

是不是模拟进度条的那个?

TOP

能不能直接把代码发出来!

TOP

返回列表