14LED点阵显示实验.doc

;/*;文件名: LEDDZ for MCU51;功能: LED点阵显示实验 ;接线: B2模块的JT1B短路帽接至右端；; 用导线对应连接双色点阵显示模块的DIN、SCLK、RCLK到; CPU模块的P10、P11、P12。;/* ;文字滚动 向左 Din BIT P1.0 CLK BIT P1.1 R_CLK BIT P1.2 ORG 0000H JMP MAIN ORG 000BH LJMP INTS_TO ;定时中断 ORG 0100HMAIN: CLR EA MOV R2,#0 MOV R1,#32 ;32个字符 MOV R0,#40H MOV DPTR,#TABMOVEDATA: ;把全部字符复制到40H MOV A,R2 MOVC A,A+DPTR MOV R0,A INC R2 INC R0 DJNZ R1,MOVEDATA MOV TMOD,#01H ;定时器0工作方式为1 MOV TL0,#0AFH ;置计数初值 MOV TH0,#080H ;0FFFFH-3CAFH=50000，50mS MOV R7,#5 ;软件计数器，循环5次 SETB ET0 ;允许T0中断 CLR ET1 ;禁止T1中断 SETB EA SETB TR0 CLR R_CLK MOV SP,#60H MOV R3,#080H ;第一行A0: MOV R2,#08H MOV R0,#40HLOOP: ;MOV DPTR,#TAB ;字符首地址 MOV R1,#4 MOV A,R3 RR A ;行码右移一位转下一行 MOV R3,A LCALL OUTDATAA1: MOV A,R0 LCALL OUTDATA INC R0 DJNZ R1,A1 SETB R_CLK ;显示一行 CLR R_CLK DJNZ R2,LOOP ;下一行 LJMP A0 LJMP MAINOUTDATA: MOV R6, #8 OUT1:RRC A MOV DIN, C CLR CLK SETB CLK NOP NOP DJNZ R6,OUT1 RETINTS_TO: CLR EA PUSH 0E0H PUSH 00H PUSH 01H PUSH 02H DJNZ R7,BACK ;软件计数，次数不到返回 MOV R7,#5 MOV R0,#40H MOV R1,#8SHIFT1: MOV R2,#4 CLR C PUSH 00H MOV A,R0 ADD A,#3 MOV R0,A MOV A,R0 POP 00H RLC ASHIFT2: MOV A,R0 RLC A MOV R0,A INC R0 DJNZ R2,SHIFT2 DJNZ R1,SHIFT1BACK: POP 02H POP 01H POP 00H POP 0E0H MOV TMOD,#01H ;定时器0工作方式为1 MOV TL0,#0AFH MOV TH0,#080H ;0FFFFH-3CAFH=50000，50mS SETB ET0 ;允许T0中断 CLR ET1 ;禁止T1中断 SETB EA SETB TR0 RETI;右绿/右红/左绿/左红;低电平点亮TAB: ;箭头 DB 0FFH,0FFH,0FFH,0FFH DB 0DFH,0DFH,0DFH,0FFH DB 0BFH,0BFH,0BFH,0FFH DB 001H,001H,001H,0FFH DB 0BFH,0BFH,0BFH,0