四方力道全套公式
散户力道（副图）
换手:=v*100/capital;
主力:=ma(换手,4);
大户:=ma(换手,9);
中户:=ma(换手,17);
散户:=ma(换手,34);
均量:=(散户+主力+大户+中户)/4;
散户能量:=(散户-均量);
操盘:STICKLINE(散户能量>=0AND散户能量>=REF(散户能量,1),0,散户能量,4,0),colorff00ff;
减仓:STICKLINE(散户能量>=0AND散户能量<REF(散户能量,1),0,散户能量,4,0),colorff00ff;
反弹:STICKLINE(散户能量<0AND散户能量>=REF(散户能量,1),0,散户能量,4,0),color00ff00;
寻底:STICKLINE(散户能量<0AND散户能量<REF(散户能量,1),0,散户能量,4,0),color00ff00;
中户力道（副图）
换手:=v*100/capital;
主力:=ma(换手,4);
大户:=ma(换手,9);
中户:=ma(换手,17);
散户:=ma(换手,34);
均量:=(主力+大户+中户+散户)/4;
中户能量:=(中户-均量);
操盘:STICKLINE(中户能量>=0AND中户能量>=REF(中户能量,1),0,中户能量,4,0),colorff00ff;
减仓:STICKLINE(中户能量>=0AND中户能量<REF(中户能量,1),0,中户能量,4,0),colorff00ff;
反弹:STICKLINE(中户能量<0AND中户能量>=REF(中户能量,1),0,中户能量,4,0),color00ff00;
寻底:STICKLINE(中户能量<0AND中户能量<REF(中户能量,1),0,中户能量,4,0),color00ff00;
大户力道（副图）
换手:=v*100/capital;
主力:=ma(换手,4);
大户:=ma(换手,9);
中户:=ma(换手,17);
散户:=ma(换手,34);
均量:=(主力+大户+中户+散户)/4;
大户能量:=(大户-均量);
操盘:STICKLINE(大户能量>=0AND大户能量>=REF(大户能量,1),0,大户能量,4,0),colorff00ff;
减仓:STICKLINE(大户能量>=0AND大户能量<REF(大户能量,1),0,大户能量,4,0),colorff00ff;
反弹:STICKLINE(大户能量<0AND大户能量>=REF(大户能量,1),0,大户能量,4,0),color00ff00;
寻底:STICKLINE(大户能量<0AND大户能量<REF(大户能量,1),0,大户能量,4,0),color00ff00;
主力力道（副图）
换手:=v*100/capital;
主力:=ma(换手,4);
大户:=ma(换手,9);
中户:=ma(换手,17);
散户:=ma(换手,34);
均量:=(主力+大户+中户+散户)/4;
主力能量:=(主力-均量);
操盘:STICKLINE(主力能量>=0AND主力能量>=REF(主力能量,1),0,主力能量,4,0),colorff00ff;
减仓:STICKLINE(主力能量>=0AND主力能量<REF(主力能量,1),0,主力能量,4,0),colorff00ff;
反弹:STICKLINE(主力能量<0AND主力能量>=REF(主力能量,1),0,主力能量,4,0),color00ff00;
寻底:STICKLINE(主力能量<0AND主力能量<REF(主力能量,1),0,主力能量,4,0),color00ff00;
多空力道（副图）
V1:=DMA((((HIGH+LOW)+(CLOSE*2))/4),0.9);
HY1:=REF(EMA(V1,3),1);
多空趋势:=MA((CLOSE-HY1)*10,2);
操盘:STICKLINE(多空趋势>=0AND多空趋势>=REF(多空趋势,1),0,多空趋势,4,0),colorff00ff;
减仓:STICKLINE(多空趋势>=0AND多空趋势<REF(多空趋势,1),0,多空趋势,4,0),colorff00ff;
反弹:STICKLINE(多空趋势<0AND多空趋势>=REF(多空趋势,1),0,多空趋势,4,0),color00ff00;
寻底:STICKLINE(多空趋势<0AND多空趋势<REF(多空趋势,1),0,多空趋势,4,0),color00ff00;
四方力道与散户（副图）
var1:=1;
var2:=1/winner(close);
var3:=ma(close,13);
var4:=100-abs((close-var3)/var3*100);
var5:=llv(low,75);
var6:=hhv(high,75);
var7:=(var6-var5)/100;
var8:=sma((close-var5)/var7,20,1);
var9:=sma((open-var5)/var7,20,1);
vara:=3*var8-2*sma(var8,15,1);
varb:=3*var9-2*sma(var9,15,1);
varc:=100-varb;
主力:(100-vara)*var1,colorred;
散户:ma(winner(close*0.95)*100,3)*var1,coloryellow;
新庄:(100-if(var2>5,if(var2<100,var2,var4-10),0))*var1,colorgreen,
linethick1,pointdot;
vard:=散户>var4;
vare:=ref(low,1)*0.9;
varf:=low*0.9;
var10:=(varf*vol+vare*(capital-vol))/capital;
var11:=ema(var10,30);
var12:=close-ref(close,1);
var13:=max(var12,0);
var14:=abs(var12);
var15:=sma(var13,7,1)/sma(var14,7,1)*100;
var16:=sma(var13,13,1)/sma(var14,13,1)*100;
var17:=barscount(close);
var18:=sma(max(var12,0),6,1)/sma(abs(var12),6,1)*100;
var19:=(-200)*(hhv(high,60)-close)/(hhv(high,60)-llv(low,60))+100;
var1a:=(close-llv(low,15))/(hhv(high,15)-llv(low,15))*100;
var1b:=sma((sma(var1a,4,1)-50)*2,3,1);
var1c:=(indexc-llv(indexl,14))/(hhv(indexh,14)-llv(indexl,14))*100;
var1d:=sma(var1c,4,1);
var1e:=sma(var1d,3,1);
var1f:=(hhv(high,30)-close)/close*100;
var20:=var18<=25andvar19<-95andvar1f>20andvar1b<-30
andvar1e<30andvar11-close>=-0.25andvar15<22and
var16<28andvar17>50;
stickline(1,新庄,100,1,0),colorgreen;
stickline(var20,0,80,5,0),colorred,linethick2;
力道导航（副图）
v1:=dma((((high+low)+(close*2))/4),0.9);
hy1:=ref(ema(v1,3),1);
多空趋势:ma((close-hy1)*100,2),coloryellow;
线性:=((((((close*5)+(ref(close,1)*4))+(ref(close,2)*3))+(ref(close,3)*2))+(ref(close,4)*1))/((((5+4)+3)+2)+1));
导航线:ma(线性,2),colorred;
四方力道能量（副图）
换手:=v*100/capital;
主力:=ma(换手,4);
大户:=ma(换手,9);
中户:=ma(换手,17);
散户:=ma(换手,34);
均量:=(主力+大户+中户+散户)/4;
大户能量:(大户-均量),Color00Ffff;
操盘:STICKLINE(大户能量>=0AND大户能量>=REF(大户能量,1),0,大户能量,4,0),COLORred;
减仓:STICKLINE(大户能量>=0AND大户能量<REF(大户能量,1),0,大户能量,4,0),COLORred;
反弹:STICKLINE(大户能量<0AND大户能量>=REF(大户能量,1),0,大户能量,4,0),COLORGREEN;
寻底:STICKLINE(大户能量<0AND大户能量<REF(大户能量,1),0,大户能量,4,0),COLORGREEN;
0,pointdot,COLORWHITE;
中户能量:(中户-均量),Color808000;
0,pointdot,COLORWHITE;
散户能量:(散户-均量),Colorgreen;
0,pointdot,COLORWHITE;
主力能量:(主力-均量),Colorffffcc;
0,pointdot,COLORWHITE;
四方力道改良（主图）
v1:=dma((((high+low)+(close*2))/4),0.9);
hy1:=ref(ema(v1,3),1);
实时线:ma(close,1),color006400;
神秘线:hy1,color400080;
stickline(c>hy1,low,high,1,0),colorred;
stickline(c>hy1,close,open,4.5,0),colorred;
stickline(c>hy1,close,open,4,0),colorred;
stickline(c>hy1,close,open,3,0),colorred;
stickline(c>hy1,close,open,2,0),colorred;
stickline(c<=hy1,close,open,4.5,0),colorff4242;
stickline(c<=hy1,close,open,4,0),colorff4242;
stickline(c<=hy1,close,open,3,0),colorff4242;
stickline(c<=hy1,close,open,2,0),colorff4242;
stickline(c<=hy1,low,high,1,0),colorff4242;
drawtext(cross(close,hy1),low,'↑'),linethick2,coloryellow;
drawtext(cross(hy1,close),high*1.05,'↓'),linethick3,colorwhite;
app:=(vol/(((high-low)*2)-abs((close-open))));
zl:=if((close>open),(app*(high-low)),if((close<open),(app*((high-open)+(close-low))),(vol/2)));
sf:=if((close>open),(0-(app*((high-close)+(open-low)))),if((close<open),(0-(app*(high-low))),(0-(vol/2))));
库存能量:=ma((zl+sf),2);
库存平均:=ma((zl+sf),5);
drawtext(cross(库存能量,库存平均),l*0.97,'↑'),colorff00ff,linethick4;
 |
