通达信共振选股源码副图

[复制链接]
查看27 | 回复0 | 2022-7-24 04:31:03 | 显示全部楼层 |阅读模式

VARA3:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);

趋势:=EMA(VARA3,3)-10;

VARB7:=LLV(LOW,30);

VARA11:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1)*20;

VARA12:=HHV(VARA11,30)*30;

火焰山:=EMA(IF(LOW<=VARB7 AND 趋势<40,(VARA11+VARA12),0),3)/618,COLORRED,LINETHICK2;

火焰:=STICKLINE(火焰山>0,0,火焰山,3,1);

今量:=火焰山;

STICKLINE(火焰山>0,0,今量*1.2,2,0),COLORLIGRAY;

VAR2:=REF(LOW,1);

VAR3:=SMA(ABS(LOW-VAR2),13,1)/SMA(MAX(LOW-VAR2,0),13,1)*100;

VAR4:=EMA(IF(CLOSE*1.2,VAR3*13,VAR3/13),13);

VAR5:=LLV(LOW,34);

VAR6:=HHV(VAR4,34);

VAR7:=IF(LLV(LOW,56),1,0);

VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;

AA:=VAR8>REF(VAR8,1);

DR:=100;ZRQ:=3;

DJ:=REF(LLV(L,100),3);

ZD:=REFDATE(DJ,DATE);

XG:=L=ZD;

XGA:AA AND XG,COLORRED,LINETHICK2;

XG1:=XGA>REF(XGA,1);

牛股起爆点:=XG1>REF(XG1,1)COLORRED,LINETHICK2;

STICKLINE(FILTER(牛股起爆点>=1,5),85,0,3.8,0),COLORRED;

DRAWTEXT(FILTER(牛股起爆点=1,5),75,'---起爆点A'),COLORRED;

 

 

GA1:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5));

GA2:=100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10));

GA3:=100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20));

GA4:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30));

A:=BARSLAST(CROSS(30,GA1))<2 AND BARSLAST(CROSS(GA1,50))<2;

B:=BARSLAST(CROSS(GA4,GA1))<2 AND GA1>GA4;

E:=GA1>60 AND GA4>70;

爆点:=A AND B  AND E;

STICKLINE(FILTER(爆点>=1,5),75,0,3.8,0),COLORLIBLUE;

DRAWTEXT(FILTER(爆点=1,5),60,'---起爆点B'),COLORLIBLUE;

 

A1:=CROSS("MACD.DIF","MACD.DEA");

 A2:=CROSS("KDJ.K","KDJ.D") AND "KDJ.K"<-20;

 A3:="CCI.CCI"<-90 AND "CCI.CCI">-100;

 A4:=CROSS("RSI.RSI1","RSI.RSI2") AND "RSI.RSI1"<50;

 A5:=REF("WR.WR1",1)>90 AND "WR.WR1"<70;

 A6:=CROSS("BIAS.BIAS1",-5);

 A7:=REF("DMI.PDI",1)<REF("DMI.MDI",1) AND REF("DMI.PDI",1)<REF("DMI.ADX",1) AND REF("DMI.PDI",1)<REF("DMI.ADXR",1) AND "DMI.PDI">"DMI.MDI" AND "DMI.PDI">"DMI.ADX" AND "DMI.PDI">"DMI.ADXR";

 A8:=CROSS("MFI.MFI",20) AND REF("MFI.MFI",1)<20;

 MTM:=CLOSE-REF(CLOSE,20);

 MAMTM:=MA(MTM,60);

 A9:=CROSS(MTM,MAMTM);

 OSC:=100*(CLOSE-MA(CLOSE,20));

 MAOSC:=EXPMEMA(OSC,6);

 MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;

 DKX:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+

 16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+

 13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+

 10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+

 7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+

 4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;

 MADKX:=MA(DKX,20);

 A10:="ADTM.ADTM"<-0.8;

 

 AA1:=A1 AND A2 AND A3;

 AA2:=A1 AND A2 AND A4;

 AA3:=A1 AND A2 AND A5;

 AA4:=A1 AND A2 AND A6;

 AA5:=A1 AND A2 AND A7;

 AA6:=A1 AND A2 AND A8;

 AA7:=A1 AND A2 AND A9;

 AA8:=A1 AND A2 AND A10;

 AA9:=A1 AND A3 AND A4;

 AA10:=A1 AND A3 AND A5;

 AA11:=A1 AND A3 AND A6;

 AA12:=A1 AND A3 AND A7;

 AA13:=A1 AND A3 AND A8;

 AA14:=A1 AND A3 AND A9;

 AA15:=A1 AND A3 AND A10;

 AA16:=A1 AND A4 AND A5;

 AA17:=A1 AND A4 AND A6;

 AA18:=A1 AND A4 AND A7;

 AA19:=A1 AND A4 AND A8;

 AA20:=A1 AND A4 AND A9;

 AA21:=A1 AND A4 AND A10;

 AA22:=A1 AND A5 AND A6;

 AA23:=A1 AND A5 AND A7;

 AA24:=A1 AND A5 AND A8;

 AA25:=A1 AND A5 AND A9;

 AA26:=A1 AND A5 AND A10;

 AA27:=A1 AND A6 AND A7;

 AA28:=A1 AND A6 AND A8;

 AA29:=A1 AND A6 AND A9;

 AA30:=A1 AND A6 AND A10;

 AA31:=A1 AND A7 AND A8;

 AA32:=A1 AND A7 AND A9;

 AA33:=A1 AND A7 AND A10;

 AA34:=A1 AND A8 AND A9;

 AA35:=A1 AND A8 AND A10;

 AA36:=A1 AND A9 AND A10;

 AA37:=A2 AND A3 AND A4;

 AA38:=A2 AND A3 AND A5;

 AA39:=A2 AND A3 AND A6;

 AA40:=A2 AND A3 AND A7;

 AA41:=A2 AND A3 AND A8;

 AA42:=A2 AND A3 AND A9;

 AA43:=A2 AND A3 AND A10;

 AA44:=A2 AND A4 AND A5;

 AA45:=A2 AND A4 AND A6;

 AA46:=A2 AND A4 AND A7;

 AA47:=A2 AND A4 AND A8;

 AA48:=A2 AND A4 AND A9;

 AA49:=A2 AND A4 AND A10;

 AA50:=A2 AND A5 AND A6;

 AA51:=A2 AND A5 AND A7;

 AA52:=A2 AND A5 AND A8;

 AA53:=A2 AND A5 AND A9;

 AA54:=A2 AND A5 AND A10;

 AA55:=A2 AND A6 AND A7;

 AA56:=A2 AND A6 AND A8;

 AA57:=A2 AND A6 AND A9;

 AA58:=A2 AND A6 AND A10;

 AA59:=A2 AND A7 AND A8;

 AA60:=A2 AND A7 AND A9;

 AA61:=A2 AND A7 AND A10;

 AA62:=A2 AND A8 AND A9;

 AA63:=A2 AND A8 AND A10;

 AA64:=A2 AND A9 AND A10;

 AA65:=A3 AND A4 AND A5;

 AA66:=A3 AND A4 AND A6;

 AA67:=A3 AND A4 AND A7;

 AA68:=A3 AND A4 AND A8;

 AA69:=A3 AND A4 AND A9;

 AA70:=A3 AND A4 AND A10;

 AA71:=A3 AND A5 AND A6;

 AA72:=A3 AND A5 AND A7;

 AA73:=A3 AND A5 AND A8;

 AA74:=A3 AND A5 AND A9;

 AA75:=A3 AND A5 AND A10;

 AA76:=A3 AND A6 AND A7;

 AA77:=A3 AND A6 AND A8;

 AA78:=A3 AND A6 AND A9;

 AA79:=A3 AND A6 AND A10;

 AA80:=A3 AND A7 AND A8;

 AA81:=A3 AND A7 AND A9;

 AA82:=A3 AND A7 AND A10;

 AA83:=A3 AND A8 AND A9;

 AA84:=A3 AND A8 AND A10;

 AA85:=A3 AND A9 AND A10;

 AA86:=A4 AND A5 AND A6;

 AA87:=A4 AND A5 AND A7;

 AA88:=A4 AND A5 AND A8;

 AA89:=A4 AND A5 AND A9;

 AA90:=A4 AND A5 AND A10;

 AA91:=A4 AND A6 AND A7;

 AA92:=A4 AND A6 AND A8;

 AA93:=A4 AND A6 AND A9;

 AA94:=A4 AND A6 AND A10;

 AA95:=A4 AND A7 AND A8;

 AA96:=A4 AND A7 AND A9;

 AA97:=A4 AND A7 AND A10;

 AA98:=A4 AND A8 AND A9;

 AA99:=A4 AND A8 AND A10;

 AA100:=A4 AND A9 AND A10;

 AA101:=A5 AND A6 AND A7;

 AA102:=A5 AND A6 AND A8;

 AA103:=A5 AND A6 AND A9;

 AA104:=A5 AND A6 AND A10;

 AA105:=A5 AND A7 AND A8;

 AA106:=A5 AND A7 AND A9;

 AA107:=A5 AND A7 AND A10;

 AA108:=A5 AND A8 AND A9;

 AA109:=A5 AND A8 AND A10;

 AA110:=A5 AND A9 AND A10;

 AA111:=A6 AND A7 AND A8;

 AA112:=A6 AND A7 AND A9;

 AA113:=A6 AND A7 AND A10;

 AA114:=A6 AND A8 AND A9;

 AA115:=A6 AND A8 AND A10;

 AA116:=A6 AND A9 AND A10;

 AA117:=A7 AND A8 AND A9;

 AA118:=A7 AND A8 AND A10;

 AA119:=A7 AND A9 AND A10;

 AA120:=A8 AND A9 AND A10;

 XG8:=AA1 OR AA2 OR AA3 OR AA4 OR AA5 OR AA6 OR AA7 OR AA8 OR AA9 OR AA10 OR AA11 OR AA12 OR AA13 OR AA14 OR

AA15 OR AA16 OR AA17 OR AA18 OR AA19 OR AA20 OR AA21 OR AA22 OR AA23 OR AA24 OR AA25 OR AA26 OR AA27 OR

AA28 OR AA29 OR AA30 OR AA31 OR AA32 OR AA33 OR AA34 OR AA35 OR AA36 OR AA37 OR AA38 OR AA39 OR AA40 OR

AA41 OR AA42 OR AA43 OR AA44 OR AA45 OR AA46 OR AA47 OR AA48 OR AA49 OR AA50 OR AA51 OR AA52 OR AA53 OR

AA54 OR AA55 OR AA56 OR AA57 OR AA58 OR AA59 OR AA60 OR AA61 OR AA62 OR AA63 OR AA64 OR AA65 OR AA66 OR

AA67 OR AA68 OR AA69 OR AA70 OR AA71 OR AA72 OR AA73 OR AA74 OR AA75 OR AA76 OR AA77 OR AA78 OR AA79 OR

AA80 OR AA81 OR AA82 OR AA83 OR AA84 OR AA85 OR AA86 OR AA87 OR AA88 OR AA89 OR AA90 OR AA91 OR AA92 OR

AA93 OR AA94 OR AA95 OR AA96 OR AA97 OR AA98 OR AA99 OR AA100 OR AA102 OR AA103 OR AA104 OR AA105 OR

AA106 OR AA107 OR AA108 OR AA109 OR AA110 OR AA112 OR AA113 OR AA114 OR AA115 OR AA116 OR AA117 OR

AA118 OR AA119 OR AA120;

选股:=IF(XG8,1,0),COLORRED;

DRAWTEXT(FILTER(选股=1,5),56,'---群星荟萃'),COLORYELLOW;

STICKLINE(FILTER(选股>=1,5),60,0,3,0),COLORYELLOW;

 

 

NI:=MA(HHV((H+L+C)/3,10),18);

JNCX:=CROSS(C,NI) AND C>REF(HHV(H,3),1) AND (C-REF(C,1))/REF(C,1)>0.07;

XG86:STICKLINE(JNCX>=1 AND MA(C,20)>REF(MA(C,20),1),50,0,3,0),COLORGREEN;

DRAWTEXT(XG86,45,'---金牛出现'),COLORGREEN;

 

N:=12;

M:=26;

VARF:=100-3*SMA((CLOSE-LLV(LOW,52))/(HHV(HIGH,70)-LLV(LOW,40))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1);

VAR19:=100-3*SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1);

VAR20:=VARF<REF(VAR19,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);

大资金活动:=IF(VAR20 AND COUNT(VAR20,30)=1 AND MA(C,20)>REF(MA(C,20),1),18,0),LINETHICK1,COLORRED;

XG51:STICKLINE(VAR20 AND COUNT(VAR20,30)=1  AND MA(C,20)>REF(MA(C,20),1),0,40,3,0),COLORMAGENTA;

DRAWTEXT(XG51,35,'---大资金活动'),COLORMAGENTA;

 

DIF1:=EMA(DCLOSE,12)-EMA(DCLOSE,26);

DEA1:=EMA(DIF1,9);

AAA1:=(DIF1-DEA1)*2*60;

AAF:=21;

BB:=AAA1-REF(AAA1,1);

XG55:=CROSS(BB,AAF);

STICKLINE(XG55,35,0,2,0),COLORLIMAGENTA;

DRAWTEXT(XG55,30,'---牛牛指标拾宝'),COLORLIMAGENTA;

 

 

MA1:=MA(C,5);

MA2:=MA(C,10);

MA3:=MA(C,20);

MA4:=MA(C,30);

MAA5:=MA(C,60);

P1:=ABS(MA1-MA2)+ABS(MA2-MA3)+ABS(MA1-MA4)

+ABS(MA2-MA4)+ABS(MA3-MA4)+ABS(MA1-MA3)+ABS(MA1-MAA5)

+ABS(MA2-MAA5)+ABS(MA3-MAA5)+ABS(MA4-MAA5);

五线粘合:=IF(P1/C<10/100 AND MA1>REF(MA1,1) AND MA2>REF(MA2,1),888,0)COLORRED,LINETHICK2;

 

TJ1:=(C-REF(C,1))/REF(C,1)*100>=0.1;

VARF1:=LLV(LOW,13);

VARF2:=HHV(HIGH,13);

VARF3:=SMA((CLOSE-VARF1)/(VARF2-VARF1)*100,5,1);

VARF4:=SMA((VARF2-CLOSE)/(VARF2-VARF1)*100,5,1);

AAQ:=VARF3;

BBQ:=VARF4;

VARF5:=SMA(MAX(CLOSE-REF(CLOSE,1),0),5,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),5,1)*100;

CC:=EMA(VARF5,3);

DD:=MA(C,30)>=REF(MA(C,30),1);

EE:= L<=MA(C,26) AND H>=MA(C,30) ;

MTMF:=CLOSE-REF(CLOSE,15);

MAMTMF:=MA(MTMF,8);

FF:=MAMTMF>REF(MAMTMF,2);

XGF:=CC>=REF(CC,2)AND C>O AND TJ1 AND EE AND DD AND FF;

 

EMA8:=EMA(C,8);

EMA13:=EMA(C,13),COLORFFCCCC;

EMA21:=EMA(C,21),COLORFF00FF;

EMA34:=EMA(C,34),COLORYELLOW;

EMA55:=EMA(C,55),COLORFFCC66;

EMA89:=EMA(C,89),COLORBLUE;

F1:=EMA13-EMA21<130/1000 AND EMA13-EMA34<230/1000 AND EMA13-EMA55<330/1000;

F2:=EMA21-EMA13<130/1000 AND EMA21-EMA34<230/1000 AND EMA21-EMA55<330/1000;

F3:=EMA34-EMA13<130/1000 AND EMA34-EMA21<230/1000 AND EMA34-EMA55<330/1000;

F4:=EMA55-EMA13<130/1000 AND EMA55-EMA21<230/1000 AND EMA55-EMA34<330/1000;

F5:=EMA13-EMA21<100/1000 AND EMA13-EMA34<200/1000;

FF1:=F1 AND F2 AND F3 AND F4 AND CROSS(EMA13,EMA21);

FF2:=F1 AND F2 AND F3 AND F4 AND CROSS(EMA(C,13),EMA13);

FF3:=F5 AND C>EMA89 AND CROSS(EMA13,EMA21);

G1:=EMA21-EMA34<220/1000 AND EMA21-EMA34<320/1000 AND EMA21-EMA89<420/1000;

G2:=EMA34-EMA13<220/1000 AND EMA34-EMA21<320/1000 AND EMA34-EMA89<420/1000;

G3:=EMA55-EMA21<220/1000 AND EMA55-EMA34<320/1000 AND EMA55-EMA89<420/1000;

G4:=EMA89-EMA21<220/1000 AND EMA89-EMA34<320/1000 AND EMA89-EMA55<420/1000;

GG1:=G1 AND G2 AND G3 AND G4 AND CROSS(EMA8,EMA13);

GG2:=G1 AND G2 AND G3 AND G4 AND CROSS(EMA13,EMA21);

XGK:=IF(FF1 OR FF2 OR FF3 OR GG1 OR GG2,1,0);

XG88:=五线粘合 OR XGF OR XGK,COLORRED,LINETHICK2;

AZ:=(CLOSE-MA(CLOSE,30))/MA(CLOSE,30)*(-10);

XG2:=AZ<=REF(AZ,1) AND REF(AZ,1)<REF(AZ,2) ,COLORRED,LINETHICK2;

OBV:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0);

XG9:=OBV>=HHV(OBV,60),COLORRED,LINETHICK3;

选股58:XG88 AND XG2 AND XG9,COLORRED,LINETHICK2;

STICKLINE(选股58,35,0,1.5,0),COLORBROWN;

DRAWTEXT(选股58,30,'---五线粘合'),COLORBROWN;

 

MA5:=MA(C,5);

MA10:=MA(C,10);

MA20:=MA(C,20);

MA30:=MA(C,30);

MA60:=MA(C,60);

MA120:=MA(C,120);

AAQ1:=BARSLAST(MA60>MA20 AND (MA20=MA10 OR MA20>MA10));

BBQ1:=REF(COUNT(C<MA60,AA1)=AAQ1,1);

CCQ1:=CROSS(C,MA60) AND VOL>MA(VOL,5) AND (C-REF(C,1))/REF(C,1)*100>3;

芙蓉出水:=BB AND CCQ1,COLOR00FF00;

STICKLINE(芙蓉出水,55,0,1.5,0),COLORBROWN;

DRAWTEXT(芙蓉出水,45,'---芙蓉出水'),COLORLIRED;

 

半年托:=MA60>MA120 AND MA60>MA120 AND CROSS(MA60,MA120);

月蜘蛛:=MA5>MA10 AND MA10>MA20 AND CROSS(MA5,MA20)AND CROSS(MA10,MA20);

STICKLINE(月蜘蛛,35,0,1.5,0),COLORBROWN;

DRAWTEXT(月蜘蛛,30,'---金蜘蛛'),COLORYELLOW;

730211795.jpg

730211795.jpg

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则