커뮤니티
문의드립니다.
2015-08-27 00:24:08
102
글번호 89850
1. 파라볼릭(0.02, 0.2)의 전상승구간의 최고가봉의 고가와 전전상승구간의 최고가봉의 최고가를 추세선으로 하여, 우측으로 자동 연장하여 생성되도록 해 주세요.
2. 물론, 파라볼릭(0.02, 0.2)의 전하락구간의 최저가봉의 저가와 전전하락구간의 최저가봉의 최저가를 추세선으로 하여, 우측으로 자동 연장하여 생성되도록 해 주세요.
(만약, 같은 상승이나 하락구간에서 동일한 고가나 저가가 여러개의 경우에는 마지막 봉을 기준으로 만들어 주세요)
3,혹 전전전구간과 전전구간의 추세선도 가능하시면 만들어 주십시요
고맙습니다.
답변 1
예스스탁 예스스탁 답변
2015-08-27 10:25:14
안녕하세요
예스스탁입니다.
Input : af(0.02), maxAF(0.2);
var : T(0),cnt(0),HTL1(0),HTL2(0),LTL1(0),LTL2(0);
Array : HH[5](0),HD[5](0),HT[5](0), LL[5](0),LD[5](0),LT[5](0);
var1 = SAR(af,maxAF);
if var1 > var1[1] Then
T = 1;
if var1 < var1[1] Then
T = -1;
if T == 1 and T[1] != 1 Then{
HH[0] = H;
HD[0] = sdate;
HT[0] = stime;
for cnt = 1 to 4{
HH[cnt] = HH[cnt-1][1];
HD[cnt] = HD[cnt-1][1];
HT[cnt] = HT[cnt-1][1];
}
if HH[2] > 0 then{
TL_Delete(HTL1);
HTL1 = TL_New(HD[2],HT[2],HH[2],HD[1],HT[1],HH[1]);
TL_SetExtRight(HTL1,true);
TL_SetColor(HTL1,RED);
}
if HH[3] > 0 Then{
TL_Delete(HTL2);
HTL2 = TL_New(HD[3],HT[3],HH[3],HD[2],HT[2],HH[2]);
TL_SetExtRight(HTL2,true);
TL_SetColor(HTL2,MAGENTA);
}
if LL[1] > 0 Then{
TL_Delete(LTL1);
LTL1 = TL_New(LD[1],LT[1],LL[1],LD[0],LT[0],LL[0]);
TL_SetExtRight(LTL1,true);
TL_SetColor(LTL1,BLUE);
}
if LL[2] > 0 then{
TL_Delete(LTL2);
LTL2 = TL_New(LD[2],LT[2],LL[2],LD[1],LT[1],LL[1]);
TL_SetExtRight(LTL2,true);
TL_SetColor(LTL2,CYAN);
}
}
if T == -1 and T[1] != -1 Then{
LL[0] = L;
LD[0] = sdate;
LT[0] = stime;
for cnt = 1 to 4{
LL[cnt] = LL[cnt-1][1];
LD[cnt] = LD[cnt-1][1];
LT[cnt] = LT[cnt-1][1];
}
if HH[1] > 0 then{
TL_Delete(HTL1);
HTL1 = TL_New(HD[1],HT[1],HH[1],HD[0],HT[0],HH[0]);
TL_SetExtRight(HTL1,true);
TL_SetColor(HTL1,RED);
}
if HH[2] > 0 Then{
TL_Delete(HTL2);
HTL2 = TL_New(HD[2],HT[2],HH[2],HD[1],HT[1],HH[1]);
TL_SetExtRight(HTL2,true);
TL_SetColor(HTL2,MAGENTA);
}
if LL[2] > 0 Then{
TL_Delete(LTL1);
LTL1 = TL_New(LD[2],LT[2],LL[2],LD[1],LT[1],LL[1]);
TL_SetExtRight(LTL1,true);
TL_SetColor(LTL1,BLUE);
}
if LL[3] > 0 then{
TL_Delete(LTL2);
LTL2 = TL_New(LD[3],LT[3],LL[3],LD[2],LT[2],LL[2]);
TL_SetExtRight(LTL2,true);
TL_SetColor(LTL2,CYAN);
}
}
if T == 1 Then{
if H > HH[0] Then{
HH[0] = H;
HD[0] = sdate;
HT[0] = Stime;
}
}
if T == -1 Then{
if L < LL[0] Then{
LL[0] = L;
LD[0] = sdate;
LT[0] = Stime;
}
}
if var1 > C Then
Plot1(var1, "SAR",BLUE);
Else
Plot1(var1, "SAR",RED);
즐거운 하루되세요
> 서태공 님이 쓴 글입니다.
> 제목 : 문의드립니다.
> 1. 파라볼릭(0.02, 0.2)의 전상승구간의 최고가봉의 고가와 전전상승구간의 최고가봉의 최고가를 추세선으로 하여, 우측으로 자동 연장하여 생성되도록 해 주세요.
2. 물론, 파라볼릭(0.02, 0.2)의 전하락구간의 최저가봉의 저가와 전전하락구간의 최저가봉의 최저가를 추세선으로 하여, 우측으로 자동 연장하여 생성되도록 해 주세요.
(만약, 같은 상승이나 하락구간에서 동일한 고가나 저가가 여러개의 경우에는 마지막 봉을 기준으로 만들어 주세요)
3,혹 전전전구간과 전전구간의 추세선도 가능하시면 만들어 주십시요
고맙습니다.