안녕하세요 예스스탁입니다. input : P1(20),P2(60),n(10),손절틱수(30); input : Per1(23.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(76.4); var : mav1(0),mav2(0); var : WH(0),WL(0),V1(0),V2(0),V3(0),V4(0),V5(0),BX(0),SX(0); if DayOfWeek(bdate) < DayOfWeek(bdate[1]) Then{ WH = H; WL = L; } if H > WH Then WH = H; if L < WL Then WL = L; v1 = 10^(LOG10(WH)-(LOG10(WH)-LOG10(WL))*(Per1/100)); v2 = 10^(LOG10(WH)-(LOG10(WH)-LOG10(WL))*(Per2/100)); v3 = 10^(LOG10(WH)-(LOG10(WH)-LOG10(WL))*(Per3/100)); v4 = 10^(LOG10(WH)-(LOG10(WH)-LOG10(WL))*(Per4/100)); v5 = 10^(LOG10(WH)-(LOG10(WH)-LOG10(WL))*(Per5/100)); mav1 = ma(C,P1); mav2 = ma(C,P2); #양봉이면서 종가가 20MA보다 위에 있고 그 폭이 10틱 이내라면 다음봉 시가매수 if C > O and C > mav1 and abs(C-mav1) <= PriceScale*n Then buy("b1",AtMarket); #음봉이면서 종가가 20MA보다 밑에 있고 그 폭이 10틱 이내라면 다음봉 시가매도 if C < O and C < mav1 and abs(C-mav1) <= PriceScale*n Then sell("s1",AtMarket); #포지션이 없을경우, 20MA<60MA이고, 양봉이면서 종가가 60MA 위에 있고 그 폭이 10틱 이내라면 다음봉 시가매수 if MarketPosition == 0 and mav1 < mav2 and C > O and C > mav2 and abs(C-mav2) <= PriceScale*n Then buy("b2",AtMarket); #포지션이 없을경우, 20MA>60MA이고, 음봉이면서 종가가 60MA 밑에 있고 그 폭이 10틱 이내라면 다음봉 시가매도 if MarketPosition == 0 and mav1 > mav2 and C < O and C < mav2 and abs(C-mav2) <= PriceScale*n Then sell("s2",AtMarket); if MarketPosition == 1 Then{ #20MA<60MA이고 매수포지션일때, 60MA에서 청산 if mav1 < mav2 and CrossDown(c,mav2) Then exitlong("bx1"); #60MA 위에서 매수진입했을 경우 종가가 60MA보다 작으면 60MA과의 폭이 5틱이내일때 손절 if EntryPrice > mav2[BarsSinceEntry] and C <= mav2 and C >= mav2-PriceScale*5 Then exitlong("bx2"); #20MA>60MA이고 매수포지션일때, 진입 후 되돌림이 있을경우 고점에서 가장 가까운 되돌림선을 뚫는 봉의 종가에서 청산 if WH > 0 and WL > 0 and H == highest(H,BarsSinceEntry) then{ if H > V5 Then BX = V5; if H >= V4 Then BX = V4; if H > V3 Then BX = V3; if H > V2 Then BX = V2; if H > V1 Then BX = V1; } if BX > 0 and C < BX and mav1 > mav2 Then exitlong("bx3"); } Else BX = 0; if MarketPosition == -1 Then{ #20MA>60MA이고 매도포지션일때, 60MA에서 청산 if mav1 > mav2 and Crossup(c,mav2) Then ExitShort("sx1"); #60MA 밑에서 매도진입했을 경우 종가가 60MA보다 크면 60MA과의 폭이 5틱이내일때 손절 if EntryPrice < mav2[BarsSinceEntry] and C >= mav2 and C <= mav2+PriceScale*5 Then ExitShort("sx2"); #20MA<60MA이고 매도포지션일때, 진입 후 되돌림이 있을경우 저점에서 가장 가까운 되돌림선을 뚫는 봉의 종가에서 청산 if WH > 0 and WL > 0 and L == Lowest(L,BarsSinceEntry) then{ if L < V1 Then SX = V1; if L < V2 Then SX = V2; if L < V3 Then SX = V3; if L < V4 Then SX = V4; if L < V5 Then SX = V5; } if SX > 0 and C > SX and mav1 < mav2 Then ExitShort("sx3"); } Else SX = 0; #지션이 있을 경우 진입가 보다 30틱이 벗어날 때 손절 SetStopLoss(PriceScale*손절틱수,PointStop); 즐거운 하루되세요 > 토루크막토 님이 쓴 글입니다. > 제목 : 수식부탁드립니다 > 아래 규칙들로 수식 부탁드립니다. 항상 빠르고, 친절한 답변에 감사드립니다. --------------------------------------------------------------------------------------- # 진입규칙(10틱 >>> 변수로 변경가능하게 부탁드립니다.) 1. 양봉이면서 종가가 20MA보다 위에 있고 그 폭이 10틱 이내라면 다음봉 시가매수 (캔들의 색상이 양봉진행 중이면서 20MA 위에 있으면 예비신호, 20MA 밑으로 내려가면 예비신호는 사라지며, 양봉 확정과 10틱이내 조건 만족하면 매수신호 발생) 2. 음봉이면서 종가가 20MA보다 밑에 있고 그 폭이 10틱 이내라면 다음봉 시가매도 (캔들의 색상이 음봉진행 중이면서 20MA 밑에 있으면 예비신호, 20MA 위로 올라오면 예비신호는 사라지며, 음봉 확정과 10틱이내 조건 만족하면 매도신호 발생) 3. 포지션이 없을경우, 20MA<60MA이고, 양봉이면서 종가가 60MA 위에 있고 그 폭이 10틱 이내라면 다음봉 시가매수 (캔들의 색상이 양봉진행 중이면서 60MA 위에 있으면 예비신호, 60MA 밑으로 내려가면 예비신호는 사라지며, 양봉 확정과 10틱이내 조건 만족하면 매수신호 발생) 4. 포지션이 없을경우, 20MA>60MA이고, 음봉이면서 종가가 60MA 밑에 있고 그 폭이 10틱 이내라면 다음봉 시가매도 (캔들의 색상이 음봉진행 중이면서 60MA 밑에 있으면 예비신호, 60MA 위로 올라오면 예비신호는 사라지며, 음봉 확정과 10틱이내 조건 만족하면 매도신호 발생) ---------------------------------------------------------------------------------------- # 청산규칙 1 20MA>60MA이고 매수포지션일때, 진입 후 되돌림이 있을경우 고점에서 가장 가까운 되돌림선을 뚫는 봉의 종가에서 청산 2. 20MA<60MA이고 매수포지션일때, 60MA에서 청산 3. 20MA>60MA이고 매도포지션일때, 60MA에서 청산 4. 20MA<60MA이고 매도포지션일때, 진입 후 되돌림이 있을경우 저점에서 가장 가까운 되돌림선을 뚫는 봉의 종가에서 청산 * 되돌림선 - 금주의 고가와 저가사이의 피보나치 비율(23.4/38.2/50/61.8/76.4) 로그선 ------------------------------------------------------------------------------------------------------------------------------------------------------------------------- # 손절규칙 1. 포지션이 있을 경우 진입가 보다 30틱이 벗어날 때 손절 2. 60MA 위에서 매수진입했을 경우 종가가 60MA보다 작으면 60MA과의 폭이 5틱이내일때 손절 3. 60MA 밑에서 매도진입했을 경우 종가가 60MA보다 크면 60MA과의 폭이 5틱이내일때 손절