| 1,牛熊三色(通达信副图) EXPMA1:=EXPMA(CLOSE,7);
 EXPMA2:=EXPMA(CLOSE,21);
 N:=4;
 S:=2;
 M:=20;
 高1:=REF(HHV(H,150),3);
 低1:=REF(LLV(L,150),3);
 H3:=高1-(高1-低1)*0.5;
 中轴:=REFDATE(H3,DATE),LINETHICK1;
 B1:=EMA(C,12);
 B2:=EMA(C,26);
 B3:=(B1-B2)*2;
 WDIF:=中轴+B3;
 WDEA:=EMA(WDIF,9);
 MACD:=2*(WDIF-WDEA);
 TYP:=(HIGH+LOW+CLOSE)/3;
 CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
 STICKLINE(MACD>0,0,1,0,1),COLORRED;
 STICKLINE(MACD<0,0,1,0,1),COLORGREEN;
 STICKLINE(EXPMA1>EXPMA2,1,2,0,1),COLORRED;
 STICKLINE(EXPMA1<EXPMA2,1,2,0,1),COLORGREEN;
 STICKLINE(CLOSE>SAR(N,S,M),2,3,0,1),COLORRED;
 STICKLINE(CLOSE<SAR(N,S,M),2,3,0,1),COLORGREEN;
 DRAWTEXT(ISLASTBAR,0.5,'MACD'),COLOR0089FF;
 DRAWTEXT(ISLASTBAR,1.5,'EXPMA'),COLOR0089FF;
 DRAWTEXT(ISLASTBAR,2.5,'SAR'),COLOR0089FF;
 NXSS:=MACD>0 AND EXPMA1>EXPMA2 AND CLOSE>SAR(N,S,M);
 选股:IF(NXSS AND REF(NXSS,1)=0,3,0),COLORYELLOW,LINETHICK1;
 2,六脉神剑(通达信副图)
 DIFF:=EMA(CLOSE,8)-EMA(CLOSE,13);
 DEA:=EMA(DIFF,5);
 DRAWICON(DIFF>DEA,1,1);
 DRAWICON(DIFF<DEA,1,2);
 DRAWTEXT(ISLASTBAR=1,1,'.MACD'),COLORFFFFFF;
 A1:=DIFF>DEA;
 MACD金叉:=IF(A1,1,0),COLORRED;
 RSV1:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
 K:=SMA(RSV1,3,1);
 D:=SMA(K,3,1);
 DRAWICON(K>D,2,1);
 DRAWICON(K<D,2,2);
 DRAWTEXT(ISLASTBAR=1,2,'.KDJ'),COLORFFFFFF;
 A2:=K>D;
 KDJ金叉:=IF(A2,2,0),COLORRED;
 LC:=REF(CLOSE,1);
 RSI1:=(SMA(MAX(CLOSE-LC,0),5,1))/(SMA(ABS(CLOSE-LC),5,1))*100;
 RSI2:=(SMA(MAX(CLOSE-LC,0),13,1))/(SMA(ABS(CLOSE-LC),13,1))*100;
 DRAWICON(RSI1>RSI2,3,1);
 DRAWICON(RSI1<RSI2,3,2);
 DRAWTEXT(ISLASTBAR=1,3,'.RSI'),COLORFFFFFF;
 A3:=RSI1>RSI2;
 RSI金叉:=IF(A3,3,0),COLORRED;
 RSV:=-(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100;
 LWR1:=SMA(RSV,3,1);
 LWR2:=SMA(LWR1,3,1);
 DRAWICON(LWR1>LWR2,4,1);
 DRAWICON(LWR1<LWR2,4,2);
 DRAWTEXT(ISLASTBAR=1,4,'.LWR'),COLORFFFFFF;
 A4:=LWR1>LWR2;
 LWR金叉:=IF(A4,4,0),COLORRED;
 BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
 DRAWICON(CLOSE>BBI,5,1);
 DRAWICON(CLOSE<BBI,5,2);
 DRAWTEXT(ISLASTBAR=1,5,'.BBI'),COLORFFFFFF;
 A5:=CLOSE>BBI;
 BBI金叉:=IF(A5,5,0),COLORRED;
 MTM:=CLOSE-REF(CLOSE,1);
 MMS:=100*EMA(EMA(MTM,5),3)/EMA(EMA(ABS(MTM),5),3);
 MMM:=100*EMA(EMA(MTM,13),8)/EMA(EMA(ABS(MTM),13),8);
 DRAWICON(MMS>MMM,6,1);
 DRAWICON(MMS<MMM,6,2);
 DRAWTEXT(ISLASTBAR=1,6,'.MTM'),COLORFFFFFF;
 A6:=MMS>MMM;
 MTM金叉:=IF(A6,6,0),COLORRED;
 买入:IF((A1 AND A2 AND A3 AND A4 AND A5 AND A6) AND REF(A1 AND A2 AND A3 AND A4 AND A5 AND A6,1)=0,7,0),COLORYELLOW,LINETHICK2;
 |