五、加一个球进3D世界中
样本影片使用了创建球体的行为，被附加于Create Sphere文本演员上，点击文本演员就加了一个球体进3D世界。
创建球体的行为的Lingo脚本如下：
on mouseUp(me)
if voidP( sprite(1).member.model(‘‘newSphere‘‘)) then
tSprite = sprite(1)
tMember = tSprite.member
tTempModel = tMember.newModel(‘‘newSphere‘‘)
tSphereResource = tMember.newModelResource \
(‘‘newSphereResource‘‘, #sphere)
tSphereResource.radius = 60
tTempModel.resource = tSphereResource
tTempModel.parent = tMember.group(‘‘world‘‘)
tTempModel.addToWorld()
tCenterPoint = point(sprite(1).width/2, sprite(1).height/2)
tPointToVector = tSprite.camera.spriteSpaceToWorldSpace \
(tCenterPoint - point(tSprite.left,tSprite.top))
tMember.model (tTempModel.name).transform.position = \
tPointToVector
go next
end if
end
这个脚本是这样工作的：
1、脚本创建一个新的模型，叫“tTempModel”。
2、然后创建一个新的球体模型的资源叫“tSphereResource”。由于球体是原始的基本的形状，所以可以在空的3D世界凭空创建它。
3、然后脚本添加一个定义半径长度的尺寸给模形资源。
4、这个新创建的球体模型被指定用于叫“tTempModel”的球体模型。
5、这个模型被指定为这个3D世界的子对象。
6、把模型加进世界中。
7、脚本给模型一个在3D世界里的位置。
留意，脚本并没有创建灯光。然而，3D世界里的灯光已被属性检查员打开了。
|
