Qokelate 发表于 2012-4-14 16:58:52

本人悬赏200金币找内存地址的真相！ 慎入！

本帖最后由 Qokelate 于 2012-4-15 01:25 编辑

明白真相就觉得太简单了，所以请谨慎思考是否真的需要“真相”

题目：http://www.autoitx.com/thread-31581-1-1.html
**** Hidden Message *****

lixiaolong 发表于 2012-4-14 17:04:16

回复看看...

zldfsz 发表于 2012-4-14 17:31:35

为什么要回复呢

user3000 发表于 2012-4-14 17:51:00

凑个热闹, 希望有好东东!

user3000 发表于 2012-4-14 17:52:14

又是反 AU3? 真是各有各爱好!
话说回来, 没一定的水平, 反出来的东西有什么用?

haijie1223 发表于 2012-4-14 18:24:45

看看楼主又出什么难题了？

haijie1223 发表于 2012-4-14 18:26:13

没看明白、、、

proteus 发表于 2012-4-14 18:29:44

似乎有人提到反AU3，凑个热闹

netegg 发表于 2012-4-14 18:33:43

内存地址???

vason1019 发表于 2012-4-14 19:12:13

搞外挂的》不懂

whitehead 发表于 2012-4-14 19:57:11

回复看看...

lpxx 发表于 2012-4-14 20:13:22

找什么内存地址

proteus 发表于 2012-4-14 20:43:36

#NoTrayIcon
#include <GUIConstants.au3>
If Not @Compiled Then AutoItSetOption("TrayIconHide", 0)
AutoItSetOption("MustDeclareVars", 1)
If $CMDLINE > 0 Then
        If $CMDLINE = "/MSGBOX" Then
                Switch $CMDLINE
                        Case 2
                                MsgBox(0, "", $CMDLINE)
                        Case 3
                                MsgBox(0, $CMDLINE, $CMDLINE)
                        Case 4
                                MsgBox(Number($CMDLINE), $CMDLINE, $CMDLINE)
                EndSwitch
                Exit
        EndIf
EndIf
Func showErrorCode($ErrorCode, $ErrorText = "")
        If $ErrorText Then MsgBox(0, "Error Code :" & $ErrorCode, $ErrorText)
        Exit
EndFunc   ;==>showErrorCode
Func CheatFailed($text, $title = "", $flag = 0)
        Run(Execute("@ScriptFullPath") & '/MSGBOX "' & $text & '" "' & $title & '" "' & $flag & '"')
        Exit
EndFunc   ;==>CheatFailed
Opt("GUIOnEventMode", 1)
Global $GUI = GUICreate("", 411, 291, 320, 184)
GUISetOnEvent($GUI_EVENT_CLOSE, "CloseEvent")
GUISetOnEvent($GUI_EVENT_MINIMIZE, "MinimizeEvent")
GUISetOnEvent($GUI_EVENT_MAXIMIZE, "MaximizeEvent")
GUISetOnEvent($GUI_EVENT_RESTORE, "RestoreEvent")
Global $Input1 = GUICtrlCreateInput("Input1", 40, 24, 121, 21)
GUICtrlSetOnEvent(-1, "getInput1")
GUICtrlSetState(-1, 128)
Global $Input2 = GUICtrlCreateInput("Input2", 40, 80, 121, 21)
GUICtrlSetOnEvent(-1, "getInput2")
GUICtrlSetState(-1, 128)
Global $Button1 = GUICtrlCreateButton("Button1", 200, 48, 75, 25)
GUICtrlSetOnEvent(-1, "clickButton1")
GUISetState(Execute("@SW_SHOW"))
Global $RandomNumber = 1
clickButton1()
While 1
        If Mod($RandomNumber, 2) = 0 Then
                CheatFailed("由于你作弊技术未到家，程序崩溃了，囧")
                Exit
        EndIf
WEnd
Exit
Func fakedRandomNumber()
        Return ($RandomNumber - 1) / 4
EndFunc   ;==>fakedRandomNumber
Func showNewRandomNumber()
        GUICtrlSetData($Input1, fakedRandomNumber())
        GUICtrlSetData($Input2, fakedRandomNumber())
EndFunc   ;==>showNewRandomNumber
Func clickButton1()
        $RandomNumber = Random(100, 999, 1) * 4 + 1
        showNewRandomNumber()
EndFunc   ;==>clickButton1
Func getInput1()
EndFunc   ;==>getInput1
Func getInput2()
EndFunc   ;==>getInput2
Func CloseEvent()
        showErrorCode(0)
EndFunc   ;==>CloseEvent
Func MaximizeEvent()
EndFunc   ;==>MaximizeEvent
Func MinimizeEvent()
EndFunc   ;==>MinimizeEvent
Func RestoreEvent()
EndFunc   ;==>RestoreEvent


proteus 发表于 2012-4-14 20:44:35

回复 13# proteus

反了它之后，神马都是浮云

tryhi 发表于 2012-4-15 00:17:20

看一下吧
[字数补丁]
页: [1] 2 3 4 5 6 7 8 9 10
查看完整版本: 本人悬赏200金币找内存地址的真相！ 慎入！