相關標簽:平行順序移動方式例題 、 通達信公式編寫教程 、 股票指標公式源碼大全 、 股票公式編寫教程書籍 、 通達信指標編寫教程 、 選股公式編寫教程 、 條件選股公式編寫教程 、 股票軟件公式編寫入門 、 編寫股票公式書有哪些 、 股票指標編寫視頻教程 、 股票技術指標公式大全 、 股票選股公式編寫教程 、

?

傳統的幾個能量公式的數值不是用百分比來描述的，其數值令人費解，今天閑來無事，改寫幾個用%描述的如下：

?

原理解析：
新VRTH賦值:如果收盤價>=1日前的收盤價,返回成交量(手),否則返回0的N日累和 TL賦值:如果收盤價<1日前的收盤價,返回成交量(手),否則返回0的N日累和 VR賦值:100*(TH)/(TH+TL) 賦值: (最高價+最低價+收盤價)/3 CR賦值:0和最高價-1日前的MID的較大值的N日累和/(0和1日前的MID-最低價的較大值的N日累和+0和最高價-1日前的MID的較大值的N日累和)*100 輸出3.新OVBOVB:100*如果ISUP,返回成交量(手),否則返回如果ISDOWN,返回-成交量(手),否則返回0的N日累和/成交量(手)的N日累和

?

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

源碼：

?

?

1.新VR

TH:=SUM(IF(CLOSE>=REF(CLOSE,1),VOL,0),N);
TL:=SUM(IF(CLOSE<REF(CLOSE,1),VOL,0),N);
VR:=100*(TH)/(TH+TL);

?

2.新CR

MID := (HIGH+LOW+CLOSE)/3;
CR:=SUM(MAX(0,HIGH-REF(MID,1)),N)/(SUM(MAX(0,REF(MID,1)-L),N)+SUM(MAX(0,HIGH-REF(MID,1)),N))*100;

3.新OVB

OVB:100*SUM(IF(ISUP,VOL,IF(ISDOWN,-VOL,0)),N)/SUM(V,N);
這樣用比原始的好用，尤其短線操作，試試吧。
你也可以把他們合到一起來用。<!--++ plugin_code qcomic begin--><!--++ plugin_code qcomic end-->

?

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

?