안녕하세요 예스스탁입니다. 1 input : n(10),u(3); var : tx(0),ll(0),hh(0); if (sdate != sdate[1] and stime >= 73000) or (sdate == sdate[1] and stime >= 73000 and stime[1] < 73000) Then { var1 = c; var2 = 0; } else { if H >= var1+PriceScale*10 and var1 > 0 Then { var1 = var1 + PriceScale*10; if var2[1] >= 0 Then var2 = var2+1; Else var2 = 1; tx = Text_New(sdate,stime,H,NumToStr(var2,0)); Text_SetColor(tx,RED); // if MarketPosition >= 0 or MaxContracts < n Then // sell("s",OnClose,def,1); } if L <= var1-PriceScale*10 and var1 > 0 Then { var1 = var1 - PriceScale*10; if var1 <= 0 Then var2 = var2-1; Else var2 = -1; tx = Text_New(sdate,stime,L,NumToStr(var2,0)); Text_SetColor(tx,BLUE); if MarketPosition <= 0 or MaxContracts < n Then { if var2 >= -2 Then Buy("b1",OnClose,def,1); Else Buy("b2",OnClose,def,2); } } } if MarketPosition == 1 then { if CurrentContracts > CurrentContracts[1] Then { hh = h; ll = l; } if h > hh Then hh = h; if l < ll Then ll = l; // ExitLong("bp1",AtStop,AvgEntryPrice+(PriceScale*100)/CurrentContracts); if hh >= AvgEntryPrice+(PriceScale*100)/CurrentContracts Then ExitLong("bp2",AtStop,hh-(hh-AvgEntryPrice)*0.2); if CurrentContracts >= 5 and C >= LL+PriceScale*20 and C < AvgEntryPrice and (C-AvgEntryPrice) <= -(CurrentContracts*U)*PriceScale Then ExitLong("bl1"); } 2 input : P(100); var : mav(0,data2),T(0,data2),var2(0,data2); mav = data2(ma(c,P)); if var2 > var2[1] Then { T = 1; if T != T[1] Then var2 = 1; Else var2 = var2+1; } if var2 < var2[1] Then { T = -1; if T != T[1] Then var2 = -1; Else var2 = var2-1; } plot1(var2); 즐거운 하루되세요 > 라떼처럼 님이 쓴 글입니다. > 제목 : 부탁드립니다. > 답변 감사드립니다. 제의 설명이 부족 했던거 같습니다. 다시한번만 봐주시길 부탁드립니다. 1)수정요청 var2 = -1, -2, -3, -4..... var2 = -1,-2 까지는 매수 계약수 1개씩 var2 = -3 이하 일때는 매수 계약수 2개씩 진입을 말씀드린 내용입니다. Var2가 -2이상 (var2= -1,-2) 이면 매수 계약수 1개. Var2가 -3이하 (var2= -3,-4,-5..)이면 매수 계약수 2개 매수 2) 추가 보조차트를 이용하여 보조차트의 100이동평균선이 상승할때 만 var2 값이 1씩 증가 보조차르의 100이동평균선이 하락할때만 var2 값이 -1씩 하락 보조지표의 100 이동평균선이 변곡하면 var2값도 1부터 다시 시작 input : n(10),u(3); var : tx(0),ll(0),hh(0); if (sdate != sdate[1] and stime >= 73000) or (sdate == sdate[1] and stime >= 73000 and stime[1] < 73000) Then { var1 = c; var2 = 0; } else { if H >= var1+PriceScale*10 and var1 > 0 Then { var1 = var1 + PriceScale*10; if var2[1] >= 0 Then var2 = var2+1; Else var2 = 1; tx = Text_New(sdate,stime,H,NumToStr(var2,0)); Text_SetColor(tx,RED); // if MarketPosition >= 0 or MaxContracts < n Then // sell("s",OnClose,def,1); } if L <= var1-PriceScale*10 and var1 > 0 Then { var1 = var1 - PriceScale*10; if var1 <= 0 Then var2 = var2-1; Else var2 = -1; tx = Text_New(sdate,stime,L,NumToStr(var2,0)); Text_SetColor(tx,BLUE); if MarketPosition <= 0 or MaxContracts < n Then Buy("b",OnClose,def,1); } } if MarketPosition == 1 then { if CurrentContracts > CurrentContracts[1] Then { hh = h; ll = l; } if h > hh Then hh = h; if l < ll Then ll = l; // ExitLong("bp1",AtStop,AvgEntryPrice+(PriceScale*100)/CurrentContracts); if hh >= AvgEntryPrice+(PriceScale*100)/CurrentContracts Then ExitLong("bp2",AtStop,hh-(hh-AvgEntryPrice)*0.2); if CurrentContracts >= 5 and C >= LL+PriceScale*20 and C < AvgEntryPrice and (C-AvgEntryPrice) <= -(CurrentContracts*U)*PriceScale Then ExitLong("bl1"); } 즐거운 하루되세요