📄 zb0.asm
字号:
MMM2X: JB JPP2.7,MMM2Y
JNB ACC.7,MMM2Z
DJNZ MJSD,M3
SETB JPP2.7
SJMP MMM2Z
MMM2Y: JB ACC.7,MMM2Z
DJNZ MJSD,M3
CLR JPP2.7
MMM2Z: MOV MJSD,#25;50
;============================================================================x6（检修下行）---->x15
M3: MOV P1,#11111000B
MOV P1,#11111001B
MOV KK,#20
KM3: MOV A,P0
DJNZ KK,KM3
MOV P1,#11111000B
JB jp2.0,M3A
JnB ACC.7,M3B
DJNZ JSG,M3C
SETB JP2.0
SJMP M3B
M3A: JB ACC.7,M3B
DJNZ JSG,M3C
CLR JP2.0
M3B: MOV JSG,#25;50
;============================================================================x9---> X2(下部扫描光电)
M3C: mov r0,#gdysbz
mov a,@r0
cjne a,#02,m3f
mov r0,#ygl
mov a,@r0
cjne a,#00,ksm3c
MOV P1,#11111000B
MOV P1,#11111010B
MOV KK,#20
ksKM3: MOV A,P0
DJNZ KK,ksKM3;;;;;;;;;;;;;;;;;;;;
MOV P1,#11111000B
JB JP2.1,M3D
JB ACC.2,M3E
DJNZ JSH,M3F
mov r0,#gdbz
mov a,@r0
cjne a,#01,kskm31
setb jp2.1;;;;;;;;;;;;;;;;;;;;;;;;上方向时，下入口光电动作置位下入口光电
kskm31: mov r0,#gdbz
mov a,@r0
cjne a,#02,M3e
SETB JP0.0;;;;;;;;;;;;;;;;;;;;;;;;下方向时，下入口光电动作置位上入口光电
SJMP M3E
M3D: JNB ACC.2,M3E
DJNZ JSH,M3F
M3E: MOV JSH,#15;50
jmp m3f
ksm3c: MOV P1,#11111001B;;;;;;;;;;;;;
MOV P1,#11111010B
MOV KK,#20
ksKM3c: MOV A,P0
DJNZ KK,ksKM3c;;;;;;;;;;;;;;;;;;;;
MOV P1,#11111001B
JB JP2.1,ksM3D
JnB ACC.2,ksM3E
DJNZ JSH,M3F
mov r0,#gdbz
mov a,@r0
cjne a,#01,kskm3c1
setb jp2.1;;;;;;;;;;;;;;;;;;;;;;;;上方向时，上入口光电动作置位下入口光电
kskm3c1: mov r0,#gdbz
mov a,@r0
cjne a,#02,ksM3E
SETB JP0.0;;;;;;;;;;;;;;;;;;;;;;;;下方向时，上入口光电动作置位上入口光电
SJMP ksM3E
ksM3D: JB ACC.2,ksM3E
DJNZ JSH,M3F
ksM3E: MOV JSH,#15;50
;============================================================================x10---> X7(速度监控)
M3F: jnb jpp3.6,m3f0
clr jp2.2;;;;;;;;;;;;;;;;;;速度开关
sjmp m3i
m3f0: MOV P1,#11111000B
MOV P1,#11111010B;;;;;;;;;;;;;
MOV KK,#20
ksKM3f: MOV A,P0
DJNZ KK,ksKM3f;;;;;;;;;;;;;;;;;;;;
MOV P1,#11111000B
JB JP2.2,M3H
JB ACC.7,M3I
DJNZ JSI,M3J
SETB JP2.2
sjmp m3i;8-8
SJMP M3I
M3H: JNB ACC.7,M3I
DJNZ JSI,M3J
CLR JP2.2
M3I: MOV JSI,#25;50
;============================================================================x11---> X10(变频故障)
M3J: MOV A,YG1
CJNE A,#01,KKM3J1
CLR GZP3.5
LJMP M3M
KKM3J1:
KKM3J: MOV A,YG7;;;;;;;;;;;;;;;;;;;;;;;
CJNE A,#00,KM3J
MOV P1,#11111000B
MOV P1,#11111001B;;;;;;;;;;;;;
MOV KK,#20
SKM5: MOV A,P0
DJNZ KK,SKM5;;;;;;;;;;;;;;;;;;;;
MOV P1,#11111000B
JB JP2.3,M3K
JB ACC.2,M3L
DJNZ JSJ,M3M
SETB JP2.3
SJMP M3L
M3K: JNB ACC.2,M3L
DJNZ JSJ,M3M
CLR JP2.3
M3L: MOV JSJ,#25;50
SJMP M3M
;============================================================================x11---> X10(变频故障)
KM3J: MOV P1,#11111000B
MOV P1,#11111001B;;;;;;;;;;;;;;;;;
MOV KK,#20
SKM6: MOV A,P0
DJNZ KK,SKM6;;;;;;;;;;;;;;;;;;;;
MOV P1,#11111000B
JB JP2.3,KM3K
JNB ACC.2,KM3L
DJNZ JSJ,M3M
SETB JP2.3
SJMP KM3L
KM3K: JB ACC.2,KM3L
DJNZ JSJ,M3M
CLR JP2.3
KM3L: MOV JSJ,#25;50
M3M: JB JP2.3,KM3M;;;;;;;;;;;;;;;;;;;;;;;;
CLR GZP3.5
SJMP KM3M2
KM3M: SETB GZP3.5
;============================================================================x12---> X9（断链开关）
KM3M2: MOV P1,#11111000B
MOV P1,#11111001B;;;;;;;;;;;;;;
MOV KK,#20
SKM7: MOV A,P0
DJNZ KK,SKM7;;;;;;;;;;;;;;;;;;;;
MOV P1,#11111000B
JB JP2.4,M3N
JB ACC.1,M3P
DJNZ JSK,M3R
SETB JP2.4
SJMP M3P
M3N: JNB ACC.1,M3P
DJNZ JSK,M3R
CLR JP2.4
setb gzp3.6
M3P: MOV JSK,#25;50
;============================================================================x13
M3R: MOV P1,#11111000B
KKM3R2: MOV P1,#11111001B;;;;;;;;;;;;;;;;;;;
MOV KK,#20
SKM8: MOV A,P0
DJNZ KK,SKM8;;;;;;;;;;;;;;;;;;;;
MOV P1,#11111000B
JB JP2.5,KKM3S
JnB ACC.5,KKM3T
DJNZ JSL,M3U
SETB JP2.5
SJMP KKM3T
KKM3S: JB ACC.5,KKM3T
DJNZ JSL,M3U
CLR JP2.5
KKM3T: MOV JSL,#25;50
;============================================================================x14
M3U: MOV P1,#11111000B
MOV P1,#11111001B;;;;;;;;;;;;;;;;;;;
MOV KK,#20
SKMB: MOV A,P0
DJNZ KK,SKMB;;;;;;;;;;;;;;;;;;;;
MOV P1,#11111000B
JB JP2.6,M3V
JnB ACC.6,M3W
DJNZ JSM,M3X
SETB JP2.6
SJMP M3W
M3V: JB ACC.6,M3W
DJNZ JSM,M3X
CLR JP2.6
M3W: MOV JSM,#25;50
;============================================================================x15-->x0
M3X: MOV P1,#11111000B
MOV P1,#11111010B;;;;;;;;;;;;;;;;;;;;
MOV KK,#20
SKMC: MOV A,P0
DJNZ KK,SKMC;;;;;;;;;;;;;;;;;;;;
MOV P1,#11111000B
JB JP2.7,M3Y
JnB ACC.0,M3Z
DJNZ JSN,M3z2
SETB JP2.7
mov r0,#aqbz
mov @r0,#01
mov r0,#aqjj
inc @r0
SJMP M3Z
M3Y: JB ACC.0,M3Z
DJNZ JSN,m3z2
CLR JP2.7
M3Z: MOV JSN,#25;50
;============================================================================安全
m3z2: mov r0,#aqbz
mov a,@r0
cjne a,#01,m4
mov r0,#aqjs1
mov kk,@r0
dec @r0
djnz kk,m4
mov r0,#aqjs1
mov @r0,#250;;;
mov r0,#aqjs2
mov kk,@r0
dec @r0
djnz kk,m4
mov r0,#aqjs1
mov @r0,#250
mov r0,#aqjs2
mov @r0,#4;10
mov r0,#aqbz
mov @r0,#00
mov r0,#aqjj
mov a,@r0
cjne a,#02,m3z1
mov gzp2,#00
mov gzp3,#00
mov jsss2h,#00
mov jsss2,#00
mov jsss1h,#00
mov jsss1h,#00
mov r0,#ylbz
mov @r0,#00
m3z1: mov r0,#aqjj
mov @r0,#00
sjmp m4
;============================================================================X15-->x0 (开/闭)
KM3X: MOV P1,#11111000B
MOV P1,#11111010B;;;;;;;;;;;;;;;
MOV KK,#20
SKMD: MOV A,P0
DJNZ KK,SKMD;;;;;;;;;;;;;;;;;;;;
MOV P1,#11111000B
JB JP2.7,KM3Y
JNB ACC.0,KM3Z
DJNZ JSN,M4
SETB JP2.7
SJMP KM3Z
KM3Y: JB ACC.0,KM3Z
DJNZ JSN,M4
CLR JP2.7
KM3Z: MOV JSN,#25;50
;============================================================================安全检测
M4: JB JP2.7,JKM4
CLR GZP3.4
SJMP JKM5
JKM4: SETB GZP3.4
;============================================================================逆转检测
JKM5: MOV A,YG4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
CJNE A,#01,KM4
JB TNZ,M4A
JB P3.3,M4B
DJNZ JSP,M4C
SETB TNZ
SJMP M4B
M4A: JNB P3.3,M4B
DJNZ JSP,M4C
CLR TNZ
M4B: MOV JSP,#250
SJMP M4C
KM4: JB TNZ,KM4A
JNB P3.3,KM4B
DJNZ JSP,M4C
SETB TNZ
SJMP KM4B
KM4A: JB P3.3,KM4B
DJNZ JSP,M4C
CLR TNZ
KM4B: MOV JSP,#250
SJMP M4C
;============================================================================串口数据发送
M4C: JB YXP1.0,M4C1
CLR DA1.0
SJMP KM4D
M4C1: SETB DA1.0
KM4D: MOV A,GZP1
CJNE A,#00,KM4D2
MOV A,GZP2
CJNE A,#00,KM4D2
MOV A,GZP3
CJNE A,#00,KM4D2
CLR GP4
CLR DA1.4
SJMP M4D
KM4D2: SETB GP4
SETB DA1.4
mov r0,#gdbz;;;;;;;;;;;;;定向标志清除
mov @r0,#00
M4D: JB GP3,M4D1
CLR DA1.3
SJMP MM4C
M4D1: SETB DA1.3
mm4c: jb jp0.6,MM4C4;;;;
mov r0,#gdbz
mov a,@r0
cjne a,#01,mm4c2
setb da1.1
clr da1.2
jmp mm3r
mm4c2: mov r0,#gdbz
mov a,@r0
cjne a,#02,mm4c4
setb da1.2
clr da1.1
jmp mm3r
mm4c4: jb yxp1.3,mm4c5
clr da1.1
sjmp mm4c6
mm4c5: setb da1.1
mm4c6: jb yxp1.4,mm4c7
clr da1.2
sjmp mm3r
mm4c7: setb da1.2
MM3R: NOP
MM3U: JB YXP1.3,MM3V
SJMP M5
MM3V: JB TNZ,MM3W
DJNZ JSSM,M5
MOV JSSM,#60;250
mov r0,#lzjs;********
movx a,@r0
mov kk,a
dec a
movx @r0,a
djnz kk,m5
jnb jp2.2,mm3w
MM3W:
MOV JSSM,#60;250
mov r0,#lzjs
mov a,yga
movx @r0,a
;============================================================================设置按键检测程序
M5: JB JPP3.0,M51;;;;;;;;;;;;;;;;;;;;;;;;SHEZHIKAIGUAN
JB P3.5,M52
DJNZ MJSH,M6
SETB JPP3.0
SJMP M52
M51: JNB P3.5,M52
DJNZ MJSH,M6
CLR JPP3.0
M52: MOV MJSH,#20
;============================================================================加号按键检测程序
M6: JB JPP3.1,M61;;;;;;;;;;;;;;;;;;;;;;;;ADD AN XIA
JB P3.4,M62
DJNZ MJSE,M7
SETB JPP3.1
SJMP M62
M61: JNB P3.4,M62
DJNZ MJSE,M7
CLR JPP3.1
M62: MOV MJSE,#20
;============================================================================减号按键检测程序
M7: JB JPP3.2,M71;;;;;;;;;;;;;;;;;;;;;;;;SUB AN XIA
JB P3.6,M72
DJNZ MJSF,M8
SETB JPP3.2
SJMP M72
M71: JNB P3.6,M72
DJNZ MJSF,M8
CLR JPP3.2
M72: MOV MJSF,#20
;============================================================================确认按键检测程序
M8: JB JPP3.3,M81;;;;;;;;;;;;;;;;;;;;;;;;SUREKAIGUAN
JB P3.7,M82
MOV R0,#MJSG
MOV KK,@R0
DEC @R0
DJNZ KK,M9
SETB JPP3.3
SJMP M82
M81: JNB P3.7,M82
MOV R0,#MJSG
MOV KK,@R0
DEC @R0
DJNZ KK,M9
CLR JPP3.3
M82: MOV R0,#MJSG
MOV @R0,#20
;============================================================================
M9: NOP
MA: NOP
MB: NOP
MC: NOP
MD: NOP
MF: NOP
N9: NOP
;============================================================================串口数据传送程序
N9AA: JB GP8,N9AB
SJMP N9AC
N9AB: LJMP A0
N9AC: MOV SCON,#11011000B ;;;SIO=M3 ,SM2=0
MOV R0,#ADRR
MOV ADDR,@R0
MOV SBUF,ADDR
SETB GP8
SETB GP0
MOV R0,#ADDJ
INC @R0
MOV A,@R0
CJNE A,#07,N9BB
SJMP N9B
N9BB: JC N9B
MOV R0,#ADDJ
MOV @R0,#00H
N9B: MOV R0,#ADDJ
MOV A,@R0
LCALL CB1
MOV R0,#ADRR
MOV @R0,A
SJMP A0
;============================================================================设置按键处理程序
A0:
JNB JP0.6,AA0
JB YXP1.0,AA0
SJMP A00
AA0: JB GP3,A00
LJMP C0
A00: JNB JPP3.0,A0A1 ;;;SET
INC JPJP1
MOV A,JPJP1
CJNE A,#10, A0A ;;;;;#20
MOV JPJP0,#01
LJMP A0B
A0A: CJNE A,#255,A0A0;;;;;;;;;;;#115
A0AA0: LJMP A0B
A0A0: JC A0AA0
MOV JPJP0,#01
MOV JPJP1,#240;;;;;;;;;;;;;;;;;;;;;;175
LJMP A0B
A0A1: MOV JPJP1,#00
A0A2: JNB JPP3.1,A0A4 ;;;ADD
INC JPJP2
MOV A,JPJP2
CJNE A,#10,A0A3
MOV JPJP0,#04
LJMP A0B
A0A3: CJNE A,#255,A0A3A
A0AA1: LJMP A0B
A0A3A: JC A0AA1
MOV JPJP0,#04
MOV JPJP2,#240;;;;;;;;;;;;;;;;;;;;;175
LJMP A0B
A0A4: MOV JPJP2,#00
A0A5: JNB JPP3.2,A0A7 ;;;SUB
INC JPJP3
MOV A,JPJP3
CJNE A,#10,A0A6
MOV JPJP0,#02
LJMP A0B
A0A6: MOV A,JPJP3
CJNE A,#255,A0A6A
A0AA2: LJMP A0B
A0A6A: JC A0AA2
MOV JPJP0,#02
MOV JPJP3,#240;;;;;;;;;;;;;;;;;;;;;;175
LJMP A0B
A0A7: MOV JPJP3,#00
A0A8: JNB JPP3.3,A0A9 ;;; SAVE
INC JPJP4
MOV A,JPJP4
CJNE A,#10,KA0A6
MOV JPJP0,#08
LJMP A0B
KA0A6: MOV A,JPJP4
CJNE A,#255,KA0A6A
KA0AA2: LJMP A0B
KA0A6A: JC KA0AA2
MOV JPJP0,#08
MOV JPJP4,#240;;;;;;;;;;;;;;;;;;;;;;;;;;175
LJMP A0B
A0A9: MOV JPJP4,#00
A0B: MOV A,JPJP0
CJNE A,#01,A0B2
LJMP A0C1 ;;;SET
A0B2: CJNE A,#02,A0B3
LJMP A0D1 ;;; SUB
A0B3: CJNE A,#04,A0B4
LJMP A0E1 ;;; ADD
A0B4: CJNE A,#08,A0B5
LJMP A0F1 ;;; SAVE
A0B5: LJMP A0G1
A0C1: MOV JPJP0,#00H ;;; SET KEY
MOV A,GP2
JB GP3,A0C2
LJMP A0S1X
A0C2: CJNE A,#01,A0C3
LJMP A0S1A
A0C3: CJNE A,#02,A0C4
LJMP A0S1B
A0C4: CJNE A,#03,A0C5
LJMP A0S1C
A0C5: CJNE A,#04,A0C6
LJMP A0S1D
A0C6: CJNE A,#05,A0C7
LJMP A0S1E
A0C7: CJNE A,#06,A0C8
LJMP A0S1F
A0C8: CJNE A,#07,A0C9
LJMP A0S1G
A0C9: CJNE A,#08,A0CA
LJMP A0S1H
A0CA: CJNE A,#09,A0CB
LJMP A0S1I
A0CB: CJNE A,#10, A0CC
LJMP A0S1J
A0CC: CJNE A,#11, A0CD
LJMP A0S1K
A0CD: CJNE A,#12, A0CE
LJMP A0S1L
A0CE: CJNE A,#13, A0CO
LJMP A0S1M
A0CO: CLR GP3
LJMP A0G1
A0S1A: MOV GP2,#02
MOV D3,#0BH
MOV D2,#01H
MOV A,YG2
LJMP A0S2
A0S1B: MOV GP2,#03
MOV D3,#0BH
MOV D2,#02H
MOV A,YG3
LJMP A0S2
A0S1C: MOV GP2,#04
MOV D3,#0BH
MOV D2,#03H
MOV A,YG4
LJMP A0S2
A0S1D: MOV GP2,#05
MOV D3,#0BH
MOV D2,#04H
MOV A,YG5
LJMP A0S2
A0S1E: MOV GP2,#06
MOV D3,#0BH
MOV D2,#05H
MOV A,YG6
LJMP A0S2
A0S1F: MOV GP2,#07
MOV D3,#0BH
MOV D2,#06H
MOV A,YG7
LJMP A0S2
A0S1G: MOV GP2,#08
MOV D3,#0BH
MOV D2,#07H
MOV A,YG8
LJMP A0S2
A0S1H: MOV GP2,#09
MOV D3,#0BH
MOV D2,#08H
MOV A,YG9
LJMP A0S2
A0S1I: MOV GP2,#10
MOV D3,#0BH
MOV D2,#09H
MOV A,YGA
LJMP A0S2
A0S1J: MOV GP2,#11
MOV D3,#0BH
MOV D2,#0FH
; MOV A,YGL
MOV R0,#YGL
MOV A,@R0
LJMP A0S2
A0S1K: MOV GP2,#12
MOV D3,#0BH
MOV D2,#0EH
; MOV A,YGH
MOV R0,#YGH
MOV A,@R0
LJMP A0S2
A0S1L: MOV GP2,#13
MOV D3,#0BH
MOV D2,#0AH
; MOV A,YGE
MOV R0,#erro0;YGE
MOV A,@R0
mov r0,#count1;;;;;;;;;;;;;;
mov @r0,#00;;;;;;;;;;;;;;;;;
LJMP A0S2
A0S1M: MOV GP2,#14
MOV D3,#0BH;;;;;;;PPPPPPPP
MOV D2,#0BH;;;;;;;PPPPPPPP
MOV D1,#10H;;;;;;;;;-------
MOV D0,#10H;;;;;;;;;-------
LJMP A0G1
A0S1X: SETB GP3
MOV D3,#0BH
MOV D2,#00H
MOV A,YG1
MOV GP2,#01
A0S2: MOV B,#10
DIV AB
MOV D1,A
MOV D0,B
LJMP A0G1
A0D1: MOV JPJP0,#00H ;;; SUB KEY
JB GP3,A0D1A
LJMP A0G1
A0D1A: MOV A,GP2
CJNE A,#14,A0D1AA
LJMP A0D15
A0D1AA: NOP
A0DD2: CJNE A,#01,A0DD3;;;;;YG1
MOV KK,D0
DEC KK
LJMP A0D2
A0DD3: CJNE A,#02,A0DD4;;;;;;;YG2
MOV KK,D0
DEC KK
LJMP A0D3
A0DD4: CJNE A,#03,A0DD5;;;;;;YG3
MOV KK,D0
DEC KK
LJMP A0D4
A0DD5: CJNE A,#04,A0DD6;;;;;YG4
MOV KK,D0
DEC KK
LJMP A0D5
A0DD6: CJNE A,#05,A0DD7;;;;;;;YG5
MOV KK,D0
DEC KK
LJMP A0D6
A0DD7: CJNE A,#06,A0DD8;;;;;;;;YG6
MOV KK,D0
DEC KK
LJMP A0D7
A0DD8: CJNE A,#07,A0DD9;;;;;;;;;YG7
MOV KK,D0
DEC KK
LJMP A0D8
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -