커뮤니티
수식부탁드립니다.
2005-08-30 16:29:09
1104
글번호 8158
수고 많으십니다.
옵션을 선물가격기준으로 매매하고 싶은데요
선물 이평과 파라볼릭 참조식 좀 부탁드립니다.
미리 감사드립니다.
좋은 하루 되세요.
답변 1
예스스탁 예스스탁 답변
2005-08-31 17:14:03
안녕하세요
예스스탁입니다.
##이동평균
input : period(20);
var1 = ma(data1("c"),period);
## 파라볼릭
게시판을 검색하시면 수식지왕님이 올려주신 파일이 있습니다.
파일을 다운받으셔서 사용하시기 바랍니다.
파일 내용입니다.
/* 작성자: 수식지왕 */
input: af(0.02), maxAF(0.2);
var: 추세(0), 당일(0), 극대(0), 극저(0), 가속(0), 내일(0),
hh(0), ll(0), cc(0);
//SAR=(EP-전일SAR)*AF+전일SAR
hh = data1("h"); //타종목 데이터
ll = data1("l");
cc = data1("c");
if i==0 then {
극대 = hh;
극저 = ll;
추세 = 0;
당일 = 0;
내일 = 0;
}
if 당일[1] == 0 then {
if 추세[1] == 0 then {
if cc > cc[1] then 추세 = 1;
if cc < cc[1] then 추세 = -1;
}
if 추세[1] == 1 then {
if cc < cc[1] then {
추세 = -1;
당일 = 극대[1];
가속 = af;
}
}
if 추세[1] == -1 then {
if cc > cc[1] then {
추세 = 1;
당일 = 극저[1];
가속 = af;
}
}
극저 = min(ll,극저);
극대 = max(hh,극대);
}
if 당일[1] > 0 then {
if 추세[1] == -1 then {
if hh < 내일[1] then {
당일 = 내일[1];
극대 = 0;
if ll < 극저[1] then {
극저 = ll;
가속 = min(maxAF,가속+af);
}
}
else {
추세 = 1;
당일 = 극저[1];
극저 = 0;
극대 = hh;
가속 = af;
}
}
if 추세[1] == 1 then {
if ll > 내일[1] then {
당일 = 내일[1];
극저 = 0;
if hh > 극대[1] then {
극대 = hh;
가속 = min(maxAF,가속+af);
}
}
else {
추세 = -1;
당일 = 극대[1];
극대 = 0;
극저 = ll;
가속 = af;
}
}
}
내일 = (max(극대,극저) - 당일) * 가속 + 당일;
plot1(당일);
즐거운 하루되세요
> HH_gicha1 님이 쓴 글입니다.
> 제목 : 수식부탁드립니다.
> 수고 많으십니다.
옵션을 선물가격기준으로 매매하고 싶은데요
선물 이평과 파라볼릭 참조식 좀 부탁드립니다.
미리 감사드립니다.
좋은 하루 되세요.