我的四方力道让我误删了，找到的这个源码，看看还挺全的，就发上来，大家分享
{主力}
换手:=v*100/capital;
主力:=ma(换手,4);
大户:=ma(换手,9);
中户:=ma(换手,17);
散户:=ma(换手,34);
均量:=(主力+大户+中户+散户)/4;
主力能量:=(主力-均量);
操盘:STICKLINE(主力能量>=0 AND 主力能量>=REF(主力能量,1),0,主力能量,4,0),COLORred;
减仓:STICKLINE(主力能量>=0 AND 主力能量< REF(主力能量,1),0,主力能量,4,0),COLORred;
反弹:STICKLINE(主力能量<0 AND 主力能量>=REF(主力能量,1),0,主力能量,4,0),COLORGREEN;
寻底:STICKLINE(主力能量<0 AND 主力能量< REF(主力能量,1),0,主力能量,4,0),COLORGREEN;
0,pointdot,COLORWHITE;


，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，
{大户}
换手:=v*100/capital;
主力:=ma(换手,4);
大户:=ma(换手,9);
中户:=ma(换手,17);
散户:=ma(换手,34);
均量:=(主力+大户+中户+散户)/4;
大户能量:=(大户-均量);
操盘:STICKLINE(大户能量>=0 AND 大户能量>=REF(大户能量,1),0,大户能量,4,0),COLORred;
减仓:STICKLINE(大户能量>=0 AND 大户能量< REF(大户能量,1),0,大户能量,4,0),COLORred;
反弹:STICKLINE(大户能量<0 AND 大户能量>=REF(大户能量,1),0,大户能量,4,0),COLORGREEN;
寻底:STICKLINE(大户能量<0 AND 大户能量< REF(大户能量,1),0,大户能量,4,0),COLORGREEN;
0,pointdot,COLORWHITE;


，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，
{中户}
换手:=v*100/capital;
主力:=ma(换手,4);
大户:=ma(换手,9);
中户:=ma(换手,17);
散户:=ma(换手,34);
均量:=(主力+大户+中户+散户)/4;
中户能量:=(中户-均量);
操盘:STICKLINE(中户能量>=0 AND 中户能量>=REF(中户能量,1),0,中户能量,4,0),COLORred;
减仓:STICKLINE(中户能量>=0 AND 中户能量< REF(中户能量,1),0,中户能量,4,0),COLORred;
反弹:STICKLINE(中户能量<0 AND 中户能量>=REF(中户能量,1),0,中户能量,4,0),COLORGREEN;
寻底:STICKLINE(中户能量<0 AND 中户能量< REF(中户能量,1),0,中户能量,4,0),COLORGREEN;
0,pointdot,COLORWHITE;

，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，
{散户}
换手:=v*100/capital;
主力:=ma(换手,4);
大户:=ma(换手,9);
中户:=ma(换手,17);
散户:=ma(换手,34);
均量:=(散户+主力+大户+中户)/4;
散户能量:=(散户-均量);
操盘:STICKLINE(散户能量>=0 AND 散户能量>=REF(散户能量,1),0,散户能量,4,0),COLORred;
减仓:STICKLINE(散户能量>=0 AND 散户能量< REF(散户能量,1),0,散户能量,4,0),COLORred;
反弹:STICKLINE(散户能量<0 AND 散户能量>=REF(散户能量,1),0,散户能量,4,0),COLORGREEN;
寻底:STICKLINE(散户能量<0 AND 散户能量< REF(散户能量,1),0,散户能量,4,0),COLORGREEN;
0,pointdot,COLORWHITE;
。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。
{资金趋势图}
a:=vol*close;
b:=sum(a,1)/sum(vol,1);
b1:=emA(b,17);
主力资金:(b-b1)*100/b,colorred;
强弱线:0,colorffcc66;
----------------------------------------------------------------------------------------------
{四方多空趋势}
V1:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9);
HY1:=REF(EMA(V1,3),1);
多空趋势:=MA((CLOSE - HY1) * 10,2);
操盘:STICKLINE(多空趋势>=0 AND 多空趋势>=REF(多空趋势,1),0,多空趋势,4,0),COLORYELLOW;
减仓:STICKLINE(多空趋势>=0 AND 多空趋势< REF(多空趋势,1),0,多空趋势,4,0),COLORYELLOW;
反弹:STICKLINE(多空趋势<0 AND 多空趋势>=REF(多空趋势,1),0,多空趋势,4,0),COLORGREEN;
寻底:STICKLINE(多空趋势<0 AND 多空趋势< REF(多空趋势,1),0,多空趋势,4,0),COLORGREEN;
0,pointdot,COLORWHITE;
---------------------------------------------------------------------------------------------
{四方力道副图}
V1:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9);
HY1:=REF(EMA(V1,3),1);
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))));
VAR1:=(((CLOSE - HY1) / HY1) * 100);
VAR2:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);
TS:=BARSLAST((BARSLAST(((VAR1 > 0) AND (REF(VAR1,1) > 0))) > 0));
利润:=SUM(IF((TS > 0),VAR2,0),0);
库存能量:MA((ZL + SF),2),coloryellow;
库存平均:MA((ZL + SF),5),ColorFF00FF;
主力:MA(ZL,2),Colorred;
散户:MA(SF,2),colorgreen;
获利:MA(利润,2),color4080FF;
多空线:MA((CLOSE - HY1) * 10,2),colorwhite;
--------------------------------------------------------------------------------
{四方力道导航}
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;
，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，，
{四方力道}
买线:=EMA(C,2);
卖线:=EMA(SLOPE(C,21)*20+C,42);   
stickline(买线>=卖线,low,high,1,0),colorred;
stickline(买线>=卖线,close,open,4.5,0),colorred;
stickline(买线>=卖线,close,open,4,0),colorred;
stickline(买线>=卖线,close,open,3,0),colorred;
stickline(买线>=卖线,close,open,2,0),colorred;
stickline(买线<卖线,close,open,4.5,0),ColorFF4242;
stickline(买线<卖线,close,open,4,0),ColorFF4242;
stickline(买线<卖线,close,open,3,0),ColorFF4242;
stickline(买线<卖线,close,open,2,0),ColorFF4242;
stickline(买线<卖线,low,high,1,0),ColorFF4242;
stickline(cross(买线,卖线) or cross(卖线,买线),open,close,3,0),color00ffff;
V1:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9);
HY1:=REF(EMA(V1,3),1);
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;
线性:=((((((CLOSE * 5) + (REF(CLOSE,1) * 4)) + (REF(CLOSE,2) * 3)) + (REF(CLOSE,3) * 2)) + (REF(CLOSE,4) * 1)) / ((((5 + 4) + 3) + 2) + 1));
导航:线性,colorgreen;