朋友在网上拿到的的给了我，感觉不错发上来与坛友分享，主图没有什么亮点，倒是副图挺好的，红色柱表示做多动能、黄色表示获利回吐、蓝色表示筹码回补、绿色表示做空动能，大概意思是这样的，自己慢慢的体会吧
{主图指标}
MA1:MA(CLOSE,5);
MA2:MA(CLOSE,10);
MA3:MA(CLOSE,20);
MA4:MA(CLOSE,60);
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
STICKLINE(C>=O,C,O,3,0),COLORRED;
STICKLINE(C<O,C,O,3,0),COLORGREEN;
STICKLINE(C>=O,H,L,0,0),COLORRED;
STICKLINE(C<O,H,L,0,0),COLORGREEN;
{副图指标-博尔主导动能}
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,60);
VAR8:=EMA(CLOSE,120);
VAR9:=EMA(CLOSE,250);
VAR10:=IF(VAR3>0,VAR3,0);
VAR11:=IF(VAR3<0,VAR3,0);
VAR12:=SUM(VOL,5)/CAPITAL*100;
VAR13:=SUM(VOL,10)/CAPITAL*100;
VAR14:=SUM(VOL,20)/CAPITAL*100;
VAR15:=SUM(VOL,60)/CAPITAL*100;
VAR16:=SUM(VOL,120)/CAPITAL*100;
VAR17:=SUM(VOL,250)/CAPITAL*100;
VAR18:=EMA(VAR12,5);
VAR19:=EMA(VAR13,10);
VAR20:=EMA(VAR14,20);
VAR21:=EMA(VAR15,60);
VAR22:=EMA(VAR16,120);
VAR23:=EMA(VAR17,250);
VAR24:=IF(VAR18>VAR19 AND VAR19>VAR20 AND VAR20>VAR21 AND VAR21>VAR22 AND VAR22>VAR23,1,0);
VAR25:=IF(VAR18<VAR19 AND VAR19<VAR20 AND VAR20<VAR21 AND VAR21<VAR22 AND VAR22<VAR23,1,0);
VAR26:=IF(VAR24=1 AND VAR10>0,1,0);
VAR27:=IF(VAR25=1 AND VAR11<0,1,0);
VAR28:=IF(VAR26=1,1,IF(VAR27=1,-1,0));
VAR29:=EMA(VAR28,5);
VAR30:=EMA(VAR29,10);
VAR31:=EMA(VAR30,20);
VAR32:=EMA(VAR31,60);
VAR33:=EMA(VAR32,120);
VAR34:=EMA(VAR33,250);
VAR35:=IF(VAR29>VAR30 AND VAR30>VAR31 AND VAR31>VAR32 AND VAR32>VAR33 AND VAR33>VAR34,1,0);
VAR36:=IF(VAR29<VAR30 AND VAR30<VAR31 AND VAR31<VAR32 AND VAR32<VAR33 AND VAR33<VAR34,1,0);
VAR37:=IF(VAR35=1 AND VAR10>0,1,0);
VAR38:=IF(VAR36=1 AND VAR11<0,1,0);
VAR39:=IF(VAR37=1,1,IF(VAR38=1,-1,0));
VAR40:=EMA(VAR39,5);
VAR41:=EMA(VAR40,10);
VAR42:=EMA(VAR41,20);
VAR43:=EMA(VAR42,60);
VAR44:=EMA(VAR43,120);
VAR45:=EMA(VAR44,250);
VAR46:=IF(VAR40>VAR41 AND VAR41>VAR42 AND VAR42>VAR43 AND VAR43>VAR44 AND VAR44>VAR45,1,0);
VAR47:=IF(VAR40<VAR41 AND VAR41<VAR42 AND VAR42<VAR43 AND VAR43<VAR44 AND VAR44<VAR45,1,0);
VAR48:=IF(VAR46=1 AND VAR10>0,1,0);
VAR49:=IF(VAR47=1 AND VAR11<0,1,0);
VAR50:=IF(VAR48=1,1,IF(VAR49=1,-1,0));
主导动能:VAR50,COLORSTICK;
STICKLINE(主导动能>0,0,主导动能,3,0),COLORRED;
STICKLINE(主导动能<0,0,主导动能,3,0),COLORGREEN;
0,COLORWHITE;
