[Brauche Hilfe] AutoHotKey

Kazuko · 6. Januar 2016

Hallo,
Würde gerne einen Angelbot machen,
Jedoch bräuchte ich etwas hilfe

C

SetWorkingDir %A_ScriptDir%
#SingleInstance force
#include %A_ScriptDir%\SAMP.ahk


PosX := 822
PosY := 907
cBGR := 0x21CC5F


togglefish := false
flt := Round(1000 / fishleertick,0)


SetTimer, Fischbot, 500
F10::
	MouseGetPos, PosX, PosY
	PixelGetColor, cBGR , %PosX%, %PosY%
	SoundBeep, 1500, 500
	Return
F11::
	if (togglefish == true){
		SoundBeep, 500, 500
	}
	if (togglefish == false){
		SoundBeep, 1000, 500
	}
	togglefish := !togglefish
	Return


Fischbot:
	While togglefish
	{
		currentheal := getPlayerHealth()
		startleer1 := A_TickCount
		while (currentheal == -1 and startleer1-A_TickCount <= 500){
			currentheal := getPlayerHealth()
		}
		if (currentheal <= 10 and currentheal != -1){
			SendInput t/use donut{enter}
		}
		Random, sleepfish, %fishwaitmin%, %fishwaitmax%
		SendInput t/fish{enter}
		Sleep, 350
		GetChatLine(0, fspotcheck)
		if InStr(fspotcheck, "FEHLER: Hier kannst du nicht angeln."){
			SoundBeep, 400, 500
			SoundBeep, 300, 500
			SoundBeep, 150, 2000
			togglefish := !togglefish
			break
		}
		if (InStr(fspotcheck, "Du angelst bereits") and color != cBGR){
			Sleep, 350
			break
		}	
		loop
		{
			PixelGetColor, color, %PosX%, %PosY%
			if(color == cBGR)	
				break
			Sleep, 100
			if (!togglefish){
					break, 2
			}
			GetChatLine(0, shit)
			if InStr(shit, "Du hattest nur Algen am Haken.") or InStr(shit, "Du hast das Fischen abgebrochen.") or InStr(shit, "Du hattest nur eine Dose am Haken") or InStr(shit, "Du hattest nur einen toten Fisch am Haken.") or InStr(shit, "Du hattest nur einen kaputten Gartenschlauch am Haken") or InStr(shit, "Du hast ein rostiges Fahrrad geangelt") or InStr(shit, "Du hattest nur einen Autoreifen am Haken.") or InStr(shit, "Du hattest nur ein Nova-eSports Fanshirt am Haken.") or InStr(shit, "Es hat nichts angebissen."){
				Sleep, %sleepfish%
				continue, 2
			}
		}
		startleer := A_TickCount
		while (A_TickCount-startleer <= 45000){
			if (!togglefish){
				break, 2
			}
			PixelGetColor, colorrechts1, 987, 318
			PixelGetColor, colorrechts2, 939, 295
			PixelGetColor, colorrechts3, 935, 341
			PixelGetColor, colorlinks1, 921, 315
			PixelGetColor, colorlinks2, 969, 293
			PixelGetColor, colorlinks3, 967, 340
			PixelGetColor, colorunten1, 953, 343
			PixelGetColor, colorunten2, 925, 302
			PixelGetColor, colorunten3, 978, 299
			PixelGetColor, coloroben1, 955, 284
			PixelGetColor, coloroben2, 926, 332
			PixelGetColor, coloroben3, 981, 333
			if (colorrechts1 == 0x5F5E5F and colorrechts2 == 0x706C6A and colorrechts3 == 0x7B7A7B){
				SendInput {Right down}
				Sleep, 25
				SendInput {Right up}
				Sleep, 100
			}
			if (colorlinks1 == 0xA3A5A3 and colorlinks2 == 0x6E6A6E and colorlinks3 == 0x6B696B){
				SendInput {Left down}
				Sleep, 25
				SendInput {Left up}
				Sleep, 100
			}
				if (colorunten1 == 0x797B79 and colorunten2 == 0x6B696B and colorunten3 == 0x949294){
				SendInput {Down down}
				Sleep, 25
				SendInput {Down up}
				Sleep, 100
			}
			if (coloroben1 == 0xB0AFB0 and coloroben2 == 0x706C70 and coloroben3 == 0x7D7E7D){
				SendInput {Up down}
				Sleep, 25
				SendInput {Up up}
				Sleep, 100
			}


			GetChatLine(0, fischgef)
			If InStr(fischgef, "Abgabe beim Wettbewerbsveranstalter") or InStr(fischgef, "Du hast ein") or InStr(fischgef, "Du hattest nur") or InStr(shit, "Du hast das Fischen abgebrochen."){
				Sleep, %sleepfish%
				break
			}
		}	
	}
Return

Alles anzeigen

der funktioniert nicht ganz, der schreibt zwar /fish wen man ihn einschaltet oder erkennt auch ob er an der falschen position ist, aber er drückt nichts und glaub sogar er ließt die Pfeile nicht aus.. Kann mir jemand da behilflich sein? Wäre dankbar.

Screen von den Pfeilen Ingame:

Spoiler anzeigen

Zur Info: (Ich habe diesen Angelbot.ahk gefunden aber er war leider nicht genau funktionstüchtig, mit der hoffnung das mir jemand hilft ihn zu voll enden )

Gruß

Renz · 6. Januar 2016

Hey, versuch die Pfeile per Gametext.dll auszulesen, das ist am einfachsten Schick mir mal den Server Name, ich teste ma das Angelsystem und kann dir gerne helfen

Kazuko · 6. Januar 2016

server.nes-newlife.de:7777

@Edit:
Wo bekomme ich die Gametext.dll für Autohotkey her?

Newbie23 · 6. Januar 2016

Du kannst die mit wenigen Klicks unter Google finden. Sollte nicht das größte Problem sein.

Kazuko · 6. Januar 2016

Habe eine gefunden aber ich kenne die Funktionen nicht die darin enthalten sind...

Nexor · 6. Januar 2016

Die einzige Funktion die sie hat ist das es alle gametexts in eine .txt schreibt wie die chatlog.txt

Kazuko · 7. Januar 2016

Habe jetzt alle Pfeile (Umgemodet) umlackiert, Kann man nun vielleicht irgendwie rauslesen ob z.B. eine Farbe im Spiel existiert soll sie die eine taste ausführen?
Habs so probiert:
PixelSearch, Px, Py,0 ,0 ,1920 , 1080, color, Fast

If (color = 0xcb6095)
{
SendInput {Right down}
Sleep, 001
SendInput {Right up}
Sleep, 001
}

funktioniert aber nicht.

Nexor · 7. Januar 2016

if abfragen werden normal mit '==' gemacht das bedeutet 'gleich ' das '=' benutzt du wenn du eine variable befüllen willst

Kazuko · 7. Januar 2016

Also wäre das richtig bloß nur mit 2 == ?

dewey · 7. Januar 2016

Zitat von Kazuko

Also wäre das richtig bloß nur mit 2 == ?

Die IF-Abfrage wird mit zwei Gleichheitszeichen gemacht.

MfG

Kazuko · 7. Januar 2016

PixelSearch, 926, 332,955, 284 ,955, 284, color, 3, Fast

if (color == 0x00ffc0){
SendInput {Left down}
Sleep, 2
SendInput {Left up}
Sleep, 1
}

if (color == 0xbd60cb){
SendInput {Down down}
Sleep, 2
SendInput {Down up}
Sleep, 1
}

if (color == 0xcbca60){
SendInput {Up down}
Sleep, 2
SendInput {Up up}
Sleep, 1
}

Sollte also so klappen?

dewey · 7. Januar 2016

Zitat von Kazuko

PixelSearch, 926, 332,955, 284 ,955, 284, color, 3, Fast

if (color == 0x00ffc0){
SendInput {Left down}
Sleep, 2
SendInput {Left up}
Sleep, 1
}

if (color == 0xbd60cb){
SendInput {Down down}
Sleep, 2
SendInput {Down up}
Sleep, 1
}

if (color == 0xcbca60){
SendInput {Up down}
Sleep, 2
SendInput {Up up}
Sleep, 1
}

Sollte also so klappen?

Alles anzeigen

Mit ziemlicher Sicherheit nicht.
Guck dir noch mal die Funktion genauer an: https://autohotkey.com/docs/commands/PixelSearch.htm
Die ersten zwei Parameter übergeben dir die X und Y Position des Pixels mit der angegebenen Farb-ID.
Die Farb-ID musst du in einer (Hexa)Dezimalzahl angeben und kommt da hin wo du die Variable color hast.

Die IF-Abfragen ergeben dementsprechend auch keinen Sinn, da du für die Variable color Werte abfragst, die nirgends definiert werden.
Einfach auf der Seite die ich geschickt habe, unten das Beispiel angucken.

Edit:
Wenn ich mir dein Script oben mal so anschaue ist das definitiv logischer aufgebaut.
Mit der Funktion PixelGetColor kannst du nämlich die Farbwerte auslesen. Also warum dann mit einer anderen Funktion arbeiten?
In dem folgenden Artikel von AutoHotKey ist auch ein sehr gutes Beispiel enthalten, damit kannst du dir dann einfach die Farbwerte ausgeben lassen.
https://autohotkey.com/docs/commands/PixelGetColor.htm

MfG

Kazuko · 7. Januar 2016

Leider sehr schlecht, da ich kaum Englisch kann, Magst du mir vielleicht helfen per Ts,Skype oder ähnliches?

dewey · 7. Januar 2016

Wenn du dich mit einer Sprache wie AutoHotKey auseinandersetzen willst, musst du zwangsläufig Englisch können.
Da ich noch nie einen Angelbot oder sonstiges in der Richtung mit PixelGetColor oder so gemacht habe, ist die Aufgabe nicht sehr leicht.

Die Funktion:

Code

Numpad0::
MouseGetPos, MouseX, MouseY
PixelGetColor, color, %MouseX%, %MouseY%
addchatmessage("Farbe: " color "X: " MouseX "Y:" MouseY)
return

Gibt dir die Farbe in den Chat und die Position der Pixel mit aus.
Einfach den Chat öffnen, mit der Maus in jede der Ecken vom Pfeil gehen und dann in eine IF-Abfrage packen.
Die Positionen kannst du ja aus der chatlog.txt in deinem GTA Ordner, in den Dokumenten rauskopieren.

MfG

Kazuko · 7. Januar 2016

Brauche Hilfe

Noxaro_Demonox · 8. Januar 2016

Hallo Zusammen,

ich weise hiermit daraufhin, dass so ein Bot auf unserem Server verboten ist!
Der User Kazuko aka Elegant wurde deswegen nun von Nova-eSports NewLife geblacklistet.

Grüße
[NeS]Lookie
Nova-eSports Management

Kazuko · 10. Januar 2016

Okaaaaaaaaaaaaaaaay

[Brauche Hilfe] AutoHotKey

Beitrag von Kazuko (6. Januar 2016)

Beitrag von Kazuko (7. Januar 2016)

Beitrag von MrSmoke1 (8. Januar 2016)

breadfish.de 12. März 2022

Ähnliche Themen

AutoHotKey - benötige Hilfe

AutoHotKey Overlay Hilfe gesucht

AutoHotkey

[AHK] MySQL login system