예스스탁
예스스탁 답변
2020-03-02 13:15:16
안녕하세요
예스스탁입니다.
input : ntime1(60),P(20);
var : S1(0),D1(0),TM(0),TF(0),cnt(0),TL1(0),TL2(0);
Array : HH[10](0),LL[10](0),CC[10](0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%ntime1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
TL_Delete(TL1);
TL_Delete(TL2);
HH[0] = c;
LL[0] = c;
for cnt = 1 to 9
{
CC[cnt] = CC[cnt-1][1];
HH[cnt] = LL[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
if HH[1] > 0 and LL[1] > 0 then
{
TL1 = TL_New(sdate[1],stime[1],CC[1],sdate,stime,CC[1]+PriceScale*5);
TL_SetColor(TL1,YELLOW);
TL_SetSize(TL1,2);
TL_SetExtRight(Tl1,true);
}
}
else
{
TL_SetEnd(TL1,sdate,stime,CC[1]+PriceScale*5);
}
CC[0] = C;
if c > HH[0] Then
HH[0] = c;
if c < LL[0] Then
LL[0] = c;
}
즐거운 하루되세요
> 유선 님이 쓴 글입니다.
> 제목 : 문의드립니다
> input : ntime1(60),P(20);
var : S1(0),D1(0),TM(0),TF(0),cnt(0),TL1(0),TL2(0);
Array : HH[10](0),LL[10](0),CC[10](0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%ntime1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
TL_Delete(TL1);
TL_Delete(TL2);
HH[0] = c;
LL[0] = c;
for cnt = 1 to 9
{
CC[cnt] = CC[cnt-1][1];
HH[cnt] = LL[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
if HH[1] > 0 and LL[1] > 0 then
{
TL1 = TL_New(sdate[1],stime[1],CC[1],sdate,stime,CC[1]);
TL_SetColor(TL1,YELLOW);
TL_SetSize(TL1,2);
TL_SetExtRight(Tl1,true);
}
}
else
{
TL_SetEnd(TL1,sdate,stime,CC[1]);
}
CC[0] = C;
if c > HH[0] Then
HH[0] = c;
if c < LL[0] Then
LL[0] = c;
}
종가 +5틱으로 나오게추가 부탁드립니다~~