相關標簽:

?

本人用極品VOL成交量能改成通達信的更好

極品VOL成交量

?

?

原理解析：
成交量(手),VOLSTICK 成交賦值:3日前的成交額(元)/10000/10000 前成交賦值:2日前的成交額(元)/10000/10000 昨成交賦值:1日前的成交額(元)/10000/10000 今成交賦值:成交額(元)/10000/10000 輸出昨收:1日前的收盤價,線寬為0 DRAWTEXTABS(18,00 ,'今日：'+NUMTOSTRN(今成交,2)),畫黃色 DRAWTEXTABS(90 ,00 ,'昨日：'+NUMTOSTRN(昨成交,2)),COLOR5454FF DRAWTEXTABS(160 ,00 ,'前日：'+NUMTOSTRN(前成交,2)),COLORFFFF66 DRAWTEXTABS(240 ,00 ,'3 日：'+NUMTOSTRN(成交,2)),COLORFF00FF 輸出換手:成交量(手)/當前流通股本(手)*100 輸出預量:如果現價=CLOSEANDDYNAINF開盤價=成交額(元),返回成交量(手)和量比*1日前的成交量(手)的5日簡單移動平均的較大值,否則返回0,COLOR391AEC 當滿足條件現價=CLOSEANDDYNAINF開盤價=成交額(元)時,在成交量(手)和成交量(手)和量比*1日前的成交量(手)的5日簡單移動平均的較大值位置之間畫柱狀線,寬度為7,1不為0則畫空心柱.,COLORC0C0C0 輸出實量:成交量(手),VOLSTICK,COLORFFFF00 輸出均價:成交額(元)/成交量(手)/100,COLOR6699CC 輸出量能飽和度:如果(成交額(元)/收盤價)/(20日內成交額(元)的最高值/20日內收盤價的最高值)*100>100,返回100,否則返回(成交額(元)/收盤價)/(20日內成交額(元)的最高值/20日內收盤價的最高值)*100,COLOR391AEC,線寬為0 當滿足條件收盤價>=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR0000BB 當滿足條件收盤價>=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR0000CC 當滿足條件收盤價>=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR0000DD 當滿足條件收盤價>=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR0000EE 當滿足條件收盤價>=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR0000FF 當滿足條件收盤價>=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR0000FF 當滿足條件收盤價>=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR0000FF 當滿足條件收盤價<=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLORBBBB00 當滿足條件收盤價<=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORCCCC00 當滿足條件收盤價<=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORDDDD00 當滿足條件收盤價<=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOREEEE00 當滿足條件收盤價<=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFFFF00 當滿足條件收盤價<=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFFFF00 當滿足條件收盤價<=開盤價時,在成交量(手)和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFFFF00 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 ）

源碼：

?

VOL,VOLSTICK;
成交:=ref(AMOUNT,3)/10000/10000;
前成交:=ref(AMOUNT,2)/10000/10000;
昨成交:=ref(AMOUNT,1)/10000/10000;
今成交:=AMOUNT/10000/10000;
昨收:ref(c,1),linethick0;
DRAWTEXTABS(18,00 ,'今日：'+numtostrn(今成交,2)),COLORyellow;
DRAWTEXTABS(90 ,00 ,'昨日：'+numtostrn(昨成交,2)),COLOR5454FF;
DRAWTEXTABS(160 ,00 ,'前日：'+numtostrn(前成交,2)),COLORFFFF66;
DRAWTEXTABS(240 ,00 ,'3 日：'+numtostrn(成交,2)),colorFF00FF;

換手:VOL/CAPITAL*100;
預量:IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,MAX(VOL,DYNAINFO(17)*REF(MA(VOL,5),1)),0),COLOR391AEC;
STICKLINE(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,VOL,MAX(VOL,DYNAINFO(17)*REF(MA(VOL,5),1)),7,1),ColorC0C0C0;
實量:VOL,VOLSTICK,COLORFFFF00;
均價:AMOUNT/VOL/100,COLOR6699CC;
量能飽和度:IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100),COLOR391AEC,LINETHICK0;
STICKLINE(C>=O,vol,O,7,0),COLOR0000bb;
STICKLINE(C>=O,vol,O,6,0),COLOR0000cc ;
STICKLINE(C>=O,vol,O,5,0),COLOR0000dd;
STICKLINE(C>=O,vol,O,4,0),COLOR0000ee ;
STICKLINE(C>=O,vol,O,3,0),COLOR0000ff;
STICKLINE(C>=O,vol,O,2,0),COLOR0000FF;
STICKLINE(C>=O,vol,O,1,0),COLOR0000FF;
STICKLINE(C<=O,vol,O,7,0),colorbbbb00;
STICKLINE(C<=O,vol,O,6,0),colorcccc00;
STICKLINE(C<=O,vol,O,5,0),colordddd00;
STICKLINE(C<=O,vol,O,4,0),coloreeee00;
STICKLINE(C<=O,vol,O,3,0),colorffff00;
STICKLINE(C<=O,vol,O,2,0),colorffff00;
STICKLINE(C<=O,vol,O,1,0),COLORFFFF00;CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標公式');

?

?

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

?