请高手帮忙把以下通达信的公式改为大智慧的公式!

Posted 2023-03-30

日时转换:=IF(PERIOD=5,120,240);
QZS:=(EMA(CLOSE,10)+EMA(CLOSE,32))/2;
VAR1:=(EMA(CLOSE,30)+EMA(CLOSE,72))/2;
VAR2:=(EMA(VOL,10)+EMA(VOL,32))/2;
VAR3:=(VAR1+VAR2)/2;
VAR4:=EMA(VAR3,30);
VAR5:=EMA(VAR3,60);
VAR6:=EVERY(VAR1>REF(VAR1,1),5) AND EVERY(VAR4>REF(VAR4,1),5);
DRAWBAND(VAR1,RGB(150,30,30),EMA(VAR1,60),RGB(0,110,30));
牵引线:VAR1,COLORYELLOW;
强弱线:EMA(VAR1,日时转换),POINTDOT,COLORWHITE;
趋势关注:IF(CROSS(VAR1,EMA(VAR1,60)) AND VAR6,1,0),NODRAW,COLORRED;
量价关注:IF(CROSS(VAR3,VAR5) AND VAR6,1,0),NODRAW,COLORWHITE;
冲击量:IF(VAR3>VAR5 AND VAR6,1,0),NODRAW,COLORYELLOW;
强势区:IF(VAR1>强弱线,1,DRAWNULL),NODRAW,COLORRED;
止损区:IF(VAR1<强弱线,1,DRAWNULL),NODRAW,COLORGREEN;
STICKLINE(QZS>VAR1,QZS,VAR1,1,0),COLORFF00FF;
STICKLINE(冲击量=1,QZS,VAR1,1,0),COLORYELLOW;
DRAWICON(趋势关注=1,EMA(VAR1,60),13);
DRAWTEXT(量价关注=1,EMA(VAR1,60),'L0V'),COLORWHITE;

因为 大智慧 中没有“PERIOD（周期）”、 “DRAWBAND（色带）”、“DRAWNULL（值为空）” 和 “NODRAW（不输出线形）”等函数，所以我根据不同需要编了两个公式，一个用于选股，一个用于日常看股票。
（两个公式我都测试过了，没有问题）

公式一（用于选股）：

PERIOD5:=COUNT(DATE<>REF(DATE,1),2)=2;
QZS:=(EMA(CLOSE,10)+EMA(CLOSE,32))/2;
VAR1:=(EMA(CLOSE,30)+EMA(CLOSE,72))/2;
VAR2:=(EMA(VOL,10)+EMA(VOL,32))/2;
VAR3:=(VAR1+VAR2)/2;
VAR4:=EMA(VAR3,30);
VAR5:=EMA(VAR3,60);
VAR6:=COUNT(VAR1>REF(VAR1,1),5)=5 AND COUNT(VAR4>REF(VAR4,1),5)=5;
STICKLINE(VAR1>=EMA(VAR1,60),VAR1,EMA(VAR1,60),3,0),COLOR20A0F0;
STICKLINE(VAR1<EMA(VAR1,60),var1,EMA(VAR1,60),3,0) ,COLORF02000;
牵引线:VAR1,COLORYELLOW;
强弱线:IF(PERIOD5=1,EMA(VAR1,120),EMA(VAR1,240)),POINTDOT,LINETHICK3,COLORWHITE;
趋势关注:IF(CROSS(VAR1,EMA(VAR1,60)) AND VAR6,1,0),COLORRED;
量价关注:IF(CROSS(VAR3,VAR5) AND VAR6,1,0),COLORWHITE;
冲击量:IF(VAR3>VAR5 AND VAR6,1,0),COLORYELLOW;
强势区:IF(VAR1>强弱线,1,0),COLORRED;
止损区:IF(VAR1<强弱线,1,0),COLOR00FF00;
STICKLINE(QZS>VAR1,QZS,VAR1,1,0),COLORFF00FF;
STICKLINE(冲击量=1,QZS,VAR1,1,0),COLORYELLOW;
DRAWICON(趋势关注=1,EMA(VAR1,60),1);
DRAWTEXT(量价关注=1,EMA(VAR1,60),'L0V'),COLORWHITE;

上面公式用于选股，如用于看股票就是会出现图形被压缩的现象，你要不明白，可以试试看

公式二（用于看股票走势）：

PERIOD5:=COUNT(DATE<>REF(DATE,1),2)=2;
QZS:=(EMA(CLOSE,10)+EMA(CLOSE,32))/2;
VAR1:=(EMA(CLOSE,30)+EMA(CLOSE,72))/2;
VAR2:=(EMA(VOL,10)+EMA(VOL,32))/2;
VAR3:=(VAR1+VAR2)/2;
VAR4:=EMA(VAR3,30);
VAR5:=EMA(VAR3,60);
VAR6:=COUNT(VAR1>REF(VAR1,1),5)=5 AND COUNT(VAR4>REF(VAR4,1),5)=5;
VAR7:=IF(PERIOD5=1,EMA(VAR1,120),EMA(VAR1,240));
VAR8:=(VAR1+EMA(VAR1,60))/2;
趋势关注IF(CROSS(VAR1,EMA(VAR1,60)) AND VAR6,1,0);
量价关注:=:=IF(CROSS(VAR3,VAR5) AND VAR6,1,0);
冲击量:=IF(VAR3>VAR5 AND VAR6,1,0);
强势区:IF(VAR1>VAR7,VAR7,VAR8),POINTDOT,LINETHICK3,COLORRED;
止损区:IF(VAR1<VAR7,VAR7,VAR8),POINTDOT,LINETHICK3,COLOR00FF00;
Aa:VAR8,POINTDOT,LINETHICK3,COLOR000000;
STICKLINE(VAR1>=EMA(VAR1,60),VAR1,EMA(VAR1,60),3,0),COLOR20A0F0;
STICKLINE(VAR1<EMA(VAR1,60),var1,EMA(VAR1,60),3,0) ,COLORF02000;
牵引线:VAR1,COLORYELLOW;
强弱线:IF(PERIOD5=1,EMA(VAR1,120),EMA(VAR1,240)),POINTDOT,LINETHICK1,COLORWHITE;
STICKLINE(QZS>VAR1,QZS,VAR1,3,0),COLORFF00FF;
STICKLINE(量价关注=1,QZS,VAR1,3,1),LINETHICK4,COLORF0E000;
STICKLINE(冲击量=1,QZS,VAR1,3,0),COLORYELLOW;

DRAWTEXT(冲击量=1 AND 量价关注<>1,EMA(VAR1,60),'量'),COLOR00E0F0;
DRAWTEXT(量价关注=1,EMA(VAR1,60),'LOV'),COLORFFFF00;
DRAWTEXT(CROSS(VAR1,EMA(VAR1,60)) AND VAR6,EMA(VAR1,60),'趋势关注'),COLORRED;
DRAWICON(趋势关注,EMA(VAR1,60),1);

把上面公式直接粘贴到新建公式中就行了。其中，因为 大智慧缺少必要的函数，为了能保证正常显示，我取消了一些线形输出，用标志代替，其不影响最终的计算结果和显示效果，不同之处如下：

1、用橙色蓝色柱状线代替原来的色带。

2、取消了强势区、止损区的1 和 0 的显示，用强弱线红绿色代替。当强弱线为红点时，说明股价在强势区；为绿点时，在止损区；为白点时，既不在强势区也不在止损区。

3、取消了趋势关注 量价关注、冲击量的1 和 0 的显示。 用红字的'趋势关注 '代替“趋势关注”在图中标出； 用青字'VOL'代替“量价关注”在图中标出； 用黄字'量'代替“冲击量”在图中标出。

4、图中红色 笑脸 图标就代表“趋势关注”；青色柱状框就代表“量价关注”；黄色柱状线就代表“冲击量”。这与 通达信 中基本一样。 参考技术A 苟富贵方法规划 参考技术B 染色 参考技术C 由于在大智慧中没有DRAWNULL(值为“空”)和NODRAW(b不输出指标线)两个函数，且它们为基础函数，无法替换，故会有2个与通达信不同之处：
1、在通达信中，VVOL值为“空”时，在大智慧中用“0”代替；
2、在通达信中，VVOL只显示数值，没有指标线出现，在大智慧中有一条VVOL线；
但它们不影响函数的输出值和成交量柱状图（我已经在大智慧中检验过，没有问题）。
大智慧版本公式如下：
FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
PERIOD5:=COUNT(DATE<>REF(DATE,1),2)=2;
VVOL:IF(PERIOD5,VOL*240/FROMOPEN,MA(C,0));
STICKLINE(PERIOD5,VVOL,0,-1,-1),COLOR00C0C0;
VOLUME:VOL,VOLSTICK;
AA:=VOL>=REF(V,1)*1.91
AND
C>REF(C,1);
AA1:=VOLREF(DATE,1),2)=2;
VVOL:IF(PERIOD5,VOL*240/FROMOPEN,MA(C,0));
STICKLINE(PERIOD5,VVOL,0,3,1),COLOR00C0C0;
VOLUME:VOL,VOLSTICK;
AA:=VOL>=REF(V,1)*1.91
AND
C>REF(C,1);
AA1:=VOL<REF(LLV(VOL,21),1);
AA2:=VOL<REF(LLV(VOL,55),1);
AA3:=(ABS(VOL-REF(VOL,1))/REF(VOL,1))<=0.05;
STICKLINE(AA,0,V,3,0),COLORYELLOW;
STICKLINE(AA1,0,V,3,0),COLOR00FF00;
STICKLINE(AA2,0,V,3,0),COLORFF00FF;
STICKLINE(AA3,0,V,3,0),COLORWHITE;
MV1:MA(VOL,5);
MV2:MA(VOL,10);
MV3:MA(VOL,20); 参考技术D 由于在大智慧中没有DRAWNULL(值为“空”)和NODRAW(b不输出指标线)两个函数，且它们为基础函数，无法替换，故会有2个与通达信不同之处：
1、在通达信中，VVOL值为“空”时，在大智慧中用“0”代替；
2、在通达信中，VVOL只显示数值，没有指标线出现，在大智慧中有一条VVOL线；
但它们不影响函数的输出值和成交量柱状图（我已经在大智慧中检验过，没有问题）。
大智慧版本公式如下：
FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
PERIOD5:=COUNT(DATE<>REF(DATE,1),2)=2;
VVOL:IF(PERIOD5,VOL*240/FROMOPEN,MA(C,0));
STICKLINE(PERIOD5,VVOL,0,-1,-1),COLOR00C0C0;
VOLUME:VOL,VOLSTICK;
AA:=VOL>=REF(V,1)*1.91
AND
C>REF(C,1);
AA1:=VOLREF(DATE,1),2)=2;
VVOL:IF(PERIOD5,VOL*240/FROMOPEN,MA(C,0));
STICKLINE(PERIOD5,VVOL,0,3,1),COLOR00C0C0;
VOLUME:VOL,VOLSTICK;
AA:=VOL>=REF(V,1)*1.91
AND
C>REF(C,1);
AA1:=VOL<REF(LLV(VOL,21),1);
AA2:=VOL<REF(LLV(VOL,55),1);
AA3:=(ABS(VOL-REF(VOL,1))/REF(VOL,1))<=0.05;
STICKLINE(AA,0,V,3,0),COLORYELLOW;
STICKLINE(AA1,0,V,3,0),COLOR00FF00;
STICKLINE(AA2,0,V,3,0),COLORFF00FF;
STICKLINE(AA3,0,V,3,0),COLORWHITE;
MV1:MA(VOL,5);
MV2:MA(VOL,10);
MV3:MA(VOL,20);

请帮忙把通达信公式改为博易大师的公式，谢谢

参数: N1:1,100,10;N2:1,100,10;DISP:=1,3,2

N1:=10;N2:=10;DISP:=2;
K:=IF(PERIOD=5,1,日
IF(PERIOD=6,1,周
IF(PERIOD=7,1,月
IF(PERIOD=8,1,多分钟
IF(PERIOD=9,1,多日
IF(PERIOD=10,1,季
IF(PERIOD=11,2,年
IF(PERIOD=4,1,60F
IF(PERIOD=3,1,30F
IF(PERIOD=2,1,15F
IF(PERIOD=1,15F,11F)))))))))))/10;
P1:=PEAK(1,K*N1,1);
P2:=PEAK(1,K*N1,2);
WP1:=PEAKBARS(1,K*N1,1);
WP2:=PEAKBARS(1,K*N1,2);
T1:=TROUGH(2,K*N2,1);
T2:=TROUGH(2,K*N2,2);
WT1:=TROUGHBARS(2,K*N2,1);
WT2:=TROUGHBARS(2,K*N2,2);
TJ1:=P1>T1 AND P2>T2 ;
ZD:=MAX(T1,T2);
ZG:=MIN(P1,P2);
LL:=MIN(T1,T2);
HH:=MAX(P1,P2);
TJ2:=FILTER(ZG>ZD,2);
TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));
TJ4:=TJ1&&TJ2&&NOT(TJ3);
TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD<REF(ZD,REF(BARSLAST(TJ4),1));
TJ8:=TJ4&&NOT(TJ5 OR TJ6 OR TJ7);
ZSD:=IF(TJ8,ZD,DRAWNULL);
ZSG:=IF(TJ8,ZG,DRAWNULL);
ZSH:=IF(TJ8,HH,DRAWNULL);
ZSL:=IF(TJ8,LL,DRAWNULL);
STICKLINE(TJ8,ZSH,ZSL,0,-1),COLORMAGENTA;
STICKLINE(TJ8,ZSD,ZSG,IF(DISP=1,3,0),1),COLORMAGENTA;
DRAWTEXT(DISP=2,ZSH,'中枢'),COLORRED;
还有一部分发不出来

参考技术A 追问PERIOD能替换吗博易大师相同函数如下，取当前周期。用法：DATAPERIOD参数：无。返回值：1为1分、2为5分、3为15分、4为30分、5为60分、6为日、7为周、8为月、9为年、10为多日、11为多分。