车速拍Sign算法开源源码

.版本 2

.程序集 程序集_启动窗口

.子程序 __启动窗口_创建完毕



.子程序 车速拍_发送短信, 文本型
.参数 参数_登录账户, 文本型
.局部变量 局部_Url, 文本型
.局部变量 局部_Time_1, 文本型
.局部变量 局部_Time_2, 文本型
.局部变量 局部_Sign_1_原文, 文本型
.局部变量 局部_Sign_1_结果, 文本型
.局部变量 局部_Sign_2_原文, 文本型
.局部变量 局部_Sign_2_结果, 文本型
.局部变量 局部_请求头部, 文本型
.局部变量 局部_提交数据, 文本型
.局部变量 局部_提交长度, 文本型
.局部变量 局部_访问结果, 文本型
.局部变量 局部_网页工具, WinHttpW

局部_Time_1 ＝ 时间戳_取当前_毫秒 ()
局部_Time_2 ＝ 时间戳_取当前_毫秒 ()

局部_Sign_1_原文 ＝ “customerId=” ＋ #常量_customerId ＋ “deviceId=” ＋ #常量_deviceId ＋ “dpi=1.8000001locationCityId=” ＋ #常量_locationCityId ＋ “model=” ＋ #常量_model ＋ “net=wifiosv=5.1.1phone=” ＋ 参数_登录账户 ＋ “platform=” ＋ #常量_platform ＋ “screenWH=1080X1920selectCityId=-1selectDistrictId=selectSiteId=versionId=” ＋ #常量_versionId ＋ #常量_Key
局部_Sign_1_结果 ＝ 取数据摘要_MD5 (到字节集 (局部_Sign_1_原文))

局部_Sign_2_原文 ＝ 局部_Sign_1_结果 ＋ #常量_Key
局部_Sign_2_结果 ＝ 取数据摘要_MD5 (到字节集 (局部_Sign_2_原文))

局部_Url ＝ “https://api.chesupai.cn/apicenter/user/sendPhoneCode?platform=” ＋ #常量_platform ＋ “&screenWH=1080X1920&selectSiteId=&osv=5.1.1&deviceId=” ＋ #常量_deviceId ＋ “&selectDistrictId=&dpi=1.8000001&customerId=” ＋ #常量_customerId ＋ “&versionId=” ＋ #常量_versionId ＋ “&selectCityId=-1&net=wifi&locationCityId=” ＋ #常量_locationCityId ＋ “&model=” ＋ #常量_model ＋ “&sign=” ＋ 局部_Sign_2_结果

局部_提交数据 ＝ “phone=” ＋ 参数_登录账户
局部_提交长度 ＝ 到文本 (取文本长度 (局部_提交数据))

局部_请求头部 ＝ NullStr
局部_请求头部 ＝ 局部_请求头部 ＋ “Cache-Control: no-store” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “X-Ganji-Agency: self” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “GjData-Version: 1.0” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “contentformat: json2” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “versionId: ” ＋ #常量_versionId ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “X-Ganji-CustomerId: ” ＋ #常量_customerId ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “X-Ganji-VersionId: ” ＋ #常量_versionId ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “CustomerId: ” ＋ #常量_customerId ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “model: ” ＋ #常量_model ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “security_version: 1.0.0” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “requestId: ” ＋ #常量_deviceId ＋ “|” ＋ 局部_Time_1 ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “X-Timestamp: ” ＋ 局部_Time_2 ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “Content-Type: application/x-www-form-urlencoded” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “Content-Length: ” ＋ 局部_提交长度 ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “Host: api.chesupai.cn” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “Connection: Keep-Alive” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “User-Agent: okhttp/3.9.1” ＋ #换行符 ＋ #换行符

局部_网页工具.Open (“POST”, 局部_Url)
局部_网页工具.SetRequestHeaders (局部_请求头部)
局部_网页工具.Send (局部_提交数据)
局部_访问结果 ＝ 局部_网页工具.GetResponseTextU2A ()
局部_网页工具.Rest ()
返回 (局部_访问结果)

.子程序 车速拍_提交短信, 文本型
.参数 参数_登录账户, 文本型
.参数 参数_验证代码, 文本型
.局部变量 局部_Url, 文本型
.局部变量 局部_Time_1, 文本型
.局部变量 局部_Time_2, 文本型
.局部变量 局部_Sign_1_原文, 文本型
.局部变量 局部_Sign_1_结果, 文本型
.局部变量 局部_Sign_2_原文, 文本型
.局部变量 局部_Sign_2_结果, 文本型
.局部变量 局部_请求头部, 文本型
.局部变量 局部_提交数据, 文本型
.局部变量 局部_提交长度, 文本型
.局部变量 局部_访问结果, 文本型
.局部变量 局部_网页工具, WinHttpW

局部_Time_1 ＝ 时间戳_取当前_毫秒 ()
局部_Time_2 ＝ 时间戳_取当前_毫秒 ()

局部_Sign_1_原文 ＝ “ca_city=” ＋ #常量_locationCityId ＋ “code=” ＋ 参数_验证代码 ＋ “customerId=” ＋ #常量_customerId ＋ “deviceId=” ＋ #常量_deviceId ＋ “dpi=1.8000001isAgree=1lat=” ＋ #常量_Lat ＋ “lng=” ＋ #常量_Lng ＋ “locationCityId=” ＋ #常量_locationCityId ＋ “model=” ＋ #常量_model ＋ “net=wifiosv=5.1.1phone=” ＋ 参数_登录账户 ＋ “platform=” ＋ #常量_platform ＋ “screenWH=1080X1920selectCityId=-1selectDistrictId=selectSiteId=versionId=” ＋ #常量_versionId ＋ #常量_Key
局部_Sign_1_结果 ＝ 取数据摘要_MD5 (到字节集 (局部_Sign_1_原文))

局部_Sign_2_原文 ＝ 局部_Sign_1_结果 ＋ #常量_Key
局部_Sign_2_结果 ＝ 取数据摘要_MD5 (到字节集 (局部_Sign_2_原文))

局部_Url ＝ “https://api.chesupai.cn/apicenter/user/login?platform=” ＋ #常量_platform ＋ “&screenWH=1080X1920&selectSiteId=&osv=5.1.1&deviceId=” ＋ #常量_deviceId ＋ “&selectDistrictId=&dpi=1.8000001&customerId=” ＋ #常量_customerId ＋ “&versionId=” ＋ #常量_versionId ＋ “&selectCityId=-1&net=wifi&locationCityId=” ＋ #常量_locationCityId ＋ “&model=” ＋ #常量_model ＋ “&sign=” ＋ 局部_Sign_2_结果

局部_提交数据 ＝ “phone=” ＋ 参数_登录账户 ＋ “&code=” ＋ 参数_验证代码 ＋ “&isAgree=1&ca_city=” ＋ #常量_locationCityId ＋ “&lat=” ＋ #常量_Lat ＋ “&lng=” ＋ #常量_Lng
局部_提交长度 ＝ 到文本 (取文本长度 (局部_提交数据))

局部_请求头部 ＝ NullStr
局部_请求头部 ＝ 局部_请求头部 ＋ “Cache-Control: no-store” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “X-Ganji-Agency: self” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “GjData-Version: 1.0” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “contentformat: json2” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “versionId: ” ＋ #常量_versionId ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “X-Ganji-CustomerId: ” ＋ #常量_customerId ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “X-Ganji-VersionId: ” ＋ #常量_versionId ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “CustomerId: ” ＋ #常量_customerId ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “model: ” ＋ #常量_model ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “security_version: 1.0.0” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “requestId: ” ＋ #常量_deviceId ＋ “|” ＋ 局部_Time_1 ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “X-Timestamp: ” ＋ 局部_Time_2 ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “Content-Type: application/x-www-form-urlencoded” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “Content-Length: ” ＋ 局部_提交长度 ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “Host: api.chesupai.cn” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “Connection: Keep-Alive” ＋ #换行符
局部_请求头部 ＝ 局部_请求头部 ＋ “User-Agent: okhttp/3.9.1” ＋ #换行符 ＋ #换行符

局部_网页工具.Open (“POST”, 局部_Url)
局部_网页工具.SetRequestHeaders (局部_请求头部)
局部_网页工具.Send (局部_提交数据)
局部_访问结果 ＝ 局部_网页工具.GetResponseTextU2A ()
局部_网页工具.Rest ()
返回 (局部_访问结果)

.子程序 _按钮_登录账户_被单击
.局部变量 局部_登录账户, 文本型
.局部变量 局部_短信返回, 文本型
.局部变量 局部_短信结构, 短信型
.局部变量 局部_验证代码, 文本型
.局部变量 局部_提交返回, 文本型

局部_登录账户 ＝ _启动窗口.编辑框_登录账户.内容
.判断开始 (局部_登录账户 ＝ NullStr)
    信息框 (“登录账户内容不可以为空”, 位或 (#信息图标, #确认钮), “提示:”, _启动窗口)
.默认
    局部_短信返回 ＝ 车速拍_发送短信 (局部_登录账户)
    .如果真 (车速拍_解析短信 (局部_短信返回, 局部_短信结构) ＝ 假)
        信息框 (“解析车速拍发送短信返回数据失败”, 位或 (#信息图标, #确认钮), “提示:”, _启动窗口)
        返回 ()
    .如果真结束
    .如果真 (局部_短信结构.code ≠ 0)
        信息框 (“返回代码: ” ＋ 到文本 (局部_短信结构.code) ＋ “, 返回消息: ” ＋ 局部_短信结构.message, 位或 (#信息图标, #确认钮), “提示:”, _启动窗口)
        返回 ()
    .如果真结束
    .如果真 (输入框 (“请在此处输入移动电话内收到的短信验证码, 按下 '确认输入' 按钮以确认提交本次登录, 否则不登录”, “请输入...”, NullStr, 局部_验证代码, #输入整数, _启动窗口) ＝ 假)
        信息框 (“用户取消了短信验证码的输入”, 位或 (#信息图标, #确认钮), “提示:”, _启动窗口)
        返回 ()
    .如果真结束
    局部_提交返回 ＝ 车速拍_提交短信 (局部_登录账户, 局部_验证代码)
    .如果真 (车速拍_解析账户 (局部_提交返回, 全局_账户信息) ＝ 假)
        信息框 (“解析车速拍提交短信返回数据失败”, 位或 (#信息图标, #确认钮), “提示:”, _启动窗口)
        返回 ()
    .如果真结束
    信息框 (“返回代码: ” ＋ 到文本 (全局_账户信息.code) ＋ #换行符 ＋ “错误信息: ” ＋ 全局_账户信息.message ＋ #换行符 ＋ “账户标识: ” ＋ 到文本 (全局_账户信息.data.user_id) ＋ #换行符 ＋ “账户令牌: ” ＋ 全局_账户信息.data.pai_token, 位或 (#信息图标, #确认钮), “提示:”, _启动窗口)
.判断结束

@希纱