커뮤니티
지표식 부탁 드립니다
2015-08-10 14:43:26
156
글번호 89336
1)
2분 차트에서
10분 차트의 전봉 스토캐스틱 종가값을 알고 싶습니다
10분 전봉 종가
스토캐스틱 K값이 D값보다 크면 빨강 작으면 파랑
즉 10분봉이 생기면 2분봉 5개에 변하지 않는
10분 전봉 스톡값을 2분 차트에 구현시키고 싶습니다
2)
2분 차트에서
10분 차트의 전봉 스토캐스틱 종가값을 알고 싶습니다
10분 전봉 종가
스토캐스틱 K값이 기준값보다 크면 빨강 작으면 파랑
즉 10분봉이 생기면 2분봉 5개에 변하지 않는
10분 전봉 스톡값을 2분 차트에 구현시키고 싶습니다
3)
2분에서
2분봉 5개에 변하지 않는
10분 전봉 종가상 5이평과 10이평 크로스 상태를 2분 차트에 구현시키고 싶습니다
골드 빨강 데드 파랑
2분 차트에 2분봉 5개마다
변하지 않는 10분 전봉 스톡과 이평 크로스 상태를 구현시켜 주세요^^
더운날 건강 잘 챙기시기를
미리 감사 드립니다
답변 1
예스스탁 예스스탁 답변
2015-08-10 18:34:01
안녕하세요
예스스탁입니다.
1.
input : Atime1(10),Sto1(5), Sto2(3), Sto3(3);
var : TF1(0),TF2(0),Ep1(0), EP2(0),cnt(0);
var : hVal1(0), lVal1(0), StoFastK(0), StoK(0), StoD(0);
var : JISU(0), DINDEX(0), PreStoK(0), PreStoD(0);
Array : H1[50](0),L1[50](0);
TF1 = TimeToMinutes(stime)%Atime1;
Ep1 = 2/(Sto2+1);
Ep2 = 2/(Sto3+1);
if dayindex == 0 or (TF1 < TF1[1] and stime > stime[1]) or (stime > 150500) Then{
H1[0] = H;
L1[0] = L;
for cnt = 1 to 49{
H1[cnt] = H1[cnt-1][1];
L1[cnt] = L1[cnt-1][1];
}
DINDEX = DINDEX + 1;
PreStoK = StoK[1];
PreStoD = StoD[1];
}
if H > H1[0] Then
H1[0] = H;
if L < L1[0] Then
L1[0] = L;
if H1[Sto1] > 0 Then{
hVal1 = H1[0];
lVal1 = L1[0];
for cnt = 0 to sto1-1 {
if H1[cnt] > hVal1 then
hVal1 = H1[cnt];
if L1[cnt] < lval1 then
LVal1 = L1[cnt];
}
StoFastK = (C-lVal1)/(hVal1-lVal1)*100;
if DINDEX <= 1 then{
StoK = StoFastK ;
StoD = StoK ;
}
else{
StoK = StoFastK * EP1 + PreStoK * (1-EP1);
StoD = StoK * EP2 + PreStoD * (1-EP2);
}
if preStok > PreStoD then{
plot1(preStok,"k",RED);
}
Else{
plot1(preStok,"k",blue);
}
plot2(PreStoD,"d",BLACK);
PlotBaseLine1(20);
PlotBaseLine2(80);
}
2.
input : Atime1(10),Sto1(5), Sto2(3), Sto3(3);
var : TF1(0),TF2(0),Ep1(0), EP2(0),cnt(0);
var : hVal1(0), lVal1(0), StoFastK(0), StoK(0), StoD(0);
var : JISU(0), DINDEX(0), PreStoK(0), PreStoD(0);
Array : H1[50](0),L1[50](0);
TF1 = TimeToMinutes(stime)%Atime1;
Ep1 = 2/(Sto2+1);
Ep2 = 2/(Sto3+1);
if dayindex == 0 or (TF1 < TF1[1] and stime > stime[1]) or (stime > 150500) Then{
H1[0] = H;
L1[0] = L;
for cnt = 1 to 49{
H1[cnt] = H1[cnt-1][1];
L1[cnt] = L1[cnt-1][1];
}
DINDEX = DINDEX + 1;
PreStoK = StoK[1];
PreStoD = StoD[1];
}
if H > H1[0] Then
H1[0] = H;
if L < L1[0] Then
L1[0] = L;
if H1[Sto1] > 0 Then{
hVal1 = H1[0];
lVal1 = L1[0];
for cnt = 0 to sto1-1 {
if H1[cnt] > hVal1 then
hVal1 = H1[cnt];
if L1[cnt] < lval1 then
LVal1 = L1[cnt];
}
StoFastK = (C-lVal1)/(hVal1-lVal1)*100;
if DINDEX <= 1 then{
StoK = StoFastK ;
StoD = StoK ;
}
else{
StoK = StoFastK * EP1 + PreStoK * (1-EP1);
StoD = StoK * EP2 + PreStoD * (1-EP2);
}
if preStok > 0 then{
plot1(preStok,"k",RED);
}
Else{
plot1(preStok,"k",blue);
}
plot2(PreStoD,"d",BLACK);
PlotBaseLine1(20);
PlotBaseLine2(80);
}
3.
input : Atime(10),P1(5),P2(10);
var : TF(0),cnt(0),sum1(0),mav1(0),sum2(0),mav2(0);
Array : CC[100](0);
TF = TimeToMinutes(stime)%Atime;
if dayindex() == 0 or (TF < TF[1] and stime > stime[1]) or stime > 150500 Then{
for cnt = 1 to 99{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[P2] > 0 then{
sum1 = 0;
sum2 = 0;
for cnt = 1 to P2{
if cnt <= P1 Then
sum1 = sum1+CC[cnt];
if cnt <= P2 Then
sum2 = sum2+CC[cnt];
}
mav1 = sum1/P1;
mav2 = sum2/P2;
if mav1 > mav2 Then{
plot1(mav1,"이평1",red);
plot2(mav2,"이평2",red);
}
else{
plot1(mav1,"이평1",blue);
plot2(mav2,"이평2",blue);
}
}
즐거운 하루되세요
> starj5 님이 쓴 글입니다.
> 제목 : 지표식 부탁 드립니다
> 1)
2분 차트에서
10분 차트의 전봉 스토캐스틱 종가값을 알고 싶습니다
10분 전봉 종가
스토캐스틱 K값이 D값보다 크면 빨강 작으면 파랑
즉 10분봉이 생기면 2분봉 5개에 변하지 않는
10분 전봉 스톡값을 2분 차트에 구현시키고 싶습니다
2)
2분 차트에서
10분 차트의 전봉 스토캐스틱 종가값을 알고 싶습니다
10분 전봉 종가
스토캐스틱 K값이 기준값보다 크면 빨강 작으면 파랑
즉 10분봉이 생기면 2분봉 5개에 변하지 않는
10분 전봉 스톡값을 2분 차트에 구현시키고 싶습니다
3)
2분에서
2분봉 5개에 변하지 않는
10분 전봉 종가상 5이평과 10이평 크로스 상태를 2분 차트에 구현시키고 싶습니다
골드 빨강 데드 파랑
2분 차트에 2분봉 5개마다
변하지 않는 10분 전봉 스톡과 이평 크로스 상태를 구현시켜 주세요^^
더운날 건강 잘 챙기시기를
미리 감사 드립니다