通达信自用6年多一直在用~~回调追牛源码

RSV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
 K1:=SMA(RSV,10,1);
 D1:=SMA(K1,5,1);
 KK:=INTPART(K1);
 DD0:=INTPART(D1);
 TFXXS:=KK+DD0;
 TGLD:=MOD(TFXXS,10);
 TGLXS:=(TFXXS-REF(TFXXS,1))*10;
 TYCFX:=TFXXS+TGLXS;
乖离系数:TGLXS,LINETHICK0,COLORGREEN,NODRAW;
 DRAWTEXT_FIX(ISLASTBAR,0,0.92,0,'提示：1、乖离系数大于40关注，大于60可以买入，买入时看股价运行的情况而定。2、乖离系数小于-50不要进场。3、乖离系数大于20，可以酌情做个小波段。')COLOR4080FF;
安全线: EMA(CLOSE,55),COLORLIGREEN,DOTLINE;
 EMA30:EMA(CLOSE,30),NODRAW;
 EMA5:=EMA(CLOSE,5);
 X2:=EMA5;
 X3:=EMA30;
主升:=C>X2 AND C>X3;
主跌:=C<X3;
回调:=C<X2 AND C>X3;
反弹:=C>X2 AND C<X3;
 STICKLINE(主升,CLOSE,O,4.8,0),COLOR0000BB;
 STICKLINE(主升,CLOSE,O,3,0),COLOR0000CC;
 STICKLINE(主升,CLOSE,O,1.5,0),COLOR0000DD;
 STICKLINE(主升,CLOSE,O,1,0),COLOR0000EE;
 STICKLINE(主升,CLOSE,O,0.5,0),COLOR0000FF;
 STICKLINE(主升,H,L,0,0),COLOR0000FF;
 STICKLINE(主跌,CLOSE,O,4.8,0),COLOR555500;
 STICKLINE(主跌,CLOSE,O,3,0),COLOR888800;
 STICKLINE(主跌,CLOSE,O,1.5,0),COLORAAAA00;
 STICKLINE(主跌,CLOSE,O,1,0),COLORCCCC00;
 STICKLINE(主跌,CLOSE,O,0.5,0),COLOREEEE00;
 STICKLINE(主跌,H,L,0,0),COLOREEEE00;
 STICKLINE(回调,O,C,4.8,0),COLORBB4400;
 STICKLINE(回调,O,C,3,0),COLORCC5500;
 STICKLINE(回调,O,C,1.5,0),COLORDD6600;
 STICKLINE(回调,O,C,1,0),COLOREE7700;
 STICKLINE(回调,O,C,0.5,0),COLORFF8800;
 STICKLINE(回调,H,L,0,0),COLORFF8800;
 STICKLINE(反弹,O,C,4.8,0),COLOR0077BB;
 STICKLINE(反弹,O,C,3,0),COLOR0099CC;
 STICKLINE(反弹,O,C,1.5,0),COLOR00BBDD;
 STICKLINE(反弹,O,C,1,0),COLOR00DDEE;
 STICKLINE(反弹,O,C,0.5,0),COLOR00FFFF;
 STICKLINE(反弹,H,L,0,0),COLOR00FFFF;
 DRAWTEXT_FIX(C>0,0,0,0,'【█】涨势'),COLOR0000AA;
 DRAWTEXT_FIX(C>0,0,0.05,0,'【█】回调'),COLORDD6600;
 DRAWTEXT_FIX(C>0,0,0.10,0,'【█】跌势'),COLORAAAA00;
 DRAWTEXT_FIX(C>0,0,0.15,0,'【█】反弹'),COLOR00BBDD;
均价线:=AMOUNT/V/100;
 C2:=REF(C,1);
 AA1:MA(C,4),COLORRED,LINETHICK4;
卖出:IF(AA1<=REF(AA1,1),AA1,DRAWNULL),LINETHICK4,COLORGREEN;
涨停:=IF(REF(C,1)*1.1-C<0.01 ,1,0);
 STICKLINE(涨停,OPEN,CLOSE,4.6,0),COLORRED;
 STICKLINE(涨停,OPEN,CLOSE,3.5,0),COLORYELLOW;
 STICKLINE(涨停,H,L,0,0),COLORYELLOW;
 B1:='┄┄┄┄';
 DRAWTEXT(均价线 AND 涨停,均价线,B1),COLORGREEN;
 B3:='┄┄┄┄';
 DRAWTEXT((O+C)/2 AND 涨停,(O+C)/2 ,B3),COLORMAGENTA;
 B2:='┄┄┄┄';
 DRAWTEXT(涨停,L,B2),COLORGRAY;
 DRAWTEXT(涨停,H*0.988,'---涨停'),COLORYELLOW;
买进:DRAWTEXT(CROSS(AA1,X3*0.998-0.018),L*0.97,'★-买进 '),COLORFFFF00,COLORYELLOW;
买进1:DRAWTEXT(CROSS(L,X3*0.9998+0.018) AND C>REF(C,1),L*0.97,'★-买进 '),COLORFFFF00,COLORYELLOW;
 HH:=COUNT(涨停,15)>=1;
 LC:=REF(CLOSE,1);
操作线:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100;
趋势线:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100;
震仓线:=45;
震仓线2:=50;
逃命线:=80;
抄底线:=20;
绝底线:=5;
 PP2:=操作线<震仓线2 AND REF(操作线,1)>震仓线2 ;
 PP:=操作线<震仓线 AND REF(操作线,1)>震仓线 ;
PP3:=操作线<抄底线 AND REF(操作线,1)>抄底线;
A:=SMA(L,4,3) ;
 STICKLINE(A AND REF(PP,1) AND HH ,A*0.998,A*0.996,5,0);
 DRAWICON(A AND REF(PP,1) AND HH,L*0.98,1);
 DRAWICON(A AND REF(PP,1) AND HH,L*0.96,23);
 STICKLINE(A AND REF(PP3,1) AND HH ,A*0.998,A*0.996,5,0);
 DRAWICON(A AND REF(PP3,1) AND HH,L*0.98,1);
牛:DRAWICON(A AND REF(PP3,1) AND HH,L*0.97,23);
追牛:DRAWTEXT(牛,L*0.96,' ★--追牛 '),COLORFF00FF;
理想通:=EMA((C-LLV(L,5))/(HHV(H,6)-LLV(L,6)),2)*100,COLORYELLOW,LINETHICK1;
 VARB1:=SMA(SMA(理想通,2,1),2,1);
 VARB2:=(VARB1/2+36.8)*1;
 VARB3:=SMA(VARB2,2,1)+2.2,COLORFFFF00;
 VARB4:=SMA(VARB2,2,1)-35.08,COLOR00FF00,LINETHICK1;
卖出1:DRAWTEXT(CROSS(VARB3,理想通*0.9998+0.0018) AND VARB3>67 ,H*1.0012,'--卖出 '),COLOR00FF00;
卖出2:DRAWTEXT(CROSS(VARB3,理想通*0.9998+0.0018) AND VARB3>67 ,H*1.0112,' '),COLOR00FF00;
加仓:DRAWTEXT(CROSS(理想通,VARB4*0.9998+0.0018),L*0.988,'★--加仓 '),COLOR0000FF;
 VAR6S:=REF(C,1);
 VAR7S:=SMA(MAX(C-VAR6S,0),6,1)/SMA(ABS(C-VAR6S),6,1)*100;
 DRAWTEXT(CROSS(82,VAR7S),H*1.02568,'↙做空'),COLORMAGENTA;
 AAOO:=CROSS(MA(C,5),MA(C,20)) AND CROSS(MA(C,5),MA(C,30)) AND CROSS(MA(C,5),MA(C,60));
 BBBO:=MA(C,60)>MA(C,10) AND CROSS(MA(C,10),MA(C,30)) AND MA(C,30)>MA(C,20) AND ABS(MA(C,60)-MA(C,20))/MA(C,20)<0.05;
 CCCO:=MA(C,30)>MA(C,5) AND CROSS(MA(C,5),MA(C,20)) AND MA(C,20)>MA(C,10);
 DD:=ABS((MA(C,5)-MA(C,10))+(MA(C,10)-MA(C,20))+(MA(C,20)-MA(C,30)))<0.02 AND MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>REF(MA(C,10),1);
 EE:=MA(C,20)>MA(C,5) AND CROSS(MA(C,5),MA(C,10)) AND MA(C,10)>MA(C,60) AND ABS(MA(C,20)-MA(C,60))/MA(C,60)<0.05;
 FF:=AAOO OR BBBO OR CCCO OR DD OR EE ;
探测:=FF AND FILTER( FF,8);
 STICKLINE(探测,H,L,0.3,0),COLORRED;
 STICKLINE(探测,O,C,5,0),LINETHICK2,COLORRED;
 AA1P:=AMOUNT/VOL;
 BB1:=L<AA1P*0.9;
 CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
 DD1O:=L<MA(C,5)*0.921;
 EE1:=VOL<MA(V,5)*1.5;
 FF1:=BB1 AND CC1 AND DD1O AND EE1 ,COLORRED,LINETHICK0;
 DRAWTEXT(FF1,L*0.94,'★(潜伏)'),COLORYELLOW;
 STICKLINE(FF1,H,L,0.3,0),COLORYELLOW;
 STICKLINE(FF1,O,C,5,0),LINETHICK2,COLORYELLOW;
 DRAWTEXT(CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),
 HIGH*1.00032,'---警'),COLORGREEN;
 LCP:=REF(CLOSE,1);
 RSI:=SMA(MAX(CLOSE-LCP,0),4.1,1)/SMA(ABS(CLOSE-LCP),4.1,1)*100;
 DRAWICON(CROSS(RSI,11) ,L*0.9996,4);
 VAR28K:=SMA(MAX(CLOSE-LCP,0),5.5,1)/SMA(ABS(CLOSE-LCP),6,1)*100;
 DRAWTEXT(FILTER(EMA(CLOSE,60)-EMA(CLOSE,12)>0 AND EMA(CLOSE,12)/LOW>1.15,5),LOW,'☆'),COLORFF00FF;
 VARAK:=((AMOUNT)/(VOL))/(100);
 VARBK:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);
 VARCK:=((SUM(AMOUNT,7))/(VARAK))/(100);
 VARDK:=DMA(VARBK,(VOL)/(VARCK));
 VAREK:=((CLOSE-VARDK)/(VARDK))*(100);
 VARFK:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100);
 VARJK:=MA(VAREK,20)+STD(VAREK,20);
 BIAS18K:=((CLOSE-MA(CLOSE,18))/(MA(CLOSE,18)))*(100);
 AAK:=SMA(VARFK,3,1);
 SSK:=(REF(BIAS18K,1)>=5) AND CROSS(VARJK,VAREK) AND (AAK>79);
 DRAWTEXT((REF(BIAS18K,1)>=5) AND CROSS(VARJK,VAREK) AND (AAK>SSK) AND CROSS(84,RSI),H*1.0001,'☆'),LINETHICK7,COLORYELLOW;
 DRAWTEXT(CROSS(84,RSI) AND CROSS(76,VAR28K),H*1.05,'--逃顶'),LINETHICK2,COLOR00FF00;
 G1:=REF(O,1)>REF(C,1);
 GSD:=C/REF(C,1)>=1.095 AND L<>H;
 FH:=GSD AND G1 AND V<REF(V,1);
 DRAWTEXT(FH,L*0.98,'←一指千金'),COLORYELLOW;
 VAR2L:=(2*CLOSE+HIGH+LOW)/4;
 VAR3L:=IF(YEAR>=2099 AND MONTH>2,0,1);
 VAR4L:=LLV(LOW,5);
 VAR5L:=HHV(HIGH,4);
散户:=EMA((VAR2L-VAR4L)/(VAR5L-VAR4L)*100,4)*VAR3L;
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3L;
 DRAWTEXT(CROSS(散户,庄家) AND 散户<30,L-0.16,'←低吸'),COLORYELLOW;
 DRAWTEXT(CROSS(庄家,散户) AND 散户>70,H+0.08,'←高抛'),COLORGREEN;
 M1:MA(CLOSE,13),NODRAW;
 M2:MA(CLOSE,34),NODRAW;
 M3:MA(CLOSE,55),NODRAW;
 AP:MA(C,5),NODRAW;
 BP:=AP<REF(AP,1);
 IF(BP-1,AP,DRAWNULL),NODRAW;
 DRAWTEXT(LAST(C<O,3,0) AND LAST(VOL<REF(VOL,1),3,0),L*0.975,'↖三阳');
DRAWTEXT(CROSS("DMI.PDI","DMI.MDI") AND CROSS("DMI.PDI","DMI.ADX") AND CROSS("DMI.PDI","DMI.ADXR") AND C>REF(C,1)*1.05 AND VOL>REF(VOL,1),L*0.975,'↖涨');
DRAWTEXT(LAST(MA(C,5)<MA(C,10),5,0) AND "CCI.CCI">REF("CCI.CCI",1) AND CROSS("CCI.CCI",-100),L*0.975,'↖背离底');
X1:=(C+L+H)/3;
 BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
 EMA8:=EMA(C,8);
 DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),
 EMA8,'★∠45升'),COLORLIBLUE;
 VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);
 VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AA>0),91,0);
 DRAWTEXT(FILTER((VAR4AA>90),35),(LOW)*(0.99000001),'--★加仓'),COLOR00FFFF;
 AA1Y:=AMOUNT/V;
 BB1Y:=L<AA1Y*0.9;
 CC1Y:=(C-REF(C,1))/REF(C,1)*100>1.2;
 DD1Y:=L<MA(C,5)*0.921;
 EE1Y:=V<MA(V,5)*1.5;
 FF1Y:=BB1Y AND CC1Y AND DD1Y AND EE1Y;
 DRAWTEXT(FF1Y,(LOW* 0.90),'↖老鼠仓'),COLOR4080FF;
 A001:=CLOSE-REF(CLOSE,6);
 A002:=MA(A001,6);
 A003:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))*100;
 A004:=SMA(A003,3,1);
 A005:=SMA(A004,3,1);
 A006:=EMA((3*A004-2*A005),2);
 A007:=(HIGH+LOW+CLOSE)/3;
 A008:=((A007-MA(A007,14))/(0.015*AVEDEV(A007,14)))/2;
 A009:=(A008+(EMA(((0-(100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))))+100)/100,3)*200-100))/2;
 A010:=A009-REF(A009,14);
 A011:=A009-REF(A009,26);
 A012:=(A009+A010+A011)/3;
 KKM:=EMA(A012,4);
 A013:=HHV(HIGH,34);
 A014:=(2*CLOSE+HIGH+LOW)/4;
 A015:=LLV(LOW,34);
 A016:=EMA(((A014-A015)/(A013-A015))*100,13);
 A017:=EMA(0.667*REF(A016,1)+0.333*A016,2);
 KKMD:=A016-A017>1 AND A016<30 AND A017<30;
 KKML:=A016-A017<0 AND A016>80 AND A017>80 AND REF(A016-A017,1)>0;
 KKMQ:=COUNT(A016-A017>0,2)=2;
 KKAL:=(A016-A017)<0;
生命线:MA(CLOSE,3),NODRAW;
成本:MA(CLOSE,7),NODRAW;
 DRAWTEXT(FILTER(KKMD,30),L,'最佳买入时机'),COLOR00FFFF;
 DRAWTEXT(FILTER(KKML,30),H,'最佳卖出时机'),COLORFFFF00;
 DRAWTEXT(FILTER(CLOSE/REF(CLOSE,1)>INDEXC/REF(INDEXC,1),30),L*0.93,'↖该股强于大盘'),COLORFF00FF;
 M20:MA(C,20),COLORLIRED,DOTLINE;
 T1:=BARSLAST(CROSS(C>=M20,0.5));
 T2:=BARSLAST(CROSS(C<M20,0.5));
 T3:=SUMBARS(T1=0,2);
ZF:=(C-REF(C,T1+1))/REF(C,T1+1)*100;
 HZF:=REF(HHV(ZF,T1+1),T2);
 DF:=(C-REF(C,T2+1))/REF(C,T2+1)*100;
 LDF:=LLV(DF,T2+1);
 L1:=LLV(L,T2+1);
 L2:=REF(L1,T3-1);
 AC:=COUNT(T2=0,T3)=1;
 AC1:=O<M20 AND C>=M20 AND HZF<15 AND LDF>-25 AND LDF<-10;
 AC2:=REF(T1,T2)>1 AND T2>1 AND MACD.DIF>MACD.DEA AND MACD.MACD>REF(HHV(MACD.DIF,2),1);
 AC3:=HSL<REF(HSL,T2) AND LLV(L,T2+1)>BOLL.LB*0.9 AND HHV(L,T2+1)<M20;
 AC4:=AMOUNT>REF(AMOUNT,1);
 XG:=AC AND AC1 AND AC2 AND AC3 AND AC4;
 DRAWICON(XG,L,1);