커뮤니티
지표
2018-11-22 11:45:47
208
글번호 123814
아래지표에서 종가선을 하나 추가해서 추세선 빨강 파랑하고 체우기를 하고 싶은데 가능한지요..그리고 추세선이 만나는 지점에 빨강 파랑 점을찍고 싶습니다..
input : P(3);
var : cnt(0),i1(0),i2(0),TL1(0),TL2(0);
Array : SHV[50](0),SHD[50](0),SHT[50](0);
Array : SLV[50](0),SLD[50](0),SLT[50](0);
if SwingHigh(1,h,P,P,P*2+1) != -1 Then{
SHV[0] = H[P];
SHD[0] = sdate[P];
SHT[0] = stime[P];
for cnt = 1 to 49{
SHV[cnt] = SHV[cnt-1][1];
SHD[cnt] = SHD[cnt-1][1];
SHT[cnt] = SHT[cnt-1][1];
}
i1 = 1;
for cnt = 1 to 49{
if SHV[cnt] > SHV[0] Then{
i1 = cnt;
cnt = 1000;
}
}
if i1 > 0 Then{
TL_Delete(TL1);
TL1 = TL_New(SHD[i1],SHT[i1],SHV[i1],SHD[0],SHT[0],SHV[0]);
TL_SetExtRight(TL1,true);
TL_SetColor(TL1,RED);
}
}
if SwingLow(1,L,P,P,P*2+1) != -1 Then{
SLV[0] = L[P];
SLD[0] = sdate[P];
SLT[0] = stime[P];
for cnt = 1 to 49{
SLV[cnt] = SLV[cnt-1][1];
SLD[cnt] = SLD[cnt-1][1];
SLT[cnt] = SLT[cnt-1][1];
}
i2 = 1;
for cnt = 1 to 49{
if SLV[cnt] < SLV[0] Then{
i2 = cnt;
cnt = 1000;
}
}
if i2 > 0 Then{
TL_Delete(TL2);
TL2 = TL_New(SLD[i2],SLT[i2],SLV[i2],SLD[0],SLT[0],SLV[0]);
TL_SetExtRight(TL2,true);
TL_SetColor(TL2,blue);
}
}
답변 1
예스스탁 예스스탁 답변
2018-11-26 15:20:07
안녕하세요?
문의하신 추세선에서는 채우기 기능이 가능하지 않습니다. 또, 만나는 선에 점 표시도 구현이 안되는 내용으로 판단됩니다.
도움 드리지 못해 죄송합니다.
감사합니다.
> 야크 님이 쓴 글입니다.
> 제목 : 지표
> 아래지표에서 종가선을 하나 추가해서 추세선 빨강 파랑하고 체우기를 하고 싶은데 가능한지요..그리고 추세선이 만나는 지점에 빨강 파랑 점을찍고 싶습니다..
input : P(3);
var : cnt(0),i1(0),i2(0),TL1(0),TL2(0);
Array : SHV[50](0),SHD[50](0),SHT[50](0);
Array : SLV[50](0),SLD[50](0),SLT[50](0);
if SwingHigh(1,h,P,P,P*2+1) != -1 Then{
SHV[0] = H[P];
SHD[0] = sdate[P];
SHT[0] = stime[P];
for cnt = 1 to 49{
SHV[cnt] = SHV[cnt-1][1];
SHD[cnt] = SHD[cnt-1][1];
SHT[cnt] = SHT[cnt-1][1];
}
i1 = 1;
for cnt = 1 to 49{
if SHV[cnt] > SHV[0] Then{
i1 = cnt;
cnt = 1000;
}
}
if i1 > 0 Then{
TL_Delete(TL1);
TL1 = TL_New(SHD[i1],SHT[i1],SHV[i1],SHD[0],SHT[0],SHV[0]);
TL_SetExtRight(TL1,true);
TL_SetColor(TL1,RED);
}
}
if SwingLow(1,L,P,P,P*2+1) != -1 Then{
SLV[0] = L[P];
SLD[0] = sdate[P];
SLT[0] = stime[P];
for cnt = 1 to 49{
SLV[cnt] = SLV[cnt-1][1];
SLD[cnt] = SLD[cnt-1][1];
SLT[cnt] = SLT[cnt-1][1];
}
i2 = 1;
for cnt = 1 to 49{
if SLV[cnt] < SLV[0] Then{
i2 = cnt;
cnt = 1000;
}
}
if i2 > 0 Then{
TL_Delete(TL2);
TL2 = TL_New(SLD[i2],SLT[i2],SLV[i2],SLD[0],SLT[0],SLV[0]);
TL_SetExtRight(TL2,true);
TL_SetColor(TL2,blue);
}
}