커뮤니티
신심리도의 로직좀 만들어주세요
2010-08-31 19:20:19
1295
글번호 32003
첨부파일로 신심리도 계산식보냅니다
인터넷에 있는거라 정확한지는 모르겠네요
선물이나 옵션을 신심리도 +50이상에선 매도,-50이하에선 매수의
로직좀 만들어주세요
수고하세요
- 1. 신심리도.jpg (0.04 MB)
답변 1
예스스탁 예스스탁 답변
2010-09-01 10:30:10
안녕하세요
예스스탁입니다.
1. 지표식
input : N(20);
var1 = iff(C>C[1],1,0);
var2 = iff(C>C[1],abs(C-C[1]),0);
var3 = accumn(var1,N);# N기간 상승일수의 합
var4 = accumn(var2,N);# N기간 상승폭의 합
var5 = iff(C<C[1],1,0);
var6 = iff(C<C[1],abs(C[1]-C),0);
var7 = accumn(var5,N);# N기간 하락일수의 합
var8 = accumn(var6,N);# N기간 하락폭의 합
value1 = (var3*var4)/(var4+var8)*100;
value2 = (var7*var8)/(var4+var8)*100;
value3 = ((value1-value2)/N+100)/2;
plot1(value3,"신심리도");
2.
input : N(20);
var1 = iff(C>C[1],1,0);
var2 = iff(C>C[1],abs(C-C[1]),0);
var3 = accumn(var1,N);# N기간 상승일수의 합
var4 = accumn(var2,N);# N기간 상승폭의 합
var5 = iff(C<C[1],1,0);
var6 = iff(C<C[1],abs(C[1]-C),0);
var7 = accumn(var5,N);# N기간 하락일수의 합
var8 = accumn(var6,N);# N기간 하락폭의 합
value1 = (var3*var4)/(var4+var8)*100;
value2 = (var7*var8)/(var4+var8)*100;
value3 = ((value1-value2)/N+100)/2;
if crossup(value3,50) Then
buy();
if CrossDown(value3,50) Then
sell();
즐거운 하루되세요
> 이재찬 님이 쓴 글입니다.
> 제목 : 신심리도의 로직좀 만들어주세요
> 첨부파일로 신심리도 계산식보냅니다
인터넷에 있는거라 정확한지는 모르겠네요
선물이나 옵션을 신심리도 +50이상에선 매도,-50이하에선 매수의
로직좀 만들어주세요
수고하세요