안녕하세요 예스스탁입니다. 해당식은 이평 골드구간 최고가와 데드구간의 최저가를 그리는 식입니다. 추가로 새로운 이평 골드구간 최고가가 발생하면 이전 이평골드구간 최고가를 전봉까지 연장해 그리고 추가로 새로운 이평 데드구간 최저가가 발생하면 이전 이평데드구간 최저가를 전봉까지 연장해 그리게 됩니다. 추세선 굵기를 지정하실수 있게 외부변수 처리해 드립니다. 종목검새식은 올리신 내용만으로 조건을 지정할 수 없습니다. 자세한 조건내용을 올리시기 바랍니다. input : Period(20),Period1(60),Per(25),소수점자리(1),DARTno(7),굵기(3); var : T(0),HTL(0),HTL1(0),LTL(0),LTL1(0),cnt(0); var : tx1(0),tx2(0),HHTL(0),LLTL(0),TL(0); Array : HD[20](0),HT[20](0),HH[20](0); Array : LD[20](0),LT[20](0),LL[20](0); var : txx(0),txx1(0),tx(""); var1 = ma(C,Period); var2 = ma(C,Period1); if T <= 0 and CrossUp(var1,var2) Then { T = 1; For cnt = 19 DownTo 1 { HD[cnt] = HD[cnt-1]; HT[cnt] = HT[cnt-1]; HH[cnt] = HH[cnt-1]; } HD[0] = sDate; HT[0] = stime; HH[0] = H; TL_SetExtRight(HTL,False); HTL = TL_New(HD[0],HT[0],HH[0],NextBarSdate,NextBarStime,HH[0]); TL_SetColor(HTL,Red); TL_SetSize(HTL,굵기); TL_SetStyle(HTL, 1); TL_SetExtRight(HTL,true); TL_SetDrawMode(HTL,0); HTL1 = HTL[1]; TL_SetEnd(HTL1,sDate[1],sTime[1],HH[1]); if hh[0] <= hh[1] Then tx = "▽ "+NumToStr(hh[0],2); Else tx = NumToStr(hh[0],2); txx = Text_New(sDate,sTime,hh[0],tx); Text_SetStyle(txx,2,1); txx1 = txx[1]; Text_SetLocation(txx1,sDate[1],sTime[1],HH[1]); } if T >= 0 and CrossDown(var1,var2) Then { T = -1; For cnt = 19 DownTo 1 { LD[cnt] = LD[cnt-1]; LT[cnt] = LT[cnt-1]; LL[cnt] = LL[cnt-1]; } LD[0] = sDate; LT[0] = stime; LL[0] = L; TL_SetExtRight(LTL,False); LTL = TL_New(LD[0],LT[0],LL[0],NextBarSdate,NextBarStime,LL[0]); TL_SetColor(LTL,Blue); TL_SetSize(LTL,굵기); TL_SetStyle(LTL, 1); TL_SetExtRight(LTL,true); TL_SetDrawMode(LTL,0); LTL1 = LTL[1]; TL_SetEnd(LTL1,sDate[1],sTime[1],LL[1]); } if T == 1 Then { if HH[0] > 0 and H > HH[0] Then { HD[0] = sdate; HT[0] = sTime; HH[0] = H; TL_SetBegin(HTL,HD[0],HT[0],HH[0]); TL_SetEnd(HTL1,sDate[1],sTime[1],HH[1]); Text_SetLocation(txx1,sDate[1],sTime[1],HH[1]); } if hh[0] <= hh[1] Then tx = "▽ "+NumToStr(hh[0],2); Else tx = NumToStr(hh[0],2); Text_SetString(txx,tx); Text_SetLocation(txx,sDate,sTime,hh[0]); } TL_SetEnd(HTL,NextBarSdate,NextBarStime,HH[0]); if T == -1 Then { if LL[0] > 0 and L < LL[0] Then { LD[0] = sdate; LT[0] = sTime; LL[0] = L; TL_SetBegin(LTL,LD[0],LT[0],LL[0]); TL_SetEnd(LTL1,sDate[1],sTime[1],LL[1]); } } TL_SetEnd(LTL,NextBarSdate,NextBarStime,LL[0]); Plot1(var1,"이동평균선1"); Plot2(var2,"이동평균선2"); 즐거운 하루되세요