th27_点阵.asm

单片机杭州天煌教仪自带例程单片机杭州天煌教仪自带例程

 ;P0 口----行
 ;P1 口----列

       ORG   0000H
       ljmp  start
       ORG   0030H       
start:
       mov   r5, #2
A5:    mov   r4, #20
DelayLoop5:
       mov   a, #08h         ;4
       mov   P0, a
       mov   P2, a
       mov   a, #0E7h
       mov   P1, a
       mov   P3, a
       call delay
       mov   a, #010h        ;5
       mov   P0, a
       mov   P2, a
       mov   a, #0E7h
       mov   P1, a
       mov   P3, a
       call delay

       djnz  r4, DelayLoop5
       djnz  r5, A5

       mov   r5, #2
A4:    mov   r4, #10
DelayLoop4:

       mov   a, #04h          ;3
       mov   P0, a
        mov   P2, a
       mov   a, #0C3h
       mov   P1, a
        mov   P3, a
        call delay
        mov   a, #08h         ;4
       mov   P0, a
        mov   P2, a
       mov   a, #0DBh
       mov   P1, a
        mov   P3, a
        call delay
        mov   a, #010h        ;5
       mov   P0, a
        mov   P2, a
       mov   a, #0DBh
       mov   P1, a
        mov   P3, a
        call delay
        mov   a, #020h        ;6
       mov   P0, a
        mov   P2, a
       mov   a, #0C3h
       mov   P1, a
        mov   P3, a
        call delay

        djnz  r4, DelayLoop4
        djnz  r5, A4


       mov   r5, #2
A3:    mov   r4, #8
DelayLoop3:
       mov   a, #02h          ;2
       mov   P0, a
        mov   P2, a
       mov   a, #081h
       mov   P1, a
        mov   P3, a
        call delay
       mov   a, #04h          ;3
       mov   P0, a
        mov   P2, a
       mov   a, #0BDh
       mov   P1, a
        mov   P3, a
        call delay
        mov   a, #08h         ;4
       mov   P0, a
        mov   P2, a
       mov   a, #0BDh
       mov   P1, a
        mov   P3, a
        call delay
        mov   a, #010h        ;5
       mov   P0, a
        mov   P2, a
       mov   a, #0BDh
       mov   P1, a
        mov   P3, a
        call delay
        mov   a, #020h        ;6
       mov   P0, a
        mov   P2, a
       mov   a, #0BDh
       mov   P1, a
        mov   P3, a
        call delay
        mov   a, #040h        ;7
       mov   P0, a
        mov   P2, a
       mov   a, #081h
       mov   P1, a
        mov   P3, a
        call delay
        djnz  r4, DelayLoop3
        djnz  r5, A3





       mov   r5, #2
A2:    mov   r4, #6
DelayLoop2:

       mov   a, #01h          ;1
       mov   P0, a
        mov   P2, a
       mov   a, #00h
       mov   P1, a
        mov   P3, a
        call delay
       mov   a, #02h          ;2
       mov   P0, a
        mov   P2, a
       mov   a, #07Eh
       mov   P1, a
        mov   P3, a
        call delay
       mov   a, #04h          ;3
       mov   P0, a
        mov   P2, a
       mov   a, #07Eh
       mov   P1, a
        mov   P3, a
        call delay
        mov   a, #08h         ;4
       mov   P0, a
        mov   P2, a
       mov   a, #07Eh
       mov   P1, a
        mov   P3, a
        call delay
        mov   a, #010h        ;5
       mov   P0, a
        mov   P2, a
       mov   a, #07Eh
       mov   P1, a
        mov   P3, a
        call delay
        mov   a, #020h        ;6
       mov   P0, a
        mov   P2, a
       mov   a, #07Eh
       mov   P1, a
        mov   P3, a
        call delay
        mov   a, #040h        ;7
       mov   P0, a
        mov   P2, a
       mov   a, #07Eh
       mov   P1, a
        mov   P3, a
        call delay
        mov   a, #080h        ;8
       mov   P0, a
        mov   P2, a
       mov   a, #00h
       mov   P1, a
        mov   P3, a
        call delay
        djnz  r4, DelayLoop2
        djnz  r5, A2
       Ljmp  START

Delay:
       mov   r6, #3
A1:    mov   r7, #0
DelayLoop:
       NOP
       NOP
       djnz  r7, DelayLoop
       djnz  r6, A1
       ret




       end