通达信黑马通道主副图全套公式源码

看到好多同学对黑码通道公式感兴趣就把他全部奉献给同学，省得东找西找，来自网络，我只是搬运工而已。
 

黑码通道主附图公式

先建引用
1.SQWE
VAR1:=(C+H+O+L)/4;
SQWE:XMA(VAR1,32)*(1-100/1000);
STICKLINE(C>0,0,10,15,0),COLOR781816;

2.AQWE
VAR1:=(C+H+O+L)/4;
AQWE:XMA(VAR1,20)*(1+80/1000);
STICKLINE(C>0,0,10,15,0),COLOR781816;

黑码通道主图
STICKLINE(CLOSE> REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORRED;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR000055;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR000088;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR0000AA;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLOR0000CC;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLOR0000FF;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLOR0000EE;

STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLOR666600;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR555500;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR888800;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLORAAAA00;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBB00;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORCCCC00;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLOREEEE00;
STICKLINE(CLOSE= REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE;

STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR555555;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR777777;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR999999;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF;

SS1:=1121010;
SS3:=DATE<SS1;

AAA1:=(C-REF(C,1))/REF(C,1)>=0.058 AND (C-REF(C,1))/REF(C,1)<0.095 AND SS3;
AA2:=(C-REF(C,1))/REF(C,1)>=0.098 AND SS3;
STICKLINE(AAA1,O,C,0,1 ),COLOR9B37FF;
STICKLINE(AAA1,OPEN,CLOSE,3,0 ),COLOR6300C6;
STICKLINE(AAA1,OPEN,CLOSE,2.7,0 ),COLOR6D00DB;
STICKLINE(AAA1,OPEN,CLOSE,2.1,0 ),COLOR7800F0;
STICKLINE(AAA1,OPEN,CLOSE,1.5,0 ),COLOR8000FF;
STICKLINE(AAA1,OPEN,CLOSE,0.9,0 ),COLOR8F20FF;
STICKLINE(AAA1,OPEN,CLOSE,0.3,0 ),COLOR9B37FF;
{DRAWTEXT(AAA1,L*0.96,'大阳'),COLOR9B37FF;}

STICKLINE(AA2,C,O,3,0 ),COLOR00AAFF;
STICKLINE(AA2,C,O,2.1,0 ),COLOR00BBFF;
STICKLINE(AA2,C,O,1.5,0 ),COLOR00CCFF;
STICKLINE(AA2,C,O,1,0 ),COLOR00DDFF;
STICKLINE(AA2,C,O,0.6,0 ),COLOR00EEFF;
STICKLINE(AA2,C,O,0.2,0 ),COLOR00FFFF;
{DRAWTEXT(AA2,L*0.98,'涨停'),COLOR00DDDD;
DRAWICON( AA2,L*0.98,1);}

AA1:="AQWE.AQWE#DAY";
BB1:="SQWE.SQWE#DAY";
VAR1:=(C+H+O+L)/4;

SJXZ:=IF(DATE<1931128,1,0);
DRAWTEXT_FIX(1=1,0.7,0,0,''),COLORWHITE;
 

通道上轨:AA1*SJXZ,COLORYELLOW,LINETHICK2;
通道下轨:BB1*SJXZ,COLORRED,LINETHICK2;

风险:=100*(L-BB1)/BB1,NODRAW;
幅度:=100*(AA1-BB1)/BB1,NODRAW;

STICKLINE(AA1>LOW AND AA1<HIGH,AA1,MAX(AA1,MAX(OPEN,CLOSE)),3,0),COLORYELLOW;
STICKLINE(AA1>LOW AND AA1<HIGH,AA1,HIGH,0,0),COLORYELLOW;
STICKLINE(AA1<LOW,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(AA1<LOW,OPEN,CLOSE,1,0),COLORYELLOW;
STICKLINE(AA1<LOW,HIGH,LOW,0,0),COLORYELLOW;
STICKLINE(BB1>LOW AND BB1<HIGH,BB1,MIN(MIN(OPEN,CLOSE),BB1),3,0),COLORRED;
STICKLINE(BB1>MIN(C,O) AND BB1<MAX(C,O),BB1,MIN(OPEN,CLOSE),3,0),COLORRED;
STICKLINE(BB1>HIGH,OPEN,CLOSE,3,0),COLORRED;
STICKLINE(BB1>HIGH,HIGH,LOW,0,0),COLORRED;

{VAR2:=LLV(LOW,10);
VAR3:=HHV(HIGH,25);
动能趋势线:=100*EMA((CLOSE-VAR2)/(VAR3-VAR2),4);
DRAWTEXT(CROSS(动能趋势线,70)AND C>通道上轨,HIGH*1.02,'←卖出'),COLORYELLOW;}

{RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
X:=LLV(J,2)=LLV(J,8);
DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<20 AND C<通道下轨,LOW,'↖买入'),COLORRED;}
DRAWTEXT_FIX(1=1,0.7,0.05,0,''),COLORRED;
DRAWTEXT_FIX(1=1,0.7,0.1,0,''),COLORWHITE;

H-MAX启动确认副图公式

参数： SS 2.00 200.00 12.00 LL 2.00 200.00 26.00 MM 2.00 200.00 200.00 SSS 2.00 200.00 9.00 LLL 2.00 200.00 34.00
SJXZ:=IF(DATE<1981128,1,0);
DRAWTEXT_FIX(1=1,0.7,0,0,''),COLORWHITE;

DIF:=EMA(CLOSE,SS)-EMA(CLOSE,LL);
DEA:=EMA(DIF,MM);
A:=(DIF-DEA)*2*SJXZ;
黄金钻信号:IF(A<0,0,A*A),LINETHICK3,,COLORRED;

DIF1:=EMA(CLOSE,SSS)-EMA(CLOSE,LLL);
DEA1:=EMA(DIF1,200);
AA:=(DIF1-DEA1)*2*SJXZ;
启动引导线:IF(A<0,0,AA*AA),LINETHICK2,COLOR0055FF;

MID:=MA(CLOSE,30);
红码:=MID+2*STD(CLOSE,30),LINETHICK2,COLOR0055FF;
XX:=EMA(C,5),LINETHICK2,COLORGREEN;
DRAWICON(C>红码 AND C>=O ,黄金钻信号,26);