안녕하세요 예스스탁입니다. input : P(5); var : cnt(0),sum(0),sum1(0),mav(0),mav1(0),dis(0),dis1(0),daycnt(0),PredayVol(0); Var : Pivot(0),R1(0),R2(0),S1(0),S2(0); Pivot = (DayHigh(1)+DayLow(1)+DayClose(1))/3; R1 = 2*Pivot-DayLow(1); R2 = Pivot+DayHigh(1)-DayLow(1); S1 = 2*Pivot-DayHigh(1); S2 = Pivot-DayHigh(1)+DayLow(1); sum = 0; sum1 = 0; for cnt = 0 to P-1{ sum = sum+DayClose(cnt); sum1 = sum1+DayClose(cnt+1); } mav = sum/P; mav1 = sum1/P; dis = c/mav*100; dis1 = DayClose(1)/mav1*100; for cnt = 1 to 1000 { if stime == stime[cnt] and sdate != sdate[cnt] then{ PredayVol = DayVolume[cnt]; cnt = 1001; } } if date != date[1] Then{ Daycnt = daycnt+1; var1 = dayopen/mav*100; } if MarketPosition == 0 and dayopen <= DayClose(1)*1.02 and dayhigh <= dayopen*1.04 and dis1 >= 103 and ExitDate(1) != sdate and DayVolume < PredayVol*1 and var1 > 100 Then{ if stime >= 133000 and stime < 133300 and dis >= 101.5 and dis < 103.0 Then buy("b1",AtMarket); if stime >= 140000 and stime < 140300 and dis >= 101.5 and dis < 103.5 Then buy("b2",AtMarket); if stime >= 143000 and stime < 143300 and dis >= 101.5 and dis < 104.0 Then buy("b3",AtMarket); if stime >= 144500 and stime < 144800 and dis >= 101.5 and dis < 104.5 Then buy("b4",AtMarket); if stime >= 144500 and stime < 144800 and c < Pivot and dis >= 101.5 and dis < 105.0 Then buy("b5",AtMarket); } if MarketPosition == 1 Then{ if sdate == EntryDate and C >= EntryPrice+1.045 Then ExitLong("bx1",AtMarket); if sdate > EntryDate and Daycnt == Daycnt[BarsSinceEntry]+1 Then{ If var1 < 100 and C/mav*100 >= 100 Then exitlong("bx21",AtMarket); If dayopen < DayClose(1) and C > Pivot Then exitlong("bx22",AtMarket); if stime >= 110000 and C/mav*100 < 100 then ExitLong("bx23",AtMarket); if C > R2 then ExitLong("bx24",AtMarket); if C >= EntryPrice*1.10 Then ExitLong("bx25",AtMarket); } if sdate > EntryDate and Daycnt == Daycnt[BarsSinceEntry]+2 Then{ If var1 < 100 and C/mav*100 >= 100 Then exitlong("bx31",AtMarket); if C/mav*100 < 100 then ExitLong("bx32",AtMarket); if C > R2 then ExitLong("bx24",AtMarket); if C >= EntryPrice*1.10 Then ExitLong("bx25",AtMarket); } if sdate > EntryDate and Daycnt == Daycnt[BarsSinceEntry]+3 Then{ If var1 < 100 and C/mav*100 >= 100 Then exitlong("bx41",AtMarket); if C/mav*100 < 100 then ExitLong("bx42",AtMarket); if C > R2 then ExitLong("bx43",AtMarket); if C >= EntryPrice*1.10 Then ExitLong("bx44",AtMarket); } } 즐거운 하루되세요 > 쌀사비팔 님이 쓴 글입니다. > 제목 : 수식 추가 부탁드립니다. > 아래식에 청산을 추가해 주세요. 현물 1분봉 사용. <매수 당일> -매수가 대비 4.5% 상승시 다음 첫봉에 청산 <매수 +1일> -시가가 5일이평선(일봉) 이격 100미만인 경우, 5일이평선(일봉)이격 100이상시 다음 첫봉에 청산 -시가가 전일종가보다 낮으면, 피봇 기준선 이상시 다음 첫봉에 청산 -11:30시 이후, 5일이평선(일봉) 이격 100미만이면 다음 첫봉에 청산 -피봇 2차 저항선 이상시 다음 첫봉에 청산 -매수가 대비 10%상승시 다음 첫봉에 청산 <매수 +2일> -시가가 5일이평선(일봉) 이격 100미만인 경우, 5일이평선(일봉)이격 100이상시 다음 첫봉에 청산 -5일이평선(일봉) 이격 100미만이면 다음 첫봉에 청산 -피봇 2차 저항선 이상시 다음 첫봉에 청산 -매수가 대비 10%상승시 다음 첫봉에 청산 <매수 +3일> -시가가 5일이평선(일봉) 이격 100미만인 경우, 5일이평선(일봉)이격 100이상시 다음 첫봉에 청산 -5일이평선(일봉) 이격 100미만이면 다음 첫봉에 청산 -피봇 2차 저항선 이상시 다음 첫봉에 청산 -매수가 대비 10%상승시 다음 첫봉에 청산 ------------------------------------------------------------------------------- input : P(5); var : cnt(0),sum(0),sum1(0),mav(0),mav1(0),dis(0),dis1(0),daycnt(0),PredayVol(0); Var : Pivot(0),R1(0),R2(0),S1(0),S2(0); Pivot = (DayHigh(1)+DayLow(1)+DayClose(1))/3; sum = 0; sum1 = 0; for cnt = 0 to P-1{ sum = sum+DayClose(cnt); sum1 = sum1+DayClose(cnt+1); } mav = sum/P; mav1 = sum1/P; dis = c/mav*100; dis1 = DayClose(1)/mav1*100; for cnt = 1 to 1000 { if stime == stime[cnt] and sdate != sdate[cnt] then{ PredayVol = DayVolume[cnt]; cnt = 1001; } } if date != date[1] Then{ Daycnt = daycnt+1; var1 = dayopen/mav*100; } if MarketPosition == 0 and dayopen <= DayClose(1)*1.02 and dayhigh <= dayopen*1.04 and dis1 >= 103 and ExitDate(1) != sdate and DayVolume < PredayVol*1 and var1 > 100 Then{ if stime >= 133000 and stime < 133300 and dis >= 101.5 and dis < 103.0 Then buy("b1",AtMarket); if stime >= 140000 and stime < 140300 and dis >= 101.5 and dis < 103.5 Then buy("b2",AtMarket); if stime >= 143000 and stime < 143300 and dis >= 101.5 and dis < 104.0 Then buy("b3",AtMarket); if stime >= 144500 and stime < 144800 and dis >= 101.5 and dis < 104.5 Then buy("b4",AtMarket); if stime >= 144500 and stime < 144800 and c < Pivot and dis >= 101.5 and dis < 105.0 Then buy("b5",AtMarket); }