커뮤니티
지표식구합니다
2022-01-10 21:23:46
1249
글번호 155279
분봉이나 틱봉에서
전일과 분리된 종가 파라볼릭이
직전 상승전환시의 파라볼릭값과 현재 상승전환시의 파라볼릭값을 연결하는 추세선을 나타내는 지표식을 구합니다
반대로 직전 하락전환시의 파라볼릭값과 현재 하락전환시의 파라볼릭값을 연결하는 추세선을 나타내는 지표식을 구합니다
감사합니다
답변 2
예스스탁 예스스탁 답변
2022-01-11 09:35:11
안녕하세요
예스스탁입니다.
Input : AF(0.02), AFMAX(0.2);
Var : Direction(0), SAR_Value(Close), AF_Value(.02), HighValue(High), LowValue(Low), EP(0),CSarv(0);
if Index == 0 or (Bdate != Bdate[1]) Then
{
Direction = 0;
SAR_Value = C;
AF_Value = 0.02;
HighValue = H;
LowValue = L;
EP = 0;
}
if EP != 0 Then
{
if Direction == 1 then
{
EP = HighValue;
SAR_Value = SAR_Value + AF_Value * (EP - SAR_Value);
if High > HighValue then
{
HighValue = High;
AF_Value = AF_Value + AF;
if AF_Value >= AFMAX then AF_Value = AFMAX;
}
if Close < SAR_Value then
{
Direction = -1;
SAR_Value = EP;
AF_Value = 0;
EP = 0;
LowValue = low;
}
}
else
{
EP = LowValue;
SAR_Value = SAR_Value + AF_Value * (EP - SAR_Value);
if Low < LowValue then
{
LowValue = Low;
AF_Value = AF_Value + Af;
if AF_Value >= AFMAX then AF_Value = AFMAX;
}
if Close > SAR_Value then
{
Direction = 1;
SAR_Value = EP;
AF_Value = 0;
EP = 0;
HighValue = High;
}
}
CSarv = SAR_Value;
}
else
{
if SAR_Value != 0 && EP == 0 then
{
if Direction == 1 then
{
EP = HighValue;
AF_Value = AF;
SAR_Value = SAR_Value + AF_Value * (EP - SAR_Value);
if High > HighValue then
{
HighValue = High;
AF_Value = AF_Value + AF;
if AF_Value >= AFMAX then AF_Value = AFMAX;
}
}
else
{
EP = LowValue;
AF_Value = Af;
SAR_Value = SAR_Value + AF_Value * (EP - SAR_Value);
if Low < LowValue then
{
LowValue = Low;
AF_Value = AF_Value + AF;
if AF_Value >= AFMAX then AF_Value = AFMAX;
}
}
CSarv = SAR_Value;
}
else
{
if Direction == 0 then
{
if Close > Close[1] then Direction = 1;
else
if Close < Close[1] then Direction = -1;
}
else
{
if Direction == 1 then
{
if Close < Close[1] then
{
Direction = -1;
SAR_Value = HighValue;
CSarv = SAR_Value;
}
}
if Direction == -1 then
{
if Close > Close[1] then
{
Direction = 1;
SAR_Value = LowValue;
CSarv = SAR_Value;
}
}
}
LowValue = min(Low, LowValue);
HighValue = max(High, HighValue);
}
}
Plot1(CSarv,"종가파라볼릭",iff(C>CSarv,RED,BLUE));
var : hh(0),hd(0),ht(0),hh1(0),hd1(0),ht1(0);
var : ll(0),ld(0),lt(0),ll1(0),ld1(0),lt1(0);
var : TL(0);
if CrossUp(C,CSarv) Then
{
hh = Csarv;
hd = sDate;
ht = sTime;
hh1 = hh[1];
hd1 = hd[1];
ht1 = ht[1];
TL = TL_New(hd1,ht1,hh1,hd,ht,hh);
TL_SetColor(TL,RED);
}
if CrossDown(C,CSarv) Then
{
ll = Csarv;
ld = sDate;
lt = sTime;
ll1 = ll[1];
ld1 = ld[1];
lt1 = lt[1];
TL = TL_New(ld1,lt1,ll1,ld,lt,ll);
TL_SetColor(TL,BLUE);
}
즐거운 하루되세요
> 느림보 님이 쓴 글입니다.
> 제목 : 지표식구합니다
> 분봉이나 틱봉에서
전일과 분리된 종가 파라볼릭이
직전 상승전환시의 파라볼릭값과 현재 상승전환시의 파라볼릭값을 연결하는 추세선을 나타내는 지표식을 구합니다
반대로 직전 하락전환시의 파라볼릭값과 현재 하락전환시의 파라볼릭값을 연결하는 추세선을 나타내는 지표식을 구합니다
감사합니다
느림보
2022-01-11 13:37:51
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 지표식구합니다
>
안녕하세요
예스스탁입니다.
Input : AF(0.02), AFMAX(0.2);
Var : Direction(0), SAR_Value(Close), AF_Value(.02), HighValue(High), LowValue(Low), EP(0),CSarv(0);
if Index == 0 or (Bdate != Bdate[1]) Then
{
Direction = 0;
SAR_Value = C;
AF_Value = 0.02;
HighValue = H;
LowValue = L;
EP = 0;
}
if EP != 0 Then
{
if Direction == 1 then
{
EP = HighValue;
SAR_Value = SAR_Value + AF_Value * (EP - SAR_Value);
if High > HighValue then
{
HighValue = High;
AF_Value = AF_Value + AF;
if AF_Value >= AFMAX then AF_Value = AFMAX;
}
if Close < SAR_Value then
{
Direction = -1;
SAR_Value = EP;
AF_Value = 0;
EP = 0;
LowValue = low;
}
}
else
{
EP = LowValue;
SAR_Value = SAR_Value + AF_Value * (EP - SAR_Value);
if Low < LowValue then
{
LowValue = Low;
AF_Value = AF_Value + Af;
if AF_Value >= AFMAX then AF_Value = AFMAX;
}
if Close > SAR_Value then
{
Direction = 1;
SAR_Value = EP;
AF_Value = 0;
EP = 0;
HighValue = High;
}
}
CSarv = SAR_Value;
}
else
{
if SAR_Value != 0 && EP == 0 then
{
if Direction == 1 then
{
EP = HighValue;
AF_Value = AF;
SAR_Value = SAR_Value + AF_Value * (EP - SAR_Value);
if High > HighValue then
{
HighValue = High;
AF_Value = AF_Value + AF;
if AF_Value >= AFMAX then AF_Value = AFMAX;
}
}
else
{
EP = LowValue;
AF_Value = Af;
SAR_Value = SAR_Value + AF_Value * (EP - SAR_Value);
if Low < LowValue then
{
LowValue = Low;
AF_Value = AF_Value + AF;
if AF_Value >= AFMAX then AF_Value = AFMAX;
}
}
CSarv = SAR_Value;
}
else
{
if Direction == 0 then
{
if Close > Close[1] then Direction = 1;
else
if Close < Close[1] then Direction = -1;
}
else
{
if Direction == 1 then
{
if Close < Close[1] then
{
Direction = -1;
SAR_Value = HighValue;
CSarv = SAR_Value;
}
}
if Direction == -1 then
{
if Close > Close[1] then
{
Direction = 1;
SAR_Value = LowValue;
CSarv = SAR_Value;
}
}
}
LowValue = min(Low, LowValue);
HighValue = max(High, HighValue);
}
}
Plot1(CSarv,"종가파라볼릭",iff(C>CSarv,RED,BLUE));
var : hh(0),hd(0),ht(0),hh1(0),hd1(0),ht1(0);
var : ll(0),ld(0),lt(0),ll1(0),ld1(0),lt1(0);
var : TL(0);
if CrossUp(C,CSarv) Then
{
hh = Csarv;
hd = sDate;
ht = sTime;
hh1 = hh[1];
hd1 = hd[1];
ht1 = ht[1];
TL = TL_New(hd1,ht1,hh1,hd,ht,hh);
TL_SetColor(TL,RED);
}
if CrossDown(C,CSarv) Then
{
ll = Csarv;
ld = sDate;
lt = sTime;
ll1 = ll[1];
ld1 = ld[1];
lt1 = lt[1];
TL = TL_New(ld1,lt1,ll1,ld,lt,ll);
TL_SetColor(TL,BLUE);
}
즐거운 하루되세요
> 느림보 님이 쓴 글입니다.
> 제목 : 지표식구합니다
> 분봉이나 틱봉에서
전일과 분리된 종가 파라볼릭이
직전 상승전환시의 파라볼릭값과 현재 상승전환시의 파라볼릭값을 연결하는 추세선을 나타내는 지표식을 구합니다
반대로 직전 하락전환시의 파라볼릭값과 현재 하락전환시의 파라볼릭값을 연결하는 추세선을 나타내는 지표식을 구합니다
감사합니다
지표식을 적용한 결과 다음과 같이 수정해 주시기 바랍니다
> 분봉이나 틱봉에서
전일과 분리된 종가 파라볼릭이
직전 상승전환시의 파라볼릭값과 현재 상승전환시의 파라볼릭값을 연결하는 추세선을 이후 상승전환의 파라볼릭이 출현시까지 추세선을 연장하는 지표식을 구합니다
반대로 직전 하락전환시의 파라볼릭값과 현재 하락전환시의 파라볼릭값을 연결하는 추세선을 다음에 하락전환하는 파라볼릭이 출현할때까지 연장하는 지표식을 구합니다
감사합니다