예스스탁
예스스탁 답변
2022-12-20 14:58:32
안녕하세요
예스스탁입니다.
해당 내용은 가능하지 않습니다.
현재 박스는 추세가 변경되면 그 끝지점을 직전 최고점이나 최저점위치로 조정을 합니다.
하지만 PlotPaintBar는 이전에 지정된 색을 변경을 할 수 없습니다.
즐거운 하루되세요
> 외국인 님이 쓴 글입니다.
> 제목 : 수정부탁드립니다
> 수정부탁드립니다. 사각박스와동일하게 부탁드립니다.
input :Peod(20),색상두께(40);
Var:상승색a(Red), 하락색a(Lime);
Var:jr(0),gT(0),Tj(0),Tk(0);
Var: 고11(0),고12(0),시간11(0),시간12(0),선TL1(0),선TL(0),
고21(0),고22(0),시간21(0),시간22(0),Vlue11(0),Vlue12(0),ddt(0),t(0),t1(0),
고31(0),고32(0),시간31(0),시간32(0);
Array:고Val[20](0),저val[20](0),고Bar[20](0),저Bar[20](0);
Array:dr[7](0),dfr[7](0);
var : dbox(0),dbox1(0);
vars: xClose(0),xOpen(0),xHigh(0),xLow(0);
dr[0] = 0;
dr[1] = 2;
dr[2] = 3.;
dr[3] = -1;
dr[4] = -2.;
dr[5] = 1;
dr[6] = 0.5;
For jr = 0 To 19
{
고Bar[jr] = 고Bar[jr] + 1;
저Bar[jr] = 저Bar[jr] + 1;
}
if crossup(c,highest(H,Peod)[1]) Then
gT = 1;
if CrossDown(c,Lowest(L,Peod)[1]) Then
gT = -1;
If gT == 1 Then
{
If gT[1] != 1 Then
{
For jr = 18 DownTo 0
{
고Val[jr+1] = 고Val[jr];
고Bar[jr+1] = 고Bar[jr];
}
고Val[0] = H;
고Bar[0] = 0;
고11 = Date[저Bar[0]];
시간11 = stime[저Bar[0]];
Vlue11 = 저val[0];
고12 = Date[고Bar[0]];
시간12 = stime[고Bar[0]];
Vlue12 = 고Val[0];
고31 = Date[저Bar[0]];
시간31 = stime[저Bar[0]];
고32 = Date[0];
시간32 = stime[0];
for jr = 0 to 5
{
dfr[jr] = 저val[0] + ((고Val[1] - 저val[0]) * dr[jr]);
}
Box_SetEnd(dbox,고11,시간11,Vlue11);
dbox = box_new(고11,시간11,Vlue11,고12,시간12,Vlue12);
Box_SetColor(dbox,상승색a);
Box_SetFill(dbox,true,색상두께);
xOpen = Vlue11;
}
xClose = Vlue12;
}
If 고Val[0] < H Then
{
고Val[0] = H;
고Bar[0] = 0;
고12 = Date[고Bar[0]];
시간12 = stime[고Bar[0]];
Vlue12 = 고Val[0];
고32 = Date[0];
시간32 = stime[0];
}
Box_SetEnd(dbox,NextBarSdate,NextBarStime,Vlue12);
If gT == -1 Then
{
If gT[1] != -1 Then
{
For jr = 18 DownTo 0
{
저val[jr+1] = 저val[jr];
저Bar[jr+1] = 저Bar[jr];
}
저val[0] = L;
저Bar[0] = 0;
고11 = Date[고Bar[0]];
시간11 = stime[고Bar[0]];
Vlue11 = 고Val[0];
고12 = Date[저Bar[0]];
시간12 = stime[저Bar[0]];
Vlue12 = 저val[0];
고21 = Date[고Bar[0]];
시간21 = stime[고Bar[0]];
고22 = Date[0];
시간22 = stime[0];
for jr = 0 to 6
{
dfr[jr] = 저val[1] + ((고Val[0] - 저val[1]) * dr[jr]);
}
Box_SetEnd(dbox,고11,시간11,Vlue11);
dbox = box_new(고11,시간11,Vlue11,고12,시간12,Vlue12);
Box_SetColor(dbox,하락색a);
Box_SetFill(dbox,true,색상두께);
xClose = Vlue12;
}
xOpen = Vlue11;
If 저val[0] > L Then
{
저val[0] = L;
저Bar[0] = 0;
고12 = Date[저Bar[0]];
시간12 = stime[저Bar[0]];
Vlue12 = 저val[0];
고22 = Date[0];
시간22 = stime[0];
}
Box_SetEnd(dbox,NextBarSdate,NextBarStime,Vlue12);
}
if XClose > Xopen Then
PlotPaintBar(h,l,"강조",Red);
else if XClose < Xopen Then
PlotPaintBar(h,l,"강조",Blue);