【正文】 DD A,20H MOV B,03H MUL AB JMP A+DPTR D2: MOV A,2 ADD A,20H MOV B,3 MUL AB 25 JMP A+DPTR D3: MOV A,3 ADD A,20H MOV B,3 MUL AB JMP A+DPTR JS: LJMP LOOP1 LJMP LOOP2 LJMP LOOP3 LJMP LOOP10 LJMP LOOP4 LJMP LOOP5 LJMP LOOP6 LJMP LOOP11 LJMP LOOP7 LJMP LOOP8 LJMP LOOP9 LJMP LOOP15 LJMP LOOP0 LJMP LOOP12 LJMP LOOP13 LJMP LOOP14 LOOP0:JB 20H,SS0 LJMP WX SS0: MOV 43H,42H MOV 42H,41H MOV 41H,40H MOV 40H,0 LJMP RRT 26 LOOP1:JB 20H,SS1 LJMP WX SS1: MOV 43H,42H MOV 42H,41H MOV 41H,40H MOV 40H,1 LJMP RRT LOOP2:JB 20H,SS2 LJMP WX SS2: MOV 43H,42H MOV 42H,41H MOV 41H,40H MOV 40H,2 LJMP RRT LOOP3:JB 20H,SS3 LJMP WX SS3: MOV 43H,42H MOV 42H,41H MOV 41H,40H MOV 40H,3 LJMP RRT LOOP4:JB 20H,SS4 LJMP WX SS4: MOV 43H,42H MOV 42H,41H MOV 41H,40H MOV 40H,4 LJMP RRT LOOP5:JB 20H,SS5 27 LJMP WX SS5: MOV 43H,42H MOV 42H,41H MOV 41H,40H MOV 40H,5 LJMP RRT LOOP6:JB 20H,SS6 LJMP WX SS6: MOV 43H,42H MOV 42H,41H MOV 41H,40H MOV 40H,6 LJMP RRT LOOP7:JB 20H,SS7 LJMP WX SS7: MOV 43H,42H MOV 42H,41H MOV 41H,40H MOV 40H,7 LJMP RRT LOOP8:JB 20H,SS8 LJMP WX SS8: MOV 43H,42H MOV 42H,41H MOV 41H,40H MOV 40H,8 LJMP RRT LOOP9:JB 20H,SS9 LJMP WX 28 SS9: MOV 43H,42H MOV 42H,41H MOV 41H,40H MOV 40H,9 LJMP RRT LOOP10:MOV A,43H MOV B,10 MUL AB ADD A,42H MOV R0,A MOV A,41H MOV B,10 MUL AB ADD A,40H MOV R1,A MOV R3,40 SETB SETB 06H MOV R7,1 MOV 73H,R7 SETB EX1 RETI LOOP11:MOV A,43H MOV B,10 MUL AB ADD A,42H MOV R0,A MOV A,41H MOV B,10 29 MUL AB ADD A,40H MOV R1,A MOV R3,40 SETB SETB 06H MOV R7,2 MOV 73H,R7 SETB EX1 RETI LOOP12:CLR 06H SETB EX1 MOV R0,70H MOV R1,71H MOV R3,72H MOV R7,73H RETI LOOP13:SETB SETB 06H MOV R0,70H MOV R1,71H MOV R3,72H CJNE R0,00H,GP1 CJNE R1,00H,GP2 LJMP GP GP1: INC R3 LJMP GP GP2: DEC R1 GP: MOV R7,73H 30 SETB EX1 RETI LOOP14:MOV SP,60H MOV R0,00H MOV R1,00H MOV R3,40 MOV 72H,40 MOV P2,0F0H CLR CLR 06H CLR CLR CLR CLR MOV 43H,00H MOV 42H,00H MOV 41H,00H MOV 40H,00H MOV R7,00H SETB EA SETB IT1 SETB EX1 SETB EX1 RETI LOOP15:JB 20H,SS10 LJMP WX SS10: MOV 40H,00H MOV 41H,00H MOV 42H,00H 31 MOV 43H,00H SETB EX1 RETI RRT: SETB EX1 CLR CLR 06H RETI WX: MOV R0,70H MOV R1,71H MOV R3,72H MOV R7,73H SETB 06H RETI ZZ: CJNE R0,00H,FORWCYCLE 。主程序 CJNE R7,