大智慧七种技术指标主图指标公式

INPUT:AM(1,0,1),AJ(1,0,1),ac(1,0,1),AR(1,0,1),AD(1,0,1),DM(1,0,1),ZL(1,0,1);

DRAWGBKlast(c>0,strip(RGB(0,0,0),RGB(0,0,120),0));

{1.k线}

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8.5,0) ,COLOR000011;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000033;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000055;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000077;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000BB;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000DD;

STICKLINE((CLOSE >= OPEN),HIGH,LOW,1,0),color0000FF;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,8.5,0),color006600;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,7,0),color008800;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,6,0),color00AA00;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,5,0),color00BB00;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,4,0),color00CC00;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,3,0),color00DD00;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,2,0),color00EE00;

STICKLINE((OPEN > CLOSE),HIGH,LOW,1,0),color00FF00;

LC:=REF(C,1);

卖黄金:((SMA(MAX((C - LC),0),3,1) / SMA(Abs((C - LC)),3,1)) * 100),LINETHICK0;

DRAWTEXT(crOSS(80,卖黄金) ,high*1.04,'顶'),COLOR00ffFF,ALIGN1,LINETHICK1;

STICKLINE(CROSS(80,卖黄金) AND C<O,H,L,2,0),COLOR00ffff,LAYER0;

STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,12,0 ),COLOR007777,LAYER0;

STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,8,0 ),COLOR009999,LAYER0;

STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,6,0 ),COLOR00BBBB,LAYER0;

STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,4,0 ),COLOR00DDDD,LAYER0;

STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,2 ,0 ),COLOR00ffff,LAYER0;

DRAWTEXTABS(5,5,'基本指标:MA5波段'),Color00FFff,LINETHICK3;

BC:=(3*C+H+L)/5;

MA5:EMA(MA(BC,5),5);

PARTLINE(MA5,(MA5>REF(MA5,1))-1,rgb(0,255,0),1,rgb(255,0,0) ),LINETHICK2,LAYER0;

XL:=BArslAST(DISPSTATUS=1)+1;

E:=llvall(llv(L,XL))*0.95;

IF AM=1 THEN BEGIN

DRAWTEXTABS(250,5,'技术指标:macd'),Color0000ff,LINETHICK4;

DIFF:=EMA( EMA(CLOSE,12) - EMA(CLOSE,26),3);

DEA:=EMA(DIFF,9);

MACD:2*(DIFF-DEA),Color0598FF,LINETHICK0;;

STICKLINE(MACD>0,E+MACD*2,E,12,0),Color0598FF;

STICKLINE(MACD<0,E+MACD*2,E,12,0),ColorFF5500;

END;

IF AJ=1 THEN BEGIN

DRAWTEXTABS(250,5,'技术指标:kdj'),Colorff00ff,LINETHICK4;

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J:(3*K-2*D),Color05FFFF,LINETHICK0;

if(CROSS(K,D) AND BARSLAST(CROSS(D,K))<3,E*1.09,E),ColorFF9910 ;

STICKLINE(K>D,E+(K-D)/50,E,12,0),Color0000FF;

STICKLINE(K<D,E+(K-D)/50,E,12,0),Color00FF00;

END;

IF AC=1 THEN BEGIN

DRAWTEXTABS(200,5,'指标:cci'),Color00ffff,LINETHICK4;

TYP := (HIGH + LOW + CLOSE)/3;

CCI:(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),Color05FF00,LINETHICK0;;

STICKLINE(CCI>0,E+CCI/350,E,12,0),Color0077FF;

STICKLINE(CCI<0,E+CCI/350,E,12,0),ColorFF9900;

END;

IF AR=1 THEN BEGIN

DRAWTEXTABS(250,5,'技术指标:rsi'),Color00ff00,LINETHICK4;

LC := REF(CLOSE,1);

RSI:SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100,ColorFF05FF,LINETHICK0;

CRSI:="RSI.RSI3#WEEK";

金叉RSI:STICKLINE(CROSS("RSI.RSI2#WEEK","RSI.RSI3#WEEK"),E,E*1.1,0.6,0),ColorFF00FF;

DRAWTEXT(CROSS("RSI.RSI2#WEEK","RSI.RSI3#WEEK"),E*1.1,'金叉'),COLOR0000FF;

STICKLINE(RSI>CRSI,E+(RSI-CRSI)/50,E,12,0),Color0000FF;

STICKLINE(RSI<CRSI,E+(RSI-CRSI)/50,E,12,0),Color00FF00;

VAR1:=(CLOSE*2+HIGH+LOW)/4;

SK:=EMA(VAR1,13)-EMA(VAR1,73);

SD:=EMA(SK,2);

XG:=((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )

OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)) OR 金叉RSI);

STICKLINE(XG,E,E*1.15,0.6,0),COLOR00FFFF;

DRAWTEXT(XG,E*1.15,'突破'),COLOR00FFBB;

END;

IF AD=1 THEN BEGIN

{dmi新编}

DRAWTEXTABS(250,5,'技术指标:DMI'),Color0598ff,LINETHICK4;

N:=21;M:=6;M1:=20;

TR1:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);

HD :=HIGH-REF(HIGH,1);

LD :=REF(LOW,1)-LOW;

DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),N);

DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),N);

pdi:= DMP*100/TR1;

mdi:DMM*100/TR1,Color05FFFF,LINETHICK0;

ADX:= EMA((PDI-MDI)/(MDI+PDI)*100,M)*2;

ADXR:=EMA(ADX,M);

ADMA:=EMA(ADX,M1);

OMD:=(ADX-2*ADMA+ADXR)/2;

{www.zhibiaow.com 指标网_大智慧股票指标公式}

STICKLINE( OMD>0,E,E+OMD/100,12,0),COLORRED;

STICKLINE(OMD<0,E,E+OMD/100,12,0),COLORGREEN;

END;

IF DM=1 THEN BEGIN

DRAWTEXTABS(250,5,'技术指标:DMA'),ColorFF55ff,LINETHICK4;

DDD:=(MA(CLOSE,10)-MA(CLOSE,50));

AMA:=MA(DDD,10);

STICKLINE( DDD>AMA,E,E+(DDD-AMA),12,0),COLORFF22FF;

STICKLINE(DDD<AMA,E,E+(DDD-AMA),12,0),COLOR99FF99;

END;

IF ZL=1 THEN BEGIN

DRAWTEXTABS(250,5,'技术指标:主力进出'),ColorFF55ff,LINETHICK4;

jcs:=ZLSHORT;

jcm:=ma(zlshort ,12);

STICKLINE(jcs>jcm,E,E+(jcs-jcm)/CAPITAL*5000,12,0),COLOR222299;

STICKLINE(jcs<jcm,E,E+(jcs-jcm)/CAPITAL*5000,12,0),COLORFFee00;

END;