거래자 포럼의 메인 페이지에는 거래에 대한 단일 주제가 없습니다. 단어에서 전혀.

Алексей Тарабанов 2020.08.28 21:12 #31

/*    Soft Fractals Patern 123 Indicator - индикатор распознает 
   патерны "1-2-3", как комбинацию нестандартных фракталов трех 
   типов. На баре точки "1" патерна в 7-м и 8-м индикаторных 
   буферах фиксируется время точек "2" и "3" соответственно. */
#property copyright "Copyright 2012, Тарабанов А.В."
#property link        "alextar@bk.ru"
#property indicator_chart_window
#property indicator_buffers 8
#property indicator_color1 Green
#property indicator_width1 3
#property indicator_color2 Red
#property indicator_width2 3
#property indicator_color3 Green
#property indicator_width3 1
#property indicator_color4 Red
#property indicator_width4 1
#property indicator_color5 Green
#property indicator_width5 1
#property indicator_color6 Red
#property indicator_width6 1
#define Version     "iSF123"                          // Константы
#define Zero       0.00000001
#define Infinity   100000000.0
// Глобальные переменные и массивы
double       Bottom[], Top[],                       // Индикаторные буферы
            Down2[] , Up2[],
            Down3[] , Up3[],
            Time2[] , Time3[];                     // Время точек патерна
extern int   БаровЛевееВершины   = 119 ,               // Внешние переменные
            БаровПравееВершины  = 1 ,
            БаровЛевееОтката    = 6 ,
            БаровПравееОтката   = 1 ,
            БаровЛевееРетеста   = 1 ,
            БаровПравееРетеста  = 1 ,
            СимволНижнейВершины = 161 ,
            СимволВерхнейВершины= 161 ,
            СимволОткатаВниз    = 161 ,
            СимволОткатаВверх   = 161 ,
            СимволРетестаВниз   = 159 ,
            СимволРетестаВверх  = 159 ;
extern bool ОтображатьВершины   = true ,
            ОтображатьОткаты    = true ,
            ОтображатьРетесты   = true ;
//+------------------------------------------------------------------+
int init(){
   int DrawFractals= DRAW_NONE , DrawRecoils= DRAW_NONE , DrawReTests= DRAW_NONE ;
   if ( ОтображатьВершины ) DrawFractals= DRAW_ARROW ;
   if ( ОтображатьОткаты  ) DrawRecoils = DRAW_ARROW ;
   if ( ОтображатьРетесты ) DrawReTests = DRAW_ARROW ;
   SetIndexLabel( 0 , "Bottom" );                       // Атрибуты буферов
   SetIndexBuffer ( 0 ,Bottom);
   SetIndexStyle( 0 ,DrawFractals);
   SetIndexArrow( 0 ,СимволНижнейВершины);
   SetIndexEmptyValue( 0 , 0 );
   SetIndexLabel( 1 , "Top" );
   SetIndexBuffer ( 1 ,Top);
   SetIndexStyle( 1 ,DrawFractals);
   SetIndexArrow( 1 ,СимволВерхнейВершины);
   SetIndexEmptyValue( 1 , 0 );
   SetIndexLabel( 2 , "Down2" );
   SetIndexBuffer ( 2 ,Down2);
   SetIndexStyle( 2 ,DrawRecoils);
   SetIndexArrow( 2 ,СимволОткатаВниз);
   SetIndexEmptyValue( 2 , 0 );
   SetIndexLabel( 3 , "Up2" );
   SetIndexBuffer ( 3 ,Up2);
   SetIndexStyle( 3 ,DrawRecoils);
   SetIndexArrow( 3 ,СимволОткатаВверх);
   SetIndexEmptyValue( 3 , 0 );
   SetIndexLabel( 4 , "Down3" );
   SetIndexBuffer ( 4 ,Down3);
   SetIndexStyle( 4 ,DrawReTests);
   SetIndexArrow( 4 ,СимволРетестаВниз);
   SetIndexEmptyValue( 4 , 0 );
   SetIndexLabel( 5 , "Up3" );
   SetIndexBuffer ( 5 ,Up3);
   SetIndexStyle( 5 ,DrawReTests);
   SetIndexArrow( 5 ,СимволРетестаВверх);
   SetIndexEmptyValue( 5 , 0 );
   SetIndexBuffer ( 6 ,Time2);
   SetIndexStyle( 6 , DRAW_NONE );
   SetIndexEmptyValue( 6 , 0 );
   SetIndexBuffer ( 7 ,Time3);
   SetIndexStyle( 7 , DRAW_NONE );
   SetIndexEmptyValue( 7 , 0 );
   IndicatorShortName(Version);
   if ( БаровЛевееВершины < 1 ) БаровЛевееВершины = 1 ; // Контроль значений
   if ( БаровПравееВершины< 1 ) БаровПравееВершины= 1 ;
   if ( БаровЛевееОтката  < 1 ) БаровЛевееОтката  = 1 ;
   if ( БаровПравееОтката < 1 ) БаровПравееОтката = 1 ;
   if ( БаровЛевееРетеста < 1 ) БаровЛевееРетеста = 1 ;
   if ( БаровПравееРетеста< 1 ) БаровПравееРетеста= 1 ;
   return ( 0 );
}
//+------------------------------------------------------------------+
int deinit(){
   return ( 0 );
}
//+------------------------------------------------------------------+
int start(){
   int i, History= Bars - 1 ,
       BarsLost=History-IndicatorCounted();
   if ( BarsLost<History ){
       if ( BarsLost< 1 ) return ( 0 );                   // Не повторять на том-же баре
      i=БаровПравееВершины+BarsLost;               // Число баров пересчета
   }
   else i=History-БаровЛевееВершины;               // Просмотр на всей истории
   int j, imax, imin, Error;
   double High1, Low1, High2, Low2, High3, Low3;
   while ( i> 1 ){                                   // Перебор слева направо
      fSoftFractals(i,Bottom,Top,БаровЛевееВершины,БаровПравееВершины);
      fSoftFractals(i,Down2 ,Up2,БаровЛевееОтката ,БаровПравееОтката );
      fSoftFractals(i,Down3 ,Up3,БаровЛевееРетеста,БаровПравееРетеста);
       if ( Down3[i]>Zero ){                         // Поиск точки 3
         Low3=Down3[i];
         if ( Up3[i]>Zero ){                         // Up и Down
            High3=Up3[i];
         }
         else {                                     // Down
            High3= 0 ;
      }  }
       else {
         if ( Up3[i]>Zero ){                         // Up
            High3=Up3[i];
            Low3= 0 ;
         }
         else {                                     // Нет точки 3
            i--;
             continue ;
      }  }
      High1= 0 ;
      Low1= 0 ;
      imax= 0 ;
      High2= 0 ;
      imin= 0 ;
      Low2=Infinity;
      j=i+ 1 ;
       while ( j<=History-БаровЛевееВершины ){       // Поиск точек 1 и 2
         if ( Bottom[j]>Zero ){
             if ( Top[j]<Zero ){                     // Low1
               Low1=Bottom[j];
               if ( Low1-Low3>-Zero
                || Low3-High2>Zero
                || Low3<Zero
                || High2<Zero ) break ;             // Нет патерна
               if ( Time2[j]> 0 && Time3[j]> 0 ){
                   if ( Low[ iBarShift ( NULL , 0 ,Time3[j])]-Low3>Zero
                   && High[ iBarShift ( NULL , 0 ,Time2[j])]-High2>-Zero ) Time3[j]=Time[i];
                   break ;                           // Модификация патерна
               }
               Time2[j]=Time[imax];
               Time3[j]=Time[i];
               break ;                               // Новый патерн
            }
             else break ;                             // Нет патерна
         }
         else {
             if ( Top[j]>Zero ){                     // High1
               High1=Top[j];
               if ( High3-High1>-Zero
                || Low2-High3>Zero
                || High3<Zero
                || Low2<Zero ) break ;               // Нет патерна
               if ( Time2[j]> 0 && Time3[j]> 0 ){
                   if ( High3-High[ iBarShift ( NULL , 0 ,Time3[j])]>Zero
                   && Low2-Low[ iBarShift ( NULL , 0 ,Time2[j])]>-Zero ) Time3[j]=Time[i];
                   break ;                           // Модификация патерна
               }
               Time2[j]=Time[imin];
               Time3[j]=Time[i];
               break ;                               // Новый патерн
         }  }
         if ( Up2[j]-High2>Zero ){
            High2=Up2[j];
            imax=j;
         }
         if ( Down2[j]>Zero && Low2-Down2[j]>Zero ){
            Low2=Down2[j];
            imin=j;
         }
         j++;
      }
      i--;
   }
   return ( 0 );
}
//+------------------------------------------------------------------+
void fSoftFractals( int i                           // Текущий бар
                  , double & B[], double & T[]         // Буферные массивы фракталов
                  , int Left= 1 , int Right= 1 ){         // Размерность фракталов
   if ( i<=Right ) return ;
   double C[];
   int dim= ArrayResize (C,Left+ 1 +Right), j;
   B[i]= 0 ;                                         // Поиск нижнего фрактала
   while ( j < dim ){
      C[j]=Low[j+i-Right];
      j++;
   }
   if ( C[Right+ 1 ]-C[Right]>-Zero
    && C[Right- 1 ]-C[Right]>-Zero ) {
      B[i]=C[Right];                               // Локальный минимум
      j= 1 ;
       while ( j < dim ) {
         if ( ( j<Right && B[i]-C[j- 1 ]>Zero )
          || ( j>Right && B[i]-C[j]  >Zero ) ) {
            B[i]= 0 ;                                 // Нет фрактала
             break ;
         }
         j++;
   }  }
   j= 0 ;                                             // Поиск верхнего фрактала
   T[i]= 0 ;
   while ( j<dim ){
      C[j]=High[j+i-Right];
      j++;
   }
   if ( C[Right]-C[Right+ 1 ]>-Zero
    && C[Right]-C[Right- 1 ]>-Zero ) {
      T[i]=C[Right];                               // Локальный максимум
      j= 1 ;
       while ( j < dim ) {
         if ( ( j<Right && C[j- 1 ]-T[i]>Zero )
          || ( j>Right && C[j]  -T[i]>Zero ) ) {
            T[i]= 0 ;                                 // Нет фрактала
             break ;
         }
         j++;
   }  }
   return ;
}

동안 표시기.

Даниил Минин 2020.08.28 21:40 #32

Алексей Тарабанов :

교육 수준이 낮은 프로그래머와 가입하려는 사람들을 위한 사이트를 만드는 데 수천 루블을 쓸 수 있습니다. 필요한?

FOREX에서 돈을 벌 수 있습니까?

Алексей Тарабанов 2020.08.28 21:47 #33

danminin :

FOREX에서 돈을 벌 수 있습니까?

피아노를 칠 줄도 모릅니다. 시도한 적이 없습니다.

Даниил Минин 2020.08.28 21:51 #34

Алексей Тарабанов :

피아노를 칠 줄도 모릅니다. 시도한 적이 없습니다.

글쎄, 왜 사람들이 Forex에서 돈을 벌 수 없다고 비판합니까?

거래, 자동 거래 시스템 및 거래 전략 테스트에 관한 포럼

거래자 포럼의 메인 페이지에는 거래에 대한 단일 주제가 없습니다. 단어에서 전혀.

알렉세이 타라바노프 , 2020.08.27 20:35

사이트에서 돈을 벌 수 있는 사람은 거의 없으며 오직 파이 ***만 있습니다.

Алексей Тарабанов 2020.08.28 21:54 #35

danminin :

글쎄, 왜 사람들이 Forex에서 돈을 벌 수 없다고 비판합니까?

"멍청이"라는 단어가 친숙합니까?

Nikolai Karetnikov 2020.08.28 22:02 #36

https://www.youtube.com/watch?v=0m2LXBgrEOg

Группа Ноль - Человек и Кошка HD ( 2 й клип )

2016.11.04
www.youtube.com

Видео снято в 1991 году в новой студии Андрея Тропилло на Большом проспекте Петроградской стороны. Это было следующее место после Дома Пионеров на Охте. В эт...

Алексей Тарабанов 2020.08.28 22:06 #37

danminin :

글쎄, 왜 사람들이 Forex에서 돈을 벌 수 없다고 비판합니까?

가난한 것들

Fast235 2020.08.29 02:41 #38

danminin :

글쎄, 왜 Forex에서 벌 수 없는 사람들을 비판합니까?

네 그냥 그런 이야기들에 감동을 받았을 뿐인데 장사를 해서 돈을 많이 번다는 게 사실인지 아닌지 전혀 신경 쓰지 않아요

Georgiy Merts 2020.08.29 06:09 #39

Fast235 :

네 그냥 그런 이야기들에 감동을 받았을 뿐인데 장사를 해서 돈을 많이 번다는 게 사실인지 아닌지 전혀 신경 쓰지 않아요

오히려 저를 바보 취급하는 게 싫습니다... 오, 우리는 스캘핑으로 하루 20%를 벌고 전액을 보장합니다... 백만 루블의 보증금으로... 그리고 심지어 "주제에 대해" 5세 미만의 초보자...

네 네...

발라볼...

Fast235 2020.08.29 06:20 #40

Georgiy Merts :

오히려 저를 바보 취급하는 게 싫습니다... 오, 우리는 스캘핑으로 하루 20%를 벌고 전액을 보장합니다... 100만 루블의 보증금으로... 그리고 심지어 "주제에 대해" 5세 미만의 초보자...

네 네...

발라볼...

예, 그것은 정신 착란과 더 비슷해 보입니다. 제정신으로 충분히 큰 돈을 버는 사람이 모든 구석에서 그것에 대해 소리를 지르지는 않을 것입니다. 이것은 많은 사기꾼입니다.

다른 문제에서는 100만 달러를 벌지 마십시오. 한 달에 문지르면 그렇게 많은 돈은 아니지만 일년에 12 개월이 전부입니까?

거래자 포럼의 메인 페이지에는 거래에 대한 단일 주제가 없습니다. 단어에서 전혀. - 페이지 4