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