纏中說禪板塊強弱指標的實現（具體代碼）

關於該指標的說明詳見：《纏中說禪板塊強弱指標的實現》

 

簡述：

選用以斐波那契數列5，13，21，34，55，89，144，233為參數的均線構成均線系統，用該系統建立一個完全的分類去判斷走勢的強弱與先后。股價位於所有均線之上為第9類，為最強走勢[注：最強走勢不一定完全在均線之上，這里進行了簡化處理]；股價在所有均線之下為最弱走勢，為第1類；之間根據站上均線的數量，依次為2-8類。

 

---

 

同花順公式：

/*纏板強弱*/
CNT:=1;

IF (CLOSE > MA(CLOSE,5))
    CNT := CNT +1;
IF (CLOSE > MA(CLOSE,13))
    CNT := CNT +1;
IF (CLOSE > MA(CLOSE,21))
    CNT := CNT +1;
IF (CLOSE > MA(CLOSE,34))
    CNT := CNT +1;
IF (CLOSE > MA(CLOSE,55))
    CNT := CNT +1;
IF (CLOSE > MA(CLOSE,89))
    CNT := CNT +1;
IF (CLOSE > MA(CLOSE,144))
    CNT := CNT +1;
IF (CLOSE > MA(CLOSE,233))
    CNT := CNT +1;
    

CBQR: CNT;

/*2014/7/17 via tangyikejun*/

 

大智慧公式：

{纏板強弱}
VARIABLE: CNT=1;
VARIABLE: MOVA[10]=1;


MOVA[1]:=MA(CLOSE,5); {5日收盤均線}
MOVA[2]:=MA(CLOSE,13); 
MOVA[3]:=MA(CLOSE,21); 
MOVA[4]:=MA(CLOSE,34); 
MOVA[5]:=MA(CLOSE,55); 
MOVA[6]:=MA(CLOSE,89); 
MOVA[7]:=MA(CLOSE,144); 
MOVA[8]:=MA(CLOSE,233); 

BEGIN
    
CNT:=1;
FOR I = 1 TO 8 DO
IF(CLOSE>MOVA[I])
THEN CNT:=CNT+1;

END

CBQR: CNT;

{2014/7/16 via tangyikejun};

 

效果圖：

歡迎大家踴躍留言，友情互動！

 

轉載請注明出處：http://www.cnblogs.com/tangyikejun/p/3854607.html