커뮤니티
안녕하세요!
2013-09-03 15:06:47
123
글번호 67139
안녕하세요!
휴가는 잘 다녀 오셨는지요?
아래식은 어느분이 질문 하신 식인데여..
아래식을 변수처리 식 2개를 나타낼수 있도록 좀 해주시고요..
기준선(직선으로 표시 할수있는선)도 변수처리 3개를 나타낼수 있도록 좀 부탁 드립니다.
Inputs: Period(5);
Variables: k(0),maC(0),sumn(0),sump(0),rel(0),positive(0),negative(0);
maC = ema(C,Period);
sumn = 0.0; sump = 0.0;
if CurrentBar == 1 && Period > 0 then {
for k = 0 To Period - 1 {
rel = maC[k] - maC[k+1];
if rel > 0 then sump = sump + rel;
else sumn = sumn - rel;
}
positive = sump / Period;
negative = sumn / Period;
}
else if CurrentBar > 1 && Period > 0 then {
rel = maC - maC[1];
if rel > 0 then sump = rel;
else sumn = -rel;
positive = (positive[1] * (Period-1) + sump) / Period;
negative = (negative[1] * (Period-1) + sumn) / Period;
}
if negative == 0.0 then var1 = 0.0;
else var1 = 100.0 - 100.0 / (1 + positive / negative);
plot1(var1);
답변 1
예스스탁 예스스탁 답변
2013-09-04 09:28:21
안녕하세요
예스스탁입니다.
Inputs: Period1(5),Period2(20),upv(80),mid(50),dnv(20);
Var : k1(0),maC1(0),sumn1(0),sump1(0),rel1(0),positive1(0),negative1(0);
Var : k2(0),maC2(0),sumn2(0),sump2(0),rel2(0),positive2(0),negative2(0);
maC1 = ema(C,Period1);
sumn1 = 0.0;
sump1 = 0.0;
if CurrentBar == 1 && Period1 > 0 then {
for k1 = 0 To Period1 - 1 {
rel1 = maC1[k1] - maC1[k1+1];
if rel1 > 0 then
sump1 = sump1 + rel1;
else
sumn1 = sumn1 - rel1;
}
positive1 = sump1 / Period1;
negative1 = sumn1 / Period1;
}
else if CurrentBar > 1 && Period1 > 0 then {
rel1 = maC1 - maC1[1];
if rel1 > 0 then sump1 = rel1;
else sumn1 = -rel1;
positive1 = (positive1[1] * (Period1-1) + sump1) / Period1;
negative1 = (negative1[1] * (Period1-1) + sumn1) / Period1;
}
if negative1 == 0.0 then
var1 = 0.0;
else
var1 = 100.0 - 100.0 / (1 + positive1 / negative1);
maC2 = ema(C,Period2);
sumn2 = 0.0;
sump2 = 0.0;
if CurrentBar == 1 && Period2 > 0 then {
for k2 = 0 To Period2 - 1 {
rel2 = maC2[k2] - maC2[k2+1];
if rel2 > 0 then
sump2 = sump2 + rel2;
else
sumn2 = sumn2 - rel2;
}
positive2 = sump2 / Period2;
negative2 = sumn2 / Period2;
}
else if CurrentBar > 1 && Period2 > 0 then {
rel2 = maC2 - maC2[1];
if rel2 > 0 then sump2 = rel2;
else sumn2 = -rel2;
positive2 = (positive2[1] * (Period2-1) + sump2) / Period2;
negative2 = (negative2[1] * (Period2-1) + sumn2) / Period2;
}
if negative2 == 0.0 then
var2 = 0.0;
else
var2 = 100.0 - 100.0 / (1 + positive2 / negative2);
plot1(var1);
plot2(var2);
PlotBaseLine1(upv,"상단");
PlotBaseLine2(Mid,"중단");
PlotBaseLine3(dnv,"하단");
즐거운 하루되세요
> 비월검파 님이 쓴 글입니다.
> 제목 : 안녕하세요!
> 안녕하세요!
휴가는 잘 다녀 오셨는지요?
아래식은 어느분이 질문 하신 식인데여..
아래식을 변수처리 식 2개를 나타낼수 있도록 좀 해주시고요..
기준선(직선으로 표시 할수있는선)도 변수처리 3개를 나타낼수 있도록 좀 부탁 드립니다.
Inputs: Period(5);
Variables: k(0),maC(0),sumn(0),sump(0),rel(0),positive(0),negative(0);
maC = ema(C,Period);
sumn = 0.0; sump = 0.0;
if CurrentBar == 1 && Period > 0 then {
for k = 0 To Period - 1 {
rel = maC[k] - maC[k+1];
if rel > 0 then sump = sump + rel;
else sumn = sumn - rel;
}
positive = sump / Period;
negative = sumn / Period;
}
else if CurrentBar > 1 && Period > 0 then {
rel = maC - maC[1];
if rel > 0 then sump = rel;
else sumn = -rel;
positive = (positive[1] * (Period-1) + sump) / Period;
negative = (negative[1] * (Period-1) + sumn) / Period;
}
if negative == 0.0 then var1 = 0.0;
else var1 = 100.0 - 100.0 / (1 + positive / negative);
plot1(var1);
다음글
이전글