안녕하세요 예스스탁입니다. 1 var : cnt(0), sum1(0), sumi1(0),summ(0),tt(0),hh(0),ll(0),tl(0),tl1(0),tx1(0); var: sum2(0),sumi2(0),sumaa(0); var : t(0),StartBarIndex(0),dd(0),d1(0),d2(0),ee(0),e1(0),e2(0); Array : ii[50](0),aa[50](0),bb[50](0),cc[50](0),vv[150](0),ttl[30](0); Var33=(floor(Money/100000000/10)*10); if Bdate != Bdate[1] Then DD = DD+1; #H>vi(1)*0.95 h>l*1.07 if h>min(l,l[1])*1.08 Then { d1 = dd; d2 = d1[1]; #if d1 >= d2+1 Then #if d2 == 0 or (d2 > 0 and d1 >= d2+3) Then if d2 == 0 or (d2 > 0 and d1 >= d2+5) Then { var1 = Index; Var2 = var1[1]; Var3= Var2[1]; sum1=0; sumi1=0; summ=0; For cnt = 1 to (var1-Var2) { sum1=sum1+h[cnt]; sumi1=sumi1+1; summ=summ+Var33[cnt]; } value1=sum1/sumi1; For cnt = 0 to 150 { vv[cnt]=0; } For cnt = 1 to (var1-Var2) { vv[cnt-1]=h[cnt]; } Plot12(summ,"Money",Orange,Def,1); #Text_New_Self 수식 적용영역에 텍스트 출력 tx1=Text_New_Self(sDate,sTime,summ,NumToStr(summ,0)); Text_SetStyle(tx1,2,1);#텍스트박스내 좌우, 상하 정렬 } } 2 var:cnt(0), sum1(0), sumi1(0),summ(0),tt(0),hh(0),ll(0),tl(0),tl1(0); var: sum2(0),sumi2(0),sumaa(0); var : t(0),StartBarIndex(0),dd(0),d1(0),d2(0),ee(0),e1(0),e2(0); Array : ii[50](0),aa[50](0),bb[50](0),cc[50](0),vv[150](0),ttl[30](0),tttl[30](0),sd[30](0),st[30](0); if Bdate != Bdate[1] Then DD = DD+1; if h>min(l,l[1])*1.08 Then { d1 = dd; d2 = d1[1]; #if d1 >= d2+1 Then #if d2 == 0 or (d2 > 0 and d1 >= d2+3) Then if d2 == 0 or (d2 > 0 and d1 >= d2+5) Then { var1 = Index; Var2 = var1[1]; Var3= Var2[1]; sum1=0; sumi1=0; tl=TL_NEW(sDatE,sTimE,100,sDatE,sTimE,999999); TL_SetSize(tl,0); TL_SetColor(tl,Gray); For cnt = 1 to (var1-Var2) { sum1=sum1+h[cnt]; sumi1=sumi1+1; } value1=sum1/sumi1; For cnt = 0 to 150 { vv[cnt]=0; } For cnt = 1 to (var1-Var2) { vv[cnt-1]=h[cnt]; } Var20=Money/100000000; if Var20>30 Then { For cnt = 49 DownTo 1 { cc[cnt]= cc[cnt-1]; } cc[0]=value1*0.666; # Plot11(cc[0],"hma",Red,Def,1); } For cnt = 30 DownTo 1 { ttl[cnt] =ttl[cnt-1]; tttl[cnt] = tttl[cnt-1]; sd[cnt] =sd[cnt-1]; st[cnt] =st[cnt-1]; } TL_SetExtRight(ttl[10],False); #ttl[0]=tl_new(sDate,sTime,cc[0],NextBarSdate,NextBarStime,CC[0]); TL_SetSize(ttl[0],1); TL_SetExtRight(ttl[0],true); sd[0] = sDate; st[0] = sTime; tttl[0]=tl_new(sd[1],st[1],CC[1],sd[0],st[0],CC[0]); TL_Delete(tttl[10]); } } Else { if CC[0] > 0 Then TL_SetEnd(ttl[0],sDate,sTime,CC[0]); } 즐거운 하루되세요 > yamu 님이 쓴 글입니다. > 제목 : 질문드리겠습니다 > 안녕하세요 질문 2가지 부탁드립니다 질문1) text_new 관련해서 질문드립니다 현재 메인차트 하단에 거래대금 지표를 따로 표시를 했는데요 text 함수로 봉 마다 거래대금 값 (var33 의 값) 을 나타내려고 합니다 텍스트 위치는 막대 (막대차트로 표현) 상단보다 조금 높은 위치로 해주세요 메인차트가 아니라 분리된 하단 차트에 나타내고 싶습니다 질문2) 수식에서 cc 배열 값을 연결하는 추세선 ttl2 배열을 만들어 주셨으면 합니다 cc 의 전값이 (cc[1]) 이 다음값 cc[0] 을 연결하는 추세선을 최근 "10개 까지만 보이게" 부탁합니다 수식은 질문1, 질문2 용으로 각각 올렸습니다 질문1 수식 = var : cnt(0), sum1(0), sumi1(0),summ(0),tt(0),hh(0),ll(0),tl(0),tl1(0),tx1(0); var: sum2(0),sumi2(0),sumaa(0); var : t(0),StartBarIndex(0),dd(0),d1(0),d2(0),ee(0),e1(0),e2(0); Array : ii[50](0),aa[50](0),bb[50](0),cc[50](0),vv[150](0),ttl[30](0); Var33=(floor(Money/100000000/10)*10); if Bdate != Bdate[1] Then DD = DD+1; #H>vi(1)*0.95 h>l*1.07 if h>min(l,l[1])*1.08 Then { d1 = dd; d2 = d1[1]; #if d1 >= d2+1 Then #if d2 == 0 or (d2 > 0 and d1 >= d2+3) Then if d2 == 0 or (d2 > 0 and d1 >= d2+5) Then { var1 = Index; Var2 = var1[1]; Var3= Var2[1]; sum1=0; sumi1=0; summ=0; For cnt = 1 to (var1-Var2) { sum1=sum1+h[cnt]; sumi1=sumi1+1; summ=summ+Var33[cnt]; } value1=sum1/sumi1; For cnt = 0 to 150 { vv[cnt]=0; } For cnt = 1 to (var1-Var2) { vv[cnt-1]=h[cnt]; } Plot12(summ,"Money",Orange,Def,1); tx1=text_new(sDate,sTime,l,""); } } 질문2 수식= var : cnt(0), sum1(0), sumi1(0),summ(0),tt(0),hh(0),ll(0),tl(0),tl1(0); var: sum2(0),sumi2(0),sumaa(0); var : t(0),StartBarIndex(0),dd(0),d1(0),d2(0),ee(0),e1(0),e2(0); Array : ii[50](0),aa[50](0),bb[50](0),cc[50](0),vv[150](0),ttl[30](0); if Bdate != Bdate[1] Then DD = DD+1; if h>min(l,l[1])*1.08 Then { d1 = dd; d2 = d1[1]; #if d1 >= d2+1 Then #if d2 == 0 or (d2 > 0 and d1 >= d2+3) Then if d2 == 0 or (d2 > 0 and d1 >= d2+5) Then { var1 = Index; Var2 = var1[1]; Var3= Var2[1]; sum1=0; sumi1=0; tl=TL_NEW(sDatE,sTimE,100,sDatE,sTimE,999999); TL_SetSize(tl,0); TL_SetColor(tl,Gray); For cnt = 1 to (var1-Var2) { sum1=sum1+h[cnt]; sumi1=sumi1+1; } value1=sum1/sumi1; For cnt = 0 to 150 { vv[cnt]=0; } For cnt = 1 to (var1-Var2) { vv[cnt-1]=h[cnt]; } Var20=Money/100000000; if Var20>30 Then { For cnt = 49 DownTo 1 { cc[cnt]= cc[cnt-1]; } cc[0]=value1*0.666; # Plot11(cc[0],"hma",Red,Def,1); } For cnt = 30 DownTo 1 { ttl[cnt] =ttl[cnt-1]; } TL_SetExtRight(ttl[10],False); ttl[0]=tl_new(sDate,sTime,cc[0],NextBarSdate,NextBarStime,CC[0]); TL_SetSize(ttl[0],1); TL_SetExtRight(ttl[0],true); } } Else { if CC[0] > 0 Then TL_SetEnd(ttl[0],sDate,sTime,CC[0]); }