예스스탁
예스스탁 답변
2022-03-24 13:43:02
안녕하세요
예스스탁입니다.
1
input : ntime(30);
var : S1(0),D1(0),TM(0),TF(0),TL(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%ntime;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and ntime > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and ntime > 1 and TM >= TM[1]+ntime) or
(Bdate == Bdate[1] and ntime == 1 and TM > TM[1]) Then
{
TL = TL_New(sdate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,GREEN);
}
}
2
input : diff(2.5),굵기(3);
var : cnt(0),ii(0);
Array : TL[101](0), TX[101](0), VV[101](0);
if Bdate != Bdate[1] Then
{
ii = 0;
var1 = Floor(DayOpen/diff)*diff;
For cnt = -5 to 5
{
ii = ii+1;
TL_Delete(TL[ii]);
var2 = var1+(diff*cnt);
VV[ii] = Var2;
TL[ii] = TL_New(sDate,sTime,VV[ii],NextBarSdate,NextBarStime,VV[ii]);
TL_SetExtRight(TL[ii],true);
TL_SetExtLeft(TL[ii],true);
TL_SetColor(TL[ii],BLACK);
TL_SetSize(TL[ii],굵기);
Text_Delete(TX[ii]);
TX[ii] = Text_New(sDate,sTime,VV[ii],NumToStr(VV[ii],2));
Text_SetStyle(TX[ii],0,1);
}
}
Else
{
ii = 0;
var1 = Floor(DayOpen/diff)*diff;
For cnt = -5 to 5
{
ii = ii +1;
Text_SetLocation(TX[ii],NextBarSdate,NextBarStime,VV[ii]);
}
}
즐거운 하루되세요
> 한림 님이 쓴 글입니다.
> 제목 : 수식문의 드립니다
> 1. x축 30분단위 시간 세로 수직선 수식
2. 아래수식 선물 2.5p 수평선에서 y축에 수치를 보여주는 수식
input : diff(2.5),굵기(3);
var : cnt(0),ii(0);
Array : TL[101](0);
if Bdate != Bdate[1] Then
{
ii = 0;
var1 = Floor(DayOpen/diff)*diff;
For cnt = -5 to 5
{
ii = ii+1;
TL_Delete(TL[ii]);
var2 = var1+(diff*cnt);
TL[ii] = TL_New(sDate,sTime,var2,NextBarSdate,NextBarStime,var2);
TL_SetExtRight(TL[ii],true);
TL_SetExtLeft(TL[ii],true);
TL_SetColor(TL[ii],BLACK);
TL_SetSize(TL[ii],굵기);
}
}