系统数 = 到整数 (超级列表框1.取标题 (索引, 2))
超级列表框1.置标题 (索引, 3, 到文本 (到整数 (超级列表框1.取标题 (索引, 3)) + 1))
退出许可区 (许可证)
.计次循环首 (系统数, i) ' 加载所有需要的系统
url = 子文本替换 (网站, “#系统数”, 到文本 (i), , , 真)
HTTP读文件 (url)
延时 (50)
.计次循环尾 ()
系统数 = 到整数 (超级列表框1.取标题 (索引, 2))
超级列表框1.置标题 (索引, 3, 到文本 (到整数 (超级列表框1.取标题 (索引, 3)) + 1))
退出许可区 (许可证)
.计次循环首 (系统数, i) ' 加载所有需要的系统
url = 子文本替换 (网站, “#系统数”, 到文本 (i), , , 真)
HTTP读文件 (url)
延时 (50)
.计次循环尾 ()