在開(kāi)發(fā)縣級(jí)電網(wǎng)調(diào)度自動(dòng)化系統(tǒng)的過(guò)程中，碰到一個(gè)要繪制電力系統(tǒng)一次接線圖的問(wèn)題。由于電力系統(tǒng)一次接線圖比較復(fù)雜，用一般的編程方法來(lái)繪制比較困難，因此，用C語(yǔ)言開(kāi)發(fā)了一個(gè)手工繪制電力系統(tǒng)一次接線圖的鍵盤(pán)繪圖程序，使用該程序繪制的一次接線圖符合用戶需求，效果良好。下面小編給大家分享下技巧，希望可以幫助到大家解決困難。
　　一、使用方法
　　程序中定義了幾個(gè)特殊鍵:
　　\"V":畫(huà)筆提起
　　\"W":開(kāi)始畫(huà)圖
　　\"R":開(kāi)始擦圖
　　\"S":當(dāng)前圖形存入文件
　　\"E":調(diào)出已有文件
　　\"C":畫(huà)圓
　　程序一運(yùn)行,屏幕上出現(xiàn)一個(gè)黃色的邊框來(lái)設(shè)定畫(huà)圖的區(qū)域,區(qū)域中間出現(xiàn)提起的畫(huà)筆符號(hào) ,當(dāng)按下"W"鍵時(shí),畫(huà)筆符號(hào)變?yōu)?,此時(shí)可移動(dòng)方向鍵(上、下、左、右、左上、左下、右上、右下)來(lái)畫(huà)圖;當(dāng)按下"R"鍵時(shí),畫(huà)筆符號(hào)變?yōu)?,此時(shí)可移動(dòng)方向鍵來(lái)擦圖;在畫(huà)圖過(guò)程中,按下"C"鍵,可畫(huà)出一個(gè)半徑為20個(gè)象素點(diǎn)的圓;當(dāng)結(jié)束畫(huà)圖時(shí),按下"S"鍵,將畫(huà)好的圖形存盤(pán);按下"E"鍵可調(diào)出已有的圖形進(jìn)行編輯.
　　二、源程序清單
　　# include \"graphics.h\"
　　# include \"stdio.h\"
　　# include \"fcntl.h\"
　　# include \"stdlib.h\"
　　main()
　　void save(),load();
　　void *wg,*rg,*vg,*fy;
　　int driver,mode;
　　int c=RED;
　　int x=320,y=225;
　　int x1,y1,x2,y2;
　　int k,k1,k2;
　　/* initialize grapher */
　　detectgraph(&driver,&mode);
　　initgraph(&driver,&mode,\"c:\\tc\");
　　/* write the pen */
　　bar(200,10,206,16);
　　line(203,7,200,10);
　　line(203,7,206,10);
　　line(243,7,240,16);
　　line(243,7,246,16);
　　line(283,7,280,10);
　　line(283,7,286,10);
　　line(283,7,283,16);
　　/* save the pen */
　　wg=malloc(imagesize(200,7,206,16));
　　rg=malloc(imagesize(240,7,246,16));
　　vg=malloc(imagesize(280,7,286,16));
　　fy=malloc(imagesize(200,7,206,16));
　　getimage(200,7,206,16,wg);
　　getimage(240,7,246,16,rg);
　　getimage(280,7,286,16,vg);
　　cleardevice();
　　/* write the box */
　　setcolor(YELLOW);
　　rectangle(4,19,637,447);

x1=x-3;
　　y1=y+1;
　　x2=x+3;
　　y2=y+10;
　　getimage(x1,y1,x2,y2,fy);
　　putimage(x1,y1,vg,XOR_PUT);
　　/* receive the command */
　　for (;;)
　　while (bioskey(1)==0);
　　k=bioskey(0);
　　putimage(x1,y1,fy,AND_PUT);
　　if (((k&0x00ff)|0x00)==0)
　　k1=k&0xff?0:k>>8; /* k1 is the specialkey value */
　　else
　　k2=k&0x00ff; /* k2 is the non-specialkey value */
　　if (((k&0x00ff)|0x00)==0) /* Special key */
　　switch(k1)
　　case 45:
　　restorecrtmode();
　　exit(0);
　　case 72:
　　if (y>20)
　　y=y-1;
　　break;
　　case 75:
　　if (x>5)
　　x=x-1;
　　break;
　　case 77:
　　if (x<636)
　　x=x+1;
　　break;
　　case 80:
　　if (y<446)
　　y=y+1;
　　break;
　　case 71:
　　if ((x>5)&&(y>20))
　　x=x-1;
　　y=y-1;
　　break;
　　case 79:
　　if ((x>5)&&(y<446))
　　x=x-1;
　　y=y+1;
　　break;
　　case 73:
　　if ((x<636)&&(y>20))
　　x=x+1;
　　y=y-1;
　　break;
　　case 81:
　　if ((x<636)&&(y<446))
　　x=x+1;
　　y=y+1;
　　break;
　　x1=x-3;
　　y1=y+1;
　　x2=x+3;
　　y2=y+10;
　　getimage(x1,y1,x2,y2,fy);
　　/* non-special key */[Page]
　　switch(k2)
　　case 118: /* \'v\' */
　　case 86: /* \'V\' */
　　putimage(x1,y1,vg,OR_PUT);
　　break;
　　case 119: /* \'w\' */
　　case 87: /* \'W\' */
　　putimage(x1,y1,wg,OR_PUT);
　　putpixel(x,y,c);
　　break;
　　case 114: /* \'r\' */
　　case 82: /* \'R\' */
　　putimage(x1,y1,rg,OR_PUT);
　　putpixel(x,y,BLACK);
　　break;
　　case 115: /* \'s\' */
　　case 83: /* \'S\' */
　　save(\"pic.dat\");
　　break;

case 101: /* \'e\' */
　　case 69: /* \'E\' */
　　load(\"pic.dat\");
　　break;
　　case 99: /*\'c\'*/
　　case 67: /*\'C\'*/
　　setcolor(RED);
　　circle(x,y,20);
　　break;
　　default:continue;
　　/* function for screen picture save
　　*/
　　void save(char *fname)
　　FILE *fp;
　　int i;
　　register long j;
　　char far *ptr;
　　fp=fopen(fname,\"wb\");
　　for(i=0;i<4;i++)
　　outportb(0x3CE,4);
　　outportb(0x3CF,i);
　　ptr=(char far *) 0xA0000000L;
　　for (j=0;j<38400L;j++)
　　putc(*ptr,fp);
　　ptr++;
　　fclose(fp);
　　outportb(0x3CF,0);
　　/* function for screen picture display
　　*/
　　void load(char *fname)
　　FILE *fp;
　　register int i;
　　int k4=1;
　　register long j;
　　char far *ptr;
　　fp=fopen(fname,\"rb\");
　　for (i=0;i<4;i++)
　　outportb(0x3C4,2);
　　outportb(0x3C5,k4);
　　ptr=(char far *)0xA0000000L;
　　for (j=0;j<38400L;j++)
　　*ptr=getc(fp);
　　ptr++;
　　k4*=2;
　　fclose(fp);
　　outportb(0x3C5,0xF);
　　三、結(jié)束語(yǔ)
　　該程序在Turbo C 2.0環(huán)境下運(yùn)行通過(guò),使用效果良好.可以根據(jù)具體需要,對(duì)該程序進(jìn)行擴(kuò)充,以增加繪圖功能.