jueves, 19 de septiembre de 2019

ciao Mick.
ti metto formula ts
per la situazione medica..settimana prossima esami ematici e poi prova di sforzo con liquido di contrasto radioattivo..sperem..grazie

//_______________ADX filtrato_________//

Var: pdx14,ndx14,op1,op2,op3,op4,adxa,indzona1,indzona2,indzona3;
Var: max_op4(-100), min_op4(100),med_op4;
Var: max_adxa(-100), min_adxa(100),med_adxa,colore,meseprec3;

/////////////////////////////////////////////////////////////////////////////
pdx14=DMPDX(C,40);
ndx14=DMNDX(C,40);
op1= op(pdx14,ndx14,add);
op2=op(pdx14,ndx14,sub);
op3=op(op2,op1,divis);
op4=wilder(op3,14);
adxa  =DMADX(c,40);
////////////////////////////////////////////////////////////////////////////

if (op4>max_op4) then max_op4=op4;
endif;

if (op4<min_op4) then min_op4=op4;
endif;
med_op4=max_op4-(max_op4-min_op4)*0.5;

if getmonth<>meseprec3 then
   max_op4=0;
   min_op4=0;endif;
///////////////////////////////////////////////////////////////////////////

if getmonth<>meseprec3 then
   max_adxa=adxa;
   min_adxa=adxa;
endif;

if (adxa>max_adxa) then max_adxa=adxa;
endif;

if (adxa<min_adxa) then min_adxa=adxa;
endif;
med_adxa=max_adxa-(max_adxa-min_adxa)*0.5;
meseprec3=getmonth;
///////////////////////////////////////////////////////////////////////////////

if op4 > 0 then
colore= green;
else
colore= red;
endif;
/////////////////////////////////////////////////////////////////////////////
Indzona1=CreateViewport(400,0,true);
Plotchart(op4,Indzona1,colore, istogramma, 2);
Plotchart(max_op4,Indzona1,green, solid, 2);
Plotchart(min_op4,Indzona1,red, solid, 2);
Plotchart(med_op4,Indzona1,gray, dot, 1);

Indzona2=CreateViewport(400,0,true);
Plotchart(adxa,Indzona2,blue, solid, 2);
Plotchart(max_adxa,Indzona2,green, solid, 2);
Plotchart(min_adxa,Indzona2,red, solid, 2);
Plotchart(med_adxa,Indzona2,black, dot, 1);

Indzona3=CreateViewport(400,0,true);
Plotchart(pdx14,Indzona3,green, solid, 2);
Plotchart(ndx14,Indzona3,red, solid, 2);



1 comentario:

  1. Grazie e in bocca al lupo!
    Vado in vacanza due settimane, spero di leggere notizie positive!

    ResponderEliminar

 sirtuazione grafica su stellantis da metà  agosto 2026 in fase di rallentamento la discesa un segnale positivo sarebbe lo stazionamento del...