PJJ:=MA(CLOSE,5); PJC:=MA(MA(CLOSE,20),5); kl:=((PJJ-REF(PJJ,1))/REF(PJJ,1))*1000; ku:=((PJC-REF(PJC,1))/REF(PJC,1))*1000; km:=kl-ku; kk:=if(kl<km,km+abs(kl-km),km-abs(kl-km)); kl1:=kl+50; kk1:=kk+50; 集散上轨:=if(max(kl1,kk1)>100,100,max(kl1,kk1)); 集散下轨:=if(min(kl1,kk1)<0,0,min(kl1,kk1)); 短线活筹百分比:=(集散上轨+集散下轨)/2; 短线筹码集散:(集散上轨-集散下轨)*2.5,stick; 短线筹码进出:=短线活筹百分比-50; 强弱系数:短线筹码进出*2.5; pt:if(ref(集散下轨,1)<17 and c=llv(c,7),50,0),colorred,linethick2;
|