开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 3296|回复: 18
打印 上一主题 下一主题
收起左侧

[易语言纯源码] 蒙牛

[复制链接]
跳转到指定楼层
楼主
发表于 2022-12-19 09:10:34 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式   江苏省镇江市
分享源码
界面截图: -
是否带模块: -
备注说明: -
供学习使用

  
子程序名返回值类型公开备 注
getWork send final price
变量名类 型静态数组备 注
t_url文本型 
t_time文本型 
t_sign文本型 
str文本型 
t_client文本型 
t_header文本型 
t_query文本型 
cooki文本型 
json类_json 
t_nonce文本型 
置入代码 ({ 235, 16, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 98, 101, 103, 105, 110, 0 })
t_client = “clientKey=” + clientKey_box.内容 + “&clientSecret=” + clientSecret_box.内容 + “&”
' step 1 : 生成header
t_nonce = getNonce (“32”)
t_time = GetTime ()
t_query = “requestId=” + t_nonce + “×tamp=” + t_time + “&key=” + rk_box.内容
t_sign = 校验_取md5_文本 (t_query, , )
t_header = 子文本替换 ( #常量4, “[token]”, cook.内容, , , )
t_header = 子文本替换 (t_header, “[sign]”, t_sign, , , )
t_header = 子文本替换 (t_header, “[time]”, t_time, , , )
t_header = 子文本替换 (t_header, “[requestid]”, t_nonce, , , )
' step 2 : get milk
t_nonce = getNonce (“16”)
t_time = GetTime ()
t_query = “nonce=” + t_nonce + “×tamp=” + t_time
t_sign = 校验_取md5_文本 (t_client + t_query, , )
POST_API = “https://mengniu-apig.xiaoyisz.com/mengniu-world-cup-1122” + updateUrl_box.内容 + “?”
t_url = POST_API + “timestamp=” + t_time + “&nonce=” + t_nonce + “&signature=” + t_sign + “&jsonId=” + json_id.内容
str = 到文本 (网页_访问_对象 (t_url, 0, , , , t_header))
str = URLDecodeUtf8 (str)
i = i + 1
LogBox.加入文本 ( #换行符到文本 (取秒 (取现行时间 ()))“.”到文本 (GetTimeInt () % 1000)“:” + str)
置入代码 ({ 235, 14, 86, 77, 80, 114, 111, 116, 101, 99, 116, 32, 101, 110, 100, 0 })
子程序名返回值类型公开备 注
getRk  
变量名类 型静态数组备 注
t_refer文本型 
t_client文本型 
t_nonce文本型 
t_time文本型 
t_query文本型 
t_sign文本型 
POST_API文本型 
t_url文本型 
str文本型 
json类_json 
rk文本型 
' step 1 : get rk
t_client = “clientKey=” + clientKey_box.内容 + “&clientSecret=” + clientSecret_box.内容 + “&”
t_nonce = getNonce (“16”)
t_time = GetTime ()
t_query = “nonce=” + t_nonce + “×tamp=” + t_time
t_sign = 校验_取md5_文本 (t_client + t_query, , )
POST_API = “https://mengniu-apig.xiaoyisz.com/mengniu-world-cup/mp/api/user/baseInfo?”
t_url = POST_API + “timestamp=” + t_time + “&nonce=” + t_nonce + “&signature=” + t_sign
str = 到文本 (网页_访问_对象 (t_url, 0, , , , authHeader.内容))
str = URLDecodeUtf8 (str)
json.解析 (str, , )
rk = json.取通用属性 (“data.rk”, )
rk = 蒙牛_DES_Decrypt (rk)
如果 (rk = “”)
LogBox.加入文本 ( #换行符“!!!获取rk失败:” + str)
返回 ()
LogBox.加入文本 ( #换行符“...获取rk成功:” + rk)
rk_box.内容 = rk

子程序名返回值类型公开备 注
get_json_id  
变量名类 型静态数组备 注
str文本型 
json类_json 
currentDate文本型 
n整数型 
tmp文本型 
str = 到文本 (网页_访问_对象 (“https://gz-cdn.xiaoyisz.com/mengniu_bainai/game_configs/prod_v1/game_configs.json?v=”GetTime (), 0, , , , authHeader.内容))
str = URLDecodeUtf8 (str)
json.解析 (str)
currentDate = 到文本 (取月份 (取现行时间 ()))到文本 (取日 (取现行时间 ()))
计次循环首 (json.成员数 (“activity_data”), n)
tmp = json.取通用属性 (“activity_data[”到文本 (n - 1)“].result_id”)
tmp = 子文本替换 (tmp, “result_”, “”, , , )
如果真 (tmp = currentDate)
json_id.内容 = json.取通用属性 (“activity_data[”到文本 (n - 1)“].json_id”)
LogBox.加入文本 ( #换行符“...获取id成功:” + json_id.内容)
跳出循环 ()

计次循环尾 ()
子程序名返回值类型公开备 注
getNonce文本型 
参数名类 型参考可空数组备 注
length文本型
变量名类 型静态数组备 注
nonce文本型 
nonce = 编码_运行JS代码 ( #常量3, “d”, length)
返回 (nonce)
子程序名返回值类型公开备 注
蒙牛_DES_Decrypt文本型 
参数名类 型参考可空数组备 注
参数1文本型
变量名类 型静态数组备 注
JS命令类_脚本组件 
结果文本型 
JS命令.执行 ( #DES_蒙牛 )
结果 = JS命令.计算表达式 (“DES_Decrypt('” + 参数1 + “')”)
返回 (结果)


结帖率:0% (0/1)

签到天数: 5 天

沙发
发表于 2022-12-19 09:29:39 | 只看该作者   浙江省绍兴市
学习学习
回复 支持 反对

使用道具 举报

结帖率:75% (9/12)

签到天数: 23 天

板凳
发表于 2022-12-19 10:10:39 | 只看该作者   甘肃省平凉市
干什么用的,什么功能啊
回复 支持 反对

使用道具 举报

签到天数: 20 天

地板
发表于 2022-12-19 10:18:48 | 只看该作者   广东省广州市
回复 支持 反对

使用道具 举报

地下
发表于 2022-12-19 11:00:05 | 只看该作者   陕西省西安市
感谢分享
回复 支持 反对

使用道具 举报

6
发表于 2022-12-19 11:02:27 | 只看该作者   辽宁省大连市
感谢分享
回复 支持 反对

使用道具 举报

结帖率:100% (3/3)

签到天数: 5 天

7
发表于 2022-12-19 11:43:01 | 只看该作者   湖南省邵阳市
支持开源~!感谢分享
回复 支持 反对

使用道具 举报

结帖率:98% (107/109)

签到天数: 21 天

8
发表于 2022-12-19 17:38:06 | 只看该作者   山东省青岛市
感谢分享 结束了
回复 支持 反对

使用道具 举报

结帖率:67% (2/3)

签到天数: 5 天

9
发表于 2022-12-19 19:29:19 | 只看该作者   安徽省宿州市

感谢分享 结束了
回复 支持 反对

使用道具 举报

结帖率:100% (3/3)

签到天数: 11 天

10
发表于 2022-12-19 23:15:24 | 只看该作者   河北省邯郸市
学习一下源码
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报QQ: 793400750,邮箱:[email protected]
网站简介:精易论坛成立于2009年,是一个程序设计学习交流技术论坛,隶属于揭阳市揭东区精易科技有限公司所有。
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表