|
以下是通达信缠论副图源码副图（无源码的请下载附件导入）
{缠论副图}
DIFF2:=MA(C,5),LINETHICK2;
DEA2:=MA(C,10),COLORWHITE,LINETHICK2;
MACD:=(DIFF2-DEA2),COLORSTICK;
均线差:(DIFF2-DEA2),COLORSTICK,COLORBLUE;
操盘:STICKLINE(2*(DIFF2-DEA2)>=0 AND 2*(DIFF2-DEA2)>=REF(2*(DIFF2-
DEA2),1),0,2*(DIFF2-DEA2),2,0),COLORRED;
反弹:STICKLINE(2*(DIFF2-DEA2)<0 AND 2*(DIFF2-DEA2)>=REF(2*(DIFF2-
DEA2),1),0,2*(DIFF2-DEA2),2,0),COLORYELLOW,LINETHICK1;
减仓:STICKLINE(2*(DIFF2-DEA2)>=0 AND 2*(DIFF2-DEA2)< REF(2*(DIFF2-
DEA2),1),0,2*(DIFF2-DEA2),2,0),COLORFF9900,LINETHICK1;
寻底:STICKLINE(2*(DIFF2-DEA2)<0 AND 2*(DIFF2-DEA2)< REF(2*(DIFF2-
DEA2),1),0,2*(DIFF2-DEA2),2,0),COLORGREEN,LINETHICK1;
BV:=SUM(MACD,0);
BA:=IF(MAX(BV,REF(BV,2))<REF(BV,1) OR MIN(BV,REF(BV,2))>REF(BV,1),1,0);
BC:=BARSLAST(BA)+1;
SMACD:=(BV-REF(BV,BC))/50,COLORBLUE;
JC:= DEA2-DIFF2;
VAR3:=IF(MACD>0,HHV(ABS(MACD),BC),LLV(MACD,BC));
VAR4:=(MACD);
VAR5:=SMACD*100;
绿柱面积:IF (MACD<0,SUM(MACD*0.1,BARSLAST
(JC<0)),0),LINETHICK0,COLORBLUE;
红柱面积:IF (MACD>0,SUM(MACD*0.1,BARSLAST
(JC>0)),0),LINETHICK0,,COLORFF00FF;
D:=MACD;
A1:=IF(D>0,1,-1);
A2:=REF(A1,1);
A3:=A1*A2;
A4:=BARSLAST(A3<0);
A5:=A4+1;
趋势平均力度:(SUM(D,0)-REF(SUM(D,0),A5))/A5,LINETHICK0;
时间:(A4+1)/100,LINETHICK0;
732300859.jpg
| 
