相關標簽:

?

主力異動通用指標源碼(大智慧、飛狐、分析家)

?

?

原理解析：

VAR1賦值:成交額(元)/10000000

量賦值:VAR1/VAR1的5日簡單移動平均*5

VAR2賦值:如果收盤價>=1日前的收盤價,返回VAR1,否則返回VAR1的相反數

VAR3賦值:(收盤價-1日前的收盤價)/1日前的收盤價*100

VAR4賦值:VAR3*36

VAR5賦值:VAR4-VAR2

Q賦值:VAR5的5日累和的5日指數移動平均/35

VAR6賦值:以收盤價計算的獲利盤比例-以1日前的收盤價元價格計算的獲利盤比例的絕對值/(成交量(手)/當前流通股本(手))

VAR7賦值:VAR6>15

VAR8賦值:以收盤價計算的獲利盤比例-以開盤價計算的獲利盤比例的絕對值*100

當滿足條件VAR8>=20ANDVAR7時,在9.9位置書寫文字,畫黃色

當滿足條件VAR8>=20ANDVAR7時,在8.8位置書寫文字,畫黃色

VARA賦值:1日前的收盤價的4日指數移動平均

色彩峰賦值:(收盤價-VARA和0的較大值的6日[1日權重]移動平均/收盤價-VARA的絕對值的6日[1日權重]移動平均)*10

Q1賦值:如果Q<0,返回Q,否則返回0

SQ賦值:Q1

MY賦值:色彩峰

當滿足條件Q1時,在0和Q1位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫綠色

當滿足條件色彩峰>0時,在0和色彩峰位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFFFFFF

當滿足條件色彩峰>0時,在0和色彩峰*0.9位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOREEEEFF

當滿足條件色彩峰>0時,在0和色彩峰*0.8位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORCCCCFF

當滿足條件色彩峰>0時,在0和色彩峰*0.7位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORAAAAFF

當滿足條件色彩峰>0時,在0和色彩峰*0.65位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR9999FF

當滿足條件色彩峰>0時,在0和色彩峰*0.6位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR8888FF

當滿足條件色彩峰>0時,在0和色彩峰*0.55位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR7777FF

當滿足條件色彩峰>0時,在0和色彩峰*0.4位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR4444FF

當滿足條件色彩峰>0時,在0和色彩峰*0.35位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR3333FF

當滿足條件色彩峰>0時,在0和色彩峰*0.3位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR2222FF

當滿足條件色彩峰>0時,在0和色彩峰*0.25位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR1111FF

當滿足條件色彩峰>0時,在0和色彩峰*0.2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫紅色

散戶賦值: ((2*收盤價+最高價+最低價)/4-5日內最低價的最低值)/(4日內最高價的最高值-5日內最低價的最低值)*100的4日指數移動平均

莊家賦值: 0.667*1日前的散戶+0.333*散戶的2日指數移動平均

當滿足條件散戶上穿莊家AND散戶<30時,在-1位置書寫文字,COLORFF00FF

當滿足條件散戶上穿莊家AND散戶<30時,在-3位置書寫文字,COLORFF00FF

當滿足條件莊家上穿散戶AND散戶>70時,在13.5位置書寫文字,COLOR00FF00

當滿足條件莊家上穿散戶AND散戶>70時,在12位置書寫文字,COLOR00FF00

源碼：

?

var1:=AMOUNT/10000000;
量:=var1/ma(var1,5)*5;
var2:=if(c>=ref(c,1),var1,REVERSE(var1));
var3:=(c-ref(c,1))/ref(c,1)*100;
var4:=var3*36;
var5:=var4-var2;
Q:=EMA(SUM(var5,5),5)/35;
Var6:=ABS(WINNER(CLOSE)-WINNER(REF(CLOSE,1)))/(VOL/CAPITAL);
Var7:=Var6>15;
Var8:=ABS(WINNER(CLOSE)-WINNER(OPEN))*100;
DRAWTEXT(Var8>=20 AND Var7,9.9,'主力異動'),COLORYELLOW;{http://cxh99.com}
DRAWTEXT(Var8>=20 AND Var7,8.8,'●'),COLORYELLOW;{http://cxh99.com}
VarA:=ema(ref(CLOSE,1),4);
色彩峰:=(SMA(max(CLOSE-VarA,0),6,1)/SMA(abs(CLOSE-vara),6,1))*10;
q1:=if(q<0,q,0);
SQ:=q1;
MY:=色彩峰;
STICKLINE(q1,0,q1,5,0),COLORGREEN;{http://www.kzuj.com.cn}
STICKLINE(色彩峰>0,0,色彩峰,5,0),COLORFFFFFF;{白色}
STICKLINE(色彩峰>0,0,色彩峰*0.9,5,0),COLOREEEEFF;
STICKLINE(色彩峰>0,0,色彩峰*0.8,5,0),COLORCCCCFF;
STICKLINE(色彩峰>0,0,色彩峰*0.7,5,0),COLORAAAAFF;
STICKLINE(色彩峰>0,0,色彩峰*0.65,5,0),COLOR9999FF;
STICKLINE(色彩峰>0,0,色彩峰*0.6,5,0),COLOR8888FF;
STICKLINE(色彩峰>0,0,色彩峰*0.55,5,0),COLOR7777FF;
STICKLINE(色彩峰>0,0,色彩峰*0.4,5,0),COLOR4444FF;
STICKLINE(色彩峰>0,0,色彩峰*0.35,5,0),COLOR3333FF;
STICKLINE(色彩峰>0,0,色彩峰*0.3,5,0),COLOR2222FF;
STICKLINE(色彩峰>0,0,色彩峰*0.25,5,0),COLOR1111FF;
STICKLINE(色彩峰>0,0,色彩峰*0.2,5,0),COLORred;
散戶:= EMA(((2*CLOSE+HIGH+LOW)/4-LLV(LOW,5))/(HHV(HIGH,4)-LLV(LOW,5))*100,4);
莊家:= EMA(0.667*REF(散戶,1)+0.333*散戶,2);
DRAWTEXT(CROSS(散戶,莊家) AND 散戶<30,-1,'低吸'),COLORFF00FF;
DRAWTEXT(CROSS(散戶,莊家) AND 散戶<30,-3,'●'),COLORFF00FF;
DRAWTEXT(CROSS(莊家,散戶) AND 散戶>70,13.5,'高減'),COLOR00FF00;
DRAWTEXT(CROSS(莊家,散戶) AND 散戶>70,12,'●'),COLOR00FF00;

{程序化交易 www.kzuj.com.cn }

?

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

?

原理解析：

?

源碼：

?