51ak 发表于 2009-11-20 09:20:50

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

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

sanmoking 发表于 2009-11-24 20:33:53

本帖最后由 sanmoking 于 2009-11-24 21:38 编辑

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

51ak 发表于 2009-12-3 13:59:59

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

sanmoking 发表于 2009-12-4 15:20:57

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

kyyy 发表于 2010-1-1 16:24:11

楼上的广告等着封号吧

处女 发表于 2010-11-25 04:13:17

怎么获取游戏窗口的句并

clear880213 发表于 2011-5-4 09:13:20

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

lanfengc 发表于 2011-5-4 14:11:01

刚抽空给你做个。 没优化， 不检测怪物死亡没有，你自己加检测代码。 用我发的后台找色的库文件。
不算是后台。 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+410,$FormPos+290,1,1)
        MouseMove($MousePos,$MousePos,1)
        Sleep(500)
        ControlSend($Form,"","","{Space}")
        Sleep(500)
        ControlSend($Form,"","","{Space}")
        Sleep(500)
        ControlSend($Form,"","","{TAB}")
        Sleep(500)
EndFunc

夜猫猫 发表于 2011-5-15 21:32:28

嘎嘎，，高手来了。。。

偶德 发表于 2011-5-26 10:44:47

代码收藏中。。

51ak 发表于 2011-5-31 08:03:27

回复 8# lanfengc

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

komaau3 发表于 2011-5-31 22:37:40

{:face (207):}一年多了 ，竟然还有人回，不是楼上LZ提示还真没留意这都是一年前的贴了
页: [1]
查看完整版本: 求购网页游戏《仙域》后台挂机脚本