커뮤니티
문의 드립니다.
2012-12-24 15:34:23
268
글번호 57545
연결선물 1분봉차트를 사용합니다.
Stochastic을 지표로 사용합니다.
그럼 1분봉에 대한 Stochastic이 나오는데요.
그외에 1분봉차트에서 5분봉, 10분봉 Stochastic 그래프도 같이 보고 싶습니다.
감사합니다.
답변 1
예스스탁 예스스탁 답변
2012-12-26 11:25:24
안녕하세요
예스스탁입니다
input : Atime1(5),Atime2(10),StoPeriod(10), StoPeriod1(5), StoPeriod2(5);
var : count1(0), highVal1(0), lowVal1(0), StoFastK1(0), StoK1(0), StoD1(0);
var : Ep11(0), EP12(0), JISU1(0), Dindex1(0), PreStoK1(0), PreStoD1(0),cnt1(0);
Array : HH1[20](0),LL1[20](0);
var : count2(0), highVal2(0), lowVal2(0), StoFastK2(0), StoK2(0), StoD2(0);
var : Ep21(0), EP22(0), JISU2(0), Dindex2(0), PreStoK2(0), PreStoD2(0),cnt2(0);
Array : HH2[20](0),LL2[20](0);
var1 = TimeToMinutes(stime)%Atime1;
if dayindex == 0 or var1 < var1[1] Then{
HH1[0] = H;
LL1[0] = L;
for cnt1 = 1 to 19{
HH1[cnt1] = HH1[cnt1-1][1];
LL1[cnt1] = LL1[cnt1-1][1];
}
}
if H > HH1[0] Then
HH1[0] = H;
if L < LL1[0] Then
LL1[0] = L;
highVal1 = HH1[0];
for count1 = 0 to StoPeriod-1 {
if HH1[count1] > highVal1 then
highVal1 = HH1[count1];
}
lowVal1 = LL1[0];
for count1 = 0 to StoPeriod-1 {
if LL1[count1] < lowVal1 then
lowVal1 = LL1[count1];
}
StoFastK1 = (C-lowVal1)/(highVal1-lowVal1)*100;
Ep11 = 2/(StoPeriod1+1);
if Dindex1 >= StoPeriod and (date != date[1] or var1 < var1[1]) then {
Dindex1 = Dindex1 + 1;
PreStoK1 = StoK1[1];
}
if Dindex1 <= 1 then
StoK1 = StoFastK1 ;
else
StoK1 = StoFastK1 * EP11 + PreStoK1 * (1-EP11);
Ep12 = 2/(StoPeriod2+1);
if date != date[1] or var1 < var1[1] then {
Dindex1 = Dindex1 + 1;
PreStoD1 = StoD1[1];
}
if Dindex1 <= 1 then
StoD1 = StoK1 ;
else
StoD1 = StoK1 * EP12 + PreStoD1 * (1-EP12);
var2 = TimeToMinutes(stime)%Atime2;
if dayindex == 0 or var2 < var2[1] Then{
HH2[0] = H;
LL2[0] = L;
for cnt2 = 1 to 19{
HH2[cnt2] = HH2[cnt2-1][1];
LL2[cnt2] = LL2[cnt2-1][1];
}
}
if H > HH2[0] Then
HH2[0] = H;
if L < LL2[0] Then
LL2[0] = L;
highVal2 = HH2[0];
for count2 = 0 to StoPeriod-1 {
if HH2[count2] > highVal2 then
highVal2 = HH2[count2];
}
lowVal2 = LL2[0];
for count2 = 0 to StoPeriod-1 {
if LL2[count2] < lowVal2 then
lowVal2 = LL2[count2];
}
StoFastK2 = (C-lowVal2)/(highVal2-lowVal2)*100;
Ep21 = 2/(StoPeriod1+1);
if Dindex2 >= StoPeriod and (date != date[1] or var2 < var2[1]) then {
Dindex2 = Dindex2 + 1;
PreStoK2 = StoK2[1];
}
if Dindex2 <= 1 then
StoK2 = StoFastK2 ;
else
StoK2 = StoFastK2 * EP21 + PreStoK2 * (1-EP21);
Ep22 = 2/(StoPeriod2+1);
if date != date[1] or var2 < var2[1] then {
Dindex2 = Dindex2 + 1;
PreStoD2 = StoD2[1];
}
if Dindex2 <= 1 then
StoD2 = StoK2 ;
else
StoD2 = StoK2 * EP22 + PreStoD2 * (1-EP22);
plot1(StochasticsK(StoPeriod,StoPeriod1));
plot2(StochasticsD(StoPeriod,StoPeriod1,StoPeriod2));
plot3(StoK1);
plot4(StoD1);
plot5(StoK2);
plot6(StoD2);
PlotBaseLine1(20);
PlotBaseLine2(80);
즐거운 하루되세요
> 무료한나날 님이 쓴 글입니다.
> 제목 : 문의 드립니다.
> 연결선물 1분봉차트를 사용합니다.
Stochastic을 지표로 사용합니다.
그럼 1분봉에 대한 Stochastic이 나오는데요.
그외에 1분봉차트에서 5분봉, 10분봉 Stochastic 그래프도 같이 보고 싶습니다.
감사합니다.