蓝芯-系统辅助V2.9易语言源码

.版本 2
.支持库 shell
.支持库 eAPI
.支持库 iext
.支持库 EdirectX
.支持库 EThread
.支持库 iext3
.支持库 internet
.支持库 iext5

.程序集 窗口程序集1
.程序集变量 替换文件数, 整数型
.程序集变量 替换地方数, 整数型
.程序集变量 替换文件成功数, 整数型
.程序集变量 当前状态, 整数型
.程序集变量 搜索中的文件, 文本型
.程序集变量 停止搜索, 整数型
.程序集变量 优化重启, 整数型
.程序集变量 目录, 文本型

 

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

‘ Blue chip Systems Support Tool
植入广告_ ()
免疫360 ()
‘ 创建快捷方式 (“蓝芯-系统辅助工具”, 取运行目录 () + “\” + 取执行文件名 (), “系统辅助、系统优化、反黑辅助、手工清毒助手!”, , 取运行目录 ())
复制文件 (取运行目录 () + “\蓝芯-系统辅助工具.lnk”, 取特定目录 (3) + “蓝芯-系统辅助工具.lnk”)
.’ 如果真 (保护程序 = 真)
‘ 结束 ()
.如果真结束
‘ 写到文件 (“C:\WINDOWS\bbs.lanxine.tk”, #logo)

提升进程权限 ()
.判断开始 (寻找文本 (操作系统, “Windows 7”, , 假) ≠ -1 或 寻找文本 (操作系统, “Server”, , 假) ≠ -1 或 寻找文本 (操作系统, “2000”, , 假) ≠ -1)

.默认
写注册项 (4, “SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon”, 4294967197)
写到文件 (取系统目录_ () + “system32\oeminfo.ini”, #omeini)
写到文件 (取系统目录_ () + “system32\oemlogo.bmp”, #omelogo)
‘ 写到文件 (取系统目录_ () + “system32\sysdm.cpl”, #omesx)
置文件属性 (取特定目录 (10) + “dllcache\sysdm.cpl”, 32)
删除文件 (取特定目录 (10) + “dllcache\sysdm.cpl”)
.判断结束

仅卸载模块.禁止 = 真
卸载模块并删除到回收站.禁止 = 真
初始化 ()
系统信息 ()
.如果真 (_启动窗口.标题 ≠ 版本)
信息框 (“此程序被恶意修改,请联系作者;QQ:341455770!”, 0 + #错误图标, “错误”)
打开指定网址 (“http://www.2345.com/?k1007403”)
结束 ()
.如果真结束
.子程序 初始化

版本 = “蓝芯-系统辅助工具 V2.9.13.412 Bate3”
版本号 = “V2.9.13.412 Bate3”
版本文件 = 取系统特定目录 (37) + “LanxinV.dat”
更新地址 = “http://192.168.1.2/BSST/Version.txt”
在线更新 = “http://192.168.1.2/BSST/down”
现版本 = 2.9

写到文件 (版本文件, 到字节集 (现版本))
小提示 = { “蓝芯-系统辅助工具 – 献给天下所有所有电脑使用者”, “小提示:遇到病毒进程,可结束并且禁止运行”, “小提示:系统反应速度慢?系统开机慢?系统优化可以把你解决这一一难题!”, “蓝芯提醒你:请定时检查更新!  点击帮助 – 检查更新”, “遇到强悍的病毒吗?进程助手帮你忙,把病毒进程添加到镜像劫持,可以永久抵制病毒!”, “小贴士:定时关机支持多天执行,定时时请设置好日期时间!” }
_启动窗口.标题 = 版本
显示.选中 = 真
.子程序 系统信息

时钟_状态条.时钟周期 = 1000
定时关机 ()
取硬件信息_ ()
树型框1.扩展 (3)
树型框1.扩展 (16)

 

.子程序 取硬件信息_
.局部变量 父设备
.局部变量 父系统
.局部变量 计算机名, 文本型
.局部变量 用户名, 文本型
.局部变量 取系统信息_, 文本型
.局部变量 temp0, 文本型, , “0”
.局部变量 temp1, 文本型, , “0”
.局部变量 temp2, 文本型, , “0”
.局部变量 系统目录路径, 文本型
.局部变量 系统信息, 系统信息
.局部变量 页面文件, 字节集
.局部变量 句柄
.局部变量 处理器, 文本型
.局部变量 bios, 文本型
.局部变量 主板, 文本型
.局部变量 内存, 文本型
.局部变量 硬盘型号, 文本型
.局部变量 父硬盘, 整数型
.局部变量 硬盘介质类型, 文本型
.局部变量 硬盘制造商, 文本型
.局部变量 硬盘描述, 文本型
.局部变量 硬盘磁头柱面数, 文本型
.局部变量 硬盘磁头数, 文本型
.局部变量 硬盘磁道扇区, 文本型
.局部变量 硬盘总容量, 文本型
.局部变量 显卡, 文本型
.局部变量 父显卡, 整数型
.局部变量 显卡分辨率, 文本型
.局部变量 显卡视频构架, 文本型
.局部变量 显卡显存, 文本型
.局部变量 显卡位像素, 文本型
.局部变量 显卡名称, 文本型
.局部变量 显卡最大刷新率, 文本型
.局部变量 显卡最低刷新率, 文本型
.局部变量 显卡视频处理器型号, 文本型
.局部变量 显卡适配器DAC类型, 文本型
.局部变量 声卡, 文本型
.局部变量 网卡, 文本型
.局部变量 网卡信息, 网卡信息, , “0”
.局部变量 i, 整数型
.局部变量 cpu, CPU信息
.局部变量 内存信息, 内存类别
.局部变量 启动时间, 整数型
.局部变量 启动时间_h, 整数型
.局部变量 启动时间_M, 整数型
.局部变量 启动时间_D, 整数型
.局部变量 temp, 文本型

树型框1.清空 ()
计算机名 = 取硬件信息 (1)
用户名 = 取空白文本 (255)
取用户名 (用户名, 255)
‘ 输出调试文本 (用户名)
编辑框_用户名.内容 = 用户名
取系统信息_ = 取硬件信息 (12)
temp0 = 分割文本 (取系统信息_, #换行符, )
.如果 (取数组成员数 (temp0) > 2)
temp1 = 分割文本 (temp0 [1], “|”, )
系统目录路径 = temp1 [2]
temp2 = 分割文本 (temp1 [1], “:”, )
操作系统 = temp2 [2]
.否则
操作系统 = “未知操作系统”
.如果结束
取系统信息 (系统信息)

 

深蓝-系统辅助2.9易语言源码

Leave a Comment

 
Copyright © 2008-2021 lanxinbase.com Rights Reserved. | 粤ICP备14086738号-3 |