아래 수식으로 시스템 부탁 합니다. Input : length(12),종가사용여부(0),수치표시(1),표시(0); input : 추세두께(1),추세상승색(red),추세하락색(blue); input : 고점연결두께(3),고점연결색상(red); input : 저점연결두께(3),저점연결색상(blue); Var:j(0),jj(0),HH(0),LL(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""), TL1(0),Text1(0),TL11(0),TL12(0); Array:고[10,4](0),저[10,4](0); // 1:가격,2:Index,3:sDate,4:sTime #==========================================# HH = IFF(종가사용여부==1,C,H); LL = IFF(종가사용여부==1,C,L); If Index == 0 Then { 고[1,1] = HH; 저[1,1] = LL; } Condition1 = Highest(HH,length) == HH and 최종고가 <> HH; Condition2 = Lowest (LL,length) == LL and 최종저가 <> LL; 처리구분 = ""; If Condition1 and Condition2 Then // 기간고점과 기간저점 동시 발생 { If 최종꼭지점 == "저점" Then { If 저[1,1] > LL Then 처리구분 = "저점처리"; Else 처리구분 = "고점처리"; } Else If 최종꼭지점 == "고점" Then { If 고[1,1] < HH Then 처리구분 = "고점처리"; Else 처리구분 = "저점처리"; } } Else If Condition1 Then 처리구분 = "고점처리"; Else If Condition2 Then 처리구분 = "저점처리"; #==========================================# If 처리구분 == "고점처리" Then { 최종고가 = HH; // 신규고점을 체크하기 위해 저장 If 최종꼭지점 == "저점" Then { For j = 10 DownTo 2 { For jj = 1 To 4 { 고[j,jj] = 고[j-1,jj]; } } 고[1,1] = HH; 고[1,2] = Index; 고[1,3] = sDate; 고[1,4] = sTime; TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]); TL_SetSize(TL1,추세두께); TL_SetColor(TL1,추세상승색); If 수치표시 == 1 Then { Text1 = Text_New(고[1,3],고[1,4],고[1,1],NumToStr(고[1,1],2)+NewLine+"+"+NumToStr((고[1,1]-저[1,1])/PriceScale,0)+"틱"); Text_SetStyle(Text1, 2, 1); } } Else If 고[1,1] < HH Then // 1번 고점보다 높은 고가 출현 { 고[1,1] = HH; 고[1,2] = Index; 고[1,3] = sDate; 고[1,4] = sTime; TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]); // 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임 If 수치표시 == 1 Then { Text_SetLocation(Text1,고[1,3],고[1,4],고[1,1]); Text_SetString(Text1,NumToStr(고[1,1],2)+NewLine+"+"+NumToStr((고[1,1]-저[1,1])/PriceScale,0)+"틱"); } } 최종꼭지점 = "고점"; } #==========================================# If 처리구분 == "저점처리" Then { 최종저가 = LL; If 최종꼭지점 == "고점" then { For j = 10 DownTo 2 { For jj = 1 To 4 { 저[j,jj] = 저[j-1,jj]; } } 저[1,1] = LL; 저[1,2] = Index; 저[1,3] = sDate; 저[1,4] = sTime; TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]); TL_SetSize(TL1,추세두께); TL_SetColor(TL1,추세하락색); If 수치표시 == 1 Then { Text1 = Text_New(저[1,3],저[1,4],저[1,1],NumToStr(저[1,1],2)+NewLine+"-"+NumToStr((고[1,1]-저[1,1])/PriceScale,0)+"틱"); Text_SetStyle(Text1, 2, 0); } } Else If 저[1,1] > LL then { 저[1,1] = LL; 저[1,2] = Index; 저[1,3] = sDate; 저[1,4] = sTime; TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]); If 수치표시 == 1 Then { Text_SetLocation(Text1,저[1,3],저[1,4],저[1,1]); Text_SetString(Text1,NumToStr(저[1,1],2)+NewLine+"-"+NumToStr((고[1,1]-저[1,1])/PriceScale,0)+"틱"); } } 최종꼭지점 = "저점"; } var : S(0),T(0),hl(0),lh(0),hi(0),li(0),BD(0); var : hltl(0),lhtl(0); S = IFf(최종꼭지점 == "고점",1,iff(최종꼭지점 == "저점",-1,0)); if Bdate != Bdate[1] Then { hl = 0; lh = 0; hi = index; Li = index; } if H == DayHigh Then { hl = 0; hi = index; } if L == DayLow Then { lh = 0; Li = index; } if S == 1 and S != S[1] and 저[1,2] >= hi Then { if hl == 0 or (hl > 0 and 저[1,1] < hl) Then { hl = 저[1,1]; hltl = TL_New(저[1,3],저[1,4],hl,sdate,stime,hl); TL_SetColor(hltl,BLUE); } } Else { if hl > 0 Then TL_SetEnd(hltl,sdate,stime,hl); } if S == -1 and S != S[1] and 고[1,2] >= li Then { if lh == 0 or (lh > 0 and 고[1,1] > lh) Then { lh = 고[1,1]; lhtl = TL_New(고[1,3],고[1,4],lh,sdate,stime,lh); TL_SetColor(lhtl,RED); } } else { if lh > 0 Then TL_SetEnd(lhtl,sdate,stime,lh); } var : TL9(0),st(0),value(0); if Bdate != Bdate[1] Then st = 0; if st == 0 and S == -1 and S != S[1] Then st = 1; if st == 1 and S == -1 and 저[1,1] < 저[1,2] and Bdate == Bdate[index-고[1,2]] and 고[1,1] >= ((Daylow+((dayhigh-daylow)*0.382))) Then { st = 2; value = 고[1,1]; TL9 = TL_New(고[1,3],고[1,4],value,sdate,sTime,value); TL_SetColor(TL9,GREEN); } if st >= 1 and DayHigh(0) > DayHigh(0)[1] Then st = 0; if st == 2 Then TL_SetEnd(TL9,sDate,sTime,value);

아래일간지표수치를 분차트에서도 동일 수치로 볼수있도록 부탁드립니다. Inputs: Length(14); Variables : ABull(0), ABear(0), BBull(0), BBear(0),ARatio(0), BRatio(0); ABull = accumn(High - Open, Length); ABear = Accumn(Open - Low, Length); BBull = Accumn(High - Close[1], Length); BBear = Accumn(Close[1] - Low, Length); ARatio = ABull / ABear * 100; BRatio = BBull / BBear * 100; var1 = (ARatio+BRatio)/2; Var2 = ma(var1,5); Plot1(ARatio, "A-ratio",BLUE); Plot2(BRatio, "B-ratio",RED); Plot3(var1, "평균"); Plot4(var2, "이평");

안녕하세요. 최근 250봉 중 최저점(LL) 찍고 상승하여 고점(hh) 찍고 -2% 이상 하락하여 저점(HL) 찍고 상승하면 폭 maxHL = hh-HL; 상승 중 발생한 폭 중 가장 큰 폭만 maxHL 이다. 한가지 더 추가 부탁드리는 것은 고점봉의 폭이 크면 고점봉의 저점과 고점이 폭 maxHL로 잡힙니다. 저점(HL)은 고점봉 다음봉부터 적용되도록 부탁드립니다. 수고하세요 꾸벅~ =============== 이전에 알려주신 수식입니다. input : Period(250); var : hh(0),hi(0),HL(0),maxHL(0),cnt(0); hh = h; For cnt = 0 to Period-1 { if h[cnt] > hh Then { hh = h[cnt]; hi = cnt; } } hl = L; For cnt = 0 to hi { if l[cnt] < hl Then { hl = l[cnt]; } } if H == hh Then HL = L; if L < HL Then HL = L; maxHL = hh-HL; Plot1(maxHL,"최대낙폭"); Plot2(hh,"당일최고가"); Plot3(HL,"당일최고가이후최저가");

안녕하세요 첫번째 질문이빈다 아래 식으로 이용하면 테스트 출력이 오른쪽나오고 있습니다 이것은 왼쪽 또는 중앙에 나오게 수정좀 부탁합니다 value1 = dayopen(1); plot1(value1,"전일시가"); Text_Delete(var1); var1 = Text_New(sdate,stime,value1,"전일시가 : " +NumToStr(value1,2)); Text_SetStyle(var1,0,2); 두번째 질문입니다 rsi(9) 를 이용해서 50 이상이면 빤간색으로 50아래면 파란색으로 차트 바탕화면이 변했으면 합니다 세번째 질문입니다 지표설정에서 보면 피봇분봉이 있던데요 틱차트에 피봇을 사용원하면 같은것을 사용하면 된느지요 아니면 다른것이 있는지요 있으면 부탁좀 합니다

챠트쉐어 신규가입을 어떻게 해야하는지요? 어디로 가입해야하는지 알려주세요. 가입신청화면을 찾을수가 없네요.

제가 만든 국선 해선 예상챠트를 기반으로 자동매매프로그램 제작도 가능 하신지요? kas1988@hanmail.net 010-8073-0661 이런글을 올려도 되는지를 몰라서 답답한 마음에 올렸습니다. 예스스탁 님 죄송합니다.

70579번 다시한번만 봐주세요 ㅠㅠ