ProtonBridge или используем приложение AtomSwift в самодельном дозиметре

unsigned long cps2; // количество імпульсів за 2 секунди з щотчика гейгера
unsigned long RAD; // уровень радиації
unsigned long DOZA; // получена доза в микроренгенах

unsigned long toch_milis2;

void setup() {
Serial.begin(115200);
}

void loop() {
if (millis() - toch_milis2 >= 1000) {
toch_milis2 = millis();
RAD = 14; // уровень радиації в микроренгенах
BluetoothRAD (); // отравка уровня радиації на телефон

DOZA = 10; // получена доза радіації в микроренгенах
BluetoothDoza (); // отравка уровня дози радіації на телефон

cps2 = 10; // количество імпульсів за 2 секунди з щотчика гейгера ( нужен для режима измерения )
BluetoothCPS (); // отравка количества імпульсів за 2 секунди з щотчика гейгера на телефон
}
}
void BluetoothRAD (){ // уровень радиації
double value;
float value1 = RAD * 0.01;
value = value1;
byte * b = (byte *) & value;
Serial.write(0xA0);
Serial.write(0x02);
Serial.write(b,4);
}
void BluetoothDoza (){ // получено доза радиації
double value3 ;
float value4 = DOZA * 0.00001;
value3 = value4;
byte * c = (byte *) & value3;
Serial.write(0xA0);
Serial.write(0x01);
Serial.write(c,4);
}
void BluetoothCPS (){ // количество імпульсов з щотчика гейгера за 2 сек
double value5;
float value6 = cps2 * 0.01 ;
value5 = value6;
byte * e = (byte *) & value5;
Serial.write(0xA0);
Serial.write(0x03);
Serial.write(e,4);
}

unsigned long RAD;
unsigned int PARAM;

void setup() {
Serial.begin(115200);
}

void loop() {
RAD = 67;
BluetoothRAD (); // Sende den Strahlungspegel an das Telefon
BluetoothRxParam ();
delay(1000);
}

void BluetoothRAD (){ // dose rate
double value;
float value1 = RAD;
value = value1;
byte * b = (byte *) & value;
Serial.write(0xA0); // WRITE!
Serial.write(0x02); // 0x02: Dosisleistung in µSv/h
Serial.write(b,4); // Serial.write(buf, len)
}

void BluetoothRxParam () {
Serial.write(0xB0); // READ!
Serial.write(0x51); // 0x51, 2 Byte uint, ==> length of the tick in msec

while(Serial.available() >= 2); { // warten, bis 2 Byte im Buffer sind
PARAM = Serial.read(); // MSB
PARAM += Serial.read() << 8 ; // LSB
}
}

static void protonProfileChangeCB( uint8 paramID )
{
uint8 newValue1[10];
uint8 newValue2[10];
uint8 newValue3[10];
uint8 newValue4[8];
uint8 newValue5[18];
uint8 newValue6[17];
uint8 newValue7[20];

switch( paramID )
{
case PROTONPROFILE_CHAR3:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR3, &newValue1 );
break;

case PROTONPROFILE_CHAR4:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR4, &newValue2 );
break;

case PROTONPROFILE_CHAR5:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR5, &newValue3 );
break;

case PROTONPROFILE_CHAR6:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR6, &newValue4 );
break;

case PROTONPROFILE_CHAR7:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR7, &newValue5 );
break;

case PROTONPROFILE_CHAR8:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR8, &newValue6 );
break;

case PROTONPROFILE_CHAR9:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR9, &newValue7 );
break;

default:
// should not reach here!
break;
}
}

static void protonProfileChangeCB( uint8 paramID )
{

switch( paramID )
{
case PROTONPROFILE_CHAR3:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR3, &charValue3 );
break;

case PROTONPROFILE_CHAR4:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR4, &charValue4 );
break;

case PROTONPROFILE_CHAR5:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR5, &charValue5 );
break;

case PROTONPROFILE_CHAR6:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR6, &charValue6 );
break;

case PROTONPROFILE_CHAR7:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR7, &charValue7 );
break;

case PROTONPROFILE_CHAR8:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR8, &charValue8 );
break;

case PROTONPROFILE_CHAR9:
ProtonProfile_GetParameter( PROTONPROFILE_CHAR9, &charValue9 );
break;

default:
// should not reach here!
break;
}
}

//
// credits to Nikita71 from Kiew, Ukraine
// http://forum.rhbz.org/topic.php?forum=80&topic=98
//
#define CalFactor 3.4 // Calibrierungsfaktor in cps / 1 mR/hr

int PIN_GMZ_count_INPUT = 3; // Interrupteingang für Impulse (fallende Flanke) has to be capable of "interrupt on change"

unsigned long Ticks3,Ticks2,Ticks1,Ticks0;
unsigned long new_millis;
unsigned long old_millis;
unsigned long counter; // Impulszähler für die Interruptroutine


void setup() {
Serial.begin(115200);
attachInterrupt(digitalPinToInterrupt (PIN_GMZ_count_INPUT), isr_count, FALLING);
pinMode(LED_BUILTIN, OUTPUT);
digitalWrite(LED_BUILTIN, LOW); // LED aus
BluetoothPutRAD (0.0); // Sende den Strahlungspegel an das Telefon DEMO
delay(3000);
BluetoothPutRAD (111.11); // Sende den Strahlungspegel an das Telefon DEMO
delay(3000);
BluetoothPutRAD (222.22); // Sende den Strahlungspegel an das Telefon DEMO
delay(3000);
BluetoothPutRAD (333.33); // Sende den Strahlungspegel an das Telefon DEMO
delay(3000);
BluetoothPutRAD (444.44); // Sende den Strahlungspegel an das Telefon DEMO
delay(3000);
BluetoothPutRAD (555.55); // Sende den Strahlungspegel an das Telefon DEMO
delay(3000);
BluetoothPutRAD (0.0); // Sende den Strahlungspegel an das Telefon DEMO
}

void loop() {
new_millis = millis();
if (new_millis - old_millis >= 1000) { // immer nach 1000 ms führen wir folgendes aus:
old_millis = new_millis;
Ticks3 = Ticks2; // FIFO 4 Werte
Ticks2 = Ticks1;
Ticks1 = Ticks0;
Ticks0 = counter; // Der Messwert der letzten Sekunde
counter = 0; // Der Impulszähler wieder auf 0, für die nächste Messung

unsigned int param_1 = BluetoothGetParam1();
if (param_1 >= 20) { // LED dauerhaft an (Einstellung "Beeps")
digitalWrite(LED_BUILTIN, HIGH);
}
else if (param_1 >= 1) { // LED blinkt (Einstellung "Clicks")
digitalWrite(LED_BUILTIN, HIGH);
delay(10);
digitalWrite(LED_BUILTIN, LOW);
delay(10);
}
else {
digitalWrite(LED_BUILTIN, LOW); // LED aus (Einstellung "No sound")
}
BluetoothPutRAD ((Ticks0+Ticks1+Ticks2+Ticks3)*2.5/CalFactor); // Sende den Strahlungspegel in µSv gemittelt über 4 Sekunden (4 Messungen) an das Telefon
BluetoothPutCPS (Ticks0+Ticks1); // Sende die Anzahl der Impulse in 2 Sekunden von der Geigersonde zum Telefon (für den Messmodus benötigt)
}
}

void BluetoothPutRAD (double value){ // Strahlungsniveau in µSv/h
byte * p = (byte *) & value;
Serial.write(0xA0); // SCHREIBEN!
Serial.write(0x02); // 0x02: Dosisleistung in µSv/h
Serial.write(p,4); // Serial.write(buf, len)
}

void BluetoothPutCPS (double value){ // Anzahl der Impulse von der Geigersonde für 2 Sekunden
byte * p = (byte *) & value; // e ist ein Pointer auf ein Array von Bytes
Serial.write(0xA0); // SCHREIBEN!
Serial.write(0x03); // 0x03: Anzahl der Impulse in den letzten 2 Sekunden
Serial.write(p,4); // Serial.write(buf, len)
}

unsigned int BluetoothGetParam1 () { // holt einen Parameter der Gerätesteuerungscharakteristik (0x51 , 2 Byte µint, ==> Länge des Ticks in msec
byte buf[4];

Serial.write(0xB0); // LESEN!
Serial.write(0x51); // 0x51, 2 Byte uint, ==> Länge des Ticks in msec // 0x53, 2 Byte uint, ==> Länge der Schwingungsdauer in msec
Serial.setTimeout(500); // Nach max. 500 msec. sollten die Daten gekommen sein
unsigned int rlen = Serial.readBytes(buf, 2);
unsigned int resultat = *((unsigned int *) buf); // https://forum.arduino.cc/index.php?topic=30322.0
if (rlen >= 2) {return resultat; }
}

void isr_count() // in der Interruptroutine ..
{
counter++; // .. wird nur ein Impuls-Zähler bewegt, weiter nichts.
}