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

Posted 2023-03-09

参数: 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为多分。