zb0.asm

本程序是一个传输控制器的硬件测试程序

	mov	@r0,#250
	mov	r0,#keyjj2h
	mov	@r0,#6

	mov	r0,#aqjs1
	mov	@r0,#250
	mov	r0,#aqjs2
	mov	@r0,#4;10
	mov	r0,#aqbz
	mov	@r0,#00
	mov	r0,#aqjj
	mov	@r0,#00
	
	mov	r0,#gdbz
	mov	@r0,#00

	mov	r0,#gdysbz
	mov	@r0,#00
	mov	r0,#gdys1
	mov	@r0,#250
	mov	r0,#gdys2
	mov	@r0,#16

	MOV	R0,#JJZDJS1
	MOV	@R0,#4
	MOV	R0,#JJZDJS
	MOV	@R0,#250

	mov	r0,#time3h;;;;;;;;;;;;;;;;;;;;;;;;;;hhx
	mov	@r0,yg6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

	MOV	OU2,#0FFH
	MOV	OU0,#0FFH
	LCALL	OUT0
	LCALL	OUT2

	MOV	R0,#CSJS1;;;;;;;;;;;;;;;;;;;;;
	MOV	@R0,#00H
	MOV	R0,#CSJS2;;;;;;;;;;;;;;;;;;;;;
	MOV	@R0,#00H
	MOV	R0,#CSJS3;;;;;;;;;;;;;;;;;;;;;
	MOV	@R0,#4;20;;;;;;;;;;;;;;;50

	MOV	R0,#ZXXBZ
	MOV	@R0,#00H

	mov	r0,#lbjsbz;;;;;;;;;;;;;;;;;;;;;;;lv bo
	mov	@r0,#00;;;;;;;;;;;;;;;;;;;;;;;;;;lv bo

	mov	r0,#lbjsbz2
	mov	@r0,#00

	mov	r0,#check;;;;;;;;;;;;;;;;8-18
	mov	@r0,#0;;;;;;;;
	mov	r0,#time9;;;;
	mov	@r0,#250;;;;
	mov	r0,#time9h;;
	mov	@r0,#16;;;;;;;;;;;;;;;;;;;;;;;8s

	MOV	R0,#ksjc
	MOV	@R0,#00H	

	MOV	R0,#ksjc1
	MOV	@R0,#00H

	mov	r0,#mc2bz
	mov	@r0,#250

	mov	r0,#yxyx	
	mov	@r0,#00
	mov	r0,#csgz		
	mov	@r0,#00

	clr	jpp3.6

	mov	dsbz,#00

	clr	psw.3;;;;;;;;;工作组0
	clr	psw.4
	;-------------------------------------------------------------------------XDATA

	mov	r0,#check2
	mov	a,#00
	movx	@r0,a
	
	mov	r0,#msbz
	mov	a,#00
	movx	@r0,a
	
	mov	r0,#timea
	mov	a,#250
	movx	@r0,a
	
	mov	r0,#timeah
	mov	a,#16
	movx	@r0,a

	mov	r0,#timeb
	mov	a,yga
	movx	@r0,a
	
	mov	r0,#timebh
	mov	a,#6;15;20;30
	movx	@r0,a

	mov	r0,#timec
	mov	a,yga
	movx	@r0,a
	
	mov	r0,#timech
	mov	a,#6;15;20;30
	movx	@r0,a

	mov	r0,#lzjs
	mov	a,yga
	movx	@r0,a

	mov	r0,#gdjc
	mov	a,#00
	movx	@r0,a

	mov	r0,#gdjcjs1
	mov	a,#50
	movx	@r0,a

	mov	r0,#gdjcjs2
	mov	a,#50
	movx	@r0,a

	mov	r0,#modebz
	mov	a,#00
	movx	@r0,a

	MOV	R0,#xwc
	mov	a,#00
	movx	@r0,a

	mov	r0,#lzjs1
	mov	a,#00
	movx	@r0,a

	mov	r0,#yxjg1
	mov	a,#250		;;
	movx	@r0,a
	
	mov	r0,#yxjg2
	mov	a,#04		;;2s
	movx	@r0,a

;-------------------------------------------------------------------------

	mov	jp1,#0ffh
	mov	jpp1,#0fch
	mov	jpp2,#0ffh
	mov	gzp2,#00
	mov	gzp3,#00
	mov	r0,#csgz
	mov	@r0,#00
	setb	jp2.4
	setb	jp0.4
	setb	jp0.7
	setb	jp2.5
	setb	jp2.6
	setb	jp2.0

	clr	jpp3.5

	clr	c;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;delete
	mov	a,yga;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	rrc	a
	rrc 	a
	mov	jsss3h,a

	mov	r0,#ylbz;;;;;;;;;;;;;;;;yan lian  biao z
	mov	@r0,#00;;;;;;;;;;;;;;;;
;===================================================================

	MOV	P1,#11111000B
	MOV	P1,#11111010B
        MOV	KK,#20
gd1:	MOV	A,P0
	DJNZ	KK,gd1
	MOV	P1,#11111000B
	
	MOV	KK,#20
gd3:	jb	acc.1,gd
	DJNZ	KK,gd3	


	MOV	P1,#11111000B
	MOV	P1,#11111010B
	MOV	KK,#20
gd2:	MOV	A,P0
	DJNZ	KK,gd2
	MOV	P1,#11111000B

	MOV	KK,#20
gd4:	jb	acc.2,gd
	DJNZ	KK,gd4	

	setb	jpp1.2;;guang dian OK.
	sjmp	gd0
gd:	clr	jpp1.2
gd0:	nop

;===================================================================

M1:     NOP
	SETB	REN
;===================================================================运行间隔2S
	jnb	yxp20,yxjg
	mov	r0,#yxjg1
	movx	a,@r0
	mov	kk,a
	dec	@r0
	djnz	kk,m03
	mov	r0,#yxjg1
	mov	a,#250
	movx	@r0,a

	mov	r0,#yxjg2
	movx	a,@r0
	mov	kk,a
	dec	@r0
	djnz	kk,m03
	clr	yxp20

yxjg:	mov	r0,#yxjg2
	mov	a,#250
	movx	@r0,a

	mov	r0,#yxjg1
	mov	a,#250
	movx	@r0,a

;===================================================================

m03:	mov	r0,#msbz
	movx	a,@r0
	cjne	a,#00,m102
	jnb	yxp1.2,m102;;;;;;yxp1.0;;yxp1.2 在星/三角型时为三角型运行状态
	DJNZ	JSSS5,m101
	MOV	JSSS5,#250
	DJNZ	JSSS5H,m101

	mov	r0,#msbz;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	mov	a,#01
	movx	@r0,a;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;开始测速标志

m102:	MOV	JSSS5,#250
	MOV	JSSS5H,#20;;;;;;;;;;;;;;;;;;;;;;;;;;;10S后达到满速
	
;=======================================================================出故障时要清掉中断计数	
m101:	MOV	A,GZP1
	CJNE	A,#00,m100		
	MOV	A,GZP2
	CJNE	A,#00,m100		
	MOV	A,GZP3
	CJNE	A,#00,m100

	jnb	yxp1.5,cs0
m100:	MOV	R0,#CSJS1
	MOV	@R0,#00H

	MOV	R0,#CSJS2
	MOV	@R0,#00H

	MOV	R0,#CSJS3
	MOV	@R0,#4;20

	mov	r0,#msbz
	mov	a,#00
	movx	@r0,a

;========================================================================初始检测

cs0:	jb	yxp1.0,cs1;;;;;;;;;;;;;;;;;;;;;;初始检测
	jnb	ou2.4,cs3;ou2.2,cs1;;;抱闸	
	mov	r0,#yxyx	
	mov	a,@r0
	cjne	a,#00,cs3

	DJNZ	JSS9,cs3
	MOV	JSS9,#250

	jnb	jp0.3,cs4;;;;;;;;;;x8
	jb	jp0.5,cs4;;;;;;;;;;x6
	
	jnb	jp0.6,cs00
	jb	jpp1.0,cs2
	jb	jpp1.1,cs2
	sjmp	cs01
cs00:	mov	r0,#keybz4;;;;;;;;;;;;;;;;;;;;;;; shang key
	mov	a,@r0
	cjne	a,#00,cs2
	mov	r0,#keybz8;;;;;;;;;;;;;;;;;;;;;;xia key
	mov	a,@r0
	cjne	a,#00,cs2

cs01:	mov	r0,#yxyx
	mov	@r0,#01
	clr	gzp3.1
	sjmp	cs3
	
cs1:	MOV	JSS9,#250
	mov	r0,#yxyx	
	mov	@r0,#00
	jnb	jp0.3,cs3
	setb	gzp3.7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;非正常停车
	mov	r0,#erro
	mov	@r0,#126
	sjmp	cs3
cs2:	setb	gzp3.1
	mov	r0,#erro
	mov	@r0,#109
	sjmp	cs3
cs4:	setb	gzp3.0
	mov	r0,#erro
	mov	@r0,#108	
cs3:	nop
;==================================================================================滤波
	mov	r0,#lbjsbz;;;;;;;;;;;;;;;;;;;;;;;lv bo
	inc	@r0
	mov	a,@r0;;;;;;;;;;;;;;;;;;;;;;;;;;lv bo
	cjne	a,#250,kkskm1
	jmp	kkskm4
kkskm1:	jc	kkskm4
	mov	@r0,#250

kkskm4:	mov	r0,#lbjsbz2;;;;;;;;;;;;;;;;;;;;;;;lv bo
	inc	@r0
	mov	a,@r0;;;;;;;;;;;;;;;;;;;;;;;;;;lv bo
	cjne	a,#250,kkskm3
	jmp	kkskm2
kkskm3:	jc	kkskm2
	mov	@r0,#250
;==================================================================================模拟脉冲发生程序
	
kkskm2:	;djnz	jsss3h,kkskm20
;	setb	jpp3.7
;
kkskm20:	;mov	r0,#time3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	;mov	kk,@r0;;;;
	;dec	@r0;;;;;;;
	;djnz	kk,kkskm21;;;
	;mov	r0,#time3;
	;mov	@r0,#100;;
			;脉冲发生子程序
	;mov	r0,#time3h;;
	;mov	kk,@r0;;;;;;
	;dec	@r0;;;;;;;;;
	;djnz	kk,kkskm21;;;;;
	;mov	r0,#time3h;;
	;mov	@r0,yg6;;;;;
	;mov	r0,#time3;;;;
	;mov	@r0,#100;;;;;;;;;;;;;;;;;;;;;;;;;;0.2*yg6s
	;cpl	ou2.2
	;lcall	out2


kkskm21:;jnb	jpp3.7,gdys
;	mov	r0,#jsss4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;	mov	kk,@r0;;;;
;	dec	@r0;;;;;;;
;	djnz	kk,gdys;;;
;	mov	r0,#jsss4;
;	mov	@r0,#100;;
				;脉冲发生子程序
;	mov	r0,#jsss4h;;
;	mov	kk,@r0;;;;;;
;	dec	@r0;;;;;;;;;
;	djnz	kk,gdys;;;;;
;	mov	r0,#jsss4h;;
;	mov	@r0,yg6;;;;;
;	mov	r0,#jsss4;;;;
;	mov	@r0,#100;;;;;;;;;;;;;;;;;;;;;;;;;;0.2*yg6s
;	cpl	ou2.4
;	lcall	out2
;=====================================================================================光电廷时程序

GDYS:	mov	r0,#gdysbz
	mov	a,@r0
	cjne	a,#01,gdysn1
	
	mov	r0,#gdys1
	mov	kk,@r0
	dec	@r0
	djnz	kk,gddx
	mov	r0,#gdys1
	mov	@r0,#250

	mov	r0,#gdys2
	mov	kk,@r0
	dec	@r0
	djnz	kk,gddx
	mov	r0,#gdysbz
	mov	@r0,#02
gdysn1:	mov	r0,#gdys1
	mov	@r0,#250
	mov	r0,#gdys2
	mov	@r0,#16
;========================================================================================光电定向
	
GDDX:	jb	jp0.6,gzcL;;;;;;;;;;;;;;;;;;;;;;;8-18

	mov	r0,#gdbz
	mov	a,@r0
	cjne	a,#00,gddx4
	jb	yxp1.0,gzcL
	jnb	jp0.1,gddx2
	jnb	jp0.2,gddx3
	mov	r0,#gdbz
	mov	@r0,#00
	mov	r0,#gdysbz
	mov	@r0,#00
	sjmp	gzcl
gddx2:	jnb	jp0.2,gzcL
	mov	r0,#gdbz
	mov	@r0,#02

	mov	r0,#gdysbz
	mov	@r0,#01
	sjmp	gzcl
gddx3:	mov	r0,#gdbz
	mov	@r0,#01
	mov	r0,#gdysbz
	mov	@r0,#01
	
	sjmp	gzcl
gddx4:	
	mov	r0,#gdbz
	mov	a,@r0		
	cjne	a,#01,gddx1
	jnb	jp0.2,gzcl
	mov	r0,#gdbz
	mov	@r0,#00
	mov	r0,#gdysbz
	mov	@r0,#00
	clr	jp0.2
	sjmp	gzcl
gddx1:	mov	r0,#gdbz
	mov	a,@r0		

	cjne	a,#02,gddx5
	jnb	jp0.1,gzcl
	mov	r0,#gdbz
	mov	@r0,#00
	mov	r0,#gdysbz
	mov	@r0,#00
	clr	jp0.1
	jmp	gzcl

gddx5:	mov	r0,#gdbz
	mov	@r0,#00
	mov	r0,#gdysbz
	mov	@r0,#00
	jmp	gzcl
;==============================================================================故障处理程序

GZCL:	mov	r0,#gzbz
	mov	a,@r0
	cjne	a,#00,GZCL1

	mov	a,gzp1
	cjne	a,#00,gzcl2
	mov	a,gzp2
	cjne	a,#00,gzcl2
	mov	a,gzp3
	cjne	a,#00,gzcl2
	sjmp	jjzd0

 gzcl2:	mov	r0,#gzbz;;;;;;;;;置标志
	mov	@r0,#01
	lcall	cb3
	sjmp	jjzd0

GZCL1:	mov	a,gzp1
	cjne	a,#00,gzcl3
	mov	a,gzp2
	cjne	a,#00,gzcl3
	mov	a,gzp3
	cjne	a,#00,gzcl3
	mov	r0,#gzbz;;;;;;;;;清标志
	mov	@r0,#00

gzcl3:	sjmp	jjzd0
;=========================================================================紧急制动程序

JJZD0:	MOV	A,GZP1
	CJNE	A,#01H,JJZDA
	LJMP	JJZD1

JJZDA:	jb	gzp3.6,jjzd1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;断链开关

	jnb	jp2.2,kjjzd1

	JB	GZP2.5,JJZD1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;逆转
	JB	GZP2.3,JJZD1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;超速

KJJZD1:	MOV	R0,#JJZDJS
	MOV	@R0,#250
	MOV	R0,#JJZDJS1
	MOV	@R0,#4
	SETB	ou2.6;---OU2.7;
	LCALL	OUT2;
	LJMP	ZM0

JJZD1:	MOV	R0,#JJZDJS
	MOV	KK,@R0
	DEC	@R0
	DJNZ	KK,ZM0
	MOV	R0,#JJZDJS
	MOV	@R0,#250
	MOV	R0,#JJZDJS1
	MOV	KK,@R0
	DEC	@R0
	DJNZ	KK,ZM0
	MOV	R0,#JJZDJS
	MOV	@R0,#250
	MOV	R0,#JJZDJS1
	MOV	@R0,#4
	CLR	ou2.6;---OU2.7;
	LCALL	OUT2;

;================================================================
ZM0:	mov	a,jsss2h
	cjne	a,#00,zm001
	
	mov	a,jsss2
	cjne	a,#00,zm002
	sjmp	zm000
zm001:	djnz	jss5h,zm000
	mov	jss5h,#30
	djnz	JSSS3,zm000
	mov	jss5h,#30
	mov	jsss3,yga
	mov	a,jsss2
	cjne	a,#00,zm003
	mov	jsss2h,#00h
	sjmp	zm000
zm002:	
	djnz	jss5h,zm000
	mov	jss5h,#30
	djnz	JSSS3,zm000
	mov	jss5h,#30
	mov	jsss3,yga
	mov	a,jsss2h
	cjne	a,#00,zm003
	mov	jsss2,#00h
	sjmp	zm000
zm003:	setb	gzp2.3


zm000:	mov	a,jsss1h
	cjne	a,#00,zm01
	
	mov	a,jsss1
	cjne	a,#00,zm02
	sjmp	zm00
zm01:	
	djnz	jss5h,zm00
	mov	jss5h,#30
	djnz	JSSS3,zm00
	mov	jss5h,#30
	mov	jsss3,yga
	mov	a,jsss1
	cjne	a,#00,zm03
	mov	jsss1h,#00h
	sjmp	zm00
zm02:	
	djnz	jss5h,zm00
	mov	jss5h,#30
	djnz	JSSS3,zm00
	mov	jss5h,#30
	mov	jsss3,yga
	mov	a,jsss1h
	cjne	a,#00,zm03
	mov	jsss1,#00h
	sjmp	zm00
zm03:	setb	gzp2.4
	
;==========================================================================开照明程序
zm00:	JNB	YXP1.0,ZM1
	CLR	ou2.4;---ou2.5
	LCALL	OUT2
	SJMP	ZM2

ZM1:	SETB	ou2.4;---ou2.5
	LCALL	OUT2
	LJMP	RH9
ZM2:	NOP

;============================================================================润滑程序	

RH0:	JNB	RHBZ,RH1
	LJMP	RH6
RH1:	MOV	R0,#RHJS1
	DEC	@R0
	MOV	KK,@R0
	DJNZ	KK,RH6
	MOV	R0,#RHJS1
	MOV	@R0,#250;;;;;;;;;;;;;;;;;;;;;;;;0.5S

RH2:	MOV	R0,#RHJS2
	DEC	@R0
	MOV	KK,@R0
	DJNZ	KK,RH6
	MOV	R0,#RHJS2
	MOV	@R0,#240;;;;;;;;;;;;;;;;;;;;;;;2 FENZHONG

RH3:	MOV	R0,#RHJS3
	DEC	@R0
	MOV	KK,@R0
	DJNZ	KK,RH6

	MOV	A,YG6
	mov	b,#15
	mul	ab
	MOV	R0,#RHJS3
	MOV	@R0,a;;;;;;;;;;;;;;;;;;;30*YG6 FENZHONG;;;;;;;;;;;;;;;;;;;;;;;4 XIAOSHI(室内)
	SETB	RHBZ

RH6:	JB	RHBZ,RH6A
	JMP	RH9
	
RH6A:	MOV	R0,#RHJS4
	DEC	@R0
	MOV	KK,@R0
	DJNZ	KK,RH9
	MOV	R0,#RHJS4
	MOV	@R0,#250;;;;;;;;;;;;;;;;;;;;;;;;0.5S

RH7:	MOV	R0,#RHJS5
	DEC	@R0
	MOV	KK,@R0
	DJNZ	KK,RH9
	MOV	R0,#RHJS5
	MOV	@R0,#04;;;;;;;;;;;;;;;;;;;;;;;2 S
	
	CPL	ou2.5;---ou2.6
	LCALL	OUT2
	
	MOV	R0,#RHJS4
	MOV	@R0,#250;;;;;;;;;;;;;;;;;;;;;;;;0.5S

	MOV	R0,#RHJS6
	INC	@R0
	MOV	A,@R0
	CJNE	A,#6,RH9;;;;;;;;;;;;;;;;;;;加3次油
	SETB	ou2.5;---ou2.6
	LCALL	OUT2

	MOV	R0,#RHJS1
	MOV	@R0,#250;;;;;;;;;;;;;;;;;;;;;;;;0.5S

	MOV	R0,#RHJS2
	MOV	@R0,#240;;;;;;;;;;;;;;;;;;;;;;;2 FENZHONG

	MOV	A,YG6
	mov	b,#15
	mul	ab
	MOV	R0,#RHJS3
	MOV	@R0,a;;;;;;;;;;;;;;30*YG6;;;;;;;;;;#120;;;;;;;;;;;;;;;;;;;;;;;4 XIAOSHI(室内)

	MOV	R0,#RHJS4
	MOV	@R0,#250;;;;;;;;;;;;;;;;;;;;;;;;0.5S

	MOV	R0,#RHJS5
	MOV	@R0,#04;;;;;;;;;;;;;;;;;;;;;;;;2S

	MOV	R0,#RHJS6
	MOV	@R0,#00;;;;;;;;;;;;;;;;;;;;;;;;0 CI 
	CLR	RHBZ
RH9:	NOP
;============================================================================外部中断计时程序

TM1A:	jb	jp0.6,mma
	mov	a,yg9
	cjne	a,#01,tm1a0
	mov	r0,#zxxbz
	mov	@r0,#01
	sjmp	tm1b

tm1a0:	MOV	R0,#ZXXBZ
	MOV	@R0,#00H

TM1B:	JB	YXP1.0,TM1C0
	mov	jss7,#00
	mov	jss7h,#4;20
	SJMP	tm1b0

TM1C0:	DJNZ	jss7h,tm1b0
	mov	jss7h,#4;20
	INC	jss7;@R0

tm1b0:	JB	YXP1.0,TM1C
	MOV	R0,#CSJS1;;;;;;;;;;;;;;;;;;;;;
	MOV	@R0,#00H
	MOV	R0,#CSJS2;;;;;;;;;;;;;;;;;;;;;
	MOV	@R0,#00H
	MOV	R0,#CSJS3;;;;;;;;;;;;;;;;;;;;;
	MOV	@R0,#4;20;0.08;;;;;;;;;;;;;;;;;;;;;;;;50;;;;;;;;;;;;;;;;;;;;;;;;;;0.1s
	SJMP	MMA

TM1C:	MOV	R0,#CSJS3
	MOV	KK,@R0
	DEC	@R0
	DJNZ	KK,MMA
	MOV	R0,#CSJS3
	MOV	@R0,#4;20;;;;;;;;;;;;;;;;;;;;;;;;;;;50;;;;;;;;;;;;;;0.1S
	MOV	R0,#CSJS2
	INC	@R0
;==============================================================================故障代码传送程序（串口）

MMA:	JB	GP4,MMB
	MOV	R0,#DA2
	MOV	@R0,#00H

	MOV	R0,#DA3
	MOV	@R0,#00
	SJMP	MMD

MMB:	MOV	R0,#DA2
	MOV	@R0,D10

	MOV	R0,#DA3
	MOV	@R0,D11
;============================================================================X8---> X1(上部扫描光电)

MMD:   	mov	r0,#gdysbz
	mov	a,@r0
	cjne	a,#02,m1c

	mov	r0,#ygh
	mov	a,@r0