커뮤니티
수식 문의 드립니다.
2025-06-07 11:06:20
231
글번호 191484
안녕하세요.
수식 문의 드립니다.
A.
1. 신고가
Valuewhen(1, Highest(H, 기간)==H, H) // 10
2. .신저가
Valuewhen(1, Lowest(L, 기간)==L, L)
-----------------------------------------------------
B.
1. 파동선
2. 파동선 꼭지점 연결선
각선의 굵기 , 숫자, 색상 크기 조절 가능
하게 해 주십시요
답변 1
예스스탁 예스스탁 답변
2025-06-09 16:18:46
안녕하세요
예스스탁입니다.
1
input : 기간(10);
if Highest(H, 기간)==H Then
Var1 = H;
if lowest(L, 기간)==L Then
Var2 = L;
if var1 > 0 Then
Plot1(var1);
if var2 > 0 Then
plot2(var2);
2
input : 기간(10);
Array : HD[10](0),HT[10](0),HV[10](0);
Array : LD[10](0),LT[10](0),LV[10](0);
var : cnt(0),Hprice(0),Lprice(0);
var : UpTrend(false),DownTrend(False),Trend(0);
var : ZigZagTL(0),HTL(0),LTL(0);
var : Text(0);
HPrice = H;
LPrice = L;
if Index == 0 Then
{
HD[0] = sDate;
HT[0] = sTime;
HV[0] = HPrice;
LD[0] = sDate;
LT[0] = sTime;
LV[0] = LPrice;
}
Else
{
UpTrend = HPrice >= Highest(HPrice,기간)[1];
DownTrend = LPrice <= Lowest(LPrice,기간)[1];
if trend <= 0 and UpTrend == true Then
{
trend = 1;
For cnt = 9 DownTo 1
{
HD[cnt] = HD[cnt-1];
HT[cnt] = HT[cnt-1];
HV[cnt] = HV[cnt-1];
}
HD[0] = sDate;
HT[0] = sTime;
HV[0] = HPrice;
ZigZagTL = TL_New(LD[0],LT[0],LV[0],HD[0],HT[0],HV[0]);
TL_SetColor(ZigZagTL,Red);
TL_SetSize(ZigZagTL,1);
Text = Text_New(HD[0],HT[0],HV[0],NToStr(HV[0],2));
Text_SetColor(Text,Red);
Text_SetSize(Text,12);
Text_SetStyle(Text,2,1);
if HV[1] > 0 Then
{
HTL = TL_New(HD[1],HT[1],HV[1],HD[0],HT[0],HV[0]);
TL_SetColor(HTL,Orange);
TL_SetSize(HTL,0);
}
}
Else if trend >= 0 and DownTrend Then
{
trend = -1;
For cnt = 9 DownTo 1
{
LD[cnt] = LD[cnt-1];
LT[cnt] = LT[cnt-1];
LV[cnt] = LV[cnt-1];
}
LD[0] = sDate;
LT[0] = sTime;
LV[0] = LPrice;
ZigZagTL = TL_New(HD[0],HT[0],HV[0],LD[0],LT[0],LV[0]);
TL_SetColor(ZigZagTL,Blue);
TL_SetSize(ZigZagTL,1);
Text = Text_New(LD[0],LT[0],LV[0],NumToStr(LV[0],2));
Text_SetColor(Text,Blue);
Text_SetSize(Text,12);
Text_SetBold(Text,1);
Text_SetStyle(Text,2,0);
if LV[1] > 0 Then
{
LTL = TL_New(LD[1],LT[1],LV[1],LD[0],LT[0],LV[0]);
TL_SetColor(LTL,cyan);
TL_SetSize(LTL,0);
}
}
Else
{
if trend == 1 Then
{
if HPrice > HV[0] Then
{
HD[0] = sDate;
HT[0] = sTime;
HV[0] = HPrice;
TL_SetEnd(ZigZagTL,HD[0],HT[0],HV[0]);
Text_SetLocation(Text,HD[0],HT[0],HV[0]);
Text_SetString(Text,NumToStr(HV[0],2));
TL_SetEnd(HTL,HD[0],HT[0],HV[0]);
}
}
if trend == -1 Then
{
if LPrice < LV[0] Then
{
LD[0] = sDate;
LT[0] = sTime;
LV[0] = LPrice;
TL_SetEnd(ZigZagTL,LD[0],LT[0],LV[0]);
Text_SetLocation(Text,LD[0],LT[0],LV[0]);
Text_SetString(Text,NumToStr(LV[0],2));
TL_SetEnd(LTL,LD[0],LT[0],LV[0]);
}
}
}
}
즐거운 하루되세요
> s1017051 님이 쓴 글입니다.
> 제목 : 수식 문의 드립니다.
> 안녕하세요.
수식 문의 드립니다.
A.
1. 신고가
Valuewhen(1, Highest(H, 기간)==H, H) // 10
2. .신저가
Valuewhen(1, Lowest(L, 기간)==L, L)
-----------------------------------------------------
B.
1. 파동선
2. 파동선 꼭지점 연결선
각선의 굵기 , 숫자, 색상 크기 조절 가능
하게 해 주십시요
다음글
이전글