COCO研究院

 找回密碼
 註冊
搜索
查看: 35184|回復: 1

請教hts高手-hts4050選出40天曾發生過擠壓現象,且目前的帶...

[複製鏈接]
發表於 18-1-9 14:22 | 顯示全部樓層 |閱讀模式
我想利用hts4050,寫一個布林通道發生擠壓的選股程式。 依據John Bollinger對擠壓所下的定義: 當帶寬指標下降到六個月以來的最低水準,就視為產生擠壓現象。底下的程式碼已能在hts4050選出正在發生擠壓的股票(即帶寬指標下降到六個月的最低水準),但如何才能選出40天曾發生過擠壓現象,且目前的帶寬還沒超過最小帶寬的3倍?

//該程式碼已能選出正在發生擠壓的股票,其中bandwidth_MY只是將hts內建的BollingerBands指標改成函數型態
Parameter: squeeze_PER(180)
Variables:n(0),i(1)
Array: bwcell[180](0)
//必須與上面的squeeze_PER參數一起修改後編譯

Value1 = bandwidth_MY(Close)
For n = 0 to squeeze_PER-1
  bwcell[n]=Value1[n]
End For
Value2 = bwcell[0]//找尋陣列中的最小值
For i = 1 To squeeze_PER-1
If Value2 > bwcell[i] Then
   Value2 = bwcell[i]
End If
End For

Condition1 = Value1 = Value2
If Condition1 Then
FindPoint1( Value1, BottomSide, "擠壓開始")
End if

評分

參與人數 1金錢 +2 收起 理由
cukie + 2 感謝分享

查看全部評分

 樓主| 發表於 18-1-25 08:59 | 顯示全部樓層
底下程式可找到前40天曾發生過擠壓的股票

Parameter: squeeze_PER(120), beforeSqu(40)
Variables:i(1),j(0)

Value1 = bandwidth_MY(Close)

Value2 = Value1[0]//找尋最小值
For i = 1 To squeeze_PER-1
        If Value2 > Value1[i] Then
          Value2 = Value1[i]
        End If
End For


Condition1 = Value1 = Value2

For j = 0 To beforeSqu
If Condition1[j] Then
  FindPoint1( Value1, BottomSide, "擠壓開始")
End if
End For
您需要登錄後才可以回帖 登錄 | 註冊

本版積分規則

手機版|Archiver|站長信箱|廣告洽詢|COCO研究院

GMT+8, 24-11-22 21:45

Powered by Discuz! X3.4

Copyright © 2001-2023, Tencent Cloud.

快速回復 返回頂部 返回列表
理財討論網站 |