缠中说禅板块强弱指标的实现（具体代码）

简述：

选用以斐波那契数列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

作者：tangyikejun

出处：http://www.cnblogs.com/tangyikejun/

本文采用知识共享署名-非商业性使用-相同方式共享 4.0 国际许可协议进行许可，欢迎转载，但未经作者同意必须保留此段声明，且在文章页面明显位置给出原文连接。