投资者咨询：老师请教问题 (文华财经WH6赢顺V6.7)
来源:文华财经 日期:2018-5-25 14:53
老师麻烦改文华用，请再给加1条13日均线
K重心:AMOUNT/(100*V),COLORYELLOW,NODRAW;MA1:MA(CLOSE,M1),COLORWHITE;
MA2:MA(CLOSE,M2),COLORYELLOW;
主力趋势线:DMA(0.25*(C+H+O+L),100*V/FINANCE(7)),DOTLINE;
IF(C>1.005*MA2,MA2,DRAWNULL),COLORRED,LINETHICK2;{2均线上升填红}
平均价:=0.25*(H+C+O+L);
双剑:STICKLINE(COUNT((H-L)>4.5*ABS(C-O),2)=2 AND 平均价<REF(平均价,1) AND L<REF(L,1)
AND (H-MAX(C,O))<0.65*(MIN(C,O)-L),H,L,0.3,0),COLORYELLOW;
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,FGBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLOR00FF00;
市净率:=STRCAT('市净率:',CON2STR(C/FINANCE(34),2));
市盈率:=STRCAT('市盈率:',CON2STR(DYNAINFO(39),2));
市值:=STRCAT(STRCAT('流通市值:',CON2STR((CAPITAL/1000000)*C,2)),'亿');
股本市值:=STRCAT('',STRCAT(市净率,市值));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.07,0,STRCAT(市盈率 ,股本市值)),COLORMAGENTA;
现价:=IF(CURRBARSCOUNT<225,CONST(C),DRAWNULL),COLORWHITE,DOTLINE;
最低:=IF(CURRBARSCOUNT<60,CONST(L),DRAWNULL),COLORGREEN,DOTLINE;
上轨:=(1+11/100)*MA(C,10),NODRAW;
已补缺口1:STICKLINE(H<REF(L,1),REF(L,1),H,1.5,0),COLOR808080;
已补缺口2:STICKLINE(L>REF(H,1),REF(H,1),L,1.5,1),COLOR808080;
涨停:STICKLINE(C>1.099*REF(C,1),O,H,0.3,0),COLORMAGENTA;
板缩:STICKLINE(C>1.099*REF(C,1) AND V<REF(V,1),O,C,0.8,0),COLORRED;
板筹:STICKLINE(C>1.099*REF(C,1) AND (COST(95)-COST(5))/(COST(95)+COST(5))*100/2<=6,O,C,2,0),COLOR00FFFF;
涨停过:STICKLINE(H>1.099*REF(C,1) AND C<H,O,C,0.2,0),COLOR8080FF;
跌停过:STICKLINE(L<0.909*REF(C,1),0.5*(REF(C,1)+C),1.02*L,0.1,0),COLORFF0000;
MIDA:=MA(C,20);
VART1:=POW((C-MIDA),2);
VART2:=MA(VART1,20);
VART3:=SQRT(VART2);
UPPERA:=MIDA+2*VART3;
LOWERA:=MIDA-2*VART3;
BOLL:=REF(MIDA,1);
UB:=REF(UPPERA,1),DOTLINE;
LB:=REF(LOWERA,1),DOTLINE;
UBS:=IF(100*(UB/LB-1)<=9,UB,DRAWNULL),COLORRED,LINETHICK2;
LBS:=IF(100*(BOLL/REF(LOWERA,1)-1)<=5,LB,DRAWNULL),COLORGREEN,LINETHICK1;
集:=(COST(95)-COST(5))/(COST(95)+COST(5))*100/2;
小阳:=(C>REF(C,1) OR C>=O) AND C<1.021*REF(C,1) AND C<1.016*O;
有星:=(2.5*ABS(C-O)<MIN(C,O)-L) OR (2.5*ABS(C-O)<H-MAX(C,O));
亮:=COUNT(小阳,6)>=3 AND COUNT(有星,6)>=2;
强:=C/REF(C,4)>1.01*INDEXC/REF(INDEXC,4) AND BOLL>MIN(REF(BOLL,1),REF(BOLL,2));
漂:=亮 AND C>REF(MA(C,20),1) AND 强 ;
DRAWTEXT(LBS>0 AND 漂,BOLL,'$漂'),COLORGREEN;
技术人员回复
日期:2018-5-25 15:02
投资者咨询：老师请教问题 (文华财经WH6赢顺V6.7)
来源:文华财经 日期:2018-5-25 14:53
老师上面是个通达信指标请改文华的然后加上13日均线
技术人员回复
日期:2018-5-25 15:58
您的指标中STRCAT函数暂时无法改写，其余已经为您编写好
MA13:MA(C,13);
K重心:V*AVPRICE/(100*V),COLORYELLOW,NODRAW;
MA1:MA(CLOSE,M1),COLORWHITE;
MA2:MA(CLOSE,M2),COLORYELLOW;
//主力趋势线:DMA(0.25*(C+H+O+L),100*V/FINANCE(7)),DOTLINE;
IF(C>1.005*MA2,MA2,NULL),COLORRED,LINETHICK2;
{2均线上升填红}
平均价:=0.25*(H+C+O+L);
STICKLINE1(COUNT((H-L)>4.5*ABS(C-O),2)=2 AND 平均价<REF(平均价,1) AND L<REF(L,1)
AND (H-MAX(C,O))<0.65*(MIN(C,O)-L),H,L,0.3,0),COLORYELLOW;
/*Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,FGBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLOR00FF00;
市净率:=STRCAT('市净率:',CON2STR(C/FINANCE(34),2));
市盈率:=STRCAT('市盈率:',CON2STR(DYNAINFO(39),2));
市值:=STRCAT(STRCAT('流通市值:',CON2STR((CAPITAL/1000000)*C,2)),'亿');
股本市值:=STRCAT('',STRCAT(市净率,市值));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.07,0,STRCAT(市盈率 ,股本市值)),COLORMAGENTA;
现价:=IF(CURRBARSCOUNT<225,CONST(C),DRAWNULL),COLORWHITE,DOTLINE;
最低:=IF(CURRBARSCOUNT<60,CONST(L),DRAWNULL),COLORGREEN,DOTLINE;
上轨:=(1+11/100)*MA(C,10),NODRAW;
已补缺口1:STICKLINE(H<REF(L,1),REF(L,1),H,1.5,0),COLOR808080;
已补缺口2:STICKLINE(L>REF(H,1),REF(H,1),L,1.5,1),COLOR808080;
涨停:STICKLINE(C>1.099*REF(C,1),O,H,0.3,0),COLORMAGENTA;
板缩:STICKLINE(C>1.099*REF(C,1) AND V<REF(V,1),O,C,0.8,0),COLORRED;
板筹:STICKLINE(C>1.099*REF(C,1) AND (COST(95)-COST(5))/(COST(95)+COST(5))*100/2<=6,O,C,2,0),COLOR00FFFF;
*/
STICKLINE1(H>1.099*REF(C,1) AND C<H,O,C,0.2,0),COLOR8080FF;
STICKLINE1(L<0.909*REF(C,1),0.5*(REF(C,1)+C),1.02*L,0.1,0),COLORFF0000;
MIDA:=MA(C,20);
VART1:=POW((C-MIDA),2);
VART2:=MA(VART1,20);
VART3:=SQRT(VART2);
UPPERA:=MIDA+2*VART3;
LOWERA:=MIDA-2*VART3;
BOLL1:=REF(MIDA,1);
UB:=REF(UPPERA,1),DOT;
LB:=REF(LOWERA,1),DOT;
UBS:=IF(100*(UB/LB-1)<=9,UB,NULL),COLORRED,LINETHICK2;
LBS:=IF(100*(BOLL1/REF(LOWERA,1)-1)<=5,LB,NULL),COLORGREEN,LINETHICK1;
集:=(COST(95)-COST(5))/(COST(95)+COST(5))*100/2;
小阳:=(C>REF(C,1) OR C>=O) AND C<1.021*REF(C,1) AND C<1.016*O;
有星:=(2.5*ABS(C-O)<MIN(C,O)-L) OR (2.5*ABS(C-O)<H-MAX(C,O));
亮:=COUNT(小阳,6)>=3 AND COUNT(有星,6)>=2;
INDEXC:="999001$C";
强:=C/REF(C,4)>1.01*INDEXC/REF(INDEXC,4) AND BOLL1>MIN(REF(BOLL1,1),REF(BOLL1,2));
漂:=亮 AND C>REF(MA(C,20),1) AND 强 ;
DRAWTEXT(LBS>0 AND 漂,BOLL1,'$漂'),COLORGREEN;
