|
以下是通达信筹码跟踪源码副图（无源码的请下载附件导入）
HJ_1:=55;
HJ_2:=34;
HJ_3:=REF(CLOSE,1);
HJ_4:=SMA(MAX(CLOSE-HJ_3,0),3,1)/SMA(ABS(CLOSE-HJ_3),3,1)*100;
HJ_5:=EMA(CLOSE,3);
HJ_6:=EMA(CLOSE,21);
DRAWTEXT(CROSS(85,HJ_4),75,69),COLORGREEN;
HJ_7:=IF(YEAR>=2038 AND MONTH>=1,0,1);
HJ_8:=REF(LOW,1)*HJ_7;
HJ_9:=SMA(ABS(LOW-HJ_8),3,1)/SMA(MAX(LOW-HJ_8,0),3,1)*100*HJ_7;
HJ_10:=EMA(IF(CLOSE*1.3,HJ_9*10,HJ_9/10),3)*HJ_7;
HJ_11:=LLV(LOW,30)*HJ_7;
HJ_12:=HHV(HJ_10,30)*HJ_7;
HJ_13:=IF(MA(CLOSE,58),1,0)*HJ_7;
HJ_14:=EMA(IF(LOW<=HJ_11,(HJ_10+HJ_12*2)/2,0),3)/618*HJ_13*HJ_7;
吸筹:IF(HJ_14>100,100,HJ_14)*HJ_7,COLORRED;
庄家吸筹:STICKLINE(吸筹>(-150),0,吸筹,8,0),COLORRED;
散户:100*(HHV(HIGH,HJ_1)-CLOSE)/(HHV(HIGH,HJ_1)-LLV(LOW,HJ_1)),COLORCYAN,LINETHICK2;
HJ_15:=(CLOSE-LLV(LOW,HJ_2))/(HHV(HIGH,HJ_2)-LLV(LOW,HJ_2))*100;
HJ_16:=SMA(HJ_15,3,1);
HJ_17:=SMA(HJ_16,3,1);
HJ_18:=3*HJ_16-2*HJ_17;
庄家:EMA(HJ_18,6),COLORMAGENTA,LINETHICK2;
{-----------------------------------}
636244343.jpg
| 
