改将的多媒体

--新的单击双击事件判断
property pFirstClickTime
on beginSprite me
pFirstClickTime = 0
end
on mouseup me
if the doubleclick then exit
starttimer
repeat while the timer<20
if the mousedown then
doubleclick()
exit
end if

end repeat
singleClick()
end
on singleClick me
go "single"
end
on doubleClick me
go "double"
end