|
以下是通达信蓝蝴蝶精确底公式副图源码（无源码的请下载附件导入）
MA05:MA(CLOSE,5),COLORLIRED,LINETHICK3;
X_1:=MA(CLOSE,10);
X_2:=MA(CLOSE,20);
X_3:=MA(CLOSE,30);
X_4:=(CLOSE-MA05)/MA05*100;
X_5:=ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416;
X_6:=SMA(EMA((MA05-REF(MA05,1))/REF(MA05,1),3)*100,3,1);
X_7:=EMA(X_6-REF(X_6,1),3);
IF(X_5>30 AND MA05>REF(MA05,1),MA05,DRAWNULL),COLORRED,LINETHICK3;
X_8:=ATAN((X_1/REF(X_1,1)-1)*100)*180/3.1416;
IF(X_5<0 AND MA05<REF(MA05,1),MA05,DRAWNULL),COLORFFFF80,LINETHICK3;
X_9:=(CLOSE-X_3)/X_3*100;
X_10:=MA(KDJ.J#WEEK(9,3,3),5);
X_11:=X_2-X_3>REF(X_2-X_3,1) AND X_2>REF(X_2,1) AND X_3>REF(X_3,1);
X_12:=X_3-X_2<REF(X_3-X_2,1) AND X_2<REF(X_2,1) AND X_3<REF(X_3,1);
X_13:=ATAN((X_3/REF(X_3,1)-1)*100)*180/3.1416;
X_14:=REF(X_10,1)<=REF(X_10,2) AND X_10>=REF(X_10,1);
X_15:=CROSS(0,X_4) AND X_9<REF(X_9,1) AND X_1>REF(X_1,1);
DRAWICON(X_14,HIGH*1,28);
X_16:=COUNT(CROSS(X_4,0),3)>=1 AND X_9>REF(X_9,1) AND MA05>REF(MA05,1) AND (CLOSE/REF(CLOSE,1)-1)*100>5 AND REF(CLOSE,1)<X_3;
X_17:=MAX(ABS(HIGH-AMOUNT/VOL/100),ABS(AMOUNT/VOL/100-LOW));
X_18:=ABS((OPEN+CLOSE)/2-AMOUNT/VOL/100);
X_19:=(X_17+X_18)/AMOUNT*VOL*100*50; | 
