커뮤니티
문의 드립니다
2022-11-09 11:15:00
744
글번호 163646
첨부 이미지
그림1
수고하십니다.
아래의 지표가 선물 5분봉에서
3개의 TL라인이 전일값에 의해 당일분만 표시되게 수정 부탁합니다..
지금은 과거의 값도 표시가 되네요...
수고하세요.
#### 전일pivot3 ##########################################################
Var : TLTp3st(0);
var : tTp3st(0);
var : pivotrangeGAP(0),pivotrangeUP(0),pivotrangeDN(0);
input : TL색상P(Brown);
input : TL색상UD(turquoise);
input : TL색상R(magenta);
input : TL색상S(green);
input : text색상1(lmagenta) ;
#################
var : 전일pivot3(0),전전일pivot(0),cntmwd(0),d1(0),d2(0),w1(0),w2(0);
Array : DOpen[10](0),DHigh[10](0),DLow[10](0),DClose[10](0);
if (sdate != sdate[1] and stime >= 090000) or
(sdate == sdate[1] and stime >= 090000 and stime[1] < 090000) Then
{
d1 = sdate;
d2 = d1[1];
w1 = DayOfWeek(sdate);
w2 = W1[1];
DOpen[0] = O;
Dhigh[0] = H;
DLow[0] = L;
for cntmwd = 1 to 9
{
DOpen[cntmwd] = DOpen[cntmwd-1][1];
DHigh[cntmwd] = DHigh[cntmwd-1][1];
DLow[cntmwd] = DLow[cntmwd-1][1];
DClose[cntmwd] = DClose[cntmwd-1][1];
}
}
DClose[0] = C;
if H > DHigh[0] Then
DHigh[0] = H;
if L < DLow[0] Then
DLow[0] = L;
################# pivot
전일pivot3 = (Dhigh[1]+Dlow[1]+DClose[1])/3 ;
pivotrangeGAP = 전일pivot3 - (Dhigh[1]+Dlow[1])/2 ;
//pivotrangeUP = 전일pivot3 + pivotrangeGAP ;
//pivotrangeDN = 전일pivot3 - pivotrangeGAP ;
Text_Delete(tTp3st);
tTp3st = Text_New(sdate,stime,전일pivot3,"pivot");
Text_SetSize(tTp3st,15);
Text_SetColor(tTp3st,text색상1);
if bdate != bdate[1] then
{
##라인 표시 - 전일pivot3
TL_Delete(TLTp3st);
TLTp3st = TL_new(sdate,stime,전일pivot3, NextBarSdate,NextBarStime,전일pivot3);
TL_setExtRight(TLTp3st,true);
TL_setExtLeft(TLTp3st,true);
TL_SetSize(TLTp3st,5);
TL_SetColor(TLTp3st,TL색상P);
}
##Text 표시 - 전일pivot3
Text_Delete(tTp3st);
tTp3st = Text_New(sdate,stime,전일pivot3,"pivot");
Text_SetSize(tTp3st,15);
Text_SetColor(tTp3st,text색상1);
if bdate != bdate[1] then
{
##라인 표시 - 전일pivot3
TL_Delete(TLTp3st);
TLTp3st = TL_new(sdate,stime,전일pivot3, NextBarSdate,NextBarStime,전일pivot3);
TL_setExtRight(TLTp3st,true);
TL_setExtLeft(TLTp3st,true);
TL_SetSize(TLTp3st,5);
TL_SetColor(TLTp3st,TL색상P);
}
##Text 표시 - pivotrangeUP
Text_Delete(pivotrangeUP);
pivotrangeUP = Text_New(sdate,stime,전일pivot3 + pivotrangeGAP,"prUP");
Text_SetSize(pivotrangeUP,15);
Text_SetColor(pivotrangeUP,text색상1);
if bdate != bdate[1] then
{
##라인 표시 - 전일pivotrangeUP
TL_Delete(pivotrangeUP);
pivotrangeUP = TL_new(sdate,stime,전일pivot3 + pivotrangeGAP, NextBarSdate,NextBarStime,전일pivot3 + pivotrangeGAP);
TL_setExtRight(pivotrangeUP,true);
TL_setExtLeft(pivotrangeUP,true);
TL_SetSize(pivotrangeUP,3);
TL_SetColor(pivotrangeUP,TL색상UD);
}
##Text 표시 - pivotrangeDN
Text_Delete(pivotrangeDN);
pivotrangeDN = Text_New(sdate,stime,전일pivot3 - pivotrangeGAP,"prDN");
Text_SetSize(pivotrangeDN,15);
Text_SetColor(pivotrangeDN,text색상1);
if bdate != bdate[1] then
{
##라인 표시 - 전일pivotrangeDN
TL_Delete(pivotrangeDN);
pivotrangeDN = TL_new(sdate,stime,전일pivot3 - pivotrangeGAP, NextBarSdate,NextBarStime,전일pivot3 - pivotrangeGAP);
TL_setExtRight(pivotrangeDN,true);
TL_setExtLeft(pivotrangeDN,true);
TL_SetSize(pivotrangeDN,3);
TL_SetColor(pivotrangeDN,TL색상UD);
}
- 1. 164416_q1.png (0.06 MB)
답변 1
예스스탁 예스스탁 답변
2022-11-09 15:02:14
안녕하세요
예스스탁입니다.
pivotrangeUP = TL_new(sdate,stime,~~
pivotrangeUP = Text_New(sdate,stime,~~
추세선과 텍스트 출력함수 앞에 위치하는 변수는
새로 만들어지는 추세선과 텍스트의 아이디를 저장하기 위한 용도입니다.
해당 아이다로 추세선이나 텍스트 오브젝트를 컨트롤하게 되므로
동일이름의 변수를 다른 추세선이나 텍스트 출력에 다시 사용하게 되면
이전 저장한 값이 없어지므로 지울수가 없게 됩니다.
각 다른 이름을 사용하셔야 합니다.
#### 전일pivot3 ##########################################################
Var : tl1(0),tl2(0),tl3(0);
Var : tx1(0),tx2(0),tx3(0);
var : pivotrangeGAP(0);
input : TL색상P(Brown);
input : TL색상UD(turquoise);
input : TL색상R(magenta);
input : TL색상S(green);
input : text색상1(lmagenta) ;
#################
var : 전일pivot3(0),전전일pivot(0),cntmwd(0),d1(0),d2(0),w1(0),w2(0);
Array : DOpen[10](0),DHigh[10](0),DLow[10](0),DClose[10](0);
if (sdate != sdate[1] and stime >= 090000) or
(sdate == sdate[1] and stime >= 090000 and stime[1] < 090000) Then
{
d1 = sdate;
d2 = d1[1];
w1 = DayOfWeek(sdate);
w2 = W1[1];
DOpen[0] = O;
Dhigh[0] = H;
DLow[0] = L;
for cntmwd = 1 to 9
{
DOpen[cntmwd] = DOpen[cntmwd-1][1];
DHigh[cntmwd] = DHigh[cntmwd-1][1];
DLow[cntmwd] = DLow[cntmwd-1][1];
DClose[cntmwd] = DClose[cntmwd-1][1];
}
}
DClose[0] = C;
if H > DHigh[0] Then
DHigh[0] = H;
if L < DLow[0] Then
DLow[0] = L;
################# pivot
전일pivot3 = (Dhigh[1]+Dlow[1]+DClose[1])/3 ;
pivotrangeGAP = 전일pivot3 - (Dhigh[1]+Dlow[1])/2 ;
//pivotrangeUP = 전일pivot3 + pivotrangeGAP ;
//pivotrangeDN = 전일pivot3 - pivotrangeGAP ;
if bdate != bdate[1] then
{
##라인 표시 - 전일pivot3
TL_Delete(tl1);
tl1 = TL_new(sdate,stime,전일pivot3, NextBarSdate,NextBarStime,전일pivot3);
TL_setExtRight(tl1,true);
TL_setExtLeft(tl1,true);
TL_SetSize(tl1,5);
TL_SetColor(tl1,TL색상P);
TL_Delete(tl2);
tl2 = TL_new(sdate,stime,전일pivot3 + pivotrangeGAP, NextBarSdate,NextBarStime,전일pivot3 + pivotrangeGAP);
TL_setExtRight(tl2,true);
TL_setExtLeft(tl2,true);
TL_SetSize(tl2,3);
TL_SetColor(tl2,TL색상UD);
TL_Delete(tl3);
tl3 = TL_new(sdate,stime,전일pivot3 - pivotrangeGAP, NextBarSdate,NextBarStime,전일pivot3 - pivotrangeGAP);
TL_setExtRight(tl3,true);
TL_setExtLeft(tl3,true);
TL_SetSize(tl3,3);
TL_SetColor(tl3,TL색상UD);
}
##Text 표시 - 전일pivot3
Text_Delete(tx1);
tx1 = Text_New(sdate,stime,전일pivot3,"pivot");
Text_SetSize(tx1,15);
Text_SetColor(tx1,text색상1);
##Text 표시 - pivotrangeUP
Text_Delete(tx2);
tx2 = Text_New(sdate,stime,전일pivot3 + pivotrangeGAP,"prUP");
Text_SetSize(tx2,15);
Text_SetColor(tx2,text색상1);
##Text 표시 - pivotrangeDN
Text_Delete(tx3);
tx3 = Text_New(sdate,stime,전일pivot3 - pivotrangeGAP,"prDN");
Text_SetSize(tx3,15);
Text_SetColor(tx3,text색상1);
즐거운 하루되세요
> 오이도인 님이 쓴 글입니다.
> 제목 : 문의 드립니다
> 수고하십니다.
아래의 지표가 선물 5분봉에서
3개의 TL라인이 전일값에 의해 당일분만 표시되게 수정 부탁합니다..
지금은 과거의 값도 표시가 되네요...
수고하세요.
#### 전일pivot3 ##########################################################
Var : TLTp3st(0);
var : tTp3st(0);
var : pivotrangeGAP(0),pivotrangeUP(0),pivotrangeDN(0);
input : TL색상P(Brown);
input : TL색상UD(turquoise);
input : TL색상R(magenta);
input : TL색상S(green);
input : text색상1(lmagenta) ;
#################
var : 전일pivot3(0),전전일pivot(0),cntmwd(0),d1(0),d2(0),w1(0),w2(0);
Array : DOpen[10](0),DHigh[10](0),DLow[10](0),DClose[10](0);
if (sdate != sdate[1] and stime >= 090000) or
(sdate == sdate[1] and stime >= 090000 and stime[1] < 090000) Then
{
d1 = sdate;
d2 = d1[1];
w1 = DayOfWeek(sdate);
w2 = W1[1];
DOpen[0] = O;
Dhigh[0] = H;
DLow[0] = L;
for cntmwd = 1 to 9
{
DOpen[cntmwd] = DOpen[cntmwd-1][1];
DHigh[cntmwd] = DHigh[cntmwd-1][1];
DLow[cntmwd] = DLow[cntmwd-1][1];
DClose[cntmwd] = DClose[cntmwd-1][1];
}
}
DClose[0] = C;
if H > DHigh[0] Then
DHigh[0] = H;
if L < DLow[0] Then
DLow[0] = L;
################# pivot
전일pivot3 = (Dhigh[1]+Dlow[1]+DClose[1])/3 ;
pivotrangeGAP = 전일pivot3 - (Dhigh[1]+Dlow[1])/2 ;
//pivotrangeUP = 전일pivot3 + pivotrangeGAP ;
//pivotrangeDN = 전일pivot3 - pivotrangeGAP ;
Text_Delete(tTp3st);
tTp3st = Text_New(sdate,stime,전일pivot3,"pivot");
Text_SetSize(tTp3st,15);
Text_SetColor(tTp3st,text색상1);
if bdate != bdate[1] then
{
##라인 표시 - 전일pivot3
TL_Delete(TLTp3st);
TLTp3st = TL_new(sdate,stime,전일pivot3, NextBarSdate,NextBarStime,전일pivot3);
TL_setExtRight(TLTp3st,true);
TL_setExtLeft(TLTp3st,true);
TL_SetSize(TLTp3st,5);
TL_SetColor(TLTp3st,TL색상P);
}
##Text 표시 - 전일pivot3
Text_Delete(tTp3st);
tTp3st = Text_New(sdate,stime,전일pivot3,"pivot");
Text_SetSize(tTp3st,15);
Text_SetColor(tTp3st,text색상1);
if bdate != bdate[1] then
{
##라인 표시 - 전일pivot3
TL_Delete(TLTp3st);
TLTp3st = TL_new(sdate,stime,전일pivot3, NextBarSdate,NextBarStime,전일pivot3);
TL_setExtRight(TLTp3st,true);
TL_setExtLeft(TLTp3st,true);
TL_SetSize(TLTp3st,5);
TL_SetColor(TLTp3st,TL색상P);
}
##Text 표시 - pivotrangeUP
Text_Delete(pivotrangeUP);
pivotrangeUP = Text_New(sdate,stime,전일pivot3 + pivotrangeGAP,"prUP");
Text_SetSize(pivotrangeUP,15);
Text_SetColor(pivotrangeUP,text색상1);
if bdate != bdate[1] then
{
##라인 표시 - 전일pivotrangeUP
TL_Delete(pivotrangeUP);
pivotrangeUP = TL_new(sdate,stime,전일pivot3 + pivotrangeGAP, NextBarSdate,NextBarStime,전일pivot3 + pivotrangeGAP);
TL_setExtRight(pivotrangeUP,true);
TL_setExtLeft(pivotrangeUP,true);
TL_SetSize(pivotrangeUP,3);
TL_SetColor(pivotrangeUP,TL색상UD);
}
##Text 표시 - pivotrangeDN
Text_Delete(pivotrangeDN);
pivotrangeDN = Text_New(sdate,stime,전일pivot3 - pivotrangeGAP,"prDN");
Text_SetSize(pivotrangeDN,15);
Text_SetColor(pivotrangeDN,text색상1);
if bdate != bdate[1] then
{
##라인 표시 - 전일pivotrangeDN
TL_Delete(pivotrangeDN);
pivotrangeDN = TL_new(sdate,stime,전일pivot3 - pivotrangeGAP, NextBarSdate,NextBarStime,전일pivot3 - pivotrangeGAP);
TL_setExtRight(pivotrangeDN,true);
TL_setExtLeft(pivotrangeDN,true);
TL_SetSize(pivotrangeDN,3);
TL_SetColor(pivotrangeDN,TL색상UD);
}
이전글