1

Téma: [vyřešeno] vzorový program - nechodí emaily

Zdravím, pořídil jsem pro kamaráda SDS Micro e r2 a chci monitorovat teploty a při překročení meze poslat email. Ideální je prostě ten vzorový prográmek "program pro zobrazení teplotních čidel 8x s možností informace o překročení teploty na email ...pro moduly MICRO a MACRO,TTC".
Program jsem nahrál, web stránku také. V programu upravil email adresu, pro zkoušení upravil čas "čekání" na odesílání emailu. V administraci sds modulu nastavil jméno, heslo, adresu a snad dobrou IP seznam emailu (77.75.72.43).
Nastavil čidlo teploty a limity v web stránce. v konzoli to vypisuje překročení teploty ale emeil nedorazí.
Neporadili by mi někdo kde mám zokopaného psa?

ještě poté dotaz, budu chtít odesílat také data na portál - to budu muset asi potom vytvořit souhrnný sloučený program teplot s tim co mi vygenefuje portál pro odesílání dat že?

díky

Pavel

2

Re: [vyřešeno] vzorový program - nechodí emaily

Tak jsem se posunul, ale ne do funkčního stavu, zjistil jsem že chlapci na seznamu mají v nápovědě asi již starou IP adresiu SNTP serveru, upravil jsem jí na adresu která pingá 77.75.78.48 ale nic to neposílá.

vzorový kod je zde: (email adresu samozřejmě nastaven) ale nevi kde je bota

děkuji za rady
Pavel

// ***********  upozorneni  **************
// pouziva se RAM[300-308] pro akt.teploty
// pouziva se RAM[310-318] pro min.teploty
// pouziva se RAM[320-328] pro max.teploty
// pouziva se RAM[330-338] pro dolni mezni teploty pro email
// pouziva se RAM[340-348] pro horni mezni teploty pro email
// pouziva se RAM[350-358] pro informaci o odeslanem emailu

var _sys;   //ukazatel do sys
var _ram;   //ukazatel do ram
var _ramd;  //dolni mezni hodnoty
var _ramh;  //horni mezni hodnoty
var _rame;  //email odeslan=1
var _tmo;   //timeout pro edeslani dalsiho emailu
var _memo;  //sys[100-8]
var _web;   //sys[140-8]
var _pom;   //pomocna pro vsechno
var _tep;   //teplota ve stupnich (/100)

setparam
{
 // sys[140-7]
 _sys=140;
 _ramd=330;
 _ramh=340;

 label setparam_1:
 _pom=sys[_sys]/1000;
 if (_pom<200) {
  ram[_ramh]=_pom-100;
  ram[_ramh]=-1*ram[_ramh];
 } else {
  ram[_ramh]=_pom-200;
 }
 _pom=sys[_sys] % 1000;
 if (_pom<200) {
  ram[_ramd]=_pom-100;
  ram[_ramd]=-1*ram[_ramd];
 } else {
  ram[_ramd]=_pom-200;
 }
 _sys++;
 _ramd++;
 _ramh++;
 if (_sys<148) goto setparam_1;
}

savetopm
{
 _pom=0;
 _memo=100;
 _web=140;

 label savetopm_1:
 if (sys[_memo]!=sys[_web]) {
  sys[_memo]=sys[_web];
  echo('Hodnota ', sys[_web], ' ulozena do permanentni pameti');
  _pom=1;
 }
 _memo++;
 _web++;
 if (_memo<108) goto savetopm_1;
 if (_pom==1) setparam();  //nastaveni parametru z web promennych
}

nactitemp
{
 _sys=310;
 _ram=300;
 label nactitemp_1:
 if (sys[_sys]>0 && sys[_sys]<20000) {
  ram[_ram]=sys[_sys];
  _pom=_ram+10;
  if (ram[_ram]<ram[_pom]){
   ram[_pom]=ram[_ram];
  }
  _pom=_ram+20;
  if (ram[_ram]>ram[_pom]){
   ram[_pom]=ram[_ram];
  }
 }
 _sys++;
 _ram++;
 if (_sys<318) goto nactitemp_1;
}

kontrtemp
{
 _ram=300;
 _ramd=330;
 _ramh=340;
 _rame=350;
 label kontrtemp_1:

 _pom=_ram-299;
 _tep=ram[_ram]/100;  //akt.teplota ve stupnich
 if (_tep<ram[_ramd] && ram[_rame]<sys[3]){
  echo('Teplota cidla ', _pom, ' je nizsi nez nastavena (', _tep, ' st.C)');
  smtp_send(text[100], 'SDS panel teplot', 'Teplota cidla ', _pom, ' je nizsi nez nastavena (', _tep, ' st.C)');
  ram[_rame]=sys[3]+8640000;  //az za 24h se odesle dalsi email pokud se teplota nevrati
 }
 if (_tep>ram[_ramh] && ram[_rame]<sys[3]){
  echo('Teplota cidla ', _pom, ' je vyssi nez nastavena (', _tep, ' st.C)');
  smtp_send(text[100], 'SDS panel teplot', 'Teplota cidla ', _pom, ' je vyssi nez nastavena (', _tep, ' st.C)');
  ram[_rame]=sys[3]+8640000;  //az za 24h se odesle dalsi email pokud se teplota nevrati
 }
 if (_tep>ram[_ramd] && _tep<ram[_ramh]){
  _pom=_tmo*100;
  ram[_rame]=sys[3]+_pom;  //timeout
 }

 _ram++;
 _ramd++;
 _ramh++;
 _rame++;
 if (_ram<308) goto kontrtemp_1;
}

init
{
 echo('Teplomer spusten');

3

Re: [vyřešeno] vzorový program - nechodí emaily

tak vyřešeno, problem byl asi v tom, že v administraci SDS micro musí být ve jméně také správná emailová adresa stejně jako v políčku email.

chodí to a maily posílá

Pavel