Đồ án chuyên ngành ĐTVT
mình đang làm mạch phát hiện rò rỉ khí gas mà đang bị bí ở đoạn code .Ai đã từng làm qua cho mình hỏi xí về đoạn code .Cảm ơn!!!
Có mấy cái mình bôi màu đỏ là vẫn chưa hiểu được mong mọi người giúp đỡ .Có kèm file proteus
ORG 0000H
INT BIT P1.3
RD1 BIT P2.0
WR1 BIT P2.1
LED1 BIT P2.6
LED2 BIT P2.5
LED3 BIT P2.4
LOA BIT P2.7
MAIN:
MOV b,#0
MOV A,#0F0H
MOV P2,A
LAP:
CLR WR1
MOV R1,#200
DJNZ R1,$
CLR RD1
MOV R1,#20
DJNZ R1,$
MOV A,#P0
SETB INT
SETB RD1
SETB WR1
CJNE A,B,LAM
AJMP KT
LAM:
MOV B,A
CLR LED1
CLR LED2
CLR LED3
CLR loa
CJNE A,#208,$+3
JC KT
SETB LED1
CJNE A,#211,$+3
JC KT
SETB LED2
CJNE A,#213,$+3
JC KT
SETB LED3
CJNE A,#216,$+3 ;BAT LOA
JC KT
SETB LOA
CLR LED3
CLR LED2
CLR LED1
CJNE A,#221,$+3
JC KT
SETB LED1
CJNE A,#224,$+3
JC KT
SETB LED2
CLR LED1
CJNE A,#228,$+3
SETB LED1
CJNE A,#230,$+3
SETB LED3
CLR LED2
CLR LED1
CJNE A,#232,$+3
JC KT
SETB LED1
CJNE A,#235,$+3
JC KT
SETB LED2
CLR LED1
CJNE A,#255,$+3
JC KT
SETB LED1
CLR LED2
SETB LED3
CJNE A,#239,$+3
JC KT
SETB LED1
SETB LED2
CLR LED3
CLR LOA
KT:
MOV R1,#50
LAP1:
MOV R2,#100
DJNZ R2,$
DJNZ R1,LAP1
AJMP LAP
END
|
|