PJ:=(H+L+C)/3;
V1:=IF(H=L,1,H-MAX(O,C));
V2:=IF(H=L,1,MAX(C,O)-PJ);
V3:=IF(H=L,1,MIN(O,C)-L);
V4:=IF(H=L,1,PJ-MIN(C,O));
V5:=VOL/IF(H=L,4,H-L);
V6:=(V1*V5)+(V2*V5);
V7:=(V3*V5)+(V4*V5);
WP1:=DYNAINFO(23);
NP1:=DYNAINFO(22);
WP2:=IF(ISLASTBAR,V7*240/FROMOPEN,V7);
NP2:=IF(ISLASTBAR,V6*240/FROMOPEN,V6);
WP:=IF(ISLASTBAR AND PERIOD=5 ,WP1,WP2);
NP:=IF(ISLASTBAR AND PERIOD=5 ,NP1,NP2);
日差:WP-NP,LINETHICK0;
周差:SUM(日差,5),NODRAW;
月差:SUM(日差,22),NODRAW;
STICKLINE(日差>O,0,日差,-1,0),COLORRED;
STICKLINE(日差<O,0,日差,-1,0),COLORFFFF00;
