/*******************************************************************/
/* TX-1C單片機實驗板實驗例程        							   */
/* 2007年8月第二期培訓班課后習題詳解							   */
/* 作者：郭天祥      											   */
/* 郵箱：txmcu@163.com 										  	   */
/* 網站：www.txmcu.com(天祥電子)    							   */
/*【版權】Copyright(C)天祥電子 www.txmcu.com  All Rights Reserved  */
/*【聲明】此程序僅用于學習與參考，引用請注明版權和作者信息！       */
/*                                                                 */
/*******************************************************************/
/*                                                          
8個發光管來回流動，
每個管亮100ms,流動時讓蜂鳴器發出"滴滴"聲。
*/
/*********************************************************/
#include<reg52.h>  //52單片機頭文件
#include <intrins.h> //包含有左右循環移位子函數的庫
#define uint unsigned int    //宏定義
#define uchar unsigned char  //宏定義
sbit beep=P2^3;
void delay(uint z)  //延時函數,z的取值為這個函數的延時ms數，如delay(200);大約延時200ms.
{					//delay(500);大約延時500ms.
	uint x,y;
	for(x=z;x>0;x--)
		for(y=110;y>0;y--);	
}
void main()		    //主函數
{
	uchar a,i;
	while(1)        //大循環
	{
		a=0xfe;     //賦初值
		for(i=0;i<8;i++)   //左移
		{
			P1=a;       //點亮小燈
			beep=0;     //開啟蜂鳴器
			delay(50); //延時50毫秒
			beep=1;     //關閉蜂鳴器
			delay(50);  //再延時50毫秒
			a=_crol_(a,1); //將a變量循環左移一位
		}
		a=0x7f;
		for(i=0;i<8;i++)  //右移
		{
			P1=a;       //點亮小燈
			beep=0;     //開啟蜂鳴器
			delay(50); //延時50毫秒
			beep=1;     //關閉蜂鳴器
			delay(50);   //再延時50毫秒
			a=_cror_(a,1); //將a變量循環右移一位
		}		
	}
}