|
以下是通达信红珠主图源码（无源码的请下载附件导入）
红珠主图源码
X_1:=MA(CLOSE,5);
X_2:=MA(CLOSE,10);
MA13:MA(CLOSE,13);
MA20:MA(CLOSE,20);
MA30:MA(CLOSE,30),COLORYELLOW,LINETHICK2;
MA60:MA(CLOSE,60),COLORBLUE,LINETHICK2;
MA120:MA(CLOSE,120),COLORGREEN,LINETHICK2;
MA240:MA(CLOSE,240),COLORRED,LINETHICK2;
DRAWICON(CROSS(CLOSE,MA13) AND CLOSE>MA60,LOW-0.08,1);
X_3:=REF(LOW,1);
X_4:=SMA(ABS(LOW-X_3),13,1)/SMA(MAX(LOW-X_3,0),13,1)*100;
X_5:=EMA(IF(CLOSE*1.2,X_4*13,X_4/13),13);
X_6:=LLV(LOW,34);
X_7:=HHV(X_5,34);
X_8:=IF(LLV(LOW,55),1,0);
X_9:=EMA(IF(LOW<=X_6,(X_5+X_7*2)/2,0),3)/618*X_8;
X_10:=REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN AND REF(CLOSE,1)<REF(CLOSE,2) AND CLOSE<REF(CLOSE,1);
X_11:=REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN AND CLOSE/OPEN<0.98;
X_12:=X_10 OR X_11;
X_13:=X_12 AND X_9>8;
DRAWICON(X_13,LOW,13);
652511805.jpg
| 
