ORG      0000H    

    LJMP     START

    ORG      0030H    

MAIN:    MOV   SP,#60H

    MOV    30H,#03H

          MOV    32H,05H

    MOV       DPTR,#TAB

L1:      LCALL     MIC

          MOV   A,DPL                                   

          ADD   A,#16

          MOV   DPL,A

    MOV   A,DPH

          ADDC    A,#00H

          MOV   DPH,A

    DJNZ  30H,L1              

    LJMP    MAIN              

MIC:     MOV   R0,#00              

    MOV   R1,#01H     

     MOV     R2,#08H    

EN:      MOV   A,R1                                 

    MOVC  A,@A+DPTR

MOV   P2,A           

     MOV   A,R0                                 

     MOVC  A,@A+DPTR    

     MOV     P0,A     

    MOV  31H,40H           

L2:      LCALL DELAY        

         DJNZ 31H,L2      

     INC   R0     

     INC  R0                       

     INC   R1                  

     INC  R1

     DJNZ    R2,EN                 

    DJNZ 32H,MIC              

     RET

DELAY:  MOV   R3,#01H            

LOOP: 

      DJNZ R3,LOOP

      RET 

TAB:         ;“★”

    DB     0B7H,01H,0D7H,02H,0C3H,04H,0E0H,08H

DB     0C3H,10H,0D7H,20H,0B7H,40H,0FFH,80H

 ;“●”

    DB  0FFH,01H,0E3H,02H,0C1H,04H,0C1H,08H 

DB  0C1H,10H,0E3H,20H,0FFH,40H,0FFH,80H

 ;“心形”

    DB  0F3H,01H,0E1H,02H,0C1H,04H,83H,08H 

      DB 0C1H,10H,0E1H,20H,0F3H,40H,0FFH,80H 

    END