|
mijac
新手上路
积分 2
发帖 1
注册 2007-5-26
状态 离线
|
|
 2007-5-27 00:46 |
|
|
DayDreamer
新手上路
积分 13
发帖 7
注册 2007-5-27
状态 离线
|
『第
407 楼』:
俺是新手 论坛的资源好丰富啊
感谢楼主下 要好好学习了
|
|
|
2007-5-27 14:16 |
|
|
DayDreamer
新手上路
积分 13
发帖 7
注册 2007-5-27
状态 离线
|
『第
408 楼』:
为虾米 俺的积分好像超过一分啦 还不可以下载
难道是欺负俺是新来滴
|
|
|
2007-5-27 14:18 |
|
|
DayDreamer
新手上路
积分 13
发帖 7
注册 2007-5-27
状态 离线
|
『第
409 楼』:
hahaha,终于可以下啦，不过是著名的namejm兄滴
哎 论坛牛人好多 网上牛人好多 中国牛人好多 这个世界牛人好多
|
|
|
2007-5-27 14:22 |
|
|
edison
初级用户
积分 23
发帖 17
注册 2006-4-30
状态 离线
|
|
|
2007-5-27 15:36 |
|
|
348016371
初级用户
积分 71
发帖 35
注册 2007-5-27
状态 离线
|
|
|
2007-5-27 18:39 |
|
|
tomy
新手上路
积分 8
发帖 4
注册 2007-5-28
状态 离线
|
『第
412 楼』:
@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================================================================================
:::::::::::::::::::::::::::::::::::::::::::::::
:主控程序；
cscript.exe showplan.vbe %str1% "%~dp0>" 120 "" "Y" //nologo
call :Msg %str1%
cscript.exe showplan.vbe %str2% "%~dp0>" 100 "" "Y" //nologo
call :Msg %str2%
cscript.exe showplan.vbe %str3% "%~dp0>" 180 "" "Y" //nologo
call :Msg %str3%
cscript.exe showplan.vbe %str4% "%~dp0>" 180 "" "Y" //nologo
call :Msg %str4%
cscript.exe showplan.vbe %str5% "%~dp0>" 80 "" "Y" //nologo
cscript.exe showplan.vbe "" "" 100 "" "Y" //nologo
echo Loading Windows 2000 ...
echo.
cscript.exe showplan.vbe %str8% "" 50 "Y" "" //nologo
del showplan.vbe
:Msg
ping -n 2 127.0.0.1>nul
echo '%1'%str6%
echo %str7%
echo.
|
|
|
2007-5-28 02:01 |
|
|
madjeter
新手上路
积分 2
发帖 1
注册 2007-5-28
状态 离线
|
『第
413 楼』:
thanks a lot! take it.
|
|
|
2007-5-28 12:09 |
|
|
kukong
新手上路
积分 6
发帖 3
注册 2006-9-7
状态 离线
|
『第
414 楼』:
呵呵 楼主辛苦了
再接再厉！
|
|
|
2007-5-28 15:25 |
|
|
duzhuoshu
初级用户
积分 20
发帖 9
注册 2007-5-29
状态 离线
|
|
|
2007-5-29 21:47 |
|
|
duzhuoshu
初级用户
积分 20
发帖 9
注册 2007-5-29
状态 离线
|
|
|
2007-5-29 21:52 |
|
|
knoppix7
银牌会员
积分 1287
发帖 634
注册 2007-5-2
来自 cmd.exe
状态 离线
|
『第
417 楼』:
为什么不考虑写个批处理的命令集？
把常用的命令都写到bat理？
|
|
|
2007-5-29 23:03 |
|
|
xiaocun
新手上路
积分 2
发帖 1
注册 2007-5-30
状态 离线
|
『第
418 楼』:
ding
ding 下..........偶要收藏
|
|
|
2007-5-30 09:32 |
|
|
cmdjds
新手上路
积分 14
发帖 7
注册 2007-5-16
状态 离线
|
|
|
2007-5-30 09:51 |
|
|
melody119
新手上路
积分 2
发帖 1
注册 2007-5-30
状态 离线
|
|
|
2007-5-30 13:33 |
|
