相關標簽:

?

原理解析：
SVOL賦值:成交量(手)的歷史累和/當前流通股本(手)的整數部分 TJ0賦值:SVOL>1日前的SVOL OR 首次收盤價距今天數=0 S1賦值:上次TJ0距今天數+1 TJ2賦值:S1<1日前的S1 S2賦值:如果TJ2,返回1日前的S1+1,否則返回S1 S3賦值:TJ2的歷史累和 換手賦值:成交量(手)/當前流通股本(手)*100,線寬為0 ZS3賦值:換手/5 階段總額（萬）賦值:成交額(元)/10000的S2日累和*100,NODRAW 階段總量（手）賦值:成交量(手)的S2日累和*100,NODRAW 輸出階段成本（元）:(階段總額（萬）/(階段總量（手）/100)),NODRAW 輸出界成交量萬:成交額(元)/10000,COLORFF00FF,NODRAW VAR1賦值:成交額(元)/((不定周期最高價-不定周期最低價)*2-不定周期收盤價-不定周期開盤價的絕對值) 輸出流入萬:如果不定周期收盤價>不定周期開盤價,返回VAR1*(不定周期最高價-不定周期最低價),否則返回如果不定周期收盤價<不定周期開盤價,返回VAR1*((不定周期最高價-不定周期開盤價)+(不定周期收盤價-不定周期最低價)),否則返回成交額(元)/2/10000,畫紅色,NODRAW 輸出流出萬:如果不定周期收盤價>不定周期開盤價,返回0-VAR1*((不定周期最高價-不定周期收盤價)+(不定周期開盤價-不定周期最低價)),否則返回如果不定周期收盤價<不定周期開盤價,返回0-VAR1*(不定周期最高價-不定周期最低價),否則返回0-成交額(元)/2/10000,COLOR00FF00,NODRAW 輸出凈流入萬:流入萬+流出萬,COLORFFFF00,NODRAW FF賦值:不定周期收盤價的1日簡單移動平均-不定周期收盤價的10日簡單移動平均,NODRAW M賦值:13 N賦值:3 A01賦值:(收盤價+開盤價+最低價+最高價)/4 A02賦值:(以(A01*1.04)計算的獲利盤比例 * 100.000) A03賦值:(以(A01*0.96)計算的獲利盤比例 * 100.000) 輸出A04:A03,NODRAW 輸出A08:A02-A03,NODRAW 輸出A06:( 100.000 - A02),NODRAW 當滿足條件1.000時,在5和A04位置之間畫柱狀線,寬度為5,10不為0則畫空心柱.,畫紅色 當滿足條件1.000時,在100.000和A02位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫綠色 當滿足條件1.000時,在A04和(100-A06)位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫黃色 輸出獲利:A02的M日簡單移動平均,畫紅色,線寬為3 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色

?

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

源碼：

?

SVol:=INTPART(SUM(V,0)/CAPITAL);
TJ0:=SVol>REF(SVol,1) OR BARSSINCE(CLOSE)=0;
S1:=BARSLAST(TJ0)+1;
TJ2:=S1<REF(S1,1);
S2:=IF(TJ2,REF(S1,1)+1,S1);
S3:=SUM(TJ2,0);
換手:=V/CAPITAL*100,LINETHICK0;
ZS3:=換手/5;
階段總額（萬）:=SUM(AMOUNT/10000,S2)*100,NODRAW;
階段總量（手）:=SUM(V,S2)*100,NODRAW;
階段成本（元）:(階段總額（萬）/(階段總量（手）/100)),NODRAW;界成交量萬:AMOUNT/10000,COLORFF00FF,NODRAW;
VAR1:=AMOUNT/((DHIGH-DLOW)*2-ABS(DCLOSE-DOPEN));
流入萬:IF(DCLOSE>DOPEN,VAR1*(DHIGH-DLOW),IF(DCLOSE<DOPEN,VAR1*((DHIGH-DOPEN)+(DCLOSE-DLOW)),AMOUNT/2))/10000,colorred,NODRAW;
流出萬:IF(DCLOSE>DOPEN,0-VAR1*((DHIGH-DCLOSE)+(DOPEN-DLOW)),IF(DCLOSE<DOPEN,0-VAR1*(DHIGH-DLOW),0-AMOUNT/2))/10000,COLOR00FF00,NODRAW;
凈流入萬:流入萬+流出萬,COLORFFFF00,NODRAW;
{線:=MA(CLOSE,1)-MA(CLOSE,6),NODRAW;}
FF:=MA(DCLOSE,1)-MA(DCLOSE,10),NODRAW;
{量:(線),VOLSTICK;}M:=13;N:=3;
A01:=(C+O+L+H)/4;
A02:=(WINNER((A01 * 1.04)) * 100.000);
A03:=(WINNER((A01 * 0.96)) * 100.000);
A04:A03,NODRAW;
A08:A02-A03,NODRAW;
A06:( 100.000 - A02),NODRAW;
STICKLINE(1.000,5,A04, 5,10),colorred;
STICKLINE( 1.000, 100.000,A02,5,0),colorgreen;
STICKLINE( 1.000,A04,(100-A06),5,0),coloryellow;
獲利:MA(A02,M),colorred,LINETHICK3;TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?