大智慧动态量能平台+多空立桩量+地量平台+攻守阵线 新公式图

STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,7.8,0),COLOR3333AA,LAYER5;
ma05:MA(CLOSE, 5);

{◆量能平台◆立桩量◆地量平台◆攻守阵线}
if BARSTATUS=2 then begin
KG3:=mod(CURRENTTIME,3);
Nx:=13;
{量能平台,立桩量,地量平台}
TSt:='';.cn}
if KG3=0 and min(BARSLAST(2*ref(V,1)<V),BARSLAST(v>ref(v,1) and 2*ref(V,2)<ref(V,1)))=HHVBARS(V,Nx)
then TSt:=TSt+'立桩量 ＿＿＿＿＿＿＿＿＿＿＿＿＿＿';
else TSt:=TSt+'天 ＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿';
DRAWTEXT(1,REF(REF(C,HHVBARS(V,Nx)),1),TSt),ALIGN2,VALIGN1;
DRAWTEXT(1,REF(REF(O,LLVBARS(V,Nx)),1),'地 ＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿'),ALIGN2,VALIGN1;
{攻守阵线}
gd:=abs(c-o);
DRAWTEXT(1,REF(REF(c,HHVBARS(gd,Nx)),1),'攻 ＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿'),ALIGN2,VALIGN1;
DRAWTEXT(1,REF(REF(o,HHVBARS(gd,Nx)),1),'守 ＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿'),ALIGN2,VALIGN1;
end;
 

量能平台,立桩量,地量平台 是天量地量的价位箱体
攻守阵线 是大价格波动的的开收价位箱体
2种动态移动箱体都有很强的压力支撑突破作用,攻线和天量平台经常同步,地量和守线就无法做到一起(是很想弄在一起可是概念不一样),2种不同箱体用时间开关分开显示效果更好
立桩量只是量能平台中的一个特例,其实在跌势中量能平台和立桩量都一样有效,不过是做跌的而已,想把阳桩/阴桩标出来,可惜趋势波段判断太多杂信息
攻守阵线作为一个推动的趋势很不错,对于最近的行情很好,能抓稳大部分调整突破
 

动态分开显示不同指标,提示多空立桩量及三天规则立桩量及自动转移平台,守线分离显示,,,加在任何主图指标后就可以,比以前的量能平台好些
 

{动态量能平台,多空立桩量,地量平台,攻守阵线}
if BARSTATUS=2 then begin
KGx:=mod(CURRENTTIME,5);
Nx:=19;
TSx:=' ＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿';
立桩:=min(BARSLAST(2*ref(V,1)<V),BARSLAST(v>ref(v,1) and 2*ref(V,2)<ref(V,1)))=HHVBARS(V,Nx);
三天:=REF(REF(L,HHVBARS(V,Nx)),1)<REF(LLV(L,3),HHVBARS(V,Nx)-3);
TSt:='';if KGx=4 and ma(c,10)>ma(c,20) and 立桩 and 三天 and c>REF(REF(H,HHVBARS(V,Nx)),1) then TSt:=TSt+'立桩量'+TSx;
else if KGx=4 and ma(c,10)>ma(c,20) and 立桩 then TSt:=TSt+'多桩'+TSx;
else if KGx=4 and ma(c,10)<ma(c,20) and 立桩 then TSt:=TSt+'空桩'+TSx;
else if KGx>1 then TSt:=TSt+'天'+TSx;
else if KGx<2 then TSt:=TSt+'攻'+TSx;
TSd:='';if KGx>1 then TSd:=TSd+'地'+TSx;
else if KGx<2 then TSd:=TSd+'守'+TSx;
{DRAWTEXT(1,if(KGx>1,REF(REF(C,HHVBARS(V,Nx)),1),REF(REF(c,HHVBARS(abs(c-o),Nx)),1)),TSt),ALIGN2,VALIGN1;
DRAWTEXT(1,if(KGx>1,REF(REF(O,LLVBARS(V,Nx)),1),REF(REF(o,LLVBARS(abs(c-ref(c,1)),Nx)),1)),TSd),ALIGN2,VALIGN1;
改严格点:}.cn}
DRAWTEXT(1,if(KGx>1,REF(REF(C,HHVBARS(V,Nx)),1),if(KGx=0,REF(REF(c,HHVBARS(abs(c-o ),Nx)),1),REF(REF(c,HHVBARS(max(abs(c-ref(c,1)),abs(c-o)),Nx)),1) ) ),TSt),ALIGN2,VALIGN1;
DRAWTEXT(1,if(KGx>1,REF(REF(O,LLVBARS(V,Nx)),1),if(KGx=0,REF(REF(o,LLVBARS(abs(c-ref(c,1)),Nx)),1),REF(REF(o,LLVBARS( abs(c-ref(c,1))/abs(h-l) ,Nx)),1) ) ),TSd),ALIGN2,VALIGN1;
end;