0
Views
0
Downloads
0
Favorites
NLD_Expert
ÿþ/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | N L D _ E x p e r t . m q 5 |
/ / | h t t p : / / w w w . n e l o d i . c o m |
/ / | C o p y r i g h t ( c ) 2 0 1 9 N E L O D I . c o m |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
# p r o p e r t y c o p y r i g h t " 2 0 1 9 © N E L O D I . c o m "
# p r o p e r t y l i n k " h t t p : / / w w w . n e l o d i . c o m "
# p r o p e r t y d e s c r i p t i o n " N E L O D I - E x p e r t "
# p r o p e r t y s t r i c t
# i n c l u d e " N L D _ I n c l u d e . m q h "
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
i n p u t d o u b l e i C o m m i s F o r e x = 0 . 0 6 ; / / F o r e x C o m m i s s i o n ( $ ) { 0 . 0 6 }
i n p u t d o u b l e i C o m m i s S t o c k = 0 . 3 6 ; / / S t o c k C o m m i s s i o n ( $ ) { 0 . 3 6 }
i n p u t b o o l i H e d g i n g A l l o w e d = t r u e ; / / H e d g i n g A l l o w e d ? { t r u e }
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
d o u b l e i M a r g i n S t o p = 0 ; / / L o w M a r g i n L e v e l ( B a l a n c e % ) { 0 }
b o o l i C l o s e O n M a r g i n = f a l s e ; / / C l o s e b e s t o n L o w M a r g i n ? { f a l s e }
b o o l i A l l S y m b o l s = f a l s e ; / / G l o b a l ( A L L S y m b o l s ) ? { f a l s e }
i n t i C h e c k I n t e r v a l = 2 5 0 ; / / C h e c k I n t e r v a l ( m s ) { 2 5 0 }
l o n g l a s t C h e c k T i m e = 0 ;
i n t n e e d C o n t i n u e = 0 , d o n e C o n t i n u e = 0 ;
s t r i n g t o C o n t i n u e [ 1 0 0 ] ;
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
i n t O n I n i t ( v o i d ) {
i f ( i A l l S y m b o l s )
P r e p a r e A c c o u n t ( " " , i C o m m i s F o r e x , i C o m m i s S t o c k , i M a r g i n S t o p ) ;
e l s e
P r e p a r e A c c o u n t ( _ S y m b o l , i C o m m i s F o r e x , i C o m m i s S t o c k , i M a r g i n S t o p ) ;
C l e a r _ E x p e r t D a t a ( ) ;
C h a r t S e t I n t e g e r ( 0 , C H A R T _ S H O W _ D A T E _ S C A L E , f a l s e ) ;
C h a r t S e t I n t e g e r ( 0 , C H A R T _ S H O W _ P R I C E _ S C A L E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ B e s t " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ S e l l " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ B u y " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ S e l l P _ B u y L " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ B u y P _ S e l l L " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ S e l l P r o f i t " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ B u y P r o f i t " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ S e l l L o s s " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ B u y L o s s " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ S e l l T o t a l " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ B u y T o t a l " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ P r o f i t " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ L o s s " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ T o t a l " , O B J P R O P _ Z O R D E R , 1 0 0 0 ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ B e s t " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ H e d g e " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ S e l l " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ B u y " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ S e l l P _ B u y L " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ B u y P _ S e l l L " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ S e l l P r o f i t " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ B u y P r o f i t " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ S e l l L o s s " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ B u y L o s s " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ S e l l T o t a l " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ B u y T o t a l " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ P r o f i t " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ L o s s " , O B J P R O P _ S T A T E , f a l s e ) ;
O b j e c t S e t I n t e g e r ( 0 , " B t n _ T o t a l " , O B J P R O P _ S T A T E , f a l s e ) ;
l a s t C h e c k T i m e = 0 ;
d o U p d a t e I n f o ( ) ;
d o U p d a t e C h a r t ( ) ;
d o F o r c e U p d a t e ( ) ;
E v e n t S e t M i l l i s e c o n d T i m e r ( i C h e c k I n t e r v a l ) ;
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 ( ) ;
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
b o o l n e e d U p d a t e = f a l s e ;
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d O n T r a d e ( v o i d ) {
n e e d U p d a t e = t r u e ;
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d O n T i m e r ( v o i d ) {
i f ( n e e d C o n t i n u e > 0 ) {
s t r i n g s p a r a m = t o C o n t i n u e [ d o n e C o n t i n u e ] ;
d o n e C o n t i n u e + + ;
i f ( d o n e C o n t i n u e > = n e e d C o n t i n u e ) {
n e e d C o n t i n u e = 0 ;
d o n e C o n t i n u e = 0 ;
}
d o E x e c ( s p a r a m ) ;
} e l s e {
i f ( i C l o s e O n M a r g i n ) {
d o u b l e a c c b a l = A c c o u n t I n f o D o u b l e ( A C C O U N T _ B A L A N C E ) ;
d o u b l e a c c m a r = A c c o u n t I n f o D o u b l e ( A C C O U N T _ M A R G I N _ F R E E ) ;
i f ( A c c o u n t I n f o I n t e g e r ( A C C O U N T _ M A R G I N _ S O _ M O D E ) = = A C C O U N T _ S T O P O U T _ M O D E _ M O N E Y )
a c c m a r + = A c c o u n t I n f o D o u b l e ( A C C O U N T _ M A R G I N _ S O _ S O ) ;
e l s e
a c c m a r + = A c c o u n t I n f o D o u b l e ( A C C O U N T _ M A R G I N ) * ( 1 0 0 . 0 - A c c o u n t I n f o D o u b l e ( A C C O U N T _ M A R G I N _ S O _ S O ) ) / 1 0 0 . 0 ;
i f ( a c c m a r < a c c b a l * x M a r g i n S t o p / 1 0 0 . 0 )
d o C l o s e B e s t ( t r u e , t r u e , t r u e , t r u e , " L M | " ) ;
}
i f ( n e e d U p d a t e ) {
n e e d U p d a t e = f a l s e ;
i f ( d o U p d a t e I n f o ( ) ) {
d o U p d a t e C h a r t ( ) ;
d o F o r c e U p d a t e ( ) ;
}
}
}
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d O n C h a r t E v e n t ( c o n s t i n t i d , / / E v e n t i d e n t i f i e r
c o n s t l o n g & l p a r a m , / / E v e n t p a r a m e t e r o f l o n g t y p e
c o n s t d o u b l e & d p a r a m , / / E v e n t p a r a m e t e r o f d o u b l e t y p e
c o n s t s t r i n g & s p a r a m / / E v e n t p a r a m e t e r o f s t r i n g t y p e
) {
i f ( i d = = C H A R T E V E N T _ O B J E C T _ C L I C K ) {
i f ( O b j e c t G e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ S T A T E ) & & ( S t r i n g S u b s t r ( s p a r a m , 0 , 4 ) = = " B t n _ " ) ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ S T A T E , f a l s e ) ;
i f ( ! O b j e c t G e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ H I D D E N ) )
d o E x e c ( s p a r a m ) ;
}
} e l s e i f ( i d = = C H A R T E V E N T _ C U S T O M ) {
i f ( S t r i n g S u b s t r ( s p a r a m , 0 , 4 ) = = " B t n _ " ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ S T A T E , f a l s e ) ;
d o E x e c ( s p a r a m ) ;
}
}
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d d o E x e c ( c o n s t s t r i n g s p a r a m ) {
i f ( ( s p a r a m = = " B t n _ B u y P r o f i t " ) | | ( s p a r a m = = " B t n _ B u y P _ S e l l L " ) ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ B G C O L O R , c l r B l u e ) ;
i f ( ! d o C l o s e A l l ( t r u e , f a l s e , t r u e , f a l s e ) ) {
t o C o n t i n u e [ n e e d C o n t i n u e ] = s p a r a m ;
n e e d C o n t i n u e + + ;
}
}
i f ( ( s p a r a m = = " B t n _ S e l l P r o f i t " ) | | ( s p a r a m = = " B t n _ S e l l P _ B u y L " ) ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ B G C O L O R , c l r B l u e ) ;
i f ( ! d o C l o s e A l l ( f a l s e , t r u e , t r u e , f a l s e ) ) {
t o C o n t i n u e [ n e e d C o n t i n u e ] = s p a r a m ;
n e e d C o n t i n u e + + ;
}
}
i f ( ( s p a r a m = = " B t n _ B u y L o s s " ) | | ( s p a r a m = = " B t n _ S e l l P _ B u y L " ) ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ B G C O L O R , c l r B l u e ) ;
i f ( ! d o C l o s e A l l ( t r u e , f a l s e , f a l s e , t r u e ) ) {
t o C o n t i n u e [ n e e d C o n t i n u e ] = s p a r a m ;
n e e d C o n t i n u e + + ;
}
}
i f ( ( s p a r a m = = " B t n _ S e l l L o s s " ) | | ( s p a r a m = = " B t n _ B u y P _ S e l l L " ) ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ B G C O L O R , c l r B l u e ) ;
i f ( ! d o C l o s e A l l ( f a l s e , t r u e , f a l s e , t r u e ) ) {
t o C o n t i n u e [ n e e d C o n t i n u e ] = s p a r a m ;
n e e d C o n t i n u e + + ;
}
}
i f ( s p a r a m = = " B t n _ B u y T o t a l " ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ B G C O L O R , c l r B l u e ) ;
i f ( ! d o C l o s e A l l ( t r u e , f a l s e , t r u e , t r u e ) ) {
t o C o n t i n u e [ n e e d C o n t i n u e ] = s p a r a m ;
n e e d C o n t i n u e + + ;
}
}
i f ( s p a r a m = = " B t n _ S e l l T o t a l " ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ B G C O L O R , c l r B l u e ) ;
i f ( ! d o C l o s e A l l ( f a l s e , t r u e , t r u e , t r u e ) ) {
t o C o n t i n u e [ n e e d C o n t i n u e ] = s p a r a m ;
n e e d C o n t i n u e + + ;
}
}
i f ( s p a r a m = = " B t n _ P r o f i t " ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ B G C O L O R , c l r B l u e ) ;
i f ( ! d o C l o s e A l l ( t r u e , t r u e , t r u e , f a l s e ) ) {
t o C o n t i n u e [ n e e d C o n t i n u e ] = s p a r a m ;
n e e d C o n t i n u e + + ;
}
}
i f ( s p a r a m = = " B t n _ L o s s " ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ B G C O L O R , c l r B l u e ) ;
i f ( ! d o C l o s e A l l ( t r u e , t r u e , f a l s e , t r u e ) ) {
t o C o n t i n u e [ n e e d C o n t i n u e ] = s p a r a m ;
n e e d C o n t i n u e + + ;
}
}
i f ( s p a r a m = = " B t n _ T o t a l " ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ B G C O L O R , c l r B l u e ) ;
i f ( ! d o C l o s e A l l ( t r u e , t r u e , t r u e , t r u e ) ) {
t o C o n t i n u e [ n e e d C o n t i n u e ] = s p a r a m ;
n e e d C o n t i n u e + + ;
}
}
i f ( s p a r a m = = " B t n _ B u y " ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ B G C O L O R , C ' 0 , 2 5 5 , 2 5 5 ' ) ;
i f ( i H e d g i n g A l l o w e d )
d o B u y N o w ( 0 , 0 ) ;
e l s e
d o C l o s e B e s t S e l l O r O p e n B u y ( 0 , 0 ) ;
n e e d C o n t i n u e = 0 ;
d o n e C o n t i n u e = 0 ;
}
i f ( s p a r a m = = " B t n _ S e l l " ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ B G C O L O R , C ' 2 5 5 , 0 , 2 5 5 ' ) ;
i f ( i H e d g i n g A l l o w e d )
d o S e l l N o w ( 0 , 0 ) ;
e l s e
d o C l o s e B e s t B u y O r O p e n S e l l ( 0 , 0 ) ;
n e e d C o n t i n u e = 0 ;
d o n e C o n t i n u e = 0 ;
}
i f ( s p a r a m = = " B t n _ H e d g e " ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ B G C O L O R , C ' 2 5 5 , 2 5 5 , 0 ' ) ;
d o H e d g e N o w ( 0 , 0 ) ;
n e e d C o n t i n u e = 0 ;
d o n e C o n t i n u e = 0 ;
}
i f ( s p a r a m = = " B t n _ B e s t " ) {
O b j e c t S e t I n t e g e r ( 0 , s p a r a m , O B J P R O P _ B G C O L O R , C ' 0 , 2 5 5 , 2 5 5 ' ) ;
d o C l o s e B e s t ( t r u e , t r u e , t r u e , t r u e ) ;
n e e d C o n t i n u e = 0 ;
d o n e C o n t i n u e = 0 ;
}
i f ( s p a r a m = = " B t n _ A u t o B u y " )
i f ( n e e d C o n t i n u e < = 0 )
d o B u y N o w ( 0 , 0 ) ;
i f ( s p a r a m = = " B t n _ A u t o S e l l " )
i f ( n e e d C o n t i n u e < = 0 )
d o S e l l N o w ( 0 , 0 ) ;
d o F o r c e U p d a t e ( ) ;
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
b o o l d o C l o s e A l l ( b o o l b u y i n g , b o o l s e l l i n g , b o o l w i t h P r o f i t , b o o l w i t h L o s s ) {
i f ( t r a d e A l l o w e d ( ) ) {
i n t c n t = C o u n t _ P o s i t i o n s ( ) ;
w h i l e ( c n t > 0 ) {
c n t - - ;
i f ( s e l e c t A n y P o s i t i o n ( c n t ) ) {
i f ( b u y i n g & & i s B u y )
i f ( ( w i t h P r o f i t & & b u y P r o f i t > 0 ) | | ( w i t h L o s s & & b u y P r o f i t < = 0 ) ) {
i n t d i g i t s = ( i n t ) S y m b o l I n f o I n t e g e r ( l a s t S y m b o l , S Y M B O L _ D I G I T S ) ;
i f ( ! c l o s e N o w ( D o u b l e T o S t r i n g ( b u y P r o f i t , 2 ) + " @ " + D o u b l e T o S t r i n g ( b u y C u r r e n t , d i g i t s ) + " | " + T i m e T o S t r i n g ( T i m e C u r r e n t ( ) , T I M E _ M I N U T E S | T I M E _ S E C O N D S ) ) ) {
S l e e p ( 1 0 0 ) ;
r e t u r n ( f a l s e ) ;
}
}
i f ( s e l l i n g & & i s S e l l )
i f ( ( w i t h P r o f i t & & s e l l P r o f i t > 0 ) | | ( w i t h L o s s & & s e l l P r o f i t < = 0 ) ) {
i n t d i g i t s = ( i n t ) S y m b o l I n f o I n t e g e r ( l a s t S y m b o l , S Y M B O L _ D I G I T S ) ;
i f ( ! c l o s e N o w ( D o u b l e T o S t r i n g ( s e l l P r o f i t , 2 ) + " @ " + D o u b l e T o S t r i n g ( s e l l C u r r e n t , d i g i t s ) + " | " + T i m e T o S t r i n g ( T i m e C u r r e n t ( ) , T I M E _ M I N U T E S | T I M E _ S E C O N D S ) ) ) {
S l e e p ( 1 0 0 ) ;
r e t u r n ( f a l s e ) ;
}
}
}
}
}
r e t u r n ( t r u e ) ;
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
b o o l d o C l o s e B e s t ( b o o l b u y i n g , b o o l s e l l i n g , b o o l w i t h P r o f i t , b o o l w i t h L o s s , s t r i n g c o m m = " " ) {
b o o l r e s = f a l s e ;
i n t b e s t I d x = - 1 ;
b e s t P r o f i t = 0 ;
b e s t T y p e = " " ;
i f ( t r a d e A l l o w e d ( ) ) {
i n t c n t = C o u n t _ P o s i t i o n s ( ) ;
w h i l e ( c n t > 0 ) {
c n t - - ;
i f ( s e l e c t A n y P o s i t i o n ( c n t ) ) {
i f ( b u y i n g & & i s B u y )
i f ( ( w i t h P r o f i t & & b u y P r o f i t > 0 ) | | ( w i t h L o s s & & b u y P r o f i t < = 0 ) )
i f ( ( b e s t I d x < 0 ) | | ( b u y P r o f i t > b e s t P r o f i t ) ) {
b e s t I d x = c n t ;
b e s t P r o f i t = b u y P r o f i t ;
b e s t T y p e = " B " ;
}
i f ( s e l l i n g & & i s S e l l )
i f ( ( w i t h P r o f i t & & s e l l P r o f i t > 0 ) | | ( w i t h L o s s & & s e l l P r o f i t < = 0 ) )
i f ( ( b e s t I d x < 0 ) | | ( s e l l P r o f i t > b e s t P r o f i t ) ) {
b e s t I d x = c n t ;
b e s t P r o f i t = s e l l P r o f i t ;
b e s t T y p e = " S " ;
}
}
}
}
i f ( b e s t I d x > = 0 )
i f ( s e l e c t A n y P o s i t i o n ( b e s t I d x ) ) {
i n t d i g i t s = ( i n t ) S y m b o l I n f o I n t e g e r ( l a s t S y m b o l , S Y M B O L _ D I G I T S ) ;
r e s = c l o s e N o w ( c o m m + D o u b l e T o S t r i n g ( i s B u y ? b u y P r o f i t : s e l l P r o f i t , 2 ) + " @ " + D o u b l e T o S t r i n g ( i s B u y ? b u y C u r r e n t : s e l l C u r r e n t , d i g i t s ) + " | " + T i m e T o S t r i n g ( T i m e C u r r e n t ( ) , T I M E _ M I N U T E S | T I M E _ S E C O N D S ) ) ;
}
r e t u r n ( r e s ) ;
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
/ / | |
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d d o B u y N o w ( d o u b l e s t o p L o s s P r i c e , d o u b l e t a k e P r o f i t P r i c e ) {
i f ( t r a d e A l l o w e d ( ) & & M A _ S y m b o l ! = " " ) {
d o u b l e b e s t P r i c e = 0 , w o r s t P r i c e = 0 , m y E x p = 0 ;
i n t c n t = c o u n t B u y s ( b e s t P r i c e , w o r s t P r i c e , m y E x p ) ;
i f ( ( b e s t P r i c e = = 0 ) | | ( c u r r e n t B u y P r i c e < b e s t P r i c e ) )
b e s t P r i c e = c u r r e n t B u y P r i c e ;
i n t d i g t s = ( i n t ) S y m b o l I n f o I n t e g e r ( M A _ S y m b o l , S Y M B O L _ D I G I T S ) ;
o p e n B u y ( m i n T r a d e V o l , b e s t P r i c e , s t o p L o s s P r i c e , t a k e P r o f i t P r i c e , " @ " + D o u b l e T o S t r i n g ( c u r r e n t B u y P r i c e , d i g t s ) + " | " + T i m e T o S t r i n g ( T i m e C u r r e n t ( ) , T I M E _ M I N U T E S | T I M E _ S E C O N D S ) ) ;
}
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d d o S e l l N o w ( d o u b l e s t o p L o s s P r i c e , d o u b l e t a k e P r o f i t P r i c e ) {
i f ( t r a d e A l l o w e d ( ) & & M A _ S y m b o l ! = " " ) {
d o u b l e b e s t P r i c e = 0 , w o r s t P r i c e = 0 , m y E x p = 0 ;
i n t c n t = c o u n t S e l l s ( b e s t P r i c e , w o r s t P r i c e , m y E x p ) ;
i f ( ( b e s t P r i c e = = 0 ) | | ( c u r r e n t S e l l P r i c e > b e s t P r i c e ) )
b e s t P r i c e = c u r r e n t S e l l P r i c e ;
i n t d i g t s = ( i n t ) S y m b o l I n f o I n t e g e r ( M A _ S y m b o l , S Y M B O L _ D I G I T S ) ;
o p e n S e l l ( m i n T r a d e V o l , b e s t P r i c e , s t o p L o s s P r i c e , t a k e P r o f i t P r i c e , " @ " + D o u b l e T o S t r i n g ( c u r r e n t S e l l P r i c e , d i g t s ) + " | " + T i m e T o S t r i n g ( T i m e C u r r e n t ( ) , T I M E _ M I N U T E S | T I M E _ S E C O N D S ) ) ;
}
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d d o C l o s e B e s t S e l l O r O p e n B u y ( d o u b l e s t o p L o s s P r i c e , d o u b l e t a k e P r o f i t P r i c e ) {
i f ( t r a d e A l l o w e d ( ) & & M A _ S y m b o l ! = " " ) {
i f ( ! d o C l o s e B e s t ( f a l s e , t r u e , t r u e , t r u e ) ) {
d o u b l e b e s t P r i c e = 0 , w o r s t P r i c e = 0 , m y E x p = 0 ;
i n t c n t = c o u n t B u y s ( b e s t P r i c e , w o r s t P r i c e , m y E x p ) ;
i f ( ( b e s t P r i c e = = 0 ) | | ( c u r r e n t B u y P r i c e < b e s t P r i c e ) )
b e s t P r i c e = c u r r e n t B u y P r i c e ;
i n t d i g t s = ( i n t ) S y m b o l I n f o I n t e g e r ( M A _ S y m b o l , S Y M B O L _ D I G I T S ) ;
o p e n B u y ( m i n T r a d e V o l , b e s t P r i c e , s t o p L o s s P r i c e , t a k e P r o f i t P r i c e , " @ " + D o u b l e T o S t r i n g ( c u r r e n t B u y P r i c e , d i g t s ) + " | " + T i m e T o S t r i n g ( T i m e C u r r e n t ( ) , T I M E _ M I N U T E S | T I M E _ S E C O N D S ) ) ;
}
}
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d d o C l o s e B e s t B u y O r O p e n S e l l ( d o u b l e s t o p L o s s P r i c e , d o u b l e t a k e P r o f i t P r i c e ) {
i f ( t r a d e A l l o w e d ( ) & & M A _ S y m b o l ! = " " ) {
i f ( ! d o C l o s e B e s t ( t r u e , f a l s e , t r u e , t r u e ) ) {
d o u b l e b e s t P r i c e = 0 , w o r s t P r i c e = 0 , m y E x p = 0 ;
i n t c n t = c o u n t S e l l s ( b e s t P r i c e , w o r s t P r i c e , m y E x p ) ;
i f ( ( b e s t P r i c e = = 0 ) | | ( c u r r e n t S e l l P r i c e > b e s t P r i c e ) )
b e s t P r i c e = c u r r e n t S e l l P r i c e ;
i n t d i g t s = ( i n t ) S y m b o l I n f o I n t e g e r ( M A _ S y m b o l , S Y M B O L _ D I G I T S ) ;
o p e n S e l l ( m i n T r a d e V o l , b e s t P r i c e , s t o p L o s s P r i c e , t a k e P r o f i t P r i c e , " @ " + D o u b l e T o S t r i n g ( c u r r e n t S e l l P r i c e , d i g t s ) + " | " + T i m e T o S t r i n g ( T i m e C u r r e n t ( ) , T I M E _ M I N U T E S | T I M E _ S E C O N D S ) ) ;
}
}
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d d o H e d g e N o w ( d o u b l e s t o p L o s s P r i c e , d o u b l e t a k e P r o f i t P r i c e ) {
i f ( t r a d e A l l o w e d ( ) & & M A _ S y m b o l ! = " " ) {
d o u b l e v o l B u y = 0 , v o l S e l l = 0 , m y V o l = 0 ;
c o u n t H e d g e ( v o l B u y , v o l S e l l ) ;
i f ( v o l B u y > v o l S e l l ) {
m y V o l = v o l B u y - v o l S e l l ;
d o u b l e p r i c e = S y m b o l I n f o D o u b l e ( M A _ S y m b o l , S Y M B O L _ B I D ) ;
i n t d i g t s = ( i n t ) S y m b o l I n f o I n t e g e r ( M A _ S y m b o l , S Y M B O L _ D I G I T S ) ;
o p e n S e l l ( m y V o l , p r i c e , s t o p L o s s P r i c e , t a k e P r o f i t P r i c e , " @ " + D o u b l e T o S t r i n g ( p r i c e , d i g t s ) + " | " + T i m e T o S t r i n g ( T i m e C u r r e n t ( ) , T I M E _ M I N U T E S | T I M E _ S E C O N D S ) ) ;
} e l s e i f ( v o l S e l l > v o l B u y ) {
m y V o l = v o l S e l l - v o l B u y ;
d o u b l e p r i c e = S y m b o l I n f o D o u b l e ( M A _ S y m b o l , S Y M B O L _ A S K ) ;
i n t d i g t s = ( i n t ) S y m b o l I n f o I n t e g e r ( M A _ S y m b o l , S Y M B O L _ D I G I T S ) ;
o p e n B u y ( m y V o l , p r i c e , s t o p L o s s P r i c e , t a k e P r o f i t P r i c e , " @ " + D o u b l e T o S t r i n g ( p r i c e , d i g t s ) + " | " + T i m e T o S t r i n g ( T i m e C u r r e n t ( ) , T I M E _ M I N U T E S | T I M E _ S E C O N D S ) ) ;
}
}
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d d o F o r c e U p d a t e ( v o i d ) {
C h a r t R e d r a w ( 0 ) ;
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
v o i d d o U p d a t e A l l ( ) {
i f ( d o U p d a t e I n f o ( ) ) {
d o U p d a t e C h a r t ( ) ;
d o F o r c e U p d a t e ( ) ;
}
}
/ / + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
Comments
Markdown Formatting Guide
# H1## H2
### H3
**bold text***italicized text*[title](https://www.example.com)`code````code block
```
> blockquote- Item 1- Item 2
1. First item2. Second item
---