/*******************************************************************/
/* TX-1C單片機實驗板實驗例程        							   */
/* 2007年8月第二期培訓班課后習題詳解							   */
/* 作者：郭天祥      											   */
/* 郵箱：txmcu@163.com 										  	   */
/* 網站：www.txmcu.com(天祥電子)    							   */
/*【版權】Copyright(C)天祥電子 www.txmcu.com  All Rights Reserved  */
/*【聲明】此程序僅用于學習與參考，引用請注明版權和作者信息！       */
/*                                                                 */
/*******************************************************************/
/*                                                          
8個發光管間隔200ms由上至下，
再由下至上，再重復一次，
然后全部熄滅再以300ms間隔
全部閃爍5次。重復此過程
*/
/*********************************************************/
#include<reg52.h>  //52單片機頭文件
#include <intrins.h> //包含有左右循環移位子函數的庫
#define uint unsigned int    //宏定義
#define uchar unsigned char  //宏定義
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,j;
	while(1)        //大循環
	{
		for(j=0;j<2;j++)
		{
			a=0xfe;     //賦初值
			for(i=0;i<8;i++)   //左移
			{
				P1=a;       //點亮小燈
				delay(200); //延時200毫秒
				a=_crol_(a,1); //將a變量循環左移一位
			}
			a=0x7f;
			for(i=0;i<8;i++)  //右移
			{
				P1=a;       //點亮小燈
				delay(200); //延時200毫秒
				a=_cror_(a,1); //將a變量循環右移一位
			}
		}
		P1=0xff;	 //全部熄滅
		for(j=0;j<10;j++)
		{
			delay(300); //延時
			P1=~P1;      //全部取反10次，既閃爍5次		  
		}
	}
}