P．T．A．５５ -10ページ目

ホームピグアメブロ

芸能人ブログ人気ブログ

P．T．A．５５

Perfume，音楽，PC，RC，，，好きなことを好きなときに，，

ブログトップ
記事一覧
画像一覧
動画一覧

前ページ
次ページ

07Jun
- RCサーボで動く「モグラたたき」の7台バージョンを動かしてみた
  Raspberry Pi PicoとRCサーボで動く「モグラたたき」の7台バージョンをフレームまで作ったので動かしてみました。機材はMPU：Raspberry Pi Picoサーボ：SG90互換ヒットセンサ：タクトスイッチディスプレイ：ジャンクのVFD(シリアル接続）サウンド：tone関数+アンプ(PAM8012モジュール)です。今までの過程・RCサーボで動かすモグラたたきゲームの７台版を製作中・Raspberry Pi PicoでArduinoのサーボライブラリはデフォルト値に注意です・RCサーボで動かすモグラたたきゲームのプロトタイプを作ってみたオヤジらしい地味な外観です。今回の木材のフレームや芝生様マットは御用達の100均の材料を使っています(^_^)。動作チェック動画です。フェイク動作もランダムの出現にしているのですが，，少し出現頻度が少ないですかね(^^;;;;;どうにも工作は遅々として進まないのですが，ここまで来たので外装は整えたいですね(^^;;;。またソフトやハードで次のステップとしてやっていきたい事がいくつかあります。・表示器のLED化　今はチェックのため便利なシリアル表示器をつないだだけなので，，・ゲームの難易度を変更可能にする　フェイク動作，モグラ出現時間，ヒットタイミングなどを調整可能にする・ゲーム音をもっとそれらしく　BGMも欲しい，，，などなど，ゲームは楽しくなる要素がたくさんありますね。ゆっくり，ぼちぼちとやっていきましょう(^^)。
29May
- RCサーボで動かすモグラたたきゲームの７台版を製作中
  RCサーボで動かすモグラたたきゲームの７台版をRaspberry Pi Pico を使って製作中です。Seeeduino XIAO で3台版のプロトタイプは作っているので，コントロールするサーボを増やし，プログラムをPico用に少し変更しただけです(^^;;;;;。せっかくPin数の多いPicoを使っているので，できるだけ部品点数を少なくしようと直結しました。さすがに７台をつなぐと配線が混雑します(^^)。動作確認はOKでしたので，一安心です。今の状態でもI2CやUARTのPinなどは十分確保できているので，表示やケースの制作にかかれますね(^^)。arduino/picoでは特にサーボに指定Pinはなく，最大８台まではコントロールできます。ただデフォオルトでは動作角度が小さいのでArduino標準値に設定して使っています。３台版からPicoの７台版用に変更したサーボ関係の設定部分です。もっとスマートな書き方があるのでしょうが，，ベタに設定してcase文で呼び出しています。/* Pico mogura test1 Servo Pin 6,7,8,9,10,11,12; LED Pin 13 Hit switch Pin 14,15,16,17,18,19,20 Start Pin 21; Sound Pin 22*/#include <Servo.h>#define servo_Max 7Servo myservo0;Servo myservo1;Servo myservo2;Servo myservo3;Servo myservo4;Servo myservo5;Servo myservo6;const int L_Pos=65; // default servo positionconst int M_Pos=95;const int H_Pos=125;void set_allservo(int ang){ for (int i=0; i < servo_Max; i++){ set_1servo(i, ang); }}void set_1servo(int svn, int ang){ switch (svn) { case 0: myservo0.write(ang); break; case 1: myservo1.write(ang); break; case 2: myservo2.write(ang); break; case 3: myservo3.write(ang); break; case 4: myservo4.write(ang); break; case 5: myservo5.write(ang); break; case 6: myservo6.write(ang); }}const int game_loop=30; // Init. game_basic_val int hit_Max=0;#define sePin 22void setup() { myservo0.attach(6,544,2400); // Servo Pin 6,7,8,9,10,11,12 myservo1.attach(7,544,2400); myservo2.attach(8,544,2400); myservo3.attach(9,544,2400); myservo4.attach(10,544,2400); myservo5.attach(11,544,2400); myservo6.attach(12,544,2400); set_allservo(L_Pos); for (byte i=14; i<21; i++){ //hit_switch: Pin 14,15,16,17,18,19,20 pinMode(i, INPUT); } pinMode(13, OUTPUT); // LED: Pin13 digitalWrite(13, LOW); pinMode(21, INPUT); // start_button: Pin 21 Serial.begin(9600); // Use UART} arduino/picoのサーボライブラリではPIO（Programmable I/O）を使っているので８台までという制限がありますが，動かしてみるとサーボはカチャつきなどなくスムースに動作しますね。また３台版と同様にフェイク動作を入れています。７台になるとさすがに騙されやすくなります。ゲームのプログラムはスピードや音の変化など，いろいろと考えられて楽しいのでぼちぼちとやっていきましょう(^^)。
15May
- Raspberry Pi PicoでArduinoのサーボライブラリはデフォルト値に注意です
  Raspberry Pi PicoはArduinoでarduino-picoボードマネージャーを使って動かしています。今回，Picoで初めてサーボライブラリを使ってみましたが，サーボのパルス幅のデフォルト値が標準の値ではなく，サーボの動きが小さい事が分かりました。Seeeduino XIAOのプログラムなどと互換をとりたいので，標準値に設定しました。・githubのarduino-picoのServo.hライブラリには以下のコメントがあります。　安全のために動きを小さくしているようです。 attach(pin, min, max) Attaches to a pin setting min and max values in microseconds default min is 1000, max is 2000・ArduinoのServoライブラリの解説によると標準値は以下になっています。min (optional): the pulse width, in microseconds, corresponding to the minimum (0 degree) angle on the servo (defaults to 544)max (optional): the pulse width, in microseconds, corresponding to the maximum (180 degree) angle on the servo (defaults to 2400)という事で，arduino-picoのデフォルトは使わず　attach(pin, 544, 2400);という設定にして無事同じ動作になりました(^^)。サーボはSeeeduino XIAOで動く「モグラたたき」のプロトタイプで3台まで使っていましたが，ぼちぼちとモグラの数を増やしています。次はPin数の多いPicoを使おうと思っていて，追加したモグラを1台ずつPicoでチェックしてみたのですが，その際に動きが違ってデフォルトの違いに気がつきました(^^;;;;;上記のパルス幅の変更をして使っている，サーボとヒットセンサーのチェックプログラムです。// Pico test1, Servo Pin6, switch Pin14, LED Pin13#include <servo.h>Servo myservo1;const int L_Pos=65; // stop positionsconst int M_Pos=95;const int H_Pos=125;void setup() { myservo1.attach(6,544,2400); // Init. servo myservo1.write(90); pinMode(13, OUTPUT); // LED for check the switch}void loop() { digitalWrite(13, LOW); // LED off myservo1.write(L_Pos); // move to low position delay(1000); // wait for 1000 ms myservo1.write(M_Pos); // move to middle position delay(500); byte hit=0; unsigned long h_time=1000; unsigned long s_time=millis(); myservo1.write(H_Pos); // move to high position while(millis()-s_time < h_time){ if (digitalRead(14) == 1){ // hit? hit=1; digitalWrite(13, HIGH); // turn the LED on } }} ちなみにarduino-picoのサーボライブラリで扱えるサーボ数は最大８台までです。動作にPIO（prgrammable input / output）を使っている関係だそうです。う〜む，飽き性だからでしょうね。同じものをいくつも作るのが得意じゃない事もあって，モグラ作りの作業が遅々として進みません(^^;;;;;;;;ま，趣味なので無理しないでぼちぼちとやっていきましょう。
06May
- 第3５回広島弦楽合奏団演奏会 2024年5月19日(日) のお知らせ
  私が所属している広島弦楽合奏団は第35回定期演奏会を2024年5月19日(日)午後2時から東区民文化センターで行いますのでお知らせです。プロのような名前の楽団ですが，長く続いているアマチュアの合奏団です(^^)。今年はクラリネット協奏曲と声楽独唱もあります。広島弦楽合奏団HP：https://hirogengak.exblog.jp/昨年はサミットとぶつかってしまいましたが(^^;;; 今年は特に交通機関に問題はないと思いますので，日曜の午後をゆったりとご一緒に過ごせれば幸いです。東区民センターのアクセスを転載しておきます。よろしくお願いいたします。
04May
- Windows11の環境でBASIC言語マイコンPICAXE-08M2を動かしてみた
  8pinのBASIC言語マイコンPICAXE-08M2で温湿度計つきのデジタル時計を動かしています。→ PICAXEで動くVFD（蛍光表示管ディスプレイ）のデジタル時計に温湿度センサーを追加してみた構成は以下です。MPU：PICAXE-08M2 (BASIC言語)リアルタイムクロック：DS1307 (I2C接続)温湿度センサー：DHT20 (I2C接続)ディスプレイ：VFD, M202MD10B (UART接続）動き続けてはいるのですが，電源が不安定な時があるのか，，時刻が少し進んだので時刻合わせをしてみました。特に時刻合わせの機構などは作っていませんので(^^;;;;;，プログラムの書き換えで合わせています。プログラムの変更，書き込みダウンロードを新規PCのWindows11の環境下でおこなってみました。書き込みには秋月電子の「FT234X 超小型USBシリアル変換モジュール」を使っています。☆ Windows11でのFT234X の設定は以前とあまり変わりなくできました。→ PICAXEとPCをFT234X超小型USBシリアル変換モジュールでつないでみる・ドライバは自動的に導入されました。・PICAXEのためにTX, RXの信号レベルの反転も同様にFTDI 社のウェブサイトからダウンロードした「FT_PROG」で設定が確認できました。→ FT_PROG 3.12.49.662 - EEPROM Programming Utility☆ PICAXEエディターの導入・PICAXEエディターのダウンロードは通常通りできました。　→ https://picaxe.com/software/picaxe/picaxe-editor-6/・ダウンロードしたインストールプログラムの実行にはWindows11でMicrosoft .Net Framework 3.5 を有効にしておく必要がありました。以上の設定でPICAXEエディターで時刻合わせのプログラムを修正してPICAXEに書き込み実行しました。ただ，このままでは電源のON/OFFなどがあると再度同じ年・日・時刻が書き込まれます(^^;;;;;　ので，時刻合わせ部をコメントアウトして，もう一度プログラムを書き込んでおきます。時刻合わせ部をコメントアウトしたところです。これで電源が切れて再起動してもRTCの電池のバックアップで時は進んでいます。久しぶりにPICAXEを触りましたが，Windows11の環境下でも変わらず動いてくれました(^^)。私のようなBASIC世代？にとってはなじみのある言語でマイコンがとっとこと動くのは楽しいものです。PICAXEはミリ秒単位ぐらいの処理であれば十分できる扱いやすいマイコンなのですが，PCからのUSBシリアル変換で信号の反転が必要なのが余分ですかねぇ，，。ま，反転するのは従来の正統派？だとは思うのですが，近頃は反転なしが多いですからね。PICAXEを使った最近の参考ページの一つです。・PICAXEで鉄道模型の在線検出と信号機の制御
30Apr
- ホルスト：「ムーアサイド組曲」を弦楽合奏と吹奏楽で聴く
  「惑星」で有名なホルスト(G. Holst)は今年，生誕150年を迎えます。「ムーアサイド組曲」は英国ブラスバンド大会のために書かれたもので，ホルスト自身で弦楽合奏や吹奏楽に編曲されています。「セントポール組曲」のように，イギリス民謡を感じさせる親しみやすさもある曲ですね(^^)。弦楽合奏版と吹奏楽版をメモしておきます。Gustav Holst : A Moorside Suite for string orchestra H. 173 (1928 arr. ca. 1933)I. Scherzo 00:00-03:00II. Nocturne 03:00-10:05III. March 10:05-14:30Performed by the Northern Sinfonia conducted by David Lloyd-Jones.Gustav Holst : A Moorside Suite for brass band H. 173 (1928)I. Scherzo 00:00-03:10II. Nocturne 03:10-10:05III. March 10:05-14:35Performed by the Grimethorpe Colliery Band conducted by Elgar Howarth.それぞれの編成の特長があって，良い曲ですね(^^)。ムーアサイド(Moorside)はイギリスの北部によくある地名のようです。"湿原のほとり"ぐらいの感じなんでしょうかねぇ。
26Apr
- BluetoothでスマホからLEDパネルにメッセージを送って表示してみた
  Arduino IDEでRaspberry Pi Pico W のBluetoothが動いています。また，Pico WではRGB LEDパネルのドット絵を動かしているので，BluetoothでスマホからLEDパネルにメッセージを送って表示してみました。使った機材は・Androidの"Serial Bluetooth Terminal"・Raspberry Pi Pico W・32x32RGBLEDパネル(HUB75規格)です。今までの画面の下半分ぐらいの位置に受信したメッセージを表示しています。送信するスマホ画面です。テキストを入力して右矢印を押すとデータが送信されます。受信したデータは左にスクロールしながら表示しています。Serial Bluetooth TerminalにはM1-M6などのファンクションキー？があります。よく使うコマンドや画面の切り替え指定の送信などに使うと便利そうです(^^)。Pico WのプログラムでBluetoothでの受信に関係した部分です。ごちゃごちゃしていますが(^^;;;，SerialBTを使って，データの受信の有無と読み取りを行なっています。// Call draw string // draw_String(byte drwn,String str,int x,int y,byte fr,byte fg,byte fb,byte br,byte bg,byte bb) String str; if (SerialBT.available() > 0 ){ str=SerialBT.readString(); // get data while (SerialBT.available() == 0 ){ for(int i=0; i < str.length()+1; i++){ // scroll int sy=20; int sx=(4-i)*8; draw_String(0,str,sx,sy,255,255,255,0,0,128); delay(500); //partset_drBoard(drwn, sx, sy, ex, ey, r, g, b) partset_drBoard(0, 0, 20, 31, 27, 0, 0, 0); show_drBoard(0); // clear string area } } } 以上のように，LEDパネルでの表示がまだまだすっきりしていませんが(^^;;;;;，，Bluetoothでのメッセージの送受信はシンプルにできました。ただ，プログラムを修正してダウンロードする際にエラーがよく出るようになり，BOOTボタンのお世話になりました。また，プログラムの書き込みごとにBluetoothのペアリングが切れるので手間がかかります。まずは有線のUARTで動くプログラムにしておき，動作確認後にSerial からSerialBTに置き換えると楽だと思いました(^^)。それにしても，「SerialBT」系は分かりやすくて良いですね。画面切り替えなどは簡単にできますので，使いでがありますね。
08Apr
- モーツァルト：ピアノ協奏曲23番を楽譜付きで聴く
  モーツァルトのピアノ協奏曲23番といえばロマンチックな第２楽章ですね。モーツァルト・短調・6/8のシチリアーナ系，と揃っています(^^)。もう何回書いたか分かりませんが，５年前にもいろいろと書いています。→ モーツァルトのピアノ協奏曲23番第２楽章を薬師丸ひろ子とイタリア映画「天使の詩」で聴く（再掲）楽譜付きの動画が上がっていますので，メモしておきます。Wolfgang Amadeus Mozart - Piano Concerto No. 23 in A major, K. 488 (Cadenza: Wolfgang Amadeus Mozart)Murray Perahia, pianoEnglish Chamber Orchestra (1984)I. Allegro [0:00]II. Adagio [11:43]III. Allegro assai [19:10]全楽章，良い曲ですね(^^)。楽譜を見ていると本当にシンプルな音符で構成されているのがよく分かります。音がにごりがちな平均律のピアノの重音に頼らず，むやみな技巧に走ることもなく，本当に純な音が続きますね。演奏者もどうしても気が入りすぎるのか，，ライブ版では第２楽章のテンポが遅めの演奏が多いですかね(^^;;;;;;
03Apr
- Raspberry Pi Pico で32x32 RGB LEDパネルのドット絵を動かしてみた
  32x32LEDパネルにRaspberry Pi Pico のデュアルコアでドット絵を作っています。デュアルコアはダイナミック表示のLEDパネル(HUB75規格）を動かすには便利です(^^)。小さなLEDパネルですが，少し体裁を整えてみました。オヤジらしく，風神などを作ってみたのですが，離れるとそれらしくは見えるでしょうか(^^;;;;;;。今回は自作してみた8x8のフォントのチェックも兼ねてドット絵を動かしてみました。フォントは表計算で作ってもよかったのですが，，さすがにアルファベットまで作るのは面倒なので手抜き策を試しました(^^;;;;。まずは表計算の正方形のセルにASCII の英数記号を適当なフォントで6x16個配置します。この表をグラフィックソフトの”ペイント”にコピペし，48x128ドット（ピクセル）にして，整えます。後はSDカードに画像として保存し，マイコン側で読みとって8x8ドットに分解すれば良い，という算段でした。しかし，ペイントにペーストした時点で予想以上にフォントのカスレやボケが激しくて，，ほぼ全部書いたような疲れが残りました(^^;;;;;;;。読み取りや分解は結構スムースにいきましたのでまぁ良しとしますが，もう一段階変換して１フォント８byteのデータにする余力が出てきませんので，今は8x8ドットの画像データのままで使っています。8x8bitのフォント画像データの配列に分解しているプログラム部分のメモです。// Font: copy sd_data to d-org8(0 - > 95 )void sd_to_org8_f(){ for (byte orgn=0; orgn < 96; orgn++){ // Ascii: 0x20 - > 0x7F byte sy=(orgn/16)*8; // Font table: 6x16 byte sx=(orgn%16)*8; for (byte i=0; i < 8; i++){ // 1Font: 8x8bit for (byte j=0; j < 8; j++){ byte c=0; // reverse font color for (byte k=0; k < 3 ;k++){ c += d_sd[i+sy][j+sx][k]; } if(c == 0){ // Dot: R+G+B=0 - > white c=0xFF; } else{ c=0x00; // Dot: R+G+B>0 - > black } for (byte k=0; k < 3 ;k++){ // set front_color white d_org8[orgn][i][j][k]=c; // back_color black } } } }} RAMの小さなMPU用にはバイトデータに変換するとともに，必要な文字だけをピックアップして使えるようにしておかないといけませんね。そういえばRaspberry Pi Pico Wを使っているので，Bluetoothを使っての画面変換も試してみたいですね(^^)。
30Mar
- LEDパネルにビットマップ形式の画像を使う時のデータ処理のメモ
  Windowsのビットマップ形式の画像はシンプルなピクセルデータで，LEDパネルにドット絵として表示するのに使いやすいですね。32x128や64x128の背景などにも使ってきましたが，今回は32x32の画像に使っています。原図は「いらすとや」さんの５月のイラストです(^^)。原図の一部をコピーしてWindowsのペイントソフトで32x32ピクセルの絵にしています。32x32だとさすがに小さめなので，表示の拡大を最大にし，ペン先を１ピクセルに設定して，修正したりします。できた画像は24ビットカラーのビットマップ形式で保存し，SDカードにもコピーします。☆ ファイル名は短く８文字までに！！。　ArduinoのSDライブラリでは，以下によるとファイル名8文字まで，拡張子3文字までという制限があります。→ https://www.arduino.cc/reference/en/libraries/sd/この24ビットカラーのビットマップ形式のデータは0x36番地から，「BGR」の順に1byteずつ並んでいます。BGRの順なので読み込む時にRGBに順序を変えて変数に入れています。親切な解説→ 【バイナリエディタ】BMP画像のファイル構造を解析（西住工房さん）（ビットマップデータの一例）このデータをSDカードから読み取っているのですが，ビットマップデータの座標は左下が原点のグラフのタイプの座標軸になっています。一方，LEDパネルやLCDの座標は横書き文章のタイプの左上からの行列になっているので縦軸の逆転が必要です。以上の注意点を考えながらSDからの取り込み例です。// get Bit_MAp(24bit color) data from sdvoid sd__bitmap_read(String title, byte row, byte column){ File dataFile = SD.open(title); dataFile.seek(54); // Skip Header for (byte i=row; i>0 ; i--){ // reverse row for (byte j=0; j < column; j++){ // column for (byte k=3; k>0; k--){ // reverse color BGR - > RGB d_sd[i-1][j][k-1]=dataFile.read(); } } } dataFile.close();} 以上，絵心のない者にとってフリー素材を原画にしてLEDパネルに使えるのは大助かりですV(^^)。8x8ドットぐらいの大きさか，１ドットを8色か赤3bit+緑3bit+青2bitの256色で1バイトで表せるなら，32x128ドットぐらいは表計算でも何とか計算できるのですが，，，，1ドットでRGBの3バイトとなるとプログラムでも書かないとやってられない作業になりそうです(^^;;;;;;;;;ドット絵の世界でもビットマップ形式はもう古いのでしょうか，，あまり使ってくれないみたいですね。でもデータは圧縮が無くシンプルなのでマイコンのドット物の表示には使いやすいフォーマットだと思っています。
27Mar
- 32x32LEDパネルにRaspberry Pi Pico のデュアルコアでドット絵を作ってみた
  HUB75規格の32x32カラーLEDパネルにドット絵を作ってみています。HUB75のLEDマトリックスはNeoPixel系と異なってダイナミック駆動です。今回はRaspberry Pi Pico のデュアルコア機能でLEDの駆動を行ってみました。→ Raspberry Pi Picoのマルチコアで RGB LEDディスプレイを動かしてみた試作中の32x32LEDパネルで，カラーテストをしているところです。いつやら買った超安価だったLEDパネルなので，，左上のLEDで赤が発色しません(^^;;;;;;。パネルは御用達の100均の木製収納箱の底の方にWindowを開けてとりつけ，フォトスタンドに置いています(^^;;;;;;;。MPUはRsapberry Pi Pico W，画像データを取り込むSPI接続のマイクロSDストレージを使っています。裏面からみると雑な固定が見えますが(^^;;;，LEDには3Dプリンターで作ったメッシュをつけて，乳白色のPPシートと塩ビのプラ板をかぶせています。SDから取り込んだ５月の節句の武者人形も写せましたので，まずは静止画は大丈夫になりました(^^)。32x32ぐらいの大きさになると，windows附属の「ペイント」でもドット絵が書けますね。上の写真でも分かるように，この超安価版32x32LEDは実は16x32のLEDパネルを２枚縦に並べています。これが今回のハマりポイントでした。HUB75で直列につないだLEDパネルは信号的には横に並んだものと同等ですが，見た目は縦なのが分かりにくいのと，シリアルに送られたデータを各行に配分していく走査線が４本あり，１本の走査線が８行を分担する１／８規格で私は慣れていなかった，，という事です。ま，静止画まで行けましたので，動きを追加してNeoPixel版と同じぐらいのプログラムにはしたいですね(^^)。
23Mar
- NeoPixelの8x8RGBカラーLEDパネルにSTM32C011でドット絵を描いてみた
  NeoPixelの8x8RGBカラーLEDパネルでは数字フォントを表示できました。Excelでカラーのドット絵を描く環境ができたので，今度は8x8の小さい絵を描いてみました。MPUはSTMC011J4M7で，LEDパネルにはメッシュをつけています。Excelでのデータ作成です。　各ドットのカラーデータはセルから読み取った32bit（有効値はRGB各８bitの24bit）はRGBに分解せず，そのままの値でArduinoの配列変数として使えるように編集しています。配列変数としてプログラムにコピペしたところです。　下図では8x8の画面を４面作っていますが，１画面が小さいのであまりかさばらない？感じでしょうか，，。出来が悪いですが実際に動かしてみた動画です。かなり離れて見ると，少しはそれらしく見えますでしょうか(^^;;;;;。プログラム的にはフォントの表示のプログラムに配列データを読み込むパートを追加しただけです(^^)。　各ドットでは32bit（有効は下位24bit）の色データをそのまま使っているので，プログラム内でRGBに分解しています。 for(int i=0; i< Y_max; i++){ // Show BitMap 2 for (int j=0; j< X_max; j++){ byte R=bMap_RGB24_2[i][j]%256/3; byte G=(bMap_RGB24_2[i][j]/256)%256/3; byte B=bMap_RGB24_2[i][j]/256/256/3; p_set (j,i,R,G,B); } } ドット絵を作るのにはセンスが必要ですねぇ，，。私は全く絵心が無いので，小さなアイロンビーズや刺繍の構図を参考というよりもっと頂いて作ってみました(^^;;;;;。本当に一から作れる人はすごいですねぇ，尊敬します，はい。以下は自分のプログラム記録用メモです。UARTも切っているので10Kb程度の大きさです。/ STM32C011 NeoPixel 8x8 Test_2// RGB_LED: 8x8const unsigned int X_max = 8; // LED Matrix const unsigned int Y_max = 8;const unsigned int Led_max = X_max*Y_max; // number of LEDconst byte c_order[]={1,0,2}; // send GRB, R:1, G:0, B:2byte bData[X_max][Y_max][3]; // Data Bufferbyte aData[Led_max][3]; // Serial data for output // bitMap_RGB24[data number][y][x], 0x00BBGGRRconst long bMap_RGB24_0[8][8]={{0,0,0,0,0,0,0,0},{255,255,255,0,65280,65280,65280,0},{255,0,255,0,65280,0,65280,0}, {255,255,255,16711680,65280,65280,65280,0},{255,0,255,0,65280,0,65280,0}, {255,255,255,0,65280,65280,65280,0},{0,0,0,0,0,0,0,0}, {16777215,16777215,16777215,16777215,16777215,16777215,16777215,16777215}};const long bMap_RGB24_1[8][8]={{0,0,0,0,0,0,0,0},{65535,65535,0,0,0,16711935,16711935,16711935},{65535,0,65535,0,0,0,16711935,0}, {65535,0,65535,16776960,16776960,16776960,16711935,0},{65535,0,65535,16776960,0,16776960,16711935,0}, {65535,65535,0,16776960,16776960,16776960,16711935,0},{0,0,0,0,0,0,0,0}, {16777215,16777215,16777215,16777215,16777215,16777215,16777215,16777215}};const long bMap_RGB24_2[8][8]={{0,0,255,255,255,255,255,0},{0,255,255,255,16777215,255,255,255}, {0,255,255,255,255,255,255,255},{0,0,16777215,0,16777215,0,16777215,0}, {0,16777215,16777215,16777215,16777215,16777215,16777215,16777215}, {0,0,16777215,16777215,0,16777215,16777215,0},{0,255,16711680,255,255,255,16711680,255}, {0,255,65535,16711680,16711680,16711680,65535,255}};const long bMap_RGB24_3[8][8]={{0,0,65280,65280,65280,65280,65280,0},{0,65280,65280,65280,16777215,65280,65280,65280}, {0,65280,65280,65280,65280,65280,65280,65280},{0,0,16777215,0,16777215,0,16777215,0}, {0,16777215,16777215,16777215,16777215,16777215,16777215,16777215},{0,0,16777215,16777215,0,16777215,16777215,0}, {0,65280,16711680,65280,65280,65280,16711680,65280},{0,65280,65535,16711680,16711680,16711680,65535,65280}};void setup() { pinMode(PA8, OUTPUT); // LED All Clear allset(0,0,0); show_Data(); delay(500);}// ************************************************************************************void loop(){ byte bbr=0x4F; // Brightness // Basic Colors setting // R, G, B, R+G, R+B, G+B, R+G+B byte base_Color[7][3]={{bbr,0,0},{0,bbr,0},{0,0,bbr}, {bbr,bbr,0},{bbr,0,bbr},{0,bbr,bbr},{bbr,bbr,bbr}}; int waitms=3000; allset (0,0,0); // Clear Display show_Data(); for(int xp=8; xp > -17; xp--){ /* Title Roll Start */ for(int i=0; i< Y_max; i++){ // Show BitMap 0 for (int j=0; j< X_max; j++){ byte R=bMap_RGB24_0[i][j]%256/3; byte G=(bMap_RGB24_0[i][j]/256)%256/3; byte B=bMap_RGB24_0[i][j]/256/256/3; p_set (j+xp,i,R,G,B); } } for(int i=0; i< Y_max; i++){ // Show BitMap 1(x:+8) for (int j=0; j< X_max; j++){ byte R=bMap_RGB24_1[i][j]%256/3; byte G=(bMap_RGB24_1[i][j]/256)%256/3; byte B=bMap_RGB24_1[i][j]/256/256/3; p_set (j+xp+8,i,R,G,B); } } for(int i=0; i< Y_max; i++){ // Show BitMap black(x:+16) for (int j=0; j< X_max; j++){ p_set (j+xp+16,i,0,0,0); } } show_Data(); delay(400); } // Title Roll End for (int k=0; k<2; k++){ /* Start Charactors */ for(int i=0; i< Y_max; i++){ // Show BitMap 2 for (int j=0; j< X_max; j++){ byte R=bMap_RGB24_2[i][j]%256/3; byte G=(bMap_RGB24_2[i][j]/256)%256/3; byte B=bMap_RGB24_2[i][j]/256/256/3; p_set (j,i,R,G,B); } } for (int bl=0; bl < 30; bl++){ p_set (4,5,0x4F,0,0x4F); show_Data(); delay(50); p_set (4,5,0,0,0); show_Data(); delay(200); } for(int i=0; i< Y_max; i++){ // Show BitMap 3 for (int j=0; j< X_max; j++){ byte R=bMap_RGB24_3[i][j]%256/3; byte G=(bMap_RGB24_3[i][j]/256)%256/3; byte B=bMap_RGB24_3[i][j]/256/256/3; p_set (j,i,R,G,B); } } for (int bl=0; bl < 30; bl++){ p_set (4,5,0x4F,0x4F,0); show_Data(); delay(50); p_set (4,5,0,0,0); show_Data(); delay(200); } } for(int i=0; i< Y_max; i++){ /* Show Basic Colors */ for (int j=0; j< X_max; j++){ byte pc=(X_max*i+j)%7; // point color p_set (j, i,base_Color[pc][0],base_Color[pc][1],base_Color[pc][2]); show_Data(); delay(50); } } delay(waitms);} // loop End// *************************************************************************************************// bData, Make all LEDs the same color void allset (byte r,byte g,byte b){ for(int i=0; i< X_max; i++){ for (int j=0; j< Y_max; j++){ bData[i][j][0]=r; bData[i][j][1]=g; bData[i][j][2]=b; } }}// bData, Make a LED the colorvoid p_set (int x, int y, byte r, byte g, byte b){ if (x>=0 && x< X_max && y>=0 && y< Y_max){ bData[x][y][0]=r; bData[x][y][1]=g; bData[x][y][2]=b; }}// Show the datavoid show_Data(){ bData_to_aData(); // Send data to Serial buffer sendData(); // Serial output to LEDs}void bData_to_aData(){ for (int i=0; i< Led_max; i++){ int x,y; y=i/X_max; if (y % 2 > 0){ x=i % X_max; }else{ x=X_max-(i % X_max)-1; } aData[i][0]=bData[x][y][0]; aData[i][1]=bData[x][y][1]; aData[i][2]=bData[x][y][2]; }}void sendData(){ noInterrupts(); for (byte numLed=0; numLed<Led_max; numLed++){ //led for (byte rgbLed=0; rgbLed <3; rgbLed++){ // G-R-B byte a=aData[numLed][c_order[rgbLed]]; // set 1byte for (byte i=0; i<8; i++){ // loop bit:7---0 if ((a & 0x80) >0){ // *** if bit=1 *** for (int i=0; i<3; i++){ // High_long for (int j=0; j<8; j++){ digitalWriteFast(PA_8, HIGH); } } for (int i=0; i<2; i++){ // Low_short for (int j=0; j<8; j++){ digitalWriteFast(PA_8, LOW); } } }else{ // *** if bit=0 *** for (int i=0; i<2; i++){ // High_short for (int j=0; j<8; j++){ digitalWriteFast(PA_8, HIGH); } } for (int i=0; i<3; i++){ for (int j=0; j<8; j++){ digitalWriteFast(PA_8, LOW); // Low_long } } } a=a*2; // set bit7 } // next bit } // next byte(G-R-B) } // next LED interrupts();}
19Mar
- 小さなドット絵の作成用にExcelでセルの色のRGB値を読み取る関数のメモ
  8x8などの小さなドット絵の作成には表計算(Libreoffice)を使っていて，セルの色でドットを描いてそのRGB値を読み取っていました。・LEDパネルのデザインに中間色を使おうと表計算ソフトのセルの色のRGB要素を取り出してみた最近使い始めたPCにはExcel2021が入っているので，同じようにできるか試してみました。Libreofficeのcalcと同じようにVBAで書いた関数でなんとか動きましたV(^^)。忘れないようにメモしておきます。B3からF3の各セルの色をORG行の関数で読み取ってRGB値に分解した結果です。青色でExcelのユーザー設定値を確かめていますVBAで作った get_RGB()関数で色を読み取り，下位ビットからRGB各8bitのデータを分解しています。例によって，マクロ系を書く手続きは分かりにくい所にあります(^^;;;;;;バージョンが変われば場所もあっちこっち，言葉もコロコロと変わるのが常ですが，，現状をメモです。[ファイル]タグの一番下の「その他」の「オプション」を開いて，「開発」をリボンに表示する設定にしておくと便利です。上記に設定しておくと[開発]タグのマクロで作成か編集ができます。VBAが開くので，関数を書き込みます。以前にLibreofficeに書いたものと同じで３行だけです(^^)。マクロ系は一生懸命書いてもバージョンが変わると何の遠慮もなく動かなくなる事がよくありますね。私は長居は無用と思っていて，できるだけ短くしています(^^;;;;;でも動いてよかったです。これでドット絵のビットマップを書こうかと思っていますV(^^)。なお，以下は要注意です！！☆ セルの色は「再計算」の対象外なので，色を変えても感知してくれません。色を付けたセルを選択して「数式と値のクリア」などを行うとRGB値は変化します。
17Mar
- RCサーボで動かすモグラたたきゲームのプロトタイプを作ってみた
  RCサーボで動かすモグラたたきゲームのプロトタイプを作ってみました。まだ３台をつないだだけですが，ソフトやハードを試しているところです。LEDのボタン式のモグラたたきは一応作れています。・100円ショップのLEDルームライトを使ったモグラたたきゲームの試作１号機・段ボール箱に組んだモグラたたきゲームの外装を少し整えてみた次はモグラの動くのを，といろいろと考えてはきましたが，，やはりRCサーボが扱いやすいという事で，試作です。３台つないだプロトタイプです。MPUはSeeeduinoXIAO，サーボは小型のSG90タイプです。RCサーボで上下させ，頭をヒットしたセンサーはモグラの底にキャップをつけて土台のタクトスイッチを押すようにしました。制作途中の写真です。3Dプリンターで作った土台にタクトスイッチを取り付けています。動かしてみたところです。少しフェイクの動作を入れてみたので，最初は少々惑わされます(^^)。以下は，上の動画のソフトです。サーボはまだ３台だけなので，ジンプルにArduinoで普通のサーボライブラリを使い，音はtone関数です(^^;;;。１．サーボとボタンなどの関係の設定です。　SeeeduinoXIAOのほとんどのピンを使っています，，，。/* Xiao test2, Sound Pin 0 Servo Pin 1,2,3 Input Pin 4,5,6 LED Pin 7,8,9 Start Pin 10*/#include <Servo.h>#define servo_Max 3Servo myservo0;Servo myservo1;Servo myservo2;const int L_Pos=65; // default servo positionconst int M_Pos=95;const int H_Pos=125;void set_allservo(int ang){ for (int i=0; i < servo_Max; i++){ set_1servo(i, ang); }}void set_1servo(int svn, int ang){ switch (svn) { case 0: myservo0.write(ang); break; case 1: myservo1.write(ang); break; case 2: myservo2.write(ang); }}const int game_loop=30; // Init. game_basic_val int hit_Max=0;#define sePin 0void setup() { myservo0.attach(1); // servo: Pin 1,2,3 myservo1.attach(2); myservo2.attach(3); set_allservo(L_Pos); pinMode(4, INPUT); //hit_switch: Pin 4,5,6 pinMode(5, INPUT); pinMode(6, INPUT); for (byte i=7; i<10; i++){ // LED: Pin 7,8,9 pinMode(i, OUTPUT); digitalWrite(i, LOW); } pinMode(10, INPUT); // start_button: Pin 10 Serial.begin(9600); // Use UART} ２．loop部です。　フェイク部と実動部でできていて，実動部の設定時間内でヒットすると得点が上がります。フェイク部では乱数の数値のビットを読んで各サーボが動くようにしてみました。何台がフェイクで動くのかもランダムになりますね(^^)。void loop() { disp_game_basic(game_loop,hit_Max); // Disp. basic values /* Start button */ while (digitalRead(10)==0){}; // waiting for start se_start(); // sound start delay(1000); /* Init. for new game */ randomSeed(micros()); // get randomSeed int hit_count=0; // clear hit_count //******** GAME LOOP ***********// for(int m_count=0 ; m_count < game_loop; m_count++){ while(1){ /* Fake_stage */ byte ss=random(0, 16); // select random servo if (ss < 8){ for (int i=0; i < servo_Max; i++){ if (bitRead(ss, i) == 0){ set_1servo(i, M_Pos); // move to middle position } } delay (100); set_allservo(L_Pos); // move to low position }else{ break; // escape from the fake move } } /* Real Mole_Up_stage */ byte ss1=random(0, servo_Max); // select random servo se_Up(); // sound mole_up set_1servo(ss1, M_Pos); // move to middle position int hit=0; unsigned long hit_time=500; unsigned long delay_time=1000; unsigned long start_time=millis(); set_1servo(ss1, H_Pos); // move to high position while(millis()-start_time < hit_time){ if (digitalRead((ss1+4)) == 1){ hit=1; digitalWrite((ss1+7), HIGH); // turn the LED on se_Hit(); // sound hit the mole } } hit_count += hit; // hit_count up set_1servo(ss1, L_Pos); // move to low position digitalWrite((ss1+7), LOW); // turn the LED low disp_countup(m_count+1,hit_count); delay(delay_time); // delay for next mole_up } // game_loop end if (hit_count > hit_Max){ // check hit_Max ? hit_Max=hit_count; se_Win(); }} // loop end ３．表示と音出し部です。　今はおまけの感じでシリアルモニタに出力していますが，7segLEDなどにする予定です。また音もゲームには必須ですから，もっと良いのが出せるようにしたいですね(^^)。/* disp_game_basic(game_loop,hit_Max) */void disp_game_basic(int gl, int hm){ Serial.print("Mole:");Serial.print(gl); Serial.print(" Hit_Max:");Serial.println(hm);}/* disp_countup(m_count,hit_count) */void disp_countup(int mc,int hc){ Serial.print("Mole:");Serial.print(mc); Serial.print(" Hit:");Serial.println(hc);}/* SOUND C D E F G A H C_ */// 262,294,330,349,392,440,494,523void se_start(){ tone(sePin, 330, 100);delay(500); tone(sePin, 330, 100);delay(500); tone(sePin, 330, 100);delay(500); tone(sePin, 440, 800);delay(800);}void se_Up(){ tone(sePin, 262, 100);delay(100); tone(sePin, 330, 100);delay(100); tone(sePin, 392, 100);}void se_Hit(){ tone(sePin, 392, 100);delay(100); tone(sePin, 262, 300);delay(300);}void se_Win(){ tone(sePin, 523, 100);delay(150); tone(sePin, 523, 100);delay(150); tone(sePin, 523, 100);delay(150); tone(sePin, 523, 100);delay(150); tone(sePin, 440, 100);delay(300); tone(sePin, 588, 100);delay(300); tone(sePin, 523, 800);delay(800);}シリアルモニタにはヒットの累計の途中経過と電源が入ってからの最高得点を出しています。ゲームはより楽しくしたり，易しくしたり難しくしたりなど工夫するところが多くて面白いですね。ただ，そのためにも柔軟に変化に対応できるプログラムにしておかないといけませんので，，と言いつつ，ぐちゃぐちゃしてくるのを感じています(^^;;;;;;;;。
13Mar
- 旧日本銀行広島支店で開催している「広島の鳥撮り人たち　写真展2024」を観てきました
  「広島の鳥撮り人たち　写真展2024」を観てきました。今日が初日です(^^)。会場の旧日本銀行広島支店は市中心部に被爆建物として保存されているどっしりとした建築物で頼山陽史跡資料館とも並んでいます。さすがに「鳥撮り人」と称すだけあって，美しい，雄壮，微笑ましいというような写真が75点展示されていました。ま，私は知人が二人いる事もあって，いろいろと話もできました(^^)。３月18日(月)まで毎日午前10時から午後6時まで開いているそうです。
11Mar
- 3Dプリンターの動作監視で久しぶりにネットワークカメラを使ってみる
  最近は3Dプリンターも小物を作ることが多く，動作監視用にちょこんと置くネットワークカメラを使う事もあまりありませんでした。久しぶりに造形に12時間以上かかるブツを作成中で，朝までカメラも動作中です(^^)。秋葉原で10年ぐらい前に買った古いカメラですが，がんばってくれています。眠たくなるまでは時々チェックしますが，音は聞こえないし，細かいノズル周りの様子は見えないので，ま，大まかな観察ですね(^^;;;;;;
10Mar
- 山田五郎オトナの教養講座：経度問題と時計，GMTの理由などを知る
  PCやマイコンを触っていて，これらが水晶時計で動いている事やPCの設定ではGMT(Greenwich Mean Time, グリニッジ標準時)の項目がありますし，当然として日常生活でも時計や時間というものにはお世話になっています。ところで，youtubeの「山田五郎オトナの教養講座」は普段は絵画の易しい解説でよく見るのですが，最近アップされたもので経度問題と時計，GMTの理由などを分かりやすく話してくれたのがありました。これは私でも興味を持って観られる面白い内容でしたので，メモしておきます。ログイン，ログアウト，海里，マイル，ノットの意味も分かりますね(^^)。【昔の人はどうやって広い海を渡って船の旅をしていたの？？】ガリレオ、ニュートン、ハレー！名だたる天才科学者も苦戦した「経度」の発見と計算狂時代【超重要！経度問題と、ある大工さんの・・・私にとって時計はカメラとともに趣味として興味を持ってとりかかるとその深みにズブズブと入って泥沼から抜けられなくなる分野であろうと予感して避けてきています(^^;;;;;。でも，歴史に絡むような発明とか発見とかには本当に心惹かれますね。
03Mar
- ホルスト：「セントポール組曲」を楽譜付きで聴く
  今日はひな祭りなので，ホルストが在職したセントポール女学校のオーケストラのために作曲した「セントポール組曲」です。全体として品のある楽しい曲で，イギリスの民族音楽やアラビア風のメロディーも使った親しみやすさもあり，アマチュアの弦楽合奏でもよく演奏される名曲ですね。楽譜付きで聴くと，各パートに出番があったり，コンミスの腕の見せ所をつくったり，面白いリズムで若い人が楽しめるようにもなっているなぁと思ったりします(^^)。Gustav Holst's 'St Paul's Suite' (originally 'Suite in C') for string orchestracomposed for St. Paul's Girls' School in 1913.1 - Jig2 - Ostinato3 - Intermezzo4 - Finale (The Dargason)Performed by the Bournemouth SinfoniettaConductor: Richard Studt楽しくて，いい曲ですねぇ。この曲を聴くといつも，第一曲冒頭の全員で同じメロディーを弾くのはバグパイプの無拍子系で，それから３拍子を時々はさんだ２拍子系に移行していっているのかな，，と，第二曲のセカンドバイオリンのずっと繰り返して続く音形はなかなかしんどいですが，生徒さん達は「もぉホルスト先生は・・・」とか言いながらキャッキャしていたのかな？と想像しています(^^) 。
28Feb
- 32ビットマイコンSTM32C011F4P6の書き込みや動作の不調への対処で悩む
  小さな32ビットマイコンSTM32C011シリーズをArduinoでいろいろと触ってみています。8ピンのSTM32C011J4M7（以下J4）は特に問題なく動いているのですが，20ピンのSTM32C011F4P6（以下F4）がどうも不調で書き込みエラーの頻発の末に動作しなくなってしまいました，，。J4とF4はピン数が異なるだけで，ICの内容や書き込み様式は一緒なはず，，とは思うのですが，F4には電源をつないでも消費電力０でうんともすんとも動かなくなったので，じっと図を見るです(^^;;;;;。上の図をじっと見ていて，ふと"BOOT0・SWCLK"のピンにPB6のあるなしがある事に気がつきました。じゃあF4のBOOT0にもPB6をつないでみるかと，半ばやけになって試してみたら，動いてしまいました(^^;;;;;;。ジャンパー線で19,20pinを繋いで，書き込み，動作復活のLチカ写真です(^^;;;;。と，動いたのは良かったのですが，，私には意味がわかりませんし，PB6の他のピンでも動きましたし，プルアップという手段もありました(^^;;;;。"BOOT0・SWCLK"周りが不安定なんですかねぇ。それとも書き込む際の設定を気づかずにどこかで変えたかのかもしれません，，。なお，BOOT0・SWCLKを4.7K Ωでプルアップしても書き込めましたが，プルアップしたままでは動作には移行しませんでした。さて，動きはしましたがこれは勉強が必要ですね，，。この動きを追いたくてBOOT0・SWCLKの状態を見ようとしたのですが，私のロジアナやオシロではプローブを接続すると書き込みエラーを引き起こしました(^^;;;。また，例えばSTM32C011のマニュアルではbootloader activation はpattern 11 だと書いてあるのですが，，正直なところ"STM32CubeProgrammer"での設定でnBootなどのチェックのあるなしの意味づけなど，まだ理解できません。ま，Boot0(pin)はからんだ設定なんでしょうかねぇ，，としかまだ言いようがない状態での事件現場でのメモです(^^;;;;。
26Feb
- STM32C011J4M7でI2Cのセンサー入力をLCD表示し，データをUARTでも出力してみた
  8ピンの32ビットマイコンSTM32C011J4M7でI2Cのカラーセンサー入力をLCD表示し，データをUARTでも出力してみました。１．機材は以下です　(I2Cアドレスは7bit表記）　MCU： STM32C011J4M7Color Sensor：HAMAMATSU Color Sensor S11059-02DT（I2C 0x2A）LCD： Grove-LCD RGB Backlight（I2C 0x3E, 0x62(Backlight) ）・プログラムの書き込みとシリアル通信はST-LINKを介しています。・I2Cのプルアップはカラーセンサーの仕様書の2.2KΩです。なお、今回はプリグラムメモリが公称16KBでも32KB使用可能な前提での試行です。（正式？には32KBある"J6"などを使うのが良いでしょうね，，，）このためArduino IDE のボード設定はメモリが32KBタイプの"C011F6"を選択し、またUARTは自前のソフトを使うのでメモリを消費するハードウェアシリアルは切っています。・MPUのピン配置です。　特別な機能を持つピンを避けるとぎりぎりですね(^^;;;;;。２．動作結果・LCD表示とバックライト　カラーセンサーのRGB値を表示し、バックライトもRGB値をもとに入力色に近づくようにしています(^^)。・UARTでのシリアルモニタ出力　シリアルモニタ側の機能でデータ入力のタイムスタンプが打てるのも用途によっては役に立つでしょうね。３．ソフトウェア　I2Cで3台（カラーセンサー、LCD、LCDのバックライト色）の機器をつなぎ、UARTでシリアルモニタに出力しています。・I2Cの設定と使用開始　I2Cの設定については次のWebページにお世話になりました。→STM32C011(SOP8)のI2Cで遊ぶ(準備編)(STM32C011J4M7)(そしてI2Cは、動いた)I2C設定ピンは特別なピンを避けると、仕様書では　I2C1_SCL　PA9 　I2C1_SDA　PA10になりますが、STM32C011シリーズではハード的にはピンに出ていません。そのためリマップ先が準備されていて　PA11 → PA9　PA12 → PA10という関係性でつながり、PA11，PA12の場所でピンとして使用できます。（ピン配置図を参照）PA11，PA12の場所にリマップされたPA９，PA10のピン名は　PA_9_R　PA_10_Rという名前で呼ばれます(^^)。名前さえしっかりすれば、後はライブラリをインクルードして、SCLとSDAピンをセットしてスタートできます。#include <Wire.h>void setup() { /* Initializing I2C master */ Wire.setSCL(PA_9_R); // PA9:SCL Wire.setSDA(PA_10_R); //PA10:SDA Wire.begin(); } ・UARTの設定　UARTは自前なので、ボーレートの定数を選択して、出力ピンを設定するだけです(^^;;。// uart Tx Pin :PB7 (STM32C011J Pin 1)#define uTx_pin PB7//const byte uTx_bms=104 ; // delay for 9600bpsconst byte uTx_bms=7 ; // 115200bpsvoid setup() { /* Set uart Tx Pin */ pinMode(uTx_pin, OUTPUT); // set pin as output digitalWrite(uTx_pin, HIGH);} ま、何とか動きましたので良かったです。ただ、”Wire"は結構大きいので16KBでは難しいですね。22KBぐらいになった今回のプログラムを一応メモしておきます。/* STM32C011, Test Program with I2C * Color Sensor: HAMAMATSU Color Sensor S11059-02DT * LCD: Grove-LCD RGB Backlight */#include <Wire.h>// uart Tx Pin :PB7 (STM32C011J Pin 1)#define uTx_pin PB7//const byte uTx_bms=104 ; // delay for 9600bpsconst byte uTx_bms=7 ; // 115200bps// I2C slave address of Color Sensor : 0b0101010,7bit#define ColorSensor 0x2A// I2C slave address of LCD (Character & Backlight)#define cLCD 0x3E#define bLCD 0x62/* I2C Write Command */void I2C_write( byte sAdr, byte reg, byte cmd){ Wire.beginTransmission(sAdr); // I2C slave address Wire.write(reg); // Registor address or Control byte Wire.write(cmd); // data or command value Wire.endTransmission();}void setup() { delay(3000); // waiting for upload /* Initializing I2C master */ Wire.setSCL(PA_9_R); // PA9:SCL Wire.setSDA(PA_10_R); //PA10:SDA Wire.begin(); /* Set uart Tx Pin */ pinMode(uTx_pin, OUTPUT); // set pin as output digitalWrite(uTx_pin, HIGH); /* Initializing Color sensor (HAMAMATSU S11059-02DT) */ // Controll Registor:0x00 I2C_write(ColorSensor, 0x00, 0x8A); // Reset & Setting: 0b10001010 I2C_write(ColorSensor, 0x00, 0x0A); // Set & Start: 0b00001010 delay(24); // sensor warming up /* Initializig Grove-LCD, Character (JHD1313) */ // Send command:0x80 I2C_write(cLCD, 0x80, 0x3C); // 2_lines display I2C_write(cLCD, 0x80, 0x06); // increment mode on, shift off I2C_write(cLCD, 0x80, 0x0C); // display on, cursor off, blink off I2C_write(cLCD, 0x80, 0x01); // clear display /* Initializing Grove-LCD, Backlight (PCA9633) */ // Send command I2C_write(bLCD, 0x00, 0x00); // Mode1 register:0x00, 0b00000000 I2C_write(bLCD, 0x01, 0x00); // Mode2 register:0x01, 0b00000000 I2C_write(bLCD, 0x08, 0xAA); // LED Drive Mode On // Send data, color: white I2C_write(bLCD, 0x04, 0xFF); // R register: 0x04,0xFF I2C_write(bLCD, 0x03, 0xFF); // G register: 0x03,0xFF I2C_write(bLCD, 0x02, 0xFF); // B register: 0x02,0xFF delay(100); // waiting for LCD starting up Wire.beginTransmission( cLCD ); // Disp. title Wire.write(0x40); Wire.write(" [COLOR]"); Wire.endTransmission();} //setup endvoid loop() { /* Read color data */ Wire.beginTransmission(ColorSensor); Wire.write(0x03); Wire.endTransmission(0); Wire.requestFrom(ColorSensor, 6); int RH=Wire.read(); // Red int RL=Wire.read(); int GH=Wire.read(); // Green int GL=Wire.read(); int BH=Wire.read(); // Blue int BL=Wire.read(); int Red=RH*256+RL; // Set color data int Green=GH*256+GL; int Blue=BH*256+BL; /* Display data values */ I2C_write(cLCD, 0x80, 0x89); // Red Wire.beginTransmission( cLCD ); Wire.write(0x40); Wire.write("R:"); digit5Print(Red); Wire.endTransmission(); I2C_write(cLCD, 0x80, 0xC1); // Green Wire.beginTransmission( cLCD ); Wire.write(0x40); Wire.write("G:"); digit5Print(Green); Wire.endTransmission(); I2C_write(cLCD, 0x80, 0xC9); // Blue Wire.beginTransmission( cLCD ); Wire.write(0x40); Wire.write("B:"); digit5Print(Blue); Wire.endTransmission(); /* Set Backlight color */ int mx_val=max(Red,Green); // Select Max_Value mx_val=max(mx_val,Blue); // set backlight color by the ratio of RGB I2C_write(bLCD, 0x04, (byte)((float)Red/(float)mx_val*255.0)); // R I2C_write(bLCD, 0x03, (byte)((float)Green/(float)mx_val*255.0)); // G I2C_write(bLCD, 0x02, (byte)((float)Blue/(float)mx_val*255.0)); // B /* UART print */ uTx_str("RGB: "); uTx_digit5(Red);uTx_byte(','); //R, uTx_digit5(Green);uTx_byte(','); //G, uTx_digit5(Blue); //B uTx_byte(0x0D); uTx_byte(0x0A); // CR,LF delay(1000);} //loop end/* LCD Display 5_digit number, Ascii cord */void digit5Print( int d){ Wire.write(d/10000+0x30); Wire.write((d%10000)/1000+0x30); Wire.write((d%1000)/100+0x30); Wire.write((d%100)/10+0x30); Wire.write(d%10+0x30); }/* uart Tx character string*/void uTx_str( char d[]){ for(byte i=0; i < sizeof(d)+1; i++){ uTx_byte(d[i]); }}/* uart Tx 5_digit number, Ascii cord */void uTx_digit5( int d){ uTx_byte(d/10000+0x30); uTx_byte((d%10000)/1000+0x30); uTx_byte((d%1000)/100+0x30); uTx_byte((d%100)/10+0x30); uTx_byte(d%10+0x30); }/* uart Tx 1_byte */void uTx_byte(byte d){ digitalWrite(uTx_pin, LOW); // start bit delayMicroseconds(uTx_bms); for (byte i=0; i < 8; i++){ // data bit0-7 digitalWrite(uTx_pin, bitRead(d,i)); delayMicroseconds(uTx_bms); } digitalWrite(uTx_pin, HIGH); // 1 stop bit delayMicroseconds(uTx_bms);}

前ページ
次ページ

ブログトップ
記事一覧
画像一覧

Copyright © CyberAgent, Inc. All Rights Reserved.

スパムを報告
お問い合わせ
利用規約
アクセスデータの利用
特定商取引法に基づく表記
ヘルプ