예스스탁
예스스탁 답변
2024-11-19 11:45:46
안녕하세요
예스스탁입니다.
현재 문의하신 내용은
이전 89858번에 문의하신 글의 답변 참고하시기 바랍니다.
수식도 동일한 식입니다.
즐거운 하루되세요
> 다니엘87 님이 쓴 글입니다.
> 제목 : 스토캐스틱 지표를 추세선으로 표시하는 수식 3
> 일봉 지표를 5분봉 차트에 표시하여 거래를 하고 있습니다.
첨부된 그림은 좌측이 일봉, 우측이 일봉 지표를 5분봉 차트에 적용하여 볼 수 있도록 만든 차트입니다. (수식이 잘 나오고 있는지 비교하기 위한 차트입니다.)
좌측 아래 지표는 일봉 스토캐스틱(5,3,3)이고, 우측 아래 지표는 동일한 일봉 스토캐스틱 지표를 5분봉에 적용하여 볼 수 있도록 만든 차트입니다.
이 스토캐스틱을 추세선으로 차트에 표시하여 보려고 만든 그림이 위 그림입니다. (봉차트를 흰색 점차트로 바꾸어 추세선만을 보고 있습니다.)
좌측 일봉 차트와 같이 우측 5분봉 차트에 나타내려고 싶은데 추세선의 색이 원하는대로 나타나지가 앞습니다. (상승시 빨간색, 하락시 파란색으로 나타나도록 하고 싶습니다.)
어떻게 수정해야 할까요... ㅠㅠ
도움 부탁 드립니다.
# ---<Stochastics(5,3,3) >--------------------------------------------------
Inputs : Sto_P1(5),Sto_P2(3),Sto_P3(3); # 변수 : 5,3,3 // 12,5,5 // 30,10,10
Variables : Sto_V1(0),Sto_V2(0),Sto_V3(0),Sto_V4(0),Sto_V5(0);
Variables : PreSto_V2(0),PreSto_V3(0),PreSto_V4(0),PreSto_V5(0);
Variables : prePreSto_V4(0);
Variables : D_Highest(0),D_Lowest(0),D_Index(0),cnt(0);
Variables : EP1(0),EP2(0),T(0),PreT(0),D1(0),T1(0),C1(0);
Ep1 = 2/(Sto_P2+1);
Ep2 = 2/(Sto_P3+1);
D_Highest = DayHigh;
D_Lowest = DayLow;
For cnt = 0 to Sto_P1-1
{
If DayHigh(cnt) > D_Highest Then D_Highest = DayHigh(cnt);
If DayLow(cnt) < D_Lowest Then D_Lowest = DayLow(cnt);
}
Sto_V1 = (Close-D_Lowest)/(D_Highest-D_Lowest)*100;
If Date != Date[1] Then
{
D_Index = D_Index + 1;
prePreSto_V4 = PreSto_V4[1];
PreSto_V2 = Sto_V2[1];
PreSto_V3 = Sto_V3[1];
PreSto_V4 = Sto_V4[1];
PreSto_V5 = Sto_V5[1];
}
If D_Index <= 1 Then
{
Sto_V2 = Sto_V1;
Sto_V3 = Sto_V2;
}
Else
{
Sto_V2 = Sto_V1*Ep1 + PreSto_V2*(1-Ep1);
Sto_V3 = Sto_V3*Ep2 + PreSto_V3*(1-Ep2);
}
Sto_V4 = Sto_V2*2-100;
Sto_V5 = Sto_V3*2-100;
# ---<Stochastics Line >--------------------------------------------------
Variables : TL_K(0);
If PreSto_V4 < Sto_V4 Then
{
If prePreSto_V4 > PreSto_V4 Then
{
TL_K = TL_New(sDate[1],sTime[1],Low[1],sDate,sTime,High);
TL_SetColor(TL_K,RED);
TL_SetStyle(TL_K,1);
TL_SetSize (TL_K,1);
}
Else TL_SetEnd(TL_K,sDate,sTime,High);
}
If PreSto_V4 > Sto_V4 Then
{
If prePreSto_V4 < PreSto_V4 Then
{
TL_K = TL_New(sDate[1],sTime[1],High[1],sDate,sTime,Low);
TL_SetColor(TL_K,Blue);
TL_SetStyle(TL_K,1);
TL_SetSize (TL_K,1);
}
Else TL_SetEnd(TL_K,sDate,sTime,Low);
}