커뮤니티
수식부탁드림니다=================
2017-06-12 18:03:02
142
글번호 110348
Plot21,Plot4,Plot12 를 09:00부터의데이타만 참고하게 수정 부탁드립니다
//***************************macd
Input : shortPeriodm(5), longPeriodm(10), Periodm(3),보정(400),등락(0.005);
Var : MACDv(0), MACDsig(0),macdosc(0) ;
MACDv = MACD(shortPeriodm, longPeriodm);
MACDsig = ema(MACDv,Periodm);
macdosc = MACDv-ema(MACDv,Periodm);
if macdosc > 0 then
{
// plot1(macdosc+0.4, "MACDOscillator+");
// Plot2(0+0.4, "MACDOscillator-");
}
else
{
// Plot1(0+0.4, "MACDOscillator+");
// Plot2(macdosc+0.4, "MACDOscillator-");
}
Plot23(MACDv*보정, "MACD",iff((MACDv )>(MACDv[1])+00,RED,iff((MACDv )<(MACDv[1] )-00,BLUE,BLACK)));
Plot21(MACDsig*보정, "MACDSignal",iff((MACDsig )>(MACDsig[1])+00,RED,iff((MACDsig )<(MACDsig[1] )-00,BLUE,BLACK)));
//PlotBaseLine1(0, "기준선1");
//******************************sto
Input : Periods(5), Periods1(10), Periods2(3);
var : StoK(0),StoD(0);
StoK = StochasticsK(Periods,Periods1);
StoD = StochasticsD(Periods,Periods1,Periods2);
//Plot11(StoK, "StochasticsK");
Plot12(StoD-50, "StochasticsD",iff((StoD )>(StoD[1])+00,RED,iff((StoD )<(StoD[1] )-00,BLUE,BLACK)));
//PlotBaseLine1(20, "기준선20");
//PlotBaseLine2(80, "기준선80");
Plot4(MACDsig*보정,"tott",iff((StoD )>(StoD[1])+등락 and (MACDsig )>(MACDsig[1]+등락)
,RED,iff((StoD )<(StoD[1] )-등락 and (MACDsig )<(MACDsig[1]-등락 )
,BLUE,GREEN)));
//****************************신호
if (MACDsig )>(MACDsig[1])+00 and (StoD )>(StoD[1])+등락 Then{
PLOT32((MACDsig*보정 )-0.01,"매수막대");
PlaySound("C:￦Users￦Administrator￦Desktop￦sound￦alert.wav");
}
if (MACDsig )<(MACDsig[1] )-00 and (StoD )<(StoD[1] )-등락 Then{
PLOT33((MACDsig*보정 )-0.01,"매도막대");
PlaySound("C:￦Users￦Administrator￦Desktop￦sound￦reject.wav");
}
답변 1
예스스탁 예스스탁 답변
2017-06-13 10:37:13
안녕하세요
예스스탁입니다.
//***************************macd
Input : shortPeriodm(5), longPeriodm(10), Periodm(3),보정(400),등락(0.005);
Var : MACDv(0), MACDsig(0),macdosc(0) ;
Var : Ep1(0), JISU1(0),Ep2(0), JISU2(0),Ep3(0),Jisu3(0),idx(0);
Ep1 = 2/(shortPeriodm+1);
Ep2 = 2/(longPeriodm+1);
Ep3 = 2/(Periodm+1);
if bdate != Bdate[1] Then
idx = 0;
idx = idx+1;
if idx == 1 then {
JISU1 = C;
JISU2 = C;
MACDv = JiSu1-Jisu2;
MACDsig = MACDv;
macdosc = MACDV-MACDsig;
}
else{
JISU1 = C * EP1 + JISU1[1] * (1-EP1);
JISU2 = C * EP2 + JISU2[1] * (1-EP2);
MACDv = JiSu1-Jisu2;
MACDsig = MACDv * EP3 + MACDsig[1] * (1-EP3);
macdosc = MACDV-MACDsig;
}
if macdosc > 0 then
{
// plot1(macdosc+0.4, "MACDOscillator+");
// Plot2(0+0.4, "MACDOscillator-");
}
else
{
// Plot1(0+0.4, "MACDOscillator+");
// Plot2(macdosc+0.4, "MACDOscillator-");
}
Plot23(MACDv*보정, "MACD",iff((MACDv )>(MACDv[1])+00,RED,iff((MACDv )<(MACDv[1] )-00,BLUE,BLACK)));
Plot21(MACDsig*보정, "MACDSignal",iff((MACDsig )>(MACDsig[1])+00,RED,iff((MACDsig )<(MACDsig[1] )-00,BLUE,BLACK)));
//PlotBaseLine1(0, "기준선1");
//******************************sto
Input : Periods(5), Periods1(10), Periods2(3);
var : StoK(0),StoD(0);
Var : HH(0),LL(0),FK(0),sEP1(0),sEP2(0),idx1(0);
if Bdate != Bdate[1] Then
idx1 = 0;
idx1 = idx1+1;
if idx1 <= Periods Then{
HH = DayHigh;
LL = DayLow;
}
Else{
HH = highest(H,Periods);
LL = lowest(L,Periods);
}
FK = (Close - LL) / (HH - LL) * 100;
sEP1 = 2/(Periods1+1);
sEP2 = 2/(Periods2+1);
if idx1 == 1 Then{
StoK = FK;
StoD = StoK;
}
Else{
StoK = FK * sEP1 + StoK[1] * (1-sEP1);
StoD = StoK * sEP2 + StoD[1] * (1-sEP2);
}
//Plot11(StoK, "StochasticsK");
Plot12(StoD-50, "StochasticsD",iff((StoD )>(StoD[1])+00,RED,iff((StoD )<(StoD[1] )-00,BLUE,BLACK)));
//PlotBaseLine1(20, "기준선20");
//PlotBaseLine2(80, "기준선80");
Plot4(MACDsig*보정,"tott",iff((StoD )>(StoD[1])+등락 and (MACDsig )>(MACDsig[1]+등락)
,RED,iff((StoD )<(StoD[1] )-등락 and (MACDsig )<(MACDsig[1]-등락 )
,BLUE,GREEN)));
//****************************신호
if (MACDsig )>(MACDsig[1])+00 and (StoD )>(StoD[1])+등락 Then{
PLOT32((MACDsig*보정 )-0.01,"매수막대");
PlaySound("C:￦Users￦Administrator￦Desktop￦sound￦alert.wav");
}
if (MACDsig )<(MACDsig[1] )-00 and (StoD )<(StoD[1] )-등락 Then{
PLOT33((MACDsig*보정 )-0.01,"매도막대");
PlaySound("C:￦Users￦Administrator￦Desktop￦sound￦reject.wav");
}
즐거운 하루되세요
> leekss1 님이 쓴 글입니다.
> 제목 : 수식부탁드림니다=================
> Plot21,Plot4,Plot12 를 09:00부터의데이타만 참고하게 수정 부탁드립니다
//***************************macd
Input : shortPeriodm(5), longPeriodm(10), Periodm(3),보정(400),등락(0.005);
Var : MACDv(0), MACDsig(0),macdosc(0) ;
MACDv = MACD(shortPeriodm, longPeriodm);
MACDsig = ema(MACDv,Periodm);
macdosc = MACDv-ema(MACDv,Periodm);
if macdosc > 0 then
{
// plot1(macdosc+0.4, "MACDOscillator+");
// Plot2(0+0.4, "MACDOscillator-");
}
else
{
// Plot1(0+0.4, "MACDOscillator+");
// Plot2(macdosc+0.4, "MACDOscillator-");
}
Plot23(MACDv*보정, "MACD",iff((MACDv )>(MACDv[1])+00,RED,iff((MACDv )<(MACDv[1] )-00,BLUE,BLACK)));
Plot21(MACDsig*보정, "MACDSignal",iff((MACDsig )>(MACDsig[1])+00,RED,iff((MACDsig )<(MACDsig[1] )-00,BLUE,BLACK)));
//PlotBaseLine1(0, "기준선1");
//******************************sto
Input : Periods(5), Periods1(10), Periods2(3);
var : StoK(0),StoD(0);
StoK = StochasticsK(Periods,Periods1);
StoD = StochasticsD(Periods,Periods1,Periods2);
//Plot11(StoK, "StochasticsK");
Plot12(StoD-50, "StochasticsD",iff((StoD )>(StoD[1])+00,RED,iff((StoD )<(StoD[1] )-00,BLUE,BLACK)));
//PlotBaseLine1(20, "기준선20");
//PlotBaseLine2(80, "기준선80");
Plot4(MACDsig*보정,"tott",iff((StoD )>(StoD[1])+등락 and (MACDsig )>(MACDsig[1]+등락)
,RED,iff((StoD )<(StoD[1] )-등락 and (MACDsig )<(MACDsig[1]-등락 )
,BLUE,GREEN)));
//****************************신호
if (MACDsig )>(MACDsig[1])+00 and (StoD )>(StoD[1])+등락 Then{
PLOT32((MACDsig*보정 )-0.01,"매수막대");
PlaySound("C:￦Users￦Administrator￦Desktop￦sound￦alert.wav");
}
if (MACDsig )<(MACDsig[1] )-00 and (StoD )<(StoD[1] )-등락 Then{
PLOT33((MACDsig*보정 )-0.01,"매도막대");
PlaySound("C:￦Users￦Administrator￦Desktop￦sound￦reject.wav");
}