Cho hỏi là tại sao khi ta đỏ chương trình cho keil c (file hex dung lượng 30kb) nó không báo tràn bộ nhớ nhưng mà bỏ ic 89s52 vào lại không chạy??? Nhưng dung lượng file hex khoảng 20kb thì chạy
đổ chương trình keil c cho 89s52
Collapse
X
-
#include <REGX52.H>
#include<stdlib.h>
unsigned int i,j,k,n;
sbit d25 = P0^7;
sbit d24 = P2^0;
sbit d23 = P2^1;
sbit d22 = P2^2;
sbit d21 = P2^3;
sbit d20 = P2^4;
sbit d19 = P2^5;
sbit d18 = P2^6;
sbit d17 = P2^7;
sbit d16 = P3^7;
sbit d15 = P3^6;
sbit d14 = P3^5;
sbit d13 = P3^4;
sbit d12 = P3^3;
sbit d11 = P3^2;
sbit d10 = P3^1;
sbit d9 = P3^0;
sbit d8 = P1^0;
sbit d7 = P1^1;
sbit d6 = P1^2;
sbit d5 = P1^3;
sbit d4 = P1^4;
sbit d3 = P1^5;
sbit d2 = P1^6;
sbit d1 = P1^7;
sbit c1 = P0^4;
sbit c2 = P0^3;
sbit c3 = P0^2;
sbit c4 = P0^1;
sbit c5 = P0^0;
//================================================== =========
void delay(unsigned int time)
{
while(time--)
{
unsigned char j = 125;
while(j--) ;
}
}
//================================================== =========
void xoa()
{
P1=P2=P3=P0=0xff;
}
//================================================== =========
/*// chu B
void CHUB(unsigned char ms,unsigned char n)
{
xoa();
for(i=0;i<n;i++)
{
//1
for(k=0;k<ms;k++)
{c1=0;d1=d2=d3=d4=0;delay(3);xoa();
c2=0;d1=d5=0;delay(3);xoa();
c3=0;d1=d2=d3=d4=0;delay(3);xoa();
c4=0;d1=d5=0;delay(3);xoa();
c5=0;d1=d2=d3=d4=0;delay(3);xoa();
}
//2
for(k=0;k<ms;k++)
{c1=0;d7=d8=d9=d10=0;delay(3);xoa();
c2=0;d10=d6=0;delay(3);xoa();
c3=0;d7=d8=d9=d10=0;delay(3);xoa();
c4=0;d10=d6=0;delay(3);xoa();
c5=0;d7=d8=d9=d10=0;delay(3);xoa();
}
//3
for(k=0;k<ms;k++)
{c1=0;d11=d12=d13=d14=0;delay(3);xoa();
c2=0;d11=d15=0;delay(3);xoa();
c3=0;d11=d12=d13=d14=0;delay(3);xoa();
c4=0;d11=d15=0;delay(3);xoa();
c5=0;d11=d12=d13=d14=0;delay(3);xoa();
}
//4
for(k=0;k<ms;k++)
{c1=0;d20=d17=d18=d19=0;delay(3);xoa();
c2=0;d16=d20=0;delay(3);xoa();
c3=0;d20=d17=d18=d19=0;delay(3);xoa();
c4=0;d16=d20=0;delay(3);xoa();
c5=0;d20=d17=d18=d19=0;delay(3);xoa();
}
//5
for(k=0;k<ms;k++)
{c1=0;d21=d22=d23=d24=0;delay(3);xoa();
c2=0;d21=d25=0;delay(3);xoa();
c3=0;d21=d22=d23=d24=0;delay(3);xoa();
c4=0;d25=d21=0;delay(3);xoa();
c5=0;d21=d22=d23=d24=0;delay(3);xoa();
}
}}
// chu F
void CHUF(unsigned char ms,unsigned char n)
{
xoa();
for(i=0;i<n;i++)
{
//1
for(k=0;k<ms;k++)
{c1=0;d1=0;delay(3);xoa();
c2=0;d1=0;delay(3);xoa();
c3=0;d1=d2=d3=d4=0;delay(3);xoa();
c4=0;d1=0;delay(3);xoa();
c5=0;d1=d2=d3=d4=d5=0;delay(3);xoa();
}
//2
for(k=0;k<ms;k++)
{ c1=0;d10=0;delay(3);xoa();
c2=0;d10=0;delay(3);xoa();
c3=0;d7=d8=d9=d10=0;delay(3);xoa();
c4=0;d10=0;delay(3);xoa();
c5=0;d6=d7=d8=d9=d10=0;delay(3);xoa();
}
//3
for(k=0;k<ms;k++)
{
c1=0;d11=0;delay(3);xoa();
c2=0;d11=0;delay(3);xoa();
c3=0;d11=d12=d13=d14=0;delay(3);xoa();
c4=0;d11=0;delay(3);xoa();
c5=0;d11=d12=d13=d14=d15=0;delay(3);xoa();
}
//4
{c1=0;d20=0;delay(3);xoa();
c2=0;d20=0;delay(3);xoa();
c3=0;d17=d18=d19=d20=0;delay(3);xoa();
c4=0;d20=0;delay(3);xoa();
c5=0;d16=d17=d18=d19=d20=0;delay(3);xoa();
}
//5
for(k=0;k<ms;k++)
{c1=0;d21=0;delay(3);xoa();
c2=0;d21=0;delay(3);xoa();
c3=0;d21=d22=d23=d24=0;delay(3);xoa();
c4=0;d21=0;delay(3);xoa();
c5=0;d21=d22=d23=d24=d25=0; delay(3);xoa();
}
}} */
//HIEU UNG LEN XUONG
void LENXUONG(unsigned char ms,unsigned char n)
{P0=0xff;
for(i=0;i<n;i++)
{
{d1=0;d2=0;d3=0;d4=0;
d5=0;d6=0;d7=0;
d8=0;d9=0;d10=0;
d11=0;d12=0;d13=0;d14=0;d15=0;d16=0;d17=0;d18=0;d1 9=d20=d21=d22=d23=d24=d25=0;}
c1=0;delay(ms);c2=0;delay(ms);c3=0;delay(ms);c4=0; delay(ms);c5=0;delay(ms);xoa();
d1=0;d2=0;d3=0;d4=0;
d5=0;d6=0;d7=0;
d8=0;d9=0;d10=0;
d11=0;d12=0;d13=0;d14=0;d15=0;d16=0;d17=0;d18=0;d1 9=d20=d21=d22=d23=d24=d25=0;
c5=0;delay(ms);c4=0;delay(ms);c3=0;delay(ms);c2=0; delay(ms);c1=0;delay(ms);
}}
//HIEU UN BUNG RA
void BUNGRA(unsigned char ms,unsigned char n)
{P1=P2=P3=0xff;
for(i=0;i<n;i++)
{
c1=c2=c3=c4=c5=0;d13=0;delay(ms);xoa();
c1=c2=c3=c4=c5=0;{d9=0;d8=0;d7=0;d14=0;d18=0;
d17=0;d19=0;d12=0;}delay(ms);xoa();
c1=c2=c3=c4=c5=0; {d1=0;d2=0;d3=0;d4=0;d5=0;d6=0;d15=0;d16=0;d25=0;
d24=d23=d21=d20=d11=d10=d22=0;}delay(ms);xoa();
}}
// hieu ung chay vong
void chayvong(unsigned char ms,unsigned char n)
{xoa();
for(i=0;i<n;i++)
{
{c1=c2=c3=c4=c5=0;
d21=0;delay(ms);
d20=0;delay(ms);d11=0;delay(ms);d10=0;delay(ms);
d1=0;delay(ms);d2=0;delay(ms);
d3=0;delay(ms);d4=0;delay(ms);d5=0;delay(ms);d6=0; delay(ms);d15=0;delay(ms);
d16=0;d25=0;delay(ms);d24=0;delay(ms);d23=0;delay( ms);d22=0;delay(ms);d19=0;delay(ms);
d12=0;delay(ms);d9=0;delay(ms);d8=0;delay(ms);d7=0 ;delay(ms);d14=0;delay(ms);
d17=0;delay(ms);d18=0;delay(ms);d13=0;delay(ms);
}xoa();
}
}
void trongrangoai(unsigned char ms,unsigned char n)
{xoa();
for(i=0;i<n;i++)
{
c1=c2=c3=c4=c5=0;d13=0;delay(ms);
c1=c2=c3=c4=c5=0;d18=0;delay(ms);
c1=c2=c3=c4=c5=0;d17=0;delay(ms);
c1=c2=c3=c4=c5=0;d14=0;delay(ms);
c1=c2=c3=c4=c5=0;d7=0;delay(ms);
c1=c2=c3=c4=c5=0;d8=0;delay(ms);
c1=c2=c3=c4=c5=0;d9=0;delay(ms);
c1=c2=c3=c4=c5=0;d12=0;delay(ms);
c1=c2=c3=c4=c5=0;d19=0;delay(ms);
c1=c2=c3=c4=c5=0;d22=0;delay(ms);
c1=c2=c3=c4=c5=0;d23=0;delay(ms);
c1=c2=c3=c4=c5=0;d24=0;delay(ms);
c1=c2=c3=c4=c5=0;d25=0;delay(ms);
c1=c2=c3=c4=c5=0;d16=0;delay(ms);
c1=c2=c3=c4=c5=0;d15=0;delay(ms);
c1=c2=c3=c4=c5=0;d6=0;delay(ms);
c1=c2=c3=c4=c5=0;d5=0;delay(ms);
c1=c2=c3=c4=c5=0;d4=0;delay(ms);
c1=c2=c3=c4=c5=0;d3=0;delay(ms);
c1=c2=c3=c4=c5=0;d2=0;delay(ms);
c1=c2=c3=c4=c5=0;d1=0;delay(ms);
c1=c2=c3=c4=c5=0;d10=0;delay(ms);
c1=c2=c3=c4=c5=0;d11=0;delay(ms);
c1=c2=c3=c4=c5=0;d20=0;delay(ms);
c1=c2=c3=c4=c5=0;d21=0;delay(ms);
}xoa();
}
//HIEU UNG SONG NGANG
void SONGNGANG(unsigned char ms,unsigned char n)
{
P0=0xff;
for(i=0;i<n;i++)
{
//1
for(k=0;k<ms;k++)
{
c1=0;d1=d10=d11=d20=d21=0;delay(3);xoa();
c2=0;d2=d9=d12=d19=d22=0;delay(3);xoa();
c3=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c4=0;d4=d7=d14=d17=d24=0;delay(3);xoa();
c5=0;d5=d6=d15=d25=d16=0;delay(3);xoa();
}
xoa();
//2
for(k=0;k<ms;k++)
{c2=0;d1=d10=d11=d20=d21=0;delay(3);xoa();
c3=0;d2=d9=d12=d19=d22=0;delay(3);xoa();
c4=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c5=0;d4=d7=d14=d17=d24=0;delay(3);xoa();
c4=0;d5=d6=d15=d16=d25=0;delay(3);xoa();
}
xoa();
//3
for(k=0;k<ms;k++)
{c3=0;d1=d10=d11=d20=d21=0;delay(3);xoa();
c4=0;d2=d9=d12=d19=d22=0;delay(3);xoa();
c5=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c4=0;d4=d7=d14=d17=d24=0;delay(3);xoa();
c3=0;d5=d6=d15=d16=d25=0;delay(3);xoa();
}
xoa();
//4
for(k=0;k<ms;k++)
{c4=0;d1=d10=d11=d20=d21=0;delay(3);xoa();
c5=0;d2=d9=d12=d19=d22=0;delay(3);xoa();
c4=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c3=0;d4=d7=d14=d17=d24=0;delay(3);xoa();
c2=0;d5=d6=d15=d16=d25=0;delay(3);xoa();
}
xoa();
//5
for(k=0;k<ms;k++)
{c5=0;d1=d10=d11=d20=d21=0;delay(3);xoa();
c4=0;d2=d9=d12=d19=d22=0;delay(3);xoa();
c3=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c2=0;d4=d7=d14=d17=d24=0;delay(3);xoa();
c1=0;d5=d6=d15=d16=d25=0;delay(3);xoa();
}
xoa();
}}
//HIEU UNG SONG DOC
void SONGDOC(unsigned char ms,unsigned char n)
{
xoa();
for(i=0;i<n;i++)
{
for(k=0;k<ms;k++)
{
c1=c2=c3=c4=c5=0;d1=d9=d13=d17=d25=0;delay(3);xoa( );
}
for(k=0;k<ms;k++)
{
c1=c2=c3=c4=c5=0;d10=d12=d18=d24=d16=0;delay(3);xo a();
}
for(k=0;k<ms;k++)
{
c1=c2=c3=c4=c5=0;d11=d19=d23=d17=d15=0;delay(3);xo a();
}
for(k=0;k<ms;k++)
{
c1=c2=c3=c4=c5=0;d20=d22=d18=d14=d6=0;delay(3);xoa ();
}
for(k=0;k<ms;k++)
{
c1=c2=c3=c4=c5=0;d21=d19=d13=d7=d5=0;delay(3);xoa( );
}
for(k=0;k<ms;k++)
{
c1=c2=c3=c4=c5=0;d21=d19=d13=d7=d5=0;delay(3);xoa( );
}
for(k=0;k<ms;k++)
{
c1=c2=c3=c4=c5=0;d20=d22=d18=d14=d6=0;delay(3);xoa ();
}
for(k=0;k<ms;k++)
{
c1=c2=c3=c4=c5=0;d11=d19=d23=d17=d15=0;delay(3);xo a();
}
for(k=0;k<ms;k++)
{
c1=c2=c3=c4=c5=0;d10=d12=d18=d24=d16=0;delay(3);xo a();
}
for(k=0;k<ms;k++)
{
c1=c2=c3=c4=c5=0;d1=d9=d13=d17=d25=0;delay(3);xoa( );
}
}}
//HIEU UNG SONG DUNG
void SONGDUNG(unsigned char ms,unsigned char n)
{
xoa();
for(i=0;i<n;i++)
{
{c1=c2=c3=c4=c5=0;d21=d19=d13=d7=d5=0;delay(ms);xo a();
c1=c2=c3=c4=c5=0;d22=d18=d14=d6=d4=0;delay(ms);xoa ();
c1=c2=c3=c4=c5=0;d23=d17=d15=d7=d3=0;delay(ms);xoa ();
c1=c2=c3=c4=c5=0;d24=d16=d14=d8=d2=0;delay(ms);xoa ();
c1=c2=c3=c4=c5=0;d1=d9=d13=d17=d25=0;delay(ms);xoa ();
}
xoa();
{
c1=c2=c3=c4=c5=0;d1=d9=d13=d17=d25=0;delay(ms);xoa ();
c1=c2=c3=c4=c5=0;d24=d16=d14=d8=d2=0;delay(ms);xoa ();
c1=c2=c3=c4=c5=0;d23=d17=d15=d7=d3=0;delay(ms);xoa ();
c1=c2=c3=c4=c5=0;d22=d18=d14=d6=d4=0;delay(ms);xoa ();
c1=c2=c3=c4=c5=0;d21=d19=d13=d7=d5=0;delay(ms);xoa ();
}
xoa();
}}
//HIEU UNG KHOI VUONG
void KHOIVUONG(unsigned char ms,unsigned char n)
{
xoa();
for(i=0;i<n;i++)
{
//1
{{c1=0;d1=d2=d3=d4=d5=d6=d15=d16=d25=d24=d23=d22=d 21=d20=d11=d10=0;
d7=d8=d9=d12=d17=d18=d19=d14=0;};delay(ms);xoa();
c2=0;d1=d5=d21=d25=d7=d8=d9=d12=d17=d18=d19=d14=0; delay(ms);xoa();
c3=0;d1=d5=d21=d25=d7=d8=d9=d12=d17=d18=d19=d14=0; delay(ms);xoa();
c4=0;d1=d5=d21=d25=d7=d8=d9=d12=d17=d18=d19=d14=0; delay(ms);xoa();
c5=0;{d1=d2=d3=d4=d5=d6=d15=d16=d25=d24=d23=d22=d2 1=d20=d11=d10=0;
d7=d8=d9=d12=d17=d18=d19=d14=0;};delay(ms);xoa();
}
xoa();
}}
//HIEU UNG XOAY DOC
void XOAYDOC(unsigned char ms,unsigned char n)
{
xoa();
for(i=0;i<n;i++)
{
{c1=c2=c3=c4=c5=0;d1=d9=d13=d17=d25=0;delay(ms);xo a();
c1=c2=c3=c4=c5=0;d11=d12=d13=d14=d15=0;delay(ms);x oa();
c1=c2=c3=c4=c5=0;d5=d7=d13=d19=d21=0;delay(ms);xoa ();
c1=c2=c3=c4=c5=0;d3=d8=d13=d18=d23=0;delay(ms);xoa ();
c1=c2=c3=c4=c5=0;d1=d9=d13=d17=d25=0;delay(ms);xoa ();
c1=c2=c3=c4=c5=0;d11=d12=d13=d14=d15=0;delay(ms);x oa();
c1=c2=c3=c4=c5=0;d5=d7=d13=d19=d21=0;delay(ms);xoa ();
c1=c2=c3=c4=c5=0;d3=d8=d13=d18=d23=0;delay(ms);xoa ();
}
xoa();
}}
//HIEU UNG NHAY
void NHAY(unsigned char ms,unsigned char n)
{
xoa();
for(i=0;i<n;i++)
{
{
d1=0;d2=0;d3=0;d4=0;d5=0;d6=0;d7=0;d8=0;d9=0;d10=0 ;d11=0;d12=0;
d13=0;d14=0;d15=0;d16=0;d17=0;d18=0;d19=0;d20=0;d2 1=0;
d22=0;d23=0;d24=0;d25=0;}
c1=c2=c3=c4=c5=0;delay(ms);xoa();
c1=c2=c3=c4=c5=0;delay(ms);xoa();
}}
// HIEU UNG XOAY NGANG
void XOAYNGANG(unsigned char ms,unsigned char n)
{
xoa();
for(i=0;i<n;i++)
{
//1
for(k=0;k<ms;k++)
{
{c3=0;d1=d2=d3=d4=d5=d6=d7=d8=d9=d10=d11=d12=d13=d 14=d15=d16=d17=0;
d18=d19=d20=d21=d22=d23=d24=d25=0;}delay(5);xoa();
}xoa();
//2
for(k=0;k<ms;k++)
{c1=0;d5=d6=d15=d16=d25=0;delay(3);xoa();
c2=0;d4=d7=d14=d17=d24=0;delay(3);xoa();
c3=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c4=0;d2=d9=d12=d19=d22=0;delay(3);xoa();
c5=0;d1=d10=d11=d20=d21=0;delay(3);xoa();
}
//3
for(k=0;k<ms;k++)
{
c1=c2=c3=c4=c5=0;d3=d8=d13=d18=d23=0;delay(3);xoa( );
}
//4
for(k=0;k<ms;k++)
{c5=0;d5=d6=d15=d16=d25=0;delay(3);xoa();
c4=0;d4=d7=d14=d17=d24=0;delay(3);xoa();
c3=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c2=0;d2=d9=d12=d19=d22=0; delay(3);xoa();
c1=0;d1=d10=d11=d20=d21=0;delay(3);xoa();
}
//5
for(k=0;k<ms;k++)
{c3=0;d1=d2=d3=d4=d5=d6=d7=d8=d9=d10=d11=d12=d13=d 14=d15=d16=d17=0;
d18=d19=d20=d21=d22=d23=d24=d25=0;}delay(3);xoa();
//6
for(k=0;k<ms;k++)
{c1=0;d5=d6=d15=d16=d25=0;delay(3);xoa();
c2=0;d4=d7=d14=d17=d24=0;delay(3);xoa();
c3=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c4=0;d2=d9=d12=d19=d22=0;delay(3);xoa();
c5=0;d1=d10=d11=d20=d21=0;delay(3);xoa();
}
//7
for(k=0;k<ms;k++)
{
c1=c2=c3=c4=c5=0;d3=d8=d13=d18=d23=0;delay(3);xoa( );
}
//8
for(k=0;k<ms;k++)
{c5=0;d5=d6=d15=d16=d25=0;delay(3);xoa();
c4=0;d4=d7=d14=d17=d24=0;delay(3);xoa();
c3=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c2=0;d2=d9=d12=d19=d22=0;delay(3);xoa();
c1=0;d1=d10=d11=d20=d21=0;delay(3);xoa();
}
}xoa();
}
void sang(unsigned char ms,unsigned char n)
{xoa();
for(i=0;i<n;i++)
{
c1=c2=c3=c4=c5=0;
d1=d2=d3=d4=d5=d6=d7=d8=d9=d10=d11=d12=d13=d14=d15 =d16=d17=d18=d19=d20=d21=d22=d23=d24=d25=0;delay(m s);
}
xoa();
}
void bungvuong(unsigned char ms,unsigned char n)
{P0=0xff;
for(i=0;i<n;i++)
{
c1=0;d21=0;delay(ms);
c1=c2=0;d19=d20=d21=d22=0;delay(ms);
c1=c2=c3=0;d11=d12=d13=d18=d19=d20=d21=d22=d3=0;de lay(ms);
c1=c2=c3=c4=0;d7=d8=d9=d10=d11=d12=d13=d14=d17=d18 =d19=d20=d21=d22=d23=d24=0;delay(ms);
c1=c2=c3=c4=c5=0;d1=d2=d3=d4=d5=d6=d7=d8=d9=d10=d1 1=d12=d13=d14=d15=d16=d17=d18=d19=d20=d21=d22=d23= d24=d25=0;delay(ms);
}xoa();
for(i=0;i<n;i++)
{
c1=0;d1=0;delay(ms);
c1=0;d1=d2=d9=d10=0;delay(ms);
c1=c2=c3=0;d1=d2=d3=d8=d9=d10=d11=d12=d13=0;delay( ms);
c1=c2=c3=c4=0;d1=d2=d3=d4=d7=d8=d9=d10=d11=d12=d13 =d14=d17=d18=d19=d20=0;delay(ms);
c1=c2=c3=c4=c5=0;d1=d2=d3=d4=d5=d6=d7=d8=d9=d10=d1 1=d12=d13=d14=d15=d16=d17=d18=d19=d20=d21=d22=d23= d24=d25=0;delay(ms);
}
xoa();
for(i=0;i<n;i++)
{
c1=0;d5=0;delay(ms);
c1=c2=0;d4=d5=d6=d7=0;delay(ms);
c1=c2=c3=0;d3=d4=d5=d6=d7=d8=d13=d14=d15=0;delay(m s);
c1=c2=c3=c4=0;d2=d3=d4=d5=d6=d7=d8=d9=d12=d13=d14= d15=d16=d17=d18=d19=0;delay(ms);
c1=c2=c3=c4=c5=0;d1=d2=d3=d4=d5=d6=d7=d8=d9=d10=d1 1=d12=d13=d14=d15=d16=d17=d18=d19=d20=d21=d22=d23= d24=d25=0;delay(ms);
}xoa();
for(i=0;i<n;i++)
{
c1=0;d25=0;delay(ms);
c1=c2=0;d16=d17=d24=d25=0;delay(ms);
c1=c2=c3=0;d13=d14=d15=d16=d17=d18=d23=d24=d25=0;d elay(ms);
c1=c2=c3=c4=0;d6=d7=d8=d9=d12=d13=d14=d15=d16=d17= d18=d19=d22=d23=d24=d25=0;delay(ms);
c1=c2=c3=c4=c5=0;d1=d2=d3=d4=d5=d6=d7=d8=d9=d10=d1 1=d12=d13=d14=d15=d16=d17=d18=d19=d20=d21=d22=d23= d24=d25=0;delay(ms);
}
xoa();
}
//XEP VAO
void xep(unsigned char ms,unsigned char n)
{xoa();
for(i=0;i<n;i++)
{
{c1=c2=c3=c4=c5=0;
{
d1=d2=d3=d4=d5=0;
d22=d23=d24=d25=0;}delay(ms);
{
d16=d17=d18=d19=d20=0;
d6=d7=d8=d9=d10=0;}delay(ms);
d11=d12=d13=d14=d15=0;delay(ms);
}xoa();
{
c1=c2=c3=c4=c5=0;d3=d8=d13=d18=d23=0;delay(ms);
{
d2=d9=d12=d19=d22=0;
d4=d7=d14=d17=d24=0;}delay(ms);
{
d1=d10=d11=d20=d21=0;
d5=d6=d15=d16=d25=0;}delay(ms);
}xoa();
}xoa();
}
//DON SONG
void don(unsigned char ms,unsigned char n)
{xoa();
for(i=0;i<n;i++)
{c1=c2=c3=c4=c5=0;
d1=d10=d11=d20=d21=0;delay(ms);
d2=d9=d12=d19=d22=0;delay(ms);
d3=d8=d13=d18=d23=0;delay(ms);
d4=d7=d14=d17=d24=0;delay(ms);
d5=d6=d15=d16=d25=0;delay(ms);
}xoa();
for(i=0;i<n;i++)
{c1=c2=c3=c4=c5=0;
d1=d2=d3=d4=d5=0;delay(ms);
d6=d7=d8=d9=d10=0;delay(ms);
d11=d12=d13=d14=d15=0;delay(ms);
d16=d17=d18=d19=d20=0;delay(ms);
d21=d22=d23=d24=d25=0;delay(ms);
}xoa();
for(i=0;i<n;i++)
{ P0=0xff;
d1=d2=d3=d4=d5=d6=d7=d8=d9=d10=d11=d12=d13=d14=d15 =d16=d17=d18=d19=d20=d21=d22=d23=d24=d25=0;
{c1=0;delay(ms);
c2=0;delay(ms);
c3=0;delay(ms);
c4=0;delay(ms);
c5=0;delay(ms);}
}xoa();
}
/*
//CHU D XOAY
void CHUDXOAY(unsigned char ms,unsigned char n)
{xoa();
for(i=0;i<n;i++)
{
//1
for(k=0;k<ms;k++)
{c1=0;d1=d2=d3=d4=0;delay(3);xoa();
c2=0;d1=d5=0;delay(3);xoa();
c3=0;d1=d5=0;delay(3);xoa();
c4=0;d1=d5=0;delay(3);xoa();
c5=0;d1=d2=d3=d4=0;delay(3);xoa();
}
//2
for(k=0;k<ms;k++)
{c1=0;d7=d8=d9=d10=0;delay(3);xoa();
c2=0;d10=d6=0;delay(3);xoa();
c3=0;d10=d6=0;delay(3);xoa();
c4=0;d10=d6=0;delay(3);xoa();
c5=0;d7=d8=d9=d10=0;delay(3);xoa();
}
//3 XOAY
for(k=0;k<ms;k++)
{c1=0;d11=d12=d13=d14=0;delay(3);xoa();
c2=0;d11=d15=0;delay(3);xoa();
c3=0;d11=d15=0;delay(3);xoa();
c4=0;d11=d15=0;delay(3);xoa();
c5=0;d11=d12=d13=d14=0;delay(3);xoa();
}
/*
for(k=0;k<ms;k++)
{c1=0;d7=d13=d19=d21=0;delay(3);xoa();
c2=0;d5=d21=0;delay(3);xoa();
c3=0;d5=d21=0;delay(3);xoa();
c4=0;d5=d21=0;delay(3);xoa();
c5=0;d7=d13=d19=d21=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d8=d13=d18=d23=0;delay(3);xoa();
c2=0;d3=d23=0;delay(3);xoa();
c3=0;d3=d23=0;delay(3);xoa();
c4=0;d3=d23=0;delay(3);xoa();
c5=0;d8=d13=d18=d23=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d9=d13=d17=d25=0;delay(3);xoa();
c2=0;d1=d25=0;delay(3);xoa();
c3=0;d1=d25=0;delay(3);xoa();
c4=0;d1=d25=0;delay(3);xoa();
c5=0;d9=d13=d17=d25=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d11=d12=d13=d14=0;delay(3);xoa();
c2=0;d11=d15=0;delay(3);xoa();
c3=0;d11=d15=0;delay(3);xoa();
c4=0;d11=d15=0;delay(3);xoa();
c5=0;d11=d12=d13=d14=0;delay(3);xoa();
}
//4
for(k=0;k<ms;k++)
{c1=0;d17=d18=d19=d20=0;delay(3);xoa();
c2=0;d16=d20=0;delay(3);xoa();
c3=0;d16=d20=0;delay(3);xoa();
c4=0;d16=d20=0;delay(3);xoa();
c5=0;d17=d18=d19=d20=0;delay(3);xoa();
}
//5
for(k=0;k<ms;k++)
{c1=0;d21=d22=d23=d24=0;delay(3);xoa();
c2=0;d21=d25=0;delay(3);xoa();
c3=0;d21=d25=0;delay(3);xoa();
c4=0;d21=d25=0;delay(3);xoa();
c5=0;d21=d22=d23=d24=0;delay(3);xoa();
}
}}
/*
//CHU A XOAY
void CHUAXOAY(unsigned char ms,unsigned char n)
{xoa();
for(i=0;i<n;i++)
{
//1
for(k=0;k<ms;k++)
{c1=0;d1=d5=0;delay(3);xoa();
c2=0;d1=d5=0;delay(3);xoa();
c3=0;d1=d2=d3=d4=d5=0;delay(3);xoa();
c4=0;d2=d4=0;delay(3);xoa();
c5=0;d3=0;delay(3);xoa();
}
//2
for(k=0;k<ms;k++)
{c1=0;d6=d10=0;delay(3);xoa();
c2=0;d10=d6=0;delay(3);xoa();
c3=0;d10=d9=d8=d7=d6=0;delay(3);xoa();
c4=0;d7=d9=0;delay(3);xoa();
c5=0;d8=0;delay(3);xoa();
}
//3 XOAY
for(k=0;k<ms;k++)
{c1=0;d11=d15=0;delay(3);xoa();
c2=0;d11=d15=0;delay(3);xoa();
c3=0;d11=d12=d13=d14=d15=0;delay(3);xoa();
c4=0;d12=d14=0;delay(3);xoa();
c5=0;d13=0;delay(3);xoa();
}
/*
for(k=0;k<ms;k++)
{c1=0;d5=d21=0;delay(3);xoa();
c2=0;d5=d21=0;delay(3);xoa();
c3=0;d5=d7=d13=d19=d21=0;delay(3);xoa();
c4=0;d7=d19=0;delay(3);xoa();
c5=0;d13=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d3=d23=0;delay(3);xoa();
c2=0;d3=d23=0;delay(3);xoa();
c3=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c4=0;d8=d18=0;delay(3);xoa();
c5=0;d13=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d1=d25=0;delay(3);xoa();
c2=0;d1=d25=0;delay(3);xoa();
c3=0;d1=d9=d13=d17=d25=0;delay(3);xoa();
c4=0;d9=d17=0;delay(3);xoa();
c5=0;d13=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d11=d15=0;delay(3);xoa();
c2=0;d11=d15=0;delay(3);xoa();
c3=0;d11=d12=d13=d14=d15=0;delay(3);xoa();
c4=0;d12=d14=0;delay(3);xoa();
c5=0;d13=0;delay(3);xoa();
}
//4
for(k=0;k<ms;k++)
{c1=0;d16=d20=0;delay(3);xoa();
c2=0;d16=d20=0;delay(3);xoa();
c3=0;d16=d17=d18=d19=d20=0;delay(3);xoa();
c4=0;d17=d19=0;delay(3);xoa();
c5=0;d18=0;delay(3);xoa();
}
//5
for(k=0;k<ms;k++)
{c1=0;d21=d25=0;delay(3);xoa();
c2=0;d21=d25=0;delay(3);xoa();
c3=0;d21=d22=d23=d24=d25=0;delay(3);xoa();
c4=0;d22=d24=0;delay(3);xoa();
c5=0;d23=0;delay(3);xoa();
}
}}
//CHU N XOAY
void CHUNXOAY(unsigned char ms,unsigned char n)
{xoa();
for(i=0;i<n;i++)
{
//1
for(k=0;k<ms;k++)
{c1=0;d1=d5=0;delay(3);xoa();
c2=0;d1=d4=d5=0;delay(3);xoa();
c3=0;d1=d3=d5=0;delay(3);xoa();
c4=0;d1=d2=d5=0;delay(3);xoa();
c5=0;d1=d5=0;delay(3);xoa();
}
//2
for(k=0;k<ms;k++)
{c1=0;d6=d10=0;delay(3);xoa();
c2=0;d6=d9=d10=0;delay(3);xoa();
c3=0;d6=d8=d10=0;delay(3);xoa();
c4=0;d6=d7=d10=0;delay(3);xoa();
c5=0;d6=d10=0;delay(3);xoa();
}
//3 XOAY
for(k=0;k<ms;k++)
{c1=0;d11=d15=0;delay(3);xoa();
c2=0;d11=d14=d15=0;delay(3);xoa();
c3=0;d11=d13=d15=0;delay(3);xoa();
c4=0;d11=d12=d15=0;delay(3);xoa();
c5=0;d11=d15=0;delay(3);xoa();
}
/*
for(k=0;k<ms;k++)
{c1=0;d5=d21=0;delay(3);xoa();
c2=0;d5=d7=d21=0;delay(3);xoa();
c3=0;d5=d13=d21=0;delay(3);xoa();
c4=0;d5=d19=d21=0;delay(3);xoa();
c5=0;d5=d21=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d3=d23=0;delay(3);xoa();
c2=0;d3=d8=d23=0;delay(3);xoa();
c3=0;d3=d13=d23=0;delay(3);xoa();
c4=0;d3=d18=d23=0;delay(3);xoa();
c5=0;d3=d23=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d1=d25=0;delay(3);xoa();
c2=0;d1=d17=d25=0;delay(3);xoa();
c3=0;d1=d13=d25=0;delay(3);xoa();
c4=0;d1=d9=d25=0;delay(3);xoa();
c5=0;d1=d25=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d11=d15=0;delay(3);xoa();
c2=0;d11=d14=d15=0;delay(3);xoa();
c3=0;d11=d13=d15=0;delay(3);xoa();
c4=0;d11=d12=d15=0;delay(3);xoa();
c5=0;d11=d15=0;delay(3);xoa();
}
//4
for(k=0;k<ms;k++)
{c1=0;d16=d20=0;delay(3);xoa();
c2=0;d16=d17=d20=0;delay(3);xoa();
c3=0;d16=d18=d20=0;delay(3);xoa();
c4=0;d16=d19=d20=0;delay(3);xoa();
c5=0;d16=d20=0;delay(3);xoa();
}
//5
for(k=0;k<ms;k++)
{c1=0;d21=d25=0;delay(3);xoa();
c2=0;d21=d24=d25=0;delay(3);xoa();
c3=0;d21=d23=d25=0;delay(3);xoa();
c4=0;d21=d22=d25=0;delay(3);xoa();
c5=0;d21=d25=0;delay(3);xoa();
}
}}
//CHU H XOAY
void CHUHXOAY(unsigned char ms,unsigned char n)
{xoa();
for(i=0;i<n;i++)
{
//1
for(k=0;k<ms;k++)
{c1=0;d1=d5=0;delay(3);xoa();
c2=0;d1=d5=0;delay(3);xoa();
c3=0;d1=d2=d3=d4=d5=0;delay(3);xoa();
c4=0;d1=d5=0;delay(3);xoa();
c5=0;d1=d5=0;delay(3);xoa();
}
//2
for(k=0;k<ms;k++)
{c1=0;d6=d10=0;delay(3);xoa();
c2=0;d6=d10=0;delay(3);xoa();
c3=0;d6=d7=d8=d9=d10=0;delay(3);xoa();
c4=0;d6=d10=0;delay(3);xoa();
c5=0;d6=d10=0;delay(3);xoa();
}
//3 XOAY
for(k=0;k<ms;k++)
{c1=0;d11=d15=0;delay(3);xoa();
c2=0;d11=d15=0;delay(3);xoa();
c3=0;d11=d12=d13=d14=d15=0;delay(3);xoa();
c4=0;d11=d15=0;delay(3);xoa();
c5=0;d11=d15=0;delay(3);xoa();
}
/*
for(k=0;k<ms;k++)
{c1=0;d5=d21=0;delay(3);xoa();
c2=0;d5=d21=0;delay(3);xoa();
c3=0;d5=d7=d13=d19=d21=0;delay(3);xoa();
c4=0;d5=d21=0;delay(3);xoa();
c5=0;d5=d21=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d3=d23=0;delay(3);xoa();
c2=0;d3=d23=0;delay(3);xoa();
c3=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c4=0;d3=d23=0;delay(3);xoa();
c5=0;d3=d23=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d1=d25=0;delay(3);xoa();
c2=0;d1=d25=0;delay(3);xoa();
c3=0;d1=d9=d13=d17=d25=0;delay(3);xoa();
c4=0;d1=d25=0;delay(3);xoa();
c5=0;d1=d25=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d11=d15=0;delay(3);xoa();
c2=0;d11=d15=0;delay(3);xoa();
c3=0;d11=d12=d13=d14=d15=0;delay(3);xoa();
c4=0;d11=d15=0;delay(3);xoa();
c5=0;d11=d15=0;delay(3);xoa();
}
//4
for(k=0;k<ms;k++)
{c1=0;d16=d20=0;delay(3);xoa();
c2=0;d16=d20=0;delay(3);xoa();
c3=0;d16=d17=d18=d19=d20=0;delay(3);xoa();
c4=0;d16=d20=0;delay(3);xoa();
c5=0;d16=d20=0;delay(3);xoa();
}
//5
for(k=0;k<ms;k++)
{c1=0;d21=d25=0;delay(3);xoa();
c2=0;d21=d25=0;delay(3);xoa();
c3=0;d21=d22=d23=d24=d25=0;delay(3);xoa();
c4=0;d21=d25=0;delay(3);xoa();
c5=0;d21=d25=0;delay(3);xoa();
}
}}*/
/*//HIEU UNG CHAY CHU I XOAY
void CHUIXOAY(unsigned char ms,unsigned char n)
{
xoa();
//1
for(i=0;i<n;i++)
{
for(k=0;k<ms;k++)
{
c1=0;d1=d2=d3=d4=d5=0;delay(3);xoa();
c2=0;d3=0;delay(3);xoa();
c3=0;d3=0;delay(3);xoa();
c4=0;d3=0; delay(3);xoa();
c5=0;d1=d2=d3=d4=d5=0;delay(3);xoa();
}
//2
for(k=0;k<ms;k++)
{c1=0;d6=d7=d8=d9=d10=0;delay(3);xoa();
c2=0;d8=0;delay(3);xoa();
c3=0;d8=0; delay(3);xoa();
c4=0;d8=0;delay(3);xoa();
c5=0;d6=d7=d8=d9=d10=0; delay(3);xoa();
}
//3 xoay
for(k=0;k<ms;k++)
{c1=0;d11=d12=d13=d14=d15=0;delay(3);xoa();
c2=0;d13=0; delay(3);xoa();
c3=0;d13=0;delay(3);xoa();
c4=0;d13=0;delay(3);xoa();
c5=0;d11=d12=d13=d14=d15=0;delay(3);xoa();
}
/*
for(k=0;k<ms;k++)
{c1=0;d5=d7=d13=d19=d21=0;delay(3);xoa();
c2=0;d13=0; delay(3);xoa();
c3=0;d13=0;delay(3);xoa();
c4=0;d13=0;delay(3);xoa();
c5=0;d5=d7=d13=d19=d21=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c2=0;d13=0; delay(3);xoa();
c3=0;d13=0;delay(3);xoa();
c4=0;d13=0;delay(3);xoa();
c5=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d1=d9=d13=d17=d25=0;delay(3);xoa();
c2=0;d13=0; delay(3);xoa();
c3=0;d13=0;delay(3);xoa();
c4=0;d13=0;delay(3); xoa();
c5=0;d1=d9=d13=d17=d25=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d11=d12=d13=d14=d15=0;delay(3);xoa();
c2=0;d13=0; delay(3);xoa();
c3=0;d13=0;delay(3);xoa();
c4=0;d13=0;delay(3);xoa();
c5=0;d11=d12=d13=d14=d15=0;delay(3);xoa();
}
//4
for(k=0;k<ms;k++)
{c1=0;d16=d17=d18=d19=d20=0;delay(3);xoa();
c2=0;d18=0;delay(3);xoa();
c3=0;d18=0; delay(3);xoa();
c4=0;d18=0; delay(3);xoa();
c5=0;d16=d17=d18=d19=d20=0;delay(3);xoa();
}
//5
for(k=0;k<ms;k++)
{c1=0;d21=d22=d23=d24=d25=0;delay(3);xoa();
c2=0;d23=0;delay(3);xoa();
c3=0;d23=0;delay(3);xoa();
c4=0;d23=0; delay(3);xoa();
c5=0;d21=d22=d23=d24=d25=0;delay(3);xoa();
}
}
}
//CHU L XOAY
void CHULXOAY(unsigned char ms,unsigned char n)
{
xoa();
for(i=0;i<n;i++)
{
//1
for(k=0;k<ms;k++)
{
c1=0;d1=d2=d3=d4=d5=0;delay(3);xoa();
c2=0;d1=0;delay(3);xoa();
c3=0;d1=0;delay(3); xoa();
c4=0;d1=0; delay(3);xoa();
c5=0;d1=0;delay(3);xoa();
}
//2
for(k=0;k<ms;k++)
{ c1=0;d6=d7=d8=d9=d10=0;delay(3);xoa();
c2=0;d10=0;delay(3);xoa();
c3=0;d10=0;delay(3);xoa();
c4=0;d10=0;delay(3);xoa();
c5=0;d10=0;delay(3);xoa();
}
//3 xoay
for(k=0;k<ms;k++)
{
c1=0;d11=d12=d13=d14=d15=0;delay(3);xoa();
c2=0;d11=0;delay(3);xoa();
c3=0;d11=0;delay(3); xoa();
c4=0;d11=0;delay(3);xoa();
c5=0;d11=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{
c1=0;d5=d7=d13=d19=d21=0;delay(3);xoa();
c2=0;d21=0;delay(3);xoa();
c3=0;d21=0;delay(3); xoa();
c4=0;d21=0;delay(3);xoa();
c5=0;d21=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{
c1=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c2=0;d23=0;delay(3);xoa();
c3=0;d23=0;delay(3); xoa();
c4=0;d23=0;delay(3);xoa();
c5=0;d23=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{
c1=0;d1=d9=d13=d17=d25=0;delay(3);xoa();
c2=0;d25=0;delay(3);xoa();
c3=0;d25=0;delay(3); xoa();
c4=0;d25=0;delay(3);xoa();
c5=0;d25=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{
c1=0;d11=d12=d13=d14=d15=0;delay(3);xoa();
c2=0;d15=0;delay(3);xoa();
c3=0;d15=0;delay(3); xoa();
c4=0;d15=0;delay(3);xoa();
c5=0;d15=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{
c1=0;d5=d7=d13=d19=d21=0;delay(3);xoa();
c2=0;d5=0;delay(3);xoa();
c3=0;d5=0;delay(3); xoa();
c4=0;d5=0;delay(3);xoa();
c5=0;d5=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{
c1=0;d3=d8=d13=d18=d23=0;delay(3);xoa();
c2=0;d3=0;delay(3);xoa();
c3=0;d3=0;delay(3); xoa();
c4=0;d3=0;delay(3);xoa();
c5=0;d3=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{
c1=0;d1=d9=d13=d17=d25=0;delay(3);xoa();
c2=0;d1=0;delay(3);xoa();
c3=0;d1=0;delay(3); xoa();
c4=0;d1=0;delay(3);xoa();
c5=0;d1=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{
c1=0;d11=d12=d13=d14=d15=0;delay(3);xoa();
c2=0;d11=0;delay(3);xoa();
c3=0;d11=0;delay(3); xoa();
c4=0;d11=0;delay(3);xoa();
c5=0;d11=0;delay(3);xoa();
}
//4
for(k=0;k<ms;k++)
{
c1=0;d16=d17=d18=d19=d20=0;delay(3);xoa();
c2=0;d20=0;delay(3);xoa();
c3=0;d20=0;delay(3); xoa();
c4=0;d20=0;delay(3);xoa();
c5=0;d20=0; delay(3); xoa();
}
//5
for(k=0;k<ms;k++)
{
c1=0;d21=d22=d23=d24=d25=0;delay(3);xoa();
c2=0;d21=0;delay(3);xoa();
c3=0;d21=0;delay(3); xoa();
c4=0;d21=0;delay(3);xoa();
c5=0;d21=0;delay(3);xoa();
}}} */
//HIEU UNG TRAI TIM
void traitim(unsigned char ms,unsigned char n)
{
xoa();
for(i=0;i<n;i++)
{
//1
for(k=0;k<ms;k++)
{c1=0;d3=0;delay(3);xoa();
c2=0;d2=d4=0;delay(3);xoa();
c3=0;d1=d5=0;delay(3);xoa();
c4=0;d1=d3=d5=0;delay(3);xoa();
c5=0;d2=d4=0;delay(3);xoa();
}
//2
for(k=0;k<ms;k++)
{c1=0;d8=0;delay(3);xoa();
c2=0;d7=d9=0;delay(3);xoa();
c3=0;d6=d10=0;delay(3);xoa();
c4=0;d10=d8=d6=0;delay(3);xoa();
c5=0;d7=d9=0;delay(3);xoa();
}
//3 XOAY
for(k=0;k<ms;k++)
{c1=0;d13=0;delay(3);xoa();
c2=0;d12=d14=0;delay(3);xoa();
c3=0;d11=d15=0;delay(3);xoa();
c4=0;d11=d15=d13=0;delay(3);xoa();
c5=0;d12=d14=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d13=0;delay(3);xoa();
c2=0;d7=d19=0;delay(3);xoa();
c3=0;d5=d21=0;delay(3);xoa();
c4=0;d5=d21=d13=0;delay(3);xoa();
c5=0;d7=d19=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d13=0;delay(3);xoa();
c2=0;d8=d18=0;delay(3);xoa();
c3=0;d3=d23=0;delay(3);xoa();
c4=0;d3=d23=d13=0;delay(3);xoa();
c5=0;d8=d18=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d13=0;delay(3);xoa();
c2=0;d9=d17=0;delay(3);xoa();
c3=0;d1=d25=0;delay(3);xoa();
c4=0;d1=d13=d25=0;delay(3);xoa();
c5=0;d9=d17=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d13=0;delay(3);xoa();
c2=0;d12=d14=0;delay(3);xoa();
c3=0;d11=d15=0;delay(3);xoa();
c4=0;d11=d15=d13=0;delay(3);xoa();
c5=0;d12=d14=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d13=0;delay(3);xoa();
c2=0;d7=d19=0;delay(3);xoa();
c3=0;d5=d21=0;delay(3);xoa();
c4=0;d5=d21=d13=0;delay(3);xoa();
c5=0;d7=d19=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d13=0;delay(3);xoa();
c2=0;d8=d18=0;delay(3);xoa();
c3=0;d3=d23=0;delay(3);xoa();
c4=0;d3=d23=d13=0;delay(3);xoa();
c5=0;d8=d18=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d13=0;delay(3);xoa();
c2=0;d9=d17=0;delay(3);xoa();
c3=0;d1=d25=0;delay(3);xoa();
c4=0;d1=d13=d25=0;delay(3);xoa();
c5=0;d9=d17=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{c1=0;d13=0;delay(3);xoa();
c2=0;d12=d14=0;delay(3);xoa();
c3=0;d11=d15=0;delay(3);xoa();
c4=0;d11=d15=d13=0;delay(3);xoa();
c5=0;d12=d14=0;delay(3);xoa();
}
//4
for(k=0;k<ms;k++)
{c1=0;d18=0;delay(3);xoa();
c2=0;d17=d19=0;delay(3);xoa();
c3=0;d16=d20=0;delay(3);xoa();
c4=0;d16=d18=d20=0;delay(3);xoa();
c5=0;d17=d19=0;delay(3);xoa();
}
//5
for(k=0;k<ms;k++)
{c1=0;d23=0;delay(3);xoa();
c2=0;d22=d24=0;delay(3);xoa();
c3=0;d21=d25=0;delay(3);xoa();
c4=0;d21=d23=d25=0;delay(3);xoa();
c5=0;d22=d24=0;delay(3);xoa();
}
}}
//HIEU UNG PHAO HOA
void PHAOHOA(unsigned char ms,unsigned char n)
{P0=0xff;
for(i=0;i<n;i++)
{
{d13=0;
{c1=0;delay(ms);c2=0;delay(ms);c3=0;delay(ms);c4=0 ;delay(ms);}xoa();
d1=d2=d3=d4=d5=d6=d7=d8=d9=d10=d11=d12=d13=d14=d15 =d16=d17=d18=d19=d20=d21=d22=d23=d24=d25=0;
c5=0;delay(500);xoa();
for(k=0;k<ms;k++)
{c3=0;d13=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{
c2=c3=c4=0;d9=d8=d7=d14=d18=d17=d19=d12=0;delay(3) ;xoa();
}
for(k=0;k<ms;k++)
{
c1=c3=c5=0; d1=d3=d5=d15=d25=d23=d21=d11=d13=0;delay(3);xoa();
}
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;
c5=0;delay(200);
c4=0;delay(300);
c3=0;delay(400);
c2=0;delay(500);
c1=0;delay(600);}xoa();
{ d13=0;
{c1=0;delay(ms);c2=0;delay(ms);c3=0;delay(ms);c4=0 ;delay(ms);}xoa();
d1=d2=d3=d4=d5=d6=d7=d8=d9=d10=d11=d12=d13=d14=d15 =d16=d17=d18=d19=d20=d21=d22=d23=d24=d25=0;
c5=0;delay(500);xoa();
for(k=0;k<ms;k++)
{c3=0;d13=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{
c2=c3=c4=0;d9=d8=d7=d14=d18=d17=d19=d12=0;delay(3) ;xoa();
}
for(k=0;k<ms;k++)
{
c1=c3=c5=0; d1=d3=d5=d15=d25=d23=d21=d11=d13=0;delay(3);xoa();
}
d2=d4=d6=d8=d10=d12=d14=d16=d18=d20=d22=d24=0;
c5=0;delay(200);
c4=0;delay(300);
c3=0;delay(400);
c2=0;delay(500);
c1=0;delay(600);}xoa();
}}
//HIEU UNG NO
void NO(unsigned char ms,unsigned char n)
{P1=P2=P3=0xff;
for(i=0;i<n;i++)
{
for(k=0;k<ms;k++)
{c3=0;d13=0;delay(3);xoa();
}
for(k=0;k<ms;k++)
{
c2=c3=c4=0;d9=d8=d7=d14=d18=d17=d19=d12=0;delay(3) ;xoa();
}
for(k=0;k<ms;k++)
{
c1=c3=c5=0; d1=d3=d5=d15=d25=d23=d21=d11=d13=0;delay(3);xoa();
}
}}
/* //HIEU UNG DIEM
void DIEM(unsigned char ms,unsigned char n)
{P0=0xff;
for(i=0;i<n;i++)
{
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 1=0;delay(ms);xoa();
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 2=0;delay(ms);xoa();
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 3=0;delay(ms);xoa();
d1=d3=d5=d7=d8=d9=d11=d13=d15=d17=d19=d21=d23=d25= 0;c4=0;delay(ms);xoa();
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 5=0;delay(700);
}
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 5=0;delay(700);
for(i=0;i<n;i++)
{
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 1=0;delay(ms);xoa();
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 2=0;delay(ms);xoa();
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 3=0;delay(ms);xoa();
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 4=0;delay(ms);xoa();
}
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 5=c4=0;delay(700);
for(i=0;i<n;i++)
{
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 1=0;delay(ms);xoa();
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 2=0;delay(ms);xoa();
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 3=0;delay(ms);xoa();
}
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 5=c4=c3=0;delay(700);
for(i=0;i<n;i++)
{
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 1=0;delay(ms);xoa();
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 2=0;delay(ms);xoa();
}
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 5=c4=c3=c2=0;delay(700);
for(i=0;i<n;i++)
{
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 1=0;delay(ms);xoa();
}
d1=d3=d5=d7=d9=d11=d13=d15=d17=d19=d21=d23=d25=0;c 5=c4=c3=c2=c1=0;delay(700);
}
*/
// HIEU UNG MUA
void MUA(unsigned char ms, unsigned char n)
{
P0=0xff;
for(i=0;i<n;i++)
{
{d1=d5=d3=d12=d11=d22=d15=d18=d20=0;c5=0;delay(100 );c4=0;delay(150);c3=0;delay(200);c2=0;delay(250); c1=0;delay(300);}xoa();
{d5=d2=d4=d10=d17=d7=d9=d16=d6=0;c5=0;delay(100);c 4=0;delay(150);c3=0;delay(200);c2=0;delay(250);c1= 0;delay(300);}xoa();
{d2=d2=d4=d5=d14=d10=d24=d21=0;c5=0;delay(100);c4= 0;delay(150);c3=0;delay(200);c2=0;delay(250);c1=0; delay(300);}xoa();
{d2=d17=d18=d2=d3=d11=d17=d23=d25=d8=d19=0;c5=0;de lay(100);c4=0;delay(150);c3=0;delay(200);c2=0;dela y(250);c1=0;delay(300);}xoa();
}}
//============================== HAM CHINH ==================================
void main(void)
{
while(1)
{
xoa();
NO(300,2);
SONGNGANG(10,2);
SONGDOC(50,2);
SONGDUNG(400,2);
// DIEM(400,2);
NHAY(500,2);
XOAYNGANG(25,2);
XOAYDOC(400,2);
KHOIVUONG(400,2);
chayvong(300,1);
trongrangoai(300,1);
chayvong(300,1);
trongrangoai(300,1);
BUNGRA(400,2);
LENXUONG(400,1);
LENXUONG(400,1);
sang(400,2);
/*CHUB(15,1);
CHUF(15,1);
CHUF(15,1);
*/
bungvuong(400,1);
bungvuong(400,1);
xep(400,2);
don(400,1);
don(400,1);
/*CHUDXOAY(15,1);
CHUAXOAY(15,1);
CHUNXOAY(15,1);
CHUHXOAY(15,1);*/
//CHUIXOAY(15,1);
// CHULXOAY(15,1);
traitim(15,2);
PHAOHOA(300,2);
MUA(400,2);
} }
CODE NÀY NÈ MỌI NGỪ!! MỌI NGỪ XEM GIUP NHA!!THANK NHIỀU
Comment
-
1. vs code dài thế này thì nên bỏ vào file đính kèm, kéo mỏi tay mới thấy
2. cái dung lượng mà nhìn thấy trên máy tính ko phải dung lượng nạp vào IC
3. code nặng vs nhẹ như trên đã biên dịch đc là chạy, khả năng cậu đã xóa mất cái j đó
p/s: cái này hình như là code cubeWebsite chính thức đổi địa chỉ website thành
Mời các bạn ghé thăm !!!
Comment
-
nếu bạn dùng keil c thì khi biên dịch nó có báo dung lượng chương trình thực thi đó bạn
còn file.hex nó bao gồm cả dung lượng file máy và dung lượng chương trình thực thi
con 89c51 thì có 8k bộ nhớ thực thi chương trình và 64k bộ nhớ lưu file máy (file.hex)
nói không sợ bạn không hiểu tui đưa hình cho bạn xemLast edited by ozonedark2; 08-07-2012, 11:44.|
Comment
-
nếu code thực thi vượt quá thì bạn có thể dùng thêm ram ngoài hoặc dùng con vdk có dung lượng lớn hơn như 89c53 dung lượng thực thi tới 14k tha hồ|
Comment
-
tuỳ vào chương trình thực thi của bạn có dung lượng bao nhiêu mà dùng thôi. chúc bạn thành công.|
Comment
-
Code của bác mình built ra thì là 8069 byte, nạp vào 89S52 ok, nhưng mô phỏng ko thấy chân nào nhấp nháy cả, có lẽ do code có vấn đềNguyên văn bởi quangbuu Xem bài viếtCho hỏi là tại sao khi ta đỏ chương trình cho keil c (file hex dung lượng 30kb) nó không báo tràn bộ nhớ nhưng mà bỏ ic 89s52 vào lại không chạy??? Nhưng dung lượng file hex khoảng 20kb thì chạyLast edited by nguyen24; 09-07-2012, 12:03.- Mạch nạp vdk 8051, AVR, PIC, EEPROM
- Linh kiện điện tử cho sinh viên
Comment
-
bạn nạp vào con 89s52 thực tế chưaNguyên văn bởi nguyen24 Xem bài viếtCode của bác mình built ra thì là 8069 byte, nạp vào 89S52 ok, nhưng mô phỏng ko thấy chân nào nhấp nháy cả, có lẽ do code có vấn đề|
Comment
-
Build target 'Target 1'
linking...
Program Size: data=18.0 xdata=0 code=8098
creating hex file from "NEW"...
"NEW" - 0 Error(s), 0 Warning(s).
nó báo như thế này nè, làm sao đổ vào 89s52 khi gắn vào phần cứng đẻ nó chạy thì nó đơ!!!>??? ai giúp cảm ơn nhiều
Comment
-
vấn đề như thế nào vậy bạn??Nguyên văn bởi nguyen24 Xem bài viếtCode của bác mình built ra thì là 8069 byte, nạp vào 89S52 ok, nhưng mô phỏng ko thấy chân nào nhấp nháy cả, có lẽ do code có vấn đề
khi biên dịch nó không báo lỗi mà
Comment
-
mình nạp rồi , nhưng khi nhiều hơn thì nó đơ,Nguyên văn bởi ozonedark2 Xem bài viếtbạn nạp vào con 89s52 thực tế chưa
Comment
dự án của bạn Tra theo mã, xem datasheet và đặt hàng trực tuyến. MicrochipROHMEpsonTaejin
Đặt hàng & tư vấn
Hà Nội024.3640 8561
TP.HCM028.3811 9870
Quét mã hoặc bấm để chat Zalo với R&PChat Zalo
Quét mã hoặc bấm để chat Zalo với R&PChat Zalo
Bài viết mới nhất
Collapse
-
Trả lời cho Tìm bạn thân quen cũ.bởi thuaimiVẫn nhớ và kính trọng Bác cũng các cao nhân trên dientuvietnam.net. Tính từ ngày tham gia trên này cũng đã hơn 20 năm rồi. Quá nhiều thay đổi cả trong công việc và cuộc sống. Nhưng được thấy lại các nick cũ vẫn sáng đèn là thấy vui rồi....-
Channel: Tâm tình dân kỹ thuật
Hôm qua, 16:33 -
-
Trả lời cho Tìm bạn thân quen cũ.bởi nhathung1101Còn sống không lão??? Mất một thời gian chữa bệnh nên quên hỏi thăm.......
-
Channel: Tâm tình dân kỹ thuật
25-10-2026, 03:09 -
-
Trả lời cho Công suất truyền qua lõi máy biến ápbởi nhathung1101Thời buổi năng lượng xanh, nhất là xanh cả mặt... Thì Điện mặt giời, điện gió, sẽ lên ngôi.
Nếu không nắm bắt được cái cơ bản đó thì đi làm coder à? Mà coder giờ thất nghiệp cả lũ vì AI rồi!!!









...
-
Channel: Điện tử công suất
25-10-2026, 03:03 -
-
Trả lời cho Công suất truyền qua lõi máy biến ápbởi quangdonguehChà, lâu lắm rồi nhưng diễn đàn vẫn còn những chủ đề cốt lõi của điện tử công suất...-
Channel: Điện tử công suất
24-10-2026, 07:53 -
-
bởi bqvietNếu muốn tăng công suất cần tăng con chip và tăng biến áp lên lớn hơn. Thiết kế ban đầu dùng TNY25x và biến áp EE16 hoặc EE13. Tăng con chip lên TNY268 vẫn mạch nguyên lý đó và biến áp lên EE19 sẽ nâng công suất ra thêm nhiều. Tăng tối đa...-
Channel: Điện tử công suất
24-10-2026, 02:14 -
-
bởi Nexus 6PMạch này chỉ chạy cho LED 10W trở xuống, còn muốn chạy Led công suất cao thì sao bác thớt ơi?-
Channel: Điện tử công suất
22-10-2026, 14:33 -
-
bởi Nexus 6PMạch này chỉ chạy cho LED 10W trở xuống, còn muốn chạy Led công suất cao thì sao bác thớt ơi?-
Channel: Điện tử công suất
22-10-2026, 10:49 -
-
Trả lời cho Tìm VR 5 chânbởi dinhthuong80Cảm ơn bác bqviet . Nhưng hình như các VR 5 chân của linhkienchatluong là loại có 2 chân là công tắc đóng mở. Thấy trên Shopee có chỗ bán linh kiện đàn Organ, mà không biết đúng loại không, với lại sao ... mắc dữ dội luôn ấy!!!
...-
Channel: Hướng dẫn tìm thông tin linh kiện
19-10-2026, 11:30 -
-
Trả lời cho Tìm VR 5 chânbởi bqvietTrang sản phẩm này có loại 5 chân và 8 chân
https://linhkienchatluong.vn/chiet-a...doi_s1595.aspx
Ngoài ra một trang cùng cấp với nó có loại 6 chân nữa, chắc đủ cho người muốn tìm....-
Channel: Hướng dẫn tìm thông tin linh kiện
17-10-2026, 17:19 -
Comment