zhuideng.c

这是我从朋友那搞到的pic学习资料

/* 	*********** 功能 **********************
本程序实现D口控制发光二极管循环右移位，实现追灯功能：先Q8点亮，其次是Q7点亮，……，Q1点亮，然后Q8点亮，……，周而复始循环进行
******************************************* */  
#include	"pic18.h"		/* PIC18系列的头文件 */
int		i=0;				/* 定义延时所用循环变量寄存器 */
int		LED;				/* 定义D口输出数据寄存器,初始时D口输出高电平 */
main()					
{
	CMCON=0x07;  			/* 关比较器 */
	TRISD=0x00;				/* 设置D口所有引脚为输出 */
	PORTD=0XFF;				/* D口所有引脚输出高电平，8个发光二极管全部熄灭 */
	LED=0X80;				/* 控制Q8点亮的数据 */
	while(1)
	{
		PORTD=~LED;			/* 数据取反,D口引脚输出低电平点亮对应发光二极管 */
		for(i=0;i<0x3fff;i++)
			i=i;			/* 延时，使点亮的发光二极管有充足的时间点亮 */
		LED=LED>>1;			/* 将显示数据右移一位，为下一次显示作准备*/	
		if(LED==0X00)
			LED=0X80;		/* 控制Q8点亮的数据 */
	}
}