#include<reg51.h>
#include<absacc.h>
#define uchar unsigned char
#define uint unsigned int
/***************** LCD address*********/
#define w_c_add XBYTE[0x2070]    /*寫命令字地址*/
#define w_d_add XBYTE[0x2071]    /*寫數(shù)據(jù)地址*/
#define r_s_add XBYTE[0x2072]   /*讀狀態(tài)字地址*/
#define r_d_add XBYTE[0x2073]    /*讀數(shù)據(jù)地址*/
/**************keybord  address*************/
#define COM XBYTE[0x2021]
#define DAT XBYTE[0x2020]
/******************步進電機******************/
unsigned char code num[10]={0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39};
uchar idata zheng[10]={0x01,0x03,0x02,0x06,0x04,0x0c,0x08,0x09,0x00};
uchar idata fan[10]={0x09,0x08,0x0c,0x04,0x06,0x02,0x03,0x01,0x00};
/**************變量聲明******************/
static uchar idata ad[8];     /*定義數(shù)據(jù)存儲區(qū)      */
uchar bdata status;
sbit busy=status^7;
sbit p10=P1^0;
sbit p11=P1^1;
sbit p12=P1^2;
sbit p13=P1^3;
sbit p14=P1^4;
sbit p33=P3^3;
sbit p34=P3^4;
sbit p35=P3^5;
sbit p30=P3^0;
sbit p31=P3^1;
uint bj;       /*電機延時時間*/
uchar key=0;
uchar last_key=0;
char error;
uchar error1;
uchar coutlc; 
/****************顯示 *******************/
uchar code welcom0[]="  智能電梯終端  ";
uchar code welcom1[]="      ";
uchar code welcom2[]="       ";
uchar code welcom3[]="    ";
uchar code reach[]="～  ～  ～  ～    ";
uchar code reach0[]="      樓已到    ";
uchar code reach1[]="  歡迎下次乘坐  ";
uchar code reach2[]="            ^_^  ";
uchar code space[]="                   ";
uchar code ask0[]="^_^          "; 
uchar code ask1[]="  歡迎乘坐電梯  ";
uchar code ask2[]="  你想去幾樓    ";
uchar code ask3[]="  ～  ～  ～  ～";
uchar code change0[]="  *  *  *  *    ";
uchar code change1[]="§        樓  §";
uchar code change2[]="  *  *  *  *    ";
/***************函數(shù)聲明*******************/
void chushi();
void start();
void show();
void show1();
void show2();
void show3();
void delay(uint n);
void lcd_busy(void);
void clear();
void display(uint m,uchar *p);
void display1(uint o);
void display2(uint p);
void dlms(uint n);
void ctrl(bit cf,uint n);
uint getkey();                  /*鍵盤函數(shù)*/
uint ifkey(void); 
/***************main函數(shù)*****************/
void main()
{   
	chushi();         /*初始化*/
	start();               
}
/*****************初始化***************/
void chushi()        
{   
	EA=1;
	IT0=1; 
	EX0=1;
	p33=1;
	p34=1;
        p35=1;
	show();	                       /*歡迎界面顯示*/
	delay(2);
	show2();
	
}
/****************運行******************/
void start()
{
while(1)
{   
	key=getkey();                 /*輸入鍵值*/
	error=key-last_key;           /*實際鍵值*/
	bj=50; 
	if(error<0)                   /*鍵值為負，下樓倒轉(zhuǎn)*/
	{   clear();
		error1=0-error;
		ctrl(1,error1*10);
		p34=0;
		p35=0;
		show1();
		display1(key);
	}
	else 
	{   clear();                 /*鍵值為正，上樓正轉(zhuǎn)*/
		ctrl(0,error*10);
		p34=0;
		p35=0;
		show1();
		display1(key);
	}
	delay(2);
	p33=0;
	delay(1);
	p33=1;
	delay(1);
	p33=0;
	delay(1);
	p33=1;
	delay(2);
	last_key=key;
}  
}
/******************顯示******************/
void show()                            /*歡迎顯示*/
{
	clear();
    display(0x80,welcom0);   
    display(0x90,welcom1);   
    display(0x88,welcom2);
    display(0x98,welcom3); 
}
void show1()                          /*到達顯示*/
{   	
	clear();
	display(0x80,reach);   
    display(0x90,reach0);  
    display(0x88,reach1);
    display(0x98,reach2);
} 
void show2()                         /*詢問要到幾樓*/
{
	clear();
	display(0x80,ask0);   
    display(0x90,ask1);  
    display(0x88,ask2);
    display(0x98,ask3);
}  
void show3()                        /*樓層實時變化*/
{
	clear();
	display(0x80,change0);   
    display(0x90,change1);  
    display(0x88,space);
    display(0x98,change2);
}  
void lcd_busy(void)   /*LCD忙狀態(tài)檢測函數(shù) */
{
	do 
	{
  	  status=r_s_add;  /* 讀狀態(tài)字地址的第7位 */
	}	
	while(busy);
}

void display(uint m,uchar *p)
{   uint n;
	uint add;	
	add=m;    /* 設(shè)置顯示坐標，80H對應字符的第一行第一列 */  
	lcd_busy();
	w_c_add=add; /* 寫數(shù)據(jù) */
	for(n=0;n<8;n++)
	{
	    lcd_busy();
	    w_d_add=p[2*n];
		lcd_busy();       /* 寫數(shù)據(jù) ，上半字節(jié)*/
		w_d_add=p[2*n+1]; /* 寫數(shù)據(jù) ，下半字節(jié)*/
	}
	}
void display1(uint o)
{
	lcd_busy();
    w_c_add=0x91;	
    lcd_busy();	
    w_d_add=num[o/10];
    lcd_busy();	
	w_d_add=num[o%10];
	lcd_busy();	
}
void display2(uint p)
{
	lcd_busy();
    w_c_add=0x92;	
    lcd_busy();	
    w_d_add=num[p/10];
    lcd_busy();	
	w_d_add=num[p%10];
	lcd_busy();	
}
/********************重置****************/
void clear()
{
        lcd_busy();
	w_c_add=0x30;   /* 功能設(shè)置：8位數(shù)據(jù) */
	lcd_busy();     
	w_c_add=0x0C;   /* 顯示狀態(tài)：整體顯示，游標位置無效*/
	lcd_busy();
	w_c_add=0x01;/* 清除顯示：將DDRAM填滿“20H”，并且設(shè)定DDRAM的地址計數(shù)器到“00”*/
	lcd_busy();
	w_c_add=0x02;/* 地址歸位：設(shè)定DDRAM的地址計數(shù)器到“00”，將游標移到開頭原點位置 */
	display(0x80,space);  
	display(0x90,space);
	display(0x88,space);
	display(0x98,space);
}
/****************延時程序**********/
void delay1()                 
{   int x=100000;
    while(x--);
}
void delay(uint n)
{   uint i;
    for(i=0;i<n;i++)
	{
       delay1();
     }
}
/**************步進電機************/
void  ctrl(bit cf,uint n)
{   
	unsigned char jac=0;
    uint  i;
   	uchar  j=0;
	uint  k;
    if(cf==0)      /*正轉(zhuǎn)標志*/
    {
    p34=0;
    p35=1;
    for(k=0;k<n;k++)
    {
     for(i=0;i<10;i++)
     {
      P1=zheng[j];
  	  dlms(bj);
      j+=1;
      if(zheng[j]==0) 
       j=0;
     }
     jac=(jac+1)%10;
     if(jac==9)
     coutlc++;
     show3();
     display2(coutlc);
   }
     
  }
      else     /*反轉(zhuǎn)標志*/
       {
       	unsigned char jac1=0;
        p35=0;
       	p34=1;
       for(k=0;k<n;k++)
      {
      	for(i=0;i<10;i++)
          {
           P1=fan[j];
  	       dlms(bj);
           j+=1;
           if(fan[j]==0) 
           j=0;
           }
            jac=(jac+1)%10;
           if(jac==9)
           coutlc--;
          show3();
          display2(coutlc);
       }
   }
}
void dlms(uint speed)   /*步進電機節(jié)拍控制*/
{   
	 uint i;
	 uint j;
	for(i=0;i<speed;i++)
	{
		for(j=0;j<10;j++);
	}
}
/***************鍵盤函數(shù)****************/
uint  getkey()/*取鍵值函數(shù)*/
{ uchar i;
  while(ifkey()==0);/*無鍵按下等待*/
  COM=0x40;/*讀fifo ram命令*/
  i=DAT;
  i=i&0x3f;/*取鍵值低6位*/
  return(i);/*返回鍵值*/
}
uint ifkey(void)/*判斷fifo有鍵按下函數(shù)*/
{ uint k;
  k=COM;
  return(k&0x0f);/*有鍵按下*/
}