커뮤니티
문의드립니다
2012-02-03 22:26:19
478
글번호 47371
input : 분(30),Period(10), Period1(6), Period2(6);
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[20](0),LL[20](0);
var1 = TimeToMinutes(stime)%분;
if dayindex == 0 or var1 < var1[1] Then{
HH[0] = H;
LL[0] = L;
for cnt = 1 to 19{
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;
#### 특정 구간의 고가 [highest(H,Period)] ####
highVal = HH[0];
for count = 0 to Period-1 {
if HH[count] > highVal then
highVal = HH[count];
}
#### 특정 구간의 저가 [lowest(L,Period)] ####
lowVal = LL[0];
for count = 0 to Period-1 {
if LL[count] < lowVal then
lowVal = LL[count];
}
#### Fast StochasticsK ####
StoFastK = (C-lowVal)/(highVal-lowVal)*100; //Fast StochasticsK ==> (C-lowest(L,Period))/(highest(H,Period)-lowest(L,Period))*100
#### Slow StochasticsK ####
Ep = 2/(Period1+1);
if DINDEX >= Period and (date != date[1] or var1 < var1[1]) then {
DINDEX = DINDEX + 1;
PreStoK = StoK[1];
}
if DINDEX <= 1 then
StoK = StoFastK ;
else
StoK = StoFastK * EP + PreStoK * (1-EP); //Slow StochasticsK ==> ema(Fast StochasticsK, Period1)
#### Slow StochasticsD ####
Ep1 = 2/(Period2+1);
if date != date[1] or var1 < var1[1] then {
DINDEX = DINDEX + 1;
PreStoD = StoD[1];
}
if DINDEX <= 1 then
StoD = StoK ;
else
StoD = StoK * EP1 + PreStoD * (1-EP1); //Slow StochasticsD ==> ema(Slow StochasticsK, Period2)
plot1(StoK);
plot2(StoD);
고생 많으십니다
위 식은 분봉에서 보는 30분 스톡입니다
일전에 문의드렸었는데 제 질문이 좀 난해했던거 같아 다시 질문드립니다
위 지표의 강조식 수식을 부탁드립니다
StoK가 StoD를 상향돌파할 때의 첫봉
상향돌파하여 StoK와 StoD의 값의 차이가 5이상 벌어졌을때 첫봉
10이상 벌어졌을때 첫봉
그리고 상향돌파하고 StoK가 80이상 상향돌파했을때 첫봉에 각각 강조신호가 나오게 부탁드립니다
반대로 StoK가 StoD를 하향돌파할 때의 첫봉
하향돌파하여 StoK와 StoD의 값의 차이가 -5이상 벌어졌을때 첫봉
-10이상 벌어졌을때 첫봉
그리고 상향돌파하고 StoK가 20이하 하향돌파했을때 첫봉에 각각 강조신호가 나오게 부탁드립니다
모든 강조신호가 봉의 꼬리는 제외하고 몸통부분에만 색깔이 나오게 부탁드립니다
답변 1
예스스탁 예스스탁 답변
2012-02-06 14:16:55
안녕하세요
예스스탁입니다.
input : 분(30),Period(10), Period1(6), Period2(6);
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),diff(0);
Array : HH[20](0),LL[20](0);
var1 = TimeToMinutes(stime)%분;
if dayindex == 0 or var1 < var1[1] Then{
HH[0] = H;
LL[0] = L;
for cnt = 1 to 19{
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;
#### 특정 구간의 고가 [highest(H,Period)] ####
highVal = HH[0];
for count = 0 to Period-1 {
if HH[count] > highVal then
highVal = HH[count];
}
#### 특정 구간의 저가 [lowest(L,Period)] ####
lowVal = LL[0];
for count = 0 to Period-1 {
if LL[count] < lowVal then
lowVal = LL[count];
}
#### Fast StochasticsK ####
StoFastK = (C-lowVal)/(highVal-lowVal)*100; //Fast StochasticsK ==> (C-lowest(L,Period))/(highest(H,Period)-lowest(L,Period))*100
#### Slow StochasticsK ####
Ep = 2/(Period1+1);
if DINDEX >= Period and (date != date[1] or var1 < var1[1]) then {
DINDEX = DINDEX + 1;
PreStoK = StoK[1];
}
if DINDEX <= 1 then
StoK = StoFastK ;
else
StoK = StoFastK * EP + PreStoK * (1-EP); //Slow StochasticsK ==> ema(Fast StochasticsK, Period1)
#### Slow StochasticsD ####
Ep1 = 2/(Period2+1);
if date != date[1] or var1 < var1[1] then {
DINDEX = DINDEX + 1;
PreStoD = StoD[1];
}
if DINDEX <= 1 then
StoD = StoK ;
else
StoD = StoK * EP1 + PreStoD * (1-EP1); //Slow StochasticsD ==> ema(Slow StochasticsK, Period2)
diff = stok-stod;
if crossup(Stok,Stod) Then{
PlotPaintBar(C,O,"1",RED);
Condition1 = false;
Condition2 = false;
Condition3 = false;
}
if Condition1 == False and crossup(diff,5) Then{
PlotPaintBar(c,O,"1",RED);
Condition1 = True;
}
if Condition2 == False and crossup(diff,10) Then{
PlotPaintBar(c,O,"1",RED);
Condition2 = true;
}
if Condition3 == False and stok > stod and crossup(stok,80) Then{
PlotPaintBar(c,O,"1",RED);
Condition3 = true;
}
if CrossDown(Stok,Stod) Then{
PlotPaintBar(C,O,"1",blue);
Condition11 = false;
Condition12 = false;
Condition13 = false;
}
if Condition11 == False and CrossDown(diff,-5) Then{
PlotPaintBar(c,O,"1",blue);
Condition11 = True;
}
if Condition12 == False and crossdown(diff,10) Then{
PlotPaintBar(c,O,"1",blue);
Condition12 = true;
}
if Condition13 == False and stok < stod and CrossDown(stok,20) Then{
PlotPaintBar(c,O,"1",blue);
Condition13 = true;
}
즐거운 하루되세요
> cjfdk 님이 쓴 글입니다.
> 제목 : 문의드립니다
> input : 분(30),Period(10), Period1(6), Period2(6);
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[20](0),LL[20](0);
var1 = TimeToMinutes(stime)%분;
if dayindex == 0 or var1 < var1[1] Then{
HH[0] = H;
LL[0] = L;
for cnt = 1 to 19{
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;
#### 특정 구간의 고가 [highest(H,Period)] ####
highVal = HH[0];
for count = 0 to Period-1 {
if HH[count] > highVal then
highVal = HH[count];
}
#### 특정 구간의 저가 [lowest(L,Period)] ####
lowVal = LL[0];
for count = 0 to Period-1 {
if LL[count] < lowVal then
lowVal = LL[count];
}
#### Fast StochasticsK ####
StoFastK = (C-lowVal)/(highVal-lowVal)*100; //Fast StochasticsK ==> (C-lowest(L,Period))/(highest(H,Period)-lowest(L,Period))*100
#### Slow StochasticsK ####
Ep = 2/(Period1+1);
if DINDEX >= Period and (date != date[1] or var1 < var1[1]) then {
DINDEX = DINDEX + 1;
PreStoK = StoK[1];
}
if DINDEX <= 1 then
StoK = StoFastK ;
else
StoK = StoFastK * EP + PreStoK * (1-EP); //Slow StochasticsK ==> ema(Fast StochasticsK, Period1)
#### Slow StochasticsD ####
Ep1 = 2/(Period2+1);
if date != date[1] or var1 < var1[1] then {
DINDEX = DINDEX + 1;
PreStoD = StoD[1];
}
if DINDEX <= 1 then
StoD = StoK ;
else
StoD = StoK * EP1 + PreStoD * (1-EP1); //Slow StochasticsD ==> ema(Slow StochasticsK, Period2)
plot1(StoK);
plot2(StoD);
고생 많으십니다
위 식은 분봉에서 보는 30분 스톡입니다
일전에 문의드렸었는데 제 질문이 좀 난해했던거 같아 다시 질문드립니다
위 지표의 강조식 수식을 부탁드립니다
StoK가 StoD를 상향돌파할 때의 첫봉
상향돌파하여 StoK와 StoD의 값의 차이가 5이상 벌어졌을때 첫봉
10이상 벌어졌을때 첫봉
그리고 상향돌파하고 StoK가 80이상 상향돌파했을때 첫봉에 각각 강조신호가 나오게 부탁드립니다
반대로 StoK가 StoD를 하향돌파할 때의 첫봉
하향돌파하여 StoK와 StoD의 값의 차이가 -5이상 벌어졌을때 첫봉
-10이상 벌어졌을때 첫봉
그리고 상향돌파하고 StoK가 20이하 하향돌파했을때 첫봉에 각각 강조신호가 나오게 부탁드립니다
모든 강조신호가 봉의 꼬리는 제외하고 몸통부분에만 색깔이 나오게 부탁드립니다
다음글