커뮤니티
47975 재 질문입니다.
2016-05-30 17:05:07
118
글번호 98612
rsi식이 아니고 rci지표입니다. 아울러 참조데이터를 이용하지 않고 지표식으로 변환해서 직접120틱 차트에서 240틱을 보고 싶습니다.
부탁드립니다
답변 1
예스스탁 예스스탁 답변
2016-05-30 18:08:38
안녕하세요
예스스탁입니다.
1.
Input : P1(5),P2(20),P3(60);
Var : Ep1(0),EP2(0),EP3(0),TF(0), DINDEX(0);
var : JISU11(0),JISU12(0),JISU13(0);
var : PreJISU11(0),PreJISU12(0),PreJISU13(0),TEMA1(0);
var : JISU21(0),JISU22(0),JISU23(0);
var : PreJISU21(0),PreJISU22(0),PreJISU23(0),TEMA2(0);
var : JISU31(0),JISU32(0),JISU33(0);
var : PreJISU31(0),PreJISU32(0),PreJISU33(0),TEMA3(0);
TF = dayindex%2;
Ep1 = 2/(P1+1);
Ep2 = 2/(P2+1);
Ep3 = 2/(P3+1);
if Bdate != Bdate[1] or (TF < TF[1] and Bdate == Bdate[1]) then{
DINDEX = DINDEX + 1;
PreJISU11 = JISU11[1];
PreJISU12 = JISU12[1];
PreJISU13 = JISU13[1];
PreJISU21 = JISU21[1];
PreJISU22 = JISU22[1];
PreJISU23 = JISU23[1];
PreJISU31 = JISU31[1];
PreJISU32 = JISU32[1];
PreJISU33 = JISU33[1];
}
if DINDEX <= 1 then{
JISU11 = C;
JISU21 = C;
JISU31 = C;
}
else{
JISU11 = C * EP1 + PreJISU11 * (1-EP1);
JISU21 = C * EP2 + PreJISU21 * (1-EP2);
JISU31 = C * EP3 + PreJISU31 * (1-EP3);
}
if DINDEX <= 2 then{
JISU12 = JISU11;
JISU22 = JISU21;
JISU32 = JISU31;
}
else{
JISU12 = JISU11 * EP1 + PreJISU12 * (1-EP1);
JISU22 = JISU21 * EP2 + PreJISU22 * (1-EP2);
JISU32 = JISU31 * EP3 + PreJISU32 * (1-EP3);
}
if DINDEX <= 3 then{
JISU13 = JISU12;
JISU23 = JISU22;
JISU33 = JISU32;
}
else{
JISU13 = JISU12 * EP1 + PreJISU13 * (1-EP1);
JISU23 = JISU22 * EP2 + PreJISU23 * (1-EP2);
JISU33 = JISU32 * EP3 + PreJISU33 * (1-EP3);
}
TEMA1 = (3 * JISU11) - (3 * JISU12) + (JISU13);
TEMA2 = (3 * JISU21) - (3 * JISU22) + (JISU23);
TEMA3 = (3 * JISU31) - (3 * JISU32) + (JISU33);
plot1(TEMA1);
plot2(TEMA2);
plot3(TEMA3);
2
input : Period(5);
Var : cnt(0),Nth(0),tempmax(0), tempindex(0), X1(0),RCIv(0),TF(0);
Array : CC[100](0),value[100](0),NTHVALUE[100](0);
TF = dayindex%2;
if Bdate != Bdate[1] or (TF < TF[1] and Bdate == Bdate[1]) then{
for cnt = 1 to 99{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[Period] > 0 then{
for cnt = 0 to Period-1{
value[cnt] = CC[cnt];
}
For Nth = 0 to Period-1 {
tempmax = -99999999;
For cnt = 0 to Period-1{
if value[cnt] > tempmax then{
tempmax = value[cnt];
tempIndex = cnt;
NTHVALUE[cnt] = Nth+1;
}
}
value[tempIndex] = -99999999;
}
X1 = 0;
for cnt = 0 to period-1{
X1 = X1+abs((cnt+1)-NTHVALUE[cnt])^2;
}
RCIv = (1-(6*X1)/(period*(period^2-1)))*100;
plot1(RCIV);
}
즐거운 하루되세요
> 해와달 님이 쓴 글입니다.
> 제목 : 47975 재 질문입니다.
> rsi식이 아니고 rci지표입니다. 아울러 참조데이터를 이용하지 않고 지표식으로 변환해서 직접120틱 차트에서 240틱을 보고 싶습니다.
부탁드립니다
다음글
이전글