예스스탁
예스스탁 답변
2016-03-28 16:10:34
안녕하세요
예스스탁입니다.
문의하신 내용은
저점이 발생하면 전고점과 전전고점을 연결선,전전고점과 최근저점의 연결선
고점이 발생하면 전저점과 전전저점을 연결선,전전저점과 최근고점의 연결선
2개를 그리는 식입니다.
아래 수식 참고하시기 바랍니다.
input : Left(3),Right(3);
var : cnt(0),T(0),TL1(0),TL2(0);
Array : HH[2](0),HD[2](0),HT[2](0);
Array : LL[2](0),LD[2](0),LT[2](0);
#고점발생
if T <= 0 and SwingHigh(1,h,Left,right,left+right+1) != -1 Then{
T = 1;
//최근고점
HH[0] = H[right];
HD[0] = sdate[right];
HT[0] = stime[right];
//전고점
HH[1] = HH[1];
HD[1] = HD[1];
HT[1] = HT[1];
TL_New(LD[0],LT[0],LL[0],HD[0],HT[0],HH[0]);
TL_Delete(TL1);
TL_Delete(TL2);
if LD[1] > 0 Then{
TL1 = TL_New(LD[1],LT[1],LL[1],HD[0],HT[0],HH[0]);
TL2 = TL_New(LD[1],LT[1],LL[1],LD[0],LT[0],LL[0]);
TL_SetColor(TL1,red);
TL_SetColor(TL2,red);
TL_SetExtRight(TL1,true);
TL_SetExtRight(TL2,true);
}
}
#저점발생
if T >= 0 and SwingLow(1,h,Left,right,left+right+1) != -1 Then{
T = -1;
#최근저점
LL[0] = L[right];
LD[0] = sdate[right];
LT[0] = stime[right];
#전저점
LL[1] = LL[1];
LD[1] = LD[1];
LT[1] = LT[1];
TL_New(HD[0],HT[0],HH[0],LD[0],LT[0],LL[0]);
TL_Delete(TL1);
TL_Delete(TL2);
if HD[1] > 0 Then{
TL1 = TL_New(HD[1],HT[1],HH[1],HD[0],HT[0],HH[0]);
TL2 = TL_New(HD[1],HT[1],HH[1],LD[0],LT[0],LL[0]);
TL_SetColor(TL1,red);
TL_SetColor(TL2,red);
TL_SetExtRight(TL1,true);
TL_SetExtRight(TL2,true);
}
}
즐거운 하루되세요
> 시월 님이 쓴 글입니다.
> 제목 : 도움을 청합니다
> 안녕하세요
첨부그림처럼를 만들려고 합니다
쉽지가 않네요
도와주세요.
비슷하게라도 나오면 좋겠습니다