[求助]改写通达信为wh6 (文华财经WH6赢顺V6.7)

投资者咨询:[求助]改写通达信为wh6 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-8-16 16:27

 主持仓:EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),COLORMAGENTA LINETHICK2;
散持仓:=EMA(100*(INDEXC-LLV(INDEXL,34))/(HHV(INDEXH,34)-LLV(INDEXL,34)),3),COLORFFAA66,LINETHICK3;
强分界: 80,COLORYELLOW;
庄筹度:WINNER(C)*100 COLORRED LINETHICK2;
散筹度:(WINNER(C*1.1)-WINNER(C*0.9))*100 COLORGREEN LINETHICK2;
弱分界: 0,COLORYELLOW;
 VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
 VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1);
 VAR3:=EMA(VAR2,10);
 VAR4:=LLV(LOW,33);
 VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3);
主力进场:IF(VAR5>REF(VAR5,1),VAR5,0),COLORRED,NODRAW;
 STICKLINE(VAR5>REF(VAR5,1),0,VAR5,3,0 ),COLOR000055;
 STICKLINE(VAR5>REF(VAR5,1),0,VAR5,2.6,0 ),COLOR000077;
 STICKLINE(VAR5>REF(VAR5,1),0,VAR5,2.1,0 ),COLOR000099;
 STICKLINE(VAR5>REF(VAR5,1),0,VAR5,1.5,0 ),COLOR0000BB;
 STICKLINE(VAR5>REF(VAR5,1),0,VAR5,0.9,0 ),COLOR0000DD;
 STICKLINE(VAR5>REF(VAR5,1),0,VAR5,0.3,0 ),COLOR0000FF;
洗盘:IF(VAR5<REF(VAR5,1),VAR5,0),COLORGREEN,NODRAW;
 STICKLINE(VAR5<REF(VAR5,1),0,VAR5,3,0),COLOR005500;
 STICKLINE(VAR5<REF(VAR5,1),0,VAR5,2.6,0),COLOR007700;
 STICKLINE(VAR5<REF(VAR5,1),0,VAR5,2.1,0),COLOR009900;
 STICKLINE(VAR5<REF(VAR5,1),0,VAR5,1.5,0),COLOR00BB00;
 STICKLINE(VAR5<REF(VAR5,1),0,VAR5,0.9,0),COLOR00DD00;
 STICKLINE(VAR5<REF(VAR5,1),0,VAR5,0.3,0),COLOR00FF00;

 

 

 

副图 ,麻烦修改下,谢谢!

 
技术人员回复
日期:2018-8-16 16:35

不同软件函数机制不同,加载效果会有不同,请理解

 

请参考

 

主持仓:EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),COLORMAGENTA,LINETHICK2;
INDEXH:="999001$HIGH";
INDEXC:="999001$CLOSE";
INDEXL:="999001$LOW";
INDEXO:="999001$OPEN";
散持仓:=EMA(100*(INDEXC-LLV(INDEXL,34))/(HHV(INDEXH,34)-LLV(INDEXL,34)),3),COLORFFAA66,LINETHICK3;
强分界: 80,COLORYELLOW;
庄筹度:WINNER(C)*100,COLORRED,LINETHICK2;
散筹度:(WINNER(C*1.1)-WINNER(C*0.9))*100,COLORGREEN,LINETHICK2;
弱分界: 0,COLORYELLOW;
 VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
 VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1);
 VAR3:=EMA(VAR2,10);
 VAR4:=LLV(LOW,33);
 VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3);
主力进场:IF(VAR5>REF(VAR5,1),VAR5,0),COLORRED,NODRAW;
 STICKLINE1(VAR5>REF(VAR5,1),0,VAR5,3,0 ),COLOR000055;
 STICKLINE1(VAR5>REF(VAR5,1),0,VAR5,2.6,0 ),COLOR000077;
 STICKLINE1(VAR5>REF(VAR5,1),0,VAR5,2.1,0 ),COLOR000099;
 STICKLINE1(VAR5>REF(VAR5,1),0,VAR5,1.5,0 ),COLOR0000BB;
 STICKLINE1(VAR5>REF(VAR5,1),0,VAR5,0.9,0 ),COLOR0000DD;
 STICKLINE1(VAR5>REF(VAR5,1),0,VAR5,0.3,0 ),COLOR0000FF;
洗盘:IF(VAR5<REF(VAR5,1),VAR5,0),COLORGREEN,NODRAW;
 STICKLINE1(VAR5<REF(VAR5,1),0,VAR5,3,0),COLOR005500;
 STICKLINE1(VAR5<REF(VAR5,1),0,VAR5,2.6,0),COLOR007700;
 STICKLINE1(VAR5<REF(VAR5,1),0,VAR5,2.1,0),COLOR009900;
 STICKLINE1(VAR5<REF(VAR5,1),0,VAR5,1.5,0),COLOR00BB00;
 STICKLINE1(VAR5<REF(VAR5,1),0,VAR5,0.9,0),COLOR00DD00;
 STICKLINE1(VAR5<REF(VAR5,1),0,VAR5,0.3,0),COLOR00FF00;