안녕하세요 예스스탁입니다. 추가진입하는 수식은 적용시에 피라미딩을 항상 설정하셔야 합니다. 피라미딩을 모든진입신호 허용으로 설정하고 적용하시면 됩니다. 차트의 첫날에 730분봉이 없으면 숫자가 잘못찍히고 있어 차트상 최초 7시 30분봉이 발생한 이후에만 찍히게 변경해 드립니다. 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"); } 즐거운 하루되세요 > 라떼처럼 님이 쓴 글입니다. > 제목 : 요청드립니다. > 아래식에서 아래 사항에 대해 수정 요청드립니다. 1) 매수 매수가 -1, -2, -3.. 가 표시되면서 아래와 같이 매수 수량이 증가 되지 않습니다. n(15) 15개가 채워지기까지 지속적으로 매수가 발생되게 수정부탁드립니다. 2) 청산 Var2가 -2이상 (var2= -1,-2) 이면 매수 1개. Var2가 -3이하 (var2= -3,-4,-5..)이면 매수 2개 매수 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 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 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");