程序窗口渐隐渐显特效

.子程序 置窗口透明度内部, , , 0-255
.参数 hwnd
.参数 透明度, , , 0-255
.局部变量 rtn, 整数型

rtn ＝ winapi (, “GetWindowLongA”, 1, hwnd, -20) ' 这里c++方式调用api
rtn ＝ 位或 (rtn, 524288)
winapi (, “SetWindowLongA”, 1, hwnd, -20, rtn) ' 这里c++方式调用api
winapi (, “SetLayeredWindowAttributes”, 1, hwnd, 0, 透明度, 2) ' 这里c++方式调用api

.子程序 窗口渐隐渐现, , 公开
.参数 窗口句柄, , , hwnd
.参数 时间, , , 速度
.局部变量 m, 整数型

m ＝ 线程启动 (&临时内部程序, 窗口句柄, 时间) ' 这里启用多线程多参数