请教如何将通达信指标改成金字塔的

蒙太奇

请教老师，如何将下列来自通达信的附图指标改成金字塔的语言格式？
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),COLORLIGREEN;

技术008

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/todaybar,V7);
NP2:=IF(ISLASTBAR,V6*240/todaybar,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),COLORLIGREEN;

蒙太奇

出不来想要的附图，可能与todaybar这个函数有关。与之对应的是通达信函数FROMOPEN，表示当前离开盘分钟数，金字塔好像找不到这个函数

技术006

换成OPENMINUTES(TIME);

蒙太奇

多谢！就是这个函数的问题。