dot5.asm

来自「8051彻底研究源程序大全,一些算法,实例,进制转换等子程序,更多详情请查阅这一」· 汇编 代码 · 共 22 行

        ORG     0H      
BEGIN: MOV      R1,#6  
AGAIN: MOV      A,R1   
        CALL    LOOK_TABLE0
        MOV     P3,A
        MOV     A,R1   
        CALL    LOOK_TABLE1
        MOV     P1,A
        DJNZ    R1,AGAIN       
        JMP     BEGIN
LOOK_TABLE0:
        MOVC    A,@A+PC        
        RET             
        DB      00000001B,00000010B,00000100B
        DB      00001000B,00010000B
LOOK_TABLE1:
        MOVC    A,@A+PC
        RET
        DB      01111111B,00001000B,00001000B
        DB      00001000B,01111111B
        END