COSTRUZIONE INDICATORE PER ANALISI CICLICA CON VISUAL TRADER

Ciao "solospread",
complimenti per la capacità nel programmare VT!!
Il sistema mi intriga molto....in particolare sul FIB.
Mi sono permesso di copiarlo su VT, ma vorrei chiederti come fare a far uscire i segnali LONG e SHORT (il rettangolino di allerta VT) ed eventualmente le freccine su/giù.

Grazie e buon trading :-)
K
 
karagnao ha scritto:
Ciao "solospread",
complimenti per la capacità nel programmare VT!!
Il sistema mi intriga molto....in particolare sul FIB.
Mi sono permesso di copiarlo su VT, ma vorrei chiederti come fare a far uscire i segnali LONG e SHORT (il rettangolino di allerta VT) ed eventualmente le freccine su/giù.

Grazie e buon trading :)
K
Clicca per allargare...

Quelle sono le Entrate che vengono codificate.
E' la parte piu' difficile da istruire perchè riprodurre quello che si vede non è sempre semplice.
In questo momento le entrate sono disattivate, perciò il TS non le segnala automaticamente.
Il BUY ed Il SELL (freccette rosse e verdi) le ho messe io manualmente.
Le trovi sulla sinistra dello schermo quando richiami un grafico sotto la voce " indicatori "
 
Candela nera oggi sul giornaliero.
Short su rottura confermata da prossima chiusura sotto 18190.

SHORT 18190.PNG
 
Proviamo a proiettare il TS sul mercato negli ultimi mesi.
Osservando il grafo sotto (fine febbraio fino ad oggi) le operazioni segnalate
hanno fruttato 2020 punti.
1 op LONG da 16870-17450 = +580
2 op SHORT da 17450-18295 = -845
3 op LONG da 18385-18210 = -175
4 op SHORT da 18210-17000 = 1210
5 op LONG da 17000 ad oggi = 1250
3 gain e 2 loss con un max draw down di 845 punti ( sarebbe da rivedere uno stop piu stretto)
La situazione attuale è la seguente:
SHORT sotto 18190
Proseguimento del LONG se non avviene la rottura confermata da una chiusura sotto quel livello
e conferma del trend positivo al superamento del massimo di ieri 18685.
Il colore della candela e la sua conformazione sono bruttine, ma una chiusura mensile dello S&P500
sopra 2056 (2065 la chiusura di ieri) dovrebbe portare nuova linfa per i longer.

SITUAZIONE.PNG
 
Metto il listato per Newmoon.
Puntatore segnaminimi per l'euro.
Funziona su tutti i frame.
Prova a testarlo e poi vediamo.
Codice: 
// TS-PUNTATORE SEGNAMINIMI BY SOLOSPREAD  OTTIMIZZATO PER EURO 5 MINUTI

Var: miomov1,miomax1,miomin1,AA,BB,CC,DD,VV,ZZ,HH,PP,MINIMI,QQ,KK;
var: mio1,tank,please,SDE,SDO,UU,miorsi1,SLOW,segnamassimi,miorsi2;
var: indzona1,indzona2,indzona3,INDZONA4,SEGNAMASSIMI;
var: PUNTATORESEGNAMINIMI,SEGNAMINIMI,media1,media2;
Var: mioosc3(0);
Var: mioosc1(0);
Var: mioosc2(0);
var: RA,RB,RC,RD,RCRD,TANK1,PLEASE1;
var: miorsi1,mioMOV1,mioMAX1,mioMIN1,AA,BB,CC,DD;
var: tank,please,VV,ZZ,HH,PP;
var: aaa,bbb,ccc,ddd,MIOMOV2,MIOMAX2,MIOMIN2;
var: A1,B1,C1,D1,minsegnamassimi;
var: maxsegnamassimi,minpuntatoresegnaminimi;
var: TREND,STREET,med,MAXIM,MM21;
var: slip,R2S,Mslip,MR2s,minimum;
var: Minder,dor, mder,mio8,mio9,der,maximum;
Var: entry1,entry2;
var: RA,RB,RC,RD,RCRD,TANK1,PLEASE1,START;
var: miorsi1,mioMOV1,mioMAX1,mioMIN1,AA,BB,CC,DD;
var: tank,please,VV,ZZ,HH,PP,new,love;
var: aaa,bbb,ccc,ddd,MIOMOV2,MIOMAX2,MIOMIN2;
var: A1,B1,C1,D1,minsegnamassimi,su,giu,VA,TA;
var: maxsegnamassimi,minpuntatoresegnaminimi;
var: TREND,STREET,med,MmM,mio99,a12,a13,IN,TY,VO,vi,fi;
var: slip,R2S,Mslip,MR2s,minimum,maximum,lungo,corto;
var: MIN1,MAX1,bb1,CC1,MAXIM,MINI,STOPlong,STOPshort;
var: DER,MDER,minDER,DOR,mio8,mio9,Love,INGRESSOS,INGRESSOL;
Var: daquantebarre1,daquantebarre2,stop1,MEDI,MM21,VE;

mioRSI1 = RSI(C,14,s); //RSI da usare suframe 5 minuti
mioRSI2 = RSI(C,21,s); // RSI da usare su frame giornaliero
MM21 = MOV(C,21,e);

mioMOV1 = MOV(mioRSI1,3,s);
mioMAX1 = HHV(mioRSI1,30);
mioMIN1 = LLV(mioRSI1,30);

miomax2 = HHV(H,30);
miomin2 = LLv(L,30);
miomov2 = MOV(C,3,s);

// BANDE DI SOLOSPREAD
AA = ((miomax1 - C)+ (miomov1)*miomax1)/H;
BB = ((miomin1 - C)+ (miomov1)*miomin1)/L;
CC = (miomax1- miomov1)+ (C * miomax1)/(C);
DD = (miomin1 - miomov1)+ ( C *miomin1)/(C);

//BANDE MODIFICATE CON RSI
AAA = ((mioMAX1 - mioRSI1) + (mioMOV1)*mioMAX2)/H;
BBB = ((mioMIN1 - mioRSI1) + (mioMOV1)*mioMIN2)/L;
CCC = (miomax1- miomov1)+ (mioRSI1 * miomax2)/C;
DDD = (miomin1 - miomov1)+ ( mioRSI1 *miomin2)/C;


a1 =aa+aaa;
b1=bb+bbb;
c1 =cc+ccc;
d1 = dd+ddd;

TANK = MOV(A1,3,s);
PLEASE = MOV(B1,3,s);

VV = (CC-AA);
ZZ = (BB-DD);
HH = VV-ZZ;
PP = tank - please;


media1 = MOV(C, 10, S);
media2 = MOV(C,50,s);


// BOLLINGER
mioosc2 = BBandLower (C, 20, 4, 0);
mioosc1 = BBandUpper (C, 20, 4, 0);
mioosc3 = BBandCenter (C, 20, 4, 0);



miomax1 = HHV(H,30);
miomin1 = LLV(L,30);
miomov1 = MOV(C,3,s);
RA = ((miomax1 - C)+ (miomov1)*miomax1)/H;
RB = ((miomin1 - C)+ (miomov1)*miomin1)/L;
RC = (miomax1- miomov1)+ (C * miomax1)/(C);
RCRD = (miomin1 - miomov1)+ ( C *miomin1)/(C);

tank1 = MOV(RA,3,s);
please1 = MOV(RB,3,s);


QQ = (RC-RA)/please1;
KK = (mioosc1-RB)/tank1;
med = (miomax2-miomin2)/2 + miomin2;

PUNTATORESEGNAMINIMI = (100/( miorsi1+(qq-kk))+48); // MOTORE
SEGNAMASSIMI = (a1/c1);

slip = (segnamassimi/puntatoresegnaminimi)* 2.5;  // VARIARE IL 2.5 PER OTTIMIZZARLO CON ALTRI FRAME
r2s =  (PUNTATORESEGNAMINIMI/SEGNAMASSIMI);
Mslip = LLV(slip,15);
Mr2s = HHV(r2s,15);

if slip = Mslip and slip < slip[1] and (Mr2s -Mslip)> 2 and puntatoresegnaminimi < puntatoresegnaminimi[1]  then colorbar(blue); minimum = 10; else minimum = 0; endif;
if r2s = mr2s and r2s > r2s[1] and (Mr2s -Mslip)> 2 and puntatoresegnaminimi < puntatoresegnaminimi[1]  then colorbar(blue); minimum = 10 ; else minimum = 0; endif;
// if slip >= R2s then maxim = 10; else maxim = 0; endif;
// if (R2S - slip) < 0.2 then maxim = 10; else maxim = 0; endif; // VARIARE LO 0.2 PER PTTIMIZZARLO CON ALTRI FRAME

DER = (AA-BB)+48;
MDER = HHV(DER,10);
minDER =LLV(DER,10);

if puntatoresegnaminimi < 50 and puntatoresegnaminimi[2] > puntatoresegnaminimi[1] and puntatoresegnaminimi >= puntatoresegnaminimi[1]
and DER[1] = MDER and  DER <= DER[1] then colorbar(black); DOR = 10; else DOR = 0; endif;
if H[1] = miomax1 and puntatoresegnaminimi[1] < 50 and puntatoresegnaminimi > puntatoresegnaminimi[1] and H < H[1] and DER < DER[1] then colorbar(black); mio9 = 10; else mio9 = 0; endif;
if L[1] = miomin1 and puntatoresegnaminimi[1] > 51 and puntatoresegnaminimi < puntatoresegnaminimi[1] and L > L[1] and DER > DER[1] then colorbar(blue); mio8 = 10; else mio8 = 0; endif;
if slip >= R2s then colorbar(black) ;maximum = 10; else maximum = 0; endif;
if (R2S - slip) < 0.08 then colorbar(black) ;maximum = 10; else maximum = 0; endif;
DER = (AA-BB)+48;
MDER = HHV(DER,10);
minDER =LLV(DER,10);
A12 = HHV(H,5);
A13 = LLV(L,5);

if puntatoresegnaminimi < 50 and puntatoresegnaminimi[2] > puntatoresegnaminimi[1] and puntatoresegnaminimi >= puntatoresegnaminimi[1]
   and DER[1] = MDER and  DER <= DER[1]  then DOR = 10; else DOR = 0; endif;
if H[1] = miomax1 and puntatoresegnaminimi[1] < 50 and puntatoresegnaminimi > puntatoresegnaminimi[1] and H < H[1] and DER < DER[1] then mio9 = 10; else mio9 = 0; endif;
if L[1] = miomin1 and puntatoresegnaminimi[1] > 51 and puntatoresegnaminimi < puntatoresegnaminimi[1] and L > L[1] and DER > DER[1]   then mio8 = 10; else mio8 = 0; endif;

if MINIMUM = 10  then colorbar(blue);INGRESSOL = H; endif;
if MIO8 = 10  then  colorbar(blue);  INGRESSOL = H; endif;
if mio9 = 10  then  colorbar(black); INGRESSOS = L; endif;
if maximum = 10 then colorbar(black); INGRESSOS = L; endif;
if DOR = 10  then colorbar(black); INGRESSOS = L;  endif;

if minimum = 10 then STOPlong = A13; endif;
if Mio8 = 10  then STOPlong = A13;  endif;
if Mio9 = 10 then STOPshort = A12; endif;
if maximum = 10  then STOPshort = A12; endif;
if DOR = 10 then STOPshort = A12; endif;
if mini = 10 then Lungo = 10; else Lungo = 0; endif;
if MmM = 10 then  Lungo = 10; else Lungo = 0; endif;
if Mio99 = 10 then corto = 10; else Corto = 0; endif;
if New = 10   then corto = 10; else Corto = 0; endif;
if Love = 10 then corto = 10; else Corto = 0; endif;
daquantebarre1 = MRO(corto = 10,1);
daquantebarre2 = MRO(lungo = 10,1);

MEDI = (STOPSHORT-STOPLONG)/2 + STOPLONG;
////////////////////////////////////////////////////////////////////////////////////////

if crossover(MM21,STOPSHORT)then colorbar(FUCHSIA);   IN = 10; else IN = 0; endif;
if crossover(MM21,INGRESSOS)  then colorbar(FUCHSIA) ; SU = 10; else SU = 0; endif;
if crossover(MM21,MEDI) then colorbar(FUCHSIA); TY = 10; else TY = 0; endif;
if crossover(MM21,INGRESSOL)then colorbar(FUCHSIA); TA = 10; else TA = 0; endif;
if crossover(MM21,STOPLONG)then colorbar(FUCHSIA); VI = 10; else VI = 0; endif;
if crossunder(MM21,ingressoS)then colorbar(FUCHSIA); giu = 10; else giu = 0; endif;
if crossunder(MM21,medi) then colorbar(FUCHSIA);  VA = 10; else VA = 0; endif;
if crossunder(MM21,STOPLONG)  then colorbar(FUCHSIA); VO = 10; else VO = 0; endif;
if crossunder(MM21,INGRESSOL) then colorbar(FUCHSIA); VE = 10; else VE = 0; endif;
if crossunder(MM21,STOPSHORT) then colorbar(FUCHSIA); FI = 10; else FI = 0; endif;
if maximum = 10 then START = 20; else START = 0; endif;
if mio8 = 10 then START = 20; else START = 0; endif;
if mio9 = 10 then START = 20; else START = 0; endif;
if dor = 10  then START = 20; else START = 0; endif;
if in = 10   then START = 20; else START = 0; endif;
if su = 10   then START = 20; else START = 0; endif;
if ta = 10   then START = 20; else START = 0; endif;
if ty = 10   then START = 20; else START = 0; endif;
if vi = 10   then START = 20; else START = 0; endif;
if giu = 10  then START = 20; else START = 0; endif;
if va = 10   then START = 20; else START = 0; endif;
if vo = 10   then START = 20; else START = 0; endif;
if ve = 10   then START = 20; else START = 0; endif;
if fi = 10   then START = 20; else START = 0; endif;

if START = 20 then entry1 = H; endif;
if START = 20 then entry2 = L; endif;






indzona1 = createviewport(200,true,true);
indzona2 = createviewport(200,true,true);
indzona3 = createviewport(200,true,true);
indzona4 = CreateViewport(200,true,true);



//DrawHLine (NEWOGG,0,new,fuchsia, 1, 0);
//DrawHLine (NEWOGG,0,new1,fuchsia, 1, 0);
//plotchart (puntatoreSEGNAMINIMI,indzona1,black,solid,1);
//plotchart (puntatoreSEGNAMINIMI,indzona1,black,istogramma,1);

//plotchart (INGRESSOL,0,blue,solid,2);
//plotchart (INGRESSOS,0,red,solid,2);
//plotchart (STOPlong,0,black,solid,2);
//plotchart (STOPshort,0,black,solid,2);
//plotchart (MEDI,0,fuchsia,solid,1);


//plotchart (mioosc1,0,blue,solid,1);
//plotchart (mioosc2,0,red,solid,1);

//plotchart (minimum,indzona1,blue,solid,1);
//plotchart (Mio8,indzona1,blue,solid,1);

//plotchart (MmM,indzona1,red,solid,1);

//plotchart (GIU,indzona1,blue,solid,1);
//plotchart (VA,indzona1,RED,solid,1);
//plotchart (VO,indzona1,BLACK,solid,1);
//plotchart (TA,indzona1,FUCHSIA,solid,1);
//plotchart (VI,indzona1,GREEN,solid,1);
//plotchart (SLIP,indzona3,blue,solid,1);
//plotchart (R2S,indzona3,red,solid,1);
//plotchart (MR2S,indzona3,black,solid,1);
//plotchart (MSLIP,indzona3,black,solid,1);
//plotchart (IN,indzona2,blue,solid,1);
//plotchart (SU,indzona2,RED,solid,1);
//plotchart (TY,indzona2,blACK,solid,1);
//plotchart (VE,indzona2,FUCHSIA,solid,1);
//plotchart (FI,indzona2,GREEN,solid,1);

//plotchart (maximum,indzona2,blue,solid,1);
//plotchart (mio9,indzona2,red,solid,1);
//plotchart (DOR,indzona2,blue,solid,1);
 
Metto il listato per Newmoon.
Puntatore segnaminimi per l'euro.
Funziona su tutti i frame.
Prova a testarlo e poi vediamo.

hai già fatto, solos. veramente impagabile, grazie davvero.
scarico il TS e lo testo per un pò, sarà comunque di grande aiuto.
 
Non sono medie mobili ma surrogati ultrareattivi.
Da usare come conferma dei segnali ( se arriva la candela colorata con l'incrocio subito dopo).
Le ho addolcite con una mm3 ed adattate per il FIB.
Molto validi su grafici giornalieri.

ADATTATE.PNG
 
You must log in or register to reply here.

Similar threads

Programmazione Visual Trader Domanda su Visual Trader
Risposte
0
Visite
1.628
abura1975
kenshiro
Indicatore Ciclico Visual trader
Risposte
0
Visite
1.564
kenshiro
kenshiro
Visual trader
2 3 4
Risposte
36
Visite
10.694
Lukiano
Costruzione indicatore assoluto di ciclo in VT
Risposte
6
Visite
4.815
nick512
ender85
Programmazione Visual Trader Supertrend per Visual trader (simile a Prorealtime)
5 6 7 8 9
Risposte
85
Visite
58.690
mephysto

Users who are viewing this thread

Total: 1 (members: 0, guests: 1)
Back
Alto