課程設(shè)計-計算機技術(shù)基礎(chǔ)(c語言)小蟲子挖隧道設(shè)計-文庫吧
2025-05-15 22:56 本頁面
【正文】 /*調(diào)用向左嘴巴函數(shù) */ break。 } case39。P39。: { dazui(x,y,13)。 /*調(diào)用合上嘴巴函數(shù) */ delay(2021)。 /*延遲 2021 毫秒 */ dazui(x,y,0)。 /*調(diào)用合上嘴巴函數(shù) */ y=y+15。 /*移動嘴巴位置 */ delay(1000)。 /*延遲 1000 毫秒 */ dazuib(x,y,13)。 /*調(diào)用向下嘴巴函數(shù) */ break。 } default :。 } } } init() /*定義初始化圖形系統(tǒng)函數(shù) */ { int gdriver=DETECT。 int gmobe。 initgraph(amp。gdriver,amp。gmobe,c:\\tc\\bgi)。 /*初始化圖象系統(tǒng) */ setbkcolor(0)。 /*定義背景為黑色 */ return。 } ground() /*畫綠地函數(shù) */ { int i,rx,ry。 for(i=1。i=2021。i++) /*循環(huán)系統(tǒng)語句 */ putpixel(rand()%maxx,rand()%maxy,2)。 /*在指定位置畫一像素 */ for(i=1。i=1000。i++) { rx=rand()%maxx。 ry=rand()%maxy。 /*隨機位置畫一像素 */ putpixel(rx,ry,12)。 putpixel(rx+1,ry,12)。 putpixel(rx+1,ry+1,12)。 /*在三個相鄰位置畫像素 */ } for(i=1。i=20210。i++) putpixel(rand()%maxx,rand()%maxy,10)。 /*在指定位置畫一像素 */ return。 } dazui(int x,int y,int lcolor) /*在 x,y 處以 lcolor 色畫合上大嘴巴 */ { setcolor(lcolor)。 /*設(shè)置當(dāng)前畫線顏色 */ setfillstyle(1,lcolor)。 /*設(shè)置填充模式和顏色 */ pieslice(x,y,0,360,r)。 /*繪制并填充一個扇形 */ setlinestyle(0,0,3)。 /*設(shè)置當(dāng)前畫線寬度和類型 */ setcolor(0)。 /*設(shè)置當(dāng)前畫線顏色 */ circle(x+4,y6,2)。 /*在給定半徑以（ x,y）為圓心畫圓 */ return。 } dazuir(int x,int y,int lcolor) /*在 x,y 處以 lcolor 色向右的大嘴巴 */ { setcolor(lcolor)。 /*設(shè)置當(dāng)前畫線顏色 */ setfillstyle(1,lcolor)。 /*設(shè)置填充模式和顏色 */ pieslice(x,y,30,330,r)。 /*繪制并填充一個扇形 */ setlinestyle(0,0,3)。 /*設(shè)置當(dāng)前 畫線寬度和類型 */ setcolor(0)。 /*設(shè)置當(dāng)前畫線顏色 */ circle(x+4,y6,2)。 /*在給定半徑以（ x,y）為圓心畫圓 */ return。 } dazuil(int x,int y,int lcolor) /*在 x,y 處以 lcolor 色向左的大嘴巴 */ { setcolor(lcolor)。 /*設(shè)置當(dāng)前畫線顏色 */ setfillstyle(1,lcolor)。 /*設(shè)置填充模式和顏色 */ pieslice(x,y,210,360,r)。 /*繪制并填充一個扇形 */ pieslice(x,y,0,150,r)。 /*繪制并填充一個扇形 */ setlinestyle(0,0,3)。 /*設(shè)置當(dāng)前畫線寬度和類型 */ setcolor(0)。 /*設(shè)置當(dāng)前畫線顏色 */ circle(x4,y6,2)。 /*在給定半徑以（ x,y）為圓心畫圓 */ return。 } dazuit(int x,int y,int lcolor) /*在 x,y 處以 lcolor 色向上的大嘴巴 */ { setcolor(lcolor)。 /*設(shè)置當(dāng)前畫線顏色 */ setfillstyle(1,lcolor)。 /*設(shè) 置填充模式和顏色 */ pieslice(x,y,120,360,r)。 /*繪制并填充一個扇形 */ pieslice(x,y,0,60,r)。 /*繪制并填充一個扇形 */ setlinestyle(0,0,3)。 /*設(shè)置當(dāng)前畫線寬度和類型 */ setcolor(0)。 /*設(shè)置當(dāng)前畫線顏色 */ circle(x7,y6,2)。 /*在給定半徑以（ x,y）為圓心畫圓 */ return。 }
畢業(yè)設(shè)計相關(guān)推薦
鄂ICP備17016276號-1