开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

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


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

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

楼主: moiliom
打印 上一主题 下一主题
收起左侧

[易语言] 读取内存取通达信股票代码,怎样才可以实现?

[复制链接]
61
发表于 2022-1-25 12:03:14 | 只看该作者   重庆市重庆市
有通用取码方法的
回复

使用道具 举报

62
发表于 2022-2-2 13:28:18 | 只看该作者   上海市上海市
后排围观,不错,支持卤煮



                                            藏起来的小尾巴,不让你看!  
    回复

    使用道具 举报

    63
    发表于 2022-2-2 16:08:48 | 只看该作者   上海市上海市
    留名,看帖必回帖



                                              藏起来的小尾巴,不让你看!  
      回复

      使用道具 举报

      结帖率:99% (141/142)
      64
      发表于 2022-2-11 00:15:32 | 只看该作者   山东省淄博市
      zzh233 发表于 2022-1-1 12:08
      东方财富不都有免费的数据吗

      有介绍资料、网址之类的吗? 我想看下,谢谢
      回复

      使用道具 举报

      65
      发表于 2022-5-30 00:04:31 | 只看该作者   福建省莆田市
      moiliom 发表于 2020-7-30 00:40
      我已经会了,谢谢老师,不过绿色的不一定对哦,我有一个办法很容易能找到唯一的那个基址 ...

      请教,如何容易地找到唯一的jz?
      回复

      使用道具 举报

      66
      发表于 2022-6-30 18:28:50 | 只看该作者   广东省深圳市
      楼主好:有人用这种方法获得同花顺的正在显示的股票代码吗?
      回复

      使用道具 举报

      67
      发表于 2022-7-6 10:40:45 | 只看该作者   广东省梅州市
      认真学习易语言,提高易语言水平
      回复

      使用道具 举报

      结帖率:100% (1/1)
      68
      发表于 2022-7-29 00:21:18 | 只看该作者   河南省郑州市
      这个是好东西,感谢分享
      回复

      使用道具 举报

      结帖率:100% (1/1)
      69
      发表于 2022-7-29 00:21:31 | 只看该作者   河南省郑州市
      这个是好东西,感谢分享
      回复

      使用道具 举报

      70
      发表于 2023-1-24 12:15:05 | 只看该作者   陕西省西安市
      看到楼主的帖子受到启发,把代码改进了下,发出来给需要的人,内存读写一定要初始化........这几天做个所有常用通达信版本通用的联动软件,有兴趣的加我群835195742,一起玩这个山头被我们拿下了
      .版本 2
      .支持库 ncdx98

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

      TDX_句柄 = 进程_名取句柄 (“TdxW.exe”)
      TDX_ID = 取进程ID (“TdxW.exe”)
      内存读写_初始化 (, )
      时钟1.时钟周期 = 10

      .子程序 _时钟1_周期事件

      ' /***
      ' * 这里是注释,这里敲回车,自动将下方增加一个注释行
      ' ***/
      _读字节集内存 ()

      .子程序 _读字节集内存, 文本型
      .局部变量 股票代码_字节集, 字节集
      .局部变量 股票代码_文本, 文本型

      .循环判断首 ()
          股票代码_字节集 = 内存读写_读字节集 (TDX_ID, 进制_十六到十 (“*********”), 4, )
          股票代码_文本 = 到文本 (取字节集数据 (股票代码_字节集, 4, ))
          .如果真 (文本_取长度 (股票代码_文本) > 0 且 文本_取长度 (股票代码_文本) < 6)
              .如果 (文本_取长度 (股票代码_文本) = 5)
                  股票代码_文本 = “0” + 股票代码_文本
              .否则
                  .如果 (文本_取长度 (股票代码_文本) = 4)
                      股票代码_文本 = “00” + 股票代码_文本
                  .否则
                      .如果 (文本_取长度 (股票代码_文本) = 3)
                          股票代码_文本 = “000” + 股票代码_文本
                      .否则
                          .如果 (文本_取长度 (股票代码_文本) = 2)
                              股票代码_文本 = “0000” + 股票代码_文本
                          .否则
                              .如果 (文本_取长度 (股票代码_文本) = 1)
                                  股票代码_文本 = “00000” + 股票代码_文本
                              .否则

                              .如果结束

                          .如果结束

                      .如果结束

                  .如果结束

              .如果结束

          .如果真结束

      .循环判断尾 (文本_取长度 (股票代码_文本) ≠ 6)
      标签2.标题 = 股票代码_文本
      返回 (到文本 (取字节集数据 (股票代码_字节集, 4, )))
      回复

      使用道具 举报

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

      本版积分规则 致发广告者

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

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

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