안녕하세요.
예스트레이더 코인 입니다.

1. 

input : n(10);
var : priceLen1(0),Upsize(0),Upday(0);
var : priceLen2(0),Downsize(0),Downday(0);
var : New(0);

priceLen1 = iff(dayclose() > dayclose(1), dayclose()-dayclose(1), 0); 
Upsize = AccumN(priceLen1,n); 
Upday = AccumN(iff(priceLen1 > 0, 1, 0), n); 
priceLen2 = iff(dayclose() < dayclose(1), dayclose(1)-dayclose(), 0); 
Downsize = AccumN(priceLen2,n); 
Downday = AccumN(iff(priceLen2 > 0, 1, 0), n); 

New = (Upday*Upsize/(Upsize+Downsize) - Downday*Downsize/(Upsize+Downsize))*100/n;

plot1(New);


2.

Input : Period(20);
Var : 상승일수(0), 하락일수(0), 상승폭합(0), 하락폭합(0), 증감치합(0), 감소치합(0), 증가치합(0), 감소비율(0), 증가비율(0), New(0);
Var : A(0), B(0);

A = C; # C는 종가
B = C[1];
상승일수 = AccumN(IFf(A > B, 1, 0), Period);
하락일수 = AccumN(IFf(A < B, 1, 0), Period);
상승폭합 = AccumN(IFf(A > B, A - B, 0), Period);
하락폭합 = AccumN(IFf(A < B, B - A, 0), Period);
증감치합 = 상승폭합 + 하락폭합;
감소치합 = 하락일수 * 하락폭합;
증가치합 = 상승일수 * 상승폭합;
감소비율 = (감소치합 / 증감치합) * 100;
증가비율 = (증가치합 / 증감치합) * 100;
New = ((증가비율 - 감소비율) / Period);

Plot1(New);

즐거운 하루 보내세요.



>> 장대수익 님이 쓴 글입니다.

>> 제목 : 수식문의드립니다.키움증권 기준 수식입니다. 예스트레이더코인용으로 변환 부탁드립니다. 신심리도 수식들입니다.

첫번째


priceLen1 = if(dayclose() > predayclose(), dayclose()-predayclose(), 0); 

Upsize = sum(priceLen1,n); 

Upday = sum(if(priceLen1 > 0, 1, 0), n); 

priceLen2 = if(dayclose() < predayclose(), predayclose()-dayclose(), 0); 

Downsize = sum(priceLen2,n); 

Downday = sum(if(priceLen2 > 0, 1, 0), n); 

(Upday*Upsize/(Upsize+Downsize) - Downday*Downsize/(Upsize+Downsize))*100/n


두번째



A=Price;
B=A(1);
상승일수=sum(if(A>B, 1, 0),Period);
하락일수=sum(if(A<B, 1, 0),Period);
상승폭합=sum(if(A>B, A-B, 0), Period);
하락폭합=sum(if(A<B, B-A, 0), Period);
증감치합=상승폭합+하락폭합;
감소치합=하락일수*하락폭합;
증가치합=상승일수*상승폭합;
감소비율=(감소치합/증감치합)*100;
증가비율=(증가치합/증감치합)*100;
((증가비율-감소비율)/Period)