这是以前在一个不错的**淘到的公式，公式本身加密，所以无法给出源码。喜欢的可以试试，我觉得还不错。
{主力乾坤指标}
VAR1:=EMA(CLOSE,12)-EMA(CLOSE,26);
VAR2:=EMA(VAR1,9);
VAR3:=2*(VAR1-VAR2);
VAR4:=EMA(CLOSE,5);
VAR5:=EMA(CLOSE,10);
VAR6:=EMA(CLOSE,20);
VAR7:=EMA(CLOSE,30);
VAR8:=EMA(CLOSE,60);
VAR9:=EMA(CLOSE,120);
VAR10:=EMA(CLOSE,250);
VAR11:=IF(VAR4>=REF(VAR4,1),VAR4,DRAWNULL);
VAR12:=IF(VAR5>=REF(VAR5,1),VAR5,DRAWNULL);
VAR13:=IF(VAR6>=REF(VAR6,1),VAR6,DRAWNULL);
VAR14:=IF(VAR7>=REF(VAR7,1),VAR7,DRAWNULL);
VAR15:=IF(VAR8>=REF(VAR8,1),VAR8,DRAWNULL);
VAR16:=IF(VAR9>=REF(VAR9,1),VAR9,DRAWNULL);
VAR17:=IF(VAR10>=REF(VAR10,1),VAR10,DRAWNULL);
VAR18:=IF(VAR4<REF(VAR4,1),VAR4,DRAWNULL);
VAR19:=IF(VAR5<REF(VAR5,1),VAR5,DRAWNULL);
VAR20:=IF(VAR6<REF(VAR6,1),VAR6,DRAWNULL);
VAR21:=IF(VAR7<REF(VAR7,1),VAR7,DRAWNULL);
VAR22:=IF(VAR8<REF(VAR8,1),VAR8,DRAWNULL);
VAR23:=IF(VAR9<REF(VAR9,1),VAR9,DRAWNULL);
VAR24:=IF(VAR10<REF(VAR10,1),VAR10,DRAWNULL);
VAR25:=VOL/CAPITAL*100;
VAR26:=MA(VAR25,5);
VAR27:=MA(VAR25,10);
VAR28:=MA(VAR25,20);
VAR29:=IF(VAR26>=REF(VAR26,1),VAR26,DRAWNULL);
VAR30:=IF(VAR27>=REF(VAR27,1),VAR27,DRAWNULL);
VAR31:=IF(VAR28>=REF(VAR28,1),VAR28,DRAWNULL);
VAR32:=IF(VAR26<REF(VAR26,1),VAR26,DRAWNULL);
VAR33:=IF(VAR27<REF(VAR27,1),VAR27,DRAWNULL);
VAR34:=IF(VAR28<REF(VAR28,1),VAR28,DRAWNULL);
VAR35:=EMA(CLOSE,3);
VAR36:=EMA(CLOSE,8);
VAR37:=EMA(CLOSE,13);
VAR38:=EMA(CLOSE,21);
VAR39:=EMA(CLOSE,34);
VAR40:=EMA(CLOSE,55);
VAR41:=EMA(CLOSE,89);
VAR42:=EMA(CLOSE,144);
VAR43:=EMA(CLOSE,233);
VAR44:=IF(VAR35>=REF(VAR35,1),VAR35,DRAWNULL);
VAR45:=IF(VAR36>=REF(VAR36,1),VAR36,DRAWNULL);
VAR46:=IF(VAR37>=REF(VAR37,1),VAR37,DRAWNULL);
VAR47:=IF(VAR38>=REF(VAR38,1),VAR38,DRAWNULL);
VAR48:=IF(VAR39>=REF(VAR39,1),VAR39,DRAWNULL);
VAR49:=IF(VAR40>=REF(VAR40,1),VAR40,DRAWNULL);
VAR50:=IF(VAR41>=REF(VAR41,1),VAR41,DRAWNULL);
VAR51:=IF(VAR42>=REF(VAR42,1),VAR42,DRAWNULL);
VAR52:=IF(VAR43>=REF(VAR43,1),VAR43,DRAWNULL);
VAR53:=IF(VAR35<REF(VAR35,1),VAR35,DRAWNULL);
VAR54:=IF(VAR36<REF(VAR36,1),VAR36,DRAWNULL);
VAR55:=IF(VAR37<REF(VAR37,1),VAR37,DRAWNULL);
VAR56:=IF(VAR38<REF(VAR38,1),VAR38,DRAWNULL);
VAR57:=IF(VAR39<REF(VAR39,1),VAR39,DRAWNULL);
VAR58:=IF(VAR40<REF(VAR40,1),VAR40,DRAWNULL);
VAR59:=IF(VAR41<REF(VAR41,1),VAR41,DRAWNULL);
VAR60:=IF(VAR42<REF(VAR42,1),VAR42,DRAWNULL);
VAR61:=IF(VAR43<REF(VAR43,1),VAR43,DRAWNULL);
STICKLINE(VAR3>0,0,VAR3,2,0),COLORRED;
STICKLINE(VAR3<0,0,VAR3,2,0),COLORGREEN;
DRAWTEXT(CROSS(VAR1,VAR2),VAR3*1.1,'金叉'),COLORYELLOW;
DRAWTEXT(CROSS(VAR2,VAR1),VAR3*1.1,'死叉'),COLORCYAN;
MA5:VAR4,COLORWHITE;
MA10:VAR5,COLORYELLOW;
MA20:VAR6,COLORMAGENTA;
MA30:VAR7,COLORGREEN;
MA60:VAR8,COLORBLUE;
MA120:VAR9,COLORRED;
MA250:VAR10,COLORLIGRAY;
DRAWICON(CROSS(VAR4,VAR5),VAR4,1);
DRAWICON(CROSS(VAR5,VAR4),VAR4,2);
VOLUME:VOL,VOLSTICK;
MAVOL1:MA(VOL,5),COLORWHITE;
MAVOL2:MA(VOL,10),COLORYELLOW;
MAVOL3:MA(VOL,20),COLORMAGENTA;
DRAWICON(CROSS(MA(VOL,5),MA(VOL,10)),VOL,1);
DRAWICON(CROSS(MA(VOL,10),MA(VOL,5)),VOL,2);
DRAWTEXT_FIX(1,0.88,0.02,0,'主力乾坤'),COLORYELLOW;
