커뮤니티

수식 부탁드립니다.

프로필 이미지
오늘도수익
2024-06-07 10:29:14
947
글번호 180406
답변완료

첨부 이미지

아래 수식에서 최고건수 와 최저건수 의 값을 표기하고 싶습니다. #Data6 : 선물매수호가총건수 #Data7 : 선물매도호가총건수 var : TL1(0,data1),TL2(0,data1),TL3(0,data1),TL4(0,data1); var : diff(0,data1),hh(0,data1),ll(0,data1); diff = data6(c)-data7(c); if bdate != bdate[1] Then { hh = diff; ll = diff; TL_Delete(TL1); TL_Delete(TL2); TL1 = TL_New(sdate,stime,H,NextBarSdate,NextBarStime,H); TL2 = TL_New(sdate,stime,L,NextBarSdate,NextBarStime,L); TL_Delete(TL3); TL_Delete(TL4); TL3 = TL_New(sdate,stime,H,Sdate,Stime,H); TL4 = TL_New(sdate,stime,L,Sdate,Stime,L); } else { if diff > hh Then { hh = diff; TL_SetBegin(TL3,sdate,stime,TL_GetValue(TL1,sdate,stime)); TL_Setend(TL3,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); TL_SetBegin(TL1,sdate,stime,h); TL_Setend(TL1,NextBarSdate,NextBarStime,h); } if diff < ll Then { ll = diff; TL_SetBegin(TL4,sdate,stime,TL_GetValue(TL2,sdate,stime)); TL_Setend(TL4,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); TL_SetBegin(TL2,sdate,stime,l); TL_Setend(TL2,NextBarSdate,NextBarStime,l); } } TL_SetExtRight(TL1,true); TL_SetExtLeft(TL1,true); TL_SetExtRight(TL2,true); TL_SetExtLeft(TL2,true); TL_SetSize(TL1,2); TL_SetSize(TL2,2); TL_SetColor(TL1,RED); TL_SetColor(TL2,BLUE); TL_SetExtRight(TL3,true); TL_SetExtLeft(TL3,true); TL_SetExtRight(TL4,true); TL_SetExtLeft(TL4,true); TL_SetSize(TL3,2); TL_SetSize(TL4,2); TL_SetColor(TL3,MAGENTA); TL_SetColor(TL4,CYAN); plot1(hh,"최고건수차",RED); plot2(ll,"최저건수차",blue);
지표
답변 3
프로필 이미지

예스스탁 예스스탁 답변

2024-06-10 12:46:31

안녕하세요 예스스탁입니다. #Data6 : 선물매수호가총건수 #Data7 : 선물매도호가총건수 var : TL1(0,data1),TL2(0,data1),TL3(0,data1),TL4(0,data1); var : diff(0,data1),hh(0,data1),ll(0,data1); var : TX1(0,data1),TX2(0,data1),TX3(0,data1),TX4(0,data1); diff = data6(c)-data7(c); if bdate != bdate[1] Then { hh = diff; ll = diff; TL_Delete(TL1); TL_Delete(TL2); TL_Delete(TL3); TL_Delete(TL4); TL1 = TL_New(sdate,stime,H,NextBarSdate,NextBarStime,H); TL2 = TL_New(sdate,stime,L,NextBarSdate,NextBarStime,L); TL3 = TL_New(sdate,stime,H,Sdate,Stime,H); TL4 = TL_New(sdate,stime,L,Sdate,Stime,L); Text_Delete(TX1); Text_Delete(TX2); Text_Delete(TX3); Text_Delete(TX4); TX1 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime),NumToStr(TL_GetValue(TL1,sdate,stime),2)); TX2 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime),NumToStr(TL_GetValue(TL2,sdate,stime),2)); TX3 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL3,sdate,stime),NumToStr(TL_GetValue(TL3,sdate,stime),2)); TX4 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL4,sdate,stime),NumToStr(TL_GetValue(TL4,sdate,stime),2)); Text_SetStyle(TX1,0,0); Text_SetStyle(TX2,0,0); Text_SetStyle(TX3,0,0); Text_SetStyle(TX4,0,0); } else { if diff > hh Then { hh = diff; TL_SetBegin(TL3,sdate,stime,TL_GetValue(TL1,sdate,stime)); TL_Setend(TL3,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); TL_SetBegin(TL1,sdate,stime,h); TL_Setend(TL1,NextBarSdate,NextBarStime,h); } if diff < ll Then { ll = diff; TL_SetBegin(TL4,sdate,stime,TL_GetValue(TL2,sdate,stime)); TL_Setend(TL4,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); TL_SetBegin(TL2,sdate,stime,l); TL_Setend(TL2,NextBarSdate,NextBarStime,l); } } TL_SetExtRight(TL1,true); TL_SetExtLeft(TL1,true); TL_SetExtRight(TL2,true); TL_SetExtLeft(TL2,true); TL_SetSize(TL1,2); TL_SetSize(TL2,2); TL_SetColor(TL1,RED); TL_SetColor(TL2,BLUE); TL_SetExtRight(TL3,true); TL_SetExtLeft(TL3,true); TL_SetExtRight(TL4,true); TL_SetExtLeft(TL4,true); TL_SetSize(TL3,2); TL_SetSize(TL4,2); TL_SetColor(TL3,MAGENTA); TL_SetColor(TL4,CYAN); Text_SetString(TX1,NumToStr(TL_GetValue(TL1,sdate,stime),2)); Text_SetLocation(TX1,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); Text_SetString(TX2,NumToStr(TL_GetValue(TL2,sdate,stime),2)); Text_SetLocation(TX2,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); Text_SetString(TX3,NumToStr(TL_GetValue(TL3,sdate,stime),2)); Text_SetLocation(TX3,NextBarSdate,NextBarStime,TL_GetValue(TL3,sdate,stime)); Text_SetString(TX4,NumToStr(TL_GetValue(TL4,sdate,stime),2)); Text_SetLocation(TX4,NextBarSdate,NextBarStime,TL_GetValue(TL4,sdate,stime)); plot1(hh,"최고건수차",RED); plot2(ll,"최저건수차",blue); 즐거운 하루되세요 > 오늘도수익 님이 쓴 글입니다. > 제목 : 수식 부탁드립니다. > 아래 수식에서 최고건수 와 최저건수 의 값을 표기하고 싶습니다. #Data6 : 선물매수호가총건수 #Data7 : 선물매도호가총건수 var : TL1(0,data1),TL2(0,data1),TL3(0,data1),TL4(0,data1); var : diff(0,data1),hh(0,data1),ll(0,data1); diff = data6(c)-data7(c); if bdate != bdate[1] Then { hh = diff; ll = diff; TL_Delete(TL1); TL_Delete(TL2); TL1 = TL_New(sdate,stime,H,NextBarSdate,NextBarStime,H); TL2 = TL_New(sdate,stime,L,NextBarSdate,NextBarStime,L); TL_Delete(TL3); TL_Delete(TL4); TL3 = TL_New(sdate,stime,H,Sdate,Stime,H); TL4 = TL_New(sdate,stime,L,Sdate,Stime,L); } else { if diff > hh Then { hh = diff; TL_SetBegin(TL3,sdate,stime,TL_GetValue(TL1,sdate,stime)); TL_Setend(TL3,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); TL_SetBegin(TL1,sdate,stime,h); TL_Setend(TL1,NextBarSdate,NextBarStime,h); } if diff < ll Then { ll = diff; TL_SetBegin(TL4,sdate,stime,TL_GetValue(TL2,sdate,stime)); TL_Setend(TL4,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); TL_SetBegin(TL2,sdate,stime,l); TL_Setend(TL2,NextBarSdate,NextBarStime,l); } } TL_SetExtRight(TL1,true); TL_SetExtLeft(TL1,true); TL_SetExtRight(TL2,true); TL_SetExtLeft(TL2,true); TL_SetSize(TL1,2); TL_SetSize(TL2,2); TL_SetColor(TL1,RED); TL_SetColor(TL2,BLUE); TL_SetExtRight(TL3,true); TL_SetExtLeft(TL3,true); TL_SetExtRight(TL4,true); TL_SetExtLeft(TL4,true); TL_SetSize(TL3,2); TL_SetSize(TL4,2); TL_SetColor(TL3,MAGENTA); TL_SetColor(TL4,CYAN); plot1(hh,"최고건수차",RED); plot2(ll,"최저건수차",blue);
프로필 이미지

오늘도수익

2024-06-10 12:58:07

수식 잘 받았습니다. 제가 원하는 값은 선물지수가 아니라 선물매수매도 건수를 볼려고 하는 것입니다. 수정이 가능 할까요? > 예스스탁 님이 쓴 글입니다. > 제목 : Re : 수식 부탁드립니다. > 안녕하세요 예스스탁입니다. #Data6 : 선물매수호가총건수 #Data7 : 선물매도호가총건수 var : TL1(0,data1),TL2(0,data1),TL3(0,data1),TL4(0,data1); var : diff(0,data1),hh(0,data1),ll(0,data1); var : TX1(0,data1),TX2(0,data1),TX3(0,data1),TX4(0,data1); diff = data6(c)-data7(c); if bdate != bdate[1] Then { hh = diff; ll = diff; TL_Delete(TL1); TL_Delete(TL2); TL_Delete(TL3); TL_Delete(TL4); TL1 = TL_New(sdate,stime,H,NextBarSdate,NextBarStime,H); TL2 = TL_New(sdate,stime,L,NextBarSdate,NextBarStime,L); TL3 = TL_New(sdate,stime,H,Sdate,Stime,H); TL4 = TL_New(sdate,stime,L,Sdate,Stime,L); Text_Delete(TX1); Text_Delete(TX2); Text_Delete(TX3); Text_Delete(TX4); TX1 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime),NumToStr(TL_GetValue(TL1,sdate,stime),2)); TX2 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime),NumToStr(TL_GetValue(TL2,sdate,stime),2)); TX3 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL3,sdate,stime),NumToStr(TL_GetValue(TL3,sdate,stime),2)); TX4 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL4,sdate,stime),NumToStr(TL_GetValue(TL4,sdate,stime),2)); Text_SetStyle(TX1,0,0); Text_SetStyle(TX2,0,0); Text_SetStyle(TX3,0,0); Text_SetStyle(TX4,0,0); } else { if diff > hh Then { hh = diff; TL_SetBegin(TL3,sdate,stime,TL_GetValue(TL1,sdate,stime)); TL_Setend(TL3,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); TL_SetBegin(TL1,sdate,stime,h); TL_Setend(TL1,NextBarSdate,NextBarStime,h); } if diff < ll Then { ll = diff; TL_SetBegin(TL4,sdate,stime,TL_GetValue(TL2,sdate,stime)); TL_Setend(TL4,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); TL_SetBegin(TL2,sdate,stime,l); TL_Setend(TL2,NextBarSdate,NextBarStime,l); } } TL_SetExtRight(TL1,true); TL_SetExtLeft(TL1,true); TL_SetExtRight(TL2,true); TL_SetExtLeft(TL2,true); TL_SetSize(TL1,2); TL_SetSize(TL2,2); TL_SetColor(TL1,RED); TL_SetColor(TL2,BLUE); TL_SetExtRight(TL3,true); TL_SetExtLeft(TL3,true); TL_SetExtRight(TL4,true); TL_SetExtLeft(TL4,true); TL_SetSize(TL3,2); TL_SetSize(TL4,2); TL_SetColor(TL3,MAGENTA); TL_SetColor(TL4,CYAN); Text_SetString(TX1,NumToStr(TL_GetValue(TL1,sdate,stime),2)); Text_SetLocation(TX1,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); Text_SetString(TX2,NumToStr(TL_GetValue(TL2,sdate,stime),2)); Text_SetLocation(TX2,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); Text_SetString(TX3,NumToStr(TL_GetValue(TL3,sdate,stime),2)); Text_SetLocation(TX3,NextBarSdate,NextBarStime,TL_GetValue(TL3,sdate,stime)); Text_SetString(TX4,NumToStr(TL_GetValue(TL4,sdate,stime),2)); Text_SetLocation(TX4,NextBarSdate,NextBarStime,TL_GetValue(TL4,sdate,stime)); plot1(hh,"최고건수차",RED); plot2(ll,"최저건수차",blue); 즐거운 하루되세요 > 오늘도수익 님이 쓴 글입니다. > 제목 : 수식 부탁드립니다. > 아래 수식에서 최고건수 와 최저건수 의 값을 표기하고 싶습니다. #Data6 : 선물매수호가총건수 #Data7 : 선물매도호가총건수 var : TL1(0,data1),TL2(0,data1),TL3(0,data1),TL4(0,data1); var : diff(0,data1),hh(0,data1),ll(0,data1); diff = data6(c)-data7(c); if bdate != bdate[1] Then { hh = diff; ll = diff; TL_Delete(TL1); TL_Delete(TL2); TL1 = TL_New(sdate,stime,H,NextBarSdate,NextBarStime,H); TL2 = TL_New(sdate,stime,L,NextBarSdate,NextBarStime,L); TL_Delete(TL3); TL_Delete(TL4); TL3 = TL_New(sdate,stime,H,Sdate,Stime,H); TL4 = TL_New(sdate,stime,L,Sdate,Stime,L); } else { if diff > hh Then { hh = diff; TL_SetBegin(TL3,sdate,stime,TL_GetValue(TL1,sdate,stime)); TL_Setend(TL3,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); TL_SetBegin(TL1,sdate,stime,h); TL_Setend(TL1,NextBarSdate,NextBarStime,h); } if diff < ll Then { ll = diff; TL_SetBegin(TL4,sdate,stime,TL_GetValue(TL2,sdate,stime)); TL_Setend(TL4,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); TL_SetBegin(TL2,sdate,stime,l); TL_Setend(TL2,NextBarSdate,NextBarStime,l); } } TL_SetExtRight(TL1,true); TL_SetExtLeft(TL1,true); TL_SetExtRight(TL2,true); TL_SetExtLeft(TL2,true); TL_SetSize(TL1,2); TL_SetSize(TL2,2); TL_SetColor(TL1,RED); TL_SetColor(TL2,BLUE); TL_SetExtRight(TL3,true); TL_SetExtLeft(TL3,true); TL_SetExtRight(TL4,true); TL_SetExtLeft(TL4,true); TL_SetSize(TL3,2); TL_SetSize(TL4,2); TL_SetColor(TL3,MAGENTA); TL_SetColor(TL4,CYAN); plot1(hh,"최고건수차",RED); plot2(ll,"최저건수차",blue);
프로필 이미지

예스스탁 예스스탁 답변

2024-06-10 13:23:06

안녕하세요 예스스탁입니다. #Data6 : 선물매수호가총건수 #Data7 : 선물매도호가총건수 var : TL1(0,data1),TL2(0,data1),TL3(0,data1),TL4(0,data1); var : diff(0,data1),hh(0,data1),ll(0,data1); var : TX1(0,data1),TX2(0,data1),TX3(0,data1),TX4(0,data1); diff = data6(c)-data7(c); if bdate != bdate[1] Then { hh = diff; ll = diff; TL_Delete(TL1); TL_Delete(TL2); TL_Delete(TL3); TL_Delete(TL4); TL1 = TL_New(sdate,stime,H,NextBarSdate,NextBarStime,H); TL2 = TL_New(sdate,stime,L,NextBarSdate,NextBarStime,L); TL3 = TL_New(sdate,stime,H,Sdate,Stime,H); TL4 = TL_New(sdate,stime,L,Sdate,Stime,L); Text_Delete(TX1); Text_Delete(TX2); Text_Delete(TX3); Text_Delete(TX4); TX1 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime),NumToStr(HH,0)); TX2 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime),NumToStr(LL,0)); TX3 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL3,sdate,stime),NumToStr(HH,2)); TX4 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL4,sdate,stime),NumToStr(LL,2)); Text_SetStyle(TX1,0,0); Text_SetStyle(TX2,0,0); Text_SetStyle(TX3,0,0); Text_SetStyle(TX4,0,0); } else { if diff > hh Then { hh = diff; TL_SetBegin(TL3,sdate,stime,TL_GetValue(TL1,sdate,stime)); TL_Setend(TL3,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); TL_SetBegin(TL1,sdate,stime,h); TL_Setend(TL1,NextBarSdate,NextBarStime,h); Text_SetString(TX3,NumToStr(HH[1],0)); Text_SetString(TX1,NumToStr(HH,0)); } if diff < ll Then { ll = diff; TL_SetBegin(TL4,sdate,stime,TL_GetValue(TL2,sdate,stime)); TL_Setend(TL4,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); TL_SetBegin(TL2,sdate,stime,l); TL_Setend(TL2,NextBarSdate,NextBarStime,l); Text_SetString(TX4,NumToStr(LL[1],0)); Text_SetString(TX2,NumToStr(LL,0)); } } TL_SetExtRight(TL1,true); TL_SetExtLeft(TL1,true); TL_SetExtRight(TL2,true); TL_SetExtLeft(TL2,true); TL_SetSize(TL1,2); TL_SetSize(TL2,2); TL_SetColor(TL1,RED); TL_SetColor(TL2,BLUE); TL_SetExtRight(TL3,true); TL_SetExtLeft(TL3,true); TL_SetExtRight(TL4,true); TL_SetExtLeft(TL4,true); TL_SetSize(TL3,2); TL_SetSize(TL4,2); TL_SetColor(TL3,MAGENTA); TL_SetColor(TL4,CYAN); Text_SetLocation(TX1,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); Text_SetLocation(TX2,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); Text_SetLocation(TX3,NextBarSdate,NextBarStime,TL_GetValue(TL3,sdate,stime)); Text_SetLocation(TX4,NextBarSdate,NextBarStime,TL_GetValue(TL4,sdate,stime)); plot1(hh,"최고건수차",RED); plot2(ll,"최저건수차",blue); 즐거운 하루되세요 > 오늘도수익 님이 쓴 글입니다. > 제목 : Re : Re : 수식 부탁드립니다. > 수식 잘 받았습니다. 제가 원하는 값은 선물지수가 아니라 선물매수매도 건수를 볼려고 하는 것입니다. 수정이 가능 할까요? > 예스스탁 님이 쓴 글입니다. > 제목 : Re : 수식 부탁드립니다. > 안녕하세요 예스스탁입니다. #Data6 : 선물매수호가총건수 #Data7 : 선물매도호가총건수 var : TL1(0,data1),TL2(0,data1),TL3(0,data1),TL4(0,data1); var : diff(0,data1),hh(0,data1),ll(0,data1); var : TX1(0,data1),TX2(0,data1),TX3(0,data1),TX4(0,data1); diff = data6(c)-data7(c); if bdate != bdate[1] Then { hh = diff; ll = diff; TL_Delete(TL1); TL_Delete(TL2); TL_Delete(TL3); TL_Delete(TL4); TL1 = TL_New(sdate,stime,H,NextBarSdate,NextBarStime,H); TL2 = TL_New(sdate,stime,L,NextBarSdate,NextBarStime,L); TL3 = TL_New(sdate,stime,H,Sdate,Stime,H); TL4 = TL_New(sdate,stime,L,Sdate,Stime,L); Text_Delete(TX1); Text_Delete(TX2); Text_Delete(TX3); Text_Delete(TX4); TX1 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime),NumToStr(TL_GetValue(TL1,sdate,stime),2)); TX2 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime),NumToStr(TL_GetValue(TL2,sdate,stime),2)); TX3 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL3,sdate,stime),NumToStr(TL_GetValue(TL3,sdate,stime),2)); TX4 = Text_New(NextBarSdate,NextBarStime,TL_GetValue(TL4,sdate,stime),NumToStr(TL_GetValue(TL4,sdate,stime),2)); Text_SetStyle(TX1,0,0); Text_SetStyle(TX2,0,0); Text_SetStyle(TX3,0,0); Text_SetStyle(TX4,0,0); } else { if diff > hh Then { hh = diff; TL_SetBegin(TL3,sdate,stime,TL_GetValue(TL1,sdate,stime)); TL_Setend(TL3,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); TL_SetBegin(TL1,sdate,stime,h); TL_Setend(TL1,NextBarSdate,NextBarStime,h); } if diff < ll Then { ll = diff; TL_SetBegin(TL4,sdate,stime,TL_GetValue(TL2,sdate,stime)); TL_Setend(TL4,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); TL_SetBegin(TL2,sdate,stime,l); TL_Setend(TL2,NextBarSdate,NextBarStime,l); } } TL_SetExtRight(TL1,true); TL_SetExtLeft(TL1,true); TL_SetExtRight(TL2,true); TL_SetExtLeft(TL2,true); TL_SetSize(TL1,2); TL_SetSize(TL2,2); TL_SetColor(TL1,RED); TL_SetColor(TL2,BLUE); TL_SetExtRight(TL3,true); TL_SetExtLeft(TL3,true); TL_SetExtRight(TL4,true); TL_SetExtLeft(TL4,true); TL_SetSize(TL3,2); TL_SetSize(TL4,2); TL_SetColor(TL3,MAGENTA); TL_SetColor(TL4,CYAN); Text_SetString(TX1,NumToStr(TL_GetValue(TL1,sdate,stime),2)); Text_SetLocation(TX1,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); Text_SetString(TX2,NumToStr(TL_GetValue(TL2,sdate,stime),2)); Text_SetLocation(TX2,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); Text_SetString(TX3,NumToStr(TL_GetValue(TL3,sdate,stime),2)); Text_SetLocation(TX3,NextBarSdate,NextBarStime,TL_GetValue(TL3,sdate,stime)); Text_SetString(TX4,NumToStr(TL_GetValue(TL4,sdate,stime),2)); Text_SetLocation(TX4,NextBarSdate,NextBarStime,TL_GetValue(TL4,sdate,stime)); plot1(hh,"최고건수차",RED); plot2(ll,"최저건수차",blue); 즐거운 하루되세요 > 오늘도수익 님이 쓴 글입니다. > 제목 : 수식 부탁드립니다. > 아래 수식에서 최고건수 와 최저건수 의 값을 표기하고 싶습니다. #Data6 : 선물매수호가총건수 #Data7 : 선물매도호가총건수 var : TL1(0,data1),TL2(0,data1),TL3(0,data1),TL4(0,data1); var : diff(0,data1),hh(0,data1),ll(0,data1); diff = data6(c)-data7(c); if bdate != bdate[1] Then { hh = diff; ll = diff; TL_Delete(TL1); TL_Delete(TL2); TL1 = TL_New(sdate,stime,H,NextBarSdate,NextBarStime,H); TL2 = TL_New(sdate,stime,L,NextBarSdate,NextBarStime,L); TL_Delete(TL3); TL_Delete(TL4); TL3 = TL_New(sdate,stime,H,Sdate,Stime,H); TL4 = TL_New(sdate,stime,L,Sdate,Stime,L); } else { if diff > hh Then { hh = diff; TL_SetBegin(TL3,sdate,stime,TL_GetValue(TL1,sdate,stime)); TL_Setend(TL3,NextBarSdate,NextBarStime,TL_GetValue(TL1,sdate,stime)); TL_SetBegin(TL1,sdate,stime,h); TL_Setend(TL1,NextBarSdate,NextBarStime,h); } if diff < ll Then { ll = diff; TL_SetBegin(TL4,sdate,stime,TL_GetValue(TL2,sdate,stime)); TL_Setend(TL4,NextBarSdate,NextBarStime,TL_GetValue(TL2,sdate,stime)); TL_SetBegin(TL2,sdate,stime,l); TL_Setend(TL2,NextBarSdate,NextBarStime,l); } } TL_SetExtRight(TL1,true); TL_SetExtLeft(TL1,true); TL_SetExtRight(TL2,true); TL_SetExtLeft(TL2,true); TL_SetSize(TL1,2); TL_SetSize(TL2,2); TL_SetColor(TL1,RED); TL_SetColor(TL2,BLUE); TL_SetExtRight(TL3,true); TL_SetExtLeft(TL3,true); TL_SetExtRight(TL4,true); TL_SetExtLeft(TL4,true); TL_SetSize(TL3,2); TL_SetSize(TL4,2); TL_SetColor(TL3,MAGENTA); TL_SetColor(TL4,CYAN); plot1(hh,"최고건수차",RED); plot2(ll,"최저건수차",blue);