C語言編程技巧匯萃
/*從鍵盤中讀取字符 功能：按下普通鍵時，返回其ASCII碼 掃描碼CODE=0*/ 
int INKEY(int *code) 
{ 
int m; 
while(!bioskey(1))/*可加入無按鍵時代碼*/; 
*code=bioskey(0); 
m=*code*255; 
if(!m) m=*code>>8; 
*code=*code&255; 
return m; 
} 

/*獲取機器日期*/ 
int DATE(char *s,char type) 
{ 
char dat[30]; 
int num; 
struct tm *tblock; 
time_t t; 
t=time(NULL); 
tblock=localtime(&t); 
strcpy(dt,asctime(tblock)); 
strcpy(s,""); 
switch(type) 
{ 
case 'N': 
num=(*tblock).tm_year 1900; 
itoa(num,s,10); 
break; 
case 'Y': 
num=(*tblock).tm_mon 1; 
itoa(num,s,10); 
break; 
case 'R': 
num=(*tblock).tm_mday; 
itoa(num,s,10); 
break; 
case 'S': 
strcpy(dt,asctime(tblock)); 
MID(s,dt,12,8); 
break; 
} 
} 
return num; 
} 

/*將浮點數轉化為字符串*/ 
/* 參數說明 data:需轉換的浮點數；s:輸出字符串；len:轉換后的長度*/ 
void f_to_s(double data,char *s,int len) 
{ 
int dec,sign,i; 
char *s1,s2[100],s3[100]; 
s1=0; 
s2[0]=0; 
s3[0]=0; 
s1=fcvt(data,len,&dec,&sign); 
if (!sign&&data>=1) 
{ 
MID(s2,s1,dec 1,-1); 
MID(s3,s1,1,dec); 
strcpy(s," "); 
strcat(s,s3); 
strcat(s,"."); 
strcat(s,s2); 
} 
if (sign&&fabs(data)>=1) 
{ 
MID(s2,s1,dec 1,-1); 
strcpy(s,"-"); 
MID(s3,s1,1,dec); 
strcat(s,s3); 
strcat(s,"."); 
strcat(s,s2); 
} 
if (!sign&&dec==0) 
{ 
strcpy(s," 0."); 
strcat(s,s1); 
} 
if (sign&&dec==0) 
{ 
strcpy(s,"-0."); 
strcat(s,s1); 
} 
if (!sign&&dec<0) 
{ 
strcpy(s," 0."); 
for(i=1;i<=fabs(dec);i ) 
strcat(s,"0"); 
strcat(s,s1); 
} 
if (sign&&dec<0) 
{ 
strcpy(s,"-0."); 
for(i=1;i<=fabs(dec);i ) 
strcat(s,"0"); 
strcat(s,s1); 
} 
if (strlen(s)>len) s[len]=0; 
} 

/*清除屏幕*/ 
void CLSXY(int color,int x,int y,int xl,int yl) 
{ 
int x1,y1; 
union REGS r; 
if(x<1||y<1) return; 
y--; 
x--; 
y1=y yl-1; 
x1=x xl-1; 
if (y1>25||x1>80) 
return; 
r.h.ah=6; /*子功能號*/ 
r.h.al=0; /*滾動行數*/ 
r.h.ch=y; 
r.h.cl=x; 
r.h.dh=y1; 
r.h.dl=x1; 
r.h.bh=color*16; 
int86(16,&r,&r); 
} 

/*顯示時間*/ 
void display_time(int color,int back_color,int y,int x) 
{ 
static char oldtime[9]=""; 
char newtime[9]; 
if(y<1||x<1) return; 
settextstyle(1,0,1); 
DATA(newtime,'S'); 
back_color=7; 
if(strcmp(newtime,oldtime)) 
{ 
setfillstyle(1,back_color); 
setcolor(color); 
bar(535,458,635,475); 
outtextxy(x,y,newtime); 
strcpy(oldtime,newtime); 
} 
} 


/*打印一個矩形*/ 
void PRINT_KJ(int x,int y,int wide,int high) 
{ 
int i; 
for(i=x;i { 
gotoxy(i,y); 
cprintf("