双机通信程序 键盘扫描程序,定时和串口中断程序.

#include <reg52.h> #define uchar unsigned char #include<ABSACC.H> #define a8255_PA XBYTE[0xD1FF] /*PA口地址*/ #define a8255_PB XBYTE[0xD2FF] /*PB口地址*/ #define a8255_PC XBYTE[0xD5FF] /*PC口地址*/ #define a8255_CON XBYTE[0xD7FF] /*控制字地址*/ uchar display_code[16]={ 0xA0, /*0*/ 0xBB, /*1*/ 0x62, /*2*/ 0x2A, /*3 */ 0x39, /*4*/ 0x2C, /*5 */ 0x24, /*6*/ 0xBA, /*7*/ 0x20, /*8*/ 0x28, /*9 */ 0x30, /*A*/ 0x25, /*b*/ 0xE4, /*C*/ 0x23, /*d*/ 0x64, /*E*/ 0x74, /*F*/ }; uchar display_data[8]={0,0,0,0,0,0,0,0}; uchar display_bit=0xdf; uchar display_point=0; uchar point=0; void delay() { int i=5000; while(--i); } void sendchar(unsigned char ch) { SBUF=ch; while(TI==0); TI=0; } uchar inkey() { uchar i,j=1,k; uchar keytab[20]={0x81, /*0*/ 0x82, /*1*/ 0x84, /*2*/ 0x88, /*3*/ 0x41, /*4*/ 0x42, /*5*/ 0x44, /*6*/ 0x48, /*7*/ 0x21, /*8*/ 0x22, /*9*/ 0x24, /*10*/ 0x28, /*11*/ 0x11, /*12*/ 0x12, /*13*/ 0x14, /*14*/ 0x18 /*15*/ }; a8255_PC=0x00; for(i=0;i<4;i++) { a8255_PA=j; k=a8255_PC; k=k&0x0f; if(k!=0) { delay(); k=a8255_PC; k=k&0x0f; if(k!=0) break; } j=j<<1; } k=k<<4; k=k+j; for(i=0;i<16;i++) { if(keytab[i]==k) break; } return i; } void main() { uchar key; a8255_CON=0x89; SCON=0X50; TMOD=0X21; TH1=0XF3; TL1=0XF3; ES=1; TH0=(65536-2000)/256; TL0=(65536-2000)%256; ET0=1; EA=1; TR0=1; TR1=1; while(1) { key=inkey(); if(key!=16) { delay(); key=inkey(); if(key!=16) { sendchar(key); //while(key==inkey()); } } } } void time0() interrupt 1 { TH0=(65536-200)/256; TL0=(65536-200)%256; a8255_PB=display_code[display_data[display_point]]; a8255_PA=display_bit; if(display_point==5) { display_point=0; display_bit=0xdf; } else { display_point++; display_bit=~display_bit; display_bit>>=1; display_bit=~display_bit; } } void serial() interrupt 4 { if(RI==1) display_data[point++]=SBUF; if(point==6) point=0; RI=0; }