按键精灵上的一些代码,求大神用详细语言注释一下,每一行
选中要注释的代码后 点一下画圈的// 注释了 点下边的2个红叉叉就恢复
观点清晰简洁的注释还是很有必要的。良好的代码习惯,能带来事半功倍的效果。
不管是作为范例给别人参考,还是多年后自己翻出当年的代码,良好的注释都能一目了然。
注释的书写格式
按键精灵的注释有三种格式:
本帖隐藏的内容
1.单引号:'需要注释的内容
1. Call 自动打怪() '调用自动打怪子程序
2. /*需要注释的内容*/
1. Call 自动打怪() /*调用自动打怪子程序*/
3. //需要注释的内容
1. Call 自动打怪() //调用自动打怪子程序
注释的添加原则
1. 完美注释的第一条原则:形式统一
简洁明了的注释,全文都用一种固定格式的注释形式,不要一会用//,一会用'。
2.完美注释的第二条原则:简洁明了
能用一个词表达的意思,不要再啰嗦成一大段了T_T。比如“打怪”,就不要说“遇到怪物,判断血条之后……再打”
多余无用的注释,不要~~~坚决say no
注释的数量不要太多,不要为了注释而去注释。
3.完美注释的第三条原则:注释先于代码创建(或边写代码边写注释)
不要太相信自己的记忆力,人脑记忆容量在一段时间内是有限的。你一转身就可能忘记你刚刚脑子里想的事呢。
人脑的瞬时记忆容量与保持时间:
图像记忆:保持时间0.25-1秒,容量为9-20个bit(项目)
声象记忆:保持时间大约2秒,不长于4秒,容量为5个bit
4.完美注释的第四条原则:注释的位置,就近原则。
保证注释与其描述的代码相邻,即注释的就近原则。
一般代码注释:放在其上方相邻或右方的位置,不可放在下方。
批量变量声明注释:行尾注释是合适的,在这种情况下,将所有行尾注释要对齐。
5.完美注释的第五条原则:一些添加注释的建议。
-->>典型算法必须有注释。
-->>在代码不明晰或不可移植处必须有注释。
-->>在代码修改处加上修改标识的注释。
-->>在循环和逻辑分支组成的代码中添加注释。
-->>为了防止问题反复出现,对错误修复和解决方法的代码使用注释,尤其是在团队环境中。
分享大神美美的代码注释
// 运行程序获取句柄
Event Form1.Button5.Click
代码内容
End Event
// 运行程序获取编辑框句柄
Event Form1.Button8.Click
代码内容
End Event
// 获取控件句柄[枚举]
Event Form1.Button6.Click
1. hWnd = Plugin.tz.GetEnumWindow(CLng(Form1.InputBox1.Text), CLng(Form1.InputBox2.Text))
2. MsgBox hWnd
3. End Event
4.
5. // 获取控件句柄[ID]
6. Event Form1.Button7.Click
7. hWnd = GetDlgItem(CLng(Form1.InputBox3.Text), CLng(Form1.InputBox4.Text))
8. MsgBox hWnd
9. End Event
10.
11. // 前台方式模拟画图
12. Event Form1.Button9.Click
13. 代码内容
14. End Event
15.
16. // 后台方式模拟画图
17. Event Form1.Button10.Click
18. 代码内容
19. End Event
20.
21. // 前台方式操作记事本
22. Event Form1.Button11.Click
23. 代码内容
24. End Event
25.
26. // 后台方式操作记事本
27. Event Form1.Button12.Click
28. 代码内容
29. End Event
复制代码
账号列表 = Plugin.File.ReadFileEx(账号列表文本)//读取内容
dim ids//按键精灵9来说是多余的变量,但高手们都习惯这样写
ids = Split(账号列表, "|")//这个变量分开
While Len(ids(h))>=1//循环读取长度,判断H参数有多少
h = h + 1//循环一次=+1个参数
Wend//没有发现参数后结束
i = 0//赋予i一个值0
Delay 500
While i < h//循环I小于H值时,也就是说i小于H就停止循环
i = i + 1//循环一次I+1,I=0+1意思
zm = split(ids(i), "=")//变量ZM判断I和H用的,至于后面的=号就不知道什么意思了
zh = zm(0)//将ZM第一个值变成ZH
mm = zm(1)//第二个只变成MM
i = i + 1//i再次加1,这时i成了2
//
do while 1=1//这里其实是多余的,其实主要判断ZM第三次的量
if zm(2)="已完成" then//判断ZM的值是否等于已完成,三个字,也就是说它文件最后一句有这三个字的
i = i + 1//再次加i的值
zm = split(ids(i), "=")//再次分开ZM
zh = zm(0) //账号//再次变量第一个参数
mm = zm(1) //密码//第二个参数
i = i + 1//再加i的值
Else
Exit Do//如果ZM第三次值不是“已完成”退出循环
End If
//DNF涮图代码PL完上下一个号
wend
wend
//大概就这样了,它写的看似简单,暗藏高处,其实也不必那么复杂,它主要读取账号密码,只要把文本全部读完再分开,然后一个一个循环切换就行。
按键精灵,求一段简单而完整的代码
Call Plugin.Office.OpenXls("D:\\k.xls")Text1 = Plugin.Office.ReadXls(1, 3, 1)Delay 10 Text2 = Plugin.Office.ReadXls(1, 3, 2)\/\/抱歉,带有自定义的弹出窗口的插件命令我找不到了,你自己找找 \/\/然后你就直接黏贴Text1也可以 ,然后keypress TAB 再黏贴 如果回答你还满意,请...
求 按键精灵后台按某个键的实现代码,
两个键的间隔随便你调。后台运行后代码只运行一次,所以我用for循环10000次,如果太短,你也可以调大一点。要后台运行就加入这个代码 PutAttachment.plugin Plugin shuaxin = Window.GetKeyFocusWnd()然后输入 Plugin Window.SendKeypress(shuaxin,116)116可以是任意键盘的ASCII码值,可以用精灵察看 ...
高分!求一个按键精灵的脚本代码
VBSCall a=GetPixelColor(100,120)VBSCall b=GetPixelColor(101,121)VBSCall c=GetPixelColor(102,122)If a=b If a=c MoveTo 27 750 LeftClick 1 EndIf 复制上面的到源代码就可以了 \/\/第一行括号内为x1,y1;第二行括号内为x2,y2;第三行括号内为x3,y3; MoveTo 27 750为鼠标移到 x ...
跪求按键精灵自动输入编号脚本代码
输入编号之后呢?你要说清楚从哪一步开始循环,比如,你是要,选一个原件输入编号1后点确认?还是按回车?确认后,又后选一个原件再输入编号2,这样无限循环?如果是这样,a = 0 Delay 1000 Rem 从这里循环 MoveTo x, y LeftClick 1 \/\/上面的x,y改成你要选择的原件在屏幕对应的坐标 Delay ...
按键精灵,如何设置,五个不同时间点,执行相同的代码
T3 = "12:00:00"T4 = "17:30:00"T5 = "23:00:30"\/\/\/ 设置上面的5个时间 \/\/\/ T = array(T1, T2, T3, T4, T5)Do For i = 0 To UBound(T)Do Delay 999 Loop Until DateDiff("s", t(i), time) = 0 Next \/\/ ↓↓↓复制上你要执行的代码 ↓↓↓ \/\/ Loop ...
求大神给写个按键精灵的代码
用文件插件内的命令获取整个文本内容.然后用split函数把每行分出来保存到数组.用找色或找图的方法找到游戏输入框的位置.然后把每行再分拆出来,输入.Text = Plugin.File.ReadFileEx("D:\\测试\\1.txt")\/\/获取文本内容 tt = split(Text, "|")\/\/分拆内容保存到数组 for i = 0 To UBound(tt)\/\/...
按键精灵自动按键代码
前台 Rem anjian KeyPress "X", 1 Delay 100 Goto anjian 后台 Hwnd = Plugin.Window.Foreground()Rem anjian Call Plugin.Bkgnd.KeyPress(Hwnd, 83)Delay 100 Goto anjian 有问题Q我 这个我还是会的
这是按键精灵跑商里面的一段代码,谁能给我详细的介绍以下每名的意思及...
---创建插件对象,应该是识字的插件 ---获取当前键盘操作的窗口句柄 ---对刚获取句柄的窗口得到它的客户区大小 ---上面三句,一起使用的,就是把客户区大小上的坐标X,坐标Y进行分开,这里的x1=MyArray(0)就是把客户区上的坐标第一个坐标值赋值给x1,y1=MyArray(1)把客户区上的坐标第二个坐标值...
按键精灵颜色判断代码怎么写?
点击几次还是按住不动?或者是别的?IfColor 234,600,"#FF6600",0 Then EndScript\/\/脚本停止运行Else \/\/重复运行 \/\/从哪里开始重复?End If Else \/\/如果点628,1846不等于#FF6600\/\/怎么办?End If持续点击怎么持续?循环从哪里循环?第一个条件不符合怎么办?代码填完整就能用了 ...
按键精灵 后台键盘代码
Hwnd = Plugin.Window.MousePoint() Call Plugin.Bkgnd.KeyPress(Hwnd, 90) Delay 4800 Call Plugin.Bkgnd.KeyPress(Hwnd, 65) Delay 24000 没给你弄循环,因为你没说要循环多少次 追问: 麻烦你改下,无限制循环的。好麽?感谢了。还有就是适合(1024\/768)游戏窗口辩率的吧?可以把窗口缩小...
彭帝复方: VB中的键码常数 键码值 描述 ------------------------------------------------------------------- vbKeyLButton 1 鼠标左键 ------------------------------------------------------------------- vbKeyRButton 2 鼠标右键 ------------------------------------------------------------------- vbKeyCancel 3 ...
龙海市18415202551: 求一段按键精灵代码 - ?
彭帝复方: Dimenv an DoFindColorEx 44, 252, 266, 477, "e95b06", 0, 0.9, X, Y BeginThread an(x, y) Delay 800 Loop Function an(a,b) If aLeftUp 1 an = 0 ElseIf a > 0 and an = 0 Then MoveTo a, b Delay 10 LeftDown 1 an = 1 ElseIf a > 0 and an = 1 Then MoveTo a, b Delay 10 LeftDown 1 MoveTo 155, 365 End If End Function没有分就给个好评吧
龙海市18415202551: 高分!求一个按键精灵的脚本代码 - ?
彭帝复方: VBSCall a=GetPixelColor(100,120) VBSCall b=GetPixelColor(101,121) VBSCall c=GetPixelColor(102,122) If a=bIf a=cMoveTo 27 750LeftClick 1EndIf复制上面的到源代码就可以了//第一行括号内为x1,y1;第二e79fa5e98193e58685e5aeb...
龙海市18415202551: 求按键精灵脚本代码 - ?
彭帝复方: MoveTo 627,765 LeftClick 1 Delay 200 Rem a VBSCall FindColorEx(445,265,835,475,"82ffff",1,0.9,x,y) If x>0MoveTo x,yRightClick 1 ElseDelay 200Goto a EndIf
龙海市18415202551: 按键精灵求此代码详解!搞了半天也没搞懂原理,求助!高手请过目一下!赶鸡不尽?
彭帝复方: A*B*C*D*E*F*G*求解 ====== 其中的*只是个标识符用于下面Split分割字符串,split遇见*就进行分割~后面的应该是随机产生字符吧~(VB不熟,只能解释道这了~还有调用Split方法应该返回的数组集合吧)
龙海市18415202551: 求一个按键精灵后台代码 - ?
彭帝复方: Hwnd = Plugin.Window.MousePoint()//获取鼠标指向窗口的句柄 For 15Call Plugin.Bkgnd.KeyPress(Hwnd, 38)//按up15次 Next For 15Call Plugin.Bkgnd.KeyPress(Hwnd, 13)//按回车15次 Next 只要刚开始运行时把鼠标指向那个窗口就好了 希望能对您有帮助.
龙海市18415202551: 求按键精灵大神来一个脚本,会做的很简单! - ?
彭帝复方: ///以下为按键精灵手机助手代码,因为需要使用到附件的内容,需要在电脑中编写好生成小精灵才能在手机中使用 Dim intX, intY Do TouchDown 100, 100, 1//按住屏幕上的100,100坐标不放,并设置此触点ID=1//坐标要根据实际来修改一下 ...
龙海市18415202551: 按键精灵代码翻译 - ?
彭帝复方: BeginHotkey=121//启动脚本的全局快捷键,这里121是F10 PauseHotkey=0//暂停使用的全局快捷,这里0表示没有设定 StopHotkey=123//停止脚本的全局快捷键,这里123是F12 RunOnce=1//脚本是否循环,1表示执行一次,要循环的就话设定这个数大于1,表示循环几次 EnableWindow=//表示脚本对哪个窗口有效有问题,百度消息通知我
龙海市18415202551: 求按键精灵代码. - ?
彭帝复方: //把下面代码放进源代码中 Rem 1 WaitKey y If y=70 SayString 123 ElseIf y=67 SayString 456 ElseDelay 200 Goto 1 EndIfEndIf
龙海市18415202551: 求写按键精灵代码 - ?
彭帝复方: Do //这里创建了一个无限循环 Delay 60000*3 //等待3分钟 LeftClick 1//点击鼠标左键一次 Delay 2000//延迟2秒 LeftClick 1//点击鼠标一次 Loop