예스스탁
예스스탁 답변
2023-03-22 09:55:30
안녕하세요
예스스탁입니다.
채우기는 plot으로 출력된 선들만 가능합니다.
해당식은 추값이 추세선으로 그려진 내용이고
현재봉 기준 과거봉부터 수평으로 그려오는 내용으로
일반 plot으로는 구현이 가능하지 않습니다.
box함수로 변경해 드립니다.
input : p(2),pt1(1.25),pt2(1.5);
input : 굵기1(5),R1(255),G1(0),B1(0);
input : 굵기2(5),R2(255),G2(0),B2(0);
input : 굵기3(5),R3(0),G3(0),B3(255);
input : 굵기4(5),R4(0),G4(0),B4(255);
var : cnt(0),sum(0),mav(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0);
var : box1(0),box2(0),box3(0),box4(0);
sum = DayOpen(0);
if P >= 2 Then
{
For cnt = 1 to P-1
{
sum = sum + DayClose(cnt);
}
}
mav = sum/P;
if Index == 0 or (sTime >= 152000 and sTime[1] < 152000) Then
{
var1 = sDate;
Var2 = stime;
}
if Bdate != Bdate[1] Then
{
if var1 > 0 and Var2 > 0 Then
{
#mav+pt2 ~ mav+pt1
box1 = box_new(var1,Var2,mav+pt2,sDate,sTime,mav+pt1);
#mav+pt1 ~ mav
box2 = box_new(var1,Var2,mav+pt1,sDate,sTime,mav);
#mav ~ mav-pt1
box3 = box_new(var1,Var2,mav,sDate,sTime,mav-pt1);
#mav-pt1 ~ mav-pt2
box4 = box_new(var1,Var2,mav-pt2,sDate,sTime,mav-pt1);
box_SetColor(box1,RGB(R1,G1,B1));
box_SetColor(box2,RGB(R2,G2,B2));
box_SetColor(box3,RGB(R3,G3,B3));
box_SetColor(box4,RGB(R4,G4,B4));
box_SetSize(box1, 굵기1);
box_SetSize(box2, 굵기2);
box_SetSize(box3, 굵기3);
box_SetSize(box4, 굵기4);
Box_SetFill(box1,true,100);#채우기 투명도 100
Box_SetFill(box2,true,60);#채우기 투명도 60
Box_SetFill(box3,true,60);#채우기 투명도 60
Box_SetFill(box4,true,100);#채우기 투명도 100
}
}
Else
{
if sTime < 150000 Then
{
box_SetBegin(box1,var1,Var2,mav+pt2);
box_SetEnd(box1,sDate,sTime,mav+pt1);
box_SetBegin(box2,var1,Var2,mav+pt1);
box_SetEnd(box2,sDate,sTime,mav);
box_SetBegin(box3,var1,Var2,mav);
box_SetEnd(box3,sDate,sTime,mav-pt1);
box_SetBegin(box4,var1,Var2,mav-pt1);
box_SetEnd(box4,sDate,sTime,mav-pt2);
}
}
즐거운 하루되세요
> 포보스 님이 쓴 글입니다.
> 제목 : 도움 요청합니다.
> 안녕하세요?
아래 수식에서 장 시작과 함께 나타나는 타주기 2일선 시작 추세선 기준으로 +- 1.25와 1.5의 채우기, 2.5와 3.0의 채우기를 위, 아래로 하려하는데 안됩니다. ㅜㅜ
도와주세요
다른 함수라도 좋습니다.
오늘도 좋은시간 그득하시길 바랍니다.
========
input : p(2),pt1(1.25),pt2(1.5);
input : 굵기1(5),R1(255),G1(0),B1(0);
input : 굵기2(5),R2(255),G2(0),B2(0);
input : 굵기3(5),R3(255),G3(0),B3(0);
input : 굵기4(5),R4(255),G4(0),B4(0);
input : 굵기5(5),R5(255),G5(0),B5(0);
var : cnt(0),sum(0),mav(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0);
sum = DayOpen(0);
if P >= 2 Then
{
For cnt = 1 to P-1
{
sum = sum + DayClose(cnt);
}
}
mav = sum/P;
if Index == 0 or (sTime >= 152000 and sTime[1] < 152000) Then
{
var1 = sDate;
Var2 = stime;
}
if Bdate != Bdate[1] Then
{
if var1 > 0 and Var2 > 0 Then
{
TL1 = TL_New(var1,Var2,mav,sDate,sTime,mav);
TL2 = TL_New(var1,Var2,mav+pt1,sDate,sTime,mav+pt1);
TL3 = TL_New(var1,Var2,mav-pt2,sDate,sTime,mav-pt1);
TL4 = TL_New(var1,Var2,mav+pt2,sDate,sTime,mav+pt2);
TL5 = TL_New(var1,Var2,mav-pt2,sDate,sTime,mav-pt2);
TL_SetColor(TL1,RGB(R1,G1,B1));
TL_SetColor(TL2,RGB(R2,G2,B2));
TL_SetColor(TL3,RGB(R3,G3,B3));
TL_SetColor(TL4,RGB(R4,G4,B4));
TL_SetColor(TL5,RGB(R5,G5,B5));
TL_SetSize(TL1, 굵기1);
TL_SetSize(TL2, 굵기2);
TL_SetSize(TL3, 굵기3);
TL_SetSize(TL4, 굵기4);
TL_SetSize(TL5, 굵기5);
}
}
Else
{
if sTime < 150000 Then
{
TL_SetBegin(TL1,var1,Var2,mav);
TL_SetEnd(TL1,sDate,sTime,mav);
TL_SetBegin(TL2,var1,Var2,mav+pt1);
TL_SetEnd(TL2,sDate,sTime,mav+pt1);
TL_SetBegin(TL3,var1,Var2,mav-pt1);
TL_SetEnd(TL3,sDate,sTime,mav-pt1);
TL_SetBegin(TL4,var1,Var2,mav+pt2);
TL_SetEnd(TL4,sDate,sTime,mav+pt2);
TL_SetBegin(TL5,var1,Var2,mav-pt2);
TL_SetEnd(TL5,sDate,sTime,mav-pt2);
}
}