指标功能：[B]国产软件[/B]
指标类型：简体中文
所需积分：0
推荐星级：
授权方式：共享版
公式大小：0 Bytes
更新时间：2013-11-30 18:26:00
公式简介:

【05引】源码：-----------------

{05引}
CL:C,LINETHICK1;
OL:O,LINETHICK0;
HL:H,LINETHICK0;
LL:L,LINETHICK0;
QC:REF(C,2),LINETHICK1;
RC:REF(C,1),LINETHICK0;
RH:REF(H,1),LINETHICK0;
RO:REF(O,1),LINETHICK0;

下面就是【MACD-金】通达信源码;-------

RL:REF(L,1),LINETHICK0;DRAWGBK(O>C,RGB(40,0,40),RGB(0,0,120),0,'01',0);
{K线}
STICKLINE(CLOSE>OPEN OR CLOSE=OPEN AND CLOSE>REF(CLOSE,1),LOW,HIGH,0.0,0),COLORRED;
STICKLINE(CLOSE<OPEN OR CLOSE=OPEN AND CLOSE<=REF(CLOSE,1),LOW,HIGH,0.0,0),COLORCYAN;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR008800;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR000088;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000AA;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000DD;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLOR0000FF;
现价: IF (DYNAINFO(4)=0,C,DYNAINFO(7)),COLORWHITE,POINTDOT;
TYP:FORCAST(((2*C+H+L)/4*0.618+C*0.382),3),COLOR00FFFF,LINETHICK0;
MA5:WMA(TYP,5),COLOR00FF00,LINETHICK2;
IF(MA5>REF(MA5,1),MA5,DRAWNULL),COLORRED,LINETHICK3;

DIF1:=WMA(CLOSE,5);
DIF2:=WMA(CLOSE,13);
XP:=BARSLAST(0)+1;
E:=LLV(L,XP);
DIFFK:=DIF1-DIF2;
DIF1-DIF2+E,COLOR0000FF;
DEAK:=WMA(DIFFK,8);
WMA(DIFFK,8)+E,COLOR00FF00;
MACD:=2*(DIFFK-DEAK);
STICKLINE((MACD > 0),E,E+MACD,0.5,0),COLOR0000CC;
STICKLINE((MACD > 0),E,E+MACD*0.9,0.5,0),COLOR0000EE;
STICKLINE((MACD > 0),E,E+MACD*0.8,1,0),COLOR0011FF;
STICKLINE((MACD > 0),E,E+MACD*0.7,1,0),COLOR0033FF;
STICKLINE((MACD > 0),E,E+MACD*0.6,1.5,0),COLOR0055FF;
STICKLINE((MACD > 0),E,E+MACD*0.5,1.5,0),COLOR0077FF;
STICKLINE((MACD > 0),E,E+MACD*0.3,2,0),COLOR00BBFF;

STICKLINE((MACD < 0),E,E+MACD,0.5,0),COLORCC0033;
STICKLINE((MACD < 0),E,E+MACD*0.9,0.5,0),COLOREE0033;
STICKLINE((MACD < 0),E,E+MACD*0.8,1,0),COLORFF1133;
STICKLINE((MACD < 0),E,E+MACD*0.7,1,0),COLORFF3333;
STICKLINE((MACD < 0),E,E+MACD*0.6,1.5,0),COLORFF5533;
STICKLINE((MACD < 0),E,E+MACD*0.5,1.5,0),COLORFF7733;
STICKLINE((MACD < 0),E,E+MACD*0.4,1.5,0),COLORFF9933;
STICKLINE((MACD < 0),E,E+MACD*0.1,2,0),COLORFFFF33;

KC:=FORCAST(((2*C+H+L)/4*0.618+C*0.382),3);
AAX:=(KC-MA(KC,9))/MA(KC,9)*100;
VAR0:=MIN(EXIST(KC,55),9);
AAX1:=EMA(AAX,VAR0)*VAR0;
AAX2:=MA(AAX1,3);
AAX3:=MA(AAX1,5);
DRAWTEXT(AAX3>10 AND AAX1<REF(AAX1,1) AND CROSS(AAX2,AAX1) ,H*1.02,'卖'),COLOR00FFFF,LINETHICK1;
DRAWTEXT(AAX3>10 AND AAX1<REF(AAX1,1) AND CROSS(AAX2,AAX1) ,H*1.05,'★'),COLOR0000FF,LINETHICK1;

 

[url=http://www.goodgupiao.com/gupiaogongshi/31916.html][B]【MACD-金】通达信版 主图指标[/B][/url]