小鸡的行宫

sort property list by value

Wed, 07 May 2008 15:53:57 +0800

on SortpList pList

count =pList.count

valueList = []
repeat with i = 1 to count

value = pList[i]
valueList.append(value)

end repeat

valueList.sort()
tmpList = [:]
repeat with i = 1 to count

value = valueList[i]
name = pList.getone(value)
setaProp tmpList, name, value
pList.deleteone(value)
end repeat

return tmpList
end

Director 11 will be announcing on 08 February 19th

Thu, 14 Feb 2008 16:30:53 +0800

Official notification from Adobe that they will be announcing Director at GDC 08 February 19th in San Francisco. Countdown timer on Magicgate site. I will either be there or will have an official telephone press conference with Adobe. Either way, you will hear it right from Adobe about the new release.

Director外部设置movie变量参数

Wed, 28 Mar 2007 19:09:24 +0800

作用:可以外部设置一些Director里面的变量,有一些参数客户就可以自己修改了
比如超时时间,背景音乐音量等等

on preparemovie me
init_globals()
load_cfg()

end

on init_globals me
global gTimeOutLength
gTimeOutLength=10*60

end

on load_cfg

Windows 系统命令行程序一览

Wed, 28 Feb 2007 21:13:46 +0800

这些都可以直接使用director的open命令来打开来实现和windows系统的交互
比如: open "winver"

winver---------检查Windows版本
wmimgmt.msc----打开windows管理体系结构
wupdmgr--------windows更新程序
wscript--------windows脚本宿主设置
write----------写字板
winmsd---------系统信息
wiaacmgr-------扫描仪和照相机向导
winchat--------XP自带局域网聊天

mem.exe--------显示内存使用情况
Msconfig.exe---系统配置实用程序
mplayer2-------简易widnows media player
mspaint--------画图板
mstsc----------远程桌面连接

几条实用的Lingo语句

Fri, 19 Jan 2007 13:13:51 +0800

open a miaw
window().new("playbar.dir").open()

control miaw and stage's visible
_player.window[1].visible=0 --stage
_player.window[2].visible=1 --a opened miaw

move a miaw to front
_player.window[2].moveToFront()

use miaw button to control stage's button,and use tell stage handle

on mouseUp me
tell the stage
_movie.sendSprite(12, #mouseup)
end tell
end
on mousedown me

批量更改文件尺寸

Thu, 18 Jan 2007 17:59:01 +0800

做大规模场景的虚拟现实经常会遇到的问题
有些地方文件尺寸不需要很大,但做模型的人比较习惯用512以上的贴图尺寸
但在虚拟场景里面一版用不到
director里面的sharpexport和可以输出jpg图片
我就做了一个小工具,可以更改图片尺寸的
不过这里只适合用在大规模场景建模实时浏览的贴图
处理速度也ok

主要代码:
global gJpgFileNameList
on getfile me
i=1
gJpgFileNameList=[]
path =the moviepath
repeat while getNthFileNameinFolder(path, i)<>""
str=".jpg"
filename=getNthFileNameinFolder(path, i)

动态载入数据库中lingo代码

Wed, 13 Dec 2006 21:58:59 +0800

Lingo代码：

property pNetId,pNetDone
property pNettext
on beginsprite me
  url="http://ccloveaa.com/test/"
  pNetId=_movie.getNetText(url&"getlingo1.asp")
  pDone=0
end

用程序自动建立score里面的sprite

Tue, 05 Dec 2006 08:20:29 +0800

on animBall(numberOfFrames)
  _movie.beginRecording()
  sprite(1).member=member(2)
  repeat with i =1 to 5
    _movie.insertFrame()
    end repeat

用budapi实现激活窗口

Tue, 05 Dec 2006 07:51:02 +0800

需要插件支持
以前写的代码,本来为了激活一个自运行的窗口
后来区那边之后才发现,原来是客户机上面杀毒软件的影响

动态改变shockwave尺寸

Mon, 04 Dec 2006 20:21:07 +0800

html部分代码:

aaa

codebase="http://download.macro