커뮤니티
시스템 수식 좀 부탁 드립니다.
2023-11-03 12:30:16
842
글번호 173691
* 안녕 하세요. 지나번 도움 많이 배웠습니다.
* 아래 박스 그리기 지표 좀 봐 주십시요.
1. 지표는 되는데 박스가 안그려 짐니다. 잘못 한 점이 무었이지요???
2. 매매식으로 가능 한가요? → CrossUp(var91[1],var91[5])
## <아래 수식>
VAR91 = MA(C,20) ;
plot91(var91,"상승",IFf(var91[1]<var91[5],Black,Magenta),Def,6) ;
plot92(var91,"하락",IFf(var91[1]>var91[5],Red,Blue),Def,4) ;
## 박스그리기
var : box(0);
var : TL1(0),TL2(0),TX1(0),TX2(0);
if CrossUp(var91[1],var91[5]) Then
{
box = Box_New(sDate,sTime,h,NextBarSdate,NextBarStime,l);
Box_SetColor(box,Rgb(0,255,120) ); // Rgb(255,150,255)
Box_SetFill(box,true);
Box_SetExtFill(box,true);
value1 = H;
Value2 = L;
//TL1 = TL_New(sDate,sTime,value1,NextBarSdate,NextBarStime,value1);
//TL2 = TL_New(sDate,sTime,value2,NextBarSdate,NextBarStime,value2);
TL_SetColor(TL1,Red);
TL_SetColor(TL2,Red);
TL_SetSize(TL1,3);
TL_SetSize(TL2,3);
//TX1 = Text_New(NextBarSdate,NextBarStime,value1,NumToStr(value1,0));
//TX2 = Text_New(NextBarSdate,NextBarStime,value2,NumToStr(Value2,0));
Text_SetStyle(TX1,2,1);
Text_SetStyle(TX2,2,0);
}
else
if CrossDown(var91[5],var91[1]) Then
{
box = Box_New(sDate,sTime,h,NextBarSdate,NextBarStime,l);
Box_SetColor(box,Rgb(255,255,0)); // Rgb(40,250,100)
Box_SetFill(box,true);
Box_SetExtFill(box,true);
value1 = H;
Value2 = L;
//TL1 = TL_New(sDate,sTime,value1,NextBarSdate,NextBarStime,value1);
//TL2 = TL_New(sDate,sTime,value2,NextBarSdate,NextBarStime,value2);
TL_SetColor(TL1,Black);
TL_SetColor(TL2,Black);
TL_SetSize(TL1,3);
TL_SetSize(TL2,3);
//TX1 = Text_New(NextBarSdate,NextBarStime,value1,NumToStr(value1,0));
//TX2 = Text_New(NextBarSdate,NextBarStime,value2,NumToStr(Value2,0));
Text_SetStyle(TX1,2,1);
Text_SetStyle(TX2,2,0);
}
Else
{
Box_SetEnd(box,NextBarSdate,NextBarStime,l);
TL_SetEnd(TL1,NextBarSdate,NextBarStime,value1);
TL_SetEnd(TL2,NextBarSdate,NextBarStime,value2);
Text_SetLocation(TX1,NextBarSdate,NextBarStime,value1);
Text_SetLocation(TX2,NextBarSdate,NextBarStime,value2);
}
* 매번 많은 도움에 고맙습니다. 좋은 주말 되십시요 ^^
답변 1
예스스탁 예스스탁 답변
2023-11-03 13:30:13
안녕하세요
예스스탁입니다.
CrossUp(var91[1],var91[5])
CrossDown(var91[5],var91[1])
위 2개는 같은 내용입니다.
1봉전 var91이 5봉전 var91을 상향돌파하면
반대로 5봉전 var91 기준으로 하향이탈입니다.
CrossUp(var91[1],var91[5])
CrossDown(var91[1],var91[5])
위와 같이 모두 1봉전 var91기준으로 5봉전값을 상향이탈/하향이탈하게 작성하셔야 합니다.
위 조건만 변경하시면 차트에 조건대로 색상이 표시됩니다.
VAR91 = MA(C,20) ;
plot91(var91,"상승",IFf(var91[1]<var91[5],Black,Magenta),Def,6) ;
plot92(var91,"하락",IFf(var91[1]>var91[5],Red,Blue),Def,4) ;
## 박스그리기
var : box(0);
var : TL1(0),TL2(0),TX1(0),TX2(0);
if CrossUp(var91[1],var91[5]) Then
{
box = Box_New(sDate,sTime,h,NextBarSdate,NextBarStime,l);
Box_SetColor(box,Rgb(0,255,120) ); // Rgb(255,150,255)
Box_SetFill(box,true);
Box_SetExtFill(box,true);
value1 = H;
Value2 = L;
//TL1 = TL_New(sDate,sTime,value1,NextBarSdate,NextBarStime,value1);
//TL2 = TL_New(sDate,sTime,value2,NextBarSdate,NextBarStime,value2);
TL_SetColor(TL1,Red);
TL_SetColor(TL2,Red);
TL_SetSize(TL1,3);
TL_SetSize(TL2,3);
//TX1 = Text_New(NextBarSdate,NextBarStime,value1,NumToStr(value1,0));
//TX2 = Text_New(NextBarSdate,NextBarStime,value2,NumToStr(Value2,0));
Text_SetStyle(TX1,2,1);
Text_SetStyle(TX2,2,0);
}
else if CrossDown(var91[1],var91[5]) Then
{
box = Box_New(sDate,sTime,h,NextBarSdate,NextBarStime,l);
Box_SetColor(box,Rgb(255,255,0)); // Rgb(40,250,100)
Box_SetFill(box,true);
Box_SetExtFill(box,true);
value1 = H;
Value2 = L;
//TL1 = TL_New(sDate,sTime,value1,NextBarSdate,NextBarStime,value1);
//TL2 = TL_New(sDate,sTime,value2,NextBarSdate,NextBarStime,value2);
TL_SetColor(TL1,Black);
TL_SetColor(TL2,Black);
TL_SetSize(TL1,3);
TL_SetSize(TL2,3);
//TX1 = Text_New(NextBarSdate,NextBarStime,value1,NumToStr(value1,0));
//TX2 = Text_New(NextBarSdate,NextBarStime,value2,NumToStr(Value2,0));
Text_SetStyle(TX1,2,1);
Text_SetStyle(TX2,2,0);
}
Else
{
Box_SetEnd(box,NextBarSdate,NextBarStime,l);
TL_SetEnd(TL1,NextBarSdate,NextBarStime,value1);
TL_SetEnd(TL2,NextBarSdate,NextBarStime,value2);
Text_SetLocation(TX1,NextBarSdate,NextBarStime,value1);
Text_SetLocation(TX2,NextBarSdate,NextBarStime,value2);
}
즐거운 하루되세요
> 요타 님이 쓴 글입니다.
> 제목 : 시스템 수식 좀 부탁 드립니다.
> * 안녕 하세요. 지나번 도움 많이 배웠습니다.
* 아래 박스 그리기 지표 좀 봐 주십시요.
1. 지표는 되는데 박스가 안그려 짐니다. 잘못 한 점이 무었이지요???
2. 매매식으로 가능 한가요? → CrossUp(var91[1],var91[5])
## <아래 수식>
VAR91 = MA(C,20) ;
plot91(var91,"상승",IFf(var91[1]<var91[5],Black,Magenta),Def,6) ;
plot92(var91,"하락",IFf(var91[1]>var91[5],Red,Blue),Def,4) ;
## 박스그리기
var : box(0);
var : TL1(0),TL2(0),TX1(0),TX2(0);
if CrossUp(var91[1],var91[5]) Then
{
box = Box_New(sDate,sTime,h,NextBarSdate,NextBarStime,l);
Box_SetColor(box,Rgb(0,255,120) ); // Rgb(255,150,255)
Box_SetFill(box,true);
Box_SetExtFill(box,true);
value1 = H;
Value2 = L;
//TL1 = TL_New(sDate,sTime,value1,NextBarSdate,NextBarStime,value1);
//TL2 = TL_New(sDate,sTime,value2,NextBarSdate,NextBarStime,value2);
TL_SetColor(TL1,Red);
TL_SetColor(TL2,Red);
TL_SetSize(TL1,3);
TL_SetSize(TL2,3);
//TX1 = Text_New(NextBarSdate,NextBarStime,value1,NumToStr(value1,0));
//TX2 = Text_New(NextBarSdate,NextBarStime,value2,NumToStr(Value2,0));
Text_SetStyle(TX1,2,1);
Text_SetStyle(TX2,2,0);
}
else
if CrossDown(var91[5],var91[1]) Then
{
box = Box_New(sDate,sTime,h,NextBarSdate,NextBarStime,l);
Box_SetColor(box,Rgb(255,255,0)); // Rgb(40,250,100)
Box_SetFill(box,true);
Box_SetExtFill(box,true);
value1 = H;
Value2 = L;
//TL1 = TL_New(sDate,sTime,value1,NextBarSdate,NextBarStime,value1);
//TL2 = TL_New(sDate,sTime,value2,NextBarSdate,NextBarStime,value2);
TL_SetColor(TL1,Black);
TL_SetColor(TL2,Black);
TL_SetSize(TL1,3);
TL_SetSize(TL2,3);
//TX1 = Text_New(NextBarSdate,NextBarStime,value1,NumToStr(value1,0));
//TX2 = Text_New(NextBarSdate,NextBarStime,value2,NumToStr(Value2,0));
Text_SetStyle(TX1,2,1);
Text_SetStyle(TX2,2,0);
}
Else
{
Box_SetEnd(box,NextBarSdate,NextBarStime,l);
TL_SetEnd(TL1,NextBarSdate,NextBarStime,value1);
TL_SetEnd(TL2,NextBarSdate,NextBarStime,value2);
Text_SetLocation(TX1,NextBarSdate,NextBarStime,value1);
Text_SetLocation(TX2,NextBarSdate,NextBarStime,value2);
}
* 매번 많은 도움에 고맙습니다. 좋은 주말 되십시요 ^^
다음글
이전글