Thats practically useless sir :(
das ist hier aber wohl die falsche kategorie....Quote:
hab ma ein bischen probiert und einen angelbot gebaut er ist perfekt zum angel nachts und tags über
Link: [Only registered and activated users can see links. Click Here To Register...]
Case $AR_BUTTON[0]
MsgBox(0, "Farben-Finder", "leg einen kleinen Fisch auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[0] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[0], "0x" & Hex($AR_FISCH[0], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[1]
MsgBox(0, "Farben-Finder", "leg einen Zander auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[1] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[1], "0x" & Hex($AR_FISCH[1], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[2]
MsgBox(0, "Farben-Finder", "leg einen Mandarinfisch auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[2] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[2], "0x" & Hex($AR_FISCH[2], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[3]
MsgBox(0, "Farben-Finder", "leg einen Karpfen auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[3] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[3], "0x" & Hex($AR_FISCH[3], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[4]
MsgBox(0, "Farben-Finder", "leg einen Lachs auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[4] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[4], "0x" & Hex($AR_FISCH[4], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[5]
MsgBox(0, "Farben-Finder", "leg eine Bachforelle auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[5] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[5], "0x" & Hex($AR_FISCH[5], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[6]
MsgBox(0, "Farben-Finder", "leg einen Graskarpfen auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[6] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[6], "0x" & Hex($AR_FISCH[6], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[7]
MsgBox(0, "Farben-Finder", "leg einen Lotusfisch auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[7] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[7], "0x" & Hex($AR_FISCH[7], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[8]
MsgBox(0, "Farben-Finder", "leg einen großen Zander auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[8] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[8], "0x" & Hex($AR_FISCH[8], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[9]
MsgBox(0, "Farben-Finder", "leg einen Katzenfisch auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[9] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[9], "0x" & Hex($AR_FISCH[9], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[10]
MsgBox(0, "Farben-Finder", "leg einen Aal auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[10] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[10], "0x" & Hex($AR_FISCH[10], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[11]
MsgBox(0, "Farben-Finder", "leg eine Rotfeder auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[11] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[11], "0x" & Hex($AR_FISCH[11], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[12]
MsgBox(0, "Farben-Finder", "leg einen Barsch auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[12] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[12], "0x" & Hex($AR_FISCH[12], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[13]
MsgBox(0, "Farben-Finder", "leg einen Regenbogenforelle auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[13] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[13], "0x" & Hex($AR_FISCH[13], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_BUTTON[14]
MsgBox(0, "Farben-Finder", "leg einen Regenbogenforelle auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_FISCH[14] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_INPUT[14], "0x" & Hex($AR_FISCH[14], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_ITEM_BUTTON[0]
MsgBox(0, "Farben-Finder", "leg eine Haarfarbe auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_ITEM[0] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_ITEM_INPUT[0], "0x" & Hex($AR_ITEM[0], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_ITEM_BUTTON[1]
MsgBox(0, "Farben-Finder", "leg ein Bleichmittel auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_ITEM[1] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_ITEM_INPUT[1], "0x" & Hex($AR_ITEM[1], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_ITEM_BUTTON[2]
MsgBox(0, "Farben-Finder", "leg ein Symbol des waisen Kaisers auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_ITEM[2] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_ITEM_INPUT[2], "0x" & Hex($AR_ITEM[2], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_ITEM_BUTTON[3]
MsgBox(0, "Farben-Finder", "leg Lucys Ring auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_ITEM[3] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_ITEM_INPUT[3], "0x" & Hex($AR_ITEM[3], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_ITEM_BUTTON[4]
MsgBox(0, "Farben-Finder", "leg einen Handschuh auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_ITEM[4] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_ITEM_INPUT[4], "0x" & Hex($AR_ITEM[4], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_ITEM_BUTTON[5]
MsgBox(0, "Farben-Finder", "leg einen Umhang auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$AR_ITEM[5] = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_ITEM_INPUT[5], "0x" & Hex($AR_ITEM[5], 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_GUI2_SONSTIGE_BUTTON[0]
MsgBox(0, "Farben-Finder", "lasse das 1. Inventarfach leer (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$LEER = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_SONSTIGE_INPUT[0], "0x" & Hex($LEER, 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_GUI2_SONSTIGE_BUTTON[1]
MsgBox(0, "Farben-Finder", "leg Würmer auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$WURM = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_SONSTIGE_INPUT[1], "0x" & Hex($WURM, 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_GUI2_SONSTIGE_BUTTON[2]
MsgBox(0, "Farben-Finder", "leg Paste auf das 1. Inventarfach (links oben)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$PASTE = PixelGetColor($AR_INV_X[0], $AR_INV_Y[0])
GUICtrlSetData($AR_GUI2_SONSTIGE_INPUT[2], "0x" & Hex($PASTE, 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_GUI2_SONSTIGE_BUTTON[3]
MsgBox(0, "Farben-Finder", "minimiere eine PN (der Brief soll erscheinen)" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$NACHRICHT_FARBE = PixelGetColor($NACHRICHT_X, $NACHRICHT_Y)
GUICtrlSetData($AR_GUI2_SONSTIGE_INPUT[3], "0x" & Hex($NACHRICHT_FARBE, 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
Case $AR_GUI2_SONSTIGE_BUTTON[4]
MsgBox(0, "Farben-Finder", "lass das ganz normale HUD dran; x = 795, y = 595" & @CRLF & @CRLF & "der Bot wird die Farbe abscannen und sie eintragen" & @CRLF)
Sleep(1000)
WinActivate($METIN_NAME)
Sleep(1000)
$HUD_RECHTS_UNTEN = PixelGetColor(795, 595)
GUICtrlSetData($AR_GUI2_SONSTIGE_INPUT[4], "0x" & Hex($HUD_RECHTS_UNTEN, 6))
MsgBox(0, "", "die Farbe wurde übenommen!")
EndSwitch
WEnd
GUIDelete()
EndFunc