多空神准变色磁力线（源码 通达信 主图 贴图）
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),COLORWHITE;
MA18:=MA(C,24),COLORYELLOW;
MA55:=MA(C,55),COLORFF00FF;
MA135:=MA(C,135),COLORFFCC66;
STICKLINE((CLOSE OPEN) AND (X2 X3),CLOSE,OPEN,3.2,2)COLOR00FF00;
STICKLINE((CLOSE OPEN) AND (X2 =X3),CLOSE,OPEN,3.2,2)COLORRED;
WWWCHNMONEYCOM:=EMA(CLOSE,453),LINETHICK1,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;
