커뮤니티
수식부탁드립니다.
2012-04-19 03:37:41
360
글번호 50230
수고많으십니다.
100틱 차트에서 300틱 cci를 보고 싶습니다.
지표식 부탁드립니다.
답변 1
예스스탁 예스스탁 답변
2012-04-19 10:43:54
안녕하세요
예스스탁입니다.
input : P(9),P1(10);
Variables: Sum(0), Counter(0), MD(0), Avgvalue(0),CCIv(0);
var : cnt(0),count(0),sum1(0),mav(0);
Var : Ep1(0), CCIsig(0), DINDEX1(0), PreCCIsig(0);
Array : CC[100](0),LL[100](0),HH[100](0);
var1 = dayindex%3;
if dayindex() == 0 or var1 <= var1[1] Then{
DINDEX1 = DINDEX1 + 1;
PreCCIsig = CCIsig[1];
HH[0] = H;
LL[0] = L;
for cnt = 1 to 99{
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
sum1 = 0;
for count = 0 to P-1{
sum1 = sum1+(CC[count]+HH[count]+LL[count]);
}
mav = sum1/P;
If HH[P] > 0 Then Begin
Avgvalue = mav;
MD = 0;
For counter = 0 To P - 1 Begin
MD = MD + Abs(HH[counter] + LL[counter] + CC[counter] - Avgvalue);
End;
MD = MD / P;
If MD == 0 Then
CCIv = 0;
Else
CCIv = (HH[0] + LL[0] + CC[0] - Avgvalue) / (0.015 * MD);
End
Else
CCIv = 0;
Ep1 = 2/(P1+1);
if DINDEX1 <= P1 then {
CCIsig = CCIv;
}
else{
CCIsig = CCIv * EP1 + PreCCIsig * (1-EP1);
}
plot1(CCIV);
plot2(CCIsig);
PlotBaseLine1(100, "기준선 +100");
PlotBaseLine2(-100, "기준선 -100");
즐거운 하루되세요
> 파파 님이 쓴 글입니다.
> 제목 : 수식부탁드립니다.
> 수고많으십니다.
100틱 차트에서 300틱 cci를 보고 싶습니다.
지표식 부탁드립니다.
다음글
이전글