单片部分机程序.docVIP

实验一 P1口输入输出 1（第一个） ORG 0000H LJMP LOOP LOOP: MOV A,#0FEH ;赋初值，只有一盏灯亮√ MOV R2,#8 ;设计数值，左移8次 OUTPUT:MOV R3,#4 ;设计数值，每管熄灭4*50ms=200ms OUTPUT1: MOV P1,A ;送P1口输出. ACALL DELAY ；调用延时子程序 DJNZ R3, OUTPUT1 ；（R3）-1≠0时，跳转 RL A ;A左移 DJNZ R2,OUTPUT ;判断8管是否循环一遍，若是，则从P1.0重新开始循环 LJMP LOOP ；循环 ;子程序名：DELAY ;子程序功能：延时50ms ;出/入口参数：无 ;占用资源：R6 R7 DELAY: MOV R6, #200 ;延时子程序，延时时间为0 DELAY1: MOV R7, #125 DELAYLOOP: DJNZ R6, DELAYLOOP DJNZ R7, DELAY1 RET