您的位置首页生活快答

能不能告诉我用按键精灵进梦幻西游全教程?

能不能告诉我用按键精灵进梦幻西游全教程?

的有关信息介绍如下:

能不能告诉我用按键精灵进梦幻西游全教程?

多开几个窗口好过你用按键精灵 梦幻西游 按键精灵 挤新区脚本 msgbox"请关闭梦幻和其他程序窗口,点确定后选择你游戏存放的文件夹!" & chr(13) & " --Craly制作" ,48,"Craly"

msgbox"如果你感觉本程序很简单请自己编写,本人不欠任何不认识人的东西,所有没有义务为你服务,请自尊!",48,"Craly提示:"

n1001=inputbox("输入你要挤的大区的列数","Craly","5")

n1002=inputbox("输入你要挤的大区的行数","Craly","1")

n1003=inputbox("输入你要挤的服务器的列数","Craly","4")

n1004=inputbox("输入你要挤的服务器的行数","Craly","11")

VBSEnd

Plugin a1=File.SelectDirectory()

VBSBegin

un=InputBox("输入你的账号:","Craly","uaername")

pw=InputBox("输入你的密码:","Craly","password")

msgBox "OK!点确定后不要进行任何操作!我们开始!",48,"设置完毕请不要再动鼠标键盘!"

VBSEnd

If a1=0

a1="E:\网络游戏\梦幻西游\梦幻西游\my.exe"

Else

a1=a1 & "\my.exe"

EndIf

Rem 9

KeyDown 91,1

Delay 100

KeyPress 82,1

Delay 100

KeyUp 91,1

SayString a1

Delay 100

KeyPress 13,1

Rem 5

Plugin A=Window.Find("WSGAME","梦幻西游ONLINE")

If A=0

Delay 100

Goto 5

EndIf

Plugin Window.Active(A)

Plugin s = Window.GetClientRect(A)

MyArray = Split(s, "|", -1, 1)

x1=MyArray(0)

y1=MyArray(1)

x5=781-215+x1

y5=322-130+y1

x6=790-215+x1

y6=537-130+y1

x7=207+(n1001-1)*(242-174)-146+x1

y7=229+(n1002-1)*(244-218)-119+y1

x8=207+(n1003-1)*(242-174)-146+x1

y8=229+(n1004-1)*(244-218)-119+y1

MoveTo x5,y5

LeftClick 1

Delay 200

MoveTo x6,y6

LeftClick 1

Delay 200

MoveTo x7,y7

LeftClick 1

Delay 100

MoveTo x8,y8

LeftClick 1

Delay 100

IfColor 277+x1,290+y1,20bce0,2

Goto 2

Else

MoveTo 938-309+x1,95-104+y1

LeftClick 1

Delay 300

MoveTo 532-309+x1,358-104+y1

LeftClick 1

Goto 9

EndIf

If a<>0

Rem 2

MoveTo x8,y8

LeftClick 1

Delay 40

IfColor 277+x1,290+y1,20bce0,2

MoveTo x1+356,y1+307

LeftClick 1

Delay 30

LeftClick 1

Delay 20

Goto 2

Else

Goto 4

EndIf

Else

EndIf

Rem 4

Delay 100

IfColor 277+x1,290+y1,20bce0,2

Goto 2

EndIf

SayString un

Delay 100

KeyPress 9,1

SayString pw

KeyPress 13,1