커뮤니티
문의 드립니다.
2026-05-15 09:07:45
81
글번호 232048
안녕하세요
많은 도움을 받고 있음에 감사 드립니다.
현재가격이 아래의 신호를 돌파하는 종목의 검색식을 부탁 드립니다.
RCI(9)<-50
&& RCI(9,1)<-50
&& RCI(9,1)>RCI(9)
감사합니다
답변 1
예스스탁 예스스탁 답변
2026-05-15 14:54:01
안녕하세요
예스스탁입니다.
가격이 신호를 돌파하는 내용은
오리신 조건을 만족하면 종가 저장후
종가가 돌파하는 내용으로 작성해 드립니다.
올리신 수식의 RCI가 아래식의 계산식이 맞는지 확인하시기 바랍니다.
키움의 경우 수식 내용이 오픈안된 함수들이 있어 정확한 계산내용을 확인하기 어렵습니다.
input :Length(9);
var : MinIndex(0), TestValue(0),i1(0),i2(0),TempVal1(0),TempVal2(0),
RankChange(0),RankChangeSqr(0),RankChangeSqrSum(0),CorrCoeff(0),Denom(0) ;
array: PriceArray[2,500](0) ;
var : RCI(0);
if Length >= 2 and Length < 500 then
{
for i1 = 1 to Length
{
PriceArray[0,i1] = i1 ;
PriceArray[1,i1] = C[Length-i1] ;
}
for i1 = 1 to Length - 1
{
TestValue = PriceArray[1,i1] ;
MinIndex = i1 ;
for i2 = i1 + 1 to Length
{
if TestValue > PriceArray[1,i2] then
{
MinIndex = i2 ;
TestValue = PriceArray[1,i2] ;
}
}
if MinIndex <> i1 then
{
TempVal1 = PriceArray[0,i1] ;
TempVal2 = PriceArray[1,i1] ;
PriceArray[0,i1] = PriceArray[0,MinIndex] ;
PriceArray[1,i1] = PriceArray[1,MinIndex] ;
PriceArray[0,MinIndex] = TempVal1 ;
PriceArray[1,MinIndex] = TempVal2 ;
}
}
RankChangeSqrSum = 0 ;
for i1 = 1 to Length
{
RankChange = i1 - PriceArray[0,i1] ;
RankChangeSqr = RankChange * RankChange ;
RankChangeSqrSum = RankChangeSqrSum + RankChangeSqr ;
}
Denom = Length * ( Length * Length - 1 ) ;
if Denom <> 0 then
CorrCoeff = 1 - 6 * RankChangeSqrSum / Denom ;
RCI = CorrCoeff * 100 ;
}
Else
RCI = Nan;
if RCI < -50 and RCI[1] < -50 and RCI[1] > RCI Then
var1 = c;
if CrossUp(C,var1) Then
Find(1);
즐거운 하루되세요
다음글
이전글