//  BIO.H 提供8051的基本輸出函式
#ifndef _BIO_H_
#define _BIO_H_

#include <reg51.h>
#include <intrins.h>

#define RR(x) _cror_(x,1);   
#define RL(x) _crol_(x,1);
#define ledport P0            //設定led廣告燈輸出埠

void LED8_RR(int x,y,z);      //宣告右旋廣告燈函式
void LED8_RL(int x,y,z);      //宣告左旋廣告燈函式
char outsw(char indata);       //switch做組合邏輯控制函式 
char outtbl(char indata);       //建表法輸出入控制功能函式 
char outlogic(char outdata,char indata); //邏輯運算接點監控功能函式

void delay10ms(int count)      
{
   int i,j;

   for(i=0;i<count;i++)     
       for(j=0;j<1940;j++);
}

void delay1ms(int count)  
{
   int i,j;

   for(i=0;i<count;i++)     
       for(j=0;j<122;j++);
}

void LED8_RR(int x,y,z)
{
    int i;
    
    ledport=x;         //設定led port 初始值
    
    for(i=0;i<x;i++){
    	ledport=RR(ledport);
        delay1ms(y);
    }          
}  

void LED8_RL(int x,y,z)
{
    int i;
    
    ledport=x;         //設定led port 初始值
    
    for(i=0;i<=x;i++){
        ledport=RL(ledport);
        delay1ms(y);
    }          
}  

char outsw(char indata) 
{
    char outx;
    switch(~indata){
          case 0x01:outx=0x81;break;  //若indata.0 ON, 則outsw輸出 81H
	  case 0x02:outx=0xc3;break;  //若indata.2 ON, 則outsw輸出 c3H
	  case 0x04:outx=0xe7;break;  //若indata.4 ON, 則outsw輸出 e7H
	  case 0x08:outx=0x55;break;  //若indata.8 ON, 則outsw輸出 55H
	  default :outx=0x00;         //否則所有燈號全部熄滅
   }
   
   return outx;        //傳回輸出值
}

char outtbl(char indata)
{
    char TBL_IN []={0x00,0x01,0x02,0x4,0x8,0x10,0x20,0x40,0x80};
    char TBL_OUT[]={0x00,0x81,0xc3,0xE7,0xFF,0x7E,0x3C,0x18,0xAA};
    char i,outx=0;

    for(i=0;i<9;i++) {
       if(~indata==TBL_IN[i])
    	   outx= TBL_OUT[i];
    } // end for  
    
    return outx;	    //傳回輸出值
} 

char outlogic(char outdata,char indata)
{
   char inx=~indata;
   char outx=outdata;

   if((inx&0x41)==0x41)        // 若inx.0,inx.6 ON
       outx=outdata & 0xc7;    // 強制關閉outx.3,outx.4與outx.5   
   if((inx|0x7D)==0xFF)        // 若indata.1, indata.7 ON
       outx=outdata|0x07;      //強制關閉outx.0,outx.1與outx.2          
   if((inx^0x24)==0x00){       // 若inx=0X24
       outx= outdata^0x06;     //bit.1、bit.2反相輸出
       delay10ms(10);
   }
 
   return outx;      //傳回輸出值
}
#endif