请路过高手和老师,对通达信《跟庄分时指标》编辑一个预警公式。
条件:在机买(红线)出现时,预警 源码{精品中的精品!!!!} A1:=(DVOL/C)/2,NODRAW; A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0); A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0); A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0); A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0); A6:=A2+A3+A4+A5; 机买:(A2/A6)*100,LINETHICK2,COLORRED; 机卖:(A3/A6)*100,LINETHICK2,COLORGREEN; 散买:(A4/A6)*100,LINETHICK0; 散卖:(A5/A6)*100,LINETHICK0; 主力差:机买-机卖,LINETHICK2,NODRAW; 散户差:散买-散卖,LINETHICK0,NODRAW; DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.75,'●机构'),COLORRED; DRAWTEXT(主力差<0 AND REF(主力差,1)>=0,-C*0.75,'○机构'),COLORWHITE; DRAWTEXT(散户差>0 AND REF(散户差,1)<=0,C*0.25,'▲散户'),COLORCYAN; DRAWTEXT(散户差<0 AND REF(散户差,1)>=0,-C*0.25,'△散户'),COLORWHITE; 预警公式。
A1:=(DVOL/C)/2,NODRAW; A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0); A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0); A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0); A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0); A6:=A2+A3+A4+A5; 机买:(A2/A6)*100,LINETHICK2,COLORRED; 机卖:(A3/A6)*100,LINETHICK2,COLORGREEN; 散买:(A4/A6)*100,LINETHICK0; 散卖:(A5/A6)*100,LINETHICK0; 主力差:机买-机卖,LINETHICK2,NODRAW; 散户差:散买-散卖,LINETHICK0,NODRAW; DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.75,'●机构'),COLORRED; DRAWTEXT(主力差<0 AND REF(主力差,1)>=0,-C*0.75,'○机构'),COLORWHITE; DRAWTEXT(散户差>0 AND REF(散户差,1)<=0,C*0.25,'▲散户'),COLORCYAN; DRAWTEXT(散户差<0 AND REF(散户差,1)>=0,-C*0.25,'△散户'),COLORWHITE; |
|