高點(diǎn)壓力資金監(jiān)控副圖指標(biāo)公式源碼

相關(guān)標(biāo)簽:

?

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

?

?來(lái)源:程序化99（ www.tumamayizhan.com ）

源碼：

?

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;
階段總額（萬(wàn)）:=SUM(AMOUNT/10000,S2)*100,NODRAW;
階段總量（手）:=SUM(V,S2)*100,NODRAW;
階段成本（元）:(階段總額（萬(wàn)）/(階段總量（手）/100)),NODRAW;界成交量萬(wàn):AMOUNT/10000,COLORFF00FF,NODRAW;
VAR1:=AMOUNT/((DHIGH-DLOW)*2-ABS(DCLOSE-DOPEN));
流入萬(wàn):IF(DCLOSE>DOPEN,VAR1*(DHIGH-DLOW),IF(DCLOSE<DOPEN,VAR1*((DHIGH-DOPEN)+(DCLOSE-DLOW)),AMOUNT/2))/10000,colorred,NODRAW;
流出萬(wàn):IF(DCLOSE>DOPEN,0-VAR1*((DHIGH-DCLOSE)+(DOPEN-DLOW)),IF(DCLOSE<DOPEN,0-VAR1*(DHIGH-DLOW),0-AMOUNT/2))/10000,COLOR00FF00,NODRAW;
凈流入萬(wàn):流入萬(wàn)+流出萬(wàn),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.tumamayizhan.com '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?