通达信改造ＶＲ指标

通达信改造ＶＲ指标

ＶＲ指标里使用的判断条件是昨日和今日收盘价的差，现在改成(h+l+o)/3均价的差，这样就得到改造的VR指标。也许对你有用。

M:=6;N:=26;{可以自己在参数里设置}
L_MID:=(CLOSE+HIGH+LOW)/3;
L_TH:=SUM(IF(L_MID>REF(L_MID,1),VOL,0),N);
L_TL:=SUM(IF(L_MID<REF(L_MID,1),VOL,0),N);
L_TQ:=SUM(IF(L_MID=REF(L_MID,1),VOL,0),N);
L_VR:100*(L_TH*2+L_TQ)/(L_TL*2+L_TQ);
L_MAVR:MA(L_VR,M);