아래 식에서 기준가 2.50을 첫 돌파 후 5번째에 매수 진입하도록 가능할까요? 그리고 익절은 직접 입력할 수 있도록 추가해 주시면 감사하겠습니다. 부탁드립니다. input : Price(2.50); if crossup(C,price) Then buy(); if CrossDown(C,price) Then ExitLong();

안녕하세요 항상 감사드립니다. 아래의 서식에서 추가적인 서식을 부탁드립니다. *추가사항 1.연결선물 기준 5분봉에서 이평선 50일선 아래 위치시 매도만 진입, 50일선 위에 위치시 매수 만 진입 (50일선은 최적화를 할 수 있게 input으로 넣어주시기 바랍니다.) # KOSPI 선물 5분봉 input: tt(150000),당일진입횟수(3); var: chkP(10), reChkP(20), stopChk(25); var: HH(0), LL(0), BS(0), SS(0); var: dayChk(0); var : TotalCount(0),PreDay(0),DayEntry(0); TotalCount = TotalTrades; if Bdate != Bdate[1] Then PreDay = TotalCount[1]; DayEntry = (TotalCount-PreDay)+IFF(MarketPosition != 0,1,0); if BarIndex == 0 then ClearDebug(); if dayindex == chkP then { HH = Highest(Max(C,O), chkP+1); LL = Lowest(Min(C,O), chkP+1); #if date == 20240612 then messageLog("--HH %.2f, LL: %.2f", HH, LL); } #if High >= HH and MarketPosition == 0 and ExitDate(1) < Date and time > 93000 then messageLog("HH %.2f, High: %.2f", HH, High); if DayIndex >= chkP # and Time < 95000 and sDate == NextBarSdate and EntryDate(0) < Date and EntryDate(1) < Date and DayEntry < 당일진입횟수 Then { Buy("B1", AtStop, HH); Sell("S1", AtStop, LL); } //if dayChk == 0 and High >= HH and MarketPosition == 0 and ExitDate(1) < Date and time > 93000 then { // messageLog("HH %.2f, High: %.2f", HH, High); // dayChk = 1; //} if ExitDate(1) == Date and Time < 150000 // and LatestEntryName(1) != "B2" // and LatestEntryName(1) != "S2" // and LatestEntryName(0) != "B2" // and LatestEntryName(0) != "S2" Then { if DayIndex < reChkP Then { HH = Highest(Max(C,O), DayIndex+1); LL = Lowest(Min(C,O), DayIndex+1); } Else { HH = Highest(Max(C,O), reChkP); LL = Lowest(Min(C,O), reChkP); } if DayEntry < 당일진입횟수 Then { Buy("B2", AtStop, HH); Sell("S2", AtStop, LL); } } if (MarketPosition == 1) Then { if DayIndex < stopChk Then { BS = Lowest(Min(C,O), DayIndex+1); } Else { BS = Lowest(Min(C,O), stopChk); } ExitLong("EL", AtStop, BS); } if (MarketPosition == -1) Then { if DayIndex < stopChk Then { SS = Highest(Max(C,O), DayIndex+1); } Else { SS = Highest(Max(C,O), stopChk); } #messageLog(" SS %.2f", SS); ExitShort("ES", AtStop, SS); } var : month(0),nday(0),week(0),X(False); month = int(date/100)-int(date/10000)*100; nday = date - int(date/100)*100; Week = DayOfWeek(date); #만기일 if (month%3 == 0 and nday >= 8 and nday <= 14 and week == 4) then { X = true; SetStopEndofday(151500); } Else#만기일아닐때 { X = False; SetStopEndofday(152000); }

시스템을 복리계산하기 위해서 ㅇ 초기자본을 100,000$ 설정하고 수익금이 30,000$이 싸일때마다 1계약씩 늘어나게 하는 수식이 가능할까요? 최대 계약수는 10계약으로... 가능하면 위 3개를 변수로 지정해서 부탁드리겠습니다

Input: length(100), mult(1), TP_Ratio(1.01), SL_Ratio(0.99), 진입수량(1); Var: src(0), a(0), b(0), size(0), var1(0), var2(0), Condition1(false), Condition2(false), t1(0), t2(0), value1(0), value2(0), 진입가(0), TP(0), SL(0), posFlag(0), tx(0); // 1. 원본 가격 src = Close; // 2. size 계산 size = iff((a[1]-a[2]) > 0 or (b[1]-b[2]) < 0 , atr(length) , TrueRange); // 3. 상승/하락 조건 기간 카운트 if a[1] > a[2] Then Begin Condition1 = true; var1 = 0; end Else if Condition1 then var1 = var1 + 1; if b[1] < b[2] Then Begin Condition2 = true; var2 = 0; end Else if Condition2 then var2 = var2 + 1; // 4. 추세선 계산 a = max(src,a[1]) - size/pow(length,2)*(var1*mult); b = min(src,b[1]) + size/pow(length,2)*(var2*mult); // 5. 꺾임 방향 t1 = iff(a > a[1], 1, iff(a < a[1], -1, t1[1])); t2 = iff(b > b[1], 1, iff(b < b[1], -1, t2[1])); // 6. 꺾임 발생 시 진입 If t1 == -1 and t1 != t1[1] and posFlag = 0 Then Begin SellShort("Short") next bar at market; 진입가 = Close; TP = 진입가 * SL_Ratio; // 숏 전략이므로 SL<진입가 SL = 진입가 * TP_Ratio; posFlag = -1; tx = Text_New(Date, Time, High, "&#11015; 매도진입"); Text_SetColor(tx, Red); End; If t2 == -1 and t2 != t2[1] and posFlag = 0 Then Begin Buy("Long") next bar at market; 진입가 = Close; TP = 진입가 * TP_Ratio; SL = 진입가 * SL_Ratio; posFlag = 1; tx = Text_New(Date, Time, Low, "&#11014; 매수진입"); Text_SetColor(tx, Blue); End; // 7. TP/SL 도달 시 청산 If posFlag = -1 Then Begin If Close <= TP or Close >= SL Then Begin BuyToCover("청산") next bar at market; posFlag = 0; End; End; If posFlag = 1 Then Begin If Close >= TP or Close <= SL Then Begin Sell("청산") next bar at market; posFlag = 0; End; End; // 8. 시각화 Plot1(a, "상단추세"); Plot2(b, "하단추세"); Plot3(value1, "상단꺾임"); Plot4(value2, "하단꺾임"); 오류수정부탁드립니다

var : 목(0),표(0),가(0),조건(False),cs(-1); if dayclose()> dayclose(1)*1.29 Then { 목 = dayclose; 표 = dayopen; 가 = floor((목+표)/2); cs = 0; } 조건 = crossdown(c, 가); if cs >= 0 and 조건 Then cs = cs+1; if cs == 1 and cs[1] == 0 Then Find(1); 선생님께서 만들어주신 수식입니다. 여기에서 양봉만나오게하는조건을 넣었는데 오류가 나서 번거롭더라도 직접넣어주시면 감사하겠습니다

다음신호의 수식변환을 부탁드립니다.' 감사합니다. A=shift(c,-12+1); B=shift(c,-26+1); BB=BBandsUp(70,3); M=Macd(5,52); 조건1=CrossUp(A,BB(0)) && !(M>0); S2=Valuewhen(1,조건1&&!조건1(1),L); T=Ttsf(C, 50); CrossUp(T, S2)

Input: rsiLen(14), rsiCut(50), macdFastLen(12), macdSlowLen(26), macdSignalLen(9), tp1Ratio(1.005), tp2Ratio(1.010), tp3Ratio(1.015), slRatio(0.99), volumeMultiplier(2.0), 평균거래량기간(20), 시작시간(93000), 종료시간(150000); Var: rsiVal(0), macdFastEMA(0), macdSlowEMA(0), macdMain(0), macdSignal(0), macdHist(0), 진입가(0), TP1(0), TP2(0), TP3(0), SL(0), 거래량기준(0), 텍스트ID(0), 손익비텍스트(0), TL1(0), TL2(0), TL3(0), TL4(0), 박스상(0), 박스하(0), 매수조건(false), 청산1(false), 청산2(false), 청산3(false); // ① RSI + MACD 계산 rsiVal = RSI(rsiLen); If CurrentBar = 1 Then Begin macdFastEMA = Close; macdSlowEMA = Close; End Else Begin macdFastEMA = (Close * (2 / (macdFastLen + 1))) + macdFastEMA[1] * (1 - (2 / (macdFastLen + 1))); macdSlowEMA = (Close * (2 / (macdSlowLen + 1))) + macdSlowEMA[1] * (1 - (2 / (macdSlowLen + 1))); macdMain = macdFastEMA - macdSlowEMA; macdSignal = (macdMain * (2 / (macdSignalLen + 1))) + macdSignal[1] * (1 - (2 / (macdSignalLen + 1))); macdHist = macdMain - macdSignal; End; // ② 거래량 기준 거래량기준 = Average(Volume, 평균거래량기간); // ③ 진입 조건 + 박스 + 라벨 If sTime >= 시작시간 and sTime <= 종료시간 and 매수조건 = false Then Begin If rsiVal > rsiCut and macdHist > 0 and macdHist[1] < 0 and Volume > 거래량기준 * volumeMultiplier Then Begin 진입가 = Close; TP1 = 진입가 * tp1Ratio; TP2 = 진입가 * tp2Ratio; TP3 = 진입가 * tp3Ratio; SL = 진입가 * slRatio; 박스상 = TP3; 박스하 = SL; // 자동 매수 진입 Buy("LongEntry") Next Bar at Market; // 박스 표시 (TL 선 4개) TL_Delete(TL1); TL_Delete(TL2); TL_Delete(TL3); TL_Delete(TL4); Text_Delete(손익비텍스트); TL1 = TL_New(Date, Time, 박스상, Date + 1, Time, 박스상); TL2 = TL_New(Date, Time, 박스하, Date + 1, Time, 박스하); TL3 = TL_New(Date, Time, 박스상, Date, Time, 박스하); TL4 = TL_New(Date + 1, Time, 박스상, Date + 1, Time, 박스하); For TL in [TL1, TL2, TL3, TL4] Do Begin TL_SetColor(TL, RGB(200,255,200)); TL_SetSize(TL, 1); End; // 손익비 라벨 손익비텍스트 = Text_New(Date, Time, (TP3 + SL)/2, "손익비 " + NumToStr(AbsValue(TP3 - 진입가) / AbsValue(진입가 - SL), 1) + ":1"); Text_SetColor(손익비텍스트, Green); Text_SetStyle(손익비텍스트, 1, 0); 텍스트ID = Text_New(Date, Time, Low, "*매수 진입조건 만족"); Text_SetColor(텍스트ID, Green); 매수조건 = true; 청산1 = false; 청산2 = false; 청산3 = false; End; End; // ④ TP별 청산 시뮬레이션 If 매수조건 Then Begin If 청산1 = false and Close >= TP1 Then Begin Alert("&#128200; TP1 도달 &#8211; 30% 청산"); 청산1 = true; End; If 청산2 = false and Close >= TP2 Then Begin Alert("&#128200; TP2 도달 &#8211; 50% 청산"); 청산2 = true; End; If 청산3 = false and Close >= TP3 Then Begin Alert("&#9989; TP3 도달 &#8211; 나머지 20% 청산 완료"); 청산3 = true; 매수조건 = false; End; If Close <= SL Then Begin Alert("&#9940; 손절가 도달 &#8211; 전체 청산"); 청산1 = true; 청산2 = true; 청산3 = true; 매수조건 = false; End; End; // ⑤ 목표가 시각화 If 매수조건 Then Begin Plot1(TP1, "TP1", RGB(0, 150, 255)); Plot2(TP2, "TP2", RGB(0, 100, 200)); Plot3(TP3, "TP3", RGB(0, 50, 150)); End; 지표작성시 오류가 나서 수정부탁드립니다. 2. Input: rsiLen(14), rsiCut(50), macdFastLen(12), macdSlowLen(26), macdSignalLen(9), tp1Ratio(0.995), tp2Ratio(0.990), tp3Ratio(0.985), slRatio(1.01), volumeMultiplier(2.0), 평균거래량기간(20), 시작시간(93000), 종료시간(150000); Var: rsiVal(0), macdFastEMA(0), macdSlowEMA(0), macdMain(0), macdSignal(0), macdHist(0), 진입가(0), TP1(0), TP2(0), TP3(0), SL(0), 거래량기준(0), 텍스트ID(0), TL1(0), TL2(0), TL3(0), TL4(0), 박스상(0), 박스하(0), 매도조건(false); // ▶? 1. RSI 계산 rsiVal = RSI(rsiLen); // ▶? 2. MACD 수동 계산 (Index 기준 초기화 제거) If CurrentBar == 1 Then Begin macdFastEMA = Close; macdSlowEMA = Close; macdMain = 0; macdSignal = 0; macdHist = 0; End Else Begin macdFastEMA = (Close * (2 / (macdFastLen + 1))) + macdFastEMA[1] * (1 - (2 / (macdFastLen + 1))); macdSlowEMA = (Close * (2 / (macdSlowLen + 1))) + macdSlowEMA[1] * (1 - (2 / (macdSlowLen + 1))); macdMain = macdFastEMA - macdSlowEMA; macdSignal = (macdMain * (2 / (macdSignalLen + 1))) + macdSignal[1] * (1 - (2 / (macdSignalLen + 1))); macdHist = macdMain - macdSignal; End; // ▶? 3. 평균 거래량 계산 거래량기준 = ma(Volume, 평균거래량기간); // ▶? 4. 진입 조건 + 시간 필터 If sTime >= 시작시간 and sTime <= 종료시간 Then Begin If rsiVal < rsiCut and macdHist < 0 and macdHist[1] > 0 and Volume > 거래량기준 * volumeMultiplier Then Begin 매도조건 = true; 진입가 = Close; // 목표가 / 손절가 계산 TP1 = 진입가 * tp1Ratio; TP2 = 진입가 * tp2Ratio; TP3 = 진입가 * tp3Ratio; SL = 진입가 * slRatio; 박스상 = SL; 박스하 = TP3; // ?? 손익비 박스 (TL 선 4개) TL1 = TL_New(sDate, sTime, 박스상, sDate, sTime, 박스하); TL2 = TL_New(sDate[1], sTime[1], 박스상, sDate[1], sTime[1], 박스하); TL3 = TL_New(sDate[1], sTime[1], 박스상, sDate, sTime, 박스상); TL4 = TL_New(sDate[1], sTime[1], 박스하, sDate, sTime, 박스하); TL_SetColor(TL1, RGB(255, 200, 200)); TL_SetSize(TL1, 1); TL_SetColor(TL2, RGB(255, 200, 200)); TL_SetSize(TL2, 1); TL_SetColor(TL3, RGB(255, 200, 200)); TL_SetSize(TL3, 1); TL_SetColor(TL4, RGB(255, 200, 200)); TL_SetSize(TL4, 1); // ?? 텍스트 알림 텍스트ID = Text_New(Date, Time, High, "*진입조건만족"); Text_SetColor(텍스트ID, RGB(255, 0, 0)); End; End; // ▶? 5. 목표가 / 손절가 Plot 시각화 If 매도조건 Then Begin Plot1(TP1, "TP1", RGB(0, 150, 255)); Plot2(TP2, "TP2", RGB(0, 100, 200)); Plot3(TP3, "TP3", RGB(0, 50, 150)); Plot4(SL, "손절", RGB(255, 0, 0)); End; 매수 버젼도 만들어주시면 감사드리겠습니다. 그리고 가능하다면 위 2번째 수식의 매수 매도 통합버젼도 부탁드리겠습니다 오늘도 고생많으십니다 감사합니다

수고가 많으십니다 질문 몇 가지 부탁드리겠습니다 질문1) text함수에서 혹시 줄 바꾸기는 가능한가요?? txtt[0]=text_new(sd[0],st[0],aa[0],NumToStr(Var22,0)+" "+NumToStr((aa[0]-aa[1])/aa[1]*100,0)+"%"); 위의 식 처럼 여러개의 값이 있을때 한줄이 아닌 값 사이에 줄 바꾸기 (엔터) 로 표시를 하고 싶습니다 질문2) (질문2와 질문3 관련 수식은 맨 아래에 첨부하였습니다) 같은 텍스트 식 ( txtt[0] ) 에 aa[] 배열의 순서를 표시를 하고 싶습니다 현재봉이 몇 번째 aa[] 인지를 표시하려고 하는데 예를들어 가장 최근봉 (aa[0] ) 에서는 0, 그 전전 봉 ( aa[2] ) 에서는 2 라고 숫자를 나타내고 싶습니다 질문3) for- if - else 문에 관련된 질문입니다 첨부된 식에다 아래 for 문을 추가했을때, value1=0; for cnt=1 to 5 { if a[0]*1.1 < a[cnt] then { value1=a[cnt]; } else { a[1]=a[0]*1.1; } } 이 조건의 의미는 for 문을 수행했을때 (cnt = 1 to 5) a[0]*1.1 < a[cnt] 경우가 없다면 a[1] 에 a[0]*1.1 를 대입하라는 의미가 되는건가요?? 그리고 for cnt=1 to 5 { if a[0]*1.2 < a[cnt] then { value1=a[cnt]; } else { if a[0]*1.05 < a[cnt] then { value1=a[cnt]; } } } 이렇게 작성한다면 if a[0]*1.1 < a[cnt] 의 경우가 없다면 if a[0]*1.05 < a[cnt] 를 for 루프 수행 하라는 의미가 되는게 맞나요? 감사합니다 var : cnt(0), sum1(0), sumi1(0),summ(0),tt(0),hh(0),ll(0),tl(0),tl1(0),n(0),ae(0); var: sum2(0),sumi2(0),count(0),sumaa(0),sumai(0),avgaa(0); var : t(0),StartBarIndex(0),dd(0),d1(0),d2(0),e1(0),e2(0); Array : ii[50](0),aa[50](0),cc[50](0),ee[50](0),ttl[30](0),txtt[40](0), tttl1[40](0),tttl2[40](0),sd[45](0),st[45](0),ad[50](0),at[50](0); if Bdate != Bdate[1] Then { DD = DD+1; } if (h>l*1.08) and (d1 == 0 or (d1 > 0 and dd >= d1+5)) Then { d1 = dd; hh = h; var1 = Index; Var2 = var1[1]; Var3 = Var2[1]; sum1=0; sumi1=0; sum2=0; sumi2=0; For cnt = 1 to (var1-Var2) { sum1=sum1+l[cnt]; sumi1=sumi1+1; } value1=sum1/sumi1; For cnt = 49 DownTo 1 { aa[cnt] = aa[cnt-1]; sd[cnt] =sd[cnt-1]; st[cnt] =st[cnt-1]; txtt[cnt] = txtt[cnt-1]; tttl1[cnt]=tttl1[cnt-1]; } aa[0] = value1; sd[0] = sDate; st[0] = sTime; TL_SetExtRight( tttl1[3],False); tttl1[0] = TL_New(sd[5],st[5],aa[5],sd[0],st[0],aa[0]); TL_SetDrawMode( tttl1[0],0); TL_Delete( tttl1[3]); TL_SetExtRight( tttl1[0],true); txtt[0]=text_new(sd[0],st[0],aa[0],NumToStr(Var22,0)+" "+ NumToStr((aa[0]-aa[1])/aa[1]*100,0)+"%"); Text_SetSize(txtt[0],15); Text_SetBold(txtt[0],1); Text_SetStyle(txtt[0], 0, 0); } if aa[0] >0 then Plot11(aa[0],"average",Cyan,Def,1);