Price Data Components
Orders Execution
Indicators Used
Miscellaneous
0
Views
0
Downloads
0
Favorites
Tynguska_GOLDM15
ÿþ/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
# 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 1 7 , M e t a Q u o t e s S o f t w a r e C o r p . "
# 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 "
# p r o p e r t y v e r s i o n " 1 . 0 0 "
# p r o p e r t y s t r i c t
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ! !" / ! ! " 0 . 0 1 - !'" " " +"/ "#
e x t e r n d o u b l e R a z m e r D e p o z i t a = 3 0 0 0 ;
/ / , / / / % / ' / ! % 1 2 1 5
e x t e r n d o u b l e X r a n e n i e R a z m a x a V e e r a 1 5 M I N = 3 6 6 . 0 ;
/ / , / / / % / ! % 1 2 5
e x t e r n d o u b l e Z n a c h S r e d n R a z m a x V e e r a 5 M I N = 2 2 4 . 0 ;
/ / , / / / % / ! % 1 2 1
e x t e r n d o u b l e Z n a c h S r e d n R a z m V e e r a O n e M I N = 9 1 . 0 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / $$& " " !' , + / " & " ' +% !
e x t e r n d o u b l e K o e f f T e l a O P T M I N = 4 . 8 ;
/ / . , !", ( + + / " & " ' +% !
e x t e r n i n t D a l n R a z v O P T M I N = 1 5 0 ;
/ / . ( " + / " & " ' +% !
e x t e r n i n t K r i l P r o b O P T M I N = 4 ;
/ / . - ! ,/)% ! % / " & " ' +% !
e x t e r n i n t V e e r M A B a l l O P T M I N = 8 5 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ( " " /
e x t e r n i n t S h i r i n a O t r e z k a T r a p M A = 5 0 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / . , !", / " & " ' +% !
e x t e r n i n t D a l n o s t B a r a O p t i m a M I N = 2 5 ;
/ / !. , !", ! &+ ( + / " & " ' +% !
e x t e r n i n t D a l n P o i s k a L e v g r M A X = 2 5 0 ;
/ / !. , !", ! " ! / " & " ' +% !
e x t e r n i n t D a l n P o i s k a P r o b o y a M A X = 5 0 0 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" + -$$& "+ # !" / '! / # 1 2
e x t e r n d o u b l e K o e f Y z k o s t L i t t l e = 1 . 8 ;
e x t e r n d o u b l e K o e f Y z k o s t M e d i u m = 1 . 2 ;
e x t e r n d o u b l e K o e f Y z k o s t L a r g e = 0 . 9 5 ;
e x t e r n d o u b l e K o e f Y z k o s t H u g e = 0 . 6 5 ;
e x t e r n d o u b l e K o e f Y z k o s t S u p e r = 0 . 4 5 ;
e x t e r n d o u b l e K o e f Y z k o s t G i g a n t = 0 . 2 5 ;
e x t e r n d o u b l e K o e f Y z k o s t E x c e l l = 0 . 1 5 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" + + 1 2 / '! / , +
e x t e r n i n t B a l l V e e r M A L i t t l e = 8 0 ;
e x t e r n i n t B a l l V e e r M A M e d i u m = 9 5 ;
e x t e r n i n t B a l l V e e r M A L a r g e = 1 1 0 ;
e x t e r n i n t B a l l V e e r M A H u g e = 1 2 5 ;
e x t e r n i n t B a l l V e e r M A S u p e r = 1 4 0 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" + + ! ,/)% ! % !'
e x t e r n i n t K o l v o P r o b i t M A L i t t l e = 3 ;
e x t e r n i n t K o l v o P r o b i t M A M e d i u m = 4 ;
e x t e r n i n t K o l v o P r o b i t M A L a r g e = 5 ;
e x t e r n i n t K o l v o P r o b i t M A H u g e = 6 ;
e x t e r n i n t K o l v o P r o b i t M A S u p e r = 7 ;
e x t e r n i n t K o l v o P r o b i t M A G i g a n t = 8 ;
e x t e r n i n t K o l v o P r o b i t M A E x c e l l = 9 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / '!" / !'" ! " ! !'
e x t e r n i n t K o l v o B a r o v R a s c h e t a S r e d n = 5 0 0 0 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !" / + ! -
/ / ', ! ) " Y ! %# + ! % !
e x t e r n i n t N a c h a l n y S d v i g S v e r x y = 2 0 ;
/ / !" + ( " # ! ! !/
e x t e r n i n t S h a g N a d p i s P o V e r t i k a l = 2 8 ;
/ / &/ " / & " , !
e x t e r n i n t C e n t r a l N a d p i s X P o z i t i o n = 4 6 5 ;
/ / ( $" + / !% !
e x t e r n i n t R a z m e r S h r i f t a N a d p i s e y = 1 2 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / , + $$& " " !# !' / !'"+ / !'
e x t e r n d o u b l e K o e f f T e l a O b s h i y S v e c h i 2 x = 2 . 4 ;
/ / , + $$& " " 2 % !' / !'"+ / !'
e x t e r n d o u b l e K o e f f T e l a K a j d o y S v e c h i 2 x = 1 . 6 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / , / , !", ( + + &
e x t e r n i n t D i v e r R a z v o r o t D a l n = 5 0 ;
/ / , / +', , &
e x t e r n i n t D i v e r L i n e M i n L e n g t h = 6 0 ;
/ / !. , !", ! &+ & / " &
e x t e r n i n t D a l n P o i s k a D i v e r M A X = 4 0 0 ;
/ / '!" '!/ +% ' +', , &
e x t e r n i n t D i v e r L i n e A d d B a l l s = 2 1 ;
/ / , / , !", ( + + / '! /
e x t e r n i n t D a l n o s t R a z v o r o t a M I N = 2 0 0 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ) !# ' / ! ,% %
e x t e r n i n t D o b a v k a B a l l P r o b O n e M A = 4 ;
/ / . - "+% ! ,/)% ! % / '! /
e x t e r n i n t K o l P r o b M A O n e M I N = 2 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / -$$& " # !" ! , + / '! / # !",
e x t e r n d o u b l e K o e f f Y z k o s t i O P T I T M A X = 0 . 9 ;
/ / ) !# # !", ! ,/)% ! %
e x t e r n i n t D o b a v k a B a l l o v Y z k o s t V e e r a M A = 5 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" + + 1 2 / '! / , +
e x t e r n i n t B a l l V e e r M A L I T T L E = 9 0 ;
e x t e r n i n t B a l l V e e r M A M E D I U M = 1 1 0 ;
e x t e r n i n t B a l l V e e r M A N O R M A L = 1 3 0 ;
e x t e r n i n t B a l l V e e r M A G O O D L Y = 1 5 0 ;
e x t e r n i n t B a l l V e e r M A G I G A N T = 1 7 5 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / -$$& "+ " !' / '! / ,( !'
e x t e r n d o u b l e K o e f f T e l a L I T T L E = 1 . 5 ;
e x t e r n d o u b l e K o e f f T e l a M E D I U M = 4 . 5 ;
e x t e r n d o u b l e K o e f f T e l a N O R M A L = 6 . 5 ;
e x t e r n d o u b l e K o e f f T e l a G I G A N T = 6 . 5 ;
/ / ) !# ,( " !'
e x t e r n i n t D o b a v k a T e l a L I T T L E = 1 0 ;
e x t e r n i n t D o b a v k a T e l a M E D I U M = 1 2 ;
e x t e r n i n t D o b a v k a T e l a N O R M A L = 6 ;
e x t e r n i n t D o b a v k a T e l a G I G A N T = 1 2 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / -$$& " * , + / '! / " + *
e x t e r n d o u b l e K o e f f O b y e m a L I T T L E = 1 . 5 ;
e x t e r n d o u b l e K o e f f O b y e m a M E D I U M = 7 . 5 ;
e x t e r n d o u b l e K o e f f O b y e m a N O R M A L = 1 1 . 0 ;
e x t e r n d o u b l e K o e f f O b y e m a G I G A N T = 1 4 . 0 ;
/ / ) !# +% " + *
e x t e r n i n t D o b a v k a O b y e m a L I T T L E = 1 ;
e x t e r n i n t D o b a v k a O b y e m a M E D I U M = 5 ;
e x t e r n i n t D o b a v k a O b y e m a N O R M A L = 1 ;
e x t e r n i n t D o b a v k a O b y e m a G I G A N T = 0 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ! !", $ !" # " !" " #. " '# !'"", , !", ( +
/ / ) " + " / + /
/ / ) /", # !", ! # / 1 0 0
/ / ) !# ' $ !"
e x t e r n i n t D o b a v k a B a l l o v F I B O = 1 3 ;
/ / , '!" ( # / $ !"
e x t e r n i n t S h i r i n a F i b o S e t k i M I N = 2 0 ;
/ / , + $$& " +! "+ $ !" " ( . ! # #
e x t e r n d o u b l e K o e f f F i b o S r e d n B a r M I N = 1 0 . 5 ;
/ / ! , #!" " " # / & "% " +! "+ / $ !"
e x t e r n d o u b l e O t k l o n F i b o L e v e l M A X = 1 . 5 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !" / $# & +'! / / ! " ""
e x t e r n i n t N a s t r B e t t e r W a r p = 6 7 ;
e x t e r n d o u b l e N a s t r B e t t e r D e v i a t = 1 . 8 5 ;
e x t e r n i n t N a s t r B e t t e r A m p l i t = 1 5 5 ;
e x t e r n d o u b l e N a s t r B e t t e r D i s t o r = 0 . 7 9 ;
/ / ! ! ! !'" / ! " ""
e x t e r n i n t D o b a v k a B a l l B e t t e r = 0 ;
/ / , / ' / "" / '! /
e x t e r n d o u b l e B e t t e r N a p r a v A B C M i n = 6 . 0 0 ;
/ / , / ' / "" / +"/ &
e x t e r n d o u b l e B e t t e r Z n a c h C l o s e M i n = 1 5 0 . 0 0 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / # * # !", '!" ! # " +% * ,(
/ / ) !# ' !% / * !'
e x t e r n i n t D o b a v k a B a l l R A S X O B Y E M = 4 ;
/ / , + $$& " " !' / / !% / ! *
e x t e r n d o u b l e K o e f f T e l a R A S X V M I N = 4 . 5 ;
/ / ! , + + $$& " * ,( " +", *
e x t e r n d o u b l e K o e f f V o l u m e L I T M A X = 0 . 6 5 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ' #/ " / #' / ! +". &
e x t e r n d o u b l e M A C D C l o s e B i g L e v e l = 1 1 . 5 ;
/ / , '!" # " "" " & + O p e n [ 0 ] / " +"/ !
e x t e r n i n t R a z m e r O t k a t a P u n k t s = 3 ;
/ / , / ( + " + / '! /
e x t e r n i n t S h i r i n K r i l P r o b i t L E V E L = 1 5 ;
/ / ( + ( +
e x t e r n i n t D o b a v B a l l s P r o b o y L E V E L = 5 ;
/ / +' + " $" ' " , ! ,/)% ! %
e x t e r n i n t P r o f i t N o r m a l P u n k t s = 4 4 0 ;
/ / , '!" +% / +"/ +, &
e x t e r n i n t T y n g u s B a l l Z A K R Y T M 1 5 = 6 7 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !" / ! '/ $" +%
/ / !. , !", ! $"
e x t e r n i n t D a l n o s t P o i s k a F l e t a M A X = 3 0 0 0 ;
/ / "!"# " , ! " ' ", -$$& " # !"
e x t e r n i n t Y z k o s t F l e t a S t a r t D i s t = 5 0 ;
/ / , / ( # #'!" $" %
e x t e r n i n t S h i r i n a F l e t a B a r o v M I N = 8 0 ;
/ / ,( $$& " # !" $", ! % " +! "# 1 0 0 ( +
e x t e r n d o u b l e K o e f f Y z k o s t i F l e t a L A R G E = 9 . 0 ;
/ / % +% # $"
e x t e r n i n t D o b a v B a l l P r o b o y F L E T A = 1 4 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / , + !" !! # "% ! #+"
e x t e r n i n t B e z y b S t o p P u n k t s = 6 0 ;
/ / $! # / +, # "% ! #+"
e x t e r n i n t B e z y b P r o f i t P u n k t = 0 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / $$& " / !'" +' !" !! ' !
e x t e r n d o u b l e K o e f f S t o p L o s s S r e d B a r = 4 . 0 ;
/ / $$& " / !'" , !" !! ' !
e x t e r n d o u b l e K o e f f S t o p L o s s D a l n i y = 6 . 5 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ) !# ' / 5 " %
e x t e r n i n t D o b a v k a B a l l s P r o b 5 X M A = 4 ;
e x t e r n i n t D o b a v k a B a l l s P r o b 6 X M A = 5 ;
/ / #. #. &# ( + +
e x t e r n i n t D o b a v k a B a l l s G R A N I C A = 1 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !" " $# + / ( /
/ / , / ( ( + %
e x t e r n i n t S h i r i n K r i l O n e P i k V e r s h 2 X = 8 0 ;
/ / & " ! / # #% ( +! "
e x t e r n i n t P r o c e n t S o v p a d L e v e l P I K 2 X = 1 0 ;
/ / , / , !", % ( + %
e x t e r n i n t D a l n o s t P i k a V e r s h i n 2 X M I N = 6 0 0 ;
/ / % ( ( + +
e x t e r n i n t D o b a v k a B a l l s V e r s h i n a 2 X = 5 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !" / $# + ) (
/ / % ' / ! " "/
e x t e r n i n t D o b a v k a B a l l o v M O L O T = 0 ;
/ / , / , !", ( + + / $# + " )
e x t e r n i n t D a l n o s t P I K A J a p a n M I N = 1 5 0 ;
/ / , + & " " # ,( !' / $# + )
e x t e r n d o u b l e P r o c T e l a P o g l o s h L A R G E = 8 5 ;
/ / , + -$$& " " # ,( !' / $# + )
e x t e r n d o u b l e K o e f T e l a P o g l o s h L A R G E = 3 . 2 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / '!" ! ,/)% ! % / ! + " " $"
e x t e r n i n t B a l l V e e r a S m e n a P R O F = 1 2 0 ;
/ / " " $" "!#"!" , ! ,/)% ! %,
e x t e r n i n t P r o f i t L i t t l e P u n k t s = 4 0 ;
/ / , '!" +% / " +"/ & !
e x t e r n i n t T y n g u s B a l l O T K R Y T M 1 5 = 6 5 ;
/ / + ! ,/)% ! % / '! / %
e x t e r n i n t B a l l V e e r M A G i g a n t = 1 6 9 ;
e x t e r n i n t B a l l V e e r M A E x c e l l = 1 7 9 ;
/ / % , + 1 2 ! ,/)% ! %
e x t e r n i n t D o b a v k a B a l l G I G A N T = 1 1 ;
e x t e r n i n t D o b a v k a B a l l E X C E L L = 1 4 ;
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
i n t O n I n i t ( )
{
E v e n t S e t T i m e r ( 6 0 ) ;
P r i n t ( " ! " "# #! #) "#" ) ;
/ / B5AB8@>20=85 =0 3@0D8:5 1 5 A 0 1 . 0 1 . 2 0 1 1 ?> 3 0 . 0 9 . 2 0 2 1
/ / P R O F I T 1 1 1 5 1 9
/ / F A K T O R 1 . 4 1
/ / ! 1 4 6 3 1
/ / ! 1 7 5 0
/ / / 2 #"
/ / >G8AB:0 3@0D8:0 >B AB0@KE >1J5:B>2, A>740==KE A>25B=8:><
O b j e c t s D e l e t e A l l ( ) ;
/ / " $", '" &&/ ! " ( #! (
D r a w C e n t r a l L A B E L ( " #!" , N a c h a l n y S d v i g S v e r x y , c l r Y e l l o w , " #! ! " " ) ;
i f ( P e r i o d ( ) = = P E R I O D _ M 1 )
{
/ / / #! / !'" !'" ! % %
Z n a c h S r e d n R a z m V e e r a O n e M I N = R a s c h e t S r e d n R a z m a x V e e r a 1 2 M A ( 1 ) ;
P r i n t ( " #!" ! ' % $ 1 # "% = " + D o u b l e T o S t r ( Z n a c h S r e d n R a z m V e e r a O n e M I N , 0 ) ) ;
}
r e t u r n ( I N I T _ S U C C E E D E D ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
v o i d O n D e i n i t ( c o n s t i n t r e a s o n )
{
E v e n t K i l l T i m e r ( ) ;
/ / >G8AB:0 3@0D8:0 >B >1J5:B>2, A>740==KE A>25B=8:><
O b j e c t s D e l e t e A l l ( ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
v o i d O n T i c k ( )
{
d o u b l e S t o p L e v e l , T e i k L e v e l , R a z m e r L o t a ;
i n t K o l v o B a e v , K o l v o S e l o v , V s e g o O r d e r o v , T i c k e t O r d e r a , K o d O s h i b k i ;
s t a t i c d o u b l e S r e d n i y B a r = 0 , S r e d n e e T e l o = 0 , B e t t e r D i r e c t = 0 , B e t t e r A B C = 0 ;
/ / AB0B8AB8G5A:85 ?5@5<5==K5 4;O E@0=5=8O =01@0==KE 1KGL8E 8 <54256L8E 10;;>2
s t a t i c i n t N a b r a n o B a l l o v B U L L = 0 , N a b r a n o B a l l o v B E A R = 0 , V e e r M A B a l l B U L L = 0 , V e e r M A B a l l B E A R = 0 ;
/ / AB0B8G5A:85 ?5@5<5==K5 8=8F80;878@CNBAO >48= @07 ?@8 70?CA:5 A>25B=8:0
s t a t i c b o o l O t k r i v a e m B U Y = f a l s e , O t k r i v a e m S E L L = f a l s e ;
s t a t i c b o o l Z a k r i v a e m B U Y = f a l s e , Z a k r i v a e m S E L L = f a l s e ;
s t a t i c b o o l Z a p r e t P o k y p k i = f a l s e , Z a p r e t P r o d a g i = f a l s e ;
s t a t i c b o o l V e e r 4 X M A B U L L = f a l s e , V e e r 4 X M A B E A R = f a l s e ;
b o o l N a i d e n N o v y B a r , E s t D e n g i ;
/ / ?@>25@:0 10@>2, 8E 4>;6=> E20B0BL =0 @0AG5B 2 5 8 4 + CA@54=5=85 5 0 0 0
i f ( B a r s < 8 0 0 0 )
{
M e s s a g e B o x ( " $ ,( 8 0 0 0 ! " """ ) ;
r e t u r n ;
}
N a i d e n N o v y B a r = f a l s e ; E s t D e n g i = f a l s e ;
/ / C@>25=L AB>? ;>AA0 ?@8 CAB0=>2:5 >@45@>2
S t o p L e v e l = 0 ;
/ / C@>25=L B59: ?@>D8B0 ?@8 CAB0=>2:5 >@45@>2
T e i k L e v e l = 0 ;
/ / @07<5@ ;>B0 4;O >B:@K205<>9 A45;:8
R a z m e r L o t a = 0 ;
/ / :>4 >H81:8 ?@8 CAB0=>2:5 >@45@0
K o d O s h i b k i = 0 ;
/ / :>;8G5AB2> 1052, >B:@KBKE A>25B=8:>< =0 MB>< 3@0D8:5 #+"
K o l v o B a e v = 0 ;
/ / :>;8G5AB2> A5;>2, >B:@KBKE A>25B=8:>< =0 MB>< 3@0D8:5 #+"
K o l v o S e l o v = 0 ;
/ / >1I55 :>;8G5AB2> C65 >B:@KBKE >@45@>2
V s e g o O r d e r o v = 0 ;
/ / B8:5B CA?5H=> >B:@KB>3> >@45@0
T i c k e t O r d e r a = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" ! / " +"/ & - 45;05BAO ?@8 ?>O2;5=88 =>2>3> 10@0
/ / >BA;568205< <><5=B ?>O2;5=8O =>2>3> 10@0
N a i d e n N o v y B a r = D e t e c t N e w B a r ( ) ;
/ / 5A;8 =0945= =>2K9 10@ - 8I5< A83=0;K 8 >=8 E@0=OBAO 4> A;54CNI53> 10@0
i f ( N a i d e n N o v y B a r = = t r u e )
{
/ / >1=>2;5=85 3@0D8:0
R e f r e s h R a t e s ( ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ! ! +',% ,% +%
N a b r a n o B a l l o v B U L L = 0 ; N a b r a n o B a l l o v B E A R = 0 ;
/ / >1=C;O5< !""'! 10;;K 255@>2 A:>;L7OI8E A@54=8E
V e e r M A B a l l B U L L = 0 ; V e e r M A B a l l B E A R = 0 ;
/ / A1@>A !""'!% A83=0;>2 : +". ?>78F89
Z a k r i v a e m B U Y = f a l s e ; Z a k r i v a e m S E L L = f a l s e ;
/ / A1@>A !""'!% A83=0;>2 : " +". ?>78F89
O t k r i v a e m B U Y = f a l s e ; O t k r i v a e m S E L L = f a l s e ;
/ / A1@>A !""'!% A83=0;>2 =0 " >B:@KB8O ?>78F89
Z a p r e t P o k y p k i = f a l s e ; Z a p r e t P r o d a g i = f a l s e ;
/ / A1@>A !""'!% A83=0;>2 =0 255@ 4 E BO65;KE
V e e r 4 X M A B U L L = f a l s e ; V e e r 4 X M A B E A R = f a l s e ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ) " +", - + D 1
i f ( i C l o s e ( N U L L , P E R I O D _ D 1 , 1 ) < i O p e n ( N U L L , P E R I O D _ D 1 , 1 ) )
{
i f ( i C l o s e ( N U L L , P E R I O D _ D 1 , 1 ) < i L o w ( N U L L , P E R I O D _ D 1 , 2 ) )
{
Z a p r e t P o k y p k i = t r u e ;
}
}
/ / ) " +", - + W 1
i f ( i C l o s e ( N U L L , P E R I O D _ W 1 , 1 ) < i O p e n ( N U L L , P E R I O D _ W 1 , 1 ) )
{
i f ( i C l o s e ( N U L L , P E R I O D _ W 1 , 1 ) < i L o w ( N U L L , P E R I O D _ W 1 , 2 ) )
{
Z a p r e t P o k y p k i = t r u e ;
}
}
/ / ) " +", - + M N 1
i f ( i C l o s e ( N U L L , P E R I O D _ M N 1 , 1 ) < i O p e n ( N U L L , P E R I O D _ M N 1 , 1 ) )
{
i f ( i C l o s e ( N U L L , P E R I O D _ M N 1 , 1 ) < i L o w ( N U L L , P E R I O D _ M N 1 , 2 ) )
{
Z a p r e t P o k y p k i = t r u e ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ) " +", ! - ( + D 1
i f ( i C l o s e ( N U L L , P E R I O D _ D 1 , 1 ) > i O p e n ( N U L L , P E R I O D _ D 1 , 1 ) )
{
i f ( i C l o s e ( N U L L , P E R I O D _ D 1 , 1 ) > i H i g h ( N U L L , P E R I O D _ D 1 , 2 ) )
{
Z a p r e t P r o d a g i = t r u e ;
}
}
/ / ) " +", ! - ( + W 1
i f ( i C l o s e ( N U L L , P E R I O D _ W 1 , 1 ) > i O p e n ( N U L L , P E R I O D _ W 1 , 1 ) )
{
i f ( i C l o s e ( N U L L , P E R I O D _ W 1 , 1 ) > i H i g h ( N U L L , P E R I O D _ W 1 , 2 ) )
{
Z a p r e t P r o d a g i = t r u e ;
}
}
/ / ) " +", ! - ( + M N 1
i f ( i C l o s e ( N U L L , P E R I O D _ M N 1 , 1 ) > i O p e n ( N U L L , P E R I O D _ M N 1 , 1 ) )
{
i f ( i C l o s e ( N U L L , P E R I O D _ M N 1 , 1 ) > i H i g h ( N U L L , P E R I O D _ M N 1 , 2 ) )
{
Z a p r e t P r o d a g i = t r u e ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +'! / ! ! " # E A B e t t e r
B e t t e r D i r e c t = 0 ;
B e t t e r D i r e c t = D i r e c t B E T T E R ( N a s t r B e t t e r W a r p , N a s t r B e t t e r D e v i a t , N a s t r B e t t e r A m p l i t , N a s t r B e t t e r D i s t o r , 1 ) ;
B e t t e r D i r e c t = N o r m a l i z e D o u b l e ( B e t t e r D i r e c t , 2 ) ;
/ / #, ' + / ! ! " # E A B e t t e r
B e t t e r A B C = 0 ;
B e t t e r A B C = M a t h A b s ( B e t t e r D i r e c t ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 A25G0 =0 10@5 !1 1KGLO - 8I5< A83=0; =0 # #
i f ( O p e n [ 1 ] < C l o s e [ 1 ] )
{
/ / ?>4AG5B 1KGL8E 10;;>2 =0 10@5 !1
N a b r a n o B a l l o v B U L L = A n a l i z P o k y p k i T y n g u s k a ( 1 ) ;
i f ( ( B e t t e r D i r e c t > 0 ) & & ( B e t t e r A B C > B e t t e r N a p r a v A B C M i n ) )
{
i f ( ( N a b r a n o B a l l o v B U L L > = T y n g u s B a l l O T K R Y T M 1 5 ) & & ( Z a p r e t P o k y p k i = = f a l s e ) )
{
O t k r i v a e m B U Y = t r u e ;
P l a y S o u n d ( " C A S H R E G . w a v " ) ;
A l e r t ( " ! " "# #!: " + $ " + S y m b o l ( ) + " = " + D o u b l e T o S t r ( P e r i o d ( ) , 0 ) ) ;
P r i n t ( " ! " "# #!: " + $ " + S y m b o l ( ) + " = " + D o u b l e T o S t r ( P e r i o d ( ) , 0 ) ) ;
}
}
}
/ / 5A;8 A25G0 =0 10@5 !1 <54256LO - 8I5< A83=0; =0 #
i f ( O p e n [ 1 ] > C l o s e [ 1 ] )
{
/ / ?>4AG5B <54256L8E 10;;>2 =0 10@5 !1
N a b r a n o B a l l o v B E A R = A n a l i z P r o d a g i T y n g u s k a ( 1 ) ;
i f ( ( B e t t e r D i r e c t < 0 ) & & ( B e t t e r A B C > B e t t e r N a p r a v A B C M i n ) )
{
i f ( ( N a b r a n o B a l l o v B E A R > = T y n g u s B a l l O T K R Y T M 1 5 ) & & ( Z a p r e t P r o d a g i = = f a l s e ) )
{
O t k r i v a e m S E L L = t r u e ;
P l a y S o u n d ( " C A S H R E G . w a v " ) ;
A l e r t ( " ! " "# #!: " + ! $ " + S y m b o l ( ) + " = " + D o u b l e T o S t r ( P e r i o d ( ) , 0 ) ) ;
P r i n t ( " ! " "# #!: " + ! $ " + S y m b o l ( ) + " = " + D o u b l e T o S t r ( P e r i o d ( ) , 0 ) ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +'! !
S r e d n i y B a r = S r e d n i y R a z m e r B a r a P u n k t s ( 1 ) ;
/ / +'! ! ";
S r e d n e e T e l o = S r e d n i y R a z m e r T e l a P u n k t s ( 1 ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +" +, & ! # "
i f ( O p e n [ 1 ] > C l o s e [ 1 ] )
{
/ / Z a k r i v a e m B U Y = Z a k r y t S d e l k y B U Y C r o s s M A C D ( S r e d n e e T e l o , 1 ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +" +, & ! ! # "
i f ( O p e n [ 1 ] < C l o s e [ 1 ] )
{
/ / Z a k r i v a e m S E L L = Z a k r y t S d e l k y S E L L C r o s s M A C D ( S r e d n e e T e l o , 1 ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ! +',% - + +, + S E L L
i f ( ( N a b r a n o B a l l o v B U L L > = T y n g u s B a l l Z A K R Y T M 1 5 ) & & ( P e r i o d ( ) > = P E R I O D _ M 1 5 ) )
{
/ / Z a k r i v a e m S E L L = t r u e ;
/ / O t k r i v a e m S E L L = f a l s e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ! ,% - + +, + B U Y
i f ( ( N a b r a n o B a l l o v B E A R > = T y n g u s B a l l Z A K R Y T M 1 5 ) & & ( P e r i o d ( ) > = P E R I O D _ M 1 5 ) )
{
/ / Z a k r i v a e m B U Y = t r u e ;
/ / O t k r i v a e m B U Y = f a l s e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'"+ ! + - ! " ' " "#
D r a w C e n t r a l L A B E L ( " #!" , N a c h a l n y S d v i g S v e r x y , c l r L i m e , " ! " """ ) ;
/ / / #! / "!" / -" " + /"!/
V s e g o O r d e r o v = O r d e r s T o t a l ( ) ;
i f ( V s e g o O r d e r o v > 0 )
{
/ / +" $&/ # " +"+% ! " &
P e r e b o r O r d e r o v S o v e t n i k a ( S r e d n i y B a r , Z a k r i v a e m B U Y , Z a k r i v a e m S E L L ) ;
}
/ / P r i n t ( " /!/ + " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / >B:@KB85 ?>78F88 B U Y - 5A;8 5ABL 45=L38, A83=0; =0 ?>:C?:C 8 =5B 1052
/ / 5A;8 5ABL A83=0; =0 ?>:C?:C 8 F5=0 ?>H;0 225@E
i f ( ( O t k r i v a e m B U Y = = t r u e ) & & ( B i d = = H i g h [ 0 ] ) )
{
/ / ?>4AG5B :>;8G5AB20 1052 =0H59 20;NBK C65 >B:@KBKE A>25B=8:><
K o l v o B a e v = P o d s c h e t B a e v S o v e t n i k a ( ) ;
/ / @0AG5B @07<5@0 ;>B0 4;O >B:@KB8O A45;:8, B>G=>ABL 0 . 0 1
R a z m e r L o t a = 0 ;
R a z m e r L o t a = A c c o u n t F r e e M a r g i n ( ) / R a z m e r D e p o z i t a ;
R a z m e r L o t a = M a t h F l o o r ( R a z m e r L o t a ) ;
R a z m e r L o t a = R a z m e r L o t a * 0 . 0 1 ;
/ / ?@>25@:0 =0;8G8O A2>1>4=KE A@54AB2 4;O >B:@KB8O ?>78F88 B U Y
E s t D e n g i = f a l s e ;
i f ( A c c o u n t F r e e M a r g i n C h e c k ( S y m b o l ( ) , O P _ B U Y , R a z m e r L o t a ) > 8 0 0 )
{
E s t D e n g i = t r u e ;
}
/ / 5ABL 45=L38 8 109 5I5 =5 1K; >B:@KB, ;81> ?5@52545= 2 157C1KB>:
i f ( ( E s t D e n g i = = t r u e ) & & ( K o l v o B a e v = = 0 ) )
{
/ / @01>B0 2 1C4=8, ;81> B5AB8@>20=85 2 2KE>4=K5
i f ( ( M a r k e t I n f o ( S y m b o l ( ) , M O D E _ T R A D E A L L O W E D ) = = t r u e ) | | ( I s T e s t i n g ( ) = = t r u e ) )
{
/ / C@>25=L AB>? ;>AA0 ?@8 CAB0=>2:5 >@45@0
S t o p L e v e l = 0 ;
S t o p L e v e l = R a s c h e t S t o p L e v e l B U L L ( S r e d n i y B a r , 1 ) ;
/ / C@>25=L B59: ?@>D8B0 ?@8 CAB0=>2:5 >@45@0 O P _ B U Y
T e i k L e v e l = 0 ;
/ / @0AG5B +',% 10;;>2 255@0 A:>;L7OI8E A@54=8E
V e e r M A B a l l B U L L = 0 ;
V e e r M A B a l l B U L L = R a s c h e t B a l l o v V e e r a M A B U L L ( 1 ) ;
/ / '/ , +', % 4 % "/+%
V e e r 4 X M A B U L L = f a l s e ;
V e e r 4 X M A B U L L = P r o v e r k a V e e r 4 X M A B i g B U L L ( 1 ) ;
/ / !'" " $" ! !" " ! %
i f ( V e e r M A B a l l B U L L > = B a l l V e e r a S m e n a P R O F )
{
T e i k L e v e l = A s k + ( P r o f i t N o r m a l P u n k t s * P o i n t ) ;
}
e l s e
{
T e i k L e v e l = A s k + ( P r o f i t L i t t l e P u n k t s * P o i n t ) ;
}
S t o p L e v e l = N o r m a l i z e D o u b l e ( S t o p L e v e l , D i g i t s ) ;
T e i k L e v e l = N o r m a l i z e D o u b l e ( T e i k L e v e l , D i g i t s ) ;
/ / #!" O P _ B U Y
T i c k e t O r d e r a = 0 ;
T i c k e t O r d e r a = O r d e r S e n d ( S y m b o l ( ) , O P _ B U Y , R a z m e r L o t a , A s k , 7 , S t o p L e v e l , T e i k L e v e l , " T Y N G U S K A " , 0 , 0 , c l r B l u e ) ;
/ / 5A;8 109 CAB0=>2;5= CA?5H=>
i f ( T i c k e t O r d e r a > 0 )
{
P r i n t ( " #A?5H=> CAB0=>2;5= >@45@ A>25B=8:>< "# #!, B8:5B >@45@0 = " + D o u b l e T o S t r ( T i c k e t O r d e r a , 0 ) ) ;
/ / 2B>@>9 @07 =0 >4=>< 8 B>< 65 10@5 >@45@ =5 >B:@K205<
/ / O t k r i v a e m B U Y = f a l s e ;
/ / 745AL <>6=> 2K1@0BL CAB0=>2;5==K9 >@45@ ?> B8:5BC 8 <>48D8F8@>20BL S L 8 T P
}
e l s e
{
K o d O s h i b k i = 0 ;
K o d O s h i b k i = G e t L a s t E r r o r ( ) ;
i f ( K o d O s h i b k i ! = 0 )
{
P r i n t T r a d e S e r v e r E r r o r ( K o d O s h i b k i ) ;
S l e e p ( 2 0 0 0 ) ;
R e f r e s h R a t e s ( ) ;
}
}
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / >B:@KB85 ?>78F88 S E L L - 5A;8 5ABL 45=L38, A83=0; =0 ?@>406C 8 =5B A5;>2
/ / 5A;8 5ABL A83=0; =0 ?@>406C 8 F5=0 ?>H;0 2=87
i f ( ( O t k r i v a e m S E L L = = t r u e ) & & ( B i d = = L o w [ 0 ] ) )
{
/ / ?>4AG5B :>;8G5AB20 A5;>2 =0H59 20;NBK C65 >B:@KBKE A>25B=8:><
K o l v o S e l o v = P o d s c h e t S e l o v S o v e t n i k a ( ) ;
/ / @0AG5B @07<5@0 ;>B0 4;O >B:@KB8O A45;:8, B>G=>ABL 0 . 0 1
R a z m e r L o t a = 0 ;
R a z m e r L o t a = A c c o u n t F r e e M a r g i n ( ) / R a z m e r D e p o z i t a ;
R a z m e r L o t a = M a t h F l o o r ( R a z m e r L o t a ) ;
R a z m e r L o t a = R a z m e r L o t a * 0 . 0 1 ;
/ / ?@>25@:0 =0;8G8O A2>1>4=KE A@54AB2 4;O >B:@KB8O ?>78F88 S E L L
E s t D e n g i = f a l s e ;
i f ( A c c o u n t F r e e M a r g i n C h e c k ( S y m b o l ( ) , O P _ S E L L , R a z m e r L o t a ) > 8 0 0 )
{
E s t D e n g i = t r u e ;
}
/ / 5A;8 5ABL 45=L38, 8 A5; 5I5 =5 1K; >B:@KB, ;81> ?5@52545= 2 157C1KB>:
i f ( ( E s t D e n g i = = t r u e ) & & ( K o l v o S e l o v = = 0 ) )
{
/ / @01>B0 2 1C4=8, ;81> B5AB8@>20=85 2 2KE>4=K5
i f ( ( M a r k e t I n f o ( S y m b o l ( ) , M O D E _ T R A D E A L L O W E D ) = = t r u e ) | | ( I s T e s t i n g ( ) = = t r u e ) )
{
/ / C@>25=L AB>? ;>AA0 ?@8 CAB0=>2:5 >@45@0
S t o p L e v e l = 0 ;
S t o p L e v e l = R a s c h e t S t o p L e v e l B E A R ( S r e d n i y B a r , 1 ) ;
/ / C@>25=L B59: ?@>D8B0 ?@8 CAB0=>2:5 >@45@0 O P _ S E L L
T e i k L e v e l = 0 ;
/ / @0AG5B ,% 10;;>2 255@0 A:>;L7OI8E A@54=8E
V e e r M A B a l l B E A R = 0 ;
V e e r M A B a l l B E A R = R a s c h e t B a l l o v V e e r a M A B E A R ( 1 ) ;
/ / '/ , , 4 % "/+%
V e e r 4 X M A B E A R = f a l s e ;
V e e r 4 X M A B E A R = P r o v e r k a V e e r 4 X M A B i g B E A R ( 1 ) ;
/ / !'" " $" ! !" " ! %
i f ( V e e r M A B a l l B E A R > = B a l l V e e r a S m e n a P R O F )
{
T e i k L e v e l = B i d - ( P r o f i t N o r m a l P u n k t s * P o i n t ) ;
T e i k L e v e l = N o r m a l i z e D o u b l e ( T e i k L e v e l , D i g i t s ) ;
}
e l s e
{
T e i k L e v e l = B i d - ( P r o f i t L i t t l e P u n k t s * P o i n t ) ;
T e i k L e v e l = N o r m a l i z e D o u b l e ( T e i k L e v e l , D i g i t s ) ;
}
S t o p L e v e l = N o r m a l i z e D o u b l e ( S t o p L e v e l , D i g i t s ) ;
T e i k L e v e l = N o r m a l i z e D o u b l e ( T e i k L e v e l , D i g i t s ) ;
/ / #!" O P _ S E L L
T i c k e t O r d e r a = 0 ;
T i c k e t O r d e r a = O r d e r S e n d ( S y m b o l ( ) , O P _ S E L L , R a z m e r L o t a , B i d , 7 , S t o p L e v e l , T e i k L e v e l , " T Y N G U S K A " , 0 , 0 , c l r R e d ) ;
/ / 5A;8 A5;; CAB0=>2;5= CA?5H=>
i f ( T i c k e t O r d e r a > 0 )
{
P r i n t ( " #A?5H=> CAB0=>2;5= >@45@ ! A>25B=8:>< "# #!, B8:5B >@45@0 = " + D o u b l e T o S t r ( T i c k e t O r d e r a , 0 ) ) ;
/ / 2B>@>9 @07 =0 >4=>< 8 B>< 65 10@5 >@45@ =5 >B:@K205<
/ / O t k r i v a e m S E L L = f a l s e ;
/ / 745AL <>6=> 2K1@0BL CAB0=>2;5==K9 >@45@ ?> B8:5BC 8 <>48D8F8@>20BL S L 8 T P
}
e l s e
{
K o d O s h i b k i = 0 ;
K o d O s h i b k i = G e t L a s t E r r o r ( ) ;
i f ( K o d O s h i b k i ! = 0 )
{
P r i n t T r a d e S e r v e r E r r o r ( K o d O s h i b k i ) ;
S l e e p ( 2 0 0 0 ) ;
R e f r e s h R a t e s ( ) ;
}
}
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ' O n T i c k ( )
r e t u r n ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
v o i d O n T i m e r ( )
{
/ / M e s s a g e B o x ( " ! " " ! " "# #!" ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / $# &/ # / / /
b o o l D e t e c t N e w B a r ( )
{
/ / :>;8G5AB2> 10@>2 1K;> =0 3@0D8:5 4> MB>3>
s t a t i c i n t B a r o v B y l o = B a r s ;
/ / 2@5<O ?>O2;5=8O =C;52>3> 10@0 =0 ?@>H;>< B8:5
s t a t i c d a t e t i m e P r e v i o s T i m e 0 = 0 ;
/ / 8=8F80;870F8O 2@5<5=8 >B:@KB8O =C;52>3> 10@0 =0 ?@>H;>< B8:5
i f ( P r e v i o s T i m e 0 = = 0 )
{
P r e v i o s T i m e 0 = T i m e [ 0 ] ;
r e t u r n ( f a l s e ) ;
}
/ / 5A;8 B5:CI55 2@5<O =C;52>3> 10@0 >B;8G05BAO >B ?@54K4CI53>
i f ( ( P r e v i o s T i m e 0 ! = 0 ) & & ( P r e v i o s T i m e 0 ! = T i m e [ 0 ] ) & & ( B a r s > B a r o v B y l o ) )
{
P r e v i o s T i m e 0 = T i m e [ 0 ] ;
B a r o v B y l o = B a r s ;
r e t u r n ( t r u e ) ;
}
r e t u r n ( f a l s e ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>4AG5B :>;8G5AB20 >B:@KBKE ?>78F89 B U Y 4;O =0H59 20;NBK
/ / AG8B05B B>;L:> B5 >@45@0, :>B>@K5 ?>AB028; A0< A>25B=8:
/ / =5 70AG8BK205< B5 >@45@0, :>B>@K5 C65 ?5@52545=K 2 157C1KB>:
i n t P o d s c h e t B a e v S o v e t n i k a ( )
{
i n t i , k o l b a e v , o r d t o t a l ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
k o l b a e v = 0 ;
/ / ?>;=>5 :>;8G5AB2> >@45@>2
o r d t o t a l = O r d e r s T o t a l ( ) ;
i f ( o r d t o t a l > 0 )
{
f o r ( i = 0 ; i < o r d t o t a l ; i + + )
{
/ / >@45@ 2K1@0=
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 ) = = t r u e )
{
/ / 5A;8 20;NB0 >@45@0 A>2?0405B A 3@0D8:>< A>25B=8:0 8 MB> B U Y
i f ( ( O r d e r S y m b o l ( ) = = S y m b o l ( ) ) & & ( O r d e r T y p e ( ) = = O P _ B U Y ) )
{
/ / AG8B05< B>;L:> B5 >@45@0, :>B>@K5 =5 ?5@52545=K 2 157C1KB>:
i f ( ( O r d e r S t o p L o s s ( ) < O r d e r O p e n P r i c e ( ) ) | | ( O r d e r S t o p L o s s ( ) = = 0 ) )
{
/ / AG8B05< B>;L:> B5 >@45@0, :>B>@K5 CAB0=>28; A>25B=8:
i f ( O r d e r C o m m e n t ( ) = = " T Y N G U S K A " ) { k o l b a e v = k o l b a e v + 1 ; }
}
}
}
}
}
r e t u r n ( k o l b a e v ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>4AG5B :>;8G5AB20 >B:@KBKE ?>78F89 S E L L 4;O =0H59 20;NBK
/ / AG8B05B B>;L:> B5 >@45@0, :>B>@K5 ?>AB028; A0< A>25B=8:
/ / =5 70AG8BK205< B5 >@45@0, :>B>@K5 C65 ?5@52545=K 2 157C1KB>:
i n t P o d s c h e t S e l o v S o v e t n i k a ( )
{
i n t i , k o l s e l o v , o r d t o t a l ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
k o l s e l o v = 0 ;
/ / ?>;=>5 :>;8G5AB2> >@45@>2
o r d t o t a l = O r d e r s T o t a l ( ) ;
i f ( o r d t o t a l > 0 )
{
f o r ( i = 0 ; i < o r d t o t a l ; i + + )
{
/ / >@45@ 2K1@0=
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 ) = = t r u e )
{
/ / 5A;8 20;NB0 >@45@0 A>2?0405B A 3@0D8:>< A>25B=8:0 8 MB> S E L L
i f ( ( O r d e r S y m b o l ( ) = = S y m b o l ( ) ) & & ( O r d e r T y p e ( ) = = O P _ S E L L ) )
{
/ / AG8B05< B>;L:> B5 >@45@0, :>B>@K5 =5 ?5@52545=K 2 157C1KB>:
i f ( ( O r d e r S t o p L o s s ( ) > O r d e r O p e n P r i c e ( ) ) | | ( O r d e r S t o p L o s s ( ) = = 0 ) )
{
/ / AG8B05< B>;L:> B5 >@45@0, :>B>@K5 CAB0=>28; A>25B=8:
i f ( O r d e r C o m m e n t ( ) = = " T Y N G U S K A " ) { k o l s e l o v = k o l s e l o v + 1 ; }
}
}
}
}
}
r e t u r n ( k o l s e l o v ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !($ ( , ) +% " + !
v o i d P r i n t T r a d e S e r v e r E r r o r ( i n t K o d O s h i b k i )
{
s t r i n g O p i s a n i e O s h i b k i ;
s w i t c h ( K o d O s h i b k i )
{
c a s e 0 : O p i s a n i e O s h i b k i = " ">@3>20O >?5@0F8O ?@>H;0 CA?5H=>. " ; b r e a k ;
c a s e 1 : O p i s a n i e O s h i b k i = " O r d e r M o d i f y ?KB05BAO 87<5=8BL C65 CAB0=>2;5==K5 7=0G5=8O B0:8<8 65 7=0G5=8O<8. C6=> 87<5=8BL >4=> 8;8 =5A:>;L:> 7=0G5=89 8 ?>2B>@8BL ?>?KB:C. " ; b r e a k ;
c a s e 2 : O p i s a n i e O s h i b k i = " 1I0O >H81:0. @5:@0B8BL 2A5 ?>?KB:8 B>@3>2KE >?5@0F89 4> 2KOA=5=8O >1AB>OB5;LAB2. >7<>6=> ?5@5703@C78BL >?5@0F8>==CN A8AB5<C 8 :;85=BA:89 B5@<8=0;. " ; b r e a k ;
c a s e 3 : O p i s a n i e O s h i b k i = " B>@3>2CN DC=:F8N ?5@540=K =5?@028;L=K5 ?0@0<5B@K. 0?@8<5@, =5?@028;L=K9 A8<2>;, =5>?>7=0==0O B>@3>20O >?5@0F8O. 5>1E>48<> 87<5=8BL ;>38:C ?@>3@0<<K" ; b r e a k ;
c a s e 4 : O p i s a n i e O s h i b k i = " ">@3>2K9 A5@25@ 70=OB. >6=> ?>2B>@8BL ?>?KB:C G5@57 4>AB0B>G=> 1>;LH>9 ?@><56CB>: 2@5<5=8 ( >B =5A:>;L:8E <8=CB) . " ; b r e a k ;
c a s e 5 : O p i s a n i e O s h i b k i = " !B0@0O 25@A8O :;85=BA:>3> B5@<8=0;0. 5>1E>48<> CAB0=>28BL ?>A;54=NN 25@A8N :;85=BA:>3> B5@<8=0;0. " ; b r e a k ;
c a s e 6 : O p i s a n i e O s h i b k i = " 5B A2O78 A B>@3>2K< A5@25@><. 5>1E>48<> C1548BLAO, GB> A2O7L =5 =0@CH5=0 ( =0?@8<5@, ?@8 ?><>I8 DC=:F88 I s C o n n e c t e d ) 8 ?>2B>@8BL ?>?KB:C" ; b r e a k ;
c a s e 8 : O p i s a n i e O s h i b k i = " !;8H:>< G0ABK5 70?@>AK. 5>1E>48<> C<5=LH8BL G0AB>BC 70?@>A>2, 87<5=8BL ;>38:C ?@>3@0<<K. " ; b r e a k ;
c a s e 6 4 : O p i s a n i e O s h i b k i = " !G5B 701;>:8@>20=. 5>1E>48<> ?@5:@0B8BL 2A5 ?>?KB:8 B>@3>2KE >?5@0F89. " ; b r e a k ;
c a s e 6 5 : O p i s a n i e O s h i b k i = " 5?@028;L=K9 =><5@ AG5B0. 5>1E>48<> ?@5:@0B8BL 2A5 ?>?KB:8 B>@3>2KE >?5@0F89. " ; b r e a k ;
c a s e 1 2 8 : O p i s a n i e O s h i b k i = " AB5: A@>: >6840=8O A>25@H5=8O A45;:8. 5>1E>48<> C1548BLAO, GB> B>@3>20O >?5@0F8O 459AB28B5;L=> =5 ?@>H;0" ; b r e a k ;
c a s e 1 2 9 : O p i s a n i e O s h i b k i = " 5?@028;L=0O F5=0 b i d 8;8 a s k , 2>7<>6=>, =5=>@<0;87>20==0O F5=0. 5>1E>48<> >1=>28BL 40==K5 DC=:F859 R e f r e s h R a t e s 8 ?>2B>@8BL ?>?KB:C. " ; b r e a k ;
c a s e 1 3 0 : O p i s a n i e O s h i b k i = " !;8H:>< 1;87:85 AB>?K 8;8 =5?@028;L=> @0AAG8B0==K5 8;8 =5=>@<0;87>20==K5 F5=K 2 AB>?0E " ; b r e a k ;
c a s e 1 3 1 : O p i s a n i e O s h i b k i = " 5?@028;L=K9 >1J5<, >H81:0 2 3@0=C;OF88 >1J5<0. 5>1E>48<> ?@5:@0B8BL 2A5 ?>?KB:8 B>@3>2KE >?5@0F89 8 87<5=8BL ;>38:C ?@>3@0<<K. " ; b r e a k ;
c a s e 1 3 2 : O p i s a n i e O s h i b k i = " K=>: 70:@KB. >6=> ?>2B>@8BL ?>?KB:C G5@57 4>AB0B>G=> 1>;LH>9 ?@><56CB>: 2@5<5=8 ( >B =5A:>;L:8E <8=CB) . " ; b r e a k ;
c a s e 1 3 3 : O p i s a n i e O s h i b k i = " ">@3>2;O 70?@5I5=0. 5>1E>48<> ?@5:@0B8BL 2A5 ?>?KB:8 B>@3>2KE >?5@0F89. " ; b r e a k ;
c a s e 1 3 4 : O p i s a n i e O s h i b k i = " 54>AB0B>G=> 45=53 4;O A>25@H5=8O >?5@0F88. >2B>@OBL A45;:C A B5<8 65 ?0@0<5B@0<8 =5;L7O. " ; b r e a k ;
c a s e 1 3 5 : O p i s a n i e O s h i b k i = " &5=0 87<5=8;0AL. >6=> 157 7045@6:8 >1=>28BL 40==K5 ?@8 ?><>I8 DC=:F88 R e f r e s h R a t e s 8 ?>2B>@8BL ?>?KB:C" ; b r e a k ;
c a s e 1 3 6 : O p i s a n i e O s h i b k i = " 5B F5=. @>:5@ ?> :0:>9- B> ?@8G8=5 ( =0?@8<5@, 2 =0G0;5 A5AA88 F5= =5B, =5?>4B25@645==K5 F5=K, 1KAB@K9 @K=>:) =5 40; F5= 8;8 >B:070;. " ; b r e a k ;
c a s e 1 3 8 : O p i s a n i e O s h i b k i = " 0?@>H5==0O F5=0 CAB0@5;0, ;81> ?5@5?CB0=K b i d 8 a s k . >6=> 157 7045@6:8 >1=>28BL 40==K5 ?@8 ?><>I8 DC=:F88 R e f r e s h R a t e s 8 ?>2B>@8BL ?>?KB:C! " ; b r e a k ;
c a s e 1 3 9 : O p i s a n i e O s h i b k i = " @45@ 701;>:8@>20= 8 C65 >1@010BK205BAO. 5>1E>48<> ?@5:@0B8BL 2A5 ?>?KB:8 B>@3>2KE >?5@0F89 8 87<5=8BL ;>38:C ?@>3@0<<K" ; b r e a k ;
c a s e 1 4 0 : O p i s a n i e O s h i b k i = " 07@5H5=0 B>;L:> ?>:C?:0. >2B>@OBL >?5@0F8N S E L L =5;L7O. " ; b r e a k ;
c a s e 1 4 1 : O p i s a n i e O s h i b k i = " !;8H:>< <=>3> 70?@>A>2. 5>1E>48<> C<5=LH8BL G0AB>BC 70?@>A>2, 87<5=8BL ;>38:C ?@>3@0<<K. " ; b r e a k ;
c a s e 1 4 5 : O p i s a n i e O s h i b k i = " >48D8:0F8O 70?@5I5=0, B0: :0: >@45@ A;8H:>< 1;87>: : @K=:C 8 701;>:8@>20= 87- 70 2>7<>6=>3> A:>@>3> 8A?>;=5=8O" ; b r e a k ;
c a s e 1 4 6 : O p i s a n i e O s h i b k i = " >4A8AB5<0 B>@3>2;8 70=OB0. >2B>@8BL ?>?KB:C B>;L:> ?>A;5 B>3>, :0: DC=:F8O I s T r a d e C o n t e x t B u s y 25@=5B F A L S E . " ; b r e a k ;
c a s e 1 4 7 : O p i s a n i e O s h i b k i = " A?>;L7>20=85 40BK 8AB5G5=8O >@45@0 70?@5I5=> 1@>:5@><. ?5@0F8N <>6=> ?>2B>@8BL B>;L:> 2 B>< A;CG05, 5A;8 >1=C;8BL ?0@0<5B@ e x p i r a t i o n " ; b r e a k ;
c a s e 1 4 8 : O p i s a n i e O s h i b k i = " >;8G5AB2> >B:@KBKE 8 >B;>65==KE >@45@>2 4>AB83;> ?@545;0, CAB0=>2;5==>3> 1@>:5@><" ; b r e a k ;
c a s e 1 4 9 : O p i s a n i e O s h i b k i = " >?KB:0 >B:@KBL ?@>B82>?>;>6=CN ?>78F8N : C65 ACI5AB2CNI59 2 A;CG05, 5A;8 E5468@>20=85 70?@5I5=>. " ; b r e a k ;
c a s e 1 5 0 : O p i s a n i e O s h i b k i = " >?KB:0 70:@KBL ?>78F8N ?> 8=AB@C<5=BC 2 ?@>B82>@5G88 A ?@028;>< F I F O . !=0G0;0 =5>1E>48<> 70:@KBL 1>;55 @0==85 ACI5AB2CNI85 ?>78F88 " ; b r e a k ;
c a s e 4 1 0 9 : O p i s a n i e O s h i b k i = " ">@3>2;O =5 @07@5H5=0. !>25B=8:C 70?@5I5=> B>@3>20BL, =0 3@0D8:5 3@CAB=K9 A<09; 8;8 :@5AB8:. :;NG8B5 30;>G:C « 07@5H8BL A>25B=8:C B>@3>20BL» " ; b r e a k ;
d e f a u l t : O p i s a n i e O s h i b k i = " !" / (, ( = " + D o u b l e T o S t r ( K o d O s h i b k i , 0 ) ; b r e a k ;
}
P r i n t ( " ( " &, !($ = " + O p i s a n i e O s h i b k i ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / " O P _ B U Y
v o i d O b r a b o t k a O r d e r a O P E N B U Y ( d o u b l e R a z m S r e d B a r a , b o o l Z a k r y t B U Y )
{
d o u b l e L e v e l S t o p B e z y b ;
i n t K o d O s h i b k i ;
b o o l R e z u l t C l o s e , R e z u l t M o d i f y ;
R e z u l t C l o s e = f a l s e ; R e z u l t M o d i f y = f a l s e ;
L e v e l S t o p B e z y b = 0 ; K o d O s h i b k i = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +" +, O P _ B U Y !"# ( # ! # +"
i f ( ( Z a k r y t B U Y = = t r u e ) & & ( O r d e r P r o f i t ( ) > 0 ) )
{
R e z u l t C l o s e = f a l s e ;
R e z u l t C l o s e = O r d e r C l o s e ( O r d e r T i c k e t ( ) , O r d e r L o t s ( ) , B i d , 7 , c l r R e d ) ;
/ / 5A;8 >@45@ =5 C40;>AL 70:@KBL
i f ( R e z u l t C l o s e = = f a l s e )
{
K o d O s h i b k i = 0 ;
K o d O s h i b k i = G e t L a s t E r r o r ( ) ;
i f ( K o d O s h i b k i ! = 0 )
{
P r i n t T r a d e S e r v e r E r r o r ( K o d O s h i b k i ) ;
S l e e p ( 2 0 0 0 ) ;
R e f r e s h R a t e s ( ) ;
}
}
r e t u r n ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !" !! #+" / O P _ B U Y
/ / 5A;8 C >@45@0 !", AB>? ;>AA, => >= =0E>48BAO 2 157C1KB:5
i f ( ( O r d e r S t o p L o s s ( ) > 0 ) & & ( O r d e r S t o p L o s s ( ) < O r d e r O p e n P r i c e ( ) ) )
{
/ / C@>25=L AB>? ;>AA0 4;O ?5@52>40 2 157C1KB>:
L e v e l S t o p B e z y b = 0 ;
L e v e l S t o p B e z y b = B i d - B e z y b S t o p P u n k t s * P o i n t ;
L e v e l S t o p B e z y b = N o r m a l i z e D o u b l e ( L e v e l S t o p B e z y b , D i g i t s ) ;
/ / 5A;8 AB>? ;>AA ?5@525AB8 2 157C1KB>:
i f ( L e v e l S t o p B e z y b > ( O r d e r O p e n P r i c e ( ) + B e z y b P r o f i t P u n k t * P o i n t ) )
{
/ / ?5@52>48< AB>? ;>AA 2 157C1KB>: D8:A8@CO =51>;LHCN ?@81K;L
R e z u l t M o d i f y = f a l s e ;
R e z u l t M o d i f y = 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 ( ) , L e v e l S t o p B e z y b , O r d e r T a k e P r o f i t ( ) , 0 , A q u a ) ;
i f ( R e z u l t M o d i f y = = f a l s e )
{
K o d O s h i b k i = 0 ;
K o d O s h i b k i = G e t L a s t E r r o r ( ) ;
i f ( K o d O s h i b k i ! = 0 )
{
P r i n t T r a d e S e r v e r E r r o r ( K o d O s h i b k i ) ;
S l e e p ( 2 0 0 0 ) ;
R e f r e s h R a t e s ( ) ;
}
}
r e t u r n ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
r e t u r n ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / " O P _ S E L L
v o i d O b r a b o t k a O r d e r a O P E N S E L L ( d o u b l e R a z m S r e d B a r a , b o o l Z a k r y t S E L L )
{
d o u b l e L e v e l S t o p B e z y b ;
i n t K o d O s h i b k i ;
b o o l R e z u l t C l o s e , R e z u l t M o d i f y ;
R e z u l t C l o s e = f a l s e ; R e z u l t M o d i f y = f a l s e ;
L e v e l S t o p B e z y b = 0 ; K o d O s h i b k i = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +" +, O P _ S E L L " ,
i f ( ( Z a k r y t S E L L = = t r u e ) & & ( O r d e r P r o f i t ( ) > 0 ) )
{
R e z u l t C l o s e = f a l s e ;
R e z u l t C l o s e = O r d e r C l o s e ( O r d e r T i c k e t ( ) , O r d e r L o t s ( ) , A s k , 7 , c l r R e d ) ;
/ / 5A;8 >@45@ =5 C40;>AL 70:@KBL
i f ( R e z u l t C l o s e = = f a l s e )
{
K o d O s h i b k i = 0 ;
K o d O s h i b k i = G e t L a s t E r r o r ( ) ;
i f ( K o d O s h i b k i ! = 0 )
{
P r i n t T r a d e S e r v e r E r r o r ( K o d O s h i b k i ) ;
S l e e p ( 2 0 0 0 ) ;
R e f r e s h R a t e s ( ) ;
}
}
r e t u r n ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !" !! #+" / O P _ S E L L
/ / 5A;8 C >@45@0 !", AB>? ;>AA, => >= =0E>48BAO 2 157C1KB:5
i f ( ( O r d e r S t o p L o s s ( ) > 0 ) & & ( O r d e r S t o p L o s s ( ) > O r d e r O p e n P r i c e ( ) ) )
{
/ / C@>25=L AB>? ;>AA0 4;O ?5@52>40 2 157C1KB>:
L e v e l S t o p B e z y b = 0 ;
L e v e l S t o p B e z y b = A s k + B e z y b S t o p P u n k t s * P o i n t ;
L e v e l S t o p B e z y b = N o r m a l i z e D o u b l e ( L e v e l S t o p B e z y b , D i g i t s ) ;
/ / 5A;8 AB>? ;>AA ?5@525AB8 2 157C1KB>:
i f ( L e v e l S t o p B e z y b < ( O r d e r O p e n P r i c e ( ) - B e z y b P r o f i t P u n k t * P o i n t ) )
{
/ / ?5@52>48< AB>? ;>AA 2 157C1KB>: D8:A8@CO =51>;LHCN ?@81K;L
R e z u l t M o d i f y = f a l s e ;
R e z u l t M o d i f y = 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 ( ) , L e v e l S t o p B e z y b , O r d e r T a k e P r o f i t ( ) , 0 , A q u a ) ;
i f ( R e z u l t M o d i f y = = f a l s e )
{
K o d O s h i b k i = 0 ;
K o d O s h i b k i = G e t L a s t E r r o r ( ) ;
i f ( K o d O s h i b k i ! = 0 )
{
P r i n t T r a d e S e r v e r E r r o r ( K o d O s h i b k i ) ;
S l e e p ( 2 0 0 0 ) ;
R e f r e s h R a t e s ( ) ;
}
}
r e t u r n ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
r e t u r n ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / +" $&/ , " +"+% ! "
v o i d P e r e b o r O r d e r o v S o v e t n i k a ( d o u b l e R a z m e r S r e d n B a r a , b o o l Z a k r i v a y B U Y , b o o l Z a k r i v a y S E L L )
{
i n t K o l v o O r d e r o v , i ;
K o l v o O r d e r o v = 0 ;
K o l v o O r d e r o v = O r d e r s T o t a l ( ) ;
/ / 5A;8 >@45@>2 =5B - 2KE>48< 87 ?@>F54C@K
i f ( K o l v o O r d e r o v < 1 )
{
r e t u r n ;
}
/ / 2K18@05< B>;L:> B5 >@45@0, :>B>@K5 >B:@K; =0H A>25B=8:
f o r ( i = ( K o l v o O r d e r o v - 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 ) = = t r u e )
{
/ / " O P _ B U Y
i f ( ( O r d e r S y m b o l ( ) = = S y m b o l ( ) ) & & ( O r d e r T y p e ( ) = = O P _ B U Y ) )
{
i f ( O r d e r C o m m e n t ( ) = = " T Y N G U S K A " )
{
O b r a b o t k a O r d e r a O P E N B U Y ( R a z m e r S r e d n B a r a , Z a k r i v a y B U Y ) ;
c o n t i n u e ;
}
}
/ / " O P _ S E L L
i f ( ( O r d e r S y m b o l ( ) = = S y m b o l ( ) ) & & ( O r d e r T y p e ( ) = = O P _ S E L L ) )
{
i f ( O r d e r C o m m e n t ( ) = = " T Y N G U S K A " )
{
O b r a b o t k a O r d e r a O P E N S E L L ( R a z m e r S r e d n B a r a , Z a k r i v a y S E L L ) ;
c o n t i n u e ;
}
}
}
}
r e t u r n ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / +" ! ! !' / ! ,
b o o l Z a k r y t S d e l k y B U Y C r o s s M A C D ( d o u b l e S r e d T e l o , i n t b )
{
d o u b l e M a c d C u r r e n t , M a c d P r e v i o u s , M a c d V a l u e A B S ;
d o u b l e S i g n a l C u r r e n t , S i g n a l P r e v i o u s , B e t t e r D i r e c t , B e t t e r A B C ;
i n t l e v b a r ;
b o o l z a k r b u y , D i v e r B E A R ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
z a k r b u y = f a l s e ;
/ / 10@ A;520 >B 10@0
l e v b a r = b + 1 ;
/ / 2 7=0G5=8O 8=48:0B>@0
M a c d C u r r e n t = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , b ) ;
M a c d P r e v i o u s = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , l e v b a r ) ;
/ / 2 7=0G5=8O A83=0;L=>9 ;8=88
S i g n a l C u r r e n t = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ S I G N A L , b ) ;
S i g n a l P r e v i o u s = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ S I G N A L , l e v b a r ) ;
/ / <>4C;L B5:CI53> 7=0G5=8O
M a c d V a l u e A B S = M a t h A b s ( M a c d C u r r e n t ) ;
/ / ?5@5A5G5=85 8 A83=0;L=>9 ;8=88 A25@EC 2=87 =0 1>;LH>9 2KA>B5
i f ( ( M a c d C u r r e n t > 0 ) & & ( M a c d C u r r e n t < S i g n a l C u r r e n t ) )
{
i f ( ( M a c d P r e v i o u s > S i g n a l P r e v i o u s ) & & ( M a c d V a l u e A B S > M A C D C l o s e B i g L e v e l ) )
{
/ / z a k r b u y = t r u e ;
}
}
/ / ?@>25@:0 =0 =0;8G85 , 4825@35=F88
D i v e r B E A R = f a l s e ;
D i v e r B E A R = D i v e r B e a r O X O T N I K 7 7 7 ( S r e d T e l o , b ) ;
/ / 5A;8 5ABL <54256LO 4825@35=F8O - 70:@K205< ?@81K;L=CN # #
i f ( D i v e r B E A R = = t r u e )
{
/ / z a k r b u y = t r u e ;
}
B e t t e r D i r e c t = 0 ;
B e t t e r D i r e c t = D i r e c t B E T T E R ( N a s t r B e t t e r W a r p , N a s t r B e t t e r D e v i a t , N a s t r B e t t e r A m p l i t , N a s t r B e t t e r D i s t o r , b ) ;
B e t t e r D i r e c t = N o r m a l i z e D o u b l e ( B e t t e r D i r e c t , 2 ) ;
B e t t e r A B C = 0 ;
B e t t e r A B C = M a t h A b s ( B e t t e r D i r e c t ) ;
i f ( ( B e t t e r D i r e c t < 0 ) & & ( B e t t e r A B C > B e t t e r Z n a c h C l o s e M i n ) )
{
/ / z a k r b u y = t r u e ;
}
r e t u r n ( z a k r b u y ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / +" ! ! ! !' / ! ,
b o o l Z a k r y t S d e l k y S E L L C r o s s M A C D ( d o u b l e S r e d T e l o , i n t b )
{
d o u b l e M a c d C u r r e n t , M a c d P r e v i o u s , M a c d V a l u e A B S ;
d o u b l e S i g n a l C u r r e n t , S i g n a l P r e v i o u s , B e t t e r D i r e c t , B e t t e r A B C ;
i n t l e v b a r ;
b o o l z a k r s e l l , D i v e r B U L L ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
z a k r s e l l = f a l s e ;
/ / 10@ A;520 >B 10@0
l e v b a r = b + 1 ;
/ / 2 7=0G5=8O 8=48:0B>@0
M a c d C u r r e n t = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , b ) ;
M a c d P r e v i o u s = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , l e v b a r ) ;
/ / 2 7=0G5=8O A83=0;L=>9 ;8=88
S i g n a l C u r r e n t = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ S I G N A L , b ) ;
S i g n a l P r e v i o u s = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ S I G N A L , l e v b a r ) ;
/ / <>4C;L B5:CI53> 7=0G5=8O
M a c d V a l u e A B S = M a t h A b s ( M a c d C u r r e n t ) ;
/ / ?5@5A5G5=85 8 A83=0;L=>9 ;8=88 A=87C 225@E =0 1>;LH>9 3;C18=5
i f ( ( M a c d C u r r e n t < 0 ) & & ( M a c d C u r r e n t > S i g n a l C u r r e n t ) )
{
i f ( ( M a c d P r e v i o u s < S i g n a l P r e v i o u s ) & & ( M a c d V a l u e A B S > M A C D C l o s e B i g L e v e l ) )
{
/ / z a k r s e l l = t r u e ;
}
}
/ / ?@>25@:0 =0 =0;8G85 +', 4825@35=F88
D i v e r B U L L = f a l s e ;
D i v e r B U L L = D i v e r B u l l O X O T N I K 7 7 7 ( b ) ;
/ / 5A;8 5ABL +',/ 4825@35=F8O - 70:@K205< ?@81K;L=CN #
i f ( D i v e r B U L L = = t r u e )
{
/ / z a k r s e l l = t r u e ;
}
B e t t e r D i r e c t = 0 ;
B e t t e r D i r e c t = D i r e c t B E T T E R ( N a s t r B e t t e r W a r p , N a s t r B e t t e r D e v i a t , N a s t r B e t t e r A m p l i t , N a s t r B e t t e r D i s t o r , b ) ;
B e t t e r D i r e c t = N o r m a l i z e D o u b l e ( B e t t e r D i r e c t , 2 ) ;
B e t t e r A B C = 0 ;
B e t t e r A B C = M a t h A b s ( B e t t e r D i r e c t ) ;
i f ( ( B e t t e r D i r e c t > 0 ) & & ( B e t t e r A B C > B e t t e r Z n a c h C l o s e M i n ) )
{
/ / z a k r s e l l = t r u e ;
}
r e t u r n ( z a k r s e l l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / A@54=89 @07<5@ 2 ?C=:B0E, B>G=>ABL 2 7=0:0, >BAG5B 845B >B C:070==>3> 10@0
d o u b l e S r e d n i y R a z m e r B a r a P u n k t s ( i n t b )
{
d o u b l e s r e d r a z m b a r a , d l i n a b a r o b s h , r a z m e r b a r a i ;
i n t i , c o u n t , t o t a l , l e v g r ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
s r e d r a z m b a r a = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 4;O ?>4AG5B0
t o t a l = B a r s - 3 0 ;
l e v g r = K o l v o B a r o v R a s c h e t a S r e d n + b ;
l e v g r = M a t h M i n ( t o t a l , l e v g r ) ;
/ / >1I0O 4;8=0 AC<<8@C5<KE 10;;>2 2 ?C=:B0E
d l i n a b a r o b s h = 0 ;
c o u n t = 0 ;
f o r ( i = b ; i < l e v g r ; i + + )
{
r a z m e r b a r a i = H i g h [ i ] - L o w [ i ] ;
d l i n a b a r o b s h = d l i n a b a r o b s h + r a z m e r b a r a i ;
c o u n t = c o u n t + 1 ;
}
/ / >1I0O 4;8=0 2 F5;KE ?C=:B0E
d l i n a b a r o b s h = d l i n a b a r o b s h / P o i n t ;
d l i n a b a r o b s h = M a t h R o u n d ( d l i n a b a r o b s h ) ;
/ / A@54=89 @07<5@ 10@0 2 ?C=:B0E =0 3@0D8:5 B>G=>ABL 2 7=0:0
s r e d r a z m b a r a = d l i n a b a r o b s h / c o u n t ;
s r e d r a z m b a r a = N o r m a l i z e D o u b l e ( s r e d r a z m b a r a , 2 ) ;
r e t u r n ( s r e d r a z m b a r a ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / A@54=89 @07<5@ B5;0 A25G8 2 ?C=:B0E, B>G=>ABL 2 7=0:0, >BAG5B 845B >B C:070==>3> 10@0
d o u b l e S r e d n i y R a z m e r T e l a P u n k t s ( i n t b )
{
d o u b l e s r e d r a z m t e l a , d l i n a t e l o b s h , r a z m e r t e l a i ;
i n t i , c o u n t , t o t a l , l e v g r ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
s r e d r a z m t e l a = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 4;O ?>4AG5B0
t o t a l = B a r s - 3 0 ;
l e v g r = K o l v o B a r o v R a s c h e t a S r e d n + b ;
l e v g r = M a t h M i n ( t o t a l , l e v g r ) ;
d l i n a t e l o b s h = 0 ;
c o u n t = 0 ;
f o r ( i = b ; i < l e v g r ; i + + )
{
r a z m e r t e l a i = O p e n [ i ] - C l o s e [ i ] ;
r a z m e r t e l a i = M a t h A b s ( r a z m e r t e l a i ) ;
d l i n a t e l o b s h = d l i n a t e l o b s h + r a z m e r t e l a i ;
c o u n t = c o u n t + 1 ;
}
/ / >1I0O 4;8=0 2 F5;KE ?C=:B0E
d l i n a t e l o b s h = d l i n a t e l o b s h / P o i n t ;
d l i n a t e l o b s h = M a t h R o u n d ( d l i n a t e l o b s h ) ;
/ / A@54=89 @07<5@ B5;0 A25G8 =0 3@0D8:5 B>G=>ABL 2 7=0:0
s r e d r a z m t e l a = d l i n a t e l o b s h / c o u n t ;
s r e d r a z m t e l a = N o r m a l i z e D o u b l e ( s r e d r a z m t e l a , 2 ) ;
r e t u r n ( s r e d r a z m t e l a ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / $$& " " +', !' ! # # " $
d o u b l e K o e f f T e l a S v e c h i B U L L ( d o u b l e s r e d t e l o , i n t b )
{
d o u b l e k o e f t e l a , t e l o b ;
k o e f t e l a = 0 ; t e l o b = 0 ;
/ / @0AG5B B5;0 +', A25G8 2 ?C=:B0E
t e l o b = C l o s e [ b ] - O p e n [ b ] ;
t e l o b = t e l o b / P o i n t ;
t e l o b = M a t h R o u n d ( t e l o b ) ;
/ / :>5DD8F85=B B5;0 A25G8 : A@54=5<C @07<5@C B5;0 =0 3@0D8:5
k o e f t e l a = t e l o b / s r e d t e l o ;
k o e f t e l a = N o r m a l i z e D o u b l e ( k o e f t e l a , 2 ) ;
r e t u r n ( k o e f t e l a ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / $$& " " , !' ! # # " $
d o u b l e K o e f f T e l a S v e c h i B E A R ( d o u b l e s r e d t e l o , i n t b )
{
d o u b l e k o e f t e l a , t e l o b ;
k o e f t e l a = 0 ; t e l o b = 0 ;
/ / @0AG5B B5;0 , A25G8 2 ?C=:B0E
t e l o b = O p e n [ b ] - C l o s e [ b ] ;
t e l o b = t e l o b / P o i n t ;
t e l o b = M a t h R o u n d ( t e l o b ) ;
/ / :>5DD8F85=B B5;0 A25G8 : A@54=5<C @07<5@C B5;0 =0 3@0D8:5
k o e f t e l a = t e l o b / s r e d t e l o ;
k o e f t e l a = N o r m a l i z e D o u b l e ( k o e f t e l a , 2 ) ;
r e t u r n ( k o e f t e l a ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / $$& " "#) ! # # $
d o u b l e K o e f f R a z m e r a B a r a B ( d o u b l e s r e d n b a r , i n t b )
{
d o u b l e k o e f b a r a , r a z m b a r a b ;
k o e f b a r a = 0 ; r a z m b a r a b = 0 ;
/ / @0AG5B @07<5@0 10@0 2 ?C=:B0E
r a z m b a r a b = H i g h [ b ] - L o w [ b ] ;
r a z m b a r a b = r a z m b a r a b / P o i n t ;
r a z m b a r a b = M a t h R o u n d ( r a z m b a r a b ) ;
/ / :>5DD8F85=B @07<5@0 10@0 : A@54=5<C @07<5@C 10@0 =0 3@0D8:5
k o e f b a r a = r a z m b a r a b / s r e d n b a r ;
k o e f b a r a = N o r m a l i z e D o u b l e ( k o e f b a r a , 2 ) ;
r e t u r n ( k o e f b a r a ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / & " " !' " )
d o u b l e P r o c e n t T e l a S v e c h i ( i n t b )
{
d o u b l e p r o c t e l a , r a z m e r b a r a , t e l o s v e c h i ;
p r o c t e l a = 0 ; r a z m e r b a r a = 0 ; t e l o s v e c h i = 0 ;
/ / @0AG5B @07<5@0 10@0 2 ?C=:B0E
r a z m e r b a r a = H i g h [ b ] - L o w [ b ] ;
r a z m e r b a r a = r a z m e r b a r a / P o i n t ;
r a z m e r b a r a = M a t h R o u n d ( r a z m e r b a r a ) ;
/ / @0AG5B B5;0 A25G8 2 ?C=:B0E
t e l o s v e c h i = O p e n [ b ] - C l o s e [ b ] ;
t e l o s v e c h i = M a t h A b s ( t e l o s v e c h i ) ;
t e l o s v e c h i = t e l o s v e c h i / P o i n t ;
t e l o s v e c h i = M a t h R o u n d ( t e l o s v e c h i ) ;
/ / =5;L7O 4>?CA:0BL 45;5=85 =0 0
i f ( r a z m e r b a r a > 0 )
{
/ / ?@>F5=B B5;0 A25G8 >B >1I53> @07<5@0 10@0
p r o c t e l a = t e l o s v e c h i * 1 0 0 ;
p r o c t e l a = p r o c t e l a / r a z m e r b a r a ;
p r o c t e l a = N o r m a l i z e D o u b l e ( p r o c t e l a , 2 ) ;
}
r e t u r n ( p r o c t e l a ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / +'! '!" + "+% ( +', !'
i n t R a s c h e t P r o b i t V e r s h i n O n e ( i n t b )
{
i n t i , s t , c o u n t , l e v g r ;
c o u n t = 0 ;
s t = b + 1 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v g r = B a r s - 3 0 ;
f o r ( i = s t ; i < l e v g r ; i + + )
{
i f ( ( O p e n [ b ] < H i g h [ i ] ) & & ( C l o s e [ b ] > H i g h [ i ] ) )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / +'! '!" + "+% ( +', !'
i n t R a s c h e t P r o b i t V e r s h i n T W O ( i n t b )
{
i n t i , s t , c o u n t , l e v g r ;
c o u n t = 0 ;
s t = b + 1 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v g r = B a r s - 3 0 ;
f o r ( i = s t ; i < l e v g r ; i + + )
{
i f ( ( O p e n [ s t ] < H i g h [ i ] ) & & ( C l o s e [ b ] > H i g h [ i ] ) )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" '!" + "+% , !'
i n t R a s c h e t P r o b i t N i z i n O n e ( i n t b )
{
i n t i , s t , c o u n t , l e v g r ;
c o u n t = 0 ;
s t = b + 1 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v g r = B a r s - 3 0 ;
f o r ( i = s t ; i < l e v g r ; i + + )
{
i f ( ( O p e n [ b ] > L o w [ i ] ) & & ( C l o s e [ b ] < L o w [ i ] ) )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" '!" + "+% , !'
i n t R a s c h e t P r o b i t N i z i n T W O ( i n t b )
{
i n t i , s t , c o u n t , l e v g r ;
c o u n t = 0 ;
s t = b + 1 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v g r = B a r s - 3 0 ;
f o r ( i = s t ; i < l e v g r ; i + + )
{
i f ( ( O p e n [ s t ] > L o w [ i ] ) & & ( C l o s e [ b ] < L o w [ i ] ) )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>4AG5B 10@>2 A;520 >B 7040==>9 =878=K n i z , =87K :>B>@KE 2KH5, G5< =878=0 n i z
/ / 4;O CA:>@5=8O @01>BK DC=:F88, ?>4AG5B 2545< 4> K o l B a r o v S r e d n T e l o 0 =5 2A5E 10@>2
/ / &# "!" - "" ,
i n t S l e v a T e l o S v e c h O t N i z i n y ( i n t n i z )
{
i n t i , s t , t o t a l , c o u n t , l e v g r ;
c o u n t = 0 ;
s t = n i z + 1 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v g r = B a r s - 1 0 ;
t o t a l = K o l v o B a r o v R a s c h e t a S r e d n + n i z ;
t o t a l = M a t h M i n ( t o t a l , l e v g r ) ;
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / B5;> A25G8 =0 10@5 i 4>;6=> =0E>48BLAO 2KH5 4=0 =878=K
i f ( ( O p e n [ i ] > = L o w [ n i z ] ) & & ( C l o s e [ i ] > = L o w [ n i z ] ) )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>4AG5B 10@>2 A;520 >B 7040==>9 =878=K n i z , =87K :>B>@KE 2KH5, G5< =878=0 n i z
/ / 4;O CA:>@5=8O @01>BK DC=:F88, ?>4AG5B 2545< 4> K o l B a r o v S r e d n T e l o 0 =5 2A5E 10@>2
/ / &# "!" - "" ,
i n t S l e v a B a r o v O t N i z i n y ( i n t n i z )
{
i n t i , s t , t o t a l , c o u n t , l e v g r ;
c o u n t = 0 ;
s t = n i z + 1 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v g r = B a r s - 1 0 ;
t o t a l = K o l v o B a r o v R a s c h e t a S r e d n + n i z ;
t o t a l = M a t h M i n ( t o t a l , l e v g r ) ;
f o r ( i = s t ; i < t o t a l ; i + + )
{
i f ( L o w [ i ] > = L o w [ n i z ] )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>4AG5B 10@>2 A;520 >B ?8:0, 25@H8=K :>B>@KE =865, G5< 25@H8=0 ?8:0 p i k
/ / 4;O CA:>@5=8O @01>BK DC=:F88, ?>4AG5B 2545< 4> K o l B a r o v S r e d n T e l o 0 =5 4> B a r s
/ / &# "!" - "" ,
i n t S l e v a B a r o v O t V e r s h i n y ( i n t p i k )
{
i n t i , s t , t o t a l , c o u n t , l e v g r ;
c o u n t = 0 ;
s t = p i k + 1 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v g r = B a r s - 1 0 ;
t o t a l = K o l v o B a r o v R a s c h e t a S r e d n + p i k ;
t o t a l = M a t h M i n ( t o t a l , l e v g r ) ;
f o r ( i = s t ; i < t o t a l ; i + + )
{
i f ( H i g h [ i ] < = H i g h [ p i k ] )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>4AG5B 10@>2 A;520 >B ?8:0, 25@H8=K :>B>@KE =865, G5< 25@H8=0 ?8:0 p i k
/ / 4;O CA:>@5=8O @01>BK DC=:F88, ?>4AG5B 2545< 4> K o l B a r o v S r e d n T e l o 0 =5 4> B a r s
/ / &# "!" - "" ,
i n t S l e v a T e l o S v e c h O t V e r s h i n y ( i n t p i k )
{
i n t i , s t , t o t a l , c o u n t , l e v g r ;
c o u n t = 0 ;
s t = p i k + 1 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v g r = B a r s - 1 0 ;
t o t a l = K o l v o B a r o v R a s c h e t a S r e d n + p i k ;
t o t a l = M a t h M i n ( t o t a l , l e v g r ) ;
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / B5;> A25G8 =0 10@5 i 4>;6=> =0E>48BLAO =865 ?8:0 25@H8=K
i f ( ( O p e n [ i ] < = H i g h [ p i k ] ) & & ( C l o s e [ i ] < = H i g h [ p i k ] ) )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / / +',/ !'
/ / '/ +', !' #% ! ! % +',% !'
b o o l D v o i n a y a S v e c h a B U L L ( d o u b l e s r e d t e l , i n t b 1 )
{
d o u b l e l e v t e l , p r a v t e l , t e l o m i n , t e l o s u m ;
i n t b 2 ;
b o o l s v e c h a 2 x ;
b 2 = b 1 + 1 ;
s v e c h a 2 x = f a l s e ;
i f ( ( O p e n [ b 2 ] < C l o s e [ b 2 ] ) & & ( O p e n [ b 1 ] < C l o s e [ b 1 ] ) )
{
i f ( ( C l o s e [ b 1 ] > H i g h [ b 2 ] ) & & ( O p e n [ b 2 ] < = O p e n [ b 1 ] ) )
{
/ / B5;> ;52>9 A25G8 2 ?C=:B0E
l e v t e l = C l o s e [ b 2 ] - O p e n [ b 2 ] ;
l e v t e l = l e v t e l / P o i n t ;
l e v t e l = M a t h R o u n d ( l e v t e l ) ;
/ / B5;> ?@02>9 A25G8 2 ?C=:B0E
p r a v t e l = C l o s e [ b 1 ] - O p e n [ b 1 ] ;
p r a v t e l = p r a v t e l / P o i n t ;
p r a v t e l = M a t h R o u n d ( p r a v t e l ) ;
/ / B5;> A>AB02=>9 A25G8 2 ?C=:B0E
t e l o s u m = C l o s e [ b 1 ] - O p e n [ b 2 ] ;
t e l o s u m = t e l o s u m / P o i n t ;
t e l o s u m = M a t h R o u n d ( t e l o s u m ) ;
/ / <8=8<0;L=K9 @07<5@ AC<<0@=>3> B5;0 42>9=>9 A25G8 2 ?C=:B0E
t e l o m i n = s r e d t e l * K o e f f T e l a O b s h i y S v e c h i 2 x ;
t e l o m i n = M a t h R o u n d ( t e l o m i n ) ;
/ / 8B>3>20O A25G0 1>;LH0O 8 5ABL @073>= %
i f ( ( t e l o s u m > t e l o m i n ) & & ( l e v t e l < p r a v t e l ) )
{
s v e c h a 2 x = t r u e ;
}
/ / " "
/ / <8=8<0;L=K9 @07<5@ B5;0 :064>9 87 A25G59
t e l o m i n = s r e d t e l * K o e f f T e l a K a j d o y S v e c h i 2 x ;
t e l o m i n = M a t h R o u n d ( t e l o m i n ) ;
/ / ;520O 8 ?@020O A25G8 4>AB0B>G=> 1>;LH85
i f ( ( l e v t e l > t e l o m i n ) & & ( p r a v t e l > t e l o m i n ) )
{
/ / ?@020O A25G0 =5 A8;L=> <5=LH5 ;52>9
p r a v t e l = p r a v t e l * 1 . 6 ;
p r a v t e l = M a t h R o u n d ( p r a v t e l ) ;
i f ( p r a v t e l > l e v t e l )
{
s v e c h a 2 x = t r u e ;
}
}
}
}
r e t u r n ( s v e c h a 2 x ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / / ,/ !'
/ / '/ , !' #% ! ! % ,% !'
b o o l D v o i n a y a S v e c h a B E A R ( d o u b l e s r e d t e l , i n t b 1 )
{
d o u b l e l e v t e l , p r a v t e l , t e l o m i n , t e l o s u m ;
i n t b 2 ;
b o o l s v e c h a 2 x ;
b 2 = b 1 + 1 ;
s v e c h a 2 x = f a l s e ;
i f ( ( O p e n [ b 2 ] > C l o s e [ b 2 ] ) & & ( O p e n [ b 1 ] > C l o s e [ b 1 ] ) )
{
i f ( ( O p e n [ b 2 ] > = O p e n [ b 1 ] ) & & ( C l o s e [ b 1 ] < L o w [ b 2 ] ) )
{
/ / B5;> ;52>9 A25G8 2 ?C=:B0E
l e v t e l = O p e n [ b 2 ] - C l o s e [ b 2 ] ;
l e v t e l = l e v t e l / P o i n t ;
/ / B5;> ?@02>9 A25G8 2 ?C=:B0E
p r a v t e l = O p e n [ b 1 ] - C l o s e [ b 1 ] ;
p r a v t e l = p r a v t e l / P o i n t ;
/ / B5;> A>AB02=>9 A25G8 2 ?C=:B0E
t e l o s u m = O p e n [ b 2 ] - C l o s e [ b 1 ] ;
t e l o s u m = t e l o s u m / P o i n t ;
/ / <8=8<0;L=K9 @07<5@ AC<<0@=>3> B5;0 42>9=>9 A25G8 2 ?C=:B0E
t e l o m i n = s r e d t e l * K o e f f T e l a O b s h i y S v e c h i 2 x ;
t e l o m i n = M a t h R o u n d ( t e l o m i n ) ;
/ / 8B>3>20O A25G0 1>;LH0O 8 5ABL @073>=
i f ( ( t e l o s u m > t e l o m i n ) & & ( l e v t e l < p r a v t e l ) )
{
s v e c h a 2 x = t r u e ;
}
/ / " "
/ / <8=8<0;L=K9 @07<5@ B5;0 :064>9 87 A25G59
t e l o m i n = s r e d t e l * K o e f f T e l a K a j d o y S v e c h i 2 x ;
t e l o m i n = M a t h R o u n d ( t e l o m i n ) ;
/ / ;520O 8 ?@020O A25G8 4>AB0B>G=> 1>;LH85
i f ( ( l e v t e l > t e l o m i n ) & & ( p r a v t e l > t e l o m i n ) )
{
/ / ?@020O A25G0 =5 A8;L=> <5=LH5 ;52>9
p r a v t e l = p r a v t e l * 1 . 6 ;
p r a v t e l = M a t h R o u n d ( p r a v t e l ) ;
i f ( p r a v t e l > l e v t e l )
{
s v e c h a 2 x = t r u e ;
}
}
}
}
r e t u r n ( s v e c h a 2 x ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" !+ #,! / / !'
d o u b l e R a s c h e t I m p u l s S t r e n g t h ( d o u b l e k o e f v o l u m e , d o u b l e s r e d t e l o , i n t b )
{
d o u b l e i m p u l s p o w e r , x o d b a r a b , k o e f f x o d a ;
i m p u l s p o w e r = 0 ; x o d b a r a b = 0 ; k o e f f x o d a = 0 ;
/ / " / +', !'
i f ( ( O p e n [ b ] < C l o s e [ b ] ) & & ( s r e d t e l o > 0 ) )
{
/ / @0AG5B 4;8=K E>40 A=87C 225@E 4;O +', A25G8 2 ?C=:B0E
x o d b a r a b = C l o s e [ b ] - L o w [ b ] ;
x o d b a r a b = x o d b a r a b / P o i n t ;
x o d b a r a b = M a t h R o u n d ( x o d b a r a b ) ;
/ / :>MDD8F85=B 4;8=K E>40 10@0 : A@54=5<C @07<5@C B5;0 A25G8
k o e f f x o d a = x o d b a r a b / s r e d t e l o ;
k o e f f x o d a = N o r m a l i z e D o u b l e ( k o e f f x o d a , 2 ) ;
/ / @0AG5B A8;K 8<?C;LA0 4;O ?@>25@O5<>9 A25G8 =0 10@5
i m p u l s p o w e r = k o e f v o l u m e * k o e f f x o d a ;
i m p u l s p o w e r = M a t h R o u n d ( i m p u l s p o w e r ) ;
}
/ / " / , !'
i f ( ( O p e n [ b ] > C l o s e [ b ] ) & & ( s r e d t e l o > 0 ) )
{
/ / @0AG5B 4;8=K E>40 A25@EC 2=87 4;O , A25G8 2 ?C=:B0E
x o d b a r a b = H i g h [ b ] - C l o s e [ b ] ;
x o d b a r a b = x o d b a r a b / P o i n t ;
x o d b a r a b = M a t h R o u n d ( x o d b a r a b ) ;
/ / :>MDD8F85=B 4;8=K E>40 10@0 : A@54=5<C @07<5@C B5;0 A25G8
k o e f f x o d a = x o d b a r a b / s r e d t e l o ;
k o e f f x o d a = N o r m a l i z e D o u b l e ( k o e f f x o d a , 2 ) ;
/ / @0AG5B A8;K 8<?C;LA0 4;O ?@>25@O5<>9 A25G8 =0 10@5
i m p u l s p o w e r = k o e f v o l u m e * k o e f f x o d a ;
i m p u l s p o w e r = M a t h R o u n d ( i m p u l s p o w e r ) ;
}
r e t u r n ( i m p u l s p o w e r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / / "!" / " - A=0G0;0 C40;O5B AB0@CN, 70B5< @8AC5B =>2CN
v o i d D r a w R i g h t L A B E L ( s t r i n g n a m e , i n t X , i n t Y , c o l o r c l r , s t r i n g N a d p i s )
{
i n t w i n _ i d x ;
b o o l s o z d a n ;
s o z d a n = f a l s e ;
w i n _ i d x = 0 ;
/ / 5A;8 B0:>9 >1J5:B C65 5ABL =0 3@0D8:5, 53> =C6=> C40;8BL
w i n _ i d x = O b j e c t F i n d ( n a m e ) ;
i f ( w i n _ i d x ! = - 1 )
{
O b j e c t D e l e t e ( n a m e ) ;
S l e e p ( 1 0 0 ) ;
}
/ / ?>A;5 C40;5=8O >1J5:B0 ?@>25@O5<, GB> 53> =0 3@0D8:5 C65 =5B
w i n _ i d x = O b j e c t F i n d ( n a m e ) ;
/ / 5A;8 B0:>3> >1J5:B0 =0 3@0D8:5 =5B, B> <>6=> A>74020BL =>2K9
i f ( w i n _ i d x = = - 1 )
{
s o z d a n = O b j e c t C r e a t e ( n a m e , O B J _ L A B E L , 0 , 0 , 0 ) ;
S l e e p ( 1 0 0 ) ;
}
/ / ?@>25@8<, 5ABL ;8 =0 3@0D8:5 =>2K9 A>740==K9 >1J5:B
w i n _ i d x = O b j e c t F i n d ( n a m e ) ;
/ / 5A;8 >1J5:B A>740=, <>6=> 704020BL 53> ?0@0<5B@K
i f ( ( w i n _ i d x ! = - 1 ) & & ( s o z d a n = = t r u e ) )
{
O b j e c t S e t ( n a m e , O B J P R O P _ C O R N E R , C O R N E R _ R I G H T _ U P P E R ) ;
O b j e c t S e t ( n a m e , O B J P R O P _ X D I S T A N C E , X ) ;
O b j e c t S e t ( n a m e , O B J P R O P _ Y D I S T A N C E , Y ) ;
O b j e c t S e t T e x t ( n a m e , N a d p i s , R a z m e r S h r i f t a N a d p i s e y , " A r i a l " , c l r ) ;
}
r e t u r n ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / & " , / "!" / " - A=0G0;0 C40;O5B AB0@CN, 70B5< @8AC5B =>2CN
/ / ' " ! % ##
v o i d D r a w C e n t r a l L A B E L ( s t r i n g n a m e , i n t Y , c o l o r c l r , s t r i n g N a d p i s )
{
i n t w i n _ i d x ;
b o o l s o z d a n ;
s o z d a n = f a l s e ;
w i n _ i d x = 0 ;
/ / 5A;8 B0:>9 >1J5:B C65 5ABL =0 3@0D8:5, 53> =C6=> C40;8BL
w i n _ i d x = O b j e c t F i n d ( n a m e ) ;
i f ( w i n _ i d x ! = - 1 )
{
O b j e c t D e l e t e ( n a m e ) ;
S l e e p ( 1 0 0 ) ;
}
/ / ?>A;5 C40;5=8O >1J5:B0 ?@>25@O5<, GB> 53> =0 3@0D8:5 C65 =5B
w i n _ i d x = O b j e c t F i n d ( n a m e ) ;
/ / 5A;8 B0:>3> >1J5:B0 =0 3@0D8:5 =5B, B> <>6=> A>74020BL =>2K9
i f ( w i n _ i d x = = - 1 )
{
s o z d a n = O b j e c t C r e a t e ( n a m e , O B J _ L A B E L , 0 , 0 , 0 ) ;
S l e e p ( 1 0 0 ) ;
}
/ / ?@>25@8<, 5ABL ;8 =0 3@0D8:5 =>2K9 A>740==K9 >1J5:B
w i n _ i d x = O b j e c t F i n d ( n a m e ) ;
/ / 5A;8 >1J5:B A>740=, <>6=> 704020BL 53> ?0@0<5B@K
i f ( ( w i n _ i d x ! = - 1 ) & & ( s o z d a n = = t r u e ) )
{
O b j e c t S e t ( n a m e , O B J P R O P _ C O R N E R , C O R N E R _ L E F T _ U P P E R ) ;
O b j e c t S e t ( n a m e , O B J P R O P _ X D I S T A N C E , C e n t r a l N a d p i s X P o z i t i o n ) ;
O b j e c t S e t ( n a m e , O B J P R O P _ Y D I S T A N C E , Y ) ;
O b j e c t S e t T e x t ( n a m e , N a d p i s , R a z m e r S h r i f t a N a d p i s e y , " A r i a l " , c l r ) ;
}
r e t u r n ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / / "!" / " - A=0G0;0 C40;O5B AB0@CN, 70B5< @8AC5B =>2CN
v o i d D r a w L e f t L A B E L ( s t r i n g n a m e , i n t Y , c o l o r c l r , s t r i n g N a d p i s )
{
i n t w i n _ i d x ;
b o o l s o z d a n ;
s o z d a n = f a l s e ;
w i n _ i d x = 0 ;
/ / 5A;8 B0:>9 >1J5:B C65 5ABL =0 3@0D8:5, 53> =C6=> C40;8BL
w i n _ i d x = O b j e c t F i n d ( n a m e ) ;
i f ( w i n _ i d x ! = - 1 )
{
O b j e c t D e l e t e ( n a m e ) ;
S l e e p ( 1 0 0 ) ;
}
/ / ?>A;5 C40;5=8O >1J5:B0 ?@>25@O5<, GB> 53> =0 3@0D8:5 C65 =5B
w i n _ i d x = O b j e c t F i n d ( n a m e ) ;
/ / 5A;8 B0:>3> >1J5:B0 =0 3@0D8:5 =5B, B> <>6=> A>74020BL =>2K9
i f ( w i n _ i d x = = - 1 )
{
s o z d a n = O b j e c t C r e a t e ( n a m e , O B J _ L A B E L , 0 , 0 , 0 ) ;
S l e e p ( 1 0 0 ) ;
}
/ / ?@>25@8<, 5ABL ;8 =0 3@0D8:5 =>2K9 A>740==K9 >1J5:B
w i n _ i d x = O b j e c t F i n d ( n a m e ) ;
/ / 5A;8 >1J5:B A>740=, <>6=> 704020BL 53> ?0@0<5B@K
i f ( ( w i n _ i d x ! = - 1 ) & & ( s o z d a n = = t r u e ) )
{
O b j e c t S e t ( n a m e , O B J P R O P _ C O R N E R , C O R N E R _ L E F T _ U P P E R ) ;
O b j e c t S e t ( n a m e , O B J P R O P _ X D I S T A N C E , 1 5 ) ;
O b j e c t S e t ( n a m e , O B J P R O P _ Y D I S T A N C E , Y ) ;
O b j e c t S e t T e x t ( n a m e , N a d p i s , R a z m e r S h r i f t a N a d p i s e y , " A r i a l " , c l r ) ;
}
r e t u r n ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / @0AG5B 1>;55 AB0@H53> B09<D@59<0 >B=>A8B5;L=> B5:CI53>
i n t S t a r s h i y T i m e F r a m e ( )
{
i n t T e k y s h P e r i o d , S t a r s h P e r i o d ;
T e k y s h P e r i o d = 0 ; S t a r s h P e r i o d = 0 ;
T e k y s h P e r i o d = P e r i o d ( ) ;
i f ( T e k y s h P e r i o d = = P E R I O D _ M 1 ) { S t a r s h P e r i o d = P E R I O D _ M 5 ; }
i f ( T e k y s h P e r i o d = = P E R I O D _ M 5 ) { S t a r s h P e r i o d = P E R I O D _ M 1 5 ; }
i f ( T e k y s h P e r i o d = = P E R I O D _ M 1 5 ) { S t a r s h P e r i o d = P E R I O D _ M 3 0 ; }
i f ( T e k y s h P e r i o d = = P E R I O D _ M 3 0 ) { S t a r s h P e r i o d = P E R I O D _ H 1 ; }
i f ( T e k y s h P e r i o d = = P E R I O D _ H 1 ) { S t a r s h P e r i o d = P E R I O D _ H 4 ; }
i f ( T e k y s h P e r i o d = = P E R I O D _ H 4 ) { S t a r s h P e r i o d = P E R I O D _ D 1 ; }
i f ( T e k y s h P e r i o d = = P E R I O D _ D 1 ) { S t a r s h P e r i o d = P E R I O D _ W 1 ; }
i f ( T e k y s h P e r i o d = = P E R I O D _ W 1 ) { S t a r s h P e r i o d = P E R I O D _ M N 1 ; }
r e t u r n ( S t a r s h P e r i o d ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / $$& " * / !' " ( . ! # * #
d o u b l e R a s c h e t K o e f f V o l u m e T y n g ( i n t b )
{
/ / >B25B 2>72@0I05<K9 DC=:F859
d o u b l e S r e d n V o l u m e , K o e f f V o l u m e ;
l o n g T e k y s h V o l u m e , O b s h i y V o l u m e ;
i n t i , c , c o u n t , t o t a l , l e v g r ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
K o e f f V o l u m e = 0 ;
/ / 10@ A;520 >B 10@0
c = b + 1 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v g r = B a r s - 3 0 ;
t o t a l = K o l v o B a r o v R a s c h e t a S r e d n + b ;
t o t a l = M a t h M i n ( t o t a l , l e v g r ) ;
O b s h i y V o l u m e = 0 ;
c o u n t = 0 ;
f o r ( i = b ; i < t o t a l ; i + + )
{
O b s h i y V o l u m e = O b s h i y V o l u m e + V o l u m e [ i ] ;
c o u n t = c o u n t + 1 ;
}
/ / A@54=OO 25;8G8=0 >1J5<0 10@0
S r e d n V o l u m e = O b s h i y V o l u m e / c o u n t ;
/ / B5:CI89 >1J5< =0 ?@>25@O5<>< 10@5
T e k y s h V o l u m e = V o l u m e [ b ] ;
/ / 5A;8 5ABL 42>9=0O 1KGLO A25G0
i f ( ( O p e n [ c ] < C l o s e [ c ] ) & & ( O p e n [ b ] < C l o s e [ b ] ) )
{
i f ( ( O p e n [ c ] < L o w [ b ] ) & & ( C l o s e [ b ] > H i g h [ c ] ) )
{
T e k y s h V o l u m e = M a t h M a x ( V o l u m e [ c ] , V o l u m e [ b ] ) ;
}
}
/ / 5A;8 5ABL 42>9=0O <54256LO A25G0
i f ( ( O p e n [ c ] > C l o s e [ c ] ) & & ( O p e n [ b ] > C l o s e [ b ] ) )
{
i f ( ( O p e n [ c ] > H i g h [ b ] ) & & ( C l o s e [ b ] < L o w [ c ] ) )
{
T e k y s h V o l u m e = M a t h M a x ( V o l u m e [ c ] , V o l u m e [ b ] ) ;
}
}
/ / :>5DD8F85=B >1J5<0 =0 ?@>25@O5<>< 10@5 : A@54=5<C >1J5<C
K o e f f V o l u m e = T e k y s h V o l u m e / S r e d n V o l u m e ;
K o e f f V o l u m e = N o r m a l i z e D o u b l e ( K o e f f V o l u m e , 2 ) ;
r e t u r n ( K o e f f V o l u m e ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / :>;8G5AB2> A25G59 A;520 >B ?@>25@O5<>9, C :>B>@KE B5;> <5=LH5, G5< C ?@>25@O5<>9
i n t K o l v o L i t t l e C a n d e l s L e f t ( i n t b )
{
d o u b l e t e l o i , t e l o b ;
i n t i , s t , c o u n t ;
/ / B5;> A25G8 =0 10@5 2 F5;KE ?C=:B0E
t e l o b = O p e n [ b ] - C l o s e [ b ] ;
t e l o b = M a t h A b s ( t e l o b ) ;
t e l o b = t e l o b / P o i n t ;
t e l o b = M a t h R o u n d ( t e l o b ) ;
t e l o i = 0 ;
/ / AB0@B>2K9 10@ F8:;0 ?>8A:0
s t = b + 1 ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
c o u n t = 0 ;
/ / A:>;L:> A25G59 A;520 >B 10@0 8<5NB <5=LH55 B5;>, G5< =0 10@5
f o r ( i = s t ; i < B a r s ; i + + )
{
/ / B5;> A25G8 =0 10@5 i 2 F5;KE ?C=:B0E
t e l o i = O p e n [ i ] - C l o s e [ i ] ;
t e l o i = M a t h A b s ( t e l o i ) ;
t e l o i = t e l o i / P o i n t ;
t e l o i = M a t h R o u n d ( t e l o i ) ;
i f ( t e l o i < t e l o b )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / / & ( + &
/ / ?>8A: ;52>3> :@0O ( + F5= - A;>6=K9 20@80=B, GB>1K @072>@>B 1K;
/ / 845< 2;52>, ?>:0 + !' =0E>4OBAO +( 70:@KB8O , A25G8 =0 10@5
/ / 2 A;CG05 CA?5E0 2>72@0I05B &+ ( +, ;81> 0 5A;8 =5B
i n t R a s c h e t L e v g r V e r s h i n G O O D ( d o u b l e s r e d t e l o , i n t b )
{
d o u b l e x o d p u n k t , v e r x l e v e l ;
i n t l e v g r a n , p r e d v g r n , l e v p o i s k , t o t a l b a r , k o l p r o b n i z , s t , i ;
i n t k o l v n y t b a r s , P i k V e r s h B a r ;
b o o l S v e c h a 2 X B E A R ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
l e v g r a n = 0 ;
/ / ?@5420@8B5;L=0O ;520O 3@0=8F0 25@H8=K
p r e d v g r n = 0 ;
/ / :>;8G5AB2> ?@>18BKE =878= <54256L59 A25G59 =0 10@5
k o l p r o b n i z = 0 ;
/ / :>;8G5AB2> 2=CB@5==8E 10@>2 25@H8=K
k o l v n y t b a r s = 0 ;
/ / =><5@ 10@0 - ?8:0 25@H8=K
P i k V e r s h B a r = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
t o t a l b a r = B a r s - 5 0 ;
l e v p o i s k = b + D a l n P o i s k a L e v g r M A X ;
l e v p o i s k = M a t h M i n ( t o t a l b a r , l e v p o i s k ) ;
/ / AB0@B>2K9 10@ F8:;0
s t = b + 1 ;
/ / A25G0 =0 10@5 4>;60 1KBL ,/
i f ( O p e n [ b ] > C l o s e [ b ] )
{
/ / ?>8A: ?@5420@8B5;L=>9 ;52>9 3@0=8FK ( + F5=
f o r ( i = s t ; i < l e v p o i s k ; i + + )
{
/ / 845< 2;52> 4> B5E ?>@, ?>:0 & +"/ !'
i f ( C l o s e [ b ] < L o w [ i ] )
{
c o n t i n u e ;
}
e l s e
{
/ / ?@5420@8B5;L=0O ;520O 3@0=8F0 ( +
p r e d v g r n = i ;
b r e a k ;
}
}
}
/ / 5A;8 ?@5420@8B5;L=0O 3@0=8F0 =0945=0 + " ( +
i f ( p r e d v g r n > b )
{
/ / :>;8G5AB2> ?@>18BKE =878= >4=>9 <54256L59 A25G59 =0 10@5
k o l p r o b n i z = R a s c h e t P r o b i t N i z i n O n e ( b ) ;
/ / :>;8G5AB2> 2=CB@5==8E 10@>2 25@H8=K
k o l v n y t b a r s = p r e d v g r n - b ;
k o l v n y t b a r s = k o l v n y t b a r s - 1 ;
/ / <54256LO A25G0 =0 10@5 ?@>18205B 2A5 2=CB@5==85 10@K 25@H8=K
i f ( ( k o l p r o b n i z = = k o l v n y t b a r s ) & & ( k o l v n y t b a r s > 1 ) )
{
l e v g r a n = p r e d v g r n ;
}
}
/ / " " ( + &
i f ( p r e d v g r n > b )
{
/ / ?>8A: 10@0 - ?8:0 25@H8=K
P i k V e r s h B a r = 0 ;
P i k V e r s h B a r = P o i s k B a r a P i k a V e r s h i n ( p r e d v g r n , b ) ;
/ / =86=OO B>G:0 10@0 ?8:0 25@H8=K ?@>18205BAO 2=87 =0 10@5
i f ( ( O p e n [ b ] > L o w [ P i k V e r s h B a r ] ) & & ( C l o s e [ b ] < L o w [ P i k V e r s h B a r ] ) )
{
l e v g r a n = p r e d v g r n ;
}
}
/ / " " " ( + &
/ / / ,/ !'
S v e c h a 2 X B E A R = f a l s e ;
S v e c h a 2 X B E A R = D v o i n a y a S v e c h a B E A R ( s r e d t e l o , b ) ;
i f ( ( p r e d v g r n > b ) & & ( S v e c h a 2 X B E A R = = t r u e ) )
{
/ / E>4 F5=K 2 ?C=:B0E A25@EC 2=87 =0 42>9=>9 A25G5
x o d p u n k t = ( O p e n [ s t ] - C l o s e [ b ] ) / P o i n t ;
x o d p u n k t = M a t h R o u n d ( x o d p u n k t ) ;
/ / 25@E=89 C@>25=L 5A;8 : >B:@KB8N A25G8 ?@81028BL E>4 2 ?C=:B0E
v e r x l e v e l = O p e n [ s t ] + x o d p u n k t * P o i n t ;
v e r x l e v e l = N o r m a l i z e D o u b l e ( v e r x l e v e l , D i g i t s ) ;
/ / 5A;8 ?>;CG5==K9 C@>25=L >:070;AO 2KH5 ?8:0 25@H8=K
i f ( ( v e r x l e v e l > O p e n [ P i k V e r s h B a r ] ) & & ( v e r x l e v e l > C l o s e [ P i k V e r s h B a r ] ) )
{
l e v g r a n = p r e d v g r n ;
}
}
/ / '" "+ " ( + &
i f ( p r e d v g r n > b )
{
/ / E>4 F5=K 2 ?C=:B0E A25@EC 2=87 =0 ' A25G5
x o d p u n k t = ( O p e n [ b ] - C l o s e [ b ] ) / P o i n t ;
x o d p u n k t = M a t h R o u n d ( x o d p u n k t ) ;
/ / 25@E=89 C@>25=L 5A;8 : >B:@KB8N A25G8 ?@81028BL E>4 2 ?C=:B0E
v e r x l e v e l = O p e n [ b ] + x o d p u n k t * P o i n t ;
v e r x l e v e l = N o r m a l i z e D o u b l e ( v e r x l e v e l , D i g i t s ) ;
/ / 5A;8 ?>;CG5==K9 C@>25=L >:070;AO 2KH5 ?8:0 25@H8=K
i f ( v e r x l e v e l > L o w [ P i k V e r s h B a r ] )
{
l e v g r a n = p r e d v g r n ;
}
}
r e t u r n ( l e v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: 10@0 - ?8:0 25@H8=K, 2E>4OI85 ?0@0<5B@K - ;520O 3@0=8F0 25@H8=K 8 10@
i n t P o i s k B a r a P i k a V e r s h i n ( i n t l e v g r n , i n t b )
{
i n t k o l b a r o v , p i k v e r x b a r ;
/ / >1I55 :>;8G5AB2> 10@>2 2 A>AB025 25@H8=K
k o l b a r o v = 0 ;
/ / >B25B, 2>72@0I05<K9 DC=:F859 - =><5@ 10@0 ?8:0 25@H8=K
p i k v e r x b a r = 0 ;
i f ( ( l e v g r n > b ) & & ( b > 0 ) )
{
k o l b a r o v = l e v g r n - b ;
k o l b a r o v = k o l b a r o v + 1 ;
p i k v e r x b a r = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , k o l b a r o v , b ) ;
}
r e t u r n ( p i k v e r x b a r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: ;52>3> :@0O + F5= - A;>6=K9 20@80=B, GB>1K @072>@>B 1K;
/ / 845< 2;52>, ?>:0 ( + !' =0E>4OBAO 70:@KB8O +', A25G8 =0 10@5
/ / 2 A;CG05 CA?5E0 2>72@0I05B &+ +, ;81> 0 5A;8 =5B
i n t R a s c h e t L e v g r N i z i n y G O O D ( d o u b l e s r e d t e l o , i n t b )
{
d o u b l e x o d p u n k t , n i z n l e v e l ;
i n t l e v g r a n , p r e d v g r n , l e v p o i s k , t o t a l b a r , k o l p r o b p i k , s t , i ;
i n t k o l v n y t b a r s , D n o N i z i n B a r ;
b o o l S v e c h a 2 X B U L L ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
l e v g r a n = 0 ;
/ / ?@5420@8B5;L=0O ;520O 3@0=8F0 =878=K
p r e d v g r n = 0 ;
/ / :>;8G5AB2> ?@>18BKE 25@H8= 1KGL59 A25G59 =0 10@5
k o l p r o b p i k = 0 ;
/ / :>;8G5AB2> 2=CB@5==8E 10@>2 =878=K
k o l v n y t b a r s = 0 ;
/ / =><5@ 10@0 4=0 =878=K
D n o N i z i n B a r = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
t o t a l b a r = B a r s - 5 0 ;
l e v p o i s k = b + D a l n P o i s k a L e v g r M A X ;
l e v p o i s k = M a t h M i n ( t o t a l b a r , l e v p o i s k ) ;
/ / AB0@B>2K9 10@ F8:;0
s t = b + 1 ;
/ / A25G0 =0 10@5 4>;60 1KBL +',/
i f ( O p e n [ b ] < C l o s e [ b ] )
{
/ / ?>8A: ?@5420@8B5;L=>9 ;52>9 3@0=8FK + F5=
f o r ( i = s t ; i < l e v p o i s k ; i + + )
{
/ / 845< 2;52> 4> B5E ?>@, ?>:0 & +"/ +( !'
i f ( C l o s e [ b ] > H i g h [ i ] )
{
c o n t i n u e ;
}
e l s e
{
/ / ?@5420@8B5;L=0O ;520O 3@0=8F0 +
p r e d v g r n = i ;
b r e a k ;
}
}
}
/ / 5A;8 ?@5420@8B5;L=0O 3@0=8F0 =0945=0 + " +
i f ( p r e d v g r n > b )
{
/ / :>;8G5AB2> ?@>18BKE 25@H8= >4=>9 1KGL59 A25G59 =0 10@5
k o l p r o b p i k = R a s c h e t P r o b i t V e r s h i n O n e ( b ) ;
/ / :>;8G5AB2> 2=CB@5==8E 10@>2 =878=K
k o l v n y t b a r s = p r e d v g r n - b ;
k o l v n y t b a r s = k o l v n y t b a r s - 1 ;
/ / 1KGLO A25G0 =0 10@5 ?@>18205B 2A5 2=CB@5==85 10@K =878=K
i f ( ( k o l p r o b p i k = = k o l v n y t b a r s ) & & ( k o l v n y t b a r s > 1 ) )
{
l e v g r a n = p r e d v g r n ;
}
}
/ / " " + &
i f ( p r e d v g r n > b )
{
/ / ?>8A: 10@0 - 4=0 =878=K
D n o N i z i n B a r = 0 ;
D n o N i z i n B a r = P o i s k B a r a D n a N i z i n y ( p r e d v g r n , b ) ;
/ / 25@E=OO B>G:0 10@0 4=0 =878=K ?@>18205BAO 225@E =0 10@5
i f ( ( O p e n [ b ] < H i g h [ D n o N i z i n B a r ] ) & & ( C l o s e [ b ] > H i g h [ D n o N i z i n B a r ] ) )
{
l e v g r a n = p r e d v g r n ;
}
}
/ / " " " + &
/ / / +',/ !'
S v e c h a 2 X B U L L = f a l s e ;
S v e c h a 2 X B U L L = D v o i n a y a S v e c h a B U L L ( s r e d t e l o , b ) ;
i f ( ( p r e d v g r n > b ) & & ( S v e c h a 2 X B U L L = = t r u e ) )
{
/ / E>4 F5=K 2 ?C=:B0E A=87C 225@E =0 42>9=>9 A25G5
x o d p u n k t = ( C l o s e [ b ] - O p e n [ s t ] ) / P o i n t ;
x o d p u n k t = M a t h R o u n d ( x o d p u n k t ) ;
/ / =86=89 C@>25=L 5A;8 >B >B:@KB8O 42>9=>9 A25G8 >B=OBL 55 E>4 2 ?C=:B0E
n i z n l e v e l = O p e n [ s t ] - x o d p u n k t * P o i n t ;
n i z n l e v e l = N o r m a l i z e D o u b l e ( n i z n l e v e l , D i g i t s ) ;
/ / 5A;8 ?>;CG5==K9 C@>25=L >:070;AO =865 4=0 =878=K
i f ( ( n i z n l e v e l < O p e n [ D n o N i z i n B a r ] ) & & ( n i z n l e v e l < C l o s e [ D n o N i z i n B a r ] ) )
{
l e v g r a n = p r e d v g r n ;
}
}
/ / '" "+ " + &
i f ( p r e d v g r n > b )
{
/ / E>4 F5=K 2 ?C=:B0E A=87C 225@E =0 ' +', A25G5
x o d p u n k t = ( C l o s e [ b ] - O p e n [ b ] ) / P o i n t ;
x o d p u n k t = M a t h R o u n d ( x o d p u n k t ) ;
/ / =86=89 C@>25=L 5A;8 >B >B:@KB8O A25G8 >B=OBL 55 E>4 2 ?C=:B0E
n i z n l e v e l = O p e n [ b ] - x o d p u n k t * P o i n t ;
n i z n l e v e l = N o r m a l i z e D o u b l e ( n i z n l e v e l , D i g i t s ) ;
/ / 5A;8 ?>;CG5==K9 C@>25=L >:070;AO =865 4=0 =878=K
i f ( n i z n l e v e l < H i g h [ D n o N i z i n B a r ] )
{
l e v g r a n = p r e d v g r n ;
}
}
r e t u r n ( l e v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: 10@0 - 4=0 =878=K, 2E>4OI85 ?0@0<5B@K - ;520O 3@0=8F0 =878=K 8 10@
i n t P o i s k B a r a D n a N i z i n y ( i n t l e v g r n , i n t b )
{
i n t k o l b a r o v , d n o n i z b a r ;
/ / >1I55 :>;8G5AB2> 10@>2 2 A>AB025 =878=K
k o l b a r o v = 0 ;
/ / >B25B, 2>72@0I05<K9 DC=:F859 - =><5@ 10@0 4=0 =878=K
d n o n i z b a r = 0 ;
i f ( ( l e v g r n > b ) & & ( b > 0 ) )
{
k o l b a r o v = l e v g r n - b ;
k o l b a r o v = k o l b a r o v + 1 ;
d n o n i z b a r = i L o w e s t ( N U L L , 0 , M O D E _ L O W , k o l b a r o v , b ) ;
}
r e t u r n ( d n o n i z b a r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / @0AG5B H8@8=K :@K;0 4;O + 2=CB@8 ( +, 745AL c h k b a r - ?@>25@O5<K9 10@ :>B>@K9 4>;65= ?@>1820BL #
i n t S h i r i n a K r i l a N i z i n y ( i n t l e v g r n , i n t n i z b a r , i n t c h k b a r )
{
i n t i , k r i l s l e v , k r i l p r a v , k r i l o t v e t ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
k r i l o t v e t = 0 ;
/ / @0AG5B 4;8=K :@K;0 k r i l p r a v A?@020 >B +
k r i l p r a v = 0 ;
f o r ( i = n i z b a r - 1 ; i > = c h k b a r ; i - - )
{
i f ( L o w [ n i z b a r ] < = L o w [ i ] )
{
k r i l p r a v = k r i l p r a v + 1 ;
}
e l s e
{
b r e a k ;
}
}
/ / @0AG5B 4;8=K :@K;0 k r i l s l e v A;520 >B +
k r i l s l e v = 0 ;
f o r ( i = n i z b a r + 1 ; i < = l e v g r n ; i + + )
{
i f ( L o w [ n i z b a r ] < = L o w [ i ] )
{
k r i l s l e v = k r i l s l e v + 1 ;
}
e l s e
{
b r e a k ;
}
}
/ / @0AG5B 4;8=K :@K;0 2 >15 AB>@>=K >B 10@0 n i z b a r
k r i l o t v e t = M a t h M i n ( k r i l s l e v , k r i l p r a v ) ;
r e t u r n ( k r i l o t v e t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: 3;02=>9 =878=:8 A@548 2=CB@5==8E 10@>2 ( +, 3@0=8FK ( + - l e v g r 8 p r a v b
/ / ?@54?>;0305BAO, GB> :>;8G5AB2> 2=CB@5==8E 10@>2 4>;6=> 1KBL =5 <5=55 3 E
i n t P o i s k G l a v n o g o N i z a ( i n t l e v g r n , i n t p r a v b )
{
i n t g l a v n i z , k o l v n y t , k r i l t e k , k r i l m a x , i ;
g l a v n i z = 0 ; k o l v n y t = 0 ; k r i l m a x = 0 ;
/ / :>;8G5AB2> 2=CB@5==8E 10@>2 ( +
k o l v n y t = l e v g r n - p r a v b - 1 ;
i f ( k o l v n y t < 3 )
{
r e t u r n ( 0 ) ;
}
f o r ( i = p r a v b + 1 ; i < l e v g r n ; i + + )
{
k r i l t e k = S h i r i n a K r i l a N i z i n y ( l e v g r n , i , p r a v b ) ;
i f ( k r i l t e k > k r i l m a x )
{
k r i l m a x = k r i l t e k ;
g l a v n i z = i ;
}
}
r e t u r n ( g l a v n i z ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / @0AG5B H8@8=K :@K;0 4;O 2=CB@8 +, 745AL c h k b a r - ?@>25@O5<K9 10@ :>B>@K9 4>;65= ?@>1820BL ?8: %
i n t S h i r i n a K r i l a P i k a ( i n t l e v g r n , i n t p i k b a r , i n t c h k b a r )
{
i n t i , k r i l s l e v , k r i l p r a v , k r i l o t v e t ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
k r i l o t v e t = 0 ;
/ / @0AG5B 4;8=K :@K;0 k r i l p r a v A?@020 >B
k r i l p r a v = 0 ;
f o r ( i = p i k b a r - 1 ; i > = c h k b a r ; i - - )
{
i f ( H i g h [ p i k b a r ] > = H i g h [ i ] )
{
k r i l p r a v = k r i l p r a v + 1 ;
}
e l s e
{
b r e a k ;
}
}
/ / @0AG5B 4;8=K :@K;0 k r i l s l e v A;520 >B
k r i l s l e v = 0 ;
f o r ( i = p i k b a r + 1 ; i < = l e v g r n ; i + + )
{
i f ( H i g h [ p i k b a r ] > = H i g h [ i ] )
{
k r i l s l e v = k r i l s l e v + 1 ;
}
e l s e
{
b r e a k ;
}
}
/ / @0AG5B 4;8=K :@K;0 2 >15 AB>@>=K >B 10@0 p i k b a r
k r i l o t v e t = M a t h M i n ( k r i l s l e v , k r i l p r a v ) ;
r e t u r n ( k r i l o t v e t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: 3;02=>9 25@H8=:8 A@548 2=CB@5==8E 10@>2 +, 3@0=8FK + - l e v g r 8 p r a v b
/ / ?@54?>;0305BAO, GB> :>;8G5AB2> 2=CB@5==8E 10@>2 4>;6=> 1KBL =5 <5=55 3 E
i n t P o i s k G l a v n o g o P i k a ( i n t l e v g r n , i n t p r a v b )
{
i n t g l a v p i k , k o l v n y t , k r i l t e k , k r i l m a x , i ;
g l a v p i k = 0 ; k o l v n y t = 0 ; k r i l m a x = 0 ;
/ / :>;8G5AB2> 2=CB@5==8E 10@>2 =878=K
k o l v n y t = l e v g r n - p r a v b - 1 ;
i f ( k o l v n y t < 3 )
{
r e t u r n ( 0 ) ;
}
f o r ( i = p r a v b + 1 ; i < l e v g r n ; i + + )
{
k r i l t e k = S h i r i n a K r i l a P i k a ( l e v g r n , i , p r a v b ) ;
i f ( k r i l t e k > k r i l m a x )
{
k r i l m a x = k r i l t e k ;
g l a v p i k = i ;
}
}
r e t u r n ( g l a v p i k ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>4AG5B 10@>2 A?@020 >B =878=K d n o , =878=K :>B>@KE 2KH5 8;8 @02=K =878=5
/ / ?>4AG5B 2545BAO 4> ?@02>3> 10@0 p r a v b r , MB> <>65B 1KBL 10@ ?@>1>O =878=K
i n t K r i l S p r a v a O t N i z a ( i n t d n o , i n t p r a v b r )
{
i n t i , s t , c o u n t ;
c o u n t = 0 ;
i f ( ( d n o > p r a v b r ) & & ( p r a v b r > 0 ) )
{
/ / AB0@B>2>5 7=0G5=85 F8:;0
s t = d n o - 1 ;
f o r ( i = s t ; i > = p r a v b r ; i - - )
{
i f ( L o w [ d n o ] < = L o w [ i ] )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>4AG5B 10@>2 A;520 >B =878=K d n o , =878=K :>B>@KE 2KH5 8;8 @02=K =878=5
/ / ?>4AG5B 2;52> 2545< =0 7040==CN 40;L=>ABL, =5 1>;55 G5< =0945==>5 ?@02>5 :@K;>
i n t K r i l S l e v a O t N i z a ( i n t d n o , i n t p r a v k r i l )
{
i n t i , s t , t o t a l , t t m a x , c o u n t ;
c o u n t = 0 ;
s t = d n o + 1 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
t t m a x = B a r s - 5 0 ;
t o t a l = d n o + p r a v k r i l + 1 ;
t o t a l = M a t h M i n ( t o t a l , t t m a x ) ;
i f ( p r a v k r i l > 0 )
{
f o r ( i = s t ; i < t o t a l ; i + + )
{
i f ( L o w [ d n o ] < = L o w [ i ] )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ! " + ! " ! ,( ( +
/ / 2>72@0I05B =><5@ 10@0 - 4=> ?@>18B>9 =878=K
i n t P o i s k P r o b i t N i z i n y ( i n t b )
{
d o u b l e L e v e l P r o b N i z a ;
i n t i , s t , b r m a x , t o t a l , l e f t k r i l , p r a v k r i l , r e z u l t k r i l , k r i l m a x ;
i n t D n o N i z B a r ;
l e f t k r i l = 0 ; p r a v k r i l = 0 ; r e z u l t k r i l = 0 ;
/ / <0:A8<0;L=0O =0945==0O H8@8=0 :@K;0 4;O =878=K A;520 >B
k r i l m a x = 0 ;
/ / 10@, 345 1K;0 =0945=0 <0:A8<0;L=0O H8@8=0 :@K;0 ?@>18B>9 =878=K
D n o N i z B a r = 0 ;
/ / AB0@B>2K9 10@ 4;O F8:;0 ?>8A:0
s t = b + 1 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
b r m a x = B a r s - 5 0 ;
t o t a l = b + D a l n P o i s k a P r o b o y a M A X ;
t o t a l = M a t h M i n ( t o t a l , b r m a x ) ;
/ / C@>25=L 4=0 ?@>18B>9 =878=K
L e v e l P r o b N i z a = H i g h [ b ] ;
f o r ( i = s t ; i < t o t a l ; i + + )
{
i f ( C l o s e [ b ] < L o w [ i ] )
{
/ / 4;8=0 :@K;0 A?@020 >B ?@>25@O5<>3> 10@0 i
p r a v k r i l = K r i l S p r a v a O t N i z a ( i , b ) ;
/ / 5A;8 4;8=0 :@K;0 A?@020 1>;LH5 <0:A8<0;L=>9 H8@8=K :@K;0
i f ( p r a v k r i l > k r i l m a x )
{
/ / 4;8=0 :@K;0 A;520 >B ?@>25@O5<>3> 10@0 i
l e f t k r i l = K r i l S l e v a O t N i z a ( i , p r a v k r i l ) ;
/ / @57C;LB0B8@CNI0O H8@8=0 :@K;0 2;52> 8 2?@02> >B =0945==>3>
r e z u l t k r i l = M a t h M i n ( l e f t k r i l , p r a v k r i l ) ;
/ / >1=>2;5=85 <0:A8<0;L=>9 H8@8=K :@K;0 8 A0<>3> 10@0
i f ( ( r e z u l t k r i l > k r i l m a x ) & & ( L o w [ i ] < = L e v e l P r o b N i z a ) )
{
/ / =878=0 4>;6=0 ?@>1820BLAO A25@EC 2=87 10@><
i f ( ( O p e n [ b ] > L o w [ i ] ) & & ( C l o s e [ b ] < L o w [ i ] ) & & ( r e z u l t k r i l > 2 ) )
{
D n o N i z B a r = i ;
k r i l m a x = r e z u l t k r i l ;
L e v e l P r o b N i z a = L o w [ i ] ;
}
}
}
}
e l s e
{
b r e a k ;
}
}
r e t u r n ( D n o N i z B a r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" + +
/ / @07<5@ :@K;0 4;O =878=K, :>B>@0O =0E>48BAO A;520 >B ?@>25@O5<>3> 10@0
i n t R a z m e r K r i l a N i z a K n i g h t ( i n t n i z , i n t b )
{
i n t k r i l o , s l e v a , s p r a v a , l e v g r n ;
k r i l o = 0 ; s l e v a = 0 ; s p r a v a = 0 ; l e v g r n = 0 ;
/ / :>;8G5AB2> 10@>2 A?@020 >B =878=K, :>B>@K5 2KH5 55 <8=8<C<0
s p r a v a = B a r o v S p r a v a O t N i z a K n i g h t ( n i z , b ) ;
/ / @0AG5B ;52>9 3@0=8FK 4;O ?>4AG5B0 10@>2 A;520
l e v g r n = n i z + s p r a v a + 1 ;
/ / :>;8G5AB2> 10@>2 A;520 >B =878=K, :>B>@K5 2KH5 55 <8=8<C<0
s l e v a = B a r o v S l e v a O t N i z a K n i g h t ( l e v g r n , n i z ) ;
/ / @07<5@ :@K;0 2 >15 AB>@>=K >B =878=K
k r i l o = M a t h M i n ( s l e v a , s p r a v a ) ;
r e t u r n ( k r i l o ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" + +
/ / ?>4AG5B 10@>2 A?@020 >B =878=K n i z , =878=K :>B>@KE 2KH5 8;8 @02=K =878=5
/ / ?>4AG5B 2545BAO 4> ?@02>3> 10@0 =0 :>B>@>< 2>7<>65= ?@>1>9 =878=K
i n t B a r o v S p r a v a O t N i z a K n i g h t ( i n t n i z , i n t b )
{
i n t i , s t , c o u n t ;
c o u n t = 0 ;
i f ( ( n i z > b ) & & ( b > 0 ) )
{
/ / AB0@B>2>5 7=0G5=85 F8:;0
s t = n i z - 1 ;
f o r ( i = s t ; i > b ; i - - )
{
i f ( L o w [ n i z ] < = L o w [ i ] )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" + +
/ / ?>4AG5B 10@>2 A;520 >B =878=K n i z , 25@H8=K :>B>@KE 2KH5 8;8 @02=K =878=5
/ / ?>4AG5B 2545BAO 4> ;52>9 3@0=8FK, @0AAG8B0==>9 ?> :>;- 2C 10@>2 A?@020 >B
i n t B a r o v S l e v a O t N i z a K n i g h t ( i n t l e v g r n , i n t n i z )
{
i n t i , s t , c o u n t , t o t a l , b a r m a x ;
/ / <0:A8<0;L=K9 =><5@ 10@0 - ;520O 3@0=8F0 ?>8A:>2
b a r m a x = B a r s - 5 0 ;
t o t a l = M a t h M i n ( l e v g r n , b a r m a x ) ;
c o u n t = 0 ;
i f ( l e v g r n > n i z )
{
/ / AB0@B>2>5 7=0G5=85 F8:;0
s t = n i z + 1 ;
f o r ( i = s t ; i < t o t a l ; i + + )
{
i f ( L o w [ i ] > = L o w [ n i z ] )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>4AG5B 10@>2 A;520 >B ?8:0, 25@H8=K :>B>@KE =865 8;8 @02=K, G5< 25@H8=0 ?8:0 p i k
/ / ?>4AG5B 2;52> 2545< =0 7040==CN 40;L=>ABL, =5 1>;55 G5< =0945==>5 ?@02>5 :@K;>
i n t K r i l S l e v a O t P i k a ( i n t p i k , i n t p r a v k r i l )
{
i n t i , s t , t o t a l , t t m a x , c o u n t ;
c o u n t = 0 ;
s t = p i k + 1 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
t t m a x = B a r s - 5 0 ;
t o t a l = p i k + p r a v k r i l + 1 ;
t o t a l = M a t h M i n ( t o t a l , t t m a x ) ;
i f ( p r a v k r i l > 0 )
{
f o r ( i = s t ; i < t o t a l ; i + + )
{
i f ( H i g h [ i ] < = H i g h [ p i k ] )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>4AG5B 10@>2 A?@020 >B ?8:0 p i k , 25@H8=K :>B>@KE =865 8;8 @02=K 25@H8=5
/ / ?>4AG5B 2545BAO 4> ?@02>3> 10@0 p r a v b r , MB> <>65B 1KBL 10@ ?@>1>O 25@H8=K
i n t K r i l S p r a v a O t P i k a ( i n t p i k , i n t p r a v b r )
{
i n t i , s t , c o u n t ;
c o u n t = 0 ;
i f ( ( p i k > p r a v b r ) & & ( p r a v b r > 0 ) )
{
/ / AB0@B>2>5 7=0G5=85 F8:;0
s t = p i k - 1 ;
f o r ( i = s t ; i > = p r a v b r ; i - - )
{
i f ( H i g h [ p i k ] > = H i g h [ i ] )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ! " ( + ! " ! ,( ( +
/ / 2>72@0I05B =><5@ 10@0 ?8:0 25@H8=K
i n t P o i s k P r o b i t V e r s h i n ( i n t b )
{
d o u b l e L e v e l P r o b P i k a ;
i n t i , s t , b r m a x , t o t a l , l e f t k r i l , p r a v k r i l , r e z u l t k r i l , k r i l m a x ;
i n t P i k V e r x B a r ;
l e f t k r i l = 0 ; p r a v k r i l = 0 ; r e z u l t k r i l = 0 ;
/ / <0:A8<0;L=0O =0945==0O H8@8=0 :@K;0 4;O 25@H8=K A;520 >B
k r i l m a x = 0 ;
/ / AB0@B>2K9 10@ 4;O F8:;0 ?>8A:0
s t = b + 1 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
b r m a x = B a r s - 5 0 ;
t o t a l = b + D a l n P o i s k a P r o b o y a M A X ;
t o t a l = M a t h M i n ( t o t a l , b r m a x ) ;
/ / C@>25=L ?8:0 ?@>18B>9 25@H8=K
L e v e l P r o b P i k a = L o w [ b ] ;
/ / >B25B, 2>72@0I05<K9 DC=:F859 - =><5@ 10@0 ?8:0 25@H8=K
P i k V e r x B a r = 0 ;
f o r ( i = s t ; i < t o t a l ; i + + )
{
i f ( C l o s e [ b ] > H i g h [ i ] )
{
/ / 4;8=0 :@K;0 A?@020 >B ?@>25@O5<>3> 10@0 i
p r a v k r i l = K r i l S p r a v a O t P i k a ( i , b ) ;
/ / 5A;8 4;8=0 :@K;0 A?@020 1>;LH5 <0:A8<0;L=>9 H8@8=K :@K;0
i f ( p r a v k r i l > k r i l m a x )
{
/ / 4;8=0 :@K;0 A;520 >B ?@>25@O5<>3> 10@0 i
l e f t k r i l = K r i l S l e v a O t P i k a ( i , p r a v k r i l ) ;
/ / @57C;LB0B8@CNI0O H8@8=0 :@K;0 2;52> 8 2?@02> >B =0945==>3> ?8:0
r e z u l t k r i l = M a t h M i n ( l e f t k r i l , p r a v k r i l ) ;
/ / >1=>2;5=85 <0:A8<0;L=>9 H8@8=K :@K;0 8 A0<>3> 10@0
i f ( ( r e z u l t k r i l > k r i l m a x ) & & ( H i g h [ i ] > = L e v e l P r o b P i k a ) )
{
/ / 25@H8=0 4>;6=0 ?@>1820BLAO A=87C 225@E 10@><
i f ( ( O p e n [ b ] < H i g h [ i ] ) & & ( C l o s e [ b ] > H i g h [ i ] ) & & ( r e z u l t k r i l > 2 ) )
{
P i k V e r x B a r = i ;
k r i l m a x = r e z u l t k r i l ;
L e v e l P r o b P i k a = H i g h [ i ] ;
}
}
}
}
e l s e
{
b r e a k ;
}
}
r e t u r n ( P i k V e r x B a r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" +
/ / @07<5@ :@K;0 4;O ?8:0, :>B>@K9 =0E>48BAO A;520 >B ?@>25@O5<>3> 10@0
i n t R a z m e r K r i l a P i k a K n i g h t ( i n t p i k , i n t b )
{
i n t k r i l o , s l e v a , s p r a v a , l e v g r n ;
k r i l o = 0 ; s l e v a = 0 ; s p r a v a = 0 ; l e v g r n = 0 ;
/ / :>;8G5AB2> 10@>2 A?@020 >B ?8:0, :>B>@K5 =865 53>
s p r a v a = B a r o v S p r a v a O t P i k a K n i g h t ( p i k , b ) ;
/ / @0AG5B ;52>9 3@0=8FK 4;O ?>4AG5B0 10@>2 A;520
l e v g r n = p i k + s p r a v a + 1 ;
/ / :>;8G5AB2> 10@>2 A;520 >B ?8:0, :>B>@K5 =865 53>
s l e v a = B a r o v S l e v a O t P i k a K n i g h t ( l e v g r n , p i k ) ;
/ / @07<5@ :@K;0 2 >15 AB>@>=K >B ?8:0
k r i l o = M a t h M i n ( s l e v a , s p r a v a ) ;
r e t u r n ( k r i l o ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" +
/ / ?>4AG5B 10@>2 A;520 >B ?8:0 p i k , 25@H8=K :>B>@KE =865 8;8 @02=K 25@H8=5
/ / ?>4AG5B 2545BAO 4> ;52>9 3@0=8FK, @0AAG8B0==>9 ?> :>;- 2C 10@>2 A?@020 >B
i n t B a r o v S l e v a O t P i k a K n i g h t ( i n t l e v g r n , i n t p i k )
{
i n t i , s t , c o u n t , t o t a l , b a r m a x ;
/ / <0:A8<0;L=K9 =><5@ 10@0 - ;520O 3@0=8F0 ?>8A:>2
b a r m a x = B a r s - 5 0 ;
t o t a l = M a t h M i n ( l e v g r n , b a r m a x ) ;
c o u n t = 0 ;
i f ( l e v g r n > p i k )
{
/ / AB0@B>2>5 7=0G5=85 F8:;0
s t = p i k + 1 ;
f o r ( i = s t ; i < t o t a l ; i + + )
{
i f ( H i g h [ p i k ] > = H i g h [ i ] )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" +
/ / ?>4AG5B 10@>2 A?@020 >B ?8:0 p i k , 25@H8=K :>B>@KE =865 8;8 @02=K 25@H8=5
/ / ?>4AG5B 2545BAO 4> ?@02>3> 10@0 =0 :>B>@>< 2>7<>65= ?@>1>9 25@H8=K
i n t B a r o v S p r a v a O t P i k a K n i g h t ( i n t p i k , i n t b )
{
i n t i , s t , c o u n t ;
c o u n t = 0 ;
i f ( ( p i k > b ) & & ( b > 0 ) )
{
/ / AB0@B>2>5 7=0G5=85 F8:;0
s t = p i k - 1 ;
f o r ( i = s t ; i > b ; i - - )
{
i f ( H i g h [ p i k ] > = H i g h [ i ] )
{
c o u n t = c o u n t + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
r e t u r n ( c o u n t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / +' % #% ! % !'%
b o o l R a z g o n 2 X C h e c k B U L L ( i n t b 1 )
{
d o u b l e l e v t e l , p r a v t e l ;
i n t b 2 ;
b o o l r a z g v e r x ;
b 2 = b 1 + 1 ;
r a z g v e r x = f a l s e ;
i f ( ( O p e n [ b 2 ] < C l o s e [ b 2 ] ) & & ( O p e n [ b 1 ] < C l o s e [ b 1 ] ) )
{
i f ( ( C l o s e [ b 1 ] > H i g h [ b 2 ] ) & & ( O p e n [ b 2 ] < O p e n [ b 1 ] ) )
{
/ / B5;> ;52>9 A25G8 2 ?C=:B0E
l e v t e l = C l o s e [ b 2 ] - O p e n [ b 2 ] ;
l e v t e l = l e v t e l / P o i n t ;
l e v t e l = M a t h R o u n d ( l e v t e l ) ;
/ / B5;> ?@02>9 A25G8 2 ?C=:B0E
p r a v t e l = C l o s e [ b 1 ] - O p e n [ b 1 ] ;
p r a v t e l = p r a v t e l / P o i n t ;
p r a v t e l = M a t h R o u n d ( p r a v t e l ) ;
/ / !" * + " !' ! % #% %
i f ( ( V o l u m e [ b 2 ] < V o l u m e [ b 1 ] ) & & ( l e v t e l < p r a v t e l ) )
{
r a z g v e r x = t r u e ;
}
}
}
r e t u r n ( r a z g v e r x ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / #% ! % !'%
b o o l R a z g o n 2 X C h e c k B E A R ( i n t b 1 )
{
d o u b l e l e v t e l , p r a v t e l ;
i n t b 2 ;
b o o l r a z g v n i z ;
b 2 = b 1 + 1 ;
r a z g v n i z = f a l s e ;
i f ( ( O p e n [ b 2 ] > C l o s e [ b 2 ] ) & & ( O p e n [ b 1 ] > C l o s e [ b 1 ] ) )
{
i f ( ( O p e n [ b 2 ] > O p e n [ b 1 ] ) & & ( C l o s e [ b 1 ] < L o w [ b 2 ] ) )
{
/ / B5;> ;52>9 A25G8 2 ?C=:B0E
l e v t e l = O p e n [ b 2 ] - C l o s e [ b 2 ] ;
l e v t e l = l e v t e l / P o i n t ;
l e v t e l = M a t h R o u n d ( l e v t e l ) ;
/ / B5;> ?@02>9 A25G8 2 ?C=:B0E
p r a v t e l = O p e n [ b 1 ] - C l o s e [ b 1 ] ;
p r a v t e l = p r a v t e l / P o i n t ;
p r a v t e l = M a t h R o u n d ( p r a v t e l ) ;
/ / !" * + " !' ! % #% %
i f ( ( V o l u m e [ b 2 ] < V o l u m e [ b 1 ] ) & & ( l e v t e l < p r a v t e l ) )
{
r a z g v n i z = t r u e ;
}
}
}
r e t u r n ( r a z g v n i z ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / =86=89 C@>25=L B5; A25G59 =0 C:070==>< CG0AB:5 - , ""
d o u b l e N i z n i y Y r o v e n T e l S v e c h e i ( i n t K o l v o S v e c h e i , i n t P r a v S v e c h a )
{
d o u b l e N i z n L e v e l T e l , N i z n O p e n P r i c e , N i z n C l o s P r i c e ;
i n t L w O p e n B a r , L w C l o s B a r ;
N i z n L e v e l T e l = 0 ;
/ / , 345 =0945= C@>25=L F5= " +"/
L w O p e n B a r = i L o w e s t ( N U L L , 0 , M O D E _ O P E N , K o l v o S v e c h e i , P r a v S v e c h a ) ;
/ / , 345 =0945= C@>25=L F5= +"/
L w C l o s B a r = i L o w e s t ( N U L L , 0 , M O D E _ C L O S E , K o l v o S v e c h e i , P r a v S v e c h a ) ;
/ / // & " +"/ "
N i z n O p e n P r i c e = O p e n [ L w O p e n B a r ] ;
/ / // & +"/ "
N i z n C l o s P r i c e = C l o s e [ L w C l o s B a r ] ;
/ / # , " !' "
N i z n L e v e l T e l = M a t h M i n ( N i z n O p e n P r i c e , N i z n C l o s P r i c e ) ;
N i z n L e v e l T e l = N o r m a l i z e D o u b l e ( N i z n L e v e l T e l , D i g i t s ) ;
r e t u r n ( N i z n L e v e l T e l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / +'! '!" + "+% "
i n t p r b _ n i z _ k o l ( i n t b )
{
i n t i , k o l ;
k o l = 0 ;
i f ( O p e n [ b ] > C l o s e [ b ] )
{
f o r ( i = ( b + 1 ) ; i < B a r s ; i + + )
{
i f ( ( O p e n [ b ] > L o w [ i ] ) & & ( C l o s e [ b ] < L o w [ i ] ) )
{
k o l = k o l + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
r e t u r n ( k o l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / A@54=89 @07<5@ B5;0 A25G8, CA@54=5=85 ?> A v e r a g e B a r s , 2 ?C=:B0E 4> 3 7=0:0
/ / ?@>25@5=0 =0 A:@8?B5 - @01>B05B
d o u b l e a v e r a g e _ b o d y _ l e n g t h ( )
{
d o u b l e l e n g t h , r e s u l t ;
i n t i , c o u n t , t o t a l ;
t o t a l = K o l v o B a r o v R a s c h e t a S r e d n ;
i f ( t o t a l > B a r s )
{
t o t a l = B a r s ;
}
l e n g t h = 0 ;
c o u n t = 0 ;
f o r ( i = 1 ; i < t o t a l ; i + + )
{
l e n g t h = l e n g t h + M a t h A b s ( ( O p e n [ i ] - C l o s e [ i ] ) ) ;
c o u n t = c o u n t + 1 ;
}
/ / >1I0O 4;8=0 2 ?C=:B0E
l e n g t h = l e n g t h / P o i n t ;
/ / A@54=89 @07<5@ 2 ?C=:B0E
r e s u l t = l e n g t h / c o u n t ;
r e s u l t = N o r m a l i z e D o u b l e ( r e s u l t , 3 ) ;
r e t u r n ( r e s u l t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 B>3> GB> =878=0 <0:A8<C<0 10@0 h i 2?5@2K5 ?@>18B0 10@>< b
b o o l c h e c k _ h i g h ( i n t h i , i n t b )
{
i n t i , p r b ;
p r b = 0 ;
i f ( h i > b )
{
f o r ( i = ( h i - 1 ) ; i > = b ; i - - )
{
i f ( C l o s e [ i ] < L o w [ h i ] )
{
p r b = i ;
b r e a k ;
}
}
}
i f ( ( p r b = = b ) & & ( p r b > 0 ) )
{
r e t u r n ( t r u e ) ;
}
r e t u r n ( f a l s e ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / +'! '!" + "+% ( "
i n t p r b _ v e r _ k o l ( i n t b )
{
i n t i , k o l ;
k o l = 0 ;
i f ( O p e n [ b ] < C l o s e [ b ] )
{
f o r ( i = ( b + 1 ) ; i < B a r s ; i + + )
{
i f ( ( O p e n [ b ] < H i g h [ i ] ) & & ( C l o s e [ b ] > H i g h [ i ] ) )
{
k o l = k o l + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
r e t u r n ( k o l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 B>3> GB> 25@H8=0 <8=8<C<0 10@0 l w 2?5@2K5 ?@>18B0 B5;>< 10@0 b
b o o l c h e c k _ l o w ( i n t l w , i n t b )
{
i n t i , p r b ;
p r b = 0 ;
i f ( l w > b )
{
f o r ( i = ( l w - 1 ) ; i > = b ; i - - )
{
i f ( C l o s e [ i ] > H i g h [ l w ] )
{
p r b = i ;
b r e a k ;
}
}
}
i f ( ( p r b = = b ) & & ( p r b > 0 ) )
{
r e t u r n ( t r u e ) ;
}
r e t u r n ( f a l s e ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 25@E=89 C@>25=L B5; A25G59 =0 C:070==>< CG0AB:5 - , ""
d o u b l e V e r x i y Y r o v e n T e l S v e c h e i ( i n t K o l v o S v e c h e i , i n t P r a v S v e c h a )
{
d o u b l e V e r x L e v e l T e l , V e r x O p e n P r i c e , V e r x C l o s P r i c e ;
i n t H i O p e n B a r , H i C l o s B a r ;
V e r x L e v e l T e l = 0 ;
/ / , 345 =0945= % C@>25=L F5= " +"/
H i O p e n B a r = i H i g h e s t ( N U L L , 0 , M O D E _ O P E N , K o l v o S v e c h e i , P r a v S v e c h a ) ;
/ / , 345 =0945= % C@>25=L F5= +"/
H i C l o s B a r = i H i g h e s t ( N U L L , 0 , M O D E _ C L O S E , K o l v o S v e c h e i , P r a v S v e c h a ) ;
/ / % // & " +"/ "
V e r x O p e n P r i c e = O p e n [ H i O p e n B a r ] ;
/ / % // & +"/ "
V e r x C l o s P r i c e = C l o s e [ H i C l o s B a r ] ;
/ / % # , " !' "
V e r x L e v e l T e l = M a t h M a x ( V e r x O p e n P r i c e , V e r x C l o s P r i c e ) ;
V e r x L e v e l T e l = N o r m a l i z e D o u b l e ( V e r x L e v e l T e l , D i g i t s ) ;
r e t u r n ( V e r x L e v e l T e l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / % ! % " % !'% ! " !" / *
b o o l S p y s k V n i z V o l u m e B E A R 3 X ( i n t b 1 )
{
i n t b 3 , b 2 ;
b o o l s p y s k 3 x ;
s p y s k 3 x = f a l s e ;
b 2 = b 1 + 1 ;
b 3 = b 1 + 2 ;
/ / ?5@20O 8 ?>A;54=OO 87 B@5E A25G59 <54256L8
i f ( ( O p e n [ b 3 ] > C l o s e [ b 3 ] ) & & ( O p e n [ b 1 ] > C l o s e [ b 1 ] ) )
{
/ / F5=0 >B:@KB8O ?5@2>9 A25G8 2KH5 42CE ?8:>2 A?@020 >B =55
i f ( ( O p e n [ b 3 ] > H i g h [ b 2 ] ) & & ( O p e n [ b 3 ] > H i g h [ b 1 ] ) )
{
/ / F5=0 70:@KB8O ?>A;54=59 A25G8 =865 42CE =878= A;520 >B =55
i f ( ( C l o s e [ b 1 ] < L o w [ b 2 ] ) & & ( C l o s e [ b 1 ] < L o w [ b 3 ] ) )
{
/ / 845B =0@0AB0=85 >1J5<0
i f ( ( V o l u m e [ b 3 ] < V o l u m e [ b 1 ] ) & & ( V o l u m e [ b 2 ] < V o l u m e [ b 1 ] ) )
{
s p y s k 3 x = t r u e ;
}
}
}
}
r e t u r n ( s p y s k 3 x ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / * % ! % " % !'% ! " !" / *
b o o l P o d y e m V e r x V o l u m e B U L L 3 X ( i n t b 1 )
{
i n t b 3 , b 2 ;
b o o l p o d y e m 3 x ;
p o d y e m 3 x = f a l s e ;
b 2 = b 1 + 1 ;
b 3 = b 1 + 2 ;
/ / ?5@20O 8 ?>A;54=OO 87 B@5E A25G59 1KGL8
i f ( ( O p e n [ b 3 ] < C l o s e [ b 3 ] ) & & ( O p e n [ b 1 ] < C l o s e [ b 1 ] ) )
{
/ / F5=0 >B:@KB8O ?5@2>9 A25G8 =865 42CE =878= A?@020 >B =55
i f ( ( O p e n [ b 3 ] < L o w [ b 2 ] ) & & ( O p e n [ b 3 ] < L o w [ b 1 ] ) )
{
/ / F5=0 70:@KB8O ?>A;54=59 A25G8 2KH5 42CE 25@H8= A;520 >B =55
i f ( ( C l o s e [ b 1 ] > H i g h [ b 2 ] ) & & ( C l o s e [ b 1 ] > H i g h [ b 3 ] ) )
{
/ / 845B =0@0AB0=85 >1J5<0
i f ( ( V o l u m e [ b 3 ] < V o l u m e [ b 2 ] ) & & ( V o l u m e [ b 2 ] < V o l u m e [ b 1 ] ) )
{
p o d y e m 3 x = t r u e ;
}
}
}
}
r e t u r n ( p o d y e m 3 x ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >4=>9 A:>;L7OI59 A@54=59 A # + ?5@8>4>< " , A25G59 =0 10@5
b o o l P r o b o y O n e M A C a n d l e T h r e e B E A R ( i n t P e r M A , i n t b )
{
d o u b l e m a l e f t , m a p r a v ;
i n t l e v b r ;
b o o l p r o b 3 x ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
p r o b 3 x = f a l s e ;
/ / 10@ A;520 >B ?@>25@O5<>3> 10@0
l e v b r = b + 2 ;
/ / C@>25=L =0 ;52>< 10@5
m a l e f t = i M A ( N U L L , 0 , P e r M A , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b r ) ;
m a l e f t = N o r m a l i z e D o u b l e ( m a l e f t , D i g i t s ) ;
/ / C@>25=L =0 ?@>25@O5<>< 10@5
m a p r a v = i M A ( N U L L , 0 , P e r M A , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v = N o r m a l i z e D o u b l e ( m a p r a v , D i g i t s ) ;
/ / ?@>25@:0 ?@>18B8O 42>9=>9 A25G59 =0 10@5 ! %#
i f ( ( O p e n [ l e v b r ] > m a l e f t ) & & ( C l o s e [ b ] < m a p r a v ) )
{
p r o b 3 x = t r u e ;
}
r e t u r n ( p r o b 3 x ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E ! %# " , A25G59
i n t K o l v o P r o b i t M A C a n d l e T h r e e B E A R ( i n t b )
{
i n t K o l v o P r o b M A ;
b o o l p r o b 1 , p r o b 2 , p r o b 3 , p r o b 4 , p r o b 5 , p r o b 6 , p r o b 7 , p r o b 8 , p r o b 9 , p r o b 1 0 , p r o b 1 1 , p r o b 1 2 ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
K o l v o P r o b M A = 0 ;
/ / ?>4AG5B ,% ?@>1>52 A:>;L7OI8E A@54=8E " , A25G59
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 = f a l s e ;
p r o b 1 = P r o b o y O n e M A C a n d l e T h r e e B E A R ( 1 3 , b ) ;
i f ( p r o b 1 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 2 = f a l s e ;
p r o b 2 = P r o b o y O n e M A C a n d l e T h r e e B E A R ( 2 1 , b ) ;
i f ( p r o b 2 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 3 = f a l s e ;
p r o b 3 = P r o b o y O n e M A C a n d l e T h r e e B E A R ( 3 4 , b ) ;
i f ( p r o b 3 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 4 = f a l s e ;
p r o b 4 = P r o b o y O n e M A C a n d l e T h r e e B E A R ( 5 5 , b ) ;
i f ( p r o b 4 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 5 = f a l s e ;
p r o b 5 = P r o b o y O n e M A C a n d l e T h r e e B E A R ( 8 9 , b ) ;
i f ( p r o b 5 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 6 = f a l s e ;
p r o b 6 = P r o b o y O n e M A C a n d l e T h r e e B E A R ( 1 4 4 , b ) ;
i f ( p r o b 6 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 7 = f a l s e ;
p r o b 7 = P r o b o y O n e M A C a n d l e T h r e e B E A R ( 2 3 3 , b ) ;
i f ( p r o b 7 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 8 = f a l s e ;
p r o b 8 = P r o b o y O n e M A C a n d l e T h r e e B E A R ( 3 7 7 , b ) ;
i f ( p r o b 8 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 9 = f a l s e ;
p r o b 9 = P r o b o y O n e M A C a n d l e T h r e e B E A R ( 6 1 0 , b ) ;
i f ( p r o b 9 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 0 = f a l s e ;
p r o b 1 0 = P r o b o y O n e M A C a n d l e T h r e e B E A R ( 9 8 7 , b ) ;
i f ( p r o b 1 0 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 1 = f a l s e ;
p r o b 1 1 = P r o b o y O n e M A C a n d l e T h r e e B E A R ( 1 5 9 7 , b ) ;
i f ( p r o b 1 1 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 2 = f a l s e ;
p r o b 1 2 = P r o b o y O n e M A C a n d l e T h r e e B E A R ( 2 5 8 4 , b ) ;
i f ( p r o b 1 2 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
r e t u r n ( K o l v o P r o b M A ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / =0?@02;5=85 87 A>25B=8:0 B e t t e r , 5A;8 ?>;>68B5;L=>5 B> B U Y , >B@8F0B5;L=>5 S E L L
d o u b l e D i r e c t B E T T E R ( i n t W a r p , d o u b l e D e v i a t i o n , i n t A m p l i t u d e , d o u b l e D i s t o r t i o n , i n t b )
{
d o u b l e N a p r a v l B E T T E R , Y s k o r T e k y s h , Y s k o r S h i f t 7 , Y s k o r S h i f t 1 4 , Y s k o r S h i f t 2 1 ;
/ / 8=48:0B>@ CA:>@5=8O
Y s k o r T e k y s h = 0 ;
Y s k o r S h i f t 7 = 0 ;
Y s k o r S h i f t 1 4 = 0 ;
Y s k o r S h i f t 2 1 = 0 ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
N a p r a v l B E T T E R = 0 ;
Y s k o r T e k y s h = i A C ( N U L L , 0 , b ) ;
Y s k o r S h i f t 7 = i A C ( N U L L , 0 , ( b + 7 ) ) ;
Y s k o r S h i f t 1 4 = i A C ( N U L L , 0 , ( b + 1 4 ) ) ;
Y s k o r S h i f t 2 1 = i A C ( N U L L , 0 , ( b + 2 1 ) ) ;
/ / ?5@2>5 A;0305<>5 - C<=>605< B5:CI55 CA:>@5=85 =0 8A:065=85
/ / 80?07>= 4>?CAB8<KE 7=0G5=89 W a r p >B - 1 0 0 4> + 1 0 0 A H03>< 1
/ / !" # ' . N a s t r B e t t e r W a r p = 6 7
N a p r a v l B E T T E R = W a r p * Y s k o r T e k y s h ;
/ / 2B>@>5 A;0305<>5 - C<=>605< CA:>@5=85 =0 7 < 10@5 =0 ( 5280F8O- 1 )
/ / 80?07>= 4>?CAB8<KE 7=0G5=89 D e v i a t i o n >B 0 4> + 2 A H03>< 0 . 0 1
/ / !" # ' . N a s t r B e t t e r D e v i a t = 1 . 8 5
N a p r a v l B E T T E R = N a p r a v l B E T T E R + ( 1 0 0 . 0 * ( D e v i a t i o n - 1 . 0 ) * Y s k o r S h i f t 7 ) ;
/ / B@5BL5 A;0305<>5 - C<=>605< CA:>@5=85 =0 1 4 < 10@5 =0 ( <?;8BC40- 1 0 0 )
/ / 80?07>= 4>?CAB8<KE 7=0G5=89 A m p l i t u d e >B 0 4> + 2 0 0 A H03>< 1
/ / !" # ' . N a s t r B e t t e r A m p l i t = 1 5 5 ;
N a p r a v l B E T T E R = N a p r a v l B E T T E R + ( ( A m p l i t u d e - 1 0 0 ) * Y s k o r S h i f t 1 4 ) ;
/ / G5B25@B>5 A;0305<>5 - C<=>605< CA:>@5=85 =0 2 1 < 10@5 =0 D i s t o r t i o n
/ / 80?07>= 4>?CAB8<KE 7=0G5=89 D i s t o r t i o n >B - 1 4> + 1 A H03>< 0 . 0 1
/ / !" # ' . N a s t r B e t t e r D i s t o r = 0 . 7 9
N a p r a v l B E T T E R = N a p r a v l B E T T E R + ( 1 0 0 . 0 * D i s t o r t i o n * Y s k o r S h i f t 2 1 ) ;
/ / " / $ # = !0 * 6 7 + !7 * 8 5 + !1 4 * 5 5 + !2 1 * 7 9
r e t u r n ( N a p r a v l B E T T E R ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" +', # / !" !! / ! # #
d o u b l e R a s c h e t S t o p L e v e l B U L L ( d o u b l e R a z m e r S r e d n B a r a , i n t b )
{
d o u b l e L e v e l S t o p R E S U L T , L e v e l S t o p D a l n i y , S p r e a d P U N K T , P r i c e B I D ;
d o u b l e L e v e l S t o p M a r k e t , L e v e l S t o p S r e d B a r , L e v e l S t o p L o w 2 X ;
d o u b l e S t o p S r e d B a r P U N K T , S t o p M a r k e t P U N K T , S t o p D a l n i y P U N K T ;
L e v e l S t o p R E S U L T = 0 ; L e v e l S t o p D a l n i y = 0 ; S p r e a d P U N K T = 0 ; P r i c e B I D = 0 ;
L e v e l S t o p M a r k e t = 0 ; L e v e l S t o p S r e d B a r = 0 ; L e v e l S t o p L o w 2 X = 0 ;
S t o p S r e d B a r P U N K T = 0 ; S t o p M a r k e t P U N K T = 0 ; S t o p D a l n i y P U N K T = 0 ;
/ / >B25B, 2>72@0I05<K9 DC=:F859 - C@>25=L AB>? ;>AA0 4;O A45;:8 # #
L e v e l S t o p R E S U L T = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ' ! # "%
S p r e a d P U N K T = 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 ) ;
S p r e a d P U N K T = M a t h R o u n d ( S p r e a d P U N K T ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / "#)/ & /
i f ( b = = 1 )
{
/ / 4;O >B:@KB8O A45;:8 ?@8 @01>B5 A>25B=8:0
P r i c e B I D = M a r k e t I n f o ( S y m b o l ( ) , M O D E _ B I D ) ;
}
i f ( b > 1 )
{
/ / 4;O B5AB8@>20=8O 10@0 704=8< G8A;><
P r i c e B I D = O p e n [ ( b - 1 ) ] ;
}
P r i c e B I D = N o r m a l i z e D o u b l e ( P r i c e B I D , D i g i t s ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / @0AG5B ?C=:B>2 >1KG=>3> AB>? ;>AA0 G5@57 @07<5@ A@54=53> 10@0
S t o p S r e d B a r P U N K T = R a z m e r S r e d n B a r a * K o e f f S t o p L o s s S r e d B a r ;
S t o p S r e d B a r P U N K T = M a t h R o u n d ( S t o p S r e d B a r P U N K T ) ;
/ / C@>25=L AB>? ;>AA0 G5@57 @07<5@ A@54=53> 10@0
L e v e l S t o p S r e d B a r = P r i c e B I D - S t o p S r e d B a r P U N K T * P o i n t ;
L e v e l S t o p S r e d B a r = L e v e l S t o p S r e d B a r - 5 * P o i n t ;
L e v e l S t o p S r e d B a r = N o r m a l i z e D o u b l e ( L e v e l S t o p S r e d B a r , D i g i t s ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / C@>25=L AB>? ;>AA0 ! % #%
L e v e l S t o p L o w 2 X = M a t h M i n ( L o w [ b ] , L o w [ ( b + 1 ) ] ) ;
L e v e l S t o p L o w 2 X = L e v e l S t o p L o w 2 X - 5 * P o i n t ;
L e v e l S t o p L o w 2 X = N o r m a l i z e D o u b l e ( L e v e l S t o p L o w 2 X , D i g i t s ) ;
/ / AB>? ;>AA 2 ?C=:B0E =5 4>;65= 1KBL A;8H:>< <0;5=L:8<
/ / @57C;LB0B @0AG5B0 C@>2=O AB>? ;>AA0 - 15@5< A0<K9
L e v e l S t o p R E S U L T = M a t h M i n ( L e v e l S t o p S r e d B a r , L e v e l S t o p L o w 2 X ) ;
L e v e l S t o p R E S U L T = N o r m a l i z e D o u b l e ( L e v e l S t o p R E S U L T , D i g i t s ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / AB>? ;>AA 2 ?C=:B0E =5 4>;65= 1KBL A;8H:>< 1>;LH8<
/ / @0AG5B ?C=:B>2 40;L=53> AB>? ;>AA0 G5@57 @07<5@ A@54=53> 10@0
S t o p D a l n i y P U N K T = R a z m e r S r e d n B a r a * K o e f f S t o p L o s s D a l n i y ;
S t o p D a l n i y P U N K T = M a t h R o u n d ( S t o p D a l n i y P U N K T ) ;
/ / C@>25=L 40;L=53> AB>? ;>AA0 G5@57 @07<5@ A@54=53> 10@0
L e v e l S t o p D a l n i y = P r i c e B I D - S t o p D a l n i y P U N K T * P o i n t ;
L e v e l S t o p D a l n i y = L e v e l S t o p D a l n i y - 5 * P o i n t ;
L e v e l S t o p D a l n i y = N o r m a l i z e D o u b l e ( L e v e l S t o p D a l n i y , D i g i t s ) ;
/ / @57C;LB0B @0AG5B0 C@>2=O AB>? ;>AA0 - 15@5< A0<K9 +!
L e v e l S t o p R E S U L T = M a t h M a x ( L e v e l S t o p R E S U L T , L e v e l S t o p D a l n i y ) ;
L e v e l S t o p R E S U L T = N o r m a l i z e D o u b l e ( L e v e l S t o p R E S U L T , D i g i t s ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / C@>25=L AB>? ;>AA0 =5 4>;65= 1KBL 1;865, G5< @07@5H5=>
/ / <8=8<0;L=K9 @07<5@ AB>? ;>AA0 2 ?C=:B0E " $
S t o p M a r k e t P U N K T = M a r k e t I n f o ( S y m b o l ( ) , M O D E _ S T O P L E V E L ) ;
S t o p M a r k e t P U N K T = M a t h R o u n d ( S t o p M a r k e t P U N K T ) ;
/ / C@>25=L <8=8<0;L=>3> AB>? ;>AA0 4;O A45;:8 # # " $
L e v e l S t o p M a r k e t = P r i c e B I D - S t o p M a r k e t P U N K T * P o i n t ;
L e v e l S t o p M a r k e t = L e v e l S t o p M a r k e t - 5 * P o i n t ;
L e v e l S t o p M a r k e t = N o r m a l i z e D o u b l e ( L e v e l S t o p M a r k e t , D i g i t s ) ;
/ / @57C;LB0B @0AG5B0 C@>2=O AB>? ;>AA0 - 15@5< A0<K9
L e v e l S t o p R E S U L T = M a t h M i n ( L e v e l S t o p R E S U L T , L e v e l S t o p M a r k e t ) ;
L e v e l S t o p R E S U L T = N o r m a l i z e D o u b l e ( L e v e l S t o p R E S U L T , D i g i t s ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +' !" !!
r e t u r n ( L e v e l S t o p R E S U L T ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" , # / !" !! / ! #
d o u b l e R a s c h e t S t o p L e v e l B E A R ( d o u b l e R a z m e r S r e d n B a r a , i n t b )
{
d o u b l e L e v e l S t o p R E S U L T , L e v e l S t o p D a l n i y , S p r e a d P U N K T , P r i c e A S K ;
d o u b l e L e v e l S t o p M a r k e t , L e v e l S t o p S r e d B a r , L e v e l S t o p H i g h 2 X ;
d o u b l e S t o p S r e d B a r P U N K T , S t o p M a r k e t P U N K T , S t o p D a l n i y P U N K T ;
L e v e l S t o p R E S U L T = 0 ; L e v e l S t o p D a l n i y = 0 ; S p r e a d P U N K T = 0 ; P r i c e A S K = 0 ;
L e v e l S t o p M a r k e t = 0 ; L e v e l S t o p S r e d B a r = 0 ; L e v e l S t o p H i g h 2 X = 0 ;
S t o p S r e d B a r P U N K T = 0 ; S t o p M a r k e t P U N K T = 0 ; S t o p D a l n i y P U N K T = 0 ;
/ / >B25B, 2>72@0I05<K9 DC=:F859 - C@>25=L AB>? ;>AA0 4;O A45;:8 #
L e v e l S t o p R E S U L T = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ' ! # "%
S p r e a d P U N K T = 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 ) ;
S p r e a d P U N K T = M a t h R o u n d ( S p r e a d P U N K T ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / "#)/ & ! /
i f ( b = = 1 )
{
/ / 4;O >B:@KB8O A45;:8 ?@8 @01>B5 A>25B=8:0
P r i c e A S K = M a r k e t I n f o ( S y m b o l ( ) , M O D E _ A S K ) ;
}
i f ( b > 1 )
{
/ / 4;O B5AB8@>20=8O 10@0 704=8< G8A;><
P r i c e A S K = O p e n [ ( b - 1 ) ] + S p r e a d P U N K T * P o i n t ;
}
P r i c e A S K = N o r m a l i z e D o u b l e ( P r i c e A S K , D i g i t s ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / @0AG5B ?C=:B>2 >1KG=>3> AB>? ;>AA0 G5@57 @07<5@ A@54=53> 10@0
S t o p S r e d B a r P U N K T = R a z m e r S r e d n B a r a * K o e f f S t o p L o s s S r e d B a r ;
S t o p S r e d B a r P U N K T = M a t h R o u n d ( S t o p S r e d B a r P U N K T ) ;
/ / C@>25=L AB>? ;>AA0 G5@57 @07<5@ A@54=53> 10@0
L e v e l S t o p S r e d B a r = P r i c e A S K + S t o p S r e d B a r P U N K T * P o i n t ;
L e v e l S t o p S r e d B a r = L e v e l S t o p S r e d B a r + 5 * P o i n t ;
L e v e l S t o p S r e d B a r = N o r m a l i z e D o u b l e ( L e v e l S t o p S r e d B a r , D i g i t s ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / C@>25=L AB>? ;>AA0 ( ! % #%
L e v e l S t o p H i g h 2 X = M a t h M a x ( H i g h [ b ] , H i g h [ ( b + 1 ) ] ) ;
L e v e l S t o p H i g h 2 X = L e v e l S t o p H i g h 2 X + S p r e a d P U N K T * P o i n t ;
L e v e l S t o p H i g h 2 X = L e v e l S t o p H i g h 2 X + 5 * P o i n t ;
L e v e l S t o p H i g h 2 X = N o r m a l i z e D o u b l e ( L e v e l S t o p H i g h 2 X , D i g i t s ) ;
/ / AB>? ;>AA 2 ?C=:B0E =5 4>;65= 1KBL A;8H:>< <0;5=L:8<
/ / @57C;LB0B @0AG5B0 C@>2=O AB>? ;>AA0 - 15@5< A0<K9 +!
L e v e l S t o p R E S U L T = M a t h M a x ( L e v e l S t o p S r e d B a r , L e v e l S t o p H i g h 2 X ) ;
L e v e l S t o p R E S U L T = N o r m a l i z e D o u b l e ( L e v e l S t o p R E S U L T , D i g i t s ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / AB>? ;>AA 2 ?C=:B0E =5 4>;65= 1KBL A;8H:>< 1>;LH8<
/ / @0AG5B ?C=:B>2 40;L=53> AB>? ;>AA0 G5@57 @07<5@ A@54=53> 10@0
S t o p D a l n i y P U N K T = R a z m e r S r e d n B a r a * K o e f f S t o p L o s s D a l n i y ;
S t o p D a l n i y P U N K T = M a t h R o u n d ( S t o p D a l n i y P U N K T ) ;
/ / C@>25=L 40;L=53> AB>? ;>AA0 G5@57 @07<5@ A@54=53> 10@0
L e v e l S t o p D a l n i y = P r i c e A S K + S t o p D a l n i y P U N K T * P o i n t ;
L e v e l S t o p D a l n i y = L e v e l S t o p D a l n i y + 5 * P o i n t ;
L e v e l S t o p D a l n i y = N o r m a l i z e D o u b l e ( L e v e l S t o p D a l n i y , D i g i t s ) ;
/ / @57C;LB0B @0AG5B0 C@>2=O AB>? ;>AA0 - 15@5< A0<K9
L e v e l S t o p R E S U L T = M a t h M i n ( L e v e l S t o p R E S U L T , L e v e l S t o p D a l n i y ) ;
L e v e l S t o p R E S U L T = N o r m a l i z e D o u b l e ( L e v e l S t o p R E S U L T , D i g i t s ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / C@>25=L AB>? ;>AA0 =5 4>;65= 1KBL 1;865, G5< @07@5H5=>
/ / <8=8<0;L=K9 @07<5@ AB>? ;>AA0 2 ?C=:B0E " $
S t o p M a r k e t P U N K T = M a r k e t I n f o ( S y m b o l ( ) , M O D E _ S T O P L E V E L ) ;
S t o p M a r k e t P U N K T = M a t h R o u n d ( S t o p M a r k e t P U N K T ) ;
/ / C@>25=L <8=8<0;L=>3> AB>? ;>AA0 4;O A45;:8 # " $
L e v e l S t o p M a r k e t = P r i c e A S K + S t o p M a r k e t P U N K T * P o i n t ;
L e v e l S t o p M a r k e t = L e v e l S t o p M a r k e t + 5 * P o i n t ;
L e v e l S t o p M a r k e t = N o r m a l i z e D o u b l e ( L e v e l S t o p M a r k e t , D i g i t s ) ;
/ / @57C;LB0B @0AG5B0 C@>2=O AB>? ;>AA0 - 15@5< A0<K9 +!
L e v e l S t o p R E S U L T = M a t h M a x ( L e v e l S t o p R E S U L T , L e v e l S t o p M a r k e t ) ;
L e v e l S t o p R E S U L T = N o r m a l i z e D o u b l e ( L e v e l S t o p R E S U L T , D i g i t s ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !" !!
r e t u r n ( L e v e l S t o p R E S U L T ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >?@545;5=85 =0;8G8O D;5B0 8 ?@>1>9 53> 3@0=8FK
b o o l P r o b o y Y z k o g o F l e t a B E A R ( d o u b l e s r e d t e l , i n t b )
{
d o u b l e v e r t e l i , n i z t e l i , v e r l e v t e l , n i z l e v t e l , k o e f y z k m i n , k o e f y z k c u r , v i s o t f l t ;
i n t i , s t , h i o p , h i c l , l w o p , l w c l , k o l b a r o v , b r m a x , t o t a l , Y z k i y L e v y i B a r , d n o f l t ;
b o o l p r o b b e a r ;
p r o b b e a r = f a l s e ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
b r m a x = B a r s - 5 0 ;
t o t a l = b + D a l n o s t P o i s k a F l e t a M A X ;
t o t a l = M a t h M i n ( t o t a l , b r m a x ) ;
s t = b + 1 ;
k o l b a r o v = 0 ;
/ / 10@ - ;520O 3@0=8F0 D;5B0, 345 :>5DD. C7:>AB8 <8=8<;0L=K9
Y z k i y L e v y i B a r = 0 ;
/ / =0G0;L=>5 ,( 7=0G5=85 :>5DD8F85=B0 C7:>AB8 D;5B0
k o e f y z k m i n = 8 0 ;
/ / A25G0 2 =0G0;5 >B@57:0, 345 =081>;LH0O F5=0 >B:@KB8O
h i o p = i H i g h e s t ( N U L L , 0 , M O D E _ O P E N , Y z k o s t F l e t a S t a r t D i s t , s t ) ;
/ / A25G0 2 =0G0;5 >B@57:0, 345 =081>;LH0O F5=0 70:@KB8O
h i c l = i H i g h e s t ( N U L L , 0 , M O D E _ C L O S E , Y z k o s t F l e t a S t a r t D i s t , s t ) ;
/ / A25G0 2 =0G0;5 >B@57:0, 345 =08<5=LH0O F5=0 >B:@KB8O
l w o p = i L o w e s t ( N U L L , 0 , M O D E _ O P E N , Y z k o s t F l e t a S t a r t D i s t , s t ) ;
/ / A25G0 2 =0G0;5 >B@57:0, 345 =08<5=LH0O F5=0 70:@KB8O
l w c l = i L o w e s t ( N U L L , 0 , M O D E _ C L O S E , Y z k o s t F l e t a S t a r t D i s t , s t ) ;
/ / 25@E=89 C@>25=L B5; A25G59 =0 =0G0;L=>< >B@57:5
v e r l e v t e l = M a t h M a x ( O p e n [ h i o p ] , C l o s e [ h i c l ] ) ;
/ / =86=89 C@>25=L B5; A25G59 =0 =0G0;L=>< >B@57:5
n i z l e v t e l = M a t h M i n ( O p e n [ l w o p ] , C l o s e [ l w c l ] ) ;
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / =86=OO 3@0=8F0 D;5B0 4>;6=0 1KBL ?@>18B0 B5;>< A25G8 10@0
i f ( C l o s e [ b ] < L o w [ i ] )
{
v e r t e l i = M a t h M a x ( O p e n [ i ] , C l o s e [ i ] ) ;
n i z t e l i = M a t h M i n ( O p e n [ i ] , C l o s e [ i ] ) ;
/ / >1=>2;O5< 25@E=89 C@>25=L D;5B0
i f ( v e r t e l i > v e r l e v t e l )
{
v e r l e v t e l = v e r t e l i ;
}
/ / >1=>2;O5< =86=89 C@>25=L D;5B0
i f ( n i z t e l i < n i z l e v t e l )
{
n i z l e v t e l = n i z t e l i ;
}
/ / 2KA>B0 D;5B0 2 ?C=:B0E
v i s o t f l t = v e r l e v t e l - n i z l e v t e l ;
v i s o t f l t = v i s o t f l t / P o i n t ;
v i s o t f l t = M a t h R o u n d ( v i s o t f l t ) ;
/ / :>;8G5AB2> 10@>2 D;5B0
k o l b a r o v = k o l b a r o v + 1 ;
/ / 5A;8 ?@>H;8 AB0@B>2K9 CG0AB>: - @538AB@8@C5< :>5DD. C7:>AB8
i f ( k o l b a r o v > Y z k o s t F l e t a S t a r t D i s t )
{
/ / B5:CI89 :>5DD8F85=B C7:>AB8 D;5B0
k o e f y z k c u r = ( v i s o t f l t * 1 0 0 ) / s r e d t e l ;
k o e f y z k c u r = k o e f y z k c u r / k o l b a r o v ;
k o e f y z k c u r = N o r m a l i z e D o u b l e ( k o e f y z k c u r , 3 ) ;
/ / 70?><8=05< 7=0G5=85 10@0 i , 345 :>5DD. C7:>AB8 D;5B0 <8=8<0;L=K9
i f ( k o e f y z k c u r < k o e f y z k m i n )
{
k o e f y z k m i n = k o e f y z k c u r ;
Y z k i y L e v y i B a r = i ;
}
}
}
e l s e
{
b r e a k ;
}
}
/ / ?>;=>5 :>;8G5AB2> 10@>2 D;5B0 # #'!"
i f ( Y z k i y L e v y i B a r > s t )
{
k o l b a r o v = Y z k i y L e v y i B a r - s t + 1 ;
/ / 25@B8:0;L=0O ;8=8O A;520 >B # D;5B0
O b j e c t C r e a t e ( " Y Z K _ f l e t _ l e f t _ l i n e " , O B J _ V L I N E , 0 , T i m e [ ( Y z k i y L e v y i B a r + 1 ) ] , 0 ) ;
O b j e c t S e t ( " Y Z K _ f l e t _ l e f t _ l i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
O b j e c t S e t ( " Y Z K _ f l e t _ l e f t _ l i n e " , O B J P R O P _ C O L O R , c l r A q u a ) ;
}
/ / 4=> D;5B0
d n o f l t = i L o w e s t ( N U L L , 0 , M O D E _ L O W , k o l b a r o v , s t ) ;
/ / 5A;8 =0945= 4>AB0B>G=> 4;8==K9 8 C7:89 D;5B
i f ( ( Y z k i y L e v y i B a r > s t ) & & ( O p e n [ b ] < v e r l e v t e l ) & & ( O p e n [ b ] > n i z l e v t e l ) )
{
i f ( ( O p e n [ b ] > L o w [ d n o f l t ] ) & & ( C l o s e [ b ] < L o w [ d n o f l t ] ) & & ( C l o s e [ b ] < n i z l e v t e l ) )
{
i f ( ( k o l b a r o v > S h i r i n a F l e t a B a r o v M I N ) & & ( k o e f y z k m i n < K o e f f Y z k o s t i F l e t a L A R G E ) )
{
p r o b b e a r = t r u e ;
M e s s a g e B o x ( " -$$& " # !" $" = " + D o u b l e T o S t r ( k o e f y z k m i n , 2 ) ) ;
}
}
}
r e t u r n ( p r o b b e a r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >?@545;5=85 =0;8G8O D;5B0 8 +' ?@>1>9 53> % 3@0=8FK
b o o l P r o b o y Y z k o g o F l e t a B U L L ( d o u b l e s r e d t e l , i n t b )
{
d o u b l e v e r t e l i , n i z t e l i , v e r l e v t e l , n i z l e v t e l , k o e f y z k m i n , k o e f y z k c u r , v i s o t f l t ;
i n t i , s t , h i o p , h i c l , l w o p , l w c l , k o l b a r o v , b r m a x , t o t a l , Y z k i y L e v y i B a r , p i k f l t ;
b o o l p r o b b u l l ;
p r o b b u l l = f a l s e ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
b r m a x = B a r s - 5 0 ;
t o t a l = b + D a l n o s t P o i s k a F l e t a M A X ;
t o t a l = M a t h M i n ( t o t a l , b r m a x ) ;
s t = b + 1 ;
k o l b a r o v = 0 ;
/ / 10@ - ;520O 3@0=8F0 D;5B0, 345 :>5DD. C7:>AB8 <8=8<;0L=K9
Y z k i y L e v y i B a r = 0 ;
/ / =0G0;L=>5 ,( 7=0G5=85 :>5DD8F85=B0 C7:>AB8 D;5B0
k o e f y z k m i n = 8 0 ;
/ / A25G0 2 =0G0;5 >B@57:0, 345 =081>;LH0O F5=0 >B:@KB8O
h i o p = i H i g h e s t ( N U L L , 0 , M O D E _ O P E N , Y z k o s t F l e t a S t a r t D i s t , s t ) ;
/ / A25G0 2 =0G0;5 >B@57:0, 345 =081>;LH0O F5=0 70:@KB8O
h i c l = i H i g h e s t ( N U L L , 0 , M O D E _ C L O S E , Y z k o s t F l e t a S t a r t D i s t , s t ) ;
/ / A25G0 2 =0G0;5 >B@57:0, 345 =08<5=LH0O F5=0 >B:@KB8O
l w o p = i L o w e s t ( N U L L , 0 , M O D E _ O P E N , Y z k o s t F l e t a S t a r t D i s t , s t ) ;
/ / A25G0 2 =0G0;5 >B@57:0, 345 =08<5=LH0O F5=0 70:@KB8O
l w c l = i L o w e s t ( N U L L , 0 , M O D E _ C L O S E , Y z k o s t F l e t a S t a r t D i s t , s t ) ;
/ / 25@E=89 C@>25=L B5; A25G59 =0 =0G0;L=>< >B@57:5
v e r l e v t e l = M a t h M a x ( O p e n [ h i o p ] , C l o s e [ h i c l ] ) ;
/ / =86=89 C@>25=L B5; A25G59 =0 =0G0;L=>< >B@57:5
n i z l e v t e l = M a t h M i n ( O p e n [ l w o p ] , C l o s e [ l w c l ] ) ;
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / 25@E=OO 3@0=8F0 D;5B0 4>;6=0 1KBL ?@>18B0 B5;>< A25G8 10@0
i f ( C l o s e [ b ] > H i g h [ i ] )
{
v e r t e l i = M a t h M a x ( O p e n [ i ] , C l o s e [ i ] ) ;
n i z t e l i = M a t h M i n ( O p e n [ i ] , C l o s e [ i ] ) ;
/ / >1=>2;O5< 25@E=89 C@>25=L D;5B0
i f ( v e r t e l i > v e r l e v t e l )
{
v e r l e v t e l = v e r t e l i ;
}
/ / >1=>2;O5< =86=89 C@>25=L D;5B0
i f ( n i z t e l i < n i z l e v t e l )
{
n i z l e v t e l = n i z t e l i ;
}
/ / 2KA>B0 D;5B0 2 ?C=:B0E
v i s o t f l t = v e r l e v t e l - n i z l e v t e l ;
v i s o t f l t = v i s o t f l t / P o i n t ;
v i s o t f l t = M a t h R o u n d ( v i s o t f l t ) ;
/ / :>;8G5AB2> 10@>2 D;5B0
k o l b a r o v = k o l b a r o v + 1 ;
/ / 5A;8 ?@>H;8 AB0@B>2K9 CG0AB>: - @538AB@8@C5< :>5DD. C7:>AB8
i f ( k o l b a r o v > Y z k o s t F l e t a S t a r t D i s t )
{
/ / B5:CI89 :>5DD8F85=B C7:>AB8 D;5B0
k o e f y z k c u r = ( v i s o t f l t * 1 0 0 ) / s r e d t e l ;
k o e f y z k c u r = k o e f y z k c u r / k o l b a r o v ;
k o e f y z k c u r = N o r m a l i z e D o u b l e ( k o e f y z k c u r , 3 ) ;
/ / 70?><8=05< 7=0G5=85 10@0 i , 345 :>5DD. C7:>AB8 D;5B0 <8=8<0;L=K9
i f ( k o e f y z k c u r < k o e f y z k m i n )
{
k o e f y z k m i n = k o e f y z k c u r ;
Y z k i y L e v y i B a r = i ;
}
}
}
e l s e
{
b r e a k ;
}
}
/ / ?>;=>5 :>;8G5AB2> 10@>2 D;5B0 # #'!"
i f ( Y z k i y L e v y i B a r > s t )
{
k o l b a r o v = Y z k i y L e v y i B a r - s t + 1 ;
/ / 25@B8:0;L=0O ;8=8O A;520 >B # D;5B0
O b j e c t C r e a t e ( " Y Z K _ f l e t _ l e f t _ l i n e " , O B J _ V L I N E , 0 , T i m e [ ( Y z k i y L e v y i B a r + 1 ) ] , 0 ) ;
O b j e c t S e t ( " Y Z K _ f l e t _ l e f t _ l i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
O b j e c t S e t ( " Y Z K _ f l e t _ l e f t _ l i n e " , O B J P R O P _ C O L O R , c l r A q u a ) ;
}
/ / ?8: D;5B0
p i k f l t = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , k o l b a r o v , s t ) ;
/ / 5A;8 =0945= 4>AB0B>G=> 4;8==K9 8 C7:89 D;5B
i f ( ( Y z k i y L e v y i B a r > s t ) & & ( O p e n [ b ] > n i z l e v t e l ) & & ( O p e n [ b ] < v e r l e v t e l ) )
{
i f ( ( O p e n [ b ] < H i g h [ p i k f l t ] ) & & ( C l o s e [ b ] > H i g h [ p i k f l t ] ) & & ( C l o s e [ b ] > v e r l e v t e l ) )
{
i f ( ( k o l b a r o v > S h i r i n a F l e t a B a r o v M I N ) & & ( k o e f y z k m i n < K o e f f Y z k o s t i F l e t a L A R G E ) )
{
p r o b b u l l = t r u e ;
M e s s a g e B o x ( " -$$& " # !" $" = " + D o u b l e T o S t r ( k o e f y z k m i n , 2 ) ) ;
}
}
}
r e t u r n ( p r o b b u l l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / @0AG5B H8@8=K :@K;0 4;O 10@0 n i z 2=CB@8 25@H8=K, AG8B05< GB> :@0O 25@H8=K - ?@545;
/ / "!" - ""
i n t S h i r i n K r i l a V n y t r N i z i n y ( i n t b 2 , i n t n i z , i n t b 1 )
{
i n t k o l 2 , k o l 1 , g r 2 , g r 1 , s t 2 , s t 1 , i , k r i l ;
k r i l = 0 ; k o l 2 = 0 ; k o l 1 = 0 ;
/ / @0AG5B 4;8=K :@K;0 k o l 1 A?@020 >B 10@0 n i z
g r 1 = b 1 + 1 ;
i f ( ( n i z > g r 1 ) & & ( n i z < b 2 ) )
{
s t 1 = n i z - 1 ;
f o r ( i = s t 1 ; i > b 1 ; i - - )
{
i f ( L o w [ n i z ] < = L o w [ i ] )
{
k o l 1 = k o l 1 + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
/ / @0AG5B 4;8=K :@K;0 k o l 2 A;520 >B 10@0 n i z
g r 2 = b 2 - 1 ;
i f ( ( n i z < g r 2 ) & & ( n i z > b 1 ) )
{
s t 2 = n i z + 1 ;
f o r ( i = s t 2 ; i < b 2 ; i + + )
{
i f ( L o w [ n i z ] < = L o w [ i ] )
{
k o l 2 = k o l 2 + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
/ / @0AG5B 4;8=K :@K;0 2 >15 AB>@>=K >B 10@0
k r i l = M a t h M i n ( k o l 2 , k o l 1 ) ;
r e t u r n ( k r i l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / @0AG5B H8@8=K :@K;0 4;O 2=CB@8 =878=K, AG8B05< GB> :@0O =878=K - ?@545;
i n t S h i r K r i l a P i k a ( i n t l e v g r n , i n t p i k , i n t b 1 )
{
i n t k o l 2 , k o l 1 , g r 2 , g r 1 , s t 2 , s t 1 , i , k r i l ;
k r i l = 0 ; k o l 2 = 0 ; k o l 1 = 0 ;
/ / @0AG5B 4;8=K :@K;0 k o l 1 A?@020 >B
g r 1 = b 1 + 1 ;
i f ( ( p i k > g r 1 ) & & ( p i k < l e v g r n ) )
{
/ / AB0@B>2K9 10@ 4;O F8:;0 2?@02>
s t 1 = p i k - 1 ;
f o r ( i = s t 1 ; i > b 1 ; i - - )
{
i f ( H i g h [ p i k ] > = H i g h [ i ] )
{
k o l 1 = k o l 1 + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
/ / @0AG5B 4;8=K :@K;0 k o l 2 A;520 >B
g r 2 = l e v g r n - 1 ;
i f ( ( p i k < g r 2 ) & & ( p i k > b 1 ) )
{
/ / AB0@B>2K9 10@ 4;O F8:;0 2;52>
s t 2 = p i k + 1 ;
f o r ( i = s t 2 ; i < l e v g r n ; i + + )
{
i f ( H i g h [ p i k ] > = H i g h [ i ] )
{
k o l 2 = k o l 2 + 1 ;
}
e l s e
{
b r e a k ;
}
}
}
/ / @0AG5B 4;8=K :@K;0 2 >15 AB>@>=K >B 10@0
k r i l = M a t h M i n ( k o l 2 , k o l 1 ) ;
r e t u r n ( k r i l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 =0;8G8O 42>9=>9 ( + 8 ?@>1>O 55 ;8=88 H58 =0 10@5
b o o l D v o i n a y a V e r s h i n a ( i n t l e v g r a n , i n t b )
{
d o u b l e v e r x t e l a , v i s o t 2 , v i s o t 1 , v i s o t l i t , v i s o t h u g , p r c s o v ;
i n t k o l f i g , k o l v n y t , s h i r l e v , s h i r p r v , l e v p i k , p r v p i k , g l a v n i z , g p ;
i n t f i g h i b r , d a l n p i k , h i o p n , h i c l s , r a z n b r , s h i r n i z , k r i l n i z , s t ;
b o o l v e r s h 2 x ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
v e r s h 2 x = f a l s e ;
g l a v n i z = 0 ;
k r i l n i z = 0 ;
s h i r n i z = 0 ;
s t = b + 1 ;
/ / 4>;6=0 1KBL =0945=0 ;520O 3@0=8F0 >1I59 D83C@K 25@H8=K
i f ( l e v g r a n > b )
{
/ / 10@ A?@020 >B ;52>9 3@0=8FK
g p = l e v g r a n - 1 ;
/ / :>;8G5AB2> 2=CB@5==8E 10@>2 D83C@K
k o l v n y t = l e v g r a n - b - 1 ;
/ / 3;02=K9 =87 - 10@, 345 =0E>48BAO A0<0O =87:0O 2=CB@5==OO =878=0
g l a v n i z = i L o w e s t ( N U L L , 0 , M O D E _ L O W , k o l v n y t , s t ) ;
/ / H8@8=0 :@K;0 3;02=>9 2=CB@5==59 =878=:8
k r i l n i z = S h i r i n K r i l a V n y t r N i z i n y ( l e v g r a n , g l a v n i z , b ) ;
/ / H8@>:89 =87 - A0<0O H8@>:0O 2=CB@5==OO =878=:0
s h i r n i z = P o i s k G l a v n o g o N i z a ( l e v g r a n , b ) ;
/ / 5A;8 3;02=0O =878=:0 =5 ?>4E>48B, 70<5=8< 55 =0 1>;55 H8@>:CN
i f ( ( L o w [ g l a v n i z ] = = L o w [ s h i r n i z ] ) | | ( g l a v n i z = = s t ) | | ( g l a v n i z = = g p ) )
{
g l a v n i z = s h i r n i z ;
/ / >1=>2;5=85 8=D>@<0F88 > H8@8=5 :@K;0
k r i l n i z = S h i r i n K r i l a V n y t r N i z i n y ( l e v g r a n , g l a v n i z , b ) ;
}
/ / 5A;8 3;02=0O =878=:0 =0945=0 8 H8@8=0 :@K;0 1>;LH0O
i f ( ( g l a v n i z > b ) & & ( k r i l n i z > = S h i r i n K r i l O n e P i k V e r s h 2 X ) )
{
/ / >1I55 :>;8G5AB2> 10@>2 D83C@K
k o l f i g = l e v g r a n - b + 1 ;
/ / A0<K9 2KA>:89 10@ D83C@K 42>9=0O 25@H8=0
f i g h i b r = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , k o l f i g , b ) ;
/ / =081>;LH0O 2KA>B0 - @0AAB>O=85 >B 25@H8=K 4> ;8=88 H58
v i s o t h u g = H i g h [ f i g h i b r ] - L o w [ g l a v n i z ] ;
v i s o t h u g = v i s o t h u g / P o i n t ;
/ / 40;L=>ABL 3;02=>3> ?8:0 D83C@K 2 10@0E
d a l n p i k = S l e v a B a r o v O t V e r s h i n y ( f i g h i b r ) ;
/ / H8@8=0 ;52>3> ?8:0 2 10@0E
s h i r l e v = l e v g r a n - g l a v n i z + 1 ;
/ / H8@8=0 ?@02>3> ?8:0 2 10@0E
s h i r p r v = g l a v n i z - b + 1 ;
/ / =><5@ 10@0 ;52>3> ?8:0 42>9=>9 25@H8=K
l e v p i k = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , s h i r l e v , g l a v n i z ) ;
/ / 2KA>B0 ;52>9 25@H8=K 2 ?C=:B0E
v i s o t 2 = H i g h [ l e v p i k ] - L o w [ g l a v n i z ] ;
v i s o t 2 = v i s o t 2 / P o i n t ;
/ / =><5@ 10@0 ?@02>3> ?8:0 42>9=>9 25@H8=K
p r v p i k = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , s h i r p r v , b ) ;
/ / 2KA>B0 ?@02>9 25@H8=K 2 ?C=:B0E
v i s o t 1 = H i g h [ p r v p i k ] - L o w [ g l a v n i z ] ;
v i s o t 1 = v i s o t 1 / P o i n t ;
/ / 2KA>B0 =08<5=LH0O 87 42CE
v i s o t l i t = M a t h M i n ( v i s o t 2 , v i s o t 1 ) ;
/ / 10@ D83C@K, 345 =0945=0 A0<0O 2KA>:0O F5=0 >B:@KB8O
h i o p n = i H i g h e s t ( N U L L , 0 , M O D E _ O P E N , k o l f i g , b ) ;
/ / 10@ D83C@K, 345 =0945=0 A0<0O 2KA>:0O F5=0 70:@KB8O
h i c l s = i H i g h e s t ( N U L L , 0 , M O D E _ C L O S E , k o l f i g , b ) ;
/ / A0<K9 2KA>:89 C@>25=L B5; A25G59 D83C@K
v e r x t e l a = M a t h M a x ( O p e n [ h i o p n ] , C l o s e [ h i c l s ] ) ;
/ / ?@>F5=B A>2?045=8O 2KA>BK =08<5=LH59 25@H8=K : 2KA>B5 =081>;LH59
p r c s o v = ( v i s o t l i t * 1 0 0 ) / v i s o t h u g ;
p r c s o v = M a t h R o u n d ( p r c s o v ) ;
/ / @07=>ABL 2 10@0E <564C 42C<O 25@H8=0<8
r a z n b r = l e v p i k - p r v p i k ;
/ / CA;>28O 2K?>;=5=8O D83C@K 42>9=0O (
i f ( ( ( H i g h [ l e v p i k ] > = v e r x t e l a ) & & ( H i g h [ p r v p i k ] > = v e r x t e l a ) ) | | ( p r c s o v > P r o c e n t S o v p a d L e v e l P I K 2 X ) )
{
/ / 3;02=0O 2=CB@5==O =878=:0 - ;8=8O H58 4>;6=0 1KBL ?@>18B0 =0 10@5
i f ( ( O p e n [ b ] > = L o w [ g l a v n i z ] ) & & ( C l o s e [ b ] < L o w [ g l a v n i z ] ) )
{
/ / 40;L=>ABL ?8:0 42>9=>9 25@H8=K 4>;6=0 1KBL 1>;LH>9, 10@K 25@H8= 40;5:>
i f ( ( d a l n p i k > D a l n o s t P i k a V e r s h i n 2 X M I N ) & & ( r a z n b r > S h i r i n K r i l O n e P i k V e r s h 2 X ) )
{
v e r s h 2 x = t r u e ;
}
}
}
}
}
r e t u r n ( v e r s h 2 x ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 =0;8G8O 42>9=>9 + 8 ?@>1>O % 55 ;8=88 H58 =0 10@5
b o o l D v o i n a y a N i z i n y a ( i n t l e v g r a n , i n t b )
{
d o u b l e n i z t e l a , g l y b i n 2 , g l y b i n 1 , g l y b l i t , g l y b h u g , p r c s o v ;
i n t k o l f i g , k o l v n y t , s h i r l e v , s h i r p r v , l e v d n o , p r v d n o , g l a v p i k , g p ;
i n t f i g l w b r , d a l n d n a , l w o p n , l w c l s , r a z n b r , s h i r p i k , k r i l p i k , s t ;
b o o l n i z i n 2 x ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
n i z i n 2 x = f a l s e ;
g l a v p i k = 0 ;
k r i l p i k = 0 ;
s h i r p i k = 0 ;
s t = b + 1 ;
/ / 4>;6=0 1KBL =0945=0 ;520O 3@0=8F0 >1I59 D83C@K =878=K
i f ( l e v g r a n > b )
{
/ / 10@ A?@020 >B ;52>9 3@0=8FK
g p = l e v g r a n - 1 ;
/ / :>;8G5AB2> 2=CB@5==8E 10@>2 D83C@K
k o l v n y t = l e v g r a n - b - 1 ;
/ / 3;02=K9 2=CB@5==89 ?8: - 10@ A0<>9 2KA>:>9 2=CB@5==59 25@H8=K
g l a v p i k = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , k o l v n y t , s t ) ;
/ / @07<5@ :@K;0 3;02=>3> 2=CB@5==53> ?8:0
k r i l p i k = S h i r K r i l a P i k a ( l e v g r a n , g l a v p i k , b ) ;
/ / H8@>:89 ?8: - A0<0O H8@>:0O 2=CB@5==OO 25@H8=:0
s h i r p i k = P o i s k G l a v n o g o P i k a ( l e v g r a n , b ) ;
/ / 5A;8 3;02=0O 25@H8=:0 =5 ?>4E>48B, 70<5=8< 55 =0 1>;55 H8@>:CN
i f ( ( H i g h [ g l a v p i k ] = = H i g h [ s h i r p i k ] ) | | ( g l a v p i k = = s t ) | | ( g l a v p i k = = g p ) )
{
g l a v p i k = s h i r p i k ;
/ / >1=>2;5=85 8=D>@<0F88 > H8@8=5 :@K;0
k r i l p i k = S h i r K r i l a P i k a ( l e v g r a n , g l a v p i k , b ) ;
}
/ / 5A;8 3;02=K9 2=CB@5==89 ?8: =0945= 8 H8@8=0 :@K;0 53> 1>;LH0O
i f ( ( g l a v p i k > b ) & & ( k r i l p i k > = S h i r i n K r i l O n e P i k V e r s h 2 X ) )
{
/ / >1I55 :>;8G5AB2> 10@>2 D83C@K
k o l f i g = l e v g r a n - b + 1 ;
/ / A0<K9 =87:89 10@ D83C@K 42>9=0O =878=0
f i g l w b r = i L o w e s t ( N U L L , 0 , M O D E _ L O W , k o l f i g , b ) ;
/ / =081>;LH0O 3;C18=0 - @0AAB>O=85 >B =878=K 4> ;8=88 H58
g l y b h u g = H i g h [ g l a v p i k ] - L o w [ f i g l w b r ] ;
g l y b h u g = g l y b h u g / P o i n t ;
/ / 40;L=>ABL 4=0 3;02=>9 =878=K D83C@K 2 10@0E
d a l n d n a = S l e v a B a r o v O t N i z i n y ( f i g l w b r ) ;
/ / H8@8=0 ;52>9 =878=K 2 10@0E
s h i r l e v = l e v g r a n - g l a v p i k + 1 ;
/ / H8@8=0 ?@02>9 =878=K 2 10@0E
s h i r p r v = g l a v p i k - b + 1 ;
/ / =><5@ 10@0 ;52>3> 4=0 42>9=>9 =878=K
l e v d n o = i L o w e s t ( N U L L , 0 , M O D E _ L O W , s h i r l e v , g l a v p i k ) ;
/ / 3;C18=0 ;52>9 =878=K 2 ?C=:B0E
g l y b i n 2 = H i g h [ g l a v p i k ] - L o w [ l e v d n o ] ;
g l y b i n 2 = g l y b i n 2 / P o i n t ;
/ / =><5@ 10@0 ?@02>3> 4=0 42>9=>9 =878=K
p r v d n o = i L o w e s t ( N U L L , 0 , M O D E _ L O W , s h i r p r v , b ) ;
/ / 3;C18=0 ?@02>9 =878=K 2 ?C=:B0E
g l y b i n 1 = H i g h [ g l a v p i k ] - L o w [ p r v d n o ] ;
g l y b i n 1 = g l y b i n 1 / P o i n t ;
/ / 3;C18=0 =08<5=LH0O 87 42CE
g l y b l i t = M a t h M i n ( g l y b i n 2 , g l y b i n 1 ) ;
/ / 10@ D83C@K, 345 =0945=0 A0<0O / F5=0 >B:@KB8O
l w o p n = i L o w e s t ( N U L L , 0 , M O D E _ O P E N , k o l f i g , b ) ;
/ / 10@ D83C@K, 345 =0945=0 / F5=0 70:@KB8O
l w c l s = i L o w e s t ( N U L L , 0 , M O D E _ C L O S E , k o l f i g , b ) ;
/ / A0<K9 C@>25=L B5; A25G59 D83C@K
n i z t e l a = M a t h M i n ( O p e n [ l w o p n ] , C l o s e [ l w c l s ] ) ;
/ / ?@>F5=B A>2?045=8O 3;C18=K =08<5=LH59 =878=K : 3;C18=5 =081>;LH59
p r c s o v = ( g l y b l i t * 1 0 0 ) / g l y b h u g ;
p r c s o v = M a t h R o u n d ( p r c s o v ) ;
/ / @07=>ABL 2 10@0E <564C 42C<O =878=0<8
r a z n b r = l e v d n o - p r v d n o ;
/ / CA;>28O 2K?>;=5=8O D83C@K 42>9=0O
i f ( ( ( L o w [ l e v d n o ] < = n i z t e l a ) & & ( L o w [ p r v d n o ] < = n i z t e l a ) ) | | ( p r c s o v > P r o c e n t S o v p a d L e v e l P I K 2 X ) )
{
/ / 3;02=0O 2=CB@5==O 25@H8=:0 - ;8=8O H58 4>;6=0 1KBL ?@>18B0 =0 10@5
i f ( ( O p e n [ b ] < = H i g h [ g l a v p i k ] ) & & ( C l o s e [ b ] > H i g h [ g l a v p i k ] ) )
{
/ / 40;L=>ABL 42>9=>9 + 4>;6=0 1KBL 1>;LH>9, 10@K =878= 40;5:>
i f ( ( d a l n d n a > D a l n o s t P i k a V e r s h i n 2 X M I N ) & & ( r a z n b r > S h i r i n K r i l O n e P i k V e r s h 2 X ) )
{
n i z i n 2 x = t r u e ;
}
}
}
}
}
r e t u r n ( n i z i n 2 x ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 2KG8A;5=85 ?@02>9 B>G:8 >?>@K m a c d b a r 1 :0A0B5;L=>9 ;8=88 A=87C ?> <8=8<C<0<
/ / =C6=> GB>1K 2 B>G:5 m a c d b a r 2 8=48:0B>@ 1K; A0<K9 =87:89 =0 >B@57:5
/ / ?@82O7K205< ?;0=:C : 2 B>G:5 m a c d b a r 2 8 ?>4=8<05< 225@E ?@02K9 55 :>=5F
/ / >?@545;O5< =><5@ 10@0 m a c d b a r 1 345 ?;0=:0 C?5@;0AL 2 8=48:0B>@
/ / =0 >B@57:5 A m a c d b a r 2 ?> , MB> 1C45B ?@020O B>G:0 4;O :0A0B5;L=>9 ;8=88
i n t M A C D B u l l D i v e r R i g h t B a r ( i n t m a c d b a r 2 , i n t b )
{
d o u b l e y i , m a c d l e v 2 , m a c d l e v i , k o e f f c u r , k o e f f m i n ;
i n t i , x i , s t , m a c d b a r 1 ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
m a c d b a r 1 = 0 ;
/ / ;52K9 =86=89 C@>25=L <8=8<C<0 M A C D =0 10@5 m a c d b a r 2
m a c d l e v 2 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m a c d b a r 2 ) ;
m a c d l e v 2 = N o r m a l i z e D o u b l e ( m a c d l e v 2 , 7 ) ;
/ / @0AAB>O=85 >B =C;52>9 ;8=88 - ?> 25@B8:0;8 45;8< =0 >48= 10@
k o e f f m i n = M a t h A b s ( m a c d l e v 2 ) ;
/ / AB0@B>2K9 10@ F8:;0 ?>8A:0
s t = m a c d b a r 2 - 1 ;
/ / 8I5< 10@, 345 =08<5=LH89 :>MDD =0:;>=0 k o e f f c u r 4;O :0A0B5;L=>9 ;8=88
f o r ( i = s t ; i > = b ; i - - )
{
m a c d l e v i = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) ;
m a c d l e v i = N o r m a l i z e D o u b l e ( m a c d l e v i , 7 ) ;
/ / @0AAB>O=85 ?> >A8 X <564C >?>@=K<8 B>G:0<8 :0A0B5;L=>9 ;8=88
x i = m a c d b a r 2 - i ;
/ / @0AAB>O=85 ?> >A8 Y <564C >?>@=K<8 B>G:0<8 :0A0B5;L=>9 ;8=88
y i = m a c d l e v i - m a c d l e v 2 ;
k o e f f c u r = y i / x i ;
k o e f f c u r = N o r m a l i z e D o u b l e ( k o e f f c u r , 7 ) ;
i f ( k o e f f c u r < k o e f f m i n )
{
k o e f f m i n = k o e f f c u r ;
m a c d b a r 1 = i ;
}
}
r e t u r n ( m a c d b a r 1 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / @0AG5B ;52>3> >?>@=>3> 10@0 4;O :0A0B5;L=>9 ;8=88 A=87C ?>
/ / 2E>4OI85 ?0@0<5B@K - 10@ + , ?@>25@O5<K9 10@
/ / 15@5< 87 2A5E 2>7<>6=KE :0A0B5;L=CN ;8=8N <0:A8<0;L=>9 4;8=K, => 1;87:> :
i n t M A C D B u l l D i v e r L e f t B a r ( i n t d n o m a c d b a r , i n t l e v g r n i z , i n t b )
{
i n t l e v y i b a r , p r a v b a r , m a c d b a r 2 , m a c d b a r 1 , d l i n c u r , d l i n m a x , s t , i ;
b o o l e s t l i n e ;
/ / C40;>AL ;8 2>>1I5 ?>AB@>8BL :0A0B5;L=CN ;8=8N
e s t l i n e = f a l s e ;
/ / 8A:><K5 =><5@0 10@>2 4;O :0A0B5;L=>9 ;8=88
m a c d b a r 2 = 0 ;
m a c d b a r 1 = 0 ;
/ / ;52K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
l e v y i b a r = d n o m a c d b a r ;
/ / ?@02K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
p r a v b a r = d n o m a c d b a r ;
/ / =081>;LH55 @0AAB>O=85 <564C 10@0<8 >?>@ :0A0B5;L=>9 ;8=88
d l i n m a x = 0 ;
/ / B5:CI55 @0AAB>O=85 <564C 10@0<8 >?>@ :0A0B5;L=>9 ;8=88
d l i n c u r = 0 ;
/ / AB0@B>2K9 10@ F8:;0 ?>8A:0
s t = d n o m a c d b a r - 1 ;
f o r ( i = s t ; i > = b ; i - - )
{
/ / 45;05< (, 8I5< #. " '# + 4;O :0A0B5;L=>9 ;8=88
p r a v b a r = M A C D B u l l D i v e r R i g h t B a r ( l e v y i b a r , b ) ;
/ / 5A;8 :0A0B5;L=CN ;8=8N C40;>AL ?>AB@>8BL
i f ( ( p r a v b a r > = b ) & & ( p r a v b a r < l e v y i b a r ) )
{
e s t l i n e = t r u e ;
/ / B5:CI55 @0AAB>O=85 <564C B>G:0<8 >?>@K :0A0B5;L=>9 ;8=88
d l i n c u r = l e v y i b a r - p r a v b a r ;
/ / 70?><8=05< 10@K =0 :>B>@KE 4;8=0 ;8=88 <0:A8<0;L=0O
i f ( ( d l i n c u r > d l i n m a x ) & & ( p r a v b a r < = l e v g r n i z ) )
{
d l i n m a x = d l i n c u r ;
m a c d b a r 2 = l e v y i b a r ;
m a c d b a r 1 = p r a v b a r ;
}
/ / 2 :>=F5 H030 ?5@5AB02;O5< ;52CN >?>@=CN B>G:C =0 <5AB> ?@02>9
l e v y i b a r = p r a v b a r ;
}
e l s e
{
/ / 5A;8 ;8=8N ?>AB@>8BL =5 C40;>AL - 7025@H05< ?>8A:
b r e a k ;
}
/ / 5A;8 4>H;8 4> 10@0 - 7025@H05< ?>8A:
i f ( p r a v b a r = = b )
{
b r e a k ;
}
}
/ / 5A;8 4;8=0 ;8=88 4>AB0B>G=0O 2>72@0I05< =><5@ ;52>3> 10@0
i f ( ( d l i n m a x > 3 ) & & ( e s t l i n e = = t r u e ) )
{
r e t u r n ( m a c d b a r 2 ) ;
}
r e t u r n ( 0 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: 10@0 =0 7040==>< >B@57:5 345 7=0G5=85 M A C D <8=8<0;L=>, 0=0;>3 i L o w e s t
/ / ?@>25@5=0 =0 A:@8?B5 - @01>B05B
i n t P o i s k B a r a L o w e s t M A C D ( i n t k o l b a r o v , i n t b )
{
d o u b l e c u r m a c d , m i n m a c d ;
i n t i , s t , t o t a l , l e v k r a i , n i z b a r ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = b + k o l b a r o v ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
/ / 8A:><K9 10@ - >B25B, 2>72@0I05<K9 DC=:F859
n i z b a r = b ;
m i n m a c d = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , b ) ;
m i n m a c d = N o r m a l i z e D o u b l e ( m i n m a c d , 7 ) ;
/ / AB0@B>2K9 10@ F8:;0
s t = b + 1 ;
f o r ( i = s t ; i < t o t a l ; i + + )
{
c u r m a c d = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) ;
c u r m a c d = N o r m a l i z e D o u b l e ( c u r m a c d , 7 ) ;
i f ( c u r m a c d < m i n m a c d )
{
m i n m a c d = c u r m a c d ;
n i z b a r = i ;
}
}
r e t u r n ( n i z b a r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: =878=K F5= =0 10@5 , 5A;8 >=0 ACI5AB2C5B - 2>72@0I05< ;52CN 3@0=8FC
i n t L e v G r a n N i z a C e n y D i v e r B u l l ( i n t b )
{
i n t l e v g r a n , l e v k r a i , t o t a l , p r e d v , s t , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
l e v g r a n = 0 ;
/ / ?@5420@8B5;L=0O ;520O 3@0=8F0
p r e d v = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = b + 1 2 0 ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
s t = b + 1 ;
/ / A25G0 =0 10@5 4>;60 1KBL +',/
i f ( O p e n [ b ] < C l o s e [ b ] )
{
/ / ?>8A: ?@5420@8B5;L=>9 ;52>9 3@0=8FK + F5=
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / 845< 2;52> 4> B5E ?>@, ?>:0 & +"/ +( " !'
i f ( ( C l o s e [ b ] > = O p e n [ i ] ) & & ( C l o s e [ b ] > = C l o s e [ i ] ) )
{
c o n t i n u e ;
}
e l s e
{
/ / ?@5420@8B5;L=0O ;520O 3@0=8F0 +
p r e d v = i ;
b r e a k ;
}
}
}
/ / 5A;8 ?@5420@8B5;L=0O 3@0=8F0 =0945=0
i f ( p r e d v > b )
{
/ / ;520O 3@0=8F0 - ,/ A25G0, F5=0 >B:@KB8O 2KH5 70:@KB8O 10@0
i f ( ( O p e n [ p r e d v ] > C l o s e [ p r e d v ] ) & & ( O p e n [ p r e d v ] > C l o s e [ b ] ) )
{
l e v g r a n = p r e d v ;
}
}
/ / 5A;8 ;520O 3@0=8F0 =5 =0945=0 ?>?@>1C5< 2B>@>9 20@80=B
i f ( l e v g r a n = = 0 )
{
/ / A25G0 =0 10@5 4>;60 1KBL +',/
i f ( O p e n [ b ] < C l o s e [ b ] )
{
/ / ?>8A: ?@5420@8B5;L=>9 ;52>9 3@0=8FK + F5=
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / 845< 2;52> 4> B5E ?>@, ?>:0 & +"/ +( ( !'
i f ( C l o s e [ b ] > = H i g h [ i ] )
{
c o n t i n u e ;
}
e l s e
{
/ / ;520O 3@0=8F0 +
l e v g r a n = i ;
b r e a k ;
}
}
}
}
r e t u r n ( l e v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ! &+ ,( ( )
/ / " , #" "
i n t P r a v a y a G r a n N i z i n y M A C D 2 ( i n t m a c d b a r 1 )
{
d o u b l e L e v e l M A C D 1 , T e k L e v e l M A C D ;
i n t p r a v g r a n , l e v k r a i , t o t a l , s t , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
p r a v g r a n = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = m a c d b a r 1 + 4 0 0 ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
s t = m a c d b a r 1 + 1 ;
/ / C@>25=L =0 ?@02>9 ( <0;>9) =878=5
L e v e l M A C D 1 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m a c d b a r 1 ) ;
L e v e l M A C D 1 = N o r m a l i z e D o u b l e ( L e v e l M A C D 1 , 7 ) ;
/ / ! &+ ,( ( ) 2
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / C@>25=L =0 B5:CI5< 10@5
T e k L e v e l M A C D = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) ;
T e k L e v e l M A C D = N o r m a l i z e D o u b l e ( T e k L e v e l M A C D , 7 ) ;
/ / 845< 2;52> 4> B5E ?>@, ?>:0 2KH5 8;8 @025= ?@02>9 =878=K
i f ( T e k L e v e l M A C D > = L e v e l M A C D 1 )
{
c o n t i n u e ;
}
e l s e
{
/ / ?@020O 3@0=8FK 3;C1>:>9 =878=K
p r a v g r a n = i ;
b r e a k ;
}
}
r e t u r n ( p r a v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ! &+ ,( ( )
/ / " &+ "% , # "!/ ##. .
i n t L e v a y a G r a n N i z i n y M A C D 2 ( i n t p r a v g r a n )
{
d o u b l e T e k L e v e l M A C D ;
i n t l e v g r a n , l e v k r a i , t o t a l , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
l e v g r a n = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = p r a v g r a n + 4 0 0 ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
/ / ! &+ ,( ( )
f o r ( i = p r a v g r a n ; i < t o t a l ; i + + )
{
/ / C@>25=L =0 B5:CI5< 10@5
T e k L e v e l M A C D = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) ;
T e k L e v e l M A C D = N o r m a l i z e D o u b l e ( T e k L e v e l M A C D , 7 ) ;
/ / 845< 2;52> 4> B5E ?>@, ?>:0 =5 C?@5BAO 2 =C;52CN ;8=8N
i f ( T e k L e v e l M A C D < 0 )
{
c o n t i n u e ;
}
e l s e
{
/ / ;520O 3@0=8F0 3;C1>:>9 =878=K
l e v g r a n = i - 1 ;
b r e a k ;
}
}
r e t u r n ( l e v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 2KG8A;5=85 ?@02>9 B>G:8 >?>@K 4;O :0A0B5;L=>9 ;8=88 ?> <8=8<C<0< F5=
/ / 0;3>@8B< ?@82O7K205< ;52K9 :>=5F ?;0=:8 : L o w [ l e v c e n b a r ] 8 A<>B@8< =0 :0:><
/ / 10@5 1C45B 4@C3>9 :>=5F ?;0=:8 p r a v c e n b a r - 10@ B>G:8 >?>@K ;8=88 B@5=40
/ / ?@>2>@>B ?;0=:8 ?@>B82 G0A>2>9 AB@5;:8, =0G0;> 42865=8O - 10@ l e v c e n b a r
i n t R i g h t B a r D i v e r B u l l P r i c e ( i n t l e v c e n b a r , i n t b )
{
d o u b l e y i , k o e f f c u r , k o e f f m a x ;
i n t i , x i , s t , p r a v c e n b a r ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
p r a v c e n b a r = 0 ;
/ / <0:A8<0;L=K9 :>5DD8F85=B =0:;>=0 :0A0B5;L=>9 ;8=88
k o e f f m a x = 0 ;
/ / AB0@B>2K9 10@ F8:;0 ?>8A:0
s t = l e v c e n b a r - 1 ;
/ / 8I5< <8=8<0;L=K9 :>MDD 4;O C@02=5=8O ?@O<>9 ;8=88, =0< =C65= 10@,
/ / :>B>@K9 A2>8< 4=>< A8;L=5 2A53> >?CAB8; ;52K9 :>=5F ?;0=:8
f o r ( i = s t ; i > = b ; i - - )
{
/ / =0:;>= 4>;65= 1KBL A25@EC 2=87 A;520 =0?@02>
i f ( L o w [ l e v c e n b a r ] > L o w [ i ] )
{
x i = l e v c e n b a r - i ;
y i = L o w [ l e v c e n b a r ] - L o w [ i ] ;
y i = y i / P o i n t ;
k o e f f c u r = y i / x i ;
k o e f f c u r = N o r m a l i z e D o u b l e ( k o e f f c u r , 7 ) ;
i f ( k o e f f c u r > k o e f f m a x )
{
k o e f f m a x = k o e f f c u r ;
p r a v c e n b a r = i ;
}
}
}
r e t u r n ( p r a v c e n b a r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >B ;52>9 3@0=8FK 845< 4> + & , 2KG8A;O5< :0A0B5;L=CN ;8=8N F5=K
/ / 70?><8=05< 2 10@0, =0 :>B>@KE ;8=8O 1K;0 <0:A8<0;L=>9 4;8=K, => 1;87:> :
/ / 2>72@0I05< =><5@ o t v e t l e f t b a r ;52>9 B>G:8 >?>@K 4;O :0A0B5;L=>9 ;8=88 &
i n t L e f t B a r D i v e r B u l l P r i c e ( i n t l e v g r n m a c d , i n t l e v g r n i z , i n t d n o c e n b a r , i n t b )
{
i n t l e v y i b a r , p r a v b a r , d l i n a c u r , d l i n a m a x , o t v e t l e f t b a r , o t v e t p r a v b a r , s t , i ;
b o o l e s t l i n e ;
/ / C40;>AL ;8 2>>1I5 ?>AB@>8BL :0A0B5;L=CN ;8=8N
e s t l i n e = f a l s e ;
/ / <0:A8<0;L=0O 4;8==0 :0A0B5;L=>9 ;8=88 =0 CG0AB:5
d l i n a m a x = 0 ;
/ / 8A:><K5 =><5@0 10@>2 4;O :0A0B5;L=>9 ;8=88
o t v e t l e f t b a r = 0 ;
o t v e t p r a v b a r = 0 ;
/ / ;52K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
l e v y i b a r = l e v g r n m a c d ;
/ / ?@02K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
p r a v b a r = 0 ;
/ / AB0@B>2K9 10@ F8:;0 ?>8A:0
s t = l e v g r n m a c d - 1 ;
f o r ( i = s t ; i > = b ; i - - )
{
/ / ?@02K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
p r a v b a r = R i g h t B a r D i v e r B u l l P r i c e ( l e v y i b a r , b ) ;
/ / 5A;8 :0A0B5;L=CN ;8=8N C40;>AL ?>AB@>8BL
i f ( ( p r a v b a r > = d n o c e n b a r ) & & ( p r a v b a r < l e v y i b a r ) )
{
e s t l i n e = t r u e ;
/ / B5:CI55 @0AAB>O=85 <564C B>G:0<8 >?>@K :0A0B5;L=>9 ;8=88
d l i n a c u r = l e v y i b a r - p r a v b a r ;
/ / 70?><8=05< 10@K =0 :>B>@KE 4;8=0 ;8=88 <0:A8<0;L=0O
i f ( ( d l i n a c u r > d l i n a m a x ) & & ( p r a v b a r < = l e v g r n i z ) )
{
d l i n a m a x = d l i n a c u r ;
o t v e t l e f t b a r = l e v y i b a r ;
o t v e t p r a v b a r = p r a v b a r ;
}
/ / 2 :>=F5 H030 ?5@5AB02;O5< ;52CN >?>@=CN B>G:C =0 <5AB> ?@02>9
l e v y i b a r = p r a v b a r ;
}
e l s e
{
/ / 5A;8 ;8=8N ?>AB@>8BL =5 C40;>AL - 7025@H05< ?>8A:
b r e a k ;
}
/ / 5A;8 4>H;8 4> 10@0 d n o c e n b a r - 7025@H05< ?>8A:
i f ( p r a v b a r = = d n o c e n b a r )
{
b r e a k ;
}
}
/ / 5A;8 4;8=0 ;8=88 4>AB0B>G=0O 2>72@0I05< =><5@ ;52>3> 10@0
i f ( ( d l i n a m a x > 3 ) & & ( e s t l i n e = = t r u e ) )
{
r e t u r n ( o t v e t l e f t b a r ) ;
}
r e t u r n ( 0 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / =>2K9 0;3>@8B< ?>8A:0 1KGL59 4825@35=F88 - A=0G0;0 8I5< =878=C F5= 2>7;5 10@0
/ / 5ABL 425 >1;0AB8 - >B@57:0 =0 CG0AB:5 10@>2 ;520O 2 8 ?@020O 1
/ / ?@020O - MB> 345 =0E>48BAO =878=0 F5=, =0 MB>< 65 CG0AB:5 8I5< =878=C
/ / ;520O >1;0ABL - MB> 1>;55 3;C1>:0O =878=0 , 345 >=0 =865 ?@02>3> C@>2=O
b o o l D i v e r B u l l O X O T N I K 7 7 7 ( i n t b )
{
d o u b l e m a c d l e v 2 , m a c d l e v 1 , m a c d l e v b ;
i n t l e v b a r n i z c e n , k o l t o t n i z c e n , d n o c e n b a r , m a c d b a r 2 , m a c d b a r 1 , d a l n o s t d n a , g l a v p i k n i z c e n ;
i n t p r a v g r m a c d 2 , l e f t g r m a c d 2 , k o l t o t m a c d 2 , p r i c e b a r 2 , p r i c e b a r 1 , n i z n a k r b a r ;
b o o l d i v e r b u l l , e s t m a c d l i n e , e s t p r i c e l i n e , p r o b g l a v p i k a ;
d i v e r b u l l = f a l s e ; e s t m a c d l i n e = f a l s e ; e s t p r i c e l i n e = f a l s e ; p r o b g l a v p i k a = f a l s e ;
l e v b a r n i z c e n = 0 ; k o l t o t n i z c e n = 0 ; d n o c e n b a r = 0 ; m a c d b a r 2 = 0 ; m a c d b a r 1 = 0 ;
k o l t o t m a c d 2 = 0 ; m a c d l e v 2 = 0 ; m a c d l e v 1 = 0 ; p r i c e b a r 2 = 0 ; p r i c e b a r 1 = 0 ;
p r a v g r m a c d 2 = 0 ; l e f t g r m a c d 2 = 0 ; d a l n o s t d n a = 0 ; n i z n a k r b a r = 0 ; g l a v p i k n i z c e n = 0 ;
/ / ?>8A: ;52>3> :@0O =878=K F5=
l e v b a r n i z c e n = L e v G r a n N i z a C e n y D i v e r B u l l ( b ) ;
/ / ?@>25@:0 =0;8G8O ?@>1>O 3;02=>9 25@H8=:8 2=CB@8 =878=K F5=
i f ( l e v b a r n i z c e n > b )
{
/ / ?>8A: 3;02=>3> ?8:0 =878=K F5=
g l a v p i k n i z c e n = P o i s k G l a v n o g o P i k a ( l e v b a r n i z c e n , b ) ;
i f ( ( O p e n [ b ] < H i g h [ g l a v p i k n i z c e n ] ) & & ( C l o s e [ b ] > H i g h [ g l a v p i k n i z c e n ] ) )
{
p r o b g l a v p i k a = t r u e ;
}
}
/ / C@>25=L =0 10@5
m a c d l e v b = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , ( b + 1 ) ) ;
/ / 5A;8 D83C@0 =878=K F5= =0945=0, 8I5< 10@ - <8=8<C< F5=
i f ( ( l e v b a r n i z c e n > b ) & & ( ( m a c d l e v b < 0 ) | | ( p r o b g l a v p i k a = = t r u e ) ) )
{
/ / '!" + &
k o l t o t n i z c e n = l e v b a r n i z c e n - b + 1 ;
/ / + &
d n o c e n b a r = i L o w e s t ( N U L L , 0 , M O D E _ L O W , k o l t o t n i z c e n , b ) ;
/ / 40;L=>ABL 4=0 =878=K F5=
d a l n o s t d n a = S l e v a B a r o v O t N i z i n y ( d n o c e n b a r ) ;
/ / ?@545;L=K9 ;52K9 10@ =0:@KB8O =878=K F5=
n i z n a k r b a r = b + d a l n o s t d n a ;
/ / ?>8A: 10@0 =0 CG0AB:5 =878=K F5=, 345 =0945=> <8=8<0;L=>5 7=0G5=85
m a c d b a r 1 = P o i s k B a r a L o w e s t M A C D ( k o l t o t n i z c e n , b ) ;
/ / C@>25=L ?@02>9 =878=:8
m a c d l e v 1 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m a c d b a r 1 ) ;
/ / ! &+ ,( ( ) 2
p r a v g r m a c d 2 = P r a v a y a G r a n N i z i n y M A C D 2 ( m a c d b a r 1 ) ;
}
/ / 5A;8 ?@020O 3@0=8FK 1>;LH>3> ;52>3> ?8:0 =0945=0
i f ( ( p r a v g r m a c d 2 > l e v b a r n i z c e n ) & & ( l e v b a r n i z c e n > b ) )
{
/ / ! &+ ,( ( )
l e f t g r m a c d 2 = L e v a y a G r a n N i z i n y M A C D 2 ( p r a v g r m a c d 2 ) ;
/ / 5A;8 ;520O 3@0=8F0 =0945=0
i f ( l e f t g r m a c d 2 > p r a v g r m a c d 2 )
{
/ / ?>;=>5 :>;8G5AB2> 10@>2 ;52>9 =878=K 2
k o l t o t m a c d 2 = l e f t g r m a c d 2 - p r a v g r m a c d 2 + 1 ;
/ / =86=89 10@ ;52>9 =878=K
m a c d b a r 2 = P o i s k B a r a L o w e s t M A C D ( k o l t o t m a c d 2 , p r a v g r m a c d 2 ) ;
/ / C@>25=L =878=:8
m a c d l e v 2 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m a c d b a r 2 ) ;
}
}
/ / ?>?KB:0 ?>AB@>8BL :0A0B5;L=CN ;8=8N A=87C 225@E ?>
i f ( ( m a c d l e v 1 < 0 ) & & ( m a c d l e v 2 < m a c d l e v 1 ) )
{
/ / @0AG5B ;52>9 >?>@=>9 B>G:8 :0A0B5;L=>9 A=87C ?>
m a c d b a r 2 = M A C D B u l l D i v e r L e f t B a r ( m a c d b a r 2 , l e v b a r n i z c e n , b ) ;
/ / @0AG5B ?@02>9 >?>@=>9 B>G:8 B>G:8 :0A0B5;L=>9 A=87C ?>
m a c d b a r 1 = M A C D B u l l D i v e r R i g h t B a r ( m a c d b a r 2 , b ) ;
i f ( ( m a c d b a r 2 > m a c d b a r 1 ) & & ( m a c d b a r 1 > = b ) )
{
/ / C@>25=L ?@02>9 >?>@=>9 B>G:8
m a c d l e v 1 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m a c d b a r 1 ) ;
/ / C@>25=L ;52>9 >?>@=>9 B>G:8
m a c d l e v 2 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m a c d b a r 2 ) ;
e s t m a c d l i n e = t r u e ;
}
}
/ / ?>?KB:0 ?>AB@>8BL :0A0B5;L=CN ;8=8N A25@EC 2=87 ?> <8=8<C<0< &
i f ( ( n i z n a k r b a r > l e f t g r m a c d 2 ) & & ( l e f t g r m a c d 2 > p r a v g r m a c d 2 ) & & ( p r a v g r m a c d 2 > b ) )
{
/ / @0AG5B ;52>9 >?>@=>9 B>G:8 :0A0B5;L=>9 A=87C ?> <8=8<C<0< & +
p r i c e b a r 2 = L e f t B a r D i v e r B u l l P r i c e ( l e f t g r m a c d 2 , l e v b a r n i z c e n , d n o c e n b a r , b ) ;
/ / @0AG5B ?@02>9 >?>@=>9 B>G:8 :0A0B5;L=>9 A=87C ?> <8=8<C<0< & +
p r i c e b a r 1 = R i g h t B a r D i v e r B u l l P r i c e ( p r i c e b a r 2 , b ) ;
i f ( ( p r i c e b a r 2 > p r i c e b a r 1 ) & & ( p r i c e b a r 1 > = d n o c e n b a r ) )
{
e s t p r i c e l i n e = t r u e ;
}
}
/ / >:>=G0B5;L=0O ?@>25@:0 A>>B=>H5=89 4;O =0;8G8O +', 4825@35=F88
i f ( ( L o w [ p r i c e b a r 2 ] > L o w [ p r i c e b a r 1 ] ) & & ( m a c d l e v 2 < m a c d l e v 1 ) & & ( e s t m a c d l i n e = = t r u e ) )
{
i f ( ( p r i c e b a r 1 < = l e v b a r n i z c e n ) & & ( p r i c e b a r 1 > = b ) & & ( e s t p r i c e l i n e = = t r u e ) )
{
d i v e r b u l l = t r u e ;
/ / ?>AB@>5=85 ;8=89 1KGL59 4825@35=F88
O b j e c t D e l e t e ( " M A C D B u l l D i v e r L i n e " ) ;
O b j e c t C r e a t e ( " M A C D B u l l D i v e r L i n e " , O B J _ T R E N D , 1 , T i m e [ m a c d b a r 2 ] , m a c d l e v 2 , T i m e [ m a c d b a r 1 ] , m a c d l e v 1 ) ;
O b j e c t D e l e t e ( " P R I C E B u l l D i v e r L i n e " ) ;
O b j e c t C r e a t e ( " P R I C E B u l l D i v e r L i n e " , O B J _ T R E N D , 0 , T i m e [ p r i c e b a r 2 ] , L o w [ p r i c e b a r 2 ] , T i m e [ p r i c e b a r 1 ] , L o w [ p r i c e b a r 1 ] ) ;
}
}
i f ( d i v e r b u l l = = f a l s e )
{
d i v e r b u l l = D i v e r B u l l ( b ) ;
}
r e t u r n ( d i v e r b u l l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: 25@H8=K F5= =0 10@5 , 5A;8 >=0 ACI5AB2C5B - 2>72@0I05< ;52CN 3@0=8FC
i n t L e v G r a n P i k a C e n y D i v e r B e a r ( d o u b l e s r e d t e l o , i n t b )
{
i n t l e v g r a n , l e v k r a i , t o t a l , p r e d v , s t , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
l e v g r a n = 0 ;
/ / ?@5420@8B5;L=0O ;520O 3@0=8F0
p r e d v = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = b + 1 2 0 ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
s t = b + 1 ;
/ / A25G0 =0 10@5 4>;60 1KBL ,/
i f ( O p e n [ b ] > C l o s e [ b ] )
{
/ / ?>8A: ?@5420@8B5;L=>9 ;52>9 3@0=8FK ( + F5=
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / 845< 2;52> 4> B5E ?>@, ?>:0 & +"/ " !'
i f ( ( C l o s e [ b ] < = O p e n [ i ] ) & & ( C l o s e [ b ] < = C l o s e [ i ] ) )
{
c o n t i n u e ;
}
e l s e
{
/ / ?@5420@8B5;L=0O ;520O 3@0=8F0 ( +
p r e d v = i ;
b r e a k ;
}
}
}
/ / 5A;8 ?@5420@8B5;L=0O 3@0=8F0 =0945=0
i f ( p r e d v > b )
{
/ / ;520O 3@0=8F0 - +',/ A25G0, F5=0 >B:@KB8O 70:@KB8O 10@0
i f ( ( O p e n [ p r e d v ] < C l o s e [ p r e d v ] ) & & ( O p e n [ p r e d v ] < C l o s e [ b ] ) )
{
l e v g r a n = p r e d v ;
}
}
/ / 5A;8 ;520O 3@0=8F0 =5 =0945=0 ?>?@>1C5< 2B>@>9 20@80=B
i f ( l e v g r a n = = 0 )
{
/ / A25G0 =0 10@5 4>;60 1KBL ,/
i f ( O p e n [ b ] > C l o s e [ b ] )
{
/ / ?>8A: ?@5420@8B5;L=>9 ;52>9 3@0=8FK ( + F5=
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / 845< 2;52> 4> B5E ?>@, ?>:0 & +"/ !'
i f ( C l o s e [ b ] < = L o w [ i ] )
{
c o n t i n u e ;
}
e l s e
{
/ / ;520O 3@0=8F0 ( +
l e v g r a n = i ;
b r e a k ;
}
}
}
}
/ / 5A;8 ;52CN 3@0=8FC =5 C40;>AL =09B8 ?@>1C5< 2B>@>9 20@80=B
i f ( l e v g r a n = = 0 )
{
l e v g r a n = R a s c h e t L e v g r V e r s h i n G O O D ( s r e d t e l o , b ) ;
}
r e t u r n ( l e v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: 10@0 =0 7040==>< >B@57:5 345 7=0G5=85 M A C D <0:A8<0;L=>, 0=0;>3 i H i g h e s t
i n t P o i s k B a r a H i g h e s t M A C D ( i n t k o l b a r o v , i n t b )
{
d o u b l e c u r m a c d , m a x m a c d ;
i n t i , s t , t o t a l , l e v k r a i , p i k b a r ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = b + k o l b a r o v ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
/ / 8A:><K9 10@ - >B25B, 2>72@0I05<K9 DC=:F859
p i k b a r = b ;
m a x m a c d = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , b ) ;
m a x m a c d = N o r m a l i z e D o u b l e ( m a x m a c d , 7 ) ;
/ / AB0@B>2K9 10@ F8:;0
s t = b + 1 ;
f o r ( i = s t ; i < t o t a l ; i + + )
{
c u r m a c d = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) ;
c u r m a c d = N o r m a l i z e D o u b l e ( c u r m a c d , 7 ) ;
i f ( c u r m a c d > m a x m a c d )
{
m a x m a c d = c u r m a c d ;
p i k b a r = i ;
}
}
r e t u r n ( p i k b a r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ! &+ ,( ( )
/ / " , #" "
i n t P r a v a y a G r a n V e r s h i n y M A C D 2 ( i n t m a c d b a r 1 )
{
d o u b l e L e v e l M A C D 1 , T e k L e v e l M A C D ;
i n t p r a v g r a n , l e v k r a i , t o t a l , s t , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
p r a v g r a n = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = m a c d b a r 1 + 4 0 0 ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
s t = m a c d b a r 1 + 1 ;
/ / C@>25=L =0 ?@02>9 ( <0;>9) 25@H8=5
L e v e l M A C D 1 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m a c d b a r 1 ) ;
L e v e l M A C D 1 = N o r m a l i z e D o u b l e ( L e v e l M A C D 1 , 7 ) ;
/ / ! &+ ,( ( ) 2
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / C@>25=L =0 B5:CI5< 10@5
T e k L e v e l M A C D = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) ;
T e k L e v e l M A C D = N o r m a l i z e D o u b l e ( T e k L e v e l M A C D , 7 ) ;
/ / 845< 2;52> 4> B5E ?>@, ?>:0 =865 8;8 @025= ?@02>9 25@H8=K
i f ( T e k L e v e l M A C D < = L e v e l M A C D 1 )
{
c o n t i n u e ;
}
e l s e
{
/ / ?@020O 3@0=8FK 25@H8=K =878=K
p r a v g r a n = i ;
b r e a k ;
}
}
r e t u r n ( p r a v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ! &+ ,( ( )
/ / " &+ "% , # "!/ ##. .
i n t L e v a y a G r a n V e r s h i n y M A C D 2 ( i n t p r a v g r a n )
{
d o u b l e T e k L e v e l M A C D ;
i n t l e v g r a n , l e v k r a i , t o t a l , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
l e v g r a n = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = p r a v g r a n + 4 0 0 ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
/ / ! &+ ,( ( )
f o r ( i = p r a v g r a n ; i < t o t a l ; i + + )
{
/ / C@>25=L =0 B5:CI5< 10@5
T e k L e v e l M A C D = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) ;
T e k L e v e l M A C D = N o r m a l i z e D o u b l e ( T e k L e v e l M A C D , 7 ) ;
/ / 845< 2;52> 4> B5E ?>@, ?>:0 =5 C?@5BAO 2 =C;52CN ;8=8N
i f ( T e k L e v e l M A C D > 0 )
{
c o n t i n u e ;
}
e l s e
{
/ / ;520O 3@0=8F0 3;C1>:>9 =878=K
l e v g r a n = i - 1 ;
b r e a k ;
}
}
r e t u r n ( l e v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 2KG8A;5=85 ?@02>9 B>G:8 >?>@K m a c d b a r 1 :0A0B5;L=>9 ;8=88 A25@EC ?> ?8:0<
/ / =C6=> GB>1K 2 B>G:5 m a c d b a r 2 8=48:0B>@ 1K; A0<K9 2KA>:89 =0 >B@57:5
/ / ?@82O7K205< ?;0=:C : 2 B>G:5 m a c d b a r 2 8 >?CA:05< 2=87 55 ?@02K9 :>=5F
/ / >?@545;O5< =><5@ 10@0 m a c d b a r 1 345 ?;0=:0 C?5@;0AL 2 8=48:0B>@
/ / =0 >B@57:5 A m a c d b a r 2 ?> , MB> 1C45B ?@020O B>G:0 4;O :0A0B5;L=>9 ;8=88
i n t M A C D B e a r D i v e r R i g h t B a r ( i n t m a c d b a r 2 , i n t b )
{
d o u b l e y i , m a c d l e v 2 , m a c d l e v i , k o e f f c u r , k o e f f m i n ;
i n t i , x i , s t , m a c d b a r 1 ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
m a c d b a r 1 = 0 ;
/ / ;52K9 25@E=89 C@>25=L <0:A8<C<0 M A C D =0 10@5 m a c d b a r 2
m a c d l e v 2 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m a c d b a r 2 ) ;
m a c d l e v 2 = N o r m a l i z e D o u b l e ( m a c d l e v 2 , 7 ) ;
/ / @0AAB>O=85 >B =C;52>9 ;8=88 - ?> 25@B8:0;8 45;8< =0 >48= 10@
k o e f f m i n = M a t h A b s ( m a c d l e v 2 ) ;
/ / AB0@B>2K9 10@ F8:;0 ?>8A:0
s t = m a c d b a r 2 - 1 ;
/ / 8I5< 10@, 345 =08<5=LH89 :>MDD =0:;>=0 k o e f f c u r 4;O :0A0B5;L=>9 ;8=88
f o r ( i = s t ; i > = b ; i - - )
{
m a c d l e v i = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) ;
m a c d l e v i = N o r m a l i z e D o u b l e ( m a c d l e v i , 7 ) ;
/ / @0AAB>O=85 ?> >A8 X <564C >?>@=K<8 B>G:0<8 :0A0B5;L=>9 ;8=88
x i = m a c d b a r 2 - i ;
/ / @0AAB>O=85 ?> >A8 Y <564C >?>@=K<8 B>G:0<8 :0A0B5;L=>9 ;8=88
y i = m a c d l e v 2 - m a c d l e v i ;
k o e f f c u r = y i / x i ;
k o e f f c u r = N o r m a l i z e D o u b l e ( k o e f f c u r , 7 ) ;
i f ( k o e f f c u r < k o e f f m i n )
{
k o e f f m i n = k o e f f c u r ;
m a c d b a r 1 = i ;
}
}
r e t u r n ( m a c d b a r 1 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / @0AG5B ;52>3> >?>@=>3> 10@0 4;O :0A0B5;L=>9 ;8=88 A25@EC ?>
/ / 2E>4OI85 ?0@0<5B@K - 10@ ( + , ?@>25@O5<K9 10@
/ / 15@5< 87 2A5E 2>7<>6=KE :0A0B5;L=CN ;8=8N <0:A8<0;L=>9 4;8=K, => 1;87:> :
i n t M A C D B e a r D i v e r L e f t B a r ( i n t v e r x m a c d b a r , i n t l e v g r p i k c e n , i n t b )
{
i n t l e v y i b a r , p r a v b a r , m a c d b a r 2 , m a c d b a r 1 , d l i n c u r , d l i n m a x , s t , i ;
b o o l e s t l i n e ;
/ / C40;>AL ;8 2>>1I5 ?>AB@>8BL :0A0B5;L=CN ;8=8N
e s t l i n e = f a l s e ;
/ / 8A:><K5 =><5@0 10@>2 4;O :0A0B5;L=>9 ;8=88
m a c d b a r 2 = 0 ;
m a c d b a r 1 = 0 ;
/ / ;52K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
l e v y i b a r = v e r x m a c d b a r ;
/ / ?@02K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
p r a v b a r = v e r x m a c d b a r ;
/ / =081>;LH55 @0AAB>O=85 <564C 10@0<8 >?>@ :0A0B5;L=>9 ;8=88
d l i n m a x = 0 ;
/ / B5:CI55 @0AAB>O=85 <564C 10@0<8 >?>@ :0A0B5;L=>9 ;8=88
d l i n c u r = 0 ;
/ / AB0@B>2K9 10@ F8:;0 ?>8A:0
s t = v e r x m a c d b a r - 1 ;
f o r ( i = s t ; i > = b ; i - - )
{
/ / 45;05< (, 8I5< #. " '# + 4;O :0A0B5;L=>9 ;8=88
p r a v b a r = M A C D B e a r D i v e r R i g h t B a r ( l e v y i b a r , b ) ;
/ / 5A;8 :0A0B5;L=CN ;8=8N C40;>AL ?>AB@>8BL
i f ( ( p r a v b a r > = b ) & & ( p r a v b a r < l e v y i b a r ) )
{
e s t l i n e = t r u e ;
/ / B5:CI55 @0AAB>O=85 <564C B>G:0<8 >?>@K :0A0B5;L=>9 ;8=88
d l i n c u r = l e v y i b a r - p r a v b a r ;
/ / 70?><8=05< 10@K =0 :>B>@KE 4;8=0 ;8=88 <0:A8<0;L=0O
i f ( ( d l i n c u r > d l i n m a x ) & & ( p r a v b a r < = l e v g r p i k c e n ) )
{
d l i n m a x = d l i n c u r ;
m a c d b a r 2 = l e v y i b a r ;
m a c d b a r 1 = p r a v b a r ;
}
/ / 2 :>=F5 H030 ?5@5AB02;O5< ;52CN >?>@=CN B>G:C =0 <5AB> ?@02>9
l e v y i b a r = p r a v b a r ;
}
e l s e
{
/ / 5A;8 ;8=8N ?>AB@>8BL =5 C40;>AL - 7025@H05< ?>8A:
b r e a k ;
}
/ / 5A;8 4>H;8 4> 10@0 - 7025@H05< ?>8A:
i f ( p r a v b a r = = b )
{
b r e a k ;
}
}
/ / 5A;8 4;8=0 ;8=88 4>AB0B>G=0O 2>72@0I05< =><5@ ;52>3> 10@0
i f ( ( d l i n m a x > 3 ) & & ( e s t l i n e = = t r u e ) )
{
r e t u r n ( m a c d b a r 2 ) ;
}
r e t u r n ( 0 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 2KG8A;5=85 ?@02>9 B>G:8 >?>@K 4;O :0A0B5;L=>9 ;8=88 ?> ! # F5=
/ / 0;3>@8B< ?@82O7K205< ;52K9 :>=5F ?;0=:8 : H i g h [ l e v c e n b a r ] 8 A<>B@8< =0 :0:><
/ / 10@5 1C45B 4@C3>9 :>=5F ?;0=:8 p r a v c e n b a r - 10@ B>G:8 >?>@K ;8=88 B@5=40
/ / ?@>2>@>B ?;0=:8 ?> G0A>2>9 AB@5;:5, =0G0;> 42865=8O - 10@ l e v c e n b a r
i n t R i g h t B a r D i v e r B E A R P r i c e ( i n t l e v c e n b a r , i n t b )
{
d o u b l e y i , k o e f f c u r , k o e f f m a x ;
i n t i , x i , s t , p r a v c e n b a r ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
p r a v c e n b a r = 0 ;
/ / <0:A8<0;L=K9 :>5DD8F85=B =0:;>=0 :0A0B5;L=>9 ;8=88
k o e f f m a x = 0 ;
/ / AB0@B>2K9 10@ F8:;0 ?>8A:0
s t = l e v c e n b a r - 1 ;
/ / 8I5< <8=8<0;L=K9 :>MDD 4;O C@02=5=8O ?@O<>9 ;8=88, =0< =C65= 10@,
/ / :>B>@K9 A2>8< 4=>< A8;L=5 2A53> ?>4=O; ?@02K9 :>=5F ?;0=:8
f o r ( i = s t ; i > = b ; i - - )
{
/ / =0:;>= 4>;65= 1KBL A=87C 225@E A;520 =0?@02>
i f ( H i g h [ l e v c e n b a r ] < H i g h [ i ] )
{
x i = l e v c e n b a r - i ;
y i = H i g h [ i ] - H i g h [ l e v c e n b a r ] ;
y i = y i / P o i n t ;
k o e f f c u r = y i / x i ;
k o e f f c u r = N o r m a l i z e D o u b l e ( k o e f f c u r , 7 ) ;
i f ( k o e f f c u r > k o e f f m a x )
{
k o e f f m a x = k o e f f c u r ;
p r a v c e n b a r = i ;
}
}
}
r e t u r n ( p r a v c e n b a r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >B ;52>9 3@0=8FK 845< 4> ( + & , 2KG8A;O5< :0A0B5;L=CN ;8=8N F5=K
/ / 70?><8=05< 2 10@0, =0 :>B>@KE ;8=8O 1K;0 <0:A8<0;L=>9 4;8=K, => 1;87:> :
/ / 2>72@0I05< =><5@ o t v e t l e f t b a r ;52>9 B>G:8 >?>@K 4;O :0A0B5;L=>9 ;8=88 &
i n t L e f t B a r D i v e r B E A R P r i c e ( i n t l e v g r n m a c d , i n t l e v g r p i k , i n t p i k c e n b a r , i n t b )
{
i n t l e v y i b a r , p r a v b a r , d l i n a c u r , d l i n a m a x , o t v e t l e f t b a r , o t v e t p r a v b a r , s t , i ;
b o o l e s t l i n e ;
/ / C40;>AL ;8 2>>1I5 ?>AB@>8BL :0A0B5;L=CN ;8=8N
e s t l i n e = f a l s e ;
/ / <0:A8<0;L=0O 4;8==0 :0A0B5;L=>9 ;8=88 =0 CG0AB:5
d l i n a m a x = 0 ;
/ / 8A:><K5 =><5@0 10@>2 4;O :0A0B5;L=>9 ;8=88
o t v e t l e f t b a r = 0 ;
o t v e t p r a v b a r = 0 ;
/ / ;52K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
l e v y i b a r = l e v g r n m a c d ;
/ / ?@02K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
p r a v b a r = 0 ;
/ / AB0@B>2K9 10@ F8:;0 ?>8A:0
s t = l e v g r n m a c d - 1 ;
f o r ( i = s t ; i > = b ; i - - )
{
/ / ?@02K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
p r a v b a r = R i g h t B a r D i v e r B E A R P r i c e ( l e v y i b a r , b ) ;
/ / 5A;8 :0A0B5;L=CN ;8=8N C40;>AL ?>AB@>8BL
i f ( ( p r a v b a r > = p i k c e n b a r ) & & ( p r a v b a r < l e v y i b a r ) )
{
e s t l i n e = t r u e ;
/ / B5:CI55 @0AAB>O=85 <564C B>G:0<8 >?>@K :0A0B5;L=>9 ;8=88
d l i n a c u r = l e v y i b a r - p r a v b a r ;
/ / 70?><8=05< 10@K =0 :>B>@KE 4;8=0 ;8=88 <0:A8<0;L=0O
i f ( ( d l i n a c u r > d l i n a m a x ) & & ( p r a v b a r < = l e v g r p i k ) )
{
d l i n a m a x = d l i n a c u r ;
o t v e t l e f t b a r = l e v y i b a r ;
o t v e t p r a v b a r = p r a v b a r ;
}
/ / 2 :>=F5 H030 ?5@5AB02;O5< ;52CN >?>@=CN B>G:C =0 <5AB> ?@02>9
l e v y i b a r = p r a v b a r ;
}
e l s e
{
/ / 5A;8 ;8=8N ?>AB@>8BL =5 C40;>AL - 7025@H05< ?>8A:
b r e a k ;
}
/ / 5A;8 4>H;8 4> 10@0 p i k c e n b a r - 7025@H05< ?>8A:
i f ( p r a v b a r = = p i k c e n b a r )
{
b r e a k ;
}
}
/ / 5A;8 4;8=0 ;8=88 4>AB0B>G=0O 2>72@0I05< =><5@ ;52>3> 10@0
i f ( ( d l i n a m a x > 3 ) & & ( e s t l i n e = = t r u e ) )
{
r e t u r n ( o t v e t l e f t b a r ) ;
}
r e t u r n ( 0 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 0;3>@8B< ?>8A:0 <54256L59 4825@35=F88 - A=0G0;0 8I5< 25@H8=C F5= 2>7;5 10@0
/ / 5ABL 425 >1;0AB8 - >B@57:0 =0 CG0AB:5 10@>2 ;520O 2 8 ?@020O 1
/ / ?@020O - MB> 345 =0E>48BAO 25@H8=0 F5=, =0 MB>< 65 CG0AB:5 8I5< 25@H8=C
/ / ;520O >1;0ABL - MB> 1>;55 2KA>:0O 25@H8=0 , 345 >=0 2KH5 ?@02>3> C@>2=O
b o o l D i v e r B e a r O X O T N I K 7 7 7 ( d o u b l e s r e d t e l o , i n t b )
{
d o u b l e m a c d l e v 2 , m a c d l e v 1 , m a c d l e v b ;
i n t l e v b a r p i k c e n , k o l t o t p i k c e n , p i k c e n b a r , m a c d b a r 2 , m a c d b a r 1 , d a l n o s t p i k a , g l a v n i z v e r c e n ;
i n t p r a v g r m a c d 2 , l e f t g r m a c d 2 , k o l t o t m a c d 2 , p r i c e b a r 2 , p r i c e b a r 1 , p i k n a k r b a r ;
b o o l d i v e r b e a r , e s t m a c d l i n e , e s t p r i c e l i n e , p r o b g l a v n i z a ;
d i v e r b e a r = f a l s e ; e s t m a c d l i n e = f a l s e ; e s t p r i c e l i n e = f a l s e ; p r o b g l a v n i z a = f a l s e ;
l e v b a r p i k c e n = 0 ; k o l t o t p i k c e n = 0 ; p i k c e n b a r = 0 ; m a c d b a r 2 = 0 ; m a c d b a r 1 = 0 ;
k o l t o t m a c d 2 = 0 ; m a c d l e v 2 = 0 ; m a c d l e v 1 = 0 ; p r i c e b a r 2 = 0 ; p r i c e b a r 1 = 0 ;
p r a v g r m a c d 2 = 0 ; l e f t g r m a c d 2 = 0 ; d a l n o s t p i k a = 0 ; p i k n a k r b a r = 0 ; g l a v n i z v e r c e n = 0 ;
/ / ?>8A: ;52>3> :@0O 25@H8=K F5=
l e v b a r p i k c e n = L e v G r a n P i k a C e n y D i v e r B e a r ( s r e d t e l o , b ) ;
/ / ?@>25@:0 =0;8G8O ?@>1>O 3;02=>9 =878=:8 2=CB@8 25@H8=K F5=
i f ( l e v b a r p i k c e n > b )
{
/ / ?>8A: 3;02=>9 =878=:8 2=CB@8 25@H8=K F5=
g l a v n i z v e r c e n = P o i s k G l a v n o g o N i z a ( l e v b a r p i k c e n , b ) ;
i f ( ( O p e n [ b ] > L o w [ g l a v n i z v e r c e n ] ) & & ( C l o s e [ b ] < L o w [ g l a v n i z v e r c e n ] ) )
{
p r o b g l a v n i z a = t r u e ;
}
}
/ / C@>25=L =0 10@5
m a c d l e v b = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , ( b + 1 ) ) ;
/ / 5A;8 D83C@0 =878=K F5= =0945=0, 8I5< 10@ - <8=8<C< F5=
i f ( ( l e v b a r p i k c e n > b ) & & ( ( m a c d l e v b > 0 ) | | ( p r o b g l a v n i z a = = t r u e ) ) )
{
/ / '!" ( + &
k o l t o t p i k c e n = l e v b a r p i k c e n - b + 1 ;
/ / ( + &
p i k c e n b a r = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , k o l t o t p i k c e n , b ) ;
/ / 40;L=>ABL ?8:0 25@H8=K F5=
d a l n o s t p i k a = S l e v a B a r o v O t V e r s h i n y ( p i k c e n b a r ) ;
/ / ?@545;L=K9 ;52K9 10@ =0:@KB8O 25@H8=K F5=
p i k n a k r b a r = b + d a l n o s t p i k a ;
/ / ?>8A: 10@0 =0 CG0AB:5 25@H8=K F5=, 345 =0945=> <0:A8<0;L=>5 7=0G5=85
m a c d b a r 1 = P o i s k B a r a H i g h e s t M A C D ( k o l t o t p i k c e n , b ) ;
/ / C@>25=L ?@02>9 25@H8=K
m a c d l e v 1 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m a c d b a r 1 ) ;
/ / ! &+ ,( ( ) 2
p r a v g r m a c d 2 = P r a v a y a G r a n V e r s h i n y M A C D 2 ( m a c d b a r 1 ) ;
}
/ / 5A;8 ?@020O 3@0=8FK 1>;LH>3> ;52>3> ?8:0 =0945=0
i f ( ( p r a v g r m a c d 2 > l e v b a r p i k c e n ) & & ( l e v b a r p i k c e n > b ) )
{
/ / ! &+ ,( ( )
l e f t g r m a c d 2 = L e v a y a G r a n V e r s h i n y M A C D 2 ( p r a v g r m a c d 2 ) ;
/ / 5A;8 ;520O 3@0=8F0 =0945=0
i f ( l e f t g r m a c d 2 > p r a v g r m a c d 2 )
{
/ / ?>;=>5 :>;8G5AB2> 10@>2 ;52>9 =878=K 2
k o l t o t m a c d 2 = l e f t g r m a c d 2 - p r a v g r m a c d 2 + 1 ;
/ / 25@E=89 10@ ;52>9 25@H8=K 2
m a c d b a r 2 = P o i s k B a r a H i g h e s t M A C D ( k o l t o t m a c d 2 , p r a v g r m a c d 2 ) ;
/ / C@>25=L 25@H8=K 2
m a c d l e v 2 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m a c d b a r 2 ) ;
}
}
/ / ?>?KB:0 ?>AB@>8BL :0A0B5;L=CN ;8=8N A25@EC 2=87 ?>
i f ( ( m a c d l e v 1 > 0 ) & & ( m a c d l e v 2 > m a c d l e v 1 ) )
{
/ / @0AG5B ;52>9 >?>@=>9 B>G:8 :0A0B5;L=>9 A25@EC ?>
m a c d b a r 2 = M A C D B e a r D i v e r L e f t B a r ( m a c d b a r 2 , l e v b a r p i k c e n , b ) ;
/ / @0AG5B ?@02>9 >?>@=>9 B>G:8 B>G:8 :0A0B5;L=>9 A=87C ?>
m a c d b a r 1 = M A C D B e a r D i v e r R i g h t B a r ( m a c d b a r 2 , b ) ;
i f ( ( m a c d b a r 2 > m a c d b a r 1 ) & & ( m a c d b a r 1 > = b ) )
{
/ / C@>25=L ?@02>9 >?>@=>9 B>G:8
m a c d l e v 1 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m a c d b a r 1 ) ;
/ / C@>25=L ;52>9 >?>@=>9 B>G:8
m a c d l e v 2 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m a c d b a r 2 ) ;
e s t m a c d l i n e = t r u e ;
}
}
/ / ?>?KB:0 ?>AB@>8BL :0A0B5;L=CN ;8=8N A=87C 225@E ?> ?8:0< &
i f ( ( p i k n a k r b a r > l e f t g r m a c d 2 ) & & ( l e f t g r m a c d 2 > p r a v g r m a c d 2 ) & & ( p r a v g r m a c d 2 > b ) )
{
/ / @0AG5B ;52>9 >?>@=>9 B>G:8 :0A0B5;L=>9 A=87C 225@E ?> ?8:0< & +
p r i c e b a r 2 = L e f t B a r D i v e r B E A R P r i c e ( l e f t g r m a c d 2 , l e v b a r p i k c e n , p i k c e n b a r , b ) ;
/ / @0AG5B ?@02>9 >?>@=>9 B>G:8 :0A0B5;L=>9 A=87C 225@E ?> ?8:0< & +
p r i c e b a r 1 = R i g h t B a r D i v e r B E A R P r i c e ( p r i c e b a r 2 , b ) ;
i f ( ( p r i c e b a r 2 > p r i c e b a r 1 ) & & ( p r i c e b a r 1 > = p i k c e n b a r ) )
{
e s t p r i c e l i n e = t r u e ;
}
}
/ / >:>=G0B5;L=0O ?@>25@:0 A>>B=>H5=89 4;O =0;8G8O , 4825@35=F88
i f ( ( H i g h [ p r i c e b a r 2 ] < H i g h [ p r i c e b a r 1 ] ) & & ( m a c d l e v 2 > m a c d l e v 1 ) & & ( e s t m a c d l i n e = = t r u e ) )
{
i f ( ( p r i c e b a r 1 < = l e v b a r p i k c e n ) & & ( p r i c e b a r 1 > = b ) & & ( e s t p r i c e l i n e = = t r u e ) )
{
d i v e r b e a r = t r u e ;
O b j e c t D e l e t e ( " M A C D B e a r D i v e r L i n e " ) ;
O b j e c t C r e a t e ( " M A C D B e a r D i v e r L i n e " , O B J _ T R E N D , 1 , T i m e [ m a c d b a r 2 ] , m a c d l e v 2 , T i m e [ m a c d b a r 1 ] , m a c d l e v 1 ) ;
O b j e c t D e l e t e ( " P R I C E B e a r D i v e r L i n e " ) ;
O b j e c t C r e a t e ( " P R I C E B e a r D i v e r L i n e " , O B J _ T R E N D , 0 , T i m e [ p r i c e b a r 2 ] , H i g h [ p r i c e b a r 2 ] , T i m e [ p r i c e b a r 1 ] , H i g h [ p r i c e b a r 1 ] ) ;
}
}
i f ( d i v e r b e a r = = f a l s e )
{
d i v e r b e a r = D i v e r B e a r ( b ) ;
}
r e t u r n ( d i v e r b e a r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 =0;8G8O +', D81> A5B:8 8 55 ?>AB@>5=85 =0 3@0D8:5
b o o l F i b o S e t k a B u l l O x o t n i k C H E C K ( d o u b l e S r e d n B a r , i n t b )
{
d o u b l e v i s o t a s e t k i , k o e f f v i s o t ;
i n t l e v g r n i z o t k , l e v g r p i k a 1 0 0 , k o l b a r n i z o t k , l e v g r b i g n i z 0 , p i k b a r o b s h ;
i n t k o l b a r p i k a 1 0 0 , p i k b a r 1 0 0 , n a c h n i z b a r 0 , r o s t k o l b a r s , b a r o t k a t a ;
i n t d a l n b i g n i z a , o b s h k o l b a r , s p r a v a p i k a b a r o v , s p r a v a p i k a n i z b a r , s t ;
b o o l f i r s t c h e c k , o t k a t s o v p a l , e s t f i b o s e t k a ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
f i r s t c h e c k = f a l s e ; o t k a t s o v p a l = f a l s e ; e s t f i b o s e t k a = f a l s e ;
l e v g r n i z o t k = 0 ; l e v g r p i k a 1 0 0 = 0 ; k o l b a r n i z o t k = 0 ; b a r o t k a t a = 0 ; d a l n b i g n i z a = 0 ;
o b s h k o l b a r = 0 ; k o l b a r p i k a 1 0 0 = 0 ; p i k b a r 1 0 0 = 0 ; l e v g r b i g n i z 0 = 0 ; p i k b a r o b s h = 0 ;
r o s t k o l b a r s = 0 ; n a c h n i z b a r 0 = 0 ; s p r a v a p i k a b a r o v = 0 ; s p r a v a p i k a n i z b a r = 0 ;
v i s o t a s e t k i = 0 ; k o e f f v i s o t = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 10@ A;520 >B 10@0
s t = b + 1 ;
/ / ;520O 3@0=8F0 + >B:0B0, 345 1K; >BA:>: % >B D81> C@>2=O
l e v g r n i z o t k = L e v g r N i z i n y O t k a t a F i b o B U L L ( b ) ;
/ / 5A;8 ;520O 3@0=8F0 + >B:0B0 =0945=0
i f ( l e v g r n i z o t k > b )
{
/ / ?>;=>5 :>;8G5AB2> 10@>2 + >B:0B0
k o l b a r n i z o t k = l e v g r n i z o t k - b + 1 ;
/ / =86=89 10@ =878=K >B:0B0 - 345 =0G0;AO >BA:>: 225@E
b a r o t k a t a = i L o w e s t ( N U L L , 0 , M O D E _ L O W , k o l b a r n i z o t k , b ) ;
/ / ;520O 3@0=8F0 ( +, :>B>@0O 2:;NG05B 2 A51O 10@ 1 0 0
l e v g r p i k a 1 0 0 = L e v g r V e r s h i n y F i b o B U L L ( b a r o t k a t a ) ;
/ / 5A;8 ;520O 3@0=8F0 ( + =0945=0
i f ( l e v g r p i k a 1 0 0 > l e v g r n i z o t k )
{
/ / ?>;=>5 :>;8G5AB2> 10@>2 ( +, :>B>@0O 2:;NG05B 2 A51O 10@ 1 0 0
k o l b a r p i k a 1 0 0 = l e v g r p i k a 1 0 0 - b ;
/ / 25@E=89 10@ ( +, :>B>@0O 2:;NG05B 2 A51O 10@ 1 0 0
p i k b a r 1 0 0 = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , k o l b a r p i k a 1 0 0 , s t ) ;
/ / ;520O 3@0=8F0 ,( AB0@B>2>9 + F5=, 345 =0E>48BAO C@>25=L 0
l e v g r b i g n i z 0 = L e v g r H U G E N I Z F i b o B U L L ( p i k b a r 1 0 0 ) ;
/ / 5A;8 ;520O 3@0=8F0 ,( AB0@B>2>9 + F5= =0945=0
i f ( l e v g r b i g n i z 0 > l e v g r p i k a 1 0 0 )
{
/ / ?>8A: =0G0;L=>3> 10@0 0 +', D81> A5B:8 - 845< 2?@02> >B 3@0=8FK
n a c h n i z b a r 0 = R a s c h e t N a c h a l a F i b o B U L L ( l e v g r b i g n i z 0 , l e v g r p i k a 1 0 0 ) ;
/ / :>;8G5AB2> 10@>2 =0 CG0AB:5 @>AB0 >B 10@0 0 : 10@C 1 0 0
r o s t k o l b a r s = n a c h n i z b a r 0 - p i k b a r 1 0 0 + 1 ;
/ / >1I55 :>;8G5AB2> 10@>2 =0 >B@57:5 >B 10@0 0 4> 10@0
o b s h k o l b a r = n a c h n i z b a r 0 - b + 1 ;
/ / 40;L=>ABL 3;02=>9 =878=K D81> A5B:8 2;52>
d a l n b i g n i z a = S l e v a B a r o v O t N i z i n y ( n a c h n i z b a r 0 ) ;
/ / 3;02=K9 ?8: =0 >1I5< CG0AB:5 >B 10@0 0 4> 10@0
p i k b a r o b s h = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , o b s h k o l b a r , s t ) ;
/ / 2KA>B0 D81> A5B:8 2 ?C=:B0E
v i s o t a s e t k i = H i g h [ p i k b a r 1 0 0 ] - L o w [ n a c h n i z b a r 0 ] ;
v i s o t a s e t k i = v i s o t a s e t k i / P o i n t ;
/ / @0AG5B :>MDD8F85=B0 2KA>BK D81> A5B:8 : A@54=5<C @07<5@C 10@0
k o e f f v i s o t = v i s o t a s e t k i / S r e d n B a r ;
k o e f f v i s o t = N o r m a l i z e D o u b l e ( k o e f f v i s o t , 1 ) ;
i f ( ( p i k b a r o b s h = = p i k b a r 1 0 0 ) & & ( k o e f f v i s o t > K o e f f F i b o S r e d n B a r M I N ) )
{
/ / A;520 >B =878=K 4>;6=> 1KBL 1>;LH5 10@>2, G5< A?@020
i f ( ( d a l n b i g n i z a > r o s t k o l b a r s ) & & ( o b s h k o l b a r > S h i r i n a F i b o S e t k i M I N ) )
{
f i r s t c h e c k = t r u e ;
}
}
}
}
}
/ / 5A;8 ?5@2>5 CA;>285 2K?>;=5=> ?@>25@8< B>G=>ABL >BA:>:0 >B D81> C@>2=O
i f ( f i r s t c h e c k = = t r u e )
{
/ / ?>;=>5 :>;8G5AB2> 10@>2 ?@02>9 =878=K - >B ?8:0 1 0 0 4> 10@0
s p r a v a p i k a b a r o v = p i k b a r 1 0 0 - b + 1 ;
/ / =><5@ =86=53> 10@0 ?@02>9 =878=K - >B ?8:0 1 0 0 4> 10@0
s p r a v a p i k a n i z b a r = i L o w e s t ( N U L L , 0 , M O D E _ L O W , s p r a v a p i k a b a r o v , b ) ;
/ / ?@>25@:0 =0 A>2?045=85 =878=K >B:0B0 A >4=8< 87 D81> C@>2=59
o t k a t s o v p a l = P r o v e r k a O t k a t a F i b o B U L L ( n a c h n i z b a r 0 , p i k b a r 1 0 0 , l e v g r n i z o t k , b a r o t k a t a , b ) ;
i f ( ( o t k a t s o v p a l = = t r u e ) & & ( b a r o t k a t a = = s p r a v a p i k a n i z b a r ) )
{
e s t f i b o s e t k a = t r u e ;
O b j e c t C r e a t e ( " F i b o B u l l O X O T N I K 7 7 7 " , O B J _ F I B O , 0 , T i m e [ p i k b a r 1 0 0 ] , H i g h [ p i k b a r 1 0 0 ] , T i m e [ n a c h n i z b a r 0 ] , L o w [ n a c h n i z b a r 0 ] ) ;
/ / M e s s a g e B o x ( " +',/ $ !" !" " ) ;
}
}
r e t u r n ( e s t f i b o s e t k a ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?5@2K9 H03 2 ?>AB@>5=88 1KGL59 D81> A5B:8 ?>8A: =878=K, 345 1K; >BA:>: >B C@>2=O
/ / 2 A;CG05 CA?5E0 2>72@0I05B =><5@ 10@0 - ;520O 3@0=8F0 =878=K, ;81> 0
i n t L e v g r N i z i n y O t k a t a F i b o B U L L ( i n t b )
{
i n t l e v g r a n , l e v k r a i , t o t a l , p r e d v , s t , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
l e v g r a n = 0 ;
/ / ?@5420@8B5;L=0O ;520O 3@0=8F0
p r e d v = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = b + 1 5 0 ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
s t = b + 1 ;
/ / A25G0 =0 10@5 4>;60 1KBL +',/
i f ( O p e n [ b ] < C l o s e [ b ] )
{
/ / ?>8A: ?@5420@8B5;L=>9 ;52>9 3@0=8FK + F5=
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / 845< 2;52> 4> B5E ?>@, ?>:0 & +"/ +( " !'
i f ( ( C l o s e [ b ] > O p e n [ i ] ) & & ( C l o s e [ b ] > C l o s e [ i ] ) )
{
c o n t i n u e ;
}
e l s e
{
/ / ?@5420@8B5;L=0O ;520O 3@0=8F0 +
p r e d v = i ;
b r e a k ;
}
}
}
/ / 5A;8 ?@5420@8B5;L=0O 3@0=8F0 =0945=0
i f ( p r e d v > b )
{
/ / ;520O 3@0=8F0 - ,/ A25G0, F5=0 >B:@KB8O 2KH5 70:@KB8O 10@0
i f ( ( O p e n [ p r e d v ] > C l o s e [ p r e d v ] ) & & ( O p e n [ p r e d v ] > = C l o s e [ b ] ) )
{
l e v g r a n = p r e d v ;
}
}
r e t u r n ( l e v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: 25@H8=K 2=CB@8 :>B>@>9 =0E>48BAO 10@ 1 0 0 1KGL59 D81> A5B:8
/ / 2 A;CG05 CA?5E0 2>72@0I05B ;52CN 3@0=8FC 25@H8=K, ;81> 0
i n t L e v g r V e r s h i n y F i b o B U L L ( i n t n i z b a r )
{
d o u b l e n i z l e v e l ;
i n t l e v g r a n , l e v k r a i , t o t a l , s t , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
l e v g r a n = 0 ;
/ / C@>25=L <8=8<C<0 F5= =0 CG0AB:5 ?>8A:0 ;52>9 3@0=8FK
n i z l e v e l = L o w [ n i z b a r ] ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = n i z b a r + 4 0 0 ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
s t = n i z b a r + 1 ;
/ / ?>8A: ?@5420@8B5;L=>9 ;52>9 3@0=8FK ( + F5=
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / ;520O 3@0=8F0 25@H8=K - 1KGLO A25G0 A =87:>9 F5=>9 >B:@KB8O
i f ( ( O p e n [ i ] < C l o s e [ i ] ) & & ( O p e n [ i ] < n i z l e v e l ) )
{
l e v g r a n = i ;
b r e a k ;
}
}
r e t u r n ( l e v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: ;52>9 3@0=8FK 1>;LH>9 =878=K, 345 =0E>48BAO C@>25=L 0 1KGL59 D81> A5B:8
/ / 2 A;CG05 CA?5E0 2>72@0I05B ;52CN 3@0=8FC 25@H8=K, ;81> 0
i n t L e v g r H U G E N I Z F i b o B U L L ( i n t p i k b a r 1 0 0 )
{
i n t l e v g r a n , l e v k r a i , t o t a l , s t , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
l e v g r a n = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = p i k b a r 1 0 0 + 1 2 0 0 ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
s t = p i k b a r 1 0 0 + 1 ;
/ / ?>8A: ?@5420@8B5;L=>9 ;52>9 3@0=8FK + F5=
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / ;520O 3@0=8F0 ,( + - B0< 345 2?5@2K9 ?@>18B ?8: 1 0 0
i f ( H i g h [ i ] > H i g h [ p i k b a r 1 0 0 ] )
{
l e v g r a n = i ;
b r e a k ;
}
}
r e t u r n ( l e v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" !" " " ' 0 / !" / +', $ !"
i n t R a s c h e t N a c h a l a F i b o B U L L ( i n t l e v g r n i z , i n t l e v g r p i k )
{
d o u b l e n i z l e v e l ;
i n t n a c h b a r 0 , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
n a c h b a r 0 = 0 ;
n i z l e v e l = L o w [ l e v g r n i z ] ;
/ / ?>8A: A0<>3> =86=53> ?@02>3> 10@0 - =0G0;0 0 D81> A5B:8
f o r ( i = l e v g r n i z ; i > = l e v g r p i k ; i - - )
{
i f ( L o w [ i ] < = n i z l e v e l )
{
n i z l e v e l = L o w [ i ] ;
n a c h b a r 0 = i ;
}
}
r e t u r n ( n a c h b a r 0 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 =0 B>G=>5 A>2?045=85 =878=K >B:0B0 A C:070==K< 2 ?0@0<5B@0E D81> C@>2=5<
/ / ?@>25@O5< 420 20@80=B0 - ?> <8=8<C<C >B:0B0, ;81> ?> =86=5<C C@>2=N B5; A25G59
/ / ?@>F5=B C@>2=O C:07K20BL =C6=> B@5E7=0G=K9 2 7=0:0 + 1 ?>A;5 70?OB>9 :0: F5;>5
b o o l T o c h n F i b o L e v e l B U L L ( i n t f i b o p r o c , i n t n i z n b a r 0 , i n t p i k b a r 1 0 0 , i n t l e v g r n i z o t k , i n t b a r o t k a t a , i n t b )
{
d o u b l e t e k f i b o l e v e l , v i s o t a s e t k i , s d v i g l e v e l , o t k l o n l o w , o t k l o n t e l , o t k l o n m a x , o t k l o n m i n , l e v e l n i z t e l ;
i n t k o l b a r n i z o t k ;
b o o l t o c h n o t k a t ;
/ / >B25B 2>72@0I05<K9 DC=:F859 - 5ABL ;8 B>G=>5 A>2?045=85 =878=K >B:0B0 A D81> C@>2=5< 8;8 =5B
t o c h n o t k a t = f a l s e ;
/ / ?>;=0O 2KA>B0 D81> A5B:8 # "%
v i s o t a s e t k i = H i g h [ p i k b a r 1 0 0 ] - L o w [ n i z n b a r 0 ] ;
v i s o t a s e t k i = v i s o t a s e t k i / P o i n t ;
v i s o t a s e t k i = M a t h R o u n d ( v i s o t a s e t k i ) ;
/ / <0:A8<0;L=> 4>?CAB8<>5 >B:;>=5=85 >B D81> C@>2=O # "%
o t k l o n m a x = O t k l o n F i b o L e v e l M A X * v i s o t a s e t k i ;
o t k l o n m a x = o t k l o n m a x / 1 0 0 ;
o t k l o n m a x = N o r m a l i z e D o u b l e ( o t k l o n m a x , 2 ) ;
/ / A>2A5< =51>;LH>5 >B:;>=5=85 - 2 . 5 % >B D81> C@>2=O # "%
o t k l o n m i n = 2 5 * v i s o t a s e t k i ;
o t k l o n m i n = o t k l o n m i n / 1 0 0 0 ;
o t k l o n m i n = N o r m a l i z e D o u b l e ( o t k l o n m i n , 2 ) ;
/ / :>;8G5AB2> 10@>2 =878=K >B:0B0 2:;NG0O 3@0=8FK =878=K
k o l b a r n i z o t k = l e v g r n i z o t k - b + 1 ;
/ / =86=89 C@>25=L B5; A25G59 =0 CG0AB:5 =878=K >B:0B0
l e v e l n i z t e l = N i z n i y Y r o v e n T e l S v e c h e i ( k o l b a r n i z o t k , b ) ;
l e v e l n i z t e l = N o r m a l i z e D o u b l e ( l e v e l n i z t e l , D i g i t s ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ! + "" ! # + $ #
/ / A4283 % # "% >B B>G:8 0 D81> A5B:8 4> C:070==>3> D81> C@>2=O
s d v i g l e v e l = v i s o t a s e t k i * f i b o p r o c ;
s d v i g l e v e l = s d v i g l e v e l / 1 0 0 0 ;
s d v i g l e v e l = N o r m a l i z e D o u b l e ( s d v i g l e v e l , 2 ) ;
/ / !'" # "#) $ # / ! " ' !",. # "
t e k f i b o l e v e l = L o w [ n i z n b a r 0 ] + s d v i g l e v e l * P o i n t ;
t e k f i b o l e v e l = N o r m a l i z e D o u b l e ( t e k f i b o l e v e l , D i g i t s ) ;
/ / >B:;>=5=85 >B # D81> C@>2=O # "% - ?> =878=0< L o w
o t k l o n l o w = L o w [ b a r o t k a t a ] - t e k f i b o l e v e l ;
o t k l o n l o w = M a t h A b s ( o t k l o n l o w ) ;
o t k l o n l o w = o t k l o n l o w / P o i n t ;
o t k l o n l o w = N o r m a l i z e D o u b l e ( o t k l o n l o w , 2 ) ;
/ / >B:;>=5=85 >B # D81> C@>2=O # "% - # " !'
o t k l o n t e l = l e v e l n i z t e l - t e k f i b o l e v e l ;
o t k l o n t e l = M a t h A b s ( o t k l o n t e l ) ;
o t k l o n t e l = o t k l o n t e l / P o i n t ;
o t k l o n t e l = N o r m a l i z e D o u b l e ( o t k l o n t e l , 2 ) ;
/ / 5A;8 >B:0B ?> =878=0< L o w 2?8AK205BAO 2 4>?CAB8<>5 >B:;>=5=85
i f ( o t k l o n l o w < = o t k l o n m a x )
{
t o c h n o t k a t = t r u e ;
}
/ / >B:0B ?> B5; 2?8AK205BAO 2 4>?CAB8<>5 >B:;>=5=85 8 B5;> +( C@>2=O
i f ( ( o t k l o n t e l < = o t k l o n m a x ) & & ( ( l e v e l n i z t e l > = t e k f i b o l e v e l ) | | ( o t k l o n t e l < = o t k l o n m i n ) ) )
{
t o c h n o t k a t = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
r e t u r n ( t o c h n o t k a t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / + "" $ !" " ' ! ! $ #
/ / / ! '"+ $ # /: 2 3 . 6 , 3 8 . 2 , 5 0 . 0 , 6 1 . 8
b o o l P r o v e r k a O t k a t a F i b o B U L L ( i n t n i z n b a r 0 , i n t v e r x n b a r 1 0 0 , i n t l e v g r n i z o t k , i n t b a r o t k a t a , i n t b )
{
b o o l o t k a t s o v p a l , l e v e l c h e c k ;
o t k a t s o v p a l = f a l s e ; l e v e l c h e c k = f a l s e ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ?@>25@:0 =0 A>2?045=85 + >B:0B0 8 D81> C@>2=O 6 1 . 8
l e v e l c h e c k = T o c h n F i b o L e v e l B U L L ( 6 1 8 , n i z n b a r 0 , v e r x n b a r 1 0 0 , l e v g r n i z o t k , b a r o t k a t a , b ) ;
i f ( l e v e l c h e c k = = t r u e )
{
o t k a t s o v p a l = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ?@>25@:0 =0 A>2?045=85 =878=K >B:0B0 8 D81> C@>2=O 5 0 . 0
l e v e l c h e c k = T o c h n F i b o L e v e l B U L L ( 5 0 0 , n i z n b a r 0 , v e r x n b a r 1 0 0 , l e v g r n i z o t k , b a r o t k a t a , b ) ;
i f ( l e v e l c h e c k = = t r u e )
{
o t k a t s o v p a l = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ?@>25@:0 =0 A>2?045=85 =878=K >B:0B0 8 D81> C@>2=O 3 8 . 2
l e v e l c h e c k = T o c h n F i b o L e v e l B U L L ( 3 8 2 , n i z n b a r 0 , v e r x n b a r 1 0 0 , l e v g r n i z o t k , b a r o t k a t a , b ) ;
i f ( l e v e l c h e c k = = t r u e )
{
o t k a t s o v p a l = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ?@>25@:0 =0 A>2?045=85 =878=K >B:0B0 8 D81> C@>2=O 2 3 . 6
l e v e l c h e c k = T o c h n F i b o L e v e l B U L L ( 2 3 6 , n i z n b a r 0 , v e r x n b a r 1 0 0 , l e v g r n i z o t k , b a r o t k a t a , b ) ;
i f ( l e v e l c h e c k = = t r u e )
{
o t k a t s o v p a l = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
r e t u r n ( o t k a t s o v p a l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 =0 +' <>;>B =0 10@5 , ?@>25@O5BAO ?@>F5=B B5=59 8 @07<5@ 10@0
b o o l M o l o t B u l l N e w ( d o u b l e s r e d b a r , i n t b )
{
d o u b l e r a z m b r , n i z g r n , v e r g r n , n i z t e n , v e r t e n ;
d o u b l e t e l o , p r o c v e r t , p r o c n i z t , k o e f r a z m , p r o c t e l a ;
b o o l m o l b u l l ;
m o l b u l l = f a l s e ;
/ / @0AG5B @07<5@0 10@0, @07<5@0 B5;0 8 B5=59 2 ?C=:B0E
r a z m b r = H i g h [ b ] - L o w [ b ] ;
r a z m b r = r a z m b r / P o i n t ;
r a z m b r = M a t h R o u n d ( r a z m b r ) ;
/ / 25@E=OO 8 =86=OO 3@0=8FK B5;0 A25G8
v e r g r n = M a t h M a x ( O p e n [ b ] , C l o s e [ b ] ) ;
n i z g r n = M a t h M i n ( O p e n [ b ] , C l o s e [ b ] ) ;
n i z t e n = n i z g r n - L o w [ b ] ;
n i z t e n = n i z t e n / P o i n t ;
v e r t e n = H i g h [ b ] - v e r g r n ;
v e r t e n = v e r t e n / P o i n t ;
t e l o = O p e n [ b ] - C l o s e [ b ] ;
t e l o = M a t h A b s ( t e l o ) ;
t e l o = t e l o / P o i n t ;
/ / =5;L7O 4>?CA:0BL 45;5=85 =0 0
i f ( ( r a z m b r > 0 ) & & ( s r e d b a r > 0 ) )
{
/ / ?@>F5=B 25@E=59 B5=8
p r o c v e r t = ( v e r t e n * 1 0 0 ) / r a z m b r ;
p r o c v e r t = M a t h R o u n d ( p r o c v e r t ) ;
/ / ?@>F5=B =86=59 B5=8
p r o c n i z t = ( n i z t e n * 1 0 0 ) / r a z m b r ;
p r o c n i z t = M a t h R o u n d ( p r o c n i z t ) ;
/ / ?@>F5=B B5;0 A25G8
p r o c t e l a = ( t e l o * 1 0 0 ) / r a z m b r ;
p r o c t e l a = M a t h R o u n d ( p r o c t e l a ) ;
/ / :>5DD8F85=B @07<5@0 10@0 : A@54=5<C 10@C
k o e f r a z m = r a z m b r / s r e d b a r ;
k o e f r a z m = N o r m a l i z e D o u b l e ( k o e f r a z m , 2 ) ;
/ / +' " " !1 - 1>;LH>9 => ?@>F5=BK EC65
i f ( ( p r o c n i z t > 5 0 ) & & ( p r o c v e r t < 2 5 ) & & ( k o e f r a z m > 1 . 4 ) )
{
m o l b u l l = t r u e ;
}
/ / +' " " !2 - >1KG=K9 1KG89 <>;>B
i f ( ( p r o c n i z t > 6 4 ) & & ( p r o c v e r t < 2 0 ) & & ( k o e f r a z m > 1 . 2 ) )
{
m o l b u l l = t r u e ;
}
/ / +' " " !3 - <>;>B <5=LH5 => ?@>F. ;CGH5
i f ( ( p r o c n i z t > 7 0 ) & & ( p r o c v e r t < 1 7 ) & & ( k o e f r a z m > 0 . 9 1 ) )
{
m o l b u l l = t r u e ;
}
/ / +' " " !4 - ?><5HLH5 => ?@>F5=BK ;CGH5
i f ( ( p r o c n i z t > 7 5 ) & & ( p r o c v e r t < 1 4 ) & & ( k o e f r a z m > 0 . 8 ) )
{
m o l b u l l = t r u e ;
}
/ / +' " " !5 - =51>;LH>9 => E>@>H85 ?@>F5=BK
i f ( ( p r o c n i z t > 8 1 ) & & ( p r o c v e r t < 9 ) & & ( k o e f r a z m > 0 . 6 9 ) )
{
m o l b u l l = t r u e ;
}
/ / +' " " !6 - 8A?>;L7C5BAO ?@>F5=B B5;0
i f ( ( p r o c n i z t > 6 0 ) & & ( p r o c t e l a < 1 1 ) & & ( k o e f r a z m > 1 . 2 ) )
{
m o l b u l l = t r u e ;
}
}
r e t u r n ( m o l b u l l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 =0 <>;>B =0 10@5 , ?@>25@O5BAO ?@>F5=B B5=59 8 @07<5@ 10@0
b o o l M o l o t B e a r N e w ( d o u b l e s r e d b a r , i n t b )
{
d o u b l e r a z m b r , n i z g r n , v e r g r n , n i z t e n , v e r t e n ;
d o u b l e t e l o , p r o c v e r t , p r o c n i z t , k o e f r a z m , p r o c t e l a ;
b o o l m o l b e a r ;
m o l b e a r = f a l s e ;
/ / @0AG5B @07<5@0 10@0, @07<5@0 B5;0 8 B5=59 2 ?C=:B0E
r a z m b r = H i g h [ b ] - L o w [ b ] ;
r a z m b r = r a z m b r / P o i n t ;
r a z m b r = M a t h R o u n d ( r a z m b r ) ;
/ / 25@E=OO 8 =86=OO 3@0=8FK B5;0 A25G8
v e r g r n = M a t h M a x ( O p e n [ b ] , C l o s e [ b ] ) ;
n i z g r n = M a t h M i n ( O p e n [ b ] , C l o s e [ b ] ) ;
n i z t e n = n i z g r n - L o w [ b ] ;
n i z t e n = n i z t e n / P o i n t ;
v e r t e n = H i g h [ b ] - v e r g r n ;
v e r t e n = v e r t e n / P o i n t ;
t e l o = O p e n [ b ] - C l o s e [ b ] ;
t e l o = M a t h A b s ( t e l o ) ;
t e l o = t e l o / P o i n t ;
/ / =5;L7O 4>?CA:0BL 45;5=85 =0 0
i f ( ( r a z m b r > 0 ) & & ( s r e d b a r > 0 ) )
{
/ / ?@>F5=B 25@E=59 B5=8
p r o c v e r t = ( v e r t e n * 1 0 0 ) / r a z m b r ;
p r o c v e r t = M a t h R o u n d ( p r o c v e r t ) ;
/ / ?@>F5=B =86=59 B5=8
p r o c n i z t = ( n i z t e n * 1 0 0 ) / r a z m b r ;
p r o c n i z t = M a t h R o u n d ( p r o c n i z t ) ;
/ / ?@>F5=B B5;0 A25G8
p r o c t e l a = ( t e l o * 1 0 0 ) / r a z m b r ;
p r o c t e l a = M a t h R o u n d ( p r o c t e l a ) ;
/ / :>5DD8F85=B @07<5@0 10@0 : A@54=5<C 10@C
k o e f r a z m = r a z m b r / s r e d b a r ;
k o e f r a z m = N o r m a l i z e D o u b l e ( k o e f r a z m , 2 ) ;
/ / " " !1 - 1>;LH>9 => ?@>F5=BK ?>EC65
i f ( ( p r o c v e r t > 5 0 ) & & ( p r o c n i z t < 2 5 ) & & ( k o e f r a z m > 1 . 4 ) )
{
m o l b e a r = t r u e ;
}
/ / " " !2 - >1KG=K9 1KG89 <>;>B
i f ( ( p r o c v e r t > 6 4 ) & & ( p r o c n i z t < 2 0 ) & & ( k o e f r a z m > 1 . 2 ) )
{
m o l b e a r = t r u e ;
}
/ / " " !3 - <>;>B <5=LH5 => ?@>F. ;CGH5
i f ( ( p r o c v e r t > 7 0 ) & & ( p r o c n i z t < 1 7 ) & & ( k o e f r a z m > 0 . 9 1 ) )
{
m o l b e a r = t r u e ;
}
/ / " " !4 - ?><5=LH5, => ?@>F5=BK ?>;CGH5
i f ( ( p r o c v e r t > 7 5 ) & & ( p r o c n i z t < 1 4 ) & & ( k o e f r a z m > 0 . 8 ) )
{
m o l b e a r = t r u e ;
}
/ / " " !5 - =51>;LH>9 => E>@>H85 ?@>F5=BK
i f ( ( p r o c v e r t > 8 1 ) & & ( p r o c n i z t < 9 ) & & ( k o e f r a z m > 0 . 6 9 ) )
{
m o l b e a r = t r u e ;
}
/ / " " !6 - 8A?>;L7C5BAO ?@>F5=B B5;0
i f ( ( p r o c v e r t > 6 0 ) & & ( p r o c t e l a < 1 1 ) & & ( k o e f r a z m > 1 . 2 ) )
{
m o l b e a r = t r u e ;
}
}
r e t u r n ( m o l b e a r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 =0 '!" + <>;>B =0 10@5
b o o l M o l o t B e a r G o o d ( d o u b l e s r e d b a r , i n t b )
{
d o u b l e r a z m b r , n i z g r n , v e r g r n , n i z t e n , v e r t e n ;
d o u b l e t e l o , p r o c v e r t , p r o c n i z t , k o e f r a z m , p r o c t e l a ;
i n t d a l n p i k a ;
b o o l m o l b e a r ;
m o l b e a r = f a l s e ;
/ / @0AG5B @07<5@0 10@0, @07<5@0 B5;0 8 B5=59 2 ?C=:B0E
r a z m b r = H i g h [ b ] - L o w [ b ] ;
r a z m b r = r a z m b r / P o i n t ;
r a z m b r = M a t h R o u n d ( r a z m b r ) ;
/ / 25@E=OO 8 =86=OO 3@0=8FK B5;0 A25G8
v e r g r n = M a t h M a x ( O p e n [ b ] , C l o s e [ b ] ) ;
n i z g r n = M a t h M i n ( O p e n [ b ] , C l o s e [ b ] ) ;
n i z t e n = n i z g r n - L o w [ b ] ;
n i z t e n = n i z t e n / P o i n t ;
v e r t e n = H i g h [ b ] - v e r g r n ;
v e r t e n = v e r t e n / P o i n t ;
t e l o = O p e n [ b ] - C l o s e [ b ] ;
t e l o = M a t h A b s ( t e l o ) ;
t e l o = t e l o / P o i n t ;
/ / =5;L7O 4>?CA:0BL 45;5=85 =0 0
i f ( ( r a z m b r > 0 ) & & ( s r e d b a r > 0 ) )
{
/ / ?@>F5=B 25@E=59 B5=8
p r o c v e r t = ( v e r t e n * 1 0 0 ) / r a z m b r ;
p r o c v e r t = M a t h R o u n d ( p r o c v e r t ) ;
/ / ?@>F5=B =86=59 B5=8
p r o c n i z t = ( n i z t e n * 1 0 0 ) / r a z m b r ;
p r o c n i z t = M a t h R o u n d ( p r o c n i z t ) ;
/ / ?@>F5=B B5;0 A25G8
p r o c t e l a = ( t e l o * 1 0 0 ) / r a z m b r ;
p r o c t e l a = M a t h R o u n d ( p r o c t e l a ) ;
/ / :>5DD8F85=B @07<5@0 10@0 : A@54=5<C 10@C
k o e f r a z m = r a z m b r / s r e d b a r ;
k o e f r a z m = N o r m a l i z e D o u b l e ( k o e f r a z m , 2 ) ;
/ / P r i n t ( " "#) # "% = " + D o u b l e T o S t r ( r a z m b r , 2 ) ) ;
/ / P r i n t ( " ! $ = " + D o u b l e T o S t r ( s r e d b a r , 2 ) ) ;
/ / P r i n t ( " $$& " " = " + D o u b l e T o S t r ( k o e f r a z m , 2 ) ) ;
/ / 40;L=>ABL 10@0 <>;>B0
d a l n p i k a = S l e v a B a r o v O t V e r s h i n y ( b ) ;
/ / " " !1
i f ( ( p r o c v e r t > 8 1 ) & & ( p r o c n i z t < 1 4 ) & & ( k o e f r a z m > 2 . 4 ) & & ( d a l n p i k a > 9 ) )
{
m o l b e a r = t r u e ;
}
/ / " " !2 - :>@>B:0O =86=OO B5=L
i f ( ( p r o c v e r t > 7 8 ) & & ( p r o c n i z t < 8 ) & & ( k o e f r a z m > 2 . 1 ) & & ( d a l n p i k a > 9 ) )
{
m o l b e a r = t r u e ;
}
/ / " " !3 - 1>;LH0O 40;L=>ABL 25@H8=K E2>AB0 <>;>B0
i f ( ( p r o c v e r t > 7 5 ) & & ( p r o c n i z t < 9 ) & & ( k o e f r a z m > 1 . 8 ) & & ( d a l n p i k a > 3 3 ) )
{
m o l b e a r = t r u e ;
}
/ / " " !4 - <5=LH89 @07<5@, => ;CGH5 ?@>F5=B B5=59
i f ( ( p r o c v e r t > 8 7 ) & & ( p r o c n i z t < 1 0 ) & & ( k o e f r a z m > 1 . 6 ) & & ( d a l n p i k a > 9 ) )
{
m o l b e a r = t r u e ;
}
/ / " " !5 - <5=LH89 @07<5@, => ;CGH5 ?@>F5=B B5=59
i f ( ( p r o c v e r t > 8 5 ) & & ( p r o c n i z t < 5 ) & & ( k o e f r a z m > 1 . 2 ) & & ( d a l n p i k a > 9 ) )
{
m o l b e a r = t r u e ;
}
/ / " " !6 - 8A?>;L7C5BAO ?@>F5=B B5;0
i f ( ( p r o c v e r t > 7 5 ) & & ( p r o c t e l a < 5 ) & & ( k o e f r a z m > 2 . 2 ) & & ( d a l n p i k a > 9 ) )
{
m o l b e a r = t r u e ;
}
/ / " " !7 - 1>;LH>9 @07<5@ 8 2KA>:89 <0:A8<C<
i f ( ( p r o c v e r t > 7 1 ) & & ( p r o c n i z t < 1 2 ) & & ( k o e f r a z m > 2 . 7 ) & & ( d a l n p i k a > 5 0 ) )
{
m o l b e a r = t r u e ;
}
}
r e t u r n ( m o l b e a r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 =0 '!" + +' <>;>B =0 10@5
b o o l M o l o t B u l l G o o d ( d o u b l e s r e d b a r , i n t b )
{
d o u b l e r a z m b r , n i z g r n , v e r g r n , n i z t e n , v e r t e n ;
d o u b l e t e l o , p r o c v e r t , p r o c n i z t , k o e f r a z m , p r o c t e l a ;
i n t d a l n d n a ;
b o o l m o l b u l l ;
m o l b u l l = f a l s e ;
/ / @0AG5B @07<5@0 10@0, @07<5@0 B5;0 8 B5=59 2 ?C=:B0E
r a z m b r = H i g h [ b ] - L o w [ b ] ;
r a z m b r = r a z m b r / P o i n t ;
r a z m b r = M a t h R o u n d ( r a z m b r ) ;
/ / 25@E=OO 8 =86=OO 3@0=8FK B5;0 A25G8
v e r g r n = M a t h M a x ( O p e n [ b ] , C l o s e [ b ] ) ;
n i z g r n = M a t h M i n ( O p e n [ b ] , C l o s e [ b ] ) ;
n i z t e n = n i z g r n - L o w [ b ] ;
n i z t e n = n i z t e n / P o i n t ;
v e r t e n = H i g h [ b ] - v e r g r n ;
v e r t e n = v e r t e n / P o i n t ;
t e l o = O p e n [ b ] - C l o s e [ b ] ;
t e l o = M a t h A b s ( t e l o ) ;
t e l o = t e l o / P o i n t ;
/ / =5;L7O 4>?CA:0BL 45;5=85 =0 0
i f ( ( r a z m b r > 0 ) & & ( s r e d b a r > 0 ) )
{
/ / ?@>F5=B 25@E=59 B5=8
p r o c v e r t = ( v e r t e n * 1 0 0 ) / r a z m b r ;
p r o c v e r t = M a t h R o u n d ( p r o c v e r t ) ;
/ / ?@>F5=B =86=59 B5=8
p r o c n i z t = ( n i z t e n * 1 0 0 ) / r a z m b r ;
p r o c n i z t = M a t h R o u n d ( p r o c n i z t ) ;
/ / ?@>F5=B B5;0 A25G8
p r o c t e l a = ( t e l o * 1 0 0 ) / r a z m b r ;
p r o c t e l a = M a t h R o u n d ( p r o c t e l a ) ;
/ / :>5DD8F85=B @07<5@0 10@0 : A@54=5<C 10@C
k o e f r a z m = r a z m b r / s r e d b a r ;
k o e f r a z m = N o r m a l i z e D o u b l e ( k o e f r a z m , 2 ) ;
/ / P r i n t ( " "#) # "% = " + D o u b l e T o S t r ( r a z m b r , 2 ) ) ;
/ / P r i n t ( " ! $ = " + D o u b l e T o S t r ( s r e d b a r , 2 ) ) ;
/ / P r i n t ( " $$& " " = " + D o u b l e T o S t r ( k o e f r a z m , 2 ) ) ;
/ / 40;L=>ABL 4=0 10@0 <>;>B0
d a l n d n a = S l e v a B a r o v O t N i z i n y ( b ) ;
/ / +' " " !1
i f ( ( p r o c n i z t > 8 1 ) & & ( p r o c v e r t < 1 4 ) & & ( k o e f r a z m > 2 . 4 ) & & ( d a l n d n a > 9 ) )
{
m o l b u l l = t r u e ;
}
/ / +' " " !2 - :>@>B:0O 25@E=OO B5=L
i f ( ( p r o c n i z t > 7 8 ) & & ( p r o c v e r t < 8 ) & & ( k o e f r a z m > 2 . 1 ) & & ( d a l n d n a > 9 ) )
{
m o l b u l l = t r u e ;
}
/ / +' " " !3 - 1>;LH0O 40;L=>ABL =878=K E2>AB0 <>;>B0
i f ( ( p r o c n i z t > 7 5 ) & & ( p r o c v e r t < 9 ) & & ( k o e f r a z m > 1 . 8 ) & & ( d a l n d n a > 3 3 ) )
{
m o l b u l l = t r u e ;
}
/ / +' " " !4 - <5=LH89 @07<5@, => ;CGH5 ?@>F5=B B5=59
i f ( ( p r o c n i z t > 8 7 ) & & ( p r o c v e r t < 1 0 ) & & ( k o e f r a z m > 1 . 6 ) & & ( d a l n d n a > 9 ) )
{
m o l b u l l = t r u e ;
}
/ / +' " " !5 - <5=LH89 @07<5@, => ;CGH5 ?@>F5=B B5=59
i f ( ( p r o c n i z t > 8 5 ) & & ( p r o c v e r t < 5 ) & & ( k o e f r a z m > 1 . 2 ) & & ( d a l n d n a > 9 ) )
{
m o l b u l l = t r u e ;
}
/ / +' " " !6 - 8A?>;L7C5BAO ?@>F5=B B5;0
i f ( ( p r o c n i z t > 7 5 ) & & ( p r o c t e l a < 5 ) & & ( k o e f r a z m > 2 . 2 ) & & ( d a l n d n a > 9 ) )
{
m o l b u l l = t r u e ;
}
/ / +' " " !7 - 1>;LH>9 @07<5@ 8 3;C1>:89 <8=8<C<
i f ( ( p r o c n i z t > 7 1 ) & & ( p r o c v e r t < 1 2 ) & & ( k o e f r a z m > 2 . 7 ) & & ( d a l n d n a > 5 0 ) )
{
m o l b u l l = t r u e ;
}
}
r e t u r n ( m o l b u l l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 =0 '!" +', ) =0 10@5
b o o l P o g l o s h B u l l G o o d ( d o u b l e s r e d t e l , i n t b )
{
d o u b l e r a z m b a r a , t e l o p n k t , k o e f t e l b , p r o c t e l a ;
i n t k o l p o g l , d a l n n i z a , l e v g r n , n i z , s t , i ;
b o o l p o g l o s h b u l l , p o g l i ;
p o g l o s h b u l l = f a l s e ; p o g l i = f a l s e ;
s t = b + 1 ;
l e v g r n = b + 2 0 ;
k o l p o g l = 0 ;
/ / A25G0 =0 10@5 4>;6=0 1KBL +',
i f ( ( O p e n [ b ] < C l o s e [ b ] ) & & ( O p e n [ s t ] > C l o s e [ s t ] ) )
{
/ / @0AG5B :>;8G5AB20 1KGL8E ?>3;>I5=89
f o r ( i = s t ; i < l e v g r n ; i + + )
{
p o g l i = f a l s e ;
i f ( ( O p e n [ b ] < O p e n [ i ] ) & & ( O p e n [ b ] < C l o s e [ i ] ) )
{
i f ( ( C l o s e [ b ] > O p e n [ i ] ) & & ( C l o s e [ b ] > C l o s e [ i ] ) )
{
p o g l i = t r u e ;
k o l p o g l = k o l p o g l + 1 ;
}
}
i f ( p o g l i = = f a l s e )
{
b r e a k ;
}
}
}
/ / 5A;8 ?>3;>I5=8O =0945=K
i f ( k o l p o g l > 0 )
{
/ / >1I55 :>;8G5AB2> 10@>2 D83C@K
k o l p o g l = k o l p o g l + 1 ;
/ / =878=0 D83C@K +', ?>3;>I5=85
n i z = i L o w e s t ( N U L L , 0 , M O D E _ L O W , k o l p o g l , b ) ;
/ / @0AG5B @07<5@0 10@0 2 ?C=:B0E
r a z m b a r a = H i g h [ b ] - L o w [ b ] ;
r a z m b a r a = r a z m b a r a / P o i n t ;
r a z m b a r a = M a t h R o u n d ( r a z m b a r a ) ;
/ / B5;> A25G8 2 ?C=:B0E
t e l o p n k t = C l o s e [ b ] - O p e n [ b ] ;
t e l o p n k t = t e l o p n k t / P o i n t ;
t e l o p n k t = M a t h R o u n d ( t e l o p n k t ) ;
/ / =5;L7O 4>?CA:0BL 45;5=8O =0 0
i f ( ( r a z m b a r a > 0 . 1 ) & & ( s r e d t e l > 0 . 1 ) )
{
/ / ?@>F5=B B5;0 A25G8
p r o c t e l a = ( t e l o p n k t * 1 0 0 ) / r a z m b a r a ;
p r o c t e l a = M a t h R o u n d ( p r o c t e l a ) ;
/ / :>5DD. @07<5@0 B5;0 A25G8 : A@54=5<C @07<5@C B5;0
k o e f t e l b = t e l o p n k t / s r e d t e l ;
k o e f t e l b = N o r m a l i z e D o u b l e ( k o e f t e l b , 2 ) ;
/ / 40;L=>ABL =878=K D83C@K 1KGL5 ?>3;>I5=85
d a l n n i z a = S l e v a B a r o v O t N i z i n y ( n i z ) ;
/ / +', ) " !1
i f ( ( p r o c t e l a > P r o c T e l a P o g l o s h L A R G E ) & & ( k o e f t e l b > K o e f T e l a P o g l o s h L A R G E ) )
{
i f ( d a l n n i z a > D a l n o s t P I K A J a p a n M I N )
{
p o g l o s h b u l l = t r u e ;
}
}
}
}
r e t u r n ( p o g l o s h b u l l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 =0 '!" , ) =0 10@5
b o o l P o g l o s h B e a r G o o d ( d o u b l e s r e d t e l , i n t b )
{
d o u b l e r a z m b a r a , t e l o p n k t , k o e f t e l b , p r o c t e l a ;
i n t k o l p o g l , d a l n p i k a , l e v g r n , p i k , s t , i ;
b o o l p o g l o s h b e a r , p o g l i ;
p o g l o s h b e a r = f a l s e ; p o g l i = f a l s e ;
s t = b + 1 ;
l e v g r n = b + 2 0 ;
k o l p o g l = 0 ;
/ / A25G0 =0 10@5 4>;6=0 1KBL ,
i f ( ( O p e n [ b ] > C l o s e [ b ] ) & & ( O p e n [ s t ] < C l o s e [ s t ] ) )
{
/ / @0AG5B :>;8G5AB20 <54256L8E ?>3;>I5=89
f o r ( i = s t ; i < l e v g r n ; i + + )
{
p o g l i = f a l s e ;
i f ( ( O p e n [ b ] > O p e n [ i ] ) & & ( O p e n [ b ] > C l o s e [ i ] ) )
{
i f ( ( C l o s e [ b ] < O p e n [ i ] ) & & ( C l o s e [ b ] < C l o s e [ i ] ) )
{
p o g l i = t r u e ;
k o l p o g l = k o l p o g l + 1 ;
}
}
i f ( p o g l i = = f a l s e )
{
b r e a k ;
}
}
}
/ / 5A;8 ?>3;>I5=8O =0945=K
i f ( k o l p o g l > 0 )
{
/ / >1I55 :>;8G5AB2> 10@>2 D83C@K
k o l p o g l = k o l p o g l + 1 ;
/ / ?8: D83C@K , ?>3;>I5=85
p i k = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , k o l p o g l , b ) ;
/ / @0AG5B @07<5@0 10@0 2 ?C=:B0E
r a z m b a r a = H i g h [ b ] - L o w [ b ] ;
r a z m b a r a = r a z m b a r a / P o i n t ;
r a z m b a r a = M a t h R o u n d ( r a z m b a r a ) ;
/ / B5;> A25G8 2 ?C=:B0E
t e l o p n k t = O p e n [ b ] - C l o s e [ b ] ;
t e l o p n k t = t e l o p n k t / P o i n t ;
t e l o p n k t = M a t h R o u n d ( t e l o p n k t ) ;
/ / =5;L7O 4>?CA:0BL 45;5=8O =0 0
i f ( ( r a z m b a r a > 0 . 1 ) & & ( s r e d t e l > 0 . 1 ) )
{
/ / ?@>F5=B B5;0 A25G8
p r o c t e l a = ( t e l o p n k t * 1 0 0 ) / r a z m b a r a ;
p r o c t e l a = M a t h R o u n d ( p r o c t e l a ) ;
/ / :>5DD. @07<5@0 B5;0 A25G8 : A@54=5<C @07<5@C B5;0
k o e f t e l b = t e l o p n k t / s r e d t e l ;
k o e f t e l b = N o r m a l i z e D o u b l e ( k o e f t e l b , 2 ) ;
/ / 40;L=>ABL ?8:0 D83C@K <54256L5 ?>3;>I5=85
d a l n p i k a = S l e v a B a r o v O t V e r s h i n y ( p i k ) ;
/ / , ) " !1
i f ( ( p r o c t e l a > P r o c T e l a P o g l o s h L A R G E ) & & ( k o e f t e l b > K o e f T e l a P o g l o s h L A R G E ) )
{
i f ( d a l n p i k a > D a l n o s t P I K A J a p a n M I N )
{
p o g l o s h b e a r = t r u e ;
}
}
}
}
r e t u r n ( p o g l o s h b e a r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 =0;8G8O , D81> A5B:8 8 55 ?>AB@>5=85 =0 3@0D8:5
b o o l F i b o S e t k a B e a r O x o t n i k C H E C K ( d o u b l e s r e d t e l o , i n t b )
{
d o u b l e v i s o t a s e t k i , k o e f f v i s o t , L e v e l 7 6 4 ;
i n t l e v g r v e r o t k , l e v g r n i z a 1 0 0 , k o l b a r v e r o t k , l e v g r b i g p i k 0 , d n o b a r o b s h ;
i n t k o l b a r n i z a 1 0 0 , n i z b a r 1 0 0 , n a c h p i k b a r 0 , s p a d k o l b a r s , b a r o t k a t a ;
i n t d a l n b i g p i k a , o b s h k o l b a r , s p r a v a n i z a b a r o v , s p r a v a n i z a p i k b a r , s t ;
b o o l f i r s t c h e c k , o t k a t s o v p a l , e s t f i b o s e t k a ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
f i r s t c h e c k = f a l s e ; o t k a t s o v p a l = f a l s e ; e s t f i b o s e t k a = f a l s e ;
l e v g r v e r o t k = 0 ; l e v g r n i z a 1 0 0 = 0 ; k o l b a r v e r o t k = 0 ; b a r o t k a t a = 0 ; d a l n b i g p i k a = 0 ;
o b s h k o l b a r = 0 ; k o l b a r n i z a 1 0 0 = 0 ; n i z b a r 1 0 0 = 0 ; l e v g r b i g p i k 0 = 0 ; d n o b a r o b s h = 0 ;
s p a d k o l b a r s = 0 ; n a c h p i k b a r 0 = 0 ; s p r a v a n i z a b a r o v = 0 ; s p r a v a n i z a p i k b a r = 0 ;
v i s o t a s e t k i = 0 ; k o e f f v i s o t = 0 ; L e v e l 7 6 4 = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 10@ A;520 >B 10@0
s t = b + 1 ;
/ / ;520O 3@0=8F0 ( + >B:0B0, 345 1K; >BA:>: >B D81> C@>2=O
l e v g r v e r o t k = L e v g r V e r s h i n y O t k a t a F i b o B E A R ( b ) ;
/ / 5A;8 ;520O 3@0=8F0 ( + >B:0B0 =0945=0
i f ( l e v g r v e r o t k > b )
{
/ / M e s s a g e B o x ( " ;520O 3@0=8F0 >B:0B0 =0945=0 =0 10@5 = " + D o u b l e T o S t r ( l e v g r v e r o t k , 0 ) ) ;
/ / ?>;=>5 :>;8G5AB2> 10@>2 ( + >B:0B0
k o l b a r v e r o t k = l e v g r v e r o t k - b + 1 ;
/ / 25@E=89 10@ 25@H8=K >B:0B0 - 345 =0G0;AO >BA:>: 2=87
b a r o t k a t a = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , k o l b a r v e r o t k , b ) ;
/ / M e s s a g e B o x ( " 25@H8=0 >B:0B0 =0945=0 =0 10@5 = " + D o u b l e T o S t r ( b a r o t k a t a , 0 ) ) ;
/ / 3>@87>=B0;L=0O ;8=8O ?> C@>2=N ( + ""
/ / O b j e c t D e l e t e ( " P i k O t k a t a L e v e l L i n e " ) ;
/ / O b j e c t C r e a t e ( " P i k O t k a t a L e v e l L i n e " , O B J _ H L I N E , 0 , T i m e [ b a r o t k a t a ] , H i g h [ b a r o t k a t a ] ) ;
/ / O b j e c t S e t ( " P i k O t k a t a L e v e l L i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
/ / O b j e c t S e t ( " P i k O t k a t a L e v e l L i n e " , O B J P R O P _ C O L O R , c l r B l u e ) ;
/ / ;520O 3@0=8F0 +, :>B>@0O 2:;NG05B 2 A51O 10@ 1 0 0
l e v g r n i z a 1 0 0 = L e v g r N i z i n y F i b o B E A R ( b a r o t k a t a ) ;
/ / M e s s a g e B o x ( " / & + =0945=0 =0 10@5 = " + D o u b l e T o S t r ( l e v g r n i z a 1 0 0 , 0 ) ) ;
/ / 5A;8 ;520O 3@0=8F0 + =0945=0
i f ( l e v g r n i z a 1 0 0 > l e v g r v e r o t k )
{
/ / 25@B8:0;L=0O ;8=8O A;520 >B l e v g r n i z a 1 0 0
/ / O b j e c t D e l e t e ( " l e v g r n i z a 1 0 0 L e f t L i n e " ) ;
/ / O b j e c t C r e a t e ( " l e v g r n i z a 1 0 0 L e f t L i n e " , O B J _ V L I N E , 0 , T i m e [ ( l e v g r n i z a 1 0 0 + 1 ) ] , 0 ) ;
/ / O b j e c t S e t ( " l e v g r n i z a 1 0 0 L e f t L i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
/ / O b j e c t S e t ( " l e v g r n i z a 1 0 0 L e f t L i n e " , O B J P R O P _ C O L O R , c l r Y e l l o w ) ;
/ / ?>;=>5 :>;8G5AB2> 10@>2 +, :>B>@0O 2:;NG05B 2 A51O 10@ 1 0 0
k o l b a r n i z a 1 0 0 = l e v g r n i z a 1 0 0 - b ;
/ / 10@ +, :>B>@0O 2:;NG05B 2 A51O 10@ 1 0 0
n i z b a r 1 0 0 = i L o w e s t ( N U L L , 0 , M O D E _ L O W , k o l b a r n i z a 1 0 0 , s t ) ;
/ / M e s s a g e B o x ( " # =878=K =0945= =0 10@5 = " + D o u b l e T o S t r ( n i z b a r 1 0 0 , 0 ) ) ;
/ / 25@B8:0;L=0O ;8=8O A;520 >B n i z b a r 1 0 0
/ / O b j e c t D e l e t e ( " n i z b a r 1 0 0 L e f t L i n e " ) ;
/ / O b j e c t C r e a t e ( " n i z b a r 1 0 0 L e f t L i n e " , O B J _ V L I N E , 0 , T i m e [ ( n i z b a r 1 0 0 + 1 ) ] , 0 ) ;
/ / O b j e c t S e t ( " n i z b a r 1 0 0 L e f t L i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
/ / O b j e c t S e t ( " n i z b a r 1 0 0 L e f t L i n e " , O B J P R O P _ C O L O R , c l r A q u a ) ;
/ / ;520O 3@0=8F0 ,( AB0@B>2>9 ( + F5=, 345 =0E>48BAO C@>25=L 0
l e v g r b i g p i k 0 = L e v g r H U G E P I K F i b o B E A R ( n i z b a r 1 0 0 ) ;
/ / 25@B8:0;L=0O ;8=8O A;520 >B n i z b a r 1 0 0
/ / O b j e c t D e l e t e ( " L e v g r H U G E P I K L e f t L i n e " ) ;
/ / O b j e c t C r e a t e ( " L e v g r H U G E P I K L e f t L i n e " , O B J _ V L I N E , 0 , T i m e [ ( l e v g r b i g p i k 0 + 1 ) ] , 0 ) ;
/ / O b j e c t S e t ( " L e v g r H U G E P I K L e f t L i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
/ / O b j e c t S e t ( " L e v g r H U G E P I K L e f t L i n e " , O B J P R O P _ C O L O R , c l r L i m e ) ;
/ / 5A;8 ;520O 3@0=8F0 ,( AB0@B>2>9 ( + F5= =0945=0
i f ( l e v g r b i g p i k 0 > l e v g r n i z a 1 0 0 )
{
/ / M e s s a g e B o x ( " 1>;LH0O AB0@B>20O 25@H8=0 =0945=0" ) ;
/ / ?>8A: =0G0;L=>3> 10@0 0 , D81> A5B:8 - 845< 2?@02> >B 3@0=8FK
n a c h p i k b a r 0 = R a s c h e t N a c h a l a F i b o B E A R ( l e v g r b i g p i k 0 , l e v g r n i z a 1 0 0 ) ;
/ / @0AG5B C@>2=O 7 6 . 4
L e v e l 7 6 4 = R a s c h e t F i b o L e v e l B E A R ( 7 6 4 , n a c h p i k b a r 0 , n i z b a r 1 0 0 ) ;
/ / 3>@87>=B0;L=0O ;8=8O ?> C@>2=N ( + !" "
/ / O b j e c t D e l e t e ( " P i k n a c h p i k b a r 0 L e v e l L i n e " ) ;
/ / O b j e c t C r e a t e ( " P i k n a c h p i k b a r 0 L e v e l L i n e " , O B J _ H L I N E , 0 , T i m e [ n a c h p i k b a r 0 ] , H i g h [ n a c h p i k b a r 0 ] ) ;
/ / O b j e c t S e t ( " P i k n a c h p i k b a r 0 L e v e l L i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
/ / O b j e c t S e t ( " P i k n a c h p i k b a r 0 L e v e l L i n e " , O B J P R O P _ C O L O R , c l r R e d ) ;
/ / :>;8G5AB2> 10@>2 =0 CG0AB:5 A?040 >B 10@0 0 : 10@C 1 0 0
s p a d k o l b a r s = n a c h p i k b a r 0 - n i z b a r 1 0 0 + 1 ;
/ / >1I55 :>;8G5AB2> 10@>2 =0 >B@57:5 >B 10@0 0 4> 10@0
o b s h k o l b a r = n a c h p i k b a r 0 - b + 1 ;
/ / 40;L=>ABL 3;02=>9 25@H8=K D81> A5B:8 2;52>
d a l n b i g p i k a = S l e v a B a r o v O t V e r s h i n y ( n a c h p i k b a r 0 ) ;
/ / 3;02=0O =878=0 =0 >1I5< CG0AB:5 >B 10@0 0 4> 10@0
d n o b a r o b s h = i L o w e s t ( N U L L , 0 , M O D E _ L O W , o b s h k o l b a r , s t ) ;
/ / 2KA>B0 D81> A5B:8 2 ?C=:B0E
v i s o t a s e t k i = H i g h [ n a c h p i k b a r 0 ] - L o w [ n i z b a r 1 0 0 ] ;
v i s o t a s e t k i = v i s o t a s e t k i / P o i n t ;
/ / @0AG5B :>MDD8F85=B0 2KA>BK D81> A5B:8 : A@54=5<C B5;C A25G8
k o e f f v i s o t = v i s o t a s e t k i / s r e d t e l o ;
k o e f f v i s o t = N o r m a l i z e D o u b l e ( k o e f f v i s o t , 1 ) ;
/ / M e s s a g e B o x ( " >5DD D81> A5B:8 2 2KA>BC = " + D o u b l e T o S t r ( k o e f f v i s o t , 2 ) ) ;
i f ( ( d n o b a r o b s h = = n i z b a r 1 0 0 ) & & ( k o e f f v i s o t > = K o e f f F i b o S r e d n B a r M I N ) )
{
/ / A;520 >B 25@H8=K 4>;6=> 1KBL 1>;LH5 10@>2, G5< A?@020
i f ( o b s h k o l b a r > S h i r i n a F i b o S e t k i M I N )
{
f i r s t c h e c k = t r u e ;
/ / M e s s a g e B o x ( " ?5@2>5 CA;>285 2K?>;=5=>" ) ;
}
}
}
}
}
/ / 5A;8 ?5@2>5 CA;>285 2K?>;=5=> ?@>25@8< B>G=>ABL >BA:>:0 >B D81> C@>2=O
i f ( f i r s t c h e c k = = t r u e )
{
/ / ?>;=>5 :>;8G5AB2> 10@>2 ?@02>9 25@H8=K - >B =878=K 1 0 0 4> 10@0
s p r a v a n i z a b a r o v = n i z b a r 1 0 0 - b ;
/ / =><5@ 25@E=53> 10@0 ?@02>9 25@H8=K - >B =878=K 1 0 0 4> 10@0
s p r a v a n i z a p i k b a r = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , s p r a v a n i z a b a r o v , b ) ;
/ / 25@B8:0;L=0O ;8=8O A?@020 >B s p r a v a n i z a p i k b a r
/ / O b j e c t D e l e t e ( " s p r a v a n i z a p i k b a r L i n e " ) ;
/ / O b j e c t C r e a t e ( " s p r a v a n i z a p i k b a r L i n e " , O B J _ V L I N E , 0 , T i m e [ ( s p r a v a n i z a p i k b a r - 1 ) ] , 0 ) ;
/ / O b j e c t S e t ( " s p r a v a n i z a p i k b a r L i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
/ / O b j e c t S e t ( " s p r a v a n i z a p i k b a r L i n e " , O B J P R O P _ C O L O R , c l r M a g e n t a ) ;
/ / ?@>25@:0 =0 A>2?045=85 25@H8=K >B:0B0 A >4=8< 87 D81> C@>2=59
o t k a t s o v p a l = P r o v e r k a O t k a t a F i b o B E A R ( n a c h p i k b a r 0 , n i z b a r 1 0 0 , l e v g r v e r o t k , b a r o t k a t a , b ) ;
i f ( o t k a t s o v p a l = = t r u e )
{
/ / M e s s a g e B o x ( " B>G=>ABL >B:0B0 2K?>;=5=0" ) ;
}
e l s e
{
/ / M e s s a g e B o x ( " =5 ?@>H5; ?@>25@:C >B:0B =0 B>G=>ABL" ) ;
}
i f ( ( o t k a t s o v p a l = = t r u e ) & & ( b a r o t k a t a = = s p r a v a n i z a p i k b a r ) & & ( C l o s e [ b ] < L e v e l 7 6 4 ) )
{
e s t f i b o s e t k a = t r u e ;
O b j e c t C r e a t e ( " F i b o B e a r O X O T N I K 7 7 7 " , O B J _ F I B O , 0 , T i m e [ n i z b a r 1 0 0 ] , L o w [ n i z b a r 1 0 0 ] , T i m e [ n a c h p i k b a r 0 ] , H i g h [ n a c h p i k b a r 0 ] ) ;
/ / M e s s a g e B o x ( " ,/ $ !" !" " ) ;
}
}
r e t u r n ( e s t f i b o s e t k a ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?5@2K9 H03 4;O <54256L59 D81> A5B:8 - ?>8A: 25@H8=K, 345 1K; >BA:>: 2=87 >B C@>2=O
/ / 2 A;CG05 CA?5E0 2>72@0I05B =><5@ 10@0 - ;520O 3@0=8F0 25@H8=K, ;81> 0
i n t L e v g r V e r s h i n y O t k a t a F i b o B E A R ( i n t b )
{
i n t l e v g r a n , l e v k r a i , t o t a l , p r e d v , s t , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
l e v g r a n = 0 ;
/ / ?@5420@8B5;L=0O ;520O 3@0=8F0 25@H8=K
p r e d v = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = b + 1 5 0 ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
s t = b + 1 ;
/ / A25G0 =0 10@5 4>;60 1KBL ,/
i f ( O p e n [ b ] > C l o s e [ b ] )
{
/ / ?>8A: ?@5420@8B5;L=>9 ;52>9 3@0=8FK ( + F5=
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / 845< 2;52> 4> B5E ?>@, ?>:0 & +"/ " !'
i f ( ( C l o s e [ b ] < O p e n [ i ] ) & & ( C l o s e [ b ] < C l o s e [ i ] ) )
{
c o n t i n u e ;
}
e l s e
{
/ / ?@5420@8B5;L=0O ;520O 3@0=8F0 ( +
p r e d v = i ;
b r e a k ;
}
}
}
/ / 5A;8 ?@5420@8B5;L=0O 3@0=8F0 =0945=0
i f ( p r e d v > b )
{
/ / ;520O 3@0=8F0 - +',/ A25G0, F5=0 >B:@KB8O 70:@KB8O 10@0
i f ( ( O p e n [ p r e d v ] < C l o s e [ p r e d v ] ) & & ( O p e n [ p r e d v ] < = C l o s e [ b ] ) )
{
l e v g r a n = p r e d v ;
}
}
r e t u r n ( l e v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: =878=K 2=CB@8 :>B>@>9 =0E>48BAO 10@ 1 0 0 , D81> A5B:8
/ / 2 A;CG05 CA?5E0 2>72@0I05B ;52CN 3@0=8FC +, ;81> 0
i n t L e v g r N i z i n y F i b o B E A R ( i n t b a r o t k a t a )
{
d o u b l e p i k l e v e l ;
i n t l e v g r a n , l e v k r a i , t o t a l , s t , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
l e v g r a n = 0 ;
/ / C@>25=L <0:A8<C<0 F5= =0 CG0AB:5 ?>8A:0 ;52>9 3@0=8FK
p i k l e v e l = H i g h [ b a r o t k a t a ] ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = b a r o t k a t a + 4 0 0 ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
s t = b a r o t k a t a + 1 ;
/ / ?>8A: ?@5420@8B5;L=>9 ;52>9 3@0=8FK + F5=
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / ;520O 3@0=8F0 + - ,/ A25G0 A +! F5=>9 >B:@KB8O
i f ( ( O p e n [ i ] > C l o s e [ i ] ) & & ( O p e n [ i ] > p i k l e v e l ) )
{
l e v g r a n = i ;
b r e a k ;
}
}
r e t u r n ( l e v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: ;52>9 3@0=8FK 1>;LH>9 ( +, 345 =0E>48BAO C@>25=L 0 , D81> A5B:8
/ / 2 A;CG05 CA?5E0 2>72@0I05B ;52CN 3@0=8FC ( +, ;81> 0
i n t L e v g r H U G E P I K F i b o B E A R ( i n t d n o b a r 1 0 0 )
{
i n t l e v g r a n , l e v k r a i , t o t a l , s t , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
l e v g r a n = 0 ;
/ / <0:A8<0;L=0O ;520O 3@0=8F0 ?>8A:>2
l e v k r a i = B a r s - 1 0 ;
t o t a l = d n o b a r 1 0 0 + 1 2 0 0 ;
t o t a l = M a t h M i n ( t o t a l , l e v k r a i ) ;
s t = d n o b a r 1 0 0 + 1 ;
/ / ?>8A: ?@5420@8B5;L=>9 ;52>9 3@0=8FK ( + F5=
f o r ( i = s t ; i < t o t a l ; i + + )
{
/ / ;520O 3@0=8F0 ,( ( + - B0< 345 2?5@2K9 ?@>18B ?8: 1 0 0
i f ( L o w [ i ] < L o w [ d n o b a r 1 0 0 ] )
{
l e v g r a n = i ;
b r e a k ;
}
}
r e t u r n ( l e v g r a n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" !" " " ' 0 / !" / , $ !"
i n t R a s c h e t N a c h a l a F i b o B E A R ( i n t l e v g r v e r x , i n t l e v g r n i z a )
{
d o u b l e p i k l e v e l ;
i n t n a c h b a r 0 , i ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
n a c h b a r 0 = 0 ;
p i k l e v e l = H i g h [ l e v g r v e r x ] ;
/ / ?>8A: A0<>3> 25@E=53> ?@02>3> 10@0 - =0G0;0 0 D81> A5B:8
f o r ( i = l e v g r v e r x ; i > = l e v g r n i z a ; i - - )
{
i f ( H i g h [ i ] > = p i k l e v e l )
{
p i k l e v e l = H i g h [ i ] ;
n a c h b a r 0 = i ;
}
}
r e t u r n ( n a c h b a r 0 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 B>3>, GB> B5;0 A25G59 2 A>AB025 25@H8=K =0E>4OBAO =865 C:070==>3> D81> C@>2=O
/ / 70 8A:;NG5=85< 2 E A25G59 =0 ?8:5 - A>A54=85 425 1KGLO 8 <54256LO <>3CB >48= @07 1KBL 2KH5
b o o l P r o v e r k a V e r s h i n y O t k a t a B E A R 2 X ( d o u b l e t e k f i b o l e v e l , i n t l e v g r v e r o t k , i n t b )
{
i n t k o l b a r v e r s h , h i c l b a r , p r a v h i c l , h i o p b a r , k o l g o o d , i ;
b o o l g o o d o t k a t ;
g o o d o t k a t = f a l s e ;
/ / :>;8G5AB2> 10@>2 2 A>AB025 25@H8=K, :>B>@K5 2K?>;=ONB CA;>28O 7040G8
k o l g o o d = 0 ;
/ / :>;8G5AB2> 10@>2 25@H8=K >B:0B0 2:;NG0O 3@0=8FK
k o l b a r v e r s h = l e v g r v e r o t k - b + 1 ;
/ / B5:CI89 ?@>25@O5<K9 D81> C@>25=L
t e k f i b o l e v e l = N o r m a l i z e D o u b l e ( t e k f i b o l e v e l , D i g i t s ) ;
/ / 10@, 345 =0945=0 A0<0O 2KA>:0O F5=0 >B:@KB8O A25G8
h i o p b a r = i H i g h e s t ( N U L L , 0 , M O D E _ O P E N , k o l b a r v e r s h , b ) ;
/ / 10@, 345 =0945=0 A0<0O 2KA>:0O F5=0 70:@KB8O A25G8
h i c l b a r = i H i g h e s t ( N U L L , 0 , M O D E _ C L O S E , k o l b a r v e r s h , b ) ;
/ / 10@ A?@020 >B A25G8, 345 1K;0 =0945=0 A0<0O 2KA>:0O F5=0 70:@KB8O
p r a v h i c l = h i c l b a r - 1 ;
f o r ( i = b ; i < = l e v g r v e r o t k ; i + + )
{
i f ( ( O p e n [ i ] < = t e k f i b o l e v e l ) & & ( C l o s e [ i ] < = t e k f i b o l e v e l ) )
{
k o l g o o d = k o l g o o d + 1 ;
}
i f ( ( C l o s e [ i ] > t e k f i b o l e v e l ) & & ( i = = h i c l b a r ) & & ( p r a v h i c l = = h i o p b a r ) )
{
k o l g o o d = k o l g o o d + 1 ;
}
i f ( ( O p e n [ i ] > t e k f i b o l e v e l ) & & ( i = = h i o p b a r ) & & ( p r a v h i c l = = h i o p b a r ) )
{
k o l g o o d = k o l g o o d + 1 ;
}
}
/ / 5A;8 2A5 10@K 2 A>AB025 25@H8=K ?@>H;8 ?@>25@:C
i f ( k o l g o o d = = k o l b a r v e r s h )
{
g o o d o t k a t = t r u e ;
}
r e t u r n ( g o o d o t k a t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>25@:0 =0 B>G=>5 A>2?045=85 25@H8=K >B:0B0 A C:070==K< 2 ?0@0<5B@0E D81> C@>2=5<
/ / ?@>25@O5< 420 20@80=B0 - ?> ?8:C >B:0B0, ;81> ?> 25@E=5<C C@>2=N B5; A25G59
/ / ?@>F5=B C@>2=O C:07K20BL =C6=> B@5E7=0G=K9 2 7=0:0 + 1 ?>A;5 70?OB>9 :0: F5;>5
b o o l T o c h n F i b o L e v e l B E A R ( i n t f i b o p r o c , i n t v e r x b a r 0 , i n t d n o b a r 1 0 0 , i n t l e v g r v e r o t k , i n t b a r o t k a t a , i n t b )
{
d o u b l e t e k f i b o l e v e l , v i s o t a s e t k i , s d v i g l e v e l , o t k l o n h i g h , o t k l o n t e l , o t k l o n m a x , o t k l o n m i n , l e v e l v e r x t e l ;
i n t k o l b a r v e r o t k ;
b o o l t o c h n o t k a t , v e r x t e l c h e c k ;
/ / >B25B 2>72@0I05<K9 DC=:F859 - 5ABL ;8 B>G=>5 A>2?045=85 25@H8=K >B:0B0 A D81> C@>2=5< 8;8 =5B
t o c h n o t k a t = f a l s e ; v e r x t e l c h e c k = f a l s e ;
/ / ?>;=0O 2KA>B0 D81> A5B:8 # "%
v i s o t a s e t k i = H i g h [ v e r x b a r 0 ] - L o w [ d n o b a r 1 0 0 ] ;
v i s o t a s e t k i = v i s o t a s e t k i / P o i n t ;
v i s o t a s e t k i = M a t h R o u n d ( v i s o t a s e t k i ) ;
/ / <0:A8<0;L=> 4>?CAB8<>5 >B:;>=5=85 >B D81> C@>2=O # "%
o t k l o n m a x = O t k l o n F i b o L e v e l M A X * v i s o t a s e t k i ;
o t k l o n m a x = o t k l o n m a x / 1 0 0 ;
o t k l o n m a x = N o r m a l i z e D o u b l e ( o t k l o n m a x , 2 ) ;
/ / A>2A5< =51>;LH>5 >B:;>=5=85 - 2 . 5 % >B D81> C@>2=O # "%
o t k l o n m i n = 2 5 * v i s o t a s e t k i ;
o t k l o n m i n = o t k l o n m i n / 1 0 0 0 ;
o t k l o n m i n = N o r m a l i z e D o u b l e ( o t k l o n m i n , 2 ) ;
/ / :>;8G5AB2> 10@>2 25@H8=K >B:0B0 2:;NG0O 3@0=8FK 25@H8=K
k o l b a r v e r o t k = l e v g r v e r o t k - b + 1 ;
/ / 25@E=89 C@>25=L B5; A25G59 =0 CG0AB:5 25@H8=K >B:0B0
l e v e l v e r x t e l = V e r x i y Y r o v e n T e l S v e c h e i ( k o l b a r v e r o t k , b ) ;
l e v e l v e r x t e l = N o r m a l i z e D o u b l e ( l e v e l v e r x t e l , D i g i t s ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ! ( + "" ! # + $ #
/ / A4283 # "% >B % B>G:8 0 D81> A5B:8 4> C:070==>3> D81> C@>2=O
s d v i g l e v e l = v i s o t a s e t k i * f i b o p r o c ;
s d v i g l e v e l = s d v i g l e v e l / 1 0 0 0 ;
s d v i g l e v e l = N o r m a l i z e D o u b l e ( s d v i g l e v e l , 2 ) ;
/ / !'" # "#) $ # / ! " ' !",. # "
t e k f i b o l e v e l = H i g h [ v e r x b a r 0 ] - s d v i g l e v e l * P o i n t ;
t e k f i b o l e v e l = N o r m a l i z e D o u b l e ( t e k f i b o l e v e l , D i g i t s ) ;
/ / >B:;>=5=85 >B # D81> C@>2=O # "% - ?> 25@H8=0< H i g h
o t k l o n h i g h = H i g h [ b a r o t k a t a ] - t e k f i b o l e v e l ;
o t k l o n h i g h = M a t h A b s ( o t k l o n h i g h ) ;
o t k l o n h i g h = o t k l o n h i g h / P o i n t ;
o t k l o n h i g h = N o r m a l i z e D o u b l e ( o t k l o n h i g h , 2 ) ;
/ / >B:;>=5=85 >B # D81> C@>2=O # "% - %# " !'
o t k l o n t e l = t e k f i b o l e v e l - l e v e l v e r x t e l ;
o t k l o n t e l = M a t h A b s ( o t k l o n t e l ) ;
o t k l o n t e l = o t k l o n t e l / P o i n t ;
o t k l o n t e l = N o r m a l i z e D o u b l e ( o t k l o n t e l , 2 ) ;
/ / 5A;8 >B:0B ?> 25@H8=0< H i g h 2?8AK205BAO 2 4>?CAB8<>5 >B:;>=5=85
i f ( o t k l o n h i g h < = o t k l o n m a x )
{
t o c h n o t k a t = t r u e ;
}
/ / B5;0 A25G59 25@H8=K =0E>4OBAO =865 C:070==>3> D81> C@>2=O :@><5 25@E=8E 2 E
v e r x t e l c h e c k = P r o v e r k a V e r s h i n y O t k a t a B E A R 2 X ( t e k f i b o l e v e l , l e v g r v e r o t k , b ) ;
/ / >B:0B ?> % B5; 2?8AK205BAO 2 4>?CAB8<>5 >B:;>=5=85 8 B5;> C@>2=O
i f ( ( o t k l o n t e l < = o t k l o n m a x ) & & ( ( v e r x t e l c h e c k = = t r u e ) | | ( o t k l o n t e l < = o t k l o n m i n ) ) )
{
t o c h n o t k a t = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
r e t u r n ( t o c h n o t k a t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ( + "" $ !" " ' ! ! $ #
/ / / ! '"+ $ # /: 2 3 . 6 , 3 8 . 2 , 5 0 . 0 , 6 1 . 8
b o o l P r o v e r k a O t k a t a F i b o B E A R ( i n t v e r x n b a r 0 , i n t n i z n b a r 1 0 0 , i n t l e v g r v e r o t k , i n t b a r o t k a t a , i n t b )
{
b o o l o t k a t s o v p a l , l e v e l c h e c k ;
o t k a t s o v p a l = f a l s e ; l e v e l c h e c k = f a l s e ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ?@>25@:0 =0 A>2?045=85 ( + >B:0B0 8 D81> C@>2=O 6 1 . 8
l e v e l c h e c k = T o c h n F i b o L e v e l B E A R ( 6 1 8 , v e r x n b a r 0 , n i z n b a r 1 0 0 , l e v g r v e r o t k , b a r o t k a t a , b ) ;
i f ( l e v e l c h e c k = = t r u e )
{
o t k a t s o v p a l = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ?@>25@:0 =0 A>2?045=85 =878=K >B:0B0 8 D81> C@>2=O 5 0 . 0
l e v e l c h e c k = T o c h n F i b o L e v e l B E A R ( 5 0 0 , v e r x n b a r 0 , n i z n b a r 1 0 0 , l e v g r v e r o t k , b a r o t k a t a , b ) ;
i f ( l e v e l c h e c k = = t r u e )
{
o t k a t s o v p a l = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ?@>25@:0 =0 A>2?045=85 =878=K >B:0B0 8 D81> C@>2=O 3 8 . 2
l e v e l c h e c k = T o c h n F i b o L e v e l B E A R ( 3 8 2 , v e r x n b a r 0 , n i z n b a r 1 0 0 , l e v g r v e r o t k , b a r o t k a t a , b ) ;
i f ( l e v e l c h e c k = = t r u e )
{
o t k a t s o v p a l = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ?@>25@:0 =0 A>2?045=85 =878=K >B:0B0 8 D81> C@>2=O 2 3 . 6
l e v e l c h e c k = T o c h n F i b o L e v e l B E A R ( 2 3 6 , v e r x n b a r 0 , n i z n b a r 1 0 0 , l e v g r v e r o t k , b a r o t k a t a , b ) ;
i f ( l e v e l c h e c k = = t r u e )
{
o t k a t s o v p a l = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
r e t u r n ( o t k a t s o v p a l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / @0AG5B C:070==>3> D81> C@>2=O 4;O <54256L59 D81> A5B:8
/ / ?@>F5=B C@>2=O =C6=> C:07K20BL B@5E7=0G=>5 F5;>5 G8A;> =0?@8<5@ 6 1 8 - MB> 6 1 . 8
d o u b l e R a s c h e t F i b o L e v e l B E A R ( i n t l e v e l p r o c , i n t v e r x b a r 0 , i n t d n o b a r 1 0 0 )
{
d o u b l e f i b o l e v e l , v i s o t a s e t k i , s d v i g l e v e l ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
f i b o l e v e l = 0 ;
/ / ?>;=0O 2KA>B0 D81> A5B:8 # "%
v i s o t a s e t k i = H i g h [ v e r x b a r 0 ] - L o w [ d n o b a r 1 0 0 ] ;
v i s o t a s e t k i = v i s o t a s e t k i / P o i n t ;
v i s o t a s e t k i = M a t h R o u n d ( v i s o t a s e t k i ) ;
/ / ! # "% >B % B>G:8 0 D81> A5B:8 4> C:070==>3> D81> C@>2=O
s d v i g l e v e l = v i s o t a s e t k i * l e v e l p r o c ;
s d v i g l e v e l = s d v i g l e v e l / 1 0 0 0 ;
s d v i g l e v e l = M a t h R o u n d ( s d v i g l e v e l ) ;
/ / !'" # $ # / ! " ' !",. # "
f i b o l e v e l = H i g h [ v e r x b a r 0 ] - s d v i g l e v e l * P o i n t ;
f i b o l e v e l = N o r m a l i z e D o u b l e ( f i b o l e v e l , D i g i t s ) ;
r e t u r n ( f i b o l e v e l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" +' 1 2 ! ,/)% ! % "#) $
i n t R a s c h e t B a l l o v V e e r a M A B U L L ( i n t b )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
i n t K o l B u l l B a l l s ;
K o l B u l l B a l l s = 0 ;
/ / 2KG8A;5=85 7=0G5=89 =0 10@5
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 2 BO65;>9
i f ( m a 2 < m a 1 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 3 BO65;>9
i f ( m a 3 < m a 1 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
i f ( m a 3 < m a 2 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 4 BO65;>9
i f ( m a 4 < m a 1 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
i f ( m a 4 < m a 2 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
i f ( m a 4 < m a 3 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 5 BO65;>9
i f ( m a 5 < m a 1 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
i f ( m a 5 < m a 2 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
i f ( m a 5 < m a 3 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
i f ( m a 5 < m a 4 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 6 BO65;>9
i f ( m a 6 < m a 1 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
i f ( m a 6 < m a 2 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
i f ( m a 6 < m a 3 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
i f ( m a 6 < m a 4 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
i f ( m a 6 < m a 5 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 1 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 7 BO65;>9
i f ( m a 7 < m a 1 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 2 ; }
i f ( m a 7 < m a 2 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 2 ; }
i f ( m a 7 < m a 3 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 2 ; }
i f ( m a 7 < m a 4 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 2 ; }
i f ( m a 7 < m a 5 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 2 ; }
i f ( m a 7 < m a 6 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 2 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 8 BO65;>9
i f ( m a 8 < m a 1 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 2 ; }
i f ( m a 8 < m a 2 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 2 ; }
i f ( m a 8 < m a 3 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 2 ; }
i f ( m a 8 < m a 4 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 2 ; }
i f ( m a 8 < m a 5 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 2 ; }
i f ( m a 8 < m a 6 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 2 ; }
i f ( m a 8 < m a 7 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 2 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 9 BO65;>9
i f ( m a 9 < m a 1 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 9 < m a 2 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 9 < m a 3 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 9 < m a 4 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 9 < m a 5 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 9 < m a 6 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 9 < m a 7 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 9 < m a 8 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 1 0 BO65;>9
i f ( m a 1 0 < m a 1 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 1 0 < m a 2 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 1 0 < m a 3 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 1 0 < m a 4 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 1 0 < m a 5 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 1 0 < m a 6 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 1 0 < m a 7 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 1 0 < m a 8 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
i f ( m a 1 0 < m a 9 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 3 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 1 1 BO65;>9
i f ( m a 1 1 < m a 1 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 1 < m a 2 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 1 < m a 3 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 1 < m a 4 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 1 < m a 5 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 1 < m a 6 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 1 < m a 7 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 1 < m a 8 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 1 < m a 9 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 1 < m a 1 0 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 1 2 BO65;>9
i f ( m a 1 2 < m a 1 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 2 < m a 2 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 2 < m a 3 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 2 < m a 4 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 2 < m a 5 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 2 < m a 6 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 2 < m a 7 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 4 ; }
i f ( m a 1 2 < m a 8 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 5 ; }
i f ( m a 1 2 < m a 9 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 5 ; }
i f ( m a 1 2 < m a 1 0 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 5 ; }
i f ( m a 1 2 < m a 1 1 ) { K o l B u l l B a l l s = K o l B u l l B a l l s + 5 ; }
r e t u r n ( K o l B u l l B a l l s ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" 1 2 ! ,/)% ! % "#) $
i n t R a s c h e t B a l l o v V e e r a M A B E A R ( i n t b )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
i n t K o l B e a r B a l l s ;
K o l B e a r B a l l s = 0 ;
/ / 2KG8A;5=85 7=0G5=89 =0 10@5
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 2 BO65;>9
i f ( m a 2 > m a 1 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 3 BO65;>9
i f ( m a 3 > m a 1 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
i f ( m a 3 > m a 2 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 4 BO65;>9
i f ( m a 4 > m a 1 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
i f ( m a 4 > m a 2 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
i f ( m a 4 > m a 3 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 5 BO65;>9
i f ( m a 5 > m a 1 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
i f ( m a 5 > m a 2 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
i f ( m a 5 > m a 3 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
i f ( m a 5 > m a 4 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 6 BO65;>9
i f ( m a 6 > m a 1 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
i f ( m a 6 > m a 2 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
i f ( m a 6 > m a 3 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
i f ( m a 6 > m a 4 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
i f ( m a 6 > m a 5 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 1 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 7 BO65;>9
i f ( m a 7 > m a 1 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 2 ; }
i f ( m a 7 > m a 2 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 2 ; }
i f ( m a 7 > m a 3 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 2 ; }
i f ( m a 7 > m a 4 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 2 ; }
i f ( m a 7 > m a 5 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 2 ; }
i f ( m a 7 > m a 6 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 2 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 8 BO65;>9
i f ( m a 8 > m a 1 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 2 ; }
i f ( m a 8 > m a 2 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 2 ; }
i f ( m a 8 > m a 3 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 2 ; }
i f ( m a 8 > m a 4 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 2 ; }
i f ( m a 8 > m a 5 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 2 ; }
i f ( m a 8 > m a 6 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 2 ; }
i f ( m a 8 > m a 7 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 2 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 9 BO65;>9
i f ( m a 9 > m a 1 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 9 > m a 2 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 9 > m a 3 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 9 > m a 4 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 9 > m a 5 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 9 > m a 6 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 9 > m a 7 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 9 > m a 8 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 1 0 BO65;>9
i f ( m a 1 0 > m a 1 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 1 0 > m a 2 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 1 0 > m a 3 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 1 0 > m a 4 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 1 0 > m a 5 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 1 0 > m a 6 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 1 0 > m a 7 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 1 0 > m a 8 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
i f ( m a 1 0 > m a 9 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 3 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 1 1 BO65;>9
i f ( m a 1 1 > m a 1 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 1 > m a 2 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 1 > m a 3 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 1 > m a 4 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 1 > m a 5 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 1 > m a 6 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 1 > m a 7 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 1 > m a 8 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 1 > m a 9 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 1 > m a 1 0 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
/ / 0=0;87 @0A?>;>65=8O ;53:8E >B=>A8B5;L=> 1 2 BO65;>9
i f ( m a 1 2 > m a 1 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 2 > m a 2 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 2 > m a 3 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 2 > m a 4 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 2 > m a 5 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 2 > m a 6 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 2 > m a 7 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 4 ; }
i f ( m a 1 2 > m a 8 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 5 ; }
i f ( m a 1 2 > m a 9 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 5 ; }
i f ( m a 1 2 > m a 1 0 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 5 ; }
i f ( m a 1 2 > m a 1 1 ) { K o l B e a r B a l l s = K o l B e a r B a l l s + 5 ; }
r e t u r n ( K o l B e a r B a l l s ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" # / ! % ! ,/) ! 1 2
d o u b l e R a s c h e t L e v e l V e r x n e y 1 2 M A ( i n t b )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 , v e r x l e v e l ;
/ / 2KG8A;5=85 7=0G5=89 =0 10@5
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
v e r x l e v e l = M a t h M a x ( m a 1 , m a 2 ) ;
v e r x l e v e l = M a t h M a x ( v e r x l e v e l , m a 3 ) ;
v e r x l e v e l = M a t h M a x ( v e r x l e v e l , m a 4 ) ;
v e r x l e v e l = M a t h M a x ( v e r x l e v e l , m a 5 ) ;
v e r x l e v e l = M a t h M a x ( v e r x l e v e l , m a 6 ) ;
v e r x l e v e l = M a t h M a x ( v e r x l e v e l , m a 7 ) ;
v e r x l e v e l = M a t h M a x ( v e r x l e v e l , m a 8 ) ;
v e r x l e v e l = M a t h M a x ( v e r x l e v e l , m a 9 ) ;
v e r x l e v e l = M a t h M a x ( v e r x l e v e l , m a 1 0 ) ;
v e r x l e v e l = M a t h M a x ( v e r x l e v e l , m a 1 1 ) ;
v e r x l e v e l = M a t h M a x ( v e r x l e v e l , m a 1 2 ) ;
v e r x l e v e l = N o r m a l i z e D o u b l e ( v e r x l e v e l , D i g i t s ) ;
r e t u r n ( v e r x l e v e l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" # / ! ! ,/) ! 1 2
d o u b l e R a s c h e t L e v e l N i z n e y 1 2 M A ( i n t b )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 , n i z n l e v e l ;
/ / 2KG8A;5=85 7=0G5=89 =0 10@5
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
n i z n l e v e l = M a t h M i n ( m a 1 , m a 2 ) ;
n i z n l e v e l = M a t h M i n ( n i z n l e v e l , m a 3 ) ;
n i z n l e v e l = M a t h M i n ( n i z n l e v e l , m a 4 ) ;
n i z n l e v e l = M a t h M i n ( n i z n l e v e l , m a 5 ) ;
n i z n l e v e l = M a t h M i n ( n i z n l e v e l , m a 6 ) ;
n i z n l e v e l = M a t h M i n ( n i z n l e v e l , m a 7 ) ;
n i z n l e v e l = M a t h M i n ( n i z n l e v e l , m a 8 ) ;
n i z n l e v e l = M a t h M i n ( n i z n l e v e l , m a 9 ) ;
n i z n l e v e l = M a t h M i n ( n i z n l e v e l , m a 1 0 ) ;
n i z n l e v e l = M a t h M i n ( n i z n l e v e l , m a 1 1 ) ;
n i z n l e v e l = M a t h M i n ( n i z n l e v e l , m a 1 2 ) ;
n i z n l e v e l = N o r m a l i z e D o u b l e ( n i z n l e v e l , D i g i t s ) ;
r e t u r n ( n i z n l e v e l ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" % 1 2 ! ,/)% ! % # "%
d o u b l e R a s c h e t R a z m a x a V e e r a 1 2 M A ( i n t b )
{
d o u b l e L e v e l V e r x n e y M A , L e v e l N i z n e y M A , R a z m a x V e e r a M A ;
L e v e l V e r x n e y M A = 0 ; L e v e l N i z n e y M A = 0 ; R a z m a x V e e r a M A = 0 ;
/ / C@>25=L 25@E=59 A:>;L7OI59 A@54=59
L e v e l V e r x n e y M A = R a s c h e t L e v e l V e r x n e y 1 2 M A ( b ) ;
/ / C@>25=L =86=59 A:>;L7OI59 A@54=59
L e v e l N i z n e y M A = R a s c h e t L e v e l N i z n e y 1 2 M A ( b ) ;
/ / @0AAB>O=85 <564C =8<8 2 ?C=:B0E
R a z m a x V e e r a M A = L e v e l V e r x n e y M A - L e v e l N i z n e y M A ;
R a z m a x V e e r a M A = R a z m a x V e e r a M A / P o i n t ;
R a z m a x V e e r a M A = M a t h R o u n d ( R a z m a x V e e r a M A ) ;
r e t u r n ( R a z m a x V e e r a M A ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ! % 1 2 ! ,/)% ! % &+% # "%
d o u b l e R a s c h e t S r e d n R a z m a x V e e r a 1 2 M A ( i n t b )
{
d o u b l e S r e d n R a z m a x M A , O b s h i y R a z m a x , T e k y s h R a z m a x ;
i n t i , c o u n t , L e v a y a G r a n i c a , D a l n o s t G r a n i c y ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
S r e d n R a z m a x M A = 0 ;
/ / ;520O 3@0=8F0 4;O ?>4AG5B0, A;520 >B =55 4>;6=> 1KBL =5 <5=55 3 0 0 0 10@>2
L e v a y a G r a n i c a = B a r s - 3 0 0 0 ;
/ / @0AAB>O=85 >B ;52>9 3@0=8FK ?>4AG5B0 4> 10@0 4>;6=> 1KBL =5 <5=55 5 0 0 0
D a l n o s t G r a n i c y = L e v a y a G r a n i c a - b ;
/ / AC<<0 ?C=:B>2 2A5E ?>4AG8B0==KE @07<0E>2
O b s h i y R a z m a x = 0 ;
/ / B5:CI89 @07<0E 255@0 2 ?C=:B0E
T e k y s h R a z m a x = 0 ;
/ / :>;8G5AB2> 2A5E ?>4AG8B0==KE @07<0E>2
c o u n t = 0 ;
/ / ?@>F54C@0 4>;30O, ?>MB><C 15@5< =5 2A5 10@K ?>4@O4
i f ( D a l n o s t G r a n i c y > 5 0 0 0 )
{
f o r ( i = b ; i < L e v a y a G r a n i c a ; i = i + 2 0 )
{
/ / @0AG5B B5:CI53> @07<0E0 255@0 87 1 2 2 ?C=:B0E =0 10@5 i
T e k y s h R a z m a x = R a s c h e t R a z m a x a V e e r a 1 2 M A ( i ) ;
O b s h i y R a z m a x = O b s h i y R a z m a x + T e k y s h R a z m a x ;
c o u n t = c o u n t + 1 ;
}
}
/ / A@54=89 @07<5@ C7:>AB8 255@0 87 1 2 2 F5;KE ?C=:B0E
S r e d n R a z m a x M A = O b s h i y R a z m a x / c o u n t ;
S r e d n R a z m a x M A = M a t h R o u n d ( S r e d n R a z m a x M A ) ;
r e t u r n ( S r e d n R a z m a x M A ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E +', A25G59 "#) $
i n t R a s c h e t P r o b i t M A O n e B U L L ( i n t b )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
i n t K o l v o P r o b i t M A ;
/ / :>;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E +', A25G59
K o l v o P r o b i t M A = 0 ;
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 = N o r m a l i z e D o u b l e ( m a 1 , D i g i t s ) ;
m a 2 = N o r m a l i z e D o u b l e ( m a 2 , D i g i t s ) ;
m a 3 = N o r m a l i z e D o u b l e ( m a 3 , D i g i t s ) ;
m a 4 = N o r m a l i z e D o u b l e ( m a 4 , D i g i t s ) ;
m a 5 = N o r m a l i z e D o u b l e ( m a 5 , D i g i t s ) ;
m a 6 = N o r m a l i z e D o u b l e ( m a 6 , D i g i t s ) ;
m a 7 = N o r m a l i z e D o u b l e ( m a 7 , D i g i t s ) ;
m a 8 = N o r m a l i z e D o u b l e ( m a 8 , D i g i t s ) ;
m a 9 = N o r m a l i z e D o u b l e ( m a 9 , D i g i t s ) ;
m a 1 0 = N o r m a l i z e D o u b l e ( m a 1 0 , D i g i t s ) ;
m a 1 1 = N o r m a l i z e D o u b l e ( m a 1 1 , D i g i t s ) ;
m a 1 2 = N o r m a l i z e D o u b l e ( m a 1 2 , D i g i t s ) ;
i f ( ( O p e n [ b ] < = m a 1 ) & & ( C l o s e [ b ] > = m a 1 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] < = m a 2 ) & & ( C l o s e [ b ] > = m a 2 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] < = m a 3 ) & & ( C l o s e [ b ] > = m a 3 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] < = m a 4 ) & & ( C l o s e [ b ] > = m a 4 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] < = m a 5 ) & & ( C l o s e [ b ] > = m a 5 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] < = m a 6 ) & & ( C l o s e [ b ] > = m a 6 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] < = m a 7 ) & & ( C l o s e [ b ] > = m a 7 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] < = m a 8 ) & & ( C l o s e [ b ] > = m a 8 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] < = m a 9 ) & & ( C l o s e [ b ] > = m a 9 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] < = m a 1 0 ) & & ( C l o s e [ b ] > = m a 1 0 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] < = m a 1 1 ) & & ( C l o s e [ b ] > = m a 1 1 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] < = m a 1 2 ) & & ( C l o s e [ b ] > = m a 1 2 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
r e t u r n ( K o l v o P r o b i t M A ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E , A25G59 "#) $
i n t R a s c h e t P r o b i t M A O n e B E A R ( i n t b )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
i n t K o l v o P r o b i t M A ;
K o l v o P r o b i t M A = 0 ;
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 = N o r m a l i z e D o u b l e ( m a 1 , D i g i t s ) ;
m a 2 = N o r m a l i z e D o u b l e ( m a 2 , D i g i t s ) ;
m a 3 = N o r m a l i z e D o u b l e ( m a 3 , D i g i t s ) ;
m a 4 = N o r m a l i z e D o u b l e ( m a 4 , D i g i t s ) ;
m a 5 = N o r m a l i z e D o u b l e ( m a 5 , D i g i t s ) ;
m a 6 = N o r m a l i z e D o u b l e ( m a 6 , D i g i t s ) ;
m a 7 = N o r m a l i z e D o u b l e ( m a 7 , D i g i t s ) ;
m a 8 = N o r m a l i z e D o u b l e ( m a 8 , D i g i t s ) ;
m a 9 = N o r m a l i z e D o u b l e ( m a 9 , D i g i t s ) ;
m a 1 0 = N o r m a l i z e D o u b l e ( m a 1 0 , D i g i t s ) ;
m a 1 1 = N o r m a l i z e D o u b l e ( m a 1 1 , D i g i t s ) ;
m a 1 2 = N o r m a l i z e D o u b l e ( m a 1 2 , D i g i t s ) ;
i f ( ( O p e n [ b ] > = m a 1 ) & & ( C l o s e [ b ] < = m a 1 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] > = m a 2 ) & & ( C l o s e [ b ] < = m a 2 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] > = m a 3 ) & & ( C l o s e [ b ] < = m a 3 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] > = m a 4 ) & & ( C l o s e [ b ] < = m a 4 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] > = m a 5 ) & & ( C l o s e [ b ] < = m a 5 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] > = m a 6 ) & & ( C l o s e [ b ] < = m a 6 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] > = m a 7 ) & & ( C l o s e [ b ] < = m a 7 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] > = m a 8 ) & & ( C l o s e [ b ] < = m a 8 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] > = m a 9 ) & & ( C l o s e [ b ] < = m a 9 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] > = m a 1 0 ) & & ( C l o s e [ b ] < = m a 1 0 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] > = m a 1 1 ) & & ( C l o s e [ b ] < = m a 1 1 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
i f ( ( O p e n [ b ] > = m a 1 2 ) & & ( C l o s e [ b ] < = m a 1 2 ) ) { K o l v o P r o b i t M A = K o l v o P r o b i t M A + 1 ; }
r e t u r n ( K o l v o P r o b i t M A ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / '/ , +', % 4 % "/+%
b o o l P r o v e r k a V e e r 4 X M A B i g B U L L ( i n t b )
{
d o u b l e m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
b o o l V e e r 4 X M A B i g B U L L ;
/ / ?@>25@:0 =0;8G8O 255@0 225@E 87 4 E BO65;KE
V e e r 4 X M A B i g B U L L = f a l s e ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = N o r m a l i z e D o u b l e ( m a 9 , D i g i t s ) ;
m a 1 0 = N o r m a l i z e D o u b l e ( m a 1 0 , D i g i t s ) ;
m a 1 1 = N o r m a l i z e D o u b l e ( m a 1 1 , D i g i t s ) ;
m a 1 2 = N o r m a l i z e D o u b l e ( m a 1 2 , D i g i t s ) ;
/ / ?@028;L=K9 255@ % 87 4 E BO65;KE
i f ( ( m a 1 2 < = m a 1 1 ) & & ( m a 1 1 < = m a 1 0 ) & & ( m a 1 0 < = m a 9 ) )
{
V e e r 4 X M A B i g B U L L = t r u e ;
}
r e t u r n ( V e e r 4 X M A B i g B U L L ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / '/ , , 4 % "/+%
b o o l P r o v e r k a V e e r 4 X M A B i g B E A R ( i n t b )
{
d o u b l e m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
b o o l V e e r 4 X M A B i g B E A R ;
/ / ?@>25@:0 =0;8G8O 255@0 225@E 87 4 E BO65;KE
V e e r 4 X M A B i g B E A R = f a l s e ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = N o r m a l i z e D o u b l e ( m a 9 , D i g i t s ) ;
m a 1 0 = N o r m a l i z e D o u b l e ( m a 1 0 , D i g i t s ) ;
m a 1 1 = N o r m a l i z e D o u b l e ( m a 1 1 , D i g i t s ) ;
m a 1 2 = N o r m a l i z e D o u b l e ( m a 1 2 , D i g i t s ) ;
/ / ?@028;L=K9 255@ 87 4 E BO65;KE
i f ( ( m a 1 2 > = m a 1 1 ) & & ( m a 1 1 > = m a 1 0 ) & & ( m a 1 0 > = m a 9 ) )
{
V e e r 4 X M A B i g B E A R = t r u e ;
}
r e t u r n ( V e e r 4 X M A B i g B E A R ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !'" , " ! ,/)% ! % "#) $
i n t R a s c h e t V e k t o r a N a p r a v l M A B E A R ( i n t b )
{
/ / A:>;L7OI85 A@54=85 =0 ;52>< A@575 B@0?5F88
d o u b l e m a l e v o 1 , m a l e v o 2 , m a l e v o 3 , m a l e v o 4 , m a l e v o 5 , m a l e v o 6 , m a l e v o 7 ;
d o u b l e m a l e v o 8 , m a l e v o 9 , m a l e v o 1 0 , m a l e v o 1 1 , m a l e v o 1 2 ;
/ / A:>;L7OI85 A@54=85 =0 ?@02>< A@575 B@0?5F88
d o u b l e m a p r a v 1 , m a p r a v 2 , m a p r a v 3 , m a p r a v 4 , m a p r a v 5 , m a p r a v 6 , m a p r a v 7 ;
d o u b l e m a p r a v 8 , m a p r a v 9 , m a p r a v 1 0 , m a p r a v 1 1 , m a p r a v 1 2 ;
i n t V e k t o r B E A R M A , l e v b a r ;
/ / >B25B, 2>72@0I05<K9 DC=:F859 - "
V e k t o r B E A R M A = 0 ;
/ / 10@ A;520 >B 10@0 - ;52K9 A@57 B@0?5F88
l e v b a r = 0 ;
l e v b a r = b + S h i r i n a O t r e z k a T r a p M A ;
/ / @0AG5B A:>;L7OI8E A@54=8E =0 ?@02>< A@575 B@0?5F88
m a p r a v 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
/ / @0AG5B A:>;L7OI8E A@54=8E =0 ;52>< A@575 B@0?5F88
m a l e v o 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b a r ) ;
m a l e v o 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b a r ) ;
m a l e v o 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b a r ) ;
m a l e v o 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b a r ) ;
m a l e v o 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b a r ) ;
m a l e v o 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b a r ) ;
m a l e v o 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b a r ) ;
m a l e v o 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b a r ) ;
m a l e v o 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b a r ) ;
m a l e v o 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b a r ) ;
m a l e v o 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b a r ) ;
m a l e v o 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b a r ) ;
r e t u r n ( V e k t o r B E A R M A ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 5 - " % " #
b o o l P r o b o y F i v e L i g h t M A T r e n d B E A R ( i n t b , b o o l s v e c h a 2 x )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
i n t k o l p r o b m a , k o l v o p r o b 2 x , t o c h n v e e r a ;
b o o l p r o b 1 , p r o b 2 , p r o b 3 , p r o b 4 , p r o b 5 ;
b o o l P r o b B e a r L i g h t 5 X ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E <54256L59 A25G59
k o l p r o b m a = 0 ;
/ / B>G=>ABL 2K?>;=5=8O CA;>289 ?@028;L=>3> <54256L53> 255@0 4;O ?@>1>O
t o c h n v e e r a = 0 ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E <54256L59 A25G59
k o l v o p r o b 2 x = 0 ;
/ / "", ) + $# &
P r o b B e a r L i g h t 5 X = f a l s e ;
/ / @0AG5B C@>2=59 1 2 A:>;L7OI8E A@54=8E
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 = N o r m a l i z e D o u b l e ( m a 1 , D i g i t s ) ;
m a 2 = N o r m a l i z e D o u b l e ( m a 2 , D i g i t s ) ;
m a 3 = N o r m a l i z e D o u b l e ( m a 3 , D i g i t s ) ;
m a 4 = N o r m a l i z e D o u b l e ( m a 4 , D i g i t s ) ;
m a 5 = N o r m a l i z e D o u b l e ( m a 5 , D i g i t s ) ;
m a 6 = N o r m a l i z e D o u b l e ( m a 6 , D i g i t s ) ;
m a 7 = N o r m a l i z e D o u b l e ( m a 7 , D i g i t s ) ;
m a 8 = N o r m a l i z e D o u b l e ( m a 8 , D i g i t s ) ;
m a 9 = N o r m a l i z e D o u b l e ( m a 9 , D i g i t s ) ;
m a 1 0 = N o r m a l i z e D o u b l e ( m a 1 0 , D i g i t s ) ;
m a 1 1 = N o r m a l i z e D o u b l e ( m a 1 1 , D i g i t s ) ;
m a 1 2 = N o r m a l i z e D o u b l e ( m a 1 2 , D i g i t s ) ;
/ / ?>4AG8BK205< :>;8G5AB2> ,% ?@>1>52 4;O 5 ;53:8E
i f ( ( O p e n [ b ] > = m a 1 ) & & ( C l o s e [ b ] < = m a 1 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 2 ) & & ( C l o s e [ b ] < = m a 2 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 3 ) & & ( C l o s e [ b ] < = m a 3 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 4 ) & & ( C l o s e [ b ] < = m a 4 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 5 ) & & ( C l o s e [ b ] < = m a 5 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
/ / ?>4AG8BK205< AB5?5=L ?@028;L=>AB8 , 255@0 87 1 2 A:>;L7OI8E A@54=8E
i f ( m a 1 2 > = m a 7 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 1 > = m a 8 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 0 > = m a 9 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 > = m a 8 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 > = m a 7 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 > = m a 6 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 6 > = m a 5 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 6 > = m a 4 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 6 > = m a 3 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 6 > = m a 2 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 6 > = m a 1 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
/ / 5A;8 5ABL ?@028;L=K9 255@ 8 ?@>1>9 5 % ;53:8E A 2KE>4>< 2=87
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l p r o b m a = = 5 ) )
{
P r o b B e a r L i g h t 5 X = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL 42>9=0O <54256LO A25G0
i f ( s v e c h a 2 x = = t r u e )
{
/ / :>;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E 42>9=>9 <54256L59 A25G59
k o l v o p r o b 2 x = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 = f a l s e ;
p r o b 1 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 1 3 , b ) ;
i f ( p r o b 1 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 2 = f a l s e ;
p r o b 2 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 2 1 , b ) ;
i f ( p r o b 2 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 3 = f a l s e ;
p r o b 3 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 3 4 , b ) ;
i f ( p r o b 3 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 4 = f a l s e ;
p r o b 4 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 5 5 , b ) ;
i f ( p r o b 4 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 5 = f a l s e ;
p r o b 5 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 8 9 , b ) ;
i f ( p r o b 5 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL ?@028;L=K9 255@ 8 ?@>1>9 5 % ;53:8E A 2KE>4>< 2=87
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l v o p r o b 2 x = = 5 ) & & ( k o l p r o b m a > 0 ) )
{
P r o b B e a r L i g h t 5 X = t r u e ;
}
}
r e t u r n ( P r o b B e a r L i g h t 5 X ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / +' 5 - " % " #
b o o l P r o b o y F i v e L i g h t M A T r e n d B U L L ( i n t b , b o o l s v e c h a 2 x )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
i n t k o l p r o b m a , k o l v o p r o b 2 x , t o c h n v e e r a ;
b o o l p r o b 1 , p r o b 2 , p r o b 3 , p r o b 4 , p r o b 5 ;
b o o l P r o b B u l l L i g h t 5 X ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E 1KGL59 A25G59
k o l p r o b m a = 0 ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E 1KGL59 A25G59
k o l v o p r o b 2 x = 0 ;
/ / B>G=>ABL 2K?>;=5=8O CA;>289 ?@028;L=>3> 1KGL53> 255@0 4;O ?@>1>O
t o c h n v e e r a = 0 ;
/ / "", ) + $# &
P r o b B u l l L i g h t 5 X = f a l s e ;
/ / @0AG5B C@>2=59 1 2 A:>;L7OI8E A@54=8E
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 = N o r m a l i z e D o u b l e ( m a 1 , D i g i t s ) ;
m a 2 = N o r m a l i z e D o u b l e ( m a 2 , D i g i t s ) ;
m a 3 = N o r m a l i z e D o u b l e ( m a 3 , D i g i t s ) ;
m a 4 = N o r m a l i z e D o u b l e ( m a 4 , D i g i t s ) ;
m a 5 = N o r m a l i z e D o u b l e ( m a 5 , D i g i t s ) ;
m a 6 = N o r m a l i z e D o u b l e ( m a 6 , D i g i t s ) ;
m a 7 = N o r m a l i z e D o u b l e ( m a 7 , D i g i t s ) ;
m a 8 = N o r m a l i z e D o u b l e ( m a 8 , D i g i t s ) ;
m a 9 = N o r m a l i z e D o u b l e ( m a 9 , D i g i t s ) ;
m a 1 0 = N o r m a l i z e D o u b l e ( m a 1 0 , D i g i t s ) ;
m a 1 1 = N o r m a l i z e D o u b l e ( m a 1 1 , D i g i t s ) ;
m a 1 2 = N o r m a l i z e D o u b l e ( m a 1 2 , D i g i t s ) ;
/ / ?>4AG8BK205< :>;8G5AB2> +',% ?@>1>52 4;O 5 ;53:8E
i f ( ( O p e n [ b ] < = m a 1 ) & & ( C l o s e [ b ] > = m a 1 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 2 ) & & ( C l o s e [ b ] > = m a 2 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 3 ) & & ( C l o s e [ b ] > = m a 3 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 4 ) & & ( C l o s e [ b ] > = m a 4 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 5 ) & & ( C l o s e [ b ] > = m a 5 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
/ / ?>4AG8BK205< AB5?5=L ?@028;L=>AB8 +', 255@0 87 1 2 A:>;L7OI8E A@54=8E
i f ( m a 1 2 < = m a 7 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 1 < = m a 8 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 0 < = m a 9 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 < = m a 8 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 < = m a 7 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 < = m a 6 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 6 < = m a 5 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 6 < = m a 4 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 6 < = m a 3 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 6 < = m a 2 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 6 < = m a 1 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
/ / 5A;8 5ABL ?@028;L=K9 +' 255@ 8 ?@>1>9 5 % ;53:8E A 2KE>4>< 225@E
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l p r o b m a = = 5 ) )
{
P r o b B u l l L i g h t 5 X = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL 42>9=0O 1KGLO A25G0
i f ( s v e c h a 2 x = = t r u e )
{
/ / :>;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E 42>9=>9 1KGL59 A25G59
k o l v o p r o b 2 x = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 = f a l s e ;
p r o b 1 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 1 3 , b ) ;
i f ( p r o b 1 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 2 = f a l s e ;
p r o b 2 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 2 1 , b ) ;
i f ( p r o b 2 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 3 = f a l s e ;
p r o b 3 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 3 4 , b ) ;
i f ( p r o b 3 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 4 = f a l s e ;
p r o b 4 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 5 5 , b ) ;
i f ( p r o b 4 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 5 = f a l s e ;
p r o b 5 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 8 9 , b ) ;
i f ( p r o b 5 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL ?@028;L=K9 +' 255@ 8 ?@>1>9 5 % ;53:8E A 2KE>4>< 225@E
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l v o p r o b 2 x = = 5 ) & & ( k o l p r o b m a > 0 ) )
{
P r o b B u l l L i g h t 5 X = t r u e ;
}
}
r e t u r n ( P r o b B u l l L i g h t 5 X ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>1>9 >4=>9 A:>;L7OI59 A@54=59 A # + ?5@8>4>< A25G59 =0 10@5
b o o l P r o b o y O n e M A C a n d l e 2 X B E A R ( i n t P e r M A , i n t b )
{
d o u b l e m a l e f t , m a p r a v ;
i n t l e v b r ;
b o o l p r o b 2 x ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
p r o b 2 x = f a l s e ;
/ / 10@ A;520 >B ?@>25@O5<>3> 10@0
l e v b r = b + 1 ;
/ / C@>25=L =0 ;52>< 10@5
m a l e f t = i M A ( N U L L , 0 , P e r M A , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b r ) ;
m a l e f t = N o r m a l i z e D o u b l e ( m a l e f t , D i g i t s ) ;
/ / C@>25=L =0 ?@>25@O5<>< 10@5
m a p r a v = i M A ( N U L L , 0 , P e r M A , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v = N o r m a l i z e D o u b l e ( m a p r a v , D i g i t s ) ;
/ / ?@>25@:0 ?@>18B8O 42>9=>9 A25G59 =0 10@5 ! %#
i f ( ( H i g h [ l e v b r ] > = m a l e f t ) & & ( C l o s e [ b ] < = m a p r a v ) )
{
p r o b 2 x = t r u e ;
}
r e t u r n ( p r o b 2 x ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E , A25G59
i n t K o l v o P r o b M A S v e c h a 2 X B E A R ( i n t b )
{
i n t K o l v o P r o b M A ;
b o o l p r o b 1 , p r o b 2 , p r o b 3 , p r o b 4 , p r o b 5 , p r o b 6 , p r o b 7 , p r o b 8 , p r o b 9 , p r o b 1 0 , p r o b 1 1 , p r o b 1 2 ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
K o l v o P r o b M A = 0 ;
/ / ?>4AG5B ,% ?@>1>52 A:>;L7OI8E A@54=8E , A25G59
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 = f a l s e ;
p r o b 1 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 1 3 , b ) ;
i f ( p r o b 1 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 2 = f a l s e ;
p r o b 2 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 2 1 , b ) ;
i f ( p r o b 2 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 3 = f a l s e ;
p r o b 3 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 3 4 , b ) ;
i f ( p r o b 3 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 4 = f a l s e ;
p r o b 4 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 5 5 , b ) ;
i f ( p r o b 4 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 5 = f a l s e ;
p r o b 5 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 8 9 , b ) ;
i f ( p r o b 5 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 6 = f a l s e ;
p r o b 6 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 1 4 4 , b ) ;
i f ( p r o b 6 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 7 = f a l s e ;
p r o b 7 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 2 3 3 , b ) ;
i f ( p r o b 7 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 8 = f a l s e ;
p r o b 8 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 3 7 7 , b ) ;
i f ( p r o b 8 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 9 = f a l s e ;
p r o b 9 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 6 1 0 , b ) ;
i f ( p r o b 9 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 0 = f a l s e ;
p r o b 1 0 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 9 8 7 , b ) ;
i f ( p r o b 1 0 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 1 = f a l s e ;
p r o b 1 1 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 1 5 9 7 , b ) ;
i f ( p r o b 1 1 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 2 = f a l s e ;
p r o b 1 2 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 2 5 8 4 , b ) ;
i f ( p r o b 1 2 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
r e t u r n ( K o l v o P r o b M A ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / +' ?@>1>9 >4=>9 A:>;L7OI59 A@54=59 A # + ?5@8>4>< A25G59 =0 10@5
b o o l P r o b o y O n e M A C a n d l e 2 X B U L L ( i n t P e r M A , i n t b )
{
d o u b l e m a l e f t , m a p r a v ;
i n t l e v b r ;
b o o l p r o b 2 x ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
p r o b 2 x = f a l s e ;
/ / 10@ A;520 >B ?@>25@O5<>3> 10@0
l e v b r = b + 1 ;
/ / C@>25=L =0 ;52>< 10@5
m a l e f t = i M A ( N U L L , 0 , P e r M A , 0 , M O D E _ E M A , P R I C E _ C L O S E , l e v b r ) ;
m a l e f t = N o r m a l i z e D o u b l e ( m a l e f t , D i g i t s ) ;
/ / C@>25=L =0 ?@>25@O5<>< 10@5
m a p r a v = i M A ( N U L L , 0 , P e r M A , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a p r a v = N o r m a l i z e D o u b l e ( m a p r a v , D i g i t s ) ;
/ / ?@>25@:0 ?@>18B8O 42>9=>9 +', A25G59 =0 10@5 ! # %
i f ( ( L o w [ l e v b r ] < = m a l e f t ) & & ( C l o s e [ b ] > = m a p r a v ) )
{
p r o b 2 x = t r u e ;
}
r e t u r n ( p r o b 2 x ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E +', A25G59
i n t K o l v o P r o b M A S v e c h a 2 X B U L L ( i n t b )
{
i n t K o l v o P r o b M A ;
b o o l p r o b 1 , p r o b 2 , p r o b 3 , p r o b 4 , p r o b 5 , p r o b 6 , p r o b 7 , p r o b 8 , p r o b 9 , p r o b 1 0 , p r o b 1 1 , p r o b 1 2 ;
/ / >B25B, 2>72@0I05<K9 DC=:F859
K o l v o P r o b M A = 0 ;
/ / ?>4AG5B +',% ?@>1>52 A:>;L7OI8E A@54=8E +', A25G59
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 = f a l s e ;
p r o b 1 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 1 3 , b ) ;
i f ( p r o b 1 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 2 = f a l s e ;
p r o b 2 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 2 1 , b ) ;
i f ( p r o b 2 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 3 = f a l s e ;
p r o b 3 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 3 4 , b ) ;
i f ( p r o b 3 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 4 = f a l s e ;
p r o b 4 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 5 5 , b ) ;
i f ( p r o b 4 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 5 = f a l s e ;
p r o b 5 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 8 9 , b ) ;
i f ( p r o b 5 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 6 = f a l s e ;
p r o b 6 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 1 4 4 , b ) ;
i f ( p r o b 6 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 7 = f a l s e ;
p r o b 7 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 2 3 3 , b ) ;
i f ( p r o b 7 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 8 = f a l s e ;
p r o b 8 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 3 7 7 , b ) ;
i f ( p r o b 8 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 9 = f a l s e ;
p r o b 9 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 6 1 0 , b ) ;
i f ( p r o b 9 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 0 = f a l s e ;
p r o b 1 0 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 9 8 7 , b ) ;
i f ( p r o b 1 0 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 1 = f a l s e ;
p r o b 1 1 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 1 5 9 7 , b ) ;
i f ( p r o b 1 1 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 2 = f a l s e ;
p r o b 1 2 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 2 5 8 4 , b ) ;
i f ( p r o b 1 2 = = t r u e )
{
K o l v o P r o b M A = K o l v o P r o b M A + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
r e t u r n ( K o l v o P r o b M A ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / +' 6 - " % " #
b o o l P r o b o y S i x L i g h t M A T r e n d B U L L ( i n t b , b o o l s v e c h a 2 x )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
i n t k o l p r o b m a , k o l v o p r o b 2 x , t o c h n v e e r a ;
b o o l p r o b 1 , p r o b 2 , p r o b 3 , p r o b 4 , p r o b 5 , p r o b 6 ;
b o o l P r o b B u l l L i g h t 6 X ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E 1KGL59 A25G59
k o l p r o b m a = 0 ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E 1KGL59 A25G59
k o l v o p r o b 2 x = 0 ;
/ / B>G=>ABL 2K?>;=5=8O CA;>289 ?@028;L=>3> 1KGL53> 255@0 4;O ?@>1>O
t o c h n v e e r a = 0 ;
/ / "", ) + $# &
P r o b B u l l L i g h t 6 X = f a l s e ;
/ / @0AG5B C@>2=59 1 2 A:>;L7OI8E A@54=8E
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 = N o r m a l i z e D o u b l e ( m a 1 , D i g i t s ) ;
m a 2 = N o r m a l i z e D o u b l e ( m a 2 , D i g i t s ) ;
m a 3 = N o r m a l i z e D o u b l e ( m a 3 , D i g i t s ) ;
m a 4 = N o r m a l i z e D o u b l e ( m a 4 , D i g i t s ) ;
m a 5 = N o r m a l i z e D o u b l e ( m a 5 , D i g i t s ) ;
m a 6 = N o r m a l i z e D o u b l e ( m a 6 , D i g i t s ) ;
m a 7 = N o r m a l i z e D o u b l e ( m a 7 , D i g i t s ) ;
m a 8 = N o r m a l i z e D o u b l e ( m a 8 , D i g i t s ) ;
m a 9 = N o r m a l i z e D o u b l e ( m a 9 , D i g i t s ) ;
m a 1 0 = N o r m a l i z e D o u b l e ( m a 1 0 , D i g i t s ) ;
m a 1 1 = N o r m a l i z e D o u b l e ( m a 1 1 , D i g i t s ) ;
m a 1 2 = N o r m a l i z e D o u b l e ( m a 1 2 , D i g i t s ) ;
/ / ?>4AG8BK205< :>;8G5AB2> +',% ?@>1>52 4;O 6 ;53:8E
i f ( ( O p e n [ b ] < = m a 1 ) & & ( C l o s e [ b ] > = m a 1 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 2 ) & & ( C l o s e [ b ] > = m a 2 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 3 ) & & ( C l o s e [ b ] > = m a 3 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 4 ) & & ( C l o s e [ b ] > = m a 4 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 5 ) & & ( C l o s e [ b ] > = m a 5 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 6 ) & & ( C l o s e [ b ] > = m a 6 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
/ / ?>4AG8BK205< AB5?5=L ?@028;L=>AB8 +', 255@0 87 1 2 A:>;L7OI8E A@54=8E
i f ( m a 1 2 < = m a 7 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 1 < = m a 8 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 0 < = m a 9 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 < = m a 8 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 < = m a 7 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 < = m a 6 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 < = m a 5 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 < = m a 4 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 < = m a 3 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 < = m a 2 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 < = m a 1 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
/ / 5A;8 5ABL ?@028;L=K9 +' 255@ 8 ?@>1>9 6 % ;53:8E A 2KE>4>< 225@E
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l p r o b m a = = 6 ) )
{
P r o b B u l l L i g h t 6 X = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL 42>9=0O 1KGLO A25G0
i f ( s v e c h a 2 x = = t r u e )
{
/ / :>;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E 42>9=>9 1KGL59 A25G59
k o l v o p r o b 2 x = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 = f a l s e ;
p r o b 1 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 1 3 , b ) ;
i f ( p r o b 1 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 2 = f a l s e ;
p r o b 2 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 2 1 , b ) ;
i f ( p r o b 2 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 3 = f a l s e ;
p r o b 3 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 3 4 , b ) ;
i f ( p r o b 3 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 4 = f a l s e ;
p r o b 4 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 5 5 , b ) ;
i f ( p r o b 4 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 5 = f a l s e ;
p r o b 5 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 8 9 , b ) ;
i f ( p r o b 5 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 6 = f a l s e ;
p r o b 6 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 1 4 4 , b ) ;
i f ( p r o b 6 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL ?@028;L=K9 +' 255@ 8 ?@>1>9 6 % ;53:8E A 2KE>4>< 225@E
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l v o p r o b 2 x = = 6 ) & & ( k o l p r o b m a > 0 ) )
{
P r o b B u l l L i g h t 6 X = t r u e ;
}
}
r e t u r n ( P r o b B u l l L i g h t 6 X ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 6 - " % " #
b o o l P r o b o y S i x L i g h t M A T r e n d B E A R ( i n t b , b o o l s v e c h a 2 x )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
i n t k o l p r o b m a , k o l v o p r o b 2 x , t o c h n v e e r a ;
b o o l p r o b 1 , p r o b 2 , p r o b 3 , p r o b 4 , p r o b 5 , p r o b 6 ;
b o o l P r o b B e a r L i g h t 6 X ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E , A25G59
k o l p r o b m a = 0 ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E , A25G59
k o l v o p r o b 2 x = 0 ;
/ / B>G=>ABL 2K?>;=5=8O CA;>289 ?@028;L=>3> , 255@0 4;O ?@>1>O
t o c h n v e e r a = 0 ;
/ / "", ) + $# &
P r o b B e a r L i g h t 6 X = f a l s e ;
/ / @0AG5B C@>2=59 1 2 A:>;L7OI8E A@54=8E
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 = N o r m a l i z e D o u b l e ( m a 1 , D i g i t s ) ;
m a 2 = N o r m a l i z e D o u b l e ( m a 2 , D i g i t s ) ;
m a 3 = N o r m a l i z e D o u b l e ( m a 3 , D i g i t s ) ;
m a 4 = N o r m a l i z e D o u b l e ( m a 4 , D i g i t s ) ;
m a 5 = N o r m a l i z e D o u b l e ( m a 5 , D i g i t s ) ;
m a 6 = N o r m a l i z e D o u b l e ( m a 6 , D i g i t s ) ;
m a 7 = N o r m a l i z e D o u b l e ( m a 7 , D i g i t s ) ;
m a 8 = N o r m a l i z e D o u b l e ( m a 8 , D i g i t s ) ;
m a 9 = N o r m a l i z e D o u b l e ( m a 9 , D i g i t s ) ;
m a 1 0 = N o r m a l i z e D o u b l e ( m a 1 0 , D i g i t s ) ;
m a 1 1 = N o r m a l i z e D o u b l e ( m a 1 1 , D i g i t s ) ;
m a 1 2 = N o r m a l i z e D o u b l e ( m a 1 2 , D i g i t s ) ;
/ / ?>4AG8BK205< :>;8G5AB2> ,% ?@>1>52 4;O 6 ;53:8E
i f ( ( O p e n [ b ] > = m a 1 ) & & ( C l o s e [ b ] < = m a 1 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 2 ) & & ( C l o s e [ b ] < = m a 2 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 3 ) & & ( C l o s e [ b ] < = m a 3 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 4 ) & & ( C l o s e [ b ] < = m a 4 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 5 ) & & ( C l o s e [ b ] < = m a 5 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 6 ) & & ( C l o s e [ b ] < = m a 6 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
/ / ?>4AG8BK205< AB5?5=L ?@028;L=>AB8 , 255@0 87 1 2 A:>;L7OI8E A@54=8E
i f ( m a 1 2 > = m a 7 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 1 > = m a 8 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 0 > = m a 9 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 > = m a 8 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 > = m a 7 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 > = m a 6 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 > = m a 5 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 > = m a 4 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 > = m a 3 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 > = m a 2 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 7 > = m a 1 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
/ / 5A;8 5ABL ?@028;L=K9 255@ 8 ?@>1>9 6 % ;53:8E A 2KE>4><
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l p r o b m a = = 6 ) )
{
P r o b B e a r L i g h t 6 X = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL 42>9=0O ,/ A25G0
i f ( s v e c h a 2 x = = t r u e )
{
/ / :>;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E 42>9=>9 , A25G59
k o l v o p r o b 2 x = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 = f a l s e ;
p r o b 1 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 1 3 , b ) ;
i f ( p r o b 1 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 2 = f a l s e ;
p r o b 2 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 2 1 , b ) ;
i f ( p r o b 2 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 3 = f a l s e ;
p r o b 3 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 3 4 , b ) ;
i f ( p r o b 3 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 4 = f a l s e ;
p r o b 4 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 5 5 , b ) ;
i f ( p r o b 4 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 5 = f a l s e ;
p r o b 5 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 8 9 , b ) ;
i f ( p r o b 5 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 6 = f a l s e ;
p r o b 6 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 1 4 4 , b ) ;
i f ( p r o b 6 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL ?@028;L=K9 255@ 8 ?@>1>9 6 % ;53:8E A 2KE>4><
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l v o p r o b 2 x = = 6 ) & & ( k o l p r o b m a > 0 ) )
{
P r o b B e a r L i g h t 6 X = t r u e ;
}
}
r e t u r n ( P r o b B e a r L i g h t 6 X ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / +' 7 - % " #
b o o l P r o b o y S e v e n L i g h t M A T r e n d B U L L ( i n t b , b o o l s v e c h a 2 x )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
i n t k o l p r o b m a , k o l v o p r o b 2 x , t o c h n v e e r a ;
b o o l p r o b 1 , p r o b 2 , p r o b 3 , p r o b 4 , p r o b 5 , p r o b 6 , p r o b 7 ;
b o o l P r o b B u l l L i g h t 7 X ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E 1KGL59 A25G59
k o l p r o b m a = 0 ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E 1KGL59 A25G59
k o l v o p r o b 2 x = 0 ;
/ / B>G=>ABL 2K?>;=5=8O CA;>289 ?@028;L=>3> 1KGL53> 255@0 4;O ?@>1>O
t o c h n v e e r a = 0 ;
/ / "", ) + $# &
P r o b B u l l L i g h t 7 X = f a l s e ;
/ / @0AG5B C@>2=59 1 2 A:>;L7OI8E A@54=8E
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 = N o r m a l i z e D o u b l e ( m a 1 , D i g i t s ) ;
m a 2 = N o r m a l i z e D o u b l e ( m a 2 , D i g i t s ) ;
m a 3 = N o r m a l i z e D o u b l e ( m a 3 , D i g i t s ) ;
m a 4 = N o r m a l i z e D o u b l e ( m a 4 , D i g i t s ) ;
m a 5 = N o r m a l i z e D o u b l e ( m a 5 , D i g i t s ) ;
m a 6 = N o r m a l i z e D o u b l e ( m a 6 , D i g i t s ) ;
m a 7 = N o r m a l i z e D o u b l e ( m a 7 , D i g i t s ) ;
m a 8 = N o r m a l i z e D o u b l e ( m a 8 , D i g i t s ) ;
m a 9 = N o r m a l i z e D o u b l e ( m a 9 , D i g i t s ) ;
m a 1 0 = N o r m a l i z e D o u b l e ( m a 1 0 , D i g i t s ) ;
m a 1 1 = N o r m a l i z e D o u b l e ( m a 1 1 , D i g i t s ) ;
m a 1 2 = N o r m a l i z e D o u b l e ( m a 1 2 , D i g i t s ) ;
/ / ?>4AG8BK205< :>;8G5AB2> +',% ?@>1>52 4;O 7 ;53:8E
i f ( ( O p e n [ b ] < = m a 1 ) & & ( C l o s e [ b ] > = m a 1 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 2 ) & & ( C l o s e [ b ] > = m a 2 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 3 ) & & ( C l o s e [ b ] > = m a 3 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 4 ) & & ( C l o s e [ b ] > = m a 4 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 5 ) & & ( C l o s e [ b ] > = m a 5 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 6 ) & & ( C l o s e [ b ] > = m a 6 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 7 ) & & ( C l o s e [ b ] > = m a 7 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
/ / ?>4AG8BK205< AB5?5=L ?@028;L=>AB8 +', 255@0 87 1 2 A:>;L7OI8E A@54=8E
i f ( m a 1 2 < = m a 1 1 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 1 < = m a 1 0 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 0 < = m a 9 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 < = m a 8 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 < = m a 7 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 < = m a 6 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 < = m a 5 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 < = m a 4 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 < = m a 3 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 < = m a 2 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 < = m a 1 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
/ / 5A;8 5ABL ?@028;L=K9 +' 255@ 8 ?@>1>9 7 % ;53:8E A 2KE>4>< 225@E
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l p r o b m a = = 7 ) )
{
P r o b B u l l L i g h t 7 X = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL 42>9=0O 1KGLO A25G0
i f ( s v e c h a 2 x = = t r u e )
{
/ / :>;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E 42>9=>9 1KGL59 A25G59
k o l v o p r o b 2 x = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 = f a l s e ;
p r o b 1 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 1 3 , b ) ;
i f ( p r o b 1 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 2 = f a l s e ;
p r o b 2 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 2 1 , b ) ;
i f ( p r o b 2 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 3 = f a l s e ;
p r o b 3 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 3 4 , b ) ;
i f ( p r o b 3 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 4 = f a l s e ;
p r o b 4 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 5 5 , b ) ;
i f ( p r o b 4 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 5 = f a l s e ;
p r o b 5 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 8 9 , b ) ;
i f ( p r o b 5 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 6 = f a l s e ;
p r o b 6 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 1 4 4 , b ) ;
i f ( p r o b 6 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 7 = f a l s e ;
p r o b 7 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 2 3 3 , b ) ;
i f ( p r o b 7 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL ?@028;L=K9 +' 255@ 8 ?@>1>9 7 % ;53:8E A 2KE>4>< 225@E
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l v o p r o b 2 x = = 7 ) & & ( k o l p r o b m a > 0 ) )
{
P r o b B u l l L i g h t 7 X = t r u e ;
}
}
r e t u r n ( P r o b B u l l L i g h t 7 X ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 7 - % " #
b o o l P r o b o y S e v e n L i g h t M A T r e n d B E A R ( i n t b , b o o l s v e c h a 2 x )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
i n t k o l p r o b m a , k o l v o p r o b 2 x , t o c h n v e e r a ;
b o o l p r o b 1 , p r o b 2 , p r o b 3 , p r o b 4 , p r o b 5 , p r o b 6 , p r o b 7 ;
b o o l P r o b B e a r L i g h t 7 X ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E , A25G59
k o l p r o b m a = 0 ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E , A25G59
k o l v o p r o b 2 x = 0 ;
/ / B>G=>ABL 2K?>;=5=8O CA;>289 ?@028;L=>3> , 255@0 4;O ?@>1>O
t o c h n v e e r a = 0 ;
/ / "", ) + $# &
P r o b B e a r L i g h t 7 X = f a l s e ;
/ / @0AG5B C@>2=59 1 2 A:>;L7OI8E A@54=8E
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 = N o r m a l i z e D o u b l e ( m a 1 , D i g i t s ) ;
m a 2 = N o r m a l i z e D o u b l e ( m a 2 , D i g i t s ) ;
m a 3 = N o r m a l i z e D o u b l e ( m a 3 , D i g i t s ) ;
m a 4 = N o r m a l i z e D o u b l e ( m a 4 , D i g i t s ) ;
m a 5 = N o r m a l i z e D o u b l e ( m a 5 , D i g i t s ) ;
m a 6 = N o r m a l i z e D o u b l e ( m a 6 , D i g i t s ) ;
m a 7 = N o r m a l i z e D o u b l e ( m a 7 , D i g i t s ) ;
m a 8 = N o r m a l i z e D o u b l e ( m a 8 , D i g i t s ) ;
m a 9 = N o r m a l i z e D o u b l e ( m a 9 , D i g i t s ) ;
m a 1 0 = N o r m a l i z e D o u b l e ( m a 1 0 , D i g i t s ) ;
m a 1 1 = N o r m a l i z e D o u b l e ( m a 1 1 , D i g i t s ) ;
m a 1 2 = N o r m a l i z e D o u b l e ( m a 1 2 , D i g i t s ) ;
/ / ?>4AG8BK205< :>;8G5AB2> ,% ?@>1>52 4;O 7 ;53:8E
i f ( ( O p e n [ b ] > = m a 1 ) & & ( C l o s e [ b ] < = m a 1 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 2 ) & & ( C l o s e [ b ] < = m a 2 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 3 ) & & ( C l o s e [ b ] < = m a 3 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 4 ) & & ( C l o s e [ b ] < = m a 4 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 5 ) & & ( C l o s e [ b ] < = m a 5 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 6 ) & & ( C l o s e [ b ] < = m a 6 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 7 ) & & ( C l o s e [ b ] < = m a 7 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
/ / ?>4AG8BK205< AB5?5=L ?@028;L=>AB8 , 255@0 87 1 2 A:>;L7OI8E A@54=8E
i f ( m a 1 2 > = m a 1 1 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 1 > = m a 1 0 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 0 > = m a 9 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 > = m a 8 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 > = m a 7 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 > = m a 6 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 > = m a 5 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 > = m a 4 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 > = m a 3 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 > = m a 2 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 8 > = m a 1 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
/ / 5A;8 5ABL ?@028;L=K9 255@ 8 ?@>1>9 7 % ;53:8E A 2KE>4><
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l p r o b m a = = 7 ) )
{
P r o b B e a r L i g h t 7 X = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL 42>9=0O ,/ A25G0
i f ( s v e c h a 2 x = = t r u e )
{
/ / :>;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E 42>9=>9 , A25G59
k o l v o p r o b 2 x = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 = f a l s e ;
p r o b 1 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 1 3 , b ) ;
i f ( p r o b 1 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 2 = f a l s e ;
p r o b 2 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 2 1 , b ) ;
i f ( p r o b 2 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 3 = f a l s e ;
p r o b 3 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 3 4 , b ) ;
i f ( p r o b 3 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 4 = f a l s e ;
p r o b 4 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 5 5 , b ) ;
i f ( p r o b 4 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 5 = f a l s e ;
p r o b 5 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 8 9 , b ) ;
i f ( p r o b 5 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 6 = f a l s e ;
p r o b 6 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 1 4 4 , b ) ;
i f ( p r o b 6 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 7 = f a l s e ;
p r o b 7 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 2 3 3 , b ) ;
i f ( p r o b 7 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL ?@028;L=K9 255@ 8 ?@>1>9 7 % ;53:8E A 2KE>4><
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l v o p r o b 2 x = = 7 ) & & ( k o l p r o b m a > 0 ) )
{
P r o b B e a r L i g h t 7 X = t r u e ;
}
}
r e t u r n ( P r o b B e a r L i g h t 7 X ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / +' 8 - % " #
b o o l P r o b o y E i g h t L i g h t M A T r e n d B U L L ( i n t b , b o o l s v e c h a 2 x )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
i n t k o l p r o b m a , k o l v o p r o b 2 x , t o c h n v e e r a ;
b o o l p r o b 1 , p r o b 2 , p r o b 3 , p r o b 4 , p r o b 5 , p r o b 6 , p r o b 7 , p r o b 8 ;
b o o l P r o b B u l l L i g h t 8 X ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E 1KGL59 A25G59
k o l p r o b m a = 0 ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E 1KGL59 A25G59
k o l v o p r o b 2 x = 0 ;
/ / B>G=>ABL 2K?>;=5=8O CA;>289 ?@028;L=>3> 1KGL53> 255@0 4;O ?@>1>O
t o c h n v e e r a = 0 ;
/ / "", ) + $# &
P r o b B u l l L i g h t 8 X = f a l s e ;
/ / @0AG5B C@>2=59 1 2 A:>;L7OI8E A@54=8E
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 = N o r m a l i z e D o u b l e ( m a 1 , D i g i t s ) ;
m a 2 = N o r m a l i z e D o u b l e ( m a 2 , D i g i t s ) ;
m a 3 = N o r m a l i z e D o u b l e ( m a 3 , D i g i t s ) ;
m a 4 = N o r m a l i z e D o u b l e ( m a 4 , D i g i t s ) ;
m a 5 = N o r m a l i z e D o u b l e ( m a 5 , D i g i t s ) ;
m a 6 = N o r m a l i z e D o u b l e ( m a 6 , D i g i t s ) ;
m a 7 = N o r m a l i z e D o u b l e ( m a 7 , D i g i t s ) ;
m a 8 = N o r m a l i z e D o u b l e ( m a 8 , D i g i t s ) ;
m a 9 = N o r m a l i z e D o u b l e ( m a 9 , D i g i t s ) ;
m a 1 0 = N o r m a l i z e D o u b l e ( m a 1 0 , D i g i t s ) ;
m a 1 1 = N o r m a l i z e D o u b l e ( m a 1 1 , D i g i t s ) ;
m a 1 2 = N o r m a l i z e D o u b l e ( m a 1 2 , D i g i t s ) ;
/ / ?>4AG8BK205< :>;8G5AB2> +',% ?@>1>52 4;O 8 ;53:8E
i f ( ( O p e n [ b ] < = m a 1 ) & & ( C l o s e [ b ] > = m a 1 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 2 ) & & ( C l o s e [ b ] > = m a 2 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 3 ) & & ( C l o s e [ b ] > = m a 3 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 4 ) & & ( C l o s e [ b ] > = m a 4 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 5 ) & & ( C l o s e [ b ] > = m a 5 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 6 ) & & ( C l o s e [ b ] > = m a 6 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 7 ) & & ( C l o s e [ b ] > = m a 7 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] < = m a 8 ) & & ( C l o s e [ b ] > = m a 8 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
/ / ?>4AG8BK205< AB5?5=L ?@028;L=>AB8 +', 255@0 87 1 2 A:>;L7OI8E A@54=8E
i f ( m a 1 2 < = m a 1 1 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 1 < = m a 1 0 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 0 < = m a 9 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 < = m a 8 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 < = m a 7 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 < = m a 6 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 < = m a 5 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 < = m a 4 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 < = m a 3 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 < = m a 2 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 < = m a 1 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
/ / 5A;8 5ABL ?@028;L=K9 +' 255@ 8 ?@>1>9 8 % ;53:8E A 2KE>4>< 225@E
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l p r o b m a = = 8 ) )
{
P r o b B u l l L i g h t 8 X = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL 42>9=0O 1KGLO A25G0
i f ( s v e c h a 2 x = = t r u e )
{
/ / :>;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E 42>9=>9 1KGL59 A25G59
k o l v o p r o b 2 x = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 = f a l s e ;
p r o b 1 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 1 3 , b ) ;
i f ( p r o b 1 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 2 = f a l s e ;
p r o b 2 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 2 1 , b ) ;
i f ( p r o b 2 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 3 = f a l s e ;
p r o b 3 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 3 4 , b ) ;
i f ( p r o b 3 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 4 = f a l s e ;
p r o b 4 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 5 5 , b ) ;
i f ( p r o b 4 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 5 = f a l s e ;
p r o b 5 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 8 9 , b ) ;
i f ( p r o b 5 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 6 = f a l s e ;
p r o b 6 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 1 4 4 , b ) ;
i f ( p r o b 6 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 7 = f a l s e ;
p r o b 7 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 2 3 3 , b ) ;
i f ( p r o b 7 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 8 = f a l s e ;
p r o b 8 = P r o b o y O n e M A C a n d l e 2 X B U L L ( 3 7 7 , b ) ;
i f ( p r o b 8 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL ?@028;L=K9 +' 255@ 8 ?@>1>9 7 % ;53:8E A 2KE>4>< 225@E
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l v o p r o b 2 x = = 8 ) & & ( k o l p r o b m a > 0 ) )
{
P r o b B u l l L i g h t 8 X = t r u e ;
}
}
r e t u r n ( P r o b B u l l L i g h t 8 X ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 8 - % " #
b o o l P r o b o y E i g h t L i g h t M A T r e n d B E A R ( i n t b , b o o l s v e c h a 2 x )
{
d o u b l e m a 1 , m a 2 , m a 3 , m a 4 , m a 5 , m a 6 , m a 7 , m a 8 , m a 9 , m a 1 0 , m a 1 1 , m a 1 2 ;
i n t k o l p r o b m a , k o l v o p r o b 2 x , t o c h n v e e r a ;
b o o l p r o b 1 , p r o b 2 , p r o b 3 , p r o b 4 , p r o b 5 , p r o b 6 , p r o b 7 , p r o b 8 ;
b o o l P r o b B e a r L i g h t 8 X ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E , A25G59
k o l p r o b m a = 0 ;
/ / :>;8G5AB2> ?@>18BKE ;53:8E A:>;L7OI8E A@54=8E , A25G59
k o l v o p r o b 2 x = 0 ;
/ / B>G=>ABL 2K?>;=5=8O CA;>289 ?@028;L=>3> , 255@0 4;O ?@>1>O
t o c h n v e e r a = 0 ;
/ / "", ) + $# &
P r o b B e a r L i g h t 8 X = f a l s e ;
/ / @0AG5B C@>2=59 1 2 A:>;L7OI8E A@54=8E
m a 1 = i M A ( N U L L , 0 , 1 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 2 = i M A ( N U L L , 0 , 2 1 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 3 = i M A ( N U L L , 0 , 3 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 4 = i M A ( N U L L , 0 , 5 5 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 5 = i M A ( N U L L , 0 , 8 9 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 6 = i M A ( N U L L , 0 , 1 4 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 7 = i M A ( N U L L , 0 , 2 3 3 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 8 = i M A ( N U L L , 0 , 3 7 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 9 = i M A ( N U L L , 0 , 6 1 0 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 0 = i M A ( N U L L , 0 , 9 8 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 1 = i M A ( N U L L , 0 , 1 5 9 7 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 2 = i M A ( N U L L , 0 , 2 5 8 4 , 0 , M O D E _ E M A , P R I C E _ C L O S E , b ) ;
m a 1 = N o r m a l i z e D o u b l e ( m a 1 , D i g i t s ) ;
m a 2 = N o r m a l i z e D o u b l e ( m a 2 , D i g i t s ) ;
m a 3 = N o r m a l i z e D o u b l e ( m a 3 , D i g i t s ) ;
m a 4 = N o r m a l i z e D o u b l e ( m a 4 , D i g i t s ) ;
m a 5 = N o r m a l i z e D o u b l e ( m a 5 , D i g i t s ) ;
m a 6 = N o r m a l i z e D o u b l e ( m a 6 , D i g i t s ) ;
m a 7 = N o r m a l i z e D o u b l e ( m a 7 , D i g i t s ) ;
m a 8 = N o r m a l i z e D o u b l e ( m a 8 , D i g i t s ) ;
m a 9 = N o r m a l i z e D o u b l e ( m a 9 , D i g i t s ) ;
m a 1 0 = N o r m a l i z e D o u b l e ( m a 1 0 , D i g i t s ) ;
m a 1 1 = N o r m a l i z e D o u b l e ( m a 1 1 , D i g i t s ) ;
m a 1 2 = N o r m a l i z e D o u b l e ( m a 1 2 , D i g i t s ) ;
/ / ?>4AG8BK205< :>;8G5AB2> ,% ?@>1>52 4;O 8 ;53:8E
i f ( ( O p e n [ b ] > = m a 1 ) & & ( C l o s e [ b ] < = m a 1 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 2 ) & & ( C l o s e [ b ] < = m a 2 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 3 ) & & ( C l o s e [ b ] < = m a 3 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 4 ) & & ( C l o s e [ b ] < = m a 4 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 5 ) & & ( C l o s e [ b ] < = m a 5 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 6 ) & & ( C l o s e [ b ] < = m a 6 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 7 ) & & ( C l o s e [ b ] < = m a 7 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
i f ( ( O p e n [ b ] > = m a 8 ) & & ( C l o s e [ b ] < = m a 8 ) ) { k o l p r o b m a = k o l p r o b m a + 1 ; }
/ / ?>4AG8BK205< AB5?5=L ?@028;L=>AB8 , 255@0 87 1 2 A:>;L7OI8E A@54=8E
i f ( m a 1 2 > = m a 1 1 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 1 > = m a 1 0 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 1 0 > = m a 9 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 > = m a 8 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 > = m a 7 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 > = m a 6 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 > = m a 5 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 > = m a 4 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 > = m a 3 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 > = m a 2 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
i f ( m a 9 > = m a 1 ) { t o c h n v e e r a = t o c h n v e e r a + 1 ; }
/ / 5A;8 5ABL ?@028;L=K9 255@ 8 ?@>1>9 8 % ;53:8E A 2KE>4><
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l p r o b m a = = 8 ) )
{
P r o b B e a r L i g h t 8 X = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL 42>9=0O ,/ A25G0
i f ( s v e c h a 2 x = = t r u e )
{
/ / :>;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E 42>9=>9 , A25G59
k o l v o p r o b 2 x = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 1 = f a l s e ;
p r o b 1 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 1 3 , b ) ;
i f ( p r o b 1 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 2 = f a l s e ;
p r o b 2 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 2 1 , b ) ;
i f ( p r o b 2 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 3 = f a l s e ;
p r o b 3 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 3 4 , b ) ;
i f ( p r o b 3 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 4 = f a l s e ;
p r o b 4 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 5 5 , b ) ;
i f ( p r o b 4 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 5 = f a l s e ;
p r o b 5 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 8 9 , b ) ;
i f ( p r o b 5 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 6 = f a l s e ;
p r o b 6 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 1 4 4 , b ) ;
i f ( p r o b 6 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 7 = f a l s e ;
p r o b 7 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 2 3 3 , b ) ;
i f ( p r o b 7 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
p r o b 8 = f a l s e ;
p r o b 8 = P r o b o y O n e M A C a n d l e 2 X B E A R ( 3 7 7 , b ) ;
i f ( p r o b 8 = = t r u e )
{
k o l v o p r o b 2 x = k o l v o p r o b 2 x + 1 ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 5ABL ?@028;L=K9 255@ 8 ?@>1>9 8 % ;53:8E A 2KE>4><
i f ( ( t o c h n v e e r a = = 1 1 ) & & ( k o l v o p r o b 2 x = = 8 ) & & ( k o l p r o b m a > 0 ) )
{
P r o b B e a r L i g h t 8 X = t r u e ;
}
}
r e t u r n ( P r o b B e a r L i g h t 8 X ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / $# & / , &
/ / ?>8A: 10@0 =0 7040==>< >B@57:5 345 7=0G5=85 M A C D <0:A8<0;L=>, 0=0;>3 i H i g e s t
i n t l e f t m a c d _ m a x b a r ( i n t c o u n t _ b a r s , i n t b )
{
d o u b l e c u r _ m a c d , m a x _ m a c d ;
i n t i , t o t a l , b m a x ;
t o t a l = b + c o u n t _ b a r s ;
i f ( t o t a l > B a r s )
{
t o t a l = B a r s ;
}
/ / 8A:><K9 10@
b m a x = b ;
m a x _ m a c d = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , b ) ;
m a x _ m a c d = N o r m a l i z e D o u b l e ( m a x _ m a c d , 7 ) ;
f o r ( i = ( b + 1 ) ; i < t o t a l ; i + + )
{
c u r _ m a c d = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) ;
c u r _ m a c d = N o r m a l i z e D o u b l e ( c u r _ m a c d , 7 ) ;
i f ( c u r _ m a c d > m a x _ m a c d )
{
m a x _ m a c d = c u r _ m a c d ;
b m a x = i ;
}
}
r e t u r n ( b m a x ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 2KG8A;5=85 ?@02>9 B>G:8 >?>@K b a r t :0A0B5;L=>9 ;8=88 A25@EC ?> <0:A8<C<0<
/ / =C6=> GB>1K 2 B>G:5 2 8=48:0B>@ 1K; A0<K9 2KA>:89 =0 >B@57:5
/ / ?@82O7K205< ?;0=:C : 2 B>G:5 2 8 >?CA:05< 2=87 ?@02K9 55 :>=5F
/ / >?@545;O5< =><5@ 10@0 b a r t 345 ?;0=:0 C?5@;0AL 2 8=48:0B>@
/ / =0 >B@57:5 A 2 1 , MB> 1C45B ?@020O B>G:0 4;O :0A0B5;L=>9 ;8=88
i n t m a c d b e a r _ t r e n d b a r ( i n t b 2 , i n t b 1 )
{
d o u b l e y i , m a c m a x , m a c i , k i , k m i n ;
i n t i , x i , b a r t ;
b a r t = b 2 ;
/ / ;52K9 25@E=89 <0:A8<C< M A C D =0 10@5 2
m a c m a x = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , b 2 ) ;
m a c m a x = N o r m a l i z e D o u b l e ( m a c m a x , 7 ) ;
/ / 8I5< 10@, 345 =08<5=LH89 :>MDD =0:;>=0 k i 4;O C@02=5=8O ?@O<>9 ;8=88
i f ( m a c m a x > 0 )
{
k m i n = m a c m a x ;
f o r ( i = ( b 2 - 1 ) ; i > = b 1 ; i - - )
{
m a c i = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) ;
m a c i = N o r m a l i z e D o u b l e ( m a c i , 7 ) ;
x i = b 2 - i ;
y i = m a c m a x - m a c i ;
k i = N o r m a l i z e D o u b l e ( ( y i / x i ) , 7 ) ;
i f ( k i < k m i n )
{
k m i n = k i ;
b a r t = i ;
}
}
}
r e t u r n ( b a r t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>AB@>5=85 :0A0B5;L=>9 ;8=88 A25@EC ?> <0:A8<C<0< 8=48:0B>@0 =0 >B@57:5
/ / >B 10@0 2 845< 2?@02> 4> 10@0 1 , AB@>8< :0A0B5;L=CN ;8=8N A25@EC ?>
/ / 70?><8=05< 2 10@0, p 2 8 p 1 =0 :>B>@KE ;8=8O 1K;0 =081>;LH59 4;8=K
/ / 2>72@0I05< =><5@ 10@0 p 2 4;O ;52>9 >?>@=>9 B>G:8
i n t b e a r d i v e r _ m a c d _ l i n e ( i n t b 2 , i n t b 1 )
{
i n t t 1 , p 2 , p 1 , d i s t i , d i m a x ;
/ / 8A:><K5 =><5@0 10@>2 4;O :0A0B5;L=>9 ;8=88
p 2 = 0 ;
p 1 = 0 ;
/ / ?@02K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
t 1 = b 2 ;
/ / =081>;LH55 @0AAB>O=85 <564C 10@0<8 >?>@K :0A0B5;L=>9 ;8=88
d i m a x = 0 ;
w h i l e ( ( t 1 > b 1 ) & & ( I s S t o p p e d ( ) = = f a l s e ) )
{
/ / 45;05< H03 >B 2 2 AB>@>=C 1 8I5< B>G:C t 1 4;O :0A0B5;L=>9 ;8=88
t 1 = m a c d b e a r _ t r e n d b a r ( b 2 , b 1 ) ;
/ / B5:CI55 @0AAB>O=85 <564C B>G:0<8 >?>@K :0A0B5;L=>9 ;8=88
d i s t i = b 2 - t 1 ;
/ / 70?><8=05< 10@K =0 :>B>@KE 4;8=0 ;8=88 <0:A8<0;L=0O
i f ( d i s t i > d i m a x )
{
d i m a x = d i s t i ;
p 2 = b 2 ;
p 1 = t 1 ;
}
/ / 5A;8 4>H;8 4> 10@0 1 8;8 =5 ?>;CG8;>AL ?>AB@>8BL ;8=8N
i f ( ( t 1 = = b 2 ) | | ( t 1 = = b 1 ) )
{
b r e a k ;
}
/ / 2 :>=F5 H030 ?5@5AB02;O5< ;52CN >?>@=CN B>G:C =0 <5AB> ?@02>9
b 2 = t 1 ;
}
/ / 5A;8 4;8=0 ;8=88 4>AB0B>G=0O 2>72@0I05< =><5@ ;52>3> 10@0
i f ( ( p 2 > ( p 1 + D i v e r L i n e M i n L e n g t h ) ) & & ( p 1 > = b 1 ) )
{
r e t u r n ( p 2 ) ;
}
r e t u r n ( 0 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 2KG8A;5=85 ?@02>9 B>G:8 >?>@K 4;O :0A0B5;L=>9 ;8=88 ?> <0:A8<C<0< F5=
/ / 0;3>@8B< ?@82O7K205< ;52K9 :>=5F ?;0=:8 : H i g h [ b 2 ] 8 A<>B@8< =0 :0:><
/ / 10@5 1C45B 4@C3>9 :>=5F ?;0=:8 b r t - 10@ ;8=88 B@5=40
i n t r i g h t b e a r _ b a r p r i c e ( i n t b 2 , i n t b 1 )
{
d o u b l e k i , k m a x , y i ;
i n t i , x i , b r t ;
b r t = b 2 ;
k m a x = 0 ;
/ / 8I5< =081>;LH89 :>MDD 4;O C@02=5=8O ?@O<>9 ;8=88, =0< =C65= 10@,
/ / :>B>@K9 A2>8< 25@E>< A8;L=5 2A53> ?>4=O; ?@02K9 :>=5F ?;0=:8
f o r ( i = ( b 2 - 1 ) ; i > = b 1 ; i - - )
{
/ / =0:;>= 4>;65= 1KBL A=87C 225@E A;520 =0?@02>
i f ( H i g h [ b 2 ] < H i g h [ i ] )
{
x i = b 2 - i ;
y i = ( H i g h [ i ] - H i g h [ b 2 ] ) / P o i n t ;
k i = N o r m a l i z e D o u b l e ( ( y i / x i ) , 7 ) ;
i f ( k i > k m a x )
{
k m a x = k i ;
b r t = i ;
}
}
}
r e t u r n ( b r t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >B 2 845< 2?@02> 4> 10@0 1 , 2KG8A;O5< :0A0B5;L=CN ;8=8N ?> <0:A8<C<0< F5=
/ / 70?><8=05< 2 10@0, =0 :>B>@KE ;8=8O 1K;0 <0:A8<0;L=>9 4;8=K
/ / 2>72@0I05< =><5@ ;52>9 B>G:8 t 2 >?>@K 4;O :0A0B5;L=>9 ;8=88
i n t b e a r d i v e r _ p r i c e _ l i n e ( i n t b 2 , i n t b 1 )
{
i n t r b p , d i s t c u r , d i s t m a x , t 2 , t 1 ;
d i s t m a x = 0 ;
/ / ?@02K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
r b p = b 2 ;
/ / 8A:><K5 =><5@0 10@>2 4;O :0A0B5;L=>9 ;8=88
t 1 = 0 ;
t 2 = 0 ;
w h i l e ( ( r b p > b 1 ) & & ( I s S t o p p e d ( ) = = f a l s e ) )
{
/ / ?>;CG05< ?@02K9 10@ F5= 4> B5E ?>@, ?>:0 =5 4>945< 4> 1
r b p = r i g h t b e a r _ b a r p r i c e ( b 2 , b 1 ) ;
d i s t c u r = b 2 - r b p ;
i f ( d i s t c u r > d i s t m a x )
{
d i s t m a x = d i s t c u r ;
t 2 = b 2 ;
t 1 = r b p ;
}
/ / 5A;8 4>H;8 4> 10@0 1 8;8 =5 ?>;CG8;>AL ?>AB@>8BL ;8=8N
i f ( ( r b p = = b 2 ) | | ( r b p = = b 1 ) )
{
b r e a k ;
}
i f ( H i g h [ r b p ] > = H i g h [ b 2 ] )
{
b 2 = r b p ;
}
}
/ / 5A;8 <>6=> ?@>25AB8 ;8=8N, 2>72@0I05< =><5@ ;52>3> >?>@=>3> 10@0
i f ( ( t 2 > ( t 1 + D i v e r L i n e M i n L e n g t h ) ) & & ( t 1 > = b 1 ) )
{
r e t u r n ( t 2 ) ;
}
r e t u r n ( 0 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / , & "
/ / ?>?KB:0 ?>AB@>8BL ;8=88 <54256L59 4825@35=F88 =0 8=48:0B>@5
/ / :@0B:89 0;3>@8B< ?>AB@>5=8O :0A0B5;L=>9 ;8=88 ?>
/ / A=0G0;0 8I5< <0:A8<0;L=>5 7=0G5=85 =0 >B@57:5 D i v e r S e a r c h B a r s
/ / 70B5< 845< 2;52> 40;LH5 A<>B@8< 345 70:0=G8205BAO CG0AB>: 2KH5 =C;O
/ / CB>G=O5< B>G:C <0:A8<C<0 A CG5B>< =>2KE A2545=89
/ / >B MB>9 B>G:8 845< 2?@02> F8:;>< w h i l e , =0:;04K205< :0A0B5;L=K5 ;8=88
/ / 4> B5E ?>@, ?>:0 =5 4>945< 4> ?@02>3> :>=F0 >B@57:0
/ / 2A?><8=05<, 345 ;8=8O 8<5;0 =081>;LHCN 4;8=C 8 @8AC5< 55, 5A;8 4;8=0 1>;LH0O
/ / 5A;8 2>7<>6=> ?>4>428305< ;8=8N 1;865 : ?@02><C :@0N >B@57:0
/ / ?@8 CA;>288, GB> 4;8=0 ;8=88 1>;LH5 <8=8<0;L=> 4>?CAB8<>9 M i n L i n e L e n g t h
b o o l D i v e r B e a r ( i n t b )
{
d o u b l e m a c 2 , m a c 1 , s t ;
i n t m 3 , m 2 , m 1 , p 2 , p 1 , h i 1 , d i s t , k o l p r b , g r n p r b ;
b o o l d i v b e a r ;
d i v b e a r = f a l s e ;
k o l p r b = 0 ; g r n p r b = 0 ;
k o l p r b = p r b _ n i z _ k o l ( b ) ;
g r n p r b = b + k o l p r b ;
/ / A@54=55 B5;> A25G8 2 ?C=:B0E
s t = a v e r a g e _ b o d y _ l e n g t h ( ) ;
s t = M a t h R o u n d ( s t ) ;
/ / A=0G0;0 =0E>48< <0:A8<0;L=>5 7=0G5=85 =0 >B@57:5
m 2 = l e f t m a c d _ m a x b a r ( D a l n P o i s k a D i v e r M A X , b ) ;
m 3 = m 2 ;
m a c 2 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m 2 ) ;
m a c 1 = 0 ;
m 1 = 0 ;
/ / 2KA>:89 E>;< =0 8=48:0B>@5 4>;65= 1KBL 2KH5 =C;O
i f ( m a c 2 > 0 )
{
/ / =0E>48< 10@ 345 70:0=G8205BAO CG0AB>: 2KH5 =C;O
m 3 = l e f t b a r _ p e a k m a c d ( m 2 ) ;
i f ( m 3 > m 2 )
{
/ / CB>G=8< <0:A8<C< =0 =>2>< CG0AB:5
m 2 = l e f t m a c d _ m a x b a r ( ( m 3 - b + 1 ) , b ) ;
m a c 2 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m 2 ) ;
}
/ / ;>:0;L=K9 <0:A8<C< 2>7;5 B>G:8
m 1 = l e f t m a c d _ m a x b a r ( 7 , b ) ;
m a c 1 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m 1 ) ;
}
e l s e
{
r e t u r n ( f a l s e ) ;
}
/ / @0AAB>O=85 >B B>G:8 , =0 :>B>@>< 87<5@O5< <8=8<C< F5=K
d i s t = M a t h M a x ( D a l n P o i s k a D i v e r M A X , ( m 3 - b + 1 ) ) ;
/ / <0:A8<C< F5= =0 7040==>< 8=B5@20;5
h i 1 = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , d i s t , b ) ;
/ / 5A;8 CA;>28O ?> 4;O , 4825@35=F88 2K?;=5=K
i f ( ( m a c 2 > m a c 1 ) & & ( m a c 1 > 0 ) & & ( m 2 > ( m 1 + D i v e r L i n e M i n L e n g t h ) ) & & ( m 1 > = b ) )
{
/ / <0:A8<C< =0 10@5 !1 , 5ABL ?>4B25@640NI89 A83=0; O?>=A:8E A25G59
/ / i f ( ( h i 1 = = b ) & & ( m 1 = = b ) )
/ / {
/ / i f ( j a p s _ b e a r ( b ) = = t r u e )
/ / {
/ / d i v b e a r = t r u e ;
/ / }
/ / }
/ / =878=0 <0:A8<C<0 2?5@2K5 ?@>18205BAO B5;>< 10@0 0 =5 B5=O<8
/ / MB> :0: ?>:070;0 ?@0:B8:0 >G5=L B>G=K9 A83=0;
i f ( ( ( c h e c k _ h i g h ( h i 1 , b ) = = t r u e ) | | ( k o l p r b > 1 ) | | ( h i 1 < = g r n p r b ) ) & & ( C l o s e [ b ] < ( O p e n [ b ] - s t * P o i n t ) ) )
{
d i v b e a r = t r u e ;
P r i n t ( " ?@5420@8B0;L=0O <54256LO 4825@35=F8O" ) ;
}
}
/ / ?>AB@>5=85 ;8=89 4825@35=F88 8 2K40G0 A>>1I5=8O =0 M:@0=
i f ( d i v b e a r = = t r u e )
{
/ / 2KG8A;5=85 >?>@=KE B>G5: 4;O :0A0B5;L=>9 ;8=88 A25@EC ?>
m 2 = b e a r d i v e r _ m a c d _ l i n e ( m 2 , b ) ;
m 1 = m a c d b e a r _ t r e n d b a r ( m 2 , b ) ;
/ / 2KG8A;5=85 >?>@=KE B>G5: 4;O :0A0B5;L=>9 ;8=88 F5=
p 2 = b e a r d i v e r _ p r i c e _ l i n e ( m 3 , b ) ;
p 1 = r i g h t b e a r _ b a r p r i c e ( p 2 , b ) ;
/ / 5A;8 2KG8A;8;8 2A5 4 >?>@=K5 B>G:8, <>6=> ?@>2>48BL 2 ;8=88
m a c 2 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m 2 ) ;
m a c 1 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m 1 ) ;
O b j e c t D e l e t e ( " p r i c e _ b e a r _ d i v e r _ l i n e " ) ;
O b j e c t C r e a t e ( " p r i c e _ b e a r _ d i v e r _ l i n e " , O B J _ T R E N D , 0 , T i m e [ p 2 ] , H i g h [ p 2 ] , T i m e [ p 1 ] , H i g h [ p 1 ] ) ;
O b j e c t D e l e t e ( " m a c d _ b e a r _ d i v e r _ l i n e " ) ;
O b j e c t C r e a t e ( " m a c d _ b e a r _ d i v e r _ l i n e " , O B J _ T R E N D , 1 , T i m e [ m 2 ] , m a c 2 , T i m e [ m 1 ] , m a c 1 ) ;
P r i n t ( " @020O B>G:0 >?>@K =0E>48BAO =0 10@5 = " + D o u b l e T o S t r ( m 1 , 0 ) ) ;
/ / ?@020O B>G:0 >?>@K 4>;6=0 1KBL =540;5:> >B <0:A8<C<0 F5=
i f ( M a t h A b s ( ( h i 1 - m 1 ) ) > D i v e r L i n e M i n L e n g t h )
{
r e t u r n ( f a l s e ) ;
}
i f ( m 2 > ( m 1 + D i v e r L i n e M i n L e n g t h ) & & ( m 1 > = b ) )
{
/ / 2KG8A;5=85 >?>@=KE B>G5: 4;O :0A0B5;L=>9 ;8=88 F5=
p 2 = b e a r d i v e r _ p r i c e _ l i n e ( m 3 , b ) ;
p 1 = r i g h t b e a r _ b a r p r i c e ( p 2 , b ) ;
i f ( ( p 2 > ( p 1 + D i v e r L i n e M i n L e n g t h ) ) & & ( p 1 > = b ) )
{
/ / 5A;8 2KG8A;8;8 2A5 4 >?>@=K5 B>G:8, <>6=> ?@>2>48BL 2 ;8=88
m a c 2 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m 2 ) ;
m a c 1 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m 1 ) ;
O b j e c t D e l e t e ( " p r i c e _ b e a r _ d i v e r _ l i n e " ) ;
O b j e c t C r e a t e ( " p r i c e _ b e a r _ d i v e r _ l i n e " , O B J _ T R E N D , 0 , T i m e [ p 2 ] , H i g h [ p 2 ] , T i m e [ p 1 ] , H i g h [ p 1 ] ) ;
O b j e c t D e l e t e ( " m a c d _ b e a r _ d i v e r _ l i n e " ) ;
O b j e c t C r e a t e ( " m a c d _ b e a r _ d i v e r _ l i n e " , O B J _ T R E N D , 1 , T i m e [ m 2 ] , m a c 2 , T i m e [ m 1 ] , m a c 1 ) ;
/ / 5ABL 845O, GB> 4> B5E ?>@, ?>:0 =865 B@5=4>2>9 ;8=88 ?>
/ / B@5=4 >A=>20==K9 =0 4825@35=F88 2A5 5I5 459AB2C5B
/ / G5< 2KH5 ?8: & + B5< A8;L=55 A83=0; 4825@35=F88
/ / <>6=> ?@54?>;>68BL, GB> A83=0; 459AB2C5B B5< 4>;LH5
/ / G5< 1>;LH5 @0AAB>O=85 <564C B>G:0<8 >?>@K :0A0B5;L=KE ;8=89
/ / G0AB> A83=0; >B@010BK205BAO =5 A@07C, 0 ?>765 :>340 ?@> =53> 701K;8
r e t u r n ( t r u e ) ;
}
}
}
r e t u r n ( f a l s e ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: 8 ?@>@8A>2:0 <54256L59 4825@35=F88 =0 3@0D8:5
i n t d i v e r b e a r _ s e a r c h ( )
{
i n t i , t o t a l ;
t o t a l = 9 0 0 ;
i f ( t o t a l > B a r s )
{
t o t a l = B a r s ;
}
f o r ( i = 1 ; i < t o t a l ; i + + )
{
i f ( D i v e r B e a r ( i ) = = t r u e )
{
r e t u r n ( i ) ;
}
}
r e t u r n ( 0 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: 8 ?@>@8A>2:0 <54256L59 4825@35=F88 =0 3@0D8:5
b o o l d i v e r b e a r _ s e a r c h _ c h k ( )
{
i n t i , b r , t o t a l ;
b o o l d i v b e a r c h k ;
t o t a l = 7 0 0 ;
b r = 0 ;
i f ( t o t a l > B a r s )
{
t o t a l = B a r s ;
}
f o r ( i = 1 ; i < t o t a l ; i + + )
{
d i v b e a r c h k = f a l s e ;
d i v b e a r c h k = D i v e r B e a r ( i ) ;
i f ( d i v b e a r c h k = = t r u e )
{
b r = i ;
b r e a k ;
}
}
i f ( b r > 0 )
{
/ / 25@B8:0;L=0O ;8=8O =0 10@5 b r
O b j e c t D e l e t e ( " b a r _ S E L L _ M A K K E N A _ D I V E R _ l i n e " ) ;
O b j e c t C r e a t e ( " b a r _ S E L L _ M A K K E N A _ D I V E R _ l i n e " , O B J _ V L I N E , 0 , T i m e [ b r ] , 0 ) ;
O b j e c t S e t ( " b a r _ S E L L _ M A K K E N A _ D I V E R _ l i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
O b j e c t S e t ( " b a r _ S E L L _ M A K K E N A _ D I V E R _ l i n e " , O B J P R O P _ C O L O R , c l r O r a n g e ) ;
}
i f ( ( b r = = 1 ) & & ( P e r i o d ( ) > P E R I O D _ M 5 ) )
{
A l e r t ( " ,/ &/ " + S y m b o l ( ) ) ;
P r i n t ( " ,/ &/ " + S y m b o l ( ) ) ;
r e t u r n ( t r u e ) ;
}
r e t u r n ( f a l s e ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = |
/ / >B ;52>3> <0:A8<C<0 M A C D m p i k 845< 2;52> 4> B5E ?>@, ?>:0 M A C D 2KH5 =C;O
/ / F5;L - ?>;CG8BL =><5@ 10@0, 345 70:0=G8205BAO B5:CI89 ?8: M A C D
/ / 2>72@0I05B A0<K9 ;52K9 10@ b r g r , 345 2A5 5I5 2KH5 =C;O
i n t l e f t b a r _ p e a k m a c d ( i n t m p i k )
{
d o u b l e m a c i ;
i n t i , b r g r ;
b r g r = 0 ;
f o r ( i = m p i k ; i < B a r s ; i + + )
{
m a c i = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) ;
i f ( m a c i > 0 )
{
b r g r = i ;
}
e l s e
{
b r e a k ;
}
}
r e t u r n ( b r g r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 2KG8A;5=85 ?@02>9 B>G:8 >?>@K 4;O " ;8=88 ?> <8=8<C<0< F5=
/ / 0;3>@8B< ?@82O7K205< ;52K9 :>=5F ?;0=:8 : L o w [ l e v b r ] 8 A<>B@8< =0 :0:><
/ / 10@5 1C45B 4@C3>9 :>=5F ?;0=:8 p r a v b r - ?@02K9 >?>@=K9 10@ ;8=88 B@5=40
i n t B u l l T r e n d P r a v B a r ( i n t l e v b r , i n t b )
{
d o u b l e k i , k n m a x , y i ;
i n t i , x i , s t , p r a v b r ;
k i = 0 ;
/ / =0G0;L=>5 7=0G5=85 >B25B0, :>B>@K9 @0AAG8BK205B DC=:F8O
p r a v b r = l e v b r ;
/ / :>5DD8F85=B =0:;>=0 B@5=4>2>9 ;8=88 225@E
k n m a x = 0 ;
/ / AB0@B>2K9 10@ ?>8A:0 4;O F8:;0 2?@02> >B l e v b r
s t = l e v b r - 1 ;
/ / 8I5< =081>;LH89 :>MDD =0:;>=0 4;O ?@O<>9 ;8=88, =0< =C65= 10@,
/ / :>B>@K9 A2>8< 4=>< A8;L=5 2A53> >?CAB8; + :>=5F ?;0=:8
f o r ( i = s t ; i > = 1 ; i - - )
{
/ / =0:;>= 4>;65= 1KBL ! # % A;520 =0?@02>
i f ( L o w [ l e v b r ] < L o w [ i ] )
{
x i = l e v b r - i ;
y i = L o w [ i ] - L o w [ l e v b r ] ;
y i = y i / P o i n t ;
k n m a x = N o r m a l i z e D o u b l e ( ( y i / x i ) , 7 ) ;
i f ( k n m a x > k n m a x )
{
k n m a x = k n m a x ;
p r a v b r = i ;
}
}
}
r e t u r n ( p r a v b r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >B 2 845< 2?@02> 4> 10@0 1 , 2KG8A;O5< :0A0B5;L=CN ;8=8N ?> <8=8<C<0< F5=
/ / 70?><8=05< 2 10@0, =0 :>B>@KE ;8=8O 1K;0 <0:A8<0;L=>9 4;8=K
/ / 2>72@0I05< =><5@ ;52>3> 10@0 B>G:8 >?>@K 4;O :0A0B5;L=>9 ;8=88
i n t B u l l T r e n d L e f t B a r ( i n t b 2 , i n t b 1 )
{
i n t r b p , d i s t c u r , d i s t m a x , t 2 , t 1 ;
d i s t m a x = 0 ;
/ / ?@02K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
r b p = b 2 ;
/ / 8A:><K5 =><5@0 10@>2 4;O :0A0B5;L=>9 ;8=88
t 1 = 0 ;
t 2 = 0 ;
w h i l e ( ( r b p > b 1 ) & & ( I s S t o p p e d ( ) = = f a l s e ) )
{
/ / ?>;CG05< ?@02K9 10@ F5= 4> B5E ?>@, ?>:0 =5 4>945< 4> 1
/ / r b p = r i g h t b u l l _ b a r p r i c e ( b 2 , b 1 ) ;
d i s t c u r = b 2 - r b p ;
i f ( d i s t c u r > d i s t m a x )
{
d i s t m a x = d i s t c u r ;
t 2 = b 2 ;
t 1 = r b p ;
}
/ / 5A;8 4>H;8 4> 10@0 1 8;8 =5 ?>;CG8;>AL ?>AB@>8BL ;8=8N
i f ( ( r b p = = b 2 ) | | ( r b p = = b 1 ) )
{
b r e a k ;
}
i f ( L o w [ r b p ] < = L o w [ b 2 ] )
{
b 2 = r b p ;
}
}
/ / 5A;8 <>6=> ?@>25AB8 ;8=8N, 2>72@0I05< =><5@ ;52>3> >?>@=>3> 10@0
i f ( ( t 2 > ( t 1 + D i v e r L i n e M i n L e n g t h ) ) & & ( t 1 > = b 1 ) )
{
r e t u r n ( t 2 ) ;
}
r e t u r n ( 0 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?@>2545=85 2>AE>4OI59 ;8=88 B@5=40 1;8609H59 : 10@C !1 , AB0@B >B 3;C1>:>9 =878=K
/ / =C6=0 4;O ?@>25@:8 <54256L53> A83=0;0 - ?@>1>O B@5=4>2>9 ;8=88 2=87
b o o l T r e n d L i n e B u l l K a s a t ( i n t l e v g r n , i n t b )
{
i n t k o l f i g , p i k v e r , d a l n p i k , g l a v n i z , l e v b a r , s t ;
b o o l o t v e t ;
o t v e t = f a l s e ;
s t = b + 1 ;
/ / ?>;=>5 :>;8G5AB2> 10@>2 D83C@K
k o l f i g = l e v g r n - b + 1 ;
/ / 10@ - ?8: 25@H8=K
p i k v e r = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , k o l f i g , b ) ;
/ / 40;L=>ABL ?8:0 25@H8=K 2;52>
d a l n p i k = S l e v a B a r o v O t V e r s h i n y ( p i k v e r ) ;
/ / AB0@B>20O =878=0 4;O ?>AB@>5=85 @0ABCI59 B@5=4>2>9 ;8=88
g l a v n i z = i L o w e s t ( N U L L , 0 , M O D E _ L O W , d a l n p i k , p i k v e r ) ;
/ / ;52K9 10@ - =878=0 B>G:0 >?>@K 4;O @0ABCI59 :0A0B5;L=>9 ;8=88
l e v b a r = B u l l T r e n d L e f t B a r ( g l a v n i z , b ) ;
r e t u r n ( o t v e t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / CA;>28O 4;O 1KGL59 4825@35=F88 : ACI5AB2C5B >B@57>: 2;52> >B B>G:8 , =0 :>=F5
/ / :>B>@>3> =865 G5< 2 B>G:5 , 7=0G8B 5ABL ;8=8O A=87C 225@E ?>
/ / >AB0;>AL ?@>25@8BL F5=K - <8=8<C< F5= 4>;65= 1KBL @O4>< A B>G:>9
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ! +', & " =0 10@5
/ / :@0B:89 0;3>@8B< ?>AB@>5=8O :0A0B5;L=>9 ;8=88 ?>
/ / 8I5< <8=8<0;L=>5 7=0G5=85 =0 >B@57:5 >B 10@0 4> + D i v e r S e a r c h B a r s
/ / 70B5< 845< 2;52> 40;LH5 A<>B@8< 345 70:0=G8205BAO 2?048=0 ?>;CG05< 3
/ / CB>G=O5< B>G:C <8=8<C<0 A CG5B>< =>2KE A2545=89
/ / >B MB>9 B>G:8 845< 2?@02> F8:;>< w h i l e , =0:;04K205< :0A0B5;L=K5 ;8=88
/ / 4> B5E ?>@, ?>:0 =5 4>945< 4> ?@02>3> :>=F0 >B@57:0 4> 10@0
/ / 2A?><8=05<, 345 ;8=8O 8<5;0 =081>;LHCN 4;8=C 8 @8AC5< 55, 5A;8 4;8=0 1>;LH0O
/ / 5A;8 2>7<>6=> ?>4>428305< ;8=8N 1;865 : ?@02><C :@0N >B@57:0
/ / ?@8 CA;>288, GB> 4;8=0 ;8=88 1>;LH5 <8=8<0;L=> 4>?CAB8<>9 M i n L i n e L e n g t h
/ / ;8=8O F5= >?8@05BAO =0 10@K p 2 8 p 1 , ;8=8O >?8@05BAO =0 10@K m 2 8 m 1
b o o l D i v e r B u l l ( i n t b )
{
d o u b l e m a c 2 , m a c 1 , s t ;
i n t m 3 , m 2 , m 1 , p 2 , p 1 , l w 1 , d i s t , k o l p r b ;
b o o l d i v b u l l ;
d i v b u l l = f a l s e ;
k o l p r b = 0 ;
k o l p r b = p r b _ v e r _ k o l ( b ) ;
/ / A@54=55 B5;> A25G8 2 ?C=:B0E
s t = a v e r a g e _ b o d y _ l e n g t h ( ) ;
s t = M a t h R o u n d ( s t ) ;
m a c 1 = 0 ;
m 1 = 0 ;
/ / A=0G0;0 =0E>48< <8=8<0;L=>5 7=0G5=85 =0 7040==>< >B@57:5
m 2 = l e f t m a c d _ m i n b a r ( D a l n P o i s k a D i v e r M A X , b ) ;
m a c 2 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m 2 ) ;
m 3 = m 2 ;
/ / 3;C1>:0O 2?048=0 4>;6=0 1KBL =865 =C;O
i f ( m a c 2 < 0 )
{
/ / =0E>48< 10@ 345 70:0=G8205BAO 2?048=0
m 3 = l e f t b a r _ h o l e m a c d ( m 2 ) ;
i f ( m 3 > m 2 )
{
/ / CB>G=8< <8=8<C< =0 =>2>< CG0AB:5
m 2 = l e f t m a c d _ m i n b a r ( ( m 3 - b + 1 ) , b ) ;
m a c 2 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m 2 ) ;
}
/ / ;>:0;L=K9 <8=8<C< 2>7;5 B>G:8
m 1 = l e f t m a c d _ m i n b a r ( 7 , b ) ;
m a c 1 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m 1 ) ;
}
e l s e
{
r e t u r n ( f a l s e ) ;
}
/ / @0AAB>O=85 >B B>G:8 , =0 :>B>@>< 87<5@O5< <8=8<C< F5=K
d i s t = M a t h M a x ( D a l n P o i s k a D i v e r M A X , ( m 3 - b + 1 ) ) ;
/ / <8=8<C< F5= =0 7040==>< 8=B5@20;5
l w 1 = i L o w e s t ( N U L L , 0 , M O D E _ L O W , d i s t , b ) ;
/ / 5A;8 CA;>28O ?> 4;O +', 4825@35=F88 2K?;=5=K
i f ( ( m a c 2 < m a c 1 ) & & ( m a c 1 < 0 ) & & ( m 2 > ( m 1 + D i v e r L i n e M i n L e n g t h ) ) & & ( m 1 > = b ) )
{
/ / <8=8<C< =0 10@5 !1 , 5ABL ?>4B25@640NI89 A83=0; O?>=A:8E A25G59
/ / i f ( ( l w 1 = = b ) & & ( m 1 = = b ) )
/ / {
/ / i f ( j a p s _ b u l l ( b ) = = t r u e )
/ / {
/ / d i v b u l l = t r u e ;
/ / }
/ / }
/ / 25@H8=0 <8=8<C<0 2?5@2K5 ?@>18205BAO B5;>< 10@0 0 =5 B5=O<8
/ / MB> :0: ?>:070;0 ?@0:B8:0 >G5=L B>G=K9 A83=0;, ;81> 5ABL =5A:>;L:> ?@>1>52 25@H8=
i f ( ( ( c h e c k _ l o w ( l w 1 , b ) = = t r u e ) | | ( k o l p r b > 1 ) ) & & ( C l o s e [ b ] > ( O p e n [ b ] + s t * P o i n t ) ) )
{
d i v b u l l = t r u e ;
}
}
/ / 5ABL 4825@35=F8O, <>6=> @8A>20BL ;8=88
i f ( d i v b u l l = = t r u e )
{
/ / 2KG8A;5=85 >?>@=KE B>G5: 4;O :0A0B5;L=>9 ;8=88 ?>
m 2 = b u l l d i v e r _ m a c d _ l i n e ( m 2 , b ) ;
m 1 = m a c d b u l l _ t r e n d b a r ( m 2 , b ) ;
/ / ?@020O B>G:0 >?>@K 4>;6=0 1KBL =540;5:> >B <8=8<C<0 F5=
i f ( M a t h A b s ( ( l w 1 - m 1 ) ) > D i v e r L i n e M i n L e n g t h )
{
r e t u r n ( f a l s e ) ;
}
i f ( m 2 > ( m 1 + D i v e r L i n e M i n L e n g t h ) & & ( m 1 > = b ) )
{
/ / 2KG8A;5=85 >?>@=KE B>G5: 4;O :0A0B5;L=>9 ;8=88 F5=
p 2 = b u l l d i v e r _ p r i c e _ l i n e ( m 3 , b ) ;
p 1 = r i g h t b u l l _ b a r p r i c e ( p 2 , b ) ;
i f ( ( p 2 > ( p 1 + D i v e r L i n e M i n L e n g t h ) ) & & ( p 1 > = b ) )
{
/ / 5A;8 2KG8A;8;8 2A5 4 >?>@=K5 B>G:8, <>6=> ?@>2>48BL 2 ;8=88
m a c 2 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m 2 ) ;
m a c 1 = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , m 1 ) ;
O b j e c t D e l e t e ( " p r i c e _ b u l l _ d i v e r _ l i n e " ) ;
O b j e c t C r e a t e ( " p r i c e _ b u l l _ d i v e r _ l i n e " , O B J _ T R E N D , 0 , T i m e [ p 2 ] , L o w [ p 2 ] , T i m e [ p 1 ] , L o w [ p 1 ] ) ;
O b j e c t D e l e t e ( " m a c d _ b u l l _ d i v e r _ l i n e " ) ;
O b j e c t C r e a t e ( " m a c d _ b u l l _ d i v e r _ l i n e " , O B J _ T R E N D , 1 , T i m e [ m 2 ] , m a c 2 , T i m e [ m 1 ] , m a c 1 ) ;
/ / ;8=8O =0 10@5 , ?>A;5 =55 >B:@KB85 A45;:8 4;O B5AB8@>20=8O
O b j e c t D e l e t e ( " d i v e r b u l l B U Y l i n e " ) ;
O b j e c t C r e a t e ( " d i v e r b u l l B U Y l i n e " , O B J _ V L I N E , 0 , T i m e [ b ] , 0 ) ;
O b j e c t S e t ( " d i v e r b u l l B U Y l i n e " , O B J P R O P _ C O L O R , c l r L i m e ) ;
O b j e c t S e t ( " d i v e r b u l l B U Y l i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
i f ( ( b = = 1 ) & & ( P e r i o d ( ) > P E R I O D _ M 5 ) )
{
A l e r t ( " +',/ &/ " + S y m b o l ( ) ) ;
P r i n t ( " +',/ &/ " + S y m b o l ( ) ) ;
}
/ / 5ABL 845O, GB> 4> B5E ?>@, ?>:0 2KH5 B@5=4>2>9 ;8=88 ?>
/ / B@5=4 >A=>20==K9 =0 4825@35=F88 2A5 5I5 459AB2C5B
/ / G5< 3;C165 & + B5< A8;L=55 A83=0; 4825@35=F88
/ / <>6=> ?@54?>;>68BL, GB> A83=0; 459AB2C5B B5< 4>;LH5
/ / G5< 1>;LH5 @0AAB>O=85 <564C B>G:0<8 >?>@K :0A0B5;L=KE ;8=89
/ / G0AB> A83=0; >B@010BK205BAO =5 A@07C, 0 ?>765 :>340 ?@> =53> 701K;8
r e t u r n ( t r u e ) ;
}
}
}
r e t u r n ( f a l s e ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 2KG8A;5=85 ?@02>9 B>G:8 >?>@K b a r t :0A0B5;L=>9 ;8=88 A=87C ?> <8=8<C<0<
/ / =C6=> GB>1K 2 B>G:5 2 8=48:0B>@ 1K; A0<K9 =87:89 =0 >B@57:5
/ / ?@82O7K205< ?;0=:C : 2 B>G:5 2 8 ?>4=8<05< 225@E ?@02K9 55 :>=5F
/ / >?@545;O5< =><5@ 10@0 b a r t 345 ?;0=:0 C?5@;0AL 2 8=48:0B>@
/ / =0 >B@57:5 A 2 1 , MB> 1C45B ?@020O B>G:0 4;O :0A0B5;L=>9 ;8=88
i n t m a c d b u l l _ t r e n d b a r ( i n t b 2 , i n t b 1 )
{
d o u b l e y i , m a c m , m a c i , k i , k m i n ;
i n t i , x i , b a r t ;
b a r t = b 2 ;
/ / ;52K9 =86=89 <8=8<C< M A C D =0 10@5 2
m a c m = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , b 2 ) ;
m a c m = N o r m a l i z e D o u b l e ( m a c m , 7 ) ;
k m i n = M a t h A b s ( m a c m ) ;
/ / 8I5< 10@, 345 =08<5=LH89 :>MDD =0:;>=0 k i 4;O C@02=5=8O ?@O<>9 ;8=88
i f ( m a c m < 0 )
{
f o r ( i = ( b 2 - 1 ) ; i > = b 1 ; i - - )
{
m a c i = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) ;
m a c i = N o r m a l i z e D o u b l e ( m a c i , 7 ) ;
x i = b 2 - i ;
y i = m a c i - m a c m ;
k i = N o r m a l i z e D o u b l e ( ( y i / x i ) , 7 ) ;
i f ( k i < k m i n )
{
k m i n = k i ;
b a r t = i ;
}
}
}
r e t u r n ( b a r t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >B ;52>3> <8=8<C<0 M A C D 845< 2;52> 4> B5E ?>@, ?>:0 M A C D =865 =C;O
/ / F5;L - ?>;CG8BL =><5@ 10@0, 345 70:0=G8205BAO B5:CI0O 2?048=0 M A C D
i n t l e f t b a r _ h o l e m a c d ( i n t b r m a c )
{
i n t i , b r ;
/ / =081>;LH89 =><5@ 10@0 4;O 2?048=K , 345 2A5 5I5 =865 =C;O
b r = 0 ;
f o r ( i = b r m a c ; i < B a r s ; i + + )
{
i f ( i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) < 0 )
{
b r = i ;
}
e l s e
{
b r e a k ;
}
}
r e t u r n ( b r ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 2KG8A;5=85 :0A0B5;L=>9 ;8=88 A=87C ?> <8=8<C<0< 8=48:0B>@0 =0 >B@57:5
/ / >B 10@0 2 845< 2?@02> 4> 10@0 1 , AB@>8< :0A0B5;L=CN ;8=8N A=87C ?>
/ / 70?><8=05< 2 10@0, =0 :>B>@KE ;8=8O 1K;0 =081>;LH59 4;8=K
/ / 2>72@0I05< =><5@ 10@0 p 2 4;O ;52>9 >?>@=>9 B>G:8
i n t b u l l d i v e r _ m a c d _ l i n e ( i n t b 2 , i n t b 1 )
{
i n t t 1 , p 2 , p 1 , d i s t i , d i m a x ;
/ / 8A:><K5 =><5@0 10@>2 4;O :0A0B5;L=>9 ;8=88
p 2 = 0 ;
p 1 = 0 ;
/ / ?@02K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
t 1 = b 2 ;
/ / =081>;LH55 @0AAB>O=85 <564C 10@0<8 >?>@K :0A0B5;L=>9 ;8=88
d i m a x = 0 ;
w h i l e ( ( t 1 > b 1 ) & & ( I s S t o p p e d ( ) = = f a l s e ) )
{
/ / 45;05< H03 >B 2 2 AB>@>=C 1 8I5< B>G:C t 1 4;O :0A0B5;L=>9 ;8=88
t 1 = m a c d b u l l _ t r e n d b a r ( b 2 , b 1 ) ;
/ / B5:CI55 @0AAB>O=85 <564C B>G:0<8 >?>@K :0A0B5;L=>9 ;8=88
d i s t i = b 2 - t 1 ;
/ / 70?><8=05< 10@K =0 :>B>@KE 4;8=0 ;8=88 <0:A8<0;L=0O
i f ( d i s t i > d i m a x )
{
d i m a x = d i s t i ;
p 2 = b 2 ;
p 1 = t 1 ;
}
/ / 5A;8 4>H;8 4> 10@0 1 8;8 =5 ?>;CG8;>AL ?>AB@>8BL ;8=8N
i f ( ( t 1 = = b 2 ) | | ( t 1 = = b 1 ) )
{
b r e a k ;
}
/ / 2 :>=F5 H030 ?5@5AB02;O5< ;52CN >?>@=CN B>G:C =0 <5AB> ?@02>9
b 2 = t 1 ;
}
/ / 5A;8 4;8=0 ;8=88 4>AB0B>G=0O 2>72@0I05< =><5@ ;52>3> 10@0
i f ( ( p 2 > ( p 1 + D i v e r L i n e M i n L e n g t h ) ) & & ( p 1 > = b 1 ) )
{
r e t u r n ( p 2 ) ;
}
r e t u r n ( 0 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / 2KG8A;5=85 ?@02>9 B>G:8 >?>@K 4;O :0A0B5;L=>9 ;8=88 ?> <8=8<C<0< F5=
/ / 0;3>@8B< ?@82O7K205< ;52K9 :>=5F ?;0=:8 : L o w [ b 2 ] 8 A<>B@8< =0 :0:><
/ / 10@5 1C45B 4@C3>9 :>=5F ?;0=:8 b r t - 10@ ;8=88 B@5=40
i n t r i g h t b u l l _ b a r p r i c e ( i n t b 2 , i n t b 1 )
{
d o u b l e k i , k m a x , y i ;
i n t i , x i , b r t ;
b r t = b 2 ;
k m a x = 0 ;
/ / 8I5< =081>;LH89 :>MDD 4;O C@02=5=8O ?@O<>9 ;8=88, =0< =C65= 10@,
/ / :>B>@K9 A2>8< 4=>< A8;L=5 2A53> >?CAB8; ;52K9 :>=5F ?;0=:8
f o r ( i = ( b 2 - 1 ) ; i > = b 1 ; i - - )
{
/ / =0:;>= 4>;65= 1KBL A25@EC 2=87 A;520 =0?@02>
i f ( L o w [ b 2 ] > L o w [ i ] )
{
x i = b 2 - i ;
y i = ( L o w [ b 2 ] - L o w [ i ] ) / P o i n t ;
k i = N o r m a l i z e D o u b l e ( ( y i / x i ) , 7 ) ;
i f ( k i > k m a x )
{
k m a x = k i ;
b r t = i ;
}
}
}
r e t u r n ( b r t ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / >B 2 845< 2?@02> 4> 10@0 1 , 2KG8A;O5< :0A0B5;L=CN ;8=8N ?> <8=8<C<0< F5=
/ / 70?><8=05< 2 10@0, =0 :>B>@KE ;8=8O 1K;0 <0:A8<0;L=>9 4;8=K
/ / 2>72@0I05< =><5@ ;52>9 B>G:8 t 2 >?>@K 4;O :0A0B5;L=>9 ;8=88
i n t b u l l d i v e r _ p r i c e _ l i n e ( i n t b 2 , i n t b 1 )
{
i n t r b p , d i s t c u r , d i s t m a x , t 2 , t 1 ;
d i s t m a x = 0 ;
/ / ?@02K9 10@ :0A0B5;L=>9 ;8=88 =0 B5:CI5< H035
r b p = b 2 ;
/ / 8A:><K5 =><5@0 10@>2 4;O :0A0B5;L=>9 ;8=88
t 1 = 0 ;
t 2 = 0 ;
w h i l e ( ( r b p > b 1 ) & & ( I s S t o p p e d ( ) = = f a l s e ) )
{
/ / ?>;CG05< ?@02K9 10@ F5= 4> B5E ?>@, ?>:0 =5 4>945< 4> 1
r b p = r i g h t b u l l _ b a r p r i c e ( b 2 , b 1 ) ;
d i s t c u r = b 2 - r b p ;
i f ( d i s t c u r > d i s t m a x )
{
d i s t m a x = d i s t c u r ;
t 2 = b 2 ;
t 1 = r b p ;
}
/ / 5A;8 4>H;8 4> 10@0 1 8;8 =5 ?>;CG8;>AL ?>AB@>8BL ;8=8N
i f ( ( r b p = = b 2 ) | | ( r b p = = b 1 ) )
{
b r e a k ;
}
i f ( L o w [ r b p ] < = L o w [ b 2 ] )
{
b 2 = r b p ;
}
}
/ / 5A;8 <>6=> ?@>25AB8 ;8=8N, 2>72@0I05< =><5@ ;52>3> >?>@=>3> 10@0
i f ( ( t 2 > ( t 1 + D i v e r L i n e M i n L e n g t h ) ) & & ( t 1 > = b 1 ) )
{
r e t u r n ( t 2 ) ;
}
r e t u r n ( 0 ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ?>8A: 10@0 =0 7040==>< >B@57:5 345 7=0G5=85 M A C D <8=8<0;L=>, 0=0;>3 i L o w e s t
/ / ?@>25@5=0 =0 A:@8?B5 - @01>B05B
i n t l e f t m a c d _ m i n b a r ( i n t c o u n t _ b a r s , i n t b )
{
d o u b l e c u r _ m a c d , m i n _ m a c d ;
i n t i , t o t a l , b m i n ;
t o t a l = b + c o u n t _ b a r s ;
i f ( t o t a l > B a r s )
{
t o t a l = B a r s ;
}
/ / 8A:><K9 10@
b m i n = b ;
m i n _ m a c d = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , b ) ;
m i n _ m a c d = N o r m a l i z e D o u b l e ( m i n _ m a c d , 7 ) ;
f o r ( i = ( b + 1 ) ; i < t o t a l ; i + + )
{
c u r _ m a c d = i M A C D ( N U L L , 0 , 1 2 , 2 6 , 9 , P R I C E _ C L O S E , M O D E _ M A I N , i ) ;
c u r _ m a c d = N o r m a l i z e D o u b l e ( c u r _ m a c d , 7 ) ;
i f ( c u r _ m a c d < m i n _ m a c d )
{
m i n _ m a c d = c u r _ m a c d ;
b m i n = i ;
}
}
r e t u r n ( b m i n ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ! $ &, !'" +',% #' " ! # #
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !" " +"/ ! # # ! +', - + " / ! " "# #!
/ / )" '!" +% +',%
i n t A n a l i z P o k y p k i T y n g u s k a ( i n t b )
{
d o u b l e S r e d n R a z m T e l a , S r e d n R a z m B a r a , K o e f f T e l a O n e , K o e f f B a r a O n e , S p r e d P u n k t ;
d o u b l e L e v e l V e r x n e y M A , L e v e l N i z n e y M A , R a z m a x V e e r a M A , K o e f f O b y e m a ;
d o u b l e I m p u l s S t r e n g t h , S r e d n y R a z m a x M A , K o e f f Y z k o s t M A , E A B e t t e r D i r e c t ;
i n t V e e r M A B a l l B U L L , K o l v o P r o b V e r s h i n , K o l v o P r o b i t M A , P o z i t i o n Y ;
i n t K r i l o P r o b i t V e r s h i n , B i g T i m e F r a m e , B i g T i m e B a r , L e v a y a G r a n N i z i n ;
i n t N a b r B a l l s B U L L , K o l v o M a l o e T e l o , D a l n N i z a B a r a B , D n o N i z i n B a r ;
i n t K o l v o P r o b V e r x 2 X , P r o b i t V e r s h B A R , D a l n D n a N i z i n y , Z o n a P r o b i t ;
i n t K o l v o P r o b M A 2 X ;
b o o l N a i d e n S i g n O p e n B U L L , N a i d e n T o c h n y S i g n a l , Z a k r N a d V e e r o m , V e e r 4 X M A B U L L ;
b o o l I m p u l s e G o o d B U L L , P r o b o y G o o d B U L L , T r e n d M A G o o d B U L L , R a z v o r o t G o o d B U L L ;
b o o l D i v e r G o o d B U L L , S v e c h a 2 X B U L L , R a z g o n 2 X B U L L , F i b o S e t k a B U L L , P r o b o y 5 X L i g h t M A ;
b o o l P o d y e m B U L L 3 X , P r o b o y 6 X L i g h t M A , P r o b o y 7 X L i g h t M A , P r o b o y 8 X L i g h t M A ;
b o o l V i x o d I z F l e t a B U L L , P r o b N e s k L i n e B U L L ;
L e v e l V e r x n e y M A = 0 ; L e v e l N i z n e y M A = 0 ; R a z m a x V e e r a M A = 0 ; K o e f f O b y e m a = 0 ;
V e e r M A B a l l B U L L = 0 ; K o l v o P r o b V e r s h i n = 0 ; P o z i t i o n Y = 0 ; K o l v o P r o b i t M A = 0 ;
K r i l o P r o b i t V e r s h i n = 0 ; I m p u l s S t r e n g t h = 0 ; S r e d n y R a z m a x M A = 0 ;
K o e f f Y z k o s t M A = 0 ;
K o l v o M a l o e T e l o = 0 ; D a l n N i z a B a r a B = 0 ; K o e f f B a r a O n e = 0 ; L e v a y a G r a n N i z i n = 0 ;
D n o N i z i n B a r = 0 ; K o l v o P r o b V e r x 2 X = 0 ; P r o b i t V e r s h B A R = 0 ; D a l n D n a N i z i n y = 0 ;
Z o n a P r o b i t = 0 ; K o l v o P r o b M A 2 X = 0 ; E A B e t t e r D i r e c t = 0 ;
P r o b o y G o o d B U L L = f a l s e ; T r e n d M A G o o d B U L L = f a l s e ; R a z v o r o t G o o d B U L L = f a l s e ;
Z a k r N a d V e e r o m = f a l s e ; I m p u l s e G o o d B U L L = f a l s e ; V e e r 4 X M A B U L L = f a l s e ;
N a i d e n S i g n O p e n B U L L = f a l s e ; N a i d e n T o c h n y S i g n a l = f a l s e ; D i v e r G o o d B U L L = f a l s e ;
S v e c h a 2 X B U L L = f a l s e ; R a z g o n 2 X B U L L = f a l s e ; F i b o S e t k a B U L L = f a l s e ;
P o d y e m B U L L 3 X = f a l s e ;
P r o b o y 5 X L i g h t M A = f a l s e ; P r o b o y 6 X L i g h t M A = f a l s e ; P r o b o y 7 X L i g h t M A = f a l s e ;
P r o b o y 8 X L i g h t M A = f a l s e ; V i x o d I z F l e t a B U L L = f a l s e ; P r o b N e s k L i n e B U L L = f a l s e ;
/ / !'" !# '!" +',% / & '!" !
N a b r B a l l s B U L L = 0 ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '!" $ " !" +% *" + ! # #
O b j e c t s D e l e t e A l l ( ) ;
/ / !'" "+ " / ! !1
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y ;
D r a w C e n t r a l L A B E L ( " #!" , P o z i t i o n Y , c l r Y e l l o w G r e e n , " #! # " ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" "+ " / ! !1
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y ;
D r a w L e f t L A B E L ( " ."" , P o z i t i o n Y , c l r Y e l l o w , " ." = " + S y m b o l ( ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" "+ " / ! !2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + S h a g N a d p i s P o V e r t i k a l ;
D r a w L e f t L A B E L ( " " $ " , P o z i t i o n Y , c l r Y e l l o w , " " $ = " + D o u b l e T o S t r ( P e r i o d ( ) , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" !"( " $ " !", "#)
B i g T i m e F r a m e = S t a r s h i y T i m e F r a m e ( ) ;
/ / !'" "+ " / ! !2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + S h a g N a d p i s P o V e r t i k a l ;
D r a w C e n t r a l L A B E L ( " !" ( " $ " , P o z i t i o n Y , c l r Y e l l o w , " !" ( " $ = " + D o u b l e T o S t r ( B i g T i m e F r a m e , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" / !" ( " $
B i g T i m e B a r = i B a r S h i f t ( N U L L , B i g T i m e F r a m e , T i m e [ b ] , t r u e ) ;
/ / !'" "+ " / ! !3
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 2 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " !" ( " , P o z i t i o n Y , c l r O r a n g e , " !" ( = " + D o u b l e T o S t r ( B i g T i m e B a r , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / @0AG5B :>5DD8F85=B0 >1J5<0 =0 10@5 ?> >B=>H5=8N : A@54=5<C >1J5<C
K o e f f O b y e m a = 0 ;
K o e f f O b y e m a = R a s c h e t K o e f f V o l u m e T y n g ( b ) ;
/ / !'" "+ " / ! !5
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 4 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " -$$& " * " , P o z i t i o n Y , c l r A q u a , " -$$& " * = " + D o u b l e T o S t r ( K o e f f O b y e m a , 2 ) ) ;
/ / '! -$$& " * "#) / +', !'
i f ( K o e f f O b y e m a > K o e f f O b y e m a L I T T L E ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a O b y e m a L I T T L E ; }
i f ( K o e f f O b y e m a > K o e f f O b y e m a M E D I U M ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a O b y e m a M E D I U M ; }
i f ( K o e f f O b y e m a > K o e f f O b y e m a N O R M A L ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a O b y e m a N O R M A L ; }
i f ( K o e f f O b y e m a > K o e f f O b y e m a G I G A N T ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a O b y e m a G I G A N T ; }
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ' ! # "%
S p r e d P u n k t = 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 ) ;
S p r e d P u n k t = M a t h R o u n d ( S p r e d P u n k t ) ;
/ / !'" "+ " / ! !3
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 2 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " ! " , P o z i t i o n Y , c l r Y e l l o w , " ! = " + D o u b l e T o S t r ( S p r e d P u n k t , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +'! ! "
S r e d n R a z m T e l a = S r e d n i y R a z m e r T e l a P u n k t s ( b ) ;
/ / !'" "+ " / ! !4
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 3 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " ! " " , P o z i t i o n Y , c l r Y e l l o w , " ! " = " + D o u b l e T o S t r ( S r e d n R a z m T e l a , 2 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +'! !
S r e d n R a z m B a r a = S r e d n i y R a z m e r B a r a P u n k t s ( b ) ;
/ / !'" "+ " / ! !5
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 4 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " ! " , P o z i t i o n Y , c l r Y e l l o w , " ! = " + D o u b l e T o S t r ( S r e d n R a z m B a r a , 2 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / / +',/ !'
S v e c h a 2 X B U L L = f a l s e ;
S v e c h a 2 X B U L L = D v o i n a y a S v e c h a B U L L ( S r e d n R a z m T e l a , b ) ;
/ / !'" "+ " / ! !1 1
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 0 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( S v e c h a 2 X B U L L = = t r u e )
{
D r a w L e f t L A B E L ( " / !'" , P o z i t i o n Y , c l r L i m e G r e e n , " / +',/ !'" ) ;
}
e l s e
{
D r a w L e f t L A B E L ( " / !'" , P o z i t i o n Y , c l r Y e l l o w , " !' "" ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ?>8A: ;52>3> :@0O + F5= - A;>6=K9 20@80=B, GB>1K @072>@>B 1K;
L e v a y a G r a n N i z i n = R a s c h e t L e v g r N i z i n y G O O D ( S r e d n R a z m T e l a , b ) ;
/ / 5A;8 ;520O 3@0=8F0 =0945=0 8 5ABL <8=. :>;- 2> 2=CB@5==8E 10@>2
i f ( L e v a y a G r a n N i z i n > b )
{
N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a B a l l s G R A N I C A ;
/ / !'" "+ " / ! !1 2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 1 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " / &" , P o z i t i o n Y , c l r L i m e , " & + " ) ;
/ / ", / / ! " &+ +
O b j e c t D e l e t e ( " L e v a y a G r a n N i z i n L i n e " ) ;
O b j e c t C r e a t e ( " L e v a y a G r a n N i z i n L i n e " , O B J _ V L I N E , 0 , T i m e [ ( L e v a y a G r a n N i z i n + 1 ) ] , 0 ) ;
O b j e c t S e t ( " L e v a y a G r a n N i z i n L i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
O b j e c t S e t ( " L e v a y a G r a n N i z i n L i n e " , O B J P R O P _ C O L O R , c l r Y e l l o w ) ;
/ / ?>8A: 10@0 - 4=0 =878=K
D n o N i z i n B a r = 0 ;
D n o N i z i n B a r = P o i s k B a r a D n a N i z i n y ( L e v a y a G r a n N i z i n , b ) ;
/ / 3>@87=>B0;L=0O ;8=8O ?> C@>2=N 4=0 =878=K
O b j e c t D e l e t e ( " D n o N i z i n y L e v e l L i n e " ) ;
O b j e c t C r e a t e ( " D n o N i z i n y L e v e l L i n e " , O B J _ H L I N E , 0 , T i m e [ D n o N i z i n B a r ] , L o w [ D n o N i z i n B a r ] ) ;
O b j e c t S e t ( " D n o N i z i n y L e v e l L i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
O b j e c t S e t ( " D n o N i z i n y L e v e l L i n e " , O B J P R O P _ C O L O R , c l r A q u a ) ;
}
e l s e
{
/ / !'" "+ " / ! !1 2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 1 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " / &" , P o z i t i o n Y , c l r Y e l l o w , " / & " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / -$$& " " "#) / +', !'
K o e f f T e l a O n e = 0 ;
K o e f f T e l a O n e = K o e f f T e l a S v e c h i B U L L ( S r e d n R a z m T e l a , b ) ;
/ / '! -$$& " " "#) / +', !'
i f ( K o e f f T e l a O n e > K o e f f T e l a L I T T L E ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a T e l a L I T T L E ; }
i f ( K o e f f T e l a O n e > K o e f f T e l a M E D I U M ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a T e l a M E D I U M ; }
i f ( K o e f f T e l a O n e > K o e f f T e l a N O R M A L ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a T e l a N O R M A L ; }
i f ( K o e f f T e l a O n e > K o e f f T e l a G I G A N T ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a T e l a G I G A N T ; }
/ / + - "!" " ! ' -$$& " " !'
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 3 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " -$$& " "" , P o z i t i o n Y , c l r C r i m s o n , " -$$& " " = " + D o u b l e T o S t r ( K o e f f T e l a O n e , 2 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" +',% 1 2 ! ,/)% ! %
V e e r M A B a l l B U L L = 0 ;
V e e r M A B a l l B U L L = R a s c h e t B a l l o v V e e r a M A B U L L ( b ) ;
/ / '! , + +' 1 2 ! ,/)% ! %
i f ( V e e r M A B a l l B U L L > B a l l V e e r M A L i t t l e ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + 3 ; }
i f ( V e e r M A B a l l B U L L > B a l l V e e r M A M e d i u m ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + 3 ; }
i f ( V e e r M A B a l l B U L L > B a l l V e e r M A L a r g e ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + 3 ; }
i f ( V e e r M A B a l l B U L L > B a l l V e e r M A H u g e ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + 8 ; }
i f ( V e e r M A B a l l B U L L > B a l l V e e r M A S u p e r ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + 8 ; }
i f ( V e e r M A B a l l B U L L > B a l l V e e r M A G i g a n t ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a B a l l G I G A N T ; }
i f ( V e e r M A B a l l B U L L > B a l l V e e r M A E x c e l l ) { N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a B a l l E X C E L L ; }
/ / !'" "+ " / ! !8
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 7 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / + - "!" " ! ' '!" 1 2
i f ( V e e r M A B a l l B U L L > B a l l V e e r M A H u g e )
{
D r a w R i g h t L A B E L ( " + " , 1 5 , P o z i t i o n Y , c l r L i m e , " +',% = " + D o u b l e T o S t r ( V e e r M A B a l l B U L L , 0 ) ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " + " , 1 5 , P o z i t i o n Y , c l r O r a n g e , " +',% = " + D o u b l e T o S t r ( V e e r M A B a l l B U L L , 0 ) ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" % 1 2 ! ,/)% ! % # "%
R a z m a x V e e r a M A = 0 ;
R a z m a x V e e r a M A = R a s c h e t R a z m a x a V e e r a 1 2 M A ( b ) ;
/ / !'" "+ " / ! !8
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 7 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " % " , P o z i t i o n Y , c l r Y e l l o w , " % # "+ = " + D o u b l e T o S t r ( R a z m a x V e e r a M A , 0 ) ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / !'" ! % 1 2 ! ,/)% ! % # "%
S r e d n y R a z m a x M A = 0 ;
i f ( P e r i o d ( ) = = P E R I O D _ M 1 5 )
{
S r e d n y R a z m a x M A = X r a n e n i e R a z m a x a V e e r a 1 5 M I N ;
}
i f ( P e r i o d ( ) = = P E R I O D _ M 5 )
{
S r e d n y R a z m a x M A = Z n a c h S r e d n R a z m a x V e e r a 5 M I N ;
}
i f ( P e r i o d ( ) = = P E R I O D _ M 1 )
{
S r e d n y R a z m a x M A = Z n a c h S r e d n R a z m V e e r a O n e M I N ;
}
/ / !'" "+ " / ! !9
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 8 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " ! % " , P o z i t i o n Y , c l r Y e l l o w , " ! % # "+ = " + D o u b l e T o S t r ( S r e d n y R a z m a x M A , 0 ) ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / !'" -$$& " # !" 1 2 ! ,/)% ! %
K o e f f Y z k o s t M A = 0 ;
/ / =0 =>;L 45;8BL =5;L7O
i f ( S r e d n y R a z m a x M A > 0 )
{
K o e f f Y z k o s t M A = R a z m a x V e e r a M A / S r e d n y R a z m a x M A ;
K o e f f Y z k o s t M A = N o r m a l i z e D o u b l e ( K o e f f Y z k o s t M A , 2 ) ;
}
e l s e
{
K o e f f Y z k o s t M A = 1 . 5 ;
}
/ / !'" "+ " / ! !9
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 8 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / + - "!" " ! ' '!" 1 2
i f ( K o e f f Y z k o s t M A < K o e f f Y z k o s t i O P T I T M A X )
{
/ / '! # !", , 1 2 ! ,/)% ! %
N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a B a l l o v Y z k o s t V e e r a M A ;
D r a w R i g h t L A B E L ( " -$$& " # !" " , 1 5 , P o z i t i o n Y , c l r A q u a , " -$$. # !" = " + D o u b l e T o S t r ( K o e f f Y z k o s t M A , 2 ) ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " -$$& " # !" " , 1 5 , P o z i t i o n Y , c l r Y e l l o w , " -$$. # !" = " + D o u b l e T o S t r ( K o e f f Y z k o s t M A , 2 ) ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
L e v e l V e r x n e y M A = 0 ;
L e v e l V e r x n e y M A = R a s c h e t L e v e l V e r x n e y 1 2 M A ( b ) ;
/ / !'" "+ " / ! !6
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 5 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " # , % " , P o z i t i o n Y , c l r Y e l l o w , " # , % = " + D o u b l e T o S t r ( L e v e l V e r x n e y M A , D i g i t s ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
L e v e l N i z n e y M A = 0 ;
L e v e l N i z n e y M A = R a s c h e t L e v e l N i z n e y 1 2 M A ( b ) ;
/ / !'" "+ " / ! !7
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 6 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " # , " , P o z i t i o n Y , c l r Y e l l o w , " # , = " + D o u b l e T o S t r ( L e v e l N i z n e y M A , D i g i t s ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '/ , +', % 4 % "/+%
V e e r 4 X M A B U L L = f a l s e ;
V e e r 4 X M A B U L L = P r o v e r k a V e e r 4 X M A B i g B U L L ( b ) ;
/ / !'" "+ " / ! !1 1
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 0 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( V e e r 4 X M A B U L L = = t r u e )
{
D r a w R i g h t L A B E L ( " 4 % "/+% " , 1 5 , P o z i t i o n Y , c l r L i m e , " % 4 % "/+% " ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " 4 % "/+% " , 1 5 , P o z i t i o n Y , c l r O r a n g e , " 4 % "/+% "" ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / >;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E +', A25G59 "#) $
K o l v o P r o b i t M A = 0 ;
K o l v o P r o b i t M A = R a s c h e t P r o b i t M A O n e B U L L ( b ) ;
/ / !'" "+ " / ! !1 0
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 9 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w R i g h t L A B E L ( " " ! % " , 1 5 , P o z i t i o n Y , c l r O r a n g e , " " ! % = " + D o u b l e T o S t r ( K o l v o P r o b i t M A , 0 ) ) ;
/ / =0G8A;O5< 10;;K ?@8 =0;8G88 ?@028;L=>3> 255@0 87 4 E BO65;KE A 2KE>4>< 87 255@0
i f ( ( C l o s e [ b ] > L e v e l V e r x n e y M A ) | | ( V e e r 4 X M A B U L L = = t r u e ) )
{
i f ( K o l v o P r o b i t M A > = K o l P r o b M A O n e M I N )
{
N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a B a l l P r o b O n e M A ;
D r a w R i g h t L A B E L ( " " ! % " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ! % = " + D o u b l e T o S t r ( K o l v o P r o b i t M A , 0 ) ) ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / @0AG5B A8;K 8<?C;LA0
I m p u l s S t r e n g t h = 0 ;
I m p u l s S t r e n g t h = R a s c h e t I m p u l s S t r e n g t h ( K o e f f O b y e m a , S r e d n R a z m T e l a , b ) ;
/ / !'" "+ " / ! !6
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 5 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " ! #,!" , P o z i t i o n Y , c l r M a g e n t a , " ! #,! = " + D o u b l e T o S t r ( I m p u l s S t r e n g t h , 2 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" '!" +% !', " + + ! " "#) !'
K o l v o M a l o e T e l o = 0 ;
K o l v o M a l o e T e l o = K o l v o L i t t l e C a n d e l s L e f t ( b ) ;
/ / !'" "+ " / ! !7
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 6 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " '!" +% !'" , P o z i t i o n Y , c l r O r a n g e , " +% !' ! = " + D o u b l e T o S t r ( K o l v o M a l o e T e l o , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" , !" + "#) /
D a l n N i z a B a r a B = 0 ;
D a l n N i z a B a r a B = S l e v a B a r o v O t N i z i n y ( b ) ;
/ / !'" "+ " / ! !8
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 7 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " , !", "#) " , P o z i t i o n Y , c l r O r a n g e , " , !", = " + D o u b l e T o S t r ( D a l n N i z a B a r a B , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / , !", + &
D a l n D n a N i z i n y = 0 ;
/ / ! / & +
i f ( ( L e v a y a G r a n N i z i n > b ) & & ( D n o N i z i n B a r > 0 ) )
{
D a l n D n a N i z i n y = S l e v a T e l o S v e c h O t N i z i n y ( D n o N i z i n B a r ) ;
}
/ / !'" "+ " / ! !9
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 8 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " , !", $# + "" , P o z i t i o n Y , c l r O r a n g e , " , !", + = " + D o u b l e T o S t r ( D a l n D n a N i z i n y , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +' % #% ! % !'%
R a z g o n 2 X B U L L = f a l s e ;
R a z g o n 2 X B U L L = R a z g o n 2 X C h e c k B U L L ( b ) ;
/ / !'" "+ " / ! !1 0
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 9 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( R a z g o n 2 X B U L L = = t r u e )
{
D r a w C e n t r a l L A B E L ( " #% !'%" , P o z i t i o n Y , c l r L i m e , " % #% !'%" ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " #% !'%" , P o z i t i o n Y , c l r O r a n g e , " % " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * % ! % " % !'% ! " !" / *
P o d y e m B U L L 3 X = f a l s e ;
P o d y e m B U L L 3 X = P o d y e m V e r x V o l u m e B U L L 3 X ( b ) ;
/ / !'" "+ " / ! !1 1
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 0 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( P o d y e m B U L L 3 X = = t r u e )
{
D r a w C e n t r a l L A B E L ( " * % " % !'%" , P o z i t i o n Y , c l r L i m e , " * % " % !'%" ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " * % " % !'%" , P o z i t i o n Y , c l r O r a n g e , " * % " % " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +'! / ! ! " # ""
E A B e t t e r D i r e c t = 0 ;
E A B e t t e r D i r e c t = D i r e c t B E T T E R ( N a s t r B e t t e r W a r p , N a s t r B e t t e r D e v i a t , N a s t r B e t t e r A m p l i t , N a s t r B e t t e r D i s t o r , b ) ;
E A B e t t e r D i r e c t = N o r m a l i z e D o u b l e ( E A B e t t e r D i r e c t , 3 ) ;
/ / !'" "+ " / ! !1 6
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 5 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / 4>102;O5< 10;;K : ?>78F88
i f ( ( E A B e t t e r D i r e c t > 0 ) & & ( M a t h A b s ( E A B e t t e r D i r e c t ) > B e t t e r N a p r a v A B C M i n ) )
{
N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a B a l l B e t t e r ;
D r a w C e n t r a l L A B E L ( " E A B e t t e r D i r e c t i o n " , P o z i t i o n Y , c l r A q u a , " E A B e t t e r D i r e c t i o n = " + D o u b l e T o S t r ( E A B e t t e r D i r e c t , 3 ) ) ;
}
/ / >B=8<05< 10;;K >B ?>78F88
i f ( ( E A B e t t e r D i r e c t < 0 ) & & ( M a t h A b s ( E A B e t t e r D i r e c t ) > B e t t e r N a p r a v A B C M i n ) )
{
N a b r B a l l s B U L L = N a b r B a l l s B U L L - D o b a v k a B a l l B e t t e r ;
D r a w C e n t r a l L A B E L ( " E A B e t t e r D i r e c t i o n " , P o z i t i o n Y , c l r M a g e n t a , " E A B e t t e r D i r e c t i o n = " + D o u b l e T o S t r ( E A B e t t e r D i r e c t , 3 ) ) ;
}
i f ( M a t h A b s ( E A B e t t e r D i r e c t ) < = B e t t e r N a p r a v A B C M i n )
{
D r a w C e n t r a l L A B E L ( " E A B e t t e r D i r e c t i o n " , P o z i t i o n Y , c l r O r a n g e , " E A B e t t e r D i r e c t i o n = " + D o u b l e T o S t r ( E A B e t t e r D i r e c t , 3 ) ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
V i x o d I z F l e t a B U L L = f a l s e ;
V i x o d I z F l e t a B U L L = P r o b o y Y z k o g o F l e t a B U L L ( S r e d n R a z m T e l a , b ) ;
/ / !'" "+ " / ! !1 7
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 6 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( V i x o d I z F l e t a B U L L = = t r u e )
{
N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v B a l l P r o b o y F L E T A ;
D r a w C e n t r a l L A B E L ( " # $"" , P o z i t i o n Y , c l r A q u a , " % &+ $"" ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " # $"" , P o z i t i o n Y , c l r O r a n g e , " / &+ $" " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +' 8 - % " #
P r o b o y 8 X L i g h t M A = f a l s e ;
P r o b o y 8 X L i g h t M A = P r o b o y E i g h t L i g h t M A T r e n d B U L L ( b , S v e c h a 2 X B U L L ) ;
/ / !'" "+ " / ! !1 5
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 4 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( P r o b o y 8 X L i g h t M A = = t r u e )
{
D r a w C e n t r a l L A B E L ( " 8 - % " , P o z i t i o n Y , c l r L i m e , " +' 8 - % " ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " 8 - % " , P o z i t i o n Y , c l r O r a n g e , " / 8 - % " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +' 7 - % " #
P r o b o y 7 X L i g h t M A = f a l s e ;
P r o b o y 7 X L i g h t M A = P r o b o y S e v e n L i g h t M A T r e n d B U L L ( b , S v e c h a 2 X B U L L ) ;
/ / !'" "+ " / ! !1 4
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 3 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( P r o b o y 7 X L i g h t M A = = t r u e )
{
D r a w C e n t r a l L A B E L ( " 7 - % " , P o z i t i o n Y , c l r L i m e , " +' 7 - % " ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " 7 - % " , P o z i t i o n Y , c l r O r a n g e , " / 7 - % " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +' 6 - " % " #
P r o b o y 6 X L i g h t M A = f a l s e ;
P r o b o y 6 X L i g h t M A = P r o b o y S i x L i g h t M A T r e n d B U L L ( b , S v e c h a 2 X B U L L ) ;
/ / !'" "+ " / ! !1 3
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 2 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( P r o b o y 6 X L i g h t M A = = t r u e )
{
N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a B a l l s P r o b 6 X M A ;
D r a w C e n t r a l L A B E L ( " 6 - " % " , P o z i t i o n Y , c l r L i m e , " +' 6 - " % " ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " 6 - " % " , P o z i t i o n Y , c l r O r a n g e , " / 6 - " % " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +' 5 - " % " #
P r o b o y 5 X L i g h t M A = f a l s e ;
P r o b o y 5 X L i g h t M A = P r o b o y F i v e L i g h t M A T r e n d B U L L ( b , S v e c h a 2 X B U L L ) ;
/ / !'" "+ " / ! !1 2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 1 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( ( P r o b o y 6 X L i g h t M A = = f a l s e ) & & ( P r o b o y 5 X L i g h t M A = = t r u e ) )
{
N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a B a l l s P r o b 5 X M A ;
D r a w C e n t r a l L A B E L ( " 5 - " % " , P o z i t i o n Y , c l r L i m e , " +' 5 - " % " ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " 5 - " % " , P o z i t i o n Y , c l r O r a n g e , " / 5 - " % " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" -$$& " "#) ! # #
K o e f f B a r a O n e = 0 ;
K o e f f B a r a O n e = K o e f f R a z m e r a B a r a B ( S r e d n R a z m B a r a , b ) ;
/ / !'" "+ " / ! !1 0
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 9 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " -$$. " , P o z i t i o n Y , c l r Y e l l o w , " -$$. = " + D o u b l e T o S t r ( K o e f f B a r a O n e , 2 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +'! '!" + "+% ( +', !'
K o l v o P r o b V e r s h i n = 0 ;
K o l v o P r o b V e r s h i n = R a s c h e t P r o b i t V e r s h i n O n e ( b ) ;
Z o n a P r o b i t = b + K o l v o P r o b V e r s h i n ;
/ / !'" "+ " / ! !1 2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 1 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w R i g h t L A B E L ( " " ' !'" , 1 5 , P o z i t i o n Y , c l r O r a n g e , " - "+% ( = " + D o u b l e T o S t r ( K o l v o P r o b V e r s h i n , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '!" "+% ( +', !'
K o l v o P r o b V e r x 2 X = 0 ;
i f ( S v e c h a 2 X B U L L = = t r u e )
{
K o l v o P r o b V e r x 2 X = R a s c h e t P r o b i t V e r s h i n T W O ( b ) ;
Z o n a P r o b i t = b + K o l v o P r o b V e r x 2 X ;
}
/ / !'" "+ " / ! !1 3
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 2 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " " !'" , P o z i t i o n Y , c l r Y e l l o w , " " ( !' 2 % = " + D o u b l e T o S t r ( K o l v o P r o b V e r x 2 X , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / >;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E +', A25G59
K o l v o P r o b M A 2 X = 0 ;
K o l v o P r o b M A 2 X = K o l v o P r o b M A S v e c h a 2 X B U L L ( b ) ;
/ / !'" "+ " / ! !1 4
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 3 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " " ! % !' 2 %" , P o z i t i o n Y , c l r Y e l l o w , " " ! % !' 2 % = " + D o u b l e T o S t r ( K o l v o P r o b M A 2 X , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" "+ " / ! !1 6
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 5 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " % ) ! % " , P o z i t i o n Y , c l r C r i m s o n , " ! % . ! . % 1 5 # "+ = " + D o u b l e T o S t r ( X r a n e n i e R a z m a x a V e e r a 1 5 M I N , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / # ", #! +"/ +( ! # +
/ / '/ +', & /
D i v e r G o o d B U L L = f a l s e ;
D i v e r G o o d B U L L = D i v e r B u l l O X O T N I K 7 7 7 ( b ) ;
/ / !'" "+ " / ! !1 3
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 2 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( D i v e r G o o d B U L L = = t r u e )
{
N a b r B a l l s B U L L = N a b r B a l l s B U L L + D i v e r L i n e A d d B a l l s ;
D r a w R i g h t L A B E L ( " &/" , 1 5 , P o z i t i o n Y , c l r L i m e , " !", +',/ &/" ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " &/" , 1 5 , P o z i t i o n Y , c l r O r a n g e , " +', & "" ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / - " ( + !
P r o b i t V e r s h B A R = 0 ;
P r o b i t V e r s h B A R = P o i s k P r o b i t V e r s h i n ( b ) ;
/ / !'" "+ " / ! !1 4
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 3 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w R i g h t L A B E L ( " "+ !" , 1 5 , P o z i t i o n Y , c l r O r a n g e , " " ( + = " + D o u b l e T o S t r ( P r o b i t V e r s h B A R , 0 ) ) ;
/ / H8@8=0 :@K;0 ?@>18B>9 25@H8=K
K r i l o P r o b i t V e r s h i n = R a z m e r K r i l a P i k a K n i g h t ( P r o b i t V e r s h B A R , b ) ;
/ / =0G8A;5=85 10;;>2 70 ?@>1>9 C@>2=O
i f ( K r i l o P r o b i t V e r s h i n > = S h i r i n K r i l P r o b i t L E V E L )
{
N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v B a l l s P r o b o y L E V E L ;
}
/ / !'" "+ " / ! !1 5
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 4 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w R i g h t L A B E L ( " ( + /" , 1 5 , P o z i t i o n Y , c l r L i m e , " ( + " ( + = " + D o u b l e T o S t r ( K r i l o P r o b i t V e r s h i n , 0 ) ) ;
i f ( ( P r o b i t V e r s h B A R > b ) & & ( K r i l o P r o b i t V e r s h i n > 1 ) )
{
/ / 3>@87>=B0;L=0O ;8=8O ?> C@>2=N 25@H8=K ?@>18B>3> ?8:0
O b j e c t C r e a t e ( " P r o b P i k L e v e l L i n e " , O B J _ H L I N E , 0 , T i m e [ P r o b i t V e r s h B A R ] , H i g h [ P r o b i t V e r s h B A R ] ) ;
O b j e c t S e t ( " P r o b P i k L e v e l L i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
O b j e c t S e t ( " P r o b P i k L e v e l L i n e " , O B J P R O P _ C O L O R , c l r L i m e ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '/ !'" # !" +', $ !"
F i b o S e t k a B U L L = f a l s e ;
F i b o S e t k a B U L L = F i b o S e t k a B u l l O x o t n i k C H E C K ( S r e d n R a z m T e l a , b ) ;
/ / !'" "+ " / ! !1 6
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 5 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / '! '!" #. +',. $ !"#
i f ( F i b o S e t k a B U L L = = t r u e )
{
N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a B a l l o v F I B O ;
D r a w R i g h t L A B E L ( " $ !"" , 1 5 , P o z i t i o n Y , c l r L i m e , " +',/ $ !" !" " ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " $ !"" , 1 5 , P o z i t i o n Y , c l r O r a n g e , " +',/ $ !" " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ( + % +'
P r o b N e s k L i n e B U L L = f a l s e ;
/ / 5A;8 =878=0 =0945=0 ?@>25@8< 5ABL ;8 42>9=0O =878=0
i f ( L e v a y a G r a n N i z i n > b )
{
P r o b N e s k L i n e B U L L = D v o i n a y a N i z i n y a ( L e v a y a G r a n N i z i n , b ) ;
}
/ / !'" "+ " / ! !1 7
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 6 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( P r o b N e s k L i n e B U L L = = t r u e )
{
N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a B a l l s V e r s h i n a 2 X ;
D r a w R i g h t L A B E L ( " (" , 1 5 , P o z i t i o n Y , c l r L i m e , " ( +" ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " (" , 1 5 , P o z i t i o n Y , c l r O l i v e , " / ( + " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ! " ,(/ !' " * , '" !", # + "+
i f ( ( K o e f f T e l a O n e > K o e f f T e l a R A S X V M I N ) & & ( K o e f f O b y e m a < K o e f f V o l u m e L I T M A X ) )
{
N a b r B a l l s B U L L = N a b r B a l l s B U L L + D o b a v k a B a l l R A S X O B Y E M ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '/ "+ ! - % ( #,! %
i f ( ( K o e f f T e l a O n e > 5 . 2 ) & & ( K o e f f O b y e m a > 2 . 2 ) & & ( K o l v o M a l o e T e l o > 1 4 0 ) )
{
I m p u l s e G o o d B U L L = t r u e ;
}
i f ( ( K o e f f T e l a O n e > 3 . 0 ) & & ( K o l v o P r o b i t M A > = 8 ) )
{
I m p u l s e G o o d B U L L = t r u e ;
}
/ / !'" "+ " / ! !4
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 3 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / + - "!" " ! ' % ( #,! %
i f ( I m p u l s e G o o d B U L L = = t r u e )
{
D r a w R i g h t L A B E L ( " % ( #,! / "" , 1 5 , P o z i t i o n Y , c l r L i m e , " !", % ( #,! %" ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " % ( #,! / "" , 1 5 , P o z i t i o n Y , c l r Y e l l o w , " " % ( #,! %" ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '/ " "+ ! - / #' %
i f ( ( K o l v o P r o b i t M A > = 7 ) & & ( C l o s e [ b ] > L e v e l V e r x n e y M A ) )
{
P r o b o y G o o d B U L L = t r u e ;
}
i f ( K o l v o P r o b i t M A > = 7 )
{
P r o b o y G o o d B U L L = t r u e ;
}
/ / !'" "+ " / ! !5
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 4 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / + - "!" " ! #' %
i f ( P r o b o y G o o d B U L L = = t r u e )
{
D r a w R i g h t L A B E L ( " # / " / "" , 1 5 , P o z i t i o n Y , c l r L i m e , " !", # / %" ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " # / " / "" , 1 5 , P o z i t i o n Y , c l r Y e l l o w , " " / # / %" ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '/ " ", "+ ! - " ! ,/)% ! % %
i f ( ( V e e r M A B a l l B U L L > V e e r M A B a l l O P T M I N ) & & ( K o e f f Y z k o s t M A < 0 . 2 ) )
{
i f ( V e e r 4 X M A B U L L = = t r u e )
{
T r e n d M A G o o d B U L L = t r u e ;
}
}
i f ( ( V e e r M A B a l l B U L L > 1 1 0 ) & & ( K o e f f Y z k o s t M A < 0 . 2 5 ) )
{
T r e n d M A G o o d B U L L = t r u e ;
}
i f ( ( V e e r M A B a l l B U L L > 7 0 ) & & ( K o e f f Y z k o s t M A < 0 . 2 5 ) & & ( V e e r 4 X M A B U L L = = t r u e ) )
{
T r e n d M A G o o d B U L L = t r u e ;
}
i f ( ( V e e r M A B a l l B U L L > 9 0 ) & & ( K o e f f Y z k o s t M A < 0 . 3 2 ) & & ( V e e r 4 X M A B U L L = = t r u e ) )
{
T r e n d M A G o o d B U L L = t r u e ;
}
i f ( ( V e e r M A B a l l B U L L > 1 2 0 ) & & ( K o e f f Y z k o s t M A < 0 . 4 5 ) & & ( V e e r 4 X M A B U L L = = t r u e ) )
{
T r e n d M A G o o d B U L L = t r u e ;
}
/ / !'" "+ " / ! !6
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 5 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / + - "!" " ! ' " ! ,/)% ! % %
i f ( T r e n d M A G o o d B U L L = = t r u e )
{
D r a w R i g h t L A B E L ( " " " ",/ "" , 1 5 , P o z i t i o n Y , c l r L i m e , " !", " #% %" ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " " " ",/ "" , 1 5 , P o z i t i o n Y , c l r Y e l l o w , " " " #% %" ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'"+ " ' +% ! , " + , + $
N a i d e n T o c h n y S i g n a l = f a l s e ;
/ / !'" "+ " / ! !3
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 2 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !1
/ / ( + ! , #
i f ( ( K o e f f T e l a O n e > 5 . 1 ) & & ( K o e f f O b y e m a > 1 . 8 ) & & ( K r i l o P r o b i t V e r s h i n > 4 ) )
{
i f ( ( V e e r M A B a l l B U L L > 1 6 5 ) & & ( K o e f f Y z k o s t M A < 0 . 2 5 ) & & ( C l o s e [ b ] > L e v e l V e r x n e y M A ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !1 " ) ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !2
/ / ( + ! , #
i f ( ( K o e f f T e l a O n e > 1 . 6 ) & & ( K o e f f O b y e m a > 3 . 0 ) & & ( K r i l o P r o b i t V e r s h i n > 2 5 ) )
{
i f ( ( V e e r M A B a l l B U L L > 1 7 5 ) & & ( K o e f f Y z k o s t M A < 0 . 7 5 ) & & ( C l o s e [ b ] > L e v e l V e r x n e y M A ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !2 " ) ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !3
/ / ( + ! , #
i f ( ( K o e f f T e l a O n e > 3 . 2 ) & & ( K o e f f O b y e m a > 1 . 0 ) & & ( K r i l o P r o b i t V e r s h i n > 1 0 ) )
{
i f ( ( V e e r M A B a l l B U L L > 1 7 5 ) & & ( K o e f f Y z k o s t M A < 0 . 6 5 ) & & ( C l o s e [ b ] > L e v e l V e r x n e y M A ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !3 " ) ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !4
/ / ) / ,(/ !' +% " % # +
i f ( ( K o e f f T e l a O n e > 6 . 0 ) & & ( K o e f f O b y e m a > 2 . 0 ) & & ( K o l v o P r o b i t M A > = 1 ) )
{
i f ( ( D a l n D n a N i z i n y > 2 0 0 ) & & ( D n o N i z i n B a r < ( b + 2 ) ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !4 " ) ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !5
/ / ) / ,(/ !' " ! # % + " # &
i f ( ( K o e f f T e l a O n e > 4 . 8 ) & & ( K o e f f O b y e m a > 2 . 4 ) )
{
i f ( ( D i v e r G o o d B U L L = = t r u e ) & & ( D a l n D n a N i z i n y > 2 5 0 ) )
{
i f ( ( V e e r 4 X M A B U L L = = t r u e ) & & ( K o e f f Y z k o s t M A < 0 . 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !5 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !6
/ / ) / ,(/ !' " ! # % + " # &
i f ( ( K o e f f T e l a O n e > 6 . 4 ) & & ( K o e f f O b y e m a > 1 . 2 ) )
{
i f ( ( D i v e r G o o d B U L L = = t r u e ) & & ( D a l n D n a N i z i n y > 1 5 0 ) )
{
i f ( ( V e e r 4 X M A B U L L = = t r u e ) & & ( K o e f f Y z k o s t M A < 0 . 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !6 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !7
/ / ) / ,(/ !' " ! # % + " # &
i f ( ( K o e f f T e l a O n e > 6 . 4 ) & & ( K o e f f O b y e m a > 2 . 4 ) )
{
i f ( ( D i v e r G o o d B U L L = = t r u e ) & & ( D a l n D n a N i z i n y > 2 5 0 ) )
{
i f ( ( V e e r 4 X M A B U L L = = t r u e ) & & ( K o e f f Y z k o s t M A < 1 . 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !7 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !8
/ / ) / ,(/ !' " ! # % + " # &
i f ( ( K o e f f T e l a O n e > 3 . 2 ) & & ( K o e f f O b y e m a > 3 . 6 ) )
{
i f ( ( D i v e r G o o d B U L L = = t r u e ) & & ( D a l n D n a N i z i n y > 2 5 0 ) )
{
i f ( ( V e e r 4 X M A B U L L = = t r u e ) & & ( K o e f f Y z k o s t M A < 1 . 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !8 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !9
/ / ) / ,(/ !' " ! # % + " # &
i f ( ( K o e f f T e l a O n e > 3 . 6 ) & & ( K o e f f O b y e m a > 3 . 0 ) )
{
i f ( ( D i v e r G o o d B U L L = = t r u e ) & & ( D a l n D n a N i z i n y > 5 0 ) )
{
i f ( ( V e e r 4 X M A B U L L = = t r u e ) & & ( K o e f f Y z k o s t M A < 0 . 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !8 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !1 0
/ / ) / ,(/ !' " ! # % + " # &
i f ( ( K o e f f T e l a O n e > 2 . 4 ) & & ( K o e f f O b y e m a > 2 . 4 ) )
{
i f ( ( D i v e r G o o d B U L L = = t r u e ) & & ( D a l n D n a N i z i n y > 1 5 0 ) )
{
i f ( ( V e e r 4 X M A B U L L = = t r u e ) & & ( K o e f f Y z k o s t M A < 0 . 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !1 0 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !1 1
/ / +% # ! ,/)% ! % ! M A ( + +
i f ( ( K o e f f T e l a O n e > K o e f f T e l a O P T M I N ) & & ( K o e f f O b y e m a > 4 . 5 ) & & ( K r i l o P r o b i t V e r s h i n > K r i l P r o b O P T M I N ) & & ( K o l v o P r o b i t M A > 4 ) )
{
i f ( ( V e e r M A B a l l B U L L > V e e r M A B a l l O P T M I N ) & & ( K o e f f Y z k o s t M A < 0 . 2 ) & & ( D a l n D n a N i z i n y > D a l n R a z v O P T M I N ) & & ( C l o s e [ b ] > L e v e l V e r x n e y M A ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !1 1 " ) ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !1 2
/ / ) / ,(/ !' " % # + " &
i f ( ( K o e f f T e l a O n e > 5 . 4 ) & & ( K o e f f O b y e m a > 3 . 4 ) & & ( K r i l o P r o b i t V e r s h i n > 7 ) )
{
i f ( ( D i v e r G o o d B U L L = = t r u e ) & & ( D a l n D n a N i z i n y > 2 0 0 0 ) )
{
i f ( ( K o l v o M a l o e T e l o > 5 0 0 ) & & ( D n o N i z i n B a r < ( b + 7 ) ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !1 2 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !1 3
/ / / !' " ( ! ,/)% ! % # +
i f ( ( K o e f f T e l a O n e > 5 . 9 ) & & ( K o e f f O b y e m a > 3 . 2 ) & & ( D a l n D n a N i z i n y > 4 5 0 ) )
{
i f ( ( S v e c h a 2 X B U L L = = t r u e ) & & ( K o l v o P r o b V e r x 2 X > 8 0 ) & & ( R a z g o n 2 X B U L L = = t r u e ) )
{
i f ( ( K o l v o P r o b i t M A > 8 ) & & ( K o e f f Y z k o s t M A < 0 . 2 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !1 3 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !1 4
/ / +% # ! ,/)% ! % ! M A ( + +
i f ( ( K o e f f T e l a O n e > K o e f f T e l a O P T M I N ) & & ( K o e f f O b y e m a > 4 . 5 ) & & ( K r i l o P r o b i t V e r s h i n > K r i l P r o b O P T M I N ) & & ( K o l v o P r o b i t M A > 5 ) )
{
i f ( ( V e e r M A B a l l B U L L > V e e r M A B a l l O P T M I N ) & & ( K o e f f Y z k o s t M A < 0 . 3 ) & & ( D a l n D n a N i z i n y > D a l n R a z v O P T M I N ) & & ( C l o s e [ b ] > L e v e l V e r x n e y M A ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !1 4 " ) ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 =5 A@01>B0; =8 >48= 87 B>G=KE A83=0;>2
i f ( N a i d e n T o c h n y S i g n a l = = f a l s e )
{
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r Y e l l o w , " " ' ! " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ! ! !
N a i d e n S i g n O p e n B U L L = f a l s e ;
/ / ! ! " % "/ + " ' + ! " + !#
i f ( ( N a i d e n T o c h n y S i g n a l = = t r u e ) & & ( P e r i o d ( ) > = P E R I O D _ M 1 5 ) )
{
N a i d e n S i g n O p e n B U L L = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" "+ " / ! !2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + S h a g N a d p i s P o V e r t i k a l ;
D r a w R i g h t L A B E L ( " " , 1 5 , P o z i t i o n Y , c l r M a g e n t a , " +',% = " + D o u b l e T o S t r ( N a b r B a l l s B U L L , 0 ) ) ;
/ / ! !"" ' '!" +',% " + !# # #
i f ( ( N a b r B a l l s B U L L > = T y n g u s B a l l O T K R Y T M 1 5 ) & & ( P e r i o d ( ) > = P E R I O D _ M 1 5 ) )
{
N a i d e n S i g n O p e n B U L L = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" "+ " / ! !1
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y ;
/ / + - " ( / !'"# ! # #
i f ( N a i d e n S i g n O p e n B U L L = = t r u e )
{
D r a w R i g h t L A B E L ( " ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " % ( ! # #" ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " ! " , 1 5 , P o z i t i o n Y , c l r O r a n g e , " ! # # "" ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
r e t u r n ( N a b r B a l l s B U L L ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / ! $ &, !'" ,% #' " ! #
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / !" " +"/ ! # ! , - + " / ! " "# #!
/ / )" '!" +% ,%
i n t A n a l i z P r o d a g i T y n g u s k a ( i n t b )
{
d o u b l e S r e d n R a z m T e l a , S r e d n R a z m B a r a , K o e f f T e l a O n e , K o e f f B a r a O n e , S p r e d P u n k t ;
d o u b l e L e v e l V e r x n e y M A , L e v e l N i z n e y M A , R a z m a x V e e r a M A , K o e f f O b y e m a ;
d o u b l e I m p u l s S t r e n g t h , S r e d n y R a z m a x M A , K o e f f Y z k o s t M A , E A B e t t e r D i r e c t ;
i n t V e e r M A B a l l B E A R , K o l v o P r o b N i z i n , K o l v o P r o b i t M A , P o z i t i o n Y ;
i n t K r i l P r o b i t N i z i n , N a b r B a l l s B E A R , B i g T i m e F r a m e , B i g T i m e B a r ;
i n t K o l v o M a l o e T e l o , D a l n P i k a B a r a B , L e v a y a G r a n V e r s h , P i k V e r s h B a r ;
i n t K o l v o P r o b N i z o v 2 X , P r o b i t N i z i n B A R , D a l n P i k a V e r s h i n y , L e v y i P r o b i t B a r ;
i n t K o l v o P r o b M A 2 X , K o l v o P r o b M A 3 X , J a p a n P i k B a r ;
b o o l N a i d e n S i g n O p e n B E A R , N a i d e n T o c h n y S i g n a l , Z a k r P o d V e e r o m , V e e r 4 X M A B E A R ;
b o o l I m p u l s e G o o d B E A R , P r o b o y G o o d B E A R , T r e n d M A G o o d B E A R , R a z v o r o t G o o d B U L L ;
b o o l D i v e r G o o d B E A R , S v e c h a 2 X B E A R , R a z g o n 2 X B E A R , F i b o S e t k a B E A R ;
b o o l S p y s k B E A R 3 X , P r o b o y 5 X L i g h t M A , P r o b o y 6 X L i g h t M A , P r o b o y 7 X L i g h t M A ;
b o o l P r o b o y 8 X L i g h t M A , V i x o d I z F l e t a B E A R , M o l o t B E A R ;
L e v e l V e r x n e y M A = 0 ; L e v e l N i z n e y M A = 0 ; R a z m a x V e e r a M A = 0 ; K o e f f O b y e m a = 0 ;
V e e r M A B a l l B E A R = 0 ; K o l v o P r o b N i z i n = 0 ; K o l v o P r o b i t M A = 0 ; P o z i t i o n Y = 0 ;
K r i l P r o b i t N i z i n = 0 ; I m p u l s S t r e n g t h = 0 ; S r e d n y R a z m a x M A = 0 ; K o e f f Y z k o s t M A = 0 ;
K o l v o M a l o e T e l o = 0 ; D a l n P i k a B a r a B = 0 ; K o e f f B a r a O n e = 0 ; L e v a y a G r a n V e r s h = 0 ;
P i k V e r s h B a r = 0 ; K o l v o P r o b N i z o v 2 X = 0 ; P r o b i t N i z i n B A R = 0 ; D a l n P i k a V e r s h i n y = 0 ;
L e v y i P r o b i t B a r = 0 ; K o l v o P r o b M A 2 X = 0 ; K o l v o P r o b M A 3 X = 0 ; E A B e t t e r D i r e c t = 0 ;
J a p a n P i k B a r = 0 ;
P r o b o y G o o d B E A R = f a l s e ; T r e n d M A G o o d B E A R = f a l s e ; R a z v o r o t G o o d B U L L = f a l s e ;
Z a k r P o d V e e r o m = f a l s e ; I m p u l s e G o o d B E A R = f a l s e ; V e e r 4 X M A B E A R = f a l s e ;
N a i d e n T o c h n y S i g n a l = f a l s e ; D i v e r G o o d B E A R = f a l s e ; F i b o S e t k a B E A R = f a l s e ; M o l o t B E A R = f a l s e ;
S v e c h a 2 X B E A R = f a l s e ; R a z g o n 2 X B E A R = f a l s e ; S p y s k B E A R 3 X = f a l s e ; P r o b o y 5 X L i g h t M A = f a l s e ;
P r o b o y 6 X L i g h t M A = f a l s e ; P r o b o y 7 X L i g h t M A = f a l s e ; P r o b o y 8 X L i g h t M A = f a l s e ; V i x o d I z F l e t a B E A R = f a l s e ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" !# '!" ,% / & '!" !
N a b r B a l l s B E A R = 0 ;
N a i d e n T o c h n y S i g n a l = f a l s e ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '!" $ " !" +% *" + ! #
O b j e c t s D e l e t e A l l ( ) ;
/ / !'" "+ " / ! !1
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y ;
D r a w C e n t r a l L A B E L ( " #!" , P o z i t i o n Y , c l r Y e l l o w G r e e n , " #! " ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" "+ " / ! !1
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y ;
D r a w L e f t L A B E L ( " ."" , P o z i t i o n Y , c l r Y e l l o w , " ." = " + S y m b o l ( ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" "+ " / ! !2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + S h a g N a d p i s P o V e r t i k a l ;
D r a w L e f t L A B E L ( " " $ " , P o z i t i o n Y , c l r Y e l l o w , " " $ = " + D o u b l e T o S t r ( P e r i o d ( ) , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" !"( " $ " !", "#)
B i g T i m e F r a m e = S t a r s h i y T i m e F r a m e ( ) ;
/ / !'" "+ " / ! !2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + S h a g N a d p i s P o V e r t i k a l ;
D r a w C e n t r a l L A B E L ( " !" ( " $ " , P o z i t i o n Y , c l r Y e l l o w , " !" ( " $ = " + D o u b l e T o S t r ( B i g T i m e F r a m e , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" / !" ( " $
B i g T i m e B a r = i B a r S h i f t ( N U L L , B i g T i m e F r a m e , T i m e [ b ] , t r u e ) ;
/ / !'" "+ " / ! !3
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 2 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " !" ( " , P o z i t i o n Y , c l r O r a n g e , " !" ( = " + D o u b l e T o S t r ( B i g T i m e B a r , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / @0AG5B :>5DD8F85=B0 >1J5<0 =0 10@5 ?> >B=>H5=8N : A@54=5<C >1J5<C
K o e f f O b y e m a = 0 ;
K o e f f O b y e m a = R a s c h e t K o e f f V o l u m e T y n g ( b ) ;
/ / !'" "+ " / ! !5
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 4 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " -$$& " * " , P o z i t i o n Y , c l r A q u a , " -$$& " * = " + D o u b l e T o S t r ( K o e f f O b y e m a , 2 ) ) ;
/ / '! -$$& " * "#) / , !'
i f ( K o e f f O b y e m a > K o e f f O b y e m a L I T T L E ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a O b y e m a L I T T L E ; }
i f ( K o e f f O b y e m a > K o e f f O b y e m a M E D I U M ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a O b y e m a M E D I U M ; }
i f ( K o e f f O b y e m a > K o e f f O b y e m a N O R M A L ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a O b y e m a N O R M A L ; }
i f ( K o e f f O b y e m a > K o e f f O b y e m a G I G A N T ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a O b y e m a G I G A N T ; }
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 25;8G8=0 A?@540 2 ?C=:B0E
S p r e d P u n k t = 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 ) ;
S p r e d P u n k t = M a t h R o u n d ( S p r e d P u n k t ) ;
/ / !'" "+ " / ! !3
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 2 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " ! " , P o z i t i o n Y , c l r Y e l l o w , " ! = " + D o u b l e T o S t r ( S p r e d P u n k t , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +'! ! "
S r e d n R a z m T e l a = 0 ;
S r e d n R a z m T e l a = S r e d n i y R a z m e r T e l a P u n k t s ( b ) ;
/ / !'" "+ " / ! !4
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 3 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " ! " " , P o z i t i o n Y , c l r Y e l l o w , " ! " = " + D o u b l e T o S t r ( S r e d n R a z m T e l a , 2 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +'! !
S r e d n R a z m B a r a = S r e d n i y R a z m e r B a r a P u n k t s ( b ) ;
/ / !'" "+ " / ! !5
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 4 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " ! " , P o z i t i o n Y , c l r Y e l l o w , " ! = " + D o u b l e T o S t r ( S r e d n R a z m B a r a , 2 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / / ,/ !'
S v e c h a 2 X B E A R = f a l s e ;
S v e c h a 2 X B E A R = D v o i n a y a S v e c h a B E A R ( S r e d n R a z m T e l a , b ) ;
/ / !'" "+ " / ! !1 1
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 0 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( S v e c h a 2 X B E A R = = t r u e )
{
D r a w L e f t L A B E L ( " / !'" , P o z i t i o n Y , c l r L i m e G r e e n , " / ,/ !'" ) ;
}
e l s e
{
D r a w L e f t L A B E L ( " / !'" , P o z i t i o n Y , c l r Y e l l o w , " !' "" ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ?>8A: ;52>3> :@0O ( + F5= - A;>6=K9 20@80=B, GB>1K @072>@>B 1K;
L e v a y a G r a n V e r s h = R a s c h e t L e v g r V e r s h i n G O O D ( S r e d n R a z m T e l a , b ) ;
/ / 5A;8 ;520O 3@0=8F0 =0945=0 8 5ABL <8=. :>;- 2> 2=CB@5==8E 10@>2
i f ( L e v a y a G r a n V e r s h > b )
{
N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a B a l l s G R A N I C A ;
/ / !'" "+ " / ! !1 2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 1 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " / &" , P o z i t i o n Y , c l r L i m e , " & ( + " ) ;
/ / ", / / ! " &+ ( +
O b j e c t D e l e t e ( " L e v a y a G r a n V e r s h L i n e " ) ;
O b j e c t C r e a t e ( " L e v a y a G r a n V e r s h L i n e " , O B J _ V L I N E , 0 , T i m e [ ( L e v a y a G r a n V e r s h + 1 ) ] , 0 ) ;
O b j e c t S e t ( " L e v a y a G r a n V e r s h L i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
O b j e c t S e t ( " L e v a y a G r a n V e r s h L i n e " , O B J P R O P _ C O L O R , c l r Y e l l o w ) ;
/ / ?>8A: 10@0 - ?8:0 25@H8=K
P i k V e r s h B a r = 0 ;
P i k V e r s h B a r = P o i s k B a r a P i k a V e r s h i n ( L e v a y a G r a n V e r s h , b ) ;
/ / 3>@87=>B0;L=0O ;8=8O ?> C@>2=N ?8:0 25@H8=K
O b j e c t D e l e t e ( " P i k V e r s h i n y L e v e l L i n e " ) ;
O b j e c t C r e a t e ( " P i k V e r s h i n y L e v e l L i n e " , O B J _ H L I N E , 0 , T i m e [ P i k V e r s h B a r ] , H i g h [ P i k V e r s h B a r ] ) ;
O b j e c t S e t ( " P i k V e r s h i n y L e v e l L i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
O b j e c t S e t ( " P i k V e r s h i n y L e v e l L i n e " , O B J P R O P _ C O L O R , c l r C r i m s o n ) ;
}
e l s e
{
/ / !'" "+ " / ! !1 2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 1 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " / &" , P o z i t i o n Y , c l r Y e l l o w , " / & " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / -$$& " " "#) / , !'
K o e f f T e l a O n e = 0 ;
K o e f f T e l a O n e = K o e f f T e l a S v e c h i B E A R ( S r e d n R a z m T e l a , b ) ;
/ / '! -$$& " " "#) / , !'
i f ( K o e f f T e l a O n e > K o e f f T e l a L I T T L E ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a T e l a L I T T L E ; }
i f ( K o e f f T e l a O n e > K o e f f T e l a M E D I U M ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a T e l a M E D I U M ; }
i f ( K o e f f T e l a O n e > K o e f f T e l a N O R M A L ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a T e l a N O R M A L ; }
i f ( K o e f f T e l a O n e > K o e f f T e l a G I G A N T ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a T e l a G I G A N T ; }
/ / + - "!" " ! ' -$$& " " !'
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 3 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " -$$& " "" , P o z i t i o n Y , c l r C r i m s o n , " -$$& " " = " + D o u b l e T o S t r ( K o e f f T e l a O n e , 2 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" ,% 1 2 ! ,/)% ! %
V e e r M A B a l l B E A R = 0 ;
V e e r M A B a l l B E A R = R a s c h e t B a l l o v V e e r a M A B E A R ( b ) ;
/ / '! , + 1 2 ! ,/)% ! %
i f ( V e e r M A B a l l B E A R > B a l l V e e r M A L i t t l e ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + 3 ; }
i f ( V e e r M A B a l l B E A R > B a l l V e e r M A M e d i u m ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + 3 ; }
i f ( V e e r M A B a l l B E A R > B a l l V e e r M A L a r g e ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + 3 ; }
i f ( V e e r M A B a l l B E A R > B a l l V e e r M A H u g e ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + 8 ; }
i f ( V e e r M A B a l l B E A R > B a l l V e e r M A S u p e r ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + 8 ; }
i f ( V e e r M A B a l l B E A R > B a l l V e e r M A G i g a n t ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + B a l l V e e r M A G i g a n t ; }
i f ( V e e r M A B a l l B E A R > B a l l V e e r M A E x c e l l ) { N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a B a l l E X C E L L ; }
/ / !'" "+ " / ! !8
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 7 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / + - "!" " ! ' '!" 1 2
i f ( V e e r M A B a l l B E A R > B a l l V e e r M A H u g e )
{
D r a w R i g h t L A B E L ( " + " , 1 5 , P o z i t i o n Y , c l r L i m e , " ,% = " + D o u b l e T o S t r ( V e e r M A B a l l B E A R , 0 ) ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " + " , 1 5 , P o z i t i o n Y , c l r O r a n g e , " ,% = " + D o u b l e T o S t r ( V e e r M A B a l l B E A R , 0 ) ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" % 1 2 ! ,/)% ! % # "%
R a z m a x V e e r a M A = 0 ;
R a z m a x V e e r a M A = R a s c h e t R a z m a x a V e e r a 1 2 M A ( b ) ;
/ / !'" "+ " / ! !8
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 7 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " % " , P o z i t i o n Y , c l r Y e l l o w , " % # "+ = " + D o u b l e T o S t r ( R a z m a x V e e r a M A , 0 ) ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / !'" ! % 1 2 ! ,/)% ! % # "%
S r e d n y R a z m a x M A = 0 ;
i f ( P e r i o d ( ) = = P E R I O D _ M 1 5 )
{
S r e d n y R a z m a x M A = X r a n e n i e R a z m a x a V e e r a 1 5 M I N ;
}
i f ( P e r i o d ( ) = = P E R I O D _ M 5 )
{
S r e d n y R a z m a x M A = Z n a c h S r e d n R a z m a x V e e r a 5 M I N ;
}
i f ( P e r i o d ( ) = = P E R I O D _ M 1 )
{
S r e d n y R a z m a x M A = Z n a c h S r e d n R a z m V e e r a O n e M I N ;
}
/ / !'" "+ " / ! !9
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 8 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " ! % " , P o z i t i o n Y , c l r Y e l l o w , " ! % # "+ = " + D o u b l e T o S t r ( S r e d n y R a z m a x M A , 0 ) ) ;
/ / - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/ / !'" -$$& " # !" 1 2 ! ,/)% ! %
K o e f f Y z k o s t M A = 0 ;
/ / =0 =>;L 45;8BL =5;L7O
i f ( S r e d n y R a z m a x M A > 0 )
{
K o e f f Y z k o s t M A = R a z m a x V e e r a M A / S r e d n y R a z m a x M A ;
K o e f f Y z k o s t M A = N o r m a l i z e D o u b l e ( K o e f f Y z k o s t M A , 2 ) ;
}
e l s e
{
K o e f f Y z k o s t M A = 1 . 5 ;
}
/ / !'" "+ " / ! !9
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 8 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / + - "!" " ! ' '!" 1 2
i f ( K o e f f Y z k o s t M A < K o e f f Y z k o s t i O P T I T M A X )
{
/ / '! # !", , 1 2 ! ,/)% ! %
N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a B a l l o v Y z k o s t V e e r a M A ;
D r a w R i g h t L A B E L ( " -$$& " # !" " , 1 5 , P o z i t i o n Y , c l r A q u a , " -$$. # !" = " + D o u b l e T o S t r ( K o e f f Y z k o s t M A , 2 ) ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " -$$& " # !" " , 1 5 , P o z i t i o n Y , c l r Y e l l o w , " -$$. # !" = " + D o u b l e T o S t r ( K o e f f Y z k o s t M A , 2 ) ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
L e v e l V e r x n e y M A = 0 ;
L e v e l V e r x n e y M A = R a s c h e t L e v e l V e r x n e y 1 2 M A ( b ) ;
/ / !'" "+ " / ! !6
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 5 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " # , % " , P o z i t i o n Y , c l r Y e l l o w , " # , % = " + D o u b l e T o S t r ( L e v e l V e r x n e y M A , D i g i t s ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
L e v e l N i z n e y M A = 0 ;
L e v e l N i z n e y M A = R a s c h e t L e v e l N i z n e y 1 2 M A ( b ) ;
/ / !'" "+ " / ! !7
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 6 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " # , " , P o z i t i o n Y , c l r Y e l l o w , " # , = " + D o u b l e T o S t r ( L e v e l N i z n e y M A , D i g i t s ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '/ , , 4 % "/+%
V e e r 4 X M A B E A R = f a l s e ;
V e e r 4 X M A B E A R = P r o v e r k a V e e r 4 X M A B i g B E A R ( b ) ;
/ / !'" "+ " / ! !1 1
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 0 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( V e e r 4 X M A B E A R = = t r u e )
{
D r a w R i g h t L A B E L ( " 4 % "/+% " , 1 5 , P o z i t i o n Y , c l r L i m e , " 4 % "/+% " ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " 4 % "/+% " , 1 5 , P o z i t i o n Y , c l r O r a n g e , " 4 % "/+% "" ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / >;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E , A25G59 "#) $
K o l v o P r o b i t M A = 0 ;
K o l v o P r o b i t M A = R a s c h e t P r o b i t M A O n e B E A R ( b ) ;
/ / !'" "+ " / ! !1 0
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 9 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w R i g h t L A B E L ( " " ! % " , 1 5 , P o z i t i o n Y , c l r A q u a m a r i n e , " " ! % = " + D o u b l e T o S t r ( K o l v o P r o b i t M A , 0 ) ) ;
/ / =0G8A;O5< 10;;K ?@8 =0;8G88 ?@028;L=>3> 255@0 87 4 E BO65;KE A 2KE>4>< 87 255@0
i f ( ( C l o s e [ b ] < L e v e l N i z n e y M A ) & & ( V e e r 4 X M A B E A R = = t r u e ) )
{
i f ( K o l v o P r o b i t M A > = K o l P r o b M A O n e M I N )
{
N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a B a l l P r o b O n e M A ;
D r a w R i g h t L A B E L ( " " ! % " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ! % = " + D o u b l e T o S t r ( K o l v o P r o b i t M A , 0 ) ) ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" "+ " / ! !3
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 2 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! ! = " ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / @0AG5B A8;K 8<?C;LA0
I m p u l s S t r e n g t h = 0 ;
I m p u l s S t r e n g t h = R a s c h e t I m p u l s S t r e n g t h ( K o e f f O b y e m a , S r e d n R a z m T e l a , b ) ;
/ / !'" "+ " / ! !6
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 5 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " ! #,!" , P o z i t i o n Y , c l r M a g e n t a , " ! #,! = " + D o u b l e T o S t r ( I m p u l s S t r e n g t h , 2 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" '!" +% !', " + + ! " "#) !'
K o l v o M a l o e T e l o = 0 ;
K o l v o M a l o e T e l o = K o l v o L i t t l e C a n d e l s L e f t ( b ) ;
/ / !'" "+ " / ! !7
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 6 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " '!" +% !'" , P o z i t i o n Y , c l r O r a n g e , " +% !' ! = " + D o u b l e T o S t r ( K o l v o M a l o e T e l o , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" , !" ( + "#) /
D a l n P i k a B a r a B = 0 ;
D a l n P i k a B a r a B = S l e v a T e l o S v e c h O t V e r s h i n y ( b ) ;
/ / !'" "+ " / ! !8
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 7 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " , !", "#) " , P o z i t i o n Y , c l r O r a n g e , " , !", = " + D o u b l e T o S t r ( D a l n P i k a B a r a B , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / , !", ( + &
D a l n P i k a V e r s h i n y = 0 ;
/ / ! / & ( +
i f ( ( L e v a y a G r a n V e r s h > b ) & & ( P i k V e r s h B a r > 0 ) )
{
D a l n P i k a V e r s h i n y = S l e v a T e l o S v e c h O t V e r s h i n y ( P i k V e r s h B a r ) ;
}
/ / !'" "+ " / ! !9
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 8 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w C e n t r a l L A B E L ( " , !", $# + "" , P o z i t i o n Y , c l r O r a n g e , " , !", ( + = " + D o u b l e T o S t r ( D a l n P i k a V e r s h i n y , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / #% ! % !'%
R a z g o n 2 X B E A R = f a l s e ;
R a z g o n 2 X B E A R = R a z g o n 2 X C h e c k B E A R ( b ) ;
/ / !'" "+ " / ! !1 0
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 9 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( R a z g o n 2 X B E A R = = t r u e )
{
D r a w C e n t r a l L A B E L ( " #% !'%" , P o z i t i o n Y , c l r L i m e , " #% !'%" ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " #% !'%" , P o z i t i o n Y , c l r O r a n g e , " " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ! #! ! % " % !'% ! " !" / *
S p y s k B E A R 3 X = f a l s e ;
S p y s k B E A R 3 X = S p y s k V n i z V o l u m e B E A R 3 X ( b ) ;
/ / !'" "+ " / ! !1 1
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 0 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( S p y s k B E A R 3 X = = t r u e )
{
D r a w C e n t r a l L A B E L ( " ! #! " % !'%" , P o z i t i o n Y , c l r L i m e , " ! #! " % !'%" ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " ! #! " % !'%" , P o z i t i o n Y , c l r O r a n g e , " ! #! " % " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +'! / ! ! " # ""
E A B e t t e r D i r e c t = 0 ;
E A B e t t e r D i r e c t = D i r e c t B E T T E R ( N a s t r B e t t e r W a r p , N a s t r B e t t e r D e v i a t , N a s t r B e t t e r A m p l i t , N a s t r B e t t e r D i s t o r , b ) ;
E A B e t t e r D i r e c t = N o r m a l i z e D o u b l e ( E A B e t t e r D i r e c t , 3 ) ;
/ / !'" "+ " / ! !1 6
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 5 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / 4>102;O5< 10;;K : ?>78F88 !
i f ( ( E A B e t t e r D i r e c t < 0 ) & & ( M a t h A b s ( E A B e t t e r D i r e c t ) > B e t t e r N a p r a v A B C M i n ) )
{
N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a B a l l B e t t e r ;
D r a w C e n t r a l L A B E L ( " E A B e t t e r D i r e c t i o n " , P o z i t i o n Y , c l r M a g e n t a , " E A B e t t e r D i r e c t i o n = " + D o u b l e T o S t r ( E A B e t t e r D i r e c t , 3 ) ) ;
}
/ / >B=8<05< 10;;K >B ?>78F88 !
i f ( ( E A B e t t e r D i r e c t > 0 ) & & ( M a t h A b s ( E A B e t t e r D i r e c t ) > B e t t e r N a p r a v A B C M i n ) )
{
N a b r B a l l s B E A R = N a b r B a l l s B E A R - D o b a v k a B a l l B e t t e r ;
D r a w C e n t r a l L A B E L ( " E A B e t t e r D i r e c t i o n " , P o z i t i o n Y , c l r A q u a , " E A B e t t e r D i r e c t i o n = " + D o u b l e T o S t r ( E A B e t t e r D i r e c t , 3 ) ) ;
}
i f ( M a t h A b s ( E A B e t t e r D i r e c t ) < = B e t t e r N a p r a v A B C M i n )
{
D r a w C e n t r a l L A B E L ( " E A B e t t e r D i r e c t i o n " , P o z i t i o n Y , c l r O r a n g e , " E A B e t t e r D i r e c t i o n = " + D o u b l e T o S t r ( E A B e t t e r D i r e c t , 3 ) ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
V i x o d I z F l e t a B E A R = f a l s e ;
V i x o d I z F l e t a B E A R = P r o b o y Y z k o g o F l e t a B E A R ( S r e d n R a z m T e l a , b ) ;
/ / !'" "+ " / ! !1 7
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 6 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( V i x o d I z F l e t a B E A R = = t r u e )
{
N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v B a l l P r o b o y F L E T A ;
D r a w C e n t r a l L A B E L ( " # $"" , P o z i t i o n Y , c l r M a g e n t a , " &+ $"" ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " # $"" , P o z i t i o n Y , c l r O r a n g e , " / &+ $" " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 8 - % " #
P r o b o y 8 X L i g h t M A = f a l s e ;
P r o b o y 8 X L i g h t M A = P r o b o y E i g h t L i g h t M A T r e n d B E A R ( b , S v e c h a 2 X B E A R ) ;
/ / !'" "+ " / ! !1 5
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 4 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( P r o b o y 8 X L i g h t M A = = t r u e )
{
D r a w C e n t r a l L A B E L ( " 8 - % " , P o z i t i o n Y , c l r L i m e , " 8 - % " ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " 8 - % " , P o z i t i o n Y , c l r O r a n g e , " / 8 - % " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 7 - % " #
P r o b o y 7 X L i g h t M A = f a l s e ;
P r o b o y 7 X L i g h t M A = P r o b o y S e v e n L i g h t M A T r e n d B E A R ( b , S v e c h a 2 X B E A R ) ;
/ / !'" "+ " / ! !1 4
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 3 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( P r o b o y 7 X L i g h t M A = = t r u e )
{
D r a w C e n t r a l L A B E L ( " 7 - % " , P o z i t i o n Y , c l r L i m e , " 7 - % " ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " 7 - % " , P o z i t i o n Y , c l r O r a n g e , " / 7 - % " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 6 - " % " #
P r o b o y 6 X L i g h t M A = f a l s e ;
P r o b o y 6 X L i g h t M A = P r o b o y S i x L i g h t M A T r e n d B E A R ( b , S v e c h a 2 X B E A R ) ;
/ / !'" "+ " / ! !1 3
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 2 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( P r o b o y 6 X L i g h t M A = = t r u e )
{
N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a B a l l s P r o b 6 X M A ;
D r a w C e n t r a l L A B E L ( " 6 - " % " , P o z i t i o n Y , c l r L i m e , " 6 - " % " ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " 6 - " % " , P o z i t i o n Y , c l r O r a n g e , " / 6 - " % " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5 - " % " #
P r o b o y 5 X L i g h t M A = f a l s e ;
P r o b o y 5 X L i g h t M A = P r o b o y F i v e L i g h t M A T r e n d B E A R ( b , S v e c h a 2 X B E A R ) ;
/ / !'" "+ " / ! !1 2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 1 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( ( P r o b o y 6 X L i g h t M A = = f a l s e ) & & ( P r o b o y 5 X L i g h t M A = = t r u e ) )
{
N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a B a l l s P r o b 5 X M A ;
D r a w C e n t r a l L A B E L ( " 5 - " % " , P o z i t i o n Y , c l r L i m e , " 5 - " % " ) ;
}
e l s e
{
D r a w C e n t r a l L A B E L ( " 5 - " % " , P o z i t i o n Y , c l r O r a n g e , " / 5 - " % " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" -$$& " "#) ! # #
K o e f f B a r a O n e = 0 ;
K o e f f B a r a O n e = K o e f f R a z m e r a B a r a B ( S r e d n R a z m B a r a , b ) ;
/ / !'" "+ " / ! !1 0
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 9 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " -$$. " , P o z i t i o n Y , c l r Y e l l o w , " -$$. = " + D o u b l e T o S t r ( K o e f f B a r a O n e , 2 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / +'! '!" + "+% , !'
K o l v o P r o b N i z i n = 0 ;
K o l v o P r o b N i z i n = R a s c h e t P r o b i t N i z i n O n e ( b ) ;
/ / !'" "+ " / ! !1 2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 1 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w R i g h t L A B E L ( " " ' !'" , 1 5 , P o z i t i o n Y , c l r O r a n g e , " - "+% = " + D o u b l e T o S t r ( K o l v o P r o b N i z i n , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '!" "+% , !'
K o l v o P r o b N i z o v 2 X = 0 ;
i f ( S v e c h a 2 X B E A R = = t r u e )
{
K o l v o P r o b N i z o v 2 X = R a s c h e t P r o b i t N i z i n T W O ( b ) ;
}
/ / !'" "+ " / ! !1 3
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 2 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " " !'" , P o z i t i o n Y , c l r Y e l l o w , " " !' 2 % = " + D o u b l e T o S t r ( K o l v o P r o b N i z o v 2 X , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / >;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E , A25G59
K o l v o P r o b M A 2 X = 0 ;
K o l v o P r o b M A 2 X = K o l v o P r o b M A S v e c h a 2 X B E A R ( b ) ;
/ / !'" "+ " / ! !1 4
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 3 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " " ! % !' 2 %" , P o z i t i o n Y , c l r Y e l l o w , " " ! % !' 2 % = " + D o u b l e T o S t r ( K o l v o P r o b M A 2 X , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / >;8G5AB2> ?@>18BKE A:>;L7OI8E A@54=8E " , A25G59
K o l v o P r o b M A 3 X = 0 ;
K o l v o P r o b M A 3 X = K o l v o P r o b i t M A C a n d l e T h r e e B E A R ( b ) ;
/ / !'" "+ " / ! !1 5
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 4 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " " ! % !' 3 %" , P o z i t i o n Y , c l r Y e l l o w , " " ! % !' 3 % = " + D o u b l e T o S t r ( K o l v o P r o b M A 3 X , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" "+ " / ! !1 6
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 5 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w L e f t L A B E L ( " % ) ! % " , P o z i t i o n Y , c l r C r i m s o n , " ! % . ! . % 1 5 # "+ = " + D o u b l e T o S t r ( X r a n e n i e R a z m a x a V e e r a 1 5 M I N , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '/ , " ( /
M o l o t B E A R = f a l s e ;
/ / !'" "+ " / ! !1 7
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 6 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / 5A;8 5ABL ?@>1>9 >4=>9 , A25G59 =0 10@5
i f ( ( K o l v o P r o b N i z i n > 0 ) | | ( D a l n P i k a B a r a B > D a l n o s t P I K A J a p a n M I N ) )
{
/ / A0<K9 ;52K9 10@, :>B>@>3> ?@>18205BAO B5;>< A25G8 10@0
L e v y i P r o b i t B a r = b + K o l v o P r o b N i z i n ;
/ / ?8: 25@H8=K ?@>1>O - 10@ 345 ?@>25@O5< =0;8G85 O?>=A:>3> " <>;>B0"
J a p a n P i k B a r = i H i g h e s t ( N U L L , 0 , M O D E _ H I G H , ( K o l v o P r o b N i z i n + 1 ) , b ) ;
/ / ?@>25@O5< =0;8G85 , <>;>B0 =0 A0<>< +! 10@5
M o l o t B E A R = M o l o t B e a r N e w ( S r e d n R a z m B a r a , J a p a n P i k B a r ) ;
/ / & + !
i f ( M o l o t B E A R = = t r u e )
{
N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a B a l l o v M O L O T ;
D r a w L e f t L A B E L ( " " /" , P o z i t i o n Y , c l r L i m e , " " /" ) ;
}
}
i f ( M o l o t B E A R = = f a l s e )
{
D r a w L e f t L A B E L ( " " /" , P o z i t i o n Y , c l r O r a n g e , " , " " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" ,% 1 2 ! ,/)% ! %
V e e r M A B a l l B E A R = 0 ;
V e e r M A B a l l B E A R = R a s c h e t B a l l o v V e e r a M A B E A R ( b ) ;
/ / !'" "+ " / ! !8
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 7 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w R i g h t L A B E L ( " + " , 1 5 , P o z i t i o n Y , c l r O r a n g e , " ,% = " + D o u b l e T o S t r ( V e e r M A B a l l B E A R , 0 ) ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '/ , & /
D i v e r G o o d B E A R = f a l s e ;
D i v e r G o o d B E A R = D i v e r B e a r O X O T N I K 7 7 7 ( S r e d n R a z m T e l a , b ) ;
/ / !'" "+ " / ! !1 3
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 2 * S h a g N a d p i s P o V e r t i k a l ) ;
i f ( D i v e r G o o d B E A R = = t r u e )
{
N a b r B a l l s B E A R = N a b r B a l l s B E A R + D i v e r L i n e A d d B a l l s ;
D r a w R i g h t L A B E L ( " &/" , 1 5 , P o z i t i o n Y , c l r L i m e , " !", ,/ &/" ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " &/" , 1 5 , P o z i t i o n Y , c l r O r a n g e , " , & "" ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / - " + !
P r o b i t N i z i n B A R = 0 ;
P r o b i t N i z i n B A R = P o i s k P r o b i t N i z i n y ( b ) ;
/ / !'" "+ " / ! !1 4
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 3 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w R i g h t L A B E L ( " "+ !" , 1 5 , P o z i t i o n Y , c l r O r a n g e , " " + = " + D o u b l e T o S t r ( P r o b i t N i z i n B A R , 0 ) ) ;
/ / H8@8=0 :@K;0 ?@>18B>9 =878=K
K r i l P r o b i t N i z i n = R a z m e r K r i l a N i z a K n i g h t ( P r o b i t N i z i n B A R , b ) ;
/ / =0G8A;5=85 10;;>2 70 ?@>1>9 C@>2=O
i f ( K r i l P r o b i t N i z i n > = S h i r i n K r i l P r o b i t L E V E L )
{
N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v B a l l s P r o b o y L E V E L ;
}
/ / !'" "+ " / ! !1 5
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 4 * S h a g N a d p i s P o V e r t i k a l ) ;
D r a w R i g h t L A B E L ( " ( + /" , 1 5 , P o z i t i o n Y , c l r L i m e , " ( + " + = " + D o u b l e T o S t r ( K r i l P r o b i t N i z i n , 0 ) ) ;
i f ( ( P r o b i t N i z i n B A R > b ) & & ( K r i l P r o b i t N i z i n > 1 ) )
{
/ / 3>@87>=B0;L=0O ;8=8O ?> C@>2=N <8=8<C<0 ?@>18B>9 =878=K
O b j e c t C r e a t e ( " P r o b N i z L e v e l L i n e " , O B J _ H L I N E , 0 , T i m e [ P r o b i t N i z i n B A R ] , L o w [ P r o b i t N i z i n B A R ] ) ;
O b j e c t S e t ( " P r o b N i z L e v e l L i n e " , O B J P R O P _ S T Y L E , S T Y L E _ D A S H ) ;
O b j e c t S e t ( " P r o b N i z L e v e l L i n e " , O B J P R O P _ C O L O R , c l r L i m e ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '/ !'" # !" , $ !"
F i b o S e t k a B E A R = f a l s e ;
F i b o S e t k a B E A R = F i b o S e t k a B e a r O x o t n i k C H E C K ( S r e d n R a z m T e l a , b ) ;
/ / !'" "+ " / ! !1 6
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 1 5 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / '! '!" #. ,. $ !"#
i f ( F i b o S e t k a B E A R = = t r u e )
{
N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a B a l l o v F I B O ;
D r a w R i g h t L A B E L ( " $ !"" , 1 5 , P o z i t i o n Y , c l r L i m e , " ,/ $ !" !" " ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " $ !"" , 1 5 , P o z i t i o n Y , c l r O r a n g e , " ,/ $ !" " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ! " ,(/ !' " * , '" !", # + "+
i f ( ( K o e f f T e l a O n e > K o e f f T e l a R A S X V M I N ) & & ( K o e f f O b y e m a < K o e f f V o l u m e L I T M A X ) )
{
N a b r B a l l s B E A R = N a b r B a l l s B E A R + D o b a v k a B a l l R A S X O B Y E M ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '/ "+ ! - % ( #,!
i f ( ( K o e f f T e l a O n e > 5 . 2 ) & & ( K o e f f O b y e m a > 2 . 2 ) & & ( K o l v o M a l o e T e l o > 1 4 0 ) )
{
I m p u l s e G o o d B E A R = t r u e ;
}
i f ( ( K o e f f T e l a O n e > 3 . 0 ) & & ( K o l v o P r o b i t M A > = 8 ) )
{
I m p u l s e G o o d B E A R = t r u e ;
}
/ / !'" "+ " / ! !4
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 3 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / + - "!" " ! ' % ( #,!
i f ( I m p u l s e G o o d B E A R = = t r u e )
{
D r a w R i g h t L A B E L ( " % ( #,! / "" , 1 5 , P o z i t i o n Y , c l r L i m e , " !", % ( #,! " ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " % ( #,! / "" , 1 5 , P o z i t i o n Y , c l r Y e l l o w , " " % ( #,! " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '/ " "+ ! - / + #'
i f ( ( K o l v o P r o b i t M A > = 5 ) & & ( C l o s e [ b ] < L e v e l N i z n e y M A ) )
{
P r o b o y G o o d B E A R = t r u e ;
}
i f ( K o l v o P r o b i t M A > = 7 )
{
P r o b o y G o o d B E A R = t r u e ;
}
/ / !'" "+ " / ! !5
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 4 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / + - "!" " ! + #'
i f ( P r o b o y G o o d B E A R = = t r u e )
{
D r a w R i g h t L A B E L ( " # / " / "" , 1 5 , P o z i t i o n Y , c l r L i m e , " !", # / " ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " # / " / "" , 1 5 , P o z i t i o n Y , c l r Y e l l o w , " " / # / " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / '/ " ", "+ ! - " ! ,/)% ! %
i f ( ( V e e r M A B a l l B E A R > V e e r M A B a l l O P T M I N ) & & ( K o e f f Y z k o s t M A < 0 . 2 ) )
{
i f ( V e e r 4 X M A B E A R = = t r u e )
{
T r e n d M A G o o d B E A R = t r u e ;
}
}
i f ( ( V e e r M A B a l l B E A R > 1 1 0 ) & & ( K o e f f Y z k o s t M A < 0 . 2 5 ) )
{
T r e n d M A G o o d B E A R = t r u e ;
}
i f ( ( V e e r M A B a l l B E A R > 7 0 ) & & ( K o e f f Y z k o s t M A < 0 . 2 5 ) & & ( V e e r 4 X M A B E A R = = t r u e ) )
{
T r e n d M A G o o d B E A R = t r u e ;
}
i f ( ( V e e r M A B a l l B E A R > 9 0 ) & & ( K o e f f Y z k o s t M A < 0 . 3 2 ) & & ( V e e r 4 X M A B E A R = = t r u e ) )
{
T r e n d M A G o o d B E A R = t r u e ;
}
i f ( ( V e e r M A B a l l B E A R > 1 2 0 ) & & ( K o e f f Y z k o s t M A < 0 . 4 5 ) & & ( V e e r 4 X M A B E A R = = t r u e ) )
{
T r e n d M A G o o d B E A R = t r u e ;
}
/ / !'" "+ " / ! !6
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 5 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / + - "!" " ! ' " ! ,/)% ! %
i f ( T r e n d M A G o o d B E A R = = t r u e )
{
D r a w R i g h t L A B E L ( " " " ",/ "" , 1 5 , P o z i t i o n Y , c l r L i m e , " !", " #% " ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " " " ",/ "" , 1 5 , P o z i t i o n Y , c l r Y e l l o w , " " " #% " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'"+ " ' +% ! , " + , + $
N a i d e n T o c h n y S i g n a l = f a l s e ;
/ / !'" "+ " / ! !3
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + ( 2 * S h a g N a d p i s P o V e r t i k a l ) ;
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !1
/ / + ! , #
i f ( ( K o e f f T e l a O n e > 5 . 1 ) & & ( K o e f f O b y e m a > 1 . 8 ) & & ( K r i l P r o b i t N i z i n > 4 ) )
{
i f ( ( V e e r M A B a l l B E A R > 1 6 5 ) & & ( K o e f f Y z k o s t M A < 0 . 2 5 ) & & ( C l o s e [ b ] < L e v e l N i z n e y M A ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !1 " ) ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !2
/ / + ! , #
i f ( ( K o e f f T e l a O n e > 1 . 6 ) & & ( K o e f f O b y e m a > 3 . 0 ) & & ( K r i l P r o b i t N i z i n > 2 5 ) )
{
i f ( ( V e e r M A B a l l B E A R > 1 7 5 ) & & ( K o e f f Y z k o s t M A < 0 . 7 5 ) & & ( C l o s e [ b ] < L e v e l N i z n e y M A ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !2 " ) ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !3
/ / + ! , #
i f ( ( K o e f f T e l a O n e > 3 . 2 ) & & ( K o e f f O b y e m a > 1 . 0 ) & & ( K r i l P r o b i t N i z i n > 1 0 ) )
{
i f ( ( V e e r M A B a l l B E A R > 1 7 5 ) & & ( K o e f f Y z k o s t M A < 0 . 6 5 ) & & ( C l o s e [ b ] < L e v e l N i z n e y M A ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !3 " ) ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !4
/ / ) / ,(/ !' +% " ! # ( +
i f ( ( K o e f f T e l a O n e > 6 . 0 ) & & ( K o e f f O b y e m a > 2 . 0 ) & & ( K o l v o P r o b i t M A > = 1 ) )
{
i f ( ( D a l n P i k a V e r s h i n y > 2 0 0 ) & & ( P i k V e r s h B a r < ( b + 2 ) ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !4 " ) ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !5
/ / ) / ,(/ !' " ! +! ( + " # &
i f ( ( K o e f f T e l a O n e > 4 . 8 ) & & ( K o e f f O b y e m a > 2 . 4 ) )
{
i f ( ( D i v e r G o o d B E A R = = t r u e ) & & ( D a l n P i k a V e r s h i n y > 2 5 0 ) )
{
i f ( ( V e e r 4 X M A B E A R = = t r u e ) & & ( K o e f f Y z k o s t M A < 0 . 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !5 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !7
/ / ) / ,(/ !' " ! +! ( + " # &
i f ( ( K o e f f T e l a O n e > 6 . 4 ) & & ( K o e f f O b y e m a > 2 . 4 ) )
{
i f ( ( D i v e r G o o d B E A R = = t r u e ) & & ( D a l n P i k a V e r s h i n y > 2 5 0 ) )
{
i f ( ( V e e r 4 X M A B E A R = = t r u e ) & & ( K o e f f Y z k o s t M A < 1 . 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !7 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !8
/ / ) / ,(/ !' " ! +! ( + " # &
i f ( ( K o e f f T e l a O n e > 3 . 2 ) & & ( K o e f f O b y e m a > 3 . 6 ) )
{
i f ( ( D i v e r G o o d B E A R = = t r u e ) & & ( D a l n P i k a V e r s h i n y > 2 5 0 ) )
{
i f ( ( V e e r 4 X M A B E A R = = t r u e ) & & ( K o e f f Y z k o s t M A < 1 . 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !8 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !9
/ / ) / ,(/ !' " ! +! ( + " # &
i f ( ( K o e f f T e l a O n e > 3 . 6 ) & & ( K o e f f O b y e m a > 3 . 0 ) )
{
i f ( ( D i v e r G o o d B E A R = = t r u e ) & & ( D a l n P i k a V e r s h i n y > 5 0 ) )
{
i f ( ( V e e r 4 X M A B E A R = = t r u e ) & & ( K o e f f Y z k o s t M A < 0 . 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !9 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !1 0
/ / ) / ,(/ !' " ! +! ( + " # &
i f ( ( K o e f f T e l a O n e > 2 . 4 ) & & ( K o e f f O b y e m a > 2 . 4 ) )
{
i f ( ( D i v e r G o o d B E A R = = t r u e ) & & ( D a l n P i k a V e r s h i n y > 1 5 0 ) )
{
i f ( ( V e e r 4 X M A B E A R = = t r u e ) & & ( K o e f f Y z k o s t M A < 0 . 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !1 0 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !1 1
/ / +% # ! ,/)% ! % ! M A + ! ( +
i f ( ( K o e f f T e l a O n e > K o e f f T e l a O P T M I N ) & & ( K o e f f O b y e m a > 4 . 5 ) & & ( K r i l P r o b i t N i z i n > K r i l P r o b O P T M I N ) & & ( K o l v o P r o b i t M A > 5 ) )
{
i f ( ( V e e r M A B a l l B E A R > V e e r M A B a l l O P T M I N ) & & ( K o e f f Y z k o s t M A < 0 . 2 ) & & ( D a l n P i k a V e r s h i n y > D a l n R a z v O P T M I N ) & & ( C l o s e [ b ] < L e v e l N i z n e y M A ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !1 1 " ) ;
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !1 2
/ / ) / ,(/ !' " ! +! ( + " &
i f ( ( K o e f f T e l a O n e > 5 . 4 ) & & ( K o e f f O b y e m a > 3 . 4 ) & & ( K r i l P r o b i t N i z i n > 7 ) )
{
i f ( ( D i v e r G o o d B E A R = = t r u e ) & & ( D a l n P i k a V e r s h i n y > 2 0 0 0 ) )
{
i f ( ( K o l v o M a l o e T e l o > 5 0 0 ) & & ( P i k V e r s h B a r < ( b + 7 ) ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !1 2 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !1 3
/ / / !' " ! ,/)% ! % ! +! ( +
i f ( ( K o e f f T e l a O n e > 5 . 9 ) & & ( K o e f f O b y e m a > 3 . 2 ) & & ( D a l n P i k a V e r s h i n y > 4 5 0 ) )
{
i f ( ( S v e c h a 2 X B E A R = = t r u e ) & & ( K o l v o P r o b N i z o v 2 X > 8 0 ) & & ( R a z g o n 2 X B E A R = = t r u e ) )
{
i f ( ( K o l v o P r o b i t M A > 8 ) & & ( K o e f f Y z k o s t M A < 0 . 2 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !1 3 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" " ' ! !1 4
/ / / !' " ! ,/)% ! % ! +! ( +
i f ( ( K o e f f T e l a O n e > 5 . 9 ) & & ( K o e f f O b y e m a > 3 . 2 ) & & ( D a l n P i k a V e r s h i n y > 4 5 0 ) )
{
i f ( ( S v e c h a 2 X B E A R = = t r u e ) & & ( K o l v o P r o b N i z o v 2 X > 8 0 ) & & ( R a z g o n 2 X B E A R = = t r u e ) )
{
i f ( ( K o l v o P r o b i t M A > 8 ) & & ( K o e f f Y z k o s t M A < 0 . 2 5 ) )
{
/ / N a i d e n T o c h n y S i g n a l = t r u e ;
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " " ' + ! !1 4 " ) ;
}
}
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / 5A;8 =5 A@01>B0; =8 >48= 87 B>G=KE A83=0;>2
i f ( N a i d e n T o c h n y S i g n a l = = f a l s e )
{
D r a w R i g h t L A B E L ( " " ' + ! " , 1 5 , P o z i t i o n Y , c l r Y e l l o w , " " ' ! " ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / ! ! !
N a i d e n S i g n O p e n B E A R = f a l s e ;
/ / ! ! " % "/ + " ' + ! " + !#
i f ( ( N a i d e n T o c h n y S i g n a l = = t r u e ) & & ( P e r i o d ( ) = = P E R I O D _ M 1 ) )
{
N a i d e n S i g n O p e n B E A R = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" "+ " / ! !2
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y + S h a g N a d p i s P o V e r t i k a l ;
D r a w R i g h t L A B E L ( " " , 1 5 , P o z i t i o n Y , c l r M a g e n t a , " ,% = " + D o u b l e T o S t r ( N a b r B a l l s B E A R , 0 ) ) ;
/ / ! !"" ' '!" ,% " + !# #
i f ( ( N a b r B a l l s B E A R > = T y n g u s B a l l O T K R Y T M 1 5 ) & & ( P e r i o d ( ) > = P E R I O D _ M 1 5 ) )
{
N a i d e n S i g n O p e n B E A R = t r u e ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / !'" "+ " / ! !1
P o z i t i o n Y = N a c h a l n y S d v i g S v e r x y ;
/ / + - " ( / !'"# ! #
i f ( N a i d e n S i g n O p e n B E A R = = t r u e )
{
D r a w R i g h t L A B E L ( " ! " , 1 5 , P o z i t i o n Y , c l r L i m e , " % ( ! #" ) ;
}
e l s e
{
D r a w R i g h t L A B E L ( " ! " , 1 5 , P o z i t i o n Y , c l r O r a n g e , " ! # "" ) ;
}
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
r e t u r n ( N a b r B a l l s B E A R ) ;
}
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
/ / = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Comments
Markdown Formatting Guide
# H1## H2
### H3
**bold text***italicized text*[title](https://www.example.com)`code````code block
```
> blockquote- Item 1- Item 2
1. First item2. Second item
---