相關標簽:

?

機構動向，機構建倉，跟著機構走就對了，僅供參考

?

原理解析：
LC賦值:1日前的收盤價 RSI5賦值:(((收盤價-LC)和0的較大值的5日[1日權重]移動平均 / (收盤價-LC)的絕對值的5日[1日權重]移動平均) * 100) TR1賦值:(最高價-最低價)和(最高價-1日前的收盤價)的絕對值的較大值和(最低價-1日前的收盤價)的絕對值的較大值的10日累和 HD賦值:(最高價-1日前的最高價) LD賦值:(1日前的最低價 - 最低價) DMP賦值:如果((HD>0)AND(HD>LD)),返回HD,否則返回0的10日累和 DMM賦值:如果((LD>0)AND(LD>HD)),返回LD,否則返回0的10日累和 PDI賦值:((DMP * 100) / TR1) MDI賦值:((DMM * 100) / TR1) ADX賦值:(((MDI-PDI)的絕對值/(MDI+PDI))*100)的5日簡單移動平均 AV賦值:(RSI5 + ADX) DXR賦值:(((ADX + 5日前的ADX) / 2) + RSI5) WR10賦值:((100 * (10日內最高價的最高值 - 收盤價)) / (10日內最高價的最高值 - 10日內最低價的最低值)) NEWVOL賦值:(RSI5 - WR10) 最佳買入賦值:(AV + NEWVOL) 輸出買入選股:如果最佳買入上穿0,返回4,否則返回0,STICK,COLOR00FFFF,線寬為2 VARA1賦值:買入選股的3日[1日權重]移動平均 VARA2賦值:VARA1的3日[1日權重]移動平均,COLOR0000FF VARA3賦值:VARA2的3日[1日權重]移動平均,COLOR00FFFF 輸出建倉買點:如果VARA2上穿VARA3AND(VARA2<40),返回5,否則返回0*10000,COLOR0000FF,線寬為1 當滿足條件建倉買點時,在0和1.5位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFF80FF 當滿足條件建倉買點時,在0.5和2.8位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR3000FF RSV賦值:(((收盤價 - 9日內最低價的最低值) / (9日內最高價的最高值 - 9日內最低價的最低值)) * 50) K賦值:RSV的3日[1日權重]移動平均 D賦值:K的3日[1日權重]移動平均 J賦值:3*K-2*D X賦值:2日內J的最低值=8日內J的最低值 輸出最佳買入時機: 如果J上穿3,返回1,否則返回0,STICK,COLORFFFF00 當滿足條件最佳買入時機時,在0和1位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR009999 當滿足條件最佳買入時機時,在0和1位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR00DDDD 當滿足條件最佳買入時機時,在0和1位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FFFF 輸出機構建倉: 如果最佳買入<5,返回-0.5,否則返回0,STICK,COLOR00FF00,線寬為1 輸出機構建倉日:當滿足條件機構建倉時,在0和-1位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLOR00FF00,線寬為5 輸出趨勢:3*(收盤價-38日內最低價的最低值)/(38日內最高價的最高值-38日內最低價的最低值)*100的5日[1日權重]移動平均-2*(收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值)*100的5日[1日權重]移動平均的3日[1日權重]移動平均,線寬為2,COLORFF99FF,NODRAW 輸出備錢: 如果趨勢<=20,返回-0.8,否則返回0,COLORD0D0D0,STICK,線寬為3 輸出快買: 如果趨勢<=10,返回1,否則返回0,COLORFF38FF,STICK,線寬為3 BIAS1賦值:(收盤價-收盤價的6日簡單移動平均)/收盤價的6日簡單移動平均*100,COLORFFDDCC 輸出BIAS2:(收盤價-收盤價的13日簡單移動平均)/收盤價的13日簡單移動平均*100,COLORFFFFFF,線寬為1 BIAS3賦值:(收盤價-收盤價的26日簡單移動平均)/收盤價的26日簡單移動平均*100,COLORFFFFFF,線寬為1 輸出乖離:(BIAS1+2*BIAS2+3*BIAS3)/6,COLOR00FFFF 輸出乖離超限:乖離的3日簡單移動平均,COLORFF80FF 當滿足條件乖離上穿乖離超限AND乖離超限<-9時,在-4和0位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.,COLORFFFFFF 當滿足條件乖離超限上穿乖離AND乖離>10時,在6和0位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF88FF 畫帶狀線 輸出警跌:如果BIAS2<1日前的BIAS2,返回BIAS2,否則返回無效數,COLORFF6128,線寬為3 輸出回升:如果BIAS2>1日前的BIAS2,返回BIAS2,否則返回無效數,COLOR00FFFF,線寬為3 輸出R:收盤價-1日前的收盤價和0的較大值的6日[1日權重]移動平均/收盤價-1日前的收盤價的絕對值的6日[1日權重]移動平均*100,COLORFFCCFF,NODRAW 輸出R2:收盤價-1日前的收盤價和0的較大值的13日[1日權重]移動平均/收盤價-1日前的收盤價的絕對值的13日[1日權重]移動平均*100,COLOR00CCFF,NODRAW 當滿足條件R2上穿RANDR2>78時,在2和0位置之間畫柱狀線,寬度為3,-1不為0則畫空心柱.,COLOR30FFFF CC賦值:(收盤價-1日前的收盤價)/1日前的收盤價*100>1.2 DD賦值:最低價<收盤價的5日簡單移動平均*0.921 EE賦值:成交量(手)<成交量(手)的5日簡單移動平均*1.5 老鼠倉賦值:(最低價<(成交額(元)/成交量(手))*0.9) AND CC AND DD AND EE,線寬為0,COLOR0099FF 當滿足條件老鼠倉時,在-5位置書寫文字,COLORFFFFFF 當滿足條件乖離上穿BIAS1ANDBIAS2>15時,在乖離和0位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR3300FF 當滿足條件乖離上穿BIAS1*0.382時,在-1位置畫1號圖標,畫綠色 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

?來源:程序化99（ www.kzuj.com.cn ）

源碼：

?

?

LC:=REF(CLOSE,1);
RSI5:=((SMA(MAX((CLOSE-LC),0),5,1) / SMA(ABS((CLOSE-LC)),5,1)) * 100);
TR1:=SUM(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((LOW-REF(CLOSE,1)))),10);
HD:=(HIGH-REF(HIGH,1));
LD:=(REF(LOW,1) - LOW);
DMP:=SUM(IF(((HD> 0) AND (HD > LD)),HD,0),10);
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10);
PDI:=((DMP * 100) / TR1);
MDI:=((DMM * 100) / TR1);
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);
AV:=(RSI5 + ADX);
DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5);
WR10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));
NEWVOL:=(RSI5 - WR10);
最佳買入:=(AV + NEWVOL);
買入選股:IF(CROSS(最佳買入,0),4,0),STICK,COLOR00FFFF,LINETHICK2;
VARA1:=SMA(買入選股,3,1);
VARA2:=SMA(VARA1,3,1),COLOR0000FF;
VARA3:=SMA(VARA2,3,1),COLOR00FFFF;
建倉買點:IF(CROSS(VARA2,VARA3) AND (VARA2<40),5,0* 10000),COLOR0000FF,LINETHICK1;
STICKLINE(建倉買點,0,1.5,6,0),COLORFF80FF;
STICKLINE(建倉買點,0.5,2.8,2,0),COLOR3000FF;
RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 50);
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
X:=LLV(J,2)=LLV(J,8);
最佳買入時機: IF(CROSS(J,3),1,0),STICK,COLORFFFF00;
STICKLINE(最佳買入時機,0,1,3,0),COLOR009999;
STICKLINE(最佳買入時機,0,1,2,0),COLOR00DDDD;
STICKLINE(最佳買入時機,0,1,1,0),COLOR00FFFF;
機構建倉: IF(最佳買入<5,-0.5,0),STICK,COLOR00FF00,LINETHICK1;
機構建倉日:STICKLINE(機構建倉,0,-1,4,1),COLOR00FF00,LINETHICK5;
趨勢:3*SMA((CLOSE-LLV(LOW,38))/(HHV(HIGH,38)-LLV(LOW,38))*100,5,1)-2*SMA(SMA((CLOSE-
LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),LINETHICK2,COLORFF99FF,NODRAW;
備錢: IF(趨勢<=20,-0.8,0),COLORD0D0D0,STICK,LINETHICK3;
快買: IF(趨勢<=10,1,0),COLORFF38FF,STICK,LINETHICK3;
BIAS1:=(C-MA(C,6))/MA(C,6)*100,COLORFFDDCC;
BIAS2:(C-MA(C,13))/MA(C,13)*100,COLORFFFFFF,LINETHICK1;
BIAS3:=(C-MA(C,26))/MA(C,26)*100,COLORFFFFFF,LINETHICK1;
乖離:(BIAS1+2*BIAS2+3*BIAS3)/6,COLOR00FFFF;
乖離超限:MA(乖離,3),COLORFF80FF;
STICKLINE(CROSS(乖離,乖離超限) AND 乖離超限<-9,-4,0,1,1),COLORFFFFFF;
STICKLINE(CROSS(乖離超限,乖離) AND 乖離>10,6,0,3,0),COLORFF88FF;
DRAWBAND(MA(乖離,1),RGB(240,120,40),MA(乖離超限,1),RGB(256,200,20));
警跌:IF(BIAS2<REF(BIAS2,1),BIAS2,DRAWNULL),COLORFF6128,LINETHICK3;
回升:IF(BIAS2>REF(BIAS2,1),BIAS2,DRAWNULL),COLOR00FFFF,LINETHICK3;
R:SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE- REF(C,1)),6,1)*100,COLORFFCCFF,NODRAW;
R2:SMA(MAX(CLOSE-REF(C,1),0),13,1)/SMA(ABS(CLOSE- REF(C,1)),13,1)*100,COLOR00CCFF,NODRAW;
STICKLINE(CROSS(R2,R) AND R2>78,2,0,3,-1),COLOR30FFFF;
CC:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD:=L<MA(C,5)*0.921;
EE:=V<MA(V,5)*1.5;
老鼠倉:=(L<(AMOUNT/V)*0.9) AND CC AND DD AND EE,LINETHICK0,COLOR0099FF;
DRAWTEXT(老鼠倉,-5,老鼠倉),COLORFFFFFF;
STICKLINE(CROSS(乖離,BIAS1) AND BIAS2>15,乖離,0,1,0),COLOR3300FF;
DRAWICON(CROSS(乖離,BIAS1*0.382),-1,1),colorgreen;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?