koji – 計測・解析ラボ

LabVIEWで画像処理、便利？

LabVIEWで画像処理するのは便利ですかと聞かれたのでデモプログラムを作成しました。NI Visionは所有していないので無料評価版を使いましたが、あと数日で期限が切れるので、期限があるうちにアップロードすることにしました。

「ビー玉を並べる作業のAVIファイルを開いてビー玉の個数と位置を表示するNI Visionのデモプログラム」

AVIファイルのフレーム取得、斜めから撮影した画像の台形補正、差分画像の生成、登録画像の検出などが使われています。

作業者が盤の上にビー玉を４個順番に置く作業をしています。作業をビデオに録画してビー玉を置いた場所や置いた順番を自動的にチェックするプログラムです。デモプログラムはAVIファイルに記録されている作業を順次再生しながらビー玉を検知して位置と個数を表示します。デモプログラムでは判定は行いません。

ファイルはNIのCommunity「北東北LabVIEWユーザー会」からダウンロードしてください。

LabVIEW2017の”評価版”で作ったものですが、LabVIEW2009版にバージョンダウンしたものもアップしています。Visionを持っていない方は最新の評価版で試してみてください。

AVIで保存するプログラムとAVIファイルのフレームをjpgで保存するプログラムもアップしています。

木目のパズル「プログラミングとレーザーカッターの素敵な関係」

Wood grain puzzle “Lovely relationship between Processing programming and laser cutter”

この記事はMFT2018 (Maker Faire Tokyo 2018 )エントリーシートの予稿です。

出展者のプロフィール
レーザー加工といえばイラストレーターで図案を描いてMDFを切り抜くものという風潮に抗って、Processingプログラムでパズル図案を描いて、地元の木材をレーザーカッターで切り抜いて木目のパズルを作っています。本業は計測の自動化と解析処理用のLabVIEWプログラムを提供していますので、LabVIEWホーム版を使ったArduino+FM音源YMF825の音作りツールも紹介する予定です。

出展内容
プログラムで描いた画像をレーザー光線がたどって切り取ってくれる。画面の中の五角形が厚みを持った五角形の木片になる。ジグソーパズルの無限の組み合わせをプログラムで描いて、地元の木材でパズルを作ってみよう。絵はいらない、木目が元の場所を教えてくれるから。久慈の南部アカマツ、遠野の桜、浄法寺のウルシ、木目は木の物語。プログラミングとレーザーカッターの素敵な関係を提案します。木目のパズルを見に来てね。

ジグソーパズルの製作
(1)Processingでピースの形状をランダムに作画します。
(2)レーザーカッターで切断します。
(3)パズルの完成です。
(4)画面の図形が厚みを持ってさわれる!!!

デモビデオ「プログラミングとレーザーカッターの素敵な関係」
https://www.facebook.com/koji.ohashi.12/videos/1696150310460940/

五角形のパズル

Processingでレーザー加工用図形をプログラムしよう！！

Processingって何？

たくさんあるプログラムツールの中でProcessingを選ぶ理由は四つ。
(1) オープンソースなので無料で使うことができる。
(2)図形をPDFで出力できる。
(3)グラフィック関連の関数が一通り揃っている。
(4)プログラムサンプルが豊富で使いやすい。

タングラムという古典的な図形パズルを例にプログラム方法を紹介します。

タングラムって何？

プログラムで作成するタングラムの図案。
図案が少し違いますが、タングラムを切断加工している様子です。
プログラムサンプル

processingでのプログラムはディスプレイに表示することを主眼に作られているのでピクセルが基本単位です。72ピクセルが1インチ(25.4mm)ですから、1mmは72/25.4ピクセルとなります。長さ100mmは100*72/25.4ピクセルとなります。つまり、欲しい寸法(mm)とプログラムで使うピクセルの変換は72/25.4を掛ければ良いだけです。

また、ドキュメントサイズを変数で指定することとPDFライブラリを使用していることに注目してください。

// タングラムの加工図の例です。
//*********************************************************
//PDFが作成されるので加工の際にイラストレーターで開きます。
//イラストレーターで図形全体を選択した状態で、
//「オブジェクトメニュー>クリッピングマスク>解除」します。
//アートボード外周に不要なパスができているので削除します。
//イラストレータ形式で保存します。
//これでレーザー加工ができます。
//*********************************************************
//テンプレートとして活用してください
//計測・解析ラボ


import processing.pdf.*;

float artboardHeight=80;  //実寸(mm)
float artboardWidth=130;  //実寸(mm)
float frameHeight=70;  //実寸(mm)
float frameWidth=120;  //実寸(mm)
float puzzleHeight=50;  //実寸(mm)
float puzzleWidth=100;  //実寸(mm)

float pixConv=72/25.4;
float artboardHeightP=artboardHeight*pixConv;
float artboardWidthP=artboardWidth*pixConv;
float frameHeightP=frameHeight*pixConv;
float frameWidthP=frameWidth*pixConv;
float puzzleHeightP=puzzleHeight*pixConv;
float puzzleWidthP=puzzleWidth*pixConv;

float frameTopP=(artboardHeightP-frameHeightP)/2;;
float frameLeftP=(artboardWidthP-frameWidthP)/2;
float puzzleTopP=frameTopP+(frameHeightP-puzzleHeightP)/2;
float puzzleLeftP=frameLeftP+(frameWidthP-puzzleWidthP)/2;

float strokeWidth = 0.001*pixConv;//( TrotecLaser LineWidth:0.001mm)


void settings(){
  int docWidth=(int)(artboardWidthP);
  int docHeight=(int)(artboardHeightP);
  size(docWidth,docHeight);
}

void setup() {
  noLoop();  // Run once and stop
  beginRecord(PDF, "Tangram.pdf");
  noFill();
  strokeWeight(strokeWidth);
  stroke(0,0,0); //black

}

void draw(){
  translate(puzzleLeftP,puzzleTopP);
  
  line(0,puzzleHeightP/2,puzzleWidthP/4,0);
  line(puzzleWidthP/4,0,puzzleWidthP/4,puzzleHeightP/2);
  line(puzzleWidthP/4,puzzleHeightP/2,puzzleWidthP/2,puzzleHeightP/2);
  
  line(0,puzzleHeightP,puzzleWidthP/4,puzzleHeightP/2);
  line(puzzleWidthP/4,puzzleHeightP/2,puzzleWidthP/2,puzzleHeightP);
  line(puzzleWidthP/2,puzzleHeightP,puzzleWidthP/2,0);
  line(puzzleWidthP/2,0,puzzleWidthP,puzzleHeightP);
  
  rect(0, 0, puzzleWidthP, puzzleHeightP);
  translate(-puzzleLeftP,-puzzleTopP);
  rect(frameLeftP, frameTopP, frameWidthP, frameHeightP);
  
  endRecord();
}

// タングラムの加工図の例です。

//*********************************************************

//PDFが作成されるので加工の際にイラストレーターで開きます。

//イラストレーターで図形全体を選択した状態で、

//「オブジェクトメニュー>クリッピングマスク>解除」します。

//アートボード外周に不要なパスができているので削除します。

//イラストレータ形式で保存します。

//これでレーザー加工ができます。

//*********************************************************

//テンプレートとして活用してください

//計測・解析ラボ

import processing.pdf.*;

float artboardHeight=80; //実寸(mm)

float artboardWidth=130; //実寸(mm)

float frameHeight=70; //実寸(mm)

float frameWidth=120; //実寸(mm)

float puzzleHeight=50; //実寸(mm)

float puzzleWidth=100; //実寸(mm)

float pixConv=72/25.4;

float artboardHeightP=artboardHeight*pixConv;

float artboardWidthP=artboardWidth*pixConv;

float frameHeightP=frameHeight*pixConv;

float frameWidthP=frameWidth*pixConv;

float puzzleHeightP=puzzleHeight*pixConv;

float puzzleWidthP=puzzleWidth*pixConv;

float frameTopP=(artboardHeightP-frameHeightP)/2;;

float frameLeftP=(artboardWidthP-frameWidthP)/2;

float puzzleTopP=frameTopP+(frameHeightP-puzzleHeightP)/2;

float puzzleLeftP=frameLeftP+(frameWidthP-puzzleWidthP)/2;

float strokeWidth = 0.001*pixConv;//( TrotecLaser LineWidth:0.001mm)

void settings(){

int docWidth=(int)(artboardWidthP);

int docHeight=(int)(artboardHeightP);

size(docWidth,docHeight);

}

void setup() {

noLoop(); // Run once and stop

beginRecord(PDF, "Tangram.pdf");

noFill();

strokeWeight(strokeWidth);

stroke(0,0,0); //black

}

void draw(){

translate(puzzleLeftP,puzzleTopP);

line(0,puzzleHeightP/2,puzzleWidthP/4,0);

line(puzzleWidthP/4,0,puzzleWidthP/4,puzzleHeightP/2);

line(puzzleWidthP/4,puzzleHeightP/2,puzzleWidthP/2,puzzleHeightP/2);

line(0,puzzleHeightP,puzzleWidthP/4,puzzleHeightP/2);

line(puzzleWidthP/4,puzzleHeightP/2,puzzleWidthP/2,puzzleHeightP);

line(puzzleWidthP/2,puzzleHeightP,puzzleWidthP/2,0);

line(puzzleWidthP/2,0,puzzleWidthP,puzzleHeightP);

rect(0, 0, puzzleWidthP, puzzleHeightP);

translate(-puzzleLeftP,-puzzleTopP);

rect(frameLeftP, frameTopP, frameWidthP, frameHeightP);

endRecord();

}

ESP32でYMF825音源のデモ(音色データ、音階、和音)

ヤマハのFM音源YMF825をArduino UNOで制御できましたので、ESP32に移植しました。
ESP32で使うと何がうれしいか !! —- >> タッチセンサーとBLEが使えます。

Arduino UNOの例は下記の記事を参照してください。
http://keisoku-lab.mond.jp/2018/02/09/ヤマハfm音源lsi-ymf825搭載モジュールのデモプログラム/

ESP32は3.3V系ですから、5V系のUNOで使っていたYMF825モジュールを接続するのはちょっと注意が必要です。ウダ電子の公式ページでは5Vと3.3V電源を接続し、抵抗を外し、ハンダを盛ってジャンパーする旨書かれています。3.3V単独電源になるなら頑張れますが、5Vも供給しなければいけないのは面倒ですから、YMF825モジュールは5Vのままで、SPIの信号を調整する方向で考えます。信号線はSCK, MISO, MOSI, SSとリセット信号の５本です。ESP32から出力する信号は3.3VなのでそのままでもYMF825に伝わりますので気にしないことにします。ESP32に5V信号が入ってくると壊れてしまいますが、入力はMISOだけです。MISOはレジスタの値を読み取る時に使われますが、読まないと決めればつなぐ必要がないことに気がつきました。SPIライブラリの中ではMISOも指定しないとエラーになりますのでMISOも割り当てますが、配線はしません。

但し、後日何か問題が起こった時に配線チェックをして、抜けている線を発見すると反射的に結線してしまう可能性がありますので注意が必要です。何気なくMISOを結線するとESP32を壊してしまいます。Vfが2VぐらいのLEDの+側をYMF825のMISO、-側をESP32のMISO入力端子に接続しておけば、思い出すきっかけにもなりますし、破壊する心配も無くなります。

ESP32のSPIでYMF825を使う方法は
ywabikoさんの記事がたいへん参考になりました。

YMF825モジュール <<—->> ESP32
RST_N <<—->> IO32
5V <<—->> USB 5V
GND <<—->> USB GNDとESP32 GND
SCK <<—->> IO18
MISO <<—->> 接続しない (IO19)
MOSI <<—->> IO23
SS <<—->> IO5

//

//Based on ymf825board_sample1
// 音色データの追加と和音演奏
// 音色パラメータによる音色データの生成
// 西洋音階での演奏


#include <SPI.h>
//0 :5V 1:3.3V
#define OUTPUT_power 0


#define PIN_RESET 32

// VSPI
#define PIN_CS 5
#define PIN_SCLK 18
#define PIN_MOSI 23
#define PIN_MISO 19//not connected
SPIClass spi_;

void set_ss_pin(int val) {
    digitalWrite(PIN_CS, val);
}

void set_rst_pin(int val) {
    digitalWrite(PIN_RESET, val);
}

//西洋音階
int noteFnum[12]={357,378,401,425,450,477,505,535,567,601,637,674};//ピアノの白鍵黒鍵
int wholeStep[7]={0,2,4,5,7,9,11};//ドレミファソラシ

//音色パラメーター(Yamahaの音色設計から抽出)
int const TONES=4;

//GrandPiano,TenorSax,NewAgePd,PickBass
byte BO[TONES]=   {0x01,0x00,0x00,0x00};//0-3
byte LFO[TONES]=  {0x01,0x01,0x01,0x01};//0-3
byte ALG[TONES]=  {0x03,0x05,0x05,0x03};//0-7
  
byte SR[TONES][4]={ {0x00,0x02,0x01,0x02},
                    {0x00,0x00,0x00,0x00},
                    {0x03,0x04,0x00,0x00},
                    {0x02,0x04,0x02,0x06}};//0-7
            
byte XOF[TONES][4]={  {0x00,0x00,0x00,0x00},
                      {0x00,0x00,0x00,0x00},
                      {0x00,0x00,0x00,0x00},
                      {0x00,0x00,0x00,0x00}};//0-1
            
byte KSR[TONES][4]={  {0x00,0x01,0x00,0x01},
                      {0x01,0x00,0x01,0x00},
                      {0x01,0x00,0x00,0x00},
                      {0x01,0x01,0x01,0x01}};//0-1
            
byte RR[TONES][4]={   {0x06,0x03,0x04,0x06},
                      {0x00,0x09,0x00,0x09},
                      {0x00,0x09,0x00,0x09},
                      {0x03,0x06,0x06,0x08}};//0-15
            
byte DR[TONES][4]={ {0x07,0x03,0x01,0x02},
                    {0x03,0x02,0x03,0x02},
                    {0x0F,0x07,0x01,0x01},
                    {0x07,0x0b,0x09,0x02}};//0-15
            
byte AR[TONES][4]={ {0x0F,0x0E,0x0D,0x0D},
                    {0x07,0x07,0x07,0x07},
                    {0x0F,0x0F,0x06,0x08},
                    {0x0f,0x0c,0x0f,0x0b}};//0-15
            
byte SL[TONES][4]={ {0x0f,0x02,0x03,0x04},
                    {0x00,0x00,0x00,0x00},
                    {0x00,0x00,0x00,0x01},
                    {0x01,0x07,0x02,0x06}};//0-15
            
byte TL[TONES][4]={ {0x27,0x28,0x22,0x00},
                    {0x05,0x0f,0x08,0x0d},
                    {0x26,0x0b,0x18,0x00},
                    {0x13,0x15,0x17,0x00}};//0-63
            
byte KSL[TONES][4]={  {0x01,0x03,0x00,0x02},
                      {0x02,0x00,0x02,0x02},
                      {0x00,0x02,0x02,0x02},
                      {0x02,0x00,0x02,0x00}};//0-3
            
byte DAM[TONES][4]={  {0x00,0x00,0x00,0x00},
                      {0x02,0x02,0x02,0x02},
                      {0x02,0x02,0x00,0x00},
                      {0x02,0x02,0x02,0x02}};//0-3
byte EAM[TONES][4]={  {0x00,0x00,0x00,0x00},
                      {0x00,0x00,0x00,0x00},
                      {0x00,0x00,0x00,0x00},
                      {0x00,0x00,0x00,0x00}};//0-1
            
byte DVB[TONES][4]={  {0x00,0x00,0x00,0x00},
                      {0x02,0x01,0x02,0x01},
                      {0x02,0x02,0x01,0x01},
                      {0x02,0x02,0x02,0x02}};//0-3
            
byte EVB[TONES][4]={  {0x00,0x00,0x01,0x01},
                      {0x00,0x01,0x00,0x01},
                      {0x00,0x00,0x01,0x01},
                      {0x00,0x00,0x01,0x01}};//0-1
            
byte MULTI[TONES][4]={  {0x01,0x05,0x01,0x01},
                        {0x01,0x01,0x01,0x01},
                        {0x07,0x05,0x01,0x01},
                        {0x01,0x07,0x02,0x01}};//0-15
              
byte DT[TONES][4]={ {0x00,0x00,0x00,0x00},
                    {0x00,0x00,0x00,0x00},
                    {0x00,0x00,0x07,0x00},
                    {0x00,0x00,0x00,0x00}};//0-7
            
byte WS[TONES][4]={ {0x08,0x00,0x00,0x00},
                    {0x01,0x08,0x09,0x00},
                    {0x01,0x00,0x01,0x00},
                    {0x00,0x00,0x00,0x00}};//0-31
            
byte FB[TONES][4]={ {0x00,0x00,0x00,0x00},
                    {0x03,0x00,0x03,0x00},
                    {0x05,0x00,0x06,0x00},
                    {0x05,0x00,0x00,0x00}};//0-7


void setup() {
  Serial.begin(9600);
  Serial.println("");
  Serial.println("ymf825_esp32_demo180213");
  pinMode(PIN_RESET, OUTPUT);
  pinMode(PIN_CS, OUTPUT);

  spi_.begin(PIN_SCLK, PIN_MISO, PIN_MOSI, PIN_CS);
  //spi_.begin(PIN_SCLK, , PIN_MOSI, PIN_CS);
  spi_.setFrequency(7000000);
  spi_.setDataMode(SPI_MODE3);
  spi_.setHwCs(false);
  set_ss_pin(HIGH);

  
  init_825();
  set_tone();
  set_ch();
  
}

void loop() {
  for(int t=0;t<4;t++){ //tone 0-3
    for(int i=0;i<3;i++){
      midiNote(t, 0, 24);
      midiNote(t, 1, 28);
      midiNote(t, 2, 31);
      delay(200);
      keyoffVn(0);
      keyoffVn(1);
      keyoffVn(2);
      delay(10);
    }
    for(int i=0;i<3;i++){
      midiNote(t, 0, 31);
      midiNote(t, 1, 36);
      midiNote(t, 2, 40);
      delay(400);
      keyoffVn(0);
      keyoffVn(1);
      keyoffVn(2);
      delay(10);
    }
    for(int i=0;i<3;i++){
      midiNote(t, 0, 40);
      midiNote(t, 1, 43);
      midiNote(t, 2, 48);
      delay(200);
      keyoffVn(0);
      keyoffVn(1);
      keyoffVn(2);
      delay(10);
    }
    delay(0);
    for(int i=1;i<8;i++){
      for(int j=0;j<7;j++){
        int note0=i*12 + wholeStep[j];
        int note1=(7-i)*12+wholeStep[(6-j)];
        midiNote(t, 0, note0);
        midiNote(t, 1, note1);
        delay(200);
        keyoffVn(0);
        keyoffVn(1);
        delay(10);
      }
    }
    for(int i=7;i>=1;i--){
      for(int j=6;j>=0;j--){
        int note=i*12 + wholeStep[j];
        midiNote(t, 0, note);
        delay(200);
        keyoffVn(0);
        delay(10);
      }
    }
    delay(2000);
  }
}


void midiNote(int tnum, int voice, int note){
  int fnum=noteFnum[note%12];
  byte block=(byte)note/12;
  byte fnumh=((0x380 & fnum)>>4)|block;  //(0,0,f9,f8,f7,b2,b1,b0)
  byte fnuml=0x7f&fnum;                  //(0,f6,f5,f4,f3,f2,f1,f0)
  keyonVn(tnum,voice,fnumh,fnuml);
}


void init_825(void) {
   set_rst_pin(LOW);
   delay(1);
   set_rst_pin(HIGH);
   if_s_write( 0x1D, OUTPUT_power );
   if_s_write( 0x02, 0x0E );
   delay(1);
   if_s_write( 0x00, 0x01 );//CLKEN
   if_s_write( 0x01, 0x00 ); //AKRST
   if_s_write( 0x1A, 0xA3 );
   delay(1);
   if_s_write( 0x1A, 0x00 );
   delay(30);
   if_s_write( 0x02, 0x04 );//AP1,AP3
   delay(1);
   if_s_write( 0x02, 0x00 );
   //add
   if_s_write( 0x19, 0xF0 );//MASTER VOL
   if_s_write( 0x1B, 0x3F );//interpolation
   if_s_write( 0x14, 0x00 );//interpolation
   if_s_write( 0x03, 0x01 );//Analog Gain
   
   if_s_write( 0x08, 0xF6 );
   delay(21);
   if_s_write( 0x08, 0x00 );
   if_s_write( 0x09, 0xF8 );
   if_s_write( 0x0A, 0x00 );
   
   if_s_write( 0x17, 0x40 );//MS_S
   if_s_write( 0x18, 0x00 );
}

void set_ch(void){
   if_s_write( 0x0F, 0x30 );// keyon = 0
   if_s_write( 0x10, 0x71 );// chvol
   if_s_write( 0x11, 0x00 );// XVB
   if_s_write( 0x12, 0x08 );// FRAC
   if_s_write( 0x13, 0x00 );// FRAC  
}

void keyonVn(unsigned char tnum, unsigned char voice, unsigned char fnumh, unsigned char fnuml){
  byte keyTone=0x40|(tnum&0x0f);
   if_s_write( 0x0B, voice );//voice num
   if_s_write( 0x0C, 0x54 );//vovol
   if_s_write( 0x0D, fnumh );//fnum
   if_s_write( 0x0E, fnuml );//fnum
   if_s_write( 0x0F, keyTone );//keyon = 1  
}

void keyoffVn(unsigned char voice){
  if_s_write( 0x0B, voice );//voice num
  if_s_write( 0x0F, 0x00 );//keyon = 0
}


void set_tone(){
  int const COUNT=TONES*30+5;
  byte tone_data[COUNT];
  tone_data[0]=0x80+TONES;//Header
  for(int i=0;i<TONES;i++){
    tone_data[1+i*30]=BO[i] & 0x03;
    tone_data[2+i*30]=(LFO[i]<<6)|(ALG[i]&0x07);
    
    tone_data[3+i*30]=(SR[i][0]<<4)|(XOF[i][0]<<3)|KSR[i][0];
    tone_data[10+i*30]=(SR[i][1]<<4)|(XOF[i][1]<<3)|KSR[i][1];
    tone_data[17+i*30]=(SR[i][2]<<4)|(XOF[i][2]<<3)|KSR[i][2];
    tone_data[24+i*30]=(SR[i][3]<<4)|(XOF[i][3]<<3)|KSR[i][3];
    
    tone_data[4+i*30]=(RR[i][0]<<4)|DR[i][0];
    tone_data[11+i*30]=(RR[i][1]<<4)|DR[i][1];
    tone_data[18+i*30]=(RR[i][2]<<4)|DR[i][2];
    tone_data[25+i*30]=(RR[i][3]<<4)|DR[i][3];
    
    tone_data[5+i*30]=(AR[i][0]<<4)|SL[i][0];
    tone_data[12+i*30]=(AR[i][1]<<4)|SL[i][1];
    tone_data[19+i*30]=(AR[i][2]<<4)|SL[i][2];
    tone_data[26+i*30]=(AR[i][3]<<4)|SL[i][3];
    
    tone_data[6+i*30]=(TL[i][0]<<2)|KSL[i][0];
    tone_data[13+i*30]=(TL[i][1]<<2)|KSL[i][1];
    tone_data[20+i*30]=(TL[i][2]<<2)|KSL[i][2];
    tone_data[27+i*30]=(TL[i][3]<<2)|KSL[i][3];
    
    tone_data[7+i*30]=(DAM[i][0]<<5)|(EAM[i][0]<<4)|(DVB[i][0]<<1)|EVB[i][0];
    tone_data[14+i*30]=(DAM[i][1]<<5)|(EAM[i][1]<<4)|(DVB[i][1]<<1)|EVB[i][1];
    tone_data[21+i*30]=(DAM[i][2]<<5)|(EAM[i][2]<<4)|(DVB[i][2]<<1)|EVB[i][2];
    tone_data[28+i*30]=(DAM[i][3]<<5)|(EAM[i][3]<<4)|(DVB[i][3]<<1)|EVB[i][3];
    
    tone_data[8+i*30]=(MULTI[i][0]<<4)|DT[i][0];
    tone_data[15+i*30]=(MULTI[i][1]<<4)|DT[i][1];
    tone_data[22+i*30]=(MULTI[i][2]<<4)|DT[i][2];
    tone_data[29+i*30]=(MULTI[i][3]<<4)|DT[i][3];
    
    tone_data[9+i*30]=(WS[i][0]<<3)|FB[i][0];
    tone_data[16+i*30]=(WS[i][1]<<3)|FB[i][1];
    tone_data[23+i*30]=(WS[i][2]<<3)|FB[i][2];
    tone_data[30+i*30]=(WS[i][3]<<3)|FB[i][3];
  }

  tone_data[1+TONES*30]=0x80;//Footer
  tone_data[2+TONES*30]=0x03;
  tone_data[3+TONES*30]=0x81;
  tone_data[4+TONES*30]=0x80;

  if_s_write( 0x08, 0xF6 );
   delay(1);
  if_s_write( 0x08, 0x00 );
  if_write( 0x07, &tone_data[0], TONES*30+5 );//write to FIFO
}






void if_write(char addr,unsigned char* data,char num){
  char i;
  char snd;
    set_ss_pin(LOW);
    spi_.transfer(addr);
    for(i=0;i<num;i++){
      spi_.transfer(data[i]);    
    }
    set_ss_pin(HIGH);
}

void if_s_write(char addr,unsigned char data){
  if_write(addr,&data,1);
}


unsigned char if_s_read(char addr){
    unsigned char rcv;
    set_ss_pin(LOW);
    spi_.transfer(0x80|addr);
    rcv = spi_.transfer(0x00);
    set_ss_pin(HIGH);
    return rcv;  
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

214

215

216

217

218

219

220

221

222

223

224

225

226

227

228

229

230

231

232

233

234

235

236

237

238

239

240

241

242

243

244

245

246

247

248

249

250

251

252

253

254

255

256

257

258

259

260

261

262

263

264

265

266

267

268

269

270

271

272

273

274

275

276

277

278

279

280

281

282

283

284

285

286

287

288

289

290

291

292

293

294

295

296

297

298

299

300

301

302

303

304

305

306

307

308

309

310

311

312

313

314

315

316

317

318

319

320

321

322

323

324

325

326

327

328

329

330

331

332

333

334

335

336

337

338

339

340

341

342

343

344

345

346

347

348

349

350

351

352

353

354

355

//Based on ymf825board_sample1

// 音色データの追加と和音演奏

// 音色パラメータによる音色データの生成

// 西洋音階での演奏

#include <SPI.h>

//0 :5V 1:3.3V

#define OUTPUT_power 0

#define PIN_RESET 32

// VSPI

#define PIN_CS 5

#define PIN_SCLK 18

#define PIN_MOSI 23

#define PIN_MISO 19//not connected

SPIClass spi_;

void set_ss_pin(int val) {

digitalWrite(PIN_CS, val);

}

void set_rst_pin(int val) {

digitalWrite(PIN_RESET, val);

}

//西洋音階

int noteFnum[12]={357,378,401,425,450,477,505,535,567,601,637,674};//ピアノの白鍵黒鍵

int wholeStep[7]={0,2,4,5,7,9,11};//ドレミファソラシ

//音色パラメーター(Yamahaの音色設計から抽出)

int const TONES=4;

//GrandPiano,TenorSax,NewAgePd,PickBass

byte BO[TONES]= {0x01,0x00,0x00,0x00};//0-3

byte LFO[TONES]= {0x01,0x01,0x01,0x01};//0-3

byte ALG[TONES]= {0x03,0x05,0x05,0x03};//0-7

byte SR[TONES][4]={ {0x00,0x02,0x01,0x02},

{0x00,0x00,0x00,0x00},

{0x03,0x04,0x00,0x00},

{0x02,0x04,0x02,0x06}};//0-7

byte XOF[TONES][4]={ {0x00,0x00,0x00,0x00},

{0x00,0x00,0x00,0x00},

{0x00,0x00,0x00,0x00}};//0-1

byte KSR[TONES][4]={ {0x00,0x01,0x00,0x01},

{0x01,0x00,0x01,0x00},

{0x01,0x00,0x00,0x00},

{0x01,0x01,0x01,0x01}};//0-1

byte RR[TONES][4]={ {0x06,0x03,0x04,0x06},

{0x00,0x09,0x00,0x09},

{0x03,0x06,0x06,0x08}};//0-15

byte DR[TONES][4]={ {0x07,0x03,0x01,0x02},

{0x03,0x02,0x03,0x02},

{0x0F,0x07,0x01,0x01},

{0x07,0x0b,0x09,0x02}};//0-15

byte AR[TONES][4]={ {0x0F,0x0E,0x0D,0x0D},

{0x07,0x07,0x07,0x07},

{0x0F,0x0F,0x06,0x08},

{0x0f,0x0c,0x0f,0x0b}};//0-15

byte SL[TONES][4]={ {0x0f,0x02,0x03,0x04},

{0x00,0x00,0x00,0x00},

{0x00,0x00,0x00,0x01},

{0x01,0x07,0x02,0x06}};//0-15

byte TL[TONES][4]={ {0x27,0x28,0x22,0x00},

{0x05,0x0f,0x08,0x0d},

{0x26,0x0b,0x18,0x00},

{0x13,0x15,0x17,0x00}};//0-63

byte KSL[TONES][4]={ {0x01,0x03,0x00,0x02},

{0x02,0x00,0x02,0x02},

{0x00,0x02,0x02,0x02},

{0x02,0x00,0x02,0x00}};//0-3

byte DAM[TONES][4]={ {0x00,0x00,0x00,0x00},

{0x02,0x02,0x02,0x02},

{0x02,0x02,0x00,0x00},

{0x02,0x02,0x02,0x02}};//0-3

byte EAM[TONES][4]={ {0x00,0x00,0x00,0x00},

{0x00,0x00,0x00,0x00},

{0x00,0x00,0x00,0x00}};//0-1

byte DVB[TONES][4]={ {0x00,0x00,0x00,0x00},

{0x02,0x01,0x02,0x01},

{0x02,0x02,0x01,0x01},

{0x02,0x02,0x02,0x02}};//0-3

byte EVB[TONES][4]={ {0x00,0x00,0x01,0x01},

{0x00,0x01,0x00,0x01},

{0x00,0x00,0x01,0x01},

{0x00,0x00,0x01,0x01}};//0-1

byte MULTI[TONES][4]={ {0x01,0x05,0x01,0x01},

{0x01,0x01,0x01,0x01},

{0x07,0x05,0x01,0x01},

{0x01,0x07,0x02,0x01}};//0-15

byte DT[TONES][4]={ {0x00,0x00,0x00,0x00},

{0x00,0x00,0x00,0x00},

{0x00,0x00,0x07,0x00},

{0x00,0x00,0x00,0x00}};//0-7

byte WS[TONES][4]={ {0x08,0x00,0x00,0x00},

{0x01,0x08,0x09,0x00},

{0x01,0x00,0x01,0x00},

{0x00,0x00,0x00,0x00}};//0-31

byte FB[TONES][4]={ {0x00,0x00,0x00,0x00},

{0x03,0x00,0x03,0x00},

{0x05,0x00,0x06,0x00},

{0x05,0x00,0x00,0x00}};//0-7

void setup() {

Serial.begin(9600);

Serial.println("");

Serial.println("ymf825_esp32_demo180213");

pinMode(PIN_RESET, OUTPUT);

pinMode(PIN_CS, OUTPUT);

spi_.begin(PIN_SCLK, PIN_MISO, PIN_MOSI, PIN_CS);

//spi_.begin(PIN_SCLK, , PIN_MOSI, PIN_CS);

spi_.setFrequency(7000000);

spi_.setDataMode(SPI_MODE3);

spi_.setHwCs(false);

set_ss_pin(HIGH);

init_825();

set_tone();

set_ch();

}

void loop() {

for(int t=0;t<4;t++){ //tone 0-3

for(int i=0;i<3;i++){

midiNote(t, 0, 24);

midiNote(t, 1, 28);

midiNote(t, 2, 31);

delay(200);

keyoffVn(0);

keyoffVn(1);

keyoffVn(2);

delay(10);

}

for(int i=0;i<3;i++){

midiNote(t, 0, 31);

midiNote(t, 1, 36);

midiNote(t, 2, 40);

delay(400);

keyoffVn(0);

keyoffVn(1);

keyoffVn(2);

delay(10);

}

for(int i=0;i<3;i++){

midiNote(t, 0, 40);

midiNote(t, 1, 43);

midiNote(t, 2, 48);

delay(200);

keyoffVn(0);

keyoffVn(1);

keyoffVn(2);

delay(10);

}

delay(0);

for(int i=1;i<8;i++){

for(int j=0;j<7;j++){

int note0=i*12 + wholeStep[j];

int note1=(7-i)*12+wholeStep[(6-j)];

midiNote(t, 0, note0);

midiNote(t, 1, note1);

delay(200);

keyoffVn(0);

keyoffVn(1);

delay(10);

}

for(int i=7;i>=1;i--){

for(int j=6;j>=0;j--){

int note=i*12 + wholeStep[j];

midiNote(t, 0, note);

delay(200);

keyoffVn(0);

delay(10);

}

delay(2000);

}

void midiNote(int tnum, int voice, int note){

int fnum=noteFnum[note%12];

byte block=(byte)note/12;

byte fnumh=((0x380 & fnum)>>4)|block; //(0,0,f9,f8,f7,b2,b1,b0)

byte fnuml=0x7f&fnum; //(0,f6,f5,f4,f3,f2,f1,f0)

keyonVn(tnum,voice,fnumh,fnuml);

}

void init_825(void) {

set_rst_pin(LOW);

delay(1);

set_rst_pin(HIGH);

if_s_write( 0x1D, OUTPUT_power );

if_s_write( 0x02, 0x0E );

delay(1);

if_s_write( 0x00, 0x01 );//CLKEN

if_s_write( 0x01, 0x00 ); //AKRST

if_s_write( 0x1A, 0xA3 );

delay(1);

if_s_write( 0x1A, 0x00 );

delay(30);

if_s_write( 0x02, 0x04 );//AP1,AP3

delay(1);

if_s_write( 0x02, 0x00 );

//add

if_s_write( 0x19, 0xF0 );//MASTER VOL

if_s_write( 0x1B, 0x3F );//interpolation

if_s_write( 0x14, 0x00 );//interpolation

if_s_write( 0x03, 0x01 );//Analog Gain

if_s_write( 0x08, 0xF6 );

delay(21);

if_s_write( 0x08, 0x00 );

if_s_write( 0x09, 0xF8 );

if_s_write( 0x0A, 0x00 );

if_s_write( 0x17, 0x40 );//MS_S

if_s_write( 0x18, 0x00 );

}

void set_ch(void){

if_s_write( 0x0F, 0x30 );// keyon = 0

if_s_write( 0x10, 0x71 );// chvol

if_s_write( 0x11, 0x00 );// XVB

if_s_write( 0x12, 0x08 );// FRAC

if_s_write( 0x13, 0x00 );// FRAC

}

void keyonVn(unsigned char tnum, unsigned char voice, unsigned char fnumh, unsigned char fnuml){

byte keyTone=0x40|(tnum&0x0f);

if_s_write( 0x0B, voice );//voice num

if_s_write( 0x0C, 0x54 );//vovol

if_s_write( 0x0D, fnumh );//fnum

if_s_write( 0x0E, fnuml );//fnum

if_s_write( 0x0F, keyTone );//keyon = 1

}

void keyoffVn(unsigned char voice){

if_s_write( 0x0B, voice );//voice num

if_s_write( 0x0F, 0x00 );//keyon = 0

}

void set_tone(){

int const COUNT=TONES*30+5;

byte tone_data[COUNT];

tone_data[0]=0x80+TONES;//Header

for(int i=0;i<TONES;i++){

tone_data[1+i*30]=BO[i] & 0x03;

tone_data[2+i*30]=(LFO[i]<<6)|(ALG[i]&0x07);

tone_data[3+i*30]=(SR[i][0]<<4)|(XOF[i][0]<<3)|KSR[i][0];

tone_data[10+i*30]=(SR[i][1]<<4)|(XOF[i][1]<<3)|KSR[i][1];

tone_data[17+i*30]=(SR[i][2]<<4)|(XOF[i][2]<<3)|KSR[i][2];

tone_data[24+i*30]=(SR[i][3]<<4)|(XOF[i][3]<<3)|KSR[i][3];

tone_data[4+i*30]=(RR[i][0]<<4)|DR[i][0];

tone_data[11+i*30]=(RR[i][1]<<4)|DR[i][1];

tone_data[18+i*30]=(RR[i][2]<<4)|DR[i][2];

tone_data[25+i*30]=(RR[i][3]<<4)|DR[i][3];

tone_data[5+i*30]=(AR[i][0]<<4)|SL[i][0];

tone_data[12+i*30]=(AR[i][1]<<4)|SL[i][1];

tone_data[19+i*30]=(AR[i][2]<<4)|SL[i][2];

tone_data[26+i*30]=(AR[i][3]<<4)|SL[i][3];

tone_data[6+i*30]=(TL[i][0]<<2)|KSL[i][0];

tone_data[13+i*30]=(TL[i][1]<<2)|KSL[i][1];

tone_data[20+i*30]=(TL[i][2]<<2)|KSL[i][2];

tone_data[27+i*30]=(TL[i][3]<<2)|KSL[i][3];

tone_data[7+i*30]=(DAM[i][0]<<5)|(EAM[i][0]<<4)|(DVB[i][0]<<1)|EVB[i][0];

tone_data[14+i*30]=(DAM[i][1]<<5)|(EAM[i][1]<<4)|(DVB[i][1]<<1)|EVB[i][1];

tone_data[21+i*30]=(DAM[i][2]<<5)|(EAM[i][2]<<4)|(DVB[i][2]<<1)|EVB[i][2];

tone_data[28+i*30]=(DAM[i][3]<<5)|(EAM[i][3]<<4)|(DVB[i][3]<<1)|EVB[i][3];

tone_data[8+i*30]=(MULTI[i][0]<<4)|DT[i][0];

tone_data[15+i*30]=(MULTI[i][1]<<4)|DT[i][1];

tone_data[22+i*30]=(MULTI[i][2]<<4)|DT[i][2];

tone_data[29+i*30]=(MULTI[i][3]<<4)|DT[i][3];

tone_data[9+i*30]=(WS[i][0]<<3)|FB[i][0];

tone_data[16+i*30]=(WS[i][1]<<3)|FB[i][1];

tone_data[23+i*30]=(WS[i][2]<<3)|FB[i][2];

tone_data[30+i*30]=(WS[i][3]<<3)|FB[i][3];

}

tone_data[1+TONES*30]=0x80;//Footer

tone_data[2+TONES*30]=0x03;

tone_data[3+TONES*30]=0x81;

tone_data[4+TONES*30]=0x80;

if_s_write( 0x08, 0xF6 );

delay(1);

if_s_write( 0x08, 0x00 );

if_write( 0x07, &tone_data[0], TONES*30+5 );//write to FIFO

}

void if_write(char addr,unsigned char* data,char num){

char i;

char snd;

set_ss_pin(LOW);

spi_.transfer(addr);

for(i=0;i<num;i++){

spi_.transfer(data[i]);

}

set_ss_pin(HIGH);

}

void if_s_write(char addr,unsigned char data){

if_write(addr,&data,1);

}

unsigned char if_s_read(char addr){

unsigned char rcv;

set_ss_pin(LOW);

spi_.transfer(0x80|addr);

rcv = spi_.transfer(0x00);

set_ss_pin(HIGH);

return rcv;

}

(180213)

ESP32(MH-ET LIVE ESP32 MiniKIT)のタッチセンサー

ESP32には１０本ものタッチセンサーがあります。しかも、インタラプト関数が用意されているので便利に使えそうです。

ESP32の安価でコンパクトなボードを購入したので試しに使ってみようと思います。特にアフィリエイトが得られるわけではありませんが、購入先は下記URLです。

https://ja.aliexpress.com/item/MH-ET-LIVE-D1-mini-ESP32-ESP-32-WiFi-Bluetooth-Internet-of-Things-development-board-based/32816658883.html?spm=a2g0s.9042311.0.0.u50SMy

このボードはLチカ用LEDが付いているのが原因だと思いますが、T2は使えません。また、T8とT9が入れ替わっているようです。

T0–IO04
T1–IO0
T3–TDO
T4–TCK
T5–TDI
T6–TMS
T7–IO27
T8–IO32
T9–IO33

int threshold[9] = {12,12,12,12,12,12,12,12,12,};
bool touchDetected[9] ={false,false,false,false,false,false,false,false,false};
int T[9]={T0,T1,T3,T4,T5,T6,T7,T9,T8};


void gotTouch0(){
  touchDetected[0] = true;
}
void gotTouch1(){
  touchDetected[1] = true;
}
void gotTouch2(){
  touchDetected[2] = true;
}
void gotTouch3(){
  touchDetected[3] = true;
}
void gotTouch4(){
  touchDetected[4] = true;
}
void gotTouch5(){
  touchDetected[5] = true;
}
void gotTouch6(){
  touchDetected[6] = true;
}
void gotTouch7(){
  touchDetected[7] = true;
}
void gotTouch8(){
  touchDetected[8] = true;
}


void setup() {
  Serial.begin(115200);
  delay(1000); // give me time to bring up serial monitor
  Serial.println("TouchInterrupt9");
  touchAttachInterrupt(T[0], gotTouch0, threshold[0]);
  touchAttachInterrupt(T[1], gotTouch1, threshold[1]);
  touchAttachInterrupt(T[2], gotTouch2, threshold[2]);
  touchAttachInterrupt(T[3], gotTouch3, threshold[3]);
  touchAttachInterrupt(T[4], gotTouch4, threshold[4]);
  touchAttachInterrupt(T[5], gotTouch5, threshold[5]);
  touchAttachInterrupt(T[6], gotTouch6, threshold[6]);
  touchAttachInterrupt(T[7], gotTouch7, threshold[7]);
  touchAttachInterrupt(T[8], gotTouch8, threshold[8]);
}

void loop(){
  int value;
  for(int i=0;i<9;i++){
    if(touchDetected[i] && ((value=touchRead(T[i]))<threshold[i])){
      touchDetected[i]=false;
      Serial.print(i);Serial.print(" detected with");
      Serial.println(value);
    }
  }
}

int threshold[9] = {12,12,12,12,12,12,12,12,12,};

bool touchDetected[9] ={false,false,false,false,false,false,false,false,false};

int T[9]={T0,T1,T3,T4,T5,T6,T7,T9,T8};

void gotTouch0(){

touchDetected[0] = true;

}

void gotTouch1(){

touchDetected[1] = true;

}

void gotTouch2(){

touchDetected[2] = true;

}

void gotTouch3(){

touchDetected[3] = true;

}

void gotTouch4(){

touchDetected[4] = true;

}

void gotTouch5(){

touchDetected[5] = true;

}

void gotTouch6(){

touchDetected[6] = true;

}

void gotTouch7(){

touchDetected[7] = true;

}

void gotTouch8(){

touchDetected[8] = true;

}

void setup() {

Serial.begin(115200);

delay(1000); // give me time to bring up serial monitor

Serial.println("TouchInterrupt9");

touchAttachInterrupt(T[0], gotTouch0, threshold[0]);

touchAttachInterrupt(T[1], gotTouch1, threshold[1]);

touchAttachInterrupt(T[2], gotTouch2, threshold[2]);

touchAttachInterrupt(T[3], gotTouch3, threshold[3]);

touchAttachInterrupt(T[4], gotTouch4, threshold[4]);

touchAttachInterrupt(T[5], gotTouch5, threshold[5]);

touchAttachInterrupt(T[6], gotTouch6, threshold[6]);

touchAttachInterrupt(T[7], gotTouch7, threshold[7]);

touchAttachInterrupt(T[8], gotTouch8, threshold[8]);

}

void loop(){

int value;

for(int i=0;i<9;i++){

if(touchDetected[i] && ((value=touchRead(T[i]))<threshold[i])){

touchDetected[i]=false;

Serial.print(i);Serial.print(" detected with");

Serial.println(value);

}

フラットケーブルを使ったら60ぐらいあったタッチセンサーの出力が20ぐらいまで低下して、検知できるギリギリですがなんとか使えています。

(18.02.11)

ヤマハFM音源LSI YMF825搭載モジュールのデモプログラム

Arduino UNO互換機でYMF825を動作させてみました。

複数の音色パラメータから音色データを生成して、西洋音階で和音を鳴らします。ヘッドフォンアンプが付いていますが、スピーカーにつないでいます。

購入先はスイッチサイエンスです。
https://www.switch-science.com/catalog/3399/

音の雰囲気が伝わるように動画を作りました。
https://www.facebook.com/koji.ohashi.12/videos/1635981226477849/

音色パラメータが4種類入っているのでプログラムが長くなっていますが、実際に使えるものを作ろうとするとこのぐらいの機能は必要になるのでまとめてみました。

lineNo.304-307にバグがありましたので修正しました。(180213)

//Based on ymf825board_sample1
// 音色データの追加と和音演奏
// 音色パラメータによる音色データの生成
// 西洋音階での演奏

/*
 Conditions only for Arduino UNO
   RST_N- Pin9   
   SS   - Pin10
   MOSI - Pin11
   MISO - Pin12
   SCK  - Pin13
 */
#include <SPI.h>
//0 :5V 1:3.3V
#define OUTPUT_power 0

const int RST_Pin = 9;
const int slaveSelectPin = 10;

//西洋音階
int noteFnum[12]={357,378,401,425,450,477,505,535,567,601,637,674};//ピアノの白鍵黒鍵
int wholeStep[7]={0,2,4,5,7,9,11};//ドレミファソラシ

//音色パラメーター(Yamahaの音色設計から抽出)
int const TONES=4;
//GrandPiano,TenorSax,NewAgePd,PickBass
byte BO[TONES]=   {0x01,0x00,0x00,0x00};//0-3
byte LFO[TONES]=  {0x01,0x01,0x01,0x01};//0-3
byte ALG[TONES]=  {0x03,0x05,0x05,0x03};//0-7
  
byte SR[TONES][4]={ {0x00,0x02,0x01,0x02},
                    {0x00,0x00,0x00,0x00},
                    {0x03,0x04,0x00,0x00},
                    {0x02,0x04,0x02,0x06}};//0-7
            
byte XOF[TONES][4]={  {0x00,0x00,0x00,0x00},
                      {0x00,0x00,0x00,0x00},
                      {0x00,0x00,0x00,0x00},
                      {0x00,0x00,0x00,0x00}};//0-1
            
byte KSR[TONES][4]={  {0x00,0x01,0x00,0x01},
                      {0x01,0x00,0x01,0x00},
                      {0x01,0x00,0x00,0x00},
                      {0x01,0x01,0x01,0x01}};//0-1
            
byte RR[TONES][4]={   {0x06,0x03,0x04,0x06},
                      {0x00,0x09,0x00,0x09},
                      {0x00,0x09,0x00,0x09},
                      {0x03,0x06,0x06,0x08}};//0-15
            
byte DR[TONES][4]={ {0x07,0x03,0x01,0x02},
                    {0x03,0x02,0x03,0x02},
                    {0x0F,0x07,0x01,0x01},
                    {0x07,0x0b,0x09,0x02}};//0-15
            
byte AR[TONES][4]={ {0x0F,0x0E,0x0D,0x0D},
                    {0x07,0x07,0x07,0x07},
                    {0x0F,0x0F,0x06,0x08},
                    {0x0f,0x0c,0x0f,0x0b}};//0-15
            
byte SL[TONES][4]={ {0x0f,0x02,0x03,0x04},
                    {0x00,0x00,0x00,0x00},
                    {0x00,0x00,0x00,0x01},
                    {0x01,0x07,0x02,0x06}};//0-15
            
byte TL[TONES][4]={ {0x27,0x28,0x22,0x00},
                    {0x05,0x0f,0x08,0x0d},
                    {0x26,0x0b,0x18,0x00},
                    {0x13,0x15,0x17,0x00}};//0-63
            
byte KSL[TONES][4]={  {0x01,0x03,0x00,0x02},
                      {0x02,0x00,0x02,0x02},
                      {0x00,0x02,0x02,0x02},
                      {0x02,0x00,0x02,0x00}};//0-3
            
byte DAM[TONES][4]={  {0x00,0x00,0x00,0x00},
                      {0x02,0x02,0x02,0x02},
                      {0x02,0x02,0x00,0x00},
                      {0x02,0x02,0x02,0x02}};//0-3
byte EAM[TONES][4]={  {0x00,0x00,0x00,0x00},
                      {0x00,0x00,0x00,0x00},
                      {0x00,0x00,0x00,0x00},
                      {0x00,0x00,0x00,0x00}};//0-1
            
byte DVB[TONES][4]={  {0x00,0x00,0x00,0x00},
                      {0x02,0x01,0x02,0x01},
                      {0x02,0x02,0x01,0x01},
                      {0x02,0x02,0x02,0x02}};//0-3
            
byte EVB[TONES][4]={  {0x00,0x00,0x01,0x01},
                      {0x00,0x01,0x00,0x01},
                      {0x00,0x00,0x01,0x01},
                      {0x00,0x00,0x01,0x01}};//0-1
            
byte MULTI[TONES][4]={  {0x01,0x05,0x01,0x01},
                        {0x01,0x01,0x01,0x01},
                        {0x07,0x05,0x01,0x01},
                        {0x01,0x07,0x02,0x01}};//0-15
              
byte DT[TONES][4]={ {0x00,0x00,0x00,0x00},
                    {0x00,0x00,0x00,0x00},
                    {0x00,0x00,0x07,0x00},
                    {0x00,0x00,0x00,0x00}};//0-7
            
byte WS[TONES][4]={ {0x08,0x00,0x00,0x00},
                    {0x01,0x08,0x09,0x00},
                    {0x01,0x00,0x01,0x00},
                    {0x00,0x00,0x00,0x00}};//0-31
            
byte FB[TONES][4]={ {0x00,0x00,0x00,0x00},
                    {0x03,0x00,0x03,0x00},
                    {0x05,0x00,0x06,0x00},
                    {0x05,0x00,0x00,0x00}};//0-7




void setup() {
  // put your setup code here, to run once:
  Serial.begin(9600);
  Serial.println("ymf825_demo180213");
  pinMode(RST_Pin,OUTPUT);
  pinMode(slaveSelectPin,OUTPUT);
  digitalWrite(slaveSelectPin, HIGH);
 
  SPI.setBitOrder(MSBFIRST);
  SPI.setClockDivider(SPI_CLOCK_DIV8);
  SPI.setDataMode(SPI_MODE0);
  SPI.begin();
  init_825();
  set_tone();
  set_ch();
  
}

void loop() {
  for(int t=0;t<4;t++){
    for(int i=0;i<3;i++){
      midiNote(t, 0, 24);
      midiNote(t, 1, 28);
      midiNote(t, 2, 31);
      delay(200);
      keyoffVn(0);
      keyoffVn(1);
      keyoffVn(2);
      delay(10);
    }
    for(int i=0;i<3;i++){
      midiNote(t, 0, 31);
      midiNote(t, 1, 36);
      midiNote(t, 2, 40);
      delay(400);
      keyoffVn(0);
      keyoffVn(1);
      keyoffVn(2);
      delay(10);
    }
    for(int i=0;i<3;i++){
      midiNote(t, 0, 40);
      midiNote(t, 1, 43);
      midiNote(t, 2, 48);
      delay(200);
      keyoffVn(0);
      keyoffVn(1);
      keyoffVn(2);
      delay(10);
    }
    delay(0);
    for(int i=1;i<8;i++){
      for(int j=0;j<7;j++){
        int note0=i*12 + wholeStep[j];
        int note1=(7-i)*12+wholeStep[(6-j)];
        midiNote(t, 0, note0);
        midiNote(t, 1, note1);
        delay(200);
        keyoffVn(0);
        keyoffVn(1);
        delay(10);
      }
    }
    for(int i=7;i>=1;i--){
      for(int j=6;j>=0;j--){
        int note=i*12 + wholeStep[j];
        midiNote(t, 0, note);
        delay(200);
        keyoffVn(0);
        delay(10);
      }
    }
    delay(2000);
  }
}


void midiNote(int tnum, int voice, int note){
  int fnum=noteFnum[note%12];
  byte block=(byte)note/12;
  byte fnumh=((0x380 & fnum)>>4)|block;  //(0,0,f9,f8,f7,b2,b1,b0)
  byte fnuml=0x7f&fnum;                  //(0,f6,f5,f4,f3,f2,f1,f0)
  keyonVn(tnum,voice,fnumh,fnuml);
}


void init_825(void) {
   digitalWrite(RST_Pin, LOW);
   delay(1);
   digitalWrite(RST_Pin, HIGH);
   if_s_write( 0x1D, OUTPUT_power );
   if_s_write( 0x02, 0x0E );
   delay(1);
   if_s_write( 0x00, 0x01 );//CLKEN
   if_s_write( 0x01, 0x00 ); //AKRST
   if_s_write( 0x1A, 0xA3 );
   delay(1);
   if_s_write( 0x1A, 0x00 );
   delay(30);
   if_s_write( 0x02, 0x04 );//AP1,AP3
   delay(1);
   if_s_write( 0x02, 0x00 );
   //add
   if_s_write( 0x19, 0xF0 );//MASTER VOL
   if_s_write( 0x1B, 0x3F );//interpolation
   if_s_write( 0x14, 0x00 );//interpolation
   if_s_write( 0x03, 0x01 );//Analog Gain
   
   if_s_write( 0x08, 0xF6 );
   delay(21);
   if_s_write( 0x08, 0x00 );
   if_s_write( 0x09, 0xF8 );
   if_s_write( 0x0A, 0x00 );
   
   if_s_write( 0x17, 0x40 );//MS_S
   if_s_write( 0x18, 0x00 );
}

void set_ch(void){
   if_s_write( 0x0F, 0x30 );// keyon = 0
   if_s_write( 0x10, 0x71 );// chvol
   if_s_write( 0x11, 0x00 );// XVB
   if_s_write( 0x12, 0x08 );// FRAC
   if_s_write( 0x13, 0x00 );// FRAC  
}

void keyonVn(unsigned char tnum, unsigned char voice, unsigned char fnumh, unsigned char fnuml){
  byte keyTone=0x40|(tnum&0x0f);
   if_s_write( 0x0B, voice );//voice num
   if_s_write( 0x0C, 0x54 );//vovol
   if_s_write( 0x0D, fnumh );//fnum
   if_s_write( 0x0E, fnuml );//fnum
   if_s_write( 0x0F, keyTone );//keyon = 1  
}

void keyoffVn(unsigned char voice){
  if_s_write( 0x0B, voice );//voice num
  if_s_write( 0x0F, 0x00 );//keyon = 0
}

void set_tone(){
  int const COUNT=TONES*30+5;
  byte tone_data[COUNT];
  tone_data[0]=0x80+TONES;//Header
  
  for(int i=0;i<TONES;i++){
    tone_data[1+i*30]=BO[i] & 0x03;
    tone_data[2+i*30]=(LFO[i]<<6)|(ALG[i]&0x07);
    
    tone_data[3+i*30]=(SR[i][0]<<4)|(XOF[i][0]<<3)|KSR[i][0];
    tone_data[10+i*30]=(SR[i][1]<<4)|(XOF[i][1]<<3)|KSR[i][1];
    tone_data[17+i*30]=(SR[i][2]<<4)|(XOF[i][2]<<3)|KSR[i][2];
    tone_data[24+i*30]=(SR[i][3]<<4)|(XOF[i][3]<<3)|KSR[i][3];
    
    tone_data[4+i*30]=(RR[i][0]<<4)|DR[i][0];
    tone_data[11+i*30]=(RR[i][1]<<4)|DR[i][1];
    tone_data[18+i*30]=(RR[i][2]<<4)|DR[i][2];
    tone_data[25+i*30]=(RR[i][3]<<4)|DR[i][3];
    
    tone_data[5+i*30]=(AR[i][0]<<4)|SL[i][0];
    tone_data[12+i*30]=(AR[i][1]<<4)|SL[i][1];
    tone_data[19+i*30]=(AR[i][2]<<4)|SL[i][2];
    tone_data[26+i*30]=(AR[i][3]<<4)|SL[i][3];
    
    tone_data[6+i*30]=(TL[i][0]<<2)|KSL[i][0];
    tone_data[13+i*30]=(TL[i][1]<<2)|KSL[i][1];
    tone_data[20+i*30]=(TL[i][2]<<2)|KSL[i][2];
    tone_data[27+i*30]=(TL[i][3]<<2)|KSL[i][3];
    
    tone_data[7+i*30]=(DAM[i][0]<<5)|(EAM[i][0]<<4)|(DVB[i][0]<<1)|EVB[i][0];
    tone_data[14+i*30]=(DAM[i][1]<<5)|(EAM[i][1]<<4)|(DVB[i][1]<<1)|EVB[i][1];
    tone_data[21+i*30]=(DAM[i][2]<<5)|(EAM[i][2]<<4)|(DVB[i][2]<<1)|EVB[i][2];
    tone_data[28+i*30]=(DAM[i][3]<<5)|(EAM[i][3]<<4)|(DVB[i][3]<<1)|EVB[i][3];
    
    tone_data[8+i*30]=(MULTI[i][0]<<4)|DT[i][0];
    tone_data[15+i*30]=(MULTI[i][1]<<4)|DT[i][1];
    tone_data[22+i*30]=(MULTI[i][2]<<4)|DT[i][2];
    tone_data[29+i*30]=(MULTI[i][3]<<4)|DT[i][3];
    
    tone_data[9+i*30]=(WS[i][0]<<3)|FB[i][0];
    tone_data[16+i*30]=(WS[i][1]<<3)|FB[i][1];
    tone_data[23+i*30]=(WS[i][2]<<3)|FB[i][2];
    tone_data[30+i*30]=(WS[i][3]<<3)|FB[i][3];
  }
  //modified at 180213
  tone_data[1+TONES*30]=0x80;//Footer
  tone_data[2+TONES*30]=0x03;
  tone_data[3+TONES*30]=0x81;
  tone_data[4+TONES*30]=0x80;

  if_s_write( 0x08, 0xF6 );
   delay(1);
  if_s_write( 0x08, 0x00 );
  if_write( 0x07, &tone_data[0], TONES*30+5 );//write to FIFO
}

void if_write(char addr,unsigned char* data,char num){
  char i;
  char snd;
    digitalWrite(slaveSelectPin, LOW);
    SPI.transfer(addr);
    for(i=0;i<num;i++){
      SPI.transfer(data[i]);    
    }
    digitalWrite(slaveSelectPin, HIGH);  
}

void if_s_write(char addr,unsigned char data){
  if_write(addr,&data,1);
}

unsigned char if_s_read(char addr){
    unsigned char rcv;
    digitalWrite(slaveSelectPin, LOW);    
    SPI.transfer(0x80|addr);
    rcv = SPI.transfer(0x00);
    digitalWrite(slaveSelectPin, HIGH);  
    return rcv;  
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

214

215

216

217

218

219

220

221

222

223

224

225

226

227

228

229

230

231

232

233

234

235

236

237

238

239

240

241

242

243

244

245

246

247

248

249

250

251

252

253

254

255

256

257

258

259

260

261

262

263

264

265

266

267

268

269

270

271

272

273

274

275

276

277

278

279

280

281

282

283

284

285

286

287

288

289

290

291

292

293

294

295

296

297

298

299

300

301

302

303

304

305

306

307

308

309

310

311

312

313

314

315

316

317

318

319

320

321

322

323

324

325

326

327

328

329

330

331

332

333

334

335

336

337

//Based on ymf825board_sample1

// 音色データの追加と和音演奏

// 音色パラメータによる音色データの生成

// 西洋音階での演奏

Conditions only for Arduino UNO

RST_N- Pin9

SS - Pin10

MOSI - Pin11

MISO - Pin12

SCK - Pin13

#include <SPI.h>

//0 :5V 1:3.3V

#define OUTPUT_power 0

const int RST_Pin = 9;

const int slaveSelectPin = 10;

//西洋音階

int noteFnum[12]={357,378,401,425,450,477,505,535,567,601,637,674};//ピアノの白鍵黒鍵

int wholeStep[7]={0,2,4,5,7,9,11};//ドレミファソラシ

//音色パラメーター(Yamahaの音色設計から抽出)

int const TONES=4;

//GrandPiano,TenorSax,NewAgePd,PickBass

byte BO[TONES]= {0x01,0x00,0x00,0x00};//0-3

byte LFO[TONES]= {0x01,0x01,0x01,0x01};//0-3

byte ALG[TONES]= {0x03,0x05,0x05,0x03};//0-7

byte SR[TONES][4]={ {0x00,0x02,0x01,0x02},

{0x00,0x00,0x00,0x00},

{0x03,0x04,0x00,0x00},

{0x02,0x04,0x02,0x06}};//0-7

byte XOF[TONES][4]={ {0x00,0x00,0x00,0x00},

{0x00,0x00,0x00,0x00},

{0x00,0x00,0x00,0x00}};//0-1

byte KSR[TONES][4]={ {0x00,0x01,0x00,0x01},

{0x01,0x00,0x01,0x00},

{0x01,0x00,0x00,0x00},

{0x01,0x01,0x01,0x01}};//0-1

byte RR[TONES][4]={ {0x06,0x03,0x04,0x06},

{0x00,0x09,0x00,0x09},

{0x03,0x06,0x06,0x08}};//0-15

byte DR[TONES][4]={ {0x07,0x03,0x01,0x02},

{0x03,0x02,0x03,0x02},

{0x0F,0x07,0x01,0x01},

{0x07,0x0b,0x09,0x02}};//0-15

byte AR[TONES][4]={ {0x0F,0x0E,0x0D,0x0D},

{0x07,0x07,0x07,0x07},

{0x0F,0x0F,0x06,0x08},

{0x0f,0x0c,0x0f,0x0b}};//0-15

byte SL[TONES][4]={ {0x0f,0x02,0x03,0x04},

{0x00,0x00,0x00,0x00},

{0x00,0x00,0x00,0x01},

{0x01,0x07,0x02,0x06}};//0-15

byte TL[TONES][4]={ {0x27,0x28,0x22,0x00},

{0x05,0x0f,0x08,0x0d},

{0x26,0x0b,0x18,0x00},

{0x13,0x15,0x17,0x00}};//0-63

byte KSL[TONES][4]={ {0x01,0x03,0x00,0x02},

{0x02,0x00,0x02,0x02},

{0x00,0x02,0x02,0x02},

{0x02,0x00,0x02,0x00}};//0-3

byte DAM[TONES][4]={ {0x00,0x00,0x00,0x00},

{0x02,0x02,0x02,0x02},

{0x02,0x02,0x00,0x00},

{0x02,0x02,0x02,0x02}};//0-3

byte EAM[TONES][4]={ {0x00,0x00,0x00,0x00},

{0x00,0x00,0x00,0x00},

{0x00,0x00,0x00,0x00}};//0-1

byte DVB[TONES][4]={ {0x00,0x00,0x00,0x00},

{0x02,0x01,0x02,0x01},

{0x02,0x02,0x01,0x01},

{0x02,0x02,0x02,0x02}};//0-3

byte EVB[TONES][4]={ {0x00,0x00,0x01,0x01},

{0x00,0x01,0x00,0x01},

{0x00,0x00,0x01,0x01},

{0x00,0x00,0x01,0x01}};//0-1

byte MULTI[TONES][4]={ {0x01,0x05,0x01,0x01},

{0x01,0x01,0x01,0x01},

{0x07,0x05,0x01,0x01},

{0x01,0x07,0x02,0x01}};//0-15

byte DT[TONES][4]={ {0x00,0x00,0x00,0x00},

{0x00,0x00,0x00,0x00},

{0x00,0x00,0x07,0x00},

{0x00,0x00,0x00,0x00}};//0-7

byte WS[TONES][4]={ {0x08,0x00,0x00,0x00},

{0x01,0x08,0x09,0x00},

{0x01,0x00,0x01,0x00},

{0x00,0x00,0x00,0x00}};//0-31

byte FB[TONES][4]={ {0x00,0x00,0x00,0x00},

{0x03,0x00,0x03,0x00},

{0x05,0x00,0x06,0x00},

{0x05,0x00,0x00,0x00}};//0-7

void setup() {

// put your setup code here, to run once:

Serial.begin(9600);

Serial.println("ymf825_demo180213");

pinMode(RST_Pin,OUTPUT);

pinMode(slaveSelectPin,OUTPUT);

digitalWrite(slaveSelectPin, HIGH);

SPI.setBitOrder(MSBFIRST);

SPI.setClockDivider(SPI_CLOCK_DIV8);

SPI.setDataMode(SPI_MODE0);

SPI.begin();

init_825();

set_tone();

set_ch();

}

void loop() {

for(int t=0;t<4;t++){

for(int i=0;i<3;i++){

midiNote(t, 0, 24);

midiNote(t, 1, 28);

midiNote(t, 2, 31);

delay(200);

keyoffVn(0);

keyoffVn(1);

keyoffVn(2);

delay(10);

}

for(int i=0;i<3;i++){

midiNote(t, 0, 31);

midiNote(t, 1, 36);

midiNote(t, 2, 40);

delay(400);

keyoffVn(0);

keyoffVn(1);

keyoffVn(2);

delay(10);

}

for(int i=0;i<3;i++){

midiNote(t, 0, 40);

midiNote(t, 1, 43);

midiNote(t, 2, 48);

delay(200);

keyoffVn(0);

keyoffVn(1);

keyoffVn(2);

delay(10);

}

delay(0);

for(int i=1;i<8;i++){

for(int j=0;j<7;j++){

int note0=i*12 + wholeStep[j];

int note1=(7-i)*12+wholeStep[(6-j)];

midiNote(t, 0, note0);

midiNote(t, 1, note1);

delay(200);

keyoffVn(0);

keyoffVn(1);

delay(10);

}

for(int i=7;i>=1;i--){

for(int j=6;j>=0;j--){

int note=i*12 + wholeStep[j];

midiNote(t, 0, note);

delay(200);

keyoffVn(0);

delay(10);

}

delay(2000);

}

void midiNote(int tnum, int voice, int note){

int fnum=noteFnum[note%12];

byte block=(byte)note/12;

byte fnumh=((0x380 & fnum)>>4)|block; //(0,0,f9,f8,f7,b2,b1,b0)

byte fnuml=0x7f&fnum; //(0,f6,f5,f4,f3,f2,f1,f0)

keyonVn(tnum,voice,fnumh,fnuml);

}

void init_825(void) {

digitalWrite(RST_Pin, LOW);

delay(1);

digitalWrite(RST_Pin, HIGH);

if_s_write( 0x1D, OUTPUT_power );

if_s_write( 0x02, 0x0E );

delay(1);

if_s_write( 0x00, 0x01 );//CLKEN

if_s_write( 0x01, 0x00 ); //AKRST

if_s_write( 0x1A, 0xA3 );

delay(1);

if_s_write( 0x1A, 0x00 );

delay(30);

if_s_write( 0x02, 0x04 );//AP1,AP3

delay(1);

if_s_write( 0x02, 0x00 );

//add

if_s_write( 0x19, 0xF0 );//MASTER VOL

if_s_write( 0x1B, 0x3F );//interpolation

if_s_write( 0x14, 0x00 );//interpolation

if_s_write( 0x03, 0x01 );//Analog Gain

if_s_write( 0x08, 0xF6 );

delay(21);

if_s_write( 0x08, 0x00 );

if_s_write( 0x09, 0xF8 );

if_s_write( 0x0A, 0x00 );

if_s_write( 0x17, 0x40 );//MS_S

if_s_write( 0x18, 0x00 );

}

void set_ch(void){

if_s_write( 0x0F, 0x30 );// keyon = 0

if_s_write( 0x10, 0x71 );// chvol

if_s_write( 0x11, 0x00 );// XVB

if_s_write( 0x12, 0x08 );// FRAC

if_s_write( 0x13, 0x00 );// FRAC

}

void keyonVn(unsigned char tnum, unsigned char voice, unsigned char fnumh, unsigned char fnuml){

byte keyTone=0x40|(tnum&0x0f);

if_s_write( 0x0B, voice );//voice num

if_s_write( 0x0C, 0x54 );//vovol

if_s_write( 0x0D, fnumh );//fnum

if_s_write( 0x0E, fnuml );//fnum

if_s_write( 0x0F, keyTone );//keyon = 1

}

void keyoffVn(unsigned char voice){

if_s_write( 0x0B, voice );//voice num

if_s_write( 0x0F, 0x00 );//keyon = 0

}

void set_tone(){

int const COUNT=TONES*30+5;

byte tone_data[COUNT];

tone_data[0]=0x80+TONES;//Header

for(int i=0;i<TONES;i++){

tone_data[1+i*30]=BO[i] & 0x03;

tone_data[2+i*30]=(LFO[i]<<6)|(ALG[i]&0x07);

tone_data[3+i*30]=(SR[i][0]<<4)|(XOF[i][0]<<3)|KSR[i][0];

tone_data[10+i*30]=(SR[i][1]<<4)|(XOF[i][1]<<3)|KSR[i][1];

tone_data[17+i*30]=(SR[i][2]<<4)|(XOF[i][2]<<3)|KSR[i][2];

tone_data[24+i*30]=(SR[i][3]<<4)|(XOF[i][3]<<3)|KSR[i][3];

tone_data[4+i*30]=(RR[i][0]<<4)|DR[i][0];

tone_data[11+i*30]=(RR[i][1]<<4)|DR[i][1];

tone_data[18+i*30]=(RR[i][2]<<4)|DR[i][2];

tone_data[25+i*30]=(RR[i][3]<<4)|DR[i][3];

tone_data[5+i*30]=(AR[i][0]<<4)|SL[i][0];

tone_data[12+i*30]=(AR[i][1]<<4)|SL[i][1];

tone_data[19+i*30]=(AR[i][2]<<4)|SL[i][2];

tone_data[26+i*30]=(AR[i][3]<<4)|SL[i][3];

tone_data[6+i*30]=(TL[i][0]<<2)|KSL[i][0];

tone_data[13+i*30]=(TL[i][1]<<2)|KSL[i][1];

tone_data[20+i*30]=(TL[i][2]<<2)|KSL[i][2];

tone_data[27+i*30]=(TL[i][3]<<2)|KSL[i][3];

tone_data[7+i*30]=(DAM[i][0]<<5)|(EAM[i][0]<<4)|(DVB[i][0]<<1)|EVB[i][0];

tone_data[14+i*30]=(DAM[i][1]<<5)|(EAM[i][1]<<4)|(DVB[i][1]<<1)|EVB[i][1];

tone_data[21+i*30]=(DAM[i][2]<<5)|(EAM[i][2]<<4)|(DVB[i][2]<<1)|EVB[i][2];

tone_data[28+i*30]=(DAM[i][3]<<5)|(EAM[i][3]<<4)|(DVB[i][3]<<1)|EVB[i][3];

tone_data[8+i*30]=(MULTI[i][0]<<4)|DT[i][0];

tone_data[15+i*30]=(MULTI[i][1]<<4)|DT[i][1];

tone_data[22+i*30]=(MULTI[i][2]<<4)|DT[i][2];

tone_data[29+i*30]=(MULTI[i][3]<<4)|DT[i][3];

tone_data[9+i*30]=(WS[i][0]<<3)|FB[i][0];

tone_data[16+i*30]=(WS[i][1]<<3)|FB[i][1];

tone_data[23+i*30]=(WS[i][2]<<3)|FB[i][2];

tone_data[30+i*30]=(WS[i][3]<<3)|FB[i][3];

}

//modified at 180213

tone_data[1+TONES*30]=0x80;//Footer

tone_data[2+TONES*30]=0x03;

tone_data[3+TONES*30]=0x81;

tone_data[4+TONES*30]=0x80;

if_s_write( 0x08, 0xF6 );

delay(1);

if_s_write( 0x08, 0x00 );

if_write( 0x07, &tone_data[0], TONES*30+5 );//write to FIFO

}

void if_write(char addr,unsigned char* data,char num){

char i;

char snd;

digitalWrite(slaveSelectPin, LOW);

SPI.transfer(addr);

for(i=0;i<num;i++){

SPI.transfer(data[i]);

}

digitalWrite(slaveSelectPin, HIGH);

}

void if_s_write(char addr,unsigned char data){

if_write(addr,&data,1);

}

unsigned char if_s_read(char addr){

unsigned char rcv;

digitalWrite(slaveSelectPin, LOW);

SPI.transfer(0x80|addr);

rcv = SPI.transfer(0x00);

digitalWrite(slaveSelectPin, HIGH);

return rcv;

}

(18.02.09)

参考にさせてもらったサイト

https://kanpapa.com/today/2017/08/ymf825-fm-board.html

https://sites.google.com/site/himagine201206/home/arduino/ymf825/030

NeoPixelのDemo

ArduinoのNeoPixelライブラリのサンプルは参考になりますが、盛りだくさん過ぎて分かりにくい印象があります。

シンプルでカラフルに書いてみました。

#include <Adafruit_NeoPixel.h>


#define PIN 2
#define NUMPIXELS 14
Adafruit_NeoPixel led = Adafruit_NeoPixel(NUMPIXELS, PIN, NEO_GRB + NEO_KHZ800);

void setup() {
  Serial.begin(9600);
  Serial.println("colorSweepTwisted");
  led.begin();
  led.show();
}

void loop() {
  for(int hue=0;hue<360;hue++){
    for(int j=0;j<NUMPIXELS;j++){
      float tw=360.0/NUMPIXELS*j;
      led.setPixelColor(j, hsv2rgb(hue+tw, 1.0, 0.2));
    }
    led.show();
    delay(5);
  }
}

int within(int p,int R){
  int res=p%R;
  if(res<0){
    res=res+R;
  }
  return res;
}

//Based on https://github.com/ratkins/RGBConverter/blob/master/RGBConverter.cpp
//h(0-360),s(0.0-1.0),v(0.0-1.0)
uint32_t hsv2rgb(float h, float s, float v) {
    float r, g, b;
    h=within(h,360);
    h=h/360;

    int i = int(h * 6);
    float f = h * 6 - i;
    float p = v * (1 - s);
    float q = v * (1 - f * s);
    float t = v * (1 - (1 - f) * s);

    switch(i % 6){
        case 0: r = v, g = t, b = p; break;
        case 1: r = q, g = v, b = p; break;
        case 2: r = p, g = v, b = t; break;
        case 3: r = p, g = q, b = v; break;
        case 4: r = t, g = p, b = v; break;
        case 5: r = v, g = p, b = q; break;
    }
    r=int(r*255),g=int(g*255),b=int(b*255);
    return led.Color(r, g, b);
}

#include <Adafruit_NeoPixel.h>

#define PIN 2

#define NUMPIXELS 14

Adafruit_NeoPixel led = Adafruit_NeoPixel(NUMPIXELS, PIN, NEO_GRB + NEO_KHZ800);

void setup() {

Serial.begin(9600);

Serial.println("colorSweepTwisted");

led.begin();

led.show();

}

void loop() {

for(int hue=0;hue<360;hue++){

for(int j=0;j<NUMPIXELS;j++){

float tw=360.0/NUMPIXELS*j;

led.setPixelColor(j, hsv2rgb(hue+tw, 1.0, 0.2));

}

led.show();

delay(5);

}

int within(int p,int R){

int res=p%R;

if(res<0){

res=res+R;

}

return res;

}

//Based on https://github.com/ratkins/RGBConverter/blob/master/RGBConverter.cpp

//h(0-360),s(0.0-1.0),v(0.0-1.0)

uint32_t hsv2rgb(float h, float s, float v) {

float r, g, b;

h=within(h,360);

h=h/360;

int i = int(h * 6);

float f = h * 6 - i;

float p = v * (1 - s);

float q = v * (1 - f * s);

float t = v * (1 - (1 - f) * s);

switch(i % 6){

case 0: r = v, g = t, b = p; break;

case 1: r = q, g = v, b = p; break;

case 2: r = p, g = v, b = t; break;

case 3: r = p, g = q, b = v; break;

case 4: r = t, g = p, b = v; break;

case 5: r = v, g = p, b = q; break;

}

r=int(r*255),g=int(g*255),b=int(b*255);

return led.Color(r, g, b);

}

ついでに、「グルグル巻けば円筒ディスプレイ」用のDemoプログラムも紹介します。10mmピッチのLEDを200個φ60mm(よりも少し太い)のボトルに巻きつけました。一周21個で縦に9個の(狙いは20個✖️10個でしたが、)円筒ディスプレイです。

#include <Adafruit_NeoPixel.h>
#define PIN 2
#define NUMPIXELS 200
#define WNUM 21
#define HNUM 9

Adafruit_NeoPixel led = Adafruit_NeoPixel(NUMPIXELS, PIN, NEO_GRB + NEO_KHZ800);

void setup() {
  Serial.begin(9600);
  Serial.println("ColorCylinder");
  led.begin();
  led.show(); // Initialize all pixels to 'off'
}

void loop() {
  test1to100(hsv2rgb(45, 1, 0.1));
  
  movingPoints(150);
  
  for(int i=0;i<6;i++){
    testH_line(hsv2rgb(15+i*60, 1, 0.1));
  }
  
  for(int i=0;i<6;i++){
    testV_line(hsv2rgb(30+i*60, 1, 0.1));
  }

  testColor();
  
  for(int i=0;i<3;i++){
    SevenColorRings();
  }
}

//function

void test1to100(uint32_t c){
  for(int i; i<NUMPIXELS;i++){
    baseColor(led.Color(0, 5, 0));
    for(int j=0;j<10;j++){
      led.setPixelColor(i+j, hsv2rgb(180, 1, 0.1));
    }
    led.setPixelColor(i, hsv2rgb(180, 1, 0.1));
    led.show();
    delay(10);
  }
}

void movingPoints(int rpt){
  int x=0;
  int y=0;
  int pNUM=8;
  int xt,yt,p,points[pNUM][2];
  for(int i=0;i<rpt;i++){
    boolean TRY=true;
    int count=0;
    while(TRY && count<10){
      xt=x;
      yt=y;
      int r=random(0,4);
      switch(r){
        case 0:xt=xt-1;break;
        case 1:xt=xt+1;break;
        case 2:yt=yt-1;break;
        case 3:yt=yt+1;break;
        default:break;
      }
      xt=within(xt,WNUM);
      yt=within(yt,HNUM);
      int s=0;
      TRY=false;
      while(s<pNUM){
        if(points[s][0]==xt && points[s][1]==yt){
          TRY=true;
          s=pNUM;
        }
        s++;
      }
      count++;
    }
    x=xt;
    y=yt;
    p=i%pNUM;
    points[p][0]=x;
    points[p][1]=y;
    baseColor(led.Color(0, 5, 0));
    for(int j=0;j<pNUM;j++){
      led.setPixelColor(points[j][1]*WNUM+points[j][0], led.Color(5, 0, 0));
      led.setPixelColor(points[j][1]*WNUM+within((points[j][0]+10),WNUM), led.Color(0, 0, 5));
    }
    led.show();
    delay(50);
  }
}

void testH_line(uint32_t c){
  for(int i=0;i<HNUM;i++){
    baseColor(led.Color(0, 5, 0));
    for(int j=0;j<WNUM;j++){
      led.setPixelColor(j+(i*WNUM), c);
    }
    led.show();
    delay(50);
  }
}

void testV_line(uint32_t c){
  for(int i=0;i<WNUM;i++){
    baseColor(led.Color(0, 5, 0));
    for(int j=0;j<HNUM;j++){
      led.setPixelColor(i+(j*WNUM), c);
    }
    led.show();
    delay(25);
  }
}


void testColor(){
  for(int i=0;i<360;i++){
    baseColor(hsv2rgb(i,1,0.05));
    led.show();
    delay(20);
  }
}


void SevenColorRings(){
  //uint32_t SvnC[]={Wheel(0,0.1),Wheel(60,0.1),Wheel(120,0.1),Wheel(180,0.1),Wheel(240,0.1),Wheel(300,0.1)};
  uint32_t SvnC[]={hsv2rgb(0,1,0.1),hsv2rgb(60,1,0.1),hsv2rgb(120,1,0.1),hsv2rgb(180,1,0.1),hsv2rgb(240,1,0.1),hsv2rgb(300,1,0.1),hsv2rgb(300,0,0.1)};
  for(int i=0;i<7;i++){
    for(int j=0;j<HNUM;j++){
      setColorRing(j, SvnC[(i+j)%7]);
    }
    led.show();
    delay(200);
  }
  
  
}

void setColorRing(int hpos, uint32_t c){
  hpos=within(hpos,HNUM);
  for(int i=0;i<WNUM;i++){
    led.setPixelColor(i+(hpos*WNUM), c);
  }
}


int within(int p,int R){
  int res=p%R;
  if(res<0){
    res=res+R;
  }
  return res;
}

void baseColor(uint32_t c){
  for(int i=0;i<NUMPIXELS;i++){
    led.setPixelColor(i,c);
  }
}

//Based on https://github.com/ratkins/RGBConverter/blob/master/RGBConverter.cpp
//h(0-360),s(0.0-1.0),v(0.0-1.0)
uint32_t hsv2rgb(float h, float s, float v) {
    float r, g, b;
    h=within(h,360);
    h=h/360;

    int i = int(h * 6);
    float f = h * 6 - i;
    float p = v * (1 - s);
    float q = v * (1 - f * s);
    float t = v * (1 - (1 - f) * s);

    switch(i % 6){
        case 0: r = v, g = t, b = p; break;
        case 1: r = q, g = v, b = p; break;
        case 2: r = p, g = v, b = t; break;
        case 3: r = p, g = q, b = v; break;
        case 4: r = t, g = p, b = v; break;
        case 5: r = v, g = p, b = q; break;
    }
    r=int(r*255),g=int(g*255),b=int(b*255);
    return led.Color(r, g, b);
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

#include <Adafruit_NeoPixel.h>

#define PIN 2

#define NUMPIXELS 200

#define WNUM 21

#define HNUM 9

Adafruit_NeoPixel led = Adafruit_NeoPixel(NUMPIXELS, PIN, NEO_GRB + NEO_KHZ800);

void setup() {

Serial.begin(9600);

Serial.println("ColorCylinder");

led.begin();

led.show(); // Initialize all pixels to 'off'

}

void loop() {

test1to100(hsv2rgb(45, 1, 0.1));

movingPoints(150);

for(int i=0;i<6;i++){

testH_line(hsv2rgb(15+i*60, 1, 0.1));

}

for(int i=0;i<6;i++){

testV_line(hsv2rgb(30+i*60, 1, 0.1));

}

testColor();

for(int i=0;i<3;i++){

SevenColorRings();

}

//function

void test1to100(uint32_t c){

for(int i; i<NUMPIXELS;i++){

baseColor(led.Color(0, 5, 0));

for(int j=0;j<10;j++){

led.setPixelColor(i+j, hsv2rgb(180, 1, 0.1));

}

led.setPixelColor(i, hsv2rgb(180, 1, 0.1));

led.show();

delay(10);

}

void movingPoints(int rpt){

int x=0;

int y=0;

int pNUM=8;

int xt,yt,p,points[pNUM][2];

for(int i=0;i<rpt;i++){

boolean TRY=true;

int count=0;

while(TRY && count<10){

xt=x;

yt=y;

int r=random(0,4);

switch(r){

case 0:xt=xt-1;break;

case 1:xt=xt+1;break;

case 2:yt=yt-1;break;

case 3:yt=yt+1;break;

default:break;

}

xt=within(xt,WNUM);

yt=within(yt,HNUM);

int s=0;

TRY=false;

while(s<pNUM){

if(points[s][0]==xt && points[s][1]==yt){

TRY=true;

s=pNUM;

}

s++;

}

count++;

}

x=xt;

y=yt;

p=i%pNUM;

points[p][0]=x;

points[p][1]=y;

baseColor(led.Color(0, 5, 0));

for(int j=0;j<pNUM;j++){

led.setPixelColor(points[j][1]*WNUM+points[j][0], led.Color(5, 0, 0));

led.setPixelColor(points[j][1]*WNUM+within((points[j][0]+10),WNUM), led.Color(0, 0, 5));

}

led.show();

delay(50);

}

void testH_line(uint32_t c){

for(int i=0;i<HNUM;i++){

baseColor(led.Color(0, 5, 0));

for(int j=0;j<WNUM;j++){

led.setPixelColor(j+(i*WNUM), c);

}

led.show();

delay(50);

}

void testV_line(uint32_t c){

for(int i=0;i<WNUM;i++){

baseColor(led.Color(0, 5, 0));

for(int j=0;j<HNUM;j++){

led.setPixelColor(i+(j*WNUM), c);

}

led.show();

delay(25);

}

void testColor(){

for(int i=0;i<360;i++){

baseColor(hsv2rgb(i,1,0.05));

led.show();

delay(20);

}

void SevenColorRings(){

//uint32_t SvnC[]={Wheel(0,0.1),Wheel(60,0.1),Wheel(120,0.1),Wheel(180,0.1),Wheel(240,0.1),Wheel(300,0.1)};

uint32_t SvnC[]={hsv2rgb(0,1,0.1),hsv2rgb(60,1,0.1),hsv2rgb(120,1,0.1),hsv2rgb(180,1,0.1),hsv2rgb(240,1,0.1),hsv2rgb(300,1,0.1),hsv2rgb(300,0,0.1)};

for(int i=0;i<7;i++){

for(int j=0;j<HNUM;j++){

setColorRing(j, SvnC[(i+j)%7]);

}

led.show();

delay(200);

}

void setColorRing(int hpos, uint32_t c){

hpos=within(hpos,HNUM);

for(int i=0;i<WNUM;i++){

led.setPixelColor(i+(hpos*WNUM), c);

}

int within(int p,int R){

int res=p%R;

if(res<0){

res=res+R;

}

return res;

}

void baseColor(uint32_t c){

for(int i=0;i<NUMPIXELS;i++){

led.setPixelColor(i,c);

}

//Based on https://github.com/ratkins/RGBConverter/blob/master/RGBConverter.cpp

//h(0-360),s(0.0-1.0),v(0.0-1.0)

uint32_t hsv2rgb(float h, float s, float v) {

float r, g, b;

h=within(h,360);

h=h/360;

int i = int(h * 6);

float f = h * 6 - i;

float p = v * (1 - s);

float q = v * (1 - f * s);

float t = v * (1 - (1 - f) * s);

switch(i % 6){

case 0: r = v, g = t, b = p; break;

case 1: r = q, g = v, b = p; break;

case 2: r = p, g = v, b = t; break;

case 3: r = p, g = q, b = v; break;

case 4: r = t, g = p, b = v; break;

case 5: r = v, g = p, b = q; break;

}

r=int(r*255),g=int(g*255),b=int(b*255);

return led.Color(r, g, b);

}

ESP32のArduino IDEでBLEを試してみました

ESP32はWiFiに加えてBLEも使えるということで注目されています。Arduino IDEでは、2017年の10月頃からBLEがサポートされ始めました。

ボードも入手しやすくなってMH-ET LIVE D1 mini ESP32という小型のボードは$7.5ぐらいでAliExpressで購入できました。

https://ja.aliexpress.com/item/MH-ET-LIVE-D1-mini-ESP32-ESP-32-WiFi-Bluetooth-Internet-of-Things-development-board-based/32816658883.html?spm=a2g0s.9042311.0.0.Zbsxqj

今回はそのESP32を2個使って、サーバーとクライアントで動作させてみました。どちらもArduino IDEでプログラミングできるので楽なのではないかと思います。サーバーには照度センサーNJL7502Lがあり、クライアントが接続すると照度のデータを送ります。クライアントが接続している間はゆらゆら人形が揺れます。クライアントはデータをもらってシリアルでPCにデータを表示します。

電気回路：
3.3Vを照度センサの+側(長い足)、照度センサの-側(短い足)は10kΩでGNDに接続して、短い足の電圧をアナログ入力AI6(IO34)に接続します。データシートを見ると1000luxで３Vの出力になるようです。ゆらゆら人形はIO5とGNDに接続します。ゆらゆら人形はDaisoのソーラーゆらゆらを改造して、コイル両端を回路から外して外部に取り出します。
クライアント側はUSBでPCに接続します。

BLEライブラリの導入には以下のURLの情報を参考にしました。
「Arduino IDEでESP32 BLEライブラリを導入」
https://qiita.com/tomorrow56/items/afa06e206eec9fafcc7a

BLEライブラリはArduinoっぽくないので、「山勘で書いて、動いた」というレベルですのでもっと良いサンプルを誰かが書いてくれると思います。現状で分かっている問題点としては、サーバーが電源OFFで停止するとクライアントがハングアップして、クライアントの電源をOFF-ONしないと復帰しない点です。

サーバー側のスケッチ（ベースにしたのはBLE_notify）

//https://dotstud.io/blog/nefrybt-ble-bluetooth-peripheral/

#include <BLEDevice.h>
#include <BLEServer.h>
#include <BLEUtils.h>
#include <BLE2902.h>

BLECharacteristic *pCharacteristic;
bool deviceConnected = false;
int value = 0;
const int analogInPin = A6;
int sensorValue = 0;

// See the following for generating UUIDs:
// https://www.uuidgenerator.net/


#define SERVICE_UUID        "81d78b05-4e0a-4644-b364-b79312e4c307"
#define CHARACTERISTIC_UUID "0989bf07-e886-443e-82db-7108726bb650"
#define SERVER_NAME         "esp32devc"

class MyServerCallbacks: public BLEServerCallbacks {
    void onConnect(BLEServer* pServer) {
      deviceConnected = true;
    };

    void onDisconnect(BLEServer* pServer) {
      deviceConnected = false;
    }
};

void setup() {
  Serial.begin(115200);
  Serial.println("BLE_DataServer180130");
  pinMode(5, OUTPUT);
  BLEDevice::init(SERVER_NAME);
  BLEServer *pServer = BLEDevice::createServer();
  pServer->setCallbacks(new MyServerCallbacks());
  BLEService *pService = pServer->createService(SERVICE_UUID);
  pCharacteristic = pService->createCharacteristic(
                      CHARACTERISTIC_UUID,
                      BLECharacteristic::PROPERTY_READ   |
                      BLECharacteristic::PROPERTY_WRITE  |
                      BLECharacteristic::PROPERTY_NOTIFY |
                      BLECharacteristic::PROPERTY_INDICATE
                    );

  pCharacteristic->addDescriptor(new BLE2902());
  pService->start();
  pServer->getAdvertising()->start();
  Serial.println("Waiting a client connection to notify...");
}

void loop() {

  if (deviceConnected) {
    Serial.printf("*** NOTIFY: %d ***\n", value);
    char buffer[10];
    sensorValue = analogRead(analogInPin);
    value=map(sensorValue, 0, 4095, 0, 1100);
    //sprintf(buffer, "%d", sensorValue);
    sprintf(buffer, "%d", value);
    Serial.printf(buffer);
    pCharacteristic->setValue(buffer);
    pCharacteristic->notify();
    digitalWrite(5, HIGH);   // turn the LED on (HIGH is the voltage level)
    delay(30);                       // wait for a second
    digitalWrite(5, LOW);    // turn the LED off by making the voltage LOW
    //value++;
  }
  delay(300);
}

//https://dotstud.io/blog/nefrybt-ble-bluetooth-peripheral/

#include <BLEDevice.h>

#include <BLEServer.h>

#include <BLEUtils.h>

#include <BLE2902.h>

BLECharacteristic *pCharacteristic;

bool deviceConnected = false;

int value = 0;

const int analogInPin = A6;

int sensorValue = 0;

// See the following for generating UUIDs:

// https://www.uuidgenerator.net/

#define SERVICE_UUID "81d78b05-4e0a-4644-b364-b79312e4c307"

#define CHARACTERISTIC_UUID "0989bf07-e886-443e-82db-7108726bb650"

#define SERVER_NAME "esp32devc"

class MyServerCallbacks: public BLEServerCallbacks {

void onConnect(BLEServer* pServer) {

deviceConnected = true;

};

void onDisconnect(BLEServer* pServer) {

deviceConnected = false;

}

};

void setup() {

Serial.begin(115200);

Serial.println("BLE_DataServer180130");

pinMode(5, OUTPUT);

BLEDevice::init(SERVER_NAME);

BLEServer *pServer = BLEDevice::createServer();

pServer->setCallbacks(new MyServerCallbacks());

BLEService *pService = pServer->createService(SERVICE_UUID);

pCharacteristic = pService->createCharacteristic(

CHARACTERISTIC_UUID,

BLECharacteristic::PROPERTY_READ |

BLECharacteristic::PROPERTY_WRITE |

BLECharacteristic::PROPERTY_NOTIFY |

BLECharacteristic::PROPERTY_INDICATE

);

pCharacteristic->addDescriptor(new BLE2902());

pService->start();

pServer->getAdvertising()->start();

Serial.println("Waiting a client connection to notify...");

}

void loop() {

if (deviceConnected) {

Serial.printf("*** NOTIFY: %d ***\n", value);

char buffer[10];

sensorValue = analogRead(analogInPin);

value=map(sensorValue, 0, 4095, 0, 1100);

//sprintf(buffer, "%d", sensorValue);

sprintf(buffer, "%d", value);

Serial.printf(buffer);

pCharacteristic->setValue(buffer);

pCharacteristic->notify();

digitalWrite(5, HIGH); // turn the LED on (HIGH is the voltage level)

delay(30); // wait for a second

digitalWrite(5, LOW); // turn the LED off by making the voltage LOW

//value++;

}

delay(300);

}

クライアント側のスケッチ（ベースにしたのはBLE_client）

//Based on BLE client example
//サーバーが停止するとエラーで回復できない

#include "BLEDevice.h"

#define SERVICE_UUID        "81d78b05-4e0a-4644-b364-b79312e4c307"
#define CHARACTERISTIC_UUID "0989bf07-e886-443e-82db-7108726bb650"
#define SERVER_NAME         "esp32devc"

static BLEUUID  serviceUUID(SERVICE_UUID);
static BLEUUID  charUUID(CHARACTERISTIC_UUID);


static BLEAddress *pServerAddress;
static boolean doConnect = false;
static boolean connected = false;
static BLERemoteCharacteristic* pRemoteCharacteristic;


static void notifyCallback(
  BLERemoteCharacteristic* pBLERemoteCharacteristic,
  uint8_t* pData,
  size_t length,
  bool isNotify) {
    Serial.print("Notify callback for characteristic ");
    Serial.print(pBLERemoteCharacteristic->getUUID().toString().c_str());
    Serial.print(" of data length ");
    Serial.println(length);
}


bool connectToServer(BLEAddress pAddress) {
    Serial.print("Forming a connection to ");
    Serial.println(pAddress.toString().c_str());
    BLEClient*  pClient  = BLEDevice::createClient();
    pClient->connect(pAddress);
    BLERemoteService* pRemoteService = pClient->getService(serviceUUID);
    Serial.print(" - Connected to server :");
    Serial.println(serviceUUID.toString().c_str());
    if (pRemoteService == nullptr) {
      Serial.print("Failed to find our service UUID: ");
      Serial.println(serviceUUID.toString().c_str());
      return false;
    }
    pRemoteCharacteristic = pRemoteService->getCharacteristic(charUUID);
    Serial.print(" - Found our characteristic UUID: ");
    Serial.println(charUUID.toString().c_str());
    if (pRemoteCharacteristic == nullptr) {
      Serial.print("Failed to find our characteristic UUID: ");
      return false;
    }
    Serial.println(" - Found our characteristic");
    pRemoteCharacteristic->registerForNotify(notifyCallback);
}


class MyAdvertisedDeviceCallbacks: public BLEAdvertisedDeviceCallbacks {
  void onResult(BLEAdvertisedDevice advertisedDevice) {
    Serial.print("BLE Advertised Device found: ");
    Serial.println(advertisedDevice.toString().c_str());//Name: esp32devc, Address: 30:ae:a4:02:a3:fe, txPower: -21
    Serial.println(advertisedDevice.getName().c_str());//esp32devc
    
    if(advertisedDevice.getName()==SERVER_NAME){ //
      Serial.println(advertisedDevice.getAddress().toString().c_str());
      advertisedDevice.getScan()->stop();
      pServerAddress = new BLEAddress(advertisedDevice.getAddress());
      doConnect = true;
    }
  }
};


void setup() {
  pinMode(5, OUTPUT);
  Serial.begin(115200);
  Serial.println("BLE_DataClient180130");
  BLEDevice::init("");
  BLEScan* pBLEScan = BLEDevice::getScan();
  Serial.println("getScan");
  pBLEScan->setAdvertisedDeviceCallbacks(new MyAdvertisedDeviceCallbacks());
  Serial.println("setAdvertisedDeviceCallbacks");
  pBLEScan->setActiveScan(true);
  pBLEScan->start(10);
  Serial.println("");
  Serial.println("End of setup");
}


void loop() {
  if (doConnect == true) {
    if (connectToServer(*pServerAddress)) {
      Serial.println("We are now connected to the BLE Server.");
      connected = true;
    } else {
      Serial.println("We have failed to connect to the server; there is nothin more we will do.");
      connected = false;
    }
    doConnect = false;
  }
  if (connected) {
    digitalWrite(5, HIGH);
    std::string value = pRemoteCharacteristic->readValue();
    String strVal=value.c_str();
    int strNum=strVal.toInt();
    Serial.println(strNum);
  } else{
    Serial.println("Not connected");
    doConnect = true;
  }
  delay(1000);
  digitalWrite(5, LOW);
  delay(1000);
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

//Based on BLE client example

//サーバーが停止するとエラーで回復できない

#include "BLEDevice.h"

#define SERVICE_UUID "81d78b05-4e0a-4644-b364-b79312e4c307"

#define CHARACTERISTIC_UUID "0989bf07-e886-443e-82db-7108726bb650"

#define SERVER_NAME "esp32devc"

static BLEUUID serviceUUID(SERVICE_UUID);

static BLEUUID charUUID(CHARACTERISTIC_UUID);

static BLEAddress *pServerAddress;

static boolean doConnect = false;

static boolean connected = false;

static BLERemoteCharacteristic* pRemoteCharacteristic;

static void notifyCallback(

BLERemoteCharacteristic* pBLERemoteCharacteristic,

uint8_t* pData,

size_t length,

bool isNotify) {

Serial.print("Notify callback for characteristic ");

Serial.print(pBLERemoteCharacteristic->getUUID().toString().c_str());

Serial.print(" of data length ");

Serial.println(length);

}

bool connectToServer(BLEAddress pAddress) {

Serial.print("Forming a connection to ");

Serial.println(pAddress.toString().c_str());

BLEClient* pClient = BLEDevice::createClient();

pClient->connect(pAddress);

BLERemoteService* pRemoteService = pClient->getService(serviceUUID);

Serial.print(" - Connected to server :");

Serial.println(serviceUUID.toString().c_str());

if (pRemoteService == nullptr) {

Serial.print("Failed to find our service UUID: ");

Serial.println(serviceUUID.toString().c_str());

return false;

}

pRemoteCharacteristic = pRemoteService->getCharacteristic(charUUID);

Serial.print(" - Found our characteristic UUID: ");

Serial.println(charUUID.toString().c_str());

if (pRemoteCharacteristic == nullptr) {

Serial.print("Failed to find our characteristic UUID: ");

return false;

}

Serial.println(" - Found our characteristic");

pRemoteCharacteristic->registerForNotify(notifyCallback);

}

class MyAdvertisedDeviceCallbacks: public BLEAdvertisedDeviceCallbacks {

void onResult(BLEAdvertisedDevice advertisedDevice) {

Serial.print("BLE Advertised Device found: ");

Serial.println(advertisedDevice.toString().c_str());//Name: esp32devc, Address: 30:ae:a4:02:a3:fe, txPower: -21

Serial.println(advertisedDevice.getName().c_str());//esp32devc

if(advertisedDevice.getName()==SERVER_NAME){ //

Serial.println(advertisedDevice.getAddress().toString().c_str());

advertisedDevice.getScan()->stop();

pServerAddress = new BLEAddress(advertisedDevice.getAddress());

doConnect = true;

}

};

void setup() {

pinMode(5, OUTPUT);

Serial.begin(115200);

Serial.println("BLE_DataClient180130");

BLEDevice::init("");

BLEScan* pBLEScan = BLEDevice::getScan();

Serial.println("getScan");

pBLEScan->setAdvertisedDeviceCallbacks(new MyAdvertisedDeviceCallbacks());

Serial.println("setAdvertisedDeviceCallbacks");

pBLEScan->setActiveScan(true);

pBLEScan->start(10);

Serial.println("");

Serial.println("End of setup");

}

void loop() {

if (doConnect == true) {

if (connectToServer(*pServerAddress)) {

Serial.println("We are now connected to the BLE Server.");

connected = true;

} else {

Serial.println("We have failed to connect to the server; there is nothin more we will do.");

connected = false;

}

doConnect = false;

}

if (connected) {

digitalWrite(5, HIGH);

std::string value = pRemoteCharacteristic->readValue();

String strVal=value.c_str();

int strNum=strVal.toInt();

Serial.println(strNum);

} else{

Serial.println("Not connected");

doConnect = true;

}

delay(1000);

digitalWrite(5, LOW);

delay(1000);

}

LabVIEWでミニCNCフライスを制御して測定治具にする方法

部品の検査で複数箇所の寸法を測定するときに、３軸ステージにセンサーを載せてセンサーを移動させて測定する場合がよくあります。安価なCNCフライス組み立てキット(送料込みで$220)を見ていると、まさに３軸ステージです。測定をLabVIEWで行うとするとCNCフライスもLabVIEWで制御した方が治具としては効率的に運用できるはずです。

このCNCフライスはGrblという制御用ファームウェアでG-codeを受けてステッピングモーターのパルスと主軸用PWMを生成しています。そしてGrblはAtmega328pチップを使用するArduinoボードに書き込めるオープンソースのファームウェアなのです。CNCキットを使わない場合でも、パルスモーターを使った計測治具をArduinoとGrblを使ってLabVIEWで制御したら簡単で便利です。

さて、G-codeは3軸から6軸のCNC工作機械に使用される数値制御用プログラム言語です。NISTのG-code標準書「The NIST RS274NGC Interpreter」はありますが、メーカー毎の独自規格が用いられているようです。Grblの開発は「LinuxCNC」を参考に進められているとのことですから、Grblで使用するG-codeについてはGrblの資料とLinuxCNCがレファレンスになります。

G-codeはコマンドとパラメータを行単位で記述して機械の動作を指示します。
例えば、「G1 X30.0 Y10.0 F250」は、250という速度(F250)で、XY座標の(30.0, 10.0)まで直線的に移動(G1)するという指示です。mmやinchなどの単位系の指定や絶対座標あるいは相対座標などの座標系の選択は事前に指示されているものが使われます。

G-codeプログラムは、一連の動作をG-codeで記述したものをテキストファイルで保存します。PCからG-codeプログラムをGrblなどのファームウェアに送るアプリケーションをG-code Senderといいます。Grblで使えるG-code Senderとしては[bCNC]や[Universal G-code Sender]など多くの種類があります。フライスの軌跡表示、ボタンによるマニュアル移動、先読みバッファへの効率的なコマンド発信など機能が充実しています。LabVIEWでG-code Senderを作成する意味合いは、G-codeとGrblを使った簡便で安価な位置制御と計測とを統合することにあります。

生産者・消費者デザインパターンで、UIイベントループ、G-code送信&レスポンス受信ループを作成し、さらに測定ルーチン用にループを追加しました。G-codeではカッコ内はコメントとして受け取られるので、UIイベントループから”(measure)”を送信することで測定用のキューを生成し、測定ループの動作タイミングを作り出しています。

測定のための動作例を紹介します。ワーク座標の原点(0,0,0)に移動し、3秒待機した後、250の速度で(20,20,0)に直線補完で移動します。0.5秒待機し、(Measure)というコメントを受けます。LabVIEWプログラムでは(Measure)をトリガーにして測定を行います。測定に要する3秒待機した後、原点に戻ります。

プログラム                [意味]
G90                       絶対座標　(G91：相対座標)
G0 X0.0 Y0.0 Z0.0         指定座標に急速移動
G04 P3                    3秒待機
G1 X20.0 Y20.0 F250       座標(20,20)に直線補完で速度250で移動
G04 P0.5                  0.5秒待機
(Measure)                 コメント文を利用して測定タイミングを指示
G04 P3                    3秒待機
G0 X0.0 Y0.0              指定座標に急速移動
M02                       プログラム終了

プログラム [意味]

G90 絶対座標　(G91：相対座標)

G0 X0.0 Y0.0 Z0.0 指定座標に急速移動

G04 P3 3秒待機

G1 X20.0 Y20.0 F250 座標(20,20)に直線補完で速度250で移動

G04 P0.5 0.5秒待機

(Measure) コメント文を利用して測定タイミングを指示

G04 P3 3秒待機

G0 X0.0 Y0.0 指定座標に急速移動

M02 プログラム終了

GrblはAtmega328pチップを使用するArduinoボード（Uno, Duemilanove, Nano, Micro, etc）で動作します。ArduinoのSketchではありませんが、ブートローダ領域を残したまま書き込むことができるとのことです。GitHub-gnea/grblからZipファイルをダウンロードしてArduino IDEにライブラリとして追加します。サンプルフォルダにある「grblUpload.ino」を開いて「マイコンボードに書き込む」ボタンを押すと書き込まれてGrblが動き出します。

UNOの場合のピン配置は次のようになっています。
D2/D5:X軸Step Pulse / X軸Direction
D3/D6:Y軸Step Pulse / Y軸Direction
D4/D7:Z軸Step Pulse / Z軸Direction
D8:Stepper Enable/Disable
D9:X軸Limit SW
D10:Y軸Limit SW
D11:主軸PWM
D12:Z軸Limit SW
D13:主軸回転Direction

A0:Reset/Abort (DI Pullup)
A1:Feed hold (DI Pullup)
A2:Cycle Start/Resume (DI Pullup)
A3:Coolant Enable
A4:(NotUsed/Reserved)
A5:Probe

AVRチップの優れた機能を駆使して精密なタイミングと非同期の動作を実現し、30kHzまでジッターなしで制御できているとのことです。

Grblではパルスモーターなどハードウェアに関連するパラメータを$xxx変数としてEEPROM領域に記憶します。実際にX軸のStep Pulse(D2)の出力をオシロスコープで測定してみました。

パルス幅($0): 10μsec
step/mm($100): 250steps/mm
F(Feed Rate): 500mm/min
等速移動の周波数: 2.1kHz

パルス幅($0): 10μsec
step/mm($100): 250steps/mm
F(Feed Rate): 10000mm/min
等速移動の周波数: 41.5kHz

lv-G-SenderはLabVIEW2014以降で動作します。ダウンロードはここから。CNCが手元に無くとも、Arduino UNOと2相4線のパルスモーターとPulse/Direction入力のドライバーがあれば楽しむことができるのではないかと思います。

上記内容は10月25日のNIDays2017の会場の片隅で行われるユーザー会で紹介する予定です。

<<コメントはスパムがひどいため受け付けないようにしています。トップ画面の下の方に連絡先のメールアドレスがありますのでご連絡ください。スパムでなければメールは大歓迎です。>>

(2017.10.11)

赤外線温度計を作ろう

赤外線温度センサーがちょっと遊んでみようか、というレベルの値段になっているので講習会で使ってみました。

GY-906というモジュールでMelexis MLX90614という赤外線センサーが使われています。Web上の情報ではESFBAAというタイプのようですがGY-906の回路図が見つかりませんでしたので正しいかどうかはわかりません。Melexisからデータシートが公開されているので、ESFBAAが正しいとするとOperating Temperature Rangeは-40℃から85℃で、TO-39型ケース、3V動作(モジュール内で5V→3V変換)、シングルゾーン(視野が単一)、標準パッケージ(視野角90°)ということです。測定できる温度は-70℃から+380℃です。

Amazonでは HiLetgoで670円でした。

https://www.amazon.co.jp/gp/product/B071VF2RWM/ref=od_aui_detailpages00?ie=UTF8&psc=1

AliexpressではMT Technology Co., Ltd.でさらにいくらか安い$4.05でした。

https://ja.aliexpress.com/item/Free-Shipping-GY-906-MLX90614ESF-New-MLX90614-Contactless-Temperature-Sensor-Module-For-Arduino-Compatible/32465344732.html?spm=a2g0s.9042311.0.0.aeFeEN

I2Cですのでライブラリを追加して配線４本でOKです。UNOでは（Nanoでも同じですが、）SDAをA4、SCLをA5に接続します。

表示器も欲しいということになって、I2CのOLED Display Module 128X64も接続しました。これもAmazonの HiLetgoで420円でした。
https://www.amazon.co.jp/gp/product/B071ZPFDWW/ref=od_aui_detailpages00?ie=UTF8&psc=1

AliexpressではHwa Yeh Tech CO.,LTDでいくらか安い$3.00でした。表示器のライブラリはAdafruit_SSD1306を使用しました。ディスプレイへの表示用ライブラリAdafruit_GFXも合わせてインストールします。Adafruit_SSD1306を使う時には使用しているディスプレイの解像度に合わせてAdafruit_SSD1306.hのコメントアウトの行を変更する必要があります。行番号72からの数行を抜き出しましたが、下記が変更後です。

    ---------------------------------------------------------------------*/
   #define SSD1306_128_64
//   #define SSD1306_128_32
//   #define SSD1306_96_16
/*=======================================================================*/

---------------------------------------------------------------------*/

#define SSD1306_128_64

// #define SSD1306_128_32

// #define SSD1306_96_16

/*=======================================================================*/

講習会ではArduino Nano互換機を使いましたが、この記事を書いている今は手元にあったUno互換機を使っています。

この記事を書きながらセンサーの資料を見返していたら、放射率の補正が間違っていたことが分かりました。下のスケッチは訂正済みです。

//SSD1306 library by Adafruit Industries
//MLX90614 Temp Sensor library by Adafruit Industries. 

#include <Wire.h>
#include <Adafruit_GFX.h>
#include <Adafruit_SSD1306.h>
#include <Adafruit_MLX90614.h>

Adafruit_MLX90614 mlx = Adafruit_MLX90614();

#define OLED_RESET 4
Adafruit_SSD1306 display(OLED_RESET);

float TempEm(float Em, float TA, float TO); //コンパイルエラー回避のため
void dispTemp(float T0, float T1, float T2);//コンパイルエラー回避のため

void setup()   {                
  Serial.begin(9600);
  Serial.println("displayIrSensorEm_i2c_170815");
  display.begin(SSD1306_SWITCHCAPVCC, 0x3C);  // initialize with the I2C addr 0x3C
  mlx.begin();
  //Adafruit splashscreen
  display.display();
  delay(1000);
  display.clearDisplay();
  display.setTextSize(2);
  display.setTextColor(WHITE);
}


void loop() {
  float temp0=mlx.readAmbientTempC();
  float temp1=mlx.readObjectTempC();
  
  float temp2=TempEm(0.98,temp0,temp1);
  
  Serial.print("Sensor = ");
  Serial.print(temp0);
  Serial.print("deg(C)  ");
  Serial.print("Object = ");
  Serial.print(temp1);
  Serial.print("deg(C)  ");
  Serial.print("CorrectedObj = ");
  Serial.print(temp2);
  Serial.println("deg(C)");

  dispTemp(temp0,temp1,temp2);

  delay(500);
}

void dispTemp(float T0, float T1, float T2){
  display.clearDisplay();
  display.setCursor(5,5);
  display.print("Snr= ");
  display.println(T0);
  display.setCursor(5,25);
  display.print("PBk= ");
  display.println(T1);
  display.setCursor(5,45);
  display.print("Obj= ");
  display.println(T2);
  display.display();
}

float TempEm(float Em, float TA, float TO){
  TA=TA+273.15;
  TO=TO+273.15;
  float T=TO*TO*TO*TO/Em+TA*TA*TA*TA*(1-1/Em);
  float Temp=sqrt(sqrt(T))-273.15;
  return Temp;
}

//SSD1306 library by Adafruit Industries

//MLX90614 Temp Sensor library by Adafruit Industries.

#include <Wire.h>

#include <Adafruit_GFX.h>

#include <Adafruit_SSD1306.h>

#include <Adafruit_MLX90614.h>

Adafruit_MLX90614 mlx = Adafruit_MLX90614();

#define OLED_RESET 4

Adafruit_SSD1306 display(OLED_RESET);

float TempEm(float Em, float TA, float TO); //コンパイルエラー回避のため

void dispTemp(float T0, float T1, float T2);//コンパイルエラー回避のため

void setup() {

Serial.begin(9600);

Serial.println("displayIrSensorEm_i2c_170815");

display.begin(SSD1306_SWITCHCAPVCC, 0x3C); // initialize with the I2C addr 0x3C

mlx.begin();

//Adafruit splashscreen

display.display();

delay(1000);

display.clearDisplay();

display.setTextSize(2);

display.setTextColor(WHITE);

}

void loop() {

float temp0=mlx.readAmbientTempC();

float temp1=mlx.readObjectTempC();

float temp2=TempEm(0.98,temp0,temp1);

Serial.print("Sensor = ");

Serial.print(temp0);

Serial.print("deg(C) ");

Serial.print("Object = ");

Serial.print(temp1);

Serial.print("deg(C) ");

Serial.print("CorrectedObj = ");

Serial.print(temp2);

Serial.println("deg(C)");

dispTemp(temp0,temp1,temp2);

delay(500);

}

void dispTemp(float T0, float T1, float T2){

display.clearDisplay();

display.setCursor(5,5);

display.print("Snr= ");

display.println(T0);

display.setCursor(5,25);

display.print("PBk= ");

display.println(T1);

display.setCursor(5,45);

display.print("Obj= ");

display.println(T2);

display.display();

}

float TempEm(float Em, float TA, float TO){

TA=TA+273.15;

TO=TO+273.15;

float T=TO*TO*TO*TO/Em+TA*TA*TA*TA*(1-1/Em);

float Temp=sqrt(sqrt(T))-273.15;

return Temp;

}

赤外線温度センサーMelexis MLX90614は5.5μmから14μmの波長域の赤外線を受光して、赤外線で加熱された受光面の温度を多数の熱電対で測定して赤外線の量を求めているようです。赤外線を放出している物体は黒体(放射率=1.0)と仮定して、センサーの温度測定値も用いて、測定対象の温度を推定しています。実際は物体の表面によって放射率は異なり(1よりも小さくなる)、放射率の低い金属表面を測定した場合は黒体に比べて赤外線の放出量が少ないので測定結果は実際の表面温度よりも低い値を出力します。

MLX90614に内蔵されたEEPROMに測定対象の放射率を書き込んで補正した結果を出力するように設定することができます。しかしながらライブラリでは対応していないことと、書き込むためには通信エラー検出用のPEC値も書き込む必要があり、かなり面倒みたいなので、Arduinoのプログラムで補正をすることにしました。放射率E(0~1.0)と、センサー温度(K) Tsnr、測定対象の温度(K) Tact、赤外線量から推定した温度(K) Tmeasの関係式がMelexis社の資料に書かれています。

https://www.melexis.com/en/documents/documentation/application-notes/application-note-mlx90614-changing-emissivity-setting

放射率が分かっていればこの関係式を使って測定対象の温度に変換することができます。

実際の表面の放射率は分からないことが多いので、熱電対等で実測して赤外線センサーでの測定値がその値を示すように放射率で調整する使い方になるようです。

2017.08.15

手作りの大型7セグメントフルカラー表示器(デモ版)

メイカーフェア東京2017では、LEDの点滅状態がわかりやすいように、加工前のシリアルLEDと２個ずつセグメント状態に配置した表示器を並べて展示しました。

表示器で数値をカウントアップ、カウントダウンするだけなので、プログラムがシンプルで分かりやすいと思います。下の写真が全体の画像です。左端に14個のLEDが並んだシリアルLED、右下が１セグメントに２個のLEDを配置した7セグメント表示器、右上がプリント基板です。どちらのLEDもNanoの5V、GND、D7に接続しました。

LEDは次の写真のように0から13までの順番でつながっています。

プリント基板のパターンは、右端中央から信号が入り、左端中央から次の桁に信号を伝えるように考えました。基板の面積を最小限にできるようにナルト模様のようにしました。基板を近づけて配置するときに有効な方法だと思います。基板は木工CNCで切削してパターンを作成しました。バリがあると指に刺さったり、短絡してしまったりするので、ヤスリで削ってあります。

左側の14個の切断していないLEDと7セグメント表示器の14個のLEDは、電気的には全く同じように直列に14個接続されたもので、Nanoの同じ端子に接続されています。

全て点灯させると以下のように光ります。写真では色がわかりにくいですが、２個のシリアルLEDはNanoに近い方から末端まで同じ色に光っています。

数字の４はこのように点灯します。

ソフトウェア

#include <Adafruit_NeoPixel.h>

#define PIN            7
#define NUMPIXELS      14
Adafruit_NeoPixel strip = Adafruit_NeoPixel(NUMPIXELS, PIN, NEO_GRB + NEO_KHZ800);

boolean seg[7];
int count=0;

void setup() {
  Serial.begin(9600);
  delay(50);
  Serial.println("Demo_7seg14led04_170810");
  strip.begin();
}

void loop() {
  
  for(int i=0;i<3;i++){
      colorWipe(strip.Color(255, 0, 0), 15); // Red
      colorWipe(strip.Color(0, 255, 0), 15); // Green
      colorWipe(strip.Color(0, 0, 255), 15); // Blue
  }
  rainbowCycle(5);

  for(int i=0;i<10;i++){
    Seven_seg_Mask(i);
    rainbowCycle_Mask(2);
  }
  count=count%3;
  for(int i=0;i<10;i++){
    if(count==0) Seven_seg(9-i,255,0,0);
    if(count==1) Seven_seg(9-i,0,255,0);
    if(count==2) Seven_seg(9-i,0,0,255);
    strip.show();
    delay(800);
  }
  count++;
}

void Seven_seg_Mask(int i){
  switch(i){
    case 0:
    seg[0]=HIGH,seg[1]=HIGH,seg[2]=HIGH,seg[3]=LOW,seg[4]=HIGH,seg[5]=HIGH,seg[6]=HIGH;
    break;
    case 1:
    seg[0]=HIGH,seg[1]=LOW,seg[2]=LOW,seg[3]=LOW,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;
    break;
    case 2:
    seg[0]=HIGH,seg[1]=HIGH,seg[2]=LOW,seg[3]=HIGH,seg[4]=LOW,seg[5]=HIGH,seg[6]=HIGH;
    break;
    case 3:
    seg[0]=HIGH,seg[1]=HIGH,seg[2]=LOW,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=LOW;
    break;
    case 4:
    seg[0]=HIGH,seg[1]=LOW,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;
    break;
    case 5:
    seg[0]=LOW,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=LOW;
    break;
    case 6:
    seg[0]=LOW,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=HIGH;
    break;
    case 7:
    seg[0]=HIGH,seg[1]=HIGH,seg[2]=LOW,seg[3]=LOW,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;
    break;
    case 8:
    seg[0]=HIGH,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=HIGH;
    break;
    case 9:
    seg[0]=HIGH,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;
    break;
  }
}

void Seven_seg(int i, int r, int g, int b){
  switch(i){
    case 0:
    seg[0]=HIGH,seg[1]=HIGH,seg[2]=HIGH,seg[3]=LOW,seg[4]=HIGH,seg[5]=HIGH,seg[6]=HIGH;
    break;
    case 1:
    seg[0]=HIGH,seg[1]=LOW,seg[2]=LOW,seg[3]=LOW,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;
    break;
    case 2:
    seg[0]=HIGH,seg[1]=HIGH,seg[2]=LOW,seg[3]=HIGH,seg[4]=LOW,seg[5]=HIGH,seg[6]=HIGH;
    break;
    case 3:
    seg[0]=HIGH,seg[1]=HIGH,seg[2]=LOW,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=LOW;
    break;
    case 4:
    seg[0]=HIGH,seg[1]=LOW,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;
    break;
    case 5:
    seg[0]=LOW,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=LOW;
    break;
    case 6:
    seg[0]=LOW,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=HIGH;
    break;
    case 7:
    seg[0]=HIGH,seg[1]=HIGH,seg[2]=LOW,seg[3]=LOW,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;
    break;
    case 8:
    seg[0]=HIGH,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=HIGH;
    break;
    case 9:
    seg[0]=HIGH,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;
    break;
  }
  
  for(int j=0;j<7;j++){
    if(seg[j]){
      strip.setPixelColor(j*2, strip.Color(r,g,b));
      strip.setPixelColor(j*2+1, strip.Color(r,g,b));
    }
    else{
      strip.setPixelColor(j*2, strip.Color(0,0,0));
      strip.setPixelColor(j*2+1, strip.Color(0,0,0));
    }
  }
  
}

void colorWipe(uint32_t c, uint8_t wait) {
  for(uint16_t i=0; i<strip.numPixels(); i++) {
    strip.setPixelColor(i, c);
    strip.show();
    delay(wait);
  }
}

void rainbowCycle_Mask(uint8_t wait) {
  uint16_t i, j;

  for(j=0; j<256*5; j++) { // 5 cycles of all colors on wheel
    for(i=0; i< strip.numPixels(); i++) {
      strip.setPixelColor(i, Wheel(((i * 256 / strip.numPixels()) + j) & 255)*(int)seg[i/2]);
    }
    strip.show();
    delay(wait);
  }
}


void rainbowCycle(uint8_t wait) {
  uint16_t i, j;

  for(j=0; j<256*5; j++) { // 5 cycles of all colors on wheel
    for(i=0; i< strip.numPixels(); i++) {
      strip.setPixelColor(i, Wheel(((i * 256 / strip.numPixels()) + j) & 255));
    }
    strip.show();
    delay(wait);
  }
}


uint32_t Wheel(byte WheelPos) {
  WheelPos = 255 - WheelPos;
  if(WheelPos < 85) {
    return strip.Color(255 - WheelPos * 3, 0, WheelPos * 3);
  }
  if(WheelPos < 170) {
    WheelPos -= 85;
    return strip.Color(0, WheelPos * 3, 255 - WheelPos * 3);
  }
  WheelPos -= 170;
  return strip.Color(WheelPos * 3, 255 - WheelPos * 3, 0);
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

#include <Adafruit_NeoPixel.h>

#define PIN 7

#define NUMPIXELS 14

Adafruit_NeoPixel strip = Adafruit_NeoPixel(NUMPIXELS, PIN, NEO_GRB + NEO_KHZ800);

boolean seg[7];

int count=0;

void setup() {

Serial.begin(9600);

delay(50);

Serial.println("Demo_7seg14led04_170810");

strip.begin();

}

void loop() {

for(int i=0;i<3;i++){

colorWipe(strip.Color(255, 0, 0), 15); // Red

colorWipe(strip.Color(0, 255, 0), 15); // Green

colorWipe(strip.Color(0, 0, 255), 15); // Blue

}

rainbowCycle(5);

for(int i=0;i<10;i++){

Seven_seg_Mask(i);

rainbowCycle_Mask(2);

}

count=count%3;

for(int i=0;i<10;i++){

if(count==0) Seven_seg(9-i,255,0,0);

if(count==1) Seven_seg(9-i,0,255,0);

if(count==2) Seven_seg(9-i,0,0,255);

strip.show();

delay(800);

}

count++;

}

void Seven_seg_Mask(int i){

switch(i){

case 0:

seg[0]=HIGH,seg[1]=HIGH,seg[2]=HIGH,seg[3]=LOW,seg[4]=HIGH,seg[5]=HIGH,seg[6]=HIGH;

break;

case 1:

seg[0]=HIGH,seg[1]=LOW,seg[2]=LOW,seg[3]=LOW,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;

break;

case 2:

seg[0]=HIGH,seg[1]=HIGH,seg[2]=LOW,seg[3]=HIGH,seg[4]=LOW,seg[5]=HIGH,seg[6]=HIGH;

break;

case 3:

seg[0]=HIGH,seg[1]=HIGH,seg[2]=LOW,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=LOW;

break;

case 4:

seg[0]=HIGH,seg[1]=LOW,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;

break;

case 5:

seg[0]=LOW,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=LOW;

break;

case 6:

seg[0]=LOW,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=HIGH;

break;

case 7:

seg[0]=HIGH,seg[1]=HIGH,seg[2]=LOW,seg[3]=LOW,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;

break;

case 8:

seg[0]=HIGH,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=HIGH;

break;

case 9:

seg[0]=HIGH,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;

break;

}

void Seven_seg(int i, int r, int g, int b){

switch(i){

case 0:

seg[0]=HIGH,seg[1]=HIGH,seg[2]=HIGH,seg[3]=LOW,seg[4]=HIGH,seg[5]=HIGH,seg[6]=HIGH;

break;

case 1:

seg[0]=HIGH,seg[1]=LOW,seg[2]=LOW,seg[3]=LOW,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;

break;

case 2:

seg[0]=HIGH,seg[1]=HIGH,seg[2]=LOW,seg[3]=HIGH,seg[4]=LOW,seg[5]=HIGH,seg[6]=HIGH;

break;

case 3:

seg[0]=HIGH,seg[1]=HIGH,seg[2]=LOW,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=LOW;

break;

case 4:

seg[0]=HIGH,seg[1]=LOW,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;

break;

case 5:

seg[0]=LOW,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=LOW;

break;

case 6:

seg[0]=LOW,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=HIGH;

break;

case 7:

seg[0]=HIGH,seg[1]=HIGH,seg[2]=LOW,seg[3]=LOW,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;

break;

case 8:

seg[0]=HIGH,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=HIGH,seg[6]=HIGH;

break;

case 9:

seg[0]=HIGH,seg[1]=HIGH,seg[2]=HIGH,seg[3]=HIGH,seg[4]=HIGH,seg[5]=LOW,seg[6]=LOW;

break;

}

for(int j=0;j<7;j++){

if(seg[j]){

strip.setPixelColor(j*2, strip.Color(r,g,b));

strip.setPixelColor(j*2+1, strip.Color(r,g,b));

}

else{

strip.setPixelColor(j*2, strip.Color(0,0,0));

strip.setPixelColor(j*2+1, strip.Color(0,0,0));

}

void colorWipe(uint32_t c, uint8_t wait) {

for(uint16_t i=0; i<strip.numPixels(); i++) {

strip.setPixelColor(i, c);

strip.show();

delay(wait);

}

void rainbowCycle_Mask(uint8_t wait) {

uint16_t i, j;

for(j=0; j<256*5; j++) { // 5 cycles of all colors on wheel

for(i=0; i< strip.numPixels(); i++) {

strip.setPixelColor(i, Wheel(((i * 256 / strip.numPixels()) + j) & 255)*(int)seg[i/2]);

}

strip.show();

delay(wait);

}

void rainbowCycle(uint8_t wait) {

uint16_t i, j;

for(j=0; j<256*5; j++) { // 5 cycles of all colors on wheel

for(i=0; i< strip.numPixels(); i++) {

strip.setPixelColor(i, Wheel(((i * 256 / strip.numPixels()) + j) & 255));

}

strip.show();

delay(wait);

}

uint32_t Wheel(byte WheelPos) {

WheelPos = 255 - WheelPos;

if(WheelPos < 85) {

return strip.Color(255 - WheelPos * 3, 0, WheelPos * 3);

}

if(WheelPos < 170) {

WheelPos -= 85;

return strip.Color(0, WheelPos * 3, 255 - WheelPos * 3);

}

WheelPos -= 170;

return strip.Color(WheelPos * 3, 255 - WheelPos * 3, 0);

}

seg[0]からseg[6]までの配列でセグメント0からセグメント6に対応させて、表示する数値によってセグメントを点灯するときはHIGH、消灯するときはLOWにします。具体的にはSeven_seg_Mask(int i)関数で、seg[0]からseg[6]まで設定します。rainbowCycle_Mask(uint8_t wait)関数はサンプルプログラムのrainbowCycle(uint8_t wait)関数をベースにseg[0]からseg[6]までのHIGH/LOWでHIGHの場合だけ点灯するように改造しました。ここで、セグメントに２個LEDを配していることに注意して、i番目のLEDのHIGH/LOWはseg[i/2]で表わしました。

rainbowCycle関数を使った色の設定と、セグメントHIGH/LOWを掛け合わせることで簡単にカラフルな数値表示を実現しています。

(2017.08.10)