开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

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


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

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

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

[易语言纯源码] WinRing0 取CPU风扇转速

[复制链接]
结帖率:33% (1/3)
跳转到指定楼层
楼主
发表于 2021-11-22 22:07:19 | 只看该作者 |只看大图 回帖奖励 |正序浏览 |阅读模式   江苏省宿迁市
分享源码
界面截图:
是否带模块: -
备注说明: -
WinRing0 取CPU风扇转速  不知道为什么不行 分享下代码
照抄到易语言 的 不知道为什么不行  不知道是不是我系统或者硬件不行,分享出来给大家试试
或者大神看看 是什么问题
可能我写错了什么的 搞不清楚  搞了好几天没搞成


[C#] 纯文本查看 复制代码
using System;
using System.Collections.Generic;
using System.Text;

namespace WinRing0_Test
{
    public class TestByWinRing0
    {
        private static OpenLibSys.Ols MyOls;
        public static ushort ec_addr_port;
        public static ushort ec_data_port;

        public bool Initialize()
        {
            MyOls = new OpenLibSys.Ols();
            return MyOls.GetStatus() == (uint)OpenLibSys.Ols.Status.NO_ERROR;
        }

        private static int SuperIo_Inw(byte data)
        {
            int val;
            MyOls.WriteIoPortByte(0x2e, data );
            val = MyOls.ReadIoPortByte(0x2f) << 8;
            Console.WriteLine("SuperIo_Inw  val1:" Convert.ToString(val,16));
            MyOls.WriteIoPortByte(0x2e, data);
            val |= MyOls.ReadIoPortByte(0x2f);
            Console.WriteLine("SuperIo_Inw  val2:" Convert.ToString(val,16));
            return val;
        }

        public void InitSuperIO()
        {
            MyOls.WriteIoPortByte(0x2e, 0x87);
            MyOls.WriteIoPortByte(0x2e, 0x01);
            MyOls.WriteIoPortByte(0x2e, 0x55);
            MyOls.WriteIoPortByte(0x2e, 0x55);
        }

        public string GetChipName()
        {
            ushort chip_type;
            chip_type = (ushort)SuperIo_Inw(0x20);
            Console.WriteLine("chip type :" Convert.ToString(chip_type,16));
            return "IT" Convert.ToString(chip_type,16);
        }

        //FAN EC(LDN=04h, Index 30h=01)
        public void InitEc()
        {
            //enable ec
            MyOls.WriteIoPortByte(0x2e, 0x07);
            MyOls.WriteIoPortByte(0x2f, 0x04);
            MyOls.WriteIoPortByte(0x2e, 0x30);
            MyOls.WriteIoPortByte(0x2f, 0x01);
            //get ec base addr
            ushort ec_base = (ushort)SuperIo_Inw(0x60);
            Console.WriteLine("ec_base addr:" Convert.ToString(ec_base, 16));
            ec_addr_port = (ushort)(ec_base 0x05);
            ec_data_port = (ushort)(ec_base 0x06);
            Console.WriteLine("ec_addr_port :" Convert.ToString(ec_addr_port, 16)
                "  ec_data_port :" Convert.ToString(ec_data_port, 16));

            MyOls.WriteIoPortByte(ec_addr_port, 0x0c);
            MyOls.WriteIoPortByte(ec_data_port, 0x00);
        }

        public int GetFanRpm()
        {
            int fan_speed = 0;
            int fan_rpm = 0;
            //IT8772E
            //2-3 Reading Registers[7:0] (Index=0Eh-0Fh)
            MyOls.WriteIoPortByte(ec_addr_port, 0x0e);
            byte lval = MyOls.ReadIoPortByte(ec_data_port);
            Console.WriteLine("lval:" Convert.ToString(lval, 2));

            //2-3 Extended Reading Registers [15:8] (Index=19h-1Ah)
            MyOls.WriteIoPortByte(ec_addr_port, 0x19);
            byte mval = MyOls.ReadIoPortByte(ec_data_port);
            Console.WriteLine("mval:" Convert.ToString(mval, 2));

            fan_speed = (mval << 8) | lval;
            Console.WriteLine("fan_speed:" fan_speed);
            fan_rpm = (int)(1.35 * Math.Pow(10, 6) / (fan_speed * 2));
            Console.WriteLine("fan_rpm:" fan_rpm);

            return fan_rpm;
        }
    }

    
}



CPU风扇转速求助.zip (1.45 MB, 下载次数: 42)


评分

参与人数 1精币 +1 收起 理由
ghost12 + 1 支持开源~!感谢分享

查看全部评分


13
发表于 2024-12-4 13:39:17 | 只看该作者   广东省广州市
学习型啊撒野的
回复 支持 反对

使用道具 举报

签到天数: 8 天

12
发表于 2024-11-2 02:57:52 | 只看该作者   江西省南昌市
感谢大佬分享哇           
回复 支持 反对

使用道具 举报

结帖率:79% (27/34)

签到天数: 17 天

11
发表于 2022-4-2 07:02:25 | 只看该作者   上海市上海市
很好很强悍,坚持下去哦~
回复 支持 反对

使用道具 举报

结帖率:79% (27/34)

签到天数: 17 天

10
发表于 2022-2-19 05:00:52 | 只看该作者   上海市上海市
共同努力,共同进步
回复 支持 反对

使用道具 举报

结帖率:81% (13/16)
9
发表于 2022-1-4 22:27:10 | 只看该作者   浙江省嘉兴市
感谢楼主分享,支持一下~~!!!
回复 支持 反对

使用道具 举报

结帖率:100% (3/3)
8
发表于 2021-11-23 12:21:35 | 只看该作者   福建省莆田市
manbuzv 发表于 2021-11-22 23:42
发出来大家试试呗,我不行说不定你行呢?

不能自己vm么,真就直接玄学了话说评论区有人成功吗
回复 支持 反对

使用道具 举报

结帖率:100% (2/2)
7
发表于 2021-11-23 03:48:19 | 只看该作者   山东省临沂市
666666666666666
回复 支持 反对

使用道具 举报

结帖率:90% (9/10)

签到天数: 13 天

6
发表于 2021-11-23 02:21:39 | 只看该作者   广东省广州市
这不应该发到求助区吗?
回复 支持 反对

使用道具 举报

结帖率:43% (17/40)
地下
发表于 2021-11-23 01:39:27 | 只看该作者   四川省成都市
666666666666666666666666
回复 支持 反对

使用道具 举报

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

本版积分规则 致发广告者

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

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

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