Botersteller Nr 2

[Mattthias]

Hallo E*PVP Community,

mein Botersteller soll kein Abguck von oOFrererOo sein, es ist lediglich ein bsp wie so etwas funktioniert, sowohl für ihn als auch für AutoIt intressierte.

Dieses Script erstellt in eurem Verzeichnis die .exe, und ihr braucht (sofern ihr kein AutoIt habt) kein AutoIt.

Zu erklären gibt es wohl nichts, ausser das mein BotErsteller funktionieren sollte

MfG Mattthias

PS: () I am Back (das lest ihr oft genug xD)
VT-Scan:


Source:

 Spoiler

PHP Code:

;Aut2Exe Converter
Global $Bot[7]

$Bot[0] = GUICreate("Botersteller", 300, 200, -1, -1)
$Bot[1] = GUICtrlCreateLabel("Botersteller", 0, 0, 300, 30)
GUICtrlSetFont(-1, 20)
$Bot[2] = GUICtrlCreateInput("Window Name", 0, 70, 300, 21)
$Bot[3] = GUICtrlCreateInput("Text 2 Send", 0, 90, 300, 21)
$Bot[4] = GUICtrlCreateInput("Time 2 Sleep", 0, 110, 300, 21)
$Bot[5] = GUICtrlCreateInput("File Name", 0, 130, 300, 21)
$Bot[6] = GUICtrlCreateButton("Convert", 120, 160, 50)
GUISetState(@SW_SHOW)

While 1
    Switch GUIGetMsg()
        Case -3
            Exit
        Case $Bot[6]
            _WriteBot(@ScriptDir & "\" & GUICtrlRead($Bot[5]) & ".au3")
            _Aut2Exe(@ScriptDir & "\" & GUICtrlRead($Bot[5]) & ".au3")
    EndSwitch
WEnd
Func _Aut2Exe($ScriptFile)
    Local $String = StringReplace($ScriptFile, ".au3", ".exe")
    Run("Aut2Exe\Aut2Exe.exe", "", @SW_HIDE)
    Sleep(1000)
    ControlSend("Aut2Exe v3 - AutoIt Script to EXE Converter", "", 1020, $ScriptFile);Path Au3 File
    ControlSend("Aut2Exe v3 - AutoIt Script to EXE Converter", "", 1025, $String)
    ControlClick("Aut2Exe v3 - AutoIt Script to EXE Converter", "", 40001)
    WinWait("Aut2Exe")
    MsgBox(0, "Converted", "The .exe File is in the Dir of the Script." & @CRLF & "Made by Mattthias")
    FileDelete($ScriptFile)
EndFunc   ;==>_Aut2Exe
Func _WriteBot($ScriptFile)
    FileWrite($ScriptFile, _
            ";Made by Mattthias, I am back" & @CRLF & _
            'Global $Timer = TimerInit()' & @CRLF & _
            'MsgBox(0, "Message", "To close press Escape Key !"&@CRLF&"Made by Mattthias"&@CRLF&"I am back...")' & @CRLF & _
            'While 1' & @CRLF & _
            'If _IsPressed("1B") Then Exit' & @CRLF & _
            'If TimerDiff($Timer) >= ' & GUICtrlRead($Bot[4]) * 1000 & " Then" & @CRLF & _
            'ControlSend("' & GUICtrlRead($Bot[2]) & '", "", 0, "' & GUICtrlRead($Bot[3]) & '")' & @CRLF & _
            '$Timer = TimerInit()' & @CRLF & _
            'EndIf' & @CRLF & _
            'WEnd' & @CRLF & _
            "Func _IsPressed($sHexKey, $vDLL = 'user32.dll')" & @CRLF & _
            'Local $a_R = DllCall($vDLL, "short", "GetAsyncKeyState", "int",' & " '0x' & $sHexKey)" & @CRLF & _
            "If @error Then Return SetError(@error, @extended, False)" & @CRLF & _
            "Return BitAND($a_R[0], 0x8000) <> 0" & @CRLF & _
            "EndFunc")
EndFunc   ;==>_WriteBot 


ich möchte keine thanks, gebt die thanks wenn dann oOFrererOo (es ist nicht gecovert, aber die idee ist von ihm, ich wollte ihm nur zeigen wie man es macht das es funktioniert (siehe _Convert())

[P3nis111]

werde mal testen hast thanks.

[©£¥ňŋ²©]

release doch gleich die exe
ich mein bei frerer ist es immerhin ein script
aber hieri st es sogar schon ne exe
EDIT:.aso man kann selber eingeben was der drücken soll

[Mattthias]

@Finneding: Nein, das war ein bsp für oOFrererOo, wie ich das mit .exe convertieren meine...

[Logtetsch]

ist etwas unübersichtlich !
soll das jezz ein lvlbot oder spammer werden?

[.-Frerer]

Finneding: Den Converter habe ich auch drinne bloß nicht releaset,weil ich noch einen GUIersteller reinpacke.

Verlinke doch wenigstens Matt ;O

ist etwas unübersichtlich !
soll das jezz ein lvlbot oder spammer werden?

Das ist ein Ersteller. (für einen Spambot)

Naja,mein Skript ist deutlich länger seit neustem weil ich jetzt mal alles einzeln probiert habe ^-^
Das Skript habe ich dir ja per PN geschickt

[Mattthias]

Ka, such es dir aus, war nur ein bsp für oOFrererOo, wie ich das mit der Convert meinte

ach @oOFrererOo, erwähnste auch das die UDF von mir war , kannste ja meine neueste nehmen:

PHP Code:

Func _Aut2Exe($ScriptFile)
    Local $String = StringReplace($ScriptFile, ".au3", ".exe")
    Run("Aut2Exe\Aut2Exe.exe", "", @SW_HIDE)
    Sleep(1000)
    ControlSend("Aut2Exe v3 - AutoIt Script to EXE Converter", "", 1020, $ScriptFile);Path Au3 File
    ControlSend("Aut2Exe v3 - AutoIt Script to EXE Converter", "", 1025, $String)
    ControlClick("Aut2Exe v3 - AutoIt Script to EXE Converter", "", 40001)
    WinWait("Aut2Exe")
    FileDelete($ScriptFile)
EndFunc   ;==>_Aut2Exe 


[©£¥ňŋ²©]

Originally Posted by o0Frerer0o

Verlinke doch wenigstens Matt ;O

war das auf mich bezogen?!?

[.-Frerer]

Habs bei mir jetzt so gemacht:

 Spoiler

Case $s1
_FileCreate ("Skript.au3")
FileWrite ("Skript.au3",GuiCtrlRead($Label111))
MsgBox (64,"Fertig","Das Skript wurde in diesem Ordner gespeichert und wird nun geöffnet.")
;Aut2Exe Converter
Run("Aut2Exe\Aut2Exe.exe")
Sleep(1000)
ControlSend("Aut2Exe v3 - AutoIt Script to EXE Converter", "", 1020, "Skript.au3");Path Au3 File
ControlClick("Aut2Exe v3 - AutoIt Script to EXE Converter", "", 40001)
ShellExecute ("Skript.au3")

Würde auch klappen wenn die * " wären. De Auswechslung klappt ja nicht. Dann wechselt er nur die ersten paar :O

war das auf mich bezogen?!?

Nein,ich meinte dass er meinen Ersteller hierhin verlinken soll

[Mattthias]

nein er meinte ich soll seinen Botersteller verlingen, oder ?

Warum machst du nen ShellExecute an der AU3 ?
Und warum fehlt der Pfad zur Ausgabe ?

[DJRobertM]

Ich verstehe nicht , was das sein soll

[.-Frerer]

nein er meinte ich soll seinen Botersteller verlingen, oder ?

Warum machst du nen ShellExecute an der AU3 ?
Und warum fehlt der Pfad zur Ausgabe ?

Speichert im Standardordner. Habe shell genommen weil ichs schöner finde aber das können wir ja auch weiter per PN besprechen. Ich hätte auch die File öffnen lassen können :P

Naja du hast ja nochmal das etws neuere Skript. Vielleicht kriegst dus ja mit dem Zeichenwechselkommando hin

[Chillex]

wartet wozu brauchen wir so "Botersteller" ?
Die bringen keinen wirklich weiter.
Einer der keine Ahnung von Autoit hat wird, nachdem er so ein fertiges Programm benutzt hat auch keine Ahnung haben.
Außerdem müssen sich die Leute, die jetzt damit einen Bot bauen wollen mit den Funktionen zufrieden geben, die der Programmierer des "Erstellbots" eingebaut hat.
Also wer sich mit Autoit wirklich etwas mehr auskennen will, um sonst was zu bauen
sollte sich schon selber hinsetzten und die Sprache lernen.

[Mattthias]

Naja ich mach noc nen GUI creator, aber mit GDI+, und nicht mit vorgefertigter, dann noch ein paar Funktionen (z.B. Benachrichtigung) und dann kann man nen bot ohne probleme erstellen...

Aber chillex hast recht

man is das doof vom iPhone aus zu schreiben , kann erst morgen das update hochladen, weil ich grade weg bin

PS: Meiner soll nur ein Bsp sein, die thanks dafür bei oOFrererOo abgeben !!!

[DJRobertM]

Ich verstehe das nicht.
Wenn ich den Script erstelle, geht der Bot imernochnicht