koji – 計測・解析ラボ

デジタル壁時計の組み立て

前回の記事「ESP32と32×8フルカラーLEDでデジタル壁時計をつくる」では配線とプログラムについて説明しました。

ここではESP32とLEDマトリックスをケースに収めて和室の長押(なげし)の上に取り付けた例を紹介します。長押の隙間にACアダプター入れてESP32のUSBに給電しています。

ケースは2mm厚のボール紙をレーザーカッターで加工して、５枚重ねの中にESP32とLEDマトリックスを埋め込みました。LEDとの配線はESP32に直接ハンダ付けをして最小限の高さにしています。

ESP32をはめ込む場所の周囲は熱を分散させる目的でアルミテープを貼っています(この写真撮影の後でWiFiアンテナの近傍はまずいだろうということでアンテナ付近のアルミテープを除去しました)

LED組み込みフレームの前面にはLED光を拡散させるために和紙を糊付けしました。チューブの先にスポンジキャップが付いた糊で手軽に塗ったらムラになってしまいました。ムラは使っている時にはまったく目立たないので良しとしました。ESP32組み込みフレームを白のマスキングテープで固定して完成です。

プログラムは少し変更しました。分単位で時刻表示が変わりますので、切り変わる10秒前になると色相が左から右に変化します。0秒になった時にその時点の色で時刻を表示します。表示のためのループを高速で回すために１秒ごとの時刻更新はタイマー機能を使うことにしました。
また、寝ている時にはまぶしくないように23時から6時までは表示を暗くしています。

// Wall Clock 2019 
// WallClock2_06 by Koji Ohashi @MaDA Lab
// 2019.09.05

#include <WiFi.h>
#include "time.h"
const char* ssid       = "Your SSID";
const char* password   = "Your Password";
const char* ntpServer = "ntp.nict.jp";
const long  gmtOffset_sec = 9*3600;
const int   daylightOffset_sec = 0;
int SecCount=300;

//------------------------------

hw_timer_t * timer = NULL;
volatile SemaphoreHandle_t timerSemaphore;
portMUX_TYPE timerMux = portMUX_INITIALIZER_UNLOCKED;

//------------------------------

#include <FastLED.h>
#define DATA_PIN 16
#define WIDTH  32
#define HEIGHT 8
#define NUM_LEDS (WIDTH * HEIGHT)

CRGBArray<NUM_LEDS> leds;
int Pos[HEIGHT][WIDTH];
int imageArray[HEIGHT][WIDTH];

const int FontWidth=7;
const int FontHeight=8;
const int ColWidth=2;
byte CF_hue=0;
boolean End_Minute=false;
boolean DayTime=true;
int DAY_START=6;
int DAY_END=22;
int DAY_BRIGHTNESS=255;
int NIGHT_BRIGHTNESS=40;
int NIGHT_HUE=70;

byte ColonFont[FontHeight][ColWidth]={{0,0},{00,90},{00,90},{0,0},{0,0},{90,0},{90,0},{0,0}};

byte NumFont[10][FontHeight][FontWidth]={
    //-0-
{{0,0,30,90,90,50,0},{0,30,90,30,50,90,40},{10,90,30,0,0,70,60},{40,80,0,0,0,60,60},
{60,70,0,0,0,80,30},{70,50,0,0,30,70,0},{50,80,30,40,80,40,0},{0,60,100,80,30,0,0}},
   //-1-
{{0,0,0,60,80,70,0},{0,0,70,50,90,40,0},{0,40,00,60,70,20,0},{0,0,0,80,50,0,0},
{0,0,30,90,30,0,0},{0,0,40,90,20,0,0},{0,00,60,80,00,0,0},{00,80,90,70,50,0,0}},
   //-2-
{{0,0,40,80,90,50,0},{0,40,90,30,40,90,20},{0,40,0,0,30,90,20},{0,0,0,30,80,50,0},
{0,00,70,90,30,0,0},{0,50,70,0,0,0,0},{30,90,70,40,40,20,0},{40,90,90,90,90,20,0}},
   //-3-
{{0,0,30,90,90,40,0},{0,0,90,20,20,90,50},{0,0,0,0,20,90,40},{0,0,40,90,90,20,0},
{0,0,0,20,50,80,0},{0,20,0,0,40,90,20},{0,90,40,20,80,70,0},{0,50,90,90,70,0,0}},
    //-4-
{{0,0,0,0,60,90,40},{0,0,0,50,90,90,30},{0,0,40,90,40,90,20},{0,40,80,0,60,60,0},
{30,80,50,20,80,40,20},{40,80,80,80,90,90,80},{0,0,0,60,90,30,0},{0,0,0,80,90,20,0}},
   //-5-
{{0,00,70,90,90,90,70},{0,30,90,40,0,0,0},{0,60,60,90,90,20,0},{0,90,50,20,50,70,0},
{0,20,0,0,40,80,00},{20,0,0,0,50,70,0},{80,60,20,20,90,30,0},{30,70,90,90,30,0,0}},
   //-6-
{{0,0,0,20,50,80,40},{0,0,20,70,70,30,0},{0,20,90,60,0,0,0},{0,60,70,90,90,20,0},
{30,90,60,20,40,90,20},{50,80,20,0,20,90,20},{30,90,40,0,50,60,0},{0,40,90,90,60,20,0}},
    //-7-
{{00,90,90,90,90,90,50},{00,50,40,40,90,70,30},{0,0,0,60,80,20,0},{0,0,40,90,30,0,0},
{0,0,80,60,0,0,0},{0,60,80,0,0,0,0},{40,90,30,0,0,0,0},{60,70,0,0,0,0,0}},
    //-8-
{{0,0,30,70,90,40,0},{0,20,90,30,20,90,40},{0,40,80,0,0,90,40},{0,00,90,90,90,40,0},
{0,50,70,20,40,80,0},{30,90,20,0,20,90,20},{30,80,30,20,40,80,0},{0,60,90,90,70,20,0}},
    //-9-
{{0,0,50,90,90,60,0},{0,60,50,0,30,80,50},{20,90,20,0,0,60,70},{20,70,50,20,30,90,30},
{0,30,70,90,80,60,0},{0,0,0,70,70,20,0},{0,30,70,80,20,0,0},{20,90,70,0,0,0,0}}
};



void setup() { 
  Serial.begin(115200);
  delay(500);
  Serial.println("WallClock2_04 by Koji Ohashi @MaDA Lab");
  //connect to WiFi
  Serial.printf("Connecting to %s ", ssid);
  WiFi.begin(ssid, password);
  while (WiFi.status() != WL_CONNECTED) {
      delay(500);
      Serial.print(".");
  }
  Serial.println(" CONNECTED");
  configTime(gmtOffset_sec, daylightOffset_sec, ntpServer);
  printLocalTime();
  //---------------

  onTimerSetup();

  //---------------
  FastLED.addLeds<WS2812B, DATA_PIN, GRB>(leds, NUM_LEDS);
  setPosArray();
  clearDisplay();
  delay(3000);
  
}

void loop(){
  if (xSemaphoreTake(timerSemaphore, 0) == pdTRUE){
    printLocalTime();
    SecCount=SecCount+1;
  }
  if(SecCount>=300){
    configTime(gmtOffset_sec, daylightOffset_sec, ntpServer);
    Serial.print("Updated to ");
    printLocalTime();
    SecCount=0;
  }
  if(DayTime){
    if(End_Minute){
      showImageArrayColorFlow();
    } else {
      showImageArray(CF_hue);
    }
  } else {
    showImageArray(NIGHT_HUE);
  }
}

void printLocalTime(){
  struct tm timeInfo;
  getLocalTime(&timeInfo);
  int time_h=timeInfo.tm_hour;;
  int time_m=timeInfo.tm_min;
  int time_s=timeInfo.tm_sec;
  End_Minute=(time_s>50);//colorChange
  DayTime=(time_h>=DAY_START)&&(time_h<=DAY_END);//Day or Night

  if(DayTime){
    LEDS.setBrightness(DAY_BRIGHTNESS);
  } else {
    LEDS.setBrightness(NIGHT_BRIGHTNESS);
  }

  Serial.print(time_h);
  Serial.print(":");
  Serial.print(time_m);
  Serial.print(":");
  Serial.println(time_s);
  int h1=time_h/10;
  int h0=time_h%10;
  int m1=time_m/10;
  int m0=time_m%10;

  setImageArray(h1,h0,m1,m0);
}


void showImageArrayColorFlow(){
    for(int j=0;j<WIDTH;j++){
      for(int i=0; i < HEIGHT; i++){
        byte FontBrightness=imageArray[i][j];
        int led_num=Pos[i][j];
        leds[led_num] = CHSV(CF_hue,255,FontBrightness);
      }
      FastLED.show();
      delay(100);
      CF_hue=CF_hue+5;
    }
}


void showImageArray(byte hue){
    for(int j=0;j<WIDTH;j++){
      for(int i=0; i < HEIGHT; i++){
        byte FontBrightness=imageArray[i][j];
        int led_num=Pos[i][j];
        leds[led_num] = CHSV(hue,255,FontBrightness);
      }
      FastLED.show();
      delay(1);
    }
}


void setImageArray(int h1,int h0,int m1, int m0){
  int PosH1=0;
  int PosH0=7;
  int PosCol=15;
  int PosM1=17;
  int PosM0=25;

  for(int j=0;j<WIDTH;j++){
    for(int i=0; i < HEIGHT; i++){
      imageArray[i][j]=0;
    }
  }
  //Hour1
  if(h1>0){
    for(int j=0;j<FontWidth;j++){
      for(int i=0; i < FontHeight; i++){
        imageArray[i][j+PosH1]=NumFont[h1][i][j];
      }
    }
  } 
  //Hour0
  for(int j=0;j<FontWidth;j++){
    for(int i=0; i < FontHeight; i++){
      imageArray[i][j+PosH0]=NumFont[h0][i][j];
    }
  }
  //:
  for(int j=0;j<ColWidth;j++){
    for(int i=0; i < FontHeight; i++){
      imageArray[i][j+PosCol]=ColonFont[i][j];
    }
  }
  //Min1
  for(int j=0;j<FontWidth;j++){
    for(int i=0; i < FontHeight; i++){
      imageArray[i][j+PosM1]=NumFont[m1][i][j];
    }
  }
  //Min0
  for(int j=0;j<FontWidth;j++){
    for(int i=0; i < FontHeight; i++){
      imageArray[i][j+PosM0]=NumFont[m0][i][j];
    }
  }
}


void setPosArray(){
  for(int i=0; i < HEIGHT; i++){
    for(int j=0; j < WIDTH; j++){
      if(i%2==0){
        Pos[i][j]=i*WIDTH+j;
      } else{
        Pos[i][j]=(i+1)*WIDTH-j-1;
      }
    }
  }
}

void clearDisplay(){
  for(int i=0;i<NUM_LEDS;i++){
    leds[i] = CRGB::Black;
  }
  FastLED.show();
}

void IRAM_ATTR onTimer(){
  portENTER_CRITICAL_ISR(&timerMux);
  portEXIT_CRITICAL_ISR(&timerMux);
  xSemaphoreGiveFromISR(timerSemaphore, NULL);//Give a semaphore that we can check in the loop
}

void onTimerSetup(){
  timerSemaphore = xSemaphoreCreateBinary();
  timer = timerBegin(0, 80, true);
  timerAttachInterrupt(timer, &onTimer, true);//Attach onTimer function to our timer.
  timerAlarmWrite(timer, 1000000, true);//alarm 1sec interval
  timerAlarmEnable(timer);//Start an alarm
}

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

// Wall Clock 2019

// WallClock2_06 by Koji Ohashi @MaDA Lab

// 2019.09.05

#include <WiFi.h>

#include "time.h"

const char* ssid = "Your SSID";

const char* password = "Your Password";

const char* ntpServer = "ntp.nict.jp";

const long gmtOffset_sec = 9*3600;

const int daylightOffset_sec = 0;

int SecCount=300;

//------------------------------

hw_timer_t * timer = NULL;

volatile SemaphoreHandle_t timerSemaphore;

portMUX_TYPE timerMux = portMUX_INITIALIZER_UNLOCKED;

//------------------------------

#include <FastLED.h>

#define DATA_PIN 16

#define WIDTH 32

#define HEIGHT 8

#define NUM_LEDS (WIDTH * HEIGHT)

CRGBArray<NUM_LEDS> leds;

int Pos[HEIGHT][WIDTH];

int imageArray[HEIGHT][WIDTH];

const int FontWidth=7;

const int FontHeight=8;

const int ColWidth=2;

byte CF_hue=0;

boolean End_Minute=false;

boolean DayTime=true;

int DAY_START=6;

int DAY_END=22;

int DAY_BRIGHTNESS=255;

int NIGHT_BRIGHTNESS=40;

int NIGHT_HUE=70;

byte ColonFont[FontHeight][ColWidth]={{0,0},{00,90},{00,90},{0,0},{0,0},{90,0},{90,0},{0,0}};

byte NumFont[10][FontHeight][FontWidth]={

//-0-

{{0,0,30,90,90,50,0},{0,30,90,30,50,90,40},{10,90,30,0,0,70,60},{40,80,0,0,0,60,60},

{60,70,0,0,0,80,30},{70,50,0,0,30,70,0},{50,80,30,40,80,40,0},{0,60,100,80,30,0,0}},

//-1-

{{0,0,0,60,80,70,0},{0,0,70,50,90,40,0},{0,40,00,60,70,20,0},{0,0,0,80,50,0,0},

{0,0,30,90,30,0,0},{0,0,40,90,20,0,0},{0,00,60,80,00,0,0},{00,80,90,70,50,0,0}},

//-2-

{{0,0,40,80,90,50,0},{0,40,90,30,40,90,20},{0,40,0,0,30,90,20},{0,0,0,30,80,50,0},

{0,00,70,90,30,0,0},{0,50,70,0,0,0,0},{30,90,70,40,40,20,0},{40,90,90,90,90,20,0}},

//-3-

{{0,0,30,90,90,40,0},{0,0,90,20,20,90,50},{0,0,0,0,20,90,40},{0,0,40,90,90,20,0},

{0,0,0,20,50,80,0},{0,20,0,0,40,90,20},{0,90,40,20,80,70,0},{0,50,90,90,70,0,0}},

//-4-

{{0,0,0,0,60,90,40},{0,0,0,50,90,90,30},{0,0,40,90,40,90,20},{0,40,80,0,60,60,0},

{30,80,50,20,80,40,20},{40,80,80,80,90,90,80},{0,0,0,60,90,30,0},{0,0,0,80,90,20,0}},

//-5-

{{0,00,70,90,90,90,70},{0,30,90,40,0,0,0},{0,60,60,90,90,20,0},{0,90,50,20,50,70,0},

{0,20,0,0,40,80,00},{20,0,0,0,50,70,0},{80,60,20,20,90,30,0},{30,70,90,90,30,0,0}},

//-6-

{{0,0,0,20,50,80,40},{0,0,20,70,70,30,0},{0,20,90,60,0,0,0},{0,60,70,90,90,20,0},

{30,90,60,20,40,90,20},{50,80,20,0,20,90,20},{30,90,40,0,50,60,0},{0,40,90,90,60,20,0}},

//-7-

{{00,90,90,90,90,90,50},{00,50,40,40,90,70,30},{0,0,0,60,80,20,0},{0,0,40,90,30,0,0},

{0,0,80,60,0,0,0},{0,60,80,0,0,0,0},{40,90,30,0,0,0,0},{60,70,0,0,0,0,0}},

//-8-

{{0,0,30,70,90,40,0},{0,20,90,30,20,90,40},{0,40,80,0,0,90,40},{0,00,90,90,90,40,0},

{0,50,70,20,40,80,0},{30,90,20,0,20,90,20},{30,80,30,20,40,80,0},{0,60,90,90,70,20,0}},

//-9-

{{0,0,50,90,90,60,0},{0,60,50,0,30,80,50},{20,90,20,0,0,60,70},{20,70,50,20,30,90,30},

{0,30,70,90,80,60,0},{0,0,0,70,70,20,0},{0,30,70,80,20,0,0},{20,90,70,0,0,0,0}}

};

void setup() {

Serial.begin(115200);

delay(500);

Serial.println("WallClock2_04 by Koji Ohashi @MaDA Lab");

//connect to WiFi

Serial.printf("Connecting to %s ", ssid);

WiFi.begin(ssid, password);

while (WiFi.status() != WL_CONNECTED) {

delay(500);

Serial.print(".");

}

Serial.println(" CONNECTED");

configTime(gmtOffset_sec, daylightOffset_sec, ntpServer);

printLocalTime();

//---------------

onTimerSetup();

//---------------

FastLED.addLeds<WS2812B, DATA_PIN, GRB>(leds, NUM_LEDS);

setPosArray();

clearDisplay();

delay(3000);

}

void loop(){

if (xSemaphoreTake(timerSemaphore, 0) == pdTRUE){

printLocalTime();

SecCount=SecCount+1;

}

if(SecCount>=300){

configTime(gmtOffset_sec, daylightOffset_sec, ntpServer);

Serial.print("Updated to ");

printLocalTime();

SecCount=0;

}

if(DayTime){

if(End_Minute){

showImageArrayColorFlow();

} else {

showImageArray(CF_hue);

}

} else {

showImageArray(NIGHT_HUE);

}

void printLocalTime(){

struct tm timeInfo;

getLocalTime(&timeInfo);

int time_h=timeInfo.tm_hour;;

int time_m=timeInfo.tm_min;

int time_s=timeInfo.tm_sec;

End_Minute=(time_s>50);//colorChange

DayTime=(time_h>=DAY_START)&&(time_h<=DAY_END);//Day or Night

if(DayTime){

LEDS.setBrightness(DAY_BRIGHTNESS);

} else {

LEDS.setBrightness(NIGHT_BRIGHTNESS);

}

Serial.print(time_h);

Serial.print(":");

Serial.print(time_m);

Serial.print(":");

Serial.println(time_s);

int h1=time_h/10;

int h0=time_h%10;

int m1=time_m/10;

int m0=time_m%10;

setImageArray(h1,h0,m1,m0);

}

void showImageArrayColorFlow(){

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

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

byte FontBrightness=imageArray[i][j];

int led_num=Pos[i][j];

leds[led_num] = CHSV(CF_hue,255,FontBrightness);

}

FastLED.show();

delay(100);

CF_hue=CF_hue+5;

}

void showImageArray(byte hue){

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

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

byte FontBrightness=imageArray[i][j];

int led_num=Pos[i][j];

leds[led_num] = CHSV(hue,255,FontBrightness);

}

FastLED.show();

delay(1);

}

void setImageArray(int h1,int h0,int m1, int m0){

int PosH1=0;

int PosH0=7;

int PosCol=15;

int PosM1=17;

int PosM0=25;

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

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

imageArray[i][j]=0;

}

//Hour1

if(h1>0){

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

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

imageArray[i][j+PosH1]=NumFont[h1][i][j];

}

//Hour0

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

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

imageArray[i][j+PosH0]=NumFont[h0][i][j];

}

//:

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

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

imageArray[i][j+PosCol]=ColonFont[i][j];

}

//Min1

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

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

imageArray[i][j+PosM1]=NumFont[m1][i][j];

}

//Min0

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

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

imageArray[i][j+PosM0]=NumFont[m0][i][j];

}

void setPosArray(){

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

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

if(i%2==0){

Pos[i][j]=i*WIDTH+j;

} else{

Pos[i][j]=(i+1)*WIDTH-j-1;

}

void clearDisplay(){

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

leds[i] = CRGB::Black;

}

FastLED.show();

}

void IRAM_ATTR onTimer(){

portENTER_CRITICAL_ISR(&timerMux);

portEXIT_CRITICAL_ISR(&timerMux);

xSemaphoreGiveFromISR(timerSemaphore, NULL);//Give a semaphore that we can check in the loop

}

void onTimerSetup(){

timerSemaphore = xSemaphoreCreateBinary();

timer = timerBegin(0, 80, true);

timerAttachInterrupt(timer, &onTimer, true);//Attach onTimer function to our timer.

timerAlarmWrite(timer, 1000000, true);//alarm 1sec interval

timerAlarmEnable(timer);//Start an alarm

}

ESP32と32×8フルカラーLEDでデジタル壁時計をつくる

「夜中に目が覚めた時、もう一寝入りするか、そろそろ起きるか、知りたくなりますね。身動きせずにねぼけた目を開けるだけで時刻がわかる大きなデジタル時計が欲しいと思いました。日中は明るくカラフルで楽しい表示でも、暗くなったらまぶしくない明るさで落ち着いた色で表示してくれる時計があったらいいですね。」

２年前に作った「手作りの大型7セグメントフルカラー表示器を使った置き時計」はその後もブレッドボードのまま動作を続けています。壁に掛けられるようにリメークしようかと思いましたが、大きなサイズのフルカラーLEDマトリックスが3699円で売っていたので、これを使った方が楽にできると思って新しく作ることにしました。

構成
(1) ESP32でWiFi LANに接続し、NTPで時刻を定期的に取得する。
(2) ESP32でTimeライブラリを使い、NTP時刻で定期的に校正しながら１秒ごとに時刻を得る。
(3) ESP32でFastLEDライブラリを使い、32×8 LEDマトリックスを制御する。
(4) 時刻表示用数字フォントはComic San MS Bold Italic 96pointをベースにして8×7のグレースケールフォントを自作する。

部品リスト
(1) ESP32(MH-ET LIVE ESP32 MiniKit)：AliExpressで$6ぐらいで購入できます。
(2) フルカラーLEDマトリックス(32×8 10mmピッチ)：Quimat Arduino用RGB LED パネル…..

配線
ESP32 MiniKit-J2-6pin(5V) —– LED Matrix 5V
ESP32 MiniKit-J2-8pin(GND) —– LED Matrix GND
ESP32 MiniKit-J2-10pin(IO16) —– LED Matrix Din

Arduino IDEへの追加
ESP32ボードの追加「Arduinoで遊ぶページ」などを調べてください。
FastLEDライブラリの追加「ArduinoでNeopixel操作」などを調べてください。

Arduinoプログラム
青色で１秒ごとに時刻を表示するプログラムです。
– NTPサーバーに300秒ごとにアクセスしますが、loop()関数の if(SecCount>=xxxx)で自由に変更してください。
– FastLEDライブラリは高度な色指定ができますので自由に改造してください。
– フォントデータは、３次元配列 NumFont[10][FontHeight][FontWidth]です。好きなフォントに改造してください。

#include <WiFi.h>
#include "time.h"
const char* ssid       = "YourSSID";
const char* password   = "YourPWD";
const char* ntpServer = "ntp.nict.jp";
const long  gmtOffset_sec = 9*3600;
const int   daylightOffset_sec = 0;
int SecCount=300;

//------------------------------

#include <FastLED.h>
#define DATA_PIN 16
#define WIDTH  32
#define HEIGHT 8
#define NUM_LEDS (WIDTH * HEIGHT)

CRGBArray<NUM_LEDS> leds;
int Pos[HEIGHT][WIDTH];

const int FontWidth=7;
const int FontHeight=8;
const int ColWidth=2;

byte ColonFont[FontHeight][ColWidth]={{0,0},{0,80},{80,80},{0,0},{0,0},{0,80},{80,80},{0,0}};

byte NumFont[10][FontHeight][FontWidth]={
    //-0-
{{0,0,50,90,90,50,0},{0,40,90,40,50,100,30},{10,90,30,0,0,95,40},{30,100,10,0,0,100,40},
{50,90,0,0,20,100,30},{50,90,0,0,50,80,0},{30,100,50,40,90,40,0},{0,60,100,90,40,0,0}},
   //-1-
{{0,0,0,40,80,0,0},{0,0,50,100,80,0,0},{0,0,30,70,70,0,0},{0,0,0,80,50,0,0},
{0,0,0,90,40,0,0},{0,0,20,100,20,0,0},{0,20,50,100,30,0,0},{0,70,90,90,70,0,0}},
   //-2-
{{0,0,20,60,70,50,0},{0,30,90,70,70,100,30},{0,20,20,0,20,100,20},{0,0,0,30,80,60,0},
{0,10,70,90,50,10,0},{0,70,70,0,0,0,0},{30,100,50,50,60,20,0},{30,90,90,90,90,40,0}},
   //-3-
{{0,0,30,70,90,50,0},{0,10,90,50,60,100,30},{0,0,0,10,30,100,20},{0,0,40,100,100,50,0},
{0,0,10,30,70,80,0},{0,20,0,0,50,90,0},{10,100,50,40,80,60,0},{0,50,90,90,50,0,0}},
    //-4-
{{0,0,0,0,40,80,20},{0,0,0,40,100,100,10},{0,0,30,90,70,90,0},{0,20,80,50,60,70,0},
{20,70,90,50,80,70,30},{30,70,80,80,100,90,40},{0,0,0,10,100,30,0},{0,0,0,20,90,20,0}},
   //-5-
{{0,30,100,100,100,100,60},{0,50,90,20,20,20,0},{0,70,90,90,100,60,0},{0,90,70,30,30,100,30},
{0,40,20,0,10,100,30},{0,10,0,0,40,100,10},{40,80,50,50,90,40,0},{20,70,90,80,40,0,0}},
   //-6-
{{0,0,0,3,70,40,0},{0,0,40,90,60,0,0},{0,20,90,60,10,0,0},{0,70,100,100,100,60,0},
{0,100,60,20,40,100,20},{10,100,20,0,20,100,20},{10,100,50,10,60,60,0},{0,60,100,100,70,20,0}},
    //-7-
{{40,90,90,90,90,90,40},{20,30,40,40,90,70,20},{0,0,0,60,80,20,0},{0,0,40,100,40,0,0},
{0,10,80,60,0,0,0},{0,60,80,10,0,0,0},{20,100,30,0,0,0,0},{40,70,0,0,0,0,0}},
    //-8-
{{0,0,30,70,90,60,10},{0,20,90,60,50,100,30},{0,40,90,10,30,100,20},{0,30,100,100,100,60,0},
{0,60,80,50,70,90,10},{20,100,20,0,30,100,20},{30,100,40,20,70,80,0},{0,60,90,90,70,20,0}},
    //-9-
{{0,20,60,100,100,60,0},{0,70,60,10,30,100,40},{20,100,20,0,0,100,40},{20,100,60,20,50,100,20},
{0,50,100,100,100,70,0},{0,0,0,50,100,30,0},{10,30,50,100,40,0,0},{40,90,70,20,0,0,0}}
};



void setup() { 
  Serial.begin(115200);

  //connect to WiFi
  Serial.printf("Connecting to %s ", ssid);
  WiFi.begin(ssid, password);
  while (WiFi.status() != WL_CONNECTED) {
      delay(500);
      Serial.print(".");
  }
  Serial.println(" CONNECTED");
  configTime(gmtOffset_sec, daylightOffset_sec, ntpServer);
  printLocalTime();
  //---------------

  FastLED.addLeds<WS2812B, DATA_PIN, GRB>(leds, NUM_LEDS);
  LEDS.setBrightness(150);
  setPosArray();
  clearDisplay();
  delay(3000);
  
}

void loop(){
  if(SecCount>=300){
    configTime(gmtOffset_sec, daylightOffset_sec, ntpServer);
    Serial.print("Updated to ");
    printLocalTime();
    SecCount=0;
  }
  printLocalTime();
  SecCount=SecCount+1;
  delay(1000);
}

void printLocalTime(){
  struct tm timeInfo;
  getLocalTime(&timeInfo);
  int time_h=timeInfo.tm_hour;;
  int time_m=timeInfo.tm_min;
  int time_s=timeInfo.tm_sec;
  Serial.print(time_h);
  Serial.print(":");
  Serial.print(time_m);
  Serial.print(":");
  Serial.println(time_s);
  int h1=time_h/10;
  int h0=time_h%10;
  int m1=time_m/10;
  int m0=time_m%10;

  clearDisplay();
  delay(10);
  //showTime(2,3,4,8);
  showTime(h1,h0,m1,m0);
}


void showTime(int h1,int h0,int m1, int m0){
  static uint8_t hue=180;
  int PosH1=1;
  int PosH0=8;
  int PosCol=15;
  int PosM1=17;
  int PosM0=24;
  
  //Hour1
  for(int j=0;j<FontWidth;j++){
    for(int i=0; i < FontHeight; i++){
      byte FontBrightness=NumFont[h1][i][j];
      int led_num=Pos[i][j+PosH1];
      leds[led_num] = CHSV(hue,255,FontBrightness);
    }
    FastLED.show();
    delay(10);
  }
  //Hour0
  for(int j=0;j<FontWidth;j++){
    for(int i=0; i < FontHeight; i++){
      byte FontBrightness=NumFont[h0][i][j];
      int led_num=Pos[i][j+PosH0];
      leds[led_num] = CHSV(hue,255,FontBrightness);
    }
    FastLED.show();
    delay(10);
  }
  //:
  for(int j=0;j<ColWidth;j++){
    for(int i=0; i < FontHeight; i++){
      byte FontBrightness=ColonFont[i][j];
      int led_num=Pos[i][j+PosCol];
      leds[led_num] = CHSV(hue,255,FontBrightness);
    }
    FastLED.show();
    delay(10);
  }
  //Min1
  for(int j=0;j<FontWidth;j++){
    for(int i=0; i < FontHeight; i++){
      byte FontBrightness=NumFont[m1][i][j];
      int led_num=Pos[i][j+PosM1];
      leds[led_num] = CHSV(hue,255,FontBrightness);
    }
    FastLED.show();
    delay(10);
  }
  //Min0
  for(int j=0;j<FontWidth;j++){
    for(int i=0; i < FontHeight; i++){
      byte FontBrightness=NumFont[m0][i][j];
      int led_num=Pos[i][j+PosM0];
      leds[led_num] = CHSV(hue,255,FontBrightness);
    }
    FastLED.show();
    delay(10);
  }
}

void setPosArray(){
  for(int i=0; i < HEIGHT; i++){
    for(int j=0; j < WIDTH; j++){
      if(i%2==0){
        Pos[i][j]=i*WIDTH+j;
      } else{
        Pos[i][j]=(i+1)*WIDTH-j-1;
      }
    }
  }
}

void clearDisplay(){
  for(int i=0;i<NUM_LEDS;i++){
    leds[i] = CRGB::Black;
  }
  FastLED.show();
}

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

#include <WiFi.h>

#include "time.h"

const char* ssid = "YourSSID";

const char* password = "YourPWD";

const char* ntpServer = "ntp.nict.jp";

const long gmtOffset_sec = 9*3600;

const int daylightOffset_sec = 0;

int SecCount=300;

//------------------------------

#include <FastLED.h>

#define DATA_PIN 16

#define WIDTH 32

#define HEIGHT 8

#define NUM_LEDS (WIDTH * HEIGHT)

CRGBArray<NUM_LEDS> leds;

int Pos[HEIGHT][WIDTH];

const int FontWidth=7;

const int FontHeight=8;

const int ColWidth=2;

byte ColonFont[FontHeight][ColWidth]={{0,0},{0,80},{80,80},{0,0},{0,0},{0,80},{80,80},{0,0}};

byte NumFont[10][FontHeight][FontWidth]={

//-0-

{{0,0,50,90,90,50,0},{0,40,90,40,50,100,30},{10,90,30,0,0,95,40},{30,100,10,0,0,100,40},

{50,90,0,0,20,100,30},{50,90,0,0,50,80,0},{30,100,50,40,90,40,0},{0,60,100,90,40,0,0}},

//-1-

{{0,0,0,40,80,0,0},{0,0,50,100,80,0,0},{0,0,30,70,70,0,0},{0,0,0,80,50,0,0},

{0,0,0,90,40,0,0},{0,0,20,100,20,0,0},{0,20,50,100,30,0,0},{0,70,90,90,70,0,0}},

//-2-

{{0,0,20,60,70,50,0},{0,30,90,70,70,100,30},{0,20,20,0,20,100,20},{0,0,0,30,80,60,0},

{0,10,70,90,50,10,0},{0,70,70,0,0,0,0},{30,100,50,50,60,20,0},{30,90,90,90,90,40,0}},

//-3-

{{0,0,30,70,90,50,0},{0,10,90,50,60,100,30},{0,0,0,10,30,100,20},{0,0,40,100,100,50,0},

{0,0,10,30,70,80,0},{0,20,0,0,50,90,0},{10,100,50,40,80,60,0},{0,50,90,90,50,0,0}},

//-4-

{{0,0,0,0,40,80,20},{0,0,0,40,100,100,10},{0,0,30,90,70,90,0},{0,20,80,50,60,70,0},

{20,70,90,50,80,70,30},{30,70,80,80,100,90,40},{0,0,0,10,100,30,0},{0,0,0,20,90,20,0}},

//-5-

{{0,30,100,100,100,100,60},{0,50,90,20,20,20,0},{0,70,90,90,100,60,0},{0,90,70,30,30,100,30},

{0,40,20,0,10,100,30},{0,10,0,0,40,100,10},{40,80,50,50,90,40,0},{20,70,90,80,40,0,0}},

//-6-

{{0,0,0,3,70,40,0},{0,0,40,90,60,0,0},{0,20,90,60,10,0,0},{0,70,100,100,100,60,0},

{0,100,60,20,40,100,20},{10,100,20,0,20,100,20},{10,100,50,10,60,60,0},{0,60,100,100,70,20,0}},

//-7-

{{40,90,90,90,90,90,40},{20,30,40,40,90,70,20},{0,0,0,60,80,20,0},{0,0,40,100,40,0,0},

{0,10,80,60,0,0,0},{0,60,80,10,0,0,0},{20,100,30,0,0,0,0},{40,70,0,0,0,0,0}},

//-8-

{{0,0,30,70,90,60,10},{0,20,90,60,50,100,30},{0,40,90,10,30,100,20},{0,30,100,100,100,60,0},

{0,60,80,50,70,90,10},{20,100,20,0,30,100,20},{30,100,40,20,70,80,0},{0,60,90,90,70,20,0}},

//-9-

{{0,20,60,100,100,60,0},{0,70,60,10,30,100,40},{20,100,20,0,0,100,40},{20,100,60,20,50,100,20},

{0,50,100,100,100,70,0},{0,0,0,50,100,30,0},{10,30,50,100,40,0,0},{40,90,70,20,0,0,0}}

};

void setup() {

Serial.begin(115200);

//connect to WiFi

Serial.printf("Connecting to %s ", ssid);

WiFi.begin(ssid, password);

while (WiFi.status() != WL_CONNECTED) {

delay(500);

Serial.print(".");

}

Serial.println(" CONNECTED");

configTime(gmtOffset_sec, daylightOffset_sec, ntpServer);

printLocalTime();

//---------------

FastLED.addLeds<WS2812B, DATA_PIN, GRB>(leds, NUM_LEDS);

LEDS.setBrightness(150);

setPosArray();

clearDisplay();

delay(3000);

}

void loop(){

if(SecCount>=300){

configTime(gmtOffset_sec, daylightOffset_sec, ntpServer);

Serial.print("Updated to ");

printLocalTime();

SecCount=0;

}

printLocalTime();

SecCount=SecCount+1;

delay(1000);

}

void printLocalTime(){

struct tm timeInfo;

getLocalTime(&timeInfo);

int time_h=timeInfo.tm_hour;;

int time_m=timeInfo.tm_min;

int time_s=timeInfo.tm_sec;

Serial.print(time_h);

Serial.print(":");

Serial.print(time_m);

Serial.print(":");

Serial.println(time_s);

int h1=time_h/10;

int h0=time_h%10;

int m1=time_m/10;

int m0=time_m%10;

clearDisplay();

delay(10);

//showTime(2,3,4,8);

showTime(h1,h0,m1,m0);

}

void showTime(int h1,int h0,int m1, int m0){

static uint8_t hue=180;

int PosH1=1;

int PosH0=8;

int PosCol=15;

int PosM1=17;

int PosM0=24;

//Hour1

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

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

byte FontBrightness=NumFont[h1][i][j];

int led_num=Pos[i][j+PosH1];

leds[led_num] = CHSV(hue,255,FontBrightness);

}

FastLED.show();

delay(10);

}

//Hour0

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

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

byte FontBrightness=NumFont[h0][i][j];

int led_num=Pos[i][j+PosH0];

leds[led_num] = CHSV(hue,255,FontBrightness);

}

FastLED.show();

delay(10);

}

//:

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

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

byte FontBrightness=ColonFont[i][j];

int led_num=Pos[i][j+PosCol];

leds[led_num] = CHSV(hue,255,FontBrightness);

}

FastLED.show();

delay(10);

}

//Min1

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

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

byte FontBrightness=NumFont[m1][i][j];

int led_num=Pos[i][j+PosM1];

leds[led_num] = CHSV(hue,255,FontBrightness);

}

FastLED.show();

delay(10);

}

//Min0

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

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

byte FontBrightness=NumFont[m0][i][j];

int led_num=Pos[i][j+PosM0];

leds[led_num] = CHSV(hue,255,FontBrightness);

}

FastLED.show();

delay(10);

}

void setPosArray(){

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

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

if(i%2==0){

Pos[i][j]=i*WIDTH+j;

} else{

Pos[i][j]=(i+1)*WIDTH-j-1;

}

void clearDisplay(){

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

leds[i] = CRGB::Black;

}

FastLED.show();

}

WiFi LANでのESP32環境センサーノードとESP32データロガー

ESP32 environment sensor node and data logger on WiFi LAN

Overview
In order to investigate the temperature distribution in the indoor space, we created a system that records data from multiple environmental sensor nodes wirelessly to a data logger. The environmental sensor node performs intermittent operation by connecting the BME280 environmental sensor to the ESP32 as a battery drive to facilitate installation. The data logger connects the real-time clock and SD card to the ESP 32 and records the received time and data in a file for each sender. Assign a fixed IP address with the ESP32 MAC address using a dedicated WiFi router. Data is sent from the environmental sensor node to the data logger’s IP address using UDP, and the data logger learns the environmental sensor node number from the sender IP address.

概要
屋内空間の温度分布を調べるために、複数の環境センサーノードから無線でデータロガーに記録するシステムを作りました。環境センサーノードは設置を容易にするために電池駆動としてESP32にBME280環境センサーを接続して、電池の交換頻度を減らすために間欠動作を行います。データロガーはESP32にリアルタイムクロックとSDカードを接続して、受け取った時刻とデータを送信元ごとのファイルに記録します。専用のWiFi ルーターを使って使用するESP32のMACアドレスで固定IPアドレスを割り当てます。環境センサーノードからデータロガーのIPアドレスに向けてUDPでデータを送り、データロガーは送信元IPアドレスから環境センサーノードの番号を知ります。

使用した機材

ESP32: MH-ET LIVE ESP-32 Mini kit

10ピン４列のピンソケットには分割ロングピンソケット　１ｘ４２　[FHU-1x42SG] (秋月電子通商)を使用しました。
http://mh.nodebb.com/topic/5/mh-et-live-esp-32-devkit-mini-kit-user-guide-updating

環境センサー: BME280 GYBMEP

ライブラリ：BlueDot BME280 Library

BME280 : ESP32
VIN : 3.3V
GND :GND
SCL :IO22
SDA :IO21

マイクロSDモジュール:

ライブラリ: ESP32標準 SD(esp32)

配線
SD : ESP32
CS : IO5
SCK : IO18
MOSI : IO23
MISO : IO19
VCC : VCC
GND : GND

リアルタイムクロック: DS3231 ZS-042モジュール

充電できないCR2032を使用するため充電用パターンをカットしました。

ライブラリ：DS3231FS

配線
DS3231 : ESP32
32K : NC
SQW : NC
SCL : IO22
SDA : IO21
VCC : VCC
GND : GND

無線LANポータブルルーター: エレコムWRH-300BK3-S

ESP32のMACアドレスを調べて、MACアドレスとIPアドレスを紐付けにします。SSIDのスティルス機能を使い、登録されたMACアドレス以外は接続を拒否しています。

電池ケース: マルツGB-BHS-3X4C-LW(単3×4本スイッチ・フタ・リード線付き)
ESP32のVDDに+6V、ESP32のGNDに０Vを接続します。

動作の安定性について
ESP32環境センサーノードは送信時に毎回起動するような動作のため安定して動作します。ESP32データロガーは連続動作のためWiFi LANへの接続不良の場合やSDへの記録が正常に行えない場合はESP32をリスタートすることにしました。

ESP32環境センサーノードのスケッチ

//スリープから指定時間後に起動し、
//温度・湿度・気圧を測定し、
//UDP通信でIPアドレス***,***,***,***の50021ポートに送る。
//その後スリープする。

//BME280環境センサー
#include <Wire.h>
#include "BlueDot_BME280.h"
BlueDot_BME280 bme280 = BlueDot_BME280();
#define BUFF_MAX 128
char message[BUFF_MAX];
//WiFi設定
#include "WiFi.h"
#include "AsyncUDP.h"
const char * ssid = "Your SSID";
const char * password = "Your Password";
AsyncUDP udp;
//タイマー起動
#define uS_TO_S_FACTOR 1000000  /* Conversion factor for micro seconds to seconds */
#define TIME_TO_SLEEP  60        /* Time ESP32 will go to sleep (in seconds) */
RTC_DATA_ATTR int bootCount = 0;


void setup(){
  Serial.begin(9600);
  WiFi.mode(WIFI_STA);
  WiFi.begin(ssid, password);
  delay(1000); //Take some time to open up the Serial Monitor
  
  ++bootCount;  //Increment boot number and print it every reboot
  Serial.println("Boot number: " + String(bootCount));
  esp_sleep_enable_timer_wakeup(TIME_TO_SLEEP * uS_TO_S_FACTOR);
  Serial.println("Setup ESP32 to sleep for every " + String(TIME_TO_SLEEP) +
  " Seconds");

  BME280_parameter();
  bme280.init();
  delay(5000);
  
  float temp=bme280.readTempC();
  float hum=bme280.readHumidity();
  float pres=bme280.readPressure();
  snprintf(message, BUFF_MAX, "%.1f\t%.1f\t%.1f\n", temp, hum, pres);
  Serial.print(message);

  if(udp.connect(IPAddress(***,***,***,***), 50021)){
    udp.print(message);
  }
  delay(3000);
  esp_deep_sleep_start();
}


void BME280_parameter(){
  bme280.parameter.communication = 0;
  bme280.parameter.I2CAddress = 0x76;
  bme280.parameter.sensorMode = 0b11;
  bme280.parameter.IIRfilter = 0b100;
  bme280.parameter.humidOversampling = 0b101;
  bme280.parameter.tempOversampling = 0b101;
  bme280.parameter.pressOversampling = 0b101;
  bme280.parameter.pressureSeaLevel = 1013.25;
  bme280.parameter.tempOutsideCelsius = 15;
}

void loop(){
  //This is not going to be called
}

//スリープから指定時間後に起動し、

//温度・湿度・気圧を測定し、

//UDP通信でIPアドレス***,***,***,***の50021ポートに送る。

//その後スリープする。

//BME280環境センサー

#include <Wire.h>

#include "BlueDot_BME280.h"

BlueDot_BME280 bme280 = BlueDot_BME280();

#define BUFF_MAX 128

char message[BUFF_MAX];

//WiFi設定

#include "WiFi.h"

#include "AsyncUDP.h"

const char * ssid = "Your SSID";

const char * password = "Your Password";

AsyncUDP udp;

//タイマー起動

#define uS_TO_S_FACTOR 1000000 /* Conversion factor for micro seconds to seconds */

#define TIME_TO_SLEEP 60 /* Time ESP32 will go to sleep (in seconds) */

RTC_DATA_ATTR int bootCount = 0;

void setup(){

Serial.begin(9600);

WiFi.mode(WIFI_STA);

WiFi.begin(ssid, password);

delay(1000); //Take some time to open up the Serial Monitor

++bootCount; //Increment boot number and print it every reboot

Serial.println("Boot number: " + String(bootCount));

esp_sleep_enable_timer_wakeup(TIME_TO_SLEEP * uS_TO_S_FACTOR);

Serial.println("Setup ESP32 to sleep for every " + String(TIME_TO_SLEEP) +

" Seconds");

BME280_parameter();

bme280.init();

delay(5000);

float temp=bme280.readTempC();

float hum=bme280.readHumidity();

float pres=bme280.readPressure();

snprintf(message, BUFF_MAX, "%.1f\t%.1f\t%.1f\n", temp, hum, pres);

Serial.print(message);

if(udp.connect(IPAddress(***,***,***,***), 50021)){

udp.print(message);

}

delay(3000);

esp_deep_sleep_start();

}

void BME280_parameter(){

bme280.parameter.communication = 0;

bme280.parameter.I2CAddress = 0x76;

bme280.parameter.sensorMode = 0b11;

bme280.parameter.IIRfilter = 0b100;

bme280.parameter.humidOversampling = 0b101;

bme280.parameter.tempOversampling = 0b101;

bme280.parameter.pressOversampling = 0b101;

bme280.parameter.pressureSeaLevel = 1013.25;

bme280.parameter.tempOutsideCelsius = 15;

}

void loop(){

//This is not going to be called

}

ESP32データロガーのスケッチ

//WiFi
#include "WiFi.h"
#include "AsyncUDP.h"
const char * ssid = "MaDAesp32NET";
const char * password = "1655arduino32";
AsyncUDP udp;
//SD
#include "FS.h"
#include "SD.h"
#include "SPI.h"
//RTC
#include <Wire.h>
#include <ds3231.h>
ts t; //ts is a struct findable in ds3231.h

#define BUFF_MAX 128
char buff[BUFF_MAX];
char dateString[BUFF_MAX];
char dataFileName[BUFF_MAX];
char timeString[BUFF_MAX];
char recString[BUFF_MAX];
char ipString[BUFF_MAX];

int led_r =16;
int led_g =17;
int myTimer =0;

int udpCount;

void setup()
{
  Serial.begin(9600);
  pinMode(led_r, OUTPUT);
  pinMode(led_g, OUTPUT);
  WiFi.mode(WIFI_STA);
  WiFi.begin(ssid, password);
  if (WiFi.waitForConnectResult() != WL_CONNECTED) {
      Serial.println("WiFi Failed");
      delay(10000);
      /*
      while(1) {
          delay(1000);
      }
      */
  }
  udpCount=0;
  Wire.begin();
  DS3231_init(DS3231_INTCN);
  if(!SD.begin()){
      Serial.println("Card Mount Failed");
      return;
  }
  checkSD();
}

void loop()
{
  if(udp.listen(50021)) {
    udp.onPacket([](AsyncUDPPacket packet) {
      myTimer=0;
      IPAddress ipadr = packet.remoteIP();
      snprintf(ipString, BUFF_MAX, "%d.%d.%d.%d", ipadr[0], ipadr[1], ipadr[2], ipadr[3]);
      int snrNum=ipadr[3]-20;   //IPアドレスの末尾からセンサー番号を求める
      DS3231_get(&t);           //時刻を求める
      snprintf(dateString, BUFF_MAX, "%02d%02d%02d", t.year%100, t.mon, t.mday);
      snprintf(timeString, BUFF_MAX, "%02d:%02d:%02d", t.hour, t.min, t.sec);
      
      sprintf(recString, "%d\t%s\t%s\t%s\t%s",udpCount,ipString,dateString,timeString,packet.data());
      sprintf(dataFileName,"/T_files/%s%02d.txt", dateString,snrNum);
      Serial.println(dataFileName);
      if(SD.exists(dataFileName)){
        appendFile(SD, dataFileName, recString);
        Serial.print("Append ");
      }else{
        writeFile(SD, dataFileName, recString);
        Serial.print("Create ");
      }
      Serial.println(recString);
      udpCount++;
    });
  }
  if(WiFi.status() != WL_CONNECTED){
    ESP.restart();
  }
  if(myTimer<1000){
    digitalWrite(led_r, HIGH);
  } else{
    digitalWrite(led_r, LOW);
  }
  delay(10);
  myTimer++;
}

void checkSD(){
  uint8_t cardType = SD.cardType();
  if(cardType == CARD_NONE){
    Serial.println("No SD card attached");
    return;
  }
}


void writeFile(fs::FS &fs, const char * path, const char * message){
    //Serial.printf("Writing file: %s\n", path);

    File file = fs.open(path, FILE_WRITE);
    if(!file){
        Serial.println("Failed to open file for writing");
        digitalWrite(led_g, LOW);
        ESP.restart();
        return;
    }
    if(file.print(message)){
        //Serial.println("File written");
        digitalWrite(led_g, HIGH);
    } else {
        Serial.println("Write failed");
        digitalWrite(led_g, LOW);
        ESP.restart();
    }
    file.close();
}

void appendFile(fs::FS &fs, const char * path, const char * message){
    //Serial.printf("Appending to file: %s\n", path);

    File file = fs.open(path, FILE_APPEND);
    if(!file){
        Serial.println("Failed to open file for appending");
        digitalWrite(led_g, LOW);
        ESP.restart();
        return;
    }
    if(file.print(message)){
        //Serial.println("Message appended");
        digitalWrite(led_g, HIGH);
        
    } else {
        Serial.println("Append failed");
        digitalWrite(led_g, LOW);
        ESP.restart();
    }
    file.close();
}

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

//WiFi

#include "WiFi.h"

#include "AsyncUDP.h"

const char * ssid = "MaDAesp32NET";

const char * password = "1655arduino32";

AsyncUDP udp;

//SD

#include "FS.h"

#include "SD.h"

#include "SPI.h"

//RTC

#include <Wire.h>

#include <ds3231.h>

ts t; //ts is a struct findable in ds3231.h

#define BUFF_MAX 128

char buff[BUFF_MAX];

char dateString[BUFF_MAX];

char dataFileName[BUFF_MAX];

char timeString[BUFF_MAX];

char recString[BUFF_MAX];

char ipString[BUFF_MAX];

int led_r =16;

int led_g =17;

int myTimer =0;

int udpCount;

void setup()

{

Serial.begin(9600);

pinMode(led_r, OUTPUT);

pinMode(led_g, OUTPUT);

WiFi.mode(WIFI_STA);

WiFi.begin(ssid, password);

if (WiFi.waitForConnectResult() != WL_CONNECTED) {

Serial.println("WiFi Failed");

delay(10000);

while(1) {

delay(1000);

}

udpCount=0;

Wire.begin();

DS3231_init(DS3231_INTCN);

if(!SD.begin()){

Serial.println("Card Mount Failed");

return;

}

checkSD();

}

void loop()

{

if(udp.listen(50021)) {

udp.onPacket([](AsyncUDPPacket packet) {

myTimer=0;

IPAddress ipadr = packet.remoteIP();

snprintf(ipString, BUFF_MAX, "%d.%d.%d.%d", ipadr[0], ipadr[1], ipadr[2], ipadr[3]);

int snrNum=ipadr[3]-20; //IPアドレスの末尾からセンサー番号を求める

DS3231_get(&t); //時刻を求める

snprintf(dateString, BUFF_MAX, "%02d%02d%02d", t.year%100, t.mon, t.mday);

snprintf(timeString, BUFF_MAX, "%02d:%02d:%02d", t.hour, t.min, t.sec);

sprintf(recString, "%d\t%s\t%s\t%s\t%s",udpCount,ipString,dateString,timeString,packet.data());

sprintf(dataFileName,"/T_files/%s%02d.txt", dateString,snrNum);

Serial.println(dataFileName);

if(SD.exists(dataFileName)){

appendFile(SD, dataFileName, recString);

Serial.print("Append ");

}else{

writeFile(SD, dataFileName, recString);

Serial.print("Create ");

}

Serial.println(recString);

udpCount++;

});

}

if(WiFi.status() != WL_CONNECTED){

ESP.restart();

}

if(myTimer<1000){

digitalWrite(led_r, HIGH);

} else{

digitalWrite(led_r, LOW);

}

delay(10);

myTimer++;

}

void checkSD(){

uint8_t cardType = SD.cardType();

if(cardType == CARD_NONE){

Serial.println("No SD card attached");

return;

}

void writeFile(fs::FS &fs, const char * path, const char * message){

//Serial.printf("Writing file: %s\n", path);

File file = fs.open(path, FILE_WRITE);

if(!file){

Serial.println("Failed to open file for writing");

digitalWrite(led_g, LOW);

ESP.restart();

return;

}

if(file.print(message)){

//Serial.println("File written");

digitalWrite(led_g, HIGH);

} else {

Serial.println("Write failed");

digitalWrite(led_g, LOW);

ESP.restart();

}

file.close();

}

void appendFile(fs::FS &fs, const char * path, const char * message){

//Serial.printf("Appending to file: %s\n", path);

File file = fs.open(path, FILE_APPEND);

if(!file){

Serial.println("Failed to open file for appending");

digitalWrite(led_g, LOW);

ESP.restart();

return;

}

if(file.print(message)){

//Serial.println("Message appended");

digitalWrite(led_g, HIGH);

} else {

Serial.println("Append failed");

digitalWrite(led_g, LOW);

ESP.restart();

}

file.close();

}

「スクエア&キューブパズル」地産材でのクラフト製作の勧め

“Square & cube puzzle” :Recommendation for crafting with local wood

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

「メイカーフェア東京2019での計測・解析ラボのプロフィール」
計測・解析ラボは盛岡市を拠点に個人事業としてLabVIEWプログラムの受託開発とArduinoなどオープンなハード・ソフトの講習会を行っています。プログラムとレーザーカッターを使った木工パズルデザインは3年目となり、地域の木材活用と木工クラフト作家との連携を模索しています。MFTokyo2019ではパズル作品を通しての交流やメイカー向けLabVIEW Home版の情報共有を行いたいと思います。

「メイカーフェア東京2019での出展内容の紹介」
正方形から立方体を組むことのできる幾何学的な美しさが特徴のスクエア&キューブパズルです。立方体4個を平面に並べた5種類のピースを16個使ったパズルで、PCやスマホで疲れた目を休めて指先を使い立体図形に親しむことができます。レーザーカッターで作ったプロトタイプを見本に岩手県内の木工家に地域材を使ったクラフト製作を勧めています。もちろん3Dプリンターでの自作も可能です。

デモビデオ@ユーチューブ

パズルのデモビデオ(ユーチューブ)

「スクエア&キューブパズル」の製作の経緯
MFTokyo 2018では「チーム岩手」から「プログラミングとレーザーカッターの素敵な関係」というタイトルで参加しました。２次元の図案をレーザーカッターで加工すると厚みのある2.5次元のパズルに成ります。次回のMFTokyo 2019ではレーザーカッターで3次元のパズルを作成したいと考えていました。

ちょうどFusion 360を使い始めて立体的な箱物を作る時のはめ込み設計に便利なことに気がついて操作の練習をしていたのですが、レーザーカッターで作ったピースを組み立てて立方体にするアイデアが浮かびました。正方形から切り出したピースが立方体になるパズルは幾何的に美しい構成です。単位立方体の個数で表現すれば次のような関係に成ります。

(正方形) (立方体) (単位立方体の個数)

8 x 8 = 4 x 4 x 4 =64

27 x 27 = 9 x 9 x 9 = 729

128 x 128= 16 x 16 x 16 = 4096

とりあえず、一番小さな組み合わせの4 x 4 x 4の立方体で考えることにしました。テトロミノというテトリスで有名な形状は正方形4個の組み合わせで5種類できるので、Fusion 360で4 x 4 x 4の立方体のモデルを作って4個づつ”結合”して全てテトロミノにすることができるか実験してみました。何度か試行錯誤して16個のテトロミノに分割できました。次はその16個で正方形ができるかやってみました。正方形になりました。

平面パズルに使っている厚さ6mmのアカマツ板では2.4cmのキューブにしかならないので、厚さ10mmを注文して作成しました。できることはできるのですが、まだ小さいので、レーザーカッターの限界と言われる15mmの板を注文して作りました。正方形のサイズは12cm、立方体のサイズは6cmになります。正方形の外枠を14cm角にすると持ち運びを考えるて手頃な大きさだろうと思います。外箱は一関の金森紙器さんに作ってもらいました。

テトロミノについて知っておこう
正方形を2個つなぎ合わせた形状をドミノと言います。3個つなぎ合わせたのがトロミノ、4個つなぎ合わせたのがテトロミノです。5個つなぎ合わせるとペントミノですが、このようにN個つなぎ合わせた図形の総称をポリオミノと言います。テトロミノは5種類ありますが、図形の特徴からI、L、T、Z、Oと呼ばれています。 I、L、Tは見た目通りですが、正方形をO、残った1個がZです。
スクエア&キューブパズルには4個の単位立方体で作ったテトロミノが16個入っています。5種類のテトロミノから16 個選ぶ方法はたくさんありますが、I型が3個、L型が4個、T型が2 個、Z型が3個、O型が4個の組み合わせにしました。

地産材でのクラフト製作の勧め
岩手に旅行で来た時に地元のクラフトマンが作ったスクエア&キューブパズルを目にする日が来るかもしれません。地域の木材を使ったパズルは、木の種類によって色や木目、重さや手触りが違うことを発見して自然を身近なものとして考え、豊かな森林への関心を高めることができるでしょう。西和賀町に広がる国内有数のブナ林、北限のツバキが咲く大船渡、遠野地方の広葉樹、久慈の南部赤松、平庭高原の白樺など広い岩手県には地域を代表する木が多くあります。天然木の手触りの良さとともに地域性が感じられるスクエア&キューブパズルが各地で購入できたら嬉しいことです。もちろん秋田の杉、青森のヒバなどを使って各地のクラフトマンが作ってくれたらもっと面白いだろうなと思います。

スクエア&キューブパズルに関連する特許
独自の発想で作ったパズルですが、幾何的にきれいなパズルなので誰か他の人も考えていただろうと思って、スクエア&キューブパズルに関係する特許について調べてみました。古い特許ですが1988年にアメリカで登録された「BLOCK PUZZLE」という特許がありました。テトロミノ16個を正方形に詰めるパズルとテトロキューブ(立方体を立体的に4個つないだ図形)16個を立方体に組むパズルを併記しています。正方形に詰めるパズルの厚みを変えるだけで立方体ができるのですが、念頭にはなかったようです。

サイコロでスクエア&キューブパズルを作ろう
とりあえずパズルが欲しい人はサイコロを瞬間接着剤で接着してパズルピースを作ってみましょう。16mmのサイコロが50個入りで1100円ぐらいで購入できます。

メイカーフェア東京2018

メイカーフェア東京2018に出展します。
木目のパズル「プログラミングとレーザーカッターの素敵な関係」というタイトルで「チームいわて」のメンバーとして参加します。
ブースはC/02-02です。
「LabVIEW Home版をメイカーな人たちに広めよう」ということで、FM音源モジュールを接続したArduinoに、LabVIEWから音源パラメータを送り込むプログラムをデモします。

タッチディスプレイでLabVIEWのUIをクリックすると、
パラメータがArduinoに送られて、音源モジュールのレジスタが書き換えられ、
音源もジュールからPCのマイク端子に音声信号が送られ、
LabVIEWで信号を受け取って波形とパワースペクトルが表示され、
PCのイヤホン端子から外部スピーカーで音が出る、
というものです。

今回のデモ用にたまたまHPの安いノートPCを購入したのですが、タッチディスプレイの便利さを実感しました。
ブースレイアウトを確認してパッキングしました。

(180803)

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