Индикаторы форекс Обсуждение, поиск и тестирование индикаторов для MT4.

Ответить
12.09.2010, 10:32
Аватар для Harris
Harris Harris вне форума Интересующийся
Регистрация: 17.07.2010 / Сообщений: 11
Поблагодарили 0 раз(а) / Репутация: 1

По умолчанию Ищу индикатор фракталов

Люди,у кого есть индикатор фракталов цветной?
12.09.2010, 11:28
Аватар для Harris
Harris Harris вне форума Интересующийся
Регистрация: 17.07.2010 / Сообщений: 11
Поблагодарили 0 раз(а) / Репутация: 1
Цветной в смысле стрелочки нижнего и верхнего фракталов должны различаться по цвету, неужели не у кого нет?
12.09.2010, 21:42
Аватар для A1ex
A1ex A1ex вне форума ~~~~~
Регистрация: 17.01.2009 / Сообщений: 6,662
Поблагодарили 9,279 раз(а) / Репутация: 9284
  • Отправить сообщение для A1ex с помощью ICQ
Цветной в смысле стрелочки нижнего и верхнего фракталов должны различаться по цвету, неужели не у кого нет?
Найдем

MV Fractals



RFractals

13.09.2010, 04:12
Аватар для Harris
Harris Harris вне форума Интересующийся
Регистрация: 17.07.2010 / Сообщений: 11
Поблагодарили 0 раз(а) / Репутация: 1
Спасибо большое!
15.09.2010, 00:42
Аватар для ВладимирР
ВладимирР ВладимирР вне форума Чат-Модератор
Регистрация: 03.11.2009 / Адрес: Липецк / Сообщений: 289
Поблагодарили 315 раз(а) / Репутация: 407
23:39:43 ЛИС151: //+------------------------------------------------------------------+
//| Ind_VilkaFractals_v1.2.mq4 |
//| Copyright © 2009, Alexey Sleptsov (lekhach) |
//| lekhach18@rambler.ru |
//+------------------------------------------------------------------+
// Индикатор работает по стратегии "Вилка Чувашова".
// Версия 1.2:
// 1. Добавлена функция удаления объектов при выгрузке индикатора.
// 2. Удалены лишние строки из кода.
// 3. Переделан alert.
// 4. Добавлен FractalsTrue.
//--------------------------------------------------------------------
#property copyright "lekhach © 2009"
#property link "lekhach18@rambler.ru"
//--------------------------------------------------------------------
#property indicator_chart_window
#property indicator_buffers 2
#property indicator_color1 Blue
#property indicator_color2 Red
#property indicator_width1 1
#property indicator_width2 1
//---- input parameters
int Lines=0; // Количество видимых/невидимых фрактальных линий
bool FractalsTrue=true; // Вкл/выкл значков фракталов
bool alertTrue=false; // Вкл/выкл сигнала
color LinesColorUp=Blue; // Цвет верхних фрактальных линий
color LinesColorDown=Red; // Цвет нижних фрактальных линий
//---- buffers
double ExtMapBuffer1[];
double ExtMapBuffer2[];
//--- my variables
int Up=0;
int BufUp=0;
int Down=0;
int BufDown=0;
double BufPriceUp[100000];
double BufDateUp[100000];
double BufPriceDown[100000];
double BufDateDown[100000];
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
SetIndexStyle(0,DRAW_ARROW);
SetIndexArrow(0,217);
SetIndexBuffer(0,ExtMapBuffer1);
SetIndexEmptyValue(0,0.0);
SetIndexStyle(1,DRAW_ARROW);
SetIndexArrow(1,218);
SetIndexBuffer(1,ExtMapBuffer2);
SetIndexEmptyValue(1,0.0);
//---- name for DataWindow and indicator subwindow label
IndicatorShortName("Fractals";
SetIndexLabel(0,"FractalsUp";
SetIndexLabel(1,"FractalsDown";
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
for (int j=0; j<100000; j++)
{
ObjectDelete("LineUp"+j);
ObjectDelete("LineDown"+j);
}
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int counted_bars=IndicatorCounted();
int limit;
//---- Последний посчитанный бар будет пересчитан
if (counted_bars>0) counted_bars--;
limit=Bars-counted_bars;
//---- Основной цикл
for (int i=limit; i>2; i--)
{
if (FractalsTrue==true)
{
ExtMapBuffer1[i]=iFractals(NULL,0,MODE_UPPER,i);
ExtMapBuffer2[i]=iFractals(NULL,0,MODE_LOWER,i);
}
//---- Блок Up-фракталов
if (iFractals(NULL,0,MODE_UPPER,i)!=0)
{
Up++;
BufPriceUp[Up]=iFractals(NULL,0,MODE_UPPER,i);
BufDateUp[Up]=Time[i];
/*
if (Up>2 && Up-BufUp>1 && BufPriceUp[Up]<BufPriceUp[Up-1] && BufPriceUp[Up-1]<BufPriceUp[Up-2])
{
BufUp=Up;
ObjectCreate("LineUp"+(Up-1),OBJ_TREND,0,BufDateUp[Up-1],BufPriceUp[Up-1],BufDateUp[Up],BufPriceUp[Up]);
ObjectCreate("LineUp"+Up,OBJ_TREND,0,BufDateUp[Up-2],BufPriceUp[Up-2],BufDateUp[Up-1],BufPriceUp[Up-1]);
if (ObjectGetValueByShift("LineUp"+Up,i-1)>ObjectGetValueByShift("LineUp"+(Up-1),i-1))
{
ObjectDelete("LineUp"+Up);
ObjectDelete("LineUp"+(Up-1));
}
else if (alertTrue==true) alert(Symbol(),Period()," Низходящая вилка! ",TimeToStr(Time[i],TIME_DATE|TIME_SECONDS));
}
ObjectSet("LineUp"+(Up-1),OBJPROP_COLOR,LinesColorUp);
ObjectSet("LineUp"+(Up-1),OBJPROP_WIDTH,2);
ObjectSet("LineUp"+(Up-1),OBJPROP_RAY,True);
ObjectSet("LineUp"+Up,OBJPROP_COLOR,LinesColorUp);
ObjectSet("LineUp"+Up,OBJPROP_WIDTH,2);
ObjectSet("LineUp"+Up,OBJPROP_RAY,True);
if (Up>Lines+1) ObjectDelete("LineUp"+(Up-Lines-1));
*/
}
//---- Блок Down-фракталов
if (iFractals(NULL,0,MODE_LOWER,i)!=0)
{
Down++;
BufPriceDown[Down]=iFractals(NULL,0,MODE_LOWER,i);
BufDateDown[Down]=Time[i];
/*
if (Down>2 && Down-BufDown>1 && BufPriceDown[Down]>BufPriceDown[Down-1] && BufPriceDown[Down-1]>BufPriceDown[Down-2])
{
BufDown=Down;
ObjectCreate("LineDown"+(Down-1),OBJ_TREND,0,BufDateDown[Down-1],BufPriceDown[Down-1],BufDateDown[Down],BufPriceDown[Down]);
ObjectCreate("LineDown"+Down,OBJ_TREND,0,BufDateDo wn[Down-2],BufPriceDown[Down-2],BufDateDown[Down-1],BufPriceDown[Down-1]);
if (ObjectGetValueByShift("LineDown"+Down,i-1)<ObjectGetValueByShift("LineDown"+(Down-1),i-1))
{
ObjectDelete("LineDown"+Down);
ObjectDelete("LineDown"+(Down-1));
}
else if (alertTrue==true) alert(Symbol(),Period()," Восходящая вилка! ",TimeToStr(Time[i],TIME_DATE|TIME_SECONDS));
}
ObjectSet("LineDown"+(Down-1),OBJPROP_COLOR,LinesColorDown);
ObjectSet("LineDown"+(Down-1),OBJPROP_WIDTH,2);
ObjectSet("LineDown"+(Down-1),OBJPROP_RAY,True);
ObjectSet("LineDown"+Down,OBJPROP_COLOR,LinesColor Down);
ObjectSet("LineDown"+Down,OBJPROP_WIDTH,2);
ObjectSet("LineDown"+Down,OBJPROP_RAY,True);
if (Down>Lines+1) ObjectDelete("LineDown"+(Down-Lines-1));
*/
}
}
//----
return(0);
}
//+------------------------------------------------------------------+
23:39:57 ЛИС151: вот код закинь
Ответить


Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Выкл.
Pingbacks are Выкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Линии фракталов. 81555 Индикаторы форекс 0 07.10.2009 18:57
Подтверждение фракталов. FXWizard Практика трейдинга 0 20.04.2009 13:35
Индикатор фракталов FOC FXWizard Индикаторы форекс 0 22.09.2008 03:07


Текущее время: 13:21. Часовой пояс GMT.


Перевод: zCarot
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
SEO by vBSEO