相關標簽:

?

機構買賣差（分時指標 源碼）

?

原理解析：
A1賦值:(成交量(手)/收盤價)/2 A2賦值:如果A1>100ANDCLOSE>1日前的收盤價,返回A1,否則返回0的歷史累和 A3賦值:如果A1>100ANDCLOSE<1日前的收盤價,返回A1,否則返回0的歷史累和 A4賦值:如果A1<100ANDCLOSE>1日前的收盤價,返回A1,否則返回0的歷史累和 A5賦值:如果A1<100ANDCLOSE<1日前的收盤價,返回A1,否則返回0的歷史累和 A6賦值:A2+A3+A4+A5 輸出機買:(A4/A6)*100,線寬為0 輸出機賣:(A5/A6)*100,線寬為0 輸出主力差:機買-機賣,線寬為0 當滿足條件主力差>0ANDREF(主力差,1)<=0時,在收盤價*0.15位置書寫文字,畫青色 CXH賦值:STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1)) 輸出WARNING('HTTP://www.kzuj.com.cn',CURRENTTIME>180000 AND (CXH=1 OR CXH=6)) DRAWTEXTREL(10 ,10 ,'指標公式')

?

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

源碼：

?

?

A1:=(VOL/C)/2;
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A6:=A2+A3+A4+A5;
機買:(A4/A6)*100,LINETHICK0;
機賣:(A5/A6)*100,LINETHICK0;
主力差:機買-機賣,LINETHICK0;
DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.15,'●機構'),COLORCYAN;CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標公式');

?

?

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

?