分时机密(大智慧)

源码正文：

V1:=(C*2+H+L)/4*10{XG51};
V2:=ema(V1,13)-Ema(V1,34){XG51};
V3:=EMA(V2,5){XG51};
V4:=2*(V2-V3)*5.5{XG51};
庄秘撤: IF(V4<=0,V4,0),COLOR00FF00,LINETHICK2{XG51};
庄秘进: IF(V4>=0,V4,0),COLORFF00FF,LINETHICK2{XG51};
V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8{XG51};
V6:=EMA(3*V5-2*SMA(V5,18,1),5){XG51};
V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10{XG51};
V8:=(INDEXC*2+INDEXH+INDEXL)/4{XG51};
V9:=EMA(V8,13)-EMA(V8,34){XG51};
VA:=EMA(V9,3){XG51};
VB:=(V9-VA)/2{XG51};
大筹金进场: IF(VB>=0,VB,0),COLORBLUE,LINETHICK2{XG51};
大筹金撤走: IF(VB<=0,VB,0),COLORYELLOW,LINETHICK2{XG51};
aa:=WINNER(CLOSE+CLOSE*15/100)*100{XG51};
bb:=WINNER(CLOSE+CLOSE*0/100)*100{XG51};
cc:=aa-bb{XG51};
dd:=(WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100{XG51};
ee:=cc<3 and dd<0.5 and OPEN<>LOW{XG51};
a1:=DYNAINFO(6){XG51};
a2:=IF(LOW>a1,0,IF(HIGH<a1,1,(a1-LOW+0.01)/(HIGH-LOW+0.01))){XG51};
a3:=vol/WINNER(LOW){XG51};
a4:=REF(HHV(CLOSE,120),1){XG51};
a5:=REF(LLV(CLOSE,120),1){XG51};
a6:=100*(CLOSE-a5)/(a4-a5){XG51};
a7:=a2>0 or a2=1{XG51};
a8:=a7 and a3/REF(a3,3)>=3 and a6<80{XG51};
a9:=REF(a8,1) or REF(a8,2) or REF(a8,3) or REF(a8,4){XG51};
a10:=a8 and a9{XG51};
a11:=IF(FILTER(a8,3),5,0){XG51};
a12:=IF(FILTER(a10,3) or ee,10,0){XG51};
筹码进场日:IF(a11,8,0),LINETHICK0{XG51};
stICKLINE(a12,0,15,5,0),colorff00ff{XG51};
筹码加仓日:IF(a12,88,0),LINETHICK0{XG51};
STICKLINE(a12,0,15,5,0),colorff00ff{XG51};
STICKLINE(a11,0,5,5,0),colorff7700{XG51};
STICKLINE(a11,0,5,4.5,0),colorff8800{XG51};
STICKLINE(a11,0,5,4,0),colorff9900{XG51};
STICKLINE(a11,0,5,3.5,0),colorffaa00{XG51};
STICKLINE(a11,0,5,3,0),colorffbb00{XG51};
STICKLINE(a11,0,5,2.5,0),colorffcc00{XG51};
STICKLINE(a11,0,5,2,0),colorffdd00{XG51};
STICKLINE(a11,0,5,1,0),colorffee00{XG51};
STICKLINE(a12,0,15,4.5,0),color102099{XG51};
STICKLINE(a12,0,15,4,0),color1020aa{XG51};
STICKLINE(a12,0,15,3.5,0),color1020bb{XG51};
STICKLINE(a12,0,15,3,0),color1020cc{XG51};
STICKLINE(a12,0,15,2.5,0),color1020dd{XG51};
STICKLINE(a12,0,15,2,0),color1020ee{XG51};
STICKLINE(a12,0,15,1,0),color1020ff{XG51};
DRAWTEXT(a11,8,'筹码进场'){XG51};
DRAWTEXT(a12,17,'筹码加仓'){XG51};
Var1:=REF(LOW,1){XG51};
Var2:=SMA(Abs(LOW-Var1),13,1)/SMA(MAX(LOW-Var1,0),13,1)*4{XG51};
Var3:=EMA(Var2,13){XG51};
Var4:=LLV(LOW,34){XG51};
Var5:=EMA(IF(LOW<=Var4,Var3,0),3){XG51};
主力进场:
STICKLINE(Var5>REF(Var5,1),0,Var5,7,0 ),COLORWHITE{XG51};
洗盘:IF(VAR5<REF(VAR5,1),VAR5,0),COLORCYAN,LINETHICK2{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,2,1),COLORCYAN{XG51};
Var6:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-
LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1){XG51};
Var7:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV
(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1){XG51};
Var8:=Var6<REF(Var7,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1){XG51};
DRAWTEXT(Var8 AND COUNT(Var8,30)=1,40,'★注意有筹码进场迹象'){X_G^5_1_C_N_{};

源码正文：

AA2:=vol/((HIGH-LOW)*2-Abs(CLOSE-OPEN)){XG51};
买量2:=IF(CLOSE>OPEN,AA2*(HIGH-LOW),IF(CLOSE<OPEN,AA2*((HIGH-OPEN)+ (CLOSE-LOW)),VOL/2)){XG51};
卖量2:=IF(CLOSE>OPEN,0-AA2*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE< OPEN,0-AA2*(HIGH-LOW),0-VOL/2)){XG51};
ddx2:=(买量2+卖量2)/(买量2-卖量2){XG51};
d12:=ema(abs(DDX2),60);
d22:=max(DDX2/d12+7.5,7.5){XG51};
d32:=min(DDX2/d12,10);
K1:=IF(CLOSE>=REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW+CLOSE-REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW){XG51};
K2:=IF(CLOSE<=REF(CLOSE,1),OPEN-LOW+HIGH-CLOSE+REF(CLOSE,1)-CLOSE,OPEN-LOW+HIGH-CLOSE){XG51};
DT:=VOL*K1/(K1+K2){XG51};
KT:=VOL-DT{XG51};
买量:=SUM(DT,1){XG51};
卖量:=SUM(KT,1){XG51};
DDX3:=EMA(买量-卖量,5)*VOL/sum(vol,60)*0.001{XG51};
d11:=ema(abs(DDX3),60);
d21:=max(DDX3/d11+7.5,7.5){XG51};
d31:=min(DDX3/d11,10);
TT:=(OPEN+HIGH+LOW+CLOSE)/4{XG51};
AA:=IF(BETWEEN(C,TT,H) OR C=O,VOL,0){XG51};
BB:=IF(BETWEEN(C,TT,L),VOL,0){XG51};
CC:=IF(AA AND BB,0,VOL/3);DDXJ:=10*(AA-(BB+CC))/IF(CAPITAL<1,SUM(VOL,13),CAPITAL){XG51};
jj:=(HIGH+LOW+CLOSE)/3;qj0:=vol/IF(HIGH=LOW,4,HIGH-LOW){XG51};
qj1:=IF(CAPITAL=0,qj0*(jj-MIN(CLOSE,OPEN)),qj0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW))){XG51};
qj2:=IF(CAPITAL=0,qj0*(MIN(OPEN,CLOSE)-LOW),qj0*IF(HIGH=LOW,1,(jj-MIN(CLOSE,OPEN)))){XG51};
qj3:=IF(CAPITAL=0,qj0*(HIGH-MAX(OPEN,CLOSE)),qj0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE)))){XG51};
qj4:=IF(CAPITAL=0,qj0*(MAX(CLOSE,OPEN)-jj),qj0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-jj))){XG51};
DDXQJ:=((qj1+qj2)-(qj3+qj4))/sum(vol,60){XG51};
dJ11:=ema(abs(DDXQJ),60);
dJ21:=max(DDXQJ/dJ11+7.5,7.5){XG51};
dJ31:=min(DDXQJ/dJ11,10);
dJ1:=ema(abs(DDXJ),60);
dJ2:=max(DDXJ/dJ1+7.5,7.5){XG51};
dJ3:=min(DDXJ/dJ1,10);
d1:=ema(abs("ddx.ddx"),60);
d2:=max("ddx.ddx"/d1+7.5,7.5){XG51};
d3:=min("ddx.ddx"/d1,10);
能量启爆点1:IF(cross(d3,1.5) ,50 ,0),COLORWHITE,POINTDOT,LINETHICK0{XG51};
stICKLINE(能量启爆点1,0,30,4,0),COLORWHITE{XG51};
能量启爆点2:IF(cross(dJ3,1.5),50,0),COLORGRAY,POINTDOT,LINETHICK0{XG51};
STICKLINE(能量启爆点2,0,30,4,0),COLORGRAY{XG51};
能量启爆点3:IF(cross(dJ31,1.5),50,0),COLORBLUE,POINTDOT,LINETHICK0{XG51};
STICKLINE(能量启爆点3,0,30,4,0),COLORBLUE{XG51};
能量启爆点4:IF(cross(d31,9),50,0),COLORCYAN,POINTDOT,LINETHICK0{XG51};
STICKLINE(能量启爆点4,0,30,4,0),COLORCYAN{XG51};
能量启爆点5:IF(cross(d32,1.5),50,0),COLORYELLOW,POINTDOT,LINETHICK0{XG51};
STICKLINE(能量启爆点5,0,30,4,0),COLORYELLOW{X!G^5~1!C!N!{};