查看完整版本: 过三点画圆-请高手帮助

bajatje 2004-12-17 21:48

过三点画圆-请高手帮助

公式思路:过三个低点画圆弧
这个公式需要两条线。有时是这一条线满足过三点的条件,有时是另一条。。。
请高手改为只有一条线的
说明:由于纵轴和横轴的单位不同,图形看起来象椭圆

bajatje 2004-12-17 21:50

公式      

bajatje 2004-12-17 21:51

图           

股市骑兵00 2004-12-17 21:52

帮你顶,问题一看就很麻烦的,等那个高手出手。

hx817 2004-12-17 22:44

这样处理
[code]
z:zig(4,n);zf:=refx(ref(z,1)<ref(z,2) and z>ref(z,1),1);
tt:=BARSLAST(z=l);
tend:=DATACOUNT-tt[DATACOUNT-1]-1;
dd:=zf;
sd:=sum(dd,0);
sdd:=sd[datacount]-sd+1;
wx1:=barssince(sdd=k);
wx2:=barssince(sdd=k-1);
wx3:=barssince(sdd=k-2);
ry1:=hhv((wx1=0)*L,0);
ry2:=hhv((wx2=0)*L,0);
ry3:=hhv((wx3=0)*L,0);
rx2:=hhv((wx2=0)*wx1,wx1+1);
rx3:=hhv((wx3=0)*wx1,wx1+1);
x2:=rx2[datacount];
x3:=rx3[datacount];
y1:=ry1[datacount];
y2:=(ry2[datacount]-ry1[datacount]);
y3:=(ry3[datacount]-ry1[datacount]);
xy:=POW(x2,2)+POW(y2,2);
e:=(x3*xy/x2-(x3*x3+y3*y3))/(y3-x3*y2/x2);
d:=-(y2*e+xy)/x2;
y1:=POW((d*d+e*e)/4-POW((wx1+d/2),2),0.5);
y2:=-POW((d*d+e*e)/4-POW((wx1+d/2),2),0.5);
c1:=ref(L,wx1)-ref(y1,wx1);
up:=y1+c1;
c2:=ref(L,wx1)+ref(y1,wx1);
dw:=y2+c2;

out1:=abs(z[tend]-up[tend])<0.01;
out2:=abs(z[tend]-dw[tend])<0.01;
out:if(out1,up,if(out2,dw,0)),COLORMAGENTA;
[/code]

bajatje 2004-12-17 23:20

谢谢版主!

股市骑兵00 2004-12-18 00:35

谢谢hx817老师!

zxc 2004-12-18 09:55

实在敬佩这么难的命题也能解决。一直想以某一点为圆心画半径=R的整个圆线,可始终不行。您有空试一试好吗?

lhl311 2004-12-18 11:30

敬佩hx817老师!

敬佩hx817老师!
高手!

hx817 2004-12-18 11:42

[quote][i]lhl311[/i] 于 2004-12-18 11:30 写道:
敬佩hx817老师!
高手! [/quote]

高手是 bajatje ,我只是帮他过滤了一个条件

整个公式完成了飞狐画线(三点画线)的自动功能

PBQY1898 2004-12-19 06:23

谢谢老师!

sangxg 2005-1-5 14:28

厉害。啊啊

林花春红 2005-1-7 20:58

厉害。啊啊

LeiBin 2005-1-7 23:25

请 bajatje 讲讲"过三点画圆"的使用方法吧。

789ww 2005-1-9 14:30

谢谢!!!

下雨 2005-2-20 16:44

谢谢!!!!!!!

股海/淘金 2005-2-21 12:48

ok

zf 2005-2-23 13:21

谢谢

king 2005-2-25 20:10

谢谢

欣儿 2005-4-2 20:41

谢谢!

泡哥 2005-4-4 08:06

佩服

zwaaa 2005-4-11 22:53

不能通过

绿色通道 2005-5-27 17:45

请 bajatje 讲讲"过三点画圆"的使用方法吧。

LIONLY 2005-5-29 17:15

佩服

peter109 2005-7-7 18:34

登泰山而小天下
咱一眼望去滿是山
不會 也要頂

红枫叶 2005-7-29 19:41

不能通过啊。

糊涂难道 2005-7-30 14:33

hx817老师!
高手!

淡紫 2005-10-12 19:22

z:zig(4,n);z--未定义标识符~
哪位老师帮忙解决~谢谢~

wangez 2005-10-22 20:26

不能通过啊。

wangez 2005-10-24 17:43

谢谢!

sxsy 2006-10-15 16:16

谢谢!

印泥 2007-12-25 22:09

n是多少?

页: [1]
查看完整版本: 过三点画圆-请高手帮助