io-p0.bak

电子开发网培训用的51单片机内部培训代码

;//*********************************************************
;//实现功能：本程序实现在P0口模拟一个流水灯程序
;//目标板  ：
;//*********************************************************

p_out equ P0   ;宏定义P0为p_out
	org 00h        ;程序的开始地址
	    ajmp main      ;跳到main
	org 030h
;//******************主函数***************************
;//描  述：实现在P0口模拟一个流水灯程序
;//入口参数:无
;//出口参数:无
;//设计人:ycj
;//最后修改:时间(2006.5.1)  修改人(ycj)
;//****************************************************
main:          ;主函数
	mov sp,#0x50   ;设置sp堆栈的初始位置
	mov a,#0x0fe   ;初始化acc
main_1:       
	mov p_out,a    ;点亮一个灯
	mov r1,#250      ;
	mov r0,#250      ;
	call delay_time;调用时间延迟子程序,上面两句是设置延迟时间
	mov p_out,#0xff;熄灭灯
	rl a           ;循环左移一位准备点亮下一个灯
	jmp main_1     ;跳到main_1循环
;//******************时间延迟函数**********************
;//描  述：用指令实现延时一段时间
;//入口参数:r1为高位,r0为低位,都是十六进制表示