COSTRUZIONE INDICATORE PER ANALISI CICLICA CON VISUAL TRADER (2 lettori)

[Conte Vlad]

Sul MINI DOWN 4 minuti non ne ha sbagliata una

Ciao solo,
ma su time frame maggiori si comporta bene ugualmente il tuo sistemino?
Sai , con i 4 minuti bisogna stare attaccati al monitor ed essere delle macchinette

 

[Eod]

salve a tutti, ciao zino, felice di rivederti

nell'attesa che solo posto i suoi codici da noi tutti tanto sospirati, mi permetto nel mio piccolo di postare un ts semplice semplice che vorrei farvi testare per pensare cosa ne pensate.
e' un ts EOD cioè end of day e quindi multiday per operazioni a largo respiro......

provatelo e miglioramolo....

ps:
no ho elaborati molti e testati altri non miei.... sinceramente non ricordo se questo è mio o di altri. ma poco importa. l'importante è testarlo.....
fatemi sapere....

solo. siamo in attesa .......

Var: mm2,mm8,signal,miomacd;
mm2=mov(c,5,s);
mm8=mov(c,13,s);
miomacd=MACD(C, 8, 32);
signal=mov(miomacd,8,s);
if crossover(mm2,mm8) then enterlong (nextbar,open); endif;
if crossunder(mm2,mm8) then entershort (nextbar,open); endif;

 

[Eod]

questo invece è farina del mio sacco. e' solo long. e da delle soddisfazioni interessanti. sempre per operazioni multidays.
mi piacerebbe molto che qualcuno lo perfezioni magari usando per le uscite il supertrend o il sar.....
e se magari si volesse inserire anche lo short....

{*****************************************
TS ideato da EOD
semplice idea di partenza da migliorare.
versione 1*************************************** }

Var: miavar(0),MioMACD0,MioMACDSIGN1;
MioMACD0 = MACD(C, 16, 64);
MioMACDSIGN1 = MACDSIGN(C, 16, 64, 28);
SECTION_ENTERLONG:
if (MioMACD0 > MioMACDSIGN1) then
EnterLong(NextBar, AtOpen);
endif;
END_SECTION
SECTION_EXITLONG:
if (MioMACD0 < MioMACDSIGN1) then
EXITLONG(NextBar, AtOpen);
endif;
END_SECTION

 

[Eod]

questa è un evoluzione del precedente.....
davvero interessante........
gli istogrammi rossi e verdi li uso per confermare l'operazione long visto che il ts non contempla lo short.....

testate anche questo..........

Var: volp(0), voln(0), expo9(0), expo5(0), op3(0), cumpos(0), cumneg(0);
Var: indzona1(0);
Var: miavar(0),MioMACD0,MioMACDSIGN1;

volp=PVI (C,9);
voln=NVI (C);
op3=OP(volp,voln,add);
expo5=ExpSmooth (op3, 5);
expo9=ExpSmooth (expo5, 7);

if expo9>=expo9[1]
then cumpos=cumpos+V;
else cumpos=0;
endif;
if expo9<expo9[1]
then cumneg=cumneg+V;
else cumneg=0;
endif;
MioMACD0 = MACD(C, 16, 64);
MioMACDSIGN1 = MACDSIGN(C, 16, 64, 24);
SECTION_ENTERLONG:
if (MioMACD0 > MioMACDSIGN1) then
EnterLong(NextBar, AtOpen);
endif;
END_SECTION
SECTION_EXITLONG:
if (MioMACD0 < MioMACDSIGN1) then
EXITLONG(NextBar, AtOpen);
endif;
END_SECTION
indzona1=CreateViewport(100, 0, true);
PlotChart(cumpos, Indzona1, green, istogramma, 2);
PlotChart(cumneg, Indzona1, red, istogramma, 2);

 

[solospread]

Ciao solo,
ma su time frame maggiori si comporta bene ugualmente il tuo sistemino?
Sai , con i 4 minuti bisogna stare attaccati al monitor ed essere delle macchinette

Funziona su qualsiasi time frame , solo che bisogna calibrare il frame a seconda del sottostante. Funziona anche end of day.

 

[solospread]

questa è un evoluzione del precedente.....
davvero interessante........
gli istogrammi rossi e verdi li uso per confermare l'operazione long visto che il ts non contempla lo short.....

testate anche questo..........

Ho fatto copia ed incolla del tuo TS ed essendo le 6 del mattino ero mezzo rimbambito e l'ho copiato cancellando il mio evoluzione invece di richiamare un foglio nuovo.
Spero di ricordarmi il codice, ora me lo devo ricostruire.

 

[pacu83]

Ho fatto copia ed incolla del tuo TS ed essendo le 6 del mattino ero mezzo rimbambito e l'ho copiato cancellando il mio evoluzione invece di richiamare un foglio nuovo.
Spero di ricordarmi il codice, ora me lo devo ricostruire.

Madoooooooooo

 

[Eod]

Ho fatto copia ed incolla del tuo TS ed essendo le 6 del mattino ero mezzo rimbambito e l'ho copiato cancellando il mio evoluzione invece di richiamare un foglio nuovo.
Spero di ricordarmi il codice, ora me lo devo ricostruire.

 

[Eod]

mentre solo ricrea i suoi codici che speriamo tutti pubblichera' qui, io mi accingo a pubblicare anche questo ts (non e' frutto della mia creativita').
l'idea lho presa su un vecchio 3d da ale73 e poi ho cambiato alcune piccole cosine...

su alcuni strumenti finanziari va a bomba.....

provate anche questo e parliamone. fatemi sapere. ok?

var: miadev,miamediadev,miamediadev1,miamedia,miamedia1 ,condgen,condlong,condshort,indzona1,indzona2;
miadev=stddev(c,50); // deviazione standard a 50 periodi
miamediadev=mov(miadev,50,s); //media mobile a 50 periodi della deviazione standard
miamediadev1=ref(miamediadev,1);//media mobile a 50 periodi della deviazione standard di ieri
miamedia=mov(c,200,s); //media mobile a 200 periodi
miamedia1=ref(miamedia,20); //media mobile a 200 periodi di 20 gg fa
condlong=miamedia > miamedia1; //condizione long: mm200 di oggi maggiore di quella di 20 giorni fa
condshort=miamedia < miamedia1; //condizione short: mm200 di oggi minore di quella di 20 giorni fa
condgen=miamediadev > miamediadev1; //condizione generale: mm deviazione standard di oggi maggiore di quella di ieri

if condlong then if condgen then enterlong(nextbar,atopen); //entro long se ci sono le due condizioni long e generale
endif;
endif;
if miamediadev < miamediadev1 then exitlong(nextbar,atopen); //esco se mm deviazione standard di ieri supera quella di oggi
endif;

if condshort then if condgen then entershort(nextbar,atopen); //entro short se ci sono le due condizioni short e generale
endif;
endif;
if miamediadev < miamediadev1 then exitshort(nextbar,atopen); //esco se mm deviazione standard di ieri supera quella di oggi
endif;

Indzona1=CreateViewport(300,0,true);
Indzona2=CreateViewport(300,0,true);
PlotChart(miamediadev,Indzona1,blue,solid,2);
PlotChart(miamediadev1,Indzona1,red,solid,2);
PlotChart(miamedia,Indzona2,green,solid,2);
PlotChart(miamedia1,Indzona2,black,solid,2);

 

[Eod]

sul titolo intesa s paolo mi da questo risultato