| 感觉一个挺不错的主图指标,在这分享一下,下面为源码: 【上市时间】: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 AND VOL>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 AND WW<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 AND DSLX>=DSLX1,K2*0.99,舞庄解盘:该股形态良好,强势明显,量能充足,可以继 续持有。),ALIGN2,colorFFFF00; DRAWTEXT(TJTS1 AND AVX>=1 AND REF(AVX,1)>0 AND V1<V2 AND DSLX>=DSLX1,K2*0.99,舞庄解盘:该股上行趋势不变,强势依然,但量能开始转 弱,注意风险。),ALIGN2,colorFFFF00; DRAWTEXT(TJTS1 AND AVX>=1 AND REF(AVX,1)>0 AND V1>=V2 AND DSLX<DSLX1,K2*0.99,舞庄解盘:该股仍然具备上涨潜力,但股性偏弱,可考虑 减仓。),ALIGN2,colorFFFF00; DRAWTEXT(TJTS1 AND AVX>=1 AND REF(AVX,1)>0 AND V1<V2 AND DSLX<DSLX1,K2*0.99,舞庄解盘:该股趋势偏弱,量能不足,减持大部分筹 码。),ALIGN2,colorFFFF00; DRAWTEXT(TJTS1 AND AVX<1 AND REF(AVX,1)<0 AND V1>=V2 AND DSLX>=DSLX1,K2*0.99,舞庄解盘:该股形态不佳,注意成交量的变化,但目前不 适合参与。),ALIGN2,colorFFB060; DRAWTEXT(TJTS1 AND AVX<1 AND REF(AVX,1)<0 AND V1<V2 AND DSLX>=DSLX1,K2*0.99,舞庄解盘:该股趋势不明,股价偏弱,注意量能变化,目 前不宜参与。),ALIGN2,colorFFB060; DRAWTEXT(TJTS1 AND AVX<1 AND REF(AVX,1)<0 AND V1>=V2 AND DSLX<DSLX1,K2*0.99,舞庄解盘:该股有走强迹象,但量能不足,趋势不明,不 适合操作。),ALIGN2,colorFFB060; DRAWTEXT(TJTS1 AND AVX<1 AND REF(AVX,1)<0 AND V1<V2 AND DSLX<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;
|