Код:
/*
окончательная сборка - Thyratron
скелет алгоритма: http://mysku.ru/blog/ebay/22807.html
имперский марш:http://tny.cz/e525c1b2
работа с реле: http://www.seeedstudio.com/wiki/Grove_-_2-Coil_Latching_Relay
15.10.2014
*/
//подключили библиотеки
#include <SerialLCD.h>
#include <SoftwareSerial.h>
// определили переменные
// нотный стан, блин...
#define C0 16.35
#define Db0 17.32
#define D0 18.35
#define Eb0 19.45
#define E0 20.60
#define F0 21.83
#define Gb0 23.12
#define G0 24.50
#define Ab0 25.96
#define LA0 27.50
#define Bb0 29.14
#define B0 30.87
#define C1 32.70
#define Db1 34.65
#define D1 36.71
#define Eb1 38.89
#define E1 41.20
#define F1 43.65
#define Gb1 46.25
#define G1 49.00
#define Ab1 51.91
#define LA1 55.00
#define Bb1 58.27
#define B1 61.74
#define C2 65.41
#define Db2 69.30
#define D2 73.42
#define Eb2 77.78
#define E2 82.41
#define F2 87.31
#define Gb2 92.50
#define G2 98.00
#define Ab2 103.83
#define LA2 110.00
#define Bb2 116.54
#define B2 123.47
#define C3 130.81
#define Db3 138.59
#define D3 146.83
#define Eb3 155.56
#define E3 164.81
#define F3 174.61
#define Gb3 185.00
#define G3 196.00
#define Ab3 207.65
#define LA3 220.00
#define Bb3 233.08
#define B3 246.94
#define C4 261.63
#define Db4 277.18
#define D4 293.66
#define Eb4 311.13
#define E4 329.63
#define F4 349.23
#define Gb4 369.99
#define G4 392.00
#define Ab4 415.30
#define LA4 440.00
#define Bb4 466.16
#define B4 493.88
#define C5 523.25
#define Db5 554.37
#define D5 587.33
#define Eb5 622.25
#define E5 659.26
#define F5 698.46
#define Gb5 739.99
#define G5 783.99
#define Ab5 830.61
#define LA5 880.00
#define Bb5 932.33
#define B5 987.77
#define C6 1046.50
#define Db6 1108.73
#define D6 1174.66
#define Eb6 1244.51
#define E6 1318.51
#define F6 1396.91
#define Gb6 1479.98
#define G6 1567.98
#define Ab6 1661.22
#define LA6 1760.00
#define Bb6 1864.66
#define B6 1975.53
#define C7 2093.00
#define Db7 2217.46
#define D7 2349.32
#define Eb7 2489.02
#define E7 2637.02
#define F7 2793.83
#define Gb7 2959.96
#define G7 3135.96
#define Ab7 3322.44
#define LA7 3520.01
#define Bb7 3729.31
#define B7 3951.07
#define C8 4186.01
#define Db8 4434.92
#define D8 4698.64
#define Eb8 4978.03
// DURATION OF THE NOTES
#define BPM 120 // you can change this value changing all the others
#define H 2*Q //half 2/4
#define Q 60000/BPM //quarter 1/4
#define E Q/2 //eighth 1/8
#define S Q/4 // sixteenth 1/16
#define W 4*Q // whole 4/4
//экран
SerialLCD slcd(5,6);
//реле
#define LatchingRelay 3
//дуделка
#define Speaker 2
//для расчета емкости аккума
int varTime=0; // Целое. Обнуление таймера
int DataPin=0; // Целое. Обнуление данных со входа "0"
float Volt=0; // Число с плавающей точкой. Напряжение на аналоговом входе.
float Resistor=5.6; // Номинал нагрузочного резистора в Омах. У кого другой R, замените число и всех делов
float Current=0;
float Ah=0;
char buf[17];
void setup () {
// инициализация - дисплей
slcd.begin();
slcd.setCursor(0, 0);
slcd.print("Akku 18*** TEST");
slcd.setCursor(0, 1);
slcd.print("R = 5,6 Ohm");
delay (500);
slcd.clear();
// инициализация - реле
pinMode(LatchingRelay,OUTPUT);
// инициализация - дуделка
pinMode(Speaker, OUTPUT);
}
void loop () {
Volt = 5.0 / 1024.0 * analogRead(0); // Расчитываем сколько вольт на аналоговом входе "0"
// для корректного запуска оператора IF
// Расчитываем Ah, устанавливаем напряжение до которого будем считать, в данном случе оно равно "3.00"
if ( Volt >= 3.00 ){// Напряжение отсечки. У китайцев "2,75" у саньё "3". "2,75" на саньё считается глубоким разрядом
Volt = 5.0 / 1024.0 * analogRead(0); // Расчитываем сколько вольт на аналоговом входе 0
Current = Volt/Resistor;
Ah = Ah+Current/3600;
varTime++; // Увеличиваем на "1" время
slcd.setCursor(0, 0);
slcd.print("V:");
slcd.setCursor(2, 0);
dtostrf(Volt,1,2,buf);
slcd.print(buf);
delay (250); // задержка 1/4 секунды
slcd.setCursor(8, 0);
slcd.print("T:");
slcd.setCursor(11, 0);
dtostrf(varTime,0,0,buf);
slcd.print(buf);
delay (250); // задержка 1/4 секунды
slcd.setCursor(0, 1);
slcd.print("A:");
slcd.setCursor(2, 1);
dtostrf(Current,0,2,buf);
slcd.print(buf);
delay (250);
slcd.setCursor(8, 1);
slcd.print("X:");
slcd.setCursor(10, 1);
dtostrf(Ah*1000,0,1,buf);
slcd.print(buf);
delay (250); // задержка 1/4 секунды. итого задержка 1 секунду.
}
else {
if (varTime>360){// окончание тестирования
//отключить аккум от устройства
digitalWrite(LatchingRelay,HIGH);
//подать звуковой сигнал
tone(Speaker,LA3,Q);
delay(1+Q);
tone(Speaker,LA3,Q);
delay(1+Q);
tone(Speaker,LA3,Q);
delay(1+Q);
tone(Speaker,F3,E+S);
delay(1+E+S);
tone(Speaker,C4,S);
delay(1+S);
tone(Speaker,LA3,Q);
delay(1+Q);
tone(Speaker,F3,E+S);
delay(1+E+S);
tone(Speaker,C4,S);
delay(1+S);
tone(Speaker,LA3,H);
delay(1+H);
tone(Speaker,E4,Q);
delay(1+Q);
tone(Speaker,E4,Q);
delay(1+Q);
tone(Speaker,E4,Q);
delay(1+Q);
tone(Speaker,F4,E+S);
delay(1+E+S);
tone(Speaker,C4,S);
delay(1+S);
tone(Speaker,Ab3,Q);
delay(1+Q);
tone(Speaker,F3,E+S);
delay(1+E+S);
tone(Speaker,C4,S);
delay(1+S);
tone(Speaker,LA3,H);
delay(1+H);
tone(Speaker,LA4,Q);
delay(1+Q);
tone(Speaker,LA3,E+S);
delay(1+E+S);
tone(Speaker,LA3,S);
delay(1+S);
tone(Speaker,LA4,Q);
delay(1+Q);
tone(Speaker,Ab4,E+S);
delay(1+E+S);
tone(Speaker,G4,S);
delay(1+S);
tone(Speaker,Gb4,S);
delay(1+S);
tone(Speaker,E4,S);
delay(1+S);
tone(Speaker,F4,E);
delay(1+E);
delay(1+E);//PAUSE
tone(Speaker,Bb3,E);
delay(1+E);
tone(Speaker,Eb4,Q);
delay(1+Q);
tone(Speaker,D4,E+S);
delay(1+E+S);
tone(Speaker,Db4,S);
delay(1+S);
tone(Speaker,C4,S);
delay(1+S);
tone(Speaker,B3,S);
delay(1+S);
tone(Speaker,C4,E);
delay(1+E);
delay(1+E);//PAUSE QUASI FINE RIGA
tone(Speaker,F3,E);
delay(1+E);
tone(Speaker,Ab3,Q);
delay(1+Q);
tone(Speaker,F3,E+S);
delay(1+E+S);
tone(Speaker,LA3,S);
delay(1+S);
tone(Speaker,C4,Q);
delay(1+Q);
tone(Speaker,LA3,E+S);
delay(1+E+S);
tone(Speaker,C4,S);
delay(1+S);
tone(Speaker,E4,H);
delay(1+H);
tone(Speaker,LA4,Q);
delay(1+Q);
tone(Speaker,LA3,E+S);
delay(1+E+S);
tone(Speaker,LA3,S);
delay(1+S);
tone(Speaker,LA4,Q);
delay(1+Q);
tone(Speaker,Ab4,E+S);
delay(1+E+S);
tone(Speaker,G4,S);
delay(1+S);
tone(Speaker,Gb4,S);
delay(1+S);
tone(Speaker,E4,S);
delay(1+S);
tone(Speaker,F4,E);
delay(1+E);
delay(1+E);//PAUSE
tone(Speaker,Bb3,E);
delay(1+E);
tone(Speaker,Eb4,Q);
delay(1+Q);
tone(Speaker,D4,E+S);
delay(1+E+S);
tone(Speaker,Db4,S);
delay(1+S);
tone(Speaker,C4,S);
delay(1+S);
tone(Speaker,B3,S);
delay(1+S);
tone(Speaker,C4,E);
delay(1+E);
delay(1+E);//PAUSE QUASI FINE RIGA
tone(Speaker,F3,E);
delay(1+E);
tone(Speaker,Ab3,Q);
delay(1+Q);
tone(Speaker,F3,E+S);
delay(1+E+S);
tone(Speaker,C4,S);
delay(1+S);
tone(Speaker,LA3,Q);
delay(1+Q);
tone(Speaker,F3,E+S);
delay(1+E+S);
tone(Speaker,C4,S);
delay(1+S);
tone(Speaker,LA3,H);
delay(1+H);
delay(20*H);
}
else{//ожидаем подачи аккума на вивисекцию
slcd.setCursor(0, 0);
slcd.print("Ready to BURN!");
slcd.setCursor(0, 1);
slcd.print("Insert akkum...");
delay (1500);
slcd.clear();
delay (1500);
}
}
}