1.asm

一种测试导线短路,开路的方法,本程序已经通过调试并用于实际当中

	MOV P0,A
	MOV P1,A
	MOV P2,A
	LCALL U11
	LCALL U22
	LCALL U33
	LCALL U44
	LCALL U55
	LCALL U66
	LCALL U77
	LCALL U88
	LJMP U1_8

U11:	MOV P2,#01H
	LCALL DELAY
	MOV P0,#0FEH
	MOV P3,#81H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FEH,K1
	MOV P0,#0FDH
	MOV P3,#82H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FDH,K2
	MOV P0,#0FBH
	MOV P3,#83H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FBH,K3
	MOV P0,#0F7H
	MOV P3,#84H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0F7H,K4
	MOV P0,#0EFH
	MOV P3,#85H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0EFH,K5
	MOV P0,#0DFH
	MOV P3,#86H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0DFH,K6
	MOV P0,#0BFH
	MOV P3,#87H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0BFH,K7
	MOV P0,#7FH
	MOV P3,#88H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#7FH,K8
	RET
K1:
	SETB P3.0
	SETB P2.7
	CLR P0.7
	SJMP $
K2:
	MOV P3,#82H
	SETB P2.7
	CLR P0.7
	SJMP $
K3:
	MOV P3,#83H
	SETB P2.7
	CLR P0.7
	SJMP $
K4:
	MOV P3,#84H
	SETB P2.7
	CLR P0.7
	SJMP $
K5:
	MOV P3,#85H
	SETB P2.7
	CLR P0.7
	SJMP $
K6:
	MOV P3,#86H
	SETB P2.7
	CLR P0.7
	SJMP $
K7:
	MOV P3,#87H
	SETB P2.7
	CLR P0.7
	SJMP $
K8:
	MOV P3,#88H
	SETB P2.7
	CLR P0.7
	SJMP $
U22:
	MOV P2,#01H
	MOV P0,#0FFH
	LCALL DELAY
	MOV P2,#02H
	MOV P0,#0FEH
	MOV P3,#89H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FEH,K9
	MOV P0,#0FDH
	MOV P3,#90H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FDH,K10
	MOV P0,#0FBH
	MOV P3,#91H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FBH,K11
	MOV P0,#0F7H
	MOV P3,#92H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0F7H,K12
	MOV P0,#0EFH
	MOV P3,#93H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0EFH,K13
	MOV P0,#0DFH
	MOV P3,#94H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0DFH,K14
	MOV P0,#0BFH
	MOV P3,#95H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0BFH,K15
	MOV P0,#7FH
	MOV P3,#96H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#7FH,K16
	RET
K9:
	MOV P3,#89H
	SETB P2.7
	CLR P0.7
	SJMP $
K10:
	MOV P3,#90H
	SETB P2.7
	CLR P0.7
	SJMP $
K11:
	MOV P3,#91H
	SETB P2.7
	CLR P0.7
	SJMP $
K12:
	MOV P3,#92H
	SETB P2.7
	CLR P0.7
	SJMP $
K13:
	MOV P3,#93H
	SETB P2.7
	CLR P0.7
	SJMP $
K14:
	MOV P3,#94H
	SETB P2.7
	CLR P0.7
	SJMP $
K15:
	MOV P3,#95H
	SETB P2.7
	CLR P0.7
	SJMP $
K16:
	MOV P3,#96H
	SETB P2.7
	CLR P0.7
	SJMP $
U33:
	MOV P2,#02H
	MOV P0,#0FFH
	LCALL DELAY
	MOV P2,#04H
	MOV P0,#0FEH
	MOV P3,#97H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FEH,K17
	MOV P0,#0FDH
	MOV P3,#98H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FDH,K18
	MOV P0,#0FBH
	MOV P3,#99H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FBH,K19
	MOV P0,#0F7H
	MOV P3,#0A0H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0F7H,K20
	MOV P0,#0EFH
	MOV P3,#0A1H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0EFH,K21
	MOV P0,#0DFH
	MOV P3,#0A2H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0DFH,K22
	MOV P0,#0BFH
	MOV P3,#0A3H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0BFH,K23
	MOV P0,#7FH
	MOV P3,#0A4H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#7FH,K24
	RET
K17:
	MOV P3,#97H
	SETB P2.7
	CLR P0.7
	SJMP $
K18:
	MOV P3,#98H
	SETB P2.7
	CLR P0.7
	SJMP $
K19:
	MOV P3,#99H
	SETB P2.7
	CLR P0.7
	SJMP $
K20:
	MOV P3,#0A0H
	SETB P2.7
	CLR P0.7
	SJMP $
K21:
	MOV P3,#0A1H
	SETB P2.7
	CLR P0.7
	SJMP $
K22:
	MOV P3,#0A2H
	SETB P2.7
	CLR P0.7
	SJMP $
K23:
	MOV P3,#0A3H
	SETB P2.7
	CLR P0.7
	SJMP $
K24:
	MOV P3,#0A4H
	SETB P2.7
	CLR P0.7
	SJMP $
U44:
	MOV P2,#04H
	MOV P0,#0FFH
	LCALL DELAY
	MOV P2,#08H
	MOV P0,#0FEH
	MOV P3,#0A5H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FEH,K25
	MOV P0,#0FDH
	MOV P3,#0A6H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FDH,K26
	MOV P0,#0FBH
	MOV P3,#0A7H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FBH,K27
	MOV P0,#0F7H
	MOV P3,#0A8H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0F7H,K28
	MOV P0,#0EFH
	MOV P3,#0A9H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0EFH,K29
	MOV P0,#0DFH
	MOV P3,#0B0H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0DFH,K30
	MOV P0,#0BFH
	MOV P3,#0B1H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0BFH,K31
	MOV P0,#7FH
	MOV P3,#0B2H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#7FH,K32
	RET
K25:
	MOV P3,#0A5H
	SETB P2.7
	CLR P0.7
	SJMP $
K26:
	MOV P3,#0A6H
	SETB P2.7
	CLR P0.7
	SJMP $
K27:
	MOV P3,#0A7H
	SETB P2.7
	CLR P0.7
	SJMP $
K28:
	MOV P3,#0A8H
	SETB P2.7
	CLR P0.7
	SJMP $
K29:
	MOV P3,#0A9H
	SETB P2.7
	CLR P0.7
	SJMP $
K30:
	MOV P3,#0B0H
	SETB P2.7
	CLR P0.7
	SJMP $
K31:
	MOV P3,#0B1H
	SETB P2.7
	CLR P0.7
	SJMP $
K32:
	MOV P3,#0B2H
	SETB P2.7
	CLR P0.7
	SJMP $
U55:
	MOV P2,#08H
	MOV P0,#0FFH
	LCALL DELAY
	MOV P2,#10H
	MOV P0,#0FEH
	MOV P3,#0B3H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FEH,K33
	MOV P0,#0FDH
	MOV P3,#0B4H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FDH,K34
	MOV P0,#0FBH
	MOV P3,#0B5H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FBH,K35
	MOV P0,#0F7H
	MOV P3,#0B6H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0F7H,K36
	MOV P0,#0EFH
	MOV P3,#0B7H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0EFH,K37
	MOV P0,#0DFH
	MOV P3,#0B8H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0DFH,K38
	MOV P0,#0BFH
	MOV P3,#0B9H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0BFH,K39
	MOV P0,#7FH
	MOV P3,#0C0H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#7FH,K40
	RET
K33:
	MOV P3,#0B3H
	SETB P2.7
	CLR P0.7
	SJMP $
K34:
	MOV P3,#0B4H
	SETB P2.7
	CLR P0.7
	SJMP $
K35:
	MOV P3,#0B5H
	SETB P2.7
	CLR P0.7
	SJMP $
K36:
	MOV P3,#0B6H
	SETB P2.7
	CLR P0.7
	SJMP $
K37:
	MOV P3,#0B7H
	SETB P2.7
	CLR P0.7
	SJMP $
K38:
	MOV P3,#0B8H
	SETB P2.7
	CLR P0.7
	SJMP $
K39:
	MOV P3,#0B9H
	SETB P2.7
	CLR P0.7
	SJMP $
K40:
	MOV P3,#0C0H
	SETB P2.7
	CLR P0.7
	SJMP $
U66:
	MOV P2,#10H
	MOV P0,#0FFH
	LCALL DELAY
	MOV P2,#20H
	MOV P0,#0FEH
	MOV P3,#0C1H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FEH,K41
	MOV P0,#0FDH
	MOV P3,#0C2H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FDH,K42
	MOV P0,#0FBH
	MOV P3,#0C3H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FBH,K43
	MOV P0,#0F7H
	MOV P3,#0C4H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0F7H,K44
	MOV P0,#0EFH
	MOV P3,#0C5H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0EFH,K45
	MOV P0,#0DFH
	MOV P3,#0C6H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0DFH,K46
	MOV P0,#0BFH
	MOV P3,#0C7H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0BFH,K47
	MOV P0,#7FH
	MOV P3,#0C8H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#7FH,K48
	RET
K41:
	MOV P3,#0C1H
	SETB P2.7
	CLR P0.7
	SJMP $
K42:
	MOV P3,#0C2H
	SETB P2.7
	CLR P0.7
	SJMP $
K43:
	MOV P3,#0C3H
	SETB P2.7
	CLR P0.7
	SJMP $
K44:
	MOV P3,#0C4H
	SETB P2.7
	CLR P0.7
	SJMP $
K45:
	MOV P3,#0C5H
	SETB P2.7
	CLR P0.7
	SJMP $
K46:
	MOV P3,#0C6H
	SETB P2.7
	CLR P0.7
	SJMP $
K47:
	MOV P3,#0C7H
	SETB P2.7
	CLR P0.7
	SJMP $
K48:
	MOV P3,#0C8H
	SETB P2.7
	CLR P0.7
	SJMP $
U77:
	MOV P2,#20H
	MOV P0,#0FFH
	LCALL DELAY
	MOV P2,#40H
	MOV P0,#0FEH
	MOV P3,#0C9H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FEH,K49
	MOV P0,#0FDH
	MOV P3,#0D0H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FDH,K50
	MOV P0,#0FBH
	MOV P3,#0D1H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FBH,K51
	MOV P0,#0F7H
	MOV P3,#0D2H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0F7H,K52
	MOV P0,#0EFH
	MOV P3,#0D3H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0EFH,K53
	MOV P0,#0DFH
	MOV P3,#0D4H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0DFH,K54
	MOV P0,#0BFH
	MOV P3,#0D5H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0BFH,K55
	MOV P0,#7FH
	MOV P3,#0D6H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#7FH,K56
	RET
K49:
	MOV P3,#0C9H
	SETB P2.7
	CLR P0.7
	SJMP $
K50:
	MOV P3,#0D0H
	SETB P2.7
	CLR P0.7
	SJMP $
K51:
	MOV P3,#0D1H
	SETB P2.7
	CLR P0.7
	SJMP $
K52:
	MOV P3,#0D2H
	SETB P2.7
	CLR P0.7
	SJMP $
K53:
	MOV P3,#0D3H
	SETB P2.7
	CLR P0.7
	SJMP $
K54:
	MOV P3,#0D4H
	SETB P2.7
	CLR P0.7
	SJMP $
K55:
	MOV P3,#0D5H
	SETB P2.7
	CLR P0.7
	SJMP $
K56:
	MOV P3,#0D6H
	SETB P2.7
	CLR P0.7
	SJMP $
U88:
	MOV P2,#40H
	MOV P0,#0FFH
	LCALL DELAY
	MOV P2,#80H
	MOV P0,#0FEH
	MOV P3,#0D7H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FEH,K57
	MOV P0,#0FDH
	MOV P3,#0D8H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FDH,K58
	MOV P0,#0FBH
	MOV P3,#0D9H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0FBH,K59
	MOV P0,#0F7H
	MOV P3,#0E0H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0F7H,K60
	MOV P0,#0EFH
	MOV P3,#0E1H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0EFH,K61
	MOV P0,#0DFH
	MOV P3,#0E2H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0DFH,K62
	MOV P0,#0BFH
	MOV P3,#0E3H
	LCALL DELAY2
	MOV A,P1
	CJNE A,#0BFH,K63
	RET
K57:
	MOV P3,#0D7H
	SETB P2.7
	CLR P0.7
	SJMP $
K58:
	MOV P3,#0D8H
	SETB P2.7
	CLR P0.7
	SJMP $
K59:
	MOV P3,#0D9H
	SETB P2.7
	CLR P0.7
	SJMP $
K60:
	MOV P3,#0E0H
	SETB P2.7
	CLR P0.7
	SJMP $
K61:
	MOV P3,#0E1H
	SETB P2.7
	CLR P0.7
	SJMP $
K62:
	MOV P3,#0E2H
	SETB P2.7
	CLR P0.7
	SJMP $
K63:
	MOV P3,#0E3H
	SETB P2.7
	CLR P0.7
	SJMP $
DELAY:	MOV R7,#100
D1:	MOV R6,#10
D2:	DJNZ R6,D2
	DJNZ R7,D1
	RET
DELAY1:	MOV R7,#250
D3:	MOV R6,#250
D4:	DJNZ R6,D4
	DJNZ R7,D3
	RET
DELAY2:	MOV R7,#200
D5:	MOV R6,#20
D6:	DJNZ R6,D6
	DJNZ R7,D5
	RET
END