Keep Display Alive

  • Hallo zusammen!
    Nach langer Zeit gibts mal wieder ein Skript von mir. Und zwar dient es zum Messen der Akkulaufzeit bei Laptops. Die meisten Geräte gehen nach ein paar Minuten in Standby wenn nix passiert, deshalb bewegt das Skript alle paar Sekunden die Maus an einen anderen Ort bzw. Pixel ^^
    Außerdem schreibt es alle 5 Minuten in eine kleine Logdatei die aktuelle Uhrzeit, in der dann nachgeschaut werden kann, wann der Laptop zuletzt angeschaltet war.

    Spoiler anzeigen
    [autoit]

    HotKeySet("{END}", "_off")
    Global $loop = 1
    SplashTextOn("Keep Display Alive", "Zum Beenden [END] drücken.", 180, 50)

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

    _Filewrite()
    AdlibEnable("_Filewrite", 5 * 60 * 1000)
    While $loop = 1
    MouseMove(Random(0, @DesktopWidth, 1), Random(0, @DesktopHeight, 1), 100)
    Sleep(10*1000)
    WEnd
    AdlibDisable()
    SplashOff()

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

    Func _off()
    $loop = 0
    EndFunc ;==>_off

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

    Func _Filewrite()
    FileWrite(@ScriptDir & "\KDA_log.txt", "PC Online: " & @HOUR & ":" & @MIN & ":" & @SEC & @CRLF)
    EndFunc ;==>_Filewrite

    [/autoit]

    Viel Spaß damit!

  • Ja schon, aber trotzdem wird bei einigen Vista Laptops der Display dunkel und das simuliert ja dann nicht mehr das Arbeiten an der Maschine.

  • Jam00: Microsoft verkauft leider kein XP mehr - Um den Voerkauf von Vista "anzukurbeln" (bin mir da aber nicht mehr so sicher)
    Seit mein alter PC kaputt ist (totalschaden), bin ich auch mit Vista unterwegs

    MfG. tobi_girst

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »tobi_girst« (Morgen, 25:63)