커뮤니티
부탁드립니다.
2013-03-27 05:41:53
221
글번호 61279
아래 수식을 30분봉과 일봉에 적용하고 싶습니다.
1. 주봉의 스토케스틱(5,3,3)을 표시하는 수식 부탁드리겠습니다.
2. 주봉의 스토케스틱(5,3,3)의 %K값을 전주와 현재주간의 차이값을
표시하는 수식 부탁드리겠습니다.
전주에 %K가 18이고 현주가 50인 경우 32가 나오면 됩니다.
늘 감사드립니다~
답변 1
예스스탁 예스스탁 답변
2013-03-27 10:48:08
안녕하세요
예스스탁입니다.
분봉이나 일봉에서 주봉 스토케스틱을 그리는 식입니다.
1.
input : StoPeriod(5), StoPeriod1(3), StoPeriod2(3);
var : count(0), highVal(0), lowVal(0), StoFastK(0), StoK(0), StoD(0);
var : Ep(0), EP1(0), JISU(0), DINDEX(0), PreStoK(0), PreStoD(0),cnt(0);
Array : HH[50](0),LL[50](0);
if DayOfWeek(sdate) <= DayOfWeek(sdate[1]) and sdate > sdate[1] Then{
HH[0] = H;
LL[0] = L;
for cnt = 1 to 49{
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
}
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
highVal = HH[0];
lowVal = LL[0];
for count = 0 to StoPeriod-1 {
if HH[count] > highVal then
highVal = HH[count];
if LL[count] < lowVal then
lowVal = LL[count];
}
StoFastK = (C-lowVal)/(highVal-lowVal)*100;
#### Slow StochasticsK ####
Ep = 2/(StoPeriod1+1);
if DINDEX >= StoPeriod and DayOfWeek(sdate) <= DayOfWeek(sdate[1]) and sdate > sdate[1] then {
DINDEX = DINDEX + 1;
PreStoK = StoK[1];
}
if DINDEX <= 1 then
StoK = StoFastK ;
else
StoK = StoFastK * EP + PreStoK * (1-EP);
#### Slow StochasticsD ####
Ep1 = 2/(StoPeriod2+1);
if DayOfWeek(sdate) <= DayOfWeek(sdate[1]) and sdate > sdate[1] then {
DINDEX = DINDEX + 1;
PreStoD = StoD[1];
}
if DINDEX <= 1 then
StoD = StoK ;
else
StoD = StoK * EP1 + PreStoD * (1-EP1);
plot1(StoK);
plot2(StoD);
PlotBaseLine1(20);
PlotBaseLine2(80);
2.
input : StoPeriod(5), StoPeriod1(3), StoPeriod2(3);
var : count(0), highVal(0), lowVal(0), StoFastK(0), StoK(0), StoD(0);
var : Ep(0), EP1(0), JISU(0), DINDEX(0), PreStoK(0), PreStoD(0),cnt(0);
Array : HH[50](0),LL[50](0);
if DayOfWeek(sdate) <= DayOfWeek(sdate[1]) and sdate > sdate[1] Then{
HH[0] = H;
LL[0] = L;
for cnt = 1 to 49{
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
}
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
highVal = HH[0];
lowVal = LL[0];
for count = 0 to StoPeriod-1 {
if HH[count] > highVal then
highVal = HH[count];
if LL[count] < lowVal then
lowVal = LL[count];
}
StoFastK = (C-lowVal)/(highVal-lowVal)*100;
#### Slow StochasticsK ####
Ep = 2/(StoPeriod1+1);
if DINDEX >= StoPeriod and DayOfWeek(sdate) <= DayOfWeek(sdate[1]) and sdate > sdate[1] then {
DINDEX = DINDEX + 1;
PreStoK = StoK[1];
}
if DINDEX <= 1 then
StoK = StoFastK ;
else
StoK = StoFastK * EP + PreStoK * (1-EP);
#### Slow StochasticsD ####
Ep1 = 2/(StoPeriod2+1);
if DayOfWeek(sdate) <= DayOfWeek(sdate[1]) and sdate > sdate[1] then {
DINDEX = DINDEX + 1;
PreStoD = StoD[1];
}
if DINDEX <= 1 then
StoD = StoK ;
else
StoD = StoK * EP1 + PreStoD * (1-EP1);
plot1(StoK-PreStoK);
PlotBaseLine1(0);
즐거운 하루되세요
> 엠제이 님이 쓴 글입니다.
> 제목 : 부탁드립니다.
>
아래 수식을 30분봉과 일봉에 적용하고 싶습니다.
1. 주봉의 스토케스틱(5,3,3)을 표시하는 수식 부탁드리겠습니다.
2. 주봉의 스토케스틱(5,3,3)의 %K값을 전주와 현재주간의 차이값을
표시하는 수식 부탁드리겠습니다.
전주에 %K가 18이고 현주가 50인 경우 32가 나오면 됩니다.
늘 감사드립니다~
다음글
이전글