易语言设置窗口慢慢出现的代码

.版本 2
.支持库 eAPI
.程序集 窗口程序集1
.程序集变量 透明度
.子程序 __启动窗口_创建完毕
设置窗口透明度 (_启动窗口.取窗口句柄 (), 透明度)
.子程序 _时钟1_周期事件
透明度 ＝ 透明度 ＋ 1
设置窗口透明度 (_启动窗口.取窗口句柄 (), 透明度)
.如果真 (透明度 ＝ 250)
  时钟1.时钟周期 ＝ 0
.如果真结束