다음의 식을 일봉에 적용하고 싶습니다. 장중식에서도 시간설정없이 적용하고 싶습니다. Input:length(10),추세선연장(5),추세판단범위(10),진입횟수제한(1), #ssssssssssssssssssssssssssssssssss 파동선두께(1),추세선두께(0),파동선색(GREEN),수치표시(0); input : starttime(101500),endtime(1259000); #eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee Var:j(0),jj(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""),진입횟수(0), TL1(0),TL2(0),TL3(0),Text1(0), 고추세최종(0),저추세최종(0),고ID(0),저ID(0); Array:고[100,4](0),저[100,4](0); // 1:가격,2:Index,3:sDate,4:sTime #==========================================# var : Tcond(false); if (endtime > starttime) Then SetStopEndofday(endtime); Else { if sdate != sdate[1] Then SetStopEndofday(endtime); if bdate != bdate[1] Then SetStopEndofday(0); } if (sdate != sdate[1] and stime >= endtime) or (sdate == sdate[1] and stime >= endtime and stime[1] < endtime) then { Tcond = false; } if (sdate != sdate[1] and stime >= starttime) or (sdate == sdate[1] and stime >= starttime and stime[1] < starttime) then { Tcond = true; } #ssssssssssssssssssssssssssssssssss If Index == 0 Then { 고[1,1] = C; 저[1,1] = C; } #eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee Condition1 = Highest(C,length) == C and 최종고가 <> C; Condition2 = Lowest (C,length) == C and 최종저가 <> C; 처리구분 = ""; If Condition1 and Condition2 Then // 기간고점과 기간저점 동시 발생 { If 최종꼭지점 == "저점" Then 처리구분 = "고점처리"; // 저 - 고 순으로 처리 Else 처리구분 = "저점처리"; // 고 - 저 순으로 처리 } Else If Condition1 Then 처리구분 = "고점처리"; Else If Condition2 Then 처리구분 = "저점처리"; #==========================================# If 처리구분 == "고점처리" Then { 최종고가 = C; // 신규고점을 체크하기 위해 저장 If 최종꼭지점 == "저점" Then { 진입횟수 = 0; For j = 100 DownTo 2 { For jj = 1 To 4 { 고[j,jj] = 고[j-1,jj]; } } 고[1,1] = C; 고[1,2] = Index; 고[1,3] = sDate; 고[1,4] = sTime; TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]); #ssssssssssssssssssssssssssssssssss If 수치표시 == 1 Then { Text1 = Text_New(sDate,sTime,고[1,1],NumToStr(고[1,1],2)); Text_SetStyle(Text1, 2, 1); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,파동선색); #eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee } Else If 고[1,1] < C Then // 1번 고점보다 높은 고가 출현 { 고[1,1] = C; 고[1,2] = Index; 고[1,3] = sDate; 고[1,4] = sTime; TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]); // 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임 #ssssssssssssssssssssssssssssssssss If 수치표시 == 1 Then { Text_SetLocation(Text1,sDate,sTime,고[1,1]); Text_SetString(Text1,NumToStr(고[1,1],2)); } #eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee } /* 고점추세선 */ If 고[2,2][1] <> 고[2,2] Then // 고2의 Index값이 변동 없음 즉, 새로운 고점이 생기지 않았음 { 고추세최종 = 0; For j = 3 To 추세판단범위 { If 고[2,1] < 고[j,1] Then { 고추세최종 = (고[2,1] - 고[j,1])/(고[2,2] - 고[j,2]) * (Index - 고[j,2]) + 고[j,1]; TL2 = TL_New(고[j,3],고[j,4],고[j,1],sDate,sTime,고추세최종); 고ID = j; #ssssssssssssssssssssssssssssssssss TL_SetSize(TL2,추세선두께); #eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee TL_SetColor(TL2,RED); j = 100; } } } Else If 고추세최종[1] > 0 Then { 고추세최종 = (고[2,1] - 고[고ID,1])/(고[2,2] - 고[고ID,2]) * (Index - 고[고ID,2]) + 고[고ID,1]; TL_SetEnd(TL2,sDate,sTime,고추세최종); } If 저추세최종[1] > 0 Then { 저추세최종 = (저[2,1] - 저[저ID,1])/(저[2,2] - 저[저ID,2]) * (Index - 저[저ID,2]) + 저[저ID,1]; TL_SetEnd(TL3,sDate,sTime,저추세최종); } 최종꼭지점 = "고점"; If 진입횟수 < 진입횟수제한 and 고추세최종 > 0 and 고추세최종 < C and Tcond ==true Then { Buy(); } } #==========================================# If 처리구분 == "저점처리" Then { 최종저가 = C; If 최종꼭지점 == "고점" then { 진입횟수 = 0; For j = 100 DownTo 2 { For jj = 1 To 4 { 저[j,jj] = 저[j-1,jj]; } } 저[1,1] = C; 저[1,2] = Index; 저[1,3] = sDate; 저[1,4] = sTime; TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]); #ssssssssssssssssssssssssssssssssss If 수치표시 == 1 Then { Text1 = Text_New(sDate,sTime,저[1,1],NumToStr(저[1,1],2)); Text_SetStyle(Text1, 2, 0); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,파동선색); #eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee } Else If 저[1,1] > C then { 저[1,1] = C; 저[1,3] = sDate; 저[1,4] = sTime; 저[1,2] = Index; TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]); #ssssssssssssssssssssssssssssssssss If 수치표시 == 1 Then { Text_SetLocation(Text1,sDate,sTime,저[1,1]); Text_SetString(Text1,NumToStr(저[1,1],2)); } #eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee } /* 저점추세선 */ If 저[2,2][1] <> 저[2,2] Then { 저추세최종 = 0; For j = 3 To 추세판단범위 { If 저[2,1] > 저[j,1] and 저[j,1] > 0 Then { 저추세최종 = (저[2,1] - 저[j,1])/(저[2,2] - 저[j,2]) * (Index - 저[j,2]) + 저[j,1]; TL3 = TL_New(저[j,3],저[j,4],저[j,1],sDate,sTime,저추세최종); 저ID = j; #ssssssssssssssssssssssssssssssssss TL_SetSize(TL3,추세선두께); #eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee TL_SetColor(TL3,Blue); j = 100; } } } Else If 저추세최종[1] > 0 Then { 저추세최종 = (저[2,1] - 저[저ID,1])/(저[2,2] - 저[저ID,2]) * (Index - 저[저ID,2]) + 저[저ID,1]; TL_SetEnd(TL3,sDate,sTime,저추세최종); } If 고추세최종[1] > 0 Then { 고추세최종 = (고[2,1] - 고[고ID,1])/(고[2,2] - 고[고ID,2]) * (Index - 고[고ID,2]) + 고[고ID,1]; TL_SetEnd(TL2,sDate,sTime,고추세최종); } 최종꼭지점 = "저점"; If 진입횟수 < 진입횟수제한 and 저추세최종 > 0 and 저추세최종 > C and Tcond ==true Then { Sell(); } } #==========================================# If 처리구분 == "" Then { If Index - 고[3,3] <= 추세선연장 Then { If 고추세최종[1] > 0 Then { 고추세최종 = (고[2,1] - 고[고ID,1])/(고[2,2] - 고[고ID,2]) * (Index - 고[고ID,2]) + 고[고ID,1]; TL_SetEnd(TL2,sDate,sTime,고추세최종); } } Else { 고추세최종 = 0; } If Index - 저[3,3] <= 추세선연장 Then { If 저추세최종[1] > 0 Then { 저추세최종 = (저[2,1] - 저[저ID,1])/(저[2,2] - 저[저ID,2]) * (Index - 저[저ID,2]) + 저[저ID,1]; TL_SetEnd(TL3,sDate,sTime,저추세최종); } } Else { 저추세최종 = 0; } If MarketPosition > 0 and TL2[1] == TL2 and 고추세최종 > 0 and 고추세최종[1] <= C[1] and 고추세최종 > C Then ExitLong(); If MarketPosition < 0 and TL3[1] == TL3 and 저추세최종 > 0 and 저추세최종[1] >= C[1] and 저추세최종 < C Then ExitShort(); } If ((최종꼭지점 == "고점" and MarketPosition == 1) or (최종꼭지점 == "저점" and MarketPosition == -1)) and MarketPosition[1] != MarketPosition Then { 진입횟수 = 진입횟수 + 1; }

input : N(4); var1 = H[N]; var2 = H[1]; var3 = (var1-var2)/(N-1); var4 = var2-var3; if var1 > var2 and C > var4 Then Buy("추"); 이걸응용하여, 상승추세선하락돌파하면서 매도식 부탁드립니다. 또한, 기간이 너무 짧은 추세돌파인것 같습니다. 중기.장기추세돌파식도 부탁드립니다. 덧붙여, 자동추세선이 가능하다면 그 식도 부탁드릴께요. 감사합니다

현재 매수 수식부분은 아래와 같습니다. 기본세팅은 RSI매수이고, 두번째 매수부터 LatestEntryPrice(0)*0.98 와 같이 2프로 이상 하락일시 추가매수 하게 되어있는데, OR 수식을 써서 2프로 이상 하락일시 추가매수 하되 일정시간(예.60분) 이 지나면 2프로이상 하락이 아니라도 추가매수를 진행 하도록 설정해보고 싶은데 어떻게 하면 되는지 알고싶습니다. Input : 투자금액(1000000),Period(14), N(1), LPercent(30),시작일(20210325),시작시간(160000); var : value(0), e(0),x(0),count(0),Vma(0), Tcond(false); Array : VV[5](0),XX[5](0); value = RSI(Period); vv[0] = floor((투자금액*0.2)/NextBarOpen); vv[1] = floor((투자금액*0.3)/NextBarOpen); vv[2] = floor((투자금액*0.5)/NextBarOpen); if NextBarSdate >= 시작일 and NextBarStime >= 시작시간 Then Tcond = true; if MarketPosition != 0 and MarketPosition != MarketPosition[1] Then count = count+1; if sdate >= 시작일 and stime >= 시작시간 Then Tcond = true; if Tcond == true then { #첫번째 매수 if (TotalTrades == 0 or MarketPosition == 0) then { if MarketPosition <= 0 and CrossDown(value, LPercent) Then { buy("b1",onclose,def,vv[MaxEntries]); } } if MarketPosition == 1 Then { if CurrentContracts > CurrentContracts[1] Then { e = e +1; if e == 0 then XX[e] = CurrentContracts; Else XX[e] = CurrentContracts-CurrentContracts[1]; } #두번째 매수 If MarketPosition == 1 and e == 1 and CrossDown(value, LPercent) and NextBarSdate == sdate Then { buy("b2",atlimit,LatestEntryPrice(0)*0.98,vv[MaxEntries]); }}}

MACD 기준선 0 위에서 MACD 기울기가 상향이면서 음봉에서 양봉 발생 시 매수 진입 청산은 음봉 발생시 매도 청산완료 MACD 기준선 0 아래에서 MACD 기울기가 하향이면서 양봉에서 음봉 발생 시 매도 진입 청산은 양봉 발생시 매수 청산완료 부탁드립니다.

매수 조건식 부탁 드립니다. 전일 15%이상 상승종목 당일 조건 전일 종가 이하로 3%이하 하락후 전일종가 돌파시 매수 할수 있도록 부탁 드립니다.

Donchian Channel 고가기준으로 20일 신고가를 연결한 선과 저가기준으로 10일 신저가를 연결한 선을 지표로 활용하고 싶습니다. 20일, 10일은 최적화를 하려고 합니다. N, N1으로 넣어주시면 감사하겠습니다. +종목검색도 같은 수식을 입력하면 될까요??

안녕하세요 아래식의 시작시간을 미장개장에 시작해서 미장 종료후 초기화되는 로직과 당일미장개장에서 익일 미장시작전까지 연장하는 로직을 별도로 부탁드립니다. var : T(0); if Bdate != Bdate[1] Then { T = 0; if C > O Then T = 1; if C < O Then T = -1; var1 = O; var2 = H; var3 = L; var4 = C; } if T != 0 Then { Plot1(var1,"시",IFf(T == 1,RED,BLUE)); Plot2(var2,"고",IFf(T == 1,RED,BLUE)); Plot3(var3,"저",IFf(T == 1,RED,BLUE)); Plot4(var4,"종",IFf(T == 1,RED,BLUE)); } Else { NoPlot(1); NoPlot(2); NoPlot(3); NoPlot(4); } 감사합니다.