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_TH2+L_TQ)/(L_TL*2+L_TQ);
L_MAvr:MA(L_VR,M);