当前页面位置: » 丰搜网 » 文档中心 » 详细内容
用flash制作计数器
小小计数器上的数字不断变化着，每用隔一段时间都会有增长，作为主页的拥有者，这种感觉真是难以形容。那么，能不能用flash的动画效果制作一个计数器，为我们带来更令人激动的情景呢？比如，当一个访问者进入你的主页浏览时，计数器不需要你刷新页面就会产生动态的变化，是正在滚动的计数器。
这个flash计数器是由两部分组成。一部分用于表现，使用flash制作，那么另一部分用来统计，使用asp制作。
一、计数器的flash部分
1.画出计数器中0～9的数字图像，每个数字都做成大小一致的一张小图，最好是矢量的。但因为计数器不用很大，所以位图的也可以。打开flash，然后把画好的图像逐一引入到你的flash里，根据每张图的大小和你需要的位数来确定movie大小。我的图是15×25的，需要5位，所以movie尺寸是75×25。然后insert→new symbol属性是graphic，起个名字叫作counternum。把数字图像从上到下按0～9的顺序排整齐。再创建一个叫roller的属性为move clip（简称mc）的symbol。在此mc里画一个文本框，用右键点出文本框的properties,在ariable里填digit，在options里，把后三项打钩，倒数第三项的text length为1，utlines用默认的就行了。
2.在symbol里加入两个新层，利用flash的mask（遮罩）功能。第一层里画一个和每个数字图像大小相同的实心矩形，目的是用它来遮罩数字串（counternum）。进入下面的一层，把存有数字串的symbol拉到这一层，把字串里的“0”套在那个矩形中，使它正好被矩形压住，隔50帧左右插入一个keyframe（关键帧），把数字串向上拉（计数器加1），直到“9”，和那个矩形重合。在这两帧中做一个motion。现在选择矩形层为遮罩并把时间轴延长到和下面那层一样长，拖动时间控制柄应该能看到0～9一个一个滚动出现了！回到刚才那个放文本框的层，时间轴和下面找平后在第一帧的action里加入stop。现在拖动时间控制柄，同时观察下面的mask，当“1”全部出现后，在此帧中加入action：
if (digit = ″1″)
stop
end if
后面的帧依次类推，mask里的数字是多少digit就等于多少，作用是使数字串产生滚动并停止于digit变量当时的值。在最后一帧的action里写入go to and play (2)。
3.回到scene,把刚刚做的那个mc重复拖到里面，一共5个，排整齐后应该正好把movie填满。
4.每个mc起一个instance name，比如依次起名m1～m5。再添加一个新层，第一帧里写入如下action：
load variables (″counter.txt″, 0)
set variable: ″/m1:digit″ = substring ( c, 1, 1 )
set variable: ″/m2:digit″ = substring ( c, 2, 1 )
set variable: ″/m3:digit″ = substring ( c, 3, 1 )
set variable: ″/m4:digit″ = substring ( c, 4, 1 )
set variable: ″/m5:digit″ = substring ( c, 5, 1 )
go to and play (″startover″)
第二帧的action里写：
load variables (″counter.txt″, 0)
第三帧的action里写：
if (/m5:digit<>substring(c,5,1))
set variable: ″/m1:digit″ = substring ( c, 1, 1 )
set variable: ″/m2:digit″ = substring ( c, 2, 1 )
set variable: ″/m3:digit″ = substring ( c, 3, 1 )
set variable: ″/m4:digit″ = substring ( c, 4, 1 )
set variable:″/m5:digit″ = substring ( c, 5, 1 )
go to and play (″startover″)
else
go to and play (″wait″)
end if
第四帧里的label记为“startover”,并写入以下action：
begin tell target (″/m1″)
play
end tell target
后面每隔几帧再创建一个keyframe,隔的这几帧就是每个数字位变化的间隔时间。在这帧里写入以下action：begin tell target (″/m2″)
play
end tell target
依次类推……直到最后一帧，也就是/m5所在的那帧后紧挨着建立一个keyframe，label记成“wait”，再隔几帧创建一个keyframe，action里写入go to and play (2)。所隔的帧数是每次判断“c”是否有变化所隔的时间。现在,计数器的flash部分也就完成了。
二、asp部分
打开html编辑器，在body里写入以下vbscript代码：
<％
whichfile=server.mappath(″count.txt″)
set fs=createobject(″scripting.filesystemobject″)
set thisfile=fs.opentextfile(whichfile,1,true)
if not thisfile.atendofstream then
line=thisfile.readline
else line=″c=1″
end if
visitors=mid(line,3)
thisfile.close
visitors=visitors＋1
set out=fs.createtextfile(whichfile)
out.writeline(″c=″＆visitors)
out.close
set fs=nothing
％>
好了，一个用flash制作的计数器就完成了。看完上面的介绍，你自己再用flash做一个在线人数统计就很容易了。现在上传到服务器上去吧，记住服务器可要支持asp哦！
