|
|
马上注册，结交更多同行朋友，交流，分享，学习。
您需要 登录 才可以下载或查看，没有帐号？注册
x
用以下的代码 测量重量 在有多个体的建模环境中测量任意一个体出来结果 与自带的结果不同 请高手更改下 还有一个重要的是 怎样做到可以一下选多个 算出来重量 谢谢！
以下是8588 大侠的源代码
entity/body
number/n(42),density,d
string/pa(132),pb(132),pc(132)
&fulldt=2
pa=date
pb=substr(pa,7,4)
pc=substr(pa,1,5)
pa=pb+'-'+pc
if/pa>='2007-10-01',jump/messg1:
density=1
z=&decpl
&decpl=2
aa:
param/'请输入密度...编写人:⑧⑧⑤⑧',$
'密度(克/每立方厘米)',density,rsp
jump/aa:,end:,,rsp
bb:
mask/70
ident/'请选择。。。编写人:⑧⑧⑤⑧',body,rsp
jump/bb:,end:,,rsp
&sdens(body)=density
anlsis/solid,body,gcm,n
d=n(3)*1000
if/d>=1000,jump/cc:
messg/'该物体的重量为'+fstr(d)+'克'
jump/end:
cc:
messg/'该物体的重量为'+fstr(n(3))+'千克'
end:
&decpl=z
halt
messg1:
messg/'不好意思您的试用期已到，请联系作者⑧⑧⑤⑧！' |
|
发表于 2011-1-5 22:32:04
QQ好友和群
QQ空间
腾讯微博
腾讯朋友
收藏
淘帖
赞一下！
楼主