飞狐寻庄骑马，在原指标基础上加上黑马线，副图，源码，贴图说明

N1:=5;
均价:=(0.618*(0.809*C+0.191*o)+0.382*(if(H=C,C,H)+if(L=C,C,L))/2);
lj:=if(STKTYPE=0,均价,AMOUNT/(V*100));
R:=(0.809*if(L=C,C,L)+0.191*lj);R1:=(0.809*if(H=C,C,H)+0.191*lj);kx:=(r+R1)/2;
kX:=(R+R1)/2;
HL:=SQRT(r1-r)+(r1=r);
JFC:=IF(CAPITAL>0,HL,SQRT(kx));
SF:=JFC;zl:=1/JFC;
MA3:=MA(R*zl,3)/MA(zl,3),COLORWHITE,PRECISION2;
工作线:=EMA(SUM(KX*V,3)/SUM(V,3),13),COLORYELLOW,LINETHICK1,PRECISION2;
角:=ATAN((工作线/ref(工作线,1)-1)*100)*180/3.1416,LINETHICK,COLORGREEN;
M3:=EMA((R+r1)/2,3);
M5:=EMA((R+r1)/2,5);
M8:=EMA((R+r1)/2,8),COLORWHITE;
M13:=EMA((R+r1)/2,13);
M21:=EMA((R+r1)/2,21),COLORYELLOW;
M34:=EMA((R+r1)/2,34);
M55:=EMA((R+r1)/2,55);
M89:=EMA((R+r1)/2,89);
M144:=EMA((R+r1)/2,144);
M233:=EMA((R+r1)/2,233);
M377:=EMA((R+r1)/2,377);
黄金线:=Ema((M3+M5+M8+M13+M21+M34+M55)/7,(3+5+8+13+21+34+55)/7);
zlx:=EMA(R*zl,99)/EMA(zl,99),COLORFFC0FF,LINETHICK2,PRECISION2;
lxx:=EMA(R*zl,233)/EMA(zl,233),COLORRED,LINETHICK2,PRECISION2;
MA555:=EMA(R*zl,368)/EMA(zl,368);
MA999:=EMA(R*zl,987)/EMA(zl,987);
行情线:(EMA(DMA(COST(77),0.77),13)+工作线)/2,COLOR6600FF,LINETHICK1;
多空线:=(eMA(DMA((COST(55)),0.55),25)+黄金线)/2,COLORRED,LINETHICK2;
主力线:=(eMA(DMA((COST(33)),0.33),99)+ZLX)/2,COLORFFC0FF,LINETHICK2;
牛熊线:=(eMA(DMA((COST(33)),0.33),233)+LXX)/2,COLORAAAA00;
主力成本线:(eMA(DMA((COST(8)),0.08),368)+MA555)/2,COLORWHITE,LINETHICK2;
Fx:=eMA(主力成本线-(ema(KX,2)-主力成本线),2);
PARTLINE(主力成本线 底仓线:=(eMA(DMA((COST(33)),0.33),987)+MA999)/2,COLORGREEN;
高杠:if(STKTYPE=0,hhv(行情线,75*3/2),hhv(行情线,52)),COLOR6600FF,PRECISION2,LINEDOT;
低杠:if(STKTYPE=0,llv(行情线,75),LLV(行情线,52)),COLORAAAA00,PRECISION2,LINEDOT;
十字线:(高杠+低杠)/2,COLORWHITE,CROSSDOT,PRECISION2;
PARTLINE(KX<十字线,十字线),COLORCYAN,CROSSDOT;
PARTLINE(KX<高杠,高杠),COLORFFCCAA,LINEDOT;
DIF:=工作线-主力线,COLORRED;
dea:=MA(dif,5),COLORAAAA00;
MACD:=5*(DIF-DEA),LINETHICK;
{LC := REF(均价,1);
RSIA:=SMA(MAX(均价-LC,0),8,1)/SMA(ABS(均价-LC),8,1)*100;
RSIB:=SMA(MAX(均价-LC,0),56,1)/SMA(ABS(均价-LC),56,1)*100;
HR:=REF(HHV(RSIA,28),1);
DRAWTEXT(CROSS(HR,RSIb)and ref(RSIb,1)>65,h*1.02,'警'),COLORRED,ALIGN0;
DRAWTEXT(CROSS(HDIF,DIF) ,h*1.02,'逃'),COLORWHITE,ALIGN0;}

{rcc:=DYNAINFO(3); s22:=sma(c,3,1); s66:=sma(c,5,1);
dk1:=10*(s22-s66); kk:=IF(DATATYPE=8,0.95,1);
STICKLINE(dk1>0,rcc*kk,rcc*kk+dk1,0,1),COLORRED;
STICKLINE(dk1<0,rcc*kk,rcc*kk+dk1,0,1),COLORCYAN;}

////////****** 计算指标变换所需的公共数据 *******
rc:=DYNAINFO(3);//前收
q:=datacount;
hh:=DYNAINFO(5);//最高
LL:=DYNAINFO(6);//最低
f:=max(hh-rc,rc-LL);
ff:=f/rc*100;//最大半振幅
/////