안녕하세요 예스스탁입니다. input : R1(0),G1(0),B1(0); input : R2(0),G2(0),B2(0); input : n개(500); var : hh(0),ll(0); var : tx1(0),tx2(0),tx3(0),tx4(0); if Bdate != Bdate[1] Then { var1 = 0; Var2 = Upvol-DownVol; } var1 = var1 + (Upvol-DownVol); if Bdate != Bdate[1] Then { hh = var1; ll = var1; Text_Delete(tx1); Text_Delete(tx2); Text_Delete(tx3); Text_Delete(tx4); if CurrentDate == sDate Then { value1 = hh; Value2 = ll; tx1 = Text_New_Self(sdate,sTime,hh,"거래고===="); tx3 = Text_New(sdate,sTime,h,"거래고===="); Text_SetStyle(tx1,2,1); Text_SetStyle(tx3,2,1); Text_SetColor(tx1,Magenta); Text_SetColor(tx3,Magenta); tx2 = Text_New_Self(sdate,sTime,ll,"거래저===="); tx4 = Text_New(sdate,sTime,l,"거래저===="); Text_SetStyle(tx2,2,0); Text_SetStyle(tx4,2,0); Text_SetColor(tx2,blue); Text_SetColor(tx4,blue); } } Else { if var1 > hh Then { hh = var1; if CurrentDate == sDate and hh >= value1+n개 Then { value1 = hh; tx1 = Text_New_Self(sdate,sTime,hh,"거래고===="); tx3 = Text_New(sdate,sTime,h,"거래고===="); Text_SetStyle(tx1,2,1); Text_SetStyle(tx3,2,1); Text_SetColor(tx1,Magenta); Text_SetColor(tx3,Magenta); } } if var1 < ll Then { ll = var1; if CurrentDate == sDate and ll <= value2-n개 Then { value2 = ll; tx2 = Text_New_Self(sdate,sTime,ll,"거래저===="); tx4 = Text_New(sdate,sTime,l,"거래저===="); Text_SetStyle(tx2,2,0); Text_SetStyle(tx4,2,0); Text_SetColor(tx2,blue); Text_SetColor(tx4,blue); } } } if CurrentDate == sDate Then { Plot1(var1,"당일실매수거래량",iff(var1 > 0,RGB(0,0,0),RGB(0,0,0))); Plot17(var1,"당일실매수거래량2",iff(var1 > 0,RGB(0,0,0),RGB(0,0,0))); plot2(Var2,"첫봉종가"); plot11(Var2+75,"첫봉종가+50"); plot12(Var2-75,"첫봉종가-50"); Plot3(hh,"최고"); plot4(ll,"최저"); plot5(ll+(hh-ll)*0.25,"25.0%"); plot6(ll+(hh-ll)*0.382,"38.2%"); plot7(ll+(hh-ll)*0.500,"50.0%"); plot8(ll+(hh-ll)*0.500+0.02,"50+0.02%"); plot9(ll+(hh-ll)*0.618,"61.8%"); plot10(ll+(hh-ll)*0.75,"75.0%"); plot13(ll+(hh-ll)*0.20,"20.0%"); plot14(ll+(hh-ll)*0.80,"80.0%"); plot15(ll+(hh-ll)*0.500+40,"50+40%"); plot16(ll+(hh-ll)*0.500-40,"50-40%"); PlotBaseLine1(0); PlotBaseLine2(1000); PlotBaseLine3(-1000); } 즐거운 하루되세요 > 포보스 님이 쓴 글입니다. > 제목 : 검토 요청합니다. > 무더위에 수고 많습니다. 미리 감사드리고요. 아래 수식에서"거래고====", "거래저===="를 당일 최고와 최저에 1회만 거래량지표와 캔들차트에 표기하는것을 처음표기된 후 거래량이 500개이상 변화될때마다 "거래고====", "거래저===="를 표기되도록 부탁드려봅니다. 귀찮게 해서 죄송합니다. 수고해주심에 다시한번 감사드립니다. 꾸뻑 =============== input : R1(0),G1(0),B1(0); input : R2(0),G2(0),B2(0); var : hh(0),ll(0); var : tx1(0),tx2(0),tx3(0),tx4(0); if Bdate != Bdate[1] Then { var1 = 0; Var2 = Upvol-DownVol; } var1 = var1 + (Upvol-DownVol); if Bdate != Bdate[1] Then { hh = var1; ll = var1; Text_Delete(tx1); Text_Delete(tx2); Text_Delete(tx3); Text_Delete(tx4); tx1 = Text_New_Self(sdate,sTime,hh,"거래고===="); tx2 = Text_New_Self(sdate,sTime,ll,"거래저===="); tx3 = Text_New(sdate,sTime,h,"거래고===="); tx4 = Text_New(sdate,sTime,l,"거래저===="); Text_SetStyle(tx1,2,1); Text_SetStyle(tx2,2,0); Text_SetStyle(tx3,2,1); Text_SetStyle(tx4,2,0); Text_SetColor(tx1,Magenta); Text_SetColor(tx2,blue); Text_SetColor(tx3,Magenta); Text_SetColor(tx4,blue); } Else { if var1 > hh Then { hh = var1; Text_SetLocation(tx1,sDate,sTime,hh); Text_SetLocation(tx3,sDate,sTime,h); } if var1 < ll Then { ll = var1; Text_SetLocation(tx2,sDate,sTime,ll); Text_SetLocation(tx4,sDate,sTime,l); } } if CurrentDate == sDate Then { Plot1(var1,"당일실매수거래량",iff(var1 > 0,RGB(0,0,0),RGB(0,0,0))); Plot17(var1,"당일실매수거래량2",iff(var1 > 0,RGB(0,0,0),RGB(0,0,0))); plot2(Var2,"첫봉종가"); plot11(Var2+75,"첫봉종가+50"); plot12(Var2-75,"첫봉종가-50"); Plot3(hh,"최고"); plot4(ll,"최저"); plot5(ll+(hh-ll)*0.25,"25.0%"); plot6(ll+(hh-ll)*0.382,"38.2%"); plot7(ll+(hh-ll)*0.500,"50.0%"); plot8(ll+(hh-ll)*0.500+0.02,"50+0.02%"); plot9(ll+(hh-ll)*0.618,"61.8%"); plot10(ll+(hh-ll)*0.75,"75.0%"); plot13(ll+(hh-ll)*0.20,"20.0%"); plot14(ll+(hh-ll)*0.80,"80.0%"); plot15(ll+(hh-ll)*0.500+40,"50+40%"); plot16(ll+(hh-ll)*0.500-40,"50-40%"); PlotBaseLine1(0); PlotBaseLine2(1000); PlotBaseLine3(-1000); }