投资者咨询：老师请帮忙改写成文华代码，谢谢您！ (文华财经wh7睿期)
来源:文华财经 日期:2018-8-20 17:44
SJ1:=TIME2=93100;
T1:=BARSLAST(SJ1);
SJ2:=TIME2=94100;
SJ4:=TIME2=95100;
T2:=BARSLAST(SJ2);
T4:=BARSLAST(SJ4);
H11:=IF(TIME2=94100,REF(C,T2),DRAWNULL)=C;
H22:=IF(TIME2=95100,REF(C,T4),DRAWNULL)=C;
CS2:=CONST(REF(C,T2));
CS4:=CONST(REF(C,T4));
GL2:=FILTERX(H11,T2);
GL4:=FILTERX(H22,T4);
L11:=IF(TIME2=93100,REF(C,T1),DRAWNULL)=C;
CS1:=CONST(REF(C,T1));
GL1:=FILTERX(L11,T1);
DA:=CONST(IF(REF(GL2,BARSLAST(GL2)),REF(BARSLAST(GL1),BARSLAST(GL2)),DRAWNULL));
DA1:=CONST(IF(REF(GL4,BARSLAST(GL4)),REF(BARSLAST(GL2),BARSLAST(GL4)),DRAWNULL));
A:=IF(BARSLAST(GL1)>=0 AND BARSLAST(GL1)<=DA,((CS2-CS1)/DA)*BARSLAST(GL1)+CS1,DRAWNULL);
B:=IF(BARSLAST(GL2)>=0 AND BARSLAST(GL2)<=DA1,((CS4-CS2)/DA1)*BARSLAST(GL2)+CS2,DRAWNULL);
IF(A>=REF(A,2),A,DRAWNULL)COLORLIMAGENTA,LINETHICK2,NODRAW;
IF(A<REF(A,2),A,DRAWNULL)COLORGREEN,LINETHICK2,NODRAW;
IF(B>=REF(B,2),B,DRAWNULL)COLORLIMAGENTA,LINETHICK2,NODRAW;
IF(B<REF(B,2),B,DRAWNULL)COLORGREEN,LINETHICK2,NODRAW;
XSJ1:=TIME2=95100;
XT1:=BARSLAST(XSJ1);
XSJ2:=TIME2=100100;
XT2:=BARSLAST(XSJ2);
XCS2:=CONST(REF(C,XT2));
XL1:=IF(TIME2=95100,REF(C,XT1),DRAWNULL)=C;
XH1:=IF(TIME2=100100,REF(C,XT2),DRAWNULL)=C;
XCS1:=CONST(REF(C,XT1));
XGL1:=FILTERX(XL1,XT1);
XGL2:=FILTERX(XH1,XT2);
XDA:=CONST(IF(REF(XGL2,BARSLAST(XGL2)),REF(BARSLAST(XGL1),BARSLAST(XGL2)),DRAWNULL));
XA:=IF(BARSLAST(XGL1)>=0 AND BARSLAST(XGL1)<=XDA,((XCS2-XCS1)/XDA)*BARSLAST(XGL1)+XCS1,DRAWNULL);
IF(XA>=REF(XA,1),XA,DRAWNULL)COLORLIMAGENTA,LINETHICK2,NODRAW;
IF(XA<REF(XA,1),XA,DRAWNULL)COLORGREEN,LINETHICK2,NODRAW;
时间:=TIME2=94600;
N:=BARSLAST(时间);
CC1:CONST(IF(N,MAX(REF(HHV(H,0),N+1),DYNAINFO(4)),HHV(H,0))),COLORGRAY,LINETHICK1;
CC2:CONST(IF(N,MIN(REF(LLV(L,0),N+1),DYNAINFO(4)),LLV(L,0))),COLORGRAY,LINETHICK1;
VV:=HHV(V,0);
ZF:=(CC1/CC2-1)*100;
T1:=BARSLAST(SJ1);
SJ2:=TIME2=94100;
SJ4:=TIME2=95100;
T2:=BARSLAST(SJ2);
T4:=BARSLAST(SJ4);
H11:=IF(TIME2=94100,REF(C,T2),DRAWNULL)=C;
H22:=IF(TIME2=95100,REF(C,T4),DRAWNULL)=C;
CS2:=CONST(REF(C,T2));
CS4:=CONST(REF(C,T4));
GL2:=FILTERX(H11,T2);
GL4:=FILTERX(H22,T4);
L11:=IF(TIME2=93100,REF(C,T1),DRAWNULL)=C;
CS1:=CONST(REF(C,T1));
GL1:=FILTERX(L11,T1);
DA:=CONST(IF(REF(GL2,BARSLAST(GL2)),REF(BARSLAST(GL1),BARSLAST(GL2)),DRAWNULL));
DA1:=CONST(IF(REF(GL4,BARSLAST(GL4)),REF(BARSLAST(GL2),BARSLAST(GL4)),DRAWNULL));
A:=IF(BARSLAST(GL1)>=0 AND BARSLAST(GL1)<=DA,((CS2-CS1)/DA)*BARSLAST(GL1)+CS1,DRAWNULL);
B:=IF(BARSLAST(GL2)>=0 AND BARSLAST(GL2)<=DA1,((CS4-CS2)/DA1)*BARSLAST(GL2)+CS2,DRAWNULL);
IF(A>=REF(A,2),A,DRAWNULL)COLORLIMAGENTA,LINETHICK2,NODRAW;
IF(A<REF(A,2),A,DRAWNULL)COLORGREEN,LINETHICK2,NODRAW;
IF(B>=REF(B,2),B,DRAWNULL)COLORLIMAGENTA,LINETHICK2,NODRAW;
IF(B<REF(B,2),B,DRAWNULL)COLORGREEN,LINETHICK2,NODRAW;
XSJ1:=TIME2=95100;
XT1:=BARSLAST(XSJ1);
XSJ2:=TIME2=100100;
XT2:=BARSLAST(XSJ2);
XCS2:=CONST(REF(C,XT2));
XL1:=IF(TIME2=95100,REF(C,XT1),DRAWNULL)=C;
XH1:=IF(TIME2=100100,REF(C,XT2),DRAWNULL)=C;
XCS1:=CONST(REF(C,XT1));
XGL1:=FILTERX(XL1,XT1);
XGL2:=FILTERX(XH1,XT2);
XDA:=CONST(IF(REF(XGL2,BARSLAST(XGL2)),REF(BARSLAST(XGL1),BARSLAST(XGL2)),DRAWNULL));
XA:=IF(BARSLAST(XGL1)>=0 AND BARSLAST(XGL1)<=XDA,((XCS2-XCS1)/XDA)*BARSLAST(XGL1)+XCS1,DRAWNULL);
IF(XA>=REF(XA,1),XA,DRAWNULL)COLORLIMAGENTA,LINETHICK2,NODRAW;
IF(XA<REF(XA,1),XA,DRAWNULL)COLORGREEN,LINETHICK2,NODRAW;
时间:=TIME2=94600;
N:=BARSLAST(时间);
CC1:CONST(IF(N,MAX(REF(HHV(H,0),N+1),DYNAINFO(4)),HHV(H,0))),COLORGRAY,LINETHICK1;
CC2:CONST(IF(N,MIN(REF(LLV(L,0),N+1),DYNAINFO(4)),LLV(L,0))),COLORGRAY,LINETHICK1;
VV:=HHV(V,0);
ZF:=(CC1/CC2-1)*100;
技术人员回复
日期:2018-8-20 17:57
投资者咨询：老师请帮忙改写成文华代码，谢谢您！ (文华财经wh7睿期)
来源:文华财经 日期:2018-8-20 17:44
OK
幸苦老师了。如果有什么动向麻烦留言。
