楼 主:guest 2003年12月18日18:57

 请大虾指教
ORG 0000H
      lJMP MIAN
     
      ORG 0030H
MIAN: MOV SP #60H 
 CLR P1.1
      MOV A,#0C0H
      lcall tb
     
KEY:   ACALL KS1
       JNZ LOOP1
      AJMP KEY

KS1:   MOV A,#0FFH
       MOV P0,A
       MOV A,P0
       CPL A
       RET
LOOP1: ACALL DELAY
       ACALL KS1
       JNZ LOOP2
       AJMP KEY
LOOP2: JB ACC.0,KEY0
       JB ACC.1,KEY1
       JB ACC.2,KEY2
       JB ACC.3,KEY3
       JB ACC.4,KEY4
       JB ACC.5,KEY5
       JB ACC.6,KEY6
       JB ACC.7,KEY7
       AJMP KEY
 KEY0: AJMP TATA0
 KEY1: AJMP TATA1
 KEY2: AJMP TATA2
 KEY3: AJMP TATA3
 KEY4: AJMP TATA4
 KEY5: AJMP TATA5
 KEY6: AJMP TATA6
 KEY7: AJMP TATA7
TATA0: MOV A,#0F9H
       LCALL TB
       AJMP KEY
TATA1: MOV A,#0A4H
       LCALL TB
       AJMP KEY
TATA2: MOV A,#0B0H
       LCALL TB
       AJMP KEY
TATA3: MOV A,#99H
       LCALL TB
       AJMP KEY
TATA4: MOV A,#92H
       LCALL TB
       AJMP KEY
TATA5: MOV A,#83H
       LCALL TB
       AJMP KEY
TATA6: MOV A,#0F8H
       LCALL TB
       AJMP KEY
TATA7: MOV A,#80H
       LCALL TB
       AJMP KEY
  TB:  MOV  R0,#08H
       CLR  C
LOOP3: RLC  A
       MOV P1.0,C
       CLR P1.1
       SETB P1.1
       CLR P1.1
       DJNZ R0,LOOP3
       MOV A,#0FFH
       MOV R0,#08H
       CLR C
LOOP4: RLC A
       MOV P1.0,C
       CLR P1.1
       SETB P1.1
       CLR P1.1
       DJNZ R0,LOOP4
       CLR P1.2
       SETB P1.2
       CLR P1.2
       RET
DELAY: MOV R7,#02H
   TM: MOV R6,#0FFH
  TM6: DJNZ R6,TM6
       DJNZ R7,TM
       RET       
       END

           
我是初学者啊，做了个最小系统，用74LS595和74HC224 推动，共阳的数码管，程序通不过，好郁闷啊，请高手指点指点，我这只超级菜鸟