|
以下是通达信一笑之MACD源码附图（无源码的请下载附件导入）
DRAWGBK(CLOSE>0,RGB(0,150,150),RGB(0,0,100),0,17,0),LINETHICK2;
做多动力:(CLOSE-LLV(CLOSE,250))/LLV(CLOSE,250)*100,COLORRED,LINETHICK2;
做空动力:(HHV(CLOSE,250)-CLOSE)/CLOSE*100,COLORGREEN,LINETHICK2;
DRAWTEXT(CROSS(做多动力,做空动力),做多动力,102),COLORMAGENTA,LINETHICK4;
DIFF:(EMA(做多动力,12)-EMA(做多动力,26))*5,COLORWHITE,LINETHICK2;
DEA:EMA(DIFF,9),COLORYELLOW,LINETHICK2;
MACD:2*(DIFF-DEA),COLORSTICK,LINETHICK2;
DRAWTEXT(CROSS(DIFF,DEA),DIFF,103),COLORRED,LINETHICK4;
零轴:0,COLORF57474,LINETHICK2;
DRAWTEXT(CROSS(DIFF,零轴),DIFF,104),COLORRED,LINETHICK4;
HJ_1:=(CLOSE-LLV(LOW,90))/(HHV(HIGH,90)-LLV(LOW,90))*200;
HJ_2:=EMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,4)*2;
HJ_3:=EMA(0.618*REF(HJ_2,1)+0.382*HJ_2,2);
HJ_4:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
HJ_5:=POW(MA(LOW,5),2)+MA(LOW,5);
HJ_6:=POW(MA(HIGH,5),2)+MA(HIGH,5);
HJ_7:=(HJ_4-LLV(HJ_5,64))/(HHV(HJ_6,64)-LLV(HJ_5,64))*150+65-10;
HJ_8:=SMA(SMA(HJ_7,3,1)*1.5-100,3,1);
HJ_9:=3*(SMA(HJ_7,3,1)*1.5-100)-2*HJ_8;
HJ_10:=(HIGH+LOW+CLOSE*2)/4;
HJ_11:=(HJ_10-EMA(HJ_10,13))*100/STD(HJ_10,13);
HJ_12:=EMA(EMA(HJ_11,5),13)+200-100;
HJ_13:=SMA(HJ_1,3,1)+HJ_2+(SMA(HJ_7,3,1)*1.5-100)+HJ_12;
HJ_14:=SMA(SMA(HJ_1,3,1),3,1)+HJ_3+HJ_8+EMA(HJ_12,10);
HJ_15:=3*SMA(HJ_1,3,1)-2*SMA(SMA(HJ_1,3,1),3,1)+(3*HJ_12-2*EMA(HJ_12,10))+HJ_9+(3*HJ_12-2*EMA(HJ_12,10));
HJ_16:=(HIGH+LOW+CLOSE)/3;
HJ_17:=(HJ_16-MA(HJ_16,34))/(0.015*AVEDEV(HJ_16,34));
HJ_18:=(HIGH+LOW+CLOSE+HJ_16)/4;
HJ_19:=(HJ_18-EMA(HJ_18,24))/STD(HJ_18,24)*100;
HJ_20:=(HJ_16-MA(HJ_16,24))/(0.015*AVEDEV(HJ_16,24));
HJ_21:=((EMA(HJ_19,5)+HJ_20+HJ_17)/3+165)/4;
HJ_22:=(HJ_13+HJ_14+HJ_15*30)/32/5-15;
HJ_23:=EMA(EMA(CLOSE,13),13);
HJ_24:=(HJ_23-REF(HJ_23,1))/REF(HJ_23,1)*6400;
HJ_25:=100*WINNER(CLOSE*0.95);
HJ_26:=EMA((HJ_21+HJ_22)/2/1.1,1);
HJ_27:=MA(HJ_26,3);
HJ_28:=EMA(OPEN,7);
HJ_29:=EMA(HJ_28,21);
HJ_30:=CROSS(HJ_28,HJ_29);
HJ_31:=EMA(SMA((CLOSE-LLV(LOW,20))/(HHV(HIGH,16)-LLV(LOW,20))*100,8,1),3);
DM:IF(TROUGHBARS(1,6,1)=0 AND HIGH>LOW+0,20,0),COLOR0078FF,LINETHICK2;
DRAWICON(DM,70,1);
DP:IF(PEAKBARS(2,9,1)=1,80,100),COLORBLUE,LINETHICK2;
DRAWICON(DP,70,2);
ZM:IF(TROUGHBARS(3,18,1)=0 AND HIGH>LOW+0.1,20,0),COLORMAGENTA,LINETHICK3;
DRAWICON(ZM,70,1);
ZP:IF(PEAKBARS(2,15,1)=0,80,100),COLORGREEN,LINETHICK3;
DRAWICON(ZP,70,2);
QM:(ZIG(3,35)>REF(ZIG(3,35),1) AND REF(ZIG(3,35),1)<REF(ZIG(3,35),2))*50,STICK,COLORRED,LINETHICK6;
DRAWICON(QM,70,1);
QP:(ZIG(3,35)<REF(ZIG(3,35),1) AND REF(ZIG(3,35),1)>REF(ZIG(3,35),2))*50,STICK,COLORGREEN,LINETHICK4;
DRAWICON(QP,70,2);
多空MACDKD均线:100,COLORRED,LINETHICK0;
工作WLRSIVOL:100,COLORRED,LINETHICK0;
HJ_32:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
HJ_33:=SMA(SMA(HJ_32,3,1),3,1)/28.57;
HJ_34:=EMA(HJ_33,5);
HJ_35:=3*HJ_33-2*HJ_34;
HJ_36:=CROSS(HJ_35,HJ_33) AND HJ_33<2.1 AND CLOSE>OPEN;
STICKLINE(HJ_36,30,0,4,0),COLOR770077;
STICKLINE(HJ_36,30,0,3,0),COLOR990099;
STICKLINE(HJ_36,30,0,2,0),COLORBB00BB;
STICKLINE(HJ_36,30,0,1,0),COLORDD00DD;
STICKLINE(HJ_36,30,0,0.3,0),COLORMAGENTA;
HJ_37:=282797888;
HJ_38:=66;
{-----------------------------------}
651488773.jpg
|
