[通达信]通达信DR横盘突破源码公式

我是一个兵

通达信DR横盘突破源码公式：
N:=MIN(60,BARSCOUNT(CLOSE));
A0:=(((HHV(HIGH,N) / LLV(LOW,N)) * 100) - 100);
A1:=DMA(((CLOSE + OPEN) / 2),(VOL / SUM(VOL,5)));
A2:=((A0 > REF(A0,1)) AND (CLOSE > A1));
ACM:=MA(REF(("1A0002$CLOSE" + "399107$CLOSE"),1),5);
AH:=("1A0002$HIGH" + "399107$HIGH");
AL:=("1A0002$LOW" + "399107$LOW");
AV:=("1A0002$AMOUNT" + "399107$AMOUNT");
AA:=(SMA(AV,10,1) / 10000000);
AVH:=((AA * AH) / ACM);
AVL:=((AA * AL) / ACM);
A3:=(((HHV(AVH,N) / LLV(AVL,N)) * 100) - 100);
A4:=(((CLOSE / REF(CLOSE,1)) * 100) - 100);
A5:=DMA(((CLOSE + OPEN) / 2),(VOL / CAPITAL));
A6:=(((CLOSE / A5) * 100) - 100);
A7:=MA(AMOUNT,5);
A8:=MA(AMOUNT,10);
A9:=(((((((((A0 > A3) AND ((A0 - A3) < 100)) AND (A4 >= 4.5)) AND (AMOUNT > A7)) AND (A7 > A8)) AND (LLV(A6,10) <= (0 - 24))) AND ((HIGH - CLOSE) < ((CLOSE - OPEN) / 3))) AND ((CLOSE / OPEN) >= 1.03)) AND (CLOSE > A1));
DRAWTEXT((A9 > 0),(A0 * 0.98),'▲'),COLOR00FFFF;
日振幅60:A0,COLOR00FF00;
IF((A2 > 0),A0,DRAWNULL),LINETHICK3,COLOR0000FF;
横盘天数:IF((BARSLAST((A0 > 20)) >= 250),250,BARSLAST((A0 > 20))),COLORCEC3FF;
量震幅:MIN(A3,100),COLORC0C0C0;
底突A:(A9 * 100),LINETHICK0,COLOR00FFFF;
PLOYLINE((CLOSE > 0),100),COLOR0000FF;
PLOYLINE((CLOSE > 0),60),COLORFF00FF;
PLOYLINE((CLOSE > 0),20),COLORFFFF00;