打印本文
關閉窗口
相關標簽:
?
VOL自用成交量.ALG
{VOL自用成交量}{量與價關系密切，其重要性不言而欲。這個是我在理想學到的知識，作的第一個指標，望大家喜歡~~~!!}
{圖片上已標出指明，其紅色外框為雙陪成交量，出現白色短，為短買點，望大家喜歡~~~~!!}
?
原理解析：
源碼：
?
{DRAWGBKLAST(DATE>900101,STRIP(RGB(5,5,95),RGB(0,35,0),0));}
量:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
買量:=IF(CLOSE>OPEN,量*(HIGH-LOW),IF(CLOSE<OPEN,量*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
賣量:=(IF(CLOSE>OPEN,0-量*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-量*(HIGH-LOW),0-VOL/2)))*-1;
總量:買量+賣量,LINETHICK0;
凈量:買量-賣量,LINETHICK0;五日凈量:SUM(凈量,5),LINETHICK0;
十日凈量:SUM(凈量,10),LINETHICK0;
二十日凈量:SUM(凈量,20),LINETHICK0;
五十日凈量:SUM(凈量,50),LINETHICK0;MA5:MA(VOL,5);
MA10:MA(VOL,10);
MA20:MA(VOL,20);MAA:=MA( CLOSE ,2) ;
STICKLINE(C>MAA,總量,1,9,1 ),COLOR00FFFF;
STICKLINE(C<MAA,總量,1,9,1 ),COLORFF00FF;
STICKLINE(凈量<0,1,總量,9,1),COLORFFFF00;
STICKLINE(C<MAA AND 凈量>0,凈量,1,9,1 ),COLOR0000FF;STICKLINE(V>=2*REF(V,1),1,總量,9,1),COLOR0000FF;
STICKLINE(總量>1,總量,0,6,0),COLORFF3300;
STICKLINE(總量>1,總量,0,4,0),COLORFF7700;
STICKLINE(總量>1,總量,0,2,0),COLORFFAA00;
STICKLINE(總量>1,總量,0,1,0),COLORFFFF00;STICKLINE(買量>0,0,買量,6,0),COLOR000099;
STICKLINE(買量>0,0,買量,4,0),COLOR0000AA;
STICKLINE(買量>0,0,買量,2,0),COLOR0000FF;
STICKLINE(買量>0,0,買量,1,0),COLORCC00FF;STICKLINE(凈量>0,0,凈量,6,0),COLOR0033FF;
STICKLINE(凈量>0,0,凈量,4,0),COLOR0077FF;
STICKLINE(凈量>0,0,凈量,2,0),COLOR00BBFF;
STICKLINE(凈量>0,0,凈量,1,0),COLOR00FFFF;STICKLINE(凈量<0,1,凈量,9,1),COLORFFFF00;
STICKLINE(凈量<0,0,凈量,7,0),COLOR005500;
STICKLINE(凈量<0,0,凈量,5,0),COLOR009900;
STICKLINE(凈量<0,0,凈量,3,0),COLOR00BB00;
STICKLINE(凈量<0,0,凈量,1,0),COLOR00FF00;STICKLINE(C<MAA AND 凈量>0,凈量,0,7,0 ),COLOR777777;
STICKLINE(C<MAA AND 凈量>0,凈量,0,5,0 ),COLOR999999;
STICKLINE(C<MAA AND 凈量>0,凈量,0,3,0 ),COLORBBBBBB;
STICKLINE(C<MAA AND 凈量>0,凈量,0,1,0 ),COLORFFFFFF;DRAWTEXTABS(5,5,'※首之ジ');
DRAWTEXTABS(65,6,'農歷：'+LMONTH+'月 初 '+LDAY),LINETHICK1,COLORWHITE;{盤中預測}
今天成交額:=AMOUNT/10000;
昨天成交額:=REF(今天成交額,1);
圖長度像素:=180*0.4;
昨天圖長度:=180+圖長度像素;
交易分鐘數:=IF(CURRENTTIME>93000 AND CURRENTTIME<150000 AND DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,
IF(CURRENTTIME<113000,(TIMETOT0(CURRENTTIME)-34200)/60,
IF(CURRENTTIME>130000,(TIMETOT0(CURRENTTIME)-39600)/60,120)),240);
預測今天:=今天成交額/交易分鐘數*240;
今天圖長度:=(預測今天/昨天成交額)*圖長度像素+180;
目前成交量:=(今天成交額/昨天成交額)*圖長度像素+180;
DRAWTEXTABS(5,20,'昨天金額：'+昨天成交額/1000+'億'),COLOR00FFFF,LINETHICK1;
DRAWRECTABS(120,25,昨天圖長度,30 ,RGB(0,255,0) ),COLOR6699FF;
DRAWRECTABS(120,35,目前成交量, 40 ,RGB(200,60,0) ),COLORFFFFFF;
DRAWTEXTABS(5,32,'預計今天：'+預測今天/1000+'億'),COLOR2F73FF,LINETHICK1;
DRAWRECTABS(120,35,今天圖長度,40 ,0 ),COLORFFFFFF;
?
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?