View Single Post
Old 27-06-2009, 05:33 PM   #4
tuan1007
Nhập môn đệ tử
 
tuan1007's Avatar
 
Tham gia ngày: Jun 2009
Bài gửi: 5
:
Arrow Led sang dồn

Chiều nay cuối tuần nên được rảnh tí,Viết thử đoạn chương trình bạn yêu cầu.
20 phút sau cũng biên dịch ra được File .hex
Lấy cái EasyPIC ra nạp thử.

Kết quả OK.


#INCLUDE<16F877A.H>
#INCLUDE<KhaiBaoTGhi_16F877A.h>

#FUSES HS,NOWDT,NOPROTECT,NOLVP
#USE DELAY(CLOCK=20000000)
#DEFINE Led PORTB
#use fast_io(b)
int8 sck,slx,bx,bl,gt;

main()
{
trisb=0;
while(true)
{
sck=8;
bl=0;
portb=0;
delay_ms(100);
while(sck>0)
{
bx=1;
slx=sck;
while(slx>0)
{
gt=bl|bx;
portb=gt;
delay_ms(100);
bx=bx<<1;
slx--;
}
bl=gt;
sck--;
}

}

}


----------------------------------------------------------------------------------------

Trong File đính kèm có File .c và .hex anh nhé!
Cuối tuần rồi,Em có hẹn nên đi đây.
File Kèm Theo
File Type: rar led sang don.rar (14.1 KB, 322 lần tải)
__________________
Thien Minh Electronic Solutions Co,ltd
226 Tan Phuoc, Ward 6, District 10, HCM City
Website: www.tme.vn
tuan1007 vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn