안녕하세요, 지표 수식 문의 드립니다. 매달 월봉 첫 캔들 기준으로 매월 초기화 + ((양봉 캔들 + 움직임이 없던캔들)*0.5) / (음봉 캔들 + 움직임이 없던캔들)*0.5)*100 // 움직임이 없던 캔들은 시가와 종가가 같은 캔들 지표문의 드립니다. 한달동안의 캔들을 백분율로 나눠서 지난 고점보다 이번고점의 캔들의 비율이 높은지 낮은지 파악하는 지표를 만들고 싶습니다. 부탁드립니다 감사합니다. 오늘하루도 행복한하루 보내세요

상단하단에 상하단의 폭이 숫자로 나오게 부탁드립니다. 예를들면 하단이 270이고 상단280이면 상단선위에 10이라는 숫자가 나오게 부탁드립니다. 반대의 경우도 마찬가지입니다. 수식은 아래에 수식으로 참조 부탁드립니다. input: period(20),봉수(2),상단굵기(2),중단굵기(2),하단굵기(2); Var:선두께(3),상승색(GREEN), 하락색(WHITE),예비선색상(white),상승세로선색상(red),하락세로선색상(blue),세로선두께(2); Var:j(0),T(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0),tl4(0),idx(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0)/*,ZZ[20](0)*/; Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0),TX2[7](0),TX3[7](0); r[0] = 0; r[1] = 2; r[2] = 3.; r[3] = -1; r[4] = -2.; r[5] = 1; r[6] = 0.5; For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } if crossup(c,highest(h,Period)[1]) Then T = 1; if CrossDown(c,Lowest(l,Period)[1]) Then T = -1; If T == -1 Then { If T[1] != -1 Then { For j = 18 DownTo 0 { LoVal[j+1] = LoVal[j]; LoBar[j+1] = LoBar[j]; //ZZ[j+1] = ZZ[j]; } LoVal[0] = l; LoBar[0] = 0; //ZZ[0] = l; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,상승색); Tx = Text_New(date11,time11,Value11,"▼"); #동그라미 색상, 빨강 Text_SetColor(Tx,blue); Text_SetStyle(Tx,2,1); Text_SetSize(tx,12); tx = Text_New(date11,time11,Value11,NumToStr(value11,2)+NewLine); Text_SetStyle(tx,2,1); date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[j]); } TL2[0] = TL_New(date21,time21,fr[0],date22,time22,fr[0]); TL_SetColor(TL2[0],white); TL_SetSize(TL2[0],하단굵기); #TL2[1] = TL_New(date21,time21,fr[1],date22,time22,fr[1]); #TL_SetColor(TL2[1],RED); #TL_SetStyle(TL2[1], 3); #TL2[2] = TL_New(date21,time21,fr[2],date22,time22,fr[2]); #TL_SetColor(TL2[2],red); #TL_SetSize(TL2[2],1); #TX2[2] = Text_New(date22,time22,fr[2],NumToStr(fr[2],2)); #Text_SetColor(Tx2[2],BWHITE); #Text_SetStyle(TX2[2],1,1); #TL2[3] = TL_New(date21,time21,fr[3],date22,time22,fr[3]); #TL_SetColor(TL2[3],RED); #TL_SetStyle(TL2[3], 3); #TL2[4] = TL_New(date21,time21,fr[4],date22,time22,fr[4]); #TL_SetColor(TL2[4],red); #TL_SetSize(TL2[4],1); #TX2[4] = Text_New(date22,time22,fr[4],NumToStr(fr[4],2)); #Text_SetColor(Tx2[4],BWHITE); #Text_SetStyle(TX2[4],1,0); TL2[5] = TL_New(date21,time21,fr[5],date22,time22,fr[5]); TL_SetColor(TL2[5],white); TL_SetSize(TL2[5],상단굵기); TL2[6] = TL_New(date21,time21,fr[6],date22,time22,fr[6]); TL_SetColor(TL2[6],MAGENTA); idx = 0; TL_SetSize(TL2[6],중단굵기); } If LoVal[0] > l Then { LoVal[0] = l; LoBar[0] = 0; //ZZ[0] = l; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date22 = date[0]; time22 = stime[0]; //Tx = Text_New_Self(date12,time12,Value12,NumToStr(abs(value11-value12)/PriceScale,0)+" "); #동그라미 색상, 빨강 //Text_SetColor(Tx,BLUE); //Text_SetStyle(Tx,1,0); TL_SetEnd(TL2[0],date22,time22,fr[0]); TL_SetEnd(TL2[1],date22,time22,fr[1]); TL_SetEnd(TL2[2],date22,time22,fr[2]); Text_SetLocation(TX2[2],date22,time22,fr[2]); TL_SetEnd(TL2[3],date22,time22,fr[3]); TL_SetEnd(TL2[4],date22,time22,fr[4]); Text_SetLocation(TX2[4],date22,time22,fr[4]); TL_SetEnd(TL2[5],date22,time22,fr[5]); TL_SetEnd(TL2[6],date22,time22,fr[6]); TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); idx = 0; } } If T == 1 Then { If T[1] != 1 Then { For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; //ZZ[j+1] = ZZ[j]; } HiVal[0] = h; HiBar[0] = 0; //ZZ[0] = h; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,하락색); Tx1 = Text_New(date11,time11,Value11,"▲"); #동그라미 색상, 파랑 Text_SetColor(Tx1,red); Text_SetStyle(Tx1,2,5); Text_SetSize(tx1,12); tx = Text_New(date11,time11,Value11,NewLine+NumToStr(value11,2)); Text_SetStyle(tx,2,0); date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[j]); } TL3[0] = TL_New(date31,time31,fr[0],date32,time32,fr[0]); TL_SetColor(TL3[0],white); TL_SetSize(TL3[0],하단굵기); #TL3[1] = TL_New(date31,time31,fr[1],date32,time32,fr[1]); #TL_SetColor(TL3[1],BLUE); #TL_SetStyle(TL3[1], 3); #TL3[2] = TL_New(date31,time31,fr[2],date32,time32,fr[2]); #TL_SetColor(TL3[2],BLUE); #TL_SetSize(TL3[2],1); #TX3[2] = Text_New(date32,time32,fr[2],NumToStr(fr[2],2)); #Text_SetColor(Tx3[2],BWHITE); #Text_SetStyle(TX3[2],1,1); #TL3[3] = TL_New(date31,time31,fr[3],date32,time32,fr[3]); #TL_SetColor(TL3[3],BLUE); #TL_SetStyle(TL3[3], 3); #TL3[4] = TL_New(date31,time31,fr[4],date32,time32,fr[4]); #TL_SetColor(TL3[4],BLUE); #TL_SetSize(TL3[4],1); #TX3[4] = Text_New(date32,time32,fr[4],NumToStr(fr[4],2)); #Text_SetColor(Tx3[4],BWHITE); #Text_SetStyle(TX3[4],1,0); TL3[5] = TL_New(date31,time31,fr[5],date32,time32,fr[5]); TL_SetColor(TL3[5],white); TL_SetSize(TL3[5],상단굵기); TL3[6] = TL_New(date31,time31,fr[6],date32,time32,fr[6]); TL_SetColor(TL3[6],cyan); TL_SetSize(TL3[6],중단굵기); idx = 0; } If HiVal[0] < h Then { HiVal[0] = h; HiBar[0] = 0; //ZZ[0] = h; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; //Tx = Text_New_Self(date12,time12,Value12,NumToStr(abs(value11-value12)/PriceScale,0)+" "); #동그라미 색상, 빨강 //Text_SetColor(Tx,RED); //Text_SetStyle(Tx,1,1); TL_SetEnd(TL3[0],date32,time32,fr[0]); TL_SetEnd(TL3[1],date32,time32,fr[1]); TL_SetEnd(TL3[2],date32,time32,fr[2]); Text_SetLocation(TX3[2],date32,time32,fr[2]); TL_SetEnd(TL3[3],date32,time32,fr[3]); TL_SetEnd(TL3[4],date32,time32,fr[4]); Text_SetLocation(TX3[4],date32,time32,fr[4]); TL_SetEnd(TL3[5],date32,time32,fr[5]); TL_SetEnd(TL3[6],date32,time32,fr[6]); TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); idx = 0; } } idx = idx+1; TL_SetSize(tL,선두께); TL_SetSize(tL1,선두께); TL_SetColor(tL,예비선색상); var : VTL(0); if idx == 봉수 Then { TL_Delete(VTL);// VTL = TL_New(sdate,stime,999999999,sDate,stime,0); TL_SetColor(VTL,iff(T == -1,상승세로선색상,하락세로선색상)); TL_SetSize(VTL,세로선두께); } plot1(fr[0]); plot2(fr[5]); plot3(fr[6]);

연일 수고에 감사드립니다. 초보질문 드립니다. -------------------------------------------------------------------------------------- 1. 전봉고가 돌파시 진입이라고 할때, 장시작시간부터 매매한다고 가정하면, 장시작 후 첫봉은 전봉이 없기 때문에 첫봉다음 2번째 봉에서부터 진입이 가능한 건가요? 2. 어떤 글에서,매매시간은 캔들 단위로 한다고 본것 같은데요, 예를 들어, 종료 시간을 익일05:50분으로 로직을 만들었는데, 30분봉으로 매매를 했다면 05:30분에 마지막 매매가 끝나고 05:50분에는 시스템이 종료된다는 말인가요? 60분봉이면 05:00에 끝나고, 20분봉이면 05:40분에 끝나고? 시스템상 설정한 종료시간 범위안에서 매매를 실행한 차트 캔들 단위로 종료된다고 이해하면 되나요? 3. 항셍시간에 대해 질문인데요, 항셍은 오전, 오후, 야간 3번에 나눠서 매매가 되는데요, 중간에 두번이 끊어지는 건데요, 이것을 세번에 다 각각 나워서 매매시간을 설정해야 되나요, 아니면 10:15 ~ 04:00 를 시간을 하나로 쭉 이어서 설정해도 되는지요, (예: 07:00 ~ 03:50, 10:15 ~ 03:55 ) 4. 항셍에서 시간이 중간에 두번이 끊어지는데요, 전봉고가 돌파시 진입이라고 할때, 오후장 14:00시와, 야간장 18:10분에 다시 시작할때도 첫봉은 전봉이 없는 것으로 되어, 두번째 봉부터 진입이 되는것인가요? 아니면 그전과 계속 이어서 되는 것인가요? -------------------------------------------------------------------------------------- 많은 도움 받고 있습니다. 감사합니다.

도움에 감사 드립니다. 해선용으로 사용하는 수식을 국내 주식용으로 사용코자 합니다. 그대로 사용해도 되는지요? input : ntime(30),P(10),sig(5); var : S1(0),D1(0),TM(0),TF(0); var : cnt(0),SumSqrt(0),Stdv(0); var : sum(0),BBmd(0),Bbup(0),BBdn(0),VV(0),V3(0),V5(0),V7(0); Array : CC[100](0),V1[100](0),V2[100](0),V4[100](0),V6[100](0); if Bdate != Bdate[1] Then { S1 = TimeToMinutes(stime); D1 = sdate; } if D1 > 0 then { if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TM%ntime; if Bdate != Bdate[1] or (Bdate == Bdate[1] and ntime > 1 and TF < TF[1]) or (Bdate == Bdate[1] and ntime > 1 and TM >= TM[1]+ntime) or (Bdate == Bdate[1] and ntime == 1 and TM > TM[1]) Then { for cnt = 1 to 99 { CC[cnt] = CC[cnt-1][1]; V1[cnt] = V1[cnt-1][1]; V2[cnt] = V2[cnt-1][1]; V4[cnt] = V4[cnt-1][1]; V6[cnt] = V6[cnt-1][1]; } } CC[0] = C; if CC[P-1] > 0 then { sum = 0; for cnt = 0 to P-1 { sum = sum + CC[cnt]; } V1[0] = sum/P;#var1 } if V1[P-1] > 0 then { sum = 0; for cnt = 0 to P-1 { sum = sum + V1[cnt]; } V2[0] = sum/P;#var2 } if V2[P-1] > 0 then { sum = 0; for cnt = 0 to P-1 { sum = sum + V2[cnt]; } VV = sum/P; SumSqrt = 0; For cnt = 0 To P - 1 { SumSqrt = SumSqrt + (V2[cnt] - VV)^2; } Stdv = SquareRoot(SumSqrt / P); V3 = 2*stdv; V4[0] = V2[0]+v3; } if V4[sig-1] > 0 then { sum = 0; for cnt = 0 to sig-1 { sum = sum + V4[cnt]; } V5 = sum/sig; V6[0] = C-V5; } if V5[sig+sig-1] > 0 then { sum = 0; for cnt = 0 to sig-1 { sum = sum + V6[cnt]; } V7 = sum/sig; plot1(V7); } }

안녕하세요 지표문의 드립니다. 검토 부탁드립니니다. 볼린져 밴드를 그물망 챠트 처럼 보고 싶습니다. 5 분봉 15 분봉 30 분봉 60 분봉 120 분봉 400 분봉 상기 6개의 봉챠트의 볼린져 밴드를 15분봉 챠트에 한번에 표현되게 부탁드립니다. 색상은 각 분봉의 볼린져 밴드가 한가지 색상으로 상단 하단 중앙이 표현되며 하기와 같이 부탁드립니다. 5 분봉 - 빨강 15 분봉 - 흰색 30 분봉 - 파랑 60 분봉 - 검정색 120 분봉 - 노랑 400 분봉 - 연두 감사합니다.

안녕하세요. 늘 감사드립니다. 무포지션에서 모든 변수는 초기화 하고 매수: 무포지션에서 첫음봉뒤에 양봉이 2연속으로 발생하면 매수준비 조건가 = O; // 현재봉 양봉의 시가 매수준비 T = 1 라고 정의하고 이후에 또 양봉이 발생하면 매수준비 조건가 = O; // 현재봉 양봉의 시가 가 되고 또는 이후에 음봉이 발생하고 음봉의 종가가 위의 매수준비 조건가 를 하방으로 깨면 매수조건 T = 0 ; // 숫자 0 으로 초기화 매수준비 조건가 =0 // 숫자 0 으로 초기화 처럼 모든변수 초기화 합니다. 즉 현재봉 발생음봉의 종가가 가장 최근의 양봉(전봉일 수도 있고 전봉 이전봉들 일수도 있음)의 시가를 하방으로 깨지 않으면 매수 준비 상태는 그대로 유지하고 깨면 초기화합니다. 이 상태에서 가장 최근의 음봉의 시가를 다음 발생하는 양봉의 종가가 상방으로 돌파하면 매수합니다. 매수손절: 매수봉의 시가를 현재가가 하방으로 돌파하면 손절합니다. 매수추적청산 : 매수후 20 틱 이상 ~ 50틱 까지 이익이 나면 최대 이익이 30% 까지 떨어지면 추적이익 청산 합니다. 매수후 50 틱 이상 이익이 나면 최대 이익이 50% 까지 떨어지면 추적이익 청산 합니다. 매도: 매도도 매수와 동일한 논리로 수식을 부탁드립니다.

data1 삼성전자 일봉 챠트 data2 코스피(업종) 일봉 챠트 진입 수식 data2(코스피차트) 120일 평균 값에 -10% 하락시 1차 진입 data1(삼성전자) 종가 진입 100만원 2차 진입 data1(삼성전자) 1차 종가진입가 보다 -5% 하락시 추가로 100만원 진입 3차 진입 data1(삼성전자) 1차 종가진입가 보다 -10% 하락시 추가로 100만원 진입 4차 진입 data1(삼성전자) 1차 종가진입가 보다 -15% 하락시 추가로 100만원 진입 5차 진입 data1(삼성전자) 1차 종가진입가 보다 -20% 하락시 추가로 100만원 진입 청산 수식 data1(삼성전자) 차트에서 MFI(15) > 85 또는 투자심리도(15) > 85 일때 일괄 청산

고생이 많으십니다. 지표수식 변환 부탁 드립니다. 수식1 LL=lowest(L,기간); HH=highest(H,기간); DH=valuewhen(1,H>HH(1),H); Valuewhen(1,barssince(H>HH(1))==(기간-k),DH) 수식2 LL=lowest(L,기간); HH=highest(H,기간); DH=valuewhen(1,H>HH(1),H); Valuewhen(1,barssince(H>HH(1))==(기간-k),LL) 기간 : 10 k : 5 추가문의) 색상 표시를 여러개 알고 싶습니다 예를들어 빨강은 red , 청색은 blue..등등 그외 분홍 , 그레이, 주황, 녹색, 황금색..... 색상분류표 명칭 영문으로 있다면 부탁 드립니다 감사합니다

여기 글중에 참고 한 시스템인데요 1 매수 추세 신호는 나오는데 매도 추세신호가 안나와서요 수식이 잘못된건지 조건이 안맞는건지 만약 조건이면 조건 어느부분을 완화 하면 되는 지 알려주세요 2 이 시스템 열리는데 올래걸리는데 선을 표시하는거 때문에 올래걸리는거면 결과에 영향을 안주게 삭제 가능하면 삭제부탁드려요 3 매매시작시간 8시 40분 종료시간 새벽 5시에 할려고 시간 추가했는데 적용이 안되는거 같아서 수정부탁드려요 input : StartTime(84000),EndTime(50000); var : mav1(0),mav11(0),mav2(0),mav21(0), Tcond(false); value1 = 0; # 매수 / 매도청산 If CCI(9) > 0 Then value1 = 1; If MACD(12,26) > 0 Then value1 = value1+1; If DIPlus(14) > DIMinus(14) Then value1 = value1+1; If StochasticsK(12,5) > StochasticsD(12,5,5) Then value1 = value1+1; value2 = 0; # 매도/매수청산 If CCI(9) < 0 Then value2 = 1; If MACD(12,26) < 0 Then value2 = value2+1; If DIPlus(14) < DIMinus(14) Then value2 = value2+1; If StochasticsK(12,5) < StochasticsD(12,5,5) Then value2 = value2+1; if H[1] == highest(H,5)[1] and H[1] > max(C[1],O[1]) and V[1] >= 5000 and C[0] < C[1] Then exitlong("매수분청산"); if L[1] == Lowest(L,5)[1] and H[1] > max(C[1],O[1]) and V[1] >= 5000 and C[0] > C[1] Then ExitShort("매도분청산"); if H[2] == highest(H,5)[1] and H[2] > max(C[2],O[2]) and V[2] >= 5000 and C[0] < C[2] Then exitlong("매수분올청산"); if L[2] == Lowest(L,5)[1] and H[1] > max(C[1],O[1]) and V[1] >= 5000 and C[0] > C[1] Then ExitShort("매도분올청산"); Input : length(10),종가사용여부(0),수치표시(0),표시(0); input : 추세두께(1),추세상승색(red),추세하락색(blue); input : 고점연결두께(2),고점연결색상(LGREEN); input : 저점연결두께(2),저점연결색상(MAGENTA); 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,1] > 저[2,1] Then { if 표시 == 0 Then TL_Delete(TL11); TL11 = TL_New(저[2,3],저[2,4],저[2,1],저[1,3],저[1,4],저[1,1]); TL_SetExtRight(TL11,true); TL_SetColor(TL11,저점연결색상); TL_SetSize(TL11,저점연결두께); } 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); } if value1 >= 3 then buy("추세매수"); } 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,1] < 고[2,1] Then { if 표시 == 0 Then TL_Delete(TL12); TL12 = TL_New(고[2,3],고[2,4],고[2,1],고[1,3],고[1,4],고[1,1]); TL_SetExtRight(TL12,true); TL_SetColor(TL12,고점연결색상); TL_SetSize(TL12,고점연결두께); } 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); } if value3 >= 3 then sell("추세매도"); } 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)+"틱"); } } 최종꼭지점 = "저점"; } --------------------------------------------- 또 다른시스템인데요 매수 신호만 나오게 되어 있는데 매수신호의 수식의 반대 일때 매도 신호 나오게 수정부탁드려요 추가적으로 이것도 8시40분에 해서 새벽 5시에 끝나개 설정했는데 안되서 이것도 수정부탁드립니다 input :신고가평균봉수(100); input : 신고가거래제한봉수(50); input : 거래량(1000); input : StartTime(83500),EndTime(50000); #청산 조건 input : 청산이평(50); input : 손절이평(100); input : 터치익절(1.5),즉시손절(0.7); var : hi1(0),hi2(0),mav1(0),mav2(0); var : mav11(0),mav21(0), Tcond(false); mav1 = ma(C,청산이평); mav2 = ma(C,손절이평); Condition1 = C > highest(H,신고가평균봉수)[1]; #지정한 StartTime 시간봉이 발생하면 Tcond는 true if (sdate != sdate[1] and stime >= StartTime) or (sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then Tcond = true; #지정한 EndTime 시간봉이 발생하면 Tcond는 false if (sdate != sdate[1] and stime >= EndTime) or (sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then Tcond = False; #지정한 시간대이면 if Tcond == true then { if Condition1 == true Then { hi1 = index; hi2 = hi1[1]; if (hi2 == 0 or (hi2 > 0 and hi1 > hi2+신고가거래제한봉수)) and V >= 거래량 Then buy("매수진입",AtMarket); } if MarketPosition == 1 then { if c < EntryPrice and CrossDown(c,mav2) Then exitlong("손절"); if c > EntryPrice and CrossDown(c,mav1) Then exitlong("이익실현"); } } SetStopLoss(즉시손절 , PercentStop); SetStopProfittarget(터치익절 , PercentStop);