level 1
指尖上跳华尔兹
楼主
RT 代码附上,求大佬帮忙看看。是那里错了。我想做个我的世界单键的后台按住鼠标和弹起的命令。但是一点反应都没有。
=====================分割线==============
Dim p
Dim o
p = 1
o = 1
Hwnd = Plugin.Window.Find(LWJGL, "Minecraft 1.7.10")
Do
kk = WaitKey()
If kk = 100 and p = 1 Then
Call Plugin.Bkgnd.LeftDown(Hwnd, 640, 368.5)
Delay 50
p = p + 1
ElseIf kk = 100 and p = 2 Then
Call Plugin.Bkgnd.LeftUp(Hwnd, 640, 368.5)
Delay 50
p = p - 1
ElseIf kk = 101 and o = 1 Then
Call Plugin.Bkgnd.RightDown(Hwnd, 640, 368.5)
Delay 50
o = o + 1
ElseIf kk = 101 and o = 2 Then
Call Plugin.Bkgnd.RightUp(Hwnd, 640, 368.5)
Delay 50
End If
Loop
==================================================
2017年07月15日 09点07分
1
=====================分割线==============
Dim p
Dim o
p = 1
o = 1
Hwnd = Plugin.Window.Find(LWJGL, "Minecraft 1.7.10")
Do
kk = WaitKey()
If kk = 100 and p = 1 Then
Call Plugin.Bkgnd.LeftDown(Hwnd, 640, 368.5)
Delay 50
p = p + 1
ElseIf kk = 100 and p = 2 Then
Call Plugin.Bkgnd.LeftUp(Hwnd, 640, 368.5)
Delay 50
p = p - 1
ElseIf kk = 101 and o = 1 Then
Call Plugin.Bkgnd.RightDown(Hwnd, 640, 368.5)
Delay 50
o = o + 1
ElseIf kk = 101 and o = 2 Then
Call Plugin.Bkgnd.RightUp(Hwnd, 640, 368.5)
Delay 50
End If
Loop
==================================================