主题：如何能将人体生物曲线图画好？
spray
[专家分：180] 发布于 2005-05-27 08:58:00
我用qb程序作出可以显示一年的人体生物曲线图像，智力曲线、情绪曲线、体力曲线分别是11、13、15.88个周期，但是——
1.和在坐标纸上手工绘的不一致；
2.叠加曲线显得峰区滞后几天；
3.叠加曲线有时偏离坐标轴，有时在坐标轴上，有时偏上、有时偏下，不知到底是怎么回事。
特请高手赐教，不胜感激。
回复列表 （共4个回复）
沙发
飞鸟12 [专家分：2830] 发布于 2005-05-27 12:15:00
有源程序没？
贴上看看
板凳
spray [专家分：180] 发布于 2005-05-28 12:45:00
我想发到您的邮箱或QQ,可以吗？
3 楼
ambitionhero [专家分：0] 发布于 2005-06-02 16:43:00
ambitionhero@yahoo.com.cn
4 楼
spray [专家分：180] 发布于 2005-06-22 06:18:00
read yy,mm,dd
data __,__,__
screen 12:cls
pi=3.14159:n=365.25:c=640/365
window screen(0,0)-(640,479)
paint(3,3),7
for u=1 to 13
M=M+w*c:w=31
if u=2 then w=28
if u=4 or u=6 or u=9 or u=11 then w=30
for i=-1 to 2
j=190+90*i
line(0,j)-(640,j),3-i
circle(M,j),2,4
for e=1 to 4
if u=3*e then circle(M,j),2,14
next e
for r=1 to 2
circle(M+10*c*r,j),1,0
next r,i,u
a=cint((2005-yy)*n)-(mm-1)*30-t-dd
t=mm\2-2
if mm=1 or mm=2 then t=mm\2
if mm=9 or mm=11 then t=(mm+1)/2-2
for x=i to 365 step .3
for i=-1 to 1
q=28-5*i:j=190+90*i
p=a mod q
z1=40*sin(2*pi/q*x+p)
z=z+z1/3
pset(c*x,j+z1),1
pset(c*x,370+z/10),10
next i,x
end
毛病不少，敬请斧正。
我来回复
您所在位置：