2022年整人程序--我是猪整理 .pdf
手把手教你玩QQ 整人程序【超级整人滴】好奇傻死猫-by22010-09-06 23:02名师资料总结-精品资料欢迎下载-名师精心整理-第 1 页，共 4 页 -首先呢,我们 在桌面创建个新文件夹然后 打开,在上面找到-工具(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 下。你啊就是笨，要快哦，我先不打扰你工作。)名师资料总结-精品资料欢迎下载-名师精心整理-第 2 页，共 4 页 -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(我本因该消失的，不过我留恋你滴芳容，上帝又给了一次机会。)名师资料总结-精品资料欢迎下载-名师精心整理-第 3 页，共 4 页 -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 次，那他还有个打完呢？这样才做到整人了，要是给喜欢的人发去啊，那就写你要说的话吧，双引号里面的可以随便更改这个最简单的就是结素任务来结束它本人亲测自己也关机了不过现在的人没这么好上当做好了以后做个压缩文件名师资料总结-精品资料欢迎下载-名师精心整理-第 4 页，共 4 页 -
