1、通達(dá)信】金蛇狂舞（短期、中長(zhǎng)期、中期、強(qiáng)市線、弱市線）-指標(biāo)公式源碼短期:100*(C-LLV(L,5)/(HHV(C,5)-LLV(L,5),COLORWHITE;中期:100*(C-LLV(L,10)/(HHV(C,10)-LLV(L,10),COLORYELLOW;中長(zhǎng)期:100*(C-LLV(L,20)/(HHV(C,20)-LLV(L,20),COLORMAGENTA;長(zhǎng)期:100*(C-LLV(L,30)/(HHV(C,30)-LLV(L,30),COLORRED,LINETHICK2;強(qiáng)市線:80,POINTDOT;弱市線:20,POINTDOT;分水嶺:50,POINTDOT;

2、LG:=C-REF(C,1);AA1:=LG-REF(LG,7);AA2:=LG-REF(LG,18);AA3:=LG-REF(LG,29);AA4:=LG-REF(LG,47);AA5:=LG-REF(LG,76);AA6:=LG-REF(LG,123);AA7:=LG-REF(LG,199);BB1:=(AA1+AA2+AA3+AA4+AA5+AA6+AA7);U:=BB1-REF(BB1,1);BB2:=SMA(U,5,1);YY1:=BB1-REF(BB1,1);綠1:=EMA(EMA(EMA(YY1,8),8),14),COLOR00FA00,LINETHICK4;綠2:=EMA(E

3、MA(綠l,3),3),C0L0RFFFF00,LINETHICK3;紅1:=EMA(EMA(綠2,3),3),C0L0RRED,LINETHICK3;紅2:=EMA(紅l,ll),C0L0RFF00FF,LINETHICK3;MTM:=C-REF(C,1);ZLGJ:=100*EMA(EMA(MTM,N1),N1)/EMA(EMA(ABS(MTM),N1),N1),COLORWHITE;MAZL:=MA(ZLGJ,N2),COLORYELLOW;VA1:=REF(LOW+OPEN+CLOSE+HIGH)/4,1);VA2:=SMA(ABS(LOW-VA1),13,1)/SMA(MAX(LOW

4、-VA1,0),10,1);VA3:=EMA(VA2,10);VA4:=LLV(LOW,33);VAR5:=EMA(IF(LOWREF(VAR5,1),VAR5,0),COLORRED,NODRAW;STICKLINE(VAR5REF(VAR5,1),0,VAR5,3,0),COLOR000055;STICKLINE(VAR5REF(VAR5,1),0,VAR5,2.6,0),COLOR000077;STICKLINE(VAR5REF(VAR5,1),0,VAR5,2.1,0),COLOR000099;STICKLINE(VAR5REF(VAR5,1),0,VAR5,1.5,0),COLOR0

5、000BB;STICKLINE(VAR5REF(VAR5,1),0,VAR5,0.9,0),COLOR0000DD;STICKLINE(VAR5REF(VAR5,1),0,VAR5,0.3,0),COLOR0000FF;洗盤:IF(VAR5REF(VAR5,1),VAR5,0),COLORGREEN,NODRAW;STICKLINE(VAR5REF(VAR5,1),0,VAR5,3,0),COLOR005500;STICKLINE(VAR5REF(VAR5,1),0,VAR5,2.6,0),COLOR007700;STICKLINE(VAR5REF(VAR5,1),0,VAR5,2.1,0),

6、COLOR009900;STICKLINE(VAR5REF(VAR5,1),0,VAR5,1.5,0),COLOR00BB00;STICKLINE(VAR5REF(VAR5,1),0,VAR5,0.9,0),COLOR00DD00;STICKLINE(VAR50ANDHDLD,HD,0),N);DMM:=EXPMEMA(IF(LD0ANDLDHD,LD,0),N);VAR1:=DMP*100/TR;VAR2:=DMM*100/TR;VAR3:=EXPMEMA(VAR1,M);VAR4:=EXPMEMA(VAR2,M);DRAWBAND(VAR3,RGB(150,30,50),VAR4,RGB(

7、30,110,50);PDI:EMA(VAR1,13),COLORYELLOW;MDI:EMA(VAR2,13),COLORGREEN;STICKLINE(VAR1VAR3ANDVAR2REF(V,1)*1.03;VV2:=(MA(C,5)-MA(C,10)/MA(C,10)0.03AND(MA(C,10)-MA(C,20)/MA(C,20)MA(C,10)ANDMA(C,10)MA(C,20)ANDMA(C,20)MA(C,60)ANDMA(C,1)MA(C,5)ANDVV1ANDCOANDVV2,1,0)*20;VV3:=(MA(C,3)-MA(C,5)/MA(C,5)0.02AND(MA

8、(C,5)-MA(C,10)/MA(C,10)0.03AND(MA(C,10)-MA(C,20)/MA(C,20)0.06;A1:=MA(CLOSE,5);A2:=MA(CLOSE,10);A3:=MA(CLOSE,20);A4:=MA(CLOSE,30);籌碼集中度:=COST(10)/(COST(80)-COST(10);籌碼1:EMA（籌碼集中度,1)*10,LINETHICK2,COLOR3399FF;籌碼3:EMA（籌碼集中度,3)*10,LINETHICK2,COLORRED;籌碼5:EMA（籌碼集中度,5)*10,LINETHICK1;籌碼13:EMA（籌碼集中度,13)*10,

9、LINETHICK1;籌碼34:EMA（籌碼集中度,34)*10,LINETHICK1;籌碼55:EMA（籌碼集中度,55)*10,LINETHICK1;籌碼90:EMA（籌碼集中度,90)*10,LINETHICK1,COLORFF00FF;DDD:(COUNT(A1A2ANDA2A3ANDA3OAND籌碼1MA5)*30,COLORGREEN;(HREF(C,1)ANDA2REF(A2,1)AND籌碼1REF(L,1)AND籌碼1REF(MA1,1)*20,C0L0RRED;底:0;線1:10,COLORWHITE,POINTDOT;5;A:=P+(100-P)/2;B:=(100-P)/

10、2;CC:=COST(A);DD:=COST(B);CMJZD:=(CC-DD)/(CC+DD)*100/2;籌碼集中度A:MA(CMJZD,3),COLORRED;:IF(籌碼集中度A=REF(籌碼集中度A,3),籌碼集中度A,DRAWNULL),COLORRED;:IF(籌碼集中度AREF(籌碼集中度A,3)ANDMA(C,20)REF(MA(C,20),3),1,0),COLORRED;拉高加倉(cāng)1:STICKLINE(拉高加倉(cāng)0,0,籌碼集中度A*0.33,3,l),C0L0RRED;下跌加倉(cāng)：IF(籌碼集中度AREF(籌碼集中度A,3)ANDMA(C,20)0,0,籌碼集中度A*0.33,3,l),C0L0RGREEN;TYP:=(HIGH+LOW+CLOSE)/3;CCI:=(TYP-MA(TYP,88)/(0.015*A