5D艺术网首页
商城
|
资讯
|
作品
|
博客
|
教程
|
论坛
登录
注册
加为好友
发短消息
来自:
性别:秘密
最后登录:2007-04-12
http://tianhen.5d.cn/
首页
|
新闻
|
话题
|
博客
|
相册
|
艺术作品
|
社交关系
|
留言板
|
社交圈
2005/06/01 | director 学习——用面向对象的lingo制作不受tempo速率限制的动画
类别(多媒体开发)
|
评论
(0)
|
阅读(130)
|
发表于 12:59
[原创]
问题的提出:
DIRECTOR做动画有一个问题,动画的快慢受制于帧速率,如果设置TEMPO=1,所谓的动画将不堪设想!或许我们不会设置这样底的速率,但是如果目标机器运行速度非常慢,那么我们看到的动画也将是非常的慢,失去原有的状态!这一点,我想在flash里面也有这种情况!关于这个问题,国外有一篇文章也探讨过(
http://www.director-online.com/buildArticle.php?id=1153
),但是他的这个代码在我的机器上测试也不能很好的运作(我测试时是将TEMPO设置为1)。如何创建一个不受tempo速率限制的动画呢?
解决之道是,运用director中的定时器对象。用TIMEOUT而不用THE MILLISECONDS。
下面我用一个简单的实例来探讨这个问题。
一、the milliseconds 的局限
the milliseconds 只是一个系统变量,它不能直接激发一个动作,必须要通过某种机制来达到触发某个动作的目的。常用的就是在exitframe 或 prepareframe 句柄中获取它,通过比较,看是否超时,如果超时则调用某个句柄。典型的代码是:
property _timestart,_timelap(假定已经初始化)
on exitframe me
if the milliseconds - _timestart > _timelap then dosomething
exit
end
很明显,这种时间比较检测受到TEMPO的限制,如果TEMPO偏低,将会起不到预定的效果。
解决问题的方法之一是在 idle句柄里检测:
on idle
if the milliseconds - _timestart > _timelap then dosomething
exit
end
但idle是全局句柄,不方便在behavior中使用,另外,在idle里如果有大量处理代码,将加重系统负担,影响dir的运行效率。
所以用the milliseconds 并不是一个非常好的选择。
二、定时器对象TIMEOUT简介
在director mx 2004的文档里面是这样说的:“A timeout object is a script object that acts like a timer and sends a message when the timer expires。”翻译过来即,timeout 对象是一个脚本定时器对象,当设定的时间间隔过后就会发送一个消息(也可以调用一段程序),以设定的频率调用句柄。
在Movie Script 中使用timeout:
-----------------以下代码都在一个movie script中
on create_a_timer
new timeout("timename",100,#timerhandle)
end
on timerhandle
put "timername timer is on"
end
--如果要删除定时器,则要调用对象的forget()方法,如timeout("timename").forget()
如果要调用另外一个behavior script中的某个handle则要在new中加入一个参数指向这个behavior script的对象。例如:
on create_a_timer
p=script("behavior").new()
new timeout("timename",100,#timerhandle,p)
end
则定时器就会调用名为behavior的行为脚本中的timerhandle句柄。
了解至此,就可以很好地利用定时器对象构建动画了。
-----------------------------------------------
三、运用面向对象技术封装定时器对象动作
我们可以用面向对象的技术封装动画效果,然后用一个行为进行控制。
后面的实例动画就是用一个父脚本封装了Fade效果,可以淡入,可以淡出,还可以循环但如淡出,当然可以无限扩充。以下是代码:
property _blendstart,_blendend,_blendstep
property _On
property _spritenum
property TimerName
property _blendDir
on new me,_n
TimerIndex=0
_spritenum=_n
return me
end
on SayHello me,What
put What && "sprite" && _spritenum
end
on Blend_FadeIn
if _On=false then exit
if sprite(_spriteNum).blend=_blendEnd then
-- if _movie<>0 then timeout(TimerIndex).forget()
timeout(Timername).forget()
exit
end if
-- put _on
-----------------------------------------------
_blend=sprite(_spriteNum).blend
_blend=_blend+_blendStep
if _blend>_blendEnd then _blend=_blendEnd
sprite(_spriteNum).Blend=_blend
updatestage
-- put "Fade"
end
on Blend_FadeOut
if _On=false then exit
if sprite(_spriteNum).blend=_blendend then
-- if TimerIndex<>0 then timeout(TimerIndex).forget()
timeout(Timername).forget()
put "blendfadeout"
exit
end if
-- put _on
-----------------------------------------------
_blend=sprite(_spriteNum).blend
_blend=_blend-_blendStep
if _blend<_blendEnd then _blend=_blendEnd
sprite(_spriteNum).Blend=_blend
updatestage
end
on Blend_FadeCycle
if _On=false then exit
-------------------------
--第一个方向
_blend=sprite(_spriteNum).blend
-- put _blendDir
_blend=_blend+ _blendDir * _blendStep
-- put _blend
if _blendDir = 1 then
if _blend>max(_blendStart,_blendEnd) then
_blend=max(_blendStart,_blendEnd)
_blendDir=-1
end if
else
if _blend<min(_blendEnd,_blendStart) then
_blend=min(_blendEnd,_blendStart)
_blendDir=1
end if
end if
sprite(_spriteNum).blend=_blend
updatestage
end
------------------------------------------------------------------------------
------------------------------------------------------------------------------
on SetFade me,FadeStyle,_TimerName,Timerlap,blendstart,blendend,Blendstep,_bOn
_blendstart=blendstart
_blendend=blendend
_blendstep=Blendstep
_On=_bOn
TimerName=_TimerName
if _blendStart>_blendEnd then
_blendDir=-1
else
_blendDir=1
end if
sprite(_spriteNum).blend=_blendStart
case FadeStyle of
1:-------------------------FadeIn
t=new timeout(TimerName,TimerLap,#Blend_FadeIn,me)
TimerIndex=_movie.timeoutlist.count
2:-------------------------FadeOut
t=new timeout(TimerName,TimerLap,#Blend_FadeOut,me)
TimerIndex=_movie.timeoutlist.count
3:-------------------------FadeCycle
t=new timeout(TimerName,TimerLap,#Blend_FadeCycle,me)
TimerIndex=_movie.timeoutlist.count
end case
end
有了父脚本(相当于c++里面的类的声明)以后,就可以在各种场合下使用了。可以用行为包装这个效果,既可以让某个精灵具有这个效果,也可以制作闪烁按钮(鼠标放上去则闪烁)
Shockwave 动画
:
Shockwave 动画
:
0
评论
Comments
日志分类
首页
[18]
Ps习作
[2]
教育随想
[6]
多媒体开发
[5]
生活情趣
[4]
English
[1]