多空趋势 （源码 ）

在719牛市行情纪念日快临之际，为预祝下一个牛市底部的站稳，出现未来五年的大牛市，特将我的多空拿出，祝大家赚得盆满罅满。

可进行多空趋势分析，具有实战参考判断价值和指导意义。

指标吸收了`！3，0`、E7E股市教父胡立阳先生的地心引力理论,就是图中三个虚线。他有个理论，股价在外太空（就是途中地心引力上轨）待超过10天以上，就有望一波大行情，对选强势股挺有帮助，。

地心引力线:(MA(C,30)+MA(C,72))/2,POINTDOT,COLORYELLOW;
引力区上轨:地心引力线*1.1,POINTDOT,COLORCYAN;
引力区下轨:地心引力线*0.9,POINTDOT,COLORBLUE;

X1:=HHV(H,3);
X2:=LLV(L,3);
XX:=(X1+X2)/2;
XC:=C;
XH:=H;
XL:=L;
LYA1:=IF (XH>REF(X1,1) AND XC>REF(XC,1),X2,IF (XL<REF(X2,1) AND XC<REF(XC,1),
X1,DRAWNULL));
LYA:=IF(LYA1=DRAWNULL,REF(LYA1,1),LYA1);
SNX2:=IF(LYA<H AND LYA>L,REF(LYA,1),LYA);
BB:=PLOYLINE(C>0,SNX2),COLORGREEN,LINETHICK1;
多空平衡: EMA(EMA(EMA(HIGH,7.23379625),7.23379625),1),COLORRED,LINETHICK1;
强势回挡: 多空平衡*0.9276620375,COLORGREEN,LINETHICK1;
弱势反弹: 多空平衡*0.868055,COLORD89837,LINETHICK1; {0.9}
最低安全:多空平衡*0.8263889,COLORGRAY,LINETHICK1;
高位止赢: 多空平衡*1.12170138,COLOR0089BB,LINETHICK1;
获利了结: 多空平衡*1.0723379625,COLORWHITE,LINETHICK1;
超涨出货: 多空平衡*1.1694444444,COLORWHITE,LINETHICK1;
BIAS2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100 ;
STICKLINE(BIAS2<-6,H,L,0,0),COLORGREEN;
STICKLINE(BIAS2<-6,C,O,1,1),COLORGREEN;

DRAWTEXT(ISLASTBAR,多空平衡,'平衡1.00'),COLORFFCC18;
DRAWTEXT(ISLASTBAR,强势回挡,'回挡0.93'),COLORFF18FF;
DRAWTEXT(ISLASTBAR,弱势反弹,'反弹0.87'),COLOR18FF18;
DRAWTEXT(ISLASTBAR,最低安全,'安全0.83'),COLOR18CCFF;
DRAWTEXT(ISLASTBAR,高位止赢,'止赢1.12'),COLORFFFFFF;
DRAWTEXT(ISLASTBAR,获利了结,'获利1.07'),COLORFFFFFF;
DRAWTEXT(ISLASTBAR,超涨出货,'超涨1.17'),COLORFFFFFF;

{红}
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,3.1,0 ),COLOR000033;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,2.7,0 ),COLOR000066;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,2.1,0 ),COLOR000099;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1.5,0 ),COLOR0000CC;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,0.9,0 ),COLOR0000FF;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,0.3,0 ),COLORCC66FF;
{蓝}
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,3.1,0 ),COLOR990000;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,2.7,0 ),COLORCC0000;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,2.1,0 ),COLORFF4400;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,1.5,0 ),COLORFF8800;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,0.9,0 ),COLORFFCC00;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,0.3,0 ),COLORCYAN;

DIR1:=ABS(CLOSE-REF(CLOSE,5));
VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);
ER1:=DIR1/VIR1;
CS1:=ER1*(0.8-2/8)+2/8;
CQ1:=CS1*CS1;
AMA1:=EMA(DMA(CLOSE,CQ1),2) ,COLORWHITE;
DIR2:=ABS(CLOSE-REF(CLOSE,10));
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);
ER2:=DIR2/VIR2;
CS2:=ER2*(0.8-2/24)+2/24;
CQ2:=CS2*CS2;
AMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK3;
AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORBLUE,LINETHICK3;
AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK3;