画框播放完GIF载入窗口例程

.版本 2 .支持库 iext2 .程序集 窗口程序集1 .程序集变量 id, 整数型 .子程序 __启动窗口_创建完毕 id ＝ 动画框1.创建物体 (动画物体1, 0, 0, , ) 动画框1.播放动画 (id, 1, , , ) .子程序 _动画框1_动画播放完毕 .参数 物体标识值, 整数型 .判断开始 (物体标识值 ＝ id) _启动窗口.可视 ＝ 假 载入 (窗口1, , 真) .默认 .判断结束