0
Views
0
Downloads
0
Favorites
ArbSint
ÿþ/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | A r b S y n t h e t i c . m q 5 |
/ / | C o p y r i g h t 2 0 1 6 , D m i t r i e v s k y M a x |
/ / | h t t p s : / / w w w . m q l 5 . c o m / r u / u s e r s / d m i t r i e v s k y |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
# p r o p e r t y c o p y r i g h t " C o p y r i g h t 2 0 1 6 , D m i t r i e v s k y M a x . "
# p r o p e r t y l i n k " h t t p s : / / w w w . m q l 5 . c o m / r u / u s e r s / d m i t r i e v s k y "
# p r o p e r t y v e r s i o n " 1 . 5 "
# p r o p e r t y s t r i c t
# i n c l u d e < T r a d e \ T r a d e . m q h >
# i n c l u d e < T r a d e \ P o s i t i o n I n f o . m q h >
# i n c l u d e < T r a d e \ A c c o u n t I n f o . m q h >
C T r a d e m _ T r a d e ;
C P o s i t i o n I n f o m _ P o s i t i o n ;
C A c c o u n t I n f o m y a c c o u n t ;
C P o s i t i o n I n f o m y p o s i t i o n ;
i n p u t i n t s p r e a d = 3 5 ; / / S p r e a d d e v i a t i o n s i n p o i n t s ( b e t w e e n s y n t h e t i c a n d b a s e p a i r )
d o u b l e M e d i a n E U R U S D , M e d i a n G B P U S D , M e d i a n E U R G B P , M e d i a n S y n t h e t i c ,
D i f f , E U R d i f f , G B P d i f f , G B P s y n t h e t i c , E U R s y n t h e t i c ,
D i f f M a x , D i f f M i n , E u r D i f f M a x , E u r D i f f M i n , G b p D i f f M a x , G b p D i f f M i n ;
l o n g m s T i m e , e s T i m e , g s T i m e , m E u r , m G b p , m E u r G b p , t i m e D i f f , t i m e E u r D i f f , t i m e G b p D i f f ;
M q l T i c k t i c k E U R , t i c k G B P , t i c k E U R G B P ;
v o i d O n T i c k ( )
{
i f ( ! S y m b o l I n f o T i c k ( " E U R U S D " , t i c k E U R ) ) { P r i n t ( " E U R U S D p r i c e h a s n o t b e e n r e c e i v e d " ) ; r e t u r n ; }
i f ( ! S y m b o l I n f o T i c k ( " G B P U S D " , t i c k G B P ) ) { P r i n t ( " G B P U S D p r i c e h a s n o t b e e n r e c e i v e d " ) ; r e t u r n ; }
i f ( ! S y m b o l I n f o T i c k ( " E U R G B P " , t i c k E U R G B P ) ) { P r i n t ( " E U R G B P p r i c e h a s n o t b e e n r e c e i v e d " ) ; r e t u r n ; }
i f ( t i c k E U R . a s k ! = 0 & & t i c k E U R . b i d ! = 0 )
{
i f ( M e d i a n E U R U S D ! = N o r m a l i z e D o u b l e ( t i c k E U R . a s k - ( t i c k E U R . a s k - t i c k E U R . b i d ) / 2 , _ D i g i t s ) )
{
M e d i a n E U R U S D = N o r m a l i z e D o u b l e ( t i c k E U R . a s k - ( t i c k E U R . a s k - t i c k E U R . b i d ) / 2 , _ D i g i t s ) ;
m E u r = t i c k E U R . t i m e _ m s c ;
}
} e l s e r e t u r n ;
i f ( t i c k G B P . a s k ! = 0 & & t i c k G B P . b i d ! = 0 )
{
i f ( M e d i a n G B P U S D ! = N o r m a l i z e D o u b l e ( t i c k G B P . a s k - ( t i c k G B P . a s k - t i c k G B P . b i d ) / 2 , _ D i g i t s ) )
{
M e d i a n G B P U S D = N o r m a l i z e D o u b l e ( t i c k G B P . a s k - ( t i c k G B P . a s k - t i c k G B P . b i d ) / 2 , _ D i g i t s ) ;
m G b p = t i c k G B P . t i m e _ m s c ;
}
} e l s e r e t u r n ;
i f ( t i c k E U R G B P . a s k ! = 0 & & t i c k E U R G B P . b i d ! = 0 )
{
i f ( M e d i a n E U R G B P ! = N o r m a l i z e D o u b l e ( t i c k E U R G B P . a s k - ( t i c k E U R G B P . a s k - t i c k E U R G B P . b i d ) / 2 , _ D i g i t s ) )
{
M e d i a n E U R G B P = N o r m a l i z e D o u b l e ( t i c k E U R G B P . a s k - ( t i c k E U R G B P . a s k - t i c k E U R G B P . b i d ) / 2 , _ D i g i t s ) ;
m E u r G b p = t i c k E U R G B P . t i m e _ m s c ;
}
} e l s e r e t u r n ;
i f ( M e d i a n S y n t h e t i c ! = N o r m a l i z e D o u b l e ( M e d i a n E U R U S D / M e d i a n G B P U S D , _ D i g i t s ) ) / / 5A;8 A@54=85 F5=K ?> 8=AB@C<5=BC 87<5=8;8AL, A>E@0=O5< =>2CN F5=C 8 55 2@5<O
{
M e d i a n S y n t h e t i c = N o r m a l i z e D o u b l e ( M e d i a n E U R U S D / M e d i a n G B P U S D , _ D i g i t s ) ;
i f ( t i c k E U R . t i m e _ m s c < t i c k G B P . t i m e _ m s c ) m s T i m e = t i c k E U R . t i m e _ m s c ; e l s e m s T i m e = t i c k G B P . t i m e _ m s c ;
}
i f ( E U R s y n t h e t i c ! = N o r m a l i z e D o u b l e ( M e d i a n G B P U S D * M e d i a n E U R G B P , _ D i g i t s ) )
{
E U R s y n t h e t i c = N o r m a l i z e D o u b l e ( M e d i a n G B P U S D * M e d i a n E U R G B P , _ D i g i t s ) ;
i f ( t i c k E U R G B P . t i m e _ m s c < t i c k G B P . t i m e _ m s c ) e s T i m e = t i c k E U R G B P . t i m e _ m s c ; e l s e e s T i m e = t i c k G B P . t i m e _ m s c ;
}
i f ( G B P s y n t h e t i c ! = N o r m a l i z e D o u b l e ( M e d i a n E U R U S D / M e d i a n E U R G B P , _ D i g i t s ) )
{
G B P s y n t h e t i c = N o r m a l i z e D o u b l e ( M e d i a n E U R U S D / M e d i a n E U R G B P , _ D i g i t s ) ;
i f ( t i c k E U R G B P . t i m e _ m s c < t i c k E U R . t i m e ) g s T i m e = t i c k E U R G B P . t i m e _ m s c ; e l s e g s T i m e = t i c k E U R . t i m e _ m s c ;
}
D i f f = N o r m a l i z e D o u b l e ( M e d i a n S y n t h e t i c - M e d i a n E U R G B P , _ D i g i t s ) ;
E U R d i f f = N o r m a l i z e D o u b l e ( E U R s y n t h e t i c - M e d i a n E U R U S D , _ D i g i t s ) ;
G B P d i f f = N o r m a l i z e D o u b l e ( G B P s y n t h e t i c - M e d i a n G B P U S D , _ D i g i t s ) ;
t i m e D i f f = m s T i m e - m E u r G b p ;
t i m e E u r D i f f = e s T i m e - m E u r ;
t i m e G b p D i f f = g s T i m e - m G b p ;
i f ( D i f f > D i f f M a x ) D i f f M a x = D i f f ;
i f ( E U R d i f f > E u r D i f f M a x ) E u r D i f f M a x = E U R d i f f ;
i f ( G B P d i f f > G b p D i f f M a x ) G b p D i f f M a x = G B P d i f f ;
i f ( D i f f < D i f f M i n ) D i f f M i n = D i f f ;
i f ( E U R d i f f < E u r D i f f M i n ) E u r D i f f M i n = E U R d i f f ;
i f ( G B P d i f f < G b p D i f f M i n ) G b p D i f f M i n = G B P d i f f ;
T r a d e F u n c ( " E U R G B P " , D i f f , t i m e D i f f , s p r e a d , 1 ) ;
T r a d e F u n c ( " E U R U S D " , E U R d i f f , t i m e E u r D i f f , s p r e a d , 1 ) ;
T r a d e F u n c ( " G B P U S D " , G B P d i f f , t i m e G b p D i f f , s p r e a d , 1 ) ;
}
v o i d T r a d e F u n c ( s t r i n g s y m b o l , d o u b l e d i f f , l o n g t i m e , i n t S p r e a d , l o n g t i m e d i f ) / / D- O ?@>25@O5B =0;8G85 A83=0;0 ?> :064><C 8A=B@C<5=BC 8 >B:@K205B A45;:8
{
i f ( d i f f > 0 & & S u f f i c i e n c y O f E q u i t y ( s y m b o l ) )
{
d o u b l e L o t = S y m b o l I n f o D o u b l e ( s y m b o l , S Y M B O L _ V O L U M E _ M I N ) ;
L o t = N o r m a l i z e D o u b l e ( L o t , 3 ) ;
d o u b l e p r i c e B u y = S y m b o l I n f o D o u b l e ( s y m b o l , S Y M B O L _ A S K ) ;
l o n g s t o p l v l = S y m b o l I n f o I n t e g e r ( s y m b o l , S Y M B O L _ T R A D E _ S T O P S _ L E V E L ) ;
i f ( m _ P o s i t i o n . S e l e c t ( s y m b o l ) )
{
i f ( m _ P o s i t i o n . P o s i t i o n T y p e ( ) = = P O S I T I O N _ T Y P E _ S E L L & & m _ P o s i t i o n . P r o f i t ( ) + m _ P o s i t i o n . C o m m i s s i o n ( ) > 0 ) m _ T r a d e . P o s i t i o n C l o s e ( s y m b o l ) ;
}
i f ( d i f f > S p r e a d * 0 . 0 0 0 0 1 & & t i m e > t i m e d i f )
{
i f ( C o u n t P o s B u y ( s y m b o l ) = = 0 & & C o u n t P o s S e l l ( s y m b o l ) = = 0 )
{
m _ T r a d e . P o s i t i o n O p e n ( s y m b o l , O R D E R _ T Y P E _ B U Y , L o t , p r i c e B u y , 0 , 0 , " D i f f : " + D o u b l e T o S t r i n g ( d i f f / _ P o i n t , 0 ) + " D e l a y : " + s t r i n g ( t i m e d i f ) ) ;
}
}
}
i f ( d i f f < 0 & & S u f f i c i e n c y O f E q u i t y ( s y m b o l ) )
{
d o u b l e L o t = S y m b o l I n f o D o u b l e ( s y m b o l , S Y M B O L _ V O L U M E _ M I N ) ;
L o t = N o r m a l i z e D o u b l e ( L o t , 3 ) ;
d o u b l e p r i c e S e l l = S y m b o l I n f o D o u b l e ( s y m b o l , S Y M B O L _ B I D ) ;
l o n g s t o p l v l = S y m b o l I n f o I n t e g e r ( s y m b o l , S Y M B O L _ T R A D E _ S T O P S _ L E V E L ) ;
i f ( m _ P o s i t i o n . S e l e c t ( s y m b o l ) )
{
i f ( m _ P o s i t i o n . P o s i t i o n T y p e ( ) = = P O S I T I O N _ T Y P E _ B U Y & & m _ P o s i t i o n . P r o f i t ( ) + m _ P o s i t i o n . C o m m i s s i o n ( ) > 0 ) m _ T r a d e . P o s i t i o n C l o s e ( s y m b o l ) ;
}
i f ( d i f f < S p r e a d * 0 . 0 0 0 0 1 * - 1 & & t i m e < t i m e d i f * - 1 )
{
i f ( C o u n t P o s S e l l ( s y m b o l ) = = 0 & & C o u n t P o s B u y ( s y m b o l ) = = 0 )
{
m _ T r a d e . P o s i t i o n O p e n ( s y m b o l , O R D E R _ T Y P E _ S E L L , L o t , p r i c e S e l l , 0 , 0 , " D i f f : " + D o u b l e T o S t r i n g ( d i f f / _ P o i n t , 0 ) + " D e l a y : " + s t r i n g ( t i m e d i f ) ) ;
}
}
}
}
i n t C o u n t P o s B u y ( s t r i n g s y m b o l )
{
i n t r e s u l t = 0 ;
f o r ( i n t k = 0 ; k < P o s i t i o n s T o t a l ( ) ; k + + )
{
i f ( m y p o s i t i o n . S e l e c t ( s y m b o l ) = = t r u e )
{
i f ( m y p o s i t i o n . P o s i t i o n T y p e ( ) = = P O S I T I O N _ T Y P E _ B U Y )
{ r e s u l t + + ; }
e l s e
{ }
}
}
r e t u r n ( r e s u l t ) ;
}
i n t C o u n t P o s S e l l ( s t r i n g s y m b o l )
{
i n t r e s u l t = 0 ;
f o r ( i n t k = 0 ; k < P o s i t i o n s T o t a l ( ) ; k + + )
{
i f ( m y p o s i t i o n . S e l e c t ( s y m b o l ) = = t r u e )
{
i f ( m y p o s i t i o n . P o s i t i o n T y p e ( ) = = P O S I T I O N _ T Y P E _ S E L L )
{ r e s u l t + + ; }
e l s e
{ }
}
}
r e t u r n ( r e s u l t ) ;
}
b o o l S u f f i c i e n c y O f E q u i t y ( s t r i n g s y m b )
{
i f ( 1 0 0 0 0 0 * 0 . 0 1 / A c c o u n t I n f o I n t e g e r ( A C C O U N T _ L E V E R A G E ) * S y m b o l I n f o D o u b l e ( s y m b , S Y M B O L _ B I D ) < m y a c c o u n t . F r e e M a r g i n ( ) ) r e t u r n ( t r u e ) ;
e l s e r e t u r n ( f a l s e ) ;
}
Comments