커뮤니티

고가저가 시간 수정

프로필 이미지
상암동
2025-12-12 15:38:48
85
글번호 228960
답변완료

늘 감사합니다.

직전에 만든 수식은 당일이 표시가 않되요

전에 만든 수식은 당일만 표시가 됩니다.


아래의 수식을 data2로 수정해 수세요

아니면 직전에 만들어 주신 수식에서 당일분도 나오게 해 주세요




var : T1(""),T2(0),T3(""),HH(0),LL(0),Hstr(""),Lstr(""),tx1(0),tx2(0);

if Bdate != Bdate[1] Then

{ Text_Delete(tx1);

Text_Delete(tx2);

HH = H;

LL = L;

T1 = NumToStr(Floor(sTime/10000),0);

T2 = Floor(FracPortion(sTime/10000)*100);

if T2 < 10 Then

T3 = "0"+NumToStr(T2,0);

Else

T3 = NumToStr(T2,0);

hstr = NumToStr(HH,2)+"("+T1+":"+T3+")";

Lstr = NumToStr(LL,2)+"("+T1+":"+T3+")";

tx1 = Text_New(sDate,sTime,HH,Hstr);

tx2 = Text_New(sDate,sTime,HH,Lstr);

Text_SetStyle(tx1,2,1);

Text_SetStyle(tx2,2,0);

Text_SetColor(tx1,RED);

Text_SetColor(tx2,BLUE);

}Else

{ if HH > 0 and h > HH Then

{

HH = h;

T1 = NumToStr(Floor(sTime/10000),0);

T2 = Floor(FracPortion(sTime/10000)*100);

if T2 < 10 Then

T3 = "0"+NumToStr(T2,0);

Else

T3 = NumToStr(T2,0);

hstr = NumToStr(HH,2)+"("+T1+":"+T3+")";

Text_SetString(tx1,Hstr);

Text_SetLocation(tx1,sDate,sTime,HH);

}

if LL > 0 and l < LL Then

{

LL = L;

T1 = NumToStr(Floor(sTime/10000),0);

T2 = Floor(FracPortion(sTime/10000)*100);

if T2 < 10 Then

T3 = "0"+NumToStr(T2,0);

Else

T3 = NumToStr(T2,0);

Lstr = NumToStr(LL,2)+"("+T1+":"+T3+")";

Text_SetString(tx2,Lstr);

Text_SetLocation(tx2,sDate,sTime,LL);

}

}var1 = DayHigh();

Var2 = DayLow();

Plot1(var1, "고가");

Plot2(Var2, "저가");






감사합니다.

지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2025-12-12 16:07:49

안녕하세요 예스스탁입니다. 이전 답변드린 수식이 첨부된 그림과 같이 당일에도 표시되는 식입니다. plot출력이 이전식은 data2시초가인데 data2 당일 최고가와 최저가를 선으로 그리게 수정해 드립니다.

var : hh(0,Data2),mm(0,Data2); var : hs("",Data2),ms("",Data2); var : hh2(0,Data2),hd2(0,Data2),ht2(0,Data2),str1(""),tx1(0); var : ll2(0,Data2),ld2(0,Data2),lt2(0,Data2),str2(""),tx2(0); hh = data2(Floor(sTime/10000)); mm = data2(Floor(sTime/100)%100); hs = NumToStr(hh,0); if mm < 10 Then ms = "0"+NumToStr(mm,0); Else ms = NumToStr(mm,0); if Data2(Bdate != Bdate[1]) Then { hh2 = data2(h); hd2 = Data2(sDate); ht2 = Data2(sTime); ll2 = data2(l); ld2 = Data2(sDate); lt2 = Data2(sTime); str1 = NumToStr(hh2,2)+"("+hs+":"+ms+")"; tx1 = Text_New_Self(hd2,ht2,hh2,str1); Text_SetStyle(tx1,2,1); Text_SetColor(tx1,Red); str2 = NumToStr(ll2,2)+"("+hs+":"+ms+")"; tx2 = Text_New_Self(ld2,lt2,ll2,str2); Text_SetStyle(tx2,2,0); Text_SetColor(tx2,Blue); } Else { if Data2(h) > hh2 Then { hh2 = data2(h); hd2 = Data2(sDate); ht2 = Data2(sTime); str1 = NumToStr(hh2,2)+"("+hs+":"+ms+")"; Text_SetString(tx1,str1); Text_SetLocation(tx1,hd2,ht2,hh2); } if Data2(l) < ll2 Then { ll2 = data2(l); ld2 = Data2(sDate); lt2 = Data2(sTime); str2 = NumToStr(ll2,2)+"("+hs+":"+ms+")"; Text_SetString(tx2,str2); Text_SetLocation(tx2,ld2,lt2,ll2); } } Plot1(HH2); plot2(LL2); 즐거운 하루되세요