안녕하세요 예스스탁입니다. input : Period(30),Ma1(15),short(33),Long(75),signal(9); var : A1(0,data1),B1(0,data1),D1(0,data1),E1(0,data1),F1(0,data1),G1(0,data1); var : H1(0,data1),I1(0,data1),DP1(0,data1),DM1(0,data1),V10(0,data1); var : A2(0,data2),B2(0,data2),D2(0,data2),E2(0,data2),F2(0,data2),G2(0,data2); var : H2(0,data2),I2(0,data2),DP2(0,data2),DM2(0,data2),V20(0,data2); var : Bcond(false,data1),Scond(false,data1); DP1 = data1(ema(iff(H-H[1]>0 && H-H[1]>L[1]-L,H-H[1],0),Period)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),Period)*100); DM1 = data1(ema(iff(L[1]-L>0 && H-H[1]<L[1]-L,L[1]-L,0),Period)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),Period)*100); A1 = DP1; B1 = DM1; D1 = data1(ma(HIGH, MA1)); E1 = data1(Trix(15)); F1 = data1(ema(E1,9)); G1 = data1(ma(LOW, MA1)); H1 = data1(MACD(short, long)); I1 = data1(ema(H1,signal)); if data1(o<c and A1>B1 AND D1<=C AND E1>=F1 and H1 > I1 and H1 >=0) Then v10 =1 ; if data1(o>c and A1<B1 AND G1>=C AND E1<=F1 and H1 < I1 and H1 <=0) Then v10 = -1 ; DP2 = data2(ema(iff(H-H[1]>0 && H-H[1]>L[1]-L,H-H[1],0),Period)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),Period)*100); DM2 = data2(ema(iff(L[1]-L>0 && H-H[1]<L[1]-L,L[1]-L,0),Period)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),Period)*100); A2 = DP2; B2 = DM2; D2 = data2(ma(HIGH, MA1)); E2 = data2(Trix(15)); F2 = data2(ema(E2,9)); G2 = data2(ma(LOW, MA1)); H2 = data2(MACD(short, long)); I2 = data2(ema(H2,signal)); if data2(o<c and A2>B2 AND D2<=C AND E2>=F2 and H2 > I2 and H2 >=0) Then v20 = 1 ; if data2(o>c and A2<B2 AND G2>=C AND E2<=F2 and H2 < I2 and H2 <=0) Then v20 = -1 ; Bcond = MarketPosition == 0 and ExitDate(1) == sdate and MarketPosition(1) == 1; Scond = MarketPosition == 0 and ExitDate(1) == sdate and MarketPosition(1) == -1; if Bcond == false and V10 == 1 and V20 == 1 Then buy("buy_1"); if Scond == false and V10 == -1 and V20 == -1 Then sell("sell_1"); if MarketPosition == 1 and data1(CrossDown(c,ma(c,36))) Then ExitLong("eB_1"); if MarketPosition == 1 and data2(CrossDown(c,ma(c,36))) Then ExitLong("eB_2"); if MarketPosition == 1 and data1(highest(H,BarsSinceEntry) >= EntryPrice+PriceScale*100 and CrossDown(c,ma(c,36))) Then ExitLong("eB_3"); if MarketPosition == -1 and data2(CrossUp(c,ma(c,36))) Then ExitShort("eS_1"); if MarketPosition == -1 and data2(CrossUp(c,ma(c,36))) Then ExitShort("eS_2"); if MarketPosition == -1 and data2(lowest(L,BarsSinceEntry) <= EntryPrice-PriceScale*100 and CrossUp(c,ma(c,36))) Then ExitShort("eS_3"); 즐거운 하루되세요 > 조민철 님이 쓴 글입니다. > 제목 : 타주기 합성 시스템식 > 항상 감사드립니다 아래기본로직을 이용해서 시스템식을 만들고 싶습니다 input : Period(30),Ma1(15),short(33),Long(75),signal(9); var : AA(0),BB(0),DD(0),EE(0),FF(0),GG(0),HH(0),II(0),DP(0),DM(0); DP = ema(iff(H-H[1]>0 && H-H[1]>L[1]-L,H-H[1],0),Period)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),Period)*100; DM = ema(iff(L[1]-L>0 && H-H[1]<L[1]-L,L[1]-L,0),Period)/ ema(max(max(H-L,abs(C[1]-H)),abs(C[1]-L)),Period)*100; AA=DP; BB=DM; DD=ma(HIGH, MA1); EE=Trix(15); FF=ema(EE,9); GG=ma(LOW, MA1); HH = MACD(short, long); II = ema(HH,signal); if o<c and AA>BB AND DD<=C AND EE>=FF and HH > II and HH >=0 Then var10 =1 ; if o>c and AA<BB AND GG>=C AND EE<=FF and HH < II and HH <=0 Then var10 = -1 ; 1.기본챠트는 300틱챠트로 설정하고 타주기 챠트는 2분봉으로 설정 2.기본챠트 300틱챠트에서 var10 =1 and 타주기챠트 2분봉 var10 =1 이면 매수Buy_1 기본챠트 300틱챠트에서 var10 =-1 and 타주기챠트 2분봉 var10 =-1 이면 매수Sell_1 3. 현재 매수상태이고 기본챠트 300틱봉에서 이동평균 36선을 하향돌파하면 매수청산(eB_1)/매수청산후 재진입금지(매도진입신호만 진입가능) 현재 매도상태이고 기본챠트 300틱봉에서 이동평균 36선을 상향돌파하면 매도청산(eS_1)/매도청산후 재진입금지(매수진입신호만 진입가능) 4. 현재 매수상태이고 타주기 2분봉에서 이동평균 36선을 하향돌파하면 매수청산(eB_2)/매수청산후 재진입금지(매도진입신호만 진입가능) 현재 매도상태이고 타주기 2분봉에서 이동평균 36선을 상향돌파하면 매도청산(eS_2)/매도청산후 재진입금지(매수진입신호만 진입가능) 5.매수진입후 이익이 100틱이상이고 이동평균 36선을하향돌파하면 매수청산(eB_3))/매수청산후 재진입금지(매도진입신호만 진입가능) 매도진입후 이익이 100틱이상이고 이동평균 36선을상향돌파하면 매도청산(eS_3))/매도청산후 재진입금지(매수진입신호만 진입가능) 감사합니다