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