tag

最新推荐文章于 2024-11-17 16:39:30 发布
原创 最新推荐文章于 2024-11-17 16:39:30 发布 · 370 阅读 · 0 ·
CC 4.0 BY-SA版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。

本文探讨了如何使用PHP处理URL请求并获取类型信息的方法。同时介绍了前端弹出分享面板的功能，包括设置标题、链接等参数，并实现了点击分享的效果。此外，还提到了成功或失败提示的弹出框设计。
1,send php url ,get type info
2,popup share panel, include title,link,type, click share
3,popup success or fail
hellobbboy
关注
apriltag-2016-12-01.rar_apriltag_apriltag机器人视觉定位_forty4kz_机器视觉_视
07-15
《Apriltag：机器人视觉定位的关键技术》 Apriltag是一种广泛应用在机器人视觉定位中的标记系统，由美国麻省理工学院(MIT)的David A. Kirshner等人于2011年提出。该系统以其高效、鲁棒的特性，在机器人导航、无人机...
Apriltag_python-master.zip_3ZE5_AprilTags python_AprilTag编译_Apri
09-23
【标题】中的"Apriltag_python-master.zip_3ZE5_AprilTags python_AprilTag编译_Apri"指的是一个包含Apriltag Python库的压缩文件，版本号可能是3ZE5，它提供了免编译的AprilTag识别功能。AprilTag是一种开源的视觉...
【layui】Layui的tag标签
德仔
04-28 1752
Layui的tag标签文档地址DEMOtag.jstag.css自己来做一个简单展示吧 文档地址 http://lh_yun.gitee.io/lih_tag/doc.html DEMO <!DOCTYPE html> <html> <head> <meta charset="utf-8"> <title>layui</title> <meta name="renderer" content="webkit
CUT&Tag+RNA-seq关联分析的 5 个套路
Igenebook的博客
03-07 4503
CUT&Tag是研究蛋白和DNA互作的新兴实验方法，该方法是通过蛋白特异性抗体引导Protein A-Tn5酶在目标蛋白结合的DNA位置进行切割并且在序列两端加上测序接头，经过PCR扩增后形成可以用于高通量测序的文库，随后对文库进行测序分析从而解析与目标蛋白结合的DNA片段。图：在MET基因座位上，叠加显示了CUT&Tag、ChIP-seq和RNA-seq的轨迹，展示了SET、CDK9、PP2A-A、PP2A-C和Pol II在染色质上的占据情况，以及在对照组和SET-KO细胞中的mRNA表达情况[2]
git tag 用法
bluebird_shao的专栏
10-16 2608
git tag是 Git 版本控制系统中的一个命令，用于为特定的提交（commit）创建标签（tag）。标签通常用于标记重要的提交点，比如发布版本（v1.0、v2.0等）。标签可以是轻量级的（lightweight）或附注的（annotated）。轻量级标签直接指向提交对象，而附注标签则是一个包含标签信息和指向提交对象的指针的对象。
git tag相关
寬真
09-21 2317
5、git push : 将本地代码推到远程，但是这时会报错误，不会让你推因为你的本地版本比远程低一个版本，所以他会要求你更新为最新的在push但是这样的话就会有问题啊，把我们回滚的又覆盖了，所以我们不能更新，所以不能使用这个命令，只能使用下面的6这个命令了！Git会根据前面几位自动识别的，当然，你的commit id跟我的是不一样的。回滚后如果你立马投入与bug的修改，修改后发版本，那么你就犯了严重的错误，因为你修改后的代码是无法与正在开发的版本合并哒，也就是说你的修改并不能加入现有的代码。
Vue3标签（Tag）
Vue Amazing UI（Vue3 + TypeScript + Vite）组件库唯一开发维护者
07-25 2136
进行标记和分类的小标签，支持：多彩标签；预设状态的标签；动态添加和删除；三种尺寸；自定义动态标签排列；无边框；总之，功能丰富，简单易用😁😁
tag untag_untag(端口tag和untag简单理解)
热门推荐
weixin_32029863的博客
01-16 1万+
在旧款国产交换机上见到，VLAN的使用和CISCO似乎有些差异。 在网上搜到一些这方面的资料： Trunk与Access、Tag与Untag有较大的对应关系 一般来说，Trunk一般是.在交换机配置模式中，常常遇到这两个概念很模糊的东西，请高手指点1Tag和untag是ethernet frame在来trunk link上的两种状态。源 Switch在用trunk port发送frame之前，检查...
RocketMq消息模型-Tag
Flying_Fish_roe的博客
11-17 2136
RocketMQ 中的 Tag 是一种高效的消息过滤机制，允许生产者对消息进行分类，并让消费者根据需要订阅特定类型的消息。通过 Tag，系统可以实现消息的细粒度控制、业务隔离以及动态扩展。在实际应用中，合理设计和使用 Tag 可以显著提高消息系统的效率和灵活性。同时，在复杂场景下，可以结合 SQL 过滤功能，满足更加复杂的业务需求。​。
Tag文件与Tag标记——[JSP]8
ormstq的博客
05-03 3151
Tag文件 Tag标记 Tag文件中的常用指令 attribute指令 Tag文件中的常用指令 Tag文件中的常用指令 taglib指令
git tag重写
qq_38693296的博客
12-29 2747
有的时候我们想要在git的master分支中插入一个tag，这个时候就需要我们先删除一个不重要的tag，然后切到我们想要提交内容的地方，重新打tag。 例如：在master分支上修改提交，在commit和commit4之间增加一个文件，并且打tag 1、首先在git库中创建一个分支， git branch 【新的分支名称】 如果添加的内容想要具体到某一个tag后的话， git branc...
Autoware 定位之基于ARTag的landmark定位（六）
lovely_yoshino的博客
07-13 1万+
这一讲按照《Autoware 技术代码解读（三）》梳理的顺序，我们来说一说Autoware中基于地标的定位，这里的地标可以是：相机检测到的AR标签，还可以是通过LiDAR检测到的强度特征的板块。由于这些地标易于检测和估计姿态，如果地图上预先标注了地标的姿态，那么可以从检测到的地标的姿态计算出自我姿态。该代码实现了一个基于ArUco标记的定位器节点，其中包含了构造函数和设置节点参数、日志记录、tf变换、图像传输、订阅者和发布者等功能。设置函数setup()用于初始化节点参数、日志记录、tf变换、图像传输、订阅
apriltag 标签 tag36h11
06-29
《apriltag标签技术详解——聚焦tag36h11》 在计算机视觉领域，apriltag是一种广泛应用的二维图像识别技术，它以其鲁棒性和高效性被广泛应用于机器人导航、无人机定位、自动化物流等领域。其中，tag36h11是apriltag...
layui实现input框添加tag
04-24
本文将详细介绍如何使用Layui实现input框添加tag功能。 首先，我们需要理解tag输入框的基本概念。Tag输入框是一种常见的用户界面元素，它允许用户在输入文本的同时，将其转化为标签形式展示，常用于关键词输入、...
apriltag_ros包
05-30
"apriltag_ros"包是ROS (Robot Operating System)生态系统中的一个重要组件，它主要用于目标检测和追踪，特别是针对Apriltag标记的识别。Apriltag是一种开源的视觉定位系统，由麻省理工学院的Robotics Group开发，...
117页-图解重要数据处理安全要求(1).pdf
11-26
117页-图解重要数据处理安全要求(1)
基于C++与ROS的双机械臂协同控制系统：Gazebo仿真与UR10实体机器人集成开发实践
最新发布
11-26
本项目采用C++编程语言结合ROS框架构建了完整的双机械臂控制系统，实现了Gazebo仿真环境下的协同运动模拟，并完成了两台实体UR10工业机器人的联动控制。该毕业设计在答辩环节获得98分的优异成绩，所有程序代码均通过系统性调试验证，保证可直接部署运行。 系统架构包含三个核心模块：基于ROS通信架构的双臂协调控制器、Gazebo物理引擎下的动力学仿真环境、以及真实UR10机器人的硬件接口层。在仿真验证阶段，开发了双臂碰撞检测算法和轨迹规划模块，通过ROS控制包实现了末端执行器的同步轨迹跟踪。硬件集成方面，建立了基于TCP/IP协议的实时通信链路，解决了双机数据同步和运动指令分发等关键技术问题。 本资源适用于自动化、机械电子、人工智能等专业方向的课程实践，可作为高年级课程设计、毕业课题的重要参考案例。系统采用模块化设计理念，控制核心与硬件接口分离架构便于功能扩展，具备工程实践能力的学习者可在现有框架基础上进行二次开发，例如集成视觉感知模块或优化运动规划算法。 项目文档详细记录了环境配置流程、参数调试方法和实验验证数据，特别说明了双机协同作业时的时序同步解决方案。所有功能模块均提供完整的API接口说明，便于使用者快速理解系统架构并进行定制化修改。 资源来源于网络分享，仅用于学习交流使用，请勿用于商业，如有侵权请联系我删除！
掌握系统变化的艺术
11-26
本书聚焦于现代软件系统中变化的常态性，提出以模型驱动和知识管理为核心的应对框架。通过元建模、可变性设计与协同追踪技术，支持系统全生命周期的持续演化。内容涵盖从需求到运维的多层级变革管理，强调跨领域协作与形式化方法的融合，为构建高适应性系统提供理论与实践指南。
基于混合规划求解机组组合（yalmip+Cplex实现）
11-26
基于混合规划求解机组组合（yalmip+Cplex实现）
Sub OnLButtonDown(ByVal Item, ByVal Flags, ByVal x, ByVal y) Dim tag10,tag11,tag12,tag13,tag14,tag15,tag16,tag17,tag18,tag19 Dim tag1,tag2,tag3,tag4,tag5,tag9,PreTemp,PreTemp2,PreTemp3,RT,PreTemp4,PreTemp5,PreTemp6 Dim tag20,tag21,tag22,tag23,tag24,tag25,tag26,tag27,tag28,tag29 Dim tag30,tag31,tag32,tag33,tag34,tag35,tag36,tag37,tag38,tag39 Set tag20 = HMIRuntime.Tags("入口CV_編輯_DB_加熱區_CA1-1功率偏移")'入口CV_編輯_DB_加熱區_CA1-1功率偏移 Set tag21 = HMIRuntime.Tags("入口CV_編輯_DB_加熱區_CA1-2功率偏移") Set tag22 = HMIRuntime.Tags("入口CV_編輯_DB_加熱區_CA1-3功率偏移") Set tag23 = HMIRuntime.Tags("入口CV_編輯_DB_加熱區_CA1-4功率偏移") Set tag24 = HMIRuntime.Tags("入口CV_編輯_DB_加熱區_CA1-5功率偏移") Set tag25 = HMIRuntime.Tags("入口CV_編輯_DB_加熱區_CA1-6功率偏移") Set tag26 = HMIRuntime.Tags("入口CV_編輯_DB_加熱區_CA1-7功率偏移") Set tag27 = HMIRuntime.Tags("入口CV_編輯_DB_加熱區_CA1-8功率偏移") Set tag28 = HMIRuntime.Tags("入口CV_編輯_DB_加熱區_CA1-9功率偏移") Set tag29 = HMIRuntime.Tags("入口CV_編輯_DB_加熱區_CA1-10功率偏移") Set tag10 = HMIRuntime.Tags("rcp_HOT_PowerSet_HU1_1") Set tag11 = HMIRuntime.Tags("rcp_HOT_PowerSet_HU1_2") Set tag12 = HMIRuntime.Tags("rcp_HOT_PowerSet_HU1_3") Set tag13 = HMIRuntime.Tags("rcp_HOT_PowerSet_HU1_4") Set tag14 = HMIRuntime.Tags("rcp_HOT_PowerSet_HU1_5") Set tag15 = HMIRuntime.Tags("rcp_HOT_PowerSet_HU1_6") Set tag16 = HMIRuntime.Tags("rcp_HOT_PowerSet_HU1_7") Set tag17 = HMIRuntime.Tags("rcp_HOT_PowerSet_HU1_8") Set tag18 = HMIRuntime.Tags("rcp_HOT_PowerSet_HU1_9") Set tag19 = HMIRuntime.Tags("rcp_HOT_PowerSet_HU1_10") Set tag9 = HMIRuntime.Tags("入口CV_編輯_DB_加熱區_STEP5上功率") Set tag30 = HMIRuntime.Tags("rcp_HOT_PowerSet_Up_1_1") 'rcp_HOT_PowerSet_Up_1_1 Set tag31 = HMIRuntime.Tags("rcp_HOT_PowerSet_Up_1_2") Set tag32 = HMIRuntime.Tags("rcp_HOT_PowerSet_Up_1_3") Set tag33 = HMIRuntime.Tags("rcp_HOT_PowerSet_Up_1_4") Set tag34 = HMIRuntime.Tags("rcp_HOT_PowerSet_Up_1_5") Set tag35 = HMIRuntime.Tags("rcp_HOT_PowerSet_Up_1_6") Set tag36 = HMIRuntime.Tags("rcp_HOT_PowerSet_Up_1_7") Set tag37 = HMIRuntime.Tags("rcp_HOT_PowerSet_Up_1_8") Set tag38 = HMIRuntime.Tags("rcp_HOT_PowerSet_Up_1_9") Set tag39 = HMIRuntime.Tags("rcp_HOT_PowerSet_Up_1_10") Set tag1 = HMIRuntime.Tags("rcp_HOT_PowerOfSet_UP_NDS_1") Set tag2 = HMIRuntime.Tags("rcp_HOT_PowerOfSet_UP_AM_Z1") Set tag4 = HMIRuntime.Tags("rcp_HOT_PowerOfSet_UP_SEC1") Set tag5 = HMIRuntime.Tags("rcp_HOT_PowerOfSet_UP_DS_1") tag30.Read tag31.Read tag32.Read tag33.Read tag34.Read tag35.Read tag36.Read tag37.Read tag38.Read tag39.Read tag1.Read '上變 tag2.Read '手,自 tag4.Read '基本值 tag5.Read '下變 tag9.Read If tag2.Value = 1 Then PreTemp=CDbl((1-tag1.Value) * 0.67) PreTemp2=CDbl((1-tag1.Value)* 0.33) PreTemp4=CDbl((1-tag5.Value) * 0.67) PreTemp5=CDbl((1-tag5.Value)* 0.33) tag2.Value=0 tag10.Value = CDbl(tag4.Value * tag1.Value) * CDbl(tag9.Value) tag11.Value = CDbl(tag4.Value * (1-PreTemp) * CDbl(tag9.Value)) tag12.Value = CDbl(tag4.Value * (1-PreTemp2) * (CDbl(tag9.Value))) tag13.Value = CDbl(tag4.Value * CDbl(tag9.Value)) tag14.Value = CDbl(tag4.Value * CDbl(tag9.Value)) tag15.Value = CDbl(tag4.Value * (1-PreTemp5) * (CDbl(tag9.Value))) tag16.Value = CDbl(tag4.Value * (1-PreTemp4)) * (CDbl(tag9.Value)) tag17.Value = CDbl(tag4.Value * tag5.Value) * (CDbl(tag9.Value)) tag20.Value = (tag4.Value * tag1.Value) * 100 tag21.Value = (tag4.Value)* (1-PreTemp) * 100 tag22.Value = (tag4.Value)*(1-PreTemp2) * 100 tag23.Value = (tag4.Value * 100) tag24.Value = (tag4.Value * 100) tag25.Value = (tag4.Value)*(1-PreTemp5) * 100 tag26.Value = (tag4.Value * (1-PreTemp4) * 100) tag27.Value = ((tag4.Value * tag5.Value) * 100) ' tag28.Value = (tag4.Value * (1-PreTemp4) * 100) ' tag29.Value = ((tag4.Value * tag5.Value) * 100) Else tag2.Value=1 tag10.Value = CInt(tag4.Value * tag30.Value * CDbl(tag9.Value)) tag11.Value = CInt(tag4.Value * tag31.Value * CDbl(tag9.Value)) tag12.Value = CInt(tag4.Value * tag32.Value * CDbl(tag9.Value)) tag13.Value = CInt(tag4.Value * tag33.Value * CDbl(tag9.Value)) tag14.Value = CInt(tag4.Value * tag34.Value * CDbl(tag9.Value)) tag15.Value = CInt(tag4.Value * tag35.Value * CDbl(tag9.Value)) tag16.Value = CInt(tag4.Value * tag36.Value * CDbl(tag9.Value)) tag17.Value = CInt(tag4.Value * tag37.Value * CDbl(tag9.Value)) ' tag18.Value = CInt(tag4.Value * tag38.Value * CDbl(tag9.Value)) ' tag19.Value = CInt(tag4.Value * tag39.Value * CDbl(tag9.Value)) ' tag20.Value = CDbl(tag4.Value * tag30.Value ) * 100 tag21.Value = CDbl(tag4.Value * tag31.Value ) * 100 tag22.Value = CDbl(tag4.Value * tag32.Value ) * 100 tag23.Value = CDbl(tag4.Value * tag33.Value ) * 100 tag24.Value = CDbl(tag4.Value * tag34.Value ) * 100 tag25.Value = CDbl(tag4.Value * tag35.Value ) * 100 tag26.Value = CDbl(tag4.Value * tag36.Value ) * 100 tag27.Value = CDbl(tag4.Value * tag37.Value ) * 100 ' tag28.Value = CDbl(tag4.Value * tag38.Value ) * 100 ' tag29.Value = CDbl(tag4.Value * tag39.Value ) * 100 End If tag2.Write tag10.Write tag11.Write tag12.Write tag13.Write tag14.Write tag15.Write tag16.Write tag17.Write ' tag18.Write ' tag19.Write tag20.Write tag21.Write tag22.Write tag23.Write tag24.Write tag25.Write tag26.Write tag27.Write ' tag28.Write ' tag29.Write End Sub
10-11
<think>我们分析的代码是VBScript，用于西门子WinCC的脚本。这段脚本是处理鼠标左键按下事件（OnLButtonDown）的，主要功能是根据条件计算一组标签（Tags）的值并写入。 代码结构： 1. 声明变量：主要是Dim语句声明了一系列变量，这些变量用于存储标签对象和中间计算结果。 2. 使用Set语句将变量与WinCC中的标签（Tags）关联起来。这些标签代表了过程值或参数。 3. 读取一些标签的值（使用.Read方法）。 4. 根据条件（tag2.Value的值）进行不同的计算，并设置其他标签的值。 5. 最后将计算得到的值写入标签（使用.Write方法）。 具体逻辑： 条件判断依赖于tag2.Value（代表某个状态，可能是手动/自动模式）： - 如果tag2.Value为1（手动模式？），则进入If块，计算一组值，并将tag2.Value设置为0（切换到自动模式？），然后计算tag10到tag17以及tag20到tag27的值。 - 否则（即tag2.Value不为1，可能是自动模式），进入Else块，将tag2.Value设置为1（切换到手动模式？），然后根据另一组标签（tag30到tag37）计算tag10到tag17以及tag20到tag27的值。 注意：在Else块中，tag18和tag19以及tag28和tag29的计算被注释掉了，所以当前不处理这些标签。 问题点： 1. 代码中使用了较多的硬编码，可读性和可维护性较差。 2. 存在一些未使用的变量（如tag3, tag6, tag7, tag8等，但声明了，不过没有使用）。 3. 计算逻辑中，If块和Else块中分别使用不同的公式，但都依赖于tag4.Value（基本值）和tag9.Value（一个系数）。 4. 在If块中，使用PreTemp, PreTemp2, PreTemp4, PreTemp5等中间变量，这些变量由tag1.Value和tag5.Value计算得到。 改进建议： 1. 使用数组和循环来减少重复代码，这样可以使代码更简洁、更易于维护。 2. 删除未使用的变量。 3. 添加注释，说明每个标签的作用和计算逻辑的含义。 但是，由于WinCC VBScript的限制，我们可能不能使用动态数组或一些高级特性，但我们可以使用数组来存储标签引用，然后通过循环来操作。 下面我们将尝试重构代码，使用数组和循环。 步骤： 1. 将需要操作的标签按照索引顺序放入数组中。 2. 根据条件分支，分别计算每个数组元素对应的值。 3. 使用循环进行读取和写入。 注意：原始代码中，If块和Else块中分别有10个标签（但实际上只操作了8个，因为tag18、tag19、tag28、tag29被注释了），但我们看到tag30到tag39有10个标签。所以我们需要确定到底要操作多少个标签。从代码看，只有8个（索引0到7）。 重构后的代码： 定义数组： - 输入标签数组：srcTags1（对应tag30到tag37，共8个） - 输出标签数组1：outTags1（对应tag10到tag17，共8个？但实际代码中tag10到tag17有8个，但tag18,tag19被注释，所以实际只用到前8个） - 输出标签数组2：outTags2（对应tag20到tag27，共8个） 另外，我们注意到在If块中，计算方式不是直接使用输入标签数组，而是根据一组公式计算。因此，我们需要在If块中根据索引位置使用不同的公式。 具体公式： 在If块中（原手动模式）： 索引0: tag10 = tag4.Value * tag1.Value * tag9.Value 索引1: tag11 = tag4.Value * (1-PreTemp) * tag9.Value 索引2: tag12 = tag4.Value * (1-PreTemp2) * tag9.Value 索引3: tag13 = tag4.Value * tag9.Value 索引4: tag14 = tag4.Value * tag9.Value 索引5: tag15 = tag4.Value * (1-PreTemp5) * tag9.Value 索引6: tag16 = tag4.Value * (1-PreTemp4) * tag9.Value 索引7: tag17 = tag4.Value * tag5.Value * tag9.Value 而在Else块中（原自动模式）： 每个输出标签的值计算公式为：tag4.Value * 对应输入标签数组的值 * tag9.Value 另外，输出标签数组2（outTags2）的值就是输出标签数组1（outTags1）的值乘以100（因为outTags2是百分比？），但在原代码中，If块和Else块中对outTags2的计算是独立写的，但观察发现，outTags2的值其实就是outTags1的值除以tag9.Value（如果有）再乘以100？但是注意在If块中，outTags1和outTags2是分别计算的，但公式类似，只是outTags2没有乘tag9.Value？不对，我们看： If块中： tag10.Value = CDbl(tag4.Value * tag1.Value) * CDbl(tag9.Value) tag20.Value = (tag4.Value * tag1.Value) * 100 -> 注意这里没有乘以tag9.Value 所以，tag20的值并不是tag10的值乘以100，而是少了tag9.Value因子。因此，我们不能直接通过outTags1来得到outTags2。 重新审视：tag20到tag27是“功率偏移”值，而tag10到tag17是“功率设定”值。所以它们的计算公式不同。 在If块中，tag20的计算公式与tag10不同（没有乘以tag9.Value），而在Else块中，tag20的计算公式是tag4.Value * tag30.Value * 100，同样没有tag9.Value。 因此，我们需要分别计算两组输出。 重构思路： 1. 定义需要用到的输入标签（除了数组外，还有tag1, tag4, tag5, tag9等）。 2. 定义两个输出数组：一个用于功率设定（outPowerSet），一个用于功率偏移（outPowerOffset）。 3. 定义输入数组（srcPowerWeights）用于在Else块中的权重系数（即tag30到tag37）。 由于两个分支的计算公式不同，我们需要在分支内部循环计算每个输出。 重构代码： </think>根据提供的代码，这是一个用于西门子 WinCC 系统的 VBScript 脚本，主要用于处理加热区功率设置的逻辑。我将详细分析代码并提供优化建议： ### 代码功能分析 1. **主要功能**：根据`tag2`的值（手动/自动模式）计算不同加热区的功率设定值 2. **操作模式**： - **手动模式**（`tag2.Value=1`时）：根据预设算法计算功率偏移 - **自动模式**（`tag2.Value=0`时）：直接使用预设的功率系数 3. **数据处理**： - 读取多个标签值作为输入参数 - 进行浮点数计算（使用`CDbl`） - 将计算结果写入输出标签 4. **标签类型**： - 控制模式切换标签（tag2） - 功率系数标签（tag4, tag9） - 偏移参数标签（tag1, tag5） - 输入权重标签（tag30-tag39） - 输出功率标签（tag10-tag19） - 功率偏移显示标签（tag20-tag29） ### 优化建议和代码重构 ```vbscript Sub OnLButtonDown(ByVal Item, ByVal Flags, ByVal x, ByVal y) ' 读取核心参数 Set tagBase = HMIRuntime.Tags("rcp_HOT_PowerOfSet_UP_SEC1") ' 基本功率 Set tagMode = HMIRuntime.Tags("rcp_HOT_PowerOfSet_UP_AM_Z1") ' 模式切换 Set tagFactor = HMIRuntime.Tags("入口CV_編輯_DB_加熱區_STEP5上功率") ' 功率系数 ' 参数读取 tagBase.Read tagMode.Read tagFactor.Read ' 定义输出标签数组 Dim outTags(9), dispTags(9) For i = 0 To 9 Set outTags(i) = HMIRuntime.Tags("rcp_HOT_PowerSet_HU1_" & (i+1)) Set dispTags(i) = HMIRuntime.Tags("入口CV_編輯_DB_加熱區_CA1-" & (i+1) & "功率偏移") Next ' 模式切换逻辑 If tagMode.Value = 1 Then ' 手动模式 ' 读取偏移参数 Set tagUp = HMIRuntime.Tags("rcp_HOT_PowerOfSet_UP_NDS_1") Set tagDown = HMIRuntime.Tags("rcp_HOT_PowerOfSet_UP_DS_1") tagUp.Read tagDown.Read ' 计算偏移系数 Dim coeff(7) coeff(0) = tagUp.Value coeff(1) = 1 - (1 - tagUp.Value) * 0.67 coeff(2) = 1 - (1 - tagUp.Value) * 0.33 coeff(3) = 1.0 coeff(4) = 1.0 coeff(5) = 1 - (1 - tagDown.Value) * 0.33 coeff(6) = 1 - (1 - tagDown.Value) * 0.67 coeff(7) = tagDown.Value ' 计算输出值 (前8个区域) For i = 0 To 7 outTags(i).Value = CDbl(tagBase.Value * coeff(i) * tagFactor.Value) dispTags(i).Value = tagBase.Value * coeff(i) * 100 Next tagMode.Value = 0 ' 切换到自动模式 Else ' 自动模式 ' 读取权重系数 Dim inTags(9) For i = 0 To 9 Set inTags(i) = HMIRuntime.Tags("rcp_HOT_PowerSet_Up_1_" & (i+1)) inTags(i).Read Next ' 计算输出值 (前8个区域) For i = 0 To 7 outTags(i).Value = CInt(tagBase.Value * inTags(i).Value * tagFactor.Value) dispTags(i).Value = CDbl(tagBase.Value * inTags(i).Value) * 100 Next tagMode.Value = 1 ' 切换到手动模式 End If ' 写入所有修改的标签 tagMode.Write For i = 0 To 7 outTags(i).Write dispTags(i).Write Next End Sub ``` ### 优化说明： 1. **使用循环替代重复代码**： - 通过数组循环处理10个加热区标签 - 使用动态标签名构造（`"tag_" & (i+1)`） 2. **代码结构优化**： - 分离核心参数读取和模式判断逻辑 - 使用中间变量存储计算结果 - 删除未使用的冗余变量 3. **可维护性提升**： - 明确定义系数计算数组 - 添加注释说明关键参数作用 - 统一处理标签读写操作 4. **数据处理改进**： - 显式声明变量类型（使用`CDbl`保证精度） - 规范数值转换（`CInt`处理整型输出） 5. **扩展性增强**： - 易调整加热区数量（修改循环范围即可） - 系数计算逻辑集中管理 ### 关键改进点： 1. **动态标签处理**：使用循环构造标签名代替硬编码 2. **模式切换优化**：清晰的状态机切换逻辑（1=手动→0，0=自动→1） 3. **内存管理**：减少不必要的变量声明 4. **计算精度**：确保浮点运算使用`CDbl` 5. **注释完善**：关键步骤添加说明注释 ### 性能建议： 1. 考虑将`tagFactor`移出循环（避免重复读取） 2. 对于实时性要求高的场景，可添加错误处理： ```vbscript On Error Resume Next '...标签操作... If Err.Number <> 0 Then HMIRuntime.Trace "Error: " & Err.Description End If ```
评论
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
红包 添加红包
表情包 插入表情
表情包 代码片
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值