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

karagnao

karagnao

Tought ain't enough
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
 
solospread

solospread

Forumer storico
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 "
 
solospread

solospread

Forumer storico
Candela nera oggi sul giornaliero.
Short su rottura confermata da prossima chiusura sotto 18190.

SHORT 18190.PNG
 
solospread

solospread

Forumer storico
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
 
solospread

solospread

Forumer storico
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);
 
newmoon

newmoon

Forumer attivo
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.
 
solospread

solospread

Forumer storico
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.

Users who are viewing this thread

Total: 2 (members: 0, guests: 2)
Alto