だいぶ前に買ったまま放置していたCdS（光センサ）の存在を思い出したので、PSGの回路で使ってみました。
1000個もいらん（汗
秋月電子では40円からあります。
5Vから10kΩ抵抗経由でGNDに落とす途中にアナログ入力の0番につなぎます。
こんな感じ。
スケッチはこちら。
#include <YMZ294.h>
// Output Pins
const byte WRCS_PIN = 8;
const byte A0_PIN = 9;
const byte RESET_PIN = 10;
YMZ294 ymz(WRCS_PIN, A0_PIN, RESET_PIN);
void setup() {
DDRD = 0b11111111;
pinMode(WRCS_PIN, OUTPUT);
pinMode(A0_PIN, OUTPUT);
pinMode(RESET_PIN, OUTPUT);
ymz.Reset();
ymz.SetMixer(0b111, 0b100);
ymz.SetVolume(CH_A, 0b00001111);
ymz.SetFreqBit(CH_A, 0);
ymz.SetVolume(CH_B, 0b00001111);
ymz.SetFreqBit(CH_B, 0);
}
word value;
void loop() {
value = 1024 - analogRead(0);
ymz.SetFreqBit(CH_A, value);
ymz.SetFreqBit(CH_B, value);
delay(10);
}
analogRead()で取ってきた値を音程として与えてます。
そのままYMZ294に食わせてもいいんですが、その場合、明るい方が低い音で暗い方が高い音になるので、逆のほうが面白そうだってことで1024 – analogRead(0)にしてます。
delay()は10ミリ秒。てきとーです。
ちなみに動画で使ってるのは自転車用のライト。一段階暗くした状態（17秒くらい）の音が、ファミコン版火の鳥
もう一個。こちらは前回のリズムマシン風ノイズを操作してます。
回路は矩形波の方と同じ。
スケッチも前回とそう変わってないんですが、一応。
#include <YMZ294.h>
// Output Pins
const byte WRCS_PIN = 8;
const byte A0_PIN = 9;
const byte RESET_PIN = 10;
YMZ294 ymz(WRCS_PIN, A0_PIN, RESET_PIN);
void setup() {
DDRD = 0b11111111;
pinMode(WRCS_PIN, OUTPUT);
pinMode(A0_PIN, OUTPUT);
pinMode(RESET_PIN, OUTPUT);
ymz.Reset();
ymz.SetMixer(0b111, 0b000);
ymz.SetVolume(CH_A, 0b00001111);
ymz.SetFreqBit(CH_A, 0);
ymz.SetVolume(CH_B, 0b00001111);
ymz.SetFreqBit(CH_B, 0);
ymz.SetVolume(CH_C, 0b00001111);
ymz.SetFreqBit(CH_C, 0);
}
byte beats[6][2] = {
{0b00100, 8},
{0b00001, 12},
{0b00010, 8},
{0b01000, 64},
{0b00010, 8},
{0b00010, 16},
};
void loop() {
static word noteGate = 192;
static unsigned long lastMSec = 0;
static byte state = 0;
static byte step = 0;
unsigned long diffMSec = millis() - lastMSec;
noteGate = 256 - (analogRead(0) >> 2);
switch (state){
case 0: // Note Off to On
ymz.SetNoiseFreqBit(beats[step][0]);
TurnNoise(true);
state = 1;
break;
case 1: // Step Time Over
if (diffMSec > beats[step][1]){
TurnNoise(false);
state = 2;
}
break;
case 2: // Gate Time Over (Note Off)
if (diffMSec > noteGate){
state = 0; // Initialize
lastMSec = millis();
if (++step >= (sizeof(beats) / 2))
step = 0;
}
break;
}
}
void TurnNoise(bool isNoise){
if (isNoise)
ymz.SetMixer(0b000, 0b000);
else
ymz.SetMixer(0b111, 0b000);
}
こちらは周波数として与えてもあんまりおもしろくないので、半固定抵抗の時と同様、テンポを変えるのにCdSを使ってます。
明るい→テンポ早め、暗い→テンポ遅めにするために、noteGate = 256 – (analogRead(0) >> 2)としてます。
さて、こいつを応用すれば、なんかもっとおもしろい事ができそうな気がするんですが、ちょっとまだ思いつかないのでとりあえずここまで。また明日にでも考えます。