Orders Execution
Indicators Used
Miscellaneous
1
Views
0
Downloads
0
Favorites
forex_fraus_4_Portfolio
ÿþ/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | C a u t i o n : I f y o u u s e t h i s E A , t h a t ' s y o u r s e l f - r e s p o n s i b i l i t y . |
/ / | |
/ / | T h i s E A i s b a s e d F o r e x F r a u s ( f o r M 1 ) w h i c h w a s m a d e |
/ / | b y D m i t r i y Z a y t s e v . |
/ / | I a d d l i m i t a t i o n s o f p o s i t i o n , t r a d i n g M u l t i - c u r r e n c y |
/ / | |
/ / | S a n a d a K e i |
/ / | 2 0 1 6 . 0 4 . 2 9 |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
# p r o p e r t y c o p y r i g h t " 2 0 1 6 , S a n a d a K e i "
# p r o p e r t y l i n k " h t t p : / / w w w . m q l 4 . c o m "
# p r o p e r t y d e s c r i p t i o n " T h i s E A i s b a s e d F o r e x F r a u s ( f o r M 1 ) w h i c h w a s m a d e b y D m i t r i y Z a y t s e v . "
e x t e r n i n t S L = 0 ;
e x t e r n i n t T P = 0 ;
e x t e r n b o o l A l l P o s i t i o n s = T r u e ; / / #?@02;OBL 2A5<8 ?>78F8O<8
/ / + - - - f i v e p a i r s S e t t i n g , S y m b o l , M a x P o s i t i o n N u m u b e r S t a r t
e x t e r n s t r i n g P a i r 1 = " E U R U S D " ; / / S y m b o l
e x t e r n i n t P a i r 1 _ M a x P o s i t i o n s = 3 ; / / M a x P o s i t i o n N u m u b e r
e x t e r n s t r i n g P a i r 2 = " E U R C H F " ; / / S y m b o l
e x t e r n i n t P a i r 2 _ M a x P o s i t i o n s = 3 ; / / M a x P o s i t i o n N u m u b e r
e x t e r n s t r i n g P a i r 3 = " E U R J P Y " ; / / S y m b o l
e x t e r n i n t P a i r 3 _ M a x P o s i t i o n s = 3 ; / / M a x P o s i t i o n N u m u b e r
e x t e r n s t r i n g P a i r 4 = " C H F J P Y " ; / / S y m b o l
e x t e r n i n t P a i r 4 _ M a x P o s i t i o n s = 3 ; / / M a x P o s i t i o n N u m u b e r
e x t e r n s t r i n g P a i r 5 = " E U R A U D " ; / / S y m b o l
e x t e r n i n t P a i r 5 _ M a x P o s i t i o n s = 3 ; / / M a x P o s i t i o n N u m u b e r
/ / + - - - f i v e p a i r s S e t t i n g E n d
e x t e r n b o o l P r o f i t T r a i l i n g = T r u e ; / / "@0;8BL B>;L:> ?@>D8B
e x t e r n i n t T r a i l i n g S t o p = 3 0 ; / / $8:A8@>20==K9 @07<5@ B@0;0
e x t e r n i n t T r a i l i n g S t e p = 1 ; / / (03 B@0;0
e x t e r n b o o l U s e S o u n d = F a l s e ; / / A?>;L7>20BL 72C:>2>9 A83=0;
e x t e r n s t r i n g N a m e F i l e S o u n d = " e x p e r t . w a v " ; / / 08<5=>20=85 72C:>2>3> D09;0
e x t e r n i n t t i m e = 0 ; / / 1 - 2:;NG5=>, 0 - 2K:;NG5=>. M o d b y S a n a d a K e i 2 0 1 6 . 0 4 . 2 9
e x t e r n i n t s t a r t t i m e = 7 ;
e x t e r n i n t s t o p t i m e = 1 7 ;
e x t e r n i n t m n = 1 ;
e x t e r n i n t M A G I C = 7 7 7 7 ; / / M o d b y S a n a d a K e i 2 0 1 6 . 0 4 . 2 9
e x t e r n d o u b l e L o t s = 0 . 1 ;
i n t e r r ;
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | O n T i c k f u n c t i o n |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d O n T i c k ( )
{
{
f o r ( i n t i = 0 ; i < O r d e r s T o t a l ( ) ; i + + )
{
i f ( O r d e r S e l e c t ( i , S E L E C T _ B Y _ P O S , M O D E _ T R A D E S ) )
{
i f ( A l l P o s i t i o n s | | O r d e r S y m b o l ( ) = = S y m b o l ( ) )
{
T r a i l i n g P o s i t i o n s ( ) ;
}
}
}
}
O p e n P a t t e r n ( ) ; / / s!û0Æotû0_áû0 û0û0û0¤à`áÈå\nû0
}
i n t o k b u y , o k s e l l ;
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d O p e n P a t t e r n ( )
{
d o u b l e o p , s l , t p ;
d o u b l e W P R u r = i W P R ( S y m b o l ( ) , 0 , 3 6 0 , 0 ) ;
i f ( W P R u r < - 9 9 . 9 ) { o k b u y = 1 ; }
i f ( W P R u r > - 9 9 . 9 & & o k b u y = = 1 )
{
o k b u y = 0 ;
i f ( t i m e c o n t r o l ( ) = = 1 )
{
/ / I ' d l i k e t o m a k e b e l o w c o d e m o r e e a s y t o m a i n t e n a n c e . b y S a n a d a K e i
i f ( S y m b o l ( ) = = P a i r 1 & & C h P o s ( P a i r 1 , P a i r 1 _ M a x P o s i t i o n s ) )
{
o p = A s k ; i f ( S L > 0 ) { s l = A s k - S L * P o i n t * m n ; } i f ( T P > 0 ) { t p = A s k + T P * P o i n t * m n ; }
e r r = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , L o t s , N o r m a l i z e D o u b l e ( o p , D i g i t s ) , 3 , N o r m a l i z e D o u b l e ( s l , D i g i t s ) , N o r m a l i z e D o u b l e ( t p , D i g i t s ) , " " , M A G I C , 0 , B l u e ) ;
i f ( e r r < 0 ) { P r i n t ( " O r d e r S e n d ( ) - O P _ B U Y . o p " + o p + " s l " + s l + " t p " + t p + " " + G e t L a s t E r r o r ( ) ) ; }
}
i f ( S y m b o l ( ) = = P a i r 2 & & C h P o s ( P a i r 2 , P a i r 2 _ M a x P o s i t i o n s ) )
{
o p = A s k ; i f ( S L > 0 ) { s l = A s k - S L * P o i n t * m n ; } i f ( T P > 0 ) { t p = A s k + T P * P o i n t * m n ; }
e r r = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , L o t s , N o r m a l i z e D o u b l e ( o p , D i g i t s ) , 3 , N o r m a l i z e D o u b l e ( s l , D i g i t s ) , N o r m a l i z e D o u b l e ( t p , D i g i t s ) , " " , M A G I C , 0 , B l u e ) ;
i f ( e r r < 0 ) { P r i n t ( " O r d e r S e n d ( ) - O P _ B U Y . o p " + o p + " s l " + s l + " t p " + t p + " " + G e t L a s t E r r o r ( ) ) ; }
}
i f ( S y m b o l ( ) = = P a i r 3 & & C h P o s ( P a i r 3 , P a i r 3 _ M a x P o s i t i o n s ) )
{
o p = A s k ; i f ( S L > 0 ) { s l = A s k - S L * P o i n t * m n ; } i f ( T P > 0 ) { t p = A s k + T P * P o i n t * m n ; }
e r r = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , L o t s , N o r m a l i z e D o u b l e ( o p , D i g i t s ) , 3 , N o r m a l i z e D o u b l e ( s l , D i g i t s ) , N o r m a l i z e D o u b l e ( t p , D i g i t s ) , " " , M A G I C , 0 , B l u e ) ;
i f ( e r r < 0 ) { P r i n t ( " O r d e r S e n d ( ) - O P _ B U Y . o p " + o p + " s l " + s l + " t p " + t p + " " + G e t L a s t E r r o r ( ) ) ; }
}
i f ( S y m b o l ( ) = = P a i r 4 & & C h P o s ( P a i r 4 , P a i r 4 _ M a x P o s i t i o n s ) )
{
o p = A s k ; i f ( S L > 0 ) { s l = A s k - S L * P o i n t * m n ; } i f ( T P > 0 ) { t p = A s k + T P * P o i n t * m n ; }
e r r = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , L o t s , N o r m a l i z e D o u b l e ( o p , D i g i t s ) , 3 , N o r m a l i z e D o u b l e ( s l , D i g i t s ) , N o r m a l i z e D o u b l e ( t p , D i g i t s ) , " " , M A G I C , 0 , B l u e ) ;
i f ( e r r < 0 ) { P r i n t ( " O r d e r S e n d ( ) - O P _ B U Y . o p " + o p + " s l " + s l + " t p " + t p + " " + G e t L a s t E r r o r ( ) ) ; }
}
i f ( S y m b o l ( ) = = P a i r 5 & & C h P o s ( P a i r 5 , P a i r 5 _ M a x P o s i t i o n s ) )
{
o p = A s k ; i f ( S L > 0 ) { s l = A s k - S L * P o i n t * m n ; } i f ( T P > 0 ) { t p = A s k + T P * P o i n t * m n ; }
e r r = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , L o t s , N o r m a l i z e D o u b l e ( o p , D i g i t s ) , 3 , N o r m a l i z e D o u b l e ( s l , D i g i t s ) , N o r m a l i z e D o u b l e ( t p , D i g i t s ) , " " , M A G I C , 0 , B l u e ) ;
i f ( e r r < 0 ) { P r i n t ( " O r d e r S e n d ( ) - O P _ B U Y . o p " + o p + " s l " + s l + " t p " + t p + " " + G e t L a s t E r r o r ( ) ) ; }
}
}
C l o s e A l l P o s ( 0 ) ;
}
i f ( W P R u r > - 0 . 1 ) { o k s e l l = 1 ; }
i f ( W P R u r < - 0 . 1 & & o k s e l l = = 1 )
{
o k s e l l = 0 ;
i f ( t i m e c o n t r o l ( ) = = 1 )
{
i f ( S y m b o l ( ) = = P a i r 1 & & C h P o s ( P a i r 1 , P a i r 1 _ M a x P o s i t i o n s ) )
{
o p = B i d ; i f ( S L > 0 ) { s l = B i d + S L * P o i n t * m n ; } i f ( T P > 0 ) { t p = B i d - T P * P o i n t * m n ; }
e r r = O r d e r S e n d ( S y m b o l ( ) , O P _ S E L L , L o t s , N o r m a l i z e D o u b l e ( o p , D i g i t s ) , 3 , N o r m a l i z e D o u b l e ( s l , D i g i t s ) , N o r m a l i z e D o u b l e ( t p , D i g i t s ) , " " , M A G I C , 0 , R e d ) ;
i f ( e r r < 0 ) { P r i n t ( " O r d e r S e n d ( ) - O P _ S E L L . o p " + o p + " s l " + s l + " t p " + t p + " " + G e t L a s t E r r o r ( ) ) ; }
}
i f ( S y m b o l ( ) = = P a i r 2 & & C h P o s ( P a i r 2 , P a i r 2 _ M a x P o s i t i o n s ) )
{
o p = B i d ; i f ( S L > 0 ) { s l = B i d + S L * P o i n t * m n ; } i f ( T P > 0 ) { t p = B i d - T P * P o i n t * m n ; }
e r r = O r d e r S e n d ( S y m b o l ( ) , O P _ S E L L , L o t s , N o r m a l i z e D o u b l e ( o p , D i g i t s ) , 3 , N o r m a l i z e D o u b l e ( s l , D i g i t s ) , N o r m a l i z e D o u b l e ( t p , D i g i t s ) , " " , M A G I C , 0 , R e d ) ;
i f ( e r r < 0 ) { P r i n t ( " O r d e r S e n d ( ) - O P _ S E L L . o p " + o p + " s l " + s l + " t p " + t p + " " + G e t L a s t E r r o r ( ) ) ; }
}
i f ( S y m b o l ( ) = = P a i r 3 & & C h P o s ( P a i r 3 , P a i r 3 _ M a x P o s i t i o n s ) )
{
o p = B i d ; i f ( S L > 0 ) { s l = B i d + S L * P o i n t * m n ; } i f ( T P > 0 ) { t p = B i d - T P * P o i n t * m n ; }
e r r = O r d e r S e n d ( S y m b o l ( ) , O P _ S E L L , L o t s , N o r m a l i z e D o u b l e ( o p , D i g i t s ) , 3 , N o r m a l i z e D o u b l e ( s l , D i g i t s ) , N o r m a l i z e D o u b l e ( t p , D i g i t s ) , " " , M A G I C , 0 , R e d ) ;
i f ( e r r < 0 ) { P r i n t ( " O r d e r S e n d ( ) - O P _ S E L L . o p " + o p + " s l " + s l + " t p " + t p + " " + G e t L a s t E r r o r ( ) ) ; }
}
i f ( S y m b o l ( ) = = P a i r 4 & & C h P o s ( P a i r 4 , P a i r 4 _ M a x P o s i t i o n s ) )
{
o p = B i d ; i f ( S L > 0 ) { s l = B i d + S L * P o i n t * m n ; } i f ( T P > 0 ) { t p = B i d - T P * P o i n t * m n ; }
e r r = O r d e r S e n d ( S y m b o l ( ) , O P _ S E L L , L o t s , N o r m a l i z e D o u b l e ( o p , D i g i t s ) , 3 , N o r m a l i z e D o u b l e ( s l , D i g i t s ) , N o r m a l i z e D o u b l e ( t p , D i g i t s ) , " " , M A G I C , 0 , R e d ) ;
i f ( e r r < 0 ) { P r i n t ( " O r d e r S e n d ( ) - O P _ S E L L . o p " + o p + " s l " + s l + " t p " + t p + " " + G e t L a s t E r r o r ( ) ) ; }
}
i f ( S y m b o l ( ) = = P a i r 5 & & C h P o s ( P a i r 5 , P a i r 5 _ M a x P o s i t i o n s ) )
{
o p = B i d ; i f ( S L > 0 ) { s l = B i d + S L * P o i n t * m n ; } i f ( T P > 0 ) { t p = B i d - T P * P o i n t * m n ; }
e r r = O r d e r S e n d ( S y m b o l ( ) , O P _ S E L L , L o t s , N o r m a l i z e D o u b l e ( o p , D i g i t s ) , 3 , N o r m a l i z e D o u b l e ( s l , D i g i t s ) , N o r m a l i z e D o u b l e ( t p , D i g i t s ) , " " , M A G I C , 0 , R e d ) ;
i f ( e r r < 0 ) { P r i n t ( " O r d e r S e n d ( ) - O P _ S E L L . o p " + o p + " s l " + s l + " t p " + t p + " " + G e t L a s t E r r o r ( ) ) ; }
}
}
C l o s e A l l P o s ( 1 ) ;
}
}
/ / 0:@K205< 2A5 ?>78F88 ?> B8?C
i n t C l o s e A l l P o s ( i n t t y p e )
{
i n t b u y = 1 ; i n t s e l l = 1 ;
i n t i , b = 0 ;
i f ( t y p e = = 1 )
{
w h i l e ( b u y = = 1 )
{
b u y = 0 ;
f o r ( i = 0 ; i < O r d e r s T o t a l ( ) ; i + + )
{
i f ( t r u e = = O r d e r S e l e c t ( i , S E L E C T _ B Y _ P O S , M O D E _ T R A D E S ) )
{
i f ( O r d e r T y p e ( ) = = O P _ B U Y & & O r d e r S y m b o l ( ) = = S y m b o l ( ) )
{ b u y = 1 ; i f ( O r d e r C l o s e ( O r d e r T i c k e t ( ) , O r d e r L o t s ( ) , B i d , 3 , V i o l e t ) ) { } ; }
} e l s e { b u y = 0 ;
}
}
i f ( b u y = = 0 ) { r e t u r n ( 0 ) ; }
}
}
i f ( t y p e = = 0 )
{
w h i l e ( s e l l = = 1 )
{
s e l l = 0 ;
f o r ( i = 0 ; i < O r d e r s T o t a l ( ) ; i + + )
{
i f ( t r u e = = O r d e r S e l e c t ( i , S E L E C T _ B Y _ P O S , M O D E _ T R A D E S ) )
{
i f ( O r d e r T y p e ( ) = = O P _ S E L L & & O r d e r S y m b o l ( ) = = S y m b o l ( ) )
{ s e l l = 1 ; i f ( O r d e r C l o s e ( O r d e r T i c k e t ( ) , O r d e r L o t s ( ) , A s k , 3 , V i o l e t ) ) { } ; }
} e l s e { s e l l = 0 ;
}
}
i f ( s e l l = = 0 ) { r e t u r n ( 0 ) ; }
}
}
r e t u r n ( 0 ) ;
}
/ / + - - - A D D b y S a n a d a K e i 2 0 1 6 . 0 4 . 2 9 - - - -
b o o l C h P o s ( s t r i n g p s n _ s y m b o l , i n t M a x P o s i t i o n ) / / C h e c k t h e p o s i t i o n n u m b e r
{
i n t i ; i n t c o l ;
f o r ( i = 0 ; i < O r d e r s T o t a l ( ) ; i + + )
{
i f ( O r d e r S e l e c t ( i , S E L E C T _ B Y _ P O S , M O D E _ T R A D E S ) = = f a l s e ) { r e t u r n ( f a l s e ) ; }
i f ( O r d e r S y m b o l ( ) = = p s n _ s y m b o l & & O r d e r M a g i c N u m b e r ( ) = = M A G I C ) { c o l + + ; }
i f ( c o l > = M a x P o s i t i o n ) { r e t u r n ( f a l s e ) ; }
}
r e t u r n ( t r u e ) ;
}
/ / + - - - A D D b y S a n a d a K e i 2 0 1 6 . 0 4 . 2 9 - - - -
/ / 3@0=8G5=85 ?> 2@5<5=8
i n t t i m e c o n t r o l ( )
{
i f ( ( ( H o u r ( ) > = 0 & & H o u r ( ) < = s t o p t i m e - 1 ) | | ( H o u r ( ) > = s t a r t t i m e & & H o u r ( ) < = 2 3 ) ) & & s t a r t t i m e > s t o p t i m e )
{
r e t u r n ( 1 ) ;
}
i f ( ( H o u r ( ) > = s t a r t t i m e & & H o u r ( ) < = s t o p t i m e - 1 ) & & s t a r t t i m e < s t o p t i m e )
{
r e t u r n ( 1 ) ;
}
i f ( t i m e = = 0 ) { r e t u r n ( 1 ) ; }
r e t u r n ( 0 ) ;
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d T r a i l i n g P o s i t i o n s ( )
{
d o u b l e p B i d , p A s k , p p ;
p p = M a r k e t I n f o ( O r d e r S y m b o l ( ) , M O D E _ P O I N T ) ;
i f ( O r d e r T y p e ( ) = = O P _ B U Y )
{
p B i d = M a r k e t I n f o ( O r d e r S y m b o l ( ) , M O D E _ B I D ) ;
i f ( ! P r o f i t T r a i l i n g | | ( p B i d - O r d e r O p e n P r i c e ( ) ) > T r a i l i n g S t o p * p p )
{
i f ( O r d e r S t o p L o s s ( ) < p B i d - ( T r a i l i n g S t o p + T r a i l i n g S t e p - 1 ) * p p )
{
M o d i f y S t o p L o s s ( p B i d - T r a i l i n g S t o p * p p ) ;
r e t u r n ;
}
}
}
i f ( O r d e r T y p e ( ) = = O P _ S E L L )
{
p A s k = M a r k e t I n f o ( O r d e r S y m b o l ( ) , M O D E _ A S K ) ;
i f ( ! P r o f i t T r a i l i n g | | O r d e r O p e n P r i c e ( ) - p A s k > T r a i l i n g S t o p * p p )
{
i f ( O r d e r S t o p L o s s ( ) > p A s k + ( T r a i l i n g S t o p + T r a i l i n g S t e p - 1 ) * p p | | O r d e r S t o p L o s s ( ) = = 0 )
{
M o d i f y S t o p L o s s ( p A s k + T r a i l i n g S t o p * p p ) ;
r e t u r n ;
}
}
}
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | 5@5=>A C@>2=O S t o p L o s s |
/ / | 0@0<5B@K: |
/ / | l d S t o p L o s s - C@>25=L S t o p L o s s |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d M o d i f y S t o p L o s s ( d o u b l e l d S t o p L o s s )
{
b o o l f m ;
f m = O r d e r M o d i f y ( O r d e r T i c k e t ( ) , O r d e r O p e n P r i c e ( ) , l d S t o p L o s s , O r d e r T a k e P r o f i t ( ) , 0 , C L R _ N O N E ) ;
i f ( f m & & U s e S o u n d ) P l a y S o u n d ( N a m e F i l e S o u n d ) ;
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
Comments
Markdown Formatting Guide
# H1## H2
### H3
**bold text***italicized text*[title](https://www.example.com)`code````code block
```
> blockquote- Item 1- Item 2
1. First item2. Second item
---