感觉一个挺不错的主图指标，在这分享一下，下面为源码：
【上市时间】:REF(YEAR,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF;
月:REF(MONTH,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF00FF;
日:REF(DAY,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFFFF;
DDX:=IF(C<0,0,"DDX.DDX");
TF:IF(C<0,0,IF(DATE<=1341231,EMA(EMA(EMA(EMA(CLOSE,3),3),3),3),0)),LINETHICK2,colorFF00FF;
TC:IF(C<0,0,IF(DATE<=1341231,EMA(REF(TF,1),3),0)),LINETHICK2,colorFFFF00;
YF1:="RSI.RSI1";
YF2:="RSI.RSI2";
MACD1:="MACD.DIFF";
MACD2:="MACD.DEA";
KDJ0:="KDJ.D";
KDJ1:="KDJ.K";
AA:=FILTER(CROSS(KDJ1,KDJ0) AND KDJ0<40 AND MACD2<0 AND DDX>0,13);
W10:=BARSLAST(AA);
WW1:=FILTER(OPEN<REF(LOW,1) AND CLOSE>OPEN AND MA(CLOSE,3)>TF ANDVOL>REF(VOL,1),13);
CC:=REF(HHV(CLOSE,120),1);
DD:=REF(LLV(CLOSE,120),1);
WW:=100*(CLOSE-DD)/(CC-DD);
EE:=AMOUNT;
X1:=IF(C<0,0,(CLOSE+LOW+HIGH)/3);
X2:=IF(C<0,0,EMA(X1,6));
X3:=IF(C<0,0,EMA(X2,5));
DRAWICON(CROSS(X2,X3),LOW-0.1,1);
DRAWICON(CROSS(X3,X2),HIGH+0.1,2);
STICKLINE(X2>=X3,LOW,HIGH,0.1,1),colorFF;
STICKLINE(X2>=X3,CLOSE,OPEN,9,2),colorFF;
STICKLINE(X2>=X3,CLOSE,OPEN,9,8),colorFF;
STICKLINE(X2<X3,LOW,HIGH,0.1,1),colorFF00;
STICKLINE(X2<X3,CLOSE,OPEN,9,2),colorFF00;
STICKLINE(CROSS(X2,X3),OPEN,CLOSE,6,1),colorFFFF;
STICKLINE(CROSS(X3,X2),OPEN,CLOSE,6,1),colorFF0000;
FF:=EMA(EE,5)/REF(EMA(EE,5),5);
霸占:=FILTER(FF>=2 AND WW<35 AND BARSCOUNT(CLOSE)>30 OR FF>=2 ANDWW<100 AND BARSCOUNT(CLOSE)<50,90);
QIJ:=FILTER(CROSS(YF2,YF1),13);
YF:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1)-3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1),2,1);
QJ:=89.89;
WW0:=FILTER(CROSS(YF2,YF1) AND YF1>58 OR CROSS(QJ,YF),9);
WWW0:=BARSLAST(WW0);
取点:=IF(W10>0 AND W10<WWW0,W10,0);
取点1:=IF(WWW0>0 AND WWW0<W10,WWW0,0);
DRAWTEXTEX(CLOSE,1,660,960,'新庄进场:'+NUMTOSTR(取点,0)+' 天'),colorFF;
DRAWTEXTEX(CLOSE,1,840,960,'主力回吐:'+NUMTOSTR(取点1,0)+'天'),colorFF00;
A4:=MA(CLOSE,20);
A5:=CLOSE>MA(CLOSE,5);
A6:=MA(CLOSE,5)>MA(CLOSE,10);
A7:=CLOSE>MA(CLOSE,10);
A8:=MA(CLOSE,5)>MA(CLOSE,20);
A9:=CLOSE>MA(CLOSE,20);
A10:=REF(A4,1);
A11:=A4>A10;
AVX:=IF(C<0,0,IF(A5,10,-10)+IF(A6,10,-10)+IF(A7,10,-10)+IF(A8,10,-10)+IF(A9,10,-10)+IF(A11,10,-10));
DSLX:=CLOSE/INDEXC;
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
TJTS1:=BARSTATUS=2 AND CLOSE<200;
TJTS2:=BARSTATUS=2 AND CLOSE>200;
K2:=HHV(HIGH*1.04,(BARSLAST(SYSPARAM(2)=BARPOS))+1);
DRAWTEXT(TJTS1 AND CROSS(AVX,1) AND V1>=V2 AND DSLX>=DSLX1,K2*0.99,'舞庄解盘：该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS1 AND CROSS(AVX,1) AND V1<V2 AND DSLX>=DSLX1,K2*0.99,'舞庄解盘：该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS1 AND CROSS(AVX,1) AND V1>V2 AND DSLX<DSLX1,K2*0.99,'舞庄解盘：该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS1 AND CROSS(AVX,1) AND V1<=V2 AND DSLX<DSLX1,K2*0.99,'舞庄解盘：该股趋势尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS1 AND CROSS(1,AVX) AND V1>=V2 AND DSLX>=DSLX1,K2*0.99,'舞庄解盘：该股趋势变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。'),ALIGN2,colorFF00;
DRAWTEXT(TJTS1 AND CROSS(1,AVX) AND V1<V2 AND DSLX>=DSLX1,K2*0.99,'舞庄解盘：该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓。'),ALIGN2,colorFF00;
DRAWTEXT(TJTS1 AND CROSS(1,AVX) AND V1>=V2 AND DSLX<DSLX1,K2*0.99,'舞庄解盘：该股放量下跌，走势明显偏弱，离场观望。'),ALIGN2,colorFF00;
DRAWTEXT(TJTS1 AND CROSS(1,AVX) AND V1<V2 AND DSLX<DSLX1,K2*0.99,'舞庄解盘：该股缩量下跌，走势偏弱，离场观望。'),ALIGN2,colorFF00;
DRAWTEXT(TJTS1 AND AVX>=1 AND REF(AVX,1)>0 AND V1>=V2 ANDDSLX>=DSLX1,K2*0.99,'舞庄解盘：该股形态良好，强势明显，量能充足，可以继续持有。'),ALIGN2,colorFFFF00;
DRAWTEXT(TJTS1 AND AVX>=1 AND REF(AVX,1)>0 AND V1<V2 ANDDSLX>=DSLX1,K2*0.99,'舞庄解盘：该股上行趋势不变，强势依然，但量能开始转弱，注意风险。'),ALIGN2,colorFFFF00;
DRAWTEXT(TJTS1 AND AVX>=1 AND REF(AVX,1)>0 AND V1>=V2 ANDDSLX<DSLX1,K2*0.99,'舞庄解盘：该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。'),ALIGN2,colorFFFF00;
DRAWTEXT(TJTS1 AND AVX>=1 AND REF(AVX,1)>0 AND V1<V2 ANDDSLX<DSLX1,K2*0.99,'舞庄解盘：该股趋势偏弱，量能不足，减持大部分筹码。'),ALIGN2,colorFFFF00;
DRAWTEXT(TJTS1 AND AVX<1 AND REF(AVX,1)<0 AND V1>=V2 ANDDSLX>=DSLX1,K2*0.99,'舞庄解盘：该股形态不佳，注意成交量的变化，但目前不适合参与。'),ALIGN2,colorFFB060;
DRAWTEXT(TJTS1 AND AVX<1 AND REF(AVX,1)<0 AND V1<V2 ANDDSLX>=DSLX1,K2*0.99,'舞庄解盘：该股趋势不明，股价偏弱，注意量能变化，目前不宜参与。'),ALIGN2,colorFFB060;
DRAWTEXT(TJTS1 AND AVX<1 AND REF(AVX,1)<0 AND V1>=V2 ANDDSLX<DSLX1,K2*0.99,'舞庄解盘：该股有走强迹象，但量能不足，趋势不明，不适合操作。'),ALIGN2,colorFFB060;
DRAWTEXT(TJTS1 AND AVX<1 AND REF(AVX,1)<0 AND V1<V2 ANDDSLX<DSLX1,K2*0.96,'舞庄解盘：该股走势太弱，没有参与价值。'),ALIGN2;
DRAWTEXT(TJTS2 AND CROSS(AVX,1) AND V1>=V2,K2*0.99,'舞庄解盘：大盘量能理想，有明显走强迹象，建议考虑中线进场参与，仓位在2/3左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS2 AND CROSS(AVX,1) AND V1>=V2,K2*0.98,'舞庄解盘：如前期经过一轮下跌，此时为最佳买点，但如果前期有过一段涨幅则介入需谨慎。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS2 AND CROSS(AVX,1) AND V1<V2,K2*0.99,'舞庄解盘：大盘虽然走势趋强，但量能还显不足，如果前期经过一轮下跌。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS2 AND CROSS(AVX,1) AND V1<V2,K2*0.98,' 舞庄解盘：可以考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS2 AND CROSS(1,AVX) AND V1>=V2,K2*0.99,'舞庄解盘：大盘趋势走坏，重仓者建议减去大部分仓位。'),ALIGN2,colorFF00;
DRAWTEXT(TJTS2 AND CROSS(1,AVX) AND V1<V2,K2*0.99,'舞庄解盘：大盘缩量调整，注意风险，短线清仓观望。'),ALIGN2,colorFF00;
DRAWTEXT(TJTS2 AND AVX>=1 AND REF(AVX,1)>0 AND V1>=V2,K2*0.99,'舞庄解盘：大盘走势良好，量能理想，可以继续持有强势股。'),ALIGN2,colorFFFF00;
DRAWTEXT(TJTS2 AND AVX>=1 AND REF(AVX,1)>0 AND V1<V2,K2*0.99,'舞庄解盘：大盘趋势良好，但量能稍显不足，随时准备减仓。'),ALIGN2,colorFFFF00;
DRAWTEXT(TJTS2 AND AVX<1 AND REF(AVX,1)<0 AND V1>=V2,K2*0.99,'舞庄解盘：大盘趋势不明，注意成交量变化，目前不适宜进场。'),ALIGN2,colorFFB060;
DRAWTEXT(TJTS2 AND AVX<1 AND REF(AVX,1)<0 AND V1<V2,K2*0.99,'舞庄解盘：大盘趋势向下，量能萎缩，不适合进场。'),ALIGN2,colorFFB060;
DRAWTEXTEX(CLOSE,1,1,0,'\n\n收益:'+NUMTOSTR(FINANCE(33),2)+'元'+'\n'+'净资:'+NUMTOSTR(FINANCE(34),2)+'元'+'\n'+'流通:'+NUMTOSTR(FINANCE(7)/10000,2)+'亿'+'\n'+'流通:'+NUMTOSTR(FINANCE(7)/FINANCE(1)*100,0)+'%'+'\n'+'权益:'+NUMTOSTR(FINANCE(36),0)+' %'+'\n'+'主营:'+NUMTOSTR(FINANCE(53),0)+' %'+'\n'+'利润:'+NUMTOSTR(FINANCE(54),0)+' %'+'\n'+'主营:'+NUMTOSTR(FINANCE(20)/10000,1)+'亿'+'\n'),colorFFFF;
BB:=IF(C<0,0,BARPOS=SYSPARAM(1));
P:=IF(C<0,0,SYSPARAM(1));
DRAWTEXTEX(CLOSE,1,1,1000,'【'),colorFF;
DRAWTEXTEX(CLOSE,1,20,1000,'舞庄理念：'),colorFF00FF;
DRAWTEXTEX(CLOSE,1,100,1000,'把握趋势，与庄共舞！'),colorFFFF00;
DRAWTEXTEX(CLOSE,1,250,1000,'】'),colorFF;
 |
