DRAWGBKLAST(CLOSE>0,STRIP(RGB(0,45,0),RGB(5,15,45),0));
成交量:VOL,LINETHICK0;
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主买:IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+ (CLOSE-LOW)),VOL/2)),POINTDOT,COLORRED;
主卖:I
{参数: n:10,1,100 m:4,1,60}
MBSS:ma(VOL/TICKCOUNT*10000,m),volstick;
交易分钟数:=if(CURRENTTIME>93000 and CURRENTTIME<150000,
if(CURRENTTIME<113000,(TIMETOT0(CURRENTTIME)-34200)/60,
if(CURRENTTIME>130000,(TIMETOT0(CURRENTTIME
成交量:VOL,COLORWHITE,PRECIS0,LINETHICK0;
换手率:=VOL/CAPITAL*100;
成交额:=AMOUNT;
T:=TIMETOT0(CURRENTTIME)/60;
交易日:=IF(CURRENTDATE=DATE,1,0);
交易时间:=IF(交易日=1 AND CURRENTTIME>=93000 AND CURRENTTIME<150000 AND DYNAINFO(7)=CLOSE AN
量5:MA(VOL,5),colorred;
量10:MA(VOL,10);
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
成交:VOL,ColorCD52FF,linethick0;
主动买盘:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),Color0000FF,STICK;
量5:MA(VOL,5),colorred;
量10:MA(VOL,10);
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
成交:VOL,ColorCD52FF,linethick0;
主动买盘:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),Color0000FF,STICK;
VOL,VOLSTICK;
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
成交:VOL,POINTDOT;
主买:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,POINTDOT;
主卖:IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)
使用说明:
1.红柱:主动性买盘;
2.绿柱:主动性卖盘;
3.“★”5天均量金叉12天均量;
4.开盘后根据每分钟量推测全天量。
STICKLINE(HOUR>=9 AND HOUR<10 ,0, V/((TIME-93000)/100)*240,4.5,1),COLORWHITE;
STICKLINE(HOUR>=10 AND HOUR<11 ,0, V/((TIME-1000
n:= 5;s3:=20;g3:=11;p:=20;
成交量(手):VOL,POINTDOT;
换手:100*V/CAPITAL,COLORRED;
十日换手:ma(100*V/CAPITAL,10),COLORRED;
量比:(v-ref(v,1))/v;
量连线:ma(成交量(手),1);
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买盘:ma(IF(CLOSE>OPEN,
{XDB:="虎拓圣龙.买入力度";
XDS:="虎拓圣龙.卖出力度";
}
MM:=H-REF(C,1);
SS:=REF(C,1)-L;
S:=IF(SS>0,SS,0.01);
M:=IF(MM>0,MM,0.01);
HJ:=M+S;
买入力度:=M/HJ*AMOUNT/CAPITAL;
卖出力度:=S/HJ*AMOUNT/CAPITAL
V5:=MA(VOL,5);
V60:=MA(VOL,60);
1,coloryellow;
量能增减:(v5/v60),coloryellow,LINETHICK0;
STICKLINE(量能增减>1,0,量能增减,8.10,0),colorff00ff,layer7;
STICKLINE(量能增减<1,0,量能增减,8.10,0),colorgreen;
aa:=量能增减<1;
放量天数
V3:=ma(INDEXV,3);
V60:=ma(INDEXV,60);
1,coloryellow;
大盘量能增减:(V3/v60),coloryellow,LINETHICK0;
STICKLINE(大盘量能增减>1,0,大盘量能增减,8.10,0),colorff00ff,layer7;
STICKLINE(大盘量能增减<1,0,大盘量能增减,8.10,0),colorgreen;
bb:=大盘量能增
V3:=MA(VOL,3);
V60:=MA(VOL,60);
1,coloryellow;
量能增减:(v3/v60),coloryellow,LINETHICK0;
STICKLINE(量能增减>1,0,量能增减,8.10,0),colorff00ff,layer7;
STICKLINE(量能增减<1,0,量能增减,8.10,0),colorgreen;
aa:=量能增减<1;
放量天数
v1:=(v/ref(hhv(v,100),barslast(BARSTATUS=1)))*10;
换手率:VOL/CAPITAL*100,LINETHICK0,COLORFFFF00;
实际量:VOL/10000,LINETHICK0;
量:=v1-20;
顶:82,COLORFFFF00,LINETHICK1;
顶A:93,COLORFF9500,LINETHICK5;
地量0_1:STICKLINE(换手率>0 AND 换
OBV:=MA(SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0)/1000,1);
DIFF : EMA(obv,5) - EMA(obv,34),COLORYELLOW,LINETHICK2;
DEA : EMA(DIFF,13),LINETHICK2,COLORGREEN;
MACD :=2*(DIFF-DEA);
VAR1:=HHV(DEA,53);
虚拟量:IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,MAX(VOL,DYNAINFO(17)*REF(MA(VOL,5),1)),0);
STICKLINE(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,VOL,MAX(VOL,DYNAINFO(17)*REF(MA(VOL,5),1)),7,-21),COLOR00C0C0;
虚拟换手:虚拟量/CAPITAL*100;
成交量:VOL,
分时成交量:=MAX(0,VOL);
STICKLINE(REF(c,1)>c ,分时成交量 ,0,1,0 ),colorgreen;
STICKLINE(REF(c,1)<c ,分时成交量 ,0,1,0 ),colorred;
STICKLINE(REF(c,1)=c ,分时成交量 ,0,1,0 ),colorwhite;
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
成交:VOL,POINTDOT;
主动买盘:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,POINTDOT;
主动卖盘:IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(
量5:MA(VOL,5),colorred;
量10:MA(VOL,10);
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
成交:VOL,ColorCD52FF,linethick0;
主动买盘:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),Color0000FF,STICK;
M1:=5;
M2:=10;
M3:=20;
成交量:VOL,LINETHICK0;
五日均量:MA(VOL,M1);
十日均量:MA(VOL,M2);
廿日均量:MA(VOL,M3);
预估今日成交量:IF((DYNAINFO(7)=CLOSE), DYNAINFO(38)*DYNAINFO(17),成交量),Color0000FF,LINETHICK0;
{如果最新价=收盘价,选五日均量*量比,否则就选成交
VOL,VOLSTICK,PRECIS0;
mm:=0;
IF PFFIN(4251,0)>0 Then begin
mm:=PFFIN(4251,0);
end;
流通盘:=CAPITAL-mm/100;
dbhs:if(capital<2000000,v/capital*100,v/流通盘*100),linethick0;
标准量:if(count(v>流通盘/1000,0)>0,流通盘/100