育才学习网按键精灵怎么写子程序
1.按键精灵子程序怎么用
先说一下子程序的意思，子程序如一个箱子，你可以往里面安放各种代码，当你要用到里面的代码的时候，你就可以调用子程序，执行copy里面的代码。子程序一般是用在某段代码应用较多的时候，反复输代码太麻烦，不如存进一个子程序，想用的时候一句调用就可以了。下面说一下按键8及以上版本的语法。
例：
Sub a
LeftClick 1
End Sub
Call a
Call a
Call a
粘贴到按键精知灵上，运行脚本，鼠标会连续点击三次。这段代码的意思是先建立一个子程序，叫a（子程序名是你自己定的，中文也行），里面装着鼠标单击一次的命令，下道面调用三次子程序a，意思就是执行三次子程序a里的命令，所以鼠标就会单击三次。明白了吗？
全手打，望采纳。
2.怎么设置按键精灵子程序
好吧，我来消灭0回复：
（按键版本：8.x ）
//支持Exit Sub 命令退出子程序过程
Call 子程序（）
EndScript
Sub 子程序（）
Msgbox "我是子程序，被你调用了"
End Sub
（按键版本： 7.x）
Gosub 子程序
EndScript
Sub 子程序
Msgbox "我是子程序，被你调用了"
Return 子程序
可以把“子程序”这几个字改成你想要的子程序名字
3.按键精灵 怎么按自己的设置的命令 运行某子程序
Dim Input
Do
Input = InputBox（"请输入运行的程序，提示：12356"）
If int(len(Input))>6 or int(len(Input))<=0
Else
For a=1 to len(Input)
if int(Mid(Input, a, 1))=1
call q1()
ElseIf int(Mid(Input, a, 1))=2
call q2()
ElseIf int(Mid(Input, a, 1))=3
call q3()
ElseIf int(Mid(Input, a, 1))=4
call q4()
ElseIf int(Mid(Input, a, 1))=5
call q5()
ElseIf int(Mid(Input, a, 1))=6
call q6()
End If
Next
Exit Do
End If
Loop
Sub q1()
MessageBox "运行q1"
End Sub
Sub q2()
MessageBox "运行q2"
End Sub
Sub q3()
MessageBox "运行q3"
End Sub
Sub q4()
MessageBox "运行q4"
End Sub
Sub q5()
MessageBox "运行q5"
End Sub
Sub q6()
MessageBox "运行q6"
End Sub
4.按键精灵中 怎么给子程序定义一个参数
这主要涉及到sub与function过程的应用。
只能给你说个大概思路。看代码//每隔5分钟循环判断背包DoWhiletrueIf判断（）=trueThenExitDo//这句代码意思：先执行判断（）子程序，取得其返回值。
如果返回值是true，即背包满了，就跳出循环Delay5*60*1000//延迟5分钟loopCall回城（）Call卖东西（）Function判断（）//背包满了返回真，否则返回假Dimrefer//定义局部变量If判断条件成立Thenrefer=trueElserefer=falseEndIf判断=refer//返回refer值EndFunctionSub回城（）EndSubSub卖东西（）EndSub大致思路就这样，中间涉及到很多细节问题，需要你自己去完善。比如回城前应停止打怪；回城后怎样找到商人；卖东西，哪些卖，哪些不卖。
卖完东西后怎么返回挂机地点。
5.按键精灵 子程序选择
While True
Key = WaitKey（) //等待按键按下，获取按下键的ASCII码，按键精灵里面有查询ASCII码
//在按键精灵里面，是不用定义变量的（数组和环境变量要定义）。
//有关全局变量和局部变量，例子脚本里面有。
Select Case Key
Case 65 : Call 单怪（）
Case 66 : Call 多怪（）
End Select
Wend
Sub 单怪（）
//写执行打单怪代码，注意代码不能是死循环
End Sub
Sub 多怪（）
//写执行打多怪代码，注意代码不能是死循环
End Sub
//代码实现功能：按一下A键打单怪，按一下B键，打多怪
//如果打怪程序是死循环，打完怪后你要先停止脚本，再启动
按键精灵怎么写多线程
1.按键精灵多线程怎么写
多线程写法也很简单，而且容易看懂，修改参数比较简单BeginThread ADelay 10BeginThread BDelay 10BeginThread CSub A()While trueKeyPress "A", 1For 10Delay 1000NextWendEnd SubSub B()While trueKeyPress "B", 1For 3Delay 1000NextWendEnd SubSub C()While trueKeyPress "C", 1For 7Delay 1000NextWendEnd Sub。
2.按键精灵多线程怎么写
多线程写法也很简单，而且容易看懂，修改参数比较简单
BeginThread A
Delay 10
BeginThread B
Delay 10
BeginThread C
Sub A()
While true
KeyPress "A", 1
For 10
Delay 1000
Next
Wend
End Sub
Sub B()
While true
KeyPress "B", 1
For 3
Delay 1000
Next
Wend
End Sub
Sub C()
While true
KeyPress "C", 1
For 7
Delay 1000
Next
Wend
End Sub
3.按键精灵如何多线程操作
一、功能介绍
1、多线程相关功能目前包括：启动线程、结束线程、等待（按键安卓版独有）、设置共享变量、获取共享变量5个
2、多线程启动时支持多个参数，最多支持10个
3、如果需要控制某线程，需要在线程启动时候写返回值，但这个返回值无法输出，仅用于控制线程（这里无法像PC按键一样输出线程的ID号码）
4、一旦主线程停止，所有还在运行的子线程也全部强行停止
5、线程之间变量交互可以利用共享变量来完成，共享变量无需定义
二、实例代码使用方法：
1、启动一个线程，并用变量a代表该线程
Dim a=Thread.Start（子程序）
2、结束变量a代表的线程
Thread.Stop(a)
3、等待变量a代表的线程直至该线程运行完毕
Thread.Wait(a)
4.按键精灵怎么弄多线程
BeginThread a : BeginThread b : BeginThread c
BeginThread d : BeginThread e : BeginThread f
//声明线程数量，从a-f一共六个
Sub a
// a线程运行程序
End Sub
Sub b
// b线程运行程序
End Sub
Sub c
// c线程运行程序
End Sub
Sub d
// d线程运行程序
End Sub
Sub e
// e线程运行程序
End Sub
Sub f
// f线程运行程序
End Sub
5.按键精灵怎么使用多线程
所谓多线程，事实和单线程一个样子，cpu并不可能做到真正的“同时”，本质上，每个核一个时钟所做的事情就是那么多，不管上面程序怎么写，计算机都是按时序执行的（这些牵涉到微机原理以及单片机的东西，要懂底层才能明白，如果纯做应用层，不需要明白，不过，不管怎样写代码，cpu是不可能做到绝对“同时”的，明白这点就行了），想执行时间快，就必须先把数据调入内存，在内存里面完成，结束后才释放内存，这种方法是最快的，但是这样做非常耗内存（具体怎么做按键精灵是无法操作的，这个也不是应用层要做的事情，所以你知道就好，不用理会这个问题）
回到你的问题，为了加快你找色速度，首先尽量缩小你找色的范围，之后，把相似度尽量提高，相似度是1时候最快，但是很容易影响找色结果，这个你自己看着办，建议用大漠插件，大漠插件里面有一个找多色指令，这个指令几毫秒可以完成找多色，比你自己用按键自带插件，写一个函数的方法快多了，本人认为大漠插件能解决你的问题。
6.大神帮忙写下按键精灵多线程代码
For i = 1 to 2RunApp "notepad.exe"Delay 200Hwnd = Plugin.Window.Find(0， "无标题 - 记事本")Delay 200Call Plugin.Window.SetText(Hwnd，"进程"&i)Call Plugin.Window.SetClientSize(Hwnd, 300, 300)Call Plugin.Window.Move(Hwnd, i*300-200, 300)nextid1 = BeginThread(a1)id2 = BeginThread(a2)Sub a1()Hwnd1 = Plugin.Window.Find(0， "进程1")HwndEx1 = Plugin.Window.FindEx(Hwnd1 , 0, "edit",0)TracePrint Hwnd1&" "&HwndEx1For i = 65 To 100PauseThread id2Call Plugin.Window.Active(HwndEx1)KeyPress i, 1Delay 500ContinueThread id2PauseThread id1NextEnd SubSub a2()Hwnd2 = Plugin.Window.Find(0， "进程2")HwndEx2 = Plugin.Window.FindEx(Hwnd2 , 0, "edit",0)TracePrint Hwnd2 & " " & HwndEx2PauseThread id2For i = 65 To 100PauseThread id1Call Plugin.Window.Active(HwndEx2)KeyPress i, 1Delay 500ContinueThread id1PauseThread id2NextEnd Sub看看我这个玩记事本的差不多一个道理。
按键精灵怎么写代码
1.按键精灵 提问 源代码怎么写
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
//这一句是一行的
While True
KeyState = GetAsyncKeyState(81)
If KeyState KeyDown 74, 1
Else
KeyUp 74, 1
Delay 100
KeyPress 75, 1
End If
Wend
2.按键精灵知道代码,怎么写成脚本
打开按键精灵，切换到源文件模式，把代码直接粘贴就好了.然后点击上面发布。生成小精灵就OK了。
但这只能是没有附件，没有界面，没有插件的源码可以。
如果有界面，你需要按照代码，画出界面来。然后将附件添加进去。如果有其他支持库，你必须要有支持库文件，放在按键精灵plugin目录下，如：Q语言大学按键精灵支持库.dll。
至于如何判断代码是不是包含这些，只需要点击调试。如直接通过，则可以直接发布成EXE小精灵。如果无法通过，可以在下方调试的脚本信息，查看需要一些什么
专业作者回答，请采纳。如有以问，请追问
3.求大神写一个按键精灵脚本代码
按键精灵的鼠标动作录制是一项非常好用的功能，但因为鼠标点击的地方是固定死板的，且延迟时间无法调整，如果在后台脚本中添加一些专用代码，就可以调整点击频率和点击时间，甚至可以在安卓模拟器上使用模拟按压式点击，当然，这只是冰山一角，创造脚本为专业连续作业做准备才好玩呢！

按键精灵脚本代码大全：
小技巧：按Ctrl+F，输入命令，即可进行查找定位：
按键精灵命令使用方法：
键盘命令分为两大类：键盘模拟命令和键盘控制命令.键盘模拟命令可以模拟我们日常操作键盘的行为.操作键盘的动作分为三类：按下、弹起、按下并弹起.键盘控制命令可以在脚本执行过程中通过键盘控制脚本行为.
[KeyPress、KeyPressS、KeyPressH]
格式： KeyPress {键盘虚拟码}，{次数}
解释： 先"按下"再"弹起"键，模拟我们平时的"按键"操作
4.按键精灵颜色判断代码怎么写
/**按住滑动*/
MoveTo 782,1277//鼠标移动到782,1277
LeftDown 1//左键按下
MoveTo 760, 1680//鼠标移动到760,1680
LeftUp 1//左键弹起
/**颜色判断*/
IfColor 628,1846,"#FF6600",0 Then//如果点628,1846等于#FF6600
MoveTo 785, 1835//鼠标移动到785,1835
LeftClick 1//左键点击一次
//持续。。。怎么个持续法？点击几次还是按住不动？或者是别的？
IfColor 234,600,"#FF6600",0 Then
EndScript//脚本停止运行
Else
//重复运行
//从哪里开始重复？
End If
Else //如果点628,1846不等于#FF6600
//怎么办？
End If持续点击怎么持续？循环从哪里循环？第一个条件不符合怎么办？代码填完整就能用了
5.按键精灵随机输入文本代码怎么写
Dim Y(9),Z(9)
Val = InputBox（"用|分隔"，"请输入10个字或词"，"你好|再见|老头|郁闷|努力|神马|纠结|Seven|Eight|Nine",7000,7000）
X = Split(Val, "|")
i=0
Rem 随机数
If i=10
Goto 输出
End If
randomize(timer)
n=int(10*rnd)
If n=10
Goto 随机数
End If
j=0
Rem 随机排序
If j=i
Z(j)=n
i=i+1
Goto 随机数
Else
If Z(j)=n
Goto 随机数
Else
j=j+1
Goto 随机排序
End If
End If
Rem 输出
i=0
For 10
Y(i)=X(Z(i))
i=i+1
Next
Call RunApp("notepad.exe")
Delay 1000
Hwnd = Plugin.Window.Find(0， "无标题 - 记事本")
Hwnd = Plugin.Window.FindEx(Hwnd, 0, "Edit", 0)
i=0
For 10
Call Plugin.Window.SendString(hwnd,Y(i))
Call Plugin.Bkgnd.KeyPress(hwnd,13)
i=i+1
Next
6.求按键精灵代码
Rem 等待按键1
WaitKey key
TracePrint "用户按下的键是：" & key
If key=65
Gosub XXX
//执行你需要的东西.
Delay 1000
Goto 等待按键1
EndScript
SUB XXX
这里加你的脚本内容
RETURN XXX
将你要执行的XXX写成SUB，然后调用
方法2
直接写你要直接的XXX，然后开始键设为A，即可
7.按键精灵 翻页代码怎么写
FindPic fanyeX,fanyeY,fanye1X,fanye1Y,"Attachment:\3221.bmp",1,intX2,intY2
FindPic fanyeX,fanyeY,fanye1X,fanye1Y,"Attachment:\12.bmp",1,intX3,intY3
FindPic fanyeX,fanyeY,fanye1X,fanye1Y,"Attachment:\21.bmp",1,intX4,intY4
FindPic fanyeX,fanyeY,fanye1X,fanye1Y,"Attachment:\321.bmp",1,intX1,intY1
If intX1 > 0 And intY1 > 0 Then
Call shouye()
ElseIf intX2 > 0 And intY2 > 0 Then
Call xiayiye()
ElseIf intX3 > 0 And intY3 > 0 Then
Call xiayiye()
ElseIf intX4 > 0 And intY4 > 0 Then
Call shouye()
Else
MessageBox "没有找到图片"
End If完成。
8.帮写一段按键精灵代码
//以下只是参考指令，楼主执行修改，如果有不明白的地方可以追问！
//判断A点颜色
Rem A点颜色
IfColor 0,0,0,0
//当色点等于A，则移动鼠标到某处，按一下左键，
MoveTo 0,0
Delay 100
LeftClick 1
//然后移动到另一点再按一下鼠标左键。
moveto 0,0
Delay 100
LeftClick 1
Else
//设置点延时
Delay 100
//当不等于A时判断下面
Goto B点颜色
EndIf
//判断B点颜色
Rem B点颜色
IfColor 0,0,0,0
//当颜色等于B，则ATL+C,
KeyDown 18,1
KeyPress 67,1
KeyUp 18,1
//延迟500毫秒ALT+V。
Delay 500
KeyDown 18,1
KeyPress 86,1
KeyUp 18,1
Else
//当颜色不等于B，则ALT+W
KeyDown 18,1
KeyPress 87,1
KeyUp 18,1
EndIf
//脚本结束
EndScript
有什么不懂的楼主可以追问
天龙八部脚本怎么写
1. 天龙八部按键脚本怎么做
lz想找按键代码是吧，其实天龙八部的代码很简单。我给你个最简单的，自己去找规律
IfColor 163,58,111111,2
Gosub sub a
Sub a
MoveTo 34,61
LeftClick 1
KeyPress 114,1
Delay 3000
Return a
常识就是 当某某坐标达到什么条件 就运行什么程序 按键精灵都会写的。 去看论坛很多天龙八部打怪 种地的脚本，自己慢慢掌握，很容易上手。毕竟懒人很多。， 谢谢
2. 天龙八部3脚本
天龙八部3 梦想内部辅助
功能（通过脚本自行编写）
自动主线1-40（支持全职业）
自动登录
掉线重连
掉号重登
自动换号
自动跑商
自动师门（支持全职业）
自动刷棋，刷跑，刷反
自动扫元宝
自动摆摊
自动喊话
自动挖矿
自动鉴定双完美
自动交易
自动挂机
高反单刷.
定时脚本，可自行设置每天什么时候运行什么脚本.
动态黑屏优化
动态隐藏游戏
支持自行编辑修改各种脚本
局域网，外网答题
增加 主控自定义上号间隔时间。
增加 超级内存黑屏客户端优化，超省CPU，内存资源。开号数量更多。全黑不掉线
增加 脚本命令 加帮（1） 加入ID为1的帮会。此命令可以远程使用.
增加 三条脚本命令：初始化计时器（） 计时器加一（） 判断计时器（） 详细请看脚本说明.
增加 自定义跑商环数，跑商完成后自动远程换金（可选），跑商完成后自动远程捐金（可选）
增加 加帮配置.
增加 帐号停权检测，如果登录时帐号停权，会自动关闭游戏，换号登录.（需要把主控上自动换号勾上）.
增加 一千零一个愿望脚本
增加 师门投机取巧和师门相助，做不了的任务会先投机取巧和师门相助，如果完成 就交任务，如果失败就放弃.
增加 内挂师门抓宠选项，打勾做师门会抓宠，去掉勾则放弃.
增加 死亡后自动找治疗NPC治疗.
联系方式QQ 鑫丰文化
3. 天龙八部脚本
天龙八部新大脚自动刷马贼自动刷和尚自动刷猪自动收元宝自动抢元宝自动提悟性自动重楼自动摆摊自动主线任务自动箱子反贼等等所有任务可以可以进行任务时间计划 先做马贼在刷猪在刷跑商等等，一天设置的任务好了过几天来看收益（只要你的电脑够强大）脚本占用内存低忽略不计^_^功能介绍：刷怪：1、高效率抢怪刷怪.多点挂机.完全后台.游戏可最小化4、支持各种功能、组队技能自动使用，自动所有门派所有技能。
5、支持所有人（好友/非好友）自动组队，支持特定好友自动组队6、支持跟随队长模式，协助队长攻击也可单独选怪7、自动召唤宠物战斗.默认为当前出战宠物.否则自动选出宠物栏中等级最高的一个宠物出战8、支持自动拾取物品9、支持死亡和杀怪条件满足后退出游戏10、支持各种情况下的自动回城补给，回城补给时自动寻找最近城市的各个NPC，自动跑回原挂机中心。14、支持宠物瞬间技能释放 包括群攻技能15，支持种植采集，可设置早产晚产，生活技能自动升级。
自动副本功能1：主线任务2：师门任务3：惩凶打图4：开藏宝图5：科举答题6：帮会任务7：自动许愿8：自动刷反9： 自动棋局10：自动抢小其他：1：自动答题报警2：自动出狱3：自动出地府4：自动答题5：自动增加人物血蓝补给6：自动升级7：珍兽血气补给8：自动拾取9：自动丢弃10：自动喊话11：异常设置（无药品补给 道具栏满 装备耐久低）12：自动存金币13：买药设置14：装备自动修理15：自动卖包16：自动存取设置17：优先攻击头目18：忽略指定怪物等等38种功能全自动。
转载请注明出处育才学习网 » 按键精灵怎么写天龙八部脚本