通达信发家比主图指标(源码)

AA:=MA((2*CLOSE+HIGH+LOW)/4,5);
通1:=AA*102/100;
通2:=AA*(200-102)/100;
CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD:=DMA(CLOSE,CC);
上:=(1+7/100)*DD,CIRCLEDOT,COLORYELLOW;
下:=(1-7/100)*DD,CIRCLEDOT,COLORGREEN;
中:=(上+下)/2,CIRCLEDOT,COLORMAGENTA;
F:IF(C<中,C*REF(下,1)*下/2,IF(C>中,C*REF(中,1)*中/2,0));
AAW:=MA(F,5);
通1W:=AAW*102/100;
通2W:AAW*(200-102)/100;
CCW:=ABS(F-MA(F,20))/MA(F,20);
DDW:=DMA(F,CCW);
上W:(1+7/100)*DDW,CIRCLEDOT,COLORYELLOW;
下W:(1-7/100)*DDW,CIRCLEDOT,COLORGREEN;
中W:(上W+下W)/2,CIRCLEDOT,COLORMAGENTA;
底W:下W-(中W-下W),CIRCLEDOT,COLORYELLOW;
CU:=CROSS(F,通2W);
AU:=CROSS(F,下W);
DRAWTEXT(AU,F,'变'),COLORGREEN;