COSTRUZIONE INDICATORE PER ANALISI CICLICA CON VISUAL TRADER (1 Viewer)

lnanetti · 17 Febbraio 2009

ciao a me dei tanti fatti che girano io ne rilancerei 2 da rimodellare e resettare da parte dei big.. secondo me questi fatti girare su time frame a 5 minuti opportunamente modificati e migliorati non diventerebbero male... poi esperti ditemi voi:
{*******************************************************
**** Trading System creato con il Wizard di VT ***
********************************************************}
Var: miavar(0), MioMoV0,MioBBANDCENTER1,MiaPista2,MioMOV3,Miacondizione4,Miacondizione5,Miacondizione6,Miacondizione7;
MioMOV0 = MOV ( C, 55, 0, 0) ;
MioBBANDCENTER1 = BBANDCENTER(C, 20, 2, 0);
MiaPista2 = OP (miobbandcenter1, miomov0, sub) ;
MioMOV3 = Mov (C, 21, 0, 0, 0) ;
Miacondizione4 = OP (mioMov0, miomov3, add) ;
Miacondizione5 = OP (miacondizione4, miomov0 , divis) ;
Miacondizione6 = OP (miacondizione4, miomov3 , divis) ;
Miacondizione7 = OP (Miomov0, miomov3, sub) ;
SECTION_ENTERLONG:
if (miacondizione6 > 2) and (miacondizione7 < 50) then
EnterLong(NextBar, AtOpen);
endif;
END_SECTION
SECTION_EXITLONG:
if (miacondizione6 < 2) then
Exitlong(NextBar, AtOpen);
endif;
END_SECTION
SECTION_ENTERSHORT:
if (miacondizione5 > 2) and (miacondizione7 < 50) then
Entershort(NextBar, AtOpen);
endif;
END_SECTION
SECTION_EXITSHORT:
if (miacondizione5 < 2) then
ExitShort(NextBar, AtOpen);
endif;
END_SECTION

ora il secondo:

Var: miavar(0),MioREGRLIN0,MioVEL1,MioPISTACICLICA2;
MioREGRLIN0 = REGRLIN(C, 34);
MioVEL1 = VEL(C, 30, 0, 10);
MioPISTACICLICA2 = PISTACICLICA(C, 25);
installstoploss(INPERC,0.8,"STOP");
installtrailingprofit (inperc, 1.5,0.1);
SECTION_ENTERLONG:
if (MioREGRLIN0 < C and MioVEL1 > 0 and MioPISTACICLICA2 > 0) then
EnterLong(NextBar, AtOpen);
endif;
END_SECTION
SECTION_EXITLONG:
if (MioREGRLIN0 > C and MioVEL1 < 0 and MioPISTACICLICA2 < 0) then
Exitlong(NextBar, AtOpen);
endif;
END_SECTION
SECTION_ENTERSHORT:
if (MioREGRLIN0 > C and MioVEL1 < 0 and MioPISTACICLICA2 < 0) then
EnterShort(NextBar, AtOpen);
endif;
END_SECTION
SECTION_EXITSHORT:
if (MioREGRLIN0 < C and MioVEL1 > 0 and MioPISTACICLICA2 > 0) then
ExitShort(NextBar, AtOpen);
endif;
END_SECTION

il secondo fa sopratutto un sacco di operazioni inutili ma se riuscite a migliorarlo e a pubblicarlo riveduto e corretto credo che possa diventare un'ottimo TS..

P.s. per solospread mi dici poi quanto puoi se puoi pubblicare la versione ultima di laser con la miglioria consigliata dal nostro amico che ha portato ad un notevole miglioramento della performance..

un saluto a todos bye luca

lnanetti · 17 Febbraio 2009

risolto il punto 3 grazie a bernese,, ora rilancio la 2 domanda cambiandola

A che pagina è l'ultimo listato o il piu performante del TS rondom/solo/ciclone e su che time frame è bene farlo girare ? ho perso 150 pagine di trend durante le mie ferie... e diventa dura capirci qualcosa senza aiuto...
luca

solospread · 17 Febbraio 2009

Ho ricevuto un Mp da NIKITI che ringrazio per aver capito perfettamente qual'è lo spirito di questo thread.Dò seguito a una sintesi del messaggio ricevuto.
Vorrei sottoporti un semplice TS sviluppato sulla base del tuo oscillatore di pag. 231;Ho notato che utilizzandolo con il future MINY CRUDE OIL 0209 (ho anch'io Directa), specificando Nvolume come intervallo, si ottengono risultati interessanti.Ho giocato un po' con i parametri, per verificare l'andamento dei risultati al variare del range dell'oscillatore. Per questi test non ho impostato stop-loss.
Mi piacerebbe sapere se tali risultati sono frutto del caso, o se ne possiamo trarre qualche spunto interessante.

Se ritieni che il TS possa essere di qualche utilità puoi pubblicarlo nel thread senza problemi.
E dato che lo reputo molto interessante lo pubblico molto volentieri.

Codice:

{******************************************************************************
http://www.investireoggi.it/forum/costruzione-indicatore-per-analisi-ciclica-con-visual-trader-vt31296-211.html
Pag. 231 - 2304
// SoloSpread - OSCILLATORE MININI-MASSIMI
// SOTTOSTANTE SPMB FRAME 5 MINUTI
// INDIVIDUA MINIMI e MASSIMI CON PRECISIONE
Le variabili di input sono queste:
- Rientro_Dopo_Stop: se impostato a 0 evita il rientro in posizione dopo uno stopLoss, 1 altrimenti

- Range_Laterali: ampiezza bande superiori e inferiori dell'oscillatore
- StopLoss: percentuale StopLoss
******************************************************************************}
var:MIN,MAX,bb,CC,zona1,ValExit_Mio(0),SonoLong(false),SonoShort(false);
input: Rientro_Dopo_Stop(1), Range_Laterali(25), StopLoss;
Var: CambioTrend, DeviazioneOK(false), Stop_su_Long(false), Stop_su_Short(false);
RoundTickMin(true);

InstallStopLoss(INPERC, StopLoss, "=SL=");
//InstallTakeProfit(INPERC, StopLoss*2, "=TP=");
//InstallTrailingProfit(INPERC, StopLoss+0.1, StopLoss, "==", CHECKMIDDLE);  // Ov

If Rientro_Dopo_Stop <> 1 then
   //FileWriteDateHour("c:\prova.txt", false);
   //FileWriteStringVal2("c:\prova.txt", " - ValExit_Mio ", ValExit_Mio, " - ValExit ", ValExit, true);
   //FileWriteStringVal2("c:\prova.txt", " - SonoLong ", SonoLong, " - SonoShort ", SonoShort, true);

   if ValExit_Mio <> Valexit and SonoLong=true then
      ValExit_Mio = Valexit;
      Stop_su_Long=true;
    endif;
   if ValExit_Mio <> Valexit and SonoShort=true then
      ValExit_Mio = Valexit;
      Stop_su_Short=true;
   endif;
endif;

MIN = LLV(RSI(C,14,s),20) < Ref(LLV(RSI(C,14,s),20),2) AND LLV(RSI(C,14,s),20) < Range_Laterali;
MAX = HHV(RSI(C,14,s),20) > Ref(HHV(RSI(C,14,s),20),2) AND HHV(RSI(C,14,s),20) > (100-Range_Laterali);

if MIN = true and Stop_su_Long=false and positiondir<>1 then
   enterlong(nextbar, atopen);
   ValExit_Mio = ValExit;
   SonoLong=true;
   SonoShort=false;
   Stop_su_Short=false;
   bb =1;
else
   bb =0;
endif;
if MAX = TRUE and Stop_su_Short=false and positiondir<>-1 then
   entershort(nextbar, atopen);
   ValExit_Mio = ValExit;
   SonoShort=true;
   SonoLong=false;
   Stop_su_Long=false;
   CC =1;
else
   CC =0;
endif;

zona1=CreateViewport(300,true,true);
PlotChart(bb,zona1,blue,solid,1);
PlotChart(cc,zona1,red,solid,1);

santiago · 17 Febbraio 2009

Ciao a tutti, stavo cercando di scrivere un sistema sul breakout del range d'apertura, ma non riesco a farlo entrare come dovrebbe cioè sulla rottura del range del giorno precedente.Chiedo ai più esperti di darci un'occhiata.
Questo è il listato TF 15 minuti:

// OpeningRangeBreakout
Var:YestHigh,YestLow,Stretch,Mult,EntryLongLevel,EntryShortLevel;
installstoploss(INPERC, 1);
InstallTrailingProfitandreverse(Intick, 15,40,"STOP", CHECKmax + EXITONLYIFCLOSEON);
installtakeprofit(intick,75,"Take");
Mult=35;
YestHigh= Eod.h[0];
YestLow = Eod.l[0];
Stretch=(YestHigh-YestLow)* Mult /100;
EntryLongLevel = EOD.O-Stretch;
EntryShortLevel =EOD.O+Stretch;
if isfirstbarday
then enterlong(nextbar, EntryLongLevel,stop)OR
entershort(nextbar, EntryShortLevel,stop);endif;
if t>=1715 then
if positiondir=1 then
exitlong(nextbar,atopen);
endif;
if positiondir=-1 then
exitshort(nextbar,atopen);
endif;
endif;

lnanetti · 17 Febbraio 2009

per solospread

ho provato il listato sopra sul mini oil marzo.. ma non entra proprio con la funzione nvolumi su uno storico di appena 10 giorni..

poi solo un'altra cosa, anzi 2

1 ho scaricato la versione solo spreadrondomciclone a pag 183 che ha questo listato:

[{******************************************************************************
* Nuovo trading-system.
* Aggiungere in questo punto i Vostri commenti, che vi aiuteranno
* in seguito a ricordare le linee guida di trading che intendete
* automatizzare .
******************************************************************************}
Var: miavar(0), Miacondizione1(19000),Miacondizione2(19000),miacondizione3,Miacondizione4,Miacondizione5,Miacondizione6;
Var: Miacondizione7,Miacondizione8, Miacondizione9,Miacondizione10, Miacondizione11,Miacondizione12, Miacondizione13,Miacondizione14;
Var: Miacondizione15,Miacondizione16,Miacondizione17,miacondizione18,STOP;
Var: Semaforo0910(0), semaforo1010(0), semaforo1110(0), Semaforo1210(0), semaforo1310(0), semaforo1410(0),Semaforo1510(0), semaforo1610(0), semaforo1710(0);
Var: ultimaposizione(0), indzona1(0), valoreritracciamento(0), valore(0), ultimoprezzo(0), barra(0), ope1(0), min1(0), max1(0), clo1(0), ritracciamentocalcolato(0);
Var: miavel, mio10, vettorestop(0), pippo(0), vettoreposizione(0);
InstalltakeProfit(INPERC, 0.75, "take");
//************************************************** ************************************************** ************
if T = 0910 then Miacondizione1 = C+20; Miacondizione2 = C-20; endif;
if T = 1010 then Miacondizione3 = C+20; Miacondizione4 = C-20; endif;
if T = 1110 then Miacondizione5 = C+20; Miacondizione6 = C-20; endif;
if T = 1210 then Miacondizione7 = C+20; Miacondizione8 = C-20; endif;
if T = 1310 then Miacondizione9 = C+20; Miacondizione10= C-20; endif;
if T = 1410 then Miacondizione11= C+20; Miacondizione12= C-20; endif;
if T = 1510 then Miacondizione13 =C+20; Miacondizione14= C-20; endif;
if T = 1610 then Miacondizione15 =C+20; Miacondizione16= C-20; endif;
if T = 1710 then Miacondizione17 =C+20; Miacondizione18= C-20; endif;
//************************************************** ************************************************** *********************
//Non si riesce a capire perche ma se metto il controllo in T = non lo prende, probabilmente perche delle barre potrebbero mancare
//in assenza di contrattazione
if T >=0910 and T <= 1009 then if positiondir = 1 then semaforo0910 = 1; endif; if positiondir = - 1 then semaforo0910 = - 1; endif; endif;
if T >=1010 and T <= 1109 then if positiondir = 1 then semaforo1010 = 1; endif; if positiondir = - 1 then semaforo1010 = - 1; endif; endif;
if T >=1110 and T <= 1209 then if positiondir = 1 then semaforo1110 = 1; endif; if positiondir = - 1 then semaforo1110 = - 1; endif; endif;
if T >=1210 and T <= 1309 then if positiondir = 1 then semaforo1210 = 1; endif; if positiondir = - 1 then semaforo1210 = - 1; endif; endif;
if T >=1310 and T <= 1409 then if positiondir = 1 then semaforo1310 = 1; endif; if positiondir = - 1 then semaforo1310 = - 1; endif; endif;
if T >=1410 and T <= 1509 then if positiondir = 1 then semaforo1410 = 1; endif; if positiondir = - 1 then semaforo1410 = - 1; endif; endif;
if T >=1510 and T <= 1609 then if positiondir = 1 then semaforo1510 = 1; endif; if positiondir = - 1 then semaforo1510 = - 1; endif; endif;
if T >=1610 and T <= 1709 then if positiondir = 1 then semaforo1610 = 1; endif; if positiondir = - 1 then semaforo1610 = - 1; endif; endif;
if T >=1710 and T <= 1730 then if positiondir = 1 then semaforo1710 = 1; endif; if positiondir = - 1 then semaforo1710 = - 1; endif; endif;
//************************************************** ************************************************** ***************************************
//Identifica il livello del ritracciamento
//Con vettoreposizione mi salvo la posizione del sistema in ogni barra
//Se la posizione attuale è flat e la precedente era long e lastopisstop = true vuole dire (fino a quando non attiviamo lo stoploss che
//è uscito in trailing
vettoreposizione = positiondir;
if vettoreposizione = 0 and vettoreposizione[1] = 1 and LastopIsStop = true then valoreritracciamento = valexit;
if (CompareTime(09, 10, 0) > 0) and (CompareTime(10,09, 0) < 0) then Miacondizione1 = valexit + 10; semaforo0910 = 0; endif;
if (CompareTime(10, 10, 0) > 0) and (CompareTime(11,09, 0) < 0) then Miacondizione3 = valexit + 10; semaforo1010 = 0; endif;
if (CompareTime(11, 10, 0) > 0) and (CompareTime(12,09, 0) < 0) then Miacondizione5 = valexit + 10; semaforo1110 = 0; endif;
if (CompareTime(12, 10, 0) > 0) and (CompareTime(13,09, 0) < 0) then Miacondizione7 = valexit + 10; semaforo1210 = 0; endif;
if (CompareTime(13, 10, 0) > 0) and (CompareTime(14,09, 0) < 0) then Miacondizione9 = valexit + 10; semaforo1310 = 0; endif;
if (CompareTime(14, 10, 0) > 0) and (CompareTime(15,09, 0) < 0) then Miacondizione11= valexit + 10; semaforo1410 = 0; endif;
if (CompareTime(15, 10, 0) > 0) and (CompareTime(16,09, 0) < 0) then Miacondizione13= valexit + 10; semaforo1510 = 0; endif;
if (CompareTime(16, 10, 0) > 0) and (CompareTime(17,09, 0) < 0) then Miacondizione15= valexit + 10; semaforo1610 = 0; endif;
if (CompareTime(17, 10, 0) > 0) and (CompareTime(17,30, 0) < 0) then Miacondizione17= valexit + 10; semaforo1710 = 0; endif;
endif;
if vettoreposizione = 0 and vettoreposizione[1] = -1 and LastopIsStop = true then valoreritracciamento = valexit;
if (CompareTime(09, 10, 0) > 0) and (CompareTime(10,09, 0) < 0) then Miacondizione2 = valexit - 10; semaforo0910 = 0; endif;
if (CompareTime(10, 10, 0) > 0) and (CompareTime(11,09, 0) < 0) then Miacondizione4 = valexit - 10; semaforo1010 = 0; endif;
if (CompareTime(11, 10, 0) > 0) and (CompareTime(12,09, 0) < 0) then Miacondizione6 = valexit - 10; semaforo1110 = 0; endif;
if (CompareTime(12, 10, 0) > 0) and (CompareTime(13,09, 0) < 0) then Miacondizione8 = valexit - 10; semaforo1210 = 0; endif;
if (CompareTime(13, 10, 0) > 0) and (CompareTime(14,09, 0) < 0) then Miacondizione10= valexit - 10; semaforo1310 = 0; endif;
if (CompareTime(14, 10, 0) > 0) and (CompareTime(15,09, 0) < 0) then Miacondizione12= valexit - 10; semaforo1410 = 0; endif;
if (CompareTime(15, 10, 0) > 0) and (CompareTime(16,09, 0) < 0) then Miacondizione14= valexit - 10; semaforo1510 = 0; endif;
if (CompareTime(16, 10, 0) > 0) and (CompareTime(17,09, 0) < 0) then Miacondizione16= valexit - 10; semaforo1610 = 0; endif;
if (CompareTime(17, 10, 0) > 0) and (CompareTime(17,30, 0) < 0) then Miacondizione18= valexit - 10; semaforo1710 = 0; endif;
endif;
//************************************************** ************************************************** **********************************************
if (CompareTime(09, 10, 0) > 0) and (CompareTime(10,09, 0) < 0) then
if C > Miacondizione1 and semaforo0910 <> 1 then EnterLong(NextBar, AtOpen); semaforo0910 = 1; endif;
if C < Miacondizione2 and semaforo0910 <> -1 then EnterShort(NextBar,AtOpen); semaforo0910 = -1; endif;
endif;
if (CompareTime(10, 10, 0) > 0) and(CompareTime(11,09, 0) < 0) then
if C > Miacondizione3 and semaforo1010 <> 1 then EnterLong(NextBar, AtOpen); semaforo1010 = 1; endif;
if C < Miacondizione4 and semaforo1010 <> -1 then EnterShort(NextBar,AtOpen); semaforo1010 = -1; endif;
endif;
if (CompareTime(11, 10, 0) > 0) and (CompareTime(12,09, 0) < 0) then
if C > Miacondizione5 and semaforo1110 <> 1 then EnterLong(NextBar, AtOpen); semaforo1110 = 1; endif;
if C < Miacondizione6 and semaforo1110 <> -1 then EnterShort(NextBar,AtOpen); semaforo1110 = -1; endif;
endif;
if (CompareTime(12, 10, 0) > 0) and (CompareTime(13,09, 0) < 0) then
if C > Miacondizione7 and semaforo1210 <> 1 then EnterLong(NextBar, AtOpen); semaforo1210 = 1; endif;
if C < Miacondizione8 and semaforo1210 <> -1 then EnterShort(NextBar,AtOpen); semaforo1210 = -1; endif;
endif;
if (CompareTime(13, 10, 0) > 0) and (CompareTime(14,09, 0) < 0) then
if C > Miacondizione9 and semaforo1310 <> 1 then EnterLong(NextBar, AtOpen); semaforo1310 = 1; endif;
if C < Miacondizione10 and semaforo1310 <>-1 then EnterShort(NextBar,AtOpen); semaforo1310 = -1;endif;
endif;
if (CompareTime(14, 10, 0) > 0) and (CompareTime(15,09, 0) < 0) then
if C > Miacondizione11 and semaforo1410 <> 1 then EnterLong(NextBar, AtOpen); semaforo1410 = 1; endif;
if C < Miacondizione12 and semaforo1410 <>-1 then EnterShort(NextBar,AtOpen); semaforo1410 = -1;endif;
endif;
if (CompareTime(15, 10, 0) > 0) and (CompareTime(16,09, 0) < 0) then
if C > Miacondizione13 and semaforo1510 <> 1 then EnterLong(NextBar, AtOpen); semaforo1510 = 1; endif;
if C < Miacondizione14 and semaforo1510 <>-1 then EnterShort(NextBar,AtOpen); semaforo1510 = -1; endif;
endif;
if (CompareTime(16, 10, 0) > 0) and (CompareTime(17,09, 0) < 0) then
if C > Miacondizione15 and semaforo1610 <> 1 then EnterLong(NextBar, AtOpen); semaforo1610 = 1; endif;
if C < Miacondizione16 and semaforo1610 <>-1 then EnterShort(NextBar,AtOpen); semaforo1610 = -1; endif;
endif;
if (CompareTime(17, 10, 0) > 0) and (CompareTime(17,30, 0) < 0) then
if C > Miacondizione17 and semaforo1710 <> 1 then EnterLong(NextBar, AtOpen); semaforo1710 = 1; endif;
if C < Miacondizione18 and semaforo1710 <>-1 then EnterShort(NextBar, AtOpen);semaforo1710 = -1; endif;
endif;
//************************************************** ************************************************** **************************************************
if t>=1732 then
if positiondir=1 then
exitlong(bar,atclose);
endif;
if positiondir=-1 then
exitshort(bar,atclose);
endif;
endif;
if lastbar = true then
Semaforo0910 = 0;
Semaforo1010 = 0;
semaforo1110 = 0;
Semaforo1210 = 0;
semaforo1310 = 0;
semaforo1410 = 0;
Semaforo1510 = 0;
semaforo1610 = 0;
semaforo1710 = 0;
endif;
Indzona1 = CreateViewport(100, 0, true);
//PlotChart (miacondizione1, 0, fuchsia, solid, 3);
PlotChart (valoreritracciamento, 0, black, solid, 2);
//PlotChart (e, 0, black, solid, 2);/QUOTE]

a me non sembra un gran che mi da risultati negativo sia a 1 2 o 5 minuti vedi sotto....

l'ultima esiste il ts laser pubblicato con le modifiche che ti sono state consigliate che mi piacerebbe provarlo?

per tutti.. vorrei provare un listato su frame a 5 minuti e 1 a un minuto dei tanti fatti... quale mi consigliate come il piu performante??

robom1 · 17 Febbraio 2009

// OpeningRangeBreakout
Var:YestHigh,YestLow,Stretch,Mult,EntryLongLevel,E ntryShortLevel;
installstoploss(INPERC, 1);
InstallTrailingProfitandreverse(Intick, 15,40,"STOP", CHECKmax + EXITONLYIFCLOSEON);
installtakeprofit(intick,75,"Take");
Mult=35;
YestHigh= Eod.h[0];
YestLow = Eod.l[0];

secondo me ad occhio ci va tra parentesi quadre 1 se si vuole il giorno precedente se ho ben capito

Stretch=(YestHigh-YestLow)* Mult /100;
EntryLongLevel = EOD.O-Stretch;
EntryShortLevel =EOD.O+Stretch;
if isfirstbarday
then enterlong(nextbar, EntryLongLevel,stop)OR
entershort(nextbar, EntryShortLevel,stop);endif;
if t>=1715 then
if positiondir=1 then
exitlong(nextbar,atopen);
endif;
if positiondir=-1 then
exitshort(nextbar,atopen);
endif;
endif;

santiago · 17 Febbraio 2009

robom1 ha scritto:
// OpeningRangeBreakout
secondo me ad occhio ci va tra parentesi quadre 1 se si vuole il giorno precedente se ho ben capito
//

Si avevo provato così, ma mi dà entrate contemporanee long-short sulla stessa barra, mentre così non capisco come entra, ma su 10 giorni sembra performare bene.

Clicca per allargare...

robom1 · 17 Febbraio 2009

x eracle sono entrate limit o stop? c'è qualcosa che non va o non ho capito.

santiago · 17 Febbraio 2009

robom1 ha scritto:
x eracle sono entrate limit o stop? c'è qualcosa che non va o non ho capito.

la mia intenzione era quella di farlo entrare al superamento di una certa percentuale rispetto al massimo o al minimo del range.

Eurofighter · 17 Febbraio 2009

solospread ha scritto:

Ho ricevuto un Mp da NIKITI che ringrazio per aver capito perfettamente qual'è lo spirito di questo thread.Dò seguito a una sintesi del messaggio ricevuto.
Vorrei sottoporti un semplice TS sviluppato sulla base del tuo oscillatore di pag. 231;Ho notato che utilizzandolo con il future MINY CRUDE OIL 0209 (ho anch'io Directa), specificando Nvolume come intervallo, si ottengono risultati interessanti.Ho giocato un po' con i parametri, per verificare l'andamento dei risultati al variare del range dell'oscillatore. Per questi test non ho impostato stop-loss.
Mi piacerebbe sapere se tali risultati sono frutto del caso, o se ne possiamo trarre qualche spunto interessante.

Se ritieni che il TS possa essere di qualche utilità puoi pubblicarlo nel thread senza problemi.
E dato che lo reputo molto interessante lo pubblico molto volentieri.

Codice:

{******************************************************************************
http://www.investireoggi.it/forum/costruzione-indicatore-per-analisi-ciclica-con-visual-trader-vt31296-211.html
Pag. 231 - 2304
// SoloSpread - OSCILLATORE MININI-MASSIMI
// SOTTOSTANTE SPMB FRAME 5 MINUTI
// INDIVIDUA MINIMI e MASSIMI CON PRECISIONE
Le variabili di input sono queste:
- Rientro_Dopo_Stop: se impostato a 0 evita il rientro in posizione dopo uno stopLoss, 1 altrimenti
 
- Range_Laterali: ampiezza bande superiori e inferiori dell'oscillatore
- StopLoss: percentuale StopLoss
******************************************************************************}
var:MIN,MAX,bb,CC,zona1,ValExit_Mio(0),SonoLong(false),SonoShort(false);
input: Rientro_Dopo_Stop(1), Range_Laterali(25), StopLoss;
Var: CambioTrend, DeviazioneOK(false), Stop_su_Long(false), Stop_su_Short(false);
RoundTickMin(true);
 
InstallStopLoss(INPERC, StopLoss, "=SL=");
//InstallTakeProfit(INPERC, StopLoss*2, "=TP=");
//InstallTrailingProfit(INPERC, StopLoss+0.1, StopLoss, "==", CHECKMIDDLE);  // Ov
 
If Rientro_Dopo_Stop <> 1 then
   //FileWriteDateHour("c:\prova.txt", false);
   //FileWriteStringVal2("c:\prova.txt", " - ValExit_Mio ", ValExit_Mio, " - ValExit ", ValExit, true);
   //FileWriteStringVal2("c:\prova.txt", " - SonoLong ", SonoLong, " - SonoShort ", SonoShort, true);
 
   if ValExit_Mio <> Valexit and SonoLong=true then
      ValExit_Mio = Valexit;
      Stop_su_Long=true;
    endif;
   if ValExit_Mio <> Valexit and SonoShort=true then
      ValExit_Mio = Valexit;
      Stop_su_Short=true;
   endif;
endif;
 
MIN = LLV(RSI(C,14,s),20) < Ref(LLV(RSI(C,14,s),20),2) AND LLV(RSI(C,14,s),20) < Range_Laterali;
MAX = HHV(RSI(C,14,s),20) > Ref(HHV(RSI(C,14,s),20),2) AND HHV(RSI(C,14,s),20) > (100-Range_Laterali);
 
if MIN = true and Stop_su_Long=false and positiondir<>1 then
   enterlong(nextbar, atopen);
   ValExit_Mio = ValExit;
   SonoLong=true;
   SonoShort=false;
   Stop_su_Short=false;
   bb =1;
else
   bb =0;
endif;
if MAX = TRUE and Stop_su_Short=false and positiondir<>-1 then
   entershort(nextbar, atopen);
   ValExit_Mio = ValExit;
   SonoShort=true;
   SonoLong=false;
   Stop_su_Long=false;
   CC =1;
else
   CC =0;
endif;
 
zona1=CreateViewport(300,true,true);
PlotChart(bb,zona1,blue,solid,1);
PlotChart(cc,zona1,red,solid,1);

mi da errore...
Errore di Sintassi in Riga n° 16: Errore durante il parse dell'espressione: ROUNDTICKMIN(TRUE).........

COSTRUZIONE INDICATORE PER ANALISI CICLICA CON VISUAL TRADER (1 Viewer)

lnanetti

Forumer storico

lnanetti

Forumer storico

solospread

Forumer storico

santiago

Nuovo forumer

lnanetti

Forumer storico

robom1

Forumer storico

santiago

Nuovo forumer

robom1

Forumer storico

santiago

Nuovo forumer

Eurofighter

Nuovo forumer

Users who are viewing this thread