Question

博易大师公式如何改成通达信上面可以用的

{========状态交易========}
Y:= (H+L)/2;
AO:=MA(Y,5)-MA(Y,34);
MAO:=MA(AO,5);
AC:=AO-MAO;
{========鳄鱼组线========}
AA:=IF(BARSCOUNT(Y)>=6,SMA(Y,5,1),MA(Y,6));
BB:=IF(BARSCOUNT(Y)>=9,SMA(Y,8,1),MA(Y,9));
CC:=IF(BARSCOUNT(Y)>=14,SMA(Y,13,1),MA(Y,14));
R1:=REF(SMA(Y,8,1),5);
R2:=IF(C<R1,0,R1);
R3:=IF(C>R1,0,R1);
{========用罗列法寻找分形========}
A:=H;
A1:=REF(H,1);
A2:=REF(H,2);
A3:=REF(H,3);
A4:=REF(H,4);
A5:=REF(H,5);
A6:=REF(H,6);
A7:=REF(H,7);
A8:=REF(H,8);
B:=L;
B1:=REF(L,1);
B2:=REF(L,2);
B3:=REF(L,3);
B4:=REF(L,4);
B5:=REF(L,5);
B6:=REF(L,6);
B7:=REF(L,7);
B8:=REF(L,8);
FF1:=A2>A1 AND A2>A AND A2>A3 AND A2>A4;
FF2:=A3=A2 AND A2>A1 AND A2>A AND A2>A4 AND A2>A5;
FF3:=A4=A3 AND A3=A2 AND A2>A1 AND A2>A AND A2>A5 AND A2>A6;
FF4:=A2=A4 AND A2>A1 AND A2>A AND A2>A3 AND A2>A5 AND A2>A6;
FF44:=A2=A3 AND A2=A4 AND A2=A5 AND A2>A1 AND A2>A AND A2>A6 AND A2>A7;
FF5:=A6=A4 AND A4=A2 AND A2>A1 AND A2>A AND A2>A7 AND A2>A8 AND A2>A3 AND A2>A5;
FF6:=B2<B1 AND B2<B AND B2<B3 AND B2<B4;
FF7:=B3=B2 AND B2<B1 AND B2<B AND B2<B4 AND B2<B5;
FF8:=B2=B3 AND B4=B2 AND B2<B1 AND B2<B AND B2<B5 AND B2<B6;
FF9:=B2=B4 AND B2<B1 AND B2<B AND B2<B3 AND B2<B5 AND B2<B6;
FF99:=B2=B3 AND B2=B4 AND B2=B5 AND B2<B1 AND B2<B AND B2<B6 AND B2<B7;
FF10:=B2=B4 AND B2=B6 AND B2<B1 AND B2<B AND B2<B3 AND B2<B5 AND B2<B7 AND B2<B8;
FF11:=FF1 OR FF2 OR FF3 OR FF4 OR FF44 OR FF5;
FF12:=FF6 OR FF7 OR FF8 OR FF9 OR FF99 OR FF10;
FF13:=BACKSET(FF11,3);
FF133:=FILTER(FF13,2);
FF14:=BACKSET(FF12,3);
FF144:=FILTER(FF14,2);
SF:=IF(FF11,A2,REF(A2,BARSLAST(FF11)));
XF:=IF(FF12,B2,REF(B2,BARSLAST(FF12)));
TJ1:=H>SF;
TJ2:=H<REF(H,1) AND REF(H,1)>SF;
TJ3:=L<XF;
TJ4:=L>REF(L,1) AND REF(L,1)<XF;
上分形:IF(TJ1 OR TJ2,0,SF),PRECIS1,COLORYELLOW,LINETHICK0;
下分形:IF(TJ3 OR TJ4,0,XF),PRECIS1,COLORWHITE,LINETHICK0;
TJ5:=IF(H>SF AND REF(H,1)<=SF,1,0);
TJ52:=IF(H>SF AND REF(H,1)<=SF AND REF(H,2)>SF,0,1);
TJ6:=IF(L<XF AND REF(L,1)>=XF,1,0);
TJ62:=IF(L<XF AND REF(L,1)>=XF AND REF(L,2)<XF,0,1);
STICKLINE(TJ5+TJ52=2 AND SF>R1,SF,1.0001*SF,15,0),COLOR00FF00;
{=========上分形突破标志，红色横线}
STICKLINE(TJ6+TJ62=2 AND XF<R1,XF,0.9999*XF,15,0),COLOR0000FF;
{==========下分形突破标志，绿色横线}

P1:MA(CLOSE,18),COLOR808000;
P2:MA(CLOSE,60),COLOR00FF00,LINETHICK5;
AP:=DATE <= 13181231;
工作线:=(EMA(C,14)) * AP;
STICKLINE(((C>=工作线)AND(C>=O)),O,C,4,1),COLORRED;
STICKLINE(((C>=工作线)AND(C<=O)),H,L,0,0),COLOR00FFFF;
STICKLINE(((C>=工作线)AND(C<=O)),O,C,4,0),COLOR00FFFF;
STICKLINE(((C<工作线)AND(C>=O)),O,C,4,0),COLORFFFFFF;
STICKLINE(((C<工作线)AND(C>=O)),H,L,0,0),COLORFFFFFF;
STICKLINE(((C<工作线)AND(C<=O)),O,C,4,0),COLORFFFF00;
H1:MA(CLOSE,18),COLOR00FF00;
TR:= MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
AR:= MA(TR,200);
AR1: REF(H1+2.04*AR,3),COLORFF8080,POINTDOT;
AR2: REF(H1-2.04*AR,3),COLORFF8080,POINTDOT;
谢谢，测试通过了，还有一个小问题，东方财富软件上面的资金博弈和资金趋势的可以提取出来放到通达信上面用么？

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励30（财富值+成长值）

Answer 1

发现未来函数BARSLAST!
发现未来函数SMA!
发现未来函数BACKSET!
含有多组未来函数，请谨慎使用！

{========状态交易========}
Y:= (H+L)/2;
AO:=MA(Y,5)-MA(Y,34);
MAO:=MA(AO,5);
AC:=AO-MAO;
{========鳄鱼组线========}
AA:=IF(BARSCOUNT(Y)>=6,SMA(Y,5,1),MA(Y,6));
BB:=IF(BARSCOUNT(Y)>=9,SMA(Y,8,1),MA(Y,9));
CC:=IF(BARSCOUNT(Y)>=14,SMA(Y,13,1),MA(Y,14));
R1:=REF(SMA(Y,8,1),5);
R2:=IF(C<R1,0,R1);
R3:=IF(C>R1,0,R1);
{========用罗列法寻找分形========}
A:=H;
A1:=REF(H,1);
A2:=REF(H,2);
A3:=REF(H,3);
A4:=REF(H,4);
A5:=REF(H,5);
A6:=REF(H,6);
A7:=REF(H,7);
A8:=REF(H,8);
B:=L;
B1:=REF(L,1);
B2:=REF(L,2);
B3:=REF(L,3);
B4:=REF(L,4);
B5:=REF(L,5);
B6:=REF(L,6);
B7:=REF(L,7);
B8:=REF(L,8);
FF1:=A2>A1 AND A2>A AND A2>A3 AND A2>A4;
FF2:=A3=A2 AND A2>A1 AND A2>A AND A2>A4 AND A2>A5;
FF3:=A4=A3 AND A3=A2 AND A2>A1 AND A2>A AND A2>A5 AND A2>A6;
FF4:=A2=A4 AND A2>A1 AND A2>A AND A2>A3 AND A2>A5 AND A2>A6;
FF44:=A2=A3 AND A2=A4 AND A2=A5 AND A2>A1 AND A2>A AND A2>A6 AND A2>A7;
FF5:=A6=A4 AND A4=A2 AND A2>A1 AND A2>A AND A2>A7 AND A2>A8 AND A2>A3 AND A2>A5;
FF6:=B2<B1 AND B2<B AND B2<B3 AND B2<B4;
FF7:=B3=B2 AND B2<B1 AND B2<B AND B2<B4 AND B2<B5;
FF8:=B2=B3 AND B4=B2 AND B2<B1 AND B2<B AND B2<B5 AND B2<B6;
FF9:=B2=B4 AND B2<B1 AND B2<B AND B2<B3 AND B2<B5 AND B2<B6;
FF99:=B2=B3 AND B2=B4 AND B2=B5 AND B2<B1 AND B2<B AND B2<B6 AND B2<B7;
FF10:=B2=B4 AND B2=B6 AND B2<B1 AND B2<B AND B2<B3 AND B2<B5 AND B2<B7 AND B2<B8;
FF11:=FF1 OR FF2 OR FF3 OR FF4 OR FF44 OR FF5;
FF12:=FF6 OR FF7 OR FF8 OR FF9 OR FF99 OR FF10;
FF13:=BACKSET(FF11,3);
FF133:=FILTER(FF13,2);
FF14:=BACKSET(FF12,3);
FF144:=FILTER(FF14,2);
SF:=IF(FF11,A2,REF(A2,BARSLAST(FF11)));
XF:=IF(FF12,B2,REF(B2,BARSLAST(FF12)));
TJ1:=H>SF;
TJ2:=H<REF(H,1) AND REF(H,1)>SF;
TJ3:=L<XF;
TJ4:=L>REF(L,1) AND REF(L,1)<XF;
上分形:IF(TJ1 OR TJ2,0,SF),COLORYELLOW,LINETHICK0;
下分形:IF(TJ3 OR TJ4,0,XF),COLORWHITE,LINETHICK0;
TJ5:=IF(H>SF AND REF(H,1)<=SF,1,0);
TJ52:=IF(H>SF AND REF(H,1)<=SF AND REF(H,2)>SF,0,1);
TJ6:=IF(L<XF AND REF(L,1)>=XF,1,0);
TJ62:=IF(L<XF AND REF(L,1)>=XF AND REF(L,2)<XF,0,1);
STICKLINE(TJ5+TJ52=2 AND SF>R1,SF,1.0001*SF,15,0),COLOR00FF00;
{=========上分形突破标志，红色横线}
STICKLINE(TJ6+TJ62=2 AND XF<R1,XF,0.9999*XF,15,0),COLOR0000FF;
{==========下分形突破标志，绿色横线}

P1:MA(CLOSE,18),COLOR808000;
P2:MA(CLOSE,60),COLOR00FF00,LINETHICK5;
AP:=DATE <= 13181231;
工作线:=(EMA(C,14)) * AP;
STICKLINE(((C>=工作线)AND(C>=O)),O,C,4,1),COLORRED;
STICKLINE(((C>=工作线)AND(C<=O)),H,L,0,0),COLOR00FFFF;
STICKLINE(((C>=工作线)AND(C<=O)),O,C,4,0),COLOR00FFFF;
STICKLINE(((C<工作线)AND(C>=O)),O,C,4,0),COLORFFFFFF;
STICKLINE(((C<工作线)AND(C>=O)),H,L,0,0),COLORFFFFFF;
STICKLINE(((C<工作线)AND(C<=O)),O,C,4,0),COLORFFFF00;
H1:MA(CLOSE,18),COLOR00FF00;
TR2:= MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
AR:= MA(TR,200);
AR1: REF(H1+2.04*AR,3),COLORFF8080,POINTDOT;
AR2: REF(H1-2.04*AR,3),COLORFF8080,POINTDOT;