[求助]亚当理论的中心对称改写 (文华财经WH6赢顺V6.7)

来源:文华财经  日期:2018-10-8 10:56

 这是

通达信的指标，文华怎么实现，并且是在所有周期都可以实现？请老师帮助

 {DAOYING}
{参数 起止日期：D1=900101,1341231,1140619; D2=.,.,1140801}
D1:=1180801;
D2:=1181001;
BAR:CURRBARSCOUNT,NODRAW;
M:=CONST(BARSLAST(DATE<=D2)),NODRAW;
M1:=CONST(BARSLAST(DATE<=D1)),NODRAW;
N:M1-M,NODRAW;   {从D1到D2间隔N天};

NN:=140; 
A:=CONST(LLV(L,NN)),NODRAW;
P:=IF(M<N,N-M,0),NODRAW;
STICKLINE(BAR=M1+1+P,A,A*1.20,0,-1),COLORLIMAGENTA; {画D1和D2两条间隔线}
STICKLINE(BAR=M+1+P,A,A*1.20,0,-1),COLORLIMAGENTA;

DATE1:IF(BAR>P,REFX(DATE,P),DRAWNULL),NODRAW,COLORRED;
O1:IF(BAR>P,REFX(O,P),DRAWNULL),NODRAW,COLORRED;
H1:IF(BAR>P,REFX(H,P),DRAWNULL),NODRAW,COLORRED;
L1:IF(BAR>P,REFX(L,P),DRAWNULL),NODRAW,COLORRED;
C1:IF(BAR>P,REFX(C,P),DRAWNULL),NODRAW,COLORRED;

DRAWKLINE(H1,O1,L1,C1); {画原K线}

Y0:=CONST(REF(H,M));
Q:=(M+1+P-BAR)*2;
R:=BAR<=M+1+P AND BAR>M-N+P;
H2:IF(R,Y0*2-REF(L1,Q),DRAWNULL),NODRAW,COLORYELLOW;
L2:IF(R,Y0*2-REF(H1,Q),DRAWNULL),NODRAW,COLORYELLOW;
Y1:IF(R,Y0*2-REF(MIN(O1,C1),Q),DRAWNULL),NODRAW,COLORYELLOW;
Y2:IF(R,Y0*2-REF(MAX(O1,C1),Q),DRAWNULL),NODRAW,COLORYELLOW;

STICKLINE(R,Y1,Y2,-1,0),COLORYELLOW;
STICKLINE(R,Y2,H2,0,0),COLORYELLOW;
STICKLINE(R,L2,Y1,0,0),COLORYELLOW;

{总是画N天倒影（黄色K线）。如果在D2右边的K线个数大于N，则属于事后验证。
如果小于N，则原K线左移（其行情数据用红色显示），使右边能补充显示“预测”的黄色倒影K线。};

日期:2018-10-8 11:08

您可以具体提供一下思路，我们帮您分析

来源:文华财经  日期:2018-10-8 10:56

 在任意周期上，任意选定一段行情，以所选一段行情起点k线至终点k线为原始图像，以所选行情的终点k线为中心点，旋转180度所得的映像图像即为所要的预测图像，也就是中心对称图像，也是亚当理论所说的第二映像图。如图上黄色k


文件名：捕获2.png
线就是前段走势的预测映像。最好是在副图上实现。

 

日期:2018-10-8 13:17

来源:文华财经  日期:2018-10-8 10:56

日期:2018-10-8 13:45

来源:文华财经  日期:2018-10-8 10:56

日期:2018-10-8 15:16