易语言实现同屏粒子特效源码

资源介绍：

源码结合易语gif动画言EXDUI模块，仿jQuery实现同屏粒子特效。

@sanye

.版本 2

.子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码

应用程序全局初始化 ()
置随机数种子 ()
' //-------------------
.如果真 (主窗口_创建 () ＝ 假)
    返回 (0)
.如果真结束
' //-------------------
主窗口_创建子控件 ()
全局_初始化 (_LoadLibrary (取指针_字节集型 (#exdui), 0, 0), 真, #Theme, , {  }, , , , #文本渲染模式_ClearType文本和hinting技术, , #Cursor, #Cursor)
M_DUIWin.事件_背景重画 (&Win_Redraw)
M_DUIWin.挂接窗口 (, G_hWndMain, , , , #白色, #标题栏_隐藏, 255, #底图方式_拉伸, , 假, {  }, 0, 真)
M_Cloud.创建 (G_hWndMain, 0, 0, #程序_主窗口_宽度 － 9, #程序_主窗口_高度 － 9)
M_DUIWin.置进入特效 (0)
主窗口_消息循环 ()
' ShowWindow (G_hWndMain, #SW_SHOW)
_临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
返回 (0)  ' 可以根据您的需要返回任意数值