一个任你摆布的桌面小萝莉 - 精易论坛

窗口程序集名	保留	保留	备注
窗口程序集_启动窗口
变量名	类型	数组	备注
指令内容	文本型
人物标识	整数型

子程序名	返回值类型	公开	备注
__启动窗口_创建完毕

窗口_置透明颜色 (_启动窗口.取窗口句柄 (), #白色 )
窗口_置顶 (_启动窗口.取窗口句柄 (), 假)
动画指令站立 (“站立”, 1)
动画框1.添加监视键 (200, 37, 38, 39, 40, 32)
气球提示框1.弹出提示框 (_启动窗口.左边＋ 140, _启动窗口.顶边＋ 80, “辅助开启成功”, -1, 假)

子程序名	返回值类型	公开	备注
_动画时钟_周期事件

判断 (指令内容＝ “站立”)

如果真 (_启动窗口.左边＜ 0)

_启动窗口.左边＝ 0

判断 (指令内容＝ “右慢走”)

如果 (_启动窗口.左边＞ 1921)

_启动窗口.左边＝ -40

_启动窗口.左边＝ _启动窗口.左边＋ 5

判断 (指令内容＝ “左慢走”)

如果 (_启动窗口.左边＜ -40)

_启动窗口.左边＝ 1920

_启动窗口.左边＝ _启动窗口.左边－ 5

子程序名	返回值类型	公开	备注
动画指令站立
参数名	类型	参考	可空	数组	备注
参数	文本型
参数2	整数型

如果 (参数＝指令内容)

返回 ()

动画框1.销毁所有物体 ()

指令内容＝ “站立”

动画物体1.图片＝ #站立

人物标识＝动画框1.创建物体 (动画物体1, 0, 0, 真, )

如果真 (参数2 ＝ 2)

动画框1.图像翻转 (人物标识, 1)

子程序名	返回值类型	公开	备注
动画指令右慢走
参数名	类型	参考	可空	数组	备注
参数	文本型

如果 (参数＝指令内容)

返回 ()

动画框1.销毁所有物体 ()

指令内容＝ “右慢走”

动画物体1.图片＝ #走路右边

人物标识＝动画框1.创建物体 (动画物体1, 0, 0, 真, )

子程序名	返回值类型	公开	备注
动画指令左慢走
参数名	类型	参考	可空	数组	备注
参数	文本型

如果 (参数＝指令内容)

返回 ()

动画框1.销毁所有物体 ()

指令内容＝ “左慢走”

动画物体1.图片＝ #走路右边

人物标识＝动画框1.创建物体 (动画物体1, 0, 0, 真, )

动画框1.图像翻转 (人物标识, 1)

子程序名	返回值类型	公开	备注
_动画框1_监视键被按下
参数名	类型	参考	可空	数组	备注
键代码	整数型
功能键状态	整数型

判断 (键代码＝ 37)

动画指令左慢走 (“左慢走”)

判断 (键代码＝ 38)

判断 (键代码＝ 39)

动画指令右慢走 (“右慢走”)

判断 (键代码＝ 40)

判断 (键代码＝ 32)

如果 (指令内容＝ “右慢走”)

动画指令站立 (“站立”, 1)

动画指令站立 (“站立”, 2)

调试输出 (键代码)

i支持库列表	支持库注释
iext2	扩展界面支持库二
iext5	扩展界面支持库五
spec	特殊功能支持库

.版本 2<br />
.支持库 iext2<br />
.支持库 iext5<br />
.支持库 spec<br />
<br />
.程序集 窗口程序集_启动窗口<br />
.程序集变量 指令内容, 文本型<br />
.程序集变量 人物标识, 整数型<br />
<br />
.子程序 __启动窗口_创建完毕<br />
<br />
窗口_置透明颜色 (_启动窗口.取窗口句柄 (), #白色)<br />
窗口_置顶 (_启动窗口.取窗口句柄 (), 假)<br />
动画指令站立 (“站立”, 1)<br />
动画框1.添加监视键 (200, 37, 38, 39, 40, 32)<br />
气球提示框1.弹出提示框 (_启动窗口.左边 ＋ 140, _启动窗口.顶边 ＋ 80, “辅助开启成功”, -1, 假)<br />
<br />
<br />
.子程序 _动画时钟_周期事件<br />
<br />
.判断开始 (指令内容 ＝ “站立”)<br />
    .如果真 (_启动窗口.左边 ＜ 0)<br />
        _启动窗口.左边 ＝ 0<br />
<br />
    .如果真结束<br />
<br />
.判断 (指令内容 ＝ “右慢走”)<br />
    .如果 (_启动窗口.左边 ＞ 1921)<br />
        _启动窗口.左边 ＝ -40<br />
    .否则<br />
        _启动窗口.左边 ＝ _启动窗口.左边 ＋ 5<br />
    .如果结束<br />
<br />
.判断 (指令内容 ＝ “左慢走”)<br />
    .如果 (_启动窗口.左边 ＜ -40)<br />
        _启动窗口.左边 ＝ 1920<br />
    .否则<br />
        _启动窗口.左边 ＝ _启动窗口.左边 － 5<br />
    .如果结束<br />
<br />
.默认<br />
<br />
.判断结束<br />
<br />
<br />
.子程序 动画指令站立<br />
.参数 参数, 文本型<br />
.参数 参数2, 整数型<br />
<br />
.如果 (参数 ＝ 指令内容)<br />
    返回 ()<br />
.否则<br />
    动画框1.销毁所有物体 ()<br />
    指令内容 ＝ “站立”<br />
    动画物体1.图片 ＝ #站立<br />
    人物标识 ＝ 动画框1.创建物体 (动画物体1, 0, 0, 真, )<br />
    .如果真 (参数2 ＝ 2)<br />
        动画框1.图像翻转 (人物标识, 1)<br />
    .如果真结束<br />
<br />
.如果结束<br />
<br />
<br />
<br />
<br />
.子程序 动画指令右慢走<br />
.参数 参数, 文本型<br />
<br />
.如果 (参数 ＝ 指令内容)<br />
    返回 ()<br />
.否则<br />
    动画框1.销毁所有物体 ()<br />
    指令内容 ＝ “右慢走”<br />
    动画物体1.图片 ＝ #走路右边<br />
    人物标识 ＝ 动画框1.创建物体 (动画物体1, 0, 0, 真, )<br />
.如果结束<br />
<br />
<br />
<br />
.子程序 动画指令左慢走<br />
.参数 参数, 文本型<br />
<br />
.如果 (参数 ＝ 指令内容)<br />
    返回 ()<br />
.否则<br />
    动画框1.销毁所有物体 ()<br />
    指令内容 ＝ “左慢走”<br />
    动画物体1.图片 ＝ #走路右边<br />
    人物标识 ＝ 动画框1.创建物体 (动画物体1, 0, 0, 真, )<br />
    动画框1.图像翻转 (人物标识, 1)<br />
.如果结束<br />
<br />
<br />
.子程序 _动画框1_监视键被按下<br />
.参数 键代码, 整数型<br />
.参数 功能键状态, 整数型<br />
<br />
.判断开始 (键代码 ＝ 37)<br />
    动画指令左慢走 (“左慢走”)<br />
.判断 (键代码 ＝ 38)<br />
<br />
.判断 (键代码 ＝ 39)<br />
    动画指令右慢走 (“右慢走”)<br />
.判断 (键代码 ＝ 40)<br />
<br />
.判断 (键代码 ＝ 32)<br />
    .如果 (指令内容 ＝ “右慢走”)<br />
        动画指令站立 (“站立”, 1)<br />
    .否则<br />
        动画指令站立 (“站立”, 2)<br />
    .如果结束<br />
<br />
.默认<br />
<br />
.判断结束<br />
调试输出 (键代码)