안녕하세요 예스스탁입니다. 죄송합니다.진입식에 조건이 잘못되어 있었습니다. 식을 수정했습니다. 1. input : P(60); var : cnt(0),sum(0),mav(0),dis(0); sum = 0; for cnt = 0 to P-1{ sum = sum+DayClose(cnt); } mav = sum/P; dis = C/mav*100; if MarketPosition == 0 And ExitDate(1) != sdate and C < dayopen And dis >= 100 and dis <= 102.5 Then buy("b",AtMarket); if MarketPosition == 1 Then{ if countif(dis < 99.5,2) == 2 Then ExitLong("bx1",AtMarket); if C >= EntryPrice*1.10 Then ExitLong("bx2",AtMarket); if highest(h,BarsSinceEntry) >= EntryPrice*1.05 Then ExitLong("bx3",AtStop,highest(h,BarsSinceEntry)-(highest(h,BarsSinceEntry)-EntryPrice)*0.3); } 2. input : P(20); var : cnt(0),sum(0),mav(0),dis(0); sum = 0; for cnt = 0 to P-1{ sum = sum+DayClose(cnt); } mav = sum/P; dis = C/mav*100; if MarketPosition == 0 And ExitDate(1) != sdate and C < dayopen And dis >= 100 and dis <= 102.5 Then buy("b",AtMarket); if MarketPosition == 1 Then{ if dis < 99.5 Then ExitLong("bx1",AtMarket); if C >= EntryPrice*1.10 Then ExitLong("bx2",AtMarket); if highest(h,BarsSinceEntry) >= EntryPrice*1.05 Then ExitLong("bx3",AtStop,highest(h,BarsSinceEntry)-(highest(h,BarsSinceEntry)-EntryPrice)*0.3); } 즐거운 하루되세요 > 쌀사비팔 님이 쓴 글입니다. > 제목 : 다시 한번 봐주십시요. > 여러종목을 시스템에 적용해 봤는데... 매수가 한번도 안되서요.. 한 번 검토 해주세요. 감사합니다. ------------------------------------------------------------- 1. input : P(60); var : cnt(0),sum(0),mav(0),dis(0); sum = 0; for cnt = 0 to P-1{ sum = sum+DayClose(cnt); } mav = sum/P; dis = C/mav*100; if MarketPosition == 0 And ExitDate(1) == sdate and C < dayopen And dis >= 100 and dis <= 102.5 Then buy("b",AtMarket); if MarketPosition == 1 Then{ if countif(dis < 99.5,2) == 2 Then ExitLong("bx1",AtMarket); if C >= EntryPrice*1.10 Then ExitLong("bx2",AtMarket); if highest(h,BarsSinceEntry) >= EntryPrice*1.05 Then ExitLong("bx3",AtStop,highest(h,BarsSinceEntry)-(highest(h,BarsSinceEntry)-EntryPrice)*0.3); } 2. input : P(20); var : cnt(0),sum(0),mav(0),dis(0); sum = 0; for cnt = 0 to P-1{ sum = sum+DayClose(cnt); } mav = sum/P; dis = C/mav*100; if MarketPosition == 0 And ExitDate(1) == sdate and C < dayopen And dis >= 100 and dis <= 102.5 Then buy("b",AtMarket); if MarketPosition == 1 Then{ if dis < 99.5 Then ExitLong("bx1",AtMarket); if C >= EntryPrice*1.10 Then ExitLong("bx2",AtMarket); if highest(h,BarsSinceEntry) >= EntryPrice*1.05 Then ExitLong("bx3",AtStop,highest(h,BarsSinceEntry)-(highest(h,BarsSinceEntry)-EntryPrice)*0.3); } 즐거운 하루되세요 > 현물, 분봉사용합니다. 2가지 부탁드립니다. 1번. <매수> -주가가 당일 시초가보다 이하이고(즉, 당일 음봉 중), -60일(일봉) 이평선 이격도 100~102.5이면 다음 첫봉에 매수 -오늘 청산되었다면 매수 금지 <청산> -일 종가가 60일(일봉) 이평선 이격도 99.5미만이 2회이면 다음 첫봉에 청산 -매수가대비 +10%이상 상승시 다음 첫봉에 청산 -매수가 대비 +5%이상 상승 후, 매수가와 최고상승가(+100%로 가정) 대비 +30%로 하락하면 청산 2번. <매수> -주가가 당일 시초가보다 이하이고(즉, 당일 음봉 중), -20일(일봉) 이평선 이격도 100~102.5이면 다음 첫봉에 매수 -오늘 청산되었다면 매수 금지 <청산> -일 종가가 20일(일봉) 이평선 이격도 99.5미만(1회)이면 다음 첫봉에 정산 -매수가 대비 10%이상 상승시 다음 첫봉에 청산 -매수가 대비 +5%이상 상승 후, 매수가와 최고상승가(+100%로 가정) 대비 +30%로 하락하면 청산