.版本 2 .支持库 EDataStructure .支持库 spec .子程序 子程序1, 逻辑型 .局部变量 局_句柄, 整数型 .局部变量 详细信息, 精易_详细信息, , "0" .局部变量 i, 整数型 .局部变量 局_逻辑值, 逻辑型 .局部变量 局_收款文本, 文本型 .局部变量 正则, 正则表达式类 .局部变量 局_时间, 日期时间型 .局部变量 局_开始获取, 逻辑型 .局部变量 局_逻辑值_返回, 逻辑型 局_句柄 ＝ 窗口_取句柄 (, , “ChatWnd”, “微信支付”) .如果真 (局_句柄 ＝ 0) 信息框 (“错误 微信支付 界面未单独打开!”, 0, , ) 返回 (假) .如果真结束 自绘窗口_解析 (局_句柄, , , , 详细信息) .计次循环首 (取数组成员数 (详细信息), i) .如果真 (文本_是否为数字 (取文本右边 (详细信息 [i].控件名称, 2)) ＝ 真) ' 正则.创建 (, , , , , ) ' 调试输出 (, , 详细信息 [i].控件名称) 正则.创建 (“(202\d)年(\d+)月(\d+)日 (\d+):(\d+)|(\d+):(\d+)”, 详细信息 [i].控件名称, , 真, 真, 真) ' 调试输出 (正则.取子匹配文本 (1, 1, ), 正则.取子匹配文本 (1, 2, ), 正则.取子匹配文本 (1, 3, ), 正则.取子匹配文本 (1, 4, ), 正则.取子匹配文本 (1, 5, ), 正则.取子匹配文本 (1, 6, ), 正则.取子匹配文本 (1, 7, )) 局_时间 ＝ 取现行时间 () .判断开始 (正则.取子匹配文本 (1, 6, ) ≠ “”) 局_开始获取 ＝ 真 .判断 (取年份 (局_时间) ＝ 到整数 (正则.取子匹配文本 (1, 1, )) 且 取月份 (局_时间) ＝ 到整数 (正则.取子匹配文本 (1, 2, )) 且 取日 (局_时间) ＝ 到整数 (正则.取子匹配文本 (1, 3, ))) 局_开始获取 ＝ 真 .默认 .判断结束 ' 本源码来自三叶资源网(www.sanye.cx) .如果真结束 .如果真 (局_开始获取 ＝ 真) .如果真 (详细信息 [i].控件名称 ＝ “收款到账通知”) 局_收款文本 ＝ “” 局_逻辑值 ＝ 真 .如果真结束 .如果真 (详细信息 [i].控件名称 ＝ “收款小账本”) .如果真 (节点.取逻辑值 (局_收款文本, 局_逻辑值_返回) ＝ 假) 节点.加入属性 (局_收款文本, 真) 调试输出 (局_收款文本) .如果真结束 局_逻辑值 ＝ 假 局_收款文本 ＝ “” .如果真结束 .如果真 (局_逻辑值 ＝ 真) .判断开始 (详细信息 [i].控件值 ＝ 详细信息 [i].控件名称 且 详细信息 [i].控件名称 ≠ “”) 局_收款文本 ＝ 局_收款文本 ＋ 详细信息 [i].控件名称 ＋ “ ” ' 本源码来自三叶资源网(www.sanye.cx) .判断 (详细信息 [i].控件值 ＝ “” 且 取文本左边 (详细信息 [i].控件名称, 2) ＝ “￥”) 局_收款文本 ＝ 局_收款文本 ＋ 详细信息 [i].控件名称 ＋ “ ” .默认 .判断结束 .如果真结束 .如果真结束 ' 调试输出 (详细信息 [i].控件值, 详细信息 [i].控件名称, , , i) .计次循环尾 () 调试输出 (“完成”, , , 局_开始获取) 返回 (真)