/*----------------------------------------
CDLEB_Main.c

電腦音源切換控制器
	用AT89C251+CD4016切換控制，可控制四路以上
的立體音源輸入切換，一路立體聲輸出,有紅外遙
控PC功能,PC軟件可使用Grider3.2(SAA3010T電視
遙控器)
靜音　關閉音源
AV　音源1
TV　音源2
SEARCH　音源3
P.P　音源4

Copyright 2003 http://cdle.yeha.net 
               http://cdle.126.com
All rights reserved.		
		明浩 E-mail: pnzwzw@163.com
----------------------------------------*/

#include <AT892051.h>

static unsigned char data CS;
static unsigned char data IRCode[3],IRCON,IRCON2;

void main(void)
{
	unsigned int de;
	void InitCom(unsigned char BaudRate);
	void ComOutChar(unsigned char OutData);
	void CSToOut(void);

	InitCom(6); //設置波特率為9600 1-7波特率300－19200
	EA = 1;	//允許CPU中斷
	IT0 = 1; //INT0下降沿有效
	EX0 = 1; //開INT0中斷
	CS = 0; //設置CS為0不選任何的音源，如為1則選第1路
	CSToOut();
	do
		{	
			if (P1_0 == 0)  //取按鍵值
				{
					CS = 1;
					P1 = 255; //P1口全為高電平，4-7通過反相為低不選任何音源，0-3為高用于
					CSToOut();
				}
			if (P1_1 == 0)
				{
					CS = 2;
					P1 = 255;
					CSToOut();
				}
			if (P1_2 == 0)
				{
					CS = 3;
					P1 = 255;
					CSToOut();
				}
			if (P1_3 == 0)
				{
					CS = 4;
					P1 = 255;
					CSToOut();
				}
			for (de=0; de<4000; de++);
		}
	while(1);
}


//串口初始化 晶振為11.0592M　方式1 波特率300-57600
void InitCom(unsigned char BaudRate)
{
	unsigned char THTL;
	switch (BaudRate)
		{
			case 1: THTL = 64; break; //波特率300
			case 2: THTL = 160; break; //600
			case 3: THTL = 208; break; //1200
			case 4: THTL = 232; break; //2400
			case 5: THTL = 244; break; //4800
			case 6: THTL = 250; break; //9600
			case 7: THTL = 253; break; //19200
			case 8: THTL = 255; break; //57600
			default: THTL = 208;
		}
	SCON = 0x50; //串口方式1,允許接收
	TMOD = 0x21; //定時器1定時方式2定時器0方式1　用在別處可以不用定時器0,TMOD=0x20
	TCON = 0x40; //設定時器1開始計數(shù)
	TH1 = THTL;
	TL1 = THTL;
	PCON = 0x80; //波特率加倍控制,SMOD位
	RI = 0;	//清收發(fā)標志
	TI = 0;
	TR1 = 1; //啟動定時器
}

//向串口輸出一個字符（非中斷方式）
void ComOutChar(unsigned char OutData)
{
	SBUF = OutData; //輸出字符
	while(!TI); //空語句判斷字符是否發(fā)完
	TI = 0; //清TI
}

//定時器0中斷處理
void timeint(void) interrupt 1 using 2
{
  unsigned char a;
  TH0=0xFD;
  TL0=0x1E; //設定時值為800us

	if (IRCON<3)
    {
      if (IRCON2<8) //每中斷一次讀一次遙控接收頭的狀態(tài),每二次為遙控編碼中的一個位
        {
          IRCON2++;
		      IRCode[IRCON]=IRCode[IRCON]<<1; //每讀一次放入變量中的二進制的一個位，每次左移一位
		      IRCode[IRCON]=IRCode[IRCON] | P3_2; //每八次填滿一個字節(jié)，一個字節(jié)存放遙控編碼4個位
        }
      else
        {
          IRCON++; //第填滿一個字節(jié)，指向下一個變量
          IRCON2=0; //計數(shù)清零
        }
    }
 else
  {
		TR0 = 0; //關閉定時器
		ET0 = 0; //定時器0中斷關閉
		if ((IRCode[1]!=0xFF) && (IRCode[2]!=0xFF))
			{
				for (a=1;a<3;a++)
					{
						ComOutChar(IRCode[a]); //這兩句可通過PC串口軟件接收的數(shù)據(jù)
						ComOutChar(IRCode[a]);
						ComOutChar(IRCode[a]); //共發(fā)6個字節(jié)正好是軟件要求的
					}
			}
    if ((IRCode[1] == 0x56) && (IRCode[2] == 0x4A)) //取遙控值,取變量中的2,3字節(jié)
			{                        //第一字節(jié)是引導碼，第二、三字節(jié)是起始位、控制位和系統(tǒng)碼
				CS = 1;               
				P1 = 255;
				CSToOut();
				}
		if ((IRCode[1] == 0x56) && (IRCode[2] == 0x55))
			{
				CS = 2;
				P1 = 255;
				CSToOut();
			}
		if ((IRCode[1] == 0x55) && (IRCode[2] == 0x54))
			{
				CS = 3;
				P1 = 255;
				CSToOut();
			}
		if ((IRCode[1] == 0x55) && (IRCode[2] == 0xD4))
			{
				CS = 4;
				P1 = 255;
				CSToOut();
			}
		if ((IRCode[1] == 0x55) && (IRCode[2] == 0xD3))
			{
				CS = 0;
				P1 = 255;
				CSToOut();
			}
		EX0 = 1; //打開
	} 
}

//INT0中斷
void INT0Fun(void) interrupt 0 using 2
{
	ES = 0; //串口中斷關閉
  EX0 = 0; //外部中斷0關閉
  ET0 = 1; //定時器0中斷打開
  TH0=0xFD;
  TL0=0x1E; //設定時值為800us
  
	for (IRCON=0; IRCON<3; IRCON++)
		IRCode[IRCON] = 0;
	IRCON = 0;
	IRCON2 = 0; //計數(shù)清零

	TR0 = 1;//開始計數(shù)
}

//根據(jù)全局變量輸出相應的控制信號
void CSToOut(void)
{
	P3_3 = 0;
	P3_4 = 0;
	P3_5 = 0;
	P3_7 = 0; //用P3=0則燒到片上無法運行，原因不明，可能串口P3_0,P3_1有關
	switch(CS)
		{
			case 0:
				P1 = 255; //P1口全為高電平，0-3通過反相為低不選任何音源，4-7為高用于讀取按鍵
				break;
			case 1:
				P1_4 = 0; //為0反相后高電平選指定的音源
				P3_3 = 1;
				break;
			case 2:
				P1_5 = 0;
				P3_4 = 1;
				break;
			case 3:
				P1_6 = 0;
				P3_5 = 1;
				break;
			case 4:
				P1_7 = 0;
				P3_7 = 1;
				break;
		}
}