커뮤니티
수식좀 부탁드려요
2020-06-10 23:26:59
2322
글번호 139727
전전저점과 전저점을 잇는 선
전전고점과 전고점을 잇는 선
간단할거 같은데 드럽게 어렵네요
도사님 부탁드려요
답변 2
예스스탁 예스스탁 답변
2020-06-11 14:18:46
안녕하세요
예스스탁입니다.
고점과 저점에 대한 정의가 없습니다.
아래식은 일반적으로 고점과 저점으로 많이 사용하는
스윙하이/스윙로우 함수로 작성해 드립니다.
식 내용을 참고하셔서 응용해 사용하시기 바랍니다.
input : Left(3),right(3);
var : cnt(0),TL(0),HTL(0),LTL(0),T(0);
Array : HH[10](0),HD[10](0),HT[10](0);
Array : LL[10](0),LD[10](0),LT[10](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];
for cnt = 1 to 9
{
HH[cnt] = HH[cnt-1][1];
HD[cnt] = HD[cnt-1][1];
HT[cnt] = HT[cnt-1][1];
}
#지그재그선
if LL[0] > 0 Then
TL = TL_New(LD[0],LT[0],LL[0],HD[0],HT[0],HH[0]);
#고점연결선
if HH[1] > 0 then
{
TL_Delete(HTL);
HTL = TL_New(HD[1],HT[1],HH[1],HD[0],HT[0],HH[0]);
TL_SetColor(HTL,RED);
TL_SetExtRight(HTL,true);#오른쪽 연장
}
}
if T >= 0 and SwingLow(1,L,Left,Right,Left+Right+1) != -1 Then
{
T = -1;
LL[0] = L[right];
LD[0] = sdate[right];
LT[0] = stime[right];
for cnt = 1 to 9
{
LL[cnt] = LL[cnt-1][1];
LD[cnt] = LD[cnt-1][1];
LT[cnt] = LT[cnt-1][1];
}
#지그재그선
if HH[0] > 0 Then
TL = TL_New(HD[0],HT[0],HH[0],LD[0],LT[0],LL[0]);
#저점연결선
if LL[1] > 0 then
{
TL_Delete(LTL);
LTL = TL_New(LD[1],LT[1],LL[1],LD[0],LT[0],LL[0]);
TL_SetColor(LTL,BLUE);
TL_SetExtRight(LTL,true);#오른쪽 연장
}
}
즐거운 하루되세요
> 빨간면도날 님이 쓴 글입니다.
> 제목 : 수식좀 부탁드려요
> 전전저점과 전저점을 잇는 선
전전고점과 전고점을 잇는 선
간단할거 같은데 드럽게 어렵네요
도사님 부탁드려요
빨간면도날
2020-06-13 11:15:50
성은이 망극하옵니다.
잘쓰겠습니다.
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 수식좀 부탁드려요
> 안녕하세요
예스스탁입니다.
고점과 저점에 대한 정의가 없습니다.
아래식은 일반적으로 고점과 저점으로 많이 사용하는
스윙하이/스윙로우 함수로 작성해 드립니다.
식 내용을 참고하셔서 응용해 사용하시기 바랍니다.
input : Left(3),right(3);
var : cnt(0),TL(0),HTL(0),LTL(0),T(0);
Array : HH[10](0),HD[10](0),HT[10](0);
Array : LL[10](0),LD[10](0),LT[10](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];
for cnt = 1 to 9
{
HH[cnt] = HH[cnt-1][1];
HD[cnt] = HD[cnt-1][1];
HT[cnt] = HT[cnt-1][1];
}
#지그재그선
if LL[0] > 0 Then
TL = TL_New(LD[0],LT[0],LL[0],HD[0],HT[0],HH[0]);
#고점연결선
if HH[1] > 0 then
{
TL_Delete(HTL);
HTL = TL_New(HD[1],HT[1],HH[1],HD[0],HT[0],HH[0]);
TL_SetColor(HTL,RED);
TL_SetExtRight(HTL,true);#오른쪽 연장
}
}
if T >= 0 and SwingLow(1,L,Left,Right,Left+Right+1) != -1 Then
{
T = -1;
LL[0] = L[right];
LD[0] = sdate[right];
LT[0] = stime[right];
for cnt = 1 to 9
{
LL[cnt] = LL[cnt-1][1];
LD[cnt] = LD[cnt-1][1];
LT[cnt] = LT[cnt-1][1];
}
#지그재그선
if HH[0] > 0 Then
TL = TL_New(HD[0],HT[0],HH[0],LD[0],LT[0],LL[0]);
#저점연결선
if LL[1] > 0 then
{
TL_Delete(LTL);
LTL = TL_New(LD[1],LT[1],LL[1],LD[0],LT[0],LL[0]);
TL_SetColor(LTL,BLUE);
TL_SetExtRight(LTL,true);#오른쪽 연장
}
}
즐거운 하루되세요
> 빨간면도날 님이 쓴 글입니다.
> 제목 : 수식좀 부탁드려요
> 전전저점과 전저점을 잇는 선
전전고점과 전고점을 잇는 선
간단할거 같은데 드럽게 어렵네요
도사님 부탁드려요
다음글
이전글