万卷书   首页 > 电脑书籍 > Director > ShockWave 3D 制作系列教程之四
 
5、SCRIPT内容如下:


property pscene,pboat,meter

on beginsprite me

--定义场景

pscene=member("scene")

--重设场景

pscene.resetworld()

--定义小船

pboat=pscene.model("boat")

--把两台摄像机捆绑在小船上

pboat.addchild(pscene.camera[1])

pboat.addchild(pscene.camera[3])

meter=0

--设置字体大小

member("show").fontsize=40

--设置字体颜色

member("show").forecolor=0

--显示初始文字

member("show").text="你已经走了0米"

--把文字域作为一个新的贴图材质

show = pscene.newTexture("showtxt", #fromCastMember, member("show"))

--对两个摄像机贴图

member("scene").camera[1].addOverlay(show, point(0, 20), 0)

member("scene").camera[3].addOverlay(show, point(0, 20), 0)

end

on exitFrame me

--当按下方向键"上"时

if keyPressed(125) then

--控制小船移动

pboat.translate(2,0,0)

--计算里程

walk

end if

--当按下方向键"下"时

if keyPressed(126) then

pboat.translate(-2,0,0)

walk

end if

--当按下方向键"左"时

if keyPressed(123) then pboat.rotate(0,0,2)

--当按下方向键"右"时

if keyPressed(124) then pboat.rotate(0,0,-2)

--当按下"1"或"2"时切换摄像机

if keypressed("1") then sprite(1).camera=pscene.camera[1]

if keypressed("2") then sprite(1).camera=pscene.camera[3]

go to the frame

end

on walk

--计算走过的距离

meter=meter+1

--显示文字

member("show").text="你已经走了" & string(meter/10) & "米"

--更新材质贴图

pscene.texture("showtxt").member=member("show")

--更新摄像机贴图

sprite(1).camera.overlay[1].source=pscene.texture("showtxt")

end
 
上一页