{多空神准变色磁力线}

N:=11;

M:=6;

MA(C,5);

MA(C,13);

MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;

K:COST(80),LINETHICK1;

X1:=(C+L+H)/1.5;

X2:=EMA(X1,3);

X3:=EMA(X2,2.5);

磁力线:(MA(CLOSE,30)+MA(CLOSE,72))/2,COLORGREEN;

多空线:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;

DRAWTEXT(CROSS(多空线,磁力线),多空线,'进场'),COLORYELLOW,LINETHICK2;

DRAWTEXT(CROSS(磁力线,多空线),磁力线,'走人'),COLORRED,LINETHICK2;

STICKLINE(CLOSE/REF(C,1)>=1.09,O,C,2.7,0),COLORYELLOW;

STICKLINE(CLOSE/REF(C,1)<=0.91,O,C,2.7,0),COLORGREEN;

STICKLINE(X2>=X3,LOW,HIGH,0,1),COLORRED;

STICKLINE(X2>=X3,CLOSE,OPEN,3.2,2),COLORRED;

STICKLINE(X2<X3,LOW,HIGH,0,1),COLOR00FF00;

STICKLINE(X2<X3,CLOSE,OPEN,3.2,2),COLOR00FF00;

DA:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4))/4;

DB:=(EMA(C,10)+EMA(C,20)+EMA(C,40)+EMA(C,80))/4;

DRAWTEXT(CROSS(DA-DB,0),L*0.95,''),COLORRED;

JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100;

DRAWTEXT(CROSS(84,JH),H*1.02,''),COLORGREEN;

STICKLINE(CROSS(X3,X2),OPEN,CLOSE,3.2,0),COLOR00FF00;

STICKLINE(CROSS(X2,X3),OPEN,CLOSE,3.2,0),COLORRED;

CV:=CLOSE;

地心引力区1:磁力线*1.1,LINETHICK2,COLORRED;

地心引力区2:磁力线*0.9,LINETHICK2,COLORFF33FF;

BBIBOLL:(MA(CV,3)+MA(CV,6)+MA(CV,12)+MA(CV,24))/4;

MA6:=MA(C,6);

MA18:=MA(C,24);

MA55:=MA(C,55);

MA135:=MA(C,135);

STICKLINE((CLOSE>OPEN) AND (X2<X3),CLOSE,OPEN,3.2,2),COLOR00FF00;

STICKLINE((CLOSE>OPEN) AND (X2>=X3),CLOSE,OPEN,3.2,2),COLORRED;

UPR:BBIBOLL+M*STD(BBIBOLL,N);

DWN:BBIBOLL-M*STD(BBIBOLL,N);

STICKLINE((CLOSE<OPEN) AND (X2<X3),CLOSE,OPEN,3.2,0),COLOR00FF00;

STICKLINE((CLOSE<OPEN) AND (X2>=X3),CLOSE,OPEN,3.2,0),COLORRED;