COSTRUZIONE INDICATORE PER ANALISI CICLICA CON VISUAL TRADER

Ciclone ha sentito da qualche parte che c'è un trader che prende il prezzo di chiusura delle 9,10-10,10-11,10 ecc.................. e lo usa come pivot. Ecco che abbiamo messo in codice per VT questa teoria. Il livello di pivot ha valenza per 1 ora dopodichè entra il nuovo pivot dell'ora successiva. si và long al suo superamento e short viceversa. Dal livello ho messo 30 pt di distanza sia in sù che in giù per evitare continue entrate ed uscite. Il frame da utilizzare è 1minuto ed il contratto è il vecchio FIB o MINI. Posto il listato:
///////////////////////////////////////////////////////////////////////////////////////
Codice:
Var: miavar(0), Miacondizione1,Miacondizione2,miacondizione3,Miacondizione4,Miacondizione5,Miacondizione6;
Var: Miacondizione7,Miacondizione8, Miacondizione9,Miacondizione10, Miacondizione11,Miacondizione12, Miacondizione13,Miacondizione14;
Var: Miacondizione15,Miacondizione16,Miacondizione17,miacondizione18;
    if T = 0910 then
    Miacondizione1 = C+30;endif;
    if T = 0910 then
    Miacondizione2 = C-30; endif;
    if T = 1010 then
    Miacondizione3 = C+30;endif;
    if T = 1010 then
    Miacondizione4 = C-30; endif;
    if T = 1110 then
    Miacondizione5 = C+30;endif;
    if T = 1110 then
    Miacondizione6 = C-30; endif;
     if T =1210 then
    Miacondizione7 = C+30;endif;
    if T = 1210 then
    Miacondizione8 = C-30; endif;
    if T = 1310 then
    Miacondizione9 = C+30;endif;
    if T = 1310 then
    Miacondizione10 = C-30; endif;
    if T = 1410 then
    Miacondizione11 = C+30;endif;
    if T = 1410 then
    Miacondizione12 = C-30; endif;
     if T =1510 then
    Miacondizione13 = C+30;endif;
    if T = 1510 then
    Miacondizione14 = C-30; endif;
    if T = 1610 then
    Miacondizione15 = C+30;endif;
    if T = 1610 then
    Miacondizione16 = C-30; endif;
    if T = 1710 then
    Miacondizione17 = C+30;endif;
    if T = 1710 then
    Miacondizione18 = C-30; endif;
////////////////////////////////////////////////////////////////////////////////
  if (CompareTime(09, 10, 0) > 0) and (CompareTime(10,09, 0) < 0) then
  if C > Miacondizione1 then
    EnterLong(NextBar, AtOpen);
  endif; endif;

 if (CompareTime(09, 10, 0) > 0) and (CompareTime(10,09, 0) < 0) then
 if C < Miacondizione2 then
    EnterShort(NextBar, AtOpen);
  endif;endif;

   if (CompareTime(10, 10, 0) > 0) and (CompareTime(11,09, 0) < 0) then
  if C > Miacondizione3 then
    EnterLong(NextBar, AtOpen);
  endif; endif;

 if (CompareTime(10, 10, 0) > 0) and (CompareTime(11, 09, 0) < 0) then
 if C < Miacondizione4 then
    EnterShort(NextBar, AtOpen);
  endif;endif;
  
  if (CompareTime(11, 10, 0) > 0) and (CompareTime(12,09, 0) < 0) then
  if (C > Miacondizione5) then
    EnterLong(NextBar, AtOpen);
  endif; endif;

 if (CompareTime(11, 10, 0) > 0) and (CompareTime(12, 09, 0) < 0) then
 if  (C < Miacondizione6) then
      EnterShort(NextBar, AtOpen);
  endif;endif;

    if (CompareTime(12, 10, 0) > 0) and (CompareTime(13,09, 0) < 0) then
  if (C > Miacondizione7) then
    EnterLong(NextBar, AtOpen);
  endif; endif;

 if (CompareTime(12, 10, 0) > 0) and (CompareTime(13, 09, 0) < 0) then
 if  (C < Miacondizione8) then
      EnterShort(NextBar, AtOpen);
  endif;endif;
     if (CompareTime(13, 10, 0) > 0) and (CompareTime(14,09, 0) < 0) then
  if (C > Miacondizione9) then
    EnterLong(NextBar, AtOpen);
  endif; endif;

 if (CompareTime(13, 10, 0) > 0) and (CompareTime(14, 09, 0) < 0) then
 if  (C < Miacondizione10) then
      EnterShort(NextBar, AtOpen);
  endif;endif;

    if (CompareTime(14, 10, 0) > 0) and (CompareTime(15,09, 0) < 0) then
  if (C > Miacondizione11) then
    EnterLong(NextBar, AtOpen);
  endif; endif;

 if (CompareTime(14, 10, 0) > 0) and (CompareTime(15, 09, 0) < 0) then
 if  (C < Miacondizione12) then
      EnterShort(NextBar, AtOpen);
  endif;endif;
    if (CompareTime(15, 10, 0) > 0) and (CompareTime(16,09, 0) < 0) then
  if (C > Miacondizione13) then
    EnterLong(NextBar, AtOpen);
  endif; endif;

 if (CompareTime(15, 10, 0) > 0) and (CompareTime(16, 09, 0) < 0) then
 if  (C < Miacondizione14) then
      EnterShort(NextBar, AtOpen);
  endif;endif;
     if (CompareTime(16, 10, 0) > 0) and (CompareTime(17,09, 0) < 0) then
  if (C > Miacondizione15) then
    EnterLong(NextBar, AtOpen);
  endif; endif;

 if (CompareTime(16, 10, 0) > 0) and (CompareTime(17, 09, 0) < 0) then
 if  (C < Miacondizione16) then
      EnterShort(NextBar, AtOpen);
  endif;endif;

    if (CompareTime(17, 10, 0) > 0) and (CompareTime(17,30, 0) < 0) then
  if (C > Miacondizione17) then
    EnterLong(NextBar, AtOpen);
  endif; endif;

 if (CompareTime(17, 10, 0) > 0) and (CompareTime(17, 30, 0) < 0) then
 if  (C < Miacondizione18) then
      EnterShort(NextBar, AtOpen);
  endif;endif;
installtrailingprofit (inperc,1.4,0.2,trailing);
//installstoploss(inperc,0.5) ;
//installtakeprofit(inperc,2);/CODE]
 
Ciao solospread, l'ultimo TS TESTER sembra andare meglio degli altri sul 5 minuti, a 6 mesi ha fatto un 52%, c'è solo una differenza che i long hanno fatto solo un 3.6% il resto della performance è per lo short con 45,66%, se si riuscisse a colmare questa differenza il gain aumenterebbe notevolmente.
Altra cosa hai detto che il TS TESTER è tarato per il futures nostrano visto che vorrei provarlo sui fut. USA e tu hai detto che bisogna variare lo stop ho guardato il listato ma mi pare che gli stop siano un bel numero, mi spiegheresti quali sono da variare così provo vari parametri per vedere se si riesce ad adattarlo anche a loro.
Grazie cmq per il tuo continuo lavoro sui TS.
;)
 
Ho aggiunto anche sul TS TESTER i pivot e le medie mobili così ci sono più aiuti per cercare di fare punti. :)

TESTER.jpg
 
Ciao solospread, l'ultimo TS TESTER sembra andare meglio degli altri sul 5 minuti, a 6 mesi ha fatto un 52%, c'è solo una differenza che i long hanno fatto solo un 3.6% il resto della performance è per lo short con 45,66%, se si riuscisse a colmare questa differenza il gain aumenterebbe notevolmente.
Altra cosa hai detto che il TS TESTER è tarato per il futures nostrano visto che vorrei provarlo sui fut. USA e tu hai detto che bisogna variare lo stop ho guardato il listato ma mi pare che gli stop siano un bel numero, mi spiegheresti quali sono da variare così provo vari parametri per vedere se si riesce ad adattarlo anche a loro.
Grazie cmq per il tuo continuo lavoro sui TS.
;)
Ciao Anonimus. I parametri da cambiare se vuoi utilizzarlo per i future americani sono quelli relativi alla variabile STOP. Come puoi notare per ogni STOP trovi ad es: if C <C[1] and c[1]<c[2] then
STOP = (h +40); endif;
Devi giocare sul +40 trovando il numero piu appropriato. Se vuoi applicarlo al miniS&P dovrai mettere (cosi a spanne poi devi provare quello che và meglio)+2 o +3 e di conseguenza devi adattare tutti gli altri valori di STOP. Io per il fib ci ho perso un pomeriggio piovoso, penso che un pò di tempo lo devi dedicare prima di trovare i parametri migliori. Magari anche per il fib provando meglio si possono trovarne di migliori di quelli che ho messo io.
 
Ciao Anonimus. I parametri da cambiare se vuoi utilizzarlo per i future americani sono quelli relativi alla variabile STOP. Come puoi notare per ogni STOP trovi ad es: if C <C[1] and c[1]<c[2] then
STOP = (h +40); endif;
Devi giocare sul +40 trovando il numero piu appropriato. Se vuoi applicarlo al miniS&P dovrai mettere (cosi a spanne poi devi provare quello che và meglio)+2 o +3 e di conseguenza devi adattare tutti gli altri valori di STOP. Io per il fib ci ho perso un pomeriggio piovoso, penso che un pò di tempo lo devi dedicare prima di trovare i parametri migliori. Magari anche per il fib provando meglio si possono trovarne di migliori di quelli che ho messo io.

ok capito, ancora una cosa sono da variare anche gli STOP = 1-20 cioè tutti gli STOP con il meno fino a 130 o solo quelli con il +?
;)
 
per chi fosse intressato a mettere i pivot sul TS TESTER basta aggiungere il listato sotto la Var: NNNss,vel1,HHKK,pi,SOP,MQQ;

Var: previousH,previousL,previousC,
Pivot,R1,S1, R1mid,S1mid, prova, cambiatogiorno,
lin1,lin2,lin3,lin4,lin5,
indperiodo, numper, ggini, primavolta(-1);
////////////////////////////////////////////////////////////////////////////////
previousH=EOD.H[1];
previousL=EOD.L[1];
previousC=EOD.C[1];
cambiatogiorno = GetValues(days, 1, prova, prova, prova, prova);
// Calcola Pivot
R1=(2*Pivot)-previousL;
Pivot=(previousH+previousC+previousL)/3;
S1=(2*Pivot)-previousH;
R1mid=(R1+pivot)/2;
S1mid=(S1+pivot)/2;
if cambiatogiorno then
// Termina le linee precedenti qui, Crea nuove Linee per il prossimo Giorno
lin1 = CREATEOGG;
lin2 = CREATEOGG;
lin3 = CREATEOGG;
lin4 = CREATEOGG;
lin5 = CREATEOGG;
indperiodo = 0;
ggini = GetDate;
// da dove parto a tracciare la linea orizzontale
primavolta = false;
endif;
indperiodo = indperiodo + 1;
numper = indperiodo;
// Disegna Linee orizzontali lunghe solo in quel giorno
lin1 = drawhlineper(lin1,0,ggini, r1, numper, fuchsia,2,0);
lin2 = drawhlineper(lin2,0,ggini, Pivot, numper, blue,2,0);
lin3 = drawhlineper(lin3,0,ggini, s1, numper, black,2,0);
lin4 = drawhlineper (lin4,0,ggini, R1mid, numper, fuchsia,2,2);
lin5 = drawhlineper (lin5,0,ggini, S1mid, numper, black,2,2);
////////////////////////////////////////////////////////////////////////////////
 
Bene almeno capisco cosa vado a variare :D, ancora una cosa come ti dicevo c'è un abisso tra le percentuali + dei long solo +6% e gli short +45%, dove si potrebbe fare delle variazioni per alzare la percentuale + dei long?
:rolleyes:
Adesso ci butto un occhio. bisogna però tener presente che sono diversi mesi che il trend è negativo ed ovviamente i punti si fanno IN-TREND e non contro. Comunque faccio un controllo per vedere cosa si può migliorare. La cosa più importante però è il Draw down. Quanto fà il max DD in 6 mesi?
 
Anche oggi Tester superstar. Mercato laterale per gran parte della giornata e l'unico trade valido se l'è fatto tutto. Oggi è stato molto utile la variabile STOP che non ha permesso al TS di uscire nel ritracciamento finale e rimanere quindi in posizione per il seguente recupero. Gain di oggi +350 punti circa.

ScreenHunter_01 Dec. 18 18.26.gif


ScreenHunter_02 Dec. 18 18.26.gif


ScreenHunter_04 Dec. 18 18.27.gif
 

Users who are viewing this thread

Back
Alto