hyled.asm

这是一个八路跑马灯的实验在单片机做跑马灯时经常用到 希望能对大家有帮助

;********************************************************************************
;*－ 花样流水灯                                                                 *
;* P0---8个LED和P2---8个LED   硬件：8路指示灯接P0口，或者P2口                   *
;********************************************************************************
;*  日期:  2007-3-25                                                            *
;*  版本:  3.0                                                                  *
;*  作者:  深圳学林电子有限公司     专业8051单片机教学站                        *
;*  邮箱: [e-mail]                                                       *
;*  网站： http://www.51c51.com     http://www.8951.com    更多例程请登陆网站   *
;********************************************************************************
;*  硬件：此程序在本公司xlisp系列单片机实验仪运行通过                           *
;********************************************************************************
;* 【版权】 Copyright(C)深圳学林电子有限公司 www.51c51.com  All Rights Reserved *
;* 【声明】 此程序仅用于学习与参考，引用请注明版权和作者信息！                  *
;********************************************************************************
           ORG  0000H
           JMP  MAIN
           ORG  0030H
;*********************************************************
MAIN:
           MOV  SP,#60H
           MOV  P0,#0FFH
           MOV  P2,#0FFH
           MOV  R0,#00H
MAIN1:
           MOV  A,R0             ;取数地址送A
           MOV  DPTR,#TABLE_P0   ;查表取数
           MOVC A,@A+DPTR
           MOV  P0,A             ;送P0显示
           MOV  A,R0
           MOV  DPTR,#TABLE_P2   ;查表取数
           MOVC A,@A+DPTR
           MOV  P2,A             ;送P2显示
           INC  R0               ;取数地址加1
           CALL  DELAY
           CJNE  R0,#90,MAIN1
           MOV  R0,#00H
           JMP  MAIN1
;*********************************************************
DELAY:                           ;延时子程序
           MOV  R5,#01
DEL1:
           MOV  R6,#250
DEL2:
           MOV  R7,#248
           DJNZ  R7,$
           DJNZ  R6,DEL2
           DJNZ  R5,DEL1
           RET
;*********************************************************
TABLE_P0:
  DB  0FEH,0FDH,0FBH,0F7H,0EFH,0DFH,0BFH,07FH
  DB  0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
  DB  0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
  DB  07FH,0BFH,0DFH,0EFH,0F7H,0FBH,0FDH,0FEH,0FFH
  DB  0FEH,0FDH,0FBH,0F7H,0EFH,0DFH,0BFH,07FH
  DB  0BFH,0DFH,0EFH,0F7H,0FBH,0FDH,0FEH,0FFH
  DB  0FCH,0F3H,0CFH,03FH,0FFH,0FFH,0FFH,0FFH
  DB  0FFH,0FFH,0FFH,0FFH,0FFH,03FH,0CFH,0F3H,0FCH,0FFH
  DB  0FCH,0F3H,0CFH,03FH,0FFH,03FH,0CFH,0F3H,0FCH,0FFH
  DB  0F0H,0FFH,00FH,0FFH,0FFH,000H,000H,0FFH,000H,000H,0FFH,0FFH
TABLE_P2:
  DB  0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
  DB  0FEH,0FDH,0FBH,0F7H,0EFH,0DFH,0BFH,07FH
  DB  0FFH,07FH,0BFH,0DFH,0EFH,0F7H,0FBH,0FDH,0FEH
  DB  0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
  DB  07FH,0BFH,0DFH,0EFH,0F7H,0FBH,0FDH,0FEH
  DB  0FDH,0FBH,0F7H,0EFH,0DFH,0BFH,07FH,0FFH
  DB  0FFH,0FFH,0FFH,0FFH,0FCH,0F3H,0CFH,03FH
  DB  0FFH,03FH,0CFH,0F3H,0FCH,0FFH,0FFH,0FFH,0FFH,0FFH
  DB  03FH,0CFH,0F3H,0FCH,0FFH,0FCH,0F3H,0CFH,03FH,0FFH
  DB  00FH,0FFH,0F0H,0FFH,0FFH,000H,000H,0FFH,000H,000H,0FFH,0FFH
;*********************************************************
           END