烦转换为文华版本 (文华财经)

投资者咨询：烦转换为文华版本 (文华财经)

来源:文华财经日期:2021-1-21 14:28

老师你好，烦转换为文华版本。谢谢！

下载信息 [文件大小：下载次数： ]
文件名：6.txt

技术人员回复

日期:2021-1-21 14:31

参考：

AS:=(C*3+O+H+L)/6;

XJ:=(AS+0.618*REF(AS,1)+0.382*REF(AS,2)+0.236*REF(AS,3)+0.146*REF(AS,4))/2.382;

HLX:=EMA(HHV(XJ,3),15);

LLX:=EMA(LLV(XJ,3),15);

CH:=CROSS(XJ,HLX);

CL:=CROSS(LLX,XJ);

CHH:=BARSLAST(CH);

CLL:=BARSLAST(CL);

YF1:=(CHH<CLL OR CH) AND NOT(CL);

YF2:=(CHH>CLL OR CL) AND NOT(CH);

TF:=IF(YF1,LLX,HLX);

TFB:=(HLX+LLX)/2;

XJK:=SMA(EMA(XJ,3),3,1);

ZWSH:=(HHV(XJ,2)+HHV(XJ,3)+HHV(XJ,4)+HHV(XJ,5))/4;

SH:=EMA(ZWSH,21);

ZWSL:=(LLV(XJ,2)+LLV(XJ,3)+LLV(XJ,4)+LLV(XJ,5))/4;

SL:=EMA(ZWSL,21);

SCH:=CROSS(XJ,SH);

SCL:=CROSS(SL,XJ);

SHH:=BARSLAST(SCH);

SLL:=BARSLAST(SCL);

SF1:=(SHH<SLL OR SCH) AND NOT(SCL);

SF2:=(SHH>SLL OR SCL) AND NOT(SCH);

TFS:=IF(SF1,SL,SH);

TFBS:=(SL+SH)/2;

{K线}

KX1:=(CLOSE>=OPEN) AND XJ>=TFS;

KX2:=(CLOSE<OPEN) AND XJ>=TFS;

KX3:=(CLOSE>=OPEN) AND XJ<TFS;

KX4:=(CLOSE<OPEN) AND XJ<TFS;

KX5:=((XJ>=TFS AND XJ<TF) OR (XJ<TFS AND XJ>=TF)) AND CLOSE>=OPEN;

KX6:=((XJ>=TFS AND XJ<TF) OR (XJ<TFS AND XJ>=TF)) AND CLOSE<OPEN;

FILLRGN(TFB>TFS,TFB,TFS,RGB(40,00,40));

FILLRGN(TFB<TFS,TFB,TFS,RGB(00,00,80));

FILLRGN(TFB>TF,TFB,TF,RGB(90,00,00));

FILLRGN(TFB<TF,TFB,TF,RGB(00,55,00));

STICKLINE1(KX1,C,O,2,1),COLORFF4044;

STICKLINE1(KX1,C,H,0,1),COLORFF4044;

STICKLINE1(KX1,O,L,0,1),COLORFF4044;

STICKLINE1(KX2,C,O,2,0),COLORFF4044;

STICKLINE1(KX2,O,H,0,0),COLORFF4044;

STICKLINE1(KX2,C,L,0,0),COLORFF4044;

STICKLINE1(KX3,C,O,2,1),COLOR33FFFF;

STICKLINE1(KX3,C,H,0,1),COLOR33FFFF;

STICKLINE1(KX3,O,L,0,1),COLOR33FFFF;

STICKLINE1(KX4,C,O,2,0),COLOR33FFFF;

STICKLINE1(KX4,O,H,0,0),COLOR33FFFF;

STICKLINE1(KX4,C,L,0,0),COLOR33FFFF;