Der kleine Helfer

  • Der kleine Helfer

    Ein Skript, das am mauszeiger, permanent die Mauskoordinaten von (Client,Window,Screen) zeigt und von der Position den Farbwert in 0x000000 . Man kan die werte Screen, Windows und Client einseln speichern mit den farbwert oder alle zusammen. Es wird alles in .ini datein gespeichert. Man kann damit unendlich viele koordinaten speichern.

    (RS)>>> Download <<<(RS)
    (Forum)>>> Download <<<(Forum)

    .txt im Spoiler

    Spoiler anzeigen

    Der kleine Helfer - Made by SatanXnataS

    -=Tasten=-

    [1] Speichert die Daten und Werte von Screen und Farbwert unter: Sreen.ini
    [2] Speichert die Daten und Werte von Window und Farbwert unter: Window.ini
    [3] Speichert die Daten und Werte von Client und Farbwert unter: Client.ini
    [4] Speichert die Daten und Werte von Screen + Farbwerte, Window + Farbwerte, Clienet + Farbwert unter: All.ini

    [5] Info

    [Esc] Beenden des Skriptes

    Der kleine Helfer ist noch in der Entwicklung und wird deswegen, nach und nach mehr Funktionen erhalten :)


    Quellcode -.-

    Spoiler anzeigen
    [autoit]

    $eins = 1
    $zwei = 1
    $drei = 1
    $All =1

    [/autoit] [autoit][/autoit] [autoit]

    HotKeySet("{ESC}", "Terminate")
    HotKeySet("{1}", "Save_Screen")
    HotKeySet("{2}", "Save_Window")
    HotKeySet("{3}", "Save_Client")
    HotKeySet("{4}", "Save_All")
    HotKeySet("{5}", "Info")

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    AutoItSetOption ("MouseCoordMode", 0)
    AutoItSetOption ("PixelCoordMode", 0)
    $pos1 = MouseGetPos()
    $Color1 = PixelGetColor( $pos1[0] , $pos1[1] )
    AutoItSetOption ("MouseCoordMode", 1)
    AutoItSetOption ("PixelCoordMode", 1)
    $pos2 = MouseGetPos()
    $Color2 = PixelGetColor( $pos2[0] , $pos2[1] )
    AutoItSetOption ("MouseCoordMode", 2)
    AutoItSetOption ("PixelCoordMode", 2)
    $pos3 = MouseGetPos()
    $Color3 = PixelGetColor( $pos3[0] , $pos3[1] )
    Tooltip("Client: "&$pos3[0]&", "&$pos3[1]&" Farbwert: 0x"&Hex($color3, 6)&@CR&"Screen: "&$pos1[0]&", "&$pos1[1]&" Farbwert: 0x"&Hex($color1, 6)&@CR&"Window: "&$pos2[0]&", "&$pos2[1]&" Farbwert: 0x"&Hex($color2, 6), Default, Default, Default, Default, 4)
    Sleep (100)
    WEnd

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Func Save_Screen()
    IniWrite("Screen.ini", "Screen "&$eins, "Poition", $pos1[0]&", "&$pos1[1])
    IniWrite("Screen.ini", "Screen "&$eins, "Farbe", "0x"&Hex($color1, 6))
    TrayTip("Screen "&$eins," X: "&$pos1[0]&" Y: "&$pos1[1]&" Farbwert: 0x"&Hex($color1, 6)&" wurden gespeichert",1,1)
    $eins = $eins+1
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func Save_Window()
    IniWrite("Window.ini", "Window "&$zwei, "Poition", $pos2[0]&", "&$pos2[1])
    IniWrite("Window.ini", "Window "&$zwei, "Farbe", "0x"&Hex($color2, 6))
    TrayTip("Window "&$zwei," X: "&$pos2[0]&" Y: "&$pos2[1]&" Farbwert: 0x"&Hex($color2, 6)&" wurden gespeichert",1,1)
    $zwei = $zwei+1
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func Save_Client()
    IniWrite("Client.ini", "Client "&$drei, "Poition", $pos3[0]&", "&$pos3[1])
    IniWrite("Client.ini", "Client "&$drei, "Farbe", "0x"&Hex($color3, 6))
    TrayTip("Client "&$drei," X: "&$pos3[0]&" Y: "&$pos3[1]&" Farbwert: 0x"&Hex($color3, 6)&" wurden gespeichert",1,1)
    $drei = $drei+1
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func Save_All()
    IniWrite("All.ini", "Client "&$All, "Poition", $pos3[0]&", "&$pos3[1])
    IniWrite("All.ini", "Client "&$All, "Farbe", "0x"&Hex($color3, 6))
    IniWrite("All.ini", "Screen "&$All, "Poition", $pos1[0]&", "&$pos1[1])
    IniWrite("All.ini", "Screen "&$All, "Farbe", "0x"&Hex($color1, 6))
    IniWrite("All.ini", "Window "&$All, "Poition", $pos2[0]&", "&$pos2[1])
    IniWrite("All.ini", "Window "&$All, "Farbe", "0x"&Hex($color2, 6))
    TrayTip("All "&$All&" (Client,Screen,Window)", "Client - X: "&$pos3[0]&" Y: "&$pos3[1]&" Farbwert: 0x"&Hex($color3, 6)&@CR&"Screen - X: "&$pos1[0]&" Y: "&$pos1[1]&" Farbwert: 0x"&Hex($color1, 6)&@CR&"Window - X: "&$pos2[0]&" Y: "&$pos2[1]&" Farbwert: 0x"&Hex($color2, 6)&@CR&"wurden gespeichert",1,1)
    $All = $All+1
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func Info()
    Tooltip("")
    MsgBox(0, "Info", "Dieser kleine Helfer wurde von SatanXnataS erstellt", 0)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func Terminate()
    Exit 0
    EndFunc

    [/autoit]


    >>> VirenScan <<<

    Bei fragen, anregungen oder fehler, schicken sie mir eine PM im Forum

    Freundliche Grüße
    SatanXnataS

  • Falsche Kategorie ?

    aso, das ist ein skript schon umgewandelt in eine exe, weil ich es weiter bearbeiten werde und erweitern werde, so das es jeder beim download sofort benutzen kann :P

    Nachtrag: Ich habe es gestern geschrieben und auch heute erst hochgeladen :) Ich bin kein pro, aber ich wollte mir feedback hollen. Ps: Komicher Archivname ? Ich habe es so genannt wie das skript ? Was ist da so kommich ?

  • Weil ich da ein Acc habe und alles über mein acc hochlade ? Dafür bezahle ich ja auch, wiso sollte ich es dan da nicht hochladen ?

  • Weil Leute die dort keinen Account haben ziemlich oft ausgesperrt werden. Auch bei KB Dateien. Ist dann halt umständlich wenn man stindenlang probieren muss.

    Bin ja ungemein beruhigt das ich nicht dr einzige bin der sowas nicht ohne Source startet :rolleyes:

  • Mein RS Acc ist meine sache und geht dich nichts an !!!
    Das ich das bei euch hochladen kann wuste ich nicht, aber danke für die Info :P

    • Offizieller Beitrag

    Weil man es bei AutoIt hochladen kann.
    Und wer ist so dumm für RS geld auszugeben ?

    Bitte nicht überreagieren...

    Der Quelltext nützt vielleicht dem ein oder anderen was, oder wir können dir Hinweise geben, wie man es schneller/besser/effizienter/schöner machen kann :). Und es werden wie gesagt aufgrund der Virengefahr nicht viele ihre virtuelle Maschine anschmeißen wollen ;).

    Johannes

  • Ich finde es unverschämt, wie einige leute mit anderen ihren arbeiten umgehen oder darüber urteilen !!!
    Ich habe es hochgestellt, um mir feedback zuhollen, und nicht hier irgentwelche ominöse sachen zu machen oder euch zu ergern mit irgentwelchen viren !!!

    Man kann doch mal was ansehen ohne das der Quelltext bei ligt !
    Das der 4/xx Viren da anzeigt, hatt mich selber verblüft, aber autoIt ist bei einigen Virenscanner sowieso als virus oder ka was noch registriert und wird somit meist immer gemeldet von den :(

    Ich mag doch nur erstmal etwas feedback und dann kann ich ja mal den quelltext offenbaren !!!