描述

使用一些傳感器，我從植物中獲取實(shí)時(shí)讀數(shù)，通過(guò) SonicPi 觸發(fā)聲音文件。

接收來(lái)自傳感器的實(shí)時(shí)讀數(shù)并進(jìn)行比較，以檢查它們是否低于臨界水平，如果是，Arduino 會(huì)發(fā)出一個(gè) MIDI 音符：一個(gè) F# 音符用于亞臨界水平（當(dāng)植物需要澆水時(shí)）和一個(gè)Bb 注意水分含量突然上升時(shí)（給植物澆水時(shí)）。

然后 MIDI 音符通過(guò)虛擬端口和串行橋接。

SonicPi 在虛擬端口上監(jiān)聽(tīng)傳入的音符，并比較傳入的音符是 F# 還是 Bb。

如果是前者，它會(huì)觸發(fā)一個(gè)聲音文件，如果是后者，它會(huì)觸發(fā)另一個(gè)聲音文件。

總而言之，該植物正在演奏只有兩個(gè)音符的音樂(lè)表演。

項(xiàng)目的控制流程。

?

-Arduino代碼

int sensor_pin = A0;
int output_value_new ;
int output_value_old = 0;
int satisfied_note = 0x6A;
int scream_note = 0x66;
int threshold_moisture = 80;
void setup() {
 Serial.begin(9600);
 Serial.println("Reading From the Sensor ...");
 delay(2000);
 }
void loop() {
 output_value_new= analogRead(sensor_pin);
 output_value_new = map(output_value_new,550,0,0,100);
 if (output_value_old ==0){
 output_value_old = output_value_new;
 }
 if (output_value_new <= threshold_moisture) {
  //Note on channel 1 (0x90), some note value (note), silent velocity (0x00):
  noteOn(0x90, scream_note, 0x7F);
  delay(100);
 }
 int output_difference = output_value_new - output_value_old;
 if (output_difference >=30){
 //Note on channel 1 (0x90), some note value (note), middle velocity (0x45):
 noteOn(0x90, satisfied_note, 0x7F);
 delay(100);
 }
 Serial.print("Mositure : ");
 Serial.print(output_value_new);
 Serial.println("%");
 delay(1000);
 output_value_old = output_value_new;
}
void noteOn(int cmd, int pitch, int velocity) {
Serial.write(cmd);
Serial.write(pitch);
Serial.write(velocity);
}

-SonicPi代碼

screams = "YOUR_SMAPLE_FOLDER_HERE"
satisfied = "YOUR_SMAPLE_FOLDER_HERE"
live_loop :midi_piano do
use_real_time
note, velocity = sync "/midi:loopmidi_port_0:1/note_on"  
if note == 102 #Fsharp7
 sample screams, rrand_i(1,7)
 sleep(rrand_i(1,5))
end
if note == 106 #Bb7
 sample satisfied, rrand_i(1,3)
 sleep(rrand_i(1,4))
end
end
in_thread do
use_real_time
use_real_time
note, velocity = sync "/midi:loopmidi_port_0:1/note_on"
if note == 106 #Fsharp7
 sample screams, rrand_i(1,7)
 sleep(rrand_i(2,6))
end
if note == 102 #Bb7
 sample satisfied, rrand_i(1,3)
 sleep(rrand_i(1,4))
end
end

NOTE: I have made the demonstration video along the lines of those sleazy TV infomercial ads we used to see on cable.

?