用8 个164扩展的可以吗?可以的往左留个邮箱给你电路图。
ORG 00H
AJMP MAIN
ORG 30H
MAIN: MOV SP,#60H
MOV DPTR,#TAB
MAIN01: MOV R5,#1
MOV A,R5
MOVC A,@A DPTR
MOV R3,#8
NEXTB01: RLC A
MOV P2。
4,C
SETB P2。0
CLR P2。0
DJNZ R3,NEXTB01
INC R5
MAIN02: MOV A,R5
MOVC A,@A DPTR
MOV R3,#8
NEXTB02: RLC A
MOV P2。
5,C
SETB P2。1
CLR P2。1
DJNZ R3,NEXTB02
INC R5
MAIN03: MOV A,R5
MOVC A,@A DPTR
MOV R3,#8
NEXTB03: RLC A
MOV P2。
6,C
SETB P2。2
CLR P2。2
DJNZ R3,NEXTB03
INC R5
MAIN04: MOV A,R5
MOVC A,@A DPTR
MOV R3,#8
NEXTB04: RLC A
MOV P2。
7,C
SETB P2。3
CLR P2。3
DJNZ R3,NEXTB04
INC R5
MAIN05: MOV A,R5
MOVC A,@A DPTR
MOV R3,#8
NEXTB05: RLC A
MOV P1。
4,C
SETB P1。0
CLR P1。0
DJNZ R3,NEXTB05
INC R5
MAIN06: MOV A,R5
MOVC A,@A DPTR
MOV R3,#8
NEXTB06: RLC A
MOV P1。
5,C
SETB P1。1
CLR P1。1
DJNZ R3,NEXTB06
INC R5
MAIN07: MOV A,R5
MOVC A,@A DPTR
MOV R3,#8
NEXTB07: RLC A
MOV P1。
6,C
SETB P1。2
CLR P1。2
DJNZ R3,NEXTB07
INC R5
MAIN08: MOV A,R5
MOVC A,@A DPTR
MOV R3,#8
NEXTB08: RLC A
MOV P1。
7,C
SETB P1。3
CLR P1。
3
DJNZ R3,NEXTB08
AJMP $
TAB: DB 03FH;0
DB 006H;1
DB 05BH;2
DB 04FH;3
DB 066H;4
DB 06DH;5
DB 07DH;6
DB 007H;7
DB 07FH;8
DB 06FH;9
END。
全部