商业软件banner轮播特效代码开源

打开指定网址 (打开地址配置 [到整数 (ThisImg.标记)]) 本代码已经把实用做到最大化。

ThisBox ＝ 取事件组件 ()
调试输出 (到整数 (ThisBox.标记))
轮播_置图片选中项 (到整数 (ThisBox.标记))

' 如果提示： 错误(10064): 发现死循环代码。（解决方法： 工具 - 系统配置 - 编译 - 取消勾选 “编译时是否检查死循环代码” 即可 ！）
.判断循环首 (真)
thisindex ＝ thisindex ＋ 1
.如果真 (thisindex ＞ maxlength)
thisindex ＝ 1
.如果真结束
原点_置原点选中项 (thisindex)
轮播_滑动效果 (0 － (thisindex － 1) × thisWidth)
程序_延时 (间隔时间)
.判断循环尾 ()