大家来找茬辅助

xyold1 · 发表于 2010-12-7 20:30:18

本帖最后由 xyold1 于 2010-12-9 20:13 编辑

Q Q找茬辅助，纯属练手，

F9运行，不同的地方用竖线标出来。
http://www.opendrive.com/files/8918673_jjgRi_1a0a/ddzc12.rar
试用地址
http://cid-c490728b0747d5f6.offi ... x/找茬/ddzc12.rar

cl19343333 · 发表于 2010-12-8 10:08:27

试试好用吧

2910153 · 发表于 2010-12-8 15:11:07

啥东西1111

xyold1 · 发表于 2010-12-8 21:15:13

回复 3# 2910153

大家来找茬的辅助，用了就没意思了

awfymwvf · 发表于 2010-12-9 08:47:39

有没有源码啊。我要学习一下

93779252 · 发表于 2010-12-9 12:43:34

晕啊，又要花钱了··

93779252 · 发表于 2010-12-9 12:54:08

上当了，不好使啊··

xyold1 · 发表于 2010-12-9 12:57:49

回复 5# awfymwvf

代码没有优化，随便看一下吧

#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=..\..\..\WINDOWS\system32\SHELL32.dll
#AutoIt3Wrapper_outfile=ddzc12.exe
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#include <WinAPI.au3>
#include <WindowsConstants.au3>
$width=1
$color=0xFFFF
$hwnd=WinGetHandle("大家来找茬")
$p=WinGetPos($hwnd)
$Form1aa = GUICreate("Crazylisten", @DesktopWidth, 445, 100, 150, $WS_POPUP, BitOR($WS_EX_TOOLWINDOW,$WS_EX_LAYERED,$WS_EX_TOPMOST ),WinGetHandle(AutoItWinGetTitle()))
GUISetBkColor(0xABCDEF)
GUISetState(@SW_SHOW)
_API_SetLayeredWindowAttributes($Form1aa, 0xABCDEF)
DllCall("user32.dll", "uint", "SetWindowLong", "hWnd", $Form1aa, "int", "-20", "uint", BitOR(DllCall("user32.dll", "uint", "GetWindowLong", "hWnd", $Form1aa, "int", "-20"), 0x80000, 0x20))
$hDC = _WinAPI_GetDC($Form1aa)
_WinAPI_SetBkColor($hDC, 0x000000)
_WinAPI_SetBkMode($hDC, $TRANSPARENT)
$hPen = _WinAPI_CreatePen($PS_SOLID, $width, $color)
$obj_orig = _WinAPI_SelectObject($hDC, $hPen)
HotKeySet("{F9}","fu")
While 1
Sleep(50) 
WEnd

Func fu()
$hwnd=WinGetHandle("大家来找茬")
$p=WinGetPos($hwnd)
_WinAPI_ReleaseDC(0, $hDC)
_WinAPI_ReleaseDC(0, $hDC)
_WinAPI_InvalidateRect(0, 0)
$tRECT = 0
GUIDelete($Form1aa)

$Form1aa = GUICreate("Crazylisten", @DesktopWidth, @DesktopHeight, 0, 0, $WS_POPUP, BitOR($WS_EX_TOOLWINDOW,$WS_EX_LAYERED,$WS_EX_TOPMOST ),WinGetHandle(AutoItWinGetTitle()))
GUISetBkColor(0xABCDEF)
GUISetState(@SW_SHOW)
_API_SetLayeredWindowAttributes($Form1aa, 0xABCDEF)
DllCall("user32.dll", "uint", "SetWindowLong", "hWnd", $Form1aa, "int", "-20", "uint", BitOR(DllCall("user32.dll", "uint", "GetWindowLong", "hWnd", $Form1aa, "int", "-20"), 0x80000, 0x20))
$hDC = _WinAPI_GetDC($Form1aa)
_WinAPI_SetBkColor($hDC, 0x000000)
_WinAPI_SetBkMode($hDC, $TRANSPARENT)
$hPen = _WinAPI_CreatePen($PS_SOLID, $width, $color)
$obj_orig = _WinAPI_SelectObject($hDC, $hPen)
For $j =190 To 641 Step 1

For $i = 6 To 505 Step 3
$color1 = PixelGetColor($i+$p[0],$j+$p[1])
$dm_ret = CmpColor($i+509+$p[0],$j+$p[1],$color1)
If $dm_ret = 0 Then
_WinAPI_DrawLine($hDC,$i+$p[0],$j+$p[1],$i+$p[0],$j+$p[1]+1)
EndIf 
Next

Next
EndFunc

Func cmpcolor($i,$j,$color)
$colorA = PixelGetColor($i,$j)
If $color=$colorA Then
Return 1
Else
Return 0
EndIf

EndFunc

Func _API_SetLayeredWindowAttributes($hwnd, $i_transcolor, $Transparency = 255, $isColorRef = False)

Local Const $AC_SRC_ALPHA = 1
Local Const $ULW_ALPHA = 2
Local Const $LWA_ALPHA = 0x2
Local Const $LWA_COLORKEY = 0x1
If Not $isColorRef Then
$i_transcolor = Hex(String($i_transcolor), 6)
$i_transcolor = Execute('0x00' & StringMid($i_transcolor, 5, 2) & StringMid($i_transcolor, 3, 2) & StringMid($i_transcolor, 1, 2))
EndIf
Local $Ret = DllCall("user32.dll", "int", "SetLayeredWindowAttributes", "hwnd", $hwnd, "long", $i_transcolor, "byte", $Transparency, "long", $LWA_COLORKEY + $LWA_ALPHA)
Select
Case @error
Return SetError(@error, 0, 0)
Case $Ret[0] = 0
Return SetError(4, 0, 0)
Case Else
Return 1
EndSelect
EndFunc ;==>_API_SetLayeredWindowAttribute

xyold1 · 发表于 2010-12-9 13:06:00

回复 7# 93779252

哪里不好使了？

styledream · 发表于 2010-12-9 20:41:11

这东西应该不可能不好使吧~~~

xyold1 · 发表于 2010-12-9 20:52:02

回复 10# styledream

用起来很郁闷，别人才找出7,8处，我这早已通关了，结果呢，下回合没人了，要么让蓝钻给T了

唉，毒药，慎用，慎用……

chenronting · 发表于 2010-12-9 20:58:27

呵呵. 超好的东西. 我收藏了.

xyold1 · 发表于 2010-12-9 21:01:35

回复 12# chenronting

无聊之作，许多地方没有完善

styledream · 发表于 2010-12-10 01:31:18

回复 11# xyold1

呵呵，效率的确太高了点，如果加点延时，会比较符合国情~~~

xyold1 · 发表于 2010-12-10 14:49:36

回复 14# styledream

很有道理，找到茬却不能点，那也是一种煎熬

		自动登录	找回密码
密码			加入

[原创] 大家来找茬辅助

本帖子中包含更多资源

本帖子中包含更多资源