커뮤니티
수식문의입니다.
2008-12-09 08:07:52
971
글번호 18636
안녕하세요.
2006.8.22일 예스스탁에서 스토캐스틱 다이버젼스 수식을 올려주신 걸 그대로 복사해서 검증을 했더니 검증이 되질 않습니다.
수식은 아래와 같습니다.
var : value1(0), value2(0), value3(0), value4(0), value5(0);
var : SLindex1(0), SLindex2(0), Lindex1(0), Lindex2(0);
var : SHindex1(0), SHindex2(0), Hindex1(0), Hindex2(0);
value1 = stochasticsD(10,5,5);
value2 = value1 > value1[1] and value1[1] <= value1[2]; // 스토캐스틱 상승반전
value3 = L > L[1] and L[1] <= L[2]; // 저가 상승반전
value4 = value1 < value1[1] and value1[1] >= value1[2]; // 스토캐스틱 하락반전
value5 = H < H[1] and H[1] >= H[2]; // 고가 하락반전
SLindex1 = MRO(value2,50,1); // 최근 스토캐스틱 상승반전 시점의 현재로 부터의 index
SLindex2 = MRO(value2,50,2); // 두번째로 최근 스토캐스틱 상승반전 시점의 현재로 부터의 index
Lindex1 = MRO(value3,50,1); // 최근 저가 상승반전 시점의 현재로 부터의 index
Lindex2 = MRO(value3,50,2); // 두번째로 최근 저가 상승반전 시점의 현재로 부터의 index
SHindex1 = MRO(value4,50,1); // 최근 스토캐스틱 하락반전 시점의 현재로 부터의 index
SHindex2 = MRO(value4,50,2); // 두번째로 최근 스토캐스틱 하락반전 시점의 현재로 부터의 index
Hindex1 = MRO(value5,50,1); // 최근 고가 하락반전 시점의 현재로 부터의 index
Hindex2 = MRO(value5,50,2); // 두번째로 최근 고가 하락반전 시점의 현재로 부터의 index
# stochasticsD의 상승형 divergence 발생시 매수
if
value1[1] <= 20 and //전봉의 stochasticsD값이 침체권이 20 이하에 위치해 있고
value1[SLindex1+1] > value1[SLindex2+1] and // 최근 스토 상승반전 시점의 값이 이전 반전 시점의 값보다 크고
L[Lindex1+1] < L[Lindex2+1] and // 최근 저가 상승반전 시점의 값은 이전 저가 반전 값보다 작고
value2 and lowest(L,5) == lowest(L,15) // 스토캐스틱 상승반전 되었고 5봉동안의 최저가가 15봉 동안의 최저가 이면
then {
buy();
exitshort();
}
# stochasticsD의 하락형 divergence 발생시 매도
if
value1[1] >= 80 and //전봉의 stochasticsD값이 과열권인 80 이상에 위치해 있고
value1[SHindex1+1] < value1[SHindex2+1] and // 최근 스토 하락반전 시점의 값이 이전 반전 시점의 값보다 작고
H[Lindex1+1] > H[Lindex2+1] and // 최근 고가가 하락반전 시점의 값은 이전 고가 반전 값보다 크고
value4 and highest(H,5) == highest(H,15) // 스토캐스틱 하락반전 되었고 5봉동안의 최고가가 15봉 동안의 최고가 이면
then {
sell();
exitLong();
}
답변 1
예스스탁 예스스탁 답변
2008-12-09 09:46:42
안녕하세요
예스스탁입니다.
식을 3.1로 변경했습니다.
var : SLindex1(0), SLindex2(0), Lindex1(0), Lindex2(0);
var : SHindex1(0), SHindex2(0), Hindex1(0), Hindex2(0);
value1 = stochasticsD(10,5,5);
Condition2 = value1 > value1[1] and value1[1] <= value1[2]; // 스토캐스틱 상승반전
Condition3 = L > L[1] and L[1] <= L[2]; // 저가 상승반전
Condition4 = value1 < value1[1] and value1[1] >= value1[2]; // 스토캐스틱 하락반전
Condition5 = H < H[1] and H[1] >= H[2]; // 고가 하락반전
SLindex1 = MRO(Condition2,50,1); // 최근 스토캐스틱 상승반전 시점의 현재로 부터의 index
SLindex2 = MRO(Condition2,50,2); // 두번째로 최근 스토캐스틱 상승반전 시점의 현재로 부터의 index
Lindex1 = MRO(Condition3,50,1); // 최근 저가 상승반전 시점의 현재로 부터의 index
Lindex2 = MRO(Condition3,50,2); // 두번째로 최근 저가 상승반전 시점의 현재로 부터의 index
SHindex1 = MRO(Condition4,50,1); // 최근 스토캐스틱 하락반전 시점의 현재로 부터의 index
SHindex2 = MRO(Condition4,50,2); // 두번째로 최근 스토캐스틱 하락반전 시점의 현재로 부터의 index
Hindex1 = MRO(Condition5,50,1); // 최근 고가 하락반전 시점의 현재로 부터의 index
Hindex2 = MRO(Condition5,50,2); // 두번째로 최근 고가 하락반전 시점의 현재로 부터의 index
# stochasticsD의 상승형 divergence 발생시 매수
if
value1[1] <= 20 and //전봉의 stochasticsD값이 침체권이 20 이하에 위치해 있고
value1[SLindex1+1] > value1[SLindex2+1] and // 최근 스토 상승반전 시점의 값이 이전 반전 시점의 값보다 크고
L[Lindex1+1] < L[Lindex2+1] and // 최근 저가 상승반전 시점의 값은 이전 저가 반전 값보다 작고
Condition2 and lowest(L,5) == lowest(L,15) // 스토캐스틱 상승반전 되었고 5봉동안의 최저가가 15봉 동안의 최저가 이면
then {
buy();
exitshort();
}
# stochasticsD의 하락형 divergence 발생시 매도
if
value1[1] >= 80 and //전봉의 stochasticsD값이 과열권인 80 이상에 위치해 있고
value1[SHindex1+1] < value1[SHindex2+1] and // 최근 스토 하락반전 시점의 값이 이전 반전 시점의 값보다 작고
H[Lindex1+1] > H[Lindex2+1] and // 최근 고가가 하락반전 시점의 값은 이전 고가 반전 값보다 크고
Condition4 and highest(H,5) == highest(H,15) // 스토캐스틱 하락반전 되었고 5봉동안의 최고가가 15봉 동안의 최고가 이면
then {
sell();
exitLong();
}
즐거운 하루되세요
> 골드드래곤 님이 쓴 글입니다.
> 제목 : 수식문의입니다.
> 안녕하세요.
2006.8.22일 예스스탁에서 스토캐스틱 다이버젼스 수식을 올려주신 걸 그대로 복사해서 검증을 했더니 검증이 되질 않습니다.
수식은 아래와 같습니다.
var : value1(0), value2(0), value3(0), value4(0), value5(0);
var : SLindex1(0), SLindex2(0), Lindex1(0), Lindex2(0);
var : SHindex1(0), SHindex2(0), Hindex1(0), Hindex2(0);
value1 = stochasticsD(10,5,5);
value2 = value1 > value1[1] and value1[1] <= value1[2]; // 스토캐스틱 상승반전
value3 = L > L[1] and L[1] <= L[2]; // 저가 상승반전
value4 = value1 < value1[1] and value1[1] >= value1[2]; // 스토캐스틱 하락반전
value5 = H < H[1] and H[1] >= H[2]; // 고가 하락반전
SLindex1 = MRO(value2,50,1); // 최근 스토캐스틱 상승반전 시점의 현재로 부터의 index
SLindex2 = MRO(value2,50,2); // 두번째로 최근 스토캐스틱 상승반전 시점의 현재로 부터의 index
Lindex1 = MRO(value3,50,1); // 최근 저가 상승반전 시점의 현재로 부터의 index
Lindex2 = MRO(value3,50,2); // 두번째로 최근 저가 상승반전 시점의 현재로 부터의 index
SHindex1 = MRO(value4,50,1); // 최근 스토캐스틱 하락반전 시점의 현재로 부터의 index
SHindex2 = MRO(value4,50,2); // 두번째로 최근 스토캐스틱 하락반전 시점의 현재로 부터의 index
Hindex1 = MRO(value5,50,1); // 최근 고가 하락반전 시점의 현재로 부터의 index
Hindex2 = MRO(value5,50,2); // 두번째로 최근 고가 하락반전 시점의 현재로 부터의 index
# stochasticsD의 상승형 divergence 발생시 매수
if
value1[1] <= 20 and //전봉의 stochasticsD값이 침체권이 20 이하에 위치해 있고
value1[SLindex1+1] > value1[SLindex2+1] and // 최근 스토 상승반전 시점의 값이 이전 반전 시점의 값보다 크고
L[Lindex1+1] < L[Lindex2+1] and // 최근 저가 상승반전 시점의 값은 이전 저가 반전 값보다 작고
value2 and lowest(L,5) == lowest(L,15) // 스토캐스틱 상승반전 되었고 5봉동안의 최저가가 15봉 동안의 최저가 이면
then {
buy();
exitshort();
}
# stochasticsD의 하락형 divergence 발생시 매도
if
value1[1] >= 80 and //전봉의 stochasticsD값이 과열권인 80 이상에 위치해 있고
value1[SHindex1+1] < value1[SHindex2+1] and // 최근 스토 하락반전 시점의 값이 이전 반전 시점의 값보다 작고
H[Lindex1+1] > H[Lindex2+1] and // 최근 고가가 하락반전 시점의 값은 이전 고가 반전 값보다 크고
value4 and highest(H,5) == highest(H,15) // 스토캐스틱 하락반전 되었고 5봉동안의 최고가가 15봉 동안의 최고가 이면
then {
sell();
exitLong();
}
다음글
이전글