{黄金分割1}
高:=DYNAINFO(3)*1.1;
低:CONST(DYNAINFO(3)),COLORRED;
H1:CONST(低+(高-低)*0.191)DOTLINE,COLORWHITE;
H2:CONST(低+(高-低)*0.382),DOTLINE,COLORBLUE;
H3:CONST(低+(高-低)*0.5),COLORYELLOW;
H4:CONST(低+(高-低)*0.618),DOTLINE,COLORGREEN;
H5:CONST(低+(高-低)*0.764),DOTLINE,COLORMAGENTA;
LL:=DYNAINFO(3)*0.9;
ZUO:=DYNAINFO(3);
L1:CONST(ZUO-(ZUO-LL)*0.191)DOTLINE,COLORWHITE;
L2:CONST(ZUO-(ZUO-LL)*0.382),DOTLINE,COLORBLUE;
L3:CONST(ZUO-(ZUO-LL)*0.5),COLORYELLOW;
L4:CONST(ZUO-(ZUO-LL)*0.618),DOTLINE,COLORGREEN;
L5:CONST(ZUO-(ZUO-LL)*0.764),DOTLINE,COLORMAGENTA;
下面是简化后的公式源码
{黄金分割2}
高:=DYNAINFO(3)*1.1;
低:=DYNAINFO(3);
H1:CONST(低 *1.0191);
H2:CONST(低*1.0382);
H3:CONST(低*1.05);
H4:CONST(低*1.0618);
H5:CONST(低*1.0764);