51单片机简单程序汇集.doc

流水灯程序 ;使用杜邦线连接P1与LED端口J9 ORG 00H START:MOV A,#0FFH ;赋初值 CLR C MOV R2,#8 LOOP1:RRC A ; 带进位右移 MOV P1,A CALL DELAY DJNZ R2,LOOP1 MOV R2,#7 LOOP2:RLC A ; 带进位左移 MOV P1,A CALL DELAY DJNZ R2,LOOP2 JMP START DELAY:MOV R3,#20 ; 延时0.2秒 D1: MOV R4,#20 D2: MOV R5,#248 DJNZ R5,$ DJNZ R4,D2 DJNZ R3,D1 RET END 查表法流水灯 ;使用杜邦线连接P1与LED端口J9 ORG 00H START: MOV DPTR,#TABLE ; 将表的地址存入数据指针 LOOP: CLR A MOVC A,@A+DPTR ;到数据指针所指的地址取码 CJNE A,#01,LOOP1 ; 取出的码是否01H？否则跳到LOOP1 JMP START LOOP1: MOV P1,A ;取出的值输出到P1端口 MOV R3,#20 ;用于改变延时长度 CALL DELAY INC DPTR JMP LOOP DELAY: MOV R4,#20 D1: MOV R5,#248 DJNZ R5,$ DJNZ R4,D1 DJNZ R3,DELAY RET TABLE: DB 0FEH,0FDH,0FBH,0F7H ;左移 DB 0EFH,0DFH,0BFH,7FH DB 0FEH,0FDH,0FBH,0F7H ;左移 DB 0EFH,0DFH,0BFH,7FH DB 7FH,0BFH,0DFH,0EFH ;右移 DB 0F7H,0FBH,0FDH,0FEH DB 7FH,0BFH,0DFH,0EFH ;右移 DB 0F7H,0FBH,0FDH,0FEH DB 00H,0FFH,00H,0FFH ;闪烁 DB 01H ;结束码 END 动态扫描两位数码管 ;利用中断的99秒计时器 ，动态扫描两位数码管 ;P0口接J3，数据端口 ;P2.2接 J2 B端子，表示段码锁存 ;P2.3接 J2 A端子，标志位码锁存 LATCH1 BIT P2.2 LATCH2 BIT P2.3 ORG 00H JMP START ORG 0BH JMP TIM0 START:MOV R3,#00 ;中断循环次数 MOV R4,#0 ;时间初值 MOV DPTR,#TABLE MOV SP,#40H MOV TMOD,#01H ;定时器工作方式 MOV TH0,#HIGH(65536-3800) MOV TL0,#LOW(65536-3800) ;初值4MS SETB TR0 MOV IE,#82H ;开中断 TIM0: MOV TH0,#HIGH(65536-3800) MOV TL0,#LOW(65536-3800) INC R3 CJNE R3,#250,X1 ;1S MOV R3,#0 MOV A,R4 ;十进制转换 MOV B,#10 DIV AB MOV 20H,B ; 个位 MOV 21H,A ; 十位 INC R4 CJNE R4,#100,LEDSCAN ;到100则清零 MOV R4,#0 LEDSCAN: CALL SC