点阵礼花程序

sky-Hawk where

点阵礼花程序                   就是看着好玩

1. #include<reg52.h>
   
2. 　　#include<intrins.h>
   
3. 　　#define uint unsigned int
   
4. 　　#define uchar unsigned char
   
5. 　　unsigned char code tabP0[6][8]={{0x00,0x00,0x00,0x00,0x08,0x00,0x00,0x00},{0x00,0x00,0x00,0x18,0x18,0x00,0x00,0x00},{0x00,0x00,0x10,0x38,0x38,0x10,0x00,0x00},{0x00,0x00,0x38,0x7C,0x7C,0x38,0x00,0x00},{0x00,0x38,0x7C,0x7C,0x7C,0x7C,0x38,0x00},{0x3C,0x7E,0xFF,0xFF,0xFF,0xFF,0x7E,0x3C}};
   
6. 　　unsigned char code tabP2[]={0x7F,0xBF,0xDF,0xEF,0xF7,0xFB,0xFD,0xFE};
   
7. 　　void delay(uint z)
   
8. 　　{
   
9. 　　uchar x,y;
   
10. 　　for(x=z;x>0;x--)
    
11. 　　for(y=110;y>0;y--);
    
12. 　　}
    
13. 　　void main()
    
14. 　　{
    
15. 　　int i,j,k;
    
16. 　　while(1)
    
17. 　　{
    
18. 　　for(j=0;j<6;j++)
    
19. 　　{
    
20. 　　for(k=0;k<25;k++)
    
21. 　　{
    
22. 　　for(i=0;i<8;i++)
    
23. 　　{
    
24. 　　P0=0;
    
25. 　　P2=tabP2;
    
26. 　　P0=tabP0[j];
    
27. 　　delay(2);
    
28. 　　}
    
29. 　　}
    
30. 　　}
    
31. 　　}
    
32. 　　}

复制代码

sky-Hawk where

你都不用睡觉的吗？

sky-Hawk where

dlyt03 发表于 2013-1-11 08:46
闭着眼发的

昨晚上失眠了        

sky-Hawk where

┗SKY┛ 发表于 2013-1-11 09:53
昨晚上失眠了

楼长真乃高人一直！

sky-Hawk where

kk5290122 发表于 2013-1-11 13:07
楼长真乃高人一直！

一直失眠多梦      

sky-Hawk where

出来是什么效果啊？

sky-Hawk where

mcp2013 发表于 2013-1-11 16:52
出来是什么效果啊？

像水波的那种

sky-Hawk where

大哥，怎么没有硬件图啊？

sky-Hawk where

如果有硬件图和效果图就更好了{:soso_e113:}

sky-Hawk where

手头有个16*64的单色点阵，不知可以测试不？P0 P2的接线如何？能否放上硬件接线图？