[HowTo] Create your own [SP] Trainer

[MC Nihilus]

Hallo Leute,

da ich sehr viele PNs bekommen habe und auch sehr viele in Topics gefragt haben wie man einen Trainer mit AutoIT erstellt, stelle ich hier ein kleines Tutorial zur Verfügung!
Ich bin nicht daran gewillt iwelche Beleidigungen gegen mich bzw. dieses Topic zu beantworten! Für Fragen bin ich sehr gerne offen!


Was benötigen wir?

• AutoIT - Script Editor
• SPRegeneration - 0x00C4C5E8
• NomadMemory.au3
• Ein kleines bischen Verstand und Zeit

Wenn ihr die NomadMemory.au3 nicht habt könnt ihr den folgenden Code kopieren, in ein .au3 Script packen und in den Ordner C:/Programme/AutoIt3/Include kopieren!

Der Code:

 Spoiler

#include-once
#region _Memory
;================================================= =================================
; AutoIt Version: 3.1.127 (beta)
; Language: English
; Platform: All Windows
; Author: Nomad
; Requirements: These functions will only work with beta.
;================================================= =================================
; Credits: wOuter - These functions are based on his original _Mem() functions.
; But they are easier to comprehend and more reliable. These
; functions are in no way a direct copy of his functions. His
; functions only provided a foundation from which these evolved.
;================================================= =================================
;
; Functions:
;
;================================================= =================================
; Function: _MemoryOpen($iv_Pid[, $iv_DesiredAccess[, $iv_InheritHandle]])
; Description: Opens a process and enables all possible access rights to the
; process. The Process ID of the process is used to specify which
; process to open. You must call this function before calling
; _MemoryClose(), _MemoryRead(), or _MemoryWrite().
; Parameter(s): $iv_Pid - The Process ID of the program you want to open.
; $iv_DesiredAccess - (optional) Set to 0x1F0FFF by default, which
; enables all possible access rights to the
; process specified by the Process ID.
; $iv_InheritHandle - (optional) If this value is TRUE, all processes
; created by this process will inherit the access
; handle. Set to 1 (TRUE) by default. Set to 0
; if you want it FALSE.
; Requirement(s): None.
; Return Value(s): On Success - Returns an array containing the Dll handle and an
; open handle to the specified process.
; On Failure - Returns 0
; @Error - 0 = No error.
; 1 = Invalid $iv_Pid.
; 2 = Failed to open Kernel32.dll.
; 3 = Failed to open the specified process.
; Author(s): Nomad
; Note(s):
;================================================= =================================
Func _MemoryOpen($iv_Pid, $iv_DesiredAccess = 0x1F0FFF, $iv_InheritHandle = 1)

If Not ProcessExists($iv_Pid) Then
SetError(1)
Return 0
EndIf

Local $ah_Handle[2] = [DllOpen('kernel32.dll')]

If @Error Then
SetError(2)
Return 0
EndIf

Local $av_OpenProcess = DllCall($ah_Handle[0], 'int', 'OpenProcess', 'int', $iv_DesiredAccess, 'int', $iv_InheritHandle, 'int', $iv_Pid)

If @Error Then
DllClose($ah_Handle[0])
SetError(3)
Return 0
EndIf

$ah_Handle[1] = $av_OpenProcess[0]

Return $ah_Handle

EndFunc

;================================================= =================================
; Function: _MemoryRead($iv_Address, $ah_Handle[, $sv_Type])
; Description: Reads the value located in the memory address specified.
; Parameter(s): $iv_Address - The memory address you want to read from. It must
; be in hex format (0x00000000).
; $ah_Handle - An array containing the Dll handle and the handle
; of the open process as returned by _MemoryOpen().
; $sv_Type - (optional) The "Type" of value you intend to read.
; This is set to 'dword'(32bit(4byte) signed integer)
; by default. See the help file for DllStructCreate
; for all types. An example: If you want to read a
; word that is 15 characters in length, you would use
; 'char[16]' since a 'char' is 8 bits (1 byte) in size.
; Return Value(s): On Success - Returns the value located at the specified address.
; On Failure - Returns 0
; @Error - 0 = No error.
; 1 = Invalid $ah_Handle.
; 2 = $sv_Type was not a string.
; 3 = $sv_Type is an unknown data type.
; 4 = Failed to allocate the memory needed for the DllStructure.
; 5 = Error allocating memory for $sv_Type.
; 6 = Failed to read from the specified process.
; Author(s): Nomad
; Note(s): Values returned are in Decimal format, unless specified as a
; 'char' type, then they are returned in ASCII format. Also note
; that size ('char[size]') for all 'char' types should be 1
; greater than the actual size.
;================================================= =================================
Func _MemoryRead($iv_Address, $ah_Handle, $sv_Type = 'dword')

If Not IsArray($ah_Handle) Then
SetError(1)
Return 0
EndIf

Local $v_Buffer = DllStructCreate($sv_Type)

If @Error Then
SetError(@Error + 1)
Return 0
EndIf

DllCall($ah_Handle[0], 'int', 'ReadProcessMemory', 'int', $ah_Handle[1], 'int', $iv_Address, 'ptr', DllStructGetPtr($v_Buffer), 'int', DllStructGetSize($v_Buffer), 'int', '')

If Not @Error Then
Local $v_Value = DllStructGetData($v_Buffer, 1)
Return $v_Value
Else
SetError(6)
Return 0
EndIf

EndFunc

;================================================= =================================
; Function: _MemoryWrite($iv_Address, $ah_Handle, $v_Data[, $sv_Type])
; Description: Writes data to the specified memory address.
; Parameter(s): $iv_Address - The memory address which you want to write to.
; It must be in hex format (0x00000000).
; $ah_Handle - An array containing the Dll handle and the handle
; of the open process as returned by _MemoryOpen().
; $v_Data - The data to be written.
; $sv_Type - (optional) The "Type" of value you intend to write.
; This is set to 'dword'(32bit(4byte) signed integer)
; by default. See the help file for DllStructCreate
; for all types. An example: If you want to write a
; word that is 15 characters in length, you would use
; 'char[16]' since a 'char' is 8 bits (1 byte) in size.
; Return Value(s): On Success - Returns 1
; On Failure - Returns 0
; @Error - 0 = No error.
; 1 = Invalid $ah_Handle.
; 2 = $sv_Type was not a string.
; 3 = $sv_Type is an unknown data type.
; 4 = Failed to allocate the memory needed for the DllStructure.
; 5 = Error allocating memory for $sv_Type.
; 6 = $v_Data is not in the proper format to be used with the
; "Type" selected for $sv_Type, or it is out of range.
; 7 = Failed to write to the specified process.
; Author(s): Nomad
; Note(s): Values sent must be in Decimal format, unless specified as a
; 'char' type, then they must be in ASCII format. Also note
; that size ('char[size]') for all 'char' types should be 1
; greater than the actual size.
;================================================= =================================
Func _MemoryWrite($iv_Address, $ah_Handle, $v_Data, $sv_Type = 'dword')

If Not IsArray($ah_Handle) Then
SetError(1)
Return 0
EndIf

Local $v_Buffer = DllStructCreate($sv_Type)

If @Error Then
SetError(@Error + 1)
Return 0
Else
DllStructSetData($v_Buffer, 1, $v_Data)
If @Error Then
SetError(6)
Return 0
EndIf
EndIf

DllCall($ah_Handle[0], 'int', 'WriteProcessMemory', 'int', $ah_Handle[1], 'int', $iv_Address, 'ptr', DllStructGetPtr($v_Buffer), 'int', DllStructGetSize($v_Buffer), 'int', '')

If Not @Error Then
Return 1
Else
SetError(7)
Return 0
EndIf

EndFunc

;================================================= =================================
; Function: _MemoryClose($ah_Handle)
; Description: Closes the process handle opened by using _MemoryOpen().
; Parameter(s): $ah_Handle - An array containing the Dll handle and the handle
; of the open process as returned by _MemoryOpen().
; Return Value(s): On Success - Returns 1
; On Failure - Returns 0
; @Error - 0 = No error.
; 1 = Invalid $ah_Handle.
; 2 = Unable to close the process handle.
; Author(s): Nomad
; Note(s):
;================================================= =================================
Func _MemoryClose($ah_Handle)

If Not IsArray($ah_Handle) Then
SetError(1)
Return 0
EndIf

DllCall($ah_Handle[0], 'int', 'CloseHandle', 'int', $ah_Handle[1])
If Not @Error Then
DllClose($ah_Handle[0])
Return 1
Else
DllClose($ah_Handle[0])
SetError(2)
Return 0
EndIf

EndFunc

;================================================= =================================
; Function: SetPrivilege( $privilege, $bEnable )
; Description: Enables (or disables) the $privilege on the current process
; (Probably) requires administrator privileges to run
;
; Author(s): Larry (from autoitscript.com's Forum)
; Notes(s):
;
;================================================= =================================

Func SetPrivilege( $privilege, $bEnable )

Const $TOKEN_ADJUST_PRIVILEGES = 0x0020
Const $TOKEN_QUERY = 0x0008
Const $SE_PRIVILEGE_ENABLED = 0x0002
Local $hToken, $SP_auxret, $SP_ret, $hCurrProcess, $nTokens, $nTokenIndex, $priv
$nTokens = 1
$LUID = DLLStructCreate("dword;int")
If IsArray($privilege) Then $nTokens = UBound($privilege)
$TOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]")
$NEWTOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]")
$hCurrProcess = DLLCall("kernel32.dll","hwnd","GetCurrentProcess")
$SP_auxret = DLLCall("advapi32.dll","int","OpenProcessToken","h wnd",$hCurrProcess[0], _
"int",BitOR($TOKEN_ADJUST_PRIVILEGES,$TOKEN_QUERY) ,"int_ptr",0)
If $SP_auxret[0] Then
$hToken = $SP_auxret[3]
DLLStructSetData($TOKEN_PRIVILEGES,1,1)
$nTokenIndex = 1
While $nTokenIndex <= $nTokens
If IsArray($privilege) Then
$priv = $privilege[$nTokenIndex-1]
Else
$priv = $privilege
EndIf
$ret = DLLCall("advapi32.dll","int","LookupPrivilegeValue ","str","","str",$priv, _
"ptr",DLLStructGetPtr($LUID))
If $ret[0] Then
If $bEnable Then
DLLStructSetData($TOKEN_PRIVILEGES,2,$SE_PRIVILEGE _ENABLED,(3 * $nTokenIndex))
Else
DLLStructSetData($TOKEN_PRIVILEGES,2,0,(3 * $nTokenIndex))
EndIf
DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetD ata($LUID,1),(3 * ($nTokenIndex-1)) + 1)
DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetD ata($LUID,2),(3 * ($nTokenIndex-1)) + 2)
DLLStructSetData($LUID,1,0)
DLLStructSetData($LUID,2,0)
EndIf
$nTokenIndex += 1
WEnd
$ret = DLLCall("advapi32.dll","int","AdjustTokenPrivilege s","hwnd",$hToken,"int",0, _
"ptr",DllStructGetPtr($TOKEN_PRIVILEGES),"int",Dll StructGetSize($NEWTOKEN_PRIVILEGES), _
"ptr",DllStructGetPtr($NEWTOKEN_PRIVILEGES),"int_p tr",0)
$f = DLLCall("kernel32.dll","int","GetLastError")
EndIf
$NEWTOKEN_PRIVILEGES=0
$TOKEN_PRIVILEGES=0
$LUID=0
If $SP_auxret[0] = 0 Then Return 0
$SP_auxret = DLLCall("kernel32.dll","int","CloseHandle","hwnd", $hToken)
If Not $ret[0] And Not $SP_auxret[0] Then Return 0
return $ret[0]
EndFunc ;==>SetPrivilege

#endregion

Die Vorgehensweiße

Da dieser Trainer sehr einfach ist, poste ich immer Beispiel Scripts mit!

- Wir öffnen den AutoIT Script Editor, erstellen ein neues File und löschen alles was da steht! (strg + a / entf)

- Nun fügen wir erstmal die Includes ein! Diese benötigt ihr für unseren Trainer:

#Require Admin
#include <GUIConstantsEx.au3>
#include <GDIPlus.au3>
#include <WinAPI.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <NomadMemory.au3>
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>

Das sind zwar teilweiße zu viele, aber lieber zu viel als zu wenig! Es schadet ja nicht!


Als nächtes benötigen wir eine GUI,diese ist mit Koda sehr leicht zu erstellen, allerdings kann man auch die AutoIT-GUI nehmen!

Ich habe für euch eine Bearbeitbare einfache, schlichte Guide mit Koda erstellt! Folgenden Code müsst ihr nun an euer AutoIT Script Anfügen:

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("SPRegeneration Hack by YOURNAME", 246, 295, 192, 124)
GUISetFont(8, 400, 0, "Neuropol")
GUISetBkColor(0x000000)
$Label1 = GUICtrlCreateLabel("SP-Regeneration", 24, 24, 199, 27)
GUICtrlSetFont(-1, 16, 400, 0, "Neuropol")
GUICtrlSetColor(-1, 0x00FF00)
$Group1 = GUICtrlCreateGroup("", 8, 8, 225, 121)
GUICtrlSetColor(-1, 0x00FF00)
$Input1 = GUICtrlCreateInput("7,5", 32, 64, 169, 19)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Start", 40, 152, 145, 25, $WS_GROUP)
GUICtrlSetFont(-1, 14, 400, 0, "Neuropol")
GUICtrlSetColor(-1, 0x00FF00)
GUICtrlSetBkColor(-1, 0xA0A0A4)
$Label2 = GUICtrlCreateLabel("YourName", 88, 240, 143, 29)
GUICtrlSetFont(-1, 18, 400, 0, "Neuropol")
GUICtrlSetColor(-1, 0x00FF00)
;$Icon1 = GUICtrlCreateIcon("C:\Users\MCNihilus\Documents\Auto IT Script Shit\Alien-Box.ico", -1, ;16, 200, 64, 64, BitOR($SS_NOTIFY,$WS_GROUP))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

So, jetzt hat unser Trainer in Gesicht ist allerdings weder Funktionstüchtig noch nützlich! Das wollen wir ändern:

- Nun fügen wir einen Global Red hinzu!
Diese sieht so aus:

Global $readSPReg=GUICtrlRead($SPReginput)

- Als nächtes wird, wie ich es nenne, ein Ini Eintrag hinzugefügt:

If FileExists(@ScriptDir&"\Configs.ini") = True Then 
$read1HitHackini=IniRead("Configs.ini","Inputs","SPReg",$readSPReg)
GUICtrlSetData($SPReginput,$readSPRegini)
EndIf

Ein kleiner Zwischen-Stopp!

Für all die, die es nicht ganz haben, unser code müsste nun wie folgt aussehen:

#RequireAdmin
#include <GDIPlus.au3>
#include <WinAPI.au3>
#include <GUIConstantsEx.au3>
#include <NomadMemory.au3>
#include <StaticConstants.au3>
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("SPRegeneration Hack by YOURNAME", 246, 295, 192, 124)
GUISetFont(8, 400, 0, "Neuropol")
GUISetBkColor(0x000000)
$Label1 = GUICtrlCreateLabel("SP-Regeneration", 24, 24, 199, 27)
GUICtrlSetFont(-1, 16, 400, 0, "Neuropol")
GUICtrlSetColor(-1, 0x00FF00)
$SPReg = GUICtrlCreateGroup("", 8, 8, 225, 121)
GUICtrlSetColor(-1, 0x00FF00)
$SPReginput = GUICtrlCreateInput("7,5", 32, 64, 169, 19)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Start", 40, 152, 145, 25, $WS_GROUP)
GUICtrlSetFont(-1, 14, 400, 0, "Neuropol")
GUICtrlSetColor(-1, 0x00FF00)
GUICtrlSetBkColor(-1, 0xA0A0A4)
$Label2 = GUICtrlCreateLabel("YourName", 88, 240, 143, 29)
GUICtrlSetFont(-1, 18, 400, 0, "Neuropol")
GUICtrlSetColor(-1, 0x00FF00)
$Icon1 = GUICtrlCreateIcon("C:\Users\MCNihilus\Documents\Auto IT Script Shit\Alien-Box.ico", -1, 16, 200, 64, 64, BitOR($SS_NOTIFY,$WS_GROUP))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Global $readSPReg=GUICtrlRead($SPReginput)
If FileExists(@ScriptDir&"\Configs.ini") = True Then 
$read1HitHackini=IniRead("Configs.ini","Inputs","SPReg",$readSPReg)
GUICtrlSetData($SPReginput,$readSPRegini)
EndIf

- Damit euer Trainer nicht gerade schließt baut ihr folgendes ein:

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

- Unser Trainer hat ja einen Start Button, damit dieser Funktioniert und auch injected benötigen wir dieses:

Case $Button1
	ToolTip("S4 League starten ...",0,0)
$wait = ProcessWait("S4Client.exe")
Sleep(500)
$PID = ProcessExists("S4Client.exe")
$Open = _MemoryOpen($PID)

- Damit der Trainer weiß, was wir ändern müssen, geben wir die Addressen-Erkennung an:

$SPReg = 0x00C4C5E8

-Nun lassen wir die Adresse erneut Auslesen:

Global $readSPReg=GUICtrlRead($SPReginput)

-Damit diese auch beschrieben werden kann wir das hier angefügt:

$WriteSPReg=_MemoryWrite($SPReg,$Open,$SPReginput)

-Nun wäre es eigentlich Geschafft, doch damit unser Trainer auch ein Ende hat und fertig ist fügt ihr zu guter letzt dies an:

EndSwitch
WEnd
Exit

Am ganzen Ende der fertige Script:

#RequireAdmin
#include <GDIPlus.au3>
#include <WinAPI.au3>
#include <GUIConstantsEx.au3>
#include <NomadMemory.au3>
#include <StaticConstants.au3>
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("SPRegeneration Hack by YOURNAME", 246, 295, 192, 124)
GUISetFont(8, 400, 0, "Neuropol")
GUISetBkColor(0x000000)
$Label1 = GUICtrlCreateLabel("SP-Regeneration", 24, 24, 199, 27)
GUICtrlSetFont(-1, 16, 400, 0, "Neuropol")
GUICtrlSetColor(-1, 0x00FF00)
$SPReg = GUICtrlCreateGroup("", 8, 8, 225, 121)
GUICtrlSetColor(-1, 0x00FF00)
$SPReginput = GUICtrlCreateInput("7,5", 32, 64, 169, 19)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Start", 40, 152, 145, 25, $WS_GROUP)
GUICtrlSetFont(-1, 14, 400, 0, "Neuropol")
GUICtrlSetColor(-1, 0x00FF00)
GUICtrlSetBkColor(-1, 0xA0A0A4)
$Label2 = GUICtrlCreateLabel("YourName", 88, 240, 143, 29)
GUICtrlSetFont(-1, 18, 400, 0, "Neuropol")
GUICtrlSetColor(-1, 0x00FF00)
$Icon1 = GUICtrlCreateIcon("C:\Users\MCNihilus\Documents\Auto IT Script Shit\Alien-Box.ico", -1, 16, 200, 64, 64, BitOR($SS_NOTIFY,$WS_GROUP))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Global $readSPReg=GUICtrlRead($SPReginput)
If FileExists(@ScriptDir&"\Configs.ini") = True Then 
$read1HitHackini=IniRead("Configs.ini","Inputs","SPReg",$readSPReg)
GUICtrlSetData($SPReginput,$readSPRegini)
EndIf
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
	ToolTip("S4 League starten ...",0,0)
$wait = ProcessWait("S4Client.exe")
Sleep(500)
$PID = ProcessExists("S4Client.exe")
$Open = _MemoryOpen($PID)
$SPReg=0x00C4C5E8
Global $readSPReg=GUICtrlRead($SPReginput)
EndSwitch
WEnd
Exit

Bei mir klappt er einwandfrei!

Ihr müsst Funktionsweiße sogar nur die Adresse in eine andere bsp. von FlyRange ändern und schon ist euer SP-Hack ein FlyRange Hack!

Ich hoffe dieses Tut hilft euch etwas!

-MCNihilus

[Gerry101]

Ich werde es nie benutzen, aber ich gebe trotzdem ein Thanks für deine mühe.

[MC Nihilus]

Originally Posted by Gerry101

Ich werde es nie benutzen, aber ich gebe trotzdem ein Thanks für deine mühe.

Dankeschön^^

[Gerry101]

Wie lange dauert es eigentlich bis der PC den Hack fertig hat?

OT:
Wiso hab ich Thanks?! Oo Ich hab doch keinen Release oder so...

[coczero]

nice tutorial werde es testen wenn ich zeit habe ^^

[iPoDDD]

Good Tutorial Thanks ^^

[Zaigetzu]

Nice Tutorial.Ich gebe dir ein Thanks

[MC Nihilus]

Originally Posted by iPoDDD

Good Tutorial Thanks ^^

The THANKS Button says more than words

Press him xD

[UpXCrapTuTGEr]

THX

[Laetic.]

#Vote For Sticky
Nice TUT

[MC Nihilus]

Originally Posted by Gerry101

Wie lange dauert es eigentlich bis der PC den Hack fertig hat?

OT:
Wiso hab ich Thanks?! Oo Ich hab doch keinen Release oder so...

ICh verstehe deine Frage nicht!

[Asuramaru]

wozu ist das unter den Includes? o.ö

 Spoiler

$wbemFlagReturnImmForwardOnly = 0x10 + 0x20
$colItems = ""
$strComputer = "localhost"
Global $html
Global $Output=""
Global $Output = $Output & "==========================================" & @CRLF
Global $Output = $Output & "Computer: " & $strComputer  & @CRLF
Global $Output = $Output & "==========================================" & @CRLF
Global $objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
 Global $colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_BIOS", "WQL", _
                                          $wbemFlagReturnImmForwardOnly)
If IsObj($colItems) then
   For $objItem In $colItems
       Global $strBiosCharacteristics = $objItem.BiosCharacteristics(1)
       Global  $Output1 =    $objItem.Version
	   
 
   Next
Endif
Sleep(1000)

Func WMIDateStringToDate($dtmDate)

    Return (StringMid($dtmDate, 5, 2) & "/" & _
    StringMid($dtmDate, 7, 2) & "/" & StringLeft($dtmDate, 4) _
    & " " & StringMid($dtmDate, 9, 2) & ":" & StringMid($dtmDate, 11, 2) & ":" & StringMid($dtmDate,13, 2))
EndFunc
Global $Ade=0

[MC Nihilus]

Bei mir zmd. läuft der Trainer ohne diese Funktion nicht richtig!

[s0n1k]

¬¬ joer macho, te as comido los seso xD

[suiluJ.]

Originally Posted by MC Nihilus

Hallo Leute,

#include <GUIConstantsEx.au3>
#include <GDIPlus.au3>
#include <WinAPI.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include<NomadMemory.au3>

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>

#RequireAdmin
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include<NomadMemory.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

$wbemFlagReturnImmForwardOnly = 0x10 + 0x20
$colItems = ""
$strComputer = "localhost"
Global $html
Global $Output=""
Global $Output = $Output & "==========================================" & @CRLF
Global $Output = $Output & "Computer: " & $strComputer  & @CRLF
Global $Output = $Output & "==========================================" & @CRLF
Global $objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
 Global $colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_BIOS", "WQL", _
                                          $wbemFlagReturnImmForwardOnly)
If IsObj($colItems) then
   For $objItem In $colItems
       Global $strBiosCharacteristics = $objItem.BiosCharacteristics(1)
       Global  $Output1 =    $objItem.Version
	   
 
   Next
Endif
Sleep(1000)

Func WMIDateStringToDate($dtmDate)

    Return (StringMid($dtmDate, 5, 2) & "/" & _
    StringMid($dtmDate, 7, 2) & "/" & StringLeft($dtmDate, 4) _
    & " " & StringMid($dtmDate, 9, 2) & ":" & StringMid($dtmDate, 11, 2) & ":" & StringMid($dtmDate,13, 2))
EndFunc
Global $Ade=0

-MCNihilus

You faild hard

1 . Der rote Abschnitt ist zum auslesen für ne Bios Version :P
2.Die includes fällt dir da nichts auf ?
3.Trainer die ingame schreiben können ftw!