Making a password that only works on one computer?

[UnknownWarrior]

Well alright, I will start off by saying I'm NOT selling this bot or trading it in any way. I AM though giving it to a select few friends to automate a game they play... I do not want it to get spread somehow and the entire server owns the bot and the company bans the bot or a way to make sure the bot won't work... (It's happened before... People that used one of mine got banned cause the company detected the program *somehow*)

What I want to do is make a password that works for only ONE computer that I give it to. Then another exact replica bot that has a different password, etc. If I just put a simple password the person that I give it to could easily send it to another person and tell them that password and wa lah...

Is there any way of doing this other than making a server login?

Thanks :S

[Valuater]

Might want to take a look at XProTec.au3

http://www.autoitscript.com/forum/index.ph...st&p=222095

8)

[UnknownWarrior]

Might want to take a look at XProTec.au3

http://www.autoitscript.com/forum/index.ph...st&p=222095

8)

Wow NIFTY program... I got a question though, where could I put the coding in, in my script? (Kind of confused on that whole part)

P.S. - I just want it to make sure only 1 person per computer, how can I get rid of the other stuff (email and paypal and that stuff?)

EDIT: I suppose I can leave in the field they have to put in THEIR email cause then I can send them updates of the bot... But I really don't need the paypal stuff or any of that.

EDIT2: The more I think of it: I could use most of that... I don't need developers license (Don't even know what that is LOL) and I don't need the blacklist and not the paypal thing... If I ever do end up selling it, I would charge the 'currency' in the game my friends play and give it to them instead.

expandcollapse popup

#include <NomadMemory.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Include <Misc.au3>

Opt("GUICloseOnEsc",1)

HotKeySet("{F5}", "On")


Dim $pointx, $pointy, $recordx, $recordy, $Paused = True, $clients=0
Global $dll = DllOpen("user32.dll"); For _IsPressed Function Below

Global Const $pointx = "0x0057F9B8";Make this Constant so it cannot be changed
Global Const $pointy = "0x0057F9BC";Make this Constant so it cannot be changed

$PID = ProcessExists("**");--- You forgot this in your script you gave me :P


#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Bot", 342, 227, 193, 125)
$Label1 = GUICtrlCreateLabel("F5 To start the bot.", 24, 24, 103, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###



While 1
    If $start Then
        WinWaitActive("**")
        $clients=$clients+1
        $Title=WinSetTitle("[ACTIVE]","",$clients);note that [ACTIVE] as a title will set the Active window to Title 1
        Sleep(1000)

            $do = 0
            Do
                If _IsPressed(1,$dll)=1 Then
                $Mem_Handle = _MemoryOpen($PID)
                Sleep(800)
                $recordx = _MemoryRead($pointx , $Mem_Handle, "")
                IniWrite("Coords.ini",$Title,$do&"x",$recordx); Pretty Self Explainatory. Records coords in a ini file which can be 
                                                ; read afterwards. Writes the $Title Number, Step Number with X and Data
                $recordy = _MemoryRead($pointy , $Mem_Handle, "")
                IniWrite("Coords.ini",$Title,$do&"y",$recordy); Pretty Self Explainatory...^ Same as ^ but with Y
                Sleep(3000)
                $do = $do + 1
                endif

;           Top line of code waits until you Left Click before it runs through those lines of code

            Until $do = 15;--- Gets 15 x, y coords recorded, then Contiunes on....
        $readx = IniRead("Coords.ini", "", "", $recordx);--- ??
        
        $xDo = 0
        Do
            If $readx < Or > $recordx Then
                MouseClick()
                Sleep(1500)
                $xDo = $xDo + 1
            EndIf
        Until $xDo = 15


        $nMsg = GUIGetMsg()
        Switch $nMsg
            Case $GUI_EVENT_CLOSE
                $ans = MsgBox(33,"Close","Do you really wish to close?")
                If $ans = 1 Then
                    Exit
                EndIf

        EndSwitch


WEnd



Func On()
    $start=NOT $start
    If $start Then
        MsgBox(0, "hey", "Bring up your conquer window")
    EndIf
EndFunc

Edited November 7, 2008 by UnknownWarrior

[UnknownWarrior]

I'm sorry, but I gotta bump this before I go to bed... I really really REALLY need help on this. And this program is my first hope, but I'm not sure really how to implement that into my script .

[Valuater]

I'm sorry, but I gotta bump this before I go to bed... I really really REALLY need help on this. And this program is my first hope, but I'm not sure really how to implement that into my script .

Just fill-in the info needed, #include the XProTec.au3 and put the function at the top of your script.

8)