极客工坊

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 28273|回复: 7

【展示】Arduino 8*8点阵控制

[复制链接]
发表于 2013-6-10 11:53:48 | 显示全部楼层 |阅读模式
先来个图
视频在此!:

Arduino代码:
  1. //LEDs Pins Option
  2. const int leds[8] = {6, 7, 8, 9, 10, 11, 12, 13};
  3. const int gnds[8] = {14, 15, 16, 17, 5, 4, 3, 2};

  4. const int rxled = 19;

  5. int Status[8][8] =
  6. {
  7.     {'0', '0', '0', '0', '0', '0', '0', '0'},
  8.     {'1', '0', '0', '1', '0', '1', '1', '0'},
  9.     {'1', '1', '0', '1', '1', '0', '0', '1'},
  10.     {'1', '0', '1', '1', '1', '0', '0', '1'},
  11.     {'1', '0', '0', '1', '0', '1', '1', '0'},
  12.     {'0', '0', '0', '0', '0', '0', '0', '0'},
  13.     {'1', '1', '1', '1', '1', '1', '1', '1'},
  14.     {'0', '0', '0', '0', '0', '0', '0', '0'}
  15. };

  16. void setup()
  17. {
  18.     //LEDs Pin Mode Option
  19.     for (int i = 0; i < 8; i++)
  20.     {
  21.         pinMode(leds[i], OUTPUT);
  22.         pinMode(gnds[i], OUTPUT);
  23.         digitalWrite(gnds[i], HIGH);
  24.     }
  25.     pinMode(rxled, OUTPUT);
  26.     Serial.begin(115200);
  27.     TestLEDRow();
  28.     TestLEDCol();
  29. }

  30. void loop()
  31. {
  32.     if (Serial.available() > 0)
  33.     {
  34.         delayMicroseconds(6100);
  35.         for (int i = 0; i < 8; i++)
  36.         {
  37.             for(int j = 0; j < 8; j++)
  38.             {
  39.                 Status[i][j] = Serial.read();
  40.                 if (Status[i][j] == -1)
  41.                 {
  42.                     Status[i][j] = '0';
  43.                 }
  44.                 if (i * j == 64)
  45.                 {
  46.                     if (Serial.available() != 0)
  47.                     {
  48.                         Serial.print("ERROR");
  49.                     }
  50.                 }
  51.             }
  52.         }
  53.         Serial.flush();
  54.     }

  55.     for (int i = 0; i < 8; i++)
  56.     {
  57.         digitalWrite(leds[i], LOW);
  58.         for (int j = 0; j < 8; j++)
  59.         {
  60.             if (Status[i][j] == '1')
  61.             {
  62.                 digitalWrite(gnds[j], HIGH);
  63.                 delayMicroseconds(100);
  64.                 digitalWrite(gnds[j], LOW);
  65.                 delayMicroseconds(100);
  66.             }
  67.             if (Status[i][j] == '0')
  68.             {
  69.                 digitalWrite(gnds[j], LOW);
  70.             }
  71.         }
  72.         digitalWrite(leds[i], HIGH);
  73.     }
  74. }

  75. void TestLEDRow()
  76. {
  77.     for (int i = 0; i < 8; i++)
  78.     {
  79.         digitalWrite(gnds[i], HIGH);
  80.         for (int j = 0; j < 8; j++)
  81.         {
  82.             digitalWrite(leds[j], LOW);
  83.             delay(20);
  84.             digitalWrite(leds[j], HIGH);
  85.             delay(20);
  86.         }
  87.         digitalWrite(gnds[i], LOW);
  88.     }
  89. }

  90. void TestLEDCol()
  91. {
  92.     for (int i = 0; i < 8; i++)
  93.     {
  94.         digitalWrite(leds[i], LOW);
  95.         for (int j = 0; j < 8; j++)
  96.         {
  97.             digitalWrite(gnds[j], HIGH);
  98.             delay(20);
  99.             digitalWrite(gnds[j], LOW);
  100.             delay(20);
  101.         }
  102.         digitalWrite(leds[i], HIGH);
  103.     }
  104. }
复制代码

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
回复

使用道具 举报

发表于 2013-6-12 15:15:50 | 显示全部楼层
上位机软件介绍一下,或给出个地址呗
回复 支持 反对

使用道具 举报

发表于 2013-6-13 17:09:33 | 显示全部楼层
上位机软件介绍一下,或给出个地址呗
回复 支持 反对

使用道具 举报

 楼主| 发表于 2013-6-13 20:44:40 | 显示全部楼层
http://pan.baidu.com/share/link?shareid=203212430&uk=3406645061 驱动器
http://pan.baidu.com/share/link?shareid=205244907&uk=3406645061 动画编辑器
由于是自己用VB.net编的,所以要安装.net Frame Work 3.5 以上版本
运行:双击setup.exe即可
回复 支持 反对

使用道具 举报

发表于 2014-2-26 15:18:18 | 显示全部楼层
喜欢。 要是能在手机上控制点阵的话可好了‘
回复 支持 反对

使用道具 举报

发表于 2015-4-20 18:06:09 | 显示全部楼层
             字模软件可否分享一下?
回复 支持 反对

使用道具 举报

发表于 2015-11-4 11:36:02 | 显示全部楼层
本帖最后由 yqfans 于 2015-11-5 15:00 编辑

赞一个!赞一个!
回复 支持 反对

使用道具 举报

发表于 2015-11-5 15:02:39 | 显示全部楼层
FoieDEEEE_仲敬 发表于 2013-6-13 20:44
http://pan.baidu.com/share/link?shareid=203212430&uk=3406645061 驱动器
http://pan.baidu.com/share/l ...

你好,为什么我电脑上装了.net4.0,可是安装不了你的这个软件,说是没有.net,无法安装,是怎么回事?
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|联系我们|极客工坊

GMT+8, 2026-6-15 14:48 , Processed in 0.058005 second(s), 24 queries .

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表