四周規則能寫成VBA模板嗎，方便大家學習　[金字塔]

四周規則能寫成VBA模板嗎，方便大家學習

HHN：=ref(HHV(HIGH,20),1)；
HLN：=ref(LLV(LOW,20),1)；

IF H>=HHN then
begin
sellshort(holding<0,0,thisclose);
buy(holding=0,1,thisclose);
end

IF L<=HLN then
begin
sell(holding>0,0,thisclose);
buyshort(holding=0,1,thisclose);
end

有必要嗎

圖表可以實現 VBA還要寫一遍。

任何策略都可以用VBA來實現，只是代碼量比后臺或圖表策略大的多，調試也需要較長的時間。

如果只是單純的實現開平倉的目的，沒有必要使用VBa來做的。

強Sub ForWeekRule
 dim code
 dim market
 dim cyctype
 dim highest
 dim lowest
 
 code="RU00"
 market="SQ"
 cyctype=5
 
 set historydata =marketdata.GetHistoryData(code,market,cyctype)
 for i=historydata.count-22 to historydata-2
  if historydata.high(i)>highest then
   highest=historydata.high(i)
  end if
  
  if historydata.low(i)<lowest then
   lowest=historydata.low(i)
  end if
 next
 
 if historydata(historydata.count-1)>highest then
  order.buyshort 1,1,0,0,code,market,0,0
  order.buy 1,1,0,0,code,market,0,0
 end if
 
 if historydata(historydata.count-2)<lowest then
  order.SellShort 1,1,0,0,code,market,0,0
  order.sell 1,1,0,0,code,market,0,0
 end if
end sub