Codice Regolo per Metastock (1 Viewer)

Pic

Nuovo forumer
Non riesco a trovare sul forum un vecchio post che
traduceva per Metastock i codici di regolo

qualcuno può postarli?
si riesce ad adattare anche
regolo T?

grazie
 
Taz

Taz

Nuovo forumer
Pic ha scritto:
Non riesco a trovare sul forum un vecchio post che
traduceva per Metastock i codici di regolo

qualcuno può postarli?
si riesce ad adattare anche
regolo T?

grazie
Clicca per allargare...

Ciao li stò mettendo a posto ( per l'ennesima volta ) appena posso li posterò ( T compreso )
Taz
 
Taz

Taz

Nuovo forumer
Pic ha scritto:
Non riesco a trovare sul forum un vecchio post che
traduceva per Metastock i codici di regolo

qualcuno può postarli?
si riesce ad adattare anche
regolo T?

grazie
Clicca per allargare...

Questo è il codice che mi sono tradotto, non quello precedentemente postato dal Team ( comunque funziona )
1- f Regolo B condition

{ f Regolo B }
IDCH:= ((0.5+(1.35/2))*Mov(H,10,S)) + ((0.5-( 1.35 /2))*Mov(L,10,S));
IDCL:= ((0.5-( 1.35 /2))*Mov(H,10,S)) + ((0.5+( 1.35 /2))*Mov(L,10,S)) ;
IDCM:= Mov(C,35,S) ;
IDC:=If(IDCM< IDCH AND IDCM> IDCL,0,1);
{f Regolo B MACD Buy 1 ; Sell -1 }
fMACD:=Mov(C,13,E)-Mov(C,23,E)-Mov(Mov(C,13,E)-Mov(C,23,E),9,E) ;
MACDSign:= If(fMACD>0,1,-1) ;
{f Regolo B condition Buy 1 ; Sell -1 }
KeltnerL:= ((0.5-( 0.95 /2))*Mov(H,10,S)) + ((0.5+( 0.95 /2))*Mov(L,10,S)) ;
KeltnerH:= ((0.5+(0.95/2))*Mov(H,10,S)) + ((0.5-( 0.95 /2))*Mov(L,10,S)) ;
Keltsign:= If(C>KeltnerH,1, If(C<KeltnerL,-1,PREV));

COND:= If(IDC = 0 ,PREV, If(MACDSign<>Keltsign,PREV ,MACDSign));
COND

-----------------------------------------------------------------------------------
1- f Regolo T condition
COND:=
If( Fml("f Regolo Piramiding")=1,1,
If( Fml("f Regolo Piramiding")=-1,-1,
If( Fml("f BOLF condition") =1,1,
If( Fml("f BOLF condition") =-1,-1,0))));

COND
---------------------------------------------------------------------------------
1- f Regolo Piramiding
{ Buy 1 ; Sell -1 }
{condizioni di Regolo BA }
RegBCOND:= FmlVar("f Regolo B Condition","COND") ; {stato di Regolo B ( 1 LONG -1 SHORT ) }
{condizioni di Piramiding }
SmooCanale:= If( IsUndefined(Ref(C,-1)), C , (((2/(20+1))*(C-PREV))+PREV)) ;
ELmL:= SmooCanale *(1-( 6/100)) ;
ELmH := SmooCanale *(1+( 6/100)) ;
EL := If( Mov(c,80,s) < ELmL,1 , If(Mov(c,80,s) > ELmH , -1 , 0 )) ;
SmooLent:= If( IsUndefined(Ref(C,-1)), C , (2/(50+1))*(c-PREV)+PREV) ;
Momento:= (SmooLent / Ref(SmooLent ,-9) -1)*100;
FL:= If(Momento > 2.5, 1 , If( Momento < -2.5, -1, 0 )) ;
COND:=
If(RegBCOND = EL AND RegBCOND = FL , RegBCOND,0 ) ;
COND

----------------------------------------------------------------------------------
4- f BOLF condition
{ Buy 1 ; Sell -1 }
BOL:= FmlVar("f BOL condition","COND") ;
RegB:= FmlVar("f Regolo B condition","COND") ;
COND:=If(BOL=RegB,RegB,0);
COND

---------------------------------------------------------------------------------
4- f BOL condition
{ Buy 1 ; Sell -1 }
KeltnerL:= ((0.5-( 1.55 /2))*Mov(H,10,S)) + ((0.5+( 1.55 /2))*Mov(L,10,S)) ;
KeltnerH:= ((0.5+(1.55/2))*Mov(H,10,S)) + ((0.5-( 1.55 /2))*Mov(L,10,S)) ;
{condizioni di BOL }
IDCH:= ((0.5+(4.9/2))*Mov(H,10,S)) + ((0.5-( 4.9 /2))*Mov(L,10,S)) ;
IDCL:= ((0.5-( 4.9 /2))*Mov(H,10,S)) + ((0.5+( 4.9 /2))*Mov(L,10,S)) ;
IDC:=If(Mov(C,35,S)> IDCH OR Mov(C,35,S)< IDCL,1,0);
COND:= If(IDC =0,
If(Ref(C,-1)<Ref(KeltnerL,-1) AND C>KeltnerL ,1 ,
If(Ref(C,-1)>Ref(KeltnerH,-1) AND C<KeltnerH ,-1 , PREV)),0);

COND

Ciao Taz
 

Pic

Nuovo forumer
Taz ha scritto:
Pic ha scritto:
Non riesco a trovare sul forum un vecchio post che
traduceva per Metastock i codici di regolo

qualcuno può postarli?
si riesce ad adattare anche
regolo T?

grazie
Clicca per allargare...

Questo è il codice che mi sono tradotto, non quello precedentemente postato dal Team ( comunque funziona )
1- f Regolo B condition

{ f Regolo B }
IDCH:= ((0.5+(1.35/2))*Mov(H,10,S)) + ((0.5-( 1.35 /2))*Mov(L,10,S));
IDCL:= ((0.5-( 1.35 /2))*Mov(H,10,S)) + ((0.5+( 1.35 /2))*Mov(L,10,S)) ;
IDCM:= Mov(C,35,S) ;
IDC:=If(IDCM< IDCH AND IDCM> IDCL,0,1);
{f Regolo B MACD Buy 1 ; Sell -1 }
fMACD:=Mov(C,13,E)-Mov(C,23,E)-Mov(Mov(C,13,E)-Mov(C,23,E),9,E) ;
MACDSign:= If(fMACD>0,1,-1) ;
{f Regolo B condition Buy 1 ; Sell -1 }
KeltnerL:= ((0.5-( 0.95 /2))*Mov(H,10,S)) + ((0.5+( 0.95 /2))*Mov(L,10,S)) ;
KeltnerH:= ((0.5+(0.95/2))*Mov(H,10,S)) + ((0.5-( 0.95 /2))*Mov(L,10,S)) ;
Keltsign:= If(C>KeltnerH,1, If(C<KeltnerL,-1,PREV));

COND:= If(IDC = 0 ,PREV, If(MACDSign<>Keltsign,PREV ,MACDSign));
COND

-----------------------------------------------------------------------------------
1- f Regolo T condition
COND:=
If( Fml("f Regolo Piramiding")=1,1,
If( Fml("f Regolo Piramiding")=-1,-1,
If( Fml("f BOLF condition") =1,1,
If( Fml("f BOLF condition") =-1,-1,0))));

COND
---------------------------------------------------------------------------------
1- f Regolo Piramiding
{ Buy 1 ; Sell -1 }
{condizioni di Regolo BA }
RegBCOND:= FmlVar("f Regolo B Condition","COND") ; {stato di Regolo B ( 1 LONG -1 SHORT ) }
{condizioni di Piramiding }
SmooCanale:= If( IsUndefined(Ref(C,-1)), C , (((2/(20+1))*(C-PREV))+PREV)) ;
ELmL:= SmooCanale *(1-( 6/100)) ;
ELmH := SmooCanale *(1+( 6/100)) ;
EL := If( Mov(c,80,s) < ELmL,1 , If(Mov(c,80,s) > ELmH , -1 , 0 )) ;
SmooLent:= If( IsUndefined(Ref(C,-1)), C , (2/(50+1))*(c-PREV)+PREV) ;
Momento:= (SmooLent / Ref(SmooLent ,-9) -1)*100;
FL:= If(Momento > 2.5, 1 , If( Momento < -2.5, -1, 0 )) ;
COND:=
If(RegBCOND = EL AND RegBCOND = FL , RegBCOND,0 ) ;
COND

----------------------------------------------------------------------------------
4- f BOLF condition
{ Buy 1 ; Sell -1 }
BOL:= FmlVar("f BOL condition","COND") ;
RegB:= FmlVar("f Regolo B condition","COND") ;
COND:=If(BOL=RegB,RegB,0);
COND

---------------------------------------------------------------------------------
4- f BOL condition
{ Buy 1 ; Sell -1 }
KeltnerL:= ((0.5-( 1.55 /2))*Mov(H,10,S)) + ((0.5+( 1.55 /2))*Mov(L,10,S)) ;
KeltnerH:= ((0.5+(1.55/2))*Mov(H,10,S)) + ((0.5-( 1.55 /2))*Mov(L,10,S)) ;
{condizioni di BOL }
IDCH:= ((0.5+(4.9/2))*Mov(H,10,S)) + ((0.5-( 4.9 /2))*Mov(L,10,S)) ;
IDCL:= ((0.5-( 4.9 /2))*Mov(H,10,S)) + ((0.5+( 4.9 /2))*Mov(L,10,S)) ;
IDC:=If(Mov(C,35,S)> IDCH OR Mov(C,35,S)< IDCL,1,0);
COND:= If(IDC =0,
If(Ref(C,-1)<Ref(KeltnerL,-1) AND C>KeltnerL ,1 ,
If(Ref(C,-1)>Ref(KeltnerH,-1) AND C<KeltnerH ,-1 , PREV)),0);

COND

Ciao Taz
Clicca per allargare...

ti ringrazio della sollecitudine
ma ti volevo chiedere:
come li devo incollare i codici sul
Metastock?
 
Taz

Taz

Nuovo forumer
Pic ha scritto:
Taz ha scritto:
Pic ha scritto:
Non riesco a trovare sul forum un vecchio post che
traduceva per Metastock i codici di regolo

qualcuno può postarli?
si riesce ad adattare anche
regolo T?

grazie
Clicca per allargare...

Questo è il codice che mi sono tradotto, non quello precedentemente postato dal Team ( comunque funziona )


Ciao Taz
Clicca per allargare...

ti ringrazio della sollecitudine
ma ti volevo chiedere:
come li devo incollare i codici sul
Metastock?
Clicca per allargare...
Dall Indicator Builder devi creare i vari indicatori
f Regolo B condition
-----------------------------------------------------------------------------------
f Regolo T condition
---------------------------------------------------------------------------------
f Regolo Piramiding
----------------------------------------------------------------------------------
f BOLF condition
--------------------------------------------------------------------------------
f BOL condition

New - copi il nome ( esemp. " f Regolo B condition " ) e sotto copi ed incolli il relativo codice e così via
Da questi puoi ricavare il Trading System oppure l'Expert
Ciao Taz
 

Pic

Nuovo forumer
scusami ma sono di coccio :)
ho creato le funzioni
adesso come facci ad avere il
trading system?
 
Taz

Taz

Nuovo forumer
Pic ha scritto:
scusami ma sono di coccio :)
ho creato le funzioni
adesso come facci ad avere il
trading system?
Clicca per allargare...
Se hai creato l'indicatore ( "f Regolo T condition") :
Vai sul System editor
Enter Lond
Fml( "f Regolo T condition") =1
Close Long
Fml( "f Regolo T condition") =-1
OR
Fml( "f Regolo T condition") =0
Enter Short
Fml( "f Regolo T condition") =-1
Close Short
Fml( "f Regolo T condition") =1
OR
Fml( "f Regolo T condition") =0

Ciao
 

Pic

Nuovo forumer
ho provato
ma c'è qualcosa che manca

ho creato un trading system con nome "regolo"
mettendo
enter long:
Fml( "f Regolo T condition") =1
close long:
Fml( "f Regolo T condition") =-1
OR
Fml( "f Regolo T condition") =0
enter short:
Fml( "f Regolo T condition") =-1
close short:
Fml( "f Regolo T condition") =1
OR
Fml( "f Regolo T condition") =0

però il sistema non mi da nessun
segnale
come devo considerare i canali
bol e bolf?
 
Taz

Taz

Nuovo forumer
Pic ha scritto:
ho provato
ma c'è qualcosa che manca

però il sistema non mi da nessun
segnale
come devo considerare i canali
bol e bolf?
Clicca per allargare...

Devi creare tutti gli indicatori
f Regolo B
F Piramiding
f BOLF
f BOL ecc
Se noti vi sono degli indicatori ( vedi regolo T ) che fanno riferimento ad altri ( Piramiding e BOLF )
Mandami la tua email in privato vedo se posso inviarti il file da poter installare con la funzione import formula dall'organizer di MT
Ciao
 
You must log in or register to reply here.

Users who are viewing this thread

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