커뮤니티
타주기
2023-05-18 18:36:45
871
글번호 169107
input : N(22);
var : S1(0),D1(0),TF(0),box(0),idx(0),T(0),T1(0),T2(0);
var : oo(0),hh(0),ll(0),TL1(0),TL2(0),clr(0),ii(0),TL(0);
Plot1(c);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
idx = 0;
}
Else
idx = idx+1;
if D1 > 0 then
{
TF = idx%N;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and TF < TF[1]) Then
{
value1 = sDate;
value2 = sTime;
oo = O;
hh = H;
ll = L;
box = Box_New(value1,Value2,hh,NextBarSdate,NextBarStime,ll);
ii = 1;
T1 = T[1];
T2 = T1[1];
}
Else
{
ii = ii +1;
if h > hh Then
hh = h;
if l < ll Then
ll = l;
var1 = Round(ii/2,1);
Box_SetBegin(box,value1,Value2,HH);
Box_SetEnd(box,sDate,sTime,LL);
}
if C > oo Then
{
T = 1;
clr = Red;
}
else if C < oo Then
{
clr = Blue;
T = -1;
}
Else
clr = IFf(T1==1,Red,Blue);
Box_SetColor(box,clr);
Box_SetSize(box,1);
Box_SetFill(box,true,255);
}
a, 양전환되면 하단에 네모 표시. 음전환되면 상단에 네모 표시.
b, 직전 하락박스 저점 대비, 상 2틱 ~ 하 -1틱 내에 쌍바닥이면 네모 표시. 감사합니다.
답변 1
예스스탁 예스스탁 답변
2023-05-19 14:39:59
안녕하세요
예스스탁입니다.
a 내용만 작성해 드립니다.
b 내용은 작성해 보는데 시간이 많이 소모됩니다.
일정시간 이상 요구되는 내용은 업무상 작성해 드리기 어렵습니다.
input : N(22),상(2),하(1);
var : S1(0),D1(0),TF(0),box(0),idx(0);
var : oo(0),hh(0),ll(0),TL1(0),TL2(0),clr(0),clr1(0),clr2(0);
var : ii(0),TL(0),tx(0),s(0);
#Plot1(c);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
idx = 0;
}
Else
idx = idx+1;
if D1 > 0 then
{
TF = idx%N;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
value1 = sDate;
value2 = sTime;
oo = O;
hh = H;
ll = L;
box = Box_New(value1,Value2,hh,NextBarSdate,NextBarStime,ll);
ii = 1;
clr1 = clr[1];
clr2 = clr1[1];
s = 0;
}
Else
{
ii = ii +1;
if h > hh Then
hh = h;
if l < ll Then
ll = l;
var1 = Round(ii/2,1);
Box_SetBegin(box,value1,Value2,HH);
Box_SetEnd(box,sDate,stime,LL);
}
if C > oo Then
clr = Red;
else if C < oo Then
clr = Blue;
Else
clr = clr1;
Box_SetColor(box,clr);
Box_SetSize(box,1);
Box_SetFill(box,true,255);
if s == 0 Then
{
if clr == Red and clr1 != clr Then
{
s = 1;
tx = text_new(sDate,sTime,ll,"■");
Text_SetColor(tx,Red);
Text_SetStyle(tx,2,0);
}
if clr == Blue and clr1 != clr Then
{
s = -1;
tx = text_new(sDate,sTime,hh,"■");
Text_SetColor(tx,Blue);
Text_SetStyle(tx,2,1);
}
}
Else
{
if s == 1 Then
{
if clr == Blue Then
{
Text_Delete(tx);
s = 0;
}
if clr == Red Then
Text_SetLocation(tx,sDate,sTime,ll);
}
if s == -1 Then
{
if clr == red Then
{
Text_Delete(tx);
s = 0;
}
if clr == Blue Then
Text_SetLocation(tx,sDate,sTime,hh);
}
}
}
즐거운 하루되세요
> 고성 님이 쓴 글입니다.
> 제목 : 타주기
> input : N(22);
var : S1(0),D1(0),TF(0),box(0),idx(0),T(0),T1(0),T2(0);
var : oo(0),hh(0),ll(0),TL1(0),TL2(0),clr(0),ii(0),TL(0);
Plot1(c);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
idx = 0;
}
Else
idx = idx+1;
if D1 > 0 then
{
TF = idx%N;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and TF < TF[1]) Then
{
value1 = sDate;
value2 = sTime;
oo = O;
hh = H;
ll = L;
box = Box_New(value1,Value2,hh,NextBarSdate,NextBarStime,ll);
ii = 1;
T1 = T[1];
T2 = T1[1];
}
Else
{
ii = ii +1;
if h > hh Then
hh = h;
if l < ll Then
ll = l;
var1 = Round(ii/2,1);
Box_SetBegin(box,value1,Value2,HH);
Box_SetEnd(box,sDate,sTime,LL);
}
if C > oo Then
{
T = 1;
clr = Red;
}
else if C < oo Then
{
clr = Blue;
T = -1;
}
Else
clr = IFf(T1==1,Red,Blue);
Box_SetColor(box,clr);
Box_SetSize(box,1);
Box_SetFill(box,true,255);
}
a, 양전환되면 하단에 네모 표시. 음전환되면 상단에 네모 표시.
b, 직전 하락박스 저점 대비, 상 2틱 ~ 하 -1틱 내에 쌍바닥이면 네모 표시. 감사합니다.
다음글
이전글