7.6 鼠标控制制作

鼠标控制的原理通过检测鼠标的坐标位置，然后将这个坐标值通过变量制定给被控制的精灵，达到修改精灵位置的目的。最终所达到效果就是在屏幕上单击鼠标，从而受控制的精灵马上移动到鼠标的位置上。

鼠标控制制作操作步骤如下：

(1) 进入Director 8.5。执行Modify→Movie→Properties命令，在舞台属性检查器对话框中将电影舞台的大小设置为400×300，然后将电影背景颜色设置为白色，如图7-51所示。

(2) 执行File→Import命令，调入本书光盘中的9930和ning文件，然后将Internal Cast窗口中的演员拖动到舞台中，然后将ning文件的颜色效果设置为Lightest类型，如图7-52所示。

(3) 执行Window→Script命令，在弹出的Script窗口输入以下Lingo语句，如图7-53所示。

global oldx

global oldy

on mouseup

curx=the mouseh

cury=the mousev

set the loch of sprite 2 to curx

set the locv of sprite 2 to cury

oldx=curx

oldy=cury

end

on startmovie

oldx=the loch of sprite 2

oldy=the locv of sprite 2

end

说明：

首先定义了两个全局变量oldx和oldy，它们用于存放精灵的坐标值。程序中包含两个句柄，其中on startmovie句柄用精灵的loch和locv属性得到精灵的坐标值，并制定给两个全局变量：在on mouseup句柄中首先用mouseh和mousev两个命令将鼠标的坐标值制定给局部变量curx和cury，然后将这个局部变量中保存的坐标数值传递给精灵的loch和locv属性，实现了用鼠标位置修改精灵位置的目的。最后将oldx和oldy两个全局变量重新赋值，因为精灵的坐标位置改变了。

(4) 保存电影文件，执行Window→Inspectors→Property命令，在控制面板中播放电影，如图7-54所示。