void ton(int32_t frequ_ex, int16_t durration) { //durration in 1/100tel sec frequ 1-2000Hz
 pip=0;
 frequ_ex=1141;
 frequ=(frequ_ex*frequ_ex)/((10000-(frequ_ex+7859)*15)); //**100step=125m 9000 == 1033hz 9000=1141  9100=1270 9200=1421  9300=1614 9400=1873 9500=2282; 9600=2863 9700=3789 9800=5641 9900=10895narf 119.5 1141 **113,5_1025 695 570 455 344 230 120
 while (pip< (durration)) {
  for (int32_t pip2 = 0; pip2 < (10005-frequ); pip2++){
   while ((millis()- tonf) >=  10) {
   pip++;tonf=millis();}
    if (pip2 ==0) { ton1;}
    if (pip2 ==((10005-frequ)/2)) { ton0;}
   }}ton1;
}