標(biāo)題: 小蠻腰 led廣州塔diy程序 [打印本頁(yè)]
作者: 靜靜8    時(shí)間: 2016-8-14 21:07
標(biāo)題: 小蠻腰 led廣州塔diy程序

廣州 塔diy程序，效果詳見(jiàn)：http://www.torrancerestoration.com/bbs/dpj-48911-1.html

  1. /********************************************************/
  2. /****** 名稱：廣州塔          ***************************/
  3. /****** 編寫(xiě)：憂傷的季節(jié)      ***************************/
  4. /****** 時(shí)間：2014年12月01日  ***************************/
  5. /********************************************************/
  6. #include<reg52.h>
  7. #include<STC12C5A60S2.H>
  8. #define uchar unsigned char
  9. #define uint unsigned int
  10. uchar i,k,a;
  11. uint cy,cy1,pw;
  12. uchar code table[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};// 一個(gè)燈順時(shí)針流水
  13. uchar code table1[]={0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe};// 一個(gè)燈順時(shí)針流水
  14. uchar code table2[]={0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01};
  15. uchar code table3[]={0x00,0x80,0xc0,0xe0,0xf0,0xf8,0xfc,0xfe};
  16. uchar code table4[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};
  17. uchar code table5[]={0x00,0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f};
  18. uchar code table6[]={0x7f,0x3f,0x1f,0x0f,0x07,0x03,0x01,0x00};
  19. uchar code table7[]={0xfe,0xfc,0xf8,0xf0,0xe0,0xc0,0x80,0x00};
  20. uchar code table8[]={0x55,0xaa};
  21. uchar code table9[]={0x80,0xc0,0xe0,0xf0,0xf8,0xfc,0xfe,0xff};
  22. uchar code table10[]={0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f,0xff};
  23. void delay1(uint z)
  24. {
  25.   uint x,y;
  26.   for(x=250;x>0;x--)
  27.     for(y=z;y>0;y--);
  28. }
  29. void delay2(uint x)
  30. {
  31.   uint a,b;
  32.   for(a=x;a>0;a--)
  33.    for(b=5;b>0;b--);
  34. }
  35. /******************兩層向上*********************/
  36. void yiceng()
  37. {
  38.   for(k=0;k<8;k++){P3=table[k];P2=table[k];delay1(200);}
  39. }
  40. /******************兩層向下*********************/
  41. void yiceng1()
  42. {
  43.   for(k=0;k<8;k++){P3=table1[k];P2=table1[k];delay1(200);}
  44. }
  45. /******************兩條單個(gè)順時(shí)針滴水*********************/
  46. void dishushun()
  47. {
  48.   for(i=0;i<8;i++)
  49.   {
  50.   P1=table4[i];
  51.   P0=table2[i];
  52.   for(k=0;k<8;k++){P2=table1[k];delay1(5);}P2=0xff;
  53.   for(k=0;k<8;k++){P3=table1[k];delay1(5);}P3=0xff;
  54.   }
  55. }
  56. /******************兩條單個(gè)逆時(shí)針滴水*********************/
  57. void dishuni()
  58. {
  59.   for(i=0;i<8;i++)
  60.   {
  61.   P1=table2[i];
  62.   P0=table4[i];
  63.   for(k=0;k<8;k++){P2=table1[k];delay1(5);}P2=0xff;
  64.   for(k=0;k<8;k++){P3=table1[k];delay1(5);}P3=0xff;
  65.   }
  66. }
  67. /******************滴水下*********************/
  68. void liangdix()
  69. {
  70.   for(i=0;i<8;i++)
  71.   {
  72.   P1=table2[i];
  73.   P0=table4[i];
  74.   for(k=0;k<8;k++){P2=table1[k];delay1(50);}P2=0xff;
  75.   for(k=0;k<8;k++){P3=table1[k];delay1(50);}P3=0xff;
  76.   }
  77. }
  78. /******************滴水上*********************/
  79. void liangdis()
  80. {
  81.   for(i=0;i<8;i++)
  82.   {
  83.   P1=table4[i];
  84.   P0=table2[i];
  85.   for(k=0;k<8;k++){P2=table[k];delay1(50);}P2=0xff;
  86.   for(k=0;k<8;k++){P3=table[k];delay1(50);}P3=0xff;
  87.   }
  88. }
  89. /******************兩層從中間向上下拉伸*********************/
  90. void sxl()
  91. {
  92.   P1=0xff;
  93.   P0=0xff;
  94.   for(k=0;k<8;k++){P3=table4[k];P2=table4[k];delay1(200);}
  95. }
  96. /******************兩層從頂向下拉伸*********************/
  97. void sxl1()
  98. {
  99.   P1=0xff;
  100.   P0=0xff;
  101.   for(k=0;k<8;k++){P3=table6[k];P2=table6[k];delay1(400);}
  102. }
  103. /******************兩層從中間向上下拉伸*********************/
  104. void sxls()
  105. {
  106.   P1=0xff;
  107.   P0=0xff;
  108.   for(k=0;k<8;k++){P3=table6[k];P2=table7[k];delay1(200);}
  109. }
  110. /******************單層從底向上旋轉(zhuǎn)*********************/
  111. void danxuan()
  112. {  P2=0xff;P3=0xff;
  113.   for(i=0;i<8;i++)
  114.   {
  115.   P1=0x00;P0=0x00;
  116.   P3=table[i];
  117.   for(k=0;k<8;k++){P0=table5[k];delay1(200);}
  118.   for(k=0;k<8;k++){P1=table3[k];delay1(200);}
  119.   }P3=0xff;
  120. for(i=0;i<8;i++)
  121.   {
  122.   P1=0x00;P0=0x00;
  123.   P2=table[i];
  124.   for(k=0;k<8;k++){P0=table5[k];delay1(200);}
  125.   for(k=0;k<8;k++){P1=table3[k];delay1(200);}
  126.   }P2=0xff;
  127. }
  128. /******************單層從頂向上旋轉(zhuǎn)*********************/
  129. void danxuand()
  130. {  P2=0xff;P3=0xff;
  131. for(i=0;i<8;i++)
  132.   {
  133.   P1=0x00;P0=0x00;
  134.   P2=table1[i];
  135.   for(k=0;k<8;k++){P0=table5[k];delay1(200);}
  136.   for(k=0;k<8;k++){P1=table3[k];delay1(200);}
  137.   }P2=0xff;
  138.   for(i=0;i<8;i++)
  139.   {
  140.   P1=0x00;P0=0x00;
  141.   P3=table1[i];
  142.   for(k=0;k<8;k++){P0=table5[k];delay1(200);}
  143.   for(k=0;k<8;k++){P1=table3[k];delay1(200);}
  144.   }P3=0xff;
  145. }
  146. /******************兩層豎立向圓順時(shí)針合圍*********************/
  147. void shw()
  148. {
  149.   P2=0x00;P3=0x00;
  150.   for(k=0;k<8;k++){P0=table5[k];P1=table3[k];delay1(700);}
  151. }
  152. /******************兩層豎立向圓順時(shí)針回收*********************/
  153. void shw1()
  154. {
  155.   P2=0x00;P3=0x00;
  156.   for(k=0;k<8;k++){P0=table6[k];P1=table7[k];delay1(700);}
  157. }
  158. /******************兩層豎立向圓逆時(shí)針回收*********************/
  159. void shw3()
  160. {
  161.   P2=0x00;P3=0x00;
  162.   for(k=0;k<8;k++){P0=table7[k];P1=table6[k];delay1(700);}
  163. }
  164. /******************兩層豎立向圓逆時(shí)針合圍*********************/
  165. void shw2()
  166. {
  167.   P2=0x00;P3=0x00;
  168.   for(k=0;k<8;k++){P0=table9[k];P1=table10[k];delay1(700);}
  169. }
  170. /******************四條單個(gè)順時(shí)針滴水閃*********************/
  171. void sidisun()
  172. {
  173.   for(i=0;i<2;i++)
  174.   {
  175.   P1=table8[i];
  176.   P0=table8[i];
  177.   for(k=0;k<8;k++){P2=table1[k];delay1(50);}P2=0xff;
  178.   for(k=0;k<8;k++){P3=table1[k];delay1(50);}P3=0xff;delay1(700);
  179.   }
  180. }
  181. /******************四條單個(gè)順時(shí)針滴水閃*********************/
  182. void sidisun1()
  183. {
  184.   for(i=0;i<2;i++)
  185.   {
  186.   P1=table8[i];
  187.   P0=table8[i];
  188.   for(k=0;k<8;k++){P2=table1[k];delay1(50);}P2=0xff;
  189.   for(k=0;k<8;k++){P3=table1[k];delay1(50);}P3=0xff;
  190.   }
  191. }
  192. /******************四條單個(gè)順時(shí)針滴水轉(zhuǎn)*********************/
  193. void sisunz()
  194. { P2=0x00;
  195.   P3=0x00;
  196.   for(i=0;i<2;i++)
  197.   {
  198.   P1=table8[i];
  199.   P0=table8[i];
  200.   delay1(1000);
  201.   }
  202. }
  203. /******************呼吸燈*********************/
  204. void hxd()
  205. {
  206. P0=0xff;P1=0xff;
  207. for(pw=1;pw<cy1;pw++)
  208. {
  209.    P2=0x55;P3=0x55;delay2(pw);
  210.    P2=0xff;P3=0xff;delay2(cy1-pw);         
  211. }
  212. for(pw=1;pw<cy1;pw++)
  213. {
  214.    P2=0xaa;P3=0xaa;delay2(pw);
  215.    P2=0xff;P3=0xff;delay2(cy1-pw);         
  216. }
  217. }
  218. /******************半層呼吸燈*********************/
  219. void bhxd()
  220. {
  221. P0=0xff;P1=0xff;
  222. for(pw=1;pw<cy;pw++)
  223. {
  224.    P2=0x00;P3=0xff;delay2(pw);
  225.    P2=0xff;P3=0x00;delay2(cy-pw);         
  226. }
  227. }
  228. /******************四滴下閃*********************/
  229. void sxs()
  230. {
  231.   P1=0x55;
  232.   P0=0x55;
  233.   for(k=0;k<8;k++){P2=table1[k];delay1(500);}P2=0xff;
  234.   for(k=0;k<8;k++){P3=table1[k];delay1(500);}P3=0xff;
  235. }
  236. /******************四滴上閃*********************/
  237. void sxss()
  238. {
  239.   P1=0xaa;
  240.   P0=0xaa;
  241.   for(k=0;k<8;k++){P3=table[k];delay1(500);}P2=0xff;
  242.   for(k=0;k<8;k++){P2=table[k];delay1(500);}P3=0xff;
  243. }
  244. void main()
  245. {
  246. cy=2000,cy1=1200,pw=1;
  247. while(1)
  248. {

  250.   bhxd();//半層呼吸
  251.   for(a=0;a<5;a++){P0=0xff;P1=0xff;yiceng();}//兩層上跳動(dòng)
  252.   for(a=0;a<5;a++){P0=0xff;P1=0xff;yiceng1();}//兩層下跳動(dòng)
  253.   for(a=0;a<5;a++){P0=0xff;P1=0xff;yiceng();yiceng1();}//兩層上下跳動(dòng)
  254.   for(a=0;a<8;a++){dishushun();}   //兩條單個(gè)順時(shí)針滴水
  255.   for(a=0;a<8;a++){dishuni();}           //兩條單個(gè)逆時(shí)針滴水
  256.   for(a=0;a<5;a++){dishushun();dishuni();}//兩條單個(gè)順時(shí)+逆時(shí)針滴水
  257.   for(a=0;a<5;a++){liangdix();}//兩滴掉下
  258.   for(a=0;a<5;a++){liangdis();}//兩滴掉上
  259.   for(a=0;a<5;a++){sxl();}
  260.   for(a=0;a<4;a++){sidisun();}
  261.   for(a=0;a<2;a++){hxd();}//呼吸燈
  262.   for(a=0;a<2;a++){shw();shw2();}//兩層豎立向圓順+逆時(shí)針合圍
  263.   for(a=0;a<2;a++){shw1();shw3();}//兩層豎立向圓順+逆時(shí)針回收
  264.   for(a=0;a<4;a++){sxl1();}//兩層從頂向下拉伸
  265.   for(a=0;a<5;a++){sxls();}//兩層從中間向上下拉伸
  266.   for(a=0;a<4;a++){sisunz();}
  267.   danxuan();//單層從底向上旋轉(zhuǎn)
  268.   danxuand();//單層從頂向下旋轉(zhuǎn)
  269.   for(a=0;a<3;a++){shw();} //兩層豎立向圓順時(shí)針合圍
  270.   for(a=0;a<3;a++){shw2();}//兩層豎立向圓逆時(shí)針合圍
  271.   for(a=0;a<2;a++){shw1();}//兩層豎立向圓順時(shí)針回收
  272.   for(a=0;a<2;a++){shw3();}//兩層豎立向圓逆時(shí)針回收
  273.   for(a=0;a<4;a++){sidisun1();}
  274.   sxs();//四滴下閃
  275.   sxss();//四滴上閃
  276. }                                                  
  277. }
  278. /********************* the end******************************/
復(fù)制代碼


廣州塔程序.rar

34.61 KB, 下載次數(shù): 170, 下載積分: 黑幣 -5

作者: Free_Electron    時(shí)間: 2016-8-21 19:46
厲害，太棒了
作者: nihua    時(shí)間: 2016-8-24 23:07
好強(qiáng)大，我是菜鳥(niǎo)，正在發(fā)奮中
作者: nihua    時(shí)間: 2016-8-24 23:08
學(xué)習(xí)了，強(qiáng)大
作者: ssli    時(shí)間: 2016-8-25 11:01
這個(gè)具體是怎么焊的
作者: super丿    時(shí)間: 2016-9-23 19:40
太棒了
作者: 543283    時(shí)間: 2016-10-25 23:42
有原理圖不
作者: gxzhi    時(shí)間: 2016-10-28 00:20
厲害厲害
作者: 風(fēng)影_    時(shí)間: 2016-10-28 20:38
666,學(xué)習(xí)了，不錯(cuò)
作者: 路人甲111    時(shí)間: 2016-11-16 15:11
厲害了
作者: mige_1    時(shí)間: 2016-11-21 13:44
請(qǐng)問(wèn)有原理圖可以參考一下嗎，樓主
作者: mige_1    時(shí)間: 2016-11-21 13:45
請(qǐng)問(wèn)有原理圖可以參考一下嗎，樓主，謝謝了
作者: lmwd    時(shí)間: 2016-11-22 01:14
學(xué)習(xí)了，強(qiáng)大
作者: Y!NG    時(shí)間: 2016-11-22 09:33
怎么焊接的呢
作者: 410034611    時(shí)間: 2017-3-11 16:59
我也做了一個(gè)了
作者: blackwho    時(shí)間: 2017-5-9 09:34
厲害，太棒了
作者: Amikye    時(shí)間: 2017-6-12 22:03
厲害厲害
作者: wangtaowow    時(shí)間: 2017-11-6 22:39
這個(gè)好玩  找了好久
作者: wangtaowow    時(shí)間: 2017-11-6 22:39
這個(gè)好玩  找了好久
作者: wangtaowow    時(shí)間: 2017-11-6 22:48
厲害了我的原始人
作者: 一個(gè)人丶一座城    時(shí)間: 2017-11-16 09:58
厲害了  
作者: 1156479136    時(shí)間: 2017-11-16 11:19
學(xué)習(xí)下，太好了
作者: jqx    時(shí)間: 2017-11-27 23:50
Free_Electron 發(fā)表于 2016-8-21 19:46
厲害，太棒了

這個(gè)代碼可以？
作者: vnbo    時(shí)間: 2017-11-29 10:34
我現(xiàn)在正在研究888過(guò)來(lái)參觀參觀
作者: LED廣州塔    時(shí)間: 2018-2-10 19:37
很好
作者: 瑪麗蓮萌鹿953    時(shí)間: 2018-6-3 13:09
這個(gè)是代碼嗎有沒(méi)有原理圖什么的哦 樓主
作者: csb12345csb1    時(shí)間: 2018-9-15 10:24
學(xué)習(xí)下，太好了
作者: 新手練習(xí)    時(shí)間: 2018-10-27 17:03
贊一個(gè)
作者: 新手練習(xí)    時(shí)間: 2018-10-27 17:05
還在研究中
作者: hfei    時(shí)間: 2018-11-25 18:12
學(xué)習(xí)中，有空玩玩，多謝了！
作者: 假如遇到JQ    時(shí)間: 2019-1-15 09:19
真的很好。
作者: 李健成    時(shí)間: 2019-4-29 18:27
ssli 發(fā)表于 2016-8-25 11:01
這個(gè)具體是怎么焊的

用烙鐵焊



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1