커뮤니티
아이시떼루
2017-01-12 03:04:26
198
글번호 105808
첨부 이미지
그림1
var : T1(0),HH(0),LL(0),idx(0),TM(0),cnt(0),시그널(false), txt(0);
TM = TimeToMinutes(stime);
if Bdate != Bdate[1] Then{
T1 = TM;
idx = 0;
}
if Bdate == Bdate[1] Then
idx = idx+1;
if TM <= T1+60 Then{
HH = dayhigh;
LL = daylow;
}
else{
HH = H;
LL = L;
for cnt = 1 to idx{
if TM[cnt] >= TM-60 and H[cnt] > HH Then
HH = H[cnt];
if TM[cnt] >= TM-60 and L[cnt] < LL Then
LL = L[cnt];
}
}
#한시간 동안 최고가와 최저가의 차이가 50포인트 이하이면 false 아니면 true
if HH-LL <= 50 Then{
시그널 = false;
Text_SetStyle(txt, 1,1);
txt = Text_New(sDate,sTime,C,"횡보시작");
Text_SetColor(txt,RED);
Text_SetStyle(txt,1,1);}
Else{
시그널 = true;}
써주신 수식에 txt를 추가하니 이렇게 되네요 delete하면 아예 글자가 나오지를 않습니다.
여기에 추가하자면,
1시간동안 위아래로 50포인트 변동이 없다는 구간이 생기는곳에 검정색화살표처럼 세로로 선이나와 txt로 횡보시작 이렇게 출력하고싶습니다.
후에 50포인트이상의 변동이생기면 빨간색화살표해놓은곳에 변동생성 이렇게 표시하고싶습니다. tl을 써야하는건 알겠는데 머리가 안도네요
- 1. fjgumkijljoghld.jpg (0.20 MB)
답변 1
예스스탁 예스스탁 답변
2017-01-12 11:09:52
안녕하세요
예스스탁입니다.
var : T1(0),HH(0),LL(0),idx(0),TM(0),cnt(0),시그널(false), tx(0),TL(0);
TM = TimeToMinutes(stime);
if Bdate != Bdate[1] Then{
T1 = TM;
idx = 0;
}
if Bdate == Bdate[1] Then
idx = idx+1;
if TM <= T1+60 Then{
HH = dayhigh;
LL = daylow;
}
else{
HH = H;
LL = L;
for cnt = 1 to idx{
if TM[cnt] >= TM-60 and H[cnt] > HH Then
HH = H[cnt];
if TM[cnt] >= TM-60 and L[cnt] < LL Then
LL = L[cnt];
}
}
#한시간 동안 최고가와 최저가의 차이가 50포인트 이하이면 false 아니면 true
if HH-LL <= 50 Then{
시그널 = false;
#Text_SetStyle(txt, 1,1);
#txt = Text_New(sDate,sTime,C,"횡보시작");
#Text_SetColor(txt,RED);
#Text_SetStyle(txt,1,1);
}
Else{
시그널 = true;
}
if Bdate != Bdate[1] then{
if 시그널 == false then{
TL = TL_New(sdate,stime,99999999,sdate,stime,0);
TL_SetColor(TL,BLACK);
TX = Text_New(sdate,stime,c,"횡보시작");
Text_SetColor(Tx,blue);
Text_SetStyle(tx,1,1);
}
if 시그널 == true then{
TL = TL_New(sdate,stime,99999999,sdate,stime,0);
TL_SetColor(TL,BLACK);
TX = Text_New(sdate,stime,c,"변동생성");
Text_SetColor(Tx,RED);
Text_SetStyle(tx,1,1);
}
}
if Bdate == Bdate[1] then{
if 시그널 == false and 시그널[1] == true then{
TL = TL_New(sdate,stime,99999999,sdate,stime,0);
TL_SetColor(TL,BLACK);
TX = Text_New(sdate,stime,c,"횡보시작");
Text_SetColor(Tx,blue);
Text_SetStyle(tx,1,1);
}
if 시그널 == true and 시그널[1] == false then{
TL = TL_New(sdate,stime,99999999,sdate,stime,0);
TL_SetColor(TL,BLACK);
TX = Text_New(sdate,stime,c,"변동생성");
Text_SetColor(Tx,RED);
Text_SetStyle(tx,1,1);
}
}
즐거운 하루되세요
> stockric 님이 쓴 글입니다.
> 제목 : 아이시떼루
> var : T1(0),HH(0),LL(0),idx(0),TM(0),cnt(0),시그널(false), txt(0);
TM = TimeToMinutes(stime);
if Bdate != Bdate[1] Then{
T1 = TM;
idx = 0;
}
if Bdate == Bdate[1] Then
idx = idx+1;
if TM <= T1+60 Then{
HH = dayhigh;
LL = daylow;
}
else{
HH = H;
LL = L;
for cnt = 1 to idx{
if TM[cnt] >= TM-60 and H[cnt] > HH Then
HH = H[cnt];
if TM[cnt] >= TM-60 and L[cnt] < LL Then
LL = L[cnt];
}
}
#한시간 동안 최고가와 최저가의 차이가 50포인트 이하이면 false 아니면 true
if HH-LL <= 50 Then{
시그널 = false;
Text_SetStyle(txt, 1,1);
txt = Text_New(sDate,sTime,C,"횡보시작");
Text_SetColor(txt,RED);
Text_SetStyle(txt,1,1);}
Else{
시그널 = true;}
써주신 수식에 txt를 추가하니 이렇게 되네요 delete하면 아예 글자가 나오지를 않습니다.
여기에 추가하자면,
1시간동안 위아래로 50포인트 변동이 없다는 구간이 생기는곳에 검정색화살표처럼 세로로 선이나와 txt로 횡보시작 이렇게 출력하고싶습니다.
후에 50포인트이상의 변동이생기면 빨간색화살표해놓은곳에 변동생성 이렇게 표시하고싶습니다. tl을 써야하는건 알겠는데 머리가 안도네요