📄 fly.asm
字号:
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;;;;;;;;;;;;;;;;
;--------------------------------------------------------------------
M1: NOP
SETB REN
;============================================================================外部中断计时程序
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 P1,#11111000B
MOV P1,#11111010B
MOV KK,#20
KM1: MOV A,P0
DJNZ KK,KM1
MOV P1,#11111000B
km10: JB JP0.0,M1A
JB ACC.1,M1B
DJNZ JS0,M1C
SETB JP0.0
SJMP M1B
M1A: JNB ACC.1,M1B
DJNZ JS0,M1C
clr jp0.0
M1B: MOV JS0,#15;50
jmp m1c
;============================================================================X1---> X4（开关钥匙上/检修上）
m1c:
MOV P1,#11111000B
MOV P1,#11111010B
MOV KK,#20
kskm2c: MOV A,P0
DJNZ KK,kskM2c
MOV P1,#11111000B
jb jp0.1,m1d
jb ACC.4,M1e
DJNZ JS1,m1f
setb jp0.1
SJMP M1e
M1d: JnB ACC.4,M1e
DJNZ JS1,m1f
clr jp0.1
M1e: MOV JS1,#25;50
;============================================================================X2---> X5（开关钥匙下/检修下）
M1F: MOV P1,#11111000B
MOV P1,#11111010B
MOV KK,#20
ksKM1f: MOV A,P0
DJNZ KK,ksKM1f
MOV P1,#11111000B
jb jp0.2,m1h
jb ACC.5,M1i
DJNZ JS2,m1j
setb jp0.2
SJMP M1i
m1h: JnB ACC.5,M1i
DJNZ JS2,m1j
clr jp0.2
M1i: MOV JS2,#25;50
;============================================================================X3--->x8
M1J: MOV P1,#11111000B
MOV P1,#11111001B
MOV KK,#20
ksKM1j: MOV A,P0
DJNZ KK,ksKM1j
MOV P1,#11111000B
JB JP0.3,M1K
JB ACC.0,M1L
DJNZ JS3,M1M
SETB JP0.3
SJMP M1L
M1K: JNB ACC.0,M1L
DJNZ JS3,M1M
CLR JP0.3
M1L: MOV JS3,#25;50
;============================================================================X4--->x11
M1M: MOV P1,#11111000B
MOV P1,#11111001B
MOV KK,#20
km1m: MOV A,P0
DJNZ KK,km1m
MOV P1,#11111000B
JB JP0.4,M1N
JB ACC.3,M1P
DJNZ JS4,M1U
SETB JP0.4
SJMP M1P
M1N: JNB ACC.3,M1P
DJNZ JS4,M1U
CLR JP0.4
M1P: MOV JS4,#25;50
;============================================================================x0---> X3（检修/正常）
M1U: MOV P1,#11111000B
MOV P1,#11111010B
MOV KK,#20
km1u: MOV A,P0
DJNZ KK,km1u
JB JP0.6,M1V
JB ACC.3,M1W
DJNZ JS6,M1X
SETB JP0.6
SJMP M1W
M1V: JNB ACC.3,M1W
DJNZ JS6,M1X
CLR JP0.6
M1W: MOV JS6,#25;50
;============================================================================X7 检修上行-->x12
M1X: MOV P1,#11111000B
MOV P1,#11111001B
MOV KK,#20
KM1x: MOV A,P0
DJNZ KK,KM1x
MOV P1,#11111000B
JB jp0.7,M1Y;;;;;;
JB ACC.4,M1Z
DJNZ JS7,M1R
SETB JP0.7
SJMP M1Z
M1Y: JNB ACC.4,M1Z
DJNZ JS7,M1R
CLR JP0.7
M1Z: MOV JS7,#25
;============================================================================x5--->X6（KB，SB检测）
M1R:
MOV P1,#11111000B
MOV P1,#11111010B
MOV KK,#20
SKM1: MOV A,P0
DJNZ KK,SKM1
MOV P1,#11111000B
JB JP0.5,M1S
JB ACC.6,M1T
DJNZ JS5,M2
SETB JP0.5
SJMP M1T
M1S: JNB ACC.6,M1T
DJNZ JS5,M2
CLR JP0.5
M1T: MOV JS5,#25;50
SJMP M2
;============================================================================x16
M2: MOV P1,#11111000B;;;;;;;;;;;;;;;;;
MOV KK,#20
KM2: MOV A,P0
DJNZ KK,KM2;;;;;;;;;;;;;;;;;;;;
JB JP1.0,M2A
JB ACC.0,M2B
DJNZ JS8,M2C
SETB JP1.0
SJMP M2B
M2A: JNB ACC.0,M2B
DJNZ JS8,M2C
CLR JP1.0
M2B: MOV JS8,#25;50
;============================================================================x17
M2C: JB JP1.1,M2D
JB ACC.1,M2E
DJNZ JS9,M2F
SETB JP1.1
SJMP M2E
M2D: JNB ACC.1,M2E
DJNZ JS9,M2F
CLR JP1.1
M2E: MOV JS9,#25;50
;============================================================================x18
M2F: JB JP1.2,M2H
JB ACC.2,M2I
DJNZ JSA,M2J
SETB JP1.2
SJMP M2I
M2H: JNB ACC.2,M2I
DJNZ JSA,M2J
CLR JP1.2
M2I: MOV JSA,#25;50
;============================================================================x19
M2J: JB JP1.3,M2K
JB ACC.3,M2L
DJNZ JSB,M2M
SETB JP1.3
SJMP M2L
M2K: JNB ACC.3,M2L
DJNZ JSB,M2M
CLR JP1.3
M2L: MOV JSB,#25;50
;============================================================================x20
M2M: JB JP1.4,M2N
JB ACC.4,M2P
DJNZ JSC,M2R
SETB JP1.4
SJMP M2P
M2N: JNB ACC.4,M2P
DJNZ JSC,M2R
CLR JP1.4
M2P: MOV JSC,#25;50
;============================================================================x21
M2R: JB JP1.5,M2S
JB ACC.5,M2T
DJNZ JSD,M2U
SETB JP1.5
SJMP M2T
M2S: JNB ACC.5,M2T
DJNZ JSD,M2U
CLR JP1.5
M2T: MOV JSD,#25;50
;============================================================================x22
M2U: JB JP1.6,M2V
JB ACC.6,M2W
DJNZ JSE,M2X
SETB JP1.6
SJMP M2W
M2V: JNB ACC.6,M2W
DJNZ JSE,M2X
CLR JP1.6
M2W: MOV JSE,#25;50
;============================================================================x23
M2X: JB JP1.7,M2Y
JB ACC.7,M2Z
DJNZ JSF,MM2
SETB JP1.7
SJMP M2Z
M2Y: JNB ACC.7,M2Z
DJNZ JSF,MM2
CLR JP1.7
M2Z: MOV JSF,#25;50
;============================================================================x24
MM2: MOV P1,#11111000B
MOV P1,#11111100B
MOV KK,#20
SKM3: MOV A,P0
DJNZ KK,SKM3
MOV P1,#11111000B
JB JPP1.3,MM2K
JB ACC.3,MM2L
DJNZ MJS1,MM2M
SETB JPP1.3
SJMP MM2L
MM2K: JNB ACC.3,MM2L
DJNZ MJS1,MM2M
CLR JPP1.3
MM2L: MOV MJS1,#25;50
;============================================================================x25
MM2M:
JB JPP1.4,MM2N
JB ACC.4,MM2P
DJNZ MJS2,MM2R
SETB JPP1.4
SJMP MM2P
MM2N: JNB ACC.4,MM2P
DJNZ MJS2,MM2R
CLR JPP1.4
MM2P: MOV MJS2,#25;50
;============================================================================x26
MM2R: JB JPP1.5,MM2S
JB ACC.5,MM2T
DJNZ MJS3,MM2U
SETB JPP1.5
SJMP MM2T
MM2S: JNB ACC.5,MM2T
DJNZ MJS3,MM2U
CLR JPP1.5
MM2T: MOV MJS3,#25;50
;============================================================================x27
MM2U: JB JPP1.6,MM2V
JB ACC.6,MM2W
DJNZ MJS4,MM2X
SETB JPP1.6
SJMP MM2W
MM2V: JNB ACC.6,MM2W
DJNZ MJS4,MM2X
CLR JPP1.6
MM2W: MOV MJS4,#25;50
;============================================================================x28
MM2X: JB JPP1.7,MM2Y
JB ACC.7,MM2Z
DJNZ MJS5,MMM2
SETB JPP1.7
SJMP MM2Z
MM2Y: JNB ACC.7,MM2Z
DJNZ MJS5,MMM2
CLR JPP1.7
MM2Z: MOV MJS5,#25;50
;============================================================================x29
MMM2: mov p1,#11111000B
MOV P1,#11111011B;
MOV KK,#20
SKM4: MOV A,P0
DJNZ KK,SKM4;
mov p1,#11111000B
JB JPP2.0,MMM2A
JB ACC.0,MMM2B
DJNZ MJS6,MMM2C
SETB JPP2.0
SJMP MMM2B
MMM2A: JNB ACC.0,MMM2B
DJNZ MJS6,MMM2C
CLR JPP2.0
MMM2B: MOV MJS6,#25;50
;============================================================================x30
MMM2C: JB JPP2.1,MMM2D
JB ACC.1,MMM2E
DJNZ MJS7,MMM2F
SETB JPP2.1
SJMP MMM2E
MMM2D: JNB ACC.1,MMM2E
DJNZ MJS7,MMM2F
CLR JPP2.1
MMM2E: MOV MJS7,#25;50
;============================================================================x31
MMM2F: JB JPP2.2,MMM2H
JB ACC.2,MMM2I
DJNZ MJS8,MMM2J
SETB JPP2.2
SJMP MMM2I
MMM2H: JNB ACC.2,MMM2I
DJNZ MJS8,MMM2J
CLR JPP2.2
MMM2I: MOV MJS8,#25;50
;============================================================================x32
MMM2J: JB JPP2.3,MMM2K
JB ACC.3,MMM2L
DJNZ MJS9,MMM2M
SETB JPP2.3
SJMP MMM2L
MMM2K: JNB ACC.3,MMM2L
DJNZ MJS9,MMM2M
CLR JPP2.3
MMM2L: MOV MJS9,#25;50
;============================================================================x33
MMM2M: JB JPP2.4,MMM2N
JB ACC.4,MMM2P
DJNZ MJSA,MMM2R
SETB JPP2.4
SJMP MMM2P
MMM2N: JNB ACC.4,MMM2P
DJNZ MJSA,MMM2R
CLR JPP2.4
MMM2P: MOV MJSA,#25;50
;============================================================================x34
MMM2R: JB JPP2.5,MMM2S
JB ACC.5,MMM2T
DJNZ MJSB,MMM2U
SETB JPP2.5
SJMP MMM2T
MMM2S: JNB ACC.5,MMM2T
DJNZ MJSB,MMM2U
CLR JPP2.5
MMM2T: MOV MJSB,#25;50
;============================================================================x35
MMM2U: JB JPP2.6,MMM2V
JB ACC.6,MMM2W
DJNZ MJSC,MMM2X
SETB JPP2.6
SJMP MMM2W
MMM2V: JNB ACC.6,MMM2W
DJNZ MJSC,MMM2X
CLR JPP2.6
MMM2W: MOV MJSC,#25;50
;============================================================================x36
MMM2X: JB JPP2.7,MMM2Y
JB ACC.7,MMM2Z
DJNZ MJSD,M3
SETB JPP2.7
SJMP MMM2Z
MMM2Y: JNB ACC.7,MMM2Z
DJNZ MJSD,M3
CLR JPP2.7
MMM2Z: MOV MJSD,#25;50
;============================================================================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
JB ACC.7,M3B
DJNZ JSG,M3C
SETB JP2.0
SJMP M3B
M3A: JNB ACC.7,M3B
DJNZ JSG,M3C
CLR JP2.0
M3B: MOV JSG,#25;50
;===========================================================================X2
M3C: 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
setb jp2.1
SJMP M3E
M3D: JNB ACC.2,M3E
DJNZ JSH,M3F
clr jp2.1
M3E: MOV JSH,#15;50
;===========================================================================X7
M3F: 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
M3H: JNB ACC.7,M3I
DJNZ JSI,M3J
CLR JP2.2
M3I: MOV JSI,#25;50
;==========================================================================X10
M3J: 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
;=========================================================================X9
m3m: 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
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
JB ACC.5,KKM3T
DJNZ JSL,M3U
SETB JP2.5
SJMP KKM3T
KKM3S: JNB 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
JB ACC.6,M3W
DJNZ JSM,M3X
SETB JP2.6
SJMP M3W
M3V: JNB ACC.6,M3W
DJNZ JSM,M3X
CLR JP2.6
M3W: MOV JSM,#25;50
;===========================================================================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
JB ACC.0,M3Z
DJNZ JSN,M3z2
SETB JP2.7
SJMP M3Z
M3Y: JNB ACC.0,M3Z
DJNZ JSN,m3z2
CLR JP2.7
M3Z: MOV JSN,#25;50
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -