十进制显

来自「51单片机实验用的程序 希望对你能有所帮助 包括跑马 十进制显 电子琴」· 代码 · 共 30 行

ORG  0000H
MOV  R0,#02H
MOV  R1,#08H
START:MOV B,#0H
AA:RRL A
JNC  BB
INC B
BB:DEC R1
CJNE R1,#0H,EE
SJMP CC
EE:PUSH A
MOV A,R0
MUL AB
POP A
SJMP AA
CC: MOV P1,#01H
MOV A,B
DD:MOV B,#0AH
DIV AB
PUSH A
MOV  DPTR,#TAB0
MOVC  A,@A+DPTR
MOV  P2,A
POP A
JZ  START
YY:RR  P1
SJMP DD
TAB0: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,77H,7CH,39H,5EH,79H,71H
END