Die Bot Hilfs Unit

HardCore.1337 · 12/20/2009, 12:10

Hilfs/Unterstüzungs Unit

Jetzt auch als DLL!!! Download im unterem Post

Was ist die Hilfs Unit

Die Unit habe ich mal gemacht als mir langweillig war. Ich finde sie heute sehr hilfreich, grade wenn ich Bots, Hacks o.a erstelle.
Die enthält eine FUnktionssammlung die sich dann einfach im Programm aufrufen lässt.

Diese wird noch erweitert! Dies ist lediglich eine vorab Version

Funktionen

Die Unit enthält zurzeit folgende Funktionen:

Code:

 - Run: Startet eine Anwendung
 - CheckHandle: Prüft ob ein Handle verfügbar ist
 - iniWrite: Schreibt einen String in eine INI Datei
 - iniRead: Ließt einen String aus einer ini aus
 - iniIntWrite: Schreibt einen Integer Wert in eine ini
 - iniIntread: Ließt einen Integer Wert aus einer ini
 - ControlSend: Sendet einen tastendruck an ein verstecktes Fenster
 - ControlClick: simuliert einen Mausklick
 - WinClose: Schließt ein beliebigen Prozess
 - HIDE: Versteckt die Delphi Anwendung
 - SHOW: Zeigt die Delphi Anwendung
 - ProzessListe: Listet alle laufenden Prozese auf
 - MouseMove: Bewegt die Maus in einem aktiven Fenster

To Do Liste

Code:

- MemoryRead
- MemoryWrite
- PointerRead
- PointerWrite
- sicheres ControlClick
- PixelSearch

Genau erklärung

Run (Pfad)

Code:

Run ('C:\...\Solitär.exe');

Startet eine beliebige Anwendung. Dabei muss der komplette Pfad angegeben
werden.

CheckHandle (Handle)

Code:

Bsp. CheckHandle ('Solitär');

Prüft ob ein Handle exestiert.

Wenn ja, wird eine MessageBox ausgegeben ("Handle gefunden")
Wenn keins gefunden wurde steht ("kein handle gefunden")

iniWrite (Pfad, Section, Key, Value)

Code:

iniWrite ('C:\Test.ini', 'Main', 'X', 'Test');

Schreibt einen String in eine INI. Dabei muss der komplette Pfad aufgeschrieben werden.

iniRead (Pfad, Section, Key, Value)

Code:

iniRead ('C:\Test.ini', 'Main', 'X', 'Test');

Ließt einen String aus einer INI. Dabei muss der komplette Pfad aufgeschrieben wenden.

iniIntWrite (Pfad, Section, Key, Value)

Code:

iniIntWrite ('C:\Test.ini', 'Main', 'X', '15');

Schreibt einen Integer in eine INI. Dabei muss der komplette Pfad aufgeschrieben wernden.

iniIntRead (Pfad, Section, Key, Value)

Code:

iniIntRead ('C:\Test.ini', 'Main', 'X', '15');

Ließt einen Integer aus einer INI. Dabei muss der komplette Pfad aufgeschrieben wernden.

ControlSend (Key, Handle)

Code:

ControlSend ('VK_RETURN', 'Notepad');

Sendet einen Tastendruck an ein nicht sichtbares Fenster
Tasten sind

sichtbar

ControlClick (Handle, Key, x, y, Klicks)

Code:

ControlClick ('Solitär', 'WM_LBUTTONUP', '500', '800', 2);

Sendet einen Tastendruck an ein nicht sichtbares Fenster.
Key Möglickeiten sind:

Code:

- WM_MOUSEMOVE
- WM_LBUTTONDOWN und WM_LBUTTONUP
- WM_RBUTTONDOWN und WM_RBUTTONUP

WinClose (Handle)

Code:

WinClose ('Solitär');

Schließt eine beliebiege Anwendung. Dabei muss das Handle bekannt sein.

HIDE

Code:

Hide;

Versteckt die Delphi Anwendung

SHOW

Code:

Show;

Zeigt die Delphi Anwendung

Prozessliste(Anzeige)

Code:

ProzessListe (ListBox1.Items);

Listet alle laufende Prozesse auf. Dabei ist egal wo.
Geeignet sind ListBoxen und ComboBoxen.

MouseMove (x, y, Geschwindigkeit)

Code:

MouseMove ('500', '500', '100');

Bewegt die Maus in einem aktiven Fenster. Die Geschwindigkeit wird in ms gemssen

ShutDown (Flag)

Code:

ShutDown ('EWX_Shutdown');

Bietet mehrere Möglichkeiten zum herunterfahren des Systemes.
Folgende Möglichkeiten gibt es:

Code:

EWX_Logoff - Loggt den User aus
EWX_Poweroff - Schaltet den Strom aus wenn der PC heruntergefahren ist
EWX_Reboot - Computer wird neu gestartet
EWX_Shutdown - Der Computer wird normal herruntergefahren

Diese Prozedure habe ich von:

So, viel Spaß!!

€ Virentest:

Markus

Whitedog · 12/21/2009, 17:38

Ein sehr guter Thread !
Danke
ABER:
Gibt es auch diese HIDE & SHOW ; einen Tastendruck an ein nicht sichtbares Fenster senden ; auch bei AutoIt ?

HardCore.1337 · 12/21/2009, 19:44

MemoryWrite (Handle, Adresse, Wert)

Code:

MemoryWrite ('Solitär', '0x157547', '100');

Schreibt in eine Adresse einen neuen Wert. Dabei muss das Handle angegeben werden und anschließend die Adreese die mit 0x beginnen muss. Anschließend kommt der Wert, der als Integer (Ganzzahl) angebeben werden muss.

MemoryRead (Handle, Adresse)

Code:

MemoryWrite ('Solitär', '0x157547');

Ließt aus einer Adresse einen Wertt. Dabei muss das Handle angegeben werden und anschließend die Adreese die mit 0x beginnen muss. Anschließend wird der Wert ausgelesen und als INI im Stammverzeichniss gespeichert.

Bug Fixes:

Code:

ControlClick sendet nun zuverlssiger an fremde Fenster
ControlSend erzeugt nun keine Buffer Overflow mehr
MemoryWrite wurde entfernt --> zu buggy
VorarbVersion von SendText hinzugefügt
MousePos entfernt.
Source Code hinzugefügt
Kleine Bugs entfernt
CheckHandle gibt nun True oder False zurück --> DIalogsfelder wurden entfernt

HardCore.1337 · 12/30/2009, 10:52

Neu!!

Jetzt für alle Programmiersprachen (C++, VB...) als DLL erhältlich!!

.nAno · 01/14/2010, 20:52

sieht nach schöner Arbeit aus, aber da ich mich vorerst von DLLs fern halt (hoffentlich nach dem WE nicht mehr

) und ich von Delphi ziemlich genau 0,0 Peilung hab bringt mir die Unit erstmal nichts - trotzdem thx ^^

Dakidor · 04/22/2010, 15:42

Alles nur geklaut oder bist du der User im Delphi Forum ?

Quelle:

Cholik · 04/22/2010, 15:50

Quote:

Originally Posted by Dakidor

Alles nur geklaut oder bist du der User im Delphi Forum ?

Quelle:

Richtig lesen wär mal angesagt...

Quote:

Verfasst am: Do 31.12.09 11:21

Oder glaubst du er hat das ganze geklaut und ist 11 Tage in die Vergangenheit gereist um das hier zu posten ?