 |
:: عضو ذهبي ::
تاريخ التسجيل: Jul 2009
الدولة: Egypt
المشاركات: 767
|
|
نشاط [ sheimy ]
قوة السمعة:
|
|
13-10-2010, 12:16 AM
المشاركة 1
|
|
افكار برمجية (حركات ليدات جميلة)
هذة بعض الحركات الجميلة بالليدات
قد عرض احد الاعضاء فديو يوضح الحركات
وتم تنفيذ جزء منها
وهذة هى الحركات اللتى تم تنفيذها
والكود لهذة الحركات هو
كود:
unsigned short i,j,k,q,l;
//============================
void toright(int speed,short no)
{
PORTB=0b10000000;
VDelay_ms(speed);
for(i=0;i<no;i++)
{
PORTB=PORTB >>1;
VDelay_ms(speed);
}
}
//===========================
void toleft(int speed,short no)
{
PORTB=0b00000001;
VDelay_ms(speed);
for(i=0;i<no;i++)
{
PORTB=PORTB <<1;
VDelay_ms(speed);
}
}
//============================
void toright_stop(int speed)
{
k=0b00000000;
for(j=8;j>0;j--)
{
q=128;
for(i=0;i<j;i++)
{
PORTB=q|k;
VDelay_ms(speed);
q >>=1;
}
k <<=1;
k+=1;
}
}
//===========================
void toleft_stop(int speed)
{
k=0b00000000;
for(j=8;j>0;j--)
{
q=1;
for(i=0;i<j;i++)
{
PORTB=q|k;
VDelay_ms(speed);
q <<=1;
}
k >>=1;
k |=128;
}
}
//===========================
void tofromcenter(int speed)
{
k=0b00000000;
for(j=8;j>0;j--)
{
q=1;
l=128;
k=q|l;
for(i=0;i<j;i++)
{
PORTB=q|l;
VDelay_ms(speed);
q <<=1;
l >>=1;
}
/*k >>=2;
k <<=1;
k |=128;
k +=1;*/
}
}
//===============================
void main() {
TRISB=0x00;
PORTB=0x00;
while(1)
{
toright(50,8);
toleft(50,8);
toright_stop(50);
toleft_stop(50);
tofromcenter(100);
}
}
|
