请老师改编成文华能执行得 (文华财经WH8赢智V8.2)

投资者咨询:请老师改编成文华能执行得 (文华财经WH8赢智V8.2)
来源:文华财经  日期:2018-7-3 15:46
 STICKLINE(OSTICKLINE(O>=C,O,C,2,0),COLOR666666;
YXT:REF(HHV(L,3),1)/2+REF(LLV(H,3),1)/2,DOTLINE,COLORBLACK;
YXT2:=REF(HHV(L,3),0)/2+REF(LLV(H,3),0)/2,COLORBLACK;
YXT3:=IF(YXT2>YXT,YXT+ABS(YXT-EMA(YXT,2))/4,YXT-ABS(YXT-EMA(YXT,2))/4);
DRAWBAND(YXT,RGB(0,150,150),YXT3,RGB(255,96,96));
CC:=IF(LREF(H,1),H,C));
HH1:=IF(H=HHV(H,N) AND L=LLV(L,N),H/2+L/2,H);
LL1:=IF(H=HHV(H,N) AND L=LLV(L,N),H/2+L/2,L);
HH2:=IF(H=HHV(H,M) AND L=LLV(L,M),H/2+L/2,H);
LL2:=IF(H=HHV(H,M) AND L=LLV(L,M),H/2+L/2,L);
NOTEXT001:=DRAWLINE(HHV(HH1,N)>REF(HHV(HH1,N),1) AND HH1>=HHV(HH1,N) AND BARSLAST(LL1=LLV(LL1,N))>1,HH1,LLV(LL1,N)1,LL1,0),COLOR000000;
NOTEXT002:=DRAWLINE(LLV(LL1,N)1,LL1,HHV(HH1,N)>REF(HHV(HH1,N),1) AND HH1>=HHV(HH1,N) AND BARSLAST(LL1=LLV(LL1,N))>1,HH1,0),COLOR000000;
NOTEXT003:=DRAWLINE(HHV(HH2,M)>REF(HHV(HH2,M),1) AND HH2>=HHV(HH2,M) AND BARSLAST(LL2=LLV(LL2,M))>1,HH2,LLV(LL2,M)1,LL2,0),COLORCC9933;
NOTEXT004:=DRAWLINE(LLV(LL2,M)1,LL2,HHV(HH2,M)>REF(HHV(HH2,M),1) AND HH2>=HHV(HH2,M) AND BARSLAST(LL2=LLV(LL2,M))>1,HH2,0),COLORCC33FF;
Z1:=IF(NOTEXT001/NOTEXT001=1,NOTEXT001,NOTEXT002);
Z2:=IF(NOTEXT003/NOTEXT003=1,NOTEXT003,NOTEXT004);
NOTEXT007:Z1,LINETHICK2,COLOR000000;
NOTEXT005:IF(BARSLAST(NOTEXT004/NOTEXT004=1)=0,Z1,DRAWNULL),LINETHICK2,COLOR7A00B8;
NOTEXT006:IF(BARSLAST(NOTEXT003/NOTEXT003=1)=0,Z1,DRAWNULL),LINETHICK2,COLORCC9933;
MA21:IF(CURRBARSCOUNT<=21,CONST(MA(C,21)),DRAWNULL),DOTLINE,COLORBLACK;
MA55:IF(CURRBARSCOUNT<=55,CONST(MA(C,55)),DRAWNULL),DOTLINE,COLOR7A00B8;
MA233:IF(CURRBARSCOUNT<=233,CONST(MA(C,233)),DRAWNULL),DOTLINE,COLORCC9933;
技术人员回复
日期:2018-7-3 16:04
文华中趋势线是不能赋值的,相关语句给您注释掉了

不同软件对函数的处理不同,改写后略有不同也是正常的,请参考

N:=10;
M:=20;
STICKLINE1(O<C,O,C,2,1),COLOR666666;
STICKLINE1(O>=C,O,C,2,0),COLOR666666;
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
YXT:REF(HHV(L,3),1)/2+REF(LLV(H,3),1)/2,DOT,COLORBLACK;
YXT2:=REF(HHV(L,3),0)/2+REF(LLV(H,3),0)/2,COLORBLACK;
YXT3:=IF(YXT2>YXT,YXT+ABS(YXT-EMA(YXT,2))/4,YXT-ABS(YXT-EMA(YXT,2))/4);
FILLRGN(YXT>YXT3 ,YXT ,YXT3 ,RGB(0,150,150) );
FILLRGN(YXT<YXT3 ,YXT ,YXT3 ,RGB(255,96,96));
CC:=IF(L<REF(L,1),L,IF(H>REF(H,1),H,C));
HH1:=IF(H=HHV(H,N) AND L=LLV(L,N),H/2+L/2,H);
LL1:=IF(H=HHV(H,N) AND L=LLV(L,N),H/2+L/2,L);
HH2:=IF(H=HHV(H,M) AND L=LLV(L,M),H/2+L/2,H);
LL2:=IF(H=HHV(H,M) AND L=LLV(L,M),H/2+L/2,L);
DRAWLINE1(HHV(HH1,N)>REF(HHV(HH1,N),1) AND HH1>=HHV(HH1,N) AND BARSLAST(LL1=LLV(LL1,N))>1,HH1,LLV(LL1,N)<REF(LLV(LL1,N),1) AND LL1<=LLV(LL1,N) AND BARSLAST(HH1=HHV(HH1,N))>1,LL1,0),COLOR000000;
DRAWLINE1(LLV(LL1,N)<REF(LLV(LL1,N),1) AND LL1<=LLV(LL1,N) AND BARSLAST(HH1=HHV(HH1,N))>1,LL1,HHV(HH1,N)>REF(HHV(HH1,N),1) AND HH1>=HHV(HH1,N) AND BARSLAST(LL1=LLV(LL1,N))>1,HH1,0),COLOR000000;
DRAWLINE1(HHV(HH2,M)>REF(HHV(HH2,M),1) AND HH2>=HHV(HH2,M) AND BARSLAST(LL2=LLV(LL2,M))>1,HH2,LLV(LL2,M)<REF(LLV(LL2,M),1) AND LL2<=LLV(LL2,M) AND BARSLAST(HH2=HHV(HH2,M))>1,LL2,0),COLORCC9933;
DRAWLINE1(LLV(LL2,M)<REF(LLV(LL2,M),1) AND LL2<=LLV(LL2,M) AND BARSLAST(HH2=HHV(HH2,M))>1,LL2,HHV(HH2,M)>REF(HHV(HH2,M),1) AND HH2>=HHV(HH2,M) AND BARSLAST(LL2=LLV(LL2,M))>1,HH2,0),COLORCC33FF;
MA21:IF(CURRBARSCOUNT<=21,REFX1(MA(C,21),10000),NULL),DOT,COLORBLACK;
MA55:IF(CURRBARSCOUNT<=55,REFX1(MA(C,55),10000),NULL),DOT,COLOR7A00B8;
MA233:IF(CURRBARSCOUNT<=233,REFX1(MA(C,233),10000),NULL),DOT,COLORCC9933;

投资者咨询:请老师改编成文华能执行得 (文华财经WH8赢智V8.2)
来源:文华财经  日期:2018-7-3 15:46
 谢谢,只要能执行就行
投资者咨询:请老师改编成文华能执行得 (文华财经WH8赢智V8.2)
来源:文华财经  日期:2018-7-3 15:46
执行的时候发现 DATACOUNT没有定义?这是啥
技术人员回复
日期:2018-7-3 16:17
这段源码当中的CURRBARSCOUNT需要用wn6中独有的DATACOUNT函数进行转换的

您是看盘用,请加载至wh6中使用



技术人员回复
日期:2018-7-3 16:38
 另外通达信的连线机制与文华这里有区别的,针对调整了一下:

N:=10;
M:=20;
STICKLINE1(O<C,O,C,2,1),COLOR666666;
STICKLINE1(O>=C,O,C,2,0),COLOR666666;
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
YXT:REF(HHV(L,3),1)/2+REF(LLV(H,3),1)/2,DOT,COLORBLACK;
YXT2:=REF(HHV(L,3),0)/2+REF(LLV(H,3),0)/2,COLORBLACK;
YXT3:=IF(YXT2>YXT,YXT+ABS(YXT-EMA(YXT,2))/4,YXT-ABS(YXT-EMA(YXT,2))/4);
FILLRGN(YXT>YXT3 ,YXT ,YXT3 ,RGB(0,150,150) );
FILLRGN(YXT<YXT3 ,YXT ,YXT3 ,RGB(255,96,96));
CC:=IF(L<REF(L,1),L,IF(H>REF(H,1),H,C));

HH2:=IF(H=HHV(H,M) AND L=LLV(L,M),H/2+L/2,H);
LL2:=IF(H=HHV(H,M) AND L=LLV(L,M),H/2+L/2,L);
RED:HHV(HH2,M)>REF(HHV(HH2,M),1) AND HH2>=HHV(HH2,M) AND BARSLAST(LL2=LLV(LL2,M))>1,NODRAW;
GREEN:LLV(LL2,M)<REF(LLV(LL2,M),1) AND LL2<=LLV(LL2,M) AND BARSLAST(HH2=HHV(HH2,M))>1,NODRAW;

XING:=BACKSET(RED&&COUNT(RED,BARSLAST(GREEN))=1||ISLASTBAR,BARSLAST(GREEN)+1);
XINR:=BACKSET(GREEN&&COUNT(GREEN,BARSLAST(RED))=1||ISLASTBAR,BARSLAST(RED)+1);
DRAWLINE1(CROSS(XINR,0.5),HH2,CROSS(XING,0.5),LL2,0),COLORCC9933;
DRAWLINE1(CROSS(XING,0.5),LL2,CROSS(XINR,0.5),HH2,0),COLORCC33FF;
MA21:IF(CURRBARSCOUNT<=21,REFX1(MA(C,21),10000),NULL),DOT,COLORBLACK;
MA55:IF(CURRBARSCOUNT<=55,REFX1(MA(C,55),10000),NULL),DOT,COLOR7A00B8;
MA233:IF(CURRBARSCOUNT<=233,REFX1(MA(C,233),10000),NULL),DOT,COLORCC9933;