커뮤니티
산식 수정요망
2011-03-15 01:08:40
820
글번호 36559
화일참조요
- 1. 질문01.xls (0.11 MB)
답변 1
예스스탁 예스스탁 답변
2011-03-15 15:02:31
안녕하세요
예스스탁입니다.
C와 같이 식을 작성해서 B와 같이 표현하고자 하시면
C와 B의 식에서 다른 부분은 B부분에서 주석으로 처리한 부분 뿐입니다.
즉 C 수식에서 2구간에 값이 도출되는 것은 B에서 주석으로 처리한 부분에서
나오는 것이므로 아래와 같이 작성하시거나 혹은 해당 부분이 없는것과 별로 다르지 않습니다.
var : J(0),SD05(0),SD30(0),SD40(0),SK05(0),SK30(0),SK40(0),MA05(0);
MA05 = ma(C,5);
SD05 = StochasticsD(5,3,3); SK05 = StochasticsK(5,3);
SD40 = StochasticsD(40,24,24); SK40 = StochasticsK(40,24);
SD30 = StochasticsD(30,18,18); SK30 = StochasticsK(30,18);
Array : SHV05[5](0),SHI05[5](0),SHM05[5](0), HHV05[5](0),HHI05[5](0);
Array : SLV05[5](0),SLI05[5](0),SLM05[5](0), LLV05[5](0),LLI05[5](0);
var : SHCnt05(0),SLCnt05(0);
if SD05[2]<SD05[1] and SD05[1]>SD05[0] Then {
SHV05[0] = SD05[1]; SHI05[0] = index[1];
SHM05[0] = MA(C,05); SHcnt05 = SHCnt05+1;
For J=1 to 4 {
SHV05[J] = SHV05[J-1][1];
SHM05[J] = SHM05[J-1][1];
SHI05[J] = SHI05[J-1][1];
}
}
If SD05[2]>SD05[1] and SD05[1]<SD05[0] Then {
SLV05[0] = SD05[1]; SLI05[0] = index[1];
SLM05[0] = MA(C,05); SHcnt05 = SHCnt05+1;
For J=1 to 4 {
SLV05[J] = SLV05[J-1][1];
SLM05[J] = SLM05[J-1][1];
SLI05[J] = SLI05[J-1][1];
}
}
Array : SHV30[5](0),SHI30[5](0),SHM30[5](0), HHV30[5](0),HHI30[5](0);
Array : SLV30[5](0),SLI30[5](0),SLM30[5](0), LLV30[5](0),LLI30[5](0);
var : SHCnt30(0),SLCnt30(0);
if SD30[2]<SD30[1] and SD30[1]>SD30[0] Then {
SHV30[0] = SD30[1]; SHI30[0] = index[1];
SHM30[0] = MA(C,05); SHcnt30 = SHCnt30+1;
For J=1 to 4 {
SHV30[J] = SHV30[J-1][1];
SHM30[J] = SHM30[J-1][1];
SHI30[J] = SHI30[J-1][1];
}
}
If SD30[2]>SD30[1] and SD30[1]<SD30[0] Then {
SLV30[0] = SD30[1]; SLI30[0] = index[1];
SLM30[0] = MA(C,05); SHcnt30 = SHCnt30+1;
For J=1 to 4 {
SLV30[J] = SLV30[J-1][1];
SLM30[J] = SLM30[J-1][1];
SLI30[J] = SLI30[J-1][1];
}
}
Array : SHV40[5](0),SHI40[5](0),SHM40[5](0), HHV40[5](0),HHI40[5](0);
Array : SLV40[5](0),SLI40[5](0),SLM40[5](0), LLV40[5](0),LLI40[5](0);
var : SHCnt40(0),SLCnt40(0);
if SD40[2]<SD40[1] and SD40[1]>SD40[0] Then {
SHV40[0] = SD40[1]; SHI40[0] = index[1];
SHM40[0] = MA(C,05); SHcnt40 = SHCnt40+1;
For J=1 to 4 {
SHV40[J] = SHV40[J-1][1];
SHM40[J] = SHM40[J-1][1];
SHI40[J] = SHI40[J-1][1];
}
}
If SD40[2]>SD40[1] and SD40[1]<SD40[0] Then {
SLV40[0] = SD40[1]; SLI40[0] = index[1];
SLM40[0] = MA(C,05); SHcnt40 = SHCnt40+1;
For J=1 to 4 {
SLV40[J] = SLV40[J-1][1];
SLM40[J] = SLM40[J-1][1];
SLI40[J] = SLI40[J-1][1];
}
}
############
#신호 #####################################################
############
var :Filter01(0),Filter02(0),Filter03(0),Filter04(0),Filter05(0),Filter06(0),Filter07(0),Filter08(0),Filter09(0),Filter10(0);
Var7=0;
Var8=0;
#기본신호
If SLV05[1]<SHV05[0] and SHV05[0]>SLV05[0] and SLV05[1]<SLV05[0] and
Index<=SLI05[0]+1 Then
Var7=50;
If SLV30[1]<SHV30[0] and SHV30[0]>SLV30[0] and SLV30[1]<SLV30[0] and
Index<=SLI30[0]+1 Then
Var7=55;
If SLV40[1]<SHV40[0] and SHV40[0]>SLV40[0] and SLV40[1]<SLV40[0] and
Index<=SLI40[0]+1 Then
Var7=60;
#---------------------------------
#Filter
{If var7==55 then
Filter04=1;
If CrossDown(SK30,SD30) Then
Filter04=-1; }
{If var7==60 then
Filter05=1;
If CrossDown(SK40,SD40) Then
Filter05=-1; }
if Filter04==-1 and Filter05==-1 then {
If SHV05[1]>SLV05[0] and SLV05[0]<SHV05[0] and SHV05[1]>SHV05[0] and
Index<=SHI05[0]+1 Then
Var8=-50;
}
if Filter05==-1 then {
If SHV05[1]>SLV05[0] and SLV05[0]<SHV05[0] and SHV05[1]>SHV05[0] and
Index<=SHI05[0]+1 Then
Var8=-50; //Filter03=0;
}
plot1(Var8);
즐거운 하루되세요
> 티끌 님이 쓴 글입니다.
> 제목 : 산식 수정요망
> 화일참조요
다음글
이전글