用按键精灵如何定时按某个键

用按键精灵如何定时按某个键,第1张

KeyDown 38,1

Rem 1

Delay 120000

KeyPress 55,1

Goto 1 百分百能用,复制到源文件保存,希望立即采纳,并给好评

下载按键精灵 点击录制 开始后按F1一次 然后保存 将保存的脚本设置成无限循环 间隔时间设置为5秒 最好设置一个快捷键作为启动键。即可。

具体如下:

1、让让笔记本关机,接着按fn+f2,再按开机键。

2、这种开机方法,会进入bios模式,如下图所示,找到并点击system configuration类似的选项。

3、接下来,在打开的界面中点击action keys mode或类似的,反正有keys的就是了,然后设置为enable。

4、 上面的设置完后,按下F10键,然后在d窗中点击OK。

5、这样设置后,在电脑上试试,就可以不用按fn键直接按f1到f12键了。

添加一个timer1控件+button1,将里面的代码全替换如下就可以了

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, ExtCtrls;

type

TForm1 = class(TForm)

Button1: TButton;

Timer1: TTimer;

procedure Button1Click(Sender: TObject);

procedure Timer1Timer(Sender: TObject);

procedure FormCreate(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

i:integer;//模拟按键时间

implementation

{$R dfm}

procedure TForm1Button1Click(Sender: TObject);

begin

if Timer1Enabled=true then

begin

i:=0;//清零

Timer1Enabled:=false;

end

else

begin

i:=0;//清零

Timer1Enabled:=true;

end;

end;

procedure TForm1Timer1Timer(Sender: TObject);

begin

i:=i+1;

if i mod 10=0 then

keybd_event($72,0,0,0);//$72是H键的虚拟键值,若要h健则是改为$48

end;

procedure TForm1FormCreate(Sender: TObject);

begin

i:=0;//初始化i

Timer1Enabled:=false;

end;

end

#Persistent

#NoEnv

v_Enable=0

$F5::

{

v_Enable:=!v_Enable

If (v_Enable=0)

SetTimer, Label0, Off

Else

SetTimer, Label0, 100

SetTimer, Label1, 60000

}

Return

Label0:

{

ControlSend ,,{1},魔兽世界,,,

}

Return

Label1:

{

ControlSend ,,{7},魔兽世界,,,

ControlSend ,,{8},魔兽世界,,,

ControlSend ,,{9},魔兽世界,,,

}

Return

楼主,这是我AHK脚本。 $F5::中的F5为一键控制开关,下面的1 和789 为自动按键。1是我的骑士宏,789为庇护祝福(小),光明圣印,正义之怒。1为01秒按一次,789为1分钟按一次。为担心刷BUFF的时候按键冲突导致BUFF刷不上,所以设置为1分钟刷1次。不会损失多少DPS。 SetTimer, Label0, 100 SetTimer, Label1, 60000 这里面的数字为自动按键的间隔时间,单位是毫秒。 按键和时间你可以自行修改为你想要。 修改以后保存脚本,退出AHK 再打开 即可。本脚本是限定在魔兽世界窗口运行,不会干涉你其他任何工作。

这分不给我就过分 了~我已经写的这么详细了~而且我自己也在用的。

用多线程可以解决:

BeginThread "line2" ' 启动另一个线程

Rem start

x=49

While x<57

KeyPress x,1 ' 从1至8循环按

//Delay

x=x+1

EndWhile

Goto start

Sub line2

//Delay

KeyPress 57,1 ' 按9

//Delay

KeyPress 48,1 ' 按0

Delay 610^5

Gosub line2

Return ' 9和0也是循环按的,10分钟一次

键与键之间的延时你大概需要多少我不清楚,你可以自己设置一下;

Private Sub Form_KeyPress(KeyAscii As Integer)

KeyAscii = 122 '这是Z键

End Sub

Private Sub Form_Load()

Timer1Interval = 10000 '这行是设置时间,只用添加一个时间控件就可以了

End Sub

Private Sub Timer1_Timer()

Form_KeyPress

End Sub

注意Timer1的时间设置成10000(即10秒)

以上就是关于用按键精灵如何定时按某个键全部的内容,包括:用按键精灵如何定时按某个键、如何让键盘F1键每5秒自动点击一次、Delphi 实现 定时模拟键盘按键等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/10101798.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-05
下一篇 2023-05-05

发表评论

登录后才能评论

评论列表(0条)

保存