커뮤니티
문의
2024-05-09 07:49:47
630
글번호 179276
Input : af(0.02), maxAF(0.2);
var : t(0),tl(0),tl1(0),tl2(0),tl3(0),tl4(0),tx1(0),tx2(0),color(0),Sarv(0);
var : hh(0),hd(0),ht(0),hh1(0),tl11(0);
var : ll(0),ld(0),lt(0),ll1(0),tl22(0);
var : d1(0),t1(0),box(0),Box1(0);
var1 = SAR(af,maxAF);
##################################################################################
Sarv = var1;
if CrossUp(C,Sarv) Then
{
d1 = sDate;
t1 = sTime;
hh = h;
ll = l;
tl = TL_New(sDate,sTime,(HH+LL)/2, NextBarSdate,NextBarStime,(HH+LL)/2);
box = Box_New(sDate,sTime,HH,NextBarSdate,NextBarStime,LL);
Box_SetColor(Box,IFf((HH+LL)/2,Red,Blue));
Box_SetFill(box,true);
box1 = Box_New(sDate,sTime,HH,NextBarSdate,NextBarStime,LL);
Box_SetColor(Box1,Red);
Box_SetSize(Box1,1);
}
Else if CrossDown(C,Sarv) Then
{
d1 = sDate;
t1 = sTime;
hh = h;
ll = l;
tl = TL_New(sDate,sTime,(HH+LL)/2, NextBarSdate,NextBarStime,(HH+LL)/2);
box = Box_New(sDate,sTime,HH,NextBarSdate,NextBarStime,LL);
Box_SetColor(Box,IFF(C >(HH+LL)/2,Red,Blue));
Box_SetFill(box,true);
box1 = Box_New(sDate,sTime,HH,NextBarSdate,NextBarStime,LL);
Box_SetColor(box1,Blue);
Box_SetSize(Box1,1);
}
Else
{
if h > hh Then
hh = h;
if l < ll Then
ll = l;
TL_SetBegin(TL,d1,t1,(hh+ll)/2);
TL_SetEnd(TL,NextBarSdate,NextBarStime,(hh+ll)/2);
Box_SetBegin(box,d1,t1,hh);
Box_SetEnd(box,NextBarSdate,NextBarStime,LL);
Box_SetColor(Box,IFF(C > (HH+LL)/2,Red,Blue));
Box_SetBegin(box1,d1,t1,hh);
Box_SetEnd(box1,NextBarSdate,NextBarStime,LL);
}
데이타2로 바꿔주세요
답변 1
예스스탁 예스스탁 답변
2024-05-09 14:27:35
안녕하세요
예스스탁입니다.
차트에 적용 후 마우스로 끌어서
data2위로 옮기셔야 합니다.
마우스로 잡을 plot이 필요하므로 파라볼릭을 plot으로 출력되게 작성해 드립니다.
Input : af(0.02), maxAF(0.2);
var : t(0),tl(0),tl1(0),tl2(0),tl3(0),tl4(0),tx1(0),tx2(0),color(0),Sarv(0,Data2);
var : hh(0,Data2),hd(0,Data2),ht(0,Data2);
var : ll(0,Data2),ld(0,Data2),lt(0,Data2);
var : d1(0),t1(0),box(0),Box1(0);
##################################################################################
Sarv = data2(SAR(af,maxAF));
if data2(CrossUp(C,Sarv)) Then
{
d1 = data2(sDate);
t1 = data2(sTime);
hh = data2(h);
ll = data2(l);
tl = TL_New_Self(d1,t1,(HH+LL)/2, data2(NextBarSdate),data2(NextBarStime),(HH+LL)/2);
box = Box_New_Self(d1,t1,HH,data2(NextBarSdate),data2(NextBarStime),LL);
Box_SetColor(Box,IFf((HH+LL)/2,Red,Blue));
Box_SetFill(box,true);
box1 = Box_New_Self(d1,t1,HH,data2(NextBarSdate),data2(NextBarStime),LL);
Box_SetColor(Box1,Red);
Box_SetSize(Box1,1);
}
Else if data2(CrossDown(C,Sarv)) Then
{
d1 = data2(sDate);
t1 = data2(sTime);
hh = data2(h);
ll = data2(l);
tl = TL_New_Self(d1,t1,(HH+LL)/2, data2(NextBarSdate),data2(NextBarStime),(HH+LL)/2);
box = Box_New_Self(d1,t1,HH,data2(NextBarSdate),data2(NextBarStime),LL);
Box_SetColor(Box,IFF(data2(C) >(HH+LL)/2,Red,Blue));
Box_SetFill(box,true);
box1 = Box_New_Self(sDate,sTime,HH,data2(NextBarSdate),data2(NextBarStime),LL);
Box_SetColor(box1,Blue);
Box_SetSize(Box1,1);
}
Else
{
if data2(h) > hh Then
hh = data2(h);
if data2(l) < ll Then
ll = data2(l);
TL_SetBegin(TL,d1,t1,(hh+ll)/2);
TL_SetEnd(TL,data2(NextBarSdate),data2(NextBarStime),(hh+ll)/2);
Box_SetBegin(box,d1,t1,hh);
Box_SetEnd(box,data2(NextBarSdate),data2(NextBarStime),LL);
Box_SetColor(Box,IFF(data2(C) > (HH+LL)/2,Red,Blue));
Box_SetBegin(box1,d1,t1,hh);
Box_SetEnd(box1,data2(NextBarSdate),NextBarStime,LL);
}
plot1(Sarv,"d2sar",IFf(Data2(c)>Sarv,Red,Blue));
즐거운 하루되세요
> 레전드 님이 쓴 글입니다.
> 제목 : 문의
> Input : af(0.02), maxAF(0.2);
var : t(0),tl(0),tl1(0),tl2(0),tl3(0),tl4(0),tx1(0),tx2(0),color(0),Sarv(0);
var : hh(0),hd(0),ht(0),hh1(0),tl11(0);
var : ll(0),ld(0),lt(0),ll1(0),tl22(0);
var : d1(0),t1(0),box(0),Box1(0);
var1 = SAR(af,maxAF);
##################################################################################
Sarv = var1;
if CrossUp(C,Sarv) Then
{
d1 = sDate;
t1 = sTime;
hh = h;
ll = l;
tl = TL_New(sDate,sTime,(HH+LL)/2, NextBarSdate,NextBarStime,(HH+LL)/2);
box = Box_New(sDate,sTime,HH,NextBarSdate,NextBarStime,LL);
Box_SetColor(Box,IFf((HH+LL)/2,Red,Blue));
Box_SetFill(box,true);
box1 = Box_New(sDate,sTime,HH,NextBarSdate,NextBarStime,LL);
Box_SetColor(Box1,Red);
Box_SetSize(Box1,1);
}
Else if CrossDown(C,Sarv) Then
{
d1 = sDate;
t1 = sTime;
hh = h;
ll = l;
tl = TL_New(sDate,sTime,(HH+LL)/2, NextBarSdate,NextBarStime,(HH+LL)/2);
box = Box_New(sDate,sTime,HH,NextBarSdate,NextBarStime,LL);
Box_SetColor(Box,IFF(C >(HH+LL)/2,Red,Blue));
Box_SetFill(box,true);
box1 = Box_New(sDate,sTime,HH,NextBarSdate,NextBarStime,LL);
Box_SetColor(box1,Blue);
Box_SetSize(Box1,1);
}
Else
{
if h > hh Then
hh = h;
if l < ll Then
ll = l;
TL_SetBegin(TL,d1,t1,(hh+ll)/2);
TL_SetEnd(TL,NextBarSdate,NextBarStime,(hh+ll)/2);
Box_SetBegin(box,d1,t1,hh);
Box_SetEnd(box,NextBarSdate,NextBarStime,LL);
Box_SetColor(Box,IFF(C > (HH+LL)/2,Red,Blue));
Box_SetBegin(box1,d1,t1,hh);
Box_SetEnd(box1,NextBarSdate,NextBarStime,LL);
}
데이타2로 바꿔주세요