基于51单片机流水灯延时点亮课程设计(编辑修改稿)

基于51单片机流水灯延时点亮课程设计(编辑修改稿)内容摘要：

MOVX @DPTR,A CALL DEL500 RL A MOV R1,A DJNZ R2,LOOP1 AJMP KEY1 GO2: START2:MOV R1,00000001B MOV R2,08 LOOP2:MOV A,R1 MOV P0,A MOV DPTR,7FFFH MOVX @DPTR,A CALL DEL200 RL A MOV R1,A DJNZ R2,LOOP2 AJMP KEY2 GO3: START3:MOV R1,00000001B 11 MOV R2,08 LOOP3:MOV A,R1 MOV P0,A MOV DPTR,7FFFH MOVX @DPTR,A CALL DEL100 RL A MOV R1,A DJNZ R2,LOOP3 AJMP KEY3 GO4: START4:MOV R1,00000001B MOV R2,08 LOOP4:MOV A,R1 MOV P0,A MOV DPTR,7FFFH MOVX @DPTR,A CALL DEL50 RL A MOV R1,A DJNZ R2,LOOP3 AJMP KEY4 DEL1S:MOV R3,08H U1: MOV R4,0F4H U2: MOV R5,0FFH DJNZ R5,$ DJNZ R4,U2 DJNZ R3,U1 RET DEL500:MOV R5,04H L1: MOV R6,0F4H L2: MOV R7,0FFH DJNZ R7,$ DJNZ R6,L2 DJNZ R5,L1 RET DEL200:MOV R5,02H H1: MOV R6,0F4H H2: MOV R7,0FFH DJNZ R7,$ 12 DJNZ R6,H2 DJNZ R5,H1 RET DEL100:MOV R3,0C3H E2: MOV R5,0FFH DJNZ R5,$ DJNZ R3,E2 RET DEL50:MOV R3,63H F1: MOV R4,0FBH DJNZ R4,$ DJNZ R3,F1 RET A0: DISP: MOV A,09H。 置译码器方式寄存器地址 MOV R7,0FFH。 选择译码方式 LCALL MAX7219。 写入 MOV A,0AH。 置亮度寄存器地址 MOV R7,05H。 选择占空比 LCALL MAX7219。 写入 MOV A,0BH。 置 MAX7219 显示扫描位数寄存器地址 MOV R7,07H。 选择 8 位显示方式 LCALL MAX7219。 写入 MOV A,0CH。 置关闭显示寄存器地址 MOV R7,01H。 选择进入正常工作， 00H 表示关闭 LCALL MAX7219。 写入 MOV 40H,01H MOV 41H,00H MOV 42H,00H MOV 43H,01H MOV 30H,40H MOV 31H,41H MOV 32H,42H MOV 33H,43H MAIN: MOV R0,30H CLR。 MOV R1,01H。 指向第 0 位 LED MOV R3,08H。 显示器个数 LOOPA: MOV A,@R0。 取显示缓冲区数据 13 MOV R7,A。 显示 2 MOV A,R1。 LED 显示的位地址给 A LCALL MAX7219。 INC R0。 指向下一个显示数据 INC R1。 指向下一位 LED DJNZ R3,LOOPA。 RET。 MAX7219 子程序 MAX7219: CLR。 将 LOAD 信号拉低 LCALL XH1。 一位字节送入 7219 MOV A,R7。 LCALL XH1。 NOP NOP SETB。 产生 LOAD 上升沿，锁存数据 RET XH1: MOV R2,08H。 总共有 8 位，移 8 次 NEXT: CLR。 将 CLK 拉低 RLC A。 A 中值左移入进位累加器 C 中 MOV ,C。 给 DIN 口 NOP SETB。 CLK 上升沿，移入数据 NOP DJNZ R2,NEXT。 没完成则继续 RET SHORT_DELAY:MOV 10H,40。 10ms DEL1: MOV 11H,125 DEL2: DJNZ 11H,DEL2。 125*2us= DJNZ 10H,DEL1。 *40=10ms RET A1: DISP1: MOV A,09H。 置译码器方式寄存器地址 MOV R7,0FFH。 选择译码方式 LCALL MAX72191。 写入 MOV A,0AH。 置亮度寄存器地址 MOV R7,05H。 选择占空比 LCALL MAX72191。 写入 MOV A,0BH。 置 MAX7219 显示扫描位数寄存器地址 14 MOV R7,07H。 选择 8 位显示方式 LCALL MAX72191。 写入 MOV A,0CH。 置关闭显示寄存器地址 MOV R7,01H。 选择进入正常工作， 00H 表示关闭 LCALL MAX72191。 写入 MOV 40H,00H MOV 41H,05H MOV 42H,00H MOV 43H,00H MOV 30H,40H MOV 31H,41H MOV 32H,42H MOV 33H,43H MAIN1: MOV R0,30H CLR。 MOV R1,01H。