Serials Encrypten???

04/08/2009 23:55 Syc0n#1
Hey Leute,

Ich versuche grade generierte Seriennummern zu Encypten. Leider kommt bei mir immer dieselbe Zahl raus: 18B2
Dabei hab ich mich ziemlich genau an die Funktion von der off. AutoIT Seite gehalten... ich sitzt da jetzt schon zu lange dran, deswegen frag ich euch, wo der Fehler ist:

PHP Code:
#include <GuiConstantsEx.au3>
#include <String.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>


_Encrypt()


Func _Encrypt()
Local $Form1, $Zugangsdaten, $Label1, $Crypt, $nMsg
$Form1 = GUICreate("Serial", 312, 142, 192, 120)
$Zugangsdaten = GUICtrlCreateInput("Zugansdaten", 8, 32, 273, 21)
$Label1 = GUICtrlCreateLabel("Tragen Sie ihre Zugangsdaten ein:", 8, 16, 168, 17)
$Crypt = GUICtrlCreateButton("Generate", 48, 72, 209, 49, 0)
GUISetState(@SW_SHOW)


    While 1
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE
                Exit
            Case $Crypt
                GUICtrlSetData($Zugangsdaten,_StringEncrypt(1,Stringright($Zugangsdaten,4),"passwort"))
                msgbox(0,"Hinweis", "Senden Sie den neuen Code an Mr. X")
                msgbox(0,"Decrypt", "Der Encryptete Code lautet: " & _StringEncrypt(1,Stringleft($Zugangsdaten,4),"passwort"))
                msgbox(0,"Rabarbar","Der Decryptete: " & _StringEncrypt(0,$Zugangsdaten,"passwort")) ; Nur als Überprüfung
        EndSwitch
    Wend
EndFunc 
Der soll nur die letzten 4 Zahlen vom String encrypten!
04/09/2009 12:08 buFFy!#2
willst du damit nen keygen schreiben`?
04/09/2009 12:19 Syc0n#3
Ich hab als erstes nen Programm, dass mir die ProcessorID+DriverID(C:) ausgibt. von diesem Zahlencode will ich dann nur die letzten 4 Zahlen encrypted haben, damit beispielsweise der Kunde nicht weiß wonach er in der Cheatengine suchen muss, um den Bot zu ändern.

Zu deiner Frage: nein, kein Keygen

Hier mal das Programm:
04/09/2009 12:27 buFFy!#4
sowas musst du doch garnicht encrypten.. du musst nur die Serial etwas verändern.. dann kann der kunde zwar die eigene serial auslesen, aber nicht die, auf die du hinaus willst..

Code:
$serial = Hex(DriveGetSerial("C:\") + (100 / 2 * 100))
MsgBox(0, "Serial", $serial)
04/09/2009 12:28 Syc0n#5
danke, würd aber trotzdem gerne wissen, wieso das mit dem Script von oben nicht klappt
04/10/2009 01:09 buFFy!#6
Quote:
Originally Posted by Syc0n View Post
danke, würd aber trotzdem gerne wissen, wieso das mit dem Script von oben nicht klappt
Also doch ein Keygen? xD
04/10/2009 08:48 NBA#7
Hatte das Problem bis gestern auch...
Eigentlich will ich was gecryptetes in eine Datei schreiben, und dann die datei decrypten...

Naja Programmintern geht das ganz leicht :

PHP Code:
#include <string.au3>

$encrypted = _stringencrypt(1, "Syc0n", "blablabla")
$decrypted = _StringEncrypt(0, $encrypted, "blablabla")

Send("{enter}" & $encrypted & "{enter}" & $decrypted) 
Du musst das ganze anscheinend mit variablen machen, sonst gibt der nur bla aus....