View Single Post
Old 21-11-2009, 06:06 PM   #85
tdm
Đệ tử 7 túi
 
Tham gia ngày: May 2005
Bài gửi: 258
:
tôi mới tự học viết chương trình bằng c thông qua các bài viết trên diễn đàn.
đây là chương trinh bàn phim hex .các bạn xem dùm code đã được hay chưa?
//************************************************** ***************************
// nguoi thuc hien : tdm
// ngay : 21/11/2009
// phan cung: PIC16F877A
// ten bai:ban phim hex
//************************************************** ***************************
#include <16F877A.h>
#include <def_877a.h>
#fuses NOWDT,PUT,XT,NOPROTECT
#use delay(clock=4000000)
int a,b,n;// khai bao bien
// Chuong trinh chinh
void su_ly_ma(void);//khai bao chuong trinh con
void main()
{
TRISB =0xf0;
TRISC = 0;
PORTB =0;
PORTC =0;
b=0x01;
n=0;
while(1)//vong lap chinh
{
PORTB =b;
if(RB4=1)
{
delay_ms(10);//chong rung phim
if(RB4=1)
{
a=0;
su_ly_ma();//goi chuong trinh con
}
}
while(RB4=1)//cho phim nha
{
}
delay_ms(10);//chong rung phim
//*******************************
if(RB5=1)
{
delay_ms(10);//chong rung phim
if(RB5=1)
{
a=1;
su_ly_ma();//goi chuong trinh con
}
}
while(RB5=1)//cho phim nha
{
}
delay_ms(10);//chong rung phim
//*******************************
if(RB6=1)
{
delay_ms(10);//chong rung phim
if(RB6=1)
{
a=2;
su_ly_ma();//goi chuong trinh con
}
}
while(RB6=1)//cho phim nha
{
}
delay_ms(10);//chong rung phim
//*******************************
if(RB7=1)
{
delay_ms(10);//chong rung phim
if(RB7=1)
{
a=3;
su_ly_ma();//goi chuong trinh con
}
}
while(RB7=1)//cho phim nha
{
}
delay_ms(10);//chong rung phim
//**********************************
rotate_left(&b,1);
if(b>9)
{
b=0x01;
n=0;
}
++n;// tang n len 1
}// vong lap
}//ket thuc chuong trinh
//**************************
//khai bao chuong trinh con
void su_ly_ma(void)
{
if(n=0)
{
PORTC =a;
}
if(n=1)
{
PORTC =a+4;
}
if(n=2)
{
PORTC =a+8;
}
if(n=3)
{
PORTC =a+12;
}
}
__________________
viết chương trình cho vdk chạy ổn định là cả một vấn đề.

thay đổi nội dung bởi: tdm, 22-11-2009 lúc 07:24 AM.
tdm vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn