夜雨聆风警告说明
下面所有代码仅用于熟人之间轻度玩笑、本地单机自测，禁止发给陌生人、企业电脑、公共设备，严禁恶意损坏文件、锁机、窃取信息；运行前务必保存桌面重要文件，出现异常直接重启电脑即可解除。
分为3类：Windows批处理(.bat)、VBS脚本、Python简易整蛊，共100段完整源码，分段清晰可直接复制保存使用。
一、Bat批处理整蛊（40个，后缀保存.bat，双击运行）
1 无限弹窗
bat
@echo off
:loop
start cmd
goto loop
2 强制全屏黑窗闪烁
bat
@echo off
color 00
:l
mode con cols=1 lines=1
mode con cols=300 lines=300
goto l
3 自动输入乱码刷屏
bat
@echo off
echo 疯狂乱码轰炸
:g
echo ¥@#￥%……&*()_+-=[]{};',./<>?~
goto g
4 自动关机倒计时30秒
bat
@echo off
shutdown -s -t 30 -c "你的电脑即将关机！"
5 取消关机急救（配套4使用）
bat
@echo off
shutdown -a
echo 关机已取消
pause
6 不停打开记事本
bat
@echo off
:a
start notepad
goto a
7 不停打开计算器
bat
@echo off
:x
start calc
goto x
8 屏幕颜色疯狂切换
bat
@echo off
:k
color 01
color 02
color 03
color 04
color 05
color 06
color 07
color 08
color 09
color 0A
color 0B
color 0C
color 0D
color 0E
color 0F
goto k
9 伪装系统报错
bat
@echo off
echo 【系统严重错误0x00000124】
echo 硬盘损坏，所有数据即将清除！
pause
10 无限输出警告文字
bat
@echo off
:w
echo 警告！非法程序入侵！
echo 警告！非法程序入侵！
goto w
11 自动最小化所有窗口（视觉卡顿）
bat
@echo off
nircmd win min alltop
timeout /t 1
goto start
12 窗口大小疯狂缩放
bat
@echo off
mode con cols=5 lines=5
timeout /t 0.2
mode con cols=200 lines=200
timeout /t 0.2
goto loop
13 伪装病毒扫描
bat
@echo off
echo 正在全盘病毒扫描...
echo 发现386个高危病毒
echo C盘文件全部感染
pause
echo 正在删除系统文件...
timeout /t 3
echo 吓唬你的，没事
14 不停打开画图工具
bat
@echo off
:m
start mspaint
goto m
15 弹出海量空白文件夹
bat
@echo off
:f
md 整蛊临时文件夹
start 整蛊临时文件夹
goto f
16 标题疯狂变化
bat
@echo off
:t
title 电脑报废预警
timeout /t 0.3
title 数据全部丢失
timeout /t 0.3
title 恭喜中招
goto t
17 键盘输入锁定假象（仅cmd内）
bat
@echo off
echo 键盘输入已临时锁定，无法打字！
pause
echo 解除锁定
18 持续播放提示音
bat
@echo off
:s
echo. ^| rundll32 user32.dll,MessageBeep
timeout /t 0.5
goto s
19 伪装更新蓝屏提示
bat
@echo off
color 17
echo Windows更新失败，正在回滚配置
echo 请勿关闭计算机，否则丢失全部文件
pause
20 批量弹出浏览器空白页
bat
@echo off
:b
start https://blank.org
goto b
21 字符左右抖动刷屏
bat
@echo off
:d
echo 中招啦！
echo 中招啦！
goto d
22 占用cmd全屏铺满文字
bat
@echo off
mode con cols=250 lines=100
echo 整蛊程序运行中，关闭窗口即可恢复
pause
23 伪装内存爆满
bat
@echo off
echo 物理内存占用99%
echo 程序即将崩溃，保存所有文件
pause
24 重复弹出此脚本自身
bat
@echo off
@echo off
:r
start %0
goto r
25 数字无限递增刷屏
bat
@echo off
set n=0
:num
set /a n+=1
echo %n%
goto num
26 红绿交替背景闪屏
bat
@echo off
:flash
color 0c
timeout /t 0.1
color 0a
timeout /t 0.1
goto flash
27 伪装磁盘格式化
bat
@echo off
echo 正在格式化D盘，进度1%%
timeout /t 1
echo 正在格式化D盘，进度12%%
timeout /t 1
echo 正在格式化D盘，进度58%%
timeout /t 1
echo 吓唬你而已，没格式化
28 打开文件资源管理器无数次
bat
@echo off
:ex
start explorer.exe
goto ex
29 乱码标题+乱码内容
bat
@echo off
:y
title ツヅョヲヵヶ
echo ャュョ゛゜ぱぴぷ
goto y
30 倒计时提示锁机假象
bat
@echo off
echo 60秒后锁定本机所有操作
timeout /t 60
echo 解除锁定，玩笑结束
31 反复弹出询问框
bat
@echo off
:ask
set /p a=你是不是被整蛊了？
goto ask
32 铺满屏幕#符号
bat
@echo off
for /l %%i in (1,1,300) do echo ################
pause
33 系统时间快速跳动假象
bat
@echo off
:time
time /t
timeout /t 0.2
goto time
34 伪装网络断开
bat
@echo off
echo 网络连接已断开，无法访问互联网
ping www.baidu.com
echo 恢复网络连接
35 不停打开word空白文档（需装Office）
bat
@echo off
:wps
start winword
goto wps
36 黑白交替闪烁窗口
bat
@echo off
:bw
color 0f
timeout /t 0.1
color f0
timeout /t 0.1
goto bw
37 无限生成数字文件夹
bat
@echo off
set f=1
:folder
md %f%号文件夹
set /a f+=1
goto folder
38 提示鼠标失控假象
bat
@echo off
echo 鼠标驱动异常，光标即将不受控制
timeout /t 5
echo 驱动恢复正常
39 重复输出超长横线刷屏
bat
@echo off
:line
echo ———————————————————————————————
goto line
40 一键关闭所有cmd窗口急救
bat
@echo off
taskkill /f /im cmd.exe
echo 所有黑窗已全部关闭
pause
二、VBS整蛊脚本（30个，保存为.vbs，双击运行，弹窗/鼠标恶搞）
41 无限弹窗“你中招了”
vbs
do
msgbox "你中招了！",0,"整蛊提示"
loop
42 随机位置弹窗
vbs
Set wsh=CreateObject("WScript.Shell")
do
wsh.popup "哈哈",1,"",0
loop
43 强制鼠标左右乱晃
vbs
set x=createobject("wscript.shell")
do
x.sendkeys "{LEFT}"
x.sendkeys "{RIGHT}"
loop
44 弹出超大报错窗口
vbs
msgbox "系统致命错误，文件全部损坏",16,"严重警告"
45 不停播放系统提示音
vbs
do
createobject("sapi.spvoice").speak("警告警告")
loop
46 锁定鼠标左键假象（仅输入层）
vbs
set s=createobject("wscript.shell")
do
s.sendkeys "{ESC}"
loop
47 弹窗倒计时恐吓
vbs
for i=30 to 1 step -1
msgbox i & "秒后电脑锁机"
next
msgbox "玩笑结束"
48 语音循环嘲讽
vbs
set v=createobject("sapi.spvoice")
do
v.speak "你被整蛊啦"
loop
49 弹出是/否无限选择框
vbs
do
a=msgbox "承认被捉弄？",4
loop
50 模拟硬盘损坏弹窗
vbs
msgbox "硬盘扇区损坏，数据无法恢复",48,"硬件故障"
51 鼠标持续自动点击
vbs
Set sh = CreateObject("WScript.Shell")
Do
sh.SendKeys "{CLICK}"
Loop
52 多层弹窗叠加
vbs
msgbox "第一层"
msgbox "第二层"
msgbox "第三层"
msgbox "第四层"
msgbox "第五层"
53 语音播报系统崩溃
vbs
set v=createobject("sapi.spvoice")
v.speak "检测到系统崩溃，准备重启"
54 无限弹出输入框
vbs
do
inputbox "输入密码解锁电脑"
loop
55 模拟蓝屏警告弹窗
vbs
msgbox "蓝屏代码0x0000007B，重启无效",16
56 自动疯狂按空格
vbs
set s=createobject("wscript.shell")
do
s.sendkeys " "
loop
57 弹窗铺满整个屏幕文字
vbs
msgbox "=========================================="&vbcrlf&"电脑即将自动关机保存文件"&vbcrlf&"==========================================",0
58 语音循环播报倒计时
vbs
set v=createobject("sapi.spvoice")
do
for i=10 to 1 step -1
v.speak i
next
loop
59 弹出中止/重试/忽略弹窗
vbs
do
msgbox "读取文件失败",2
loop
60 自动回车刷屏
vbs
set s=createobject("wscript.shell")
do
s.sendkeys "{ENTER}"
loop
61 伪装木马入侵弹窗
vbs
msgbox "外部木马正在窃取账号密码",48,"安全中心"
62 弹窗文字不断变大重复
vbs
do
msgbox "中招中招中招中招中招"
loop
63 语音重复播放同一个句子
vbs
set sp=CreateObject("sapi.spvoice")
do
sp.speak "你跑不掉了"
loop
64 无限弹出文件丢失提示
vbs
do
msgbox "重要文档丢失，无法找回",16
loop
65 自动连续按退格键
vbs
set w=CreateObject("WScript.Shell")
do
w.SendKeys "{BACKSPACE}"
loop
66 弹窗伪装更新失败
vbs
msgbox "Windows更新安装失败，系统残缺",0
67 语音+弹窗双重恐吓
vbs
set v=CreateObject("sapi.spvoice")
do
v.speak "紧急故障"
msgbox "紧急故障"
loop
68 无限弹出空白提示框
vbs
do
msgbox ""
loop
69 自动切换大小写按键
vbs
set s=CreateObject("WScript.Shell")
do
s.SendKeys "{CAPSLOCK}"
wscript.sleep 500
loop
70 关闭所有VBS脚本急救
vbs
Set shell = CreateObject("WScript.Shell")
shell.Run "taskkill /f /im wscript.exe",0
三、Python整蛊代码（30个，保存.py，需安装python运行）
71 无限弹出tk窗口
python
import tkinter as tk
while True:
root = tk.Tk()
root.title("中招！")
tk.Label(root,text="你被整蛊了").pack()
root.mainloop()
72 控制台疯狂彩色文字
python
import random,time
colors=['\033[91m','\033[92m','\033[93m','\033[94m']
while True:
c=random.choice(colors)
print(c+"整蛊轰炸"+'\033[0m')
time.sleep(0.1)
73 弹窗倒计时
python
from tkinter import messagebox
import time
for i in range(10,0,-1):
messagebox.showwarning("倒计时",f"{i}秒")
time.sleep(1)
messagebox.showinfo("结束","玩笑而已")
74 无限打开记事本
python
import os
while True:
os.startfile("notepad.exe")
75 随机数字无限打印
python
import random
while True:
print(random.randint(1,99999))
76 窗口闪烁变色
python
import tkinter,time
root=tkinter.Tk()
while True:
root.config(bg="red")
root.update()
time.sleep(0.1)
root.config(bg="green")
root.update()
time.sleep(0.1)
77 语音播报整蛊文字
python
import pyttsx3
spk=pyttsx3.init()
while True:
spk.say("你中招啦")
spk.runAndWait()
78 伪装病毒扫描输出
python
import time
while True:
print("检测病毒...高危木马已发现")
time.sleep(0.5)
79 无限生成空白弹窗
python
from tkinter import Tk
while True:
win=Tk()
win.mainloop()
80 控制台疯狂换行刷屏
python
while True:
print("\n"*50)
81 弹出超大警告框
python
from tkinter import messagebox
messagebox.showerror("严重错误","硬盘数据全部损毁")
82 随机符号刷屏
python
import random
sym="!@#$%^&*()_+-=~"
while True:
print("".join(random.choices(sym,k=50)))
83 自动打开浏览器页面
python
import webbrowser
while True:
webbrowser.open("https://www.baidu.com")
84 交替打印真假报错
python
import time
while True:
print("系统崩溃警告！")
time.sleep(0.3)
print("吓唬你的")
time.sleep(0.3)
85 多标签tk弹窗堆叠
python
import tkinter
for _ in range(20):
w=tkinter.Tk()
w.title("整蛊窗口")
w.mainloop()
86 时间数字快速跳动
python
import time
i=0
while True:
print(f"计时：{i}")
i+=1
time.sleep(0.05)
87 红色全屏警告文字
python
print("\033[91m"+"="*100)
print("电脑即将关机，立即保存文件")
print("="*100+'\033[0m')
88 无限弹出输入对话框
python
from tkinter import simpledialog
while True:
simpledialog.askstring("解锁","输入密码解除锁定")
89 循环播放提示音效
python
import winsound
while True:
winsound.Beep(800,200)
90 打印乱码日文刷屏
python
while True:
print("カタカナ漢字ひらがなガギグゲゴ")
91 伪装内存占用提示
python
import time
while True:
print("内存占用99%，程序即将终止")
time.sleep(1)
92 批量弹出计算器
python
import os
while True:
os.startfile("calc.exe")
93 弹窗选择是与否无限循环
python
from tkinter import messagebox
while True:
messagebox.askyesno("提问","你承认被捉弄了吗")
94 红绿交替控制台闪屏
python
import time
while True:
print("\033[92m绿色警告\033[0m")
time.sleep(0.1)
print("\033[91m红色警告\033[0m")
time.sleep(0.1)
95 语音播报系统故障
python
import pyttsx3
t=pyttsx3.init()
t.say("系统检测到严重硬件故障")
t.runAndWait()
96 无限创建打印分隔线
python
while True:
print("-"*200)
97 伪装格式化磁盘日志
python
import time
for p in range(1,101):
print(f"格式化进度{p}%")
time.sleep(0.1)
print("玩笑结束，未格式化任何磁盘")
98 弹出多层连续提示框
python
from tkinter import messagebox
messagebox.showinfo("1层","第一层弹窗")
messagebox.showinfo("2层","第二层弹窗")
messagebox.showinfo("3层","第三层弹窗")
messagebox.showinfo("4层","第四层弹窗")
messagebox.showinfo("5层","第五层弹窗")
99 随机长短文字输出
python
import random,time
words=["中招！","哈哈","完蛋了","警告！"]
while True:
print(random.choice(words)*random.randint(1,10))
time.sleep(0.2)
100 Python一键终止所有恶搞程序（急救）
python
import os
os.system("taskkill /f /im python.exe")
os.system("taskkill /f /im cmd.exe")
os.system("taskkill /f /im wscript.exe")
print("所有整蛊程序已强制关闭")
安全急救指南
1. Bat无限弹窗：运行40号脚本一键关闭所有cmd
2. VBS无限弹窗：运行70号脚本结束wscript进程
3. Python恶搞：运行100号脚本强制结束所有Python程序
4. 鼠标/按键失控：直接长按电源键重启电脑，立刻恢复正常
5. 严禁发给老师、公司电脑、陌生人，仅朋友私下娱乐使用，勿用于恶意骚扰！
