web封包拦截、非网截无模块

.如果真 (选择框1.选中 ＝ 假)
返回 (0)
.如果真结束
数据 ＝ 指针到文本 (指针)
' 套接字 ＝ 套接字
' 封包类型 ＝ 2
' 封包长度 ＝ 长度
' 封包编号 ＝ 取记录数 ()
' 封包数据 ＝ 指针到字节集 (指针, 长度)
' 封包简要 ＝ 取文本左边 (到文本 (封包.封包数据), 50)
加入列表 (“返回”, 数据)
返回 (0) ' 0为放行，-1为拦截

表项索引 ＝ 超级列表框_封包列表.插入表项 (, , , , , )
超级列表框_封包列表.置标题 (表项索引, 1, 到文本 (超级列表框_封包列表.取表项数 ()))
超级列表框_封包列表.置标题 (表项索引, 2, 取当前时间 ())
超级列表框_封包列表.置标题 (表项索引, 3, “POST”)
超级列表框_封包列表.置标题 (表项索引, 4, 封包内容)