커뮤니티
단기볼린져 색변화
2016-05-20 11:13:41
127
글번호 98276
안녕하세요
아래식은 단기볼린져 색변화식입니다
120틱과 500틱의 이볼린져지표를 하나의 차트에서 겹쳐 나타나게 하고싶습니다
색은 다른색으로 구별하고 120,500틱은 선택 가능하고요
부탁드립니다
input : P(5),dv(2);
var : Price(0),BBmd(0),BBup(0),BBdn(0),diff(0);
Price = (C+H+L)/3;
BBmd = ma(Price,P);
BBup = BBmd + std(Price,5)*dv;
BBdn = BBmd - std(Price,5)*dv;
diff = BBup-BBdn;
if BBmd > BBmd[1] then
plot1(BBmd,"중앙",RED);
Else
plot1(BBmd,"중앙",BLUE);
if diff > diff[1] then{
plot2(BBup,"상단",red);
plot3(BBdn,"하단",red);
}
else{
plot2(BBup,"상단",BLUE);
plot3(BBdn,"하단",blue);
}
감사합니다
답변 1
예스스탁 예스스탁 답변
2016-05-20 18:16:51
안녕하세요
예스스탁입니다.
120틱 차트에 500틱을 참조데이터로 추가하고 아래식 적용하시면 됩니다.
참조데이터는 차트왼쪽 상단의 종목선택버튼 중 오른쪽 클릭해서
추가하시면 됩니다.
수식은 차트 데이터에서 값을 가져와 계산하므로
주기는 임의로 설정하셔도 됩니다
input : P(5),dv(2);
var : Price1(0,data1),BBmd1(0,data1),BBup1(0,data1),BBdn1(0,data1),diff1(0,data1);
var : Price2(0,data2),BBmd2(0,data2),BBup2(0,data2),BBdn2(0,data2),diff2(0,data2);
#기본차트(data1)
Price1 = data1((C+H+L)/3);
BBmd1 = data1(ma(Price1,P));
BBup1 = BBmd1 + data1(std(Price1,5)*dv);
BBdn1 = BBmd1 - data1(std(Price1,5)*dv);
diff1 = BBup1-BBdn1;
if BBmd1 > BBmd1[1] then
plot1(BBmd1,"중앙1",RED);
Else
plot1(BBmd1,"중앙1",BLUE);
if diff1 > diff1[1] then{
plot2(BBup1,"상단1",red);
plot3(BBdn1,"하단1",red);
}
else{
plot2(BBup1,"상단1",BLUE);
plot3(BBdn1,"하단1",blue);
}
#참조데이터(data2)
Price2 = data2((C+H+L)/3);
BBmd2 = data2(ma(Price1,P));
BBup2 = BBmd2 + data2(std(Price1,5)*dv);
BBdn2 = BBmd2 - data2(std(Price1,5)*dv);
diff2 = BBup2-BBdn2;
if BBmd2 > BBmd2[1] then
plot4(BBmd2,"중앙2",MAGENTA);
Else
plot4(BBmd2,"중앙2",CYAN);
if diff2 > diff2[1] then{
plot5(BBup2,"상단2",MAGENTA);
plot6(BBdn2,"하단2",MAGENTA);
}
else{
plot5(BBup2,"상단2",CYAN);
plot6(BBdn2,"하단2",CYAN);
}
즐거운 하루되세요
> bestkim 님이 쓴 글입니다.
> 제목 : 단기볼린져 색변화
> 안녕하세요
아래식은 단기볼린져 색변화식입니다
120틱과 500틱의 이볼린져지표를 하나의 차트에서 겹쳐 나타나게 하고싶습니다
색은 다른색으로 구별하고 120,500틱은 선택 가능하고요
부탁드립니다
input : P(5),dv(2);
var : Price(0),BBmd(0),BBup(0),BBdn(0),diff(0);
Price = (C+H+L)/3;
BBmd = ma(Price,P);
BBup = BBmd + std(Price,5)*dv;
BBdn = BBmd - std(Price,5)*dv;
diff = BBup-BBdn;
if BBmd > BBmd[1] then
plot1(BBmd,"중앙",RED);
Else
plot1(BBmd,"중앙",BLUE);
if diff > diff[1] then{
plot2(BBup,"상단",red);
plot3(BBdn,"하단",red);
}
else{
plot2(BBup,"상단",BLUE);
plot3(BBdn,"하단",blue);
}
감사합니다