안녕하세요 예스스탁입니다. 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 dayopen <= DayClose(1)*1.01 and dayhigh <= dayopen*1.04 and dis1 >= 103 and ExitDate(1) != sdate and DayVolume < PredayVol*1 and var1 > 100 Then{ if stime >= 90000 and stime < 100000 and dis >= 100.5 and dis < 101.5 Then buy("b1",AtMarket); if stime >= 100000 and stime < 110000 and dis >= 100.5 and dis < 102.0 Then buy("b2",AtMarket); if stime >= 110000 and stime < 120000 and dis >= 100.5 and dis < 102.5 Then buy("b3",AtMarket); if stime >= 120000 and stime < 130000 and dis >= 100.5 and dis < 103.0 Then buy("b4",AtMarket); if stime >= 130000 and stime < 140000 and dis >= 100.5 and dis < 103.5 Then buy("b5",AtMarket); if stime >= 140000 and stime < 144800 and dis >= 100.5 and dis < 104.0 Then buy("b6",AtMarket); if stime >= 143000 and stime < 144800 and c < Pivot and dis >= 100.5 and dis < 104.5 Then buy("b7",AtMarket); } if MarketPosition == 1 Then{ if sdate == EntryDate then{ if dis < 100.1 Then ExitLong("bx11",AtMarket); if C >= EntryPrice*1.045 Then ExitLong("bx12",AtMarket); } if sdate > EntryDate and daycnt == daycnt[BarsSinceEntry]+1 Then{ if stime >= 090800 and stime <= 091000 and C >= DayClose(1)*1.05 Then exitlong("bx21",AtMarket); if stime >= 091800 and stime <= 092000 and C >= DayClose(1)*1.04 Then exitlong("bx22",AtMarket); if stime >= 092800 and stime <= 093000 and C >= DayClose(1)*1.03 Then exitlong("bx23",AtMarket); if stime >= 093800 and stime <= 094000 and C >= DayClose(1)*1.02 Then exitlong("bx24",AtMarket); if C >= EntryPrice*1.10 Then ExitLong("bx25",AtMarket); if C >= DayClose(1)*1.08 Then ExitLong("bx26",AtMarket); if stime >= 095500 Then ExitLong("bx27",AtMarket); } } 즐거운 하루되세요 > 쌀사비팔 님이 쓴 글입니다. > 제목 : 청산 추가 부탁드립니다. > 아래식에 추가 부탁드립니다. 감사합니다. <매수 당일 청산> -5일(일봉)이평선 이격도 100.1 미만이면, 첫봉에 청산 -매수가 대비 4.5% 상승하면, 첫봉에 청산 <매수 +1일에 청산> -09:08시~09:10시까지 : 전일종가 대비 5%이상시, 첫봉에 청산 -09:18시~09:20시까지 : 전일종가 대비 4%이상시, 첫봉에 청산 -09:28시~09:30시까지 : 전일종가 대비 3%이상시, 첫봉에 청산 -09:38시~09:40시까지 : 전일종가 대비 2%이상시, 첫봉에 청산 -매수가 대비 10%상승시, 첫봉에 청산 -전일 종가대비 8% 상승시, 첫봉에 청산 -09:55시 이후 첫봉에 청산 ------------------------------------------------------------------- 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 dayopen <= DayClose(1)*1.01 and dayhigh <= dayopen*1.04 and dis1 >= 103 and ExitDate(1) != sdate and DayVolume < PredayVol*1 and var1 > 100 Then{ if stime >= 90000 and stime < 100000 and dis >= 100.5 and dis < 101.5 Then buy("b1",AtMarket); if stime >= 100000 and stime < 110000 and dis >= 100.5 and dis < 102.0 Then buy("b2",AtMarket); if stime >= 110000 and stime < 120000 and dis >= 100.5 and dis < 102.5 Then buy("b3",AtMarket); if stime >= 120000 and stime < 130000 and dis >= 100.5 and dis < 103.0 Then buy("b4",AtMarket); if stime >= 130000 and stime < 140000 and dis >= 100.5 and dis < 103.5 Then buy("b5",AtMarket); if stime >= 140000 and stime < 144800 and dis >= 100.5 and dis < 104.0 Then buy("b6",AtMarket); if stime >= 143000 and stime < 144800 and c < Pivot and dis >= 100.5 and dis < 104.5 Then buy("b7",AtMarket); }