|
发表于 2012-8-24 15:21:44
|
显示全部楼层
河北省秦皇岛市
.版本 2
.程序集 程序集1
.程序集变量 文件名, 文本型
.子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
_临时子程序 () ' 在初始化代码执行完毕后调用测试代码
返回 (0) ' 可以根据您的需要返回任意数值
.子程序 _临时子程序
' 本名称子程序用作测试程序用,仅在开发及调试环境中有效,编译发布程序前将被系统自动清空,请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
.子程序 加载皮肤, , 公开
.参数 皮肤类型, 整数型, 可空, 一共25种,从1开始;
.如果真 (文件是否存在 (“C:\WINDOWS\system32\jedata.dll”) = 假)
写到文件 (“C:\WINDOWS\system32\jedata.dll”, #gz36)
.如果真结束
皮肤类型 (皮肤类型)
.子程序 卸载皮肤, , 公开
_皮肤卸载 ()
.子程序 皮肤_颜色调整, , 公开, 调整所用皮肤的颜色,可以直接填入数值
.参数 色调, 整数型, 可空, 取值范围0-255,为空则不改变
.参数 饱和度, 整数型, 可空, 取值范围0-255,为空则不改变
.参数 亮度, 整数型, 可空, 取值范围0-255,为空则不改变
_皮肤调整颜色 (色调, 饱和度, 亮度)
.子程序 皮肤类型
.参数 类型, 整数型, 可空
文件名 = 取运行目录 () + “/xiaohu.skn”
.如果真 (类型 = 0)
类型 = 25
.如果真结束
.判断开始 (类型 = 1)
写到文件 (文件名, #_001Adamant)
皮肤加载 (文件名, “”)
.判断 (类型 = 2)
写到文件 (文件名, #_002Asus)
皮肤加载 (文件名, “”)
.判断 (类型 = 3)
写到文件 (文件名, #_003Aero)
皮肤加载 (文件名, “”)
.判断 (类型 = 4)
写到文件 (文件名, #_004Black)
皮肤加载 (文件名, “”)
.判断 (类型 = 5)
写到文件 (文件名, #_005MSN)
皮肤加载 (文件名, “”)
.判断 (类型 = 6)
写到文件 (文件名, #_006QQ2008)
皮肤加载 (文件名, “”)
.判断 (类型 = 7)
写到文件 (文件名, #_007QQ影音)
皮肤加载 (文件名, “”)
.判断 (类型 = 8)
写到文件 (文件名, #_008QQGaMe)
皮肤加载 (文件名, “”)
.判断 (类型 = 9)
写到文件 (文件名, #_009QQ2009)
皮肤加载 (文件名, “”)
.判断 (类型 = 10)
写到文件 (文件名, #_010QQ2009_黑色)
皮肤加载 (文件名, “”)
.判断 (类型 = 11)
写到文件 (文件名, #_011QQ2009_宽_底边)
皮肤加载 (文件名, “”)
.判断 (类型 = 12)
写到文件 (文件名, #_012QQ2009_窄_底边)
皮肤加载 (文件名, “”)
.判断 (类型 = 13)
写到文件 (文件名, #_013Dogmax)
皮肤加载 (文件名, “”)
.判断 (类型 = 14)
写到文件 (文件名, #_014Longhorn)
皮肤加载 (文件名, “”)
.判断 (类型 = 15)
写到文件 (文件名, #_015Itunes)
皮肤加载 (文件名, “”)
.判断 (类型 = 16)
写到文件 (文件名, #_016WhiteFire)
皮肤加载 (文件名, “”)
.判断 (类型 = 17)
写到文件 (文件名, #_017Storm)
皮肤加载 (文件名, “”)
.判断 (类型 = 18)
写到文件 (文件名, #_018ShanMeng窄版)
皮肤加载 (文件名, “”)
.判断 (类型 = 19)
写到文件 (文件名, #_019office2007)
皮肤加载 (文件名, “”)
.判断 (类型 = 20)
写到文件 (文件名, #_020炫绿)
皮肤加载 (文件名, “”)
.判断 (类型 = 21)
写到文件 (文件名, #_021积木)
皮肤加载 (文件名, “”)
.判断 (类型 = 22)
写到文件 (文件名, #_022中国风)
皮肤加载 (文件名, “”)
.判断 (类型 = 23)
写到文件 (文件名, #_023纯净皮肤)
皮肤加载 (文件名, “”)
.判断 (类型 = 24)
写到文件 (文件名, #_024悬浮镂空)
皮肤加载 (文件名, “”)
.判断 (类型 = 25)
写到文件 (文件名, #_025彗星小助手深蓝色)
皮肤加载 (文件名, “”)
.默认
.判断结束
|
|