Su suggerimento di f4f posto qui la mia richiesta augurandomi che oltre a f4f possano di nuovo, nello spirito di collaborazione che ha contraddistinto questo 3d ,dare tutti il proprio contributo Meursault (al quale ho anche scritto congratulandomi e chiedendogli se fosse ancora attivo questo 3d e avanzandogli la richiesta che di seguito vado ad illustrare) e tutti gli altri che volessero.
L’indicatore di cui sto parlando l’ho preso da un link postato da venere qualche giorno fa sul 3d “William's %R come indicatore ciclico”.Il link è il seguente:
Multicharts: la discussione - Pagina 2 - Forum di Finanzaonline.com
Si tratta di un indicatore ciclico derivante dagli studi di Garrett che cerca di unire prezzi e volumi al fine di determinare il futuro andamento dei prezzi.La formula postata da venere è la seguente:
Input:avgvol(64),avgdiavg(56),DispDiv(4),Modo(1);
vars:upward(0),downward(0),upvol(0),downvol(0),totmovimento(0),totvolume(0),idcvol(0),closeward(0);
upward=(h-c[1])+(c-l);
VALUE4=AVERAGE(upward,avgdiavg);
downward=h-l;
VALUE5=AVERAGE(downward,avgdiavg);
closeward=c-c[1];
VALUE6=AVERAGE(closeward,avgdiavg);
totvolume=(v);
VALUE7=AVERAGE(V,avgvol);
value8=value4+value5;
totmovimento=upward+downward+closeward;
upvol=VALUE7/value8 *VALUE4;
downvol=VALUE7/value8 *VALUE5;
value1=average(upvol,avgvol);
value2=average(downvol,avgvol);
if value1>value2 then begin value3=1;end;
if value1<value2 then begin value3=-1;end;
idcvol=idcvol[1]+value3;
if modo=1 then begin
plot1[avgvol/DispDiv](idcvol,"Upvol");
plot2[avgvol/DispDiv](average(idcvol,avgdiavg/4),"DOWNvol");end;
if modo=2 then begin
plot1[avgvol/DispDiv](value1,"Upvol");
plot2[avgvol/DispDiv](value2,"DOWNvol");end;