예스스탁
예스스탁 답변
2023-10-10 17:32:20
안녕하세요
예스스탁입니다.
Input : af(0.02), maxAF(0.2);
input : 굵기(1),고점연결선굵기(1),저점연결선굵기(1);
var : t(0),tl(0),tl1(0),tl2(0),tx1(0),tx2(0),color(0);
var : hh(0),hd(0),ht(0),hh1(0),tl11(0);
var : ll(0),ld(0),lt(0),ll1(0),tl22(0);
var : tl3(0),tl4(0);
var1 = SAR(af,maxAF);
if CrossUp(C,var1) Then
{
T = 1;
hh = h;
hh1 = hh[1];
hd = sDate;
ht = sTime;
if ll > 0 Then
{
TL_SetExtLeft(tl1,False);
TL_SetExtRight(tl1,False);
tl1 = TL_New(hd,ht,hh,NextBarSdate,NextBarStime,hh);
TL_SetSize(tl1,굵기);
TL_SetExtLeft(tl1,true);
TL_SetExtRight(tl1,true);
tl3 = TL_New(hd[1],ht[1],hh[1],Sdate,Stime,hh);
TL_SetSize(tl3,고점연결선굵기);
tl11 = tl1[1];
TL_SetEnd(tl11,Sdate[1],Stime[1],hh1);
Text_SetStyle(tx1,2,1);
if hh1 == 0 or (hh1 > 0 and hh > hh1) Then
color = Black;
}
}
else if CrossDown(C,var1) Then
{
T = -1;
ll = l;
ll1 = ll[1];
ld = sDate;
lt = sTime;
if hh > 0 Then
{
TL_SetExtLeft(tl2,False);
TL_SetExtRight(tl2,False);
tl2 = TL_New(ld,lt,ll,NextBarSdate,NextBarStime,ll);
TL_SetSize(tl2,굵기);
TL_SetExtLeft(tl2,true);
TL_SetExtRight(tl2,true);
tl4 = TL_New(ld[1],lt[1],ll[1],Sdate,Stime,ll);
TL_SetSize(tl4,저점연결선굵기);
tl22 = tl2[1];
TL_SetEnd(tl22,Sdate[1],Stime[1],ll1);
Text_SetStyle(tx2,2,0);
if ll1 == 0 or (ll1 > 0 and ll < ll1) Then
color = Black;
}
}
Else
{
if t == 1 then
{
if h > hh Then
{
hh = h;
hd = sDate;
ht = sTime;
TL_SetEnd(tl,hd,ht,hh);
TL_SetBegin(tl1,hd,ht,hh);
TL_SetEnd(tl11,Sdate[1],Stime[1],hh1);
Text_SetLocation(tx1,sDate,sTime,hh);
if (hh1 > 0 and hh > hh1) Then
color = Black;
TL_SetEnd(tl3,sDate,sTime,hh);
}
}
if t == -1 then
{
if l < ll Then
{
ll = l;
ld = sDate;
lt = sTime;
TL_SetEnd(tl,ld,lt,ll);
TL_SetBegin(tl2,ld,lt,ll);
TL_SetEnd(tl22,Sdate[1],Stime[1],ll1);
Text_SetLocation(tx2,sDate,sTime,ll);
if (ll1 > 0 and ll < ll1) Then
color = Black;
TL_SetEnd(tl4,sDate,sTime,ll);
}
}
}
TL_SetEnd(tl1,NextBarSdate,NextBarStime,hh);
TL_SetEnd(tl2,NextBarSdate,NextBarStime,ll);
즐거운 하루되세요
> 레전드 님이 쓴 글입니다.
> 제목 : 문의
> Input : af(0.02), maxAF(0.2);
var : t(0),tl(0),tl1(0),tl2(0),tx1(0),tx2(0),color(0);
var : hh(0),hd(0),ht(0),hh1(0),tl11(0);
var : ll(0),ld(0),lt(0),ll1(0),tl22(0);
var : tl3(0),tl4(0);
var1 = SAR(af,maxAF);
if CrossUp(C,var1) Then
{
T = 1;
hh = h;
hh1 = hh[1];
hd = sDate;
ht = sTime;
if ll > 0 Then
{
TL_SetExtLeft(tl1,False);
TL_SetExtRight(tl1,False);
tl1 = TL_New(hd,ht,hh,NextBarSdate,NextBarStime,hh);
TL_SetExtLeft(tl1,true);
TL_SetExtRight(tl1,true);
tl3 = TL_New(hd[1],ht[1],hh[1],Sdate,Stime,hh);
tl11 = tl1[1];
TL_SetEnd(tl11,Sdate[1],Stime[1],hh1);
Text_SetStyle(tx1,2,1);
if hh1 == 0 or (hh1 > 0 and hh > hh1) Then
color = Black;
}
}
else if CrossDown(C,var1) Then
{
T = -1;
ll = l;
ll1 = ll[1];
ld = sDate;
lt = sTime;
if hh > 0 Then
{
TL_SetExtLeft(tl2,False);
TL_SetExtRight(tl2,False);
tl2 = TL_New(ld,lt,ll,NextBarSdate,NextBarStime,ll);
TL_SetExtLeft(tl2,true);
TL_SetExtRight(tl2,true);
tl4 = TL_New(ld[1],lt[1],ll[1],Sdate,Stime,ll);
tl22 = tl2[1];
TL_SetEnd(tl22,Sdate[1],Stime[1],ll1);
Text_SetStyle(tx2,2,0);
if ll1 == 0 or (ll1 > 0 and ll < ll1) Then
color = Black;
}
}
Else
{
if t == 1 then
{
if h > hh Then
{
hh = h;
hd = sDate;
ht = sTime;
TL_SetEnd(tl,hd,ht,hh);
TL_SetBegin(tl1,hd,ht,hh);
TL_SetEnd(tl11,Sdate[1],Stime[1],hh1);
Text_SetLocation(tx1,sDate,sTime,hh);
if (hh1 > 0 and hh > hh1) Then
color = Black;
TL_SetEnd(tl3,sDate,sTime,hh);
}
}
if t == -1 then
{
if l < ll Then
{
ll = l;
ld = sDate;
lt = sTime;
TL_SetEnd(tl,ld,lt,ll);
TL_SetBegin(tl2,ld,lt,ll);
TL_SetEnd(tl22,Sdate[1],Stime[1],ll1);
Text_SetLocation(tx2,sDate,sTime,ll);
if (ll1 > 0 and ll < ll1) Then
color = Black;
TL_SetEnd(tl4,sDate,sTime,ll);
}
}
}
TL_SetEnd(tl1,NextBarSdate,NextBarStime,hh);
TL_SetEnd(tl2,NextBarSdate,NextBarStime,ll);
눈이 좀안좋아서 그런데 선의 굵기를 조절할수 잇도록 부탁드립니다