同花顺跟庄涨停公式

本人常用的分时抄底和追涨指标，以前一直在通达信用，但现在用大智慧了，请老师们帮改为大智慧的，谢谢。

源码

A12:=(DVOL/C)/2,NODRAW;

A22:=SUM(IF(A12>100 AND CLOSE>REF(CLOSE,1),A12,0),0);

A32:=SUM(IF(A12>100 AND CLOSE<REF(CLOSE,1),A12,0),0);

A42:=SUM(IF(A12<100 AND CLOSE>REF(CLOSE,1),A12,0),0);

A52:=SUM(IF(A12<100 AND CLOSE<REF(CLOSE,1),A12,0),0);

A62:=A22+A32+A42+A52;

机买:(A22/A62)*100,LINETHICK2,colorred;

机卖:(A32/A62)*100,LINETHICK2,colorgreen;

散买:(A42/A62)*100,LINETHICK0;

散卖:(A52/A62)*100,LINETHICK0;

主力差:机买-机卖,LINETHICK2,NODRAW;

散户差:散买-散卖,LINETHICK0,NODRAW;

DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.85,'●机构'),colorred;

DRAWTEXT(主力差<0 AND REF(主力差,1)>=0,-C*0.85,'○机构'),colorwhite;

DRAWTEXT(散户差>0 AND REF(散户差,1)<=0,C*0.15,'▲散户'),colorcyan;

DRAWTEXT(散户差<0 AND REF(散户差,1)>=0,-C*0.15,'△散户'),colorwhite;

VAR2:=REF(LOW,1);

VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;

VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3);

VAR5:=LLV(LOW,30);

VAR6:=HHV(VAR4,30);

VAR7:=IF(MA(CLOSE,58),1,0);

VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;

VAR9:=IF(VAR8>100,100,VAR8);

庄现身:STICKLINE(VAR9>-120,0,VAR9,6,1),colorred;