커뮤니티
지표식 문의
2018-10-18 21:54:34
140
글번호 122816
안녕하세요
dipuls와 diminus의 풀어쓴 식을 필요로 합니다.
풀어쓴 식과 더불어 예를 들어 a라는 지표값을 대입할 수 있기 쉽도록 해주시면 더욱 좋구요..
답변 1
예스스탁 예스스탁 답변
2018-10-19 10:55:04
안녕하세요
예스스탁입니다.
1.
Inputs: Length(14) ;
var : Counter(0), TRange(0), MyRange(Length), PlusDM14(0), PlusDM(0), MinusDM(0),
MinusDM14(0),PDM(0),MDM(0),DP(0),DM(0);
If CurrentBar == 1 Then
{
MyRange = Length;
DP = 0;
DM = 0;
PlusDM14 = 0;
MinusDM14 = 0;
TRange = 0;
For Counter = 0 To MyRange - 1
{
If High[Counter] - High[Counter+1] < 0 Then
PlusDM = 0;
Else
PlusDM = High[Counter] - High[Counter+1];
If Low[Counter+1] - Low[Counter] < 0 Then
MinusDM = 0;
Else
MinusDM = Low[Counter+1] - Low[Counter];
PDM = PlusDM;
MDM = MinusDM;
If MDM >= PDM Then
PlusDM = 0;
If PDM >= MDM Then
MinusDM = 0;
TRange = TRange + TrueRange[Counter];
PlusDM14 = PlusDM14 + PlusDM;
MinusDM14 = MinusDM14 + MinusDM;
}
If TRange <> 0 Then
{
DP = 100 * PlusDM14 / TRange;
DM = 100 * MinusDM14 / TRange;
}
Else
{
DP = 0;
DM = 0;
}
}
Else If CurrentBar > 1 Then
{
If High[0] - High[1] < 0 Then
PlusDM = 0;
Else
PlusDM = High[0] - High[1];
If Low [1] - Low [0] < 0 Then
MinusDM = 0;
Else
MinusDM = Low[1] - Low[0];
PDM = PlusDM;
MDM = MinusDM;
If MDM >= PDM Then
PlusDM = 0;
If PDM >= MDM Then
MinusDM = 0 ;
If MyRange > 0 Then
{
TRange = TRange - (TRange / MyRange) + TrueRange;
PlusDM14 = PlusDM14 - (PlusDM14 / MyRange) + PlusDM;
MinusDM14 = MinusDM14 - (MinusDM14 / MyRange) + MinusDM;
}
If TRange <> 0 Then
{
DP = 100 * PlusDM14 / TRange;
DM = 100 * MinusDM14 / TRange;
}
Else
{
DP = 0;
DM = 0;
}
}
plot1(DP);
plot3(DM);
2
Inputs: Length(14) ;
var : Counter(0), TRange(0), MyRange(Length), PlusDM14(0), PlusDM(0), MinusDM(0),
MinusDM14(0),PDM(0),MDM(0),DP(0),DM(0),value(0);
value = ma(c,5);//지표값
If CurrentBar == 1 Then
{
MyRange = Length;
DP = 0;
DM = 0;
PlusDM14 = 0;
MinusDM14 = 0;
TRange = 0;
For Counter = 0 To MyRange - 1
{
If value[Counter] - value[Counter+1] < 0 Then
PlusDM = 0;
Else
PlusDM = value[Counter] - value[Counter+1];
If value[Counter+1] - value[Counter] < 0 Then
MinusDM = 0;
Else
MinusDM = value[Counter+1] - value[Counter];
PDM = PlusDM;
MDM = MinusDM;
If MDM >= PDM Then
PlusDM = 0;
If PDM >= MDM Then
MinusDM = 0;
TRange = TRange + TrueRange[Counter];
PlusDM14 = PlusDM14 + PlusDM;
MinusDM14 = MinusDM14 + MinusDM;
}
If TRange <> 0 Then
{
DP = 100 * PlusDM14 / TRange;
DM = 100 * MinusDM14 / TRange;
}
Else
{
DP = 0;
DM = 0;
}
}
Else If CurrentBar > 1 Then
{
If value[0] - value[1] < 0 Then
PlusDM = 0;
Else
PlusDM = value[0] - value[1];
If value [1] - value [0] < 0 Then
MinusDM = 0;
Else
MinusDM = value[1] - value[0];
PDM = PlusDM;
MDM = MinusDM;
If MDM >= PDM Then
PlusDM = 0;
If PDM >= MDM Then
MinusDM = 0 ;
If MyRange > 0 Then
{
TRange = TRange - (TRange / MyRange) + TrueRange;
PlusDM14 = PlusDM14 - (PlusDM14 / MyRange) + PlusDM;
MinusDM14 = MinusDM14 - (MinusDM14 / MyRange) + MinusDM;
}
If TRange <> 0 Then
{
DP = 100 * PlusDM14 / TRange;
DM = 100 * MinusDM14 / TRange;
}
Else
{
DP = 0;
DM = 0;
}
}
plot1(DP);
plot3(DM);
즐거운 하루되세요
> 한글나라 님이 쓴 글입니다.
> 제목 : 지표식 문의
> 안녕하세요
dipuls와 diminus의 풀어쓴 식을 필요로 합니다.
풀어쓴 식과 더불어 예를 들어 a라는 지표값을 대입할 수 있기 쉽도록 해주시면 더욱 좋구요..
다음글
이전글