通达信转wh6 (文华财经WH6赢顺V6.7)

LC:=REF(CLOSE,1);

WRSI:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;

获利筹码:=CONST(WINNER(C)*100);

SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));

量能饱和:=(IF(SAT>1,1,SAT)*100);

WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;

活跃:=(WRSI-WR10);

活跃度比:=IF(活跃>=0,(活跃+100)/2,100-ABS((活跃-100)/2));

DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.25,1,STRCAT(STRCAT('量能饱和： ',CON2STR(量能饱和,2)),'％')),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.52,1,STRCAT(STRCAT('活跃度比： ',CON2STR(活跃度比,2)),'％')),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.75,1,STRCAT(STRCAT('获利筹码： ',CON2STR(获利筹码,2)),'％')),COLORYELLOW;

DRAWRECTREL(950,470,630,365,RGB(150,10,250));

DRAWRECTREL(950,710,630,610,RGB(150,10,250));

DRAWRECTREL(950,855,630,955,RGB(150,10,250));

DRAWRECTREL(950,470,630+CONST(量能饱和*(950-630)/100),365,RGB(0,100,0));

DRAWRECTREL(790,470,790,365,RGB(0,0,10));

DRAWRECTREL(950,710,630+CONST(活跃度比*(950-630)/100),610,RGB(0,100,0));

DRAWRECTREL(790,710,790,610,RGB(0,0,10));

DRAWRECTREL(950,855,630+CONST(获利筹码*(950-630)/100),955,RGB(0,100,0));

DRAWRECTREL(790,855,790,955,RGB(0,0,10));

总涨幅周期:=350;

高点位:=REFDATE(HHV(H,总涨幅周期),DATE);

低点位:=REFDATE(LLV(L,总涨幅周期),DATE);

低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW;

高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;

曾最大涨幅:=(高位价-低位价)/低位价*100;

当前涨幅:=(C-低位价)/低位价*100;

ZFA:=CON2STR(CONST(曾最大涨幅),2);

ZFB:=CON2STR(CONST(当前涨幅),2);

ZFC:=STRCAT('【曾最大涨幅】：',ZFA);

ZFD:=STRCAT(ZFC,'％');

ZFE:=STRCAT(ZFD,'【当前总涨幅】：');

ZFF:=STRCAT(ZFE,ZFB);

ZFG:=STRCAT(ZFF,'％');

{DRAWTEXT_FIX(ISLASTBAR,0.73,0.345,0,'),COLORRED;

DRAWTEXT_FIX(ISLASTBAR,0.73,0.345,0,ZFG),COLORYELLOW};

AA1X:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-

VOL/CAPITAL*100,0)),0)};

成交额:=V*C/100,NODRAW;{万元}

AA2X:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);

AA3X:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);

AA4X:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);

AA5X:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);

AA6X:=((AA2X+AA3X)+AA4X)+AA5X;

DD1X:=1;

AAA1:=STRCAT(STRCAT('机构持有',CON2STR((100*AA2X)/AA6X,0)),'%');

AAA2:=STRCAT(STRCAT('散户持有',CON2STR((100*AA3X)/AA6X,0)),'%');

DRAWTEXT_FIX(1,0.83,0,1,'《★筹码分析★》'),COLORRED;

DRAWTEXT_FIX(DD1X=1,0.63,0,0,AAA1),COLORMAGENTA;

DRAWTEXT_FIX(DD1X=1,0.89,0,0,AAA2),COLORGREEN;

VARA5:=CONST(AA2X/AA6X*100);

DRAWRECTREL(950,220,630,115,RGB(150,10,250));

DRAWRECTREL(950,220,630+CONST(VARA5*(950-630)/100),115,RGB(0,100,0));

DRAWRECTREL(790,220,790,115,RGB(0,0,10));

您指标中标注的函数都是DRAWTEXT_FIX、DRAWRECTREL等在屏幕指定位置标注类的函数，

文华不支持这类函数，文华软件中标注类的函数都是基于满足某条件在K线上进行标注的，请理解。

可以改写的部分修改如下：

LC:=REF(CLOSE,1);
WRSI:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;
获利筹码:=REFX1((WINNER(C)*100),10000);
AMOUNT:=AVPRICE*V;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
量能饱和:=(IF(SAT>1,1,SAT)*100);
WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;
活跃:=(WRSI-WR10);
活跃度比:=IF(活跃>=0,(活跃+100)/2,100-ABS((活跃-100)/2));
/*DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.25,1,STRCAT(STRCAT('量能饱和： ',CON2STR(量能饱和,2)),'％')),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.52,1,STRCAT(STRCAT('活跃度比： ',CON2STR(活跃度比,2)),'％')),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR=1,0.83,0.75,1,STRCAT(STRCAT('获利筹码： ',CON2STR(获利筹码,2)),'％')),COLORYELLOW;
DRAWRECTREL(950,470,630,365,RGB(150,10,250));
DRAWRECTREL(950,710,630,610,RGB(150,10,250));
DRAWRECTREL(950,855,630,955,RGB(150,10,250));
DRAWRECTREL(950,470,630+CONST(量能饱和*(950-630)/100),365,RGB(0,100,0));
DRAWRECTREL(790,470,790,365,RGB(0,0,10));
DRAWRECTREL(950,710,630+CONST(活跃度比*(950-630)/100),610,RGB(0,100,0));
DRAWRECTREL(790,710,790,610,RGB(0,0,10));
DRAWRECTREL(950,855,630+CONST(获利筹码*(950-630)/100),955,RGB(0,100,0));
DRAWRECTREL(790,855,790,955,RGB(0,0,10));
*/
总涨幅周期:=350;
高点位:=REFX1(HHV(H,总涨幅周期),10000);
低点位:=REFX1(LLV(L,总涨幅周期),10000);
低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW;
高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;
曾最大涨幅:=(高位价-低位价)/低位价*100;
当前涨幅:=(C-低位价)/低位价*100;
/*ZFA:=CON2STR(CONST(曾最大涨幅),2);
ZFB:=CON2STR(CONST(当前涨幅),2);
ZFC:=STRCAT('【曾最大涨幅】：',ZFA);
ZFD:=STRCAT(ZFC,'％');
ZFE:=STRCAT(ZFD,'【当前总涨幅】：');
ZFF:=STRCAT(ZFE,ZFB);
ZFG:=STRCAT(ZFF,'％');
{DRAWTEXT_FIX(ISLASTBAR,0.73,0.345,0,'),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.73,0.345,0,ZFG),COLORYELLOW};
AA1X:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-
VOL/CAPITAL*100,0)),0)};
*/
成交额:=V*C/100,NODRAW;
AA2X:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
AA3X:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
AA4X:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
AA5X:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
AA6X:=((AA2X+AA3X)+AA4X)+AA5X;
DD1X:=1;
/*AAA1:=STRCAT(STRCAT('机构持有',CON2STR((100*AA2X)/AA6X,0)),'%');
AAA2:=STRCAT(STRCAT('散户持有',CON2STR((100*AA3X)/AA6X,0)),'%');
DRAWTEXT_FIX(1,0.83,0,1,'《★筹码分析★》'),COLORRED;
DRAWTEXT_FIX(DD1X=1,0.63,0,0,AAA1),COLORMAGENTA;
DRAWTEXT_FIX(DD1X=1,0.89,0,0,AAA2),COLORGREEN;
VARA5:=CONST(AA2X/AA6X*100);
DRAWRECTREL(950,220,630,115,RGB(150,10,250));
DRAWRECTREL(950,220,630+CONST(VARA5*(950-630)/100),115,RGB(0,100,0));
DRAWRECTREL(790,220,790,115,RGB(0,0,10));*/

 参考2楼回复，指标中画线用到的函数暂时无法改写，所以显示不了画线。

请理解。