Trang Chính
mình lên mạng thấy có cái bài này nó khá đầy đủ nhưng thực sự t chẳng hiểu gì mong mọi ng cho ý kiến nha xem xem nó có khả thi không nha. Cảm ơn!
CHƯƠNG TRÌNH
$MOD51
ORG OOOOH
LJMP MAIN
ORG OOO3H
LJMP EX0ISR
MAIN:
MOV IE,#81H
CHECK:
JB P1.1,LOOP
SJMP ,CHECK
LOOP:
JNB P1.2,KHOANGAT
DELAY 180 GIAY:
PUSH 00H
PUSH 01H
MOV TMOD,#11H
MOV R0,#60
AAA:
MOV R1,#100
BBB:
MOV THO,#HIGHT(-30000)
MOV TL0,#LOW(-30000)
SETB TR0
JNB TF0,$
CLR TF0
CLR TR0
DJNZ R1,BBB
DJNZ R0,AAA
POP 01H
POP 00H
SETB P0.4
KHOANGAT:
CLEAR EX0
RETI
EXOISR:
SETB P0.3
MOV R2,#100
CCC:
MOV TH1,#HIGHT(-10000)
MOV TL1,#LOW(-1000)
SETB TR1
JNB TF1, $
CLR TF1
CLR TR1
DJNZ R2, CCC
CPL P0.3
SJMP, $
RETI
END
Read more: [You must be registered and logged in to see this link.]
CHƯƠNG TRÌNH
$MOD51
ORG OOOOH
LJMP MAIN
ORG OOO3H
LJMP EX0ISR
MAIN:
MOV IE,#81H
CHECK:
JB P1.1,LOOP
SJMP ,CHECK
LOOP:
JNB P1.2,KHOANGAT
DELAY 180 GIAY:
PUSH 00H
PUSH 01H
MOV TMOD,#11H
MOV R0,#60
AAA:
MOV R1,#100
BBB:
MOV THO,#HIGHT(-30000)
MOV TL0,#LOW(-30000)
SETB TR0
JNB TF0,$
CLR TF0
CLR TR0
DJNZ R1,BBB
DJNZ R0,AAA
POP 01H
POP 00H
SETB P0.4
KHOANGAT:
CLEAR EX0
RETI
EXOISR:
SETB P0.3
MOV R2,#100
CCC:
MOV TH1,#HIGHT(-10000)
MOV TL1,#LOW(-1000)
SETB TR1
JNB TF1, $
CLR TF1
CLR TR1
DJNZ R2, CCC
CPL P0.3
SJMP, $
RETI
END
Read more: [You must be registered and logged in to see this link.]
