Price Data Components
Orders Execution
1
Views
2
Downloads
0
Favorites
MDP-Plus_2.2.3EU 1M
ÿþ
# p r o p e r t y c o p y r i g h t " Y A N G "
# p r o p e r t y v e r s i o n " 1 . 0 0 "
# p r o p e r t y c o p y r i g h t " E A "
# p r o p e r t y s t r i c t
e x t e r n b o o l k _ g _ 1 = f a l s e ;
e x t e r n i n t f x _ y c = 1 0 0 ; / / A b n o r m a l f l u c t u a t i o n
e x t e r n d o u b l e l o t s = 0 . 0 2 ; / / l o t s
e x t e r n f l o a t z h i _ s = 1 ; / / s t o p ( $ )
e x t e r n i n t z h i _ y = 1 5 ; / / T a k e p r o f i t
e x t e r n i n t x i a o _ b = 6 ; / / 1 h o u r p r o f i t m u l t i p l e
e x t e r n i n t j i e _ j = 1 0 ; / / L o n g p o s i t i o n p r o f i t m u l t i p l e
e x t e r n i n t d i a n _ c = 2 ; / / S p r e a d
e x t e r n i n t m a g i c = 8 8 8 8 8 8 8 8 ;
i n t w e i _ z = 2 ,
w e i _ s = 1 0 0 ;
d o u b l e d i a n _ z = 0 . 0 1 ,
l o t s _ s ;
i n t f _ z = 0 ;
i n t t a k e ;
d a t e t i m e t i m e ;
b o o l f x _ j j = f a l s e ;
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
i n t O n I n i t ( )
{
d a t e t i m e t o m = 0 ;
i n t A A _ 1 = O r d e r s T o t a l ( ) ;
i f ( P o i n t < 0 . 0 0 1 )
{
d i a n _ z = 0 . 0 0 0 0 1 ;
w e i _ z = 5 ;
w e i _ s = 1 0 0 0 0 0 ;
}
e l s e i f ( P o i n t = = 0 . 0 0 1 )
{
d i a n _ z = 0 . 0 0 1 ;
w e i _ z = 3 ;
w e i _ s = 1 0 0 0 ;
}
E v e n t S e t T i m e r ( 1 ) ;
f o r ( i n t A A = 0 ; A A < A A _ 1 ; A A + + )
{
i f ( ! O r d e r S e l e c t ( A A , S E L E C T _ B Y _ P O S , M O D E _ T R A D E S ) ) b r e a k ;
i f ( O r d e r S y m b o l ( ) ! = S y m b o l ( ) ) c o n t i n 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 ) c o n t i n u e ;
i f ( O r d e r O p e n T i m e ( ) > t o m )
{
t a k e = O r d e r T i c k e t ( ) ;
t o m = O r d e r O p e n T i m e ( ) ;
c o n t i n 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 )
{
E v e n t K i l l T i m e r ( ) ;
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d O n T i c k ( )
{
s t a t i c d o u b l e p r o f _ l r ;
s t a t i c d o u b l e p r o f _ l r _ 1 = 0 ;
s t a t i c d a t e t i m e t i m e _ 1 = 0 ;
i n t o r _ d = 0 ;
d o u b l e j j _ o k = 0 ;
b o o l b o = f a l s e ;
i n t A A _ 1 = O r d e r s T o t a l ( ) ;
d o u b l e s t o p _ l r = 0 ;
d a t e t i m e t m e = 0 ;
i n t x y = 0 ;
d o u b l e m i n _ v o l u m e = S y m b o l I n f o D o u b l e ( S y m b o l ( ) , S Y M B O L _ V O L U M E _ M I N ) ;
i f ( l o t s < m i n _ v o l u m e )
{
P r i n t ( " ¤NfÏ\NAQ¸v g\¤NfÏ ÿS Y M B O L _ V O L U M E _ M I N = % . 2 f " ) ;
r e t u r n ;
}
f o r ( i n t A = 0 ; A < A A _ 1 ; A + + )
{
i f ( ! O r d e r S e l e c t ( A , S E L E C T _ B Y _ P O S , M O D E _ T R A D E S ) ) b r e a k ;
i f ( O r d e r S y m b o l ( ) ! = S y m b o l ( ) ) c o n t i n 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 ) c o n t i n u e ;
o r _ d + + ;
i f ( O r d e r P r o f i t ( ) < 0 )
s t o p _ l r + = O r d e r S w a p ( ) + 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 ( ) ;
i f ( T i m e C u r r e n t ( ) - 1 4 4 0 0 < = O r d e r O p e n T i m e ( ) ) f x _ j j = t r u e ;
i f ( O r d e r T y p e ( ) = = O P _ B U Y )
{
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 ( ) > z h i _ y * d i a n _ z )
{
j j _ o k = O r d e r S w a p ( ) + 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 ( ) ;
p r o f _ l r + = j j _ o k ;
p r o f _ l r _ 1 + = j j _ o k ;
i f ( O r d e r C l o s e ( O r d e r T i c k e t ( ) , O r d e r L o t s ( ) , O r d e r C l o s e P r i c e ( ) , d i a n _ c ) )
{
i f ( O r d e r T i c k e t ( ) ! = t a k e ) c o n t i n u e ;
i f ( f _ z = = 2 & & C l o s e [ 0 ] - O p e n [ 0 ] < f x _ y c * d i a n _ z & & C l o s e [ 0 ] - O p e n [ 0 ] > 0 )
{
t a k e = 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 _ s , A s k , d i a n _ c , 0 , 0 , " 1 2 " , m a g i c ) ;
t i m e = T i m e [ 0 ] ;
c o n t i n u e ;
}
e l s e i f ( f _ z = = 1 )
{
t a k e = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , l o t s _ s , B i d , d i a n _ c , 0 , 0 , " 1 1 " , m a g i c ) ;
t i m e = T i m e [ 0 ] ;
c o n t i n u e ;
}
t a k e = 0 ;
}
}
i f ( O r d e r T i c k e t ( ) ! = t a k e ) c o n t i n u e ;
i f ( 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 ( ) > z h i _ y * d i a n _ z )
{
i f ( f _ z = = 2 )
{
t a k e = 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 _ s , A s k , d i a n _ c , 0 , 0 , " 1 0 " , m a g i c ) ;
t i m e = T i m e [ 0 ] ;
c o n t i n u e ;
}
e l s e i f ( f _ z = = 1 )
{
t a k e = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , l o t s _ s , B i d , d i a n _ c , 0 , 0 , " 9 " , m a g i c ) ;
t i m e = T i m e [ 0 ] ;
c o n t i n u e ;
}
}
}
e l s e i f ( O r d e r T y p e ( ) = = O P _ S E L L )
{
i f ( 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 ( ) > z h i _ y * d i a n _ z )
{
j j _ o k = O r d e r S w a p ( ) + 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 ( ) ;
p r o f _ l r + = j j _ o k ;
p r o f _ l r _ 1 + = j j _ o k ;
i f ( O r d e r C l o s e ( O r d e r T i c k e t ( ) , O r d e r L o t s ( ) , O r d e r C l o s e P r i c e ( ) , d i a n _ c ) )
{
i f ( T i m e H o u r ( T i m e C u r r e n t ( ) ) = = 0 ) c o n t i n u e ;
i f ( O r d e r T i c k e t ( ) ! = t a k e ) c o n t i n u e ;
i f ( f _ z = = 2 & & O p e n [ 0 ] - C l o s e [ 0 ] < f x _ y c * d i a n _ z & & O p e n [ 0 ] - C l o s e [ 0 ] > 0 )
{
t a k e = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , l o t s _ s , B i d , d i a n _ c , 0 , 0 , " 8 " , m a g i c ) ;
t i m e = T i m e [ 0 ] ;
c o n t i n u e ;
}
e l s e i f ( f _ z = = 1 )
{
t a k e = 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 _ s , A s k , d i a n _ c , 0 , 0 , " 7 " , m a g i c ) ;
t i m e = T i m e [ 0 ] ;
c o n t i n u e ;
}
t a k e = 0 ;
}
}
i f ( O r d e r T i c k e t ( ) ! = t a k e ) c o n t i n 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 ( ) > z h i _ y * d i a n _ z )
{
i f ( f _ z = = 2 )
{
t a k e = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , l o t s _ s , B i d , d i a n _ c , 0 , 0 , " 6 " , m a g i c ) ;
t i m e = T i m e [ 0 ] ;
c o n t i n u e ;
}
e l s e i f ( f _ z = = 1 )
{
t a k e = 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 _ s , A s k , d i a n _ c , 0 , 0 , " 5 " , m a g i c ) ;
t i m e = T i m e [ 0 ] ;
c o n t i n u e ;
}
}
}
}
i f ( o r _ d = = 0 )
{
l o t s _ s = l o t s ;
t i m e = 0 ;
}
i f ( t i m e _ 1 = = 0 & & p r o f _ l r _ 1 > 0 )
{
t i m e _ 1 = T i m e C u r r e n t ( ) + 9 0 0 ;
}
i f ( t i m e ! = T i m e [ 0 ] )
{
i f ( f x _ j j ) j j _ o k = o r _ l s ( ) ;
x y = 0 ;
f o r ( i n t A A = 0 ; A A < A A _ 1 ; A A + + )
{
i f ( ! O r d e r S e l e c t ( A A , S E L E C T _ B Y _ P O S , M O D E _ T R A D E S ) ) b r e a k ;
i f ( O r d e r S y m b o l ( ) ! = S y m b o l ( ) ) c o n t i n 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 ) c o n t i n u e ;
i f ( x y > = 3 )
{
b o = 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 ( ) , O r d e r C l o s e P r i c e ( ) , d i a n _ c ) ;
c o n t i n u e ;
}
i f ( p r o f _ l r + s t o p _ l r > = z h i _ s | | p r o f _ l r + s t o p _ l r > = N o r m a l i z e D o u b l e ( z h i _ s / 2 , 2 ) )
{
b o = 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 ( ) , O r d e r C l o s e P r i c e ( ) , d i a n _ c ) ;
t a k e = 0 ;
x y = 3 ;
p r o f _ l r = 0 ;
c o n t i n u e ;
}
i f ( p r o f _ l r _ 1 + s t o p _ l r > = z h i _ s * x i a o _ b & & t i m e _ 1 < T i m e C u r r e n t ( ) )
{
b o = 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 ( ) , O r d e r C l o s e P r i c e ( ) , d i a n _ c ) ;
x y = 4 ;
t a k e = 0 ;
t i m e _ 1 = T i m e C u r r e n t ( ) + 9 0 0 ;
p r o f _ l r _ 1 = 0 ;
c o n t i n u e ;
}
i f ( f x _ j j )
{
i f ( j j _ o k < = 0 ) c o n t i n u e ;
i f ( j j _ o k + s t o p _ l r > = z h i _ s * j i e _ j )
{
b o = 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 ( ) , O r d e r C l o s e P r i c e ( ) , d i a n _ c ) ;
x y = 5 ;
c o n t i n u e ;
}
}
}
x y = 0 ;
i f ( o r _ d > 0 & & t a k e > 0 ) r e t u r n ;
f o r ( i n t x x = O r d e r s T o t a l ( ) - 1 ; x x > = 0 ; x x - - )
{
i f ( ! O r d e r S e l e c t ( x x , S E L E C T _ B Y _ P O S , M O D E _ T R A D E S ) ) b r e a k ;
i f ( O r d e r S y m b o l ( ) ! = S y m b o l ( ) ) c o n t i n 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 ) c o n t i n u e ;
i f ( O r d e r O p e n T i m e ( ) > t m e & & O r d e r T y p e ( ) = = O P _ B U Y )
{
t i m e = O r d e r O p e n T i m e ( ) ;
x y = 1 ;
}
e l s e i f ( O r d e r O p e n T i m e ( ) > t m e & & O r d e r T y p e ( ) = = O P _ S E L L )
{
t i m e = O r d e r O p e n T i m e ( ) ;
x y = 2 ;
}
}
i f ( x y = = 1 )
{
t a k e = 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 _ s , A s k , d i a n _ c , 0 , 0 , " 4 " , m a g i c ) ;
i f ( t a k e > 0 )
t i m e = T i m e [ 0 ] ;
}
e l s e i f ( x y = = 2 )
{
t a k e = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , l o t s _ s , B i d , d i a n _ c , 0 , 0 , " 3 " , m a g i c ) ;
i f ( t a k e > 0 )
t i m e = T i m e [ 0 ] ;
}
e l s e
{
i f ( O p e n [ 1 ] > C l o s e [ 1 ] )
{
t a k e = 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 _ s , A s k , d i a n _ c , 0 , 0 , " 2 " , m a g i c ) ;
i f ( t a k e > 0 )
t i m e = T i m e [ 0 ] ;
}
e l s e
{
t a k e = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , l o t s _ s , B i d , d i a n _ c , 0 , 0 , " 1 " , m a g i c ) ;
i f ( t a k e > 0 )
t i m e = T i m e [ 0 ] ;
}
}
i f ( t a k e < 0 ) f _ z = 0 ;
}
}
v o i d O n T i m e r ( )
{
i n t s e c o n d s = 0 ; / / t h e l e f t s e c o n d s o f t h e c u r r e n t b a r
i n t h = 0 ; / / H o u r
i n t m = 0 ; / / M i n u t e
i n t s = 0 ; / / S e c o n d h h : m m : s s
i n t x y = 0 ;
d a t e t i m e t i m e e = i T i m e ( S y m b o l ( ) , P E R I O D _ C U R R E N T , 0 ) ,
t m e = 0 ;
/ / d o u b l e c l o s e = i C l o s e ( S y m b o l ( ) , P E R I O D _ C U R R E N T , 0 ) ;
s e c o n d s = P e r i o d S e c o n d s ( P E R I O D _ C U R R E N T ) - ( i n t ) ( T i m e C u r r e n t ( ) - t i m e e ) ;
h = s e c o n d s / 3 6 0 0 ;
m = ( s e c o n d s - h * 3 6 0 0 ) / 6 0 ;
s = ( s e c o n d s - h * 3 6 0 0 - m * 6 0 ) ;
i f ( m > = 3 & & s > = 0 ) f _ z = 1 ;
e l s e i f ( m < 3 ) f _ z = 2 ;
}
d o u b l e o r _ l s ( )
{
s t a t i c d a t e t i m e t i m = 0 ;
d o u b l e p r o f _ l r 4 = 0 ;
d a t e t i m e t o m e ;
i f ( ! k _ g _ 1 ) r e t u r n ( 0 ) ;
t o m e = T i m e C u r r e n t ( ) - 7 2 0 0 0 ;
f o r ( i n t x = O r d e r s H i s t o r y T o t a l ( ) - 1 ; x > = 0 ; x - - )
{
i f ( ! O r d e r S e l e c t ( x , S E L E C T _ B Y _ P O S , M O D E _ H I S T O R Y ) )
{
t i m = T i m e C u r r e n t ( ) + 6 0 0 ;
b r e a k ;
}
i f ( O r d e r S y m b o l ( ) ! = S y m b o l ( ) ) c o n t i n 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 ) c o n t i n u e ;
i f ( O r d e r O p e n T i m e ( ) > t o m e )
{
p r o f _ l r 4 + = O r d e r S w a p ( ) + 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 ( ) ;
}
}
r e t u r n ( p r o f _ l r 4 ) ;
}
Comments