수고하십니다
아래 수식을 파동중 마지막현재파동에만
적용되는 수식 요청 합니다
var : LRLv(0),LRSv(0),cnt(0),maxR(0),Mid(0);
var : TL1(0),TL2(0),TL3(0),idx(0),idx1(0);
if Bdate != Bdate[1] Then
{
idx = Index;
idx1 = idx[1];
}
if idx1 > 0 Then
{
LRLv = LRL(C,index-idx1);
LRSv = LRS(C,Index-idx1);
maxR = 0;
For cnt = 0 to Index-idx1
{
Mid = LRLV-LRSv*cnt;
if abs(L[cnt]-Mid) > maxR Then
maxR = abs(L[cnt]-Mid);
if abs(H[cnt]-Mid) > maxR Then
maxR = abs(H[cnt]-Mid);
}
TL_Delete(TL1);
TL1 = TL_New(sDate[Index-idx1],sTime[Index-idx1],Mid,sDate,sTime,LRLv);
TL_SetExtRight(TL1,true);
답변 1
예스스탁
예스스탁 답변
2021-08-11 15:06:23
안녕하세요
예스스탁입니다.
올려주신 내용으로는 수정할 방법을 잘 모르겠습니다.
도움을 드리지 못해 죄송합니다.
즐거운 하루되세요
> 2wnwn 님이 쓴 글입니다.
> 제목 : 수고하십니다
> 수고하십니다
아래 수식을 파동중 마지막현재파동에만
적용되는 수식 요청 합니다
var : LRLv(0),LRSv(0),cnt(0),maxR(0),Mid(0);
var : TL1(0),TL2(0),TL3(0),idx(0),idx1(0);
if Bdate != Bdate[1] Then
{
idx = Index;
idx1 = idx[1];
}
if idx1 > 0 Then
{
LRLv = LRL(C,index-idx1);
LRSv = LRS(C,Index-idx1);
maxR = 0;
For cnt = 0 to Index-idx1
{
Mid = LRLV-LRSv*cnt;
if abs(L[cnt]-Mid) > maxR Then
maxR = abs(L[cnt]-Mid);
if abs(H[cnt]-Mid) > maxR Then
maxR = abs(H[cnt]-Mid);
}
TL_Delete(TL1);
TL1 = TL_New(sDate[Index-idx1],sTime[Index-idx1],Mid,sDate,sTime,LRLv);
TL_SetExtRight(TL1,true);