/* Mathematica らSerial port を通じて'A'が送られると LED を点灯して、その他はLED を消灯する。 */ int inByte = 0; int buzzer = 13; void setup() { pinMode(buzzer,OUTPUT); Serial.begin(9600); } void loop() { if (Serial.available() > 0) { inByte = Serial.read(); // シリアルから一文字よみとる if(inByte=='A'){ tone(buzzer,660,80); delay(100);// ミ tone(buzzer,660,150); delay(300);// ミ tone(buzzer,660,200); delay(350);// ミ tone(buzzer,524,200); delay(100);// ド tone(buzzer,660,130); delay(130);// ミ tone(buzzer,880/2,100); delay(100);// ラ//jump tone(buzzer,440/2,9); delay(10); // ラ tone(buzzer,494/2,9); delay(10); // ラ tone(buzzer,524/2,9); delay(10); // ラ tone(buzzer,555/2,9); delay(10); // ラ tone(buzzer,588/2,9); delay(10); // ラ tone(buzzer,624/2,9); delay(10); // ラ tone(buzzer,661/2,9); delay(10); // ラ tone(buzzer,701/2,9); delay(10); // ラ tone(buzzer,743/2,9); delay(10); // ラ tone(buzzer,788/2,9); delay(10); // ラ tone(buzzer,835/2,9); delay(10); // ラ tone(buzzer,885/2,9); delay(10); // ラ tone(buzzer,938/2,9); delay(10); // ラ tone(buzzer,994/2,9); delay(10); // ラ tone(buzzer,1053/2,9); delay(10); // ラ tone(buzzer,1117/2,9); delay(10); // ラ tone(buzzer,1184/2,9); delay(10); // ラ tone(buzzer,1255/2,9); delay(10); // ラ tone(buzzer,1330/2,9); delay(10); // ラ tone(buzzer,1410/2,9); delay(10); // ラ tone(buzzer,1494/2,9); delay(10); // ラ tone(buzzer,1584/2,9); delay(10); // ラ tone(buzzer,1680/2,9); delay(10); // ラ tone(buzzer,1760/2,100); delay(300); // ラ tone(buzzer,784,200); delay(600);// ソ tone(buzzer,1976,50); delay(50);// シ //coin tone(buzzer,2640,200); delay(50);// ミ tone(buzzer,1976,50); delay(50);// シ //coin tone(buzzer,2640,200); delay(50);// ミ tone(buzzer,1976,50); delay(50);// シ //coin tone(buzzer,2640,200); delay(100);// ミ tone(buzzer,392,50); delay(150);// ソ //1up tone(buzzer,1320,80); delay(125);// ミ tone(buzzer,1568,80); delay(125);// ソ tone(buzzer,2640,80); delay(125);// ミ tone(buzzer,2096,80); delay(125);// ド tone(buzzer,2352,80); delay(125);// レ tone(buzzer,3136,80); delay(200);// ソ tone(buzzer,880/2,100); delay(100);// ラ//jump tone(buzzer,440/2,9); delay(10); // ラ tone(buzzer,494/2,9); delay(10); // ラ tone(buzzer,524/2,9); delay(10); // ラ tone(buzzer,555/2,9); delay(10); // ラ tone(buzzer,588/2,9); delay(10); // ラ tone(buzzer,624/2,9); delay(10); // ラ tone(buzzer,661/2,9); delay(10); // ラ tone(buzzer,701/2,9); delay(10); // ラ tone(buzzer,743/2,9); delay(10); // ラ tone(buzzer,788/2,9); delay(10); // ラ tone(buzzer,835/2,9); delay(10); // ラ tone(buzzer,885/2,9); delay(10); // ラ tone(buzzer,938/2,9); delay(10); // ラ tone(buzzer,994/2,9); delay(10); // ラ tone(buzzer,1053/2,9); delay(10); // ラ tone(buzzer,1117/2,9); delay(10); // ラ tone(buzzer,1184/2,9); delay(10); // ラ tone(buzzer,1255/2,9); delay(10); // ラ tone(buzzer,1330/2,9); delay(10); // ラ tone(buzzer,1410/2,9); delay(10); // ラ tone(buzzer,1494/2,9); delay(10); // ラ tone(buzzer,1584/2,9); delay(10); // ラ tone(buzzer,1680/2,9); delay(10); // ラ tone(buzzer,1760/2,100); delay(400); // ラ tone(buzzer,880/2,100); delay(100);// ラ//jump tone(buzzer,440/2,9); delay(10); // ラ tone(buzzer,494/2,9); delay(10); // ラ tone(buzzer,524/2,9); delay(10); // ラ tone(buzzer,555/2,9); delay(10); // ラ tone(buzzer,588/2,9); delay(10); // ラ tone(buzzer,624/2,9); delay(10); // ラ tone(buzzer,661/2,9); delay(10); // ラ tone(buzzer,701/2,9); delay(10); // ラ tone(buzzer,743/2,9); delay(10); // ラ tone(buzzer,788/2,9); delay(10); // ラ tone(buzzer,835/2,9); delay(10); // ラ tone(buzzer,885/2,9); delay(10); // ラ tone(buzzer,938/2,9); delay(10); // ラ tone(buzzer,994/2,9); delay(10); // ラ tone(buzzer,1053/2,9); delay(10); // ラ tone(buzzer,1117/2,9); delay(10); // ラ tone(buzzer,1184/2,9); delay(10); // ラ tone(buzzer,1255/2,9); delay(10); // ラ tone(buzzer,1330/2,9); delay(10); // ラ tone(buzzer,1410/2,9); delay(10); // ラ tone(buzzer,1494/2,9); delay(10); // ラ tone(buzzer,1584/2,9); delay(10); // ラ tone(buzzer,1680/2,9); delay(10); // ラ tone(buzzer,1760/2,50); delay(50); // ラ tone(buzzer,524,200); delay(450);// ド tone(buzzer,392,200); delay(450);// ソ tone(buzzer,330,200); delay(450);// ミ tone(buzzer,440,150); delay(300); // ラ tone(buzzer,494,200); delay(300);// シ tone(buzzer,466,60); delay(150); // ラ tone(buzzer,440,100); delay(100); // ラ tone(buzzer,440,200); delay(350); // ラ tone(buzzer,880/2,100); delay(100);// ラ//jump tone(buzzer,440/2,9); delay(10); // ラ tone(buzzer,494/2,9); delay(10); // ラ tone(buzzer,524/2,9); delay(10); // ラ tone(buzzer,555/2,9); delay(10); // ラ tone(buzzer,588/2,9); delay(10); // ラ tone(buzzer,624/2,9); delay(10); // ラ tone(buzzer,661/2,9); delay(10); // ラ tone(buzzer,701/2,9); delay(10); // ラ tone(buzzer,743/2,9); delay(10); // ラ tone(buzzer,788/2,9); delay(10); // ラ tone(buzzer,835/2,9); delay(10); // ラ tone(buzzer,885/2,9); delay(10); // ラ tone(buzzer,938/2,9); delay(10); // ラ tone(buzzer,994/2,9); delay(10); // ラ tone(buzzer,1053/2,9); delay(10); // ラ tone(buzzer,1117/2,9); delay(10); // ラ tone(buzzer,1184/2,9); delay(10); // ラ tone(buzzer,1255/2,9); delay(10); // ラ tone(buzzer,1330/2,9); delay(10); // ラ tone(buzzer,1410/2,9); delay(10); // ラ tone(buzzer,1494/2,9); delay(10); // ラ tone(buzzer,1584/2,9); delay(10); // ラ tone(buzzer,1680/2,9); delay(10); // ラ tone(buzzer,1760/2,50); delay(50); // ラ tone(buzzer,392,150); delay(200);// ソ tone(buzzer,660,150); delay(200);// ミ tone(buzzer,784,150); delay(200);// ソ tone(buzzer,880,200); delay(300); // ラ tone(buzzer,698,150); delay(200);// ファ tone(buzzer,784,200); delay(300);// ソ tone(buzzer,660,200); delay(300);// ミ tone(buzzer,524,150); delay(150);// ド tone(buzzer,588,150); delay(150);// レ tone(buzzer,494,200); delay(600);// シ // tone(buzzer,880/2,100); delay(100);// ラ//jump tone(buzzer,440/2,9); delay(10); // ラ tone(buzzer,494/2,9); delay(10); // ラ tone(buzzer,524/2,9); delay(10); // ラ tone(buzzer,555/2,9); delay(10); // ラ tone(buzzer,588/2,9); delay(10); // ラ tone(buzzer,624/2,9); delay(10); // ラ tone(buzzer,661/2,9); delay(10); // ラ tone(buzzer,701/2,9); delay(10); // ラ tone(buzzer,743/2,9); delay(10); // ラ tone(buzzer,788/2,9); delay(10); // ラ tone(buzzer,835/2,9); delay(10); // ラ tone(buzzer,885/2,9); delay(10); // ラ tone(buzzer,938/2,9); delay(10); // ラ tone(buzzer,994/2,9); delay(10); // ラ tone(buzzer,1053/2,9); delay(10); // ラ tone(buzzer,1117/2,9); delay(10); // ラ tone(buzzer,1184/2,9); delay(10); // ラ tone(buzzer,1255/2,9); delay(10); // ラ tone(buzzer,1330/2,9); delay(10); // ラ tone(buzzer,1410/2,9); delay(10); // ラ tone(buzzer,1494/2,9); delay(10); // ラ tone(buzzer,1584/2,9); delay(10); // ラ tone(buzzer,1680/2,9); delay(10); // ラ tone(buzzer,1760/2,50); delay(50); // ラ tone(buzzer,524,200); delay(450);// ド tone(buzzer,392,200); delay(450);// ソ tone(buzzer,330,200); delay(450);// ミ tone(buzzer,440,150); delay(300); // ラ tone(buzzer,494,200); delay(300);// シ tone(buzzer,466,60); delay(150); // ラ tone(buzzer,440,200); delay(350); // ラ tone(buzzer,392,150); delay(200);// ソ tone(buzzer,660,150); delay(200);// ミ tone(buzzer,784,150); delay(200);// ソ tone(buzzer,880,200); delay(300); // ラ tone(buzzer,698,150); delay(200);// ファ tone(buzzer,784,200); delay(300);// ソ tone(buzzer,660,200); delay(300);// ミ tone(buzzer,524,150); delay(150);// ド tone(buzzer,588,150); delay(150);// レ tone(buzzer,494,200); delay(350);// シ // tone(buzzer,880/2,100); delay(100);// ラ//jump tone(buzzer,440/2,9); delay(10); // ラ tone(buzzer,494/2,9); delay(10); // ラ tone(buzzer,524/2,9); delay(10); // ラ tone(buzzer,555/2,9); delay(10); // ラ tone(buzzer,588/2,9); delay(10); // ラ tone(buzzer,624/2,9); delay(10); // ラ tone(buzzer,661/2,9); delay(10); // ラ tone(buzzer,701/2,9); delay(10); // ラ tone(buzzer,743/2,9); delay(10); // ラ tone(buzzer,788/2,9); delay(10); // ラ tone(buzzer,835/2,9); delay(10); // ラ tone(buzzer,885/2,9); delay(10); // ラ tone(buzzer,938/2,9); delay(10); // ラ tone(buzzer,994/2,9); delay(10); // ラ tone(buzzer,1053/2,9); delay(10); // ラ tone(buzzer,1117/2,9); delay(10); // ラ tone(buzzer,1184/2,9); delay(10); // ラ tone(buzzer,1255/2,9); delay(10); // ラ tone(buzzer,1330/2,9); delay(10); // ラ tone(buzzer,1410/2,9); delay(10); // ラ tone(buzzer,1494/2,9); delay(10); // ラ tone(buzzer,1584/2,9); delay(10); // ラ tone(buzzer,1680/2,9); delay(10); // ラ tone(buzzer,1760/2,50); delay(50); // ラ tone(buzzer,524*2,30); delay(120);// ド tone(buzzer,698*2,30); delay(50);// ファ tone(buzzer,784,100); delay(150);// ソ tone(buzzer,740,100); delay(150);// ファ# tone(buzzer,698,100); delay(150);// ファ tone(buzzer,623,200); delay(300);// レ tone(buzzer,660,200); delay(300);// ミ tone(buzzer,392,100); delay(150);// ソ tone(buzzer,440,100); delay(150);// ラ tone(buzzer,524,200); delay(300);// ド tone(buzzer,440,100); delay(150);// ラ tone(buzzer,524,100); delay(150);// ド tone(buzzer,588,200); delay(600);// レ tone(buzzer,880/2,100); delay(100);// ラ//jump tone(buzzer,440/2,9); delay(10); // ラ tone(buzzer,494/2,9); delay(10); // ラ tone(buzzer,524/2,9); delay(10); // ラ tone(buzzer,555/2,9); delay(10); // ラ tone(buzzer,588/2,9); delay(10); // ラ tone(buzzer,624/2,9); delay(10); // ラ tone(buzzer,661/2,9); delay(10); // ラ tone(buzzer,701/2,9); delay(10); // ラ tone(buzzer,743/2,9); delay(10); // ラ tone(buzzer,788/2,9); delay(10); // ラ tone(buzzer,835/2,9); delay(10); // ラ tone(buzzer,885/2,9); delay(10); // ラ tone(buzzer,938/2,9); delay(10); // ラ tone(buzzer,994/2,9); delay(10); // ラ tone(buzzer,1053/2,9); delay(10); // ラ tone(buzzer,1117/2,9); delay(10); // ラ tone(buzzer,1184/2,9); delay(10); // ラ tone(buzzer,1255/2,9); delay(10); // ラ tone(buzzer,1330/2,9); delay(10); // ラ tone(buzzer,1410/2,9); delay(10); // ラ tone(buzzer,1494/2,9); delay(10); // ラ tone(buzzer,1584/2,9); delay(10); // ラ tone(buzzer,1680/2,9); delay(10); // ラ tone(buzzer,1760/2,50); delay(120); // ラ tone(buzzer,1976,50+5+5); delay(50+5+5);// シ tone(buzzer,2640,50+5+5); delay(50+5+5);// ミ tone(buzzer,1976,50+5+5); delay(50+5+5);// シ tone(buzzer,2640,50+5+5); delay(50+5+5);// ミ tone(buzzer,1976,50+5+5); delay(50+5+5);// シ tone(buzzer,2640,50+5+5); delay(50+5+5);// ミ tone(buzzer,1976,50+5+5); delay(50+5+5);// シ tone(buzzer,2640,50+5+5); delay(50+5+5);// ミ tone(buzzer,1976,50+5+5); delay(50+5+5);// シ tone(buzzer,2640,50+5+5); delay(50+5+5);// ミ tone(buzzer,1976,50+5+5); delay(50+5+5);// シ tone(buzzer,2640,50+5+5); delay(50+5+5);// ミ tone(buzzer,1976,50+5+5); delay(50+5+5);// シ tone(buzzer,2640,50+5+5); delay(50+5+5);// ミ tone(buzzer,1976,50+5+5); delay(50+5+5);// シ tone(buzzer,2640,50+5+5); delay(50+5+5);// ミ tone(buzzer,1976,50+5+5); delay(50+5+5);// シ tone(buzzer,2640,50+5+5); delay(50+5+5);// ミ tone(buzzer,1976,50+5+5); delay(50+5+5);// シ tone(buzzer,2640,80+5+5); delay(100+5+5);// ミ tone(buzzer,784,100); delay(150);// ソ tone(buzzer,740,100); delay(150);// ファ# tone(buzzer,698,100); delay(150);// ファ tone(buzzer,623,150); delay(150);// レ tone(buzzer,660,200); delay(300);// ミ tone(buzzer,1048,100); delay(300);// ド tone(buzzer,1048,100); delay(150);// ド tone(buzzer,1048,120); delay(800);// ド tone(buzzer,784,100); delay(150);// ソ tone(buzzer,740,100); delay(150);// ファ# tone(buzzer,698,100); delay(150);// ファ tone(buzzer,623,200); delay(230);// レ tone(buzzer,880/2,100); delay(100);// ラ//jump tone(buzzer,440/2,9); delay(10); // ラ tone(buzzer,494/2,9); delay(10); // ラ tone(buzzer,524/2,9); delay(10); // ラ tone(buzzer,555/2,9); delay(10); // ラ tone(buzzer,588/2,9); delay(10); // ラ tone(buzzer,624/2,9); delay(10); // ラ tone(buzzer,661/2,9); delay(10); // ラ tone(buzzer,701/2,9); delay(10); // ラ tone(buzzer,743/2,9); delay(10); // ラ tone(buzzer,788/2,9); delay(10); // ラ tone(buzzer,835/2,9); delay(10); // ラ tone(buzzer,885/2,9); delay(10); // ラ tone(buzzer,938/2,9); delay(10); // ラ tone(buzzer,994/2,9); delay(10); // ラ tone(buzzer,1053/2,9); delay(10); // ラ tone(buzzer,1117/2,9); delay(10); // ラ tone(buzzer,1184/2,9); delay(10); // ラ tone(buzzer,1255/2,9); delay(10); // ラ tone(buzzer,1330/2,9); delay(10); // ラ tone(buzzer,1410/2,9); delay(10); // ラ tone(buzzer,1494/2,9); delay(10); // ラ tone(buzzer,1584/2,9); delay(10); // ラ tone(buzzer,1680/2,9); delay(10); // ラ tone(buzzer,1760/2,50); delay(120); // ラ tone(buzzer,660,200); delay(300);// ミ tone(buzzer,392,100); delay(150);// ソ tone(buzzer,440,100); delay(150);// ラ tone(buzzer,524,200); delay(300);// ド tone(buzzer,440,100); delay(150);// ラ tone(buzzer,524,100); delay(150);// ド tone(buzzer,588,200); delay(500);// レ tone(buzzer,466,50); delay(50);// ラ //死んだときの音 tone(buzzer,494,50); delay(50);// シ tone(buzzer,466,50); delay(300);// ラ tone(buzzer,988,30); delay(30);// シ tone(buzzer,494,90); delay(150);// シ tone(buzzer,1396,30); delay(30);// ファ tone(buzzer,698,90); delay(250);// ファ tone(buzzer,1396,30); delay(30);// ファ tone(buzzer,698,90); delay(150);// ファ tone(buzzer,1396,30); delay(30);// ファ tone(buzzer,698,90); delay(150);// ファ tone(buzzer,1320,30); delay(30);// ミ tone(buzzer,660,90); delay(250);// ミ tone(buzzer,1176,30); delay(30);// レ tone(buzzer,588,90); delay(150);// レ tone(buzzer,1048,30); delay(30);// ド tone(buzzer,524,2520); delay(300);// ド //tone(buzzer,1048,150); delay(150);// ド tone(buzzer,262,250); delay(300);// ド //tone(buzzer,524,150); delay(150);// ド tone(buzzer,131,300); delay(400);// ド delay(10000); tone(buzzer,623,150); delay(450);// ミb tone(buzzer,588,150); delay(450);// レ tone(buzzer,524,200); delay(1600);// ド tone(buzzer,784,100); delay(150);// ソ tone(buzzer,740,100); delay(150);// ファ# tone(buzzer,698,100); delay(150);// ファ tone(buzzer,623,200); delay(300);// レ tone(buzzer,660,200); delay(300);// ミ tone(buzzer,392,100); delay(150);// ソ tone(buzzer,440,100); delay(150);// ラ tone(buzzer,524,200); delay(300);// ド tone(buzzer,440,100); delay(150);// ラ tone(buzzer,524,100); delay(150);// ド tone(buzzer,588,200); delay(600);// レ tone(buzzer,784,100); delay(150);// ソ tone(buzzer,740,100); delay(150);// ファ# tone(buzzer,698,100); delay(150);// ファ tone(buzzer,623,200); delay(300);// レ tone(buzzer,660,200); delay(300);// ミ tone(buzzer,1048,100); delay(300);// ド tone(buzzer,1048,100); delay(150);// ド tone(buzzer,1048,120); delay(1000);// ド tone(buzzer,784,100); delay(150);// ソ tone(buzzer,740,100); delay(150);// ファ# tone(buzzer,698,100); delay(150);// ファ tone(buzzer,623,200); delay(300);// レ tone(buzzer,660,200); delay(300);// ミ tone(buzzer,392,100); delay(150);// ソ tone(buzzer,440,100); delay(150);// ラ tone(buzzer,524,200); delay(300);// ド tone(buzzer,440,100); delay(150);// ラ tone(buzzer,524,100); delay(150);// ド tone(buzzer,588,200); delay(500);// レ tone(buzzer,623,150); delay(450);// ミb tone(buzzer,588,150); delay(450);// レ tone(buzzer,524,200); delay(1200);// ド tone(buzzer,524,100); delay(150);// ド tone(buzzer,524,100); delay(300);// ド tone(buzzer,524,100); delay(300);// ド tone(buzzer,524,100); delay(150);// ド tone(buzzer,588,150); delay(300);// レ tone(buzzer,660,100); delay(150);// ミ tone(buzzer,524,200); delay(300);// ド tone(buzzer,440,100); delay(150);// ラ tone(buzzer,392,200); delay(600);// ソ tone(buzzer,524,100); delay(150);// ド tone(buzzer,524,100); delay(300);// ド tone(buzzer,524,100); delay(300);// ド tone(buzzer,524,100); delay(150);// ド tone(buzzer,588,150); delay(150);// レ tone(buzzer,660,100); delay(1200);// ミ tone(buzzer,524,100); delay(150);// ド tone(buzzer,524,100); delay(300);// ド tone(buzzer,524,100); delay(300);// ド tone(buzzer,524,100); delay(150);// ド tone(buzzer,588,150); delay(300);// レ tone(buzzer,660,100); delay(150);// ミ tone(buzzer,524,200); delay(300);// ド tone(buzzer,440,100); delay(150);// ラ tone(buzzer,392,200); delay(300);// ソ /* tone(buzzer,660,80); delay(100);// ミ tone(buzzer,660,150); delay(300);// ミ tone(buzzer,660,200); delay(350);// ミ tone(buzzer,524,200); delay(100);// ド tone(buzzer,660,200); delay(300);// ミ tone(buzzer,784,200); delay(600);// ソ tone(buzzer,392,200); delay(600);// ソ */ delay(400); } }}