forked from ntsinh90/EA_SMC_Mql5
684 lines
63 KiB
MQL5
684 lines
63 KiB
MQL5
|
<EFBFBD><EFBFBD>/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
|
|||
|
|
/ / | C T r a d e M a n a g e r . m q h |
|
|||
|
|
/ / | v 2 2 . 0 - F i n a l C o r r e c t e d V e r s i o n |
|
|||
|
|
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
|
|||
|
|
# i f n d e f C T R A D E M A N A G E R _ M Q H
|
|||
|
|
# d e f i n e C T R A D E M A N A G E R _ M Q H
|
|||
|
|
|
|||
|
|
# i n c l u d e < T r a d e / T r a d e . m q h >
|
|||
|
|
# i n c l u d e " C R i s k M a n a g e r . m q h "
|
|||
|
|
# i n c l u d e " S M C _ D a t a S t r u c t u r e s . m q h "
|
|||
|
|
|
|||
|
|
c l a s s C T r a d e M a n a g e r
|
|||
|
|
{
|
|||
|
|
p r i v a t e :
|
|||
|
|
C T r a d e * m _ t r a d e ;
|
|||
|
|
C A r r a y O b j * m _ o p e n _ t r a d e s ;
|
|||
|
|
C R i s k M a n a g e r * m _ r i s k _ m a n a g e r _ p t r ;
|
|||
|
|
l o n g m _ m a g i c ;
|
|||
|
|
s t r i n g m _ c o m m e n t ;
|
|||
|
|
u l o n g m _ s l i p p a g e ;
|
|||
|
|
i n t m _ s l _ b u f f e r _ p o i n t s ;
|
|||
|
|
i n t m _ m i n _ s l _ p o i n t s ;
|
|||
|
|
i n t m _ m a x _ s l _ p o i n t s ;
|
|||
|
|
E N U M _ E X I T _ M O D E m _ e x i t _ m o d e ;
|
|||
|
|
d o u b l e m _ r r _ r a t i o ;
|
|||
|
|
i n t m _ t p _ p o i n t s ;
|
|||
|
|
d o u b l e m _ t i e r 1 _ r r , m _ t i e r 2 _ r r , m _ t i e r 3 _ r r ;
|
|||
|
|
i n t m _ t i e r 1 _ p o i n t s , m _ t i e r 2 _ p o i n t s , m _ t i e r 3 _ p o i n t s ;
|
|||
|
|
d o u b l e m _ p s a r _ s t e p ;
|
|||
|
|
d o u b l e m _ p s a r _ m a x ;
|
|||
|
|
i n t m _ p s a r _ h a n d l e ;
|
|||
|
|
b o o l m _ u s e _ p a r t i a l _ t p ;
|
|||
|
|
d o u b l e m _ p a r t i a l _ t p _ r r ;
|
|||
|
|
d o u b l e m _ p a r t i a l _ c l o s e _ p e r c e n t ;
|
|||
|
|
|
|||
|
|
/ / - - - P r i v a t e h e l p e r s - - -
|
|||
|
|
d a t e t i m e G e t E n t r y S w i n g T i m e F r o m C o m m e n t ( s t r i n g c o m m e n t )
|
|||
|
|
{
|
|||
|
|
s t r i n g m a r k e r = " | S : " ;
|
|||
|
|
i n t p o s = S t r i n g F i n d ( c o m m e n t , m a r k e r ) ;
|
|||
|
|
i f ( p o s < 0 ) r e t u r n 0 ;
|
|||
|
|
s t r i n g t i m e _ s t r = S t r i n g S u b s t r ( c o m m e n t , p o s + S t r i n g L e n ( m a r k e r ) ) ;
|
|||
|
|
r e t u r n ( d a t e t i m e ) S t r i n g T o I n t e g e r ( t i m e _ s t r ) ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
v o i d S y n c h r o n i z e P o s i t i o n s ( )
|
|||
|
|
{
|
|||
|
|
/ / '%9A I!I-!9%-@#2 @ 7H-@
|
|||
|
|
G'H2--@-#L#4F "1-"9H S e r v e r +#7-D!H
|
|||
|
|
f o r ( i n t i = m _ o p e n _ t r a d e s . T o t a l ( ) - 1 ; i > = 0 ; i - - ) {
|
|||
|
|
C M a n a g e d T r a d e * t r a d e _ i n f o = m _ o p e n _ t r a d e s . A t ( i ) ;
|
|||
|
|
i f ( t r a d e _ i n f o = = N U L L ) c o n t i n u e ;
|
|||
|
|
/ / I2 P o s i t i o n S e l e c t B y T i c k e t 7H2 f a l s e A%'H2--@-#L1I94DA%I'
|
|||
|
|
i f ( ! P o s i t i o n S e l e c t B y T i c k e t ( t r a d e _ i n f o . t i c k e t ) ) {
|
|||
|
|
P r i n t F o r m a t ( " P o s i t i o n # % d n o l o n g e r e x i s t s . R e m o v i n g f r o m i n t e r n a l l i s t . " , t r a d e _ i n f o . t i c k e t ) ;
|
|||
|
|
m _ o p e n _ t r a d e s . D e l e t e ( i ) ; / / %A I!I-!9%4I
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
S w i n g P o i n t * F i n d S w i n g B y T i m e ( d a t e t i m e t i m e , C A r r a y O b j * a l l _ s w i n g s )
|
|||
|
|
{
|
|||
|
|
i f ( t i m e = = 0 | | a l l _ s w i n g s = = N U L L ) r e t u r n N U L L ;
|
|||
|
|
f o r ( i n t i = 0 ; i < a l l _ s w i n g s . T o t a l ( ) ; i + + ) {
|
|||
|
|
S w i n g P o i n t * s = a l l _ s w i n g s . A t ( i ) ;
|
|||
|
|
i f ( s ! = N U L L & & s . t i m e = = t i m e ) r e t u r n s ;
|
|||
|
|
}
|
|||
|
|
r e t u r n N U L L ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / 1 . 4@!7H-@- M a j o r S w i n g 1H#I2!
|
|||
|
|
b o o l C h e c k E x i t _ O p p o s i t e M a j o r ( E N U M _ P O S I T I O N _ T Y P E p o s i t i o n _ t y p e , d a t e t i m e p o s i t i o n _ o p e n _ t i m e , C A r r a y O b j * a l l _ s w i n g s )
|
|||
|
|
{
|
|||
|
|
i f ( a l l _ s w i n g s = = N U L L ) r e t u r n f a l s e ;
|
|||
|
|
S w i n g P o i n t * l a s t _ m a j o r _ s w i n g = N U L L ;
|
|||
|
|
f o r ( i n t i = a l l _ s w i n g s . T o t a l ( ) - 1 ; i > = 0 ; i - - ) {
|
|||
|
|
S w i n g P o i n t * s = a l l _ s w i n g s . A t ( i ) ;
|
|||
|
|
i f ( s ! = N U L L & & s . s t a t u s = = S T A T U S _ M A J O R ) {
|
|||
|
|
l a s t _ m a j o r _ s w i n g = s ;
|
|||
|
|
b r e a k ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / * * * C o n d i t i o n C h e c k : *'45H@-I-@4 " +%1" --@-#L@4A%I'@H21I * * *
|
|||
|
|
i f ( l a s t _ m a j o r _ s w i n g = = N U L L | | l a s t _ m a j o r _ s w i n g . t i m e < = p o s i t i o n _ o p e n _ t i m e ) r e t u r n f a l s e ;
|
|||
|
|
|
|||
|
|
i f ( p o s i t i o n _ t y p e = = P O S I T I O N _ T Y P E _ B U Y & & l a s t _ m a j o r _ s w i n g . t y p e = = S W I N G _ H I G H ) r e t u r n t r u e ;
|
|||
|
|
i f ( p o s i t i o n _ t y p e = = P O S I T I O N _ T Y P E _ S E L L & & l a s t _ m a j o r _ s w i n g . t y p e = = S W I N G _ L O W ) r e t u r n t r u e ;
|
|||
|
|
|
|||
|
|
r e t u r n f a l s e ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / 2 . 4@!7H-@- M i n o r S w i n g I3 2 #1I
|
|||
|
|
b o o l C h e c k E x i t _ D o u b l e M i n o r ( d a t e t i m e p o s i t i o n _ o p e n _ t i m e , C A r r a y O b j * a l l _ s w i n g s )
|
|||
|
|
{
|
|||
|
|
i f ( a l l _ s w i n g s = = N U L L | | a l l _ s w i n g s . T o t a l ( ) < 2 ) r e t u r n f a l s e ;
|
|||
|
|
|
|||
|
|
S w i n g P o i n t * l a s t _ s w i n g = N U L L ;
|
|||
|
|
S w i n g P o i n t * s e c o n d _ l a s t _ s w i n g = N U L L ;
|
|||
|
|
i n t f o u n d _ c o u n t = 0 ;
|
|||
|
|
f o r ( i n t i = a l l _ s w i n g s . T o t a l ( ) - 1 ; i > = 0 ; i - - ) {
|
|||
|
|
S w i n g P o i n t * s = a l l _ s w i n g s . A t ( i ) ;
|
|||
|
|
i f ( s ! = N U L L & & s . s t a t u s ! = S T A T U S _ N O I S E ) {
|
|||
|
|
i f ( f o u n d _ c o u n t = = 0 ) l a s t _ s w i n g = s ;
|
|||
|
|
i f ( f o u n d _ c o u n t = = 1 ) s e c o n d _ l a s t _ s w i n g = s ;
|
|||
|
|
f o u n d _ c o u n t + + ;
|
|||
|
|
i f ( f o u n d _ c o u n t > = 2 ) b r e a k ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / * * * C o n d i t i o n C h e c k : *'4%H2*85H@- I-@4 " +%1" --@-#L@4A%I'@H21I * * *
|
|||
|
|
i f ( l a s t _ s w i n g = = N U L L | | s e c o n d _ l a s t _ s w i n g = = N U L L | | l a s t _ s w i n g . t i m e < = p o s i t i o n _ o p e n _ t i m e ) r e t u r n f a l s e ;
|
|||
|
|
|
|||
|
|
i f ( l a s t _ s w i n g . s t a t u s = = S T A T U S _ M I N O R & &
|
|||
|
|
s e c o n d _ l a s t _ s w i n g . s t a t u s = = S T A T U S _ M I N O R & &
|
|||
|
|
l a s t _ s w i n g . t y p e = = s e c o n d _ l a s t _ s w i n g . t y p e )
|
|||
|
|
{
|
|||
|
|
r e t u r n t r u e ;
|
|||
|
|
}
|
|||
|
|
r e t u r n f a l s e ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / 3 . 4@!7H-@- M i n o r S w i n g 5H1A"I1B#*#I2@4!
|
|||
|
|
b o o l C h e c k E x i t _ C o n t r a d i c t o r y M i n o r ( E N U M _ P O S I T I O N _ T Y P E p o s i t i o n _ t y p e , S w i n g P o i n t * e n t r y _ s t r u c t u r e _ r e f , d a t e t i m e p o s i t i o n _ o p e n _ t i m e , C A r r a y O b j * a l l _ s w i n g s )
|
|||
|
|
{
|
|||
|
|
i f ( e n t r y _ s t r u c t u r e _ r e f = = N U L L | | a l l _ s w i n g s = = N U L L ) r e t u r n f a l s e ;
|
|||
|
|
|
|||
|
|
S w i n g P o i n t * l a t e s t _ s a m e _ t y p e _ m i n o r = N U L L ;
|
|||
|
|
f o r ( i n t i = a l l _ s w i n g s . T o t a l ( ) - 1 ; i > = 0 ; i - - ) {
|
|||
|
|
S w i n g P o i n t * s = a l l _ s w i n g s . A t ( i ) ;
|
|||
|
|
i f ( s ! = N U L L & & s . s t a t u s = = S T A T U S _ M I N O R & & s . t y p e = = e n t r y _ s t r u c t u r e _ r e f . t y p e ) {
|
|||
|
|
l a t e s t _ s a m e _ t y p e _ m i n o r = s ;
|
|||
|
|
b r e a k ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / * * * C o n d i t i o n C h e c k : M i n o r S w i n g 5H@-I-@4 " +%1" --@-#L@4A%I'@H21I * * *
|
|||
|
|
i f ( l a t e s t _ s a m e _ t y p e _ m i n o r = = N U L L | | l a t e s t _ s a m e _ t y p e _ m i n o r . t i m e < = p o s i t i o n _ o p e n _ t i m e ) r e t u r n f a l s e ;
|
|||
|
|
|
|||
|
|
i f ( p o s i t i o n _ t y p e = = P O S I T I O N _ T Y P E _ B U Y & & l a t e s t _ s a m e _ t y p e _ m i n o r . p r i c e < e n t r y _ s t r u c t u r e _ r e f . p r i c e ) r e t u r n t r u e ;
|
|||
|
|
i f ( p o s i t i o n _ t y p e = = P O S I T I O N _ T Y P E _ S E L L & & l a t e s t _ s a m e _ t y p e _ m i n o r . p r i c e > e n t r y _ s t r u c t u r e _ r e f . p r i c e ) r e t u r n t r u e ;
|
|||
|
|
|
|||
|
|
r e t u r n f a l s e ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
v o i d M a n a g e _ P a r t i a l T P _ a n d _ B r e a k e v e n ( C M a n a g e d T r a d e * t r a d e _ i n f o )
|
|||
|
|
{
|
|||
|
|
i f ( t r a d e _ i n f o = = N U L L ) r e t u r n ;
|
|||
|
|
i f ( ! P o s i t i o n S e l e c t B y T i c k e t ( t r a d e _ i n f o . t i c k e t ) ) r e t u r n ;
|
|||
|
|
|
|||
|
|
/ / P r i n t F o r m a t ( " - - - D E B U G : C h e c k i n g P a r t i a l T P f o r t i c k e t # % d - - - " , t r a d e _ i n f o . t i c k e t ) ;
|
|||
|
|
|
|||
|
|
/ / - - - 1 . 6I-!9%*31
- - -
|
|||
|
|
d o u b l e o p e n _ p r i c e = P o s i t i o n G e t D o u b l e ( P O S I T I O N _ P R I C E _ O P E N ) ;
|
|||
|
|
d o u b l e i n i t i a l _ s l = t r a d e _ i n f o . t a r g e t _ s l _ p r i c e ;
|
|||
|
|
E N U M _ P O S I T I O N _ T Y P E t y p e = ( E N U M _ P O S I T I O N _ T Y P E ) P o s i t i o n G e t I n t e g e r ( P O S I T I O N _ T Y P E ) ;
|
|||
|
|
|
|||
|
|
i f ( i n i t i a l _ s l = = 0 . 0 ) {
|
|||
|
|
P r i n t ( " - F A I L E D : I n i t i a l S L i s 0 . 0 . C a n n o t c a l c u l a t e r i s k . " ) ;
|
|||
|
|
r e t u r n ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / - - - 2 . 3' R i s k A%0 R e w a r d 5HI-2# - - -
|
|||
|
|
d o u b l e i n i t i a l _ r i s k _ d i s t = M a t h A b s ( o p e n _ p r i c e - i n i t i a l _ s l ) ;
|
|||
|
|
i f ( i n i t i a l _ r i s k _ d i s t = = 0 ) r e t u r n ;
|
|||
|
|
|
|||
|
|
d o u b l e r e q u i r e d _ p r o f i t _ d i s t = i n i t i a l _ r i s k _ d i s t * m _ p a r t i a l _ t p _ r r ;
|
|||
|
|
|
|||
|
|
/ / - - - 3 . 3'3D#181 - - -
|
|||
|
|
d o u b l e c u r r e n t _ p r i c e = ( t y p e = = P O S I T I O N _ T Y P E _ B U Y ) ? S y m b o l I n f o D o u b l e ( _ S y m b o l , S Y M B O L _ B I D ) : S y m b o l I n f o D o u b l e ( _ S y m b o l , S Y M B O L _ A S K ) ;
|
|||
|
|
d o u b l e c u r r e n t _ p r o f i t _ d i s t = ( t y p e = = P O S I T I O N _ T Y P E _ B U Y ) ? ( c u r r e n t _ p r i c e - o p e n _ p r i c e ) : ( o p e n _ p r i c e - c u r r e n t _ p r i c e ) ;
|
|||
|
|
|
|||
|
|
/ / - - - 4 . 4! L#2"22##'*-1I+! - - -
|
|||
|
|
/ / P r i n t F o r m a t ( " - T r a d e T y p e : % s , O p e n P r i c e : % . 5 f , I n i t i a l S L : % . 5 f " , E n u m T o S t r i n g ( t y p e ) , o p e n _ p r i c e , i n i t i a l _ s l ) ;
|
|||
|
|
/ / P r i n t F o r m a t ( " - I n i t i a l R i s k D i s t a n c e ( P r i c e ) : % . 5 f " , i n i t i a l _ r i s k _ d i s t ) ;
|
|||
|
|
/ / P r i n t F o r m a t ( " - P a r t i a l T P T a r g e t : % . 2 f R " , m _ p a r t i a l _ t p _ r r ) ;
|
|||
|
|
/ / P r i n t F o r m a t ( " - R e q u i r e d P r o f i t D i s t a n c e ( P r i c e ) : % . 5 f " , r e q u i r e d _ p r o f i t _ d i s t ) ;
|
|||
|
|
/ / P r i n t F o r m a t ( " - C u r r e n t P r i c e : % . 5 f " , c u r r e n t _ p r i c e ) ;
|
|||
|
|
/ / P r i n t F o r m a t ( " - C u r r e n t P r o f i t D i s t a n c e ( P r i c e ) : % . 5 f " , c u r r e n t _ p r o f i t _ d i s t ) ;
|
|||
|
|
/ / P r i n t F o r m a t ( " - C O N D I T I O N M E T ? : % s " , ( s t r i n g ) ( c u r r e n t _ p r o f i t _ d i s t > = r e q u i r e d _ p r o f i t _ d i s t ) ) ;
|
|||
|
|
|
|||
|
|
|
|||
|
|
/ / - - - 5 . #'*-@7H-D - - -
|
|||
|
|
i f ( c u r r e n t _ p r o f i t _ d i s t > = r e q u i r e d _ p r o f i t _ d i s t ) {
|
|||
|
|
P r i n t ( " > > > C O N D I T I O N M E T ! A t t e m p t i n g t o c l o s e p a r t i a l p o s i t i o n . . . " ) ;
|
|||
|
|
d o u b l e i n i t i a l _ v o l u m e = P o s i t i o n G e t D o u b l e ( P O S I T I O N _ V O L U M E ) ;
|
|||
|
|
d o u b l e v o l u m e _ t o _ c l o s e = N o r m a l i z e D o u b l e ( i n i t i a l _ v o l u m e * ( m _ p a r t i a l _ c l o s e _ p e r c e n t / 1 0 0 . 0 ) , 2 ) ;
|
|||
|
|
|
|||
|
|
i f ( v o l u m e _ t o _ c l o s 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 ) ) v o l u m e _ t o _ c l o s 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 ( v o l u m e _ t o _ c l o s e > = i n i t i a l _ v o l u m e ) v o l u m e _ t o _ c l o s e = i n i t i a l _ v o l u m e ;
|
|||
|
|
|
|||
|
|
i f ( m _ t r a d e . P o s i t i o n C l o s e ( t r a d e _ i n f o . t i c k e t , v o l u m e _ t o _ c l o s e ) ) {
|
|||
|
|
P r i n t F o r m a t ( " > > > S U C C E S S : P a r t i a l T P t a k e n f o r t i c k e t # % d . " , t r a d e _ i n f o . t i c k e t ) ;
|
|||
|
|
t r a d e _ i n f o . i s _ p a r t i a l _ t p _ t a k e n = t r u e ;
|
|||
|
|
i f ( P o s i t i o n S e l e c t B y T i c k e t ( t r a d e _ i n f o . t i c k e t ) ) {
|
|||
|
|
m _ t r a d e . P o s i t i o n M o d i f y ( t r a d e _ i n f o . t i c k e t , o p e n _ p r i c e , P o s i t i o n G e t D o u b l e ( P O S I T I O N _ T P ) ) ;
|
|||
|
|
P r i n t F o r m a t ( " > > > S U C C E S S : S L f o r t i c k e t # % d m o v e d t o B r e a k - E v e n . " , t r a d e _ i n f o . t i c k e t ) ;
|
|||
|
|
}
|
|||
|
|
} e l s e {
|
|||
|
|
P r i n t ( " > > > F A I L E D t o c l o s e p a r t i a l p o s i t i o n . E r r o r : " , m _ t r a d e . R e s u l t R e t c o d e D e s c r i p t i o n ( ) ) ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
v o i d M a n a g e T r a i l i n g S t o p _ P S A R ( C M a n a g e d T r a d e * t r a d e _ i n f o )
|
|||
|
|
{
|
|||
|
|
i f ( m _ p s a r _ h a n d l e = = I N V A L I D _ H A N D L E | | t r a d e _ i n f o = = N U L L | | ! P o s i t i o n S e l e c t B y T i c k e t ( t r a d e _ i n f o . t i c k e t ) ) {
|
|||
|
|
r e t u r n ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / 1 . 6I-!9%5H3@G
|
|||
|
|
E N U M _ P O S I T I O N _ T Y P E t y p e = ( E N U M _ P O S I T I O N _ T Y P E ) P o s i t i o n G e t I n t e g e r ( P O S I T I O N _ T Y P E ) ;
|
|||
|
|
d o u b l e t p _ p r i c e = P o s i t i o n G e t D o u b l e ( P O S I T I O N _ T P ) ;
|
|||
|
|
d o u b l e c u r r e n t _ s l = P o s i t i o n G e t D o u b l e ( P O S I T I O N _ S L ) ;
|
|||
|
|
|
|||
|
|
d o u b l e p s a r _ b u f f e r [ 1 ] ;
|
|||
|
|
i f ( C o p y B u f f e r ( m _ p s a r _ h a n d l e , 0 , 1 , 1 , p s a r _ b u f f e r ) < 1 ) r e t u r n ;
|
|||
|
|
d o u b l e n e w _ s l _ c a n d i d a t e = p s a r _ b u f f e r [ 0 ] ; / / S L C+!H5HDI2 P S A R
|
|||
|
|
|
|||
|
|
/ / + + + N E W : M a k e P S A R S t o p - L e v e l A w a r e + + +
|
|||
|
|
|
|||
|
|
/ / 2 . 6 S t o p L e v e l A%0#22%2181
|
|||
|
|
i n t s t o p s _ l e v e l _ p o i n t s = ( i n t ) S y m b o l I n f o I n t e g e r ( _ S y m b o l , S Y M B O L _ T R A D E _ S T O P S _ L E V E L ) ;
|
|||
|
|
d o u b l e s t o p s _ l e v e l _ o f f s e t = s t o p s _ l e v e l _ p o i n t s * _ P o i n t ;
|
|||
|
|
d o u b l e b i d = S y m b o l I n f o D o u b l e ( _ S y m b o l , S Y M B O L _ B I D ) ;
|
|||
|
|
d o u b l e a s k = S y m b o l I n f o D o u b l e ( _ S y m b o l , S Y M B O L _ A S K ) ;
|
|||
|
|
|
|||
|
|
/ / 3 . #1AI#22 S L 5H0*H C+I9I-2!B#@-#L
|
|||
|
|
i f ( t y p e = = P O S I T I O N _ T Y P E _ B U Y ) {
|
|||
|
|
/ / S L - B u y I-H3'H2#22 B i d
|
|||
|
|
i f ( b i d - n e w _ s l _ c a n d i d a t e < s t o p s _ l e v e l _ o f f s e t ) {
|
|||
|
|
n e w _ s l _ c a n d i d a t e = b i d - s t o p s _ l e v e l _ o f f s e t ;
|
|||
|
|
}
|
|||
|
|
} e l s e { / / S E L L
|
|||
|
|
/ / S L - S e l l I-*9'H2#22 A s k
|
|||
|
|
i f ( n e w _ s l _ c a n d i d a t e - a s k < s t o p s _ l e v e l _ o f f s e t ) {
|
|||
|
|
n e w _ s l _ c a n d i d a t e = a s k + s t o p s _ l e v e l _ o f f s e t ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / 3'2!*0-2#22 ( N o r m a l i z e )
|
|||
|
|
i n t d i g i t s = ( i n t ) S y m b o l I n f o I n t e g e r ( _ S y m b o l , S Y M B O L _ D I G I T S ) ;
|
|||
|
|
d o u b l e f i n a l _ n e w _ s l = N o r m a l i z e D o u b l e ( n e w _ s l _ c a n d i d a t e , d i g i t s ) ;
|
|||
|
|
|
|||
|
|
/ / - - - E n d o f n e w l o g i c - - -
|
|||
|
|
|
|||
|
|
/ / 4 . #'*-A%0*H3*1H M o d i f y I'"#225H#1AIA%I'
|
|||
|
|
/ / L o g i c 2#@4C
|
|||
|
|
I2 T r a i l i n g S t o p "1@4!
|
|||
|
|
i f ( t p _ p r i c e = = 0 . 0 ) / / T r a i l 32-"9HA%I'
|
|||
|
|
{
|
|||
|
|
i f ( ( t y p e = = P O S I T I O N _ T Y P E _ B U Y & & f i n a l _ n e w _ s l > c u r r e n t _ s l ) | | ( t y p e = = P O S I T I O N _ T Y P E _ S E L L & & f i n a l _ n e w _ s l < c u r r e n t _ s l ) ) {
|
|||
|
|
m _ t r a d e . P o s i t i o n M o d i f y ( t r a d e _ i n f o . t i c k e t , f i n a l _ n e w _ s l , 0 . 0 ) ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
e l s e / / "1D!H@" T r a i l , #-#226 T P @ 7H-@4C
|
|||
|
|
I2
|
|||
|
|
{
|
|||
|
|
d o u b l e c u r r e n t _ p r i c e = ( t y p e = = P O S I T I O N _ T Y P E _ B U Y ) ? b i d : a s k ;
|
|||
|
|
b o o l i s _ t p _ r e a c h e d = ( t y p e = = P O S I T I O N _ T Y P E _ B U Y & & c u r r e n t _ p r i c e > = t p _ p r i c e ) | | ( t y p e = = P O S I T I O N _ T Y P E _ S E L L & & c u r r e n t _ p r i c e < = t p _ p r i c e ) ;
|
|||
|
|
i f ( i s _ t p _ r e a c h e d ) {
|
|||
|
|
i f ( ( t y p e = = P O S I T I O N _ T Y P E _ B U Y & & f i n a l _ n e w _ s l > c u r r e n t _ s l ) | | ( t y p e = = P O S I T I O N _ T Y P E _ S E L L & & ( f i n a l _ n e w _ s l < c u r r e n t _ s l | | c u r r e n t _ s l = = 0 . 0 ) ) ) {
|
|||
|
|
i f ( m _ t r a d e . P o s i t i o n M o d i f y ( t r a d e _ i n f o . t i c k e t , f i n a l _ n e w _ s l , 0 . 0 ) ) {
|
|||
|
|
P r i n t F o r m a t ( " P S A R T r a i l i n g S t o p f o r t i c k e t # % d a c t i v a t e d . N e w S L i s % . 5 f . T P r e m o v e d . " , t r a d e _ i n f o . t i c k e t , f i n a l _ n e w _ s l ) ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ * v o i d M a n a g e T r a i l i n g S t o p _ F i x e d ( C M a n a g e d T r a d e * t r a d e _ i n f o )
|
|||
|
|
{
|
|||
|
|
i f ( ! P o s i t i o n S e l e c t B y T i c k e t ( t r a d e _ i n f o . t i c k e t ) ) r e t u r n ;
|
|||
|
|
P r i n t F o r m a t ( " D E B U G : C h e c k i n g F i x e d T r a i l i n g S t o p f o r t i c k e t # % d . . . " , t r a d e _ i n f o . t i c k e t ) ;
|
|||
|
|
E N U M _ P O S I T I O N _ T Y P E t y p e = ( E N U M _ P O S I T I O N _ T Y P E ) P o s i t i o n G e t I n t e g e r ( P O S I T I O N _ T Y P E ) ;
|
|||
|
|
d o u b l e o p e n _ p r i c e = P o s i t i o n G e t D o u b l e ( P O S I T I O N _ P R I C E _ O P E N ) ;
|
|||
|
|
d o u b l e c u r r e n t _ s l = P o s i t i o n G e t D o u b l e ( P O S I T I O N _ S L ) ;
|
|||
|
|
d o u b l e c u r r e n t _ p r i c e = ( t y p e = = P O S I T I O N _ T Y P E _ B U Y ) ? S y m b o l I n f o D o u b l e ( _ S y m b o l , S Y M B O L _ B I D ) : S y m b o l I n f o D o u b l e ( _ S y m b o l , S Y M B O L _ A S K ) ;
|
|||
|
|
|
|||
|
|
/ / 1 . 3'3D#@G8
|
|||
|
|
d o u b l e p r o f i t _ p o i n t s = 0 ;
|
|||
|
|
i f ( t y p e = = P O S I T I O N _ T Y P E _ B U Y ) p r o f i t _ p o i n t s = ( c u r r e n t _ p r i c e - o p e n _ p r i c e ) / _ P o i n t ;
|
|||
|
|
e l s e p r o f i t _ p o i n t s = ( o p e n _ p r i c e - c u r r e n t _ p r i c e ) / _ P o i n t ;
|
|||
|
|
|
|||
|
|
/ / 2 . #'*-'H23D#685HI-@#4H! T r a i l i n g +#7-"1
|
|||
|
|
i f ( p r o f i t _ p o i n t s > = m _ t r a i l _ s t a r t _ p o i n t s )
|
|||
|
|
{
|
|||
|
|
/ / 3 . 3' S L C+!H2#22181
|
|||
|
|
d o u b l e n e w _ s l = ( t y p e = = P O S I T I O N _ T Y P E _ B U Y ) ? c u r r e n t _ p r i c e - ( m _ t r a i l _ s t o p _ p o i n t s * _ P o i n t ) : c u r r e n t _ p r i c e + ( m _ t r a i l _ s t o p _ p o i n t s * _ P o i n t ) ;
|
|||
|
|
|
|||
|
|
/ / 4 . #'*-'H2 S L C+!H5'H2@4!+#7-D!H A%I'6@%7H-
|
|||
|
|
i f ( ( t y p e = = P O S I T I O N _ T Y P E _ B U Y & & n e w _ s l > c u r r e n t _ s l ) | | ( t y p e = = P O S I T I O N _ T Y P E _ S E L L & & n e w _ s l < c u r r e n t _ s l ) )
|
|||
|
|
{
|
|||
|
|
P r i n t F o r m a t ( " D E B U G : F i x e d T r a i l c o n d i t i o n m e t . M o d i f y i n g S L f o r t i c k e t # % d . " , t r a d e _ i n f o . t i c k e t ) ;
|
|||
|
|
P r i n t F o r m a t ( " T r a i l i n g S t o p T r i g g e r e d f o r # % d . P r o f i t : % . 0 f p o i n t s . M o v i n g S L t o % . 5 f " , t r a d e _ i n f o . t i c k e t , p r o f i t _ p o i n t s , n e w _ s l ) ;
|
|||
|
|
m _ t r a d e . P o s i t i o n M o d i f y ( t r a d e _ i n f o . t i c k e t , n e w _ s l , P o s i t i o n G e t D o u b l e ( P O S I T I O N _ T P ) ) ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
} * /
|
|||
|
|
v o i d M a n a g e T r a i l i n g S t o p _ F i x e d ( C M a n a g e d T r a d e * t r a d e _ i n f o )
|
|||
|
|
{
|
|||
|
|
i f ( ! P o s i t i o n S e l e c t B y T i c k e t ( t r a d e _ i n f o . t i c k e t ) ) r e t u r n ;
|
|||
|
|
|
|||
|
|
E N U M _ P O S I T I O N _ T Y P E t y p e = ( E N U M _ P O S I T I O N _ T Y P E ) P o s i t i o n G e t I n t e g e r ( P O S I T I O N _ T Y P E ) ;
|
|||
|
|
d o u b l e o p e n _ p r i c e = P o s i t i o n G e t D o u b l e ( P O S I T I O N _ P R I C E _ O P E N ) ;
|
|||
|
|
d o u b l e c u r r e n t _ s l = P o s i t i o n G e t D o u b l e ( P O S I T I O N _ S L ) ;
|
|||
|
|
d o u b l e i n i t i a l _ s l = t r a d e _ i n f o . t a r g e t _ s l _ p r i c e ;
|
|||
|
|
d o u b l e c u r r e n t _ p r i c e = ( t y p e = = P O S I T I O N _ T Y P E _ B U Y ) ? S y m b o l I n f o D o u b l e ( _ S y m b o l , S Y M B O L _ B I D ) : S y m b o l I n f o D o u b l e ( _ S y m b o l , S Y M B O L _ A S K ) ;
|
|||
|
|
|
|||
|
|
/ / - - - D y n a m i c T r a i l i n g L o g i c - - -
|
|||
|
|
|
|||
|
|
/ / 1 . 3'3D#181C#9A R ( R i s k m u l t i p l e )
|
|||
|
|
d o u b l e i n i t i a l _ r i s k _ d i s t = M a t h A b s ( o p e n _ p r i c e - i n i t i a l _ s l ) ;
|
|||
|
|
i f ( i n i t i a l _ r i s k _ d i s t = = 0 ) r e t u r n ;
|
|||
|
|
d o u b l e c u r r e n t _ p r o f i t _ d i s t = ( t y p e = = P O S I T I O N _ T Y P E _ B U Y ) ? ( c u r r e n t _ p r i c e - o p e n _ p r i c e ) : ( o p e n _ p r i c e - c u r r e n t _ p r i c e ) ;
|
|||
|
|
d o u b l e c u r r e n t _ r _ m u l t i p l e = c u r r e n t _ p r o f i t _ d i s t / i n i t i a l _ r i s k _ d i s t ;
|
|||
|
|
|
|||
|
|
/ / 2 . @%7-#0"0 T r a i l i n g S t o p 5H0C
|
|||
|
|
I2!1I1D
|
|||
|
|
i n t d y n a m i c _ t r a i l _ p o i n t s = 0 ;
|
|||
|
|
i f ( m _ t i e r 3 _ r r > 0 & & c u r r e n t _ r _ m u l t i p l e > = m _ t i e r 3 _ r r ) {
|
|||
|
|
d y n a m i c _ t r a i l _ p o i n t s = m _ t i e r 3 _ p o i n t s ;
|
|||
|
|
} e l s e i f ( m _ t i e r 2 _ r r > 0 & & c u r r e n t _ r _ m u l t i p l e > = m _ t i e r 2 _ r r ) {
|
|||
|
|
d y n a m i c _ t r a i l _ p o i n t s = m _ t i e r 2 _ p o i n t s ;
|
|||
|
|
} e l s e i f ( m _ t i e r 1 _ r r > 0 & & c u r r e n t _ r _ m u l t i p l e > = m _ t i e r 1 _ r r ) {
|
|||
|
|
d y n a m i c _ t r a i l _ p o i n t s = m _ t i e r 1 _ p o i n t s ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / 3 . I2@I2@7H-D ( !53D#61I1D1IC1I+6H) C+I@#4H! T r a i l i n g
|
|||
|
|
i f ( d y n a m i c _ t r a i l _ p o i n t s > 0 )
|
|||
|
|
{
|
|||
|
|
/ / 4 . 3' S L C+!H2#22181A%0#0"02!AD2!4
|
|||
|
|
d o u b l e n e w _ s l = ( t y p e = = P O S I T I O N _ T Y P E _ B U Y ) ? c u r r e n t _ p r i c e - ( d y n a m i c _ t r a i l _ p o i n t s * _ P o i n t ) : c u r r e n t _ p r i c e + ( d y n a m i c _ t r a i l _ p o i n t s * _ P o i n t ) ;
|
|||
|
|
|
|||
|
|
/ / 5 . #'*-'H2 S L C+!H5'H2@4!+#7-D!H A%I'6@%7H-
|
|||
|
|
i f ( ( t y p e = = P O S I T I O N _ T Y P E _ B U Y & & n e w _ s l > c u r r e n t _ s l ) | | ( t y p e = = P O S I T I O N _ T Y P E _ S E L L & & ( n e w _ s l < c u r r e n t _ s l | | c u r r e n t _ s l = = 0 . 0 ) ) )
|
|||
|
|
{
|
|||
|
|
/ / "@%4 T P @4!@!7H-@#4H! T r a i l #1IA#
|
|||
|
|
d o u b l e t p _ p r i c e = P o s i t i o n G e t D o u b l e ( P O S I T I O N _ T P ) = = 0 . 0 ? 0 . 0 : 0 . 0 ;
|
|||
|
|
m _ t r a d e . P o s i t i o n M o d i f y ( t r a d e _ i n f o . t i c k e t , n e w _ s l , t p _ p r i c e ) ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
p u b l i c :
|
|||
|
|
C T r a d e M a n a g e r ( C R i s k M a n a g e r * r i s k _ m a n a g e r ,
|
|||
|
|
l o n g m a g i c , s t r i n g c o m m e n t , u l o n g s l i p p a g e ,
|
|||
|
|
i n t s l _ b u f f e r _ p o i n t s , i n t m i n _ s l _ p o i n t s , i n t m a x _ s l _ p o i n t s ,
|
|||
|
|
E N U M _ E X I T _ M O D E e x i t _ m o d e , d o u b l e r r _ r a t i o , i n t t p _ p o i n t s ,
|
|||
|
|
d o u b l e t i e r 1 _ r r , i n t t i e r 1 _ p t s , d o u b l e t i e r 2 _ r r , i n t t i e r 2 _ p t s , d o u b l e t i e r 3 _ r r , i n t t i e r 3 _ p t s , d o u b l e p s a r _ s t e p , d o u b l e p s a r _ m a x ,
|
|||
|
|
b o o l u s e _ p a r t i a l , d o u b l e p a r t i a l _ r r , d o u b l e p a r t i a l _ p c t )
|
|||
|
|
{
|
|||
|
|
m _ r i s k _ m a n a g e r _ p t r = r i s k _ m a n a g e r ;
|
|||
|
|
m _ m a g i c = m a g i c ;
|
|||
|
|
m _ c o m m e n t = c o m m e n t ;
|
|||
|
|
m _ s l i p p a g e = s l i p p a g e ;
|
|||
|
|
m _ s l _ b u f f e r _ p o i n t s = s l _ b u f f e r _ p o i n t s ;
|
|||
|
|
m _ m i n _ s l _ p o i n t s = m i n _ s l _ p o i n t s ;
|
|||
|
|
m _ m a x _ s l _ p o i n t s = m a x _ s l _ p o i n t s ;
|
|||
|
|
m _ e x i t _ m o d e = e x i t _ m o d e ;
|
|||
|
|
m _ r r _ r a t i o = r r _ r a t i o ;
|
|||
|
|
m _ t p _ p o i n t s = t p _ p o i n t s ;
|
|||
|
|
m _ t i e r 1 _ r r = t i e r 1 _ r r ; m _ t i e r 1 _ p o i n t s = t i e r 1 _ p t s ;
|
|||
|
|
m _ t i e r 2 _ r r = t i e r 2 _ r r ; m _ t i e r 2 _ p o i n t s = t i e r 2 _ p t s ;
|
|||
|
|
m _ t i e r 3 _ r r = t i e r 3 _ r r ; m _ t i e r 3 _ p o i n t s = t i e r 3 _ p t s ;
|
|||
|
|
m _ p s a r _ s t e p = p s a r _ s t e p ;
|
|||
|
|
m _ p s a r _ m a x = p s a r _ m a x ;
|
|||
|
|
m _ u s e _ p a r t i a l _ t p = u s e _ p a r t i a l ;
|
|||
|
|
m _ p a r t i a l _ t p _ r r = p a r t i a l _ r r ;
|
|||
|
|
m _ p a r t i a l _ c l o s e _ p e r c e n t = p a r t i a l _ p c t ;
|
|||
|
|
|
|||
|
|
m _ t r a d e = n e w C T r a d e ( ) ;
|
|||
|
|
m _ o p e n _ t r a d e s = n e w C A r r a y O b j ( ) ;
|
|||
|
|
m _ o p e n _ t r a d e s . F r e e M o d e ( t r u e ) ;
|
|||
|
|
m _ t r a d e . S e t E x p e r t M a g i c N u m b e r ( m _ m a g i c ) ;
|
|||
|
|
m _ t r a d e . S e t D e v i a t i o n I n P o i n t s ( ( u l o n g ) m _ s l i p p a g e ) ;
|
|||
|
|
m _ t r a d e . S e t T y p e F i l l i n g B y S y m b o l ( _ S y m b o l ) ;
|
|||
|
|
m _ p s a r _ h a n d l e = ( m _ e x i t _ m o d e = = E X I T _ M O D E _ P S A R _ T R A I L ) ? i S A R ( _ S y m b o l , P E R I O D _ C U R R E N T , m _ p s a r _ s t e p , m _ p s a r _ m a x ) : I N V A L I D _ H A N D L E ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
~ C T r a d e M a n a g e r ( ) {
|
|||
|
|
i f ( m _ t r a d e ! = N U L L ) d e l e t e m _ t r a d e ;
|
|||
|
|
i f ( m _ o p e n _ t r a d e s ! = N U L L ) d e l e t e m _ o p e n _ t r a d e s ;
|
|||
|
|
i f ( m _ p s a r _ h a n d l e ! = I N V A L I D _ H A N D L E ) I n d i c a t o r R e l e a s e ( m _ p s a r _ h a n d l e ) ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
v o i d M a n a g e U n s e t S L T P ( )
|
|||
|
|
{
|
|||
|
|
i f ( m _ e x i t _ m o d e = = E X I T _ M O D E _ S T R U C T U R A L ) r e t u r n ;
|
|||
|
|
/ / 1 . 4LI-!9%H-@*!- @ 7H-% " A I!I-!9%" ---@-#L5H94DA%I'
|
|||
|
|
S y n c h r o n i z e P o s i t i o n s ( ) ;
|
|||
|
|
|
|||
|
|
/ / 2 . '%99 " A I!I-!9%" --@-#L1I+!5H E A 12#-"9H
|
|||
|
|
f o r ( i n t i = 0 ; i < m _ o p e n _ t r a d e s . T o t a l ( ) ; i + + )
|
|||
|
|
{
|
|||
|
|
C M a n a g e d T r a d e * t r a d e _ i n f o = m _ o p e n _ t r a d e s . A t ( i ) ;
|
|||
|
|
|
|||
|
|
/ / 3 . !-+2@ 20--@-#L5H"1D!HDI1I S L / T P ( i s _ s l _ t p _ s e t = = f a l s e )
|
|||
|
|
i f ( t r a d e _ i n f o ! = N U L L & & ! t r a d e _ i n f o . i s _ s l _ t p _ s e t )
|
|||
|
|
{
|
|||
|
|
/ / @%7- P o s i t i o n C T e r m i n a l @ 7H-6I-!9%*
|
|||
|
|
i f ( ! P o s i t i o n S e l e c t B y T i c k e t ( t r a d e _ i n f o . t i c k e t ) ) c o n t i n u e ;
|
|||
|
|
|
|||
|
|
/ / - - - 4 . #'*-A%0#1AI#22C+I*-%I-1 S t o p L e v e l -B#@-#L - - -
|
|||
|
|
|
|||
|
|
i n t s t o p s _ l e v e l _ p o i n t s = ( i n t ) S y m b o l I n f o I n t e g e r ( _ S y m b o l , S Y M B O L _ T R A D E _ S T O P S _ L E V E L ) ;
|
|||
|
|
d o u b l e s t o p s _ l e v e l _ o f f s e t = s t o p s _ l e v e l _ p o i n t s * _ P o i n t ;
|
|||
|
|
|
|||
|
|
d o u b l e f i n a l _ s l = t r a d e _ i n f o . t a r g e t _ s l _ p r i c e ;
|
|||
|
|
d o u b l e f i n a l _ t p = t r a d e _ i n f o . t a r g e t _ t p _ p r i c e ;
|
|||
|
|
d o u b l e b i d = S y m b o l I n f o D o u b l e ( _ S y m b o l , S Y M B O L _ B I D ) ;
|
|||
|
|
d o u b l e a s k = S y m b o l I n f o D o u b l e ( _ S y m b o l , S Y M B O L _ A S K ) ;
|
|||
|
|
E N U M _ P O S I T I O N _ T Y P E t y p e = ( E N U M _ P O S I T I O N _ T Y P E ) P o s i t i o n G e t I n t e g e r ( P O S I T I O N _ T Y P E ) ;
|
|||
|
|
|
|||
|
|
i f ( t y p e = = P O S I T I O N _ T Y P E _ B U Y ) {
|
|||
|
|
/ / S L - B u y I--"9HH3'H2#22 B i d 181-"H2I-"@H21 S t o p L e v e l
|
|||
|
|
i f ( f i n a l _ s l ! = 0 . 0 & & b i d - f i n a l _ s l < s t o p s _ l e v e l _ o f f s e t ) {
|
|||
|
|
f i n a l _ s l = b i d - s t o p s _ l e v e l _ o f f s e t ;
|
|||
|
|
}
|
|||
|
|
/ / T P - B u y I--"9H*9'H2#22 A s k 181-"H2I-"@H21 S t o p L e v e l
|
|||
|
|
i f ( f i n a l _ t p ! = 0 . 0 & & f i n a l _ t p - a s k < s t o p s _ l e v e l _ o f f s e t ) {
|
|||
|
|
f i n a l _ t p = a s k + s t o p s _ l e v e l _ o f f s e t ;
|
|||
|
|
}
|
|||
|
|
} e l s e { / / S E L L
|
|||
|
|
/ / S L - S e l l I--"9H*9'H2#22 A s k 181-"H2I-"@H21 S t o p L e v e l
|
|||
|
|
i f ( f i n a l _ s l ! = 0 . 0 & & f i n a l _ s l - a s k < s t o p s _ l e v e l _ o f f s e t ) {
|
|||
|
|
f i n a l _ s l = a s k + s t o p s _ l e v e l _ o f f s e t ;
|
|||
|
|
}
|
|||
|
|
/ / T P - S e l l I--"9HH3'H2#22 B i d 181-"H2I-"@H21 S t o p L e v e l
|
|||
|
|
i f ( f i n a l _ t p ! = 0 . 0 & & b i d - f i n a l _ t p < s t o p s _ l e v e l _ o f f s e t ) {
|
|||
|
|
f i n a l _ t p = b i d - s t o p s _ l e v e l _ o f f s e t ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / 5 . " 3'2!*0-2" #22 ( N o r m a l i z e ) C+I!5(4"!9I-
|
|||
|
|
i n t d i g i t s = ( i n t ) S y m b o l I n f o I n t e g e r ( _ S y m b o l , S Y M B O L _ D I G I T S ) ;
|
|||
|
|
f i n a l _ s l = N o r m a l i z e D o u b l e ( f i n a l _ s l , d i g i t s ) ;
|
|||
|
|
f i n a l _ t p = N o r m a l i z e D o u b l e ( f i n a l _ t p , d i g i t s ) ;
|
|||
|
|
|
|||
|
|
/ / 6 . *H3*1HAID@ 7H-1I S L / T P
|
|||
|
|
i f ( ! m _ e x i t _ m o d e = = E X I T _ M O D E _ P S A R _ T R A I L | | ! m _ e x i t _ m o d e = = E X I T _ M O D E _ T R A I L I N G _ S T O P ) {
|
|||
|
|
i f ( m _ t r a d e . P o s i t i o n M o d i f y ( t r a d e _ i n f o . t i c k e t , f i n a l _ s l , f i n a l _ t p ) ) {
|
|||
|
|
/ / 7 . I2*3@#G C+I-1@ " A I!I-!9%" 'H2--@-#L5I91I S L / T P A%I'
|
|||
|
|
t r a d e _ i n f o . i s _ s l _ t p _ s e t = t r u e ;
|
|||
|
|
P r i n t F o r m a t ( " S u c c e s s f u l l y s e t i n i t i a l S L / T P f o r t i c k e t # % d " , t r a d e _ i n f o . t i c k e t ) ;
|
|||
|
|
} e l s e {
|
|||
|
|
P r i n t F o r m a t ( " F a i l e d t o s e t S L / T P f o r t i c k e t # % d . E r r o r : % s " , t r a d e _ i n f o . t i c k e t , m _ t r a d e . R e s u l t R e t c o d e D e s c r i p t i o n ( ) ) ;
|
|||
|
|
}
|
|||
|
|
} e l s e {
|
|||
|
|
i f ( m _ t r a d e . P o s i t i o n M o d i f y ( t r a d e _ i n f o . t i c k e t , f i n a l _ s l , f i n a l _ t p ) ) {
|
|||
|
|
/ / 7 . I2*3@#G C+I-1@ " A I!I-!9%" 'H2--@-#L5I91I S L / T P A%I'
|
|||
|
|
t r a d e _ i n f o . i s _ s l _ t p _ s e t = t r u e ;
|
|||
|
|
P r i n t F o r m a t ( " S u c c e s s f u l l y s e t i n i t i a l S L / T P f o r t i c k e t # % d " , t r a d e _ i n f o . t i c k e t ) ;
|
|||
|
|
} e l s e {
|
|||
|
|
P r i n t F o r m a t ( " F a i l e d t o s e t S L / T P f o r t i c k e t # % d . E r r o r : % s " , t r a d e _ i n f o . t i c k e t , m _ t r a d e . R e s u l t R e t c o d e D e s c r i p t i o n ( ) ) ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
v o i d M a n a g e A c t i v e T r a i l i n g ( )
|
|||
|
|
{
|
|||
|
|
f o r ( i n t i = 0 ; i < m _ o p e n _ t r a d e s . T o t a l ( ) ; i + + )
|
|||
|
|
{
|
|||
|
|
C M a n a g e d T r a d e * t r a d e _ i n f o = m _ o p e n _ t r a d e s . A t ( i ) ;
|
|||
|
|
|
|||
|
|
/ / #'*-'H2--@-#L #I-!12#+#7-"1 ( !5 S L / T P A%I')
|
|||
|
|
i f ( t r a d e _ i n f o = = N U L L | | ! t r a d e _ i n f o . i s _ s l _ t p _ s e t ) {
|
|||
|
|
c o n t i n u e ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / - - - F I X E D L O G I C : C h e c k b o t h t a s k s i n d e p e n d e n t l y ( n o " e l s e " ) - - -
|
|||
|
|
|
|||
|
|
/ / T a s k 1 : #'*-A%012# P a r t i a l T P & B r e a k e v e n
|
|||
|
|
i f ( m _ u s e _ p a r t i a l _ t p & & ! t r a d e _ i n f o . i s _ p a r t i a l _ t p _ t a k e n ) {
|
|||
|
|
M a n a g e _ P a r t i a l T P _ a n d _ B r e a k e v e n ( t r a d e _ i n f o ) ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / T a s k 2 : #'*-A%012# T r a i l i n g S t o p
|
|||
|
|
/ / *H'5I032B"D!H6I-"9H1'H2 P a r t i a l T P 03*3@#GA%I'+#7-D!H
|
|||
|
|
i f ( m _ e x i t _ m o d e = = E X I T _ M O D E _ T R A I L I N G _ S T O P ) {
|
|||
|
|
M a n a g e T r a i l i n g S t o p _ F i x e d ( t r a d e _ i n f o ) ;
|
|||
|
|
}
|
|||
|
|
e l s e i f ( m _ e x i t _ m o d e = = E X I T _ M O D E _ P S A R _ T R A I L ) {
|
|||
|
|
M a n a g e T r a i l i n g S t o p _ P S A R ( t r a d e _ i n f o ) ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / - - - N E W : F u n c t i o n 3 ( B a r - b a s e d T a s k ) - - -
|
|||
|
|
v o i d M a n a g e S t r u c t u r a l E x i t s ( C A r r a y O b j * a l l _ s w i n g s )
|
|||
|
|
{
|
|||
|
|
/ / 32@ 20@!7H--"9HCB+! S t r u c t u r a l E x i t @H21I
|
|||
|
|
i f ( m _ e x i t _ m o d e ! = E X I T _ M O D E _ S T R U C T U R A L ) {
|
|||
|
|
r e t u r n ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
S y n c h r o n i z e P o s i t i o n s ( ) ;
|
|||
|
|
f o r ( i n t i = m _ o p e n _ t r a d e s . T o t a l ( ) - 1 ; i > = 0 ; i - - ) {
|
|||
|
|
C M a n a g e d T r a d e * t r a d e _ i n f o = m _ o p e n _ t r a d e s . A t ( i ) ;
|
|||
|
|
/ / @
|
|||
|
|
G@ 20--@-#L5H@G S t r u c t u r a l T r a d e ( D!H!5 S L / T P @#4H!I)
|
|||
|
|
i f ( t r a d e _ i n f o = = N U L L | | t r a d e _ i n f o . t a r g e t _ s l _ p r i c e ! = 0 . 0 ) c o n t i n u e ;
|
|||
|
|
|
|||
|
|
i f ( ! P o s i t i o n S e l e c t B y T i c k e t ( t r a d e _ i n f o . t i c k e t ) ) c o n t i n u e ;
|
|||
|
|
E N U M _ P O S I T I O N _ T Y P E p o s i t i o n _ t y p e = ( E N U M _ P O S I T I O N _ T Y P E ) P o s i t i o n G e t I n t e g e r ( P O S I T I O N _ T Y P E ) ;
|
|||
|
|
d a t e t i m e p o s i t i o n _ o p e n _ t i m e = ( d a t e t i m e ) P o s i t i o n G e t I n t e g e r ( P O S I T I O N _ T I M E ) ;
|
|||
|
|
|
|||
|
|
/ / +2 " *'4-I2-4" 2 t r i g g e r _ l e v e l _ t i m e 5H16D'I
|
|||
|
|
S w i n g P o i n t * e n t r y _ r e f _ s w i n g = F i n d S w i n g B y T i m e ( t r a d e _ i n f o . t r i g g e r _ l e v e l _ t i m e , a l l _ s w i n g s ) ;
|
|||
|
|
|
|||
|
|
b o o l c l o s e _ s i g n a l = f a l s e ;
|
|||
|
|
s t r i n g e x i t _ r e a s o n = " " ;
|
|||
|
|
|
|||
|
|
/ / + + + C O R R E C T E D F U N C T I O N C A L L S + + +
|
|||
|
|
/ / *H 2#2!4@-#LC+I9I-2!5HAH%0 1L
|
|||
|
|
1I-2#
|
|||
|
|
i f ( C h e c k E x i t _ O p p o s i t e M a j o r ( p o s i t i o n _ t y p e , p o s i t i o n _ o p e n _ t i m e , a l l _ s w i n g s ) ) {
|
|||
|
|
c l o s e _ s i g n a l = t r u e ;
|
|||
|
|
e x i t _ r e a s o n = " O p p o s i t e M a j o r S w i n g " ;
|
|||
|
|
}
|
|||
|
|
e l s e i f ( C h e c k E x i t _ D o u b l e M i n o r ( p o s i t i o n _ o p e n _ t i m e , a l l _ s w i n g s ) ) {
|
|||
|
|
c l o s e _ s i g n a l = t r u e ;
|
|||
|
|
e x i t _ r e a s o n = " D o u b l e M i n o r S w i n g s " ;
|
|||
|
|
}
|
|||
|
|
e l s e i f ( e n t r y _ r e f _ s w i n g ! = N U L L & & C h e c k E x i t _ C o n t r a d i c t o r y M i n o r ( p o s i t i o n _ t y p e , e n t r y _ r e f _ s w i n g , p o s i t i o n _ o p e n _ t i m e , a l l _ s w i n g s ) ) {
|
|||
|
|
c l o s e _ s i g n a l = t r u e ;
|
|||
|
|
e x i t _ r e a s o n = " C o n t r a d i c t o r y M i n o r S w i n g " ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
i f ( c l o s e _ s i g n a l ) {
|
|||
|
|
P r i n t F o r m a t ( " S T R U C T U R A L E X I T o n t i c k e t # % d . R e a s o n : % s . " , t r a d e _ i n f o . t i c k e t , e x i t _ r e a s o n ) ;
|
|||
|
|
m _ t r a d e . P o s i t i o n C l o s e ( t r a d e _ i n f o . t i c k e t ) ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
/ / T h i s f u n c t i o n r u n s o n c e p e r n e w b a r t o c h e c k f o r s t r u c t u r a l e x i t c o n d i t i o n s .
|
|||
|
|
v o i d M a n a g e P o s i t i o n s O n N e w B a r ( C A r r a y O b j * a l l _ s w i n g s )
|
|||
|
|
{
|
|||
|
|
/ / 32@ 20@!7H--"9HCB+! S t r u c t u r a l E x i t @H21I
|
|||
|
|
i f ( m _ e x i t _ m o d e ! = E X I T _ M O D E _ S T R U C T U R A L ) {
|
|||
|
|
r e t u r n ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
S y n c h r o n i z e P o s i t i o n s ( ) ;
|
|||
|
|
|
|||
|
|
f o r ( i n t i = m _ o p e n _ t r a d e s . T o t a l ( ) - 1 ; i > = 0 ; i - - )
|
|||
|
|
{
|
|||
|
|
C M a n a g e d T r a d e * t r a d e _ i n f o = m _ o p e n _ t r a d e s . A t ( i ) ;
|
|||
|
|
/ / @
|
|||
|
|
G@ 20--@-#L5H@G S t r u c t u r a l T r a d e
|
|||
|
|
i f ( t r a d e _ i n f o = = N U L L | | t r a d e _ i n f o . t a r g e t _ s l _ p r i c e ! = 0 . 0 ) c o n t i n u e ;
|
|||
|
|
|
|||
|
|
i f ( ! P o s i t i o n S e l e c t B y T i c k e t ( t r a d e _ i n f o . t i c k e t ) ) c o n t i n u e ;
|
|||
|
|
|
|||
|
|
/ / - - - 6I-!9%5H3@G1I+!!2H- - - -
|
|||
|
|
E N U M _ P O S I T I O N _ T Y P E p o s i t i o n _ t y p e = ( E N U M _ P O S I T I O N _ T Y P E ) P o s i t i o n G e t I n t e g e r ( P O S I T I O N _ T Y P E ) ;
|
|||
|
|
d a t e t i m e p o s i t i o n _ o p e n _ t i m e = ( d a t e t i m e ) P o s i t i o n G e t I n t e g e r ( P O S I T I O N _ T I M E ) ;
|
|||
|
|
S w i n g P o i n t * e n t r y _ r e f _ s w i n g = F i n d S w i n g B y T i m e ( t r a d e _ i n f o . t r i g g e r _ l e v e l _ t i m e , a l l _ s w i n g s ) ;
|
|||
|
|
|
|||
|
|
b o o l c l o s e _ s i g n a l = f a l s e ;
|
|||
|
|
s t r i n g e x i t _ r e a s o n = " " ;
|
|||
|
|
|
|||
|
|
/ / - - - C O R R E C T E D F U N C T I O N C A L L S - - -
|
|||
|
|
/ / *H 2#2!4@-#LC+I9I-2!5HAH%0 1L
|
|||
|
|
1I-2#
|
|||
|
|
|
|||
|
|
i f ( C h e c k E x i t _ O p p o s i t e M a j o r ( p o s i t i o n _ t y p e , p o s i t i o n _ o p e n _ t i m e , a l l _ s w i n g s ) )
|
|||
|
|
{
|
|||
|
|
c l o s e _ s i g n a l = t r u e ;
|
|||
|
|
e x i t _ r e a s o n = " O p p o s i t e M a j o r S w i n g f o r m e d " ;
|
|||
|
|
}
|
|||
|
|
e l s e i f ( C h e c k E x i t _ D o u b l e M i n o r ( p o s i t i o n _ o p e n _ t i m e , a l l _ s w i n g s ) )
|
|||
|
|
{
|
|||
|
|
c l o s e _ s i g n a l = t r u e ;
|
|||
|
|
e x i t _ r e a s o n = " D o u b l e M i n o r S w i n g s f o r m e d " ;
|
|||
|
|
}
|
|||
|
|
/ / @7H-D5II-2# e n t r y _ r e f _ s w i n g 6I-@
|
|||
|
|
GH-'H2D!H@G N U L L
|
|||
|
|
e l s e i f ( e n t r y _ r e f _ s w i n g ! = N U L L & & C h e c k E x i t _ C o n t r a d i c t o r y M i n o r ( p o s i t i o n _ t y p e , e n t r y _ r e f _ s w i n g , p o s i t i o n _ o p e n _ t i m e , a l l _ s w i n g s ) )
|
|||
|
|
{
|
|||
|
|
c l o s e _ s i g n a l = t r u e ;
|
|||
|
|
e x i t _ r e a s o n = " C o n t r a d i c t o r y M i n o r S w i n g f o r m e d " ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / I2!5*1
2C+I-- C+I*1H4--@-#L
|
|||
|
|
i f ( c l o s e _ s i g n a l )
|
|||
|
|
{
|
|||
|
|
P r i n t F o r m a t ( " S T R U C T U R A L E X I T o n t i c k e t # % d . R e a s o n : % s . C l o s i n g p o s i t i o n . " , t r a d e _ i n f o . t i c k e t , e x i t _ r e a s o n ) ;
|
|||
|
|
m _ t r a d e . P o s i t i o n C l o s e ( t r a d e _ i n f o . t i c k e t ) ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
b o o l O p e n T r a d e F r o m S i g n a l ( C S i g n a l Z o n e * s i g n a l _ z o n e )
|
|||
|
|
{
|
|||
|
|
i f ( s i g n a l _ z o n e = = N U L L | | m _ r i s k _ m a n a g e r _ p t r = = N U L L | | m _ t r a d e = = N U L L ) r e t u r n f a l s e ;
|
|||
|
|
|
|||
|
|
/ / - - - 1 . 3' 2#2!4@-#L 7I2 - - -
|
|||
|
|
E N U M _ O R D E R _ T Y P E t y p e = ( s i g n a l _ z o n e . d i r e c t i o n = = D I R E C T I O N _ B U L L I S H ) ? O R D E R _ T Y P E _ B U Y : O R D E R _ T Y P E _ S E L L ;
|
|||
|
|
d o u b l e e n t r y _ p r i c e = ( t y p e = = O R D E R _ T Y P E _ B U Y ) ? S y m b o l I n f o D o u b l e ( _ S y m b o l , S Y M B O L _ A S K ) : S y m b o l I n f o D o u b l e ( _ S y m b o l , S Y M B O L _ B I D ) ;
|
|||
|
|
|
|||
|
|
/ / - - - 2 . 3+H2 S L A%0 T P 2! E x i t M o d e 5H@%7- - - -
|
|||
|
|
d o u b l e s l _ p r i c e = 0 . 0 ;
|
|||
|
|
d o u b l e t p _ p r i c e = 0 . 0 ;
|
|||
|
|
d o u b l e l o t s = 0 . 0 ;
|
|||
|
|
b o o l i s _ s t r u c t u r a l _ t r a d e = ( m _ e x i t _ m o d e = = E X I T _ M O D E _ S T R U C T U R A L ) ;
|
|||
|
|
|
|||
|
|
i f ( i s _ s t r u c t u r a l _ t r a d e )
|
|||
|
|
{
|
|||
|
|
/ / - - - *3+#1B+! S t r u c t u r a l E x i t : D!H!52#1I S L / T P @#4H!I - - -
|
|||
|
|
P r i n t ( " S t r u c t u r a l E x i t M o d e a c t i v e . O p e n i n g p o s i t i o n w i t h N O i n i t i a l S L / T P . " ) ;
|
|||
|
|
/ / @#2"1I-3' S L @*!7-@ 7H-+2 L o t S i z e
|
|||
|
|
d o u b l e v i r t u a l _ s l _ p r i c e = ( t y p e = = O R D E R _ T Y P E _ B U Y ) ? s i g n a l _ z o n e . b o t t o m - ( m _ s l _ b u f f e r _ p o i n t s * _ P o i n t ) : s i g n a l _ z o n e . t o p + ( m _ s l _ b u f f e r _ p o i n t s * _ P o i n t ) ;
|
|||
|
|
d o u b l e s l _ d i s t a n c e _ i n _ p o i n t s = M a t h A b s ( e n t r y _ p r i c e - v i r t u a l _ s l _ p r i c e ) / _ P o i n t ;
|
|||
|
|
l o t s = m _ r i s k _ m a n a g e r _ p t r . G e t L o t S i z e ( s l _ d i s t a n c e _ i n _ p o i n t s ) ;
|
|||
|
|
|
|||
|
|
s l _ p r i c e = 0 . 0 ; / / S L #4@G 0
|
|||
|
|
t p _ p r i c e = 0 . 0 ; / / T P #4@G 0
|
|||
|
|
}
|
|||
|
|
e l s e
|
|||
|
|
{
|
|||
|
|
/ / - - - *3+#1B+!-7HF: 3' S L / T P 2!4 - - -
|
|||
|
|
s l _ p r i c e = ( t y p e = = O R D E R _ T Y P E _ B U Y ) ? s i g n a l _ z o n e . b o t t o m - ( m _ s l _ b u f f e r _ p o i n t s * _ P o i n t ) : s i g n a l _ z o n e . t o p + ( m _ s l _ b u f f e r _ p o i n t s * _ P o i n t ) ;
|
|||
|
|
d o u b l e s l _ d i s t a n c e _ i n _ p o i n t s = M a t h A b s ( e n t r y _ p r i c e - s l _ p r i c e ) / _ P o i n t ;
|
|||
|
|
|
|||
|
|
i f ( m _ m i n _ s l _ p o i n t s > 0 & & s l _ d i s t a n c e _ i n _ p o i n t s < m _ m i n _ s l _ p o i n t s ) {
|
|||
|
|
s l _ d i s t a n c e _ i n _ p o i n t s = m _ m i n _ s l _ p o i n t s ;
|
|||
|
|
s l _ p r i c e = ( t y p e = = O R D E R _ T Y P E _ B U Y ) ? e n t r y _ p r i c e - ( s l _ d i s t a n c e _ i n _ p o i n t s * _ P o i n t ) : e n t r y _ p r i c e + ( s l _ d i s t a n c e _ i n _ p o i n t s * _ P o i n t ) ;
|
|||
|
|
}
|
|||
|
|
i f ( m _ m a x _ s l _ p o i n t s > 0 & & s l _ d i s t a n c e _ i n _ p o i n t s > m _ m a x _ s l _ p o i n t s ) { r e t u r n f a l s e ; }
|
|||
|
|
|
|||
|
|
l o t s = m _ r i s k _ m a n a g e r _ p t r . G e t L o t S i z e ( s l _ d i s t a n c e _ i n _ p o i n t s ) ;
|
|||
|
|
|
|||
|
|
d o u b l e s l _ d i s t a n c e _ i n _ p r i c e _ f i n a l = M a t h A b s ( e n t r y _ p r i c e - s l _ p r i c e ) ;
|
|||
|
|
i f ( m _ e x i t _ m o d e = = E X I T _ M O D E _ F I X E D _ T P ) {
|
|||
|
|
t p _ p r i c e = ( t y p e = = O R D E R _ T Y P E _ B U Y ) ? e n t r y _ p r i c e + m _ t p _ p o i n t s * _ P o i n t : e n t r y _ p r i c e - m _ t p _ p o i n t s * _ P o i n t ;
|
|||
|
|
} e l s e { / / R R _ R A T I O , T R A I L I N G _ S T O P , P S A R _ T R A I L u s e R : R
|
|||
|
|
i f ( m _ r r _ r a t i o > 0 ) {
|
|||
|
|
t p _ p r i c e = ( t y p e = = O R D E R _ T Y P E _ B U Y ) ? e n t r y _ p r i c e + s l _ d i s t a n c e _ i n _ p r i c e _ f i n a l * m _ r r _ r a t i o : e n t r y _ p r i c e - s l _ d i s t a n c e _ i n _ p r i c e _ f i n a l * m _ r r _ r a t i o ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / - - - *H'5H@+%7-@+!7-@4! - - -
|
|||
|
|
i f ( l o t s < = 0 ) r e t u r n f a l s e ;
|
|||
|
|
|
|||
|
|
i n t d i g i t s = ( i n t ) S y m b o l I n f o I n t e g e r ( _ S y m b o l , S Y M B O L _ D I G I T S ) ;
|
|||
|
|
d o u b l e f i n a l _ s l _ p r i c e = N o r m a l i z e D o u b l e ( s l _ p r i c e , d i g i t s ) ;
|
|||
|
|
d o u b l e f i n a l _ t p _ p r i c e = N o r m a l i z e D o u b l e ( t p _ p r i c e , d i g i t s ) ;
|
|||
|
|
|
|||
|
|
|
|||
|
|
/ / @4--@-#LAD!H!5 S L / T P @ 7H-#-2#12#2 M a n a g e U n s e t S L T P
|
|||
|
|
i f ( ! m _ t r a d e . P o s i t i o n O p e n ( _ S y m b o l , t y p e , l o t s , e n t r y _ p r i c e , 0 . 0 , 0 . 0 , m _ c o m m e n t ) ) {
|
|||
|
|
r e t u r n f a l s e ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/ / *#I2A I!I-!9% 2"C
|
|||
|
|
u l o n g n e w _ t i c k e t = m _ t r a d e . R e s u l t O r d e r ( ) ;
|
|||
|
|
i f ( n e w _ t i c k e t > 0 ) {
|
|||
|
|
C M a n a g e d T r a d e * n e w _ t r a d e _ i n f o = n e w C M a n a g e d T r a d e ( n e w _ t i c k e t , f i n a l _ s l _ p r i c e , f i n a l _ t p _ p r i c e , s i g n a l _ z o n e . t r i g g e r _ l e v e l _ t i m e , i s _ s t r u c t u r a l _ t r a d e ) ;
|
|||
|
|
m _ o p e n _ t r a d e s . A d d ( n e w _ t r a d e _ i n f o ) ;
|
|||
|
|
} e l s e {
|
|||
|
|
r e t u r n f a l s e ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
r e t u r n t r u e ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
v o i d C l o s e A l l P o s i t i o n s ( s t r i n g r e a s o n = " " ) {
|
|||
|
|
P r i n t F o r m a t ( " C l o s i n g a l l p o s i t i o n s . R e a s o n : % s " , r e a s o n = = " " ? " R e q u e s t " : r e a s o n ) ;
|
|||
|
|
f o r ( i n t i = P o s i t i o n s T o t a l ( ) - 1 ; i > = 0 ; i - - ) {
|
|||
|
|
u l o n g t i c k e t = P o s i t i o n G e t T i c k e t ( i ) ;
|
|||
|
|
i f ( t i c k e t > 0 & & P o s i t i o n S e l e c t B y T i c k e t ( t i c k e t ) & & P o s i t i o n G e t I n t e g e r ( P O S I T I O N _ M A G I C ) = = m _ m a g i c ) {
|
|||
|
|
m _ t r a d e . P o s i t i o n C l o s e ( t i c k e t ) ;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
} ;
|
|||
|
|
|
|||
|
|
# e n d i f
|