پاسخ : برنامه میکرو 8051
سلام.
ببخشید .در مورد سئوال دوم ،برنامه را به صورت زیر تغییر دادم ودر پروتئوس امتحان کردم با 7447تا 15 را می شمرد ولی نتوانستم با یک سگمنت 4 تایی تا 60را بشمارد فکر کنم اشکال از چک کردن پایه های سگمنت ها است .
فعلأ
rg 0000h
mov R2,#60
setb P1.0
clr P1.1
clr p1.2
clr p1.3
MOV TMOD,#00000110b
MOV TH0,#-60
SETB P3.4
HERE: JNB P3.0,HERE
AGAIN: SETB TR0
BACK: MOV A,TL0
CJNE A,#9,L
H: MOV P2,A
p: JNB TF0,BACK
setb P1.2
INC R1
CJNE R1,#9,L1
K: MOV P2,R1
d: clr P1.1
clr P1.3
DJNZ R2,AGAIN
L: JC H
setb P1.1
MOV P2,A
jmp p
L1: JC K
setb P1.3
MOV P2,R1
jmp d
END
مرسی
:sad:
سلام.
ببخشید .در مورد سئوال دوم ،برنامه را به صورت زیر تغییر دادم ودر پروتئوس امتحان کردم با 7447تا 15 را می شمرد ولی نتوانستم با یک سگمنت 4 تایی تا 60را بشمارد فکر کنم اشکال از چک کردن پایه های سگمنت ها است .
فعلأ
rg 0000h
mov R2,#60
setb P1.0
clr P1.1
clr p1.2
clr p1.3
MOV TMOD,#00000110b
MOV TH0,#-60
SETB P3.4
HERE: JNB P3.0,HERE
AGAIN: SETB TR0
BACK: MOV A,TL0
CJNE A,#9,L
H: MOV P2,A
p: JNB TF0,BACK
setb P1.2
INC R1
CJNE R1,#9,L1
K: MOV P2,R1
d: clr P1.1
clr P1.3
DJNZ R2,AGAIN
L: JC H
setb P1.1
MOV P2,A
jmp p
L1: JC K
setb P1.3
MOV P2,R1
jmp d
END
مرسی
:sad:
دیدگاه