Система vaz321 для тф H1, H4.

[ПЕРВЫЙ(1)]

[quote name='justMAX' post='214688' date='31.7.2007, 21:22']
У тебя то хоть каникулы, а мне еще поступать - через три дня экзамен по математике.

Главное чтобы картина повторялась на Н1. Даже если сетка с фибо та же что на Н4, можно входить, то есть смотрим сигнал на Н4, а на Н1 просто цена должна быть у/за границей.

Если есть вопросы - задавай. Удачи
[/quote]
А сигналы должны быть на всех ТФ (Н4 и н1).
Как из позы выходиш...?

Еще смотри ....... u/chf
30.07 buy 1.2030

Н1
цена у граници. Форм. много, разные.... Нужные!
Н4
цена у средней линии канала, форм. 0.786.....
Сигнал??? сигнал!!!

Ну мах. 1.2065 и вниз!!!!
Че не так то????

Вход правельный?
Помоги !!!!!! Изменено 31 июля, 2007 пользователем ПЕРВЫЙ(1)

[justMAX]

[quote name='ПЕРВЫЙ(1)' post='214692' date='31.7.2007, 18:36']
А сигналы должны быть на всех ТФ (Н4 и н1).
Как из позы выходиш...?

Еще смотри ....... u/chf
30.07 buy 1.2030

Н1
цена у граници. Форм. много, разные.... Нужные!
Н4
цена у средней линии канала, форм. 0.786.....
Сигнал??? сигнал!!!

Ну мах. 1.2065 и вниз!!!!
Че не так то????

Вход правельный?
Помоги !!!!!!
[/quote]


А как же WADDAH ATAR RSI LEVEL, когда вчера и сегодня просматривал все пары на чиф не обратил внимания именно потому что цена была где-то посреди индикатора, этот индюк Ваз выкладывал в старой теме страниц 10 назад.

И еще, до этого потерял больше 2/3 депо потому что не очень часто в нет выходил, а в сделку войти хотелось, вот и входил во все более-менее красивые сделки. А за вчера и сегодня увеличил депо более чем в 2.5 раза строго соблюдая ТС.

А выходил то с появлением сетки на Н4, то на Н1. А вообще выходить надо с появлением любых желтых цифр на Н4. Но Ваз предлогает выход с противоположным сигналом, а я просто не хочу нервничать и ждать коррекцию, так лично мне спокойнее.

[vaz321]

[quote name='justMAX' post='214631' date='31.7.2007, 17:26']
Народ, почему молчим? Кто-нибудь еще тестит систему на Н4?
У меня с учетом сделки по евре, открытой еще вечером в пятницу и еще 3 сделок, открытых вчера утром и закрытых сегодня - в цулом 345 пипсов прибыли. Это все с учетом того, что я немного трусил и не всегда ждал сетки на Н4, а выходил с появлением 0.382 на Н1, т.к. не хотел долго ждать коррекции и возвращения цены обратно. Если б выходил по Н4, то было бы пипсов 500 уже.
К тому же сейчас в небольшом плюсе на еврофунте и только что продал индекс евро (не по системе, просто очень хотелось, т.к. судя по Н4 должен идти вниз, а сейчас только закончилась коррекция).

А как у остальных супехи?
[/quote]
У меня по всем парам,что я выдавал-профит
единственный лось по баксойене
Никак не пойму,почему у госпожи Лены одни лоси
до и ПЕРВЫЙ в нуле видно ребята вы что-то
не догоняете в системе

[dehash]

[url="http://img154.imageshack.us/my.php?image=eurchfh1wc1.gif"][img]http://img154.imageshack.us/img154/5416/eurchfh1wc1.th.gif[/img][/url]

[url="http://img154.imageshack.us/my.php?image=eurchfbf7.gif"][img]http://img154.imageshack.us/img154/6291/eurchfbf7.th.gif[/img][/url]

[Лена]

[quote name='vaz321' post='214713' date='31.7.2007, 21:42']
У меня по всем парам,что я выдавал-профит
единственный лось по баксойене
Никак не пойму,почему у госпожи Лены одни лоси
до и ПЕРВЫЙ в нуле видно ребята вы что-то
не догоняете в системе
[/quote]
Привет,VAZ!Лосей нет,играю по своему.Удачи!Сейчас,на разворотах,только греби!

Vitar!Спасибо за наводку на JMA.Уникальная штука!Удачи и профитов!!! Изменено 1 августа, 2007 пользователем Лена

[justMAX]

К приложенным сигналам denash можно добавить еще пар пять, но я вошел по самым красивым сигналам: EURCHF AUDCHF CADJPY, похоже будут очень профитные сделки

И еще - очень хороший сигнал на USDJPY, ну и к NZDJPY можно присмотреться. Изменено 1 августа, 2007 пользователем justMAX

[dehash]

Если будете выкладывать картинки, то многим будет намного понятнее сигналы на вход (NDZUSD, GBPJPY, AUDNDZ тоже неплохие сигналы по моему).

[url="http://img77.imageshack.us/my.php?image=g1do0.gif"][img]http://img77.imageshack.us/img77/5412/g1do0.th.gif[/img][/url]

[url="http://img77.imageshack.us/my.php?image=g4gs4.gif"][img]http://img77.imageshack.us/img77/6447/g4gs4.th.gif[/img][/url]



[url="http://img258.imageshack.us/my.php?image=n1xr0.gif"][img]http://img258.imageshack.us/img258/8814/n1xr0.th.gif[/img][/url]

[url="http://img258.imageshack.us/my.php?image=n4ff7.gif"][img]http://img258.imageshack.us/img258/445/n4ff7.th.gif[/img][/url]


[url="http://img257.imageshack.us/my.php?image=a1xc8.gif"][img]http://img257.imageshack.us/img257/2051/a1xc8.th.gif[/img][/url]

[url="http://img257.imageshack.us/my.php?image=a4jy0.gif"][img]http://img257.imageshack.us/img257/5223/a4jy0.th.gif[/img][/url] Изменено 1 августа, 2007 пользователем dehash

[ПЕРВЫЙ(1)]

[quote name='dehash' post='214904' date='1.8.2007, 14:00']
[url="http://img154.imageshack.us/my.php?image=eurchfh1wc1.gif"][img]http://img154.imageshack.us/img154/5416/eurchfh1wc1.th.gif[/img][/url]

[url="http://img154.imageshack.us/my.php?image=eurchfbf7.gif"][img]http://img154.imageshack.us/img154/6291/eurchfbf7.th.gif[/img][/url]
[/quote]
А какие настройки сетки у тебя???
Просто у меня нет таких цифр(1,6 0,3) на H4

Расскажите еще Aud/usd можно покупать? Изменено 1 августа, 2007 пользователем ПЕРВЫЙ(1)

[dehash]

Я ничего не менял. Как скачал у vaz321 в основной ветке по ссылке, так и применяю:


[quote]//+----------------------------------------------------------------------+
//|ZigZag с чилами Песавенто |
//|----------------------------------------------------------------------+ |
//|ExtHidden - 0 - все линии скрыты. Обычный ZigZag. |
//| 1 - показывает все линии между фракталами, у которых |
//| процент восстановления >0.21 и <5. |
//| 2 - показывает только те линии, где процент восстано- |
//| вления равен числам Песавенто (и 0.866 для постро- |
//| ения паттернов Gartley) |
//| 3 - показывает числа, перечисленные в пункте 2 |
//| и соответствующие линии |
//| 4 - показывает числа не Песавенто и соответствующие линии |
//| |
//| |
//|ExtFractal - количество фракталов (максимумов, минимумов), |
//| от которых идут линии к другим фракталам |
//| |
//|ExtFractalNext - количество фракталов, к которым идут линии |
//| не реализовано |
//| |
//|ExtDeltaType - true - расчет допуска (%-число Песавенто)<ExtDelta |
//| false - ((%-число Песавенто)/число Песавенто)<ExtDelta | |
//| |
//|ExtDelta - (допуск) отклонение в расчете. Задает величину |
//| потенциальной разворотной зоны. |
//| |
//| |
//| |
//| |
//| |
//+----------------------------------------------------------------------+
#property copyright "nen@.....ru"
#property link "http://onix-trade.net/forum/index.php?act=post&do=reply_post&f=9&t=118"

#property indicator_chart_window
#property indicator_buffers 1
#property indicator_color1 Red
//---- indicator parameters
extern int ExtDepth=12;
extern int ExtHidden=1;
extern int ExtFractal=15;
//extern int ExtFractalNext=2;
extern double ExtDelta=0.04;
extern bool ExtDeltaType=true;
extern color ExtLine=DarkBlue;
extern color ExtPesavento=Yellow;
extern color ExtGartley866=GreenYellow;
extern color ExtNotFibo=SlateGray;
extern int ExtDeviation=5;
extern int ExtBackstep=3;

//---- indicator buffers
// Массив для отрисовки ZigZag
double zz[];
// Массив минимумов черновой
double ExtMapBuffer[];
// Массив максимумов черновой
double ExtMapBuffer2[];

// Массив чисел Песавенто (Фибы и модифицированные Фибы)
double fi[]={0.382, 0.5, 0.618, 0.707, 0.786, 0.841, 0.886, 1.0, 1.128, 1.272, 1.414, 1.5, 1.618, 2.0, 2.414, 2.618, 4.0};
string fitxt[]={ ".382", "0.5", ".618", ".707", ".786", ".841", ".886", "1.0", "1.128", "1.272", "1.414", "1.5", "1.618", "2.0", "2.414", "2.618", "4.0" };
double HL,HLp,kk,kj,Angle;
// LowPrim,HighPrim,LowLast,HighLast - значения минимумов и максимумов баров
double LowPrim,HighPrim,LowLast,HighLast;
// numLowPrim,numHighPrim,numLowLast,numHighLast -номера баров
int numLowPrim,numHighPrim,numLowLast,numHighLast,k,k1,k2,ki,countLow1,countHigh1,shift;
// Время свечи с первым от нулевого бара фракталом
int timeFr1,timeFr1new;
// Количество линий, идущих от первого от нулевого бара фрактала к соседним фракталам
int countLineFr1;
// Счетчик фракталов
int countFr;
// Бар, до которого надо пересчитывать от нулевого бара
int numBar=0;
// Номер объекта
int numOb;
//Mаксимум или минимум бара первого фрактала
double hFr1, lFr1;
// Флаги
// flagFrNew=true - образовался новый фрактал или первый фрактал сместился на другой бар. =false - по умолчанию.
// flagFr=true - последний фрактал максимум. false - последний фрактал минимум.
bool flagLow,flagHigh,flagFr,flagFrNew=false;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
IndicatorBuffers(5);
//---- drawing settings
SetIndexStyle(0,DRAW_SECTION);
//---- indicator buffers mapping
SetIndexBuffer(0,zz);
SetIndexBuffer(1,ExtMapBuffer);
SetIndexBuffer(2,ExtMapBuffer2);
// SetIndexBuffer(3,aLow);
// SetIndexBuffer(4,aHigh);
SetIndexEmptyValue(0,0.0);
ArraySetAsSeries(zz,true);
ArraySetAsSeries(ExtMapBuffer,true);
ArraySetAsSeries(ExtMapBuffer2,true);
//---- indicator short name
IndicatorShortName("ZZ("+ExtDepth+","+ExtDeviation+","+ExtBackstep+")");
//---- initialization done
return(0);
}
//+------------------------------------------------------------------+
//| Деинициализация. Удаление всех трендовых линий и текстовых объектов
//+------------------------------------------------------------------+
int deinit(){ ObjectsDeleteAll(0,2); ObjectsDeleteAll(0,21); return(0);}
//********************************************************
int start()
{
int counted_bars=IndicatorCounted();

if( counted_bars<0 )
{
Alert("Сбой расчета индикатора");
return(-1);
}

int shift, back,lasthighpos,lastlowpos;
double val,res;
double curlow,curhigh,lasthigh,lastlow;

for(shift=Bars-ExtDepth; shift>=0; shift--)
{
val=Low[Lowest(NULL,0,MODE_LOW,ExtDepth,shift)];
if(val==lastlow) val=0.0;
else
{
lastlow=val;
if((Low[shift]-val)>(ExtDeviation*Point)) val=0.0;
else
{
for(back=1; back<=ExtBackstep; back++)
{
res=ExtMapBuffer[shift+back];
if((res!=0)&&(res>val)) ExtMapBuffer[shift+back]=0.0;
}
}
}
ExtMapBuffer[shift]=val;
//--- high
val=High[Highest(NULL,0,MODE_HIGH,ExtDepth,shift)];
if(val==lasthigh) val=0.0;
else
{
lasthigh=val;
if((val-High[shift])>(ExtDeviation*Point)) val=0.0;
else
{
for(back=1; back<=ExtBackstep; back++)
{
res=ExtMapBuffer2[shift+back];
if((res!=0)&&(res<val)) ExtMapBuffer2[shift+back]=0.0;
}
}
}
ExtMapBuffer2[shift]=val;
}

// final cutting
lasthigh=-1; lasthighpos=-1;
lastlow=-1; lastlowpos=-1;

for(shift=Bars-ExtDepth; shift>=0; shift--)
{
curlow=ExtMapBuffer[shift];
curhigh=ExtMapBuffer2[shift];
if((curlow==0)&&(curhigh==0)) continue;
//---
if(curhigh!=0)
{
if(lasthigh>0)
{
if(lasthigh<curhigh) ExtMapBuffer2[lasthighpos]=0;
else ExtMapBuffer2[shift]=0;
}
//---
if(lasthigh<curhigh || lasthigh<0)
{
lasthigh=curhigh;
lasthighpos=shift;
}
lastlow=-1;
}
//----
if(curlow!=0)
{
if(lastlow>0)
{
if(lastlow>curlow) ExtMapBuffer[lastlowpos]=0;
else ExtMapBuffer[shift]=0;
}
//---
if((curlow<lastlow)||(lastlow<0))
{
lastlow=curlow;
lastlowpos=shift;
}
lasthigh=-1;
}
}

countLow1=0;
countHigh1=0;

for(shift=Bars-1; shift>=0; shift--)
{
zz[shift]=ExtMapBuffer[shift];
if(shift>=Bars-ExtDepth) {ExtMapBuffer2[shift]=0.0;ExtMapBuffer[shift]=0.0; zz[shift]=0.0;}
else
{
res=ExtMapBuffer2[shift];
if(res!=0.0) zz[shift]=res;
}
if (ExtMapBuffer[shift]>0.0) {countLow1++;}
if (ExtMapBuffer2[shift]>0.0) {countHigh1++;}
}

if (flagFrNew)
{
countLow1=0;
countHigh1=0;
for(shift=0; shift<=numBar; shift++)
{
if (ExtMapBuffer[shift]>0.0) {countLow1++;}
if (ExtMapBuffer2[shift]>0.0) {countHigh1++;}
}
counted_bars=3;
}

if (Bars - counted_bars>2)
{
for (shift=0; shift<Bars; shift++) // Поиск времени бара первого фрактала, считая от нулевого бара
{
if (zz[shift]>0.0)
{
timeFr1=Time[shift];
if (ExtMapBuffer[shift]==zz[shift]) {lFr1=Low[shift]; hFr1=0.0;}
if (ExtMapBuffer2[shift]==zz[shift]) {hFr1=High[shift]; lFr1=0.0;}

break;
}
}


//-----------1 Отрисовка максимумов. Начало.
//+--------------------------------------------------------------------------+
//| Вывод соединяющих линий и чисел Песавенто и 0.866 для максимумов ZigZag-a
//| Отрисовка идет от нулевого бара
//+--------------------------------------------------------------------------+

numLowPrim=0; numLowLast=0;
numHighPrim=0; numHighLast=0;

LowPrim=0.0; LowLast=0.0;
HighPrim=0.0; HighLast=0.0;

flagHigh=false;
Angle=-100;

countFr=ExtFractal;

for (k=0; (k<Bars-1 && countHigh1>0 && countFr>0); k++)
{
if (ExtMapBuffer[k]>0.0 && LowPrim==0.0 && HighPrim>0 && ExtMapBuffer[k]==zz[k]) {LowPrim=ExtMapBuffer[k]; numLowPrim=k;}
if (ExtMapBuffer[k]>0.0 && ExtMapBuffer[k]<LowPrim && HighPrim>0 && ExtMapBuffer[k]==zz[k]) {LowPrim=ExtMapBuffer[k]; numLowPrim=k;}
if (ExtMapBuffer2[k]>0.0 && ExtMapBuffer2[k]==zz[k])
{
if (HighPrim>0)
{
if (HighLast>0)
{
if (flagHigh)
{
if (ExtMapBuffer2[k]>HighLast) {HighLast=High[k]; numHighLast=k;}
}
else
{
if (ExtMapBuffer2[k]>HighPrim) flagHigh=true;
HighLast=High[k];
numHighLast=k;
}
}
else {numHighLast=k; HighLast=High[k];}

HL=High[numHighLast]-Low[numLowPrim];
kj=(HighPrim-HighLast)*10000/(numHighLast-numHighPrim);
if (HL>0 && (Angle>kj || Angle==-100)) // Проверка угла наклона линии
{
Angle=kj;
// Создание линии и текстового объекта
HLp=High[numHighPrim]-Low[numLowPrim];
k1=MathCeil((numHighPrim+numHighLast)/2);
kj=HLp/HL;

if (kj>0.21 && kj<=5)
{
// Создание текстового объекта (числа Песавенто). % восстановления между максимумами
kk=kj;
k2=1;
if (ExtDeltaType)
for (ki=16;ki>=0;ki--) {if (MathAbs(fi[ki]-kj)<=ExtDelta) {kk=fi[ki]; k2=-1; break;}}
else
for (ki=16;ki>=0;ki--) {if (MathAbs((fi[ki]-kj)/fi[ki])<=ExtDelta) {kk=fi[ki]; k2=-1; break;}}

if (k2<0)
// процент восстановления числа Песавенто и 0.866
{
if (ExtHidden!=4 && ExtHidden>0)
{
ObjectCreate("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],OBJ_TEXT,0,Time[k1],MathAbs((High[numHighPrim]+High[numHighLast])/2));
if (kk==0.886) // Gartley
ObjectSetText("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],fitxt[ki],7,"Arial", ExtGartley866);
else
ObjectSetText("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],fitxt[ki],7,"Arial",ExtPesavento);
}
}
else
// процент восстановления (не Песавенто и 0.866)
{
if (ExtHidden==1 || ExtHidden==4)
{
ObjectCreate("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],OBJ_TEXT,0,Time[k1],MathAbs((High[numHighPrim]+High[numHighLast])/2));
ObjectSetText("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],""+DoubleToStr(kk,2),7,"Arial",ExtNotFibo);
}
}
if ((ExtHidden==2 && k2<0) || (ExtHidden!=0 && ExtHidden!=2))
{
ObjectCreate("ph" + Time[numHighPrim] + "_" + Time[numHighLast],OBJ_TREND,0,Time[numHighPrim],High[numHighPrim],Time[numHighLast],High[numHighLast]);
ObjectSet("ph" + Time[numHighPrim] + "_" + Time[numHighLast],OBJPROP_RAY,false);
ObjectSet("ph" + Time[numHighPrim] + "_" + Time[numHighLast],OBJPROP_STYLE,STYLE_DOT);
ObjectSet("ph" + Time[numHighPrim] + "_" + Time[numHighLast],OBJPROP_COLOR,ExtLine);
}
}
}
}
else
{numHighPrim=k; HighPrim=High[k];}
}
// Переход на следующий фрактал
if (k>Bars-3)
{
k=numHighPrim+1; countHigh1--; countFr--;

numLowPrim=0; numLowLast=0;
numHighPrim=0; numHighLast=0;

LowPrim=0.0; LowLast=0.0;
HighPrim=0.0; HighLast=0.0;

flagHigh=false;
Angle=-100;
}
}
//-----------1 Отрисовка максимумов. Конец.

//-----------2 Отрисовка минимумов. Начало.
//+-------------------------------------------------------------------------+
//| Вывод соединяющих линий и чисел Песавенто и 0.866 для минимумов ZigZag-a
//| Отрисовка идет от нулевого бара
//+-------------------------------------------------------------------------+

numLowPrim=0; numLowLast=0;
numHighPrim=0; numHighLast=0;

LowPrim=0.0; LowLast=0.0;
HighPrim=0.0; HighLast=0.0;

flagLow=false;
Angle=-100;

if (flagFrNew) countFr=1;
else countFr=ExtFractal;

for (k=0; (k<Bars && countLow1>0 && countFr>0); k++)
{
if (ExtMapBuffer2[k]>HighPrim && LowPrim>0) {HighPrim=High[k]; numHighPrim=k;}
if (ExtMapBuffer[k]>0.0 && ExtMapBuffer[k]==zz[k])
{
if (LowPrim>0)
{
if (LowLast>0)
{
if (flagLow)
{
if (ExtMapBuffer[k]<LowLast) {LowLast=Low[k]; numLowLast=k;}
}
else
{
if (ExtMapBuffer[k]<LowPrim) flagLow=true;
LowLast=Low[k];
numLowLast=k;
}
}
else {numLowLast=k; LowLast=Low[k];}
// вывод соединяющих линий и процентов восстановления(чисел Песавенто)
HL=High[numHighPrim]-Low[numLowLast];
kj=(LowPrim-LowLast)*1000/(numLowLast-numLowPrim);
if (HL>0 && (Angle<kj || Angle==-100)) // Проверка угла наклона линии
{
Angle=kj;

HLp=High[numHighPrim]-Low[numLowPrim];
k1=MathCeil((numLowPrim+numLowLast)/2);
kj=HLp/HL;

if (kj>0.21 && kj<=5)
{
// Создание текстового объекта (числа Песавенто). % восстановления между минимумами
kk=kj;
k2=1;
if (ExtDeltaType)
for (ki=16;ki>=0;ki--) {if (MathAbs(fi[ki]-kj)<=ExtDelta) {kk=fi[ki]; k2=-1; break;}}
else
for (ki=16;ki>=0;ki--) {if (MathAbs((fi[ki]-kj)/fi[ki])<=ExtDelta) {kk=fi[ki]; k2=-1; break;}}
if (k2<0)
// процент восстановления числа Песавенто и 0.866
{
if (ExtHidden!=4 && ExtHidden>0)
{
ObjectCreate("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],OBJ_TEXT,0,Time[k1],MathAbs((Low[numLowPrim]+Low[numLowLast])/2));
if (kk==0.886) // Gartley
ObjectSetText("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],fitxt[ki],7,"Arial", ExtGartley866);
else
ObjectSetText("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],fitxt[ki],7,"Arial",ExtPesavento);
}
}
else
// процент восстановления (не Песавенто и 0.866)
{
if (ExtHidden==1 || ExtHidden==4)
ObjectCreate("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],OBJ_TEXT,0,Time[k1],MathAbs((Low[numLowPrim]+Low[numLowLast])/2));
ObjectSetText("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],""+DoubleToStr(kk,2),7,"Arial",ExtNotFibo);
}
if ((ExtHidden==2 && k2<0) || (ExtHidden!=0 && ExtHidden!=2))
{
ObjectCreate("pl" + Time[numLowPrim] + "_" + Time[numLowLast],OBJ_TREND,0,Time[numLowPrim],Low[numLowPrim],Time[numLowLast],Low[numLowLast]);
ObjectSet("pl" + Time[numLowPrim] + "_" + Time[numLowLast],OBJPROP_RAY,false);
ObjectSet("pl" + Time[numLowPrim] + "_" + Time[numLowLast],OBJPROP_STYLE,STYLE_DOT);
ObjectSet("pl" + Time[numLowPrim] + "_" + Time[numLowLast],OBJPROP_COLOR,ExtLine);
}
}
}
}
else {numLowPrim=k; LowPrim=Low[k];}
}
// Переход на следующий фрактал
if (k>Bars-3)
{
k=numLowPrim+1; countLow1--; countFr--;

numLowPrim=0; numLowLast=0;
numHighPrim=0; numHighLast=0;

LowPrim=0.0; LowLast=0.0;
HighPrim=0.0; HighLast=0.0;

flagLow=false;
Angle=-100;
}
}

flagFrNew=false;
numBar=0;
//-----------2 Отрисовка минимумов. Конец.
}
else // counted_bars<=2 Проверка смещений фракталов.
// Коррекция соединяющих линий и чисел. Начало.

{

// Поиск времени бара первого фрактала, считая от нулевого бара
for (shift=0; shift<Bars; shift++)
{
if (zz[shift]>0.0)
{
timeFr1new=Time[shift];
break;
}
}
// Поиск бара, на котором был последний фрактал
shift=iBarShift(Symbol(),Period(),timeFr1);
// Сравнение текущего значения фрактала с тем, который был ранее


// Образовался новый фрактал
if (timeFr1new!=timeFr1)
{
flagFrNew=true;
numBar=shift;
}
// Фрактал на максимуме сдвинулся на другой бар
if (hFr1>0 && zz[shift]==0.0)
{
flagFrNew=true;
numBar=shift;
numHighPrim=shift; numHighLast=0;HighLast=0.0;
for (k=shift+1; k<Bars; k++)
{
if (ExtMapBuffer2[k]>HighLast)
{
HighLast=High[k]; numHighLast=k;
numOb=ObjectFind("ph" + Time[numHighPrim] + "_" + Time[numHighLast]);
//if (numOb>-1) Print ("MAX_numOb>-1=",numOb);
if (numOb>-1)
{
numOb=ObjectDelete("ph" + Time[numHighPrim] + "_" + Time[numHighLast]);
//Print ("MAX_удалено numOb>-1=",numOb);

ObjectDelete("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast]);
}
}

}
}
// Фрактал на минимуме сдвинулся на другой бар
if (lFr1>0 && zz[shift]==0.0)
{
flagFrNew=true;
numBar=shift;
flagFrNew=true;
numBar=shift;
numLowPrim=shift; numLowLast=0;LowLast=10000000;
for (k=shift+1; k<Bars; k++)
{
if (ExtMapBuffer[k]<LowLast)
{
LowLast=Low[k]; numLowLast=k;
numOb=ObjectFind("pl" + Time[numLowPrim] + "_" + Time[numLowLast]);
//if (numOb>-1) Print ("MIN_numOb>-1=",numOb);
if (numOb>-1)
{
numOb=ObjectDelete("pl" + Time[numLowPrim] + "_" + Time[numLowLast]);
//Print ("MIN_удалено numOb>-1=",numOb);
ObjectDelete("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast]);
}
}

}
}


//-----------3 Сместился минимум или максимум, но остался на том же баре. Начало.

//============= 1 сместился максимум. Начало.
if (hFr1-High[shift]!=0 && hFr1>0)
{
// Print ("Сместился максимум на том же баре hFr1-High[shift]=",hFr1-High[shift]);

numLowPrim=0; numLowLast=0;
numHighPrim=shift; numHighLast=0;

LowPrim=0.0; LowLast=0.0;
HighPrim=High[shift]; HighLast=0.0;

flagHigh=false;
Angle=-100;

for (k=shift+1; k<Bars; k++)
{

if (ExtMapBuffer[k]>0.0 && LowPrim==0.0 && ExtMapBuffer[k]==zz[k]) {LowPrim=ExtMapBuffer[k]; numLowPrim=k;}
if (ExtMapBuffer[k]>0.0 && ExtMapBuffer[k]<LowPrim && ExtMapBuffer[k]==zz[k]) {LowPrim=ExtMapBuffer[k]; numLowPrim=k;}
if (ExtMapBuffer2[k]>0.0 && ExtMapBuffer2[k]==zz[k])
{
if (HighLast>0)
{
if (flagHigh)
{
if (ExtMapBuffer2[k]>HighLast) {HighLast=High[k]; numHighLast=k;}
}
else
{
if (ExtMapBuffer2[k]>HighPrim) flagHigh=true;
HighLast=High[k];
numHighLast=k;
}
}
else {numHighLast=k; HighLast=High[k];}
HL=High[numHighLast]-Low[numLowPrim];
kj=(HighPrim-HighLast)*10000/(numHighLast-numHighPrim);
if (HL>0 && (Angle>kj || Angle==-100)) // Проверка угла наклона линии
{
Angle=kj;
// Создание линии
HLp=High[numHighPrim]-Low[numLowPrim];
k1=MathCeil((shift+numHighLast)/2);
kj=HLp/HL;
// Поиск старой соединительной линии
numOb=ObjectFind("ph" + Time[numHighPrim] + "_" + Time[numHighLast]);
if (numOb>-1)
{
if (kj>0.21 && kj<=5)
{
// Перемещение объектов
ObjectMove("ph" + Time[numHighPrim] + "_" + Time[numHighLast],0,Time[numHighPrim],High[numHighPrim]);
ObjectMove("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],0,Time[k1],MathAbs((High[numHighPrim]+High[numHighLast])/2));

// Создание текстового объекта (числа Песавенто). % восстановления между максимумами
kk=kj;
k2=1;
if (ExtDeltaType)
for (ki=16;ki>=0;ki--) {if (MathAbs(fi[ki]-kj)<=ExtDelta) {kk=fi[ki]; k2=-1; break;}}
else
for (ki=16;ki>=0;ki--) {if (MathAbs((fi[ki]-kj)/fi[ki])<=ExtDelta) {kk=fi[ki]; k2=-1; break;}}
if (k2<0)
// процент восстановления число Песавенто
if (ExtHidden!=4 && ExtHidden>0)
{
if (kk==0.886)
ObjectSetText("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],fitxt[ki],7,"Arial", ExtGartley866);
else
ObjectSetText("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],fitxt[ki],7,"Arial",ExtPesavento);
}
else
// процент восстановления (не Песавенто)
if (ExtHidden==1 || ExtHidden==4)
ObjectSetText("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],""+DoubleToStr(kk,2),7,"Arial",ExtNotFibo);
}
else
{
ObjectDelete("ph" + Time[numHighPrim] + "_" + Time[numHighLast]);
ObjectDelete("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast]);
}
}
else
{
//******* Прорисовка новой линии, если она появилась.
if (kj>0.21 && kj<=5)
{
// Создание текстового объекта (числа Песавенто). % восстановления между максимумами
kk=kj;
k2=1;
if (ExtDeltaType)
for (ki=16;ki>=0;ki--) {if (MathAbs(fi[ki]-kj)<=ExtDelta) {kk=fi[ki]; k2=-1; break;}}
else
for (ki=16;ki>=0;ki--) {if (MathAbs((fi[ki]-kj)/fi[ki])<=ExtDelta) {kk=fi[ki]; k2=-1; break;}}
if (k2<0)
// процент восстановления числа Песавенто и 0.866
{
if (ExtHidden!=4 && ExtHidden>0)
{
ObjectCreate("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],OBJ_TEXT,0,Time[k1],MathAbs((High[numHighPrim]+High[numHighLast])/2));
if (kk==0.886) // Gartley
ObjectSetText("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],fitxt[ki],7,"Arial", ExtGartley866);
else
ObjectSetText("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],fitxt[ki],7,"Arial",ExtPesavento);
}
}
else
// процент восстановления (не Песавенто и 0.866)
{
if (ExtHidden==1 || ExtHidden==4)
{
ObjectCreate("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],OBJ_TEXT,0,Time[k1],MathAbs((High[numHighPrim]+High[numHighLast])/2));
ObjectSetText("phtxt" + Time[numHighPrim] + "_" + Time[numHighLast],""+DoubleToStr(kk,2),7,"Arial",ExtNotFibo);
}
}
if ((ExtHidden==2 && k2<0) || (ExtHidden!=0 && ExtHidden!=2))
{
ObjectCreate("ph" + Time[numHighPrim] + "_" + Time[numHighLast],OBJ_TREND,0,Time[numHighPrim],High[numHighPrim],Time[numHighLast],High[numHighLast]);
ObjectSet("ph" + Time[numHighPrim] + "_" + Time[numHighLast],OBJPROP_RAY,false);
ObjectSet("ph" + Time[numHighPrim] + "_" + Time[numHighLast],OBJPROP_STYLE,STYLE_DOT);
ObjectSet("ph" + Time[numHighPrim] + "_" + Time[numHighLast],OBJPROP_COLOR,ExtLine);
}
}
//*******
}
}
}
}
hFr1=High[shift];
timeFr1=Time[shift];
}
//============= 1 сместился максимум. Конец.
//
//============= 1 сместился минимум. Начало.
if (lFr1-Low[shift]!=0 && lFr1>0)
{
// Print ("Сместился минимум на том же баре lFr1-Low[shift]=",lFr1-Low[shift]);

numLowPrim=0; numLowLast=0;
numHighPrim=shift; numHighLast=0;

LowPrim=Low[shift]; LowLast=0.0;
HighPrim=0.0; HighLast=0.0;

flagLow=false;
Angle=-100;
for (k=shift+1; k<Bars; k++)
{
if (ExtMapBuffer2[k]>HighPrim) {HighPrim=High[k]; numHighPrim=k;}
if (ExtMapBuffer[k]>0.0 && ExtMapBuffer[k]==zz[k])
{
if (LowLast>0)
{
if (flagLow)
{
if (ExtMapBuffer[k]<LowLast) {LowLast=Low[k]; numLowLast=k;}
}
else
{
if (ExtMapBuffer[k]<LowPrim) flagLow=true;
LowLast=Low[k];
numLowLast=k;
}
}
else {numLowLast=k; LowLast=Low[k];}
HL=High[numHighPrim]-Low[numLowLast];
kj=(LowPrim-LowLast)*1000/(numLowLast-numLowPrim);
if (HL>0 && (Angle<kj || Angle==-100)) // Проверка угла наклона линии
{
Angle=kj;

HLp=High[numHighPrim]-Low[numLowPrim];
k1=MathCeil((numLowPrim+numLowLast)/2);
kj=HLp/HL;
// Поиск старой соединительной линии
numOb=ObjectFind("pl" + Time[numLowPrim] + "_" + Time[numLowLast]);
if (numOb>-1)
{
if (kj>0.21 && kj<=5)
{
// Перемещение объектов
ObjectMove("pl" + Time[numLowPrim] + "_" + Time[numLowLast],0,Time[numLowPrim],Low[numLowPrim]);
ObjectMove("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],0,Time[k1],MathAbs((Low[numLowPrim]+Low[numLowLast])/2));

// Создание текстового объекта (числа Песавенто). % восстановления между минимумами
kk=kj;
k2=1;
if (ExtDeltaType)
for (ki=16;ki>=0;ki--) {if (MathAbs(fi[ki]-kj)<=ExtDelta) {kk=fi[ki]; k2=-1; break;}}
else
for (ki=16;ki>=0;ki--) {if (MathAbs((fi[ki]-kj)/fi[ki])<=ExtDelta) {kk=fi[ki]; k2=-1; break;}}
if (k2<0)
// процент восстановления числа Песавенто и 0.866
{
if (ExtHidden!=4 && ExtHidden>0)
{
if (kk==0.886) // Gartley
ObjectSetText("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],fitxt[ki],7,"Arial", ExtGartley866);
else
ObjectSetText("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],fitxt[ki],7,"Arial",ExtPesavento);
}
}
else
// процент восстановления (не Песавенто и 0.866)
if (ExtHidden==1 || ExtHidden==4)
ObjectSetText("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],""+DoubleToStr(kk,2),7,"Arial",ExtNotFibo);
}
else
{
ObjectDelete("pl" + Time[numLowPrim] + "_" + Time[numLowLast]);
ObjectDelete("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast]);
}
}
else
{
//******* Прорисовка новой линии, если она появилась.
if (kj>0.21 && kj<=5)
{
// Создание текстового объекта (числа Песавенто). % восстановления между минимумами
kk=kj;
k2=1;
if (ExtDeltaType)
for (ki=16;ki>=0;ki--) {if (MathAbs(fi[ki]-kj)<=ExtDelta) {kk=fi[ki]; k2=-1; break;}}
else
for (ki=16;ki>=0;ki--) {if (MathAbs((fi[ki]-kj)/fi[ki])<=ExtDelta) {kk=fi[ki]; k2=-1; break;}}
if (k2<0)
// процент восстановления числа Песавенто и 0.866
{
if (ExtHidden!=4 && ExtHidden>0)
{
ObjectCreate("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],OBJ_TEXT,0,Time[k1],MathAbs((Low[numLowPrim]+Low[numLowLast])/2));
if (kk==0.886) // Gartley
ObjectSetText("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],fitxt[ki],7,"Arial", ExtGartley866);
else
ObjectSetText("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],fitxt[ki],7,"Arial",ExtPesavento);
}
}
else
// процент восстановления (не Песавенто и 0.866)
{
if (ExtHidden==1 || ExtHidden==4)
ObjectCreate("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],OBJ_TEXT,0,Time[k1],MathAbs((Low[numLowPrim]+Low[numLowLast])/2));
ObjectSetText("pltxt" + Time[numLowPrim] + "_" + Time[numLowLast],""+DoubleToStr(kk,2),7,"Arial",ExtNotFibo);
}
if ((ExtHidden==2 && k2<0) || (ExtHidden!=0 && ExtHidden!=2))
{
ObjectCreate("pl" + Time[numLowPrim] + "_" + Time[numLowLast],OBJ_TREND,0,Time[numLowPrim],Low[numLowPrim],Time[numLowLast],Low[numLowLast]);
ObjectSet("pl" + Time[numLowPrim] + "_" + Time[numLowLast],OBJPROP_RAY,false);
ObjectSet("pl" + Time[numLowPrim] + "_" + Time[numLowLast],OBJPROP_STYLE,STYLE_DOT);
ObjectSet("pl" + Time[numLowPrim] + "_" + Time[numLowLast],OBJPROP_COLOR,ExtLine);
}
}
//*******
}
}
}
}
lFr1=Low[shift];
timeFr1=Time[shift];
}
//============= 1 сместился минимум. Конец.
//-----------3 Сместился минимум или максимум, но остался на том же баре. Конец.




// Коррекция. Конец.
}


// end
}[/quote] Изменено 1 августа, 2007 пользователем dehash

[GRT]

решил поиграться с этой системой :) а на старых графиках vaz321 индикатор FX5_Divergence это теже мувинги или нет?

[justMAX]

[quote name='dehash' post='214938' date='1.8.2007, 12:11']
Если будете выкладывать картинки, то многим будет намного понятнее сигналы на вход.
[/quote]

Пожалуйста, все сделки в которые я недавно вошел:

AUDCHF
[img]http://img186.imageshack.us/img186/4165/audchfh11200nv2.gif[/img][img]http://img186.imageshack.us/img186/2421/audchfh41200kj4.gif[/img]

CADJPY
[img]http://img186.imageshack.us/img186/4746/cadjpyh11200kp6.gif[/img][img]http://img186.imageshack.us/img186/1826/cadjpyh41200kc3.gif[/img]

EURCHF
[img]http://img186.imageshack.us/img186/1792/eurchfh11200xd9.gif[/img][img]http://img186.imageshack.us/img186/6070/eurchfh41200pw7.gif[/img]

USDJPY
[img]http://img154.imageshack.us/img154/7342/usdjpyh11200vh0.gif[/img][img]http://img186.imageshack.us/img186/8407/usdjpyh41200ao6.gif[/img]


Еще сигналы на AUDJPY и NZDJPY, но в эти сделки я не входил, т.к. решил что и 4 хватит, к тому же на этих четырех красивые формации на Н1, а там их нет. Однако я почти полностью уверен, что и эти пары последуют вверх.

По всем сделкам у меня уже профит, есть вопросы - задавайте. Изменено 2 августа, 2007 пользователем justMAX

[dehash]

[quote name='ПЕРВЫЙ(1)' post='214955' date='1.8.2007, 5:39']


Расскажите еще Aud/usd можно покупать?
[/quote]


Там не видно цифр, по которым входить можно. Сейчас на стольких парах сигналы на вход, что есть из чего выбрать. Я не стал входить по этой паре.

[justMAX]

[quote name='dehash' post='214976' date='1.8.2007, 13:02']
Там не видно цифр, по которым входить можно. Сейчас на стольких парах сигналы на вход, что есть из чего выбрать. Я не стал входить по этой паре.
[/quote]

Ну почему же есть 0.618, но это скорее для дневки сигнал, т.к. для Н4 долговато тянется.

[ПЕРВЫЙ(1)]

А я Chf/jpy купил(98,29) ибо все другие сигналы пропустил.

Уровни waddah можно использовать как sup u res.

[justMAX]

[quote name='ПЕРВЫЙ(1)' post='214990' date='1.8.2007, 13:39']
А я Chf/jpy купил(98,29) ибо все другие сигналы пропустил.

Уровни waddah можно использовать как sup u res.
[/quote]

Сейчас все конечно прет вверх, но в следующий раз будь осторожнее - сигнал не очень, все таки цена на Н4 не достигла ср.линии. Удачи.

Кстати, я из своих сделок уже выскочил, т.к. кажись коррекция началась. Буду ждать конца коррекции и войду на CADJPY или NZDJPY с появлением фибо, т.к. на этих парах самый низкий РСИ. Изменено 1 августа, 2007 пользователем justMAX