老师求改文华公式 (文华财经WH6赢顺V6.7)

投资者咨询:老师求改文华公式 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2019-4-16 15:46
第一个:
 MINBI:=IF(PERIOD=6,"FBASE.VAR2#YEAR",IF(PERIOD=5,"FBASE.VAR2#MONTH",IF(PERIOD=4,"FBASE.VAR2#WEEK",
       IF(PERIOD=3,"FBASE.VAR2#DAY",IF(PERIOD=2,"FBASE.VAR2#MIN30",
       IF(PERIOD=1,"FBASE.VAR2#MIN15",IF(PERIOD=0,"FBASE.VAR2#MIN5",1)))))));

VAR2:=TDXDLL8(1,PERIOD,H,L);{得到笔}
VAR3:=TDXDLL8(3,MINBI,0,0);{跨周期分解}
ZG:=TDXDLL8(4,VAR3,0,0);{中枢高点,一定要先于ZD调用}
ZD:=TDXDLL8(5,0,0,0);{中枢低点}

STICKLINE(ZG>ZD,ZG,ZD,10,0),COLOR000055;
DRAWLINE(VAR2=1,H,VAR2=-1,L,0),DOTLINE,COLORYELLOW;
DRAWLINE(VAR2=-1,L,VAR2=1,H,0),DOTLINE,COLORYELLOW;
DRAWLINE(VAR3=1,H,VAR3=-1,L,0),COLORFF6600;
DRAWLINE(VAR3=-1,L,VAR3=1,H,0),COLORFF6600;
DRAWKLINE(H,O,LOW,CLOSE);
{和飞狐版本的走势中枢一样,BY悟多};
DRAWRECTREL(0,965,130,999,RGB(0,0,1)),NOFRAME;
DRAWTEXT_FIX(1,0,1,0,'本公式是用上级笔做的中枢分析,仅供参考'),COLORYELLOW;

A1:=BARSLAST(VAR2<>0);
A2:=REF(VAR2,A1);
AA1:=REF(A1+1,1);
AA2:=REF(A2,1);
A3:=IF (AA2>0,L-REF(H,AA1),H-REF(L,AA1)),LINETHICK0;{计算点位差};
{显示点位}
DRAWNUMBER(VAR2=1,H,H), COLOR3300FF; 
DRAWNUMBER(VAR2=-1,L,L),COLORFFFF00;

第二个:
VAR2:=TDXDLL8(1,PERIOD,H,L);{得到笔}
DRAWLINE(VAR2=1,H,VAR2=-1,L,0),DOTLINE,COLORYELLOW;
DRAWLINE(VAR2=-1,L,VAR2=1,H,0),DOTLINE,COLORYELLOW;


VAR3:=TDXDLL8(2,0,0,0);{得到段}
DRAWLINE(VAR3=1,H,VAR3=-1,L,0),COLORFF6600;
DRAWLINE(VAR3=-1,L,VAR3=1,H,0),COLORFF6600;

DRAWNUMBER(VAR2=1,H,H),COLORMAGENTA,DRAWABOVE;
DRAWNUMBER(VAR2=-1,L*0.998,L),COLORGREEN;


{和飞狐版的分笔分段一样,BY悟多};
DRAWRECTREL(0,965,130,999,RGB(0,0,1)),NOFRAME;
DRAWTEXT_FIX(1,0,1,0,'  本公式仅供学习缠论参考'),COLORYELLOW;

技术人员回复
日期:2019-4-16 15:50

 TDXDLL8表示调用dll函数,无法改写

 

您可以参考链接6楼的源码看下:

 

http://help.wenhua.com.cn/dispbbs.asp?boardid=14&Id=736529