版权声明：本文为博主原创文章，未经博主允许不得转载。 https://blog.csdn.net/qq_33733970/article/details/85221634
.版本 2
.子程序 __启动窗口_创建完毕
输出调试文本 (“地址为:” ＋ 取重定向地址 (“http://dwz.cn/31ofr4”))
.子程序 取重定向地址, 文本型
.参数 url, 文本型
.局部变量 html, 文本型
.局部变量 header, 文本型
.局部变量 regex, 正则表达式类
html ＝ 到文本 (网页_访问 (url, , , , , , header, 真, , ))
regex.创建 (“Location:\s*(.+)”, header)
.如果真 (regex.取匹配数量 () ＞ 0)
返回 (regex.取子匹配文本 (1, 1))
.如果真结束
返回 (url)