Автор |
Сообщение |
Kreangast
Зарегистрирован: 28.07.2013
Сообщения: 79
|
High and low line。 |
_________________ Beginner
Последний раз редактировалось: Kreangast (Сб Сен 07, 2013 5:29 am), всего редактировалось 1 раз |
|
Посмотреть профиль Отправить личное сообщение |
|
=AL=
Зарегистрирован: 21.07.2010
Сообщения: 1
|
// Dia_Day
NewDay=Day() != Ref(Day(),-1);
DH= HighestSince(NewDay, H , 1) ;
DL= LowestSince (NewDay , L , 1) ;
DR50=DH- 0.5*(DH-DL);
Plot( DH, "DH",ParamColor( "Color DH", colorAqua ), ParamStyle("Style DH") );
Plot( DL, "DL", ParamColor( "Color DL", colorLightOrange), ParamStyle("Style DL") );
Plot( DR50,"DR50", ParamColor( "Color DRet50", colorRed), ParamStyle("Style DRet50") ); |
|
|
Посмотреть профиль Отправить личное сообщение |
|
Kreangast
Зарегистрирован: 28.07.2013
Сообщения: 79
|
=AL= писал(а): |
// Dia_Day
NewDay=Day() != Ref(Day(),-1);
DH= HighestSince(NewDay, H , 1) ;
DL= LowestSince (NewDay , L , 1) ;
DR50=DH- 0.5*(DH-DL);
Plot( DH, "DH",ParamColor( "Color DH", colorAqua ), ParamStyle("Style DH") );
Plot( DL, "DL", ParamColor( "Color DL", colorLightOrange), ParamStyle("Style DL") );
Plot( DR50,"DR50", ParamColor( "Color DRet50", colorRed), ParamStyle("Style DRet50") ); |
Hi =AL=
Thank you very much,Not every day , so if you can . Please advise
HH=H;
LL=L;
CC=Ref(C,1);
DR50=HH+(HH+LL+CC)*0.05
if (HH>DR50)
DH=HH;
DL= Next BAR Low;//
Plot( DH, "DH",ParamColor( "Color DH", colorAqua ), ParamStyle("Style DH") );
Plot( DL, "DL", ParamColor( "Color DL", colorLightOrange), ParamStyle("Style DL") );
Plot( DR50,"DR50", ParamColor( "Color DRet50", colorRed), ParamStyle("Style DRet50") );
[url][IMG]http://p13.freep.cn/p.aspx?u=v20_p13_photo_1308062155134226_0.jpg[/IMG][/url] |
_________________ Beginner |
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
(HH>DR50)
Not possible
HH < DR50 always
1. DR50=HH+(HH+LL+CC)*0.05
2. HH>DR50
=>
HH > HH+(HH+LL+CC)*0.05 => Not possible |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Kreangast
Зарегистрирован: 28.07.2013
Сообщения: 79
|
000 писал(а): |
(HH>DR50)
Not possible
HH < DR50 always
1. DR50=HH+(HH+LL+CC)*0.05
2. HH>DR50
=>
HH > HH+(HH+LL+CC)*0.05 => Not possible |
Hi 000
HH>LL+(LL+CC)*0.05
If not , how to do it. Thank you
In the above diagram , see my ideas,
How to write this AFL statement
LL = Next Bar Low
Thank you |
_________________ Beginner |
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
On your picture PA1
What is the formula of calculation PA1. |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Kreangast
Зарегистрирован: 28.07.2013
Сообщения: 79
|
000 писал(а): |
On your picture PA1
What is the formula of calculation PA1. |
Than the current highest point is meant to add some stop-loss
I wonder if we can
HH> LL +(LL + CC)0.05
There are good suggestions please say next |
_________________ Beginner |
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
On your chart I see that PA1 changing when C > PA1.
Say it is calculated PA1?
I will write all of the code. |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Kreangast
Зарегистрирован: 28.07.2013
Сообщения: 79
|
000 писал(а): |
On your chart I see that PA1 changing when C > PA1.
Say it is calculated PA1?
I will write all of the code. |
I think H> PA1;
TR=Max(Max((High-Low),abs(Ref(Close,-1)-High)),abs(Ref(Close,-1)-Low));
PA1 =L+TR*8;
First thank you very much and look forward to the
|
_________________ Beginner |
|
Посмотреть профиль Отправить личное сообщение |
|
Kreangast
Зарегистрирован: 28.07.2013
Сообщения: 79
|
Kreangast писал(а): |
000 писал(а): |
On your chart I see that PA1 changing when C > PA1.
Say it is calculated PA1?
I will write all of the code. |
I think H> PA1;
TR=Max(Max((High-Low),abs(Ref(Close,-1)-High)),abs(Ref(Close,-1)-Low));
PA1 =L+TR*8;
First thank you very much and look forward to the
|
|
_________________ Beginner |
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Ups.
Then PA1 always only increases
Код: |
TR = Max(Max((High - Low), abs(Ref(Close, -1) - High)), abs(Ref(Close, -1) - Low));
PA = L + TR * 8;
PA1[1] = PA[1];
for(i = 2; i < BarCount; i++) {
if(H[i] > PA1[i-1])
PA1[i] = PA[i];
else
PA1[i] = PA1[i - 1];
}
Plot(C, "", colorBlack, styleCandle);
Plot(PA1, "", colorRed);
|
|
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Kreangast
Зарегистрирован: 28.07.2013
Сообщения: 79
|
[quote="000"]Ups.
Then PA1 always only increases
[code] |
_________________ Beginner
Последний раз редактировалось: Kreangast (Чт Авг 08, 2013 1:53 pm), всего редактировалось 1 раз |
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
Код: |
SetBarsRequired(sbrAll, 0);
TR = Max(Max((High - Low), abs(Ref(Close, -1) - High)), abs(Ref(Close, -1) - Low));
PA = L + TR * 8;
PA1[1] = PA[1];
PS = H - TR * 8;
PS1[1] = PS[1];
for(i = 2; i < BarCount; i++) {
if(H[i] > PA1[i-1]) {
PA1[i] = PA[i];
PS1[i] = PS[i];
}
else if(L[i] < PS1[i-1]) {
PS1[i] = PS[i];
PA1[i] = PA[i];
}
else {
PA1[i] = PA1[i - 1];
PS1[i] = PS1[i - 1];
}
}
Plot(C, "", colorBlack, styleCandle);
Plot(PA1, "", colorRed);
Plot(PS1, "", colorBlue);
|
??? |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
Kreangast
Зарегистрирован: 28.07.2013
Сообщения: 79
|
|
Посмотреть профиль Отправить личное сообщение |
|
000
Site Admin
Зарегистрирован: 10.12.2007
Сообщения: 9106
|
I can not understand this code. Accordingly can not understand the idea. |
_________________ ceterum censeo carthaginem esse delendam
Удачи. Олег. |
|
Посмотреть профиль Отправить личное сообщение Посетить сайт автора |
|
|