{动态黄金分割}
gspt3:=AMOUNT/VOL;
A:=SMA(gspt3,5,1)-SMA(gspt3,55,1);
B:=SMA((A-SMA(A,5,1)),5,1);
STICKLINE(CLOSE,HIGH,LOW,0,1),COLORWHITE;
STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,3,0),COLORWHITE;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,3,1),COLORWHITE;
STICKLINE(CLOSE>MA(CLOSE,5) AND A>REF(A,1) AND B>REF(B,1),HIGH,LOW,0.0,1),COLORRED;
STICKLINE(CLOSE>MA(CLOSE,5) AND A>REF(A,1) AND B>REF(B,1),OPEN,CLOSE,3,1),COLORRED;
STICKLINE(CLOSE< MA(CLOSE,5) AND A>REF(A,1) AND B>REF(B,1),HIGH,LOW,0.0,0),COLORWHITE;
STICKLINE(CLOSE< MA(CLOSE,5) AND A>REF(A,1) AND B>REF(B,1),OPEN,CLOSE,3,0),COLORWHITE;
STICKLINE(A< REF(A,3) AND B< REF(B,3),HIGH,LOW,0.0,1),COLORGREEN;
STICKLINE(A< REF(A,3) AND B< REF(B,3),OPEN,CLOSE,3,1),COLORGREEN;
STICKLINE(A>REF(A,1) AND B< REF(B,1),HIGH,LOW,0.0,0),COLORWHITE;
STICKLINE(A>REF(A,1) AND B< REF(B,1),OPEN,CLOSE,3,0),COLORWHITE;
STICKLINE(A< REF(A,1) AND B>REF(B,1),HIGH,LOW,0.0,0),COLORWHITE;
STICKLINE(A< REF(A,1) AND B>REF(B,1),OPEN,CLOSE,3,0),COLORWHITE;
主力:=EMA(CLOSE,10),COLORRED;
散户:=EMA(CLOSE,5),COLORYELLOW;
绿降:=(46.18*EMA(CLOSE,10)-31.82*EMA(CLOSE,4))/14.36,COLORGREEN,LINETHICK1;
操盘:=MA(CLOSE,9),COLORFF9C65,LINETHICK2;
界点:=MA(CLOSE,20);
AH:HHV(H,100);
AL:LLV(L,100);
AHL:=AH-AL;
A23:AL+AHL*0.236,COLORBLUE;
A38:AL+AHL*0.382,COLORGREEN;
A61:AL+AHL*0.618,COLORFF9CFF;
A76:AL+AHL*0.764,COLORF0F000;
A77:AL+AHL*0.500,COLORRED;
DRAWTEXT(ISLASTBAR,AH,'100% '),COLORAAAAAA;
DRAWTEXT(ISLASTBAR,A76,'0.764% '),COLORAAAAAA,LINETHICK2;
DRAWTEXT(ISLASTBAR,A77,'0.500% '),COLORAAAAAA,LINETHICK2;
DRAWTEXT(ISLASTBAR,A61,'0.618% '),COLOR00AAAA,LINETHICK2;
DRAWTEXT(ISLASTBAR,A38,'0.382% '),COLOR00AAAA,LINETHICK2;
DRAWTEXT(ISLASTBAR,A23,'0.236% '),COLORAAAAAA,LINETHICK2;
DRAWTEXT(ISLASTBAR,AL,'最低 '),COLORAAAAAA,LINETHICK2;
gspt1:=C-REF(C,1);
gspt2:=100*EMA(EMA(gspt1,6),6)/EMA(EMA(ABS(gspt1),6),6);
MA5:=EMA(C,5);
MA13:=EMA(C,13);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS(MA5,MA13))+1),0),COLOR0000FF;
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS(MA13,MA5))+1),0),COLOR00FF00;
BT:=(LLV(gspt2,2)=LLV(gspt2,7) AND COUNT(gspt2< 0,2) AND CROSS(gspt2,MA(gspt2,2))) AND REF(DOWN,1)< REF(DOWN,2) AND UP>REF(DOWN,1);
STICKLINE(BT,H,L,2,0),COLORRED;
DRAWTEXT(BT,C*0.92,'短牛'),COLORRED;
TJ1:=REF(DOWN,1)< REF(DOWN,2) AND UP>REF(DOWN,1) AND C< HHV(H,21)*0.82;
STICKLINE(TJ1,H,L,2,0),COLORMAGENTA;
DRAWTEXT(TJ1,C*0.89,'中牛'),COLORMAGENTA;
HR:=HHV(HIGH,55);
HRY:=LLV(LOW,55);
HRY11:=HR*HRY;
分析家公式网:=SQRT(HRY11);
TJ2:=REF(DOWN,1)< REF(DOWN,2) AND UP>REF(DOWN,1) AND C< 分析家公式网;
STICKLINE(TJ2,H,L,2,0),COLORYELLOW;
DRAWTEXT(TJ2,L*0.90,'大牛'),COLORYELLOW;
ST:=REF(UP,1)>REF(UP,2) AND DOWN< REF(UP,1);
STICKLINE(ST,H,L,2,0),COLORGREEN;
DRAWTEXT(ST,H*1.02,'卖'),COLOR00FF00;