hb2.bak

来自「hex 转 二进制」· BAK 代码 · 共 30 行

org 0000h
ljmp st
org 0100h
st:      lcall hb2
         sjmp $
hb2:            clr a
                mov r3,a
                mov r4,a
                mov r5,a
                mov r2,#10h
hb3:            mov a,r7
                rlc a
                mov r7,a
                mov a,r6
                rlc a
                mov r6,a
                mov a,r5
                addc a,r5
                da a
                mov r5,a
                mov a,r4
                addc a,r4
                da a
                mov r4,a
                mov a,r3
                addc a,r3
                mov r3,a
                djnz r2,hb3
                ret