LPC810をSCC/PSGにする
お疲れ様です。高橋です。
出会い
ImpactDrillさんのサイトの「LPC810とArduino UNOでSCC互換音源を鳴らす（1）」という記事。
今まで1個500円もするPSG音源、YMZ294を何個か買って使ってるんですが、革命的に安価になります。しかもSCC音源にもなるという。
LPCに焼き込むPSG音源とSCC音源のhexファイルは、Qiitaで「I2Cで制御できる80円のPSG互換チップで遊ぼう」という記事を書いたtoyoshimさんという方が作られました。
toyoshimさんがhexを書き、それを操作しやすいようImpactDrillさんがArduino用ライブラリを書き。二人の神に支えられたら、あとはもう、使うしかありません。
とりあえず、鳴るところまで検証します。
焼き込み
生のLPC810がある状態から、音が鳴るまでの手順は下記の通り。
- LPC810を調達する(マルツで75円。秋月で300円!)
- USB-TTL変換機を調達する(aitendoとかで安い)
- FlashMagicをDLしとく
- ImpactDrillさんのサイト通りに書き込み用に配線する
- hexファイルを焼き込む
- ImpactDrillさんのサイト通りに演奏用に配線する
・・・ImpactDrillさんのサイト通りに試せばうまくいきます。
私の電子工作箱には、マルツで買い占めたLPC810が全部で6個あります。
まずは1個試しに作ります。
問題なくうまく行きましたので、一気に量産します。
焼き込んだあとのLPC810。言うまでもなく見た目は変化がありません。
演奏
ImpactDrillさんが公開してくれているSCC810.zipを使って、LPC810の4番とGNDでSOUND OUTすることが出来ました。
exampleコードは和音に対応していませんが、sccオブジェクトを直接操作すれば和音も鳴ります。
こんな感じです。
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 |
#include <Wire.h> #include <PSG810.h> #include <SCC810.h> SCC810* scc; void setup() { scc = new SCC810(); scc->SetMixer(0x11111); scc->SetVolume(SCC::SCC_A, 0x0f); scc->SetVolume(SCC::SCC_B, 0x0f); scc->SetVolume(SCC::SCC_C, 0x0f); scc->SetVolume(SCC::SCC_D, 0x0f); scc->SetVolume(SCC::SCC_E, 0x0f); char wave[] = "F0604010406020F0407050002030F0A0005010C0D0F0A080B000D090B0E0B090"; char wt[SCC::WT_SIZE]; strtowt(wave, sizeof(wave), wt); scc->SetWaveTable(SCC::SCC_A, wt, sizeof(wt)); scc->SetWaveTable(SCC::SCC_B, wt, sizeof(wt)); scc->SetWaveTable(SCC::SCC_C, wt, sizeof(wt)); scc->SetWaveTable(SCC::SCC_D, wt, sizeof(wt)); scc->SetWaveTable(SCC::SCC_E, wt, sizeof(wt)); } void loop() { scc->SetFrequency(SCC::SCC_A, 340); scc->SetFrequency(SCC::SCC_B, 330); scc->SetFrequency(SCC::SCC_C, 320); scc->SetFrequency(SCC::SCC_D, 310); scc->SetFrequency(SCC::SCC_E, 300); delay(100); scc->SetFrequency(SCC::SCC_A, 440); scc->SetFrequency(SCC::SCC_B, 0); scc->SetFrequency(SCC::SCC_C, 0); scc->SetFrequency(SCC::SCC_D, 0); scc->SetFrequency(SCC::SCC_E, 0); delay(100); scc->SetFrequency(SCC::SCC_A, 540); delay(100); scc->SetFrequency(SCC::SCC_A, 640); delay(100); } void strtowt(char* str, int str_size, char* wt) { for (int i = 0; i < str_size; i+=2){ byte b = (ctob(str[i]) * 0x10) + (ctob(str[i+1])); wt[i/2] = b; } } byte ctob(char c) { byte ret = 0; if (c >= '0' && c <= '9') ret = c - '0'; else if(c >= 'a' && c <= 'f') ret = c - 'a' + 10; else if (c >= 'A' && c <= 'F') ret = c - 'A' + 10; return ret; } |
YMZの時に、チャネルに与える周波数を0にしても無音にならずノイズになった経験があるので、いずれきちんとしたドライバを書く予定。(mute時はmixerから外す、音量を0にする等)
課題1. SMFをArduinoコードに変換
MIDIシーケンサで作った楽曲を効率よくLPC810で鳴らすために考えました。
Arduino&YMZ294の頃は、
- kalshagarさんが作ったSMF→Arduino&YMZ用変換ツールでコード生成
- Arduinoにコード書き込み
- ArduinoからYMZに演奏させる
という流れで演奏してたのですが、時の流れは無情なもので、kalshagarさんのサイト自体が消失してしまっております。代替となる、SMFをシンプルなコードに変換するツールが必要です。
SMFを直接シリアル経由でArduinoに送り、そのまま演奏させるというのも手ですが、PCを介すと後の運用に悪影響を及ぼすので、やはりコード変換ツールが必要。
解決策: PSGの3和音 & SCCの5和音に対応したツールを作ろうと思います。
課題2. 配線が面倒
音を鳴らすときは、こんな感じに配線する必要があります。
そんなに線は多くありませんが、地味に大変です。
解決策: Speaker OUT付きのArduinoシールドを作ろうと思います。
以上、よろしくお願い致します。
関連記事
-
-
ブレッドボード上のYMZ294をユニバーサル基板化してみたが。
お疲れ様です。高橋です。 ArduinoからYMZを鳴らしているブレッドボードが …
-
-
満員電車内でのオナラと検知 #2
お疲れ様です。高橋です。 最近なんだか忙しかったので、なかなか物が作れませんでし …
-
-
【完成】 電子オルゴール
お疲れ様です。高橋です。 電子オルゴールの制作が佳境に入り、とうとうカルトナージ …
-
-
シフトレジスタLED付きのYMZ294回路をFritzingに起こしてみた。
お疲れ様です。高橋です。 ユニバーサル基板で作ったYMZボードと、音階LED及び …
-
-
電子オルゴール設計
お疲れ様です。高橋です。 電子オルゴールがどんな形状になるのか、実体配線図を作っ …
-
-
電子オルゴール 動作試験
お疲れ様です。高橋です。 前回「電子オルゴール基板実装 #2 ～ワイヤストリッパ …
-
-
PCとArduinoをJavaでシリアル通信
お疲れ様です。高橋です。 先日作ったコレ。 よくよく考えると、書き込む際にいちい …
-
-
YMZシールドの作成 #2
お疲れ様です。高橋です。 先日から作っていたYMZシールドですが、本日完成しまし …
-
-
赤外線リモコンをケースに格納
お疲れ様です。高橋です。 先日作ったATtiny13Aの赤外線リモコンを、ケース …
-
-
上司離着席検知システムの作り方
お疲れ様です。高橋です。 上司離着席検知システムの作り方は下記の通りです。 必要 …
- PREV
- 久々に耳コピ。FF4バトル2
- NEXT
- 満員電車内でのオナラと検知