안녕하세요 예스스탁입니다. 1 input : LENGTH(20); Input : 전환선기간(9), 기준선기간(26), 스팬2기간(52); Var : 기준선(0), 전환선(0), 선행스팬1(0), 선행스팬2(0),구름상단(0),구름하단(0); var : TEMA(0),T(0),T1(0),i1(0),Entry(0),Bcond(false),Scond(false); TEMA = (3 * Ema(c,LENGTH)) - (3 * Ema(Ema(c,LENGTH),LENGTH)) + (Ema(Ema(Ema(c,LENGTH),LENGTH),LENGTH)); 전환선 = (Highest(High, 전환선기간) + Lowest(Low, 전환선기간)) / 2; 기준선 = (Highest(High, 기준선기간) + Lowest(Low, 기준선기간)) / 2; 선행스팬1 = (전환선[25] + 기준선[25]) / 2 ; 선행스팬2 = (Highest(High, 스팬2기간)[25] + Lowest(Low, 스팬2기간)[25]) / 2; 구름상단 = max(선행스팬1,선행스팬2); 구름하단 = min(선행스팬1,선행스팬2); if crossup(C,tema) Then{ T = 1; T1 = TotalTrades; i1 = index; } if CrossDown(C,tema) Then{ T = -1; T1 = TotalTrades; i1 = index; } if MarketPosition == 0 Then entry = TotalTrades-T1; Else entry = TotalTrades-T1+1; Bcond = 전환선 > 구름상단 and min(C,O) > 구름상단; Scond = 전환선 < 구름하단 and max(C,O) < 구름하단; if T == 1 and bcond == true and bcond[1] == false Then{ if (entry == 0 and index < i1+20) or (entry >= 1 and entry < 3) then buy(); } if T == -1 and scond == true and scond[1] == false Then{ if (entry == 0 and index < i1+20) or (entry >= 1 and entry < 3) then sell(); } 2 var : HH(0),HL(0),BXprice(0),LL(0),LH(0),SXprice(0); if MarketPosition == 1 Then{ if CurrentContracts > CurrentContracts[1] then{ HH = H; HL = L; } if CurrentContracts == CurrentContracts[1] and H > HH Then{ HH = H; HL = L; if HL[1] <= HH[1]-PriceScale*10 Then{ BXprice = HL[1]; } } if L < HL Then{ HL = L; } if BXprice == 0 and HH < EntryPrice+PriceScale*10 Then ExitLong("bx1",AtStop,EntryPrice-PriceScale*10); if BXprice == 0 and HH >= EntryPrice+PriceScale*10 Then ExitLong("bx2",AtStop,EntryPrice); if BXprice > 0 Then ExitLong("bx3",AtStop,BXPrice); if HH >= EntryPrice+PriceScale*20 Then ExitLong("bx4",AtStop,HH-(HH-EntryPrice)*0.5); } Else BXprice = 0; if MarketPosition == -1 Then{ if CurrentContracts > CurrentContracts[1] then{ LL = L; LH = H; } if CurrentContracts == CurrentContracts[1] and L < LL Then{ LL = L; LH = H; if LH[1] >= LL[1]+PriceScale*10 Then{ SXprice = LH[1]; } } if H > LH Then{ LH = H; } if SXprice == 0 and LL > EntryPrice-PriceScale*10 Then ExitShort("sx1",AtStop,EntryPrice+PriceScale*10); if SXprice == 0 and LL <= EntryPrice-PriceScale*10 Then ExitShort("sx2",AtStop,EntryPrice); if SXprice > 0 Then ExitShort("sx3",AtStop,SXPrice); if LL <= EntryPrice+PriceScale*20 Then ExitLong("sx4",AtStop,LL-(EntryPrice-LL)*0.5); } Else SXprice = 0; 3 기본으로 제공되는 스토케스틱 지표(Stochastics)가 slow입니다. Input : sto1(12), sto2(5), sto3(5); var : StoK(0),StoD(0); StoK = StochasticsK(sto1,sto2); StoD = StochasticsD(sto1,sto2,sto3); Plot1(StoK, "StochasticsK"); Plot2(StoD, "StochasticsD"); PlotBaseLine1(20, "기준선20"); PlotBaseLine2(80, "기준선80"); 즐거운 하루되세요 > 깜피 님이 쓴 글입니다. > 제목 : 수식 문의드립니다. > 1. 손절이나 익절이 발생한 후에 재차 진입이 되는 경우가 많아서 횟수를 제한하려고 합니다. TEMA선 위에서는 매수, 아래에서는 매도만 진입 가능하게 수식을 작성하고 있고, 조건은 일목균형표 전환선이 구름대를 빠져나오고, 봉의 몸통이 전환선을 빠져나오면 진입하는 형태입니다. 손절이나 익절 후에도 전환선이 구름대를 빠져나오고, 봉의 몸통이 전환선을 빠져나오는 경우에만 진입하길 원하고, tema선 위에서 매수 진입한 후에 저가가 tema선 아래로 가지 않는 이상 진입은 3회까지만 가능하게 하려고 합니다.(선 아래에서는 매도만 3회 가능) tema선 위아래에서 최초 진입 할 경우에는 조건을 만족하고 30분 이내 또는 20봉 이내에만 진입 가능합니다. (매수 진입 시, tema선 위로 봉이 올라온 뒤에 30분이 넘어가거나 20봉 이후에 매수 조건을 만족한다면 진입 금지. 2~3번째 진입시에는 시간이나 봉 갯수 조건은 무시) 2. 그리고 11.16에 문의했던 내용 중에서 익절가를 잡는 부분이 있었는데, 쌍봉 없이 단봉으로 상승했다가 바로 하락 하는 경우 등에 익절가를 지정하지 못하는 문제가 발생하네요. 진입후 20틱 이상 벌어지는 시점부터 최대수익폭의 절반을 보전 수 있는 가격과 익절가를 비교해서 더 큰 수익을 보전할 수 있는 가격대를 익절가로 변경하는 수식을 추가하고 싶습니다. 3.그리고 Stochastic slow 지표식도 부탁드립니다. 항상 감사드립니다.