通达信智能主图2源码

量比:=V/REF(MA(V,1),1);

JRH:=HHV(C,2);

JRL:=LLV(C,2);

NB:=3*两点;

MA1:MA(CLOSE,M1)COLORWHITE;

STICKLINE(C =REF(C,1),O,C,NB,1),COLOR000000;

STICKLINE(C REF(C,1),O,C,NB,1),COLOR000000;

VAR101:=(CLOSE REF(CLOSE,1) AND CLOSE REF(CLOSE,2))*两点;

VAR102:=(REF(VAR101,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR103:=(REF(VAR102,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR104:=(REF(VAR103,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR105:=(REF(VAR104,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR106:=(REF(VAR105,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR107:=(REF(VAR106,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR108:=(REF(VAR107,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR109:=(REF(VAR108,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VARA:=(REF(VAR109,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VARB:=(REF(VARA,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VARC:=(REF(VARB,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VARD:=(CLOSE REF(CLOSE,1) AND CLOSE REF(CLOSE,2));

VARE:=(REF(VARD,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VARF:=(REF(VARE,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR010:=(REF(VARF,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR011:=(REF(VAR010,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR012:=(REF(VAR011,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR013:=(REF(VAR012,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR014:=(REF(VAR013,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR015:=(REF(VAR014,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR016:=(REF(VAR015,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR017:=(REF(VAR016,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR018:=(REF(VAR017,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));

VAR019:=((REF(VARD OR VARE OR VARF OR VAR010 OR VAR011 OR VAR012 OR VAR013 OR VAR014 OR VAR015 OR VAR016 OR VAR017 OR VAR018,1)) AND VAR101);

VAR1A:=((REF(VAR101 OR VAR102 OR VAR103 OR VAR104 OR VAR105 OR VAR106 OR VAR107 OR VAR108 OR VAR109 OR VARA OR VARB OR VARC,1)) AND VARD);

持股:VAR101 OR VAR102 OR VAR103 OR VAR104 OR VAR105 OR VAR106 OR VAR107 OR VAR108 OR VAR109 OR VARA OR VARB OR VARC,COLOR0000FF,NODRAW;

观望:VARD OR VARE OR VARF OR VAR010 OR VAR011 OR VAR012 OR VAR013 OR VAR014 OR VAR015 OR VAR016 OR VAR017 OR VAR018,COLORFFFF00,NODRAW;

离场:=IF(持股,JRL,DRAWNULL);

明离场价:离场,COLORFF99FF,NODRAW;

DRAWTEXT_FIX(1,0.50,5,0,'马杰优化黑马指标'),COLOR00FFFF;

进:=IF(观望,JRH,DRAWNULL);

离场价:=REF(离场,1),COLORMAGENTA,NODRAW;

明短买价:进,COLOR33AACC,NODRAW;

短买价:=REF(明短买价,1),COLORYELLOW,NODRAW;

趋势线:((MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,15)+MA(CLOSE,20))/4)*三线,LINETHICK2,COLORGREEN;

IF(趋势线 REF(趋势线,1),趋势线,DRAWNULL),LINETHICK2,COLORRED;

辅助线:MA(CLOSE,26)*三线,COLORFF00FF;

IF(辅助线 REF(辅助线,1),辅助线,DRAWNULL),LINETHICK2,COLORFF00FF;

IF(辅助线 REF(辅助线,1),辅助线,DRAWNULL),LINETHICK2,COLOR669933;

生命线:EMA(CLOSE,55)*三线, CIRCLEDOT,COLORYELLOW;

VAR1MZ:=((CLOSE REF(CLOSE,1)) AND (CLOSE REF(CLOSE,2)))*两点;

VAR2MZ:=((REF(VAR1MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR3MZ:=((REF(VAR2MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR4MZ:=((REF(VAR3MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR5MZ:=((REF(VAR4MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR6MZ:=((REF(VAR5MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR7MZ:=((REF(VAR6MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR8MZ:=((REF(VAR7MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR9MZ:=((REF(VAR8MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VARAMZ:=((REF(VAR9MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VARBMZ:=((REF(VARAMZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VARCMZ:=((REF(VARBMZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

{红K}

STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),L,H,0,0),COLOR0000DD;

STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,REF(C,1),2.7.2,0),COLOR0000AA;

STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,REF(C,1),1.9.4,0),COLOR0000BB;

STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,REF(C,1),0.9.2,0),COLOR0000CC;

STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,REF(C,1),1,0),COLOR0000DD;

STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,REF(C,1),0.8,0),COLOR0000EE;

STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,REF(C,1),0.4,0),COLOR0000FF;

STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,REF(C,1),0.2,0),COLOR0000FF;

STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,REF(C,1),0,0),COLOR0000FF;

VARDMZ:=((CLOSE REF(CLOSE,1)) AND (CLOSE REF(CLOSE,2)))*两点;

VAREMZ:=((REF(VARDMZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VARFMZ:=((REF(VAREMZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR10MZ:=((REF(VARFMZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR11MZ:=((REF(VAR10MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR12MZ:=((REF(VAR11MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR13MZ:=((REF(VAR12MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR14MZ:=((REF(VAR13MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR15MZ:=((REF(VAR14MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR16MZ:=((REF(VAR15MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR17MZ:=((REF(VAR16MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

VAR18MZ:=((REF(VAR17MZ,1) AND (CLOSE = REF(CLOSE,1))) AND (CLOSE = REF(CLOSE,2)));

{绿K}

STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),C,REF(C,1),2.7.2,0),COLORAAAA00;

STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),C,REF(C,1),1.9.4,0),COLORBBBB00;

STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),C,REF(C,1),0.9.2,0),COLORCCCC00;

STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),C,REF(C,1),1,0),COLORDDDD00;

STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),C,REF(C,1),0.8,0),COLOREEEE00;

STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),C,REF(C,1),0.4,0),COLORFFFF00;

STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),H,L,0,0 ),COLORFFFF00;

VAR19MZ:=(REF((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),1) AND VAR1MZ);

VAR1AMZ:=(REF((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),1) AND VARDMZ);

{粉红}

STICKLINE(VAR19MZ,REF(CLOSE,1),REF(CLOSE,2),2.7.2,0),COLOR33AACC;

STICKLINE(VAR19MZ,REF(CLOSE,1),REF(CLOSE,2),1.9.0.4,0),COLOR33BBCC;

STICKLINE(VAR19MZ,REF(CLOSE,1),REF(CLOSE,2),0.9.1.2,0),COLOR33CCCC;

STICKLINE(VAR19MZ,REF(CLOSE,1),REF(CLOSE,2),1,0),COLOR33DDCC;

STICKLINE(VAR19MZ,REF(CLOSE,1),REF(CLOSE,2),0.8,0),COLOR33EECC;

STICKLINE(VAR19MZ,REF(CLOSE,1),REF(CLOSE,2),0.4,0),COLOR33FFCC;

STICKLINE(VAR19MZ,REF(CLOSE,1),REF(CLOSE,2),0.2,0),COLOR33FFCC;

DRAWTEXT(VAR19MZ,REF(L,0),'买'),COLOR33FFCC;

{黄色}

STICKLINE(VAR1AMZ,REF(CLOSE,1),REF(CLOSE,2),2.7.2,0),COLORFF33FF;

STICKLINE(VAR1AMZ,REF(CLOSE,1),REF(CLOSE,2),1.9.4,0),COLORFF44FF;

STICKLINE(VAR1AMZ,REF(CLOSE,1),REF(CLOSE,2),0.9.2,0),COLORFF55FF;

STICKLINE(VAR1AMZ,REF(CLOSE,1),REF(CLOSE,2),1,0),COLORFF66FF;

STICKLINE(VAR1AMZ,REF(CLOSE,1),REF(CLOSE,2),0.8,0),COLORFF77FF;

STICKLINE(VAR1AMZ,REF(CLOSE,1),REF(CLOSE,2),0.4,0),COLORFF88FF;

STICKLINE(VAR1AMZ,REF(CLOSE,1),REF(CLOSE,2),0.2,0),COLORFF99FF;

JD1:=MAX(MAX(趋势线,辅助线),生命线);

JX1:=MIN(MIN(趋势线,辅助线),生命线);

金手指:(H JD1 AND L JX1) AND C/REF(C,1) 1.03 AND C O AND 量比 1.3 AND H/MAX(O,C) 1.03,NODRAW;

离场1:=IF(VAR1AMZ,1,0),COLORMAGENTA,NODRAW;

短买1:IF(VAR19MZ,1,0),COLORYELLOW,NODRAW;

红色:趋势线 REF(趋势线,1),COLORRED,NODRAW;

画图标:DRAWICON(金手指,L,11);

A:=(3*C+L+O+H)/6;

X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;

S2:=SMA(C,3,1);

S6:=SMA(C,5,1);

DK:=2*(S2-S6);

V1:=EMA(CLOSE,5);

V2:=EMA(EMA(CLOSE,90)*1.01,10);

DRAWTEXT(CROSS(V1,V2),V1+0.05,'资金关注'),COLOR00FF00;

VAR1:=LLV(LOW,21);

VAR2:=HHV(HIGH,21);

AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);

AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);

AB:=CROSS(AK1,AK);

DRAWTEXT((AB = 1),(LOW * 0.97),'○牛窝'),COLORYELLOW;

AA1:=AMOUNT/V;

BB1:=L AA1*0.9;

CC1:=(C-REF(C,1))/REF(C,1)*100

DD1:=L MA(C,5)*0.921;

EE1:=V MA(V,5)*1.5;

老鼠仓:=BB1 AND CC1 AND DD1 AND EE1,LINETHICK0,COLOR0099FF;

DRAWTEXT(老鼠仓,L*0.95,'异动'),COLOR0099FF;

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),45),(LOW)*(0.90),'★大胆搏 '),COLOR00FFFF;

DRAWTEXT(FILTER((VAR4AA 90),35),(LOW)*(0.94),'★加仓'),COLOR00FFFF;

M1:=MA(CLOSE,4);

M2:=MA(CLOSE,13);

M3:=MA(CLOSE,24);

M4:=MA(CLOSE,30);

M5:=MA(CLOSE,120);

AA:=(C-REF(C,1))/REF(C,1)*100;

AAA:=(H-REF(C,1))/REF(C,1)*100;

VA:=IF(CLOSE REF(CLOSE,1),VOL,-VOL);

OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);

MAOBV30:=MA(OBV,30);

B:= OBV.OBV

A2:=B REF(HHV(B,30),1);

涨停:=IF((C-REF(C,1))*100/REF(C,1) =(10-0.01*100/REF(O,1)),1,0);

创新高1:=HIGH =HHV(HIGH,20);

Z:=REF(涨停,1) ;

W:=COUNT(Z ,5)

W3:=COUNT(Z ,13)

LK:=O =REF(C,1) AND AA

W2:=COUNT(LK ,2)

至尊:=W AND AA 2.5 AND REF(W2,1) AND REF(AA 2.4,1) AND M4

STICKLINE(涨停,O,C,2,0),COLORYELLOW;

创新高:=HIGH =HHV(HIGH,150);

第一次创新高:=创新高=1 AND BARSLAST(REF(创新高=1,1)) =1 AND AA

DRAWTEXT(FILTER(第一次创新高=1,1),LOW-0.2,'新高'),COLORYELLOW;

放量:=V MA(V,89) ;

异动:=放量=1 AND BARSLAST(REF(放量=1,1)) =6 AND H BOLL AND M4

STICKLINE(至尊,OPEN,CLOSE,1,0),COLORF00FF0;

DRAWICON(至尊,LOW-0.3,1);

DRAWICON(至尊,LOW-1,24);

DRAWICON(至尊,LOW-1.5,25);

DRAWICON(至尊,LOW-2,24);

DRAWTEXT_FIX(1,0.00,0,0,'行业：'),COLORWHITE;

DRAWTEXT_FIX(1,0.04,0,0,HYBLOCK),COLORWHITE;

DRAWTEXT_FIX(1,0.14,0,0,'概念：'),COLORWHITE;

DRAWTEXT_FIX(1,0.18,0,0,GNBLOCK),COLORWHITE;