안녕하세요 예스스탁입니다. 1. var1 = ma(C,5); var2 = ma(c,120); if date > date[1]+30 Then value1 = O; if C > var2 and C > value1 then{ if var1 > var1[1] Then buy(); if var1 < var1[1] Then sell(); } 1-1 차트가 분봉이시면 아래식 이용하시면 됩니다. 분봉에서 5일이평 계산한 식입니다. input : P1(5); var : sumV(0), maV(0),sumV1(0), maV1(0),count(0); #일간이평 sumV = 0; sumV1 = 0; for count = 0 to P1-1 { sumV = sumV+DayClose(count); sumV1 = sumV1+DayClose(count+1); } maV = sumV / P1;#당일 5일이평 maV1 = sumV1 / P1;#전일 5일이평 var2 = ma(c,120); if date > date[1]+30 Then value1 = O; if C > var2 and C > value1 then{ if maV > maV1 Then #전일대비 5일이평 상승 buy(); if maV < maV1 Then #전일대비 5일이평 하락 sell(); } 2. 피라미딩은 다른진입신호만 허용으로 설정하시면 됩니다. var1 = ma(C,5); var2 = ma(c,6); var3 = ma(c,7); if var1 > var1[1] Then value1 = 1; if var1 < var1[1] Then value1 = -1; if var2 > var2[1] Then value2 = 1; if var2 < var2[1] Then value2 = -1; if var3 > var3[1] Then value3 = 1; if var3 < var3[1] Then value3 = -1; if MarketPosition >= 0 Then{ if value1 == 1 and value1[1] != 1 Then Buy("b1",OnClose,def,1); if value2 == 1 and value2[1] != 1 Then Buy("b2",OnClose,def,1); if value3 == 1 and value3[1] != 1 Then Buy("b3",OnClose,def,1); } if MarketPosition == 1 Then{ if value1 == -1 and value1[1] != -1 Then ExitLong("bx1",OnClose,def,"b1"); if value2 == -1 and value2[1] != -1 Then ExitLong("bx2",OnClose,def,"b2"); if value3 == -1 and value3[1] != -1 Then exitlong("bx3",OnClose,def,"b3"); } 2-1 2번 매도-매도청산식입니다. var1 = ma(C,5); var2 = ma(c,6); var3 = ma(c,7); if var1 > var1[1] Then value1 = 1; if var1 < var1[1] Then value1 = -1; if var2 > var2[1] Then value2 = 1; if var2 < var2[1] Then value2 = -1; if var3 > var3[1] Then value3 = 1; if var3 < var3[1] Then value3 = -1; if MarketPosition <= 0 Then{ if value1 == -1 and value1[1] != -1 Then Sell("s1",OnClose,def,1); if value2 == -1 and value2[1] != -1 Then Sell("s2",OnClose,def,1); if value3 == -1 and value3[1] != -1 Then Sell("s3",OnClose,def,1); } if MarketPosition == -1 Then{ if value1 == 1 and value1[1] != 1 Then ExitShort("sx1",OnClose,def,"s1"); if value2 == 1 and value2[1] != 1 Then ExitShort("sx2",OnClose,def,"s2"); if value3 == 1 and value3[1] != 1 Then ExitShort("sx3",OnClose,def,"s3"); } 3. var1 = ma(C,3); var2 = ma(c,4); var3 = ma(c,5); if var1 > var1[1] Then value1 = 1; if var1 < var1[1] Then value1 = -1; if var2 > var2[1] Then value2 = 1; if var2 < var2[1] Then value2 = -1; if var3 > var3[1] Then value3 = 1; if var3 < var3[1] Then value3 = -1; if value1 == 1 and value2 == 1 and value3 == 1 and C > max(var1,var2,var3) Then Buy("b"); if MarketPosition == 1 Then{ if value1 == -1 and value2 == -1 and value3 == -1 and C < min(var1,var2,var3) Then exitlong("bx"); } 4 var1 = ma(C,3); var2 = ma(c,4); var3 = ma(c,5); if var1 > var1[1] Then value1 = 1; if var1 < var1[1] Then value1 = -1; if var2 > var2[1] Then value2 = 1; if var2 < var2[1] Then value2 = -1; if var3 > var3[1] Then value3 = 1; if var3 < var3[1] Then value3 = -1; if value1 == -1 and value2 == -1 and value3 == -1 and C < min(var1,var2,var3) Then sell("s"); if MarketPosition == -1 Then{ if value1 == 1 and value2 == 1 and value3 == 1 and C > max(var1,var2,var3) Then ExitShort("sx"); } 즐거운 하루되세요 > 이의정 님이 쓴 글입니다. > 제목 : 시스템부탁드립니다 > 현물에서 쓸 예정입니다 1) 주가가 120선위에 있으면서 월 시초가 보다 위 이면서 5일이동평균선이 상승방향이면 매수 하락방향이면 매도 2) 5일이동평균선이 상승으로 전환될경우 매수1계약 진입 6일이평선이 상승으로 전환될경우 매수 1계약진입 7일이평선이 상승으로 전환될경우 매수 1계약진입 5일이동평균선이 하락으로 전환될경우 1계약 청산 6일이동평균선도 상동 7일이평도 상동 3) 4,5,6 이동평균선이 상승으로 터닝이 되면서 캔들이 이 3개 이동평균선위에 올라오면 매수 하락으로 터닝되면서 캔들이 이 3개 이평선아래로 내려오면 청산 4) 3번과 반대로 4,5,6이평이 하락으로 터닝되면서 캔들이 이 3개 이평선아래로 내려오면 매도 올라가면서 터닝되면서 캔들이 이 3개 이평선 위로 올라오면 청산 선물에서 쓸예정인데요 반대로도 부탁드립니다.