커뮤니티
일봉차트값을 분봉차트에 표시하기
2020-01-05 16:27:12
361
글번호 134899
Input : Period(5);
var : TSF(0);
TSF = LRL(C,Period)+LRS(C,Period);
Plot1(TSF,"TSF") ;
위 지표식에서 일봉차트상의 TSF 의 값을 분봉차트에 표시하고자 할때 지표식을 부탁 드립니다.
답변 1
예스스탁 예스스탁 답변
2020-01-06 12:55:31
안녕하세요
예스스탁입니다.
Input : Period(5);
Var : X(0), Num1(0), Num2(0), SumBars(0), SumSqrBars(0), SumY(0), Sum1(0), Sum2(0),LRSv(0);
var : cnt(0),accum1(0),accum2(0),accum3(0),accum4(0),lrlv(0),preLRLv(0),TSF(0);
If Period == 0 Then
LRSv = 0;
SumBars = Period * (Period - 1) * 0.5;
SumSqrBars = (Period - 1) * Period * (2 * Period - 1) / 6;
Sum1 = 0;
SumY = 0;
accum1 = 0;
accum2 = 0;
accum3 = 0;
accum4 = 0;
For cnt = 0 To Period - 1 Begin
Sum1= Sum1 + cnt * DayClose(cnt);
SumY = SumY + DayClose(cnt);
accum1 = accum1+(Period-cnt);
accum2 = accum2+dayclose(cnt);
accum3 = accum3+dayclose(cnt)*(Period-cnt);
accum4 = accum4+(Period-cnt)^2;
End;
Sum2 = SumBars * SumY;
Num1 = Period * Sum1 - Sum2;
Num2 = SumBars * SumBars - Period * SumSqrBars;
If Num2 != 0 Then
LRSv = Num1 / Num2;
Else
LRSv = 0;
value1 = accum1/Period;
value2 = accum2/Period;
value3 = accum3/Period;
value4 = accum4/Period;
LRLv = (value3 - value1 * value2) / (value4 - (value1^2)) * (Period - value1) + value2;
TSF = LRLv+LRSv;
plot1(TSF);
즐거운 하루되세요
> 너무조아 님이 쓴 글입니다.
> 제목 : 일봉차트값을 분봉차트에 표시하기
> Input : Period(5);
var : TSF(0);
TSF = LRL(C,Period)+LRS(C,Period);
Plot1(TSF,"TSF") ;
위 지표식에서 일봉차트상의 TSF 의 값을 분봉차트에 표시하고자 할때 지표식을 부탁 드립니다.
다음글
이전글