mình nữa annhandt09@gmail.com
Thông báo
Collapse
No announcement yet.
Mạch sao băng dung 89cxx
Collapse
This topic is closed.
X
X
-
-
wood
Nguyên văn bởi trungdt_1991 Xem bài viếtMình vừa làm xong mạch sao băng dùng 89c52 , bạn nào muốn làm thì đưa địa chỉ email
lên mình gửi cho.
minh thay chay qua chay lai rat dep ma.
Comment
-
#include <REGX51.H>
unsigned char led[16]={255,250,150,90,30,15,12,8,6,4,4,1,1,0,0,0};
void delay_ms(unsigned int mmmmmsssss,tttttaaaaa){
//65535ms 9000MHz
while(mmmmmsssss--){
unsigned int xxxxxxxxxx = 7*tttttaaaaa+1;
while(xxxxxxxxxx--);
}
}
/*xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx*/
/*void delay(unsigned long t)
{
unsigned int m;
for(m=0;m<t;m++);
}*/
unsigned char dem=0,nho;
/*xxxxxxxxxxxxxxx*/
void Timer0()interrupt 1 {
TF0=0; TR0=0;
//if(dem==0) {P0=0;P2=0;}
if(dem>=led[0]) P0_0=0; else P0_0=1;
if(dem>=led[1]) P0_1=0; else P0_1=1;
if(dem>=led[2]) P0_2=0; else P0_2=1;
if(dem>=led[3]) P0_3=0; else P0_3=1;
if(dem>=led[4]) P0_4=0; else P0_4=1;
if(dem>=led[5]) P0_5=0; else P0_5=1;
if(dem>=led[6]) P0_6=0; else P0_6=1;
if(dem>=led[7]) P0_7=0; else P0_7=1;
if(dem>=led[8]) P2_7=0; else P2_7=1;
if(dem>=led[9]) P2_6=0; else P2_6=1;
if(dem>=led[10]) P2_5=0; else P2_5=1;
if(dem>=led[11]) P2_4=0; else P2_4=1;
if(dem>=led[12]) P2_3=0; else P2_3=1;
if(dem>=led[13]) P2_2=0; else P2_2=1;
if(dem>=led[14]) P2_1=0; else P2_1=1;
if(dem>=led[15]) P2_0=0; else P2_0=1;
dem++;
TR0=1;
}
/*xxxxxxxxxxxxxxx*/
/*void Timer1()interrupt 3 {
TF1=0; TR1=0;
//if(dem==0) {P0=0;P2=0;}
if(dem>=led[15]) P0_0=0; else P0_0=1;
if(dem>=led[14]) P0_1=0; else P0_1=1;
if(dem>=led[13]) P0_2=0; else P0_2=1;
if(dem>=led[12]) P0_3=0; else P0_3=1;
if(dem>=led[11]) P0_4=0; else P0_4=1;
if(dem>=led[10]) P0_5=0; else P0_5=1;
if(dem>=led[9]) P0_6=0; else P0_6=1;
if(dem>=led[8]) P0_7=0; else P0_7=1;
if(dem>=led[7]) P2_7=0; else P2_7=1;
if(dem>=led[6]) P2_6=0; else P2_6=1;
if(dem>=led[5]) P2_5=0; else P2_5=1;
if(dem>=led[4]) P2_4=0; else P2_4=1;
if(dem>=led[3]) P2_3=0; else P2_3=1;
if(dem>=led[2]) P2_2=0; else P2_2=1;
if(dem>=led[1]) P2_1=0; else P2_1=1;
if(dem>=led[0]) P2_0=0; else P2_0=1;
dem++;
TR1=1;
}*/
/*xxxxxxxxxxxxxxxxxxxxx quay phai xxxxxxxxxxxxxxxxxxxxx*/
void main(void)
{
while(1)
{
unsigned int i,j,k;
TH0=180;
TL0=180;
TMOD=0x02; //timer 0: che do 2: 8 bit tu dong nap lai
EA=1; ET0=1; TR0=1;
for(i=1;i<500;i++)
{
delay_ms(15,10); dem=0;
nho= led[0];
led[0]= led[1]; led[1]= led[2]; led[2]= led[3]; led[3]= led[4];
led[4]= led[5]; led[5]= led[6]; led[6]= led[7]; led[7]= led[8];
led[8]= led[9]; led[9]= led[10]; led[10]=led[11]; led[11]=led[12];
led[12]=led[13]; led[13]=led[14]; led[14]=led[15]; led[15]=nho;
}
/*xxxxxxxxxxxxxx quay phai xxxxxxxxxxxxxxxxxxx*/
/*TR0=0;
TH1=180;
TL1=180;
TMOD=0x02; //timer 0: che do 2: 8 bit tu dong nap lai
EA=1; ET1=1; TR1=1;*/
for(j=1;j<500;j++)
{
delay_ms(15,10); dem=0;
nho= led[15];
led[15]= led[14]; led[14]= led[13]; led[13]= led[12]; led[12]= led[11];
led[11]= led[10]; led[10]= led[9]; led[9]= led[8]; led[8]= led[7];
led[7]= led[6]; led[6]= led[5]; led[5]=led[4]; led[4]=led[3];
led[3]=led[2]; led[2]=led[1]; led[1]=led[0]; led[0]=nho;
}
/*xxxxxxx chop tat xxxxxxxxxxxxxxxxxxxxxxx*/
TR0=0;
for(k=1;k<20;k++)
{
P0_0=0;
P0_1=0;
P0_2=0;
P0_3=0;
P0_4=0;
P0_5=0;
P0_6=0;
P0_7=0;
P2_7=0;
P2_6=0;
P2_5=0;
P2_4=0;
P2_3=0;
P2_2=0;
P2_1=0;
P2_0=0;
delay_ms(60,30);
P0_0=1;
P0_1=1;
P0_2=1;
P0_3=1;
P0_4=1;
P0_5=1;
P0_6=1;
P0_7=1;
P2_7=1;
P2_6=1;
P2_5=1;
P2_4=1;
P2_3=1;
P2_2=1;
P2_1=1;
P2_0=1;
delay_ms(60,30);
}
}}
Comment
-
89c52
Nguyên văn bởi trungdt_1991 Xem bài viếtMình vừa làm xong mạch sao băng dùng 89c52 , bạn nào muốn làm thì đưa địa chỉ email
lên mình gửi cho.
:truongvanly.hn@gmail.com
Comment
-
uhm....anh nao biếtlooixx báo nhu vầy thì pm giùm nha....http://seablogs.zenfs.com/u/jpLyoKWc...34.jpg....cái orcad của em khi chuyển từ CAptur sang LAyout là bị như vậy á ai biết thì chỉ em với.......nguyen_thanh_phong_9009@yahoo.com.vn
Comment
Bài viết mới nhất
Collapse
-
bởi mèomướpDạ chú nhat... hông nên nói chơi về thần tiên đâu ạ...
-
Channel: Điện tử gia dụng
hôm nay, 06:22 -
-
bởi nhathung1101Em ăn chay, thì đã lên chùa.
Em lên chùa thì Bụt chạy mất dép.
Bụt chạy rồi thì mấy kỹ sư biết kêu ai?
Vì rất rất nhiều kỹ sư, vẫn khóc lóc, và Bụt hiện lên hỏi:
- Ếch con, tại sao con khóc???-
Channel: Điện tử gia dụng
Hôm qua, 15:37 -
-
Trả lời cho Về MAIN Máy In EPSON L310bởi minhngoc203Dòng máy này có phần mềm reset epson L310 : https://www.datvietcomputer.com/down...l360-l365.html, nhưng mình nghĩ , máy in có thể lỗi ic rom , bạn nạp lại rom L310 xem.
-
Channel: Điện tử dành cho người mới bắt đầu
27-04-2025, 08:30 -
-
bởi vi van phamCháu đừng khuyên lão nhà thùng như thế. Chỉ uống vai chai lão đã cầm dao tìm mèo thịt. Bây giờ tập dưỡng sinh, ăn vài chai thì........
-
Channel: Điện tử gia dụng
27-04-2025, 07:21 -
-
bởi mèomướpDạ từ bé cháu chỉ dám loanh quanh ở bản thôi ạ hông dám ra ngoài đâu. Chú nhat...với bác vi... nên hạn chế uống rượu, giành thời gian trồng rau, tập dưỡng sinh và thi thoảng ăn chay ạ...
-
Channel: Điện tử gia dụng
27-04-2025, 07:02 -
-
bởi vi van phamNhắn tin khẩn:
Mèo mướp trốn về bản ngay. Lão nhà thùng xỉn, tay cầm dao tìm mèo thịt. Về bản làng nhờ chị hàng xóm giúp đỡ....-
Channel: Điện tử gia dụng
27-04-2025, 05:57 -
-
Trả lời cho Tổng hợp quạt điện : điện tử , Cơ , phun sươngbởi Nikon57Cảm ơn meomuop đã chỉ dẫn. Mình làm theo lời khuyên đầu tiên của bạn " tìm dây và nối lại". Mắt tuy kém nhưng ngồi bình tĩnh vẫn tìm được và đã nối xong như hình. Cảm ơn bạn rất nhiều nhé....
-
Channel: Điện tử gia dụng
26-04-2025, 23:16 -
-
bởi nhathung1101Đệ đang ôm chai đây... Kính lão 1 chén nhé!
Đệ có trên tay dao cạo lông....
Ngắm nghía xung quanh tìm con mèo...
Dưng mà quên mất mèo lên đĩa...
Thôi cứ uống say mặc kệ mèo......-
Channel: Điện tử gia dụng
26-04-2025, 21:33 -
-
Trả lời cho Tổng hợp quạt điện : điện tử , Cơ , phun sươngbởi mèomướpDạ chú tìm dây và nối lại ạ. Ko thì chú cắt vứt cuộn ấy đi rồi nối dây bỏ qua cuộn ấy. Hoặc là quấn lại cuộn ấy thì càng tốt, chú ý số vòng dây và hướng quấn để đấu nối...
-
Channel: Điện tử gia dụng
26-04-2025, 20:52 -
-
Trả lời cho Tổng hợp quạt điện : điện tử , Cơ , phun sươngbởi Nikon57Mình có cái quạt trần điện cơ, xông điện vào không chạy . Dỡ xuống tháo ra quan sát thấy một đầu dây trong một bối dây bị đứt thò ra goài. Quạt cố, cả cuộn làm việc và cuồn đề bố trí thành một vòng . Xin xem ảnh kèm theo. Đo trở...
-
Channel: Điện tử gia dụng
26-04-2025, 15:09 -
Comment