Thông báo
Collapse
No announcement yet.
CẦN GIÚP hiệu ứng 8 led với 89c2051
Collapse
X
-
Bạn tham khảo:
sáng đuổi:
mov p1,#00h
mov a,#00h
setb c
mp1:
mov p1,a
acall delay
mov p1,#00h
rrc a
jnc mp1
ret
sáng chan lẽ:
mov p1,#01010101b
acall delay
clp p1
acall delay
ret
sang chay vao chay ra:
mov p1,#18h
acall delay
mov p1,#24h
acall delay
mov p1,#42h
acall delay
mov p1,#81h
acall delay
mov p1,#81h
acall delay
mov p1,#42h
acall delay
mov p1,#24h
acall delay
mov p1,#18h
ret
trên đó là 3 hiệu ứng, mỗi hiệu ứng chạy 1 lượt, nếu bạn cân mấy lượt thì cứ cài đặt cho nó.
delay thì tùy bạn cho chạy nhanh hay chậm mà set cho thích hợp.
chúc bạn vuiKhông biết ngày mai sẽ ra sao?
Mà có ra sao cũng chẳng sao.
-
Nguyên văn bởi rongdatvamuc Xem bài viếtBạn tham khảo:
sáng đuổi:
mov p1,#00h
mov a,#00h
setb c
mp1:
mov p1,a
acall delay
mov p1,#00h
rrc a
jnc mp1
ret
sáng chan lẽ:
mov p1,#01010101b
acall delay
clp p1
acall delay
ret
sang chay vao chay ra:
mov p1,#18h
acall delay
mov p1,#24h
acall delay
mov p1,#42h
acall delay
mov p1,#81h
acall delay
mov p1,#81h
acall delay
mov p1,#42h
acall delay
mov p1,#24h
acall delay
mov p1,#18h
ret
trên đó là 3 hiệu ứng, mỗi hiệu ứng chạy 1 lượt, nếu bạn cân mấy lượt thì cứ cài đặt cho nó.
delay thì tùy bạn cho chạy nhanh hay chậm mà set cho thích hợp.
chúc bạn vui
Comment
-
Nguyên văn bởi tychuot289 Xem bài viếtanh viết cụ thể từ đầu đến cuối được không anh .em k biết ghép các phần với lặp lại các hiệu ứng đó nữa .học lý thuyết có 2,3 pữa nên còn gà mờ
Comment
-
Nguyên văn bởi tychuot289 Xem bài viếtai giúp e viết hết và giải thích câu lệnh được không .gần nộp bài tập rồi .gặp ông thầy gay bà điên bà khùng nữa
;**********************
xuat equ p...
org 0000
ljmp main
main:
canh1:
mov dptr,#c_trinh1
mov r0,#8
mov r1,#0
laplai1:mov a,r1
movc @a+dptr
mov xuat,a
lcall delay
inc r1
djnz r0,laplai1
canh2:
mov dptr,#c_trinh2 ; thay đổi
mov r0,#8
mov r1,#0
laplai2:mov a,r1
movc @a+dptr
mov xuat,a
lcall delay;co the thay đổi để phù hợp c trinh
inc r1
djnz r0,laplai2
ljmp.....
;***********************
delay: tu viet
ret
c_trinh1: db 01h,02h,04h,08h,10h,20h,40h,80h;chay tu trai qua phai...led sang muc 1
c_trinh2: db 10000001b,01000010b,00100100b,00011000b,00011000b, 00100100b,01000010b,10000001b
end
;bạn cố giắng học đi nhé,chứ viết như vậy là quá rỏ rồi.....
Comment
-
Chương trình đầy đủ:
$MOD51
ORG 00H
MAIN:
ACALL HIEUUNG1
ACALL HIEUUNG2
ACALL HIEUUNG3
SJMP MAIN
HIEUUNG1:
PUSH 00H
PUSH 01H
MOV DPTR,#SANGDUOI
MOV R1,#5 ;SO LUOT CHAY ?K M?I HIEU UNG LA 5 LAN
MP1:
MOV R0,#00H
MOV P1,#00H
ACALL DELAY
MP2:
MOV A,R0
MOVC A,@A+DPTR
MOV P1,A
ACALL DELAY
INC R0
CJNE R0,#8,MP2
DJNZ R1,MP1
POP 01H
POP 00H
RET
HIEUUNG2:
PUSH 00H
PUSH 01H
MOV DPTR,#SANGDAN
MOV R1,#5
MP11:
MOV R0,#00H
MOV P1,#00H
ACALL DELAY
MP22:
MOV A,R0
MOVC A,@A+DPTR
MOV P1,A
ACALL DELAY
INC R0
CJNE R0,#8,MP22
DJNZ R1,MP11
POP 01H
POP 00H
RET
HIEUUNG3:
PUSH 00H
PUSH 01H
MOV DPTR,#SANGCHANLE
MOV P1,#00H
ACALL DELAY
MOV R1,#5
MP111:
MOV R0,#00H
MP222:
MOV A,R0
MOVC A,@A+DPTR
MOV P1,A
ACALL DELAY
INC R0
CJNE R0,#2,MP222
DJNZ R1,MP111
POP 01H
POP 00H
RET
DELAY: ;DELAY 0.5S
PUSH 00H
PUSH 01H
MOV TMOD,#01H
MOV R0,#100
DEL:
MOV TH0,#HIGH(-5000)
MOV TL0,#LOW(-5000)
SETB TR0
JNB TF0,$
CLR TR0
CLR TF0
DJNZ R0,DEL
POP 01H
POP 00H
RET
SANGDUOI:
DB 01H,02H,04H,08H,10H,20H,40H,80H
SANGDAN:
DB 01H,03H,07H,0FH,1FH,3FH,7FH,0FFH
SANGCHANLE:
DB 10101010B,01010101B
ENDKhông biết ngày mai sẽ ra sao?
Mà có ra sao cũng chẳng sao.
Comment
-
Nguyên văn bởi rongdatvamuc Xem bài viếtChương trình đầy đủ:
$MOD51
ORG 00H
MAIN:
ACALL HIEUUNG1
ACALL HIEUUNG2
ACALL HIEUUNG3
SJMP MAIN
HIEUUNG1:
PUSH 00H
PUSH 01H
MOV DPTR,#SANGDUOI
MOV R1,#5 ;SO LUOT CHAY ?K M?I HIEU UNG LA 5 LAN
MP1:
MOV R0,#00H
MOV P1,#00H
ACALL DELAY
MP2:
MOV A,R0
MOVC A,@A+DPTR
MOV P1,A
ACALL DELAY
INC R0
CJNE R0,#8,MP2
DJNZ R1,MP1
POP 01H
POP 00H
RET
HIEUUNG2:
PUSH 00H
PUSH 01H
MOV DPTR,#SANGDAN
MOV R1,#5
MP11:
MOV R0,#00H
MOV P1,#00H
ACALL DELAY
MP22:
MOV A,R0
MOVC A,@A+DPTR
MOV P1,A
ACALL DELAY
INC R0
CJNE R0,#8,MP22
DJNZ R1,MP11
POP 01H
POP 00H
RET
HIEUUNG3:
PUSH 00H
PUSH 01H
MOV DPTR,#SANGCHANLE
MOV P1,#00H
ACALL DELAY
MOV R1,#5
MP111:
MOV R0,#00H
MP222:
MOV A,R0
MOVC A,@A+DPTR
MOV P1,A
ACALL DELAY
INC R0
CJNE R0,#2,MP222
DJNZ R1,MP111
POP 01H
POP 00H
RET
DELAY: ;DELAY 0.5S
PUSH 00H
PUSH 01H
MOV TMOD,#01H
MOV R0,#100
DEL:
MOV TH0,#HIGH(-5000)
MOV TL0,#LOW(-5000)
SETB TR0
JNB TF0,$
CLR TR0
CLR TF0
DJNZ R0,DEL
POP 01H
POP 00H
RET
SANGDUOI:
DB 01H,02H,04H,08H,10H,20H,40H,80H
SANGDAN:
DB 01H,03H,07H,0FH,1FH,3FH,7FH,0FFH
SANGCHANLE:
DB 10101010B,01010101B
END
ORG 00H
nghĩa là sao anh .em viết giống như anh nhưng k đc .bị lỗi gì đó .chip của em là at98c2051
Comment
-
Nguyên văn bởi tychuot289 Xem bài viếtmới học nên còn gà .ai giúp với
#include<At892051.h> // khai bao thu vien cho 89c2051
void delay (int ms) // ham tao tre
{
int i,j;
for(i=0;i<ms;i++)
{
for(j=0;j<125;j++)
{}
}
}
// KHAI BAO MANG
unsigned char mang1[]={0x7f,0x3f,0x1f,0x0f,0x07,0x03,0x01,0x00},// SANG DON
mang2[]={0x7e,0xbd,0xdb,0xe7,0xe7,0xdb,0xbd,0x7e} ; // sang chay vao chay ra
void main()
{
int i;
while(1)
{
for(i=0;i<8;i++) // sang don
{
P1=mang1[i]; delay(300);
}
P1=0xff;delay(500);
for(i=0;i<8;i++) // sang ra-vao
{
P1=mang2[i]; delay(300);
}
P1=0xff;delay(500);
for(i=0;i<4;i++) // led chan led-sang tat
{ P1=0xaa;delay(300);
P1=0x55;delay(300);
}
P1=0xff;
delay(1500);
}
}
Last edited by viboyth.haui; 08-09-2012, 21:40.vanduc0211@gmail.com
Comment
-
Nguyên văn bởi viboyth.haui Xem bài viếtMình đã viết lại code cho bạn,nhưng hơi chỉnh sửa 1 chút,nếu nối mạch như bạn thì mức tích cực là 1 (thì led sáng),nhưng nếu làm mạch thực thì người ta ko làm vậy mà sẽ cho mức tích cực là 0 (vì con 89 mà ở chế độ xả dòng thì led ko đủ sáng),code mình viết lại như sau:
[ATTACH=CONFIG]51440[/ATTACH]
Comment
Bài viết mới nhất
Collapse
-
bởi tuyennhanTrên mạng có cái clip quảng cáo bán bạc đạn 608 trong đó có đoạn so sánh cs tiêu thụ trước và sau khi thay bạc vào thấy rõ sau khi thay thì thấy sau khi thay thì cstt giảm vậy thì thay bạc đạn vào cũng chưa chắc mát hơn nhỉ ....
-
Channel: Điện tử gia dụng
hôm nay, 06:52 -
-
bởi phuckhangbioCôn trùng xuất hiện trong nhà không chỉ gây phiền toái mà còn mang theo vi khuẩn gây bệnh. Dịch vụ diệt côn trùng hiệu quả tại nhà sẽ giúp bạn loại bỏ côn trùng tận gốc, đảm bảo không gian sống sạch sẽ và an toàn.
Tại sao cần dịch vụ diệt côn trùng hiệu quả tại nhà?
Việc...-
Channel: Quảng cáo
hôm nay, 01:17 -
-
bởi vi van phamCần thí nghiệm khi các quạt cùng RPM, cùng công suất.
Xác minh chính xác nhất là các chân vịt tốc độ thấp, thế giới công nhận lưu lượng gió mạnh nhất mà cháu ko công nhận thì đến tết công gô tranh luận vẫn chưa xong....-
Channel: Điện tử gia dụng
Hôm qua, 22:49 -
-
bởi vi van phamBác không có ý bắt bẻ gì cháu đâu.
Cánh thật đường nhiên là phải xếp cho cân bằng trọng tâm, nhưng đây là góc nghiêng cánh quạt. Góc này càng lớn thì gió thổi ra càng mạnh. Nhưng nó bị giới hạn bởi không gian cánh kế tiếp. Nếu...-
Channel: Điện tử gia dụng
Hôm qua, 22:36 -
-
bởi dinhthuong80Bác chả chịu rộng lượng mà hiểu cho cháu, hình vẽ chỉ minh họa góc tạo bởi cánh và trục. Đương nhiên khi xếp cánh thật thì phải cân đối trọng tâm rồi.
Sở dĩ họ không làm cánh quạt phẳng mà luôn lõm để "dễ múc không...-
Channel: Điện tử gia dụng
Hôm qua, 21:43 -
-
bởi dinhthuong80dinhthuong xin đưa ra kết quả và kết luận khá khách quan và tin cậy, chứng minh ngược lại suy nghĩ mọi người là quạt dân dụng cánh lớn hay nhiều hơn 3 cánh thì mát hơn cánh nhỏ, 3 cánh.
Mời cả nhà xem kết quả dưới đây:
(quạt đo độ mạnh...-
Channel: Điện tử gia dụng
Hôm qua, 21:25 -
-
bởi dinhthuong80Em đã xem clip đó rồi, và có bình luận, nội dung như sau: vì thiếu máy đo công suất quạt (chưa nói máy đo tốc độ gió thì nhỏ mà chỉ đặt 1 chỗ) nên kết luận thiếu khách quan và chính xác, bởi nói cái quạt 65W mát hơn cái 47W thì chả có ý nghĩa gì cả!!!...
-
Channel: Điện tử gia dụng
Hôm qua, 21:19 -
-
bởi dinhthuong80Em cảm ơn bác, nhờ bác mà em không cần mua cái máy đo tốc độ gió gần 700K nữa, mà kết quả lại tin cậy hơn....
-
Channel: Điện tử gia dụng
Hôm qua, 21:16 -
-
bởi tuyennhanXem clip thì chênh lệch giữa các loại cánh chỉ là số lẻ chưa được 1 m/s thì khỏi tính gì nữa .
Bác Vị kiếm được clip quá hay , Bác trong clip cũng chẳng cần nói nhiều mà xác thực rõ ràng ....-
Channel: Điện tử gia dụng
Hôm qua, 07:27 -
-
Trả lời cho Hỏi thăm các cao nhân, các bác sống bằng gì?bởi nhathung1101Chẳng cao nhân gì. Đo đi đo lại còn 1,7m. Lùn hơn thời trẻ 5cm.
Đã nhận quyết định nghỉ hưu.
Vẫn ăn ngày 3 bữa. Quần lúc có lúc không.-
Channel: Xu hướng, nhu cầu và thị trường
Hôm qua, 03:59 -
Comment