奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- ]請問大大可以幫忙把這公是改成奇狐用指標? (http://www.chiefox.com.tw/bbs/showthread.php?threadid=16604)

]請問大大可以幫忙把這公是改成奇狐用指標?

請問大大可以幫忙把這公是改成奇狐用指標?

input : K(Numeric),
Max_per(Numeric)

Var : Trend(Close), Period(0)

// Trend Calculation //

Value1 = IntraDayMultipier

Condition1 = (Close >= Trend) // UpTrend
Condition2 = (Close < Trend) // DownTrend

If ((Close Cross over Trend) or (Close Cross Below Trend)) Then
Period = 0
End If

If Period < Max_per Then

If Condition1 Then
Period = Period + 1
Trend = HighestValue(Close, Period) * (1 - (K / 100) / Value1)
End If

If Condition2 Then
Period = Period + 1
Trend = LowestValue(Close, Period) * (1 + (K / 100) / Value1)
End If

Else

If Condition1 Then
Trend = HighestValue(Close, Max_per) * (1 - (K / 100) / Value1)
End If

If Condition2 Then
Trend = LowestValue(Close, Max_per) * (1 + (K / 100) / Value1)
End if
End If

NRTR = Trend

回覆: ]請問大大可以幫忙把這公是改成奇狐用指標?

引用:

---

最初由 cvking888 發表
請問大大可以幫忙把這公是改成奇狐用指標?

input : K(Numeric),
Max_per(Numeric)

Var : Trend(Close), Period(0)

// Trend Calculation //

Value1 = IntraDayMultipier

Condition1 = (Close >= Trend) // UpTrend
Condition2 = (Close < Trend) // DownTrend

If ((Close Cross over Trend) or (Close Cross Below Trend)) Then
Period = 0
End If

If Period < Max_per Then

If Condition1 Then
Period = Period + 1
Trend = HighestValue(Close, Period) * (1 - (K / 100) / Value1)
End If

If Condition2 Then
Period = Period + 1
Trend = LowestValue(Close, Period) * (1 + (K / 100) / Value1)
End If

Else

If Condition1 Then
Trend = HighestValue(Close, Max_per) * (1 - (K / 100) / Value1)
End If

If Condition2 Then
Trend = LowestValue(Close, Max_per) * (1 + (K / 100) / Value1)
End if
End If

NRTR = Trend

---