易语言简单图片轮播例程

.' 计次循环首 (pics [now].宽度, )
' pics [now].移动 (pics [now].左边 － 1, , , )
' pics [next].移动 (pics [next].左边 － 1, , , ) ' 向左移动一个像素
' ' 延迟 (1)'循环次数太多 延迟时间就会变得很长 下面有修改范例
.' 计次循环尾 ()

循环时now增加了1 要判断now是否超出数组成员数 超出或等于则变为1 不超出则继续增加。