Price Data Components
Orders Execution
Indicators Used
0
Views
0
Downloads
0
Favorites
EA_ZoomErr_EURGBP
ÿþ# p r o p e r t y c o p y r i g h t " R e u t s k i y D m i t r i y "
# p r o p e r t y l i n k " h t t p s : / / w w w . m q l 5 . c o m / r u / u s e r s / d m r d i m t r i y "
# p r o p e r t y v e r s i o n " 1 . 1 1 "
# p r o p e r t y s t r i c t
e x t e r n d o u b l e d b l L o t s = 0 . 0 2 ;
e x t e r n b o o l b l S t e p F i b o = f a l s e ;
e x t e r n b o o l b l R i s k = t r u e ;
e x t e r n d o u b l e d b l M u l t i p l i e r = 1 ;
e x t e r n i n t i n t M a g i c = 9 9 9 ;
e x t e r n i n t i n t S p l i t = 3 ;
e x t e r n i n t i n t T a k e P r o f i t = 2 0 0 ;
/ / e x t e r n i n t i n t S t o p L o s s = 3 0 0
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
e x t e r n s t r i n g s t r S T H _ = " 0@0<5B@K S T H " ;
e x t e r n b o o l b l S T H = t r u e ;
e x t e r n i n t i n t _ S T H _ M a x R i s k = 3 0 ;
e x t e r n i n t i n t _ S T H _ S t e p = 1 2 5 ;
e x t e r n i n t i n t _ S t o c h K = 5 ;
e x t e r n i n t i n t _ S t o c h D = 3 ;
e x t e r n i n t i n t _ S t o c h L = 3 ;
e x t e r n s t r i n g s t r T R _ = " 0@0<5B@K "@5=40" ;
e x t e r n i n t i n t _ M A _ P e r i o d = 3 0 ;
e x t e r n i n t i n t _ W a i t = 5 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
e x t e r n s t r i n g s t r M A _ b u y = " 0@0<5B@K M A _ b u y " ;
e x t e r n b o o l b l M A _ b u y = f a l s e ;
e x t e r n i n t i n t _ M A _ b u y _ M a x R i s k = 2 5 ;
e x t e r n i n t i n t _ M A _ b u y _ S t e p = 5 2 5 ;
e x t e r n i n t i n t _ M A _ b u y _ P e r i o d = 1 9 6 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
e x t e r n s t r i n g s t r M A _ s e l l = " 0@0<5B@K M A _ s e l l " ;
e x t e r n b o o l b l M A _ s e l l = f a l s e ;
e x t e r n i n t i n t _ M A _ s e l l _ M a x R i s k = 2 5 ;
e x t e r n i n t i n t _ M A _ s e l l _ S t e p = 3 4 0 ;
e x t e r n i n t i n t _ M A _ s e l l _ P e r i o d = 9 2 ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
b o o l
b l C r o s s U p = f a l s e ,
b l C r o s s D o w n = f a l s e ;
i n t i n t T i c k e t , i n t B a r , i n t S t e p O r d ,
i n t S t e p , i n t M a x R i s k , i n t T a k e M o d = 1 0 ;
d o u b l e d b l T P , d b l S L , d b l P r i c e , d b l L a s t L o t , d b l P e r c e n t R i s k ,
d b l P r e v i o u s , d b l C u r r e n t ;
d a t e t i m e d t T i m e ;
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | E x p e r t i n i t i a l i z a t i o n f u n c t i o n |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
i n t O n I n i t ( )
{
i f ( D i g i t s = = 3 )
{
i n t T a k e P r o f i t * = 1 0 ;
i n t S t e p * = 1 0 ;
}
r e t u r n ( I N I T _ S U C C E E D E D ) ;
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | E x p e r t d e i n i t i a l i z a t i o n f u n c t i o n |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
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 x p e r t t i c k f u n c t i o n |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
i n t s t a r t ( )
{
/ / 01>B05< @07 2 A25GC
i f ( d t T i m e = = i T i m e ( N U L L , 0 , 0 ) ) r e t u r n ( 0 ) ;
d t T i m e = i T i m e ( N U L L , 0 , 0 ) ;
i f ( b l R i s k & & F _ i n t _ C o u n t T r a d e s ( ) > 0 & & F _ d b l _ O r d e r s P r o f i t ( ) < 0 ) / / P f
{
d b l P e r c e n t R i s k = M a t h A b s ( F _ d b l _ O r d e r s P r o f i t ( ) ) * 1 0 0 / A c c o u n t B a l a n c e ( ) ;
d b l P e r c e n t R i s k = N o r m a l i z e D o u b l e ( d b l P e r c e n t R i s k , 0 ) ;
i f ( d b l P e r c e n t R i s k > i n t M a x R i s k ) / / 8A: ?@52KH05B 4>?CAB8<K9
{
F _ v d _ C l o s e A l l ( ) ;
}
}
/ / 5A;8 =5B >@45@>2 >1028BL ?@>25@:C ?> B09<D@59<C
i f ( F _ i n t _ C o u n t T r a d e s ( ) = = 0 )
{
/ / @>25@O5< ?5@5A5G5=85 A> A@545=859
S i g n M A ( ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( ( ( b l S T H & & s t r S T H ( ) = = " b u y " & & b l C r o s s U p ) | | ( b l M A _ b u y & & s t r M A ( ) = = " b u y " ) ) & & F _ i n t _ C o u n t T r a d e s ( ) = = 0 ) / /
{ / / & & b l C r o s s D o w n
d b l T P = N o r m a l i z e D o u b l e ( A s k + i n t T a k e P r o f i t * P o i n t , D i g i t s ) ;
/ / d b l S L = N o r m a l i z e D o u b l e ( B i d - i n t S t o p L o s s * P o i n t , D i g i t s ) ;
i n t T i c k e t = 0 ;
i n t T i c k e t = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , d b l L o t s , A s k , 5 , 0 , d b l T P , " 1 - 9 >@45@" , i n t M a g i c , 0 , c l r B l u e ) ;
i f ( i n t T i c k e t < 0 )
{
P r i n t ( " H81:0 2KAB02;5=8O >@45@0" ) ;
}
e l s e
{
b l C r o s s U p = f a l s e ;
}
}
i f ( ( ( b l S T H & & s t r S T H ( ) = = " s e l l " & & b l C r o s s D o w n ) | | ( b l M A _ s e l l & & s t r M A ( ) = = " s e l l " ) ) & & F _ i n t _ C o u n t T r a d e s ( ) = = 0 ) / /
{ / / & & b l C r o s s U p
d b l T P = N o r m a l i z e D o u b l e ( B i d - i n t T a k e P r o f i t * P o i n t , D i g i t s ) ;
/ / d b l S L = N o r m a l i z e D o u b l e ( A s k + i n t S t o p L o s s * P o i n t , D i g i t s ) ;
i n t T i c k e t = 0 ;
i n t T i c k e t = O r d e r S e n d ( S y m b o l ( ) , O P _ S E L L , d b l L o t s , B i d , 5 , 0 , d b l T P , " 1 - 9 >@45@" , i n t M a g i c , 0 , c l r R e d ) ;
i f ( i n t T i c k e t < 0 )
{
P r i n t ( " H81:0 2KAB02;5=8O >@45@0" ) ;
}
e l s e
{
b l C r o s s D o w n = f a l s e ;
}
}
}
e l s e / / 5A;8 5ABL >@45@0
{
/ / =>2K9 H03 >@45@>2
i f ( b l S t e p F i b o )
{
i f ( F _ i n t _ C o u n t T r a d e s ( ) = = 1 )
i n t S t e p O r d = i n t S t e p ;
e l s e
i n t S t e p O r d = F _ i n t _ C o u n t T r a d e s ( ) * i n t S t e p * 2 ;
}
e l s e i n t S t e p O r d = i n t S t e p ;
i n t i n t O r d e r _ t y p e = F _ i n t _ L a s t O r d e r T y p e ( ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( i n t O r d e r _ t y p e = = O P _ B U Y )
{
d b l P r i c e = F _ d b l _ F i n d L a s t O r d e r p r i c e ( O P _ B U Y ) ;
i f ( i L o w ( N U L L , 0 , 0 ) < = d b l P r i c e - i n t S t e p O r d * P o i n t ) / / i C l o s e ( N U L L , 0 , 0 )
/ / 5A;8 ?@52KH5=> 4>?CAB8<>5 >B:;>=5=85 i n t S t e p O r d & & 5A;8BL A83=0;
/ / 4>102;O5< >@45@ =0 ?>:C?:C
{
d b l L a s t L o t = F _ d b l _ F i n d L a s t L o t ( O P _ B U Y ) ;
C o m m e n t ( " >A;54=89 ;>B" + D o u b l e T o S t r ( d b l L a s t L o t , 3 ) ) ;
d b l L a s t L o t = N o r m a l i z e D o u b l e ( d b l L a s t L o t * d b l M u l t i p l i e r , 2 ) ;
i n t T i c k e t = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , d b l L a s t L o t , A s k , 5 , 0 , 0 , " " , i n t M a g i c , 0 , c l r B l u e ) ;
i f ( i n t T i c k e t < 1 ) P r i n t ( " O r d e r o p e n e d s u c s e s s " ) ;
F _ v d _ M o d i f y O r d e r s ( O P _ B U Y ) ;
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
i f ( i n t O r d e r _ t y p e = = O P _ S E L L )
{
d b l P r i c e = F _ d b l _ F i n d L a s t O r d e r p r i c e ( O P _ S E L L ) ;
i f ( i H i g h ( N U L L , 0 , 0 ) > = d b l P r i c e + i n t S t e p O r d * P o i n t ) / / & & s t r R S I ( " i n s e r t " ) = = " s e l l "
/ / 5A;8 ?@52KH5=> 4>?CAB8<>5 >B:;>=5=85 i n t S t e p O r d & & 5A;8BL A83=0;
/ / 4>102;O5< >@45@ =0 ?@>406C
{
d b l L a s t L o t = F _ d b l _ F i n d L a s t L o t ( O P _ S E L L ) ;
d b l L a s t L o t = N o r m a l i z e D o u b l e ( d b l L a s t L o t * d b l M u l t i p l i e r , 2 ) ;
i n t T i c k e t = O r d e r S e n d ( S y m b o l ( ) , O P _ S E L L , d b l L a s t L o t , B i d , 5 , 0 , 0 , " " , i n t M a g i c , 0 , c l r R e d ) ;
i f ( i n t T i c k e t < 1 ) P r i n t ( " O r d e r o p e n e d s u c s e s s " ) ;
F _ v d _ M o d i f y O r d e r s ( O P _ S E L L ) ;
}
}
}
r e t u r n ( 0 ) ;
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
i n t F _ i n t _ C o u n t T r a d e s ( )
{
i n t i n t C o u n t = 0 ;
f o r ( i n t 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 , M O D E _ T R A D E S ) )
{
i f ( O r d e r S y m b o l ( ) = = S y m b o l ( ) & & O r d e r M a g i c N u m b e r ( ) = = i n t M a g i c )
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 )
i n t C o u n t + + ;
}
}
r e t u r n ( i n t C o u n t ) ;
}
i n t F _ i n t _ L a s t O r d e r T y p e ( )
{
f o r ( i n t i = O r d e r s T o t a l ( ) - 1 ; 1 > = 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 , M O D E _ T R A D E S ) )
{
i f ( O r d e r S y m b o l ( ) = = S y m b o l ( ) & & O r d e r M a g i c N u m b e r ( ) = = i n t M a g i c )
r e t u r n ( O r d e r T y p e ( ) ) ;
}
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
d o u b l e F _ d b l _ F i n d L a s t O r d e r p r i c e ( i n t i n t O T y p e )
{
i n t i n t O l d T i c k e t ;
d o u b l e d b l O l d O p e n P r i c e = 0 ;
i n t T i c k e t = 0 ;
f o r ( i n t c n t = O r d e r s T o t a l ( ) - 1 ; c n t > = 0 ; c n t - - )
{
i f ( O r d e r S e l e c t ( c n t , S E L E C T _ B Y _ P O S , M O D E _ T R A D E S ) )
{
i f ( O r d e r S y m b o l ( ) = = S y m b o l ( ) & & O r d e r M a g i c N u m b e r ( ) = = i n t M a g i c & & O r d e r T y p e ( ) = = i n t O T y p e )
{
i n t O l d T i c k e t = O r d e r T i c k e t ( ) ;
i f ( i n t O l d T i c k e t > i n t T i c k e t )
{
i n t T i c k e t = i n t O l d T i c k e t ;
d b l O l d O p e n P r i c e = O r d e r O p e n P r i c e ( ) ;
}
}
}
}
r e t u r n ( d b l O l d O p e n P r i c e ) ;
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
d o u b l e F _ d b l _ F i n d L a s t L o t ( i n t i n t O T y p e )
{
i n t i n t O l d T i c k e t ;
d o u b l e d b l O l d L o t = 0 ;
i n t T i c k e t = 0 ;
f o r ( i n t c n t = O r d e r s T o t a l ( ) - 1 ; c n t > = 0 ; c n t - - )
{
i f ( O r d e r S e l e c t ( c n t , S E L E C T _ B Y _ P O S , M O D E _ T R A D E S ) )
{
i f ( O r d e r S y m b o l ( ) = = S y m b o l ( ) & & O r d e r M a g i c N u m b e r ( ) = = i n t M a g i c & & O r d e r T y p e ( ) = = i n t O T y p e )
{
i n t O l d T i c k e t = O r d e r T i c k e t ( ) ;
i f ( i n t O l d T i c k e t > i n t T i c k e t )
{
i n t T i c k e t = i n t O l d T i c k e t ;
d b l O l d L o t = O r d e r L o t s ( ) ;
}
}
}
}
r e t u r n ( d b l O l d L o t ) ;
}
v o i d F _ v d _ M o d i f y O r d e r s ( i n t i n t O T y p e )
{
d o u b l e d b l A V G _ p r i c e , d b l O r d e r _ l o t s = 0 , d b l C R P r i c e = 0 ;
f o r ( i n t 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 , M O D E _ T R A D E S ) )
{
i f ( O r d e r S y m b o l ( ) = = S y m b o l ( ) & & O r d e r M a g i c N u m b e r ( ) = = i n t M a g i c & & O r d e r T y p e ( ) = = i n t O T y p e )
{
d b l C R P r i c e + = O r d e r O p e n P r i c e ( ) * O r d e r L o t s ( ) ;
d b l O r d e r _ l o t s + = O r d e r L o t s ( ) ;
}
}
}
d b l A V G _ p r i c e = N o r m a l i z e D o u b l e ( d b l C R P r i c e / d b l O r d e r _ l o t s , D i g i t s ) ;
i f ( i n t O T y p e = = O P _ B U Y ) d b l T P = N o r m a l i z e D o u b l e ( d b l A V G _ p r i c e + i n t T a k e M o d * P o i n t , D i g i t s ) ;
i f ( i n t O T y p e = = O P _ S E L L ) d b l T P = N o r m a l i z e D o u b l e ( d b l A V G _ p r i c e - i n t T a k e M o d * P o i n t , D i g i t s ) ;
/ / <>48D8F8@C5< >@45@0
f o r ( i n t 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 , M O D E _ T R A D E S ) )
{
i f ( O r d e r S y m b o l ( ) = = S y m b o l ( ) & & O r d e r M a g i c N u m b e r ( ) = = i n t M a g i c & & O r d e r T y p e ( ) = = i n t O T y p e )
{
i f ( O r d e r M o d i f y ( O r d e r T i c k e t ( ) , O r d e r O p e n P r i c e ( ) , 0 , d b l T P , 0 ) )
P r i n t ( " @45@0 CA?5H=> <>48D8F8@>20=K! " ) ;
e l s e
P r i n t ( " H81:0 <>48D8:0F88 >@45@>2" ) ;
}
}
}
}
d o u b l e F _ d b l _ O r d e r s P r o f i t ( )
{
d o u b l e d b l P r o f i t = 0 ;
f o r ( i n t 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 , M O D E _ T R A D E S ) )
{
i f ( O r d e r S y m b o l ( ) = = S y m b o l ( ) & & O r d e r M a g i c N u m b e r ( ) = = i n t M a g i c )
{
d b l P r o f i t + = O r d e r P r o f i t ( ) ;
}
}
}
r e t u r n ( d b l P r o f i t ) ;
}
v o i d F _ v d _ C l o s e A l l ( )
{
f o r ( i n t t r a d e = O r d e r s T o t a l ( ) - 1 ; t r a d e > = 0 ; t r a d e - - )
{
i f ( O r d e r S e l e c t ( t r a d e , S E L E C T _ B Y _ P O S , M O D E _ T R A D E S ) )
{
i f ( O r d e r S y m b o l ( ) = = S y m b o l ( ) & & O r d e r M a g i c N u m b e r ( ) = = i n t M a g i c )
{
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 ( O r d e r T i c k e t ( ) , O r d e r L o t s ( ) , B i d , i n t S p l i t , c l r B l u e ) )
P r i n t ( " E r r o r o f c l o s i n g o r d e r s " ) ;
e l s e P r i n t ( " C l o s e d " ) ;
}
i f ( O r d e r T y p e ( ) = = O P _ S E L L )
{
i f ( ! O r d e r C l o s e ( O r d e r T i c k e t ( ) , O r d e r L o t s ( ) , A s k , i n t S p l i t , c l r R e d ) )
P r i n t ( " E r r o r o f c l o s i n g o r d e r s " ) ;
e l s e P r i n t ( " C l o s e d " ) ;
}
}
S l e e p ( 1 0 0 0 ) ;
}
}
}
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - S i g n - - - - - - - - - - - - - - - - - - - - - - - -
/ / >1028BL >BA;56820=85 07@5H5=8O =0 ?>:C?:C 8 ?@>406C
/ / :>;8G5AB2> A25G59 =04 M a
/ / A83=0; =0 4>102;5=85 s t r S i g n = " i n s e r t "
s t r i n g s t r S T H ( )
{
i n t
i = 0 , g r o w = 0 , i n t V = 0 , i n t R o a d = 0 ;
b o o l
b l B u y = f a l s e ,
b l S e l l = f a l s e ;
d o u b l e
M _ 1 = i S t o c h a s t i c ( N U L L , 0 , i n t _ S t o c h K , i n t _ S t o c h D , i n t _ S t o c h L , M O D E _ S M A , 0 , M O D E _ M A I N , 1 ) ,
M _ 2 = i S t o c h a s t i c ( N U L L , 0 , i n t _ S t o c h K , i n t _ S t o c h D , i n t _ S t o c h L , M O D E _ S M A , 0 , M O D E _ M A I N , 2 ) ,
S _ 1 = i S t o c h a s t i c ( N U L L , 0 , i n t _ S t o c h K , i n t _ S t o c h D , i n t _ S t o c h L , M O D E _ S M A , 0 , M O D E _ S I G N A L , 1 ) ,
S _ 2 = i S t o c h a s t i c ( N U L L , 0 , i n t _ S t o c h K , i n t _ S t o c h D , i n t _ S t o c h L , M O D E _ S M A , 0 , M O D E _ S I G N A L , 2 ) ,
d b l I M A i = i M A ( N U L L , 0 , i n t _ M A _ P e r i o d , 0 , M O D E _ S M A , P R I C E _ C L O S E , 1 ) ;
/ / 5@5:;NG0BL 3;>10;L=CN ?5@5<5==CN 2 <><5=B ?5@5A5G5=8O
/ / c @54=59
i f ( M _ 2 > S _ 2 & & M _ 1 < = S _ 1 & & M _ 1 < 2 0 ) b l B u y = t r u e ; / / & & i C l o s e ( N U L L , 0 , 1 ) > d b l I M A _ M 2
i f ( M _ 2 < S _ 2 & & M _ 1 > = S _ 1 & & M _ 1 > 8 0 ) b l S e l l = t r u e ; / / & & i C l o s e ( N U L L , 0 , 1 ) < d b l I M A _ M 2
f o r ( i = 1 ; i < = i n t _ W a i t ; i + + )
{
d b l I M A i = i M A ( N U L L , 0 , i n t _ M A _ P e r i o d , 0 , M O D E _ S M A , P R I C E _ C L O S E , i ) ;
i f ( i C l o s e ( N U L L , 0 , i ) < d b l I M A i ) b l B u y = f a l s e ;
}
f o r ( i = 1 ; i < = i n t _ W a i t ; i + + )
{
d b l I M A i = i M A ( N U L L , 0 , i n t _ M A _ P e r i o d , 0 , M O D E _ S M A , P R I C E _ C L O S E , i ) ;
i f ( i C l o s e ( N U L L , 0 , i ) > d b l I M A i ) b l S e l l = f a l s e ;
}
/ / {
/ / i f ( M _ 2 < S _ 2 & & M _ 1 > = S _ 1 & & M _ 1 < 3 0 ) r e t u r n " b u y " ;
/ / }
i f ( b l B u y | | b l S e l l )
{
i n t M a x R i s k = i n t _ S T H _ M a x R i s k ;
i n t S t e p = i n t _ S T H _ S t e p ;
}
i f ( b l B u y ) r e t u r n " b u y " ;
e l s e
i f ( b l S e l l ) r e t u r n " s e l l " ;
e l s e r e t u r n " n o n e " ;
r e t u r n " n o n e " ;
}
/ / ?@545;O5B B>@3C5< <K 8;8 =5B
v o i d S i g n M A ( )
{
d o u b l e
d b l I M A 1 = i M A ( N U L L , 0 , i n t _ M A _ P e r i o d , 0 , M O D E _ S M A , P R I C E _ C L O S E , 1 ) ,
d b l I M A 2 = i M A ( N U L L , 0 , i n t _ M A _ P e r i o d , 0 , M O D E _ S M A , P R I C E _ C L O S E , 2 ) ;
i f ( i O p e n ( N U L L , 0 , 2 ) < d b l I M A 1 & & i C l o s e ( N U L L , 0 , 1 ) > d b l I M A 1 )
{
b l C r o s s D o w n = f a l s e ;
b l C r o s s U p = t r u e ;
}
i f ( i O p e n ( N U L L , 0 , 2 ) > d b l I M A 1 & & i C l o s e ( N U L L , 0 , 1 ) < d b l I M A 1 )
{
b l C r o s s D o w n = t r u e ;
b l C r o s s U p = f a l s e ;
}
i f ( b l C r o s s D o w n ) C o m m e n t ( " 45< >B:@K=8O 2=87" ) ;
i f ( b l C r o s s U p ) C o m m e n t ( " 45< >B:@K=8O 225@E" ) ;
i f ( ! b l C r o s s D o w n & & ! b l C r o s s U p ) C o m m e n t ( " 5B A83=0;0" ) ;
}
s t r i n g s t r M A ( )
{
i n t i = 0 ;
b o o l b l S e l l = f a l s e ,
b l B u y = f a l s e ;
d o u b l e
d b l O S M A 1 = i O s M A ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ O P E N , 1 ) ,
d b l O S M A 2 = i O s M A ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ O P E N , 2 ) ,
d b l O S M A 3 = i O s M A ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ O P E N , 3 ) ,
d b l O S M A 4 = i O s M A ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ O P E N , 4 ) ,
d b l O S M A 5 = i O s M A ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ O P E N , 5 ) ,
d b l R S I i = 0 ,
d b l I M A i = 0 ;
i f ( b l M A _ b u y )
{
d o u b l e d b l I M A _ b u y = i M A ( N U L L , 0 , i n t _ M A _ b u y _ P e r i o d , 0 , M O D E _ S M A , P R I C E _ C L O S E , 1 ) ;
i f ( d b l O S M A 4 > 0 & & d b l O S M A 3 < 0 & & d b l O S M A 2 > 0 & & d b l O S M A 1 < 0 & & i C l o s e ( N U L L , 0 , 1 ) < d b l I M A _ b u y ) / / ( d b l I M A 1 - i C l o s e ( N U L L , 0 , 1 ) ) / P o i n t > i n t _ R S I _ d i s t a n c e
{ / / & & d b l O S M A 5 < 0 & &
b l B u y = t r u e ;
}
i f ( b l B u y )
{
i n t M a x R i s k = i n t _ M A _ b u y _ M a x R i s k ;
i n t S t e p = i n t _ M A _ b u y _ S t e p ;
}
}
i f ( b l M A _ s e l l )
{
d o u b l e d b l I M A _ s e l l = i M A ( N U L L , 0 , i n t _ M A _ s e l l _ P e r i o d , 0 , M O D E _ S M A , P R I C E _ C L O S E , 1 ) ;
i f ( d b l O S M A 4 > 0 & & d b l O S M A 3 < 0 & & d b l O S M A 2 > 0 & & d b l O S M A 1 < 0 & & i C l o s e ( N U L L , 0 , 1 ) > d b l I M A _ s e l l ) / / ( d b l I M A 1 - i C l o s e ( N U L L , 0 , 1 ) ) / P o i n t > i n t _ R S I _ d i s t a n c e
{ / / d b l O S M A 5 < 0 & &
b l S e l l = t r u e ;
}
i f ( b l S e l l )
{
i n t M a x R i s k = i n t _ M A _ s e l l _ M a x R i s k ;
i n t S t e p = i n t _ M A _ s e l l _ S t e p ;
}
}
i f ( b l B u y ) r e t u r n " b u y " ;
e l s e
i f ( b l S e l l ) r e t u r n " s e l l " ;
e l s e r e t u r n " n o n e " ;
r e t u r n " n o n e " ;
}
Comments
Markdown Formatting Guide
# H1## H2
### H3
**bold text***italicized text*[title](https://www.example.com)`code````code block
```
> blockquote- Item 1- Item 2
1. First item2. Second item
---