求购网页游戏《仙域》后台挂机脚本

51ak

要求：可以后台运行，自动杀怪、技能、加血、蓝、拣东西、可以单独练技能 就这么多吧，呵呵

sanmoking

呵呵,楼主这是要脱机外挂啊...
楼主那挂做出来,得专门买挂的点卡,挂一个小时1快钱,楼主10快钱用10个小时估计..

51ak

现在又简单游的脚本可以满足杀怪、加红蓝和检东西，就是不可以后台，希望有高手可以解答下。

sanmoking

楼主研究一下后台发送命令的知识。简单的功能你自己还是能够应付得来的。。。。。坛子里的大侠们貌似都比较忙。。如果你运气好，说不定能够遇上个热心的高手。。。

kyyy

楼上的广告等着封号吧

处女

怎么获取游戏窗口的句并

clear880213

说不定能够遇上个热心的高手

lanfengc

刚抽空给你做个。 没优化， 不检测怪物死亡没有，你自己加检测代码。 用我发的后台找色的库文件。
不算是后台。 IE类的操作我不熟悉，不会让IE自动点击。 最小化按钮将程序移动到桌面右上角，只露出来一点。相当于后台了

#NoTrayIcon
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <WINAPI.AU3>
Opt("GUIOnEventMode",1)
Global $Url = "http://www.game2.cn/?view=play&g=xianyu3",$StartFlg=0
_IEErrorHandlerRegister ()
$Form=GUICreate("", 1024, 650, 200, 100, $WS_POPUPWINDOW, $WS_EX_TOOLWINDOW)
$oIE = _IECreateEmbedded()
$GUIActiveX = GUICtrlCreateObj($oIE, -2, -2, 1024, 620) 
$Minimize = GUICtrlCreateButton("最小化", 0, 620, 80, 30)
GUICtrlSetOnEvent($Minimize, "Mini")
$StartBt = GUICtrlCreateButton("启动", 200, 620, 80, 30)
GUICtrlSetOnEvent($StartBt, "Start")
$Close = GUICtrlCreateButton("退 出", 944, 620, 80, 30)
GUICtrlSetOnEvent($Close, "Quit")
$oIE.navigate($Url)
$oIE.refresh
GUISetState(@SW_SHOW)
While 1
        If $StartFlg=1 Then
                Hit()
        Else
                Sleep(100)
        EndIf
WEnd
Func Quit()
        Exit
EndFunc
Func Mini()
        If GUICtrlRead($Minimize)="最小化" Then
                WinMove($Form,"",@DesktopWidth-80,-620,Default,Default,1)
                GUICtrlSetData($Minimize,"还原")
        Else
                WinMove($Form,"",50,50,Default,Default,1)
                GUICtrlSetData($Minimize,"最小化")
        EndIf
EndFunc
Func Start()
        If GUICtrlRead($StartBt )="启动" Then
                $StartFlg=1
                GUICtrlSetData($StartBt ,"停止")
        Else
                $StartFlg=0
                GUICtrlSetData($StartBt ,"启动")
        EndIf
EndFunc

Func Hit()
        Local $FormPos=WinGetPos($Form)
        Local $MousePos=MouseGetPos()
        MouseClick("left",$FormPos[0]+410,$FormPos[1]+290,1,1)
        MouseMove($MousePos[0],$MousePos[1],1)
        Sleep(500)
        ControlSend($Form,"","[CLASS:Internet Explorer_Server; INSTANCE:1]","{Space}")
        Sleep(500)
        ControlSend($Form,"","[CLASS:Internet Explorer_Server; INSTANCE:1]","{Space}")
        Sleep(500)
        ControlSend($Form,"","[CLASS:Internet Explorer_Server; INSTANCE:1]","{TAB}")
        Sleep(500)
EndFunc

夜猫猫

嘎嘎，，高手来了。。。

偶德

代码收藏中。。

51ak

回复 8# lanfengc

很是感谢，这个FLASH网页游戏的辅助，我现在已经能够制作了，是调用的插件来进行操作，时间过去了一年多，很是感谢兄弟的回帖和代码。

komaau3

一年多了 ，竟然还有人回，不是楼上LZ提示还真没留意这都是一年前的贴了