单片机
返回首页

花样流水灯的设计2(单片机-汇编)

2015-07-08 来源:51hei

;This program will show you cycle glitter between 8 led lamps
;     maker:Chen Weiwu
;     date:2012-11-08
;     version:1.0.0
;-------------------------------------------------------------
;Define
Ledprt     equ          p0
SegDisplay   equ          p2
L1       equ          30h
l3       equ          32h
button1     equ          p1.0
button2     equ          p1.2
button3     equ          p1.4
button4     equ          p1.6
;----------------------
;Set the initiation address which the program runing
;----------------------
        org        0
        ajmp       main
;----------------------
Pattern1:
        mov        dptr,#Table1
        acall       Cycle
        jnb        button1,Pattern1     ;Button is enable
        mov        Ledprt,#11111111B     ;Button is unable
        ret
        
;-----------------------        
Pattern2:
        mov        dptr,#Table2
        acall       Cycle
        jnb        button2,Pattern2     ;Button is enable
        mov        Ledprt,#11111111B     ;Button is unable
        ret
;-----------------------
Pattern3:
        mov        dptr,#Table3      
        acall       Cycle
        jnb        button3,Pattern3     ;Button is enable
        mov        Ledprt,#11111111B     ;Button is unable
        ret
;-----------------------
Pattern4:
        mov        dptr,#Table4      
        acall       Cycle
        jnb        button4,Pattern4     ;Button is enable
        mov        Ledprt,#11111111B     ;Button is unable
        ret
;-----------------------      
Cycle:
        ;----------------------
        clr        a
        movc       a,@a+dptr
        mov        r0,a
        inc        dptr
        ;----------------------
Loop:     
        clr        a
        movc       a,@a+dptr
        mov         Ledprt,a
        acall       delay
        inc        dptr
        djnz       r0,Loop
        ret
;-----------------------
 
;-----------------------
;delay section
delay:     mov        r5,#50
delay1:     mov        r6,#100
DELAY2:     mov        r7,#10
        djnz       r7,$
        djnz       r6,delay2
        djnz       r5,delay1
        ret
;-----------------------
Table1:     db        Table2-$-1
        db        11111110b
        db        11111101b
        db        11111011b
        db        11110111b
        db        11101111b
        db        11011111b
        db        10111111b
        db        01111111b
        
Table2:     db        Table3-$-1
        db        01111110b
        db        10111101b
        db        11011011b
        db        11100111b
        db        11011011b
        db        10111101b
                
Table3:     db        Table4-$-1   
        db        01010101b
        db        00000000b
        db        10101010b
        db        00000000b 
                
Table4:     db        TableEnd-$-1
        db        11111110b
        db        11111100b
        db        11111000b
        db        11110000b
        db        11100000b
        db        11000000b
        db        10000000b
        db        00000000b         
        db        00000001b
        db        00000011b
        db        00001111b
        db        00011111b
        db        00111111b
        db        01111111b
        db        11111111b                      
        
TableEnd:
;-----------------------
main:      mov        SegDisplay,#00H
        jb        button1,To2
        mov        SegDisplay,#01H
        Acall       Pattern1
To2:        
        jb        button2,To3
        mov        SegDisplay,#02H
        Acall       Pattern2
To3:        
        jb        button3,To4
        mov        SegDisplay,#03H
        Acall       Pattern3
To4:
        jb        button4,main
        mov        SegDisplay,#04H
        Acall       Pattern4
        
        ajmp       Main
 
;-----------------------
        end
;-------------------------------------------------------------
进入单片机查看更多内容>>
相关视频
  • RISC-V嵌入式系统开发

  • SOC系统级芯片设计实验

  • 云龙51单片机实训视频教程(王云,字幕版)

  • 2022 Digi-Key KOL 系列: 你见过1GHz主频的单片机吗?Teensy 4.1开发板介绍

  • TI 新一代 C2000™ 微控制器:全方位助力伺服及马达驱动应用

  • MSP430电容触摸技术 - 防水Demo演示

精选电路图
  • PIC单片机控制的遥控防盗报警器电路

  • 红外线探测报警器

  • 短波AM发射器电路设计图

  • 使用ESP8266从NTP服务器获取时间并在OLED显示器上显示

  • 开关电源的基本组成及工作原理

  • 带有短路保护系统的5V直流稳压电源电路图

    相关电子头条文章