A. 閫氳揪淇℃寚鏍囧叕寮忓ぇ鍏
閫氳揪淇℃寚鏍囧叕寮忓ぇ鍏錛
1.銆愰氳揪淇°戜富鍔涙綔浼忥紙鍓鍥撅級-鎸囨爣鍏寮忔簮鐮
N:=14;
M:=156;
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:(TYP-MA(TYP,N))/(0.15*AVEDEV(TYP,N));
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
涓誨姏娼滀紡涓:COUNT(MACD<0,10)=10,COLORRED,LINETHICK0;
STICKLINE(涓誨姏娼滀紡涓,0,MACD*30,8,0),COLORRED;
100,COLOR1C1C1C;
0,COLOR1C1C1C;
-100,COLOR1C1C1C;
-100,STICK,COLOR1C1C1C;
2.銆愰氳揪淇°戣祫閲戠洃鎺э紙涓誨姏鎾ゃ佷富鍔涙挙銆佽秼鍔跨嚎銆佹ˉ闀囧噯澶囩幇閲戱級-鎸囨爣鍏寮忔簮鐮
V1:=(C*2+H+L)/4*10;
V2:=EMA(V1,13)-EMA(V1,34);
V3:=EMA(V2,5);V4:=2*(V2-V3)*5.5;
涓誨姏鎾:IF(V4<=0,V4,0),COLORBLUE;
涓誨姏榪:IF(V4>=0,V4,0),COLORFF00FF;
V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;
V6:=EMA(3*V5-2*SMA(V5,18,1),5);
V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;
V8:=(INDEXC*2+INDEXH+INDEXL)/4;
V9:=EMA(V8,13)-EMA(V8,34);
VA:=EMA(V9,3);
VB:=(V9-VA)/2;
澶х洏璧勯噾榪涘満:IF(VB>=0,VB,0),COLORRED;
澶х洏璧勯噾鎾よ蛋:IF(VB<=0,VB,0),COLORGREEN;
V11:=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(V11,3);
V12:=(瓚嬪娍綰-REF(瓚嬪娍綰,1))/REF(瓚嬪娍綰,1)*100;
鍑嗗囩幇閲:STICKLINE(瓚嬪娍綰<=13,0,20,5,0),COLORCC9900;
AA:=(瓚嬪娍綰<=13)ANDFILTER((瓚嬪娍綰<=13),15);
DRAWTEXT(AA,30,'鍑嗗囩幇閲慭'),COLORCC9900;
涔板叆鑲＄エ:STICKLINE(瓚嬪娍綰<=13ANDV12>13,0,50,5,0),COLOR0099FF;
BB:=(瓚嬪娍綰<=13ANDV12>13)ANDFILTER((瓚嬪娍綰<=13ANDV12>13),10);
DRAWTEXT(BB,60,'涔板叆娑蹭婦鑲＄エ'),COLOR0099FF;
鍗栦復鐣:STICKLINE(瓚嬪娍綰>90AND瓚嬪娍綰>REF(瓚嬪娍綰,1),100,95,15,1),COLORFFFF00;
瑙侀《娓呬粨:FILTER(瓚嬪娍綰>90AND瓚嬪娍綰 DRAWTEXT(瑙侀《娓呬粨,90,'閫冮《'),COLORYELLOW; CC:=(瓚嬪娍綰>=90ANDV12)ANDFILTER((瓚嬪娍綰>=90ANDV12),10); STICKLINE(澶х洏璧勯噾榪涘満AND瓚嬪娍綰<13,0,30,10,0),COLORRED; STICKLINE(澶х洏璧勯噾鎾よ蛋AND瓚嬪娍綰>90,0,30,10,0),COLORGREEN; STICKLINE(涓誨姏榪汚ND瓚嬪娍綰<13,0,40,10,0),COLORFF00FF; STICKLINE(涓誨姏鎾AND瓚嬪娍綰>90,0,40,10,0),COLORBLUE; 3.閫氳揪淇″垎鏃朵拱鐐規寚鏍囧叕寮忋愪拱鍗栥佷富鍔涘樊銆佹暎鎴峰樊銆 A1:=(DVOL/C)/2,NODRAW;A2:=SUM(IF(A1>100ANDCLOSE>REF(CLOSE,1),A1,0),0);A3:=SUM(IF(A1>100AND CLOSE CLOSE (A4/A6)*100,LINETHICK0;鏁ｅ崠:(A5/A6)*100,LINETHICK0;涓誨姏宸:鏈轟拱-鏈哄崠,LINETHICK2,NODRAW;鏁ｆ埛宸:鏁ｄ拱-鏁ｅ崠,LINETHICK0,NODRAW;DRAWTEXT(涓 鍔涘樊>0ANDREF(涓誨姏宸,1)<=0,C*0.85,'鈼忔満鏋刓'),COLORRED;DRAWTEXT(涓誨姏宸<0ANDREF(涓誨姏宸,1)>=0,-C*0.85,'鈼嬫満鏋刓'),COLORWHITE;DRAWTEXT(鏁ｆ埛宸>0ANDREF(鏁ｉ椆娑堢ⅶ鎴峰樊,1)<=0,C*0.15,'鈻叉暎鎴穃'),COLORCYAN;DRAWTEXT(鏁ｆ埛宸<0ANDREF(鏁ｆ埛宸,1)>=0,-C*0.15,'鈻蟲暎鎴穃'),COLORWHITE; 4.閫氳揪淇′富鍔涜祫閲戝垎鏃舵寚鏍囧叕寮忋愬ぇ鐩樿祫閲戣繘鍦恆佸噯澶囩幇閲戙佽侀《娓呬粨銆 V1:=(C*2+H+L)/4*10;V2:=EMA(V1,13)-EMA(V1,34);V3:=EMA(V2,5);V4:=2*(V2-V3)*5.5;涓誨姏鎾:IF(V4<=0,V4,0),COLORGREEN; 涓誨姏榪: IF(V4>=0,V4,0);V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;V6:=EMA(3*V5-2*SMA(V5,18,1),5);V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;V8:=(INDEXC*2+INDEXH+INDEXL)/4;V9:=EMA(V8,13)-EMA(V8,34);VA:=EMA(V9,3);VB:=(V9-VA)/2; 澶х洏璧勯噾榪涘満:IF(VB>=0,VB,0),COLORYELLOW; 澶х洏璧勯噾鎾よ蛋:IF(VB<=0,VB,0),COLORRED;V11:=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(V11,3);V12:=(瓚嬪娍綰-REF(瓚嬪娍綰,1))/REF(瓚嬪娍綰,1)*100; 鍑嗗囩幇閲:STICKLINE(瓚嬪娍綰<=13,0,20,5,0),COLORCC9900;AA:=(瓚嬪娍綰<=13)ANDFILTER((瓚嬪娍綰<=13),15);DRAWTEXT(AA,30,'鍑嗗囩幇閲慭'),COLORCC9900;涔板叆鑲＄エ:STICKLINE(瓚嬪娍綰<=13ANDV12>13,0,50,5,0),COLOR0099FF;BB:=(瓚嬪娍綰<=13ANDV12>13)ANDFILTER((瓚嬪娍綰<=13ANDV12>13),10);DRAWTEXT(BB,60,'涔板叆鑲＄エ'),COLOR0099FF; 瑙侀《娓呬粨:STICKLINE(瓚嬪娍綰>=90ANDV12,0,30,5,0),COLORRED;CC:=(瓚嬪娍綰>=90ANDV12)ANDFILTER((瓚嬪娍綰>=90ANDV12),10); 5.銆愰氳揪淇°戜富鍔涜祫閲戞祦錛堜拱閲忋佸崠閲忥級-鎸囨爣鍏寮忔簮鐮 AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 涔伴噺:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE 鍗栭噺:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE 榪涘嚭閲:=涔伴噺+鍗栭噺,COLOR00FFFF;STICKLINE(榪涘嚭閲<0,0,榪涘嚭閲,1,0),COLORFF6600; STICKLINE(榪涘嚭閲<0,0,榪涘嚭閲,3,0),COLORFF9900; STICKLINE(榪涘嚭閲<0,0,榪涘嚭閲,1.5,0),COLORFFCC00; STICKLINE(榪涘嚭閲<0,0,榪涘嚭閲,0.5,0),COLORCYAN; STICKLINE(榪涘嚭閲>0,0,榪涘嚭閲,3,0),COLOR000099; STICKLINE(榪涘嚭閲>0,0,榪涘嚭閲,3,0),COLOR0000CC; STICKLINE(榪涘嚭閲>0,0,榪涘嚭閲,1.0,0),COLOR0000FF; STICKLINE(榪涘嚭閲>0,0,榪涘嚭閲,0.5,0),COLORCC66FF;N:=1;QJ0:=(HIGH+LOW+CLOSE)/3; QJ1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE)); QJ2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-QJ0); QJ3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW); QJ4:=IF(HIGH=LOW,1,QJ0-MIN(CLOSE,OPEN)); QJ5:=VOL/(IF(HIGH=LOW,4,HIGH-LOW)); QJ6:="MACD.DIF">"MACD.DEA"AND"MACD.DEA"<0; QJ7:="KDJ.K">"KDJ.D"AND"KDJ.D"<30; QJ8:="MACD.DIF"<"MACD.DEA"; QJ9:="KDJ.K"<"KDJ.D"AND"KDJ.K">80; 鐗瑰ぇ:QJ4*QJ5,NODRAW;澶у崟:QJ3*QJ5,NODRAW; 涓鍗:QJ1*QJ5,NODRAW;灝忓崟:QJ2*QJ5,NODRAW; W1:=SUM(澶у崟,N)+SUM(鐗瑰ぇ,N);W2:=SUM(灝忓崟,N)+SUM(涓鍗,N); 閲忔尟1:=鐗瑰ぇ>澶у崟AND澶у崟>灝忓崟; 閲忔尟2:=鐗瑰ぇ<灝忓崟AND澶у崟<灝忓崟; 鏍囨尟1:=QJ6ANDQJ7; 鏍囨尟2:=QJ8ANDQJ9; A:=W1-W2;A0:=IF(A>0,A,0);B0:=IF(A<0,A,0); STICKLINE(A0,0,A0,1,0),COLOR000044;涓誨姏鎸佷粨:EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),COLORFF00FF;涓誨姏絳圭爜闆嗕腑搴:WINNER(C)*100,COLORRED; B. 【全新升級版】主力多空動向指標源碼 全新升級版主力多空動向指標源碼解析： 一、源碼概述 該源碼是一個用於通達信軟體的簡單主力多空動向指標，主要通過判斷大單成交量來推測主力的多空方向。源碼中包含計算大單成交量、主力資金凈流入以及繪制柱狀圖展示多空動向的功能。 二、源碼詳解 計算大單成交量： 計算主力資金凈流入： 繪制柱狀圖展示多空動向： 三、使用說明 四、注意事項 C. 跪求：通達信版L2大單凈量指標源碼，請友友割愛喲。
主力買力度:LARGEINTRDVOL*100/VOL,COLORRED; D. 主力大量買入分時圖指標公式
主力分時買賣指標公式
主力賣力度:LARGEOUTTRDVOL*100/VOL,COLORGREEN;
超B:=L2_VOL(0,0)*VOL/CAPITAL;
大B:=L2_VOL(1,0)*VOL/CAPITAL;
中B:=L2_VOL(2,0)*VOL/CAPITAL;
小B:=L2_VOL(3,0)*VOL/CAPITAL;
超S:=-L2_VOL(0,1)*VOL/CAPITAL;
大S:=-L2_VOL(1,1)*VOL/CAPITAL;
中S:=-L2_VOL(2,1)*VOL/CAPITAL;
小S:=-L2_VOL(3,1)*VOL/CAPITAL;
凈流入:=(超B+大B+中B+小B)+(超S+大S+中S+小S);
大宗凈流入:=(超B+大B)+(超S+大S);
超凈:=超B+超S;
大凈:=大B+大S;
中凈:=中B+中S;
散凈:=小B+小S;
AA:=CONST(MAX(ABS(凈流入),MAX(ABS(大宗凈流入),MAX(ABS(超凈),MAX(ABS(大凈),MAX(ABS(中凈),ABS(散凈)))))))*3,NODRAW;
DRAWRECTREL(10,CONST(830-(ABS(大宗凈流入)*500/AA)),50,945,IF(CONST(大宗凈流入)>0,RGB(250,0,0),RGB(0,50,0)));
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.01,0.88,0,INTPART(大宗凈流入)),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.014,1,0,' 大宗'),COLORYELLOW;
DRAWRECTREL(55,CONST(830-(ABS(超凈)*500/AA)),95,945,IF(CONST(超凈)>0,RGB(255,0,0),RGB(0,50,0)));
DRAWRECTREL(100,CONST(830-(ABS(大凈)*500/AA)),140,945,IF(CONST(大凈)<0,RGB(0,50,0),RGB(255,0,0)));
DRAWRECTREL(145,CONST(830-(ABS(中凈)*500/AA)),185,945,IF(CONST(中凈)>0,RGB(255,0,0),RGB(0,50,0)));
DRAWRECTREL(190,CONST(830-(ABS(散凈)*500/AA)),230,945,IF(CONST(散凈)<0,RGB(0,50,0),RGB(255,0,0)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.061,1,0,' 超凈 大凈 中凈 散凈'),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.055,0.88,0,INTPART(超凈)),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.103,0.88,0,INTPART(大凈)),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.144,0.88,0,INTPART(中凈)),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.190,0.88,0,INTPART(散凈)),COLORYELLOW;
AAD:=CONST(MAX(ABS(主力買力度),ABS(主力賣力度)))*4,NODRAW;
DRAWRECTREL(0,515,CONST(ABS(主力買力度)*500/AAD),568,IF(CONST(主力買力度)>0,RGB(255,0,0),RGB(0,50,0)));
DRAWRECTREL(0,570,CONST(ABS(主力賣力度)*500/AAD),623,IF(CONST(主力賣力度)>0,RGB(0,50,0),RGB(255,0,0)));
DRAWTEXT_FIX(1,0,0.512,0,STRCAT('主力買力度:',CON2STR(主力買力度,0))),COLORYELLOW;
DRAWTEXT_FIX(1,0,0.57,0,STRCAT('主力賣力度:',CON2STR(主力賣力度,0))),COLORYELLOW;
N:=60;
K1:=IF(CLOSE>=REF(CLOSE，1)，HIGH-OPEN+CLOSE-LOW+CLOSE-REF(CLOSE，1)，HIGH-OPEN+CLOSE-LOW);
K2:=IF(CLOSE<=REF(CLOSE，1)，OPEN-LOW+HIGH-CLOSE+REF(CLOSE，1)-CLOSE，OPEN-LOW+HIGH-CLOSE);
DT:=VOL*K1/(K1+K2);
KT:=VOL-DT;
主力買量:SUM(DT，N)，COLORRED;
主力賣量:SUM(KT，N)，COLORCYAN;
拓展資料：
通達信分時圖買入指標
A1:=(DVOL/C)/2，NODRAW;
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE，1)，A1，0)，0);
A3:=SUM(IF(A1>100 AND CLOSE
A5:=SUM(IF(A1<100 AND CLOSE
機買:(A2/A6)*100，LINETHICK2，COLORRED;
機賣:(A3/A6)*100，LINETHICK2，COLORGREEN;
散買:(A4/A6)*100，LINETHICK0;
散賣:(A5/A6)*100，LINETHICK0;
主力差:機買-機賣，LINETHICK2，NODRAW;
散戶差:散買-散賣，LINETHICK0，NODRAW;
DRAWTEXT(主力差>0 AND REF(主力差，1)<=0，C*0.85，'●機構')，COLORRED;
DRAWTEXT(主力差<0 AND REF(主力差，1)>=0，-C*0.85，'○機構')，COLORWHITE;
DRAWTEXT(散戶差>0 AND REF(散戶差，1)<=0，C*0.15，'▲散戶')，COLORCYAN;
DRAWTEXT(散戶差<0 AND REF(散戶差，1)>=0，-C*0.15，'△散戶')，COLORWHITE;
主力買賣指標是敏感度比較高的指標.通常表現主力的活躍程度如何，進RO出.從上圖可以看到大盤的想對應指標。(60分鍾K線圖)
可以看到這個指標從2372點漲到2600左右出現了頂部.然後一直到今天最高的2646.明顯看得出.從2600點的地方到2646點的位置是逐步下降的.意味著大盤准備要跌.指數上升，但是指標向下走.這個時候就要注意了.一旦指標從上向下交叉就意味著新的一輪大跌剛開始.反之上漲剛開始.所以做短線投資的朋友.要留意這個指標.他從上向下穿直到走平向上穿的過程沒走好的話千萬不要進場，不然後果自己知道.不用說了!你們可以參考大盤以往的走勢來仔細研究這個指標.做短線的參考30分鍾和60分鍾K線更為准確!
該指標大智慧和通達信都有.方便易看.
指數下跌創新低或橫盤，指標的底部持平或不斷抬高.意味著准備上漲.
指數上漲創新高或橫盤，指標的高點持平或不斷降低，意味著准備下跌.
白線為短期趨勢線，黃線為中期趨勢線，紫線為長期趨勢線。
1、主力買賣與主力進出配合使用時准確率極高。
2、當底部構成發出信號，且主力進出線向上時判斷買點，准確率極高。
3、當短線上穿中線及長線時，形成最佳短線買點交叉形態（如底部構成已發出信號或主力進出線也向上且短線乖離率不大時）。
4、當短線、中線均上穿長線，形成中線最佳買點形態（如底部構成已發出信號或主力進出線也向上且三線均向上時）。
5、當短線下穿中線，且短線與長線正乖離率太大時，形成短線最佳賣點交叉形態。
6、當短線、中線下穿長線，且是主力進出已走平或下降時，形成中線最佳賣點交叉形態。
7、在上升途中，短、中線回落受長線支撐再度上行之時，為較佳的買入時機。
8、指標在0以上表明個股處於強勢，指標跌穿0線表明該股步入弱勢。