0
Views
0
Downloads
0
Favorites
SailSystemEA_v2.3
ÿþ/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
# 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 8 - 2 0 2 0 , N i k o l a o s P a n t z o s "
# 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 / e n / u s e r s / p a n n i k "
# p r o p e r t y v e r s i o n " 2 . 3 "
# p r o p e r t y d e s c r i p t i o n " T h i s E x p e r t A d v i s o r i s a h e d g e a n d s c a l p s y s t e m . "
# p r o p e r t y d e s c r i p t i o n " \ n R u n w e l l i n a n y p a i r w i t h t i g h t s p r e a d a n d l o w c o m m i s s i o n . "
# p r o p e r t y d e s c r i p t i o n " C h o i c e a b r o k e r w i t h f a s t e x e c u t i o n a n d z e r o s t o p l e v e l . "
/ / # p r o p e r t y i c o n " \ \ I m a g e s \ \ S a i l S y s t e m _ L o g o . i c o " ;
# p r o p e r t y s t r i c t
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
e n u m S p r d { U s e _ A v e r a g e , U s e _ C u r r e n t } ;
e n u m A c t n { I n c r e a s e _ L e v e l s , C l o s e _ O r d e r s } ;
e n u m E x i s t { K e p p _ A l l _ O r d e r s , D e l e t e _ P e n d i n g , C l o s e _ M a r k e t , D e l e t e P e n d i n g _ A n d _ C l o s e M a r k e t } ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
e x t e r n s t r i n g O r d e r s S e t t i n g = " | | = = = = = = = = O r d e r s S e t t i n g = = = = = = = = | | " ;
e x t e r n b o o l U s e V i r t u a l L e v e l s = t r u e ;
e x t e r n b o o l S h o w V i r t u a l L e v e l s = t r u e ;
e x t e r n d o u b l e O r d e r s S t o p L o s s = 5 ;
e x t e r n b o o l P u t T a k e P r o f i t = f a l s e ;
e x t e r n d o u b l e O r d e r s T a k e P r o f i t = 5 0 . 0 ;
e x t e r n i n t D e l a y M o d i f y O r d e r s = 4 ;
e x t e r n d o u b l e S t e p M o d i f y O r d e r s = 1 . 0 ;
e x t e r n d o u b l e P i p s R e p l a c e O r d e r s = 0 . 0 ;
e x t e r n d o u b l e S a f e M u l t i p l i e r = 1 0 . 0 ;
e x t e r n b o o l U s e P e n d i n g O r d e r s = f a l s e ;
e x t e r n d o u b l e D i s t a n c e P e n d i n g = 1 . 0 ;
e x t e r n s t r i n g T i m e F i l t e r S e t s = " | | = = = = = = = = T i m e s S e t t i n g = = = = = = = = | | " ;
e x t e r n b o o l U s e T i m e F i l t e r = f a l s e ;
e x t e r n s t r i n g T i m e S t a r t T r a d e = " 0 0 : 0 0 : 0 0 " ;
e x t e r n s t r i n g T i m e S t o p T r a d e = " 0 0 : 0 0 : 0 0 " ;
e x t e r n E x i s t M a n a g e E x i s t O r d e r s = D e l e t e P e n d i n g _ A n d _ C l o s e M a r k e t ;
e x t e r n s t r i n g L o t S e t t i n g = " | | = = = = = = = = L o t S e t t i n g = = = = = = = = | | " ;
e x t e r n b o o l A u t o L o t S i z e = f a l s e ;
e x t e r n d o u b l e R i s k F a c t o r = 1 0 ;
e x t e r n d o u b l e M a n u a l L o t S i z e = 0 . 0 1 ;
e x t e r n s t r i n g E A S e t t i n g = " | | = = = = = = = = E A S e t t i n g = = = = = = = = | | " ;
e x t e r n d o u b l e A c c e p t S t o p L e v e l = 2 . 0 ;
e x t e r n i n t S l i p p a g e = 1 ;
e x t e r n s t r i n g O r d e r s I D I n f o = " 0 = G e n e r a t e I D p e r S y m b o l " ;
e x t e r n i n t O r d e r s I D = 0 ;
e x t e r n s t r i n g S p r e a d S e t t i n g = " | | = = = = = = = = S p r e a d S e t t i n g = = = = = = = = | | " ;
e x t e r n s t r i n g M a x S p r e a d I n f o = " 0 = N o t c h e c k s p r e a d " ;
e x t e r n d o u b l e M a x S p r e a d = 1 . 0 ;
e x t e r n S p r d T y p e O f S p r e a d U s e = U s e _ A v e r a g e ;
e x t e r n A c t n H i g h S p r e a d A c t i o n = I n c r e a s e _ L e v e l s ;
e x t e r n d o u b l e M u l t i p l i e r I n c r e a s e = 2 . 0 ;
e x t e r n s t r i n g C o m m i s i o n s S e t = " | | = = = = = = = = C o m m i s s i o n s S e t t i n g = = = = = = = = | | " ;
e x t e r n d o u b l e C o m m i s s i o n I n P i p = 0 . 0 ;
e x t e r n d o u b l e C o m m i s s i o n I n C u r = 0 . 0 ;
e x t e r n b o o l G e t C o m m i s s i o n A u t o = t r u e ;
e x t e r n s t r i n g I n f o r m a t i o n S e t s = " | | = = = = = = = = I n f o r m a t i o n S e t t i n g = = = = = = = = | | " ;
e x t e r n b o o l C o u n t A v g S p r e a d = f a l s e ;
e x t e r n b o o l C o u n t A v g E x e c u t i o n = f a l s e ;
e x t e r n i n t T i m e s F o r A v e r a g e = 3 0 ;
e x t e r n s t r i n g D e l e t e O b j e c t s S e t s = " | | = = = = = = = = O b j e c t s S e t t i n g = = = = = = = = | | " ;
e x t e r n b o o l D e l e t e O b j e c t s = f a l s e ;
e x t e r n i n t D e l e t e M i n u t e s = 3 0 ;
e x t e r n s t r i n g E x p e r t C o m m e n t s S e t = " | | = = = = = = = = C o m m e n t s S e t t i n g = = = = = = = = | | " ;
e x t e r n s t r i n g E x p e r t C o m m e n t s = " S a i l S y s t e m E A " ;
e x t e r n b o o l B a c k t e s t t i n g I n f o = t r u e ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
s t r i n g S y m b o l U s e ;
s t r i n g S y m b o l E x t e n s i o n = " " ;
s t r i n g S y m b o l T r a d e ;
s t r i n g B a c k g r o u n d N a m e ;
s t r i n g S h o w I n f o C o m m i s s i o n ;
s t r i n g N a m e O f B u y S t o p L o s s L i n e ;
s t r i n g N a m e O f B u y T a k e P r o f i t L i n e ;
s t r i n g N a m e O f S e l l S t o p L o s s L i n e ;
s t r i n g N a m e O f S e l l T a k e P r o f i t L i n e ;
s t r i n g P R E F I X = " # " ;
l o n g C h a r t C o l o r ;
i n t T o t a l O r d e r s ;
i n t C n t B u y L i m i t ;
i n t C n t S e l l L i m i t ;
i n t C n t B u y ;
i n t C n t S e l l ;
i n t T r y T i m e s ;
i n t T o t a l T r a d e s ;
i n t M u l t i p l i e r P o i n t ;
i n t T i m e A c t i o n M o d i f y ;
i n t M a g i c N u m b e r ;
i n t C o u n t T i c k S p r e a d P a i r = 0 ;
i n t C o u n t T i m e s M o d i f y = 0 ;
i n t C o u n t T i c k S p r e a d = 0 ;
i n t T i m e s M o d i f y = 0 ;
i n t i ;
i n t C o u n t ;
i n t T i c k s G e t = 0 ;
i n t C o u n t T i c k M o d i f y B u y = 0 ;
i n t C o u n t T i c k M o d i f y S e l l = 0 ;
i n t W i n T r a d e s ;
i n t L o s s T r a d e s ;
i n t S e n d M e s s a g e s = 0 ;
i n t C o u n t H i s t o r y ;
d o u b l e A r r a y S p r e a d P a i r [ 1 0 0 ] ;
d o u b l e H i s t o r y P i p s = 0 ;
d o u b l e A v g S p r e a d ;
d o u b l e A v g E x e c u t i o n ;
d o u b l e T o t a l P r o f i t L o s s ;
d o u b l e S p r e a d P i p s ;
d o u b l e D i g i t s P o i n t s ;
d o u b l e L o t S i z e ;
d o u b l e S t o p L e v e l ;
d o u b l e C h e c k M a r g i n 1 ;
d o u b l e C h e c k M a r g i n 2 ;
d o u b l e S u m M a r g i n ;
d o u b l e S t e p M o d i f y ;
d o u b l e M o d e T i c k V a l u e ;
d o u b l e B r o k e r C o m m i s s i o n ;
d o u b l e S p r e a d L i m i t ;
d o u b l e R e a l C o m m i s s i o n ;
d o u b l e G e t C o m m i s s i o n P a i r = 0 ;
d o u b l e P i p s L e v e l L o s s ;
d o u b l e P i p s L e v e l P r o f i t ;
d o u b l e P i p s S t e p M o d i f y ;
d o u b l e A v r g P i p s P r o f i t = 0 ;
d o u b l e A v r g P i p s L o s s = 0 ;
d o u b l e A v r g D u r a t i o n = 0 ;
d o u b l e L a s t B i d = 0 ;
d o u b l e L a s t A s k = 0 ;
d o u b l e V i r t u a l S t o p L o s s B u y = 0 ;
d o u b l e V i r t u a l S t o p L o s s S e l l = 0 ;
d o u b l e V i r t u a l T a k e P r o f i t B u y = 0 ;
d o u b l e V i r t u a l T a k e P r o f i t S e l l = 0 ;
d o u b l e C u r r e n t D i s t a n c e B u y ;
d o u b l e C u r r e n t D i s t a n c e S e l l ;
d a t e t i m e A r r a y E x e c u t i o n [ 1 0 0 ] ;
d a t e t i m e O p e r a t i o n D e l a y = 0 ;
d a t e t i m e L a s t O p e r a t i o n D e l a y = 0 ;
d a t e t i m e T i m e T o S e n d = 0 ;
d a t e t i m e T i m e D e l e t e O b j e c t s = 0 ;
b o o l S t o p T r a d e = f a l s e ;
b o o l S p r e a d O K ;
b o o l C a l l M a i n = f a l s e ;
b o o l C h a n g e A s k = f a l s e ;
b o o l C h a n g e B i d = f a l s e ;
b o o l T e s t i n g M o d e = f a l s e ;
b o o l N o t H a v e O p e n O r d e r s = t r u e ;
b o o l T i m e T o T r a d e ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i n t M a g i c S e t = 7 7 7 3 3 3 7 7 7 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
i n t O n I n i t ( )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / S e t t i m e r
E v e n t S e t M i l l i s e c o n d T i m e r ( 1 0 ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / R e s e t v a l u e
C o u n t T i m e s M o d i f y = 0 ;
C o u n t T i c k S p r e a d P a i r = 0 ;
C o u n t H i s t o r y = 0 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / B a c k g r o u n d
C h a r t C o l o r = C h a r t G e t I n t e g e r ( 0 , C H A R T _ C O L O R _ B A C K G R O U N D , 0 ) ;
B a c k g r o u n d N a m e = " B a c k g r o u n d - " + W i n d o w E x p e r t N a m e ( ) ;
/ / - - -
i f ( O b j e c t F i n d ( B a c k g r o u n d N a m e ) = = - 1 )
C h a r t B a c k g r o u n d ( B a c k g r o u n d N a m e , ( c o l o r ) C h a r t C o l o r , 0 , 1 5 , 1 8 2 , 2 0 6 ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / N a m e s l i n e s o n s c r e e n
N a m e O f B u y S t o p L o s s L i n e = P R E F I X + " B u y S t o p L o s s L e v e l " ;
N a m e O f B u y T a k e P r o f i t L i n e = P R E F I X + " B u y T a k e P r o f i t L e v e l " ;
N a m e O f S e l l S t o p L o s s L i n e = P R E F I X + " S e l l S t o p L o s s L e v e l " ;
N a m e O f S e l l T a k e P r o f i t L i n e = P R E F I X + " S e l l T a k e P r o f i t L e v e l " ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / S y m b o l s u f f i x a n d i n f o
S y m b o l U s e = S y m b o l ( ) ;
A r r a y I n i t i a l i z e ( A r r a y S p r e a d P a i r , 0 ) ;
A r r a y I n i t i a l i z e ( A r r a y E x e c u t i o n , 0 ) ;
i f ( S t r i n g L e n ( S y m b o l U s e ) > 6 )
S y m b o l E x t e n s i o n = S t r i n g S u b s t r ( S y m b o l U s e , 6 , 0 ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C o n f i r m p o i n t s
M u l t i p l i e r P o i n t = 1 ;
i f ( M a r k e t I n f o ( " E U R U S D " + S y m b o l E x t e n s i o n , M O D E _ D I G I T S ) = = 5 )
M u l t i p l i e r P o i n t = 1 0 ;
i f ( ( M a r k e t I n f o ( S y m b o l U s e , M O D E _ B I D ) > 9 9 9 . 9 9 9 ) & & ( M a r k e t I n f o ( " E U R U S D " + S y m b o l E x t e n s i o n , M O D E _ D I G I T S ) = = 5 ) & & ( M a r k e t I n f o ( S y m b o l U s e , M O D E _ D I G I T S ) = = 3 ) )
M u l t i p l i e r P o i n t = 1 0 0 ;
D i g i t s P o i n t s = P o i n t * M u l t i p l i e r P o i n t ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C o m m i s s i o n s
M o d e T i c k V a l u e = M a r k e t I n f o ( S y m b o l U s e , M O D E _ T I C K V A L U E ) * M u l t i p l i e r P o i n t ;
B r o k e r C o m m i s s i o n = ( C o m m i s s i o n I n C u r / M a t h M a x ( 1 , M o d e T i c k V a l u e ) ) + C o m m i s s i o n I n P i p ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / S e t m i n i m u m a n d m a x i m u m r a n g e
i f ( R i s k F a c t o r < 1 )
R i s k F a c t o r = 1 ;
i f ( R i s k F a c t o r > 5 0 )
R i s k F a c t o r = 5 0 ;
i f ( O r d e r s I D < 0 )
O r d e r s I D = 0 ;
i f ( M a x S p r e a d < 0 )
M a x S p r e a d = 0 ;
i f ( T i m e s F o r A v e r a g e > 1 0 0 )
T i m e s F o r A v e r a g e = 1 0 0 ;
i f ( T i m e s F o r A v e r a g e < 1 )
T i m e s F o r A v e r a g e = 1 ;
/ / i f ( S t e p M o d i f y O r d e r s > O r d e r s S t o p L o s s ) S t e p M o d i f y O r d e r s = O r d e r s S t o p L o s s ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C o n f i r m p i p s f o r x a u u s d
i f ( ( M a r k e t I n f o ( S y m b o l U s e , M O D E _ B I D ) > 9 9 9 . 9 9 9 ) & & ( M a r k e t I n f o ( " E U R U S D " + S y m b o l E x t e n s i o n , M O D E _ D I G I T S ) = = 5 ) & & ( M a r k e t I n f o ( S y m b o l U s e , M O D E _ D I G I T S ) = = 3 ) )
M a x S p r e a d * = 1 0 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / E x p e r t I D
M a g i c N u m b e r = O r d e r s I D ;
/ / - - -
i f ( O r d e r s I D = = 0 )
{
f o r ( i n t c n t = 0 ; c n t < S t r i n g L e n ( S y m b o l U s e ) ; c n t + + )
M a g i c N u m b e r + = ( S t r i n g G e t C h a r ( S y m b o l U s e , c n t ) * ( c n t + 1 ) ) + M a g i c S e t ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / G e t s t o p l e v e l
S t o p L e v e l = N o r m a l i z e D o u b l e ( M a t h M a x ( M a r k e t I n f o ( S y m b o l U s e , M O D E _ F R E E Z E L E V E L ) , M a r k e t I n f o ( S y m b o l U s e , M O D E _ S T O P L E V E L ) ) / M u l t i p l i e r P o i n t , 2 ) ;
i f ( A c c e p t S t o p L e v e l < S t o p L e v e l )
S t o p T r a d e = t r u e ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / S e t s u s e f o r b a c k t e s t
i f ( ! I s V i s u a l M o d e ( ) )
{
i f ( ( I s T e s t i n g ( ) ) | | ( I s O p t i m i z a t i o n ( ) ) )
{
S h o w V i r t u a l L e v e l s = f a l s e ;
T y p e O f S p r e a d U s e = 1 ;
D e l e t e O b j e c t s = f a l s e ;
}
}
/ / - - -
i f ( I s V i s u a l M o d e ( ) )
D e l e t e O b j e c t s = f a l s e ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C a l l o n t i c k
i f ( ( ! I s T e s t i n g ( ) ) | | ( ! I s V i s u a l M o d e ( ) ) )
O n T i c k ( ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / M o d e
i f ( ( I s T e s t i n g ( ) ) | | ( I s V i s u a l M o d e ( ) ) )
T e s t i n g M o d e = t r u e ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
r e t u r n ( I N I T _ S U C C E E D E D ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d O n D e i n i t ( c o n s t i n t r e a s o n )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / P r i n t i n f o r m a t i o n i n b a c k t e s t i n g
i f ( ( I s T e s t i n g ( ) ) & & ( B a c k t e s t t i n g I n f o = = t r u e ) )
{
H i s t o r y R e s u l t s ( ) ;
P r i n t ( " < = = = = = B A C K T E S T / H I S T O R Y R E P O R T = = = = = > " ) ;
P r i n t ( " A v e r a g e D u r a t i o n : " + D o u b l e T o S t r ( A v r g D u r a t i o n , 2 ) + " s e c | | T o t a l T r a d e s : " + D o u b l e T o S t r ( T o t a l T r a d e s , 0 ) ) ;
P r i n t ( " A v e r a g e P r o f i t s : " + D o u b l e T o S t r ( A v r g P i p s P r o f i t , 2 ) + " p i p s | | W i n T r a d e s : " + D o u b l e T o S t r ( W i n T r a d e s , 0 ) ) ;
P r i n t ( " A v e r a g e L o s s : " + D o u b l e T o S t r ( A v r g P i p s L o s s , 2 ) + " p i p s | | L o s s T r a d e s : " + D o u b l e T o S t r ( L o s s T r a d e s , 0 ) ) ;
P r i n t ( " S e n d M e s s a g e s : " + D o u b l e T o S t r ( S e n d M e s s a g e s , 0 ) ) ;
P r i n t ( " < = = = = = B A C K T E S T / H I S T O R Y R E P O R T = = = = = > " ) ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C l e a r c h a r t
E v e n t K i l l T i m e r ( ) ;
O b j e c t D e l e t e ( B a c k g r o u n d N a m e ) ;
C o m m e n t ( " " ) ;
i f ( O b j e c t F i n d ( N a m e O f S e l l S t o p L o s s L i n e ) > - 1 )
O b j e c t D e l e t e ( N a m e O f S e l l S t o p L o s s L i n e ) ;
i f ( O b j e c t F i n d ( N a m e O f S e l l T a k e P r o f i t L i n e ) > - 1 )
O b j e c t D e l e t e ( N a m e O f S e l l T a k e P r o f i t L i n e ) ;
i f ( O b j e c t F i n d ( N a m e O f B u y S t o p L o s s L i n e ) > - 1 )
O b j e c t D e l e t e ( N a m e O f B u y S t o p L o s s L i n e ) ;
i f ( O b j e c t F i n d ( N a m e O f B u y T a k e P r o f i t L i n e ) > - 1 )
O b j e c t D e l e t e ( N a m e O f B u y T a k e P r o f i t L i n e ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d O n T i c k ( )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / R e s e t v a l u e s
C a l l M a i n = t r u e ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / S t o p l e v e l w a r n i n g
i f ( S t o p T r a d e = = t r u e )
{
i f ( I s T e s t i n g ( ) )
P r i n t ( " B r o k e r S t o p L e v e l I s T o o H i g h , E x p e r t N o t T r a d e ! ! ! " ) ;
S c r e e n C o m m e n t ( 4 ) ;
S l e e p ( 3 0 0 0 0 0 ) ;
r e t u r n ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / F o r t e s t i n g
i f ( ( I s T e s t i n g ( ) ) | | ( I s O p t i m i z a t i o n ( ) ) | | ( I s V i s u a l M o d e ( ) ) )
{
C a l l M a i n = f a l s e ;
M a i n F u n c t i o n ( ) ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d O n T i m e r ( )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / F o r t e s t i n g
i f ( ( I s T e s t i n g ( ) ) | | ( I s O p t i m i z a t i o n ( ) ) | | ( I s V i s u a l M o d e ( ) ) )
r e t u r n ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C a l l m a i n f u n c t i o n
i f ( I s T r a d e A l l o w e d ( ) = = t r u e )
{
i f ( C a l l M a i n = = t r u e )
M a i n F u n c t i o n ( ) ;
}
e l s e
S c r e e n C o m m e n t ( 5 ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d M a i n F u n c t i o n ( )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / R e s e t v a l u e
C h a n g e A s k = f a l s e ;
C h a n g e B i d = f a l s e ;
S p r e a d O K = t r u e ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C h e c k D i f f e r e n t p r i c e
i f ( ( N o r m a l i z e D o u b l e ( B i d , D i g i t s ) ! = N o r m a l i z e D o u b l e ( L a s t B i d , D i g i t s ) ) | | ( N o r m a l i z e D o u b l e ( A s k , D i g i t s ) ! = N o r m a l i z e D o u b l e ( L a s t A s k , D i g i t s ) ) | | ( I s T e s t i n g ( ) ) )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / T i m e f i l t e r
i f ( U s e T i m e F i l t e r = = t r u e )
{
T i m e T o T r a d e = f a l s e ;
/ / - - -
i f ( ( S t r i n g T o T i m e ( T i m e S t a r t T r a d e ) < S t r i n g T o T i m e ( T i m e S t o p T r a d e ) ) & & ( ( T i m e G M T ( ) > = S t r i n g T o T i m e ( T i m e S t a r t T r a d e ) ) & & ( T i m e G M T ( ) < S t r i n g T o T i m e ( T i m e S t o p T r a d e ) ) ) )
T i m e T o T r a d e = t r u e ;
i f ( ( S t r i n g T o T i m e ( T i m e S t a r t T r a d e ) > S t r i n g T o T i m e ( T i m e S t o p T r a d e ) ) & & ( ( T i m e G M T ( ) > = S t r i n g T o T i m e ( T i m e S t a r t T r a d e ) ) | | ( T i m e G M T ( ) < S t r i n g T o T i m e ( T i m e S t o p T r a d e ) ) ) )
T i m e T o T r a d e = t r u e ;
/ / - - -
i f ( T i m e T o T r a d e = = f a l s e )
{
S c r e e n C o m m e n t ( 6 ) ;
}
}
e l s e
T i m e T o T r a d e = t r u e ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C h e c k o r d e r s
C o u n t O r d e r s ( ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / I f c h a n g e p r i c e s
i f ( N o r m a l i z e D o u b l e ( A s k , D i g i t s ) ! = N o r m a l i z e D o u b l e ( L a s t A s k , D i g i t s ) )
C h a n g e A s k = t r u e ;
i f ( N o r m a l i z e D o u b l e ( B i d , D i g i t s ) ! = N o r m a l i z e D o u b l e ( L a s t B i d , D i g i t s ) )
C h a n g e B i d = t r u e ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / G e t l a s t p r i c e s
L a s t B i d = N o r m a l i z e D o u b l e ( B i d , D i g i t s ) ;
L a s t A s k = N o r m a l i z e D o u b l e ( A s k , D i g i t s ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / G e t s p r e a d
S p r e a d P i p s = ( A s k - B i d ) / D i g i t s P o i n t s ;
i f ( C o u n t A v g S p r e a d = = t r u e )
G e t A v r g S p r e a d ( S p r e a d P i p s ) ;
i f ( T y p e O f S p r e a d U s e = = 0 )
S p r e a d L i m i t = A v g S p r e a d ; / / U s e a v e r a g e
i f ( T y p e O f S p r e a d U s e = = 1 )
S p r e a d L i m i t = S p r e a d P i p s ; / / U s e c u r r e n t
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / S e t c o m m i s s i o n
i f ( G e t C o m m i s s i o n A u t o = = f a l s e )
R e a l C o m m i s s i o n = B r o k e r C o m m i s s i o n ;
i f ( ( G e t C o m m i s s i o n A u t o = = t r u e ) & & ( C n t B u y + C n t S e l l = = 0 ) & & ( N o t H a v e O p e n O r d e r s = = t r u e ) )
{
R e a l C o m m i s s i o n = B r o k e r C o m m i s s i o n ;
S h o w I n f o C o m m i s s i o n = " W a i t i n g T r a d e s . . . " ;
}
i f ( ( G e t C o m m i s s i o n A u t o = = t r u e ) & & ( C n t B u y + C n t S e l l ! = 0 ) )
{
R e a l C o m m i s s i o n = ( G e t C o m m i s s i o n P a i r / M a t h M a x ( 1 , M o d e T i c k V a l u e ) ) ;
S h o w I n f o C o m m i s s i o n = D o u b l e T o S t r ( R e a l C o m m i s s i o n , 2 ) + " ( p i p s ) " ;
N o t H a v e O p e n O r d e r s = f a l s e ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / S p r e a d w a r n i n g
i f ( T i m e T o T r a d e = = t r u e )
{
i f ( ( S p r e a d L i m i t + R e a l C o m m i s s i o n > M a x S p r e a d ) & & ( M a x S p r e a d > 0 ) )
{
i f ( I s T e s t i n g ( ) )
P r i n t ( " S p r e a d I s T o o H i g h , E x p e r t N o t T r a d e ! ! ! " ) ;
S c r e e n C o m m e n t ( 2 ) ;
S p r e a d O K = f a l s e ;
}
e l s e
{
S c r e e n C o m m e n t ( 1 ) ;
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C o u n t l o t s i z e
i f ( A u t o L o t S i z e = = t r u e )
L o t S i z e = M a t h M i n ( M a t h M a x ( ( M a t h R o u n d ( ( A c c o u n t E q u i t y ( ) * R i s k F a c t o r / 1 0 0 0 0 0 ) / M a r k e t I n f o ( S y m b o l ( ) , M O D E _ L O T S T E P ) ) * M a r k e t I n f o ( S y m b o l ( ) , M O D E _ L O T S T E P ) ) , M a r k e t I n f o ( S y m b o l ( ) , M O D E _ M I N L O T ) ) , M a r k e t I n f o ( S y m b o l ( ) , M O D E _ M A X L O T ) ) ;
i f ( A u t o L o t S i z e = = f a l s e )
L o t S i z e = M a t h M i n ( M a t h M a x ( ( M a t h R o u n d ( M a n u a l L o t S i z e / M a r k e t I n f o ( S y m b o l ( ) , M O D E _ L O T S T E P ) ) * M a r k e t I n f o ( S y m b o l ( ) , M O D E _ L O T S T E P ) ) , M a r k e t I n f o ( S y m b o l ( ) , M O D E _ M I N L O T ) ) , M a r k e t I n f o ( S y m b o l ( ) , M O D E _ M A X L O T ) ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / R e s e t v a l u e
i f ( C n t B u y = = 0 )
{
C o u n t T i c k M o d i f y B u y = 0 ;
V i r t u a l S t o p L o s s B u y = 0 ;
V i r t u a l T a k e P r o f i t B u y = 0 ;
}
/ / - - -
i f ( C n t S e l l = = 0 )
{
C o u n t T i c k M o d i f y S e l l = 0 ;
V i r t u a l S t o p L o s s S e l l = 0 ;
V i r t u a l T a k e P r o f i t S e l l = 0 ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / S e t l e v e l s f o r o r d e r s
P i p s L e v e l L o s s = O r d e r s S t o p L o s s ;
P i p s L e v e l P r o f i t = O r d e r s T a k e P r o f i t ;
P i p s S t e p M o d i f y = S t e p M o d i f y O r d e r s ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C o n f i r m p i p s l e v e l s
i f ( P i p s L e v e l L o s s < S t o p L e v e l )
P i p s L e v e l L o s s = S t o p L e v e l ;
i f ( P i p s L e v e l P r o f i t < S t o p L e v e l )
P i p s L e v e l P r o f i t = S t o p L e v e l ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / D e l e t e p e n d i n g a n d c l o s e m a r k e t i n o u t o f t i m e r a n g e
i f ( ( T i m e T o T r a d e = = f a l s e ) & & ( M a n a g e E x i s t O r d e r s > 0 ) )
{
/ / - - - C l o s e m a r k e t
i f ( ( M a n a g e E x i s t O r d e r s = = 2 ) | | ( M a n a g e E x i s t O r d e r s = = 3 ) )
{
i f ( C n t B u y > 0 )
C l o s e O r d e r s ( O P _ B U Y ) ;
i f ( C n t S e l l > 0 )
C l o s e O r d e r s ( O P _ S E L L ) ;
}
/ / - - - D e l e t e p e n d i n g
i f ( ( M a n a g e E x i s t O r d e r s = = 1 ) | | ( M a n a g e E x i s t O r d e r s = = 3 ) )
{
i f ( C n t B u y L i m i t > 0 )
D e l e t e O r d e r s ( O P _ B U Y L I M I T ) ;
i f ( C n t S e l l L i m i t > 0 )
D e l e t e O r d e r s ( O P _ S E L L L I M I T ) ;
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / O p e r a t i o n o n h i g h s p r e a d
i f ( T o t a l O r d e r s > 0 )
{
i f ( S p r e a d O K = = f a l s e )
{
/ / - - - M o v e l e v e l s
i f ( H i g h S p r e a d A c t i o n = = 0 )
{
P i p s L e v e l L o s s * = M u l t i p l i e r I n c r e a s e ;
P i p s L e v e l P r o f i t * = M u l t i p l i e r I n c r e a s e ;
P i p s S t e p M o d i f y * = M u l t i p l i e r I n c r e a s e ;
}
/ / - - - C l o s e a n d d e l e t e o r d e r s
i f ( H i g h S p r e a d A c t i o n = = 1 )
{
i f ( C n t B u y > 0 )
C l o s e O r d e r s ( O P _ B U Y ) ;
i f ( C n t S e l l > 0 )
C l o s e O r d e r s ( O P _ S E L L ) ;
i f ( C n t B u y L i m i t > 0 )
D e l e t e O r d e r s ( O P _ B U Y L I M I T ) ;
i f ( C n t S e l l L i m i t > 0 )
D e l e t e O r d e r s ( O P _ S E L L L I M I T ) ;
r e t u r n ;
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / M o d i f y o r d e r s
i f ( C n t B u y > 0 )
M o d i f y M a r k e t O r d e r s ( O P _ B U Y ) ;
i f ( C n t S e l l > 0 )
M o d i f y M a r k e t O r d e r s ( O P _ S E L L ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / G e t h i s t o r y r e s u l t s
i f ( C o u n t H i s t o r y < 3 )
{
C o u n t H i s t o r y + + ;
H i s t o r y R e s u l t s ( ) ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C l e a r c h a r t
i f ( D e l e t e O b j e c t s = = t r u e )
C l e a r C h a r t ( ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / R e t u r n i f a r e o p e n e d b u y a n d s e l l o r t h e r e a r e l i m i t a t i o n
i f ( ( C n t B u y = = 1 ) & & ( C n t S e l l = = 1 ) & & ( ( ( C n t B u y L i m i t = = 1 ) & & ( C n t S e l l L i m i t = = 1 ) ) | | ( U s e P e n d i n g O r d e r s = = f a l s e ) ) )
r e t u r n ;
i f ( S p r e a d O K = = f a l s e )
r e t u r n ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / O p e n m a r k e t o r d e r s
i f ( ( ( C n t B u y = = 0 ) | | ( C n t S e l l = = 0 ) ) & & ( C h e c k M a r g i n ( ) = = 1 ) & & ( T i m e T o T r a d e = = t r u e ) )
{
H i s t o r y R e s u l t s ( ) ;
/ / - - -
i f ( P i p s R e p l a c e O r d e r s > 0 )
{
i f ( ( ( ( C u r r e n t D i s t a n c e B u y > = P i p s R e p l a c e O r d e r s ) | | ( C u r r e n t D i s t a n c e B u y < = - ( P i p s R e p l a c e O r d e r s * S a f e M u l t i p l i e r ) ) ) & & ( C n t B u y = = 0 ) ) | | ( C n t B u y + C n t S e l l = = 0 ) )
O p e n O r d e r s ( O P _ B U Y ) ;
i f ( ( ( ( C u r r e n t D i s t a n c e S e l l > = P i p s R e p l a c e O r d e r s ) | | ( C u r r e n t D i s t a n c e S e l l < = - ( P i p s R e p l a c e O r d e r s * S a f e M u l t i p l i e r ) ) ) & & ( C n t S e l l = = 0 ) ) | | ( C n t B u y + C n t S e l l = = 0 ) )
O p e n O r d e r s ( O P _ S E L L ) ;
}
/ / - - -
i f ( P i p s R e p l a c e O r d e r s < 0 )
{
i f ( ( ( ( C u r r e n t D i s t a n c e B u y < = P i p s R e p l a c e O r d e r s ) | | ( C u r r e n t D i s t a n c e B u y > = - ( P i p s R e p l a c e O r d e r s * S a f e M u l t i p l i e r ) ) ) & & ( C n t B u y = = 0 ) ) | | ( C n t B u y + C n t S e l l = = 0 ) )
O p e n O r d e r s ( O P _ B U Y ) ;
i f ( ( ( ( C u r r e n t D i s t a n c e S e l l < = P i p s R e p l a c e O r d e r s ) | | ( C u r r e n t D i s t a n c e S e l l > = - ( P i p s R e p l a c e O r d e r s * S a f e M u l t i p l i e r ) ) ) & & ( C n t S e l l = = 0 ) ) | | ( C n t B u y + C n t S e l l = = 0 ) )
O p e n O r d e r s ( O P _ S E L L ) ;
}
/ / - - -
i f ( P i p s R e p l a c e O r d e r s = = 0 )
{
i f ( C n t B u y = = 0 )
O p e n O r d e r s ( O P _ B U Y ) ;
i f ( C n t S e l l = = 0 )
O p e n O r d e r s ( O P _ S E L L ) ;
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / O p e n p e n d i n g o r d e r s
i f ( ( U s e P e n d i n g O r d e r s = = t r u e ) & & ( C n t B u y > 0 ) & & ( C n t S e l l > 0 ) & & ( T i m e T o T r a d e = = t r u e ) )
{
i f ( ( ( C n t B u y L i m i t = = 0 ) | | ( C n t S e l l L i m i t = = 0 ) ) & & ( C h e c k M a r g i n ( ) = = 1 ) )
{
H i s t o r y R e s u l t s ( ) ;
/ / - - -
i f ( C n t B u y L i m i t = = 0 )
O p e n O r d e r s ( O P _ B U Y L I M I T ) ;
i f ( C n t S e l l L i m i t = = 0 )
O p e n O r d e r s ( O P _ S E L L L I M I T ) ;
}
}
/ / - - -
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
i n t C h e c k M a r g i n ( )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
C h e c k M a r g i n 1 = 0 ;
C h e c k M a r g i n 2 = 0 ;
S u m M a r g i n = 0 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
C h e c k M a r g i n 1 = A c c o u n t F r e e M a r g i n ( ) - A c c o u n t F r e e M a r g i n C h e c k ( S y m b o l ( ) , O P _ B U Y , L o t S i z e ) ;
C h e c k M a r g i n 2 = A c c o u n t F r e e M a r g i n ( ) - A c c o u n t F r e e M a r g i n C h e c k ( S y m b o l ( ) , O P _ S E L L , L o t S i z e ) ;
S u m M a r g i n = A c c o u n t F r e e M a r g i n ( ) - M a t h M a x ( C h e c k M a r g i n 1 , C h e c k M a r g i n 2 ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( S u m M a r g i n < = 0 . 0 )
{
i f ( I s T e s t i n g ( ) )
P r i n t ( " M a r g i n A c c o u n t I s T o o L o w , E x p e r t N o t T r a d e ! ! ! " ) ;
S c r e e n C o m m e n t ( 3 ) ;
r e t u r n ( 0 ) ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
r e t u r n ( 1 ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d O p e n O r d e r s ( i n t T y p e O f O r d e r )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i n t T i c k e t B u y = - 1 ;
i n t T i c k e t S e l l = - 1 ;
i n t T i c k e t B u y L i m i t = - 1 ;
i n t T i c k e t S e l l L i m i t = - 1 ;
d o u b l e S L _ B u y = 0 ;
d o u b l e T P _ B u y = 0 ;
d o u b l e S L _ S e l l = 0 ;
d o u b l e T P _ S e l l = 0 ;
d o u b l e P r i c e B u y L i m i t = 0 ;
d o u b l e P r i c e S e l l L i m i t = 0 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
T r y T i m e s = 0 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / O p e n o r d e r s
w h i l e ( t r u e )
{
T r y T i m e s + + ;
O p e r a t i o n D e l a y = 0 ;
T i m e T o S e n d = G e t T i c k C o u n t ( ) ;
/ / - - - O p e n B u y
i f ( T y p e O f O r d e r = = O P _ B U Y )
{
i f ( U s e V i r t u a l L e v e l s = = f a l s e )
{
S L _ B u y = N o r m a l i z e D o u b l e ( B i d - ( P i p s L e v e l L o s s * D i g i t s P o i n t s ) , D i g i t s ) ;
i f ( P u t T a k e P r o f i t = = t r u e )
T P _ B u y = N o r m a l i z e D o u b l e ( A s k + ( P i p s L e v e l P r o f i t * D i g i t s P o i n t s ) , D i g i t s ) ;
}
/ / - - -
T i c k e t B u y = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , L o t S i z e , N o r m a l i z e D o u b l e ( A s k , D i g i t s ) , S l i p p a g e , S L _ B u y , T P _ B u y , E x p e r t C o m m e n t s , M a g i c N u m b e r , 0 , c l r B l u e ) ;
/ / - - -
i f ( T e s t i n g M o d e = = t r u e )
S e n d M e s s a g e s + + ;
/ / - - - E x i t l o o p
i f ( T i c k e t B u y > 0 )
{
O p e r a t i o n D e l a y = G e t T i c k C o u n t ( ) - T i m e T o S e n d ;
i f ( O p e r a t i o n D e l a y > 0 )
{
L a s t O p e r a t i o n D e l a y = O p e r a t i o n D e l a y ;
i f ( T i c k s G e t < 3 0 )
T i c k s G e t + + ;
i f ( C o u n t A v g E x e c u t i o n = = t r u e )
C o u n t A v r g E x e c u t i o n ( O p e r a t i o n D e l a y ) ;
}
b r e a k ;
}
e l s e
{
R e f r e s h R a t e s ( ) ;
P r i n t ( " E r r o r : " , D o u b l e T o S t r ( G e t L a s t E r r o r ( ) , 0 ) + " | | " + E x p e r t C o m m e n t s + " : r e c e i v e s n e w d a t a a n d t r y a g a i n o p e n b u y o r d e r " ) ;
i f ( T r y T i m e s > = 3 )
b r e a k ;
}
}
/ / - - - O p e n B u y L i m i t
i f ( T y p e O f O r d e r = = O P _ B U Y L I M I T )
{
P r i c e B u y L i m i t = N o r m a l i z e D o u b l e ( B i d - ( ( P i p s L e v e l L o s s + D i s t a n c e P e n d i n g ) * D i g i t s P o i n t s ) , D i g i t s ) ;
/ / - - -
T i c k e t B u y L i m i t = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y L I M I T , L o t S i z e , P r i c e B u y L i m i t , S l i p p a g e , 0 , 0 , E x p e r t C o m m e n t s , M a g i c N u m b e r , 0 , c l r B l u e ) ;
/ / - - -
i f ( T e s t i n g M o d e = = t r u e )
S e n d M e s s a g e s + + ;
/ / - - - E x i t l o o p
i f ( T i c k e t B u y L i m i t > 0 )
{
O p e r a t i o n D e l a y = G e t T i c k C o u n t ( ) - T i m e T o S e n d ;
i f ( O p e r a t i o n D e l a y > 0 )
{
L a s t O p e r a t i o n D e l a y = O p e r a t i o n D e l a y ;
i f ( T i c k s G e t < 3 0 )
T i c k s G e t + + ;
i f ( C o u n t A v g E x e c u t i o n = = t r u e )
C o u n t A v r g E x e c u t i o n ( O p e r a t i o n D e l a y ) ;
}
b r e a k ;
}
e l s e
{
R e f r e s h R a t e s ( ) ;
P r i n t ( " E r r o r : " , D o u b l e T o S t r ( G e t L a s t E r r o r ( ) , 0 ) + " | | " + E x p e r t C o m m e n t s + " : r e c e i v e s n e w d a t a a n d t r y a g a i n o p e n b u y l i m i t o r d e r " ) ;
i f ( T r y T i m e s > = 3 )
b r e a k ;
}
}
/ / - - - O p e n S e l l
i f ( T y p e O f O r d e r = = O P _ S E L L )
{
i f ( U s e V i r t u a l L e v e l s = = f a l s e )
{
S L _ S e l l = N o r m a l i z e D o u b l e ( A s k + ( P i p s L e v e l L o s s * D i g i t s P o i n t s ) , D i g i t s ) ;
i f ( P u t T a k e P r o f i t = = t r u e )
T P _ S e l l = N o r m a l i z e D o u b l e ( B i d - ( P i p s L e v e l P r o f i t * D i g i t s P o i n t s ) , D i g i t s ) ;
}
/ / - - -
T i c k e t S e l l = 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 i z e , N o r m a l i z e D o u b l e ( B i d , D i g i t s ) , S l i p p a g e , S L _ S e l l , T P _ S e l l , E x p e r t C o m m e n t s , M a g i c N u m b e r , 0 , c l r R e d ) ;
/ / - - -
i f ( T e s t i n g M o d e = = t r u e )
S e n d M e s s a g e s + + ;
/ / - - - E x i t l o o p
i f ( T i c k e t S e l l > 0 )
{
O p e r a t i o n D e l a y = G e t T i c k C o u n t ( ) - T i m e T o S e n d ;
i f ( O p e r a t i o n D e l a y > 0 )
{
L a s t O p e r a t i o n D e l a y = O p e r a t i o n D e l a y ;
i f ( T i c k s G e t < 3 0 )
T i c k s G e t + + ;
i f ( C o u n t A v g E x e c u t i o n = = t r u e )
C o u n t A v r g E x e c u t i o n ( O p e r a t i o n D e l a y ) ;
}
b r e a k ;
}
e l s e
{
R e f r e s h R a t e s ( ) ;
P r i n t ( " E r r o r : " , D o u b l e T o S t r ( G e t L a s t E r r o r ( ) , 0 ) + " | | " + E x p e r t C o m m e n t s + " : r e c e i v e s n e w d a t a a n d t r y a g a i n o p e n s e l l o r d e r " ) ;
i f ( T r y T i m e s > = 3 )
b r e a k ;
}
}
/ / - - - O p e n S e l l L i m i t
i f ( T y p e O f O r d e r = = O P _ S E L L L I M I T )
{
P r i c e S e l l L i m i t = N o r m a l i z e D o u b l e ( A s k + ( ( P i p s L e v e l L o s s + D i s t a n c e P e n d i n g ) * D i g i t s P o i n t s ) , D i g i t s ) ;
/ / - - -
T i c k e t S e l l L i m i t = O r d e r S e n d ( S y m b o l ( ) , O P _ S E L L L I M I T , L o t S i z e , P r i c e S e l l L i m i t , S l i p p a g e , 0 , 0 , E x p e r t C o m m e n t s , M a g i c N u m b e r , 0 , c l r R e d ) ;
/ / - - -
i f ( T e s t i n g M o d e = = t r u e )
S e n d M e s s a g e s + + ;
/ / - - - E x i t l o o p
i f ( T i c k e t S e l l L i m i t > 0 )
{
O p e r a t i o n D e l a y = G e t T i c k C o u n t ( ) - T i m e T o S e n d ;
i f ( O p e r a t i o n D e l a y > 0 )
{
L a s t O p e r a t i o n D e l a y = O p e r a t i o n D e l a y ;
i f ( T i c k s G e t < 3 0 )
T i c k s G e t + + ;
i f ( C o u n t A v g E x e c u t i o n = = t r u e )
C o u n t A v r g E x e c u t i o n ( O p e r a t i o n D e l a y ) ;
}
b r e a k ;
}
e l s e
{
R e f r e s h R a t e s ( ) ;
P r i n t ( " E r r o r : " , D o u b l e T o S t r ( G e t L a s t E r r o r ( ) , 0 ) + " | | " + E x p e r t C o m m e n t s + " : r e c e i v e s n e w d a t a a n d t r y a g a i n o p e n s e l l l i m i t o r d e r " ) ;
i f ( T r y T i m e s > = 3 )
b r e a k ;
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d M o d i f y M a r k e t O r d e r s ( i n t T y p e O f O r d e r )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
b o o l M o d i f y B u y = f a l s e ;
b o o l M o d i f y S e l l = f a l s e ;
d o u b l e S L _ B u y = 0 ;
d o u b l e T P _ B u y = 0 ;
d o u b l e S L _ S e l l = 0 ;
d o u b l e T P _ S e l l = 0 ;
d o u b l e O r d e r S t o p L o s s B u y = 0 ;
d o u b l e O r d e r S t o p L o s s S e l l = 0 ;
d o u b l e O r d e r T a k e P r o f i t B u y = 0 ;
d o u b l e O r d e r T a k e P r o f i t S e l l = 0 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C o u n t t i c k s f o r m o d i f y
i f ( C h a n g e A s k = = t r u e )
C o u n t T i c k M o d i f y B u y + + ;
i f ( C h a n g e B i d = = t r u e )
C o u n t T i c k M o d i f y S e l l + + ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C l o s e o r d e r s
i f ( U s e V i r t u a l L e v e l s = = t r u e )
{
i f ( ( C n t B u y > 0 ) & & ( C n t S e l l > 0 ) )
{
/ / - - C l o s e b u y
i f ( ( C n t B u y > 0 ) & & ( V i r t u a l S t o p L o s s B u y > 0 ) & & ( ( V i r t u a l T a k e P r o f i t B u y > 0 ) | | ( P u t T a k e P r o f i t = = f a l s e ) ) & & ( ( B i d < = V i r t u a l S t o p L o s s B u y ) | | ( ( B i d > = V i r t u a l T a k e P r o f i t B u y ) & & ( P u t T a k e P r o f i t = = t r u e ) ) ) )
{
C l o s e O r d e r s ( O P _ B U Y ) ;
V i r t u a l S t o p L o s s B u y = 0 ;
V i r t u a l T a k e P r o f i t B u y = 0 ;
r e t u r n ;
}
/ / - - - C l o s e s e l l
i f ( ( C n t S e l l > 0 ) & & ( V i r t u a l S t o p L o s s S e l l > 0 ) & & ( ( V i r t u a l T a k e P r o f i t S e l l > 0 ) | | ( P u t T a k e P r o f i t = = f a l s e ) ) & & ( ( A s k > = V i r t u a l S t o p L o s s S e l l ) | | ( ( A s k < = V i r t u a l T a k e P r o f i t S e l l ) & & ( P u t T a k e P r o f i t = = t r u e ) ) ) )
{
C l o s e O r d e r s ( O P _ S E L L ) ;
V i r t u a l S t o p L o s s S e l l = 0 ;
V i r t u a l T a k e P r o f i t S e l l = 0 ;
r e t u r n ;
}
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
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 ) = = t r u e )
{
i f ( ( O r d e r M a g i c N u m b e r ( ) = = M a g i c N u m b e r ) & & ( O r d e r S y m b o l ( ) = = S y m b o l ( ) ) )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / M o d i f y b u y
i f ( O r d e r T y p e ( ) = = O P _ B U Y )
{
i f ( ( ( C o u n t T i c k M o d i f y B u y > = D e l a y M o d i f y O r d e r s ) | | ( ( O r d e r S t o p L o s s ( ) = = 0 ) & & ( U s e V i r t u a l L e v e l s = = f a l s e ) ) | | ( ( V i r t u a l S t o p L o s s B u y = = 0 ) & & ( U s e V i r t u a l L e v e l s = = t r u e ) ) ) & & ( T y p e O f O r d e r = = O P _ B U Y ) )
{
S L _ B u y = N o r m a l i z e D o u b l e ( B i d - ( P i p s L e v e l L o s s * D i g i t s P o i n t s ) , D i g i t s ) ;
i f ( P u t T a k e P r o f i t = = t r u e )
T P _ B u y = N o r m a l i z e D o u b l e ( A s k + ( P i p s L e v e l P r o f i t * D i g i t s P o i n t s ) , D i g i t s ) ;
/ / - - -
i f ( U s e V i r t u a l L e v e l s = = f a l s e )
{
O r d e r S t o p L o s s B u y = N o r m a l i z e D o u b l e ( O r d e r S t o p L o s s ( ) , D i g i t s ) ;
O r d e r T a k e P r o f i t B u y = N o r m a l i z e D o u b l e ( O r d e r T a k e P r o f i t ( ) , D i g i t s ) ;
}
/ / - - -
i f ( U s e V i r t u a l L e v e l s = = t r u e )
{
O r d e r S t o p L o s s B u y = N o r m a l i z e D o u b l e ( V i r t u a l S t o p L o s s B u y , D i g i t s ) ;
O r d e r T a k e P r o f i t B u y = N o r m a l i z e D o u b l e ( V i r t u a l T a k e P r o f i t B u y , D i g i t s ) ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( ( ( ( ( P u t T a k e P r o f i t = = t r u e ) & & ( N o r m a l i z e D o u b l e ( O r d e r T a k e P r o f i t B u y , D i g i t s ) ! = N o r m a l i z e D o u b l e ( T P _ B u y , D i g i t s ) ) & &
( ( N o r m a l i z e D o u b l e ( O r d e r T a k e P r o f i t B u y - A s k , D i g i t s ) < = N o r m a l i z e D o u b l e ( ( ( P i p s L e v e l P r o f i t - P i p s S t e p M o d i f y ) * D i g i t s P o i n t s ) , D i g i t s ) ) | |
( N o r m a l i z e D o u b l e ( O r d e r T a k e P r o f i t B u y - A s k , D i g i t s ) > = N o r m a l i z e D o u b l e ( ( ( P i p s L e v e l P r o f i t + P i p s S t e p M o d i f y ) * D i g i t s P o i n t s ) , D i g i t s ) ) ) ) | |
( ( N o r m a l i z e D o u b l e ( O r d e r S t o p L o s s B u y , D i g i t s ) ! = N o r m a l i z e D o u b l e ( S L _ B u y , D i g i t s ) ) & &
( ( N o r m a l i z e D o u b l e ( B i d - O r d e r S t o p L o s s B u y , D i g i t s ) < = N o r m a l i z e D o u b l e ( ( ( P i p s L e v e l L o s s - P i p s S t e p M o d i f y ) * D i g i t s P o i n t s ) , D i g i t s ) ) | |
( N o r m a l i z e D o u b l e ( B i d - O r d e r S t o p L o s s B u y , D i g i t s ) > = N o r m a l i z e D o u b l e ( ( ( P i p s L e v e l L o s s + P i p s S t e p M o d i f y ) * D i g i t s P o i n t s ) , D i g i t s ) ) ) ) ) ) | |
( ( O r d e r S t o p L o s s ( ) = = 0 ) & & ( U s e V i r t u a l L e v e l s = = f a l s e ) ) | | ( ( V i r t u a l S t o p L o s s B u y = = 0 ) & & ( U s e V i r t u a l L e v e l s = = t r u e ) ) )
{
/ / - - - V i r t u a l l e v e l s
i f ( U s e V i r t u a l L e v e l s = = t r u e )
{
V i r t u a l S t o p L o s s B u y = S L _ B u y ;
V i r t u a l T a k e P r o f i t B u y = T P _ B u y ;
C o u n t T i c k M o d i f y B u y = 0 ;
i f ( S h o w V i r t u a l L e v e l s = = t r u e )
C r e a t L i n e s ( O P _ B U Y ) ;
i f ( ( U s e P e n d i n g O r d e r s = = t r u e ) & & ( C n t B u y L i m i t > 0 ) )
M o d i f y P e n d i n g O r d e r s ( O P _ B U Y L I M I T ) ;
b r e a k ;
}
/ / - - - N o r m a l l e v e l s
i f ( U s e V i r t u a l L e v e l s = = f a l s e )
{
T r y T i m e s = 0 ;
w h i l e ( t r u e )
{
T r y T i m e s + + ;
O p e r a t i o n D e l a y = 0 ;
T i m e T o S e n d = G e t T i c k C o u n t ( ) ;
/ / - - - M o d i f y
M o d i f y B u y = O r d e r M o d i f y ( O r d e r T i c k e t ( ) , 0 , S L _ B u y , T P _ B u y , 0 , c l r B l u e ) ;
/ / - - -
i f ( T e s t i n g M o d e = = t r u e )
S e n d M e s s a g e s + + ;
i f ( M o d i f y B u y = = t r u e )
{
/ / - - - M o d i f y p e n d i n g
i f ( ( U s e P e n d i n g O r d e r s = = t r u e ) & & ( C n t B u y L i m i t > 0 ) )
M o d i f y P e n d i n g O r d e r s ( O P _ B U Y L I M I T ) ;
/ / - - -
C o u n t T i c k M o d i f y B u y = 0 ;
O p e r a t i o n D e l a y = G e t T i c k C o u n t ( ) - T i m e T o S e n d ;
i f ( O p e r a t i o n D e l a y > 0 )
{
L a s t O p e r a t i o n D e l a y = O p e r a t i o n D e l a y ;
i f ( T i c k s G e t < 3 0 )
T i c k s G e t + + ;
i f ( C o u n t A v g E x e c u t i o n = = t r u e )
C o u n t A v r g E x e c u t i o n ( O p e r a t i o n D e l a y ) ;
}
b r e a k ;
}
e l s e
{
R e f r e s h R a t e s ( ) ;
S L _ B u y = N o r m a l i z e D o u b l e ( B i d - ( P i p s L e v e l L o s s * D i g i t s P o i n t s ) , D i g i t s ) ;
i f ( P u t T a k e P r o f i t = = t r u e )
T P _ B u y = N o r m a l i z e D o u b l e ( A s k + ( P i p s L e v e l P r o f i t * D i g i t s P o i n t s ) , D i g i t s ) ;
P r i n t ( " E r r o r : " , D o u b l e T o S t r ( G e t L a s t E r r o r ( ) , 0 ) + " | | " + E x p e r t C o m m e n t s + " : r e c e i v e s n e w d a t a a n d t r y a g a i n m o d i f y b u y o r d e r " ) ;
i f ( T r y T i m e s > = 3 )
b r e a k ;
}
}
}
}
b r e a k ;
} / / E n d i f ( ( C o u n t T i c k M o d i f y B u y > = . . . . . . . . . . . .
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / M o d i f y s e l l
i f ( O r d e r T y p e ( ) = = O P _ S E L L )
{
i f ( ( ( C o u n t T i c k M o d i f y S e l l > = D e l a y M o d i f y O r d e r s ) | | ( ( O r d e r S t o p L o s s ( ) = = 0 ) & & ( U s e V i r t u a l L e v e l s = = f a l s e ) ) | | ( ( V i r t u a l S t o p L o s s S e l l = = 0 ) & & ( U s e V i r t u a l L e v e l s = = t r u e ) ) ) & & ( T y p e O f O r d e r = = O P _ S E L L ) )
{
S L _ S e l l = N o r m a l i z e D o u b l e ( A s k + ( P i p s L e v e l L o s s * D i g i t s P o i n t s ) , D i g i t s ) ;
i f ( P u t T a k e P r o f i t = = t r u e )
T P _ S e l l = N o r m a l i z e D o u b l e ( B i d - ( P i p s L e v e l P r o f i t * D i g i t s P o i n t s ) , D i g i t s ) ;
/ / - - -
i f ( U s e V i r t u a l L e v e l s = = f a l s e )
{
O r d e r S t o p L o s s S e l l = N o r m a l i z e D o u b l e ( O r d e r S t o p L o s s ( ) , D i g i t s ) ;
O r d e r T a k e P r o f i t S e l l = N o r m a l i z e D o u b l e ( O r d e r T a k e P r o f i t ( ) , D i g i t s ) ;
}
/ / - - -
i f ( U s e V i r t u a l L e v e l s = = t r u e )
{
O r d e r S t o p L o s s S e l l = N o r m a l i z e D o u b l e ( V i r t u a l S t o p L o s s S e l l , D i g i t s ) ;
O r d e r T a k e P r o f i t S e l l = N o r m a l i z e D o u b l e ( V i r t u a l T a k e P r o f i t S e l l , D i g i t s ) ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( ( ( ( ( P u t T a k e P r o f i t = = t r u e ) & & ( N o r m a l i z e D o u b l e ( O r d e r T a k e P r o f i t S e l l , D i g i t s ) ! = N o r m a l i z e D o u b l e ( T P _ S e l l , D i g i t s ) ) & &
( ( N o r m a l i z e D o u b l e ( B i d - O r d e r T a k e P r o f i t S e l l , D i g i t s ) < = N o r m a l i z e D o u b l e ( ( ( P i p s L e v e l P r o f i t - P i p s S t e p M o d i f y ) * D i g i t s P o i n t s ) , D i g i t s ) ) | |
( N o r m a l i z e D o u b l e ( B i d - O r d e r T a k e P r o f i t S e l l , D i g i t s ) > = N o r m a l i z e D o u b l e ( ( ( P i p s L e v e l P r o f i t + P i p s S t e p M o d i f y ) * D i g i t s P o i n t s ) , D i g i t s ) ) ) ) | |
( ( N o r m a l i z e D o u b l e ( O r d e r S t o p L o s s S e l l , D i g i t s ) ! = N o r m a l i z e D o u b l e ( S L _ S e l l , D i g i t s ) ) & &
( ( N o r m a l i z e D o u b l e ( O r d e r S t o p L o s s S e l l - A s k , D i g i t s ) < = N o r m a l i z e D o u b l e ( ( ( P i p s L e v e l L o s s - P i p s S t e p M o d i f y ) * D i g i t s P o i n t s ) , D i g i t s ) ) | |
( N o r m a l i z e D o u b l e ( O r d e r S t o p L o s s S e l l - A s k , D i g i t s ) > = N o r m a l i z e D o u b l e ( ( ( P i p s L e v e l L o s s + P i p s S t e p M o d i f y ) * D i g i t s P o i n t s ) , D i g i t s ) ) ) ) ) ) | |
( ( O r d e r S t o p L o s s ( ) = = 0 ) & & ( U s e V i r t u a l L e v e l s = = f a l s e ) ) | | ( ( V i r t u a l S t o p L o s s S e l l = = 0 ) & & ( U s e V i r t u a l L e v e l s = = t r u e ) ) )
{
/ / - - - V i r t u a l l e v e l s
i f ( U s e V i r t u a l L e v e l s = = t r u e )
{
V i r t u a l S t o p L o s s S e l l = S L _ S e l l ;
V i r t u a l T a k e P r o f i t S e l l = T P _ S e l l ;
C o u n t T i c k M o d i f y S e l l = 0 ;
i f ( S h o w V i r t u a l L e v e l s = = t r u e )
C r e a t L i n e s ( O P _ S E L L ) ;
i f ( ( U s e P e n d i n g O r d e r s = = t r u e ) & & ( C n t S e l l L i m i t > 0 ) )
M o d i f y P e n d i n g O r d e r s ( O P _ S E L L L I M I T ) ;
b r e a k ;
}
/ / - - - N o r m a l l e v e l s
i f ( U s e V i r t u a l L e v e l s = = f a l s e )
{
T r y T i m e s = 0 ;
w h i l e ( t r u e )
{
T r y T i m e s + + ;
O p e r a t i o n D e l a y = 0 ;
T i m e T o S e n d = G e t T i c k C o u n t ( ) ;
/ / - - - M o d i f y
M o d i f y S e l l = O r d e r M o d i f y ( O r d e r T i c k e t ( ) , 0 , S L _ S e l l , T P _ S e l l , 0 , c l r R e d ) ;
/ / - - -
i f ( T e s t i n g M o d e = = t r u e )
S e n d M e s s a g e s + + ;
i f ( M o d i f y S e l l = = t r u e )
{
/ / - - - M o d i f y p e n d i n g
i f ( ( U s e P e n d i n g O r d e r s = = t r u e ) & & ( C n t S e l l L i m i t > 0 ) )
M o d i f y P e n d i n g O r d e r s ( O P _ S E L L L I M I T ) ;
/ / - - -
C o u n t T i c k M o d i f y S e l l = 0 ;
O p e r a t i o n D e l a y = G e t T i c k C o u n t ( ) - T i m e T o S e n d ;
i f ( O p e r a t i o n D e l a y > 0 )
{
L a s t O p e r a t i o n D e l a y = O p e r a t i o n D e l a y ;
i f ( T i c k s G e t < 3 0 )
T i c k s G e t + + ;
i f ( C o u n t A v g E x e c u t i o n = = t r u e )
C o u n t A v r g E x e c u t i o n ( O p e r a t i o n D e l a y ) ;
}
b r e a k ;
}
e l s e
{
R e f r e s h R a t e s ( ) ;
S L _ S e l l = N o r m a l i z e D o u b l e ( A s k + ( P i p s L e v e l L o s s * D i g i t s P o i n t s ) , D i g i t s ) ;
i f ( P u t T a k e P r o f i t = = t r u e )
T P _ S e l l = N o r m a l i z e D o u b l e ( B i d - ( P i p s L e v e l P r o f i t * D i g i t s P o i n t s ) , D i g i t s ) ;
P r i n t ( " E r r o r : " , D o u b l e T o S t r ( G e t L a s t E r r o r ( ) , 0 ) + " | | " + E x p e r t C o m m e n t s + " : r e c e i v e s n e w d a t a a n d t r y a g a i n m o d i f y s e l l o r d e r " ) ;
i f ( T r y T i m e s > = 3 )
b r e a k ;
}
}
}
}
b r e a k ;
} / / E n d i f ( ( C o u n t T i c k M o d i f y S e l l > = . . . . . . . . . . . .
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d M o d i f y P e n d i n g O r d e r s ( i n t T y p e O f O r d e r )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
b o o l M o d i f y B u y L i m i t = f a l s e ;
b o o l M o d i f y S e l l L i m i t = f a l s e ;
d o u b l e S t o p L o s s B u y O r d e r = 0 ;
d o u b l e S t o p L o s s S e l l O r d e r = 0 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / G e t i n f o r m a t i o n s
i f ( U s e V i r t u a l L e v e l s = = f a l s e )
{
f o r ( i n t j = 0 ; j < O r d e r s T o t a l ( ) ; j + + )
{
i f ( O r d e r S e l e c t ( j , S E L E C T _ B Y _ P O S ) = = t r u e )
{
i f ( ( O r d e r M a g i c N u m b e r ( ) = = M a g i c N u m b e r ) & & ( O r d e r S y m b o l ( ) = = S y m b o l ( ) ) )
{
i f ( O r d e r T y p e ( ) = = O P _ B U Y )
S t o p L o s s B u y O r d e r = O r d e r S t o p L o s s ( ) ;
i f ( O r d e r T y p e ( ) = = O P _ S E L L )
S t o p L o s s S e l l O r d e r = O r d e r S t o p L o s s ( ) ;
}
}
}
}
/ / - - -
i f ( U s e V i r t u a l L e v e l s = = t r u e )
{
S t o p L o s s B u y O r d e r = V i r t u a l S t o p L o s s B u y ;
S t o p L o s s S e l l O r d e r = V i r t u a l S t o p L o s s S e l l ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / C h e c k o r d e r s
f o r ( i n t k = 0 ; k < O r d e r s T o t a l ( ) ; k + + )
{
i f ( O r d e r S e l e c t ( k , S E L E C T _ B Y _ P O S ) = = t r u e )
{
i f ( ( O r d e r M a g i c N u m b e r ( ) = = M a g i c N u m b e r ) & & ( O r d e r S y m b o l ( ) = = S y m b o l ( ) ) )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / B u y l i m i t
i f ( O r d e r T y p e ( ) = = O P _ B U Y L I M I T )
{
i f ( ( N o r m a l i z e D o u b l e ( S t o p L o s s B u y O r d e r - ( D i s t a n c e P e n d i n g * D i g i t s P o i n t s ) , D i g i t s ) ! = N o r m a l i z e D o u b l e ( O r d e r O p e n P r i c e ( ) , D i g i t s ) ) & & ( T y p e O f O r d e r = = O P _ B U Y L I M I T ) & & ( S t o p L o s s B u y O r d e r ! = 0 ) )
{
T r y T i m e s = 0 ;
w h i l e ( t r u e )
{
T r y T i m e s + + ;
O p e r a t i o n D e l a y = 0 ;
T i m e T o S e n d = G e t T i c k C o u n t ( ) ;
/ / - - - M o d i f y
M o d i f y B u y L i m i t = O r d e r M o d i f y ( O r d e r T i c k e t ( ) , N o r m a l i z e D o u b l e ( S t o p L o s s B u y O r d e r - ( D i s t a n c e P e n d i n g * D i g i t s P o i n t s ) , D i g i t s ) , 0 , 0 , 0 , c l r B l u e ) ;
/ / - - -
i f ( T e s t i n g M o d e = = t r u e )
S e n d M e s s a g e s + + ;
i f ( M o d i f y B u y L i m i t = = t r u e )
{
O p e r a t i o n D e l a y = G e t T i c k C o u n t ( ) - T i m e T o S e n d ;
i f ( O p e r a t i o n D e l a y > 0 )
{
L a s t O p e r a t i o n D e l a y = O p e r a t i o n D e l a y ;
i f ( T i c k s G e t < 3 0 )
T i c k s G e t + + ;
i f ( C o u n t A v g E x e c u t i o n = = t r u e )
C o u n t A v r g E x e c u t i o n ( O p e r a t i o n D e l a y ) ;
}
b r e a k ;
}
e l s e
{
R e f r e s h R a t e s ( ) ;
P r i n t ( " E r r o r : " , D o u b l e T o S t r ( G e t L a s t E r r o r ( ) , 0 ) + " | | " + E x p e r t C o m m e n t s + " : r e c e i v e s n e w d a t a a n d t r y a g a i n m o d i f y b u y l i m i t o r d e r " ) ;
i f ( T r y T i m e s > = 3 )
b r e a k ;
}
}
b r e a k ;
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / S e l l l i m i t
i f ( O r d e r T y p e ( ) = = O P _ S E L L L I M I T )
{
i f ( ( N o r m a l i z e D o u b l e ( S t o p L o s s S e l l O r d e r + ( D i s t a n c e P e n d i n g * D i g i t s P o i n t s ) , D i g i t s ) ! = N o r m a l i z e D o u b l e ( O r d e r O p e n P r i c e ( ) , D i g i t s ) ) & & ( T y p e O f O r d e r = = O P _ S E L L L I M I T ) & & ( S t o p L o s s S e l l O r d e r ! = 0 ) )
{
T r y T i m e s = 0 ;
w h i l e ( t r u e )
{
T r y T i m e s + + ;
O p e r a t i o n D e l a y = 0 ;
T i m e T o S e n d = G e t T i c k C o u n t ( ) ;
/ / - - - M o d i f y
M o d i f y S e l l L i m i t = O r d e r M o d i f y ( O r d e r T i c k e t ( ) , N o r m a l i z e D o u b l e ( S t o p L o s s S e l l O r d e r + ( D i s t a n c e P e n d i n g * D i g i t s P o i n t s ) , D i g i t s ) , 0 , 0 , 0 , c l r R e d ) ;
/ / - - -
i f ( T e s t i n g M o d e = = t r u e )
S e n d M e s s a g e s + + ;
i f ( M o d i f y S e l l L i m i t = = t r u e )
{
O p e r a t i o n D e l a y = G e t T i c k C o u n t ( ) - T i m e T o S e n d ;
i f ( O p e r a t i o n D e l a y > 0 )
{
L a s t O p e r a t i o n D e l a y = O p e r a t i o n D e l a y ;
i f ( T i c k s G e t < 3 0 )
T i c k s G e t + + ;
i f ( C o u n t A v g E x e c u t i o n = = t r u e )
C o u n t A v r g E x e c u t i o n ( O p e r a t i o n D e l a y ) ;
}
b r e a k ;
}
e l s e
{
R e f r e s h R a t e s ( ) ;
P r i n t ( " E r r o r : " , D o u b l e T o S t r ( G e t L a s t E r r o r ( ) , 0 ) + " | | " + E x p e r t C o m m e n t s + " : r e c e i v e s n e w d a t a a n d t r y a g a i n m o d i f y s e l l l i m i t o r d e r " ) ;
i f ( T r y T i m e s > = 3 )
b r e a k ;
}
}
b r e a k ;
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d C l o s e O r d e r s ( i n t T y p e O f O r d e r )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
b o o l C l o s e B u y = f a l s e ;
b o o l C l o s e S e l l = f a l s e ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
T r y T i m e s = 0 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
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 ) = = t r u e )
{
i f ( ( O r d e r M a g i c N u m b e r ( ) = = M a g i c N u m b e r ) & & ( O r d e r S y m b o l ( ) = = S y m b o l ( ) ) )
{
/ / - - - C l o s e b u y
i f ( ( T y p e O f O r d e r = = O P _ B U Y ) & & ( O r d e r T y p e ( ) = = O P _ B U Y ) )
{
w h i l e ( t r u e )
{
T r y T i m e s + + ;
O p e r a t i o n D e l a y = 0 ;
T i m e T o S e n d = G e t T i c k C o u n t ( ) ;
/ / - - -
C l o s e B u y = 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 ( ) , N o r m a l i z e D o u b l e ( B i d , D i g i t s ) , S l i p p a g e , c l r B l u e ) ;
/ / - - -
i f ( T e s t i n g M o d e = = t r u e )
S e n d M e s s a g e s + + ;
/ / - - - E x i t l o o p
i f ( C l o s e B u y = = t r u e )
{
O p e r a t i o n D e l a y = G e t T i c k C o u n t ( ) - T i m e T o S e n d ;
i f ( O p e r a t i o n D e l a y > 0 )
{
L a s t O p e r a t i o n D e l a y = O p e r a t i o n D e l a y ;
i f ( T i c k s G e t < 3 0 )
T i c k s G e t + + ;
i f ( C o u n t A v g E x e c u t i o n = = t r u e )
C o u n t A v r g E x e c u t i o n ( O p e r a t i o n D e l a y ) ;
}
b r e a k ;
}
e l s e
{
R e f r e s h R a t e s ( ) ;
P r i n t ( " E r r o r : " , D o u b l e T o S t r ( G e t L a s t E r r o r ( ) , 0 ) + " | | " + E x p e r t C o m m e n t s + " : r e c e i v e s n e w d a t a a n d t r y a g a i n c l o s e b u y o r d e r " ) ;
i f ( T r y T i m e s > = 3 )
b r e a k ;
}
}
}
/ / - - - C l o s e s e l l
i f ( ( T y p e O f O r d e r = = O P _ S E L L ) & & ( O r d e r T y p e ( ) = = O P _ S E L L ) )
{
w h i l e ( t r u e )
{
T r y T i m e s + + ;
O p e r a t i o n D e l a y = 0 ;
T i m e T o S e n d = G e t T i c k C o u n t ( ) ;
/ / - - -
C l o s e S e l l = 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 ( ) , N o r m a l i z e D o u b l e ( A s k , D i g i t s ) , S l i p p a g e , c l r R e d ) ;
/ / - - -
i f ( T e s t i n g M o d e = = t r u e )
S e n d M e s s a g e s + + ;
/ / - - - E x i t l o o p
i f ( C l o s e S e l l = = t r u e )
{
O p e r a t i o n D e l a y = G e t T i c k C o u n t ( ) - T i m e T o S e n d ;
i f ( O p e r a t i o n D e l a y > 0 )
{
L a s t O p e r a t i o n D e l a y = O p e r a t i o n D e l a y ;
i f ( T i c k s G e t < 3 0 )
T i c k s G e t + + ;
i f ( C o u n t A v g E x e c u t i o n = = t r u e )
C o u n t A v r g E x e c u t i o n ( O p e r a t i o n D e l a y ) ;
}
b r e a k ;
}
e l s e
{
R e f r e s h R a t e s ( ) ;
P r i n t ( " E r r o r : " , D o u b l e T o S t r ( G e t L a s t E r r o r ( ) , 0 ) + " | | " + E x p e r t C o m m e n t s + " : r e c e i v e s n e w d a t a a n d t r y a g a i n c l o s e s e l l o r d e r " ) ;
i f ( T r y T i m e s > = 3 )
b r e a k ;
}
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d D e l e t e O r d e r s ( i n t T y p e O f O r d e r )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
b o o l D e l e t e O r d e r s = f a l s e ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / D e l e t e p e n d i n g o r d e r s
f o r ( i = O r d e r s T o t a l ( ) - 1 ; i > = 0 ; 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 ) = = t r u e )
{
i f ( ( O r d e r M a g i c N u m b e r ( ) = = M a g i c N u m b e r ) & & ( O r d e r S y m b o l ( ) = = S y m b o l ( ) ) & & ( O r d e r T y p e ( ) = = T y p e O f O r d e r ) )
{
T r y T i m e s = 0 ;
w h i l e ( t r u e )
{
T r y T i m e s + + ;
O p e r a t i o n D e l a y = 0 ;
D e l e t e O r d e r s = f a l s e ;
T i m e T o S e n d = G e t T i c k C o u n t ( ) ;
/ / - - -
D e l e t e O r d e r s = O r d e r D e l e t e ( O r d e r T i c k e t ( ) , c l r N O N E ) ;
/ / - - -
i f ( T e s t i n g M o d e = = t r u e )
S e n d M e s s a g e s + + ;
i f ( D e l e t e O r d e r s = = t r u e )
{
O p e r a t i o n D e l a y = G e t T i c k C o u n t ( ) - T i m e T o S e n d ;
i f ( O p e r a t i o n D e l a y > 0 )
{
L a s t O p e r a t i o n D e l a y = O p e r a t i o n D e l a y ;
i f ( T i c k s G e t < 3 0 )
T i c k s G e t + + ;
i f ( C o u n t A v g E x e c u t i o n = = t r u e )
C o u n t A v r g E x e c u t i o n ( O p e r a t i o n D e l a y ) ;
}
b r e a k ;
}
e l s e
{
R e f r e s h R a t e s ( ) ;
P r i n t ( " E r r o r : " , D o u b l e T o S t r ( G e t L a s t E r r o r ( ) , 0 ) + " | | " + E x p e r t C o m m e n t s + " : r e c e i v e s n e w d a t a a n d t r y a g a i n d e l e t e p e n d i n g o r d e r " ) ;
i f ( T r y T i m e s > = 3 )
b r e a k ;
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d C o u n t O r d e r s ( )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
T o t a l O r d e r s = 0 ;
C n t B u y = 0 ;
C n t S e l l = 0 ;
C n t B u y L i m i t = 0 ;
C n t S e l l L i m i t = 0 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( O r d e r s T o t a l ( ) > 0 )
{
f o r ( i = O r d e r s T o t a l ( ) - 1 ; i > = 0 ; 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 ) = = t r u e )
{
i f ( ( O r d e r M a g i c N u m b e r ( ) = = M a g i c N u m b e r ) & & ( O r d e r S y m b o l ( ) = = S y m b o l ( ) ) )
{
T o t a l O r d e r s + + ;
i f ( O r d e r T y p e ( ) = = O P _ B U Y )
C n t B u y + + ;
i f ( O r d e r T y p e ( ) = = O P _ S E L L )
C n t S e l l + + ;
i f ( O r d e r T y p e ( ) = = O P _ B U Y L I M I T )
C n t B u y L i m i t + + ;
i f ( O r d e r T y p e ( ) = = O P _ S E L L L I M I T )
C n t S e l l L i m i t + + ;
i f ( ( ( O r d e r T y p e ( ) = = O P _ B U Y ) | | ( O r d e r T y p e ( ) = = O P _ S E L L ) ) & & ( G e t C o m m i s s i o n P a i r = = 0 ) )
G e t C o m m i s s i o n P a i r = M a t h A b s ( O r d e r C o m m i s s i o n ( ) / O r d e r L o t s ( ) ) ;
}
}
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d H i s t o r y R e s u l t s ( )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
T o t a l T r a d e s = 0 ;
T o t a l P r o f i t L o s s = 0 ;
H i s t o r y P i p s = 0 ;
A v r g D u r a t i o n = 0 ;
A v r g P i p s P r o f i t = 0 ;
A v r g P i p s L o s s = 0 ;
W i n T r a d e s = 0 ;
L o s s T r a d e s = 0 ;
C u r r e n t D i s t a n c e B u y = 0 ;
C u r r e n t D i s t a n c e S e l l = 0 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( O r d e r s H i s t o r y T o t a l ( ) > 0 )
{
f o r ( i = 0 ; i < O r d e r s H i s t o r y 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 _ H I S T O R Y ) )
{
i f ( ( O r d e r M a g i c N u m b e r ( ) = = M a g i c N u m b e r ) & & ( O r d e r S y m b o l ( ) = = S y m b o l ( ) ) )
{
i f ( ( O r d e r T y p e ( ) = = O P _ B U Y ) | | ( O r d e r T y p e ( ) = = O P _ S E L L ) )
{
T o t a l T r a d e s + + ;
i f ( T e s t i n g M o d e = = t r u e )
{
i f ( ! ( ( T i m e D a y O f W e e k ( O r d e r O p e n T i m e ( ) ) = = 5 ) & & ( T i m e D a y O f W e e k ( O r d e r C l o s e T i m e ( ) ) = = 1 ) ) )
A v r g D u r a t i o n + = T i m e S e c o n d s ( O r d e r C l o s e T i m e ( ) - O r d e r O p e n T i m e ( ) ) ;
}
T o t a l P r o f i t L o s s + = O r d e r P r o f i t ( ) + O r d e r C o m m i s s i o n ( ) + O r d e r S w a p ( ) ;
/ / - - - F o r b u y
i f ( O r d e r T y p e ( ) = = O P _ B U Y )
{
C u r r e n t D i s t a n c e B u y = ( O r d e r C l o s e P r i c e ( ) - A s k ) / D i g i t s P o i n t s ;
H i s t o r y P i p s + = ( O r d e r C l o s e P r i c e ( ) - O r d e r O p e n P r i c e ( ) ) / D i g i t s P o i n t s ;
i f ( T e s t i n g M o d e = = t r u e )
{
i f ( O r d e r C l o s e P r i c e ( ) > O r d e r O p e n P r i c e ( ) )
{
A v r g P i p s P r o f i t + = ( O r d e r C l o s e P r i c e ( ) - O r d e r O p e n P r i c e ( ) ) / D i g i t s P o i n t s ;
W i n T r a d e s + + ;
}
i f ( O r d e r C l o s e P r i c e ( ) < O r d e r O p e n P r i c e ( ) )
{
A v r g P i p s L o s s + = ( O r d e r C l o s e P r i c e ( ) - O r d e r O p e n P r i c e ( ) ) / D i g i t s P o i n t s ;
L o s s T r a d e s + + ;
}
}
}
/ / - - - F o r s e l l
i f ( O r d e r T y p e ( ) = = O P _ S E L L )
{
C u r r e n t D i s t a n c e S e l l = ( B i d - O r d e r C l o s e P r i c e ( ) ) / D i g i t s P o i n t s ;
H i s t o r y P i p s + = ( O r d e r O p e n P r i c e ( ) - O r d e r C l o s e P r i c e ( ) ) / D i g i t s P o i n t s ;
i f ( T e s t i n g M o d e = = t r u e )
{
i f ( O r d e r C l o s e P r i c e ( ) < O r d e r O p e n P r i c e ( ) )
{
A v r g P i p s P r o f i t + = ( O r d e r O p e n P r i c e ( ) - O r d e r C l o s e P r i c e ( ) ) / D i g i t s P o i n t s ;
W i n T r a d e s + + ;
}
i f ( O r d e r C l o s e P r i c e ( ) > O r d e r O p e n P r i c e ( ) )
{
A v r g P i p s L o s s + = ( O r d e r O p e n P r i c e ( ) - O r d e r C l o s e P r i c e ( ) ) / D i g i t s P o i n t s ;
L o s s T r a d e s + + ;
}
}
}
}
}
}
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / G e t a v e r a g e v a l u e s
i f ( T e s t i n g M o d e = = t r u e )
{
i f ( T o t a l T r a d e s > 0 )
A v r g D u r a t i o n / = T o t a l T r a d e s ;
i f ( W i n T r a d e s > 0 )
A v r g P i p s P r o f i t / = W i n T r a d e s ;
i f ( L o s s T r a d e s > 0 )
A v r g P i p s L o s s / = L o s s T r a d e s ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
/ / B r e a k e v e n c l o s e
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d C r e a t L i n e s ( i n t T y p e O f O r d e r )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / B u y l i n e s o n s c r e e n
i f ( T y p e O f O r d e r = = O P _ B U Y )
{
i f ( C n t B u y > 0 )
{
/ / - - - C r e a t l i n e s t o p l o s s b u y
i f ( O b j e c t F i n d ( N a m e O f B u y S t o p L o s s L i n e ) = = - 1 )
{
O b j e c t C r e a t e ( N a m e O f B u y S t o p L o s s L i n e , O B J _ H L I N E , 0 , 0 , 0 ) ;
O b j e c t S e t ( N a m e O f B u y S t o p L o s s L i n e , O B J P R O P _ C O L O R , c l r R e d ) ;
O b j e c t S e t ( N a m e O f B u y S t o p L o s s L i n e , O B J P R O P _ S T Y L E , S T Y L E _ D O T ) ;
O b j e c t S e t ( N a m e O f B u y S t o p L o s s L i n e , O B J P R O P _ P R I C E 1 , V i r t u a l S t o p L o s s B u y ) ;
}
/ / - - - C r e a t l i n e t a k e p r o f i t b u y
i f ( O b j e c t F i n d ( N a m e O f B u y T a k e P r o f i t L i n e ) = = - 1 )
{
O b j e c t C r e a t e ( N a m e O f B u y T a k e P r o f i t L i n e , O B J _ H L I N E , 0 , 0 , 0 ) ;
O b j e c t S e t ( N a m e O f B u y T a k e P r o f i t L i n e , O B J P R O P _ C O L O R , c l r B l u e ) ;
O b j e c t S e t ( N a m e O f B u y T a k e P r o f i t L i n e , O B J P R O P _ S T Y L E , S T Y L E _ D O T ) ;
O b j e c t S e t ( N a m e O f B u y T a k e P r o f i t L i n e , O B J P R O P _ P R I C E 1 , V i r t u a l T a k e P r o f i t B u y ) ;
}
/ / - - - M o v e l i n e s
i f ( O b j e c t F i n d ( N a m e O f B u y S t o p L o s s L i n e ) > - 1 )
i f ( N o r m a l i z e D o u b l e ( O b j e c t G e t ( N a m e O f B u y S t o p L o s s L i n e , O B J P R O P _ P R I C E 1 ) , D i g i t s ) ! = N o r m a l i z e D o u b l e ( V i r t u a l S t o p L o s s B u y , D i g i t s ) )
O b j e c t M o v e ( 0 , N a m e O f B u y S t o p L o s s L i n e , 0 , T i m e [ 0 ] , V i r t u a l S t o p L o s s B u y ) ;
i f ( O b j e c t F i n d ( N a m e O f B u y T a k e P r o f i t L i n e ) > - 1 )
i f ( N o r m a l i z e D o u b l e ( O b j e c t G e t ( N a m e O f B u y T a k e P r o f i t L i n e , O B J P R O P _ P R I C E 1 ) , D i g i t s ) ! = N o r m a l i z e D o u b l e ( V i r t u a l T a k e P r o f i t B u y , D i g i t s ) )
O b j e c t M o v e ( 0 , N a m e O f B u y T a k e P r o f i t L i n e , 0 , T i m e [ 0 ] , V i r t u a l T a k e P r o f i t B u y ) ;
}
/ / - - - D e l e t e l i n e s
i f ( C n t B u y = = 0 )
{
i f ( O b j e c t F i n d ( N a m e O f B u y S t o p L o s s L i n e ) > - 1 )
O b j e c t D e l e t e ( N a m e O f B u y S t o p L o s s L i n e ) ;
i f ( O b j e c t F i n d ( N a m e O f B u y T a k e P r o f i t L i n e ) > - 1 )
O b j e c t D e l e t e ( N a m e O f B u y T a k e P r o f i t L i n e ) ;
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / S e l l l i n e s o n s c r e e n
i f ( T y p e O f O r d e r = = O P _ S E L L )
{
i f ( C n t S e l l > 0 )
{
/ / - - - C r e a t l i n e s t o p l o s s s e l l
i f ( O b j e c t F i n d ( N a m e O f S e l l S t o p L o s s L i n e ) = = - 1 )
{
O b j e c t C r e a t e ( N a m e O f S e l l S t o p L o s s L i n e , O B J _ H L I N E , 0 , 0 , 0 ) ;
O b j e c t S e t ( N a m e O f S e l l S t o p L o s s L i n e , O B J P R O P _ C O L O R , c l r R e d ) ;
O b j e c t S e t ( N a m e O f S e l l S t o p L o s s L i n e , O B J P R O P _ S T Y L E , S T Y L E _ D O T ) ;
O b j e c t S e t ( N a m e O f S e l l S t o p L o s s L i n e , O B J P R O P _ P R I C E 1 , V i r t u a l S t o p L o s s S e l l ) ;
}
/ / - - - C r e a t l i n e t a k e p r o f i t s e l l
i f ( O b j e c t F i n d ( N a m e O f S e l l T a k e P r o f i t L i n e ) = = - 1 )
{
O b j e c t C r e a t e ( N a m e O f S e l l T a k e P r o f i t L i n e , O B J _ H L I N E , 0 , 0 , 0 ) ;
O b j e c t S e t ( N a m e O f S e l l T a k e P r o f i t L i n e , O B J P R O P _ C O L O R , c l r B l u e ) ;
O b j e c t S e t ( N a m e O f S e l l T a k e P r o f i t L i n e , O B J P R O P _ S T Y L E , S T Y L E _ D O T ) ;
O b j e c t S e t ( N a m e O f S e l l T a k e P r o f i t L i n e , O B J P R O P _ P R I C E 1 , V i r t u a l T a k e P r o f i t S e l l ) ;
}
/ / - - - M o v e l i n e s
i f ( O b j e c t F i n d ( N a m e O f S e l l S t o p L o s s L i n e ) > - 1 )
i f ( N o r m a l i z e D o u b l e ( O b j e c t G e t ( N a m e O f S e l l S t o p L o s s L i n e , O B J P R O P _ P R I C E 1 ) , D i g i t s ) ! = N o r m a l i z e D o u b l e ( V i r t u a l S t o p L o s s S e l l , D i g i t s ) )
O b j e c t M o v e ( 0 , N a m e O f S e l l S t o p L o s s L i n e , 0 , T i m e [ 0 ] , V i r t u a l S t o p L o s s S e l l ) ;
i f ( O b j e c t F i n d ( N a m e O f S e l l T a k e P r o f i t L i n e ) > - 1 )
i f ( N o r m a l i z e D o u b l e ( O b j e c t G e t ( N a m e O f S e l l T a k e P r o f i t L i n e , O B J P R O P _ P R I C E 1 ) , D i g i t s ) ! = N o r m a l i z e D o u b l e ( V i r t u a l T a k e P r o f i t S e l l , D i g i t s ) )
O b j e c t M o v e ( 0 , N a m e O f S e l l T a k e P r o f i t L i n e , 0 , T i m e [ 0 ] , V i r t u a l T a k e P r o f i t S e l l ) ;
}
/ / - - - D e l e t e l i n e s
i f ( C n t S e l l = = 0 )
{
i f ( O b j e c t F i n d ( N a m e O f S e l l S t o p L o s s L i n e ) > - 1 )
O b j e c t D e l e t e ( N a m e O f S e l l S t o p L o s s L i n e ) ;
i f ( O b j e c t F i n d ( N a m e O f S e l l T a k e P r o f i t L i n e ) > - 1 )
O b j e c t D e l e t e ( N a m e O f S e l l T a k e P r o f i t L i n e ) ;
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d G e t A v r g S p r e a d ( d o u b l e C u r r S p r e a d )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
d o u b l e S u m S p r e a d = 0 ;
i n t L o o p C o u n t = T i m e s F o r A v e r a g e - 1 ;
A v g S p r e a d = 0 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( C o u n t T i c k S p r e a d P a i r < T i m e s F o r A v e r a g e )
C o u n t T i c k S p r e a d P a i r + + ;
C o u n t T i c k S p r e a d = C o u n t T i c k S p r e a d P a i r ;
A r r a y C o p y ( A r r a y S p r e a d P a i r , A r r a y S p r e a d P a i r , 0 , 1 , T i m e s F o r A v e r a g e - 1 ) ;
A r r a y S p r e a d P a i r [ T i m e s F o r A v e r a g e - 1 ] = C u r r S p r e a d ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
f o r ( C o u n t = 0 ; C o u n t < C o u n t T i c k S p r e a d P a i r ; C o u n t + + )
{
S u m S p r e a d + = A r r a y S p r e a d P a i r [ L o o p C o u n t ] ;
L o o p C o u n t - - ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( C o u n t T i c k S p r e a d > 0 )
A v g S p r e a d = N o r m a l i z e D o u b l e ( S u m S p r e a d / C o u n t T i c k S p r e a d , 2 ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d C o u n t A v r g E x e c u t i o n ( d a t e t i m e L a t e n c y )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
d a t e t i m e S u m E x e c u t i o n = 0 ;
i n t L o o p C o u n t = T i m e s F o r A v e r a g e - 1 ;
A v g E x e c u t i o n = 0 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( C o u n t T i m e s M o d i f y < T i m e s F o r A v e r a g e )
C o u n t T i m e s M o d i f y + + ;
T i m e s M o d i f y = C o u n t T i m e s M o d i f y ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
A r r a y C o p y ( A r r a y E x e c u t i o n , A r r a y E x e c u t i o n , 0 , 1 , T i m e s F o r A v e r a g e - 1 ) ;
A r r a y E x e c u t i o n [ T i m e s F o r A v e r a g e - 1 ] = L a t e n c y ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
f o r ( C o u n t = 0 ; C o u n t < C o u n t T i m e s M o d i f y ; C o u n t + + )
{
S u m E x e c u t i o n + = A r r a y E x e c u t i o n [ L o o p C o u n t ] ;
L o o p C o u n t - - ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( T i m e s M o d i f y > 0 )
A v g E x e c u t i o n = N o r m a l i z e D o u b l e ( S u m E x e c u t i o n / T i m e s M o d i f y , 2 ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d C l e a r C h a r t ( )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( T i m e C u r r e n t ( ) - T i m e D e l e t e O b j e c t s > = D e l e t e M i n u t e s * 6 0 )
{
f o r ( i = O b j e c t s T o t a l ( ) - 1 ; i > = 0 ; i - - )
{
i f ( O b j e c t N a m e ( i ) ! = B a c k g r o u n d N a m e )
O b j e c t D e l e t e ( O b j e c t N a m e ( i ) ) ;
T i m e D e l e t e O b j e c t s = T i m e C u r r e n t ( ) ;
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d C h a r t B a c k g r o u n d ( s t r i n g S t r i n g N a m e , c o l o r I m a g e C o l o r , i n t X p o s i t i o n , i n t Y p o s i t i o n , i n t X s i z e , i n t Y s i z e )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( O b j e c t F i n d ( 0 , S t r i n g N a m e ) = = - 1 )
{
O b j e c t C r e a t e ( 0 , S t r i n g N a m e , O B J _ R E C T A N G L E _ L A B E L , 0 , 0 , 0 , 0 , 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , S t r i n g N a m e , O B J P R O P _ X D I S T A N C E , X p o s i t i o n ) ;
O b j e c t S e t I n t e g e r ( 0 , S t r i n g N a m e , O B J P R O P _ Y D I S T A N C E , Y p o s i t i o n ) ;
O b j e c t S e t I n t e g e r ( 0 , S t r i n g N a m e , O B J P R O P _ X S I Z E , X s i z e ) ;
O b j e c t S e t I n t e g e r ( 0 , S t r i n g N a m e , O B J P R O P _ Y S I Z E , Y s i z e ) ;
O b j e c t S e t I n t e g e r ( 0 , S t r i n g N a m e , O B J P R O P _ B G C O L O R , I m a g e C o l o r ) ;
O b j e c t S e t I n t e g e r ( 0 , S t r i n g N a m e , O B J P R O P _ B O R D E R _ T Y P E , B O R D E R _ F L A T ) ;
O b j e c t S e t I n t e g e r ( 0 , S t r i n g N a m e , O B J P R O P _ B O R D E R _ C O L O R , c l r B l a c k ) ;
O b j e c t S e t I n t e g e r ( 0 , S t r i n g N a m e , O B J P R O P _ B A C K , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , S t r i n g N a m e , O B J P R O P _ S E L E C T A B L E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , S t r i n g N a m e , O B J P R O P _ S E L E C T E D , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , S t r i n g N a m e , O B J P R O P _ H I D D E N , t r u e ) ;
O b j e c t S e t I n t e g e r ( 0 , S t r i n g N a m e , O B J P R O P _ Z O R D E R , 0 ) ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
v o i d S c r e e n C o m m e n t ( i n t T y p e C o m m )
{
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / S t r i n g s
s t r i n g L a s t L i n e 1 ;
s t r i n g L a s t L i n e 2 ;
d o u b l e S h o w A v g S p r e a d ;
d o u b l e S h o w A v g E x e c u t i o n ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / - - - N o r m a l
i f ( T y p e C o m m = = 1 )
{
L a s t L i n e 1 = " H i s t o r y O r d e r s / P i p s : " + D o u b l e T o S t r ( T o t a l T r a d e s , 0 ) + " / " + D o u b l e T o S t r ( H i s t o r y P i p s , 2 ) ;
L a s t L i n e 2 = " H i s t o r y P r o f i t / L o s s : " + D o u b l e T o S t r ( T o t a l P r o f i t L o s s , 2 ) ;
}
/ / - - - S p r e a d
i f ( T y p e C o m m = = 2 )
{
L a s t L i n e 1 = " S p r e a d P l u s C o m m i s s i o n I s T o o H i g h ! ! ! " ;
L a s t L i n e 2 = " H i g h S p r e a d A c t i o n I s I n a c t i v e . . . " ;
}
/ / - - - M a r g i n
i f ( T y p e C o m m = = 3 )
{
L a s t L i n e 1 = " A c c o u n t F r e e M a r g i n I s T o o L o w ! ! ! " ;
L a s t L i n e 2 = " E x p e r t S t o p p e d T r a d e ! ! ! " ;
}
/ / - - - S t o p l e v e l
i f ( T y p e C o m m = = 4 )
{
L a s t L i n e 1 = " B r o k e r S t o p L e v e l I s T o o H i g h ! ! ! " ;
L a s t L i n e 2 = " E x p e r t S t o p p e d T r a d e ! ! ! " ;
}
/ / - - - A u t o t r a d i n g
i f ( T y p e C o m m = = 5 )
{
L a s t L i n e 1 = " P l e a s e T u r n O n ' A u t o T r a d i n g ' " ;
L a s t L i n e 2 = " E x p e r t w a i t T o T r a d e ! ! ! " ;
}
/ / - - - T i m e
i f ( T y p e C o m m = = 6 )
{
L a s t L i n e 1 = " O u t O f S e s s i o n M a r k e t ! ! ! " ;
L a s t L i n e 2 = " E x p e r t S t o p p e d T o T r a d e ! ! ! " ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / S e t a v e r a g e s v a l u e
i f ( C o u n t A v g S p r e a d = = f a l s e )
S h o w A v g S p r e a d = 0 ;
e l s e
S h o w A v g S p r e a d = A v g S p r e a d + R e a l C o m m i s s i o n ;
i f ( C o u n t A v g E x e c u t i o n = = f a l s e )
S h o w A v g E x e c u t i o n = 0 ;
e l s e
S h o w A v g E x e c u t i o n = A v g E x e c u t i o n ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / S c r e e n i n f o a n d c o m m e n t s
C o m m e n t ( " - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - "
+ " \ n " + E x p e r t C o m m e n t s + " 2 0 1 8 b y P a n n i k ® "
+ " \ n - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - "
+ " \ n O r d e r s I D : " + D o u b l e T o S t r ( M a g i c N u m b e r , 0 )
+ " \ n L o t S i z e : " + D o u b l e T o S t r ( L o t S i z e , 2 )
+ " \ n S t o p L e v e l : " + D o u b l e T o S t r ( S t o p L e v e l , 2 )
+ " \ n L i m i t S p r e a d : " + D o u b l e T o S t r ( M a x S p r e a d , 2 )
+ " \ n S p r e a d / A v r g : " + D o u b l e T o S t r ( S p r e a d P i p s , 2 ) + " / " + D o u b l e T o S t r ( S h o w A v g S p r e a d , 2 ) + " ( p i p s ) "
+ " \ n E x e c u t i o n / A v r g : " + D o u b l e T o S t r ( L a s t O p e r a t i o n D e l a y , 0 ) + " / " + D o u b l e T o S t r ( S h o w A v g E x e c u t i o n , 0 ) + " ( m s ) "
+ " \ n C o m m i s s i o n s : " + S h o w I n f o C o m m i s s i o n
+ " \ n - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - "
+ " \ n M a r k e t O r d e r s : " + I n t e g e r T o S t r i n g ( C n t B u y ) + " / " + I n t e g e r T o S t r i n g ( C n t S e l l )
+ " \ n P e n d i n g O r d e r s : " + I n t e g e r T o S t r i n g ( C n t B u y L i m i t ) + " / " + I n t e g e r T o S t r i n g ( C n t S e l l L i m i t )
+ " \ n - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - "
+ " \ n " + L a s t L i n e 1
+ " \ n " + L a s t L i n e 2
+ " \ n - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - " ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = / /
Comments