led.aqd

Keil中文版

           org             0000h
           ljmp            start
           org             0050h
 start:    mov            r1,        #0
           mov            r0,        #0
           mov            dptr,          #word
 main:     mov            a,            r1
           movc           a,        @a+dptr
           cpl            a
           mov            p0,         a
           mov            p1,         a
           mov            p2,         a
           mov            p3,         a
           inc            r1
           lcall          yyy
           cjne           r1,      #0bh,        main
           mov            r0,        #88h
           mov            r1,        #0
           ajmp           main
 yyy:      cjne           r0,        #88h,        next
           lcall          time
           cjne           r1,        #0bh,         next
           mov            r0,        #0
  next:    ret
time:      mov            r2,         #0ffh
   timeb:  mov            r3,         #0ffh
   timea:  nop
           nop
           nop
           nop
           nop
           nop
           djnz           r3,         timea
           djnz           r2,         timeb
           ret
     word: db 3fh, 06h, 5bh, 4fh,66h, 6dh, 7dh,07h,7fh, 6fh, 0ffh,0ffh,0ffh
           end