Update?!

    Nochmal eine Frage:
    Wie kann man es machen das sich das Programm nach einer bestimmten Zeit refresht,damit er nochmal alle Prozesse überprüft?

    Spoiler anzeigen
    [autoit]

    If ProcessExists ("notepad.exe") Then
    $oSkype.CurrentUserProfile.MoodText = ("Arbeite gerade mit Notepad ;) ")
    EndIF
    ;;
    If Not ProcessExists("notepad.exe") Then
    $oSkype.CurrentUserProfile.MoodText = ("Arbeite gerade nicht mit Notepad ;) ")
    EndIf

    [/autoit]

    Setz das ganze doch in eine While-Schleife:
    So ungefähr(also nicht getestet)

    [autoit]


    While 1
    If ProcessExists ("notepad.exe") Then
    $oSkype.CurrentUserProfile.MoodText = ("Arbeite gerade mit Notepad ;) ")
    EndIF
    ;;
    If Not ProcessExists("notepad.exe") Then
    $oSkype.CurrentUserProfile.MoodText = ("Arbeite gerade nicht mit Notepad ;) ")
    EndIf
    sleep(10000) ;sorgt dafür das das Skript 10 Sekunden wartet bis die Schleife von vorne beginnt. Kann durch jede andere Funktion ersetztv werden 1Sekunde=Sleep(1000) ect.
    Wend

    [/autoit]

    Oder so:

    Spoiler anzeigen
    [autoit]

    $hTimer = TimerInit()
    While 1
    If TimerDiff($hTimer) > 10000 Then ; 10 Sekunden
    If ProcessExists("notepad.exe") Then
    $oSkype.CurrentUserProfile.MoodText = ("Arbeite gerade mit Notepad ;) ")
    Else
    $oSkype.CurrentUserProfile.MoodText = ("Arbeite gerade nicht mit Notepad ;) ")
    EndIf
    $hTimer = TimerInit()
    EndIf
    WEnd

    [/autoit]

    Oder so :

    [autoit]

    While 1
    AdlibRegister("_refresh",1000)
    WEnd

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

    Func _refresh()
    If ProcessExists ("notepad.exe") Then
    $oSkype.CurrentUserProfile.MoodText = ("Arbeite gerade mit Notepad ;) ")
    EndIF
    ;;
    If Not ProcessExists("notepad.exe") Then
    $oSkype.CurrentUserProfile.MoodText = ("Arbeite gerade nicht mit Notepad ;) ")
    EndIf
    EndFunc

    [/autoit]

    ( Nicht getestet )

    Zitat von TechiTom

    Meine Stellungnahme:

    Naja das bringt ihm eh nichts, er lernt einfach nicht, ich kenne ihn doch.

    Man kann es ihm schreiben und schreiben aber sobald ein Script zb das hier mit einem anderen in Konflikt gerät, buum, kommt er wieder betteln im Skype bei mir und nem Kumpel.

    @Sniln - Dat bissken lernen schadet keinem.....


    was soll das?

    @Mod/Admin bitte diesen und den vorhergehenden Post löschen