커뮤니티
시스템 부탁드립니다.
2014-09-01 07:56:39
127
글번호 78253
수고 많으십니다.
문의드릴 것은 두 가지입니다. 주말 동안 나름 만들어 보려고 했는데, 힘들어 문의드리게 되었습니다. 문의드리고자 하는 것은 아래의 두 가지입니다.
1. 주봉에서 13주지수이동평균이 상승, MACD히스토그램(12-26-9)가 지난 봉보다 상승일 때
일봉에서 스토캐스틱(12-5-5) slowK가 30이하에 있으면,
그 다음 날에 전날의 고가보다 3틱 위에 매수 주문을 내어 주가가 전날의 고가보다 3틱
위에 도달하게 되면 매수가 되도록 하는 것입니다.
매도는 종가가 전날과 전전날의 저가 중에서 낮은 가격보다 3틱이하이면 매도하는
것입니다.
2. 주봉에서 13주지수이동평균이 상승, MACD히스토그램(12-26-9)가 지난 봉보다 상승일 때
일봉에서 스토캐스틱(12-5-5) slowK가 80을 돌파하면,
다음 날 시가에 매수하는 것입니다.
매도는 종가가 전날과 전전날의 저가 중에서 낮은 가격보다 3틱이하이면 매도하는
것입니다.
언제나 수고많으십니다. 바쁘시겠지만 부탁드립니다. 고맙습니다.
답변 1
예스스탁 예스스탁 답변
2014-09-01 14:46:31
안녕하세요
예스스탁입니다.
모두 일봉차트에 적용하시면 됩니다.
1.
Input : Period1(12),Period2(26),Period3(9),P(13),sto1(12),sto2(5);
Var : Ep1(0), JISU1(0), DINDEX1(0), PreJISU1(0);
Var : Ep2(0), JISU2(0), PreJISU2(0);
Var : Ep3(0), JISU3(0), PreMACDSIG(0);
var : MACDVal(0),MACDSig(0),PreMACDosc(0),MACDosc(0);
var : EP11(0),PreWJISU(0),WJISU(0),stok(0);
#주봉 MACD
Ep1 = 2/(Period1+1);
Ep2 = 2/(Period2+1);
Ep3 = 2/(Period3+1);
Ep11 = 2/(P+1);
if DayOfWeek(sdate) < DayOfWeek(sdate[1]) Then{
DINDEX1 = DINDEX1 + 1;
PreJISU1 = JISU1[1];
PreJISU2 = JISU2[1];
PreMACDSIG = MACDSIG[1];
PreMACDosc = MACDosc[1];
PreWJISU = WJISU[1];
}
if DINDEX1 <= 1 then {
JISU1 = C;
JISU2 = C;
MACDVal = JiSu1-Jisu2;
MACDSIG = MACDVal;
MACDosc = MACDVal-MACDSIG;
}
else{
JISU1 = C * EP1 + PreJISU1 * (1-EP1);
JISU2 = C * EP2 + PreJISU2 * (1-EP2);
MACDVal = JiSu1-Jisu2;
MACDSIG = MACDVal * EP3 + PreMACDSIG * (1-EP3);
MACDosc = MACDVal-MACDSIG;
}
if DINDEX1 <= 1 then
WJISU = C;
else
WJISU = C * EP11 + PreWJISU * (1-EP11);
stok = StochasticsK(Sto1,sto2);
if WJISU > PreWJISU and MACDosc > PreMACDosc and stok < 30 Then
buy("b",AtStop,H+PriceScale*3);
if MarketPosition == 1 and C <= min(C[1],C[2])-PriceScale*3 Then
ExitLong();
2.
Input : Period1(12),Period2(26),Period3(9),P(13),sto1(12),sto2(5);
Var : Ep1(0), JISU1(0), DINDEX1(0), PreJISU1(0);
Var : Ep2(0), JISU2(0), PreJISU2(0);
Var : Ep3(0), JISU3(0), PreMACDSIG(0);
var : MACDVal(0),MACDSig(0),PreMACDosc(0),MACDosc(0);
var : EP11(0),PreWJISU(0),WJISU(0),stok(0);
#주봉 MACD
Ep1 = 2/(Period1+1);
Ep2 = 2/(Period2+1);
Ep3 = 2/(Period3+1);
Ep11 = 2/(P+1);
if DayOfWeek(sdate) < DayOfWeek(sdate[1]) Then{
DINDEX1 = DINDEX1 + 1;
PreJISU1 = JISU1[1];
PreJISU2 = JISU2[1];
PreMACDSIG = MACDSIG[1];
PreMACDosc = MACDosc[1];
PreWJISU = WJISU[1];
}
if DINDEX1 <= 1 then {
JISU1 = C;
JISU2 = C;
MACDVal = JiSu1-Jisu2;
MACDSIG = MACDVal;
MACDosc = MACDVal-MACDSIG;
}
else{
JISU1 = C * EP1 + PreJISU1 * (1-EP1);
JISU2 = C * EP2 + PreJISU2 * (1-EP2);
MACDVal = JiSu1-Jisu2;
MACDSIG = MACDVal * EP3 + PreMACDSIG * (1-EP3);
MACDosc = MACDVal-MACDSIG;
}
if DINDEX1 <= 1 then
WJISU = C;
else
WJISU = C * EP11 + PreWJISU * (1-EP11);
stok = StochasticsK(Sto1,sto2);
if WJISU > PreWJISU and MACDosc > PreMACDosc and crossup(stok,80) Then
buy("b",AtMarket);
if MarketPosition == 1 and C <= min(C[1],C[2])-PriceScale*3 Then
ExitLong();
즐거운 하루되세요
> 육봉선생 님이 쓴 글입니다.
> 제목 : 시스템 부탁드립니다.
> 수고 많으십니다.
문의드릴 것은 두 가지입니다. 주말 동안 나름 만들어 보려고 했는데, 힘들어 문의드리게 되었습니다. 문의드리고자 하는 것은 아래의 두 가지입니다.
1. 주봉에서 13주지수이동평균이 상승, MACD히스토그램(12-26-9)가 지난 봉보다 상승일 때
일봉에서 스토캐스틱(12-5-5) slowK가 30이하에 있으면,
그 다음 날에 전날의 고가보다 3틱 위에 매수 주문을 내어 주가가 전날의 고가보다 3틱
위에 도달하게 되면 매수가 되도록 하는 것입니다.
매도는 종가가 전날과 전전날의 저가 중에서 낮은 가격보다 3틱이하이면 매도하는
것입니다.
2. 주봉에서 13주지수이동평균이 상승, MACD히스토그램(12-26-9)가 지난 봉보다 상승일 때
일봉에서 스토캐스틱(12-5-5) slowK가 80을 돌파하면,
다음 날 시가에 매수하는 것입니다.
매도는 종가가 전날과 전전날의 저가 중에서 낮은 가격보다 3틱이하이면 매도하는
것입니다.
언제나 수고많으십니다. 바쁘시겠지만 부탁드립니다. 고맙습니다.
다음글
이전글