开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

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


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

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

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

[易源码分享] 继纵QQ家园横四海后--非仙勿扰游戏开源源码未完成求大神续

[复制链接]
结帖率:0% (0/1)
跳转到指定楼层
发表于 2018-12-31 13:11:09 | 只看该作者 回帖奖励 |正序浏览 |阅读模式   江苏省苏州市
分享源码
界面截图: -
是否带模块: 调用了模块
备注说明: -
.版本 2
.支持库 spec
.子程序 初始化
.局部变量 提交协yi头, 文本型
.局部变量 神识分割左边, 文本型
.局部变量 经验分割左边, 文本型
.局部变量 经验分割右边, 文本型
.局部变量 可以收工, 文本型
.局部变量 双修对象, 文本型
.局部变量 对象, 文本型
.局部变量 开始双修, 文本型
.局部变量 访问对象, 文本型
.局部变量 神识不足, 整数型
.局部变量 使用还神丹, 文本型
.局部变量 还神丹, 文本型
.局部变量 还神丹地址, 文本型
.局部变量 小还丹, 文本型
.局部变量 小还丹地址, 文本型
.局部变量 签到, 文本型
.局部变量 神识炉子, 文本型
.局部变量 炉子, 文本型
.局部变量 恢复, 文本型
.局部变量 恢复访问, 文本型
.局部变量 恢复使用, 文本型
.局部变量 i, 整数型
.局部变量 b, 整数型
.局部变量 领取神识, 文本型
.局部变量 领取成功, 文本型
.局部变量 角色, 文本型
n = n + 1
请求地址 = 编辑框_主页.内容
返回文本 = 到文本 (网页_访问S (请求地址, , , , mcookies, , , , , ))
签到 = #地址 + 文本_取出中间文本 (文本_取出中间文本 (返回文本, “选择签到奖励<br/>”, “本周已签到”, , ), “<a href=” + #引号, #引号 + “>1</a> ”, )
.如果真 (文本_取出中间文本 (文本_取出中间文本 (返回文本, “选择签到奖励<br/>”, “本周已签到”, , ), “<a href=” + #引号, #引号 + “>1</a> ”, ) ≠ “”)
    网页_访问S (签到, , , mcookies, , , , , )
    日志.加入文本 (“签到成功” + #换行符)
.如果真结束
完整文本 = 文本_取出中间文本 (返回文本, “表白墙”, “历练”, , )
' 调试输出 (完整文本)
.如果真 (请求地址 ≠ “”)
    ' --------------------角色名称------------------------------------
    角色 = 文本_取出中间文本 (文本_取出中间文本 (完整文本, “昵称:”, “级/<a href=”, , ), #引号 + “>”, “</a>”, )
    _启动窗口.标题 = “当前角色》》》》” + 角色
    ' --------------------等级------------------------------------
    等级 = 文本_取出中间文本 (完整文本, “</a>(”, “/<a href=”, , )
    编辑框_等级.内容 = 等级
    ' --------------------神识分割------------------------------------
    神识 = 文本_取出中间文本 (完整文本, “神识:”, “(<a href=”, , )
    神识分割左边 = 到文本 (文本_取左边 (神识, “/”, , ))
    编辑框_神识.内容 = 神识分割左边
    ' --------------------修炼时间-------------------------------------
    修炼 = 文本_取出中间文本 (完整文本, “双修</a>:”, “<a href=”, 1, 假)
    修炼时间 = 文本_取左边 (修炼, “小时”)
    编辑框_修炼时间.内容 = 修炼
    ' --------------------经验分割-------------------------------------
    经验 = 文本_取出中间文本 (完整文本, “修为:”, “(<a href=”, , )
    经验分割右边 = 到文本 (文本_取出中间文本 (经验, “/”, “<br/>”, ))
    经验分割左边 = 到文本 (文本_取左边 (经验, “/”, , ))
    编辑框_经验.内容 = 经验分割左边 + “/” + 经验分割右边
    ' --------------------恢复------------------------------------
    恢复 = #地址 + 文本_取出中间文本 (文本_取出中间文本 (完整文本, “神识:”, “>恢复”, , ), “(<a href=” + #引号, #引号, , )
    .如果真 (到整数 (神识分割左边) < 2)
        恢复访问 = 网页_访问S (恢复, , , mcookies, , , , )
        恢复使用 = 文本_取出中间文本 (恢复访问, “可以使用还神丹恢复神识。<br/>”, “提示:使用丹药每天最多恢复2000神识。<br/>”, , )
        还神丹 = 文本_取出中间文本 (恢复使用, “还神丹(剩余:”, “)<a href=”, , )
        还神丹地址 = #地址 + 文本_取出中间文本 (恢复使用, “<a href=” + #引号, #引号 + “>使用</a> 还神丹(剩余”, , )
        小还丹 = 文本_取出中间文本 (恢复使用, “小还丹(剩余:”, “)<br/>”, , )
        小还丹地址 = #地址 + 文本_取出中间文本 (文本_取出中间文本 (恢复使用, “<a href=” + #引号, “>使用</a> 小还丹”, 2, ), “购买</a><br/>” + #换行符 + “<a href=” + #引号, #引号, , )
        .如果真 (到整数 (小还丹) > 0)
            .计次循环首 (6, i)
                延迟 (700)
                网页_访问S (小还丹地址, , , mcookies, , , , , , )
                日志.加入文本 (“小还丹还有:” + 小还丹 + “个” + #换行符)
                日志.加入文本 (“使用小还丹:” + 到文本 (n) + “个” + #换行符)
            .计次循环尾 ()
        .如果真结束
        .如果真 (到整数 (小还丹) = 0)
            .如果真 (到整数 (还神丹) > 2)
                .计次循环首 (1, i)
                    网页_访问S (还神丹地址, , , mcookies, , , , , , )
                    日志.加入文本 (“还神丹还有:” + 还神丹 + “个” + #换行符)
                    日志.加入文本 (“使用还神丹:” + 到文本 (i) + “个” + #换行符)
                .计次循环尾 ()


结帖率:0% (0/1)
15
发表于 2019-5-26 21:56:35 | 只看该作者   安徽省合肥市
感谢发布原创作品,精易因你更精彩!
回复 支持 反对

使用道具 举报

结帖率:50% (3/6)
14
发表于 2019-3-11 10:33:29 | 只看该作者   云南省西双版纳傣族自治州
感觉很厉害的样子
回复 支持 反对

使用道具 举报

13
发表于 2019-2-26 18:24:41 | 只看该作者   江苏省泰州市
学习了,谢谢分享!
回复 支持 反对

使用道具 举报

结帖率:0% (0/1)

签到天数: 2 天

12
发表于 2019-1-10 20:00:24 | 只看该作者   安徽省淮南市
这个是要什么功能?
回复 支持 反对

使用道具 举报

结帖率:88% (7/8)
11
发表于 2019-1-9 23:37:02 | 只看该作者   四川省资阳市
纵横四海,童年的记忆呀,对着wap网页笑呵呵的
回复 支持 反对

使用道具 举报

结帖率:0% (0/1)
10
 楼主| 发表于 2019-1-7 16:53:28 | 只看该作者   江苏省苏州市
yang670555064 发表于 2019-1-3 20:26
大哥,不要用时钟启动线程呀, 万一时间到了上次的还没执行完呢

新手,求指教
回复 支持 反对

使用道具 举报

9
发表于 2019-1-4 21:15:47 | 只看该作者   河北省石家庄市
谢谢分享 一定好好学习 天天向上
回复 支持 反对

使用道具 举报

结帖率:0% (0/1)
8
发表于 2019-1-4 12:35:12 高大上手机用户 | 只看该作者   四川省成都市
有前途,加油
回复 支持 反对

使用道具 举报

结帖率:100% (14/14)

签到天数: 4 天

7
发表于 2019-1-3 20:26:17 | 只看该作者   山西省临汾市
大哥,不要用时钟启动线程呀, 万一时间到了上次的还没执行完呢
回复 支持 反对

使用道具 举报

结帖率:73% (27/37)

签到天数: 7 天

6
发表于 2019-1-3 15:33:14 | 只看该作者   山西省运城市
放弃吧!
回复 支持 反对

使用道具 举报

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

本版积分规则 致发广告者

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

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

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