main.c

编译环境是KEIL,仿真环境是PROTEUS,控制彩灯的闪烁

#pragma asm
; ASSEMBLE CODE HERE


ORG 0000H
AJMP MAIN

ORG 0100H
MAIN:
    
LL:   MOV A,#0AH  
      MOV R6,#11H
      MOV P0,#40H
 LOOP:INC A  
      MOV R0,A
      MOVC A,@A+PC
      MOV P0,A
      MOV R7,#50H
      ACALL DELAY
      MOV A,R0
      DJNZ R6,LOOP
 
     AJMP LL



DES:   DB 40H
       DB 79H
       DB 24H
       DB 30H
       DB 19H
       DB 12H
       DB 02H
       DB 78H
       DB 00H
       DB 10H
       DB 08H
       DB 03H
       DB 46H
       DB 21H
       DB 06H
       DB 0EH
       
DELAY:MOV R4,#50H
     DELAY1:
          DJNZ R4,DELAY1
       DJNZ R7,DELAY
       RET
#pragma endasm