編譯有趣的代碼

A. 想要一些趣味的批處理代碼

呵呵，七夕節寫的，比較簡單。。。自己還可以加工。。。@echo off&setlocal enabledelayedexpansion&title I LOVE YOU
:: code by Wellern
mode con cols=31 lines=15
set e=123456789abcde
echo ****** ******
echo ********** **********
echo ************* *************
echo *****************************
echo *****************************
echo *****************************
echo ***************************
echo ***********************
echo *******************
echo ***************
echo ***********
echo *******
echo ***
echo *
:b
for /l %%a in (0,1,9) do (
set /a f=%random%%%14+1
ping -n 1 127.1>nul
color 0!e:~%f%,1!
)
goto b

B. 求c語言編譯小游戲的代碼，比如掃雷原代碼等

#include <graphics.h>
#include <stdlib.h>
#include <dos.h>
#define LEFTPRESS 0xff01
#define LEFTCLICK 0xff10
#define LEFTDRAG 0xff19
#define MOUSEMOVE 0xff08
struct
{
int num;/*格子當前處於什麼狀態,1有雷，0已經顯示過數字或者空白格子*/
int roundnum;/*統計格子周圍有多少雷*/
int flag;/*右鍵按下顯示紅旗的標志,0沒有紅旗標志,1有紅旗標志*/
}Mine[10][10];
int gameAGAIN=0;/*是否重來的變數*/
int gamePLAY=0;/*是否是第一次玩游戲的標志*/
int mineNUM;/*統計處理過的格子數*/
char randmineNUM[3];/*顯示數字的字元串*/
int Keystate;
int MouseExist;
int MouseButton;
int MouseX;
int MouseY;
void Init(void);/*圖形驅動*/
void MouseOn(void);/*滑鼠游標顯示*/
void MouseOff(void);/*滑鼠游標隱藏*/
void MouseSetXY(int,int);/*設置當前位置*/
int LeftPress(void);/*左鍵按下*/
int RightPress(void);/*滑鼠右鍵按下*/
void MouseGetXY(void);/*得到當前位置*/
void Control(void);/*游戲開始,重新,關閉*/
void GameBegain(void);/*游戲開始畫面*/
void DrawSmile(void);/*畫笑臉*/
void DrawRedflag(int,int);/*顯示紅旗*/
void DrawEmpty(int,int,int,int);/*兩種空格子的顯示*/
void GameOver(void);/*游戲結束*/
void GameWin(void);/*顯示勝利*/
int MineStatistics(int,int);/*統計每個格子周圍的雷數*/
int ShowWhite(int,int);/*顯示無雷區的空白部分*/
void GamePlay(void);/*游戲過程*/
void Close(void);/*圖形關閉*/
void main(void)
{
Init();
Control();
Close();
}
void Init(void)/*圖形開始*/
{
int gd=DETECT,gm;
initgraph(&gd,&gm,"c:\\tc");
}
void Close(void)/*圖形關閉*/
{
closegraph();
}
void MouseOn(void)/*滑鼠游標顯示*/
{
_AX=0x01;
geninterrupt(0x33);
}
void MouseOff(void)/*滑鼠游標隱藏*/
{
_AX=0x02;
geninterrupt(0x33);
}
void MouseSetXY(int x,int y)/*設置當前位置*/
{
_CX=x;
_DX=y;
_AX=0x04;
geninterrupt(0x33);
}
int LeftPress(void)/*滑鼠左鍵按下*/
{
_AX=0x03;
geninterrupt(0x33);
return(_BX&1);
}
int RightPress(void)/*滑鼠右鍵按下*/
{
_AX=0x03;
geninterrupt(0x33);
return(_BX&2);
}
void MouseGetXY(void)/*得到當前位置*/
{
_AX=0x03;
geninterrupt(0x33);
MouseX=_CX;
MouseY=_DX;
}
void Control(void)/*游戲開始,重新,關閉*/
{
int gameFLAG=1;/*游戲失敗後判斷是否重新開始的標志*/
while(1)
{
if(gameFLAG)/*游戲失敗後沒判斷出重新開始或者退出遊戲的話就繼續判斷*/
{
GameBegain(); /*游戲初始畫面*/
GamePlay();/*具體游戲*/
if(gameAGAIN==1)/*游戲中重新開始*/
{
gameAGAIN=0;
continue;
}
}
MouseOn();
gameFLAG=0;
if(LeftPress())/*判斷是否重新開始*/
{
MouseGetXY();
if(MouseX>280&&MouseX<300&&MouseY>65&&MouseY<85)
{
gameFLAG=1;
continue;
}
}
if(kbhit())/*判斷是否按鍵退出*/
break;
}
MouseOff();
}
void DrawSmile(void)/*畫笑臉*/
{
setfillstyle(SOLID_FILL,YELLOW);
fillellipse(290,75,10,10);
setcolor(YELLOW);
setfillstyle(SOLID_FILL,BLACK);/*眼睛*/
fillellipse(285,75,2,2);
fillellipse(295,75,2,2);
setcolor(BLACK);/*嘴巴*/
bar(287,80,293,81);
}
void DrawRedflag(int i,int j)/*顯示紅旗*/
{
setcolor(7);
setfillstyle(SOLID_FILL,RED);
bar(198+j*20,95+i*20,198+j*20+5,95+i*20+5);
setcolor(BLACK);
line(198+j*20,95+i*20,198+j*20,95+i*20+10);
}
void DrawEmpty(int i,int j,int mode,int color)/*兩種空格子的顯示*/
{
setcolor(color);
setfillstyle(SOLID_FILL,color);
if(mode==0)/*沒有單擊過的大格子*/
bar(200+j*20-8,100+i*20-8,200+j*20+8,100+i*20+8);
else
if(mode==1)/*單擊過後顯示空白的小格子*/
bar(200+j*20-7,100+i*20-7,200+j*20+7,100+i*20+7);
}
void GameBegain(void)/*游戲開始畫面*/
{
int i,j;
cleardevice();
if(gamePLAY!=1)
{
MouseSetXY(290,70); /*滑鼠一開始的位置,並作為它的初始坐標*/
MouseX=290;
MouseY=70;
}
gamePLAY=1;/*下次按重新開始的話滑鼠不重新初始化*/
mineNUM=0;
setfillstyle(SOLID_FILL,7);
bar(190,60,390,290);
for(i=0;i<10;i++)/*畫格子*/
for(j=0;j<10;j++)
DrawEmpty(i,j,0,8);
setcolor(7);
DrawSmile();/*畫臉*/
randomize();__page_break__
for(i=0;i<10;i++)/*100個格子隨機賦值有沒有地雷*/
for(j=0;j<10;j++)
{
Mine[i][j].num=random(8);/*如果隨機數的結果是1表示這個格子有地雷*/
if(Mine[i][j].num==1)
mineNUM++;/*現有雷數加1*/
else
Mine[i][j].num=2;
Mine[i][j].flag=0;/*表示沒紅旗標志*/
}
sprintf(randmineNUM,"%d",mineNUM); /*顯示這次總共有多少雷數*/
setcolor(1);
settextstyle(0,0,2);
outtextxy(210,70,randmineNUM);
mineNUM=100-mineNUM;/*變數取空白格數量*/
MouseOn();
}
void GameOver(void)/*游戲結束畫面*/
{
int i,j;
setcolor(0);
for(i=0;i<10;i++)
for(j=0;j<10;j++)
if(Mine[i][j].num==1)/*顯示所有的地雷*/
{
DrawEmpty(i,j,0,RED);
setfillstyle(SOLID_FILL,BLACK);
fillellipse(200+j*20,100+i*20,7,7);
}
}
void GameWin(void)/*顯示勝利*/
{
setcolor(11);
settextstyle(0,0,2);
outtextxy(230,30,"YOU WIN!");
}
int MineStatistics(int i,int j)/*統計每個格子周圍的雷數*/
{
int nNUM=0;
if(i==0&&j==0)/*左上角格子的統計*/
{
if(Mine[0][1].num==1)
nNUM++;
if(Mine[1][0].num==1)
nNUM++;
if(Mine[1][1].num==1)
nNUM++;
}
else
if(i==0&&j==9)/*右上角格子的統計*/
{
if(Mine[0][8].num==1)
nNUM++;
if(Mine[1][9].num==1)
nNUM++;
if(Mine[1][8].num==1)
nNUM++;
}
else
if(i==9&&j==0)/*左下角格子的統計*/
{
if(Mine[8][0].num==1)
nNUM++;
if(Mine[9][1].num==1)
nNUM++;
if(Mine[8][1].num==1)
nNUM++;
}
else
if(i==9&&j==9)/*右下角格子的統計*/
{
if(Mine[9][8].num==1)
nNUM++;
if(Mine[8][9].num==1)
nNUM++;
if(Mine[8][8].num==1)
nNUM++;
}
else if(j==0)/*左邊第一列格子的統計*/
{
if(Mine[i][j+1].num==1)
nNUM++;
if(Mine[i+1][j].num==1)
nNUM++;
if(Mine[i-1][j].num==1)
nNUM++;
if(Mine[i-1][j+1].num==1)
nNUM++;
if(Mine[i+1][j+1].num==1)
nNUM++;
}
else if(j==9)/*右邊第一列格子的統計*/
{
if(Mine[i][j-1].num==1)
nNUM++;
if(Mine[i+1][j].num==1)
nNUM++;
if(Mine[i-1][j].num==1)
nNUM++;
if(Mine[i-1][j-1].num==1)
nNUM++;
if(Mine[i+1][j-1].num==1)
nNUM++;
}
else if(i==0)/*第一行格子的統計*/
{
if(Mine[i+1][j].num==1)
nNUM++;
if(Mine[i][j-1].num==1)
nNUM++;
if(Mine[i][j+1].num==1)
nNUM++;
if(Mine[i+1][j-1].num==1)
nNUM++;
if(Mine[i+1][j+1].num==1)
nNUM++;
}
else if(i==9)/*最後一行格子的統計*/
{
if(Mine[i-1][j].num==1)
nNUM++;
if(Mine[i][j-1].num==1)
nNUM++;
if(Mine[i][j+1].num==1)
nNUM++;
if(Mine[i-1][j-1].num==1)
nNUM++;
if(Mine[i-1][j+1].num==1)
nNUM++;
}
else/*普通格子的統計*/
{
if(Mine[i-1][j].num==1)
nNUM++;
if(Mine[i-1][j+1].num==1)
nNUM++;
if(Mine[i][j+1].num==1)
nNUM++;
if(Mine[i+1][j+1].num==1)
nNUM++;
if(Mine[i+1][j].num==1)
nNUM++;
if(Mine[i+1][j-1].num==1)
nNUM++;
if(Mine[i][j-1].num==1)
nNUM++;
if(Mine[i-1][j-1].num==1)
nNUM++;
}__page_break__
return(nNUM);/*把格子周圍一共有多少雷數的統計結果返回*/
}
int ShowWhite(int i,int j)/*顯示無雷區的空白部分*/
{
if(Mine[i][j].flag==1||Mine[i][j].num==0)/*如果有紅旗或該格處理過就不對該格進行任何判斷*/
return;
mineNUM--;/*顯示過數字或者空格的格子就表示多處理了一個格子,當所有格子都處理過了表示勝利*/
if(Mine[i][j].roundnum==0&&Mine[i][j].num!=1)/*顯示空格*/
{
DrawEmpty(i,j,1,7);
Mine[i][j].num=0;
}
else
if(Mine[i][j].roundnum!=0)/*輸出雷數*/
{
DrawEmpty(i,j,0,8);
sprintf(randmineNUM,"%d",Mine[i][j].roundnum);
setcolor(RED);
outtextxy(195+j*20,95+i*20,randmineNUM);
Mine[i][j].num=0;/*已經輸出雷數的格子用0表示已經用過這個格子*/
return ;
}
/*8個方向遞歸顯示所有的空白格子*/
if(i!=0&&Mine[i-1][j].num!=1)
ShowWhite(i-1,j);
if(i!=0&&j!=9&&Mine[i-1][j+1].num!=1)
ShowWhite(i-1,j+1);
if(j!=9&&Mine[i][j+1].num!=1)
ShowWhite(i,j+1);
if(j!=9&&i!=9&&Mine[i+1][j+1].num!=1)
ShowWhite(i+1,j+1);
if(i!=9&&Mine[i+1][j].num!=1)
ShowWhite(i+1,j);
if(i!=9&&j!=0&&Mine[i+1][j-1].num!=1)
ShowWhite(i+1,j-1);
if(j!=0&&Mine[i][j-1].num!=1)
ShowWhite(i,j-1);
if(i!=0&&j!=0&&Mine[i-1][j-1].num!=1)
ShowWhite(i-1,j-1);
}
void GamePlay(void)/*游戲過程*/
{
int i,j,Num;/*Num用來接收統計函數返回一個格子周圍有多少地雷*/
for(i=0;i<10;i++)
for(j=0;j<10;j++)
Mine[i][j].roundnum=MineStatistics(i,j);/*統計每個格子周圍有多少地雷*/
while(!kbhit())
{
if(LeftPress())/*滑鼠左鍵盤按下*/
{
MouseGetXY();
if(MouseX>280&&MouseX<300&&MouseY>65&&MouseY<85)/*重新來*/
{
MouseOff();
gameAGAIN=1;
break;
}
if(MouseX>190&&MouseX<390&&MouseY>90&&MouseY<290)/*當前滑鼠位置在格子范圍內*/
{
j=(MouseX-190)/20;/*x坐標*/
i=(MouseY-90)/20;/*y坐標*/
if(Mine[i][j].flag==1)/*如果格子有紅旗則左鍵無效*/
continue;
if(Mine[i][j].num!=0)/*如果格子沒有處理過*/
{
if(Mine[i][j].num==1)/*滑鼠按下的格子是地雷*/
{
MouseOff();
GameOver();/*游戲失敗*/
break;
}
else/*滑鼠按下的格子不是地雷*/
{
MouseOff();
Num=MineStatistics(i,j);
if(Num==0)/*周圍沒地雷就用遞歸演算法來顯示空白格子*/
ShowWhite(i,j);
else/*按下格子周圍有地雷*/
{
sprintf(randmineNUM,"%d",Num);/*輸出當前格子周圍的雷數*/
setcolor(RED);
outtextxy(195+j*20,95+i*20,randmineNUM);
mineNUM--;
}
MouseOn();
Mine[i][j].num=0;/*點過的格子周圍雷數的數字變為0表示這個格子已經用過*/
if(mineNUM<1)/*勝利了*/
{
GameWin();
break;
}
}
}
}
}
if(RightPress())/*滑鼠右鍵鍵盤按下*/
{
MouseGetXY();
if(MouseX>190&&MouseX<390&&MouseY>90&&MouseY<290)/*當前滑鼠位置在格子范圍內*/
{
j=(MouseX-190)/20;/*x坐標*/
i=(MouseY-90)/20;/*y坐標*/
MouseOff();
if(Mine[i][j].flag==0&&Mine[i][j].num!=0)/*本來沒紅旗現在顯示紅旗*/
{
DrawRedflag(i,j);
Mine[i][j].flag=1;
}
else
if(Mine[i][j].flag==1)/*有紅旗標志再按右鍵就紅旗消失*/
{
DrawEmpty(i,j,0,8);
Mine[i][j].flag=0;
}
}
MouseOn();
sleep(1);
}
}
}

C. 那些有趣的代碼

數字代碼貌似沒有什麼有趣的哦

國務院各部門代碼表:

11、外交部 28、農業部 61、航空總公司

12、國家計委 29、外經貿部 62、航天總公司

13、教育部 30、文化部 63、船舶總公司

14、科技部 31、中國人民銀行 64、核工業總公司

15、國家民委 32、國家審計署 65、兵器總公司

16、公安部 41、海關總署 66、中汽總公司

17、安全部 42、稅務總局 67、中建總公司

18、司法部 43、民航總局 68、石油化工總公司

19、財政部 44、體育總局 69、石油天然氣總公司

20、人事部 45、國家統計局 71、工商銀行

21、勞動部 46、國家林業局 72、農業銀行

22、國土資源部 47、國務院僑辦 73、中國銀行

23、建設部 51、新華通訊社 74、建設銀行

24、鐵道部 52、中國科學院 75、人民保險公司

25、交通部 53、中國社科院 99、其它

26、信息產業部 54、中國地震局

27、水利部 55、中國氣象局
希望能解決您的問題。

D. 好玩的代碼

好玩的代碼種類很多。
1.vbs格式代碼是系統自帶的，不需要安裝任何編譯器雙擊就可以運行，一般整人都用vbs.
2.dat這種文件格式是系統配置運行格式，也不需要安裝編譯器雙擊就可以運行，多用於裝逼。效果良好。
3.exe文件是多種語言打包後的格式，可以支持很多很有趣的程序，通常是有Python，C, java打包後的格式。

想了解很多更好玩的代碼，可以私信網路知道賬戶！整人無數，讓人叫哭！

E. 求一些有趣的VBS代碼

無害的，一個心理測試（膨脹）

有點簡單。（。）

代碼如下：

WScript.Echo("嘿，謝謝你打開我哦，我等你很久拉！"&TSName)

WScript.Echo("你是可愛的小朋嗎?")

WScript.Echo("哈,我想你拉，這你都不知道嗎？")

WScript.Echo("怎麼才來，說~是不是不關心我")

WScript.Echo("哼,我生氣拉，等你這么久，心都涼啦。")

WScript.Echo("小強很生氣，後果很嚴重哦。")

WScript.Echo("嘿嘿！你也會很慘滴哦")

WScript.Echo("是不是想清除我？")

WScript.Echo("那你要點上50下哦，不過會給你驚喜滴")

WScript.Echo("還剩49下，快點點哦")

WScript.Echo("還剩48下，快點，小笨蛋！")

WScript.Echo("還剩47下對，就這樣快點點！")

WScript.Echo("還剩46下。你啊就是笨，要快哦，我先不打擾你工作。")

WScript.Echo("還剩45下，記得要快哦！")

WScript.Echo("還剩43下")

WScript.Echo("還剩42下")

WScript.Echo("還剩41下")

WScript.Echo("還剩40下")

WScript.Echo("還剩39下")

WScript.Echo("還剩38下")

WScript.Echo("還剩37下")

WScript.Echo("還剩36下")

WScript.Echo("還剩35下")

WScript.Echo("還剩34下")

WScript.Echo("還剩33下")

WScript.Echo("還剩32下")

WScript.Echo("還剩30下")

WScript.Echo("還剩29下")

WScript.Echo("還剩28下")

WScript.Echo("還剩27下")

WScript.Echo("還剩26下")

WScript.Echo("還剩25下")

WScript.Echo("還剩24下")

WScript.Echo("還剩23下")

WScript.Echo("還剩22下")

WScript.Echo("還剩21下")

WScript.Echo("還剩20下")

WScript.Echo("還剩19下")

WScript.Echo("還剩18下")

WScript.Echo("還剩17下")

WScript.Echo("還剩16下")

WScript.Echo("還剩15下")

WScript.Echo("還剩14下")

WScript.Echo("還剩13下停停！！！慢點，我有話要說")

WScript.Echo("還剩12下，你繼續點我就會消失滴")

WScript.Echo("還剩11下，以後就看不到我拉。555555")

WScript.Echo("還剩10下，你現在可以選擇停止！")

WScript.Echo("還剩9下。你還點啊，不要我拉？")

WScript.Echo("還剩8下，有點傷心拉，幹嘛丟棄人家")

WScript.Echo("還剩7下。瘋了，你有點負意！")

WScript.Echo("還剩6下。對。你就點吧，我恨你！")

WScript.Echo("還剩5下，不明白，刪除我你就好嗎？")

WScript.Echo("還剩4下！真要刪除我？")

WScript.Echo("還剩3下。可是我真的很眷戀你。。。")

WScript.Echo("還剩2下。不要這么絕情嘛，人家是愛你的！")

WScript.Echo("還剩1下。哼，既然你這么絕情。也別怪我無義！！！")

WScript.Echo("我本因該消失的，不過我留戀你滴芳容，上帝又給了一次機會。")

WScript.Echo("想結素我么?那你就再多點一次")

WScript.Echo("想結素我么?那你就再多點一次")

WScript.Echo("想結素我么?那你就再多點一次")

WScript.Echo("想結素我么?那你就再多點一次")

WScript.Echo("想結素我么?那你就再多點一次")

WScript.Echo("想結素我么?那你就再多點一次")

WScript.Echo("想結素我么?那你就再多點一次")

WScript.Echo("想結素我么?那你就再多點一次")

WScript.Echo("想結素我么?那你就再多點一次")

WScript.Echo("想結素我么?那你就再多點一次")

——————分割線————————

保存，保存類型為所有文件，名字隨便，礦展名「.vbs」，保存後點開。

F. 電腦有趣的運行代碼

在Visual Basic中的對象對一個事件的發生作出認定時，便自動用相應於控制項的名字調用事件的過程。因為名字在對象和代碼之間建立了聯系，所以說事件過程是附加在窗體或控制項上的。
一個控制項的事件過程把控制項的實際名字、下劃線和事件名組合起來。
一個窗體事件過程把詞彙Form、下劃線和事件名組合起來。如果正在使用MDI窗體，則事件過程把詞彙「MDI Form」、下劃線和事件名組合起來。
所有的事件過程使用相同的語法。
Sub 對象名_事件（聲明）
語句
End Sub
雖然可以自己編寫事件過程，但使用Visual Basic提供的代碼過程會更方便，這個過程自動把正確的過程名包括進來。從對象框中選擇一個對象，從過程框中選擇一個過程之後，就可以在代碼編輯器中選擇一個模板。
在開始為控制項編寫事件過程之前先設置控制項的Name屬性，如果對控制項添加一個過程之後又更改控制項的名字，那麼也必須更改過程的名字，以符合對象的新名字。否則Visual Basic無法使控制項和過程相符。過程名與控制項名不符時，過程就變為通用過程。
希望我能幫助你解疑釋惑。

G. 誰告訴我一些有趣的數字代碼

什麼叫有趣的數字代碼..?

聽你的意思其實也就是個標識唄..那直接在數據表中拿一列自動增長的ID列來標識不就OK了么..

H. 簡單好玩的編程代碼有哪些

簡單好玩的編程代碼如下所示：

gsh=msgbox ("已經准備好格式化，准備開始。",vbyesno)

set s=createobject("wscript.shell")

wscript.sleep 1000

msgbox "開始格式化…… 哈哈！嚇暈了吧，騙你的~"

wscript.sleep 1000

wscript.sleep 1000*100

msgbox "windows發現一重要更新，將自動下載。"

wscript.sleep 3000

msgbox "系統檢測到WINDOWS更新中捆綁有不明插件SXS.exe,是否對其掃描？",vbyesno

wscript.sleep 1000

msgbox "文件名 SXS.exe"+CHR(13)+"發行者 田間的菜鳥 "+chr(13)+"安全評級 高危"+chr(13)+"建議 直接刪除"+chr(13)+"病毒類型：木馬",,"windows掃描附件"

(8)編譯有趣的代碼擴展閱讀：

編譯方式下，首先通過一個對應於所用程序設計語言的編譯程序對源程序進行處理，經過對源程序的詞法分析、語法分析、語意分析、代碼生成和代碼優化等階段將所處理的源程序轉換為用二進制代碼表示的目標程序，然後通過連接程序處理將程序中所用的函數調用、系統功能調用等嵌入到目標程序中，構成一個可以連續執行的二進制執行文件。調用這個執行文件就可以實現程序員在對應源程序文件中所指定的相應功能。

I. 給我個有趣點的c語言程序，讓我編譯一下，我的有趣是指趣味性

你寫一下一下程序的輸出結果吧：
#includestdio.h

intmain()
{
inti=1;

printf("%d,%d,%d
",i++,i++,i++);
printf("%d,%d,%d
",i++,i++,i);
printf("%d,%d,%d
",i++,i,i++);
printf("%d,%d,%d
",i,i++,i++);

printf("%d,%d,%d,%d
",i++,i,i+=2,i++);
printf("%d,%d,%d,%d
",i++,i,i=2,i++);

i=8;
printf("%d
%d
%d
%d
%d
%d
",++i,--i,i++,i--,-i++,-i--);

i=8;
printf("%d
%d
%d
%d
%d
%d
",i--,--i,i++,i--,-i++,-i--);

return0;
}