Bitte schätzungsweise drei Zeilen Code

Stelle Fragen zur Programmierung mit Autohotkey

Moderator: jNizM

Anselm
Posts: 15
Joined: 25 Jan 2016, 04:28

Bitte schätzungsweise drei Zeilen Code

27 May 2020, 10:51

Hallo,

vor Jahren hat mir hier mal jemand sehr mit einem simplen Skript auf die Sprünge geholfen. Inzwischen bin ich nicht mehr alt, sondern uralt, habe eigentlich keine Programmierambitionen mehr, aber eine kleine Ergänzung des Skripts wäre sehr nützlich.

Das Skript schlägt mir erstens jeweils die volle Stunde. Zweitens erinnert es mich jeweils 30 Minuten nach Betätigen von OK, Wasser zu trinken - meine große Schwäche, aber es sei wichtig. Aber selbst das vergesse ich. Das Signal kommt immer zu unpassender Zeit, wenn ich grade am PC etwas tue. Ich klicke dann zwar nicht auf OK, aber ich hole mir mein Fenster, in dem ich gerade zugange war, wieder in den Vordergrund, das OK-Fenster verschwindet dahinter und ich vergesse es. Nun hätte ich das Skript gerne so erweitert, dass so lange, bis ich auf OK klicke, alle fünf Minuten ein Erinnerungston ertönt, ein anderer als beim ersten Mal. (Eine passende WAV-Datei auszusuchen und zu speichern, schaffe ich.)

Das Skript:

Code: Select all

SetWorkingDir %A_ScriptDir%
#SingleInstance force
#persistent

SetTimer, Wasser, 1800000
SetTimer, Glocke, 1000
Return

Wasser:
SoundPlay, wasser.wav
SetTimer, Wasser, Off
MsgBox , 1, Erinnerung, Wasser trinken!
SetTimer, Wasser, On
IfMsgBox, OK
  Return
else
  ExitApp


Glocke:
if(A_Min = 0 AND NOT(A_Hour >= 18 AND A_Hour <= 10)){
  SoundPlay, ChurchBell.wav
    SetTimer, Glocke, off
    sleep, 60001
    SetTimer, Glocke, on
}
Return
Vielen Dank im Voraus und Gruß, Anselm
Intel Core i5-8250U CPU 1,6 GHz 20 GB RAM, 1 TB SSD, 1 TB HDD
Windows 10 Pro 64 Bit / AutoHotKey (stets aktuelle Version)
BNOLI
Posts: 548
Joined: 23 Mar 2020, 03:55

Re: Bitte schätzungsweise drei Zeilen Code

27 May 2020, 13:43

Hallo Anselm,
heute bin ich bereits zu hirntot um länger als 3,2754 Minuten am Stück produktiv zu sein. Meine Empfehlung wäre es allerdings dein Problem anderweitig anzugehen, nämlich mit einer Amazon Alexa, oder einem Google Assistent. Habe meiner Mutter ersteren besorgt, lässt sich drüber 'telefonieren', sagt dir Erinnerungen (Arzttermin/Müllabfuhr/etc...), Timer (Herd an, Fenster auf dem Speicher noch offen, Waschmaschine im Keller noch an, Lampen an/ausschalten, Wasser trinken/etc...), per Sprachbefehl Einkaufsliste ergänzen, welche die weitaus bessere Hälfte auf dem Smartphone angezeigt bekommt. Höre darüber Radio, Musik von der Festplatte am Router, von Google Drive. Höre darüber Bundesliga Live, höre darüber Fernsehsender ... und kann auch per Sprachbefehl AHK-Skripte auf dem Rechner starten ;)

Ist IMHO den 30er wert. :)
Remember to use [code]CODE[/code]-tags for your multi-line scripts. Stay safe, stay inside, and remember washing your hands for 20 sec !
User avatar
Scr1pter
Posts: 1271
Joined: 06 Aug 2017, 08:21
Location: Germany

Re: Bitte schätzungsweise drei Zeilen Code

27 May 2020, 14:06

Was kommt als nächstes?
Ein Skript, das einen daran erinnert, zu atmen? :D
Spaß beiseite, nutz doch einfach einen Handy-Timer.
Sobald der ertönt, lässt du den PC ruhen und machst deine Pause.

Grüße
Please use [code][/code] when posting code!
Keyboard: Logitech G PRO - Mouse: Logitech G502 LS - OS: Windows 10 Pro 64 Bit - AHK version: 1.1.33.09
Rohwedder
Posts: 7551
Joined: 04 Jun 2014, 08:33
Location: Germany

Re: Bitte schätzungsweise drei Zeilen Code

27 May 2020, 14:21

Hallo,
versuch mal:

Code: Select all

SetWorkingDir %A_ScriptDir%
#SingleInstance force
#persistent

SetTimer, Wasser,  1800000
SetTimer, Glocke, 1000
Return

Wasser:
SoundPlay, wasser.wav
SetTimer, Wasser, Off
SetTimer, MsgBoxWasser, 300000
MsgBox , 1, Erinnerung, Wasser trinken!
SetTimer, Wasser, On
SetTimer, MsgBoxWasser, Off
IfMsgBox, OK
  Return
else
  ExitApp

Glocke:
if(A_Min = 0 AND NOT(A_Hour >= 18 AND A_Hour <= 10)){
  SoundPlay, ChurchBell.wav
    SetTimer, Glocke, off
    sleep, 60001
    SetTimer, Glocke, on
}
Return

MsgBoxWasser:
WinActivate, Erinnerung ahk_exe AutoHotkey.exe
SoundPlay, ChurchBell.wav
Return
Ich habe im neuen Timer MsgBoxWasser: nochmal die ChurchBell.wav verwendet.
Einfach durch passende WAV-Datei ersetzen.

Übrigens, ein Skript, das einen daran erinnert zu atmen, wäre doch eine tolle Sache.
Ist nicht Atemstillstand nach Herzstillstand die häufigste Todesursache?
User avatar
haichen
Posts: 631
Joined: 09 Feb 2014, 08:24

Re: Bitte schätzungsweise drei Zeilen Code

28 May 2020, 02:51

Das einfachste wäre vielleicht:
MsgBox , 1, Erinnerung, Wasser trinken!
zu
MsgBox , 4097, Erinnerung, Wasser trinken! ändern.

Die MsgBox bleibt dann immer im Vordergrund und kann nicht hinter anderen Fenstern verschwinden.
just me
Posts: 9423
Joined: 02 Oct 2013, 08:51
Location: Germany

Re: Bitte schätzungsweise drei Zeilen Code

28 May 2020, 04:43

Moin,

ich habe auch noch eine Idee:

Code: Select all

#SingleInstance force
#Persistent
SetWorkingDir %A_ScriptDir%

SetTimer, Wasser, 1800000
SetTimer, Glocke, 1000
Return

Wasser:
Erinnerung := 0
Zeit := A_Hour . ":" . A_Min
Loop {
   SoundPlay, wasser.wav
   Erinnerung += 1
   MsgBox, 1, %Erinnerung%. Erinnerung, %Zeit% Uhr: Wasser trinken!, 300 ; max. 300 Sekunden (5 Minuten) anzeigen
   IfMsgBox, TIMEOUT
      Continue
   Else IfMsgBox, OK
      Break
   Else
      ExitApp
}
Return

Glocke:
if(A_Min = 0 AND NOT(A_Hour >= 18 AND A_Hour <= 10)){
  SoundPlay, ChurchBell.wav
    SetTimer, Glocke, off
    sleep, 60001
    SetTimer, Glocke, on
}
Return
Ist aber etwas 'nervender'.
Anselm
Posts: 15
Joined: 25 Jan 2016, 04:28

Re: Bitte schätzungsweise drei Zeilen Code

30 May 2020, 10:42

Danke und bitte etwas Geduld. Meine Benachrichtigung hat wieder nicht geklappt.

Gruß, Anselm
Intel Core i5-8250U CPU 1,6 GHz 20 GB RAM, 1 TB SSD, 1 TB HDD
Windows 10 Pro 64 Bit / AutoHotKey (stets aktuelle Version)
Anselm
Posts: 15
Joined: 25 Jan 2016, 04:28

Re: Bitte schätzungsweise drei Zeilen Code

04 Jun 2020, 03:03

So. Ich war inzwischen a) anderweitig und b) mit Testen beschäftigt, bin jetzt aber fertig.

@BNOLI: So alt, "Alexa" zu brauchen, bin ich doch noch nicht. :) Die lauscht mir zu unheimlich, und sie passt nicht in mein Gesamtkonzept. Die paar Zeilen Code reichen mir im Moment vollauf.

@Scr1pter: Dito. Mein Smartphone schalte ich nur ein, wenn ich außer Haus bin. Immerhin interessant, dass es auch ganz andere Lösungen gäbe.

@Rohwedder: Deine Lösung tut haargenau das, was ich wollte, ich habe nur ChurchBell.wav durch wasser.wav ersetzt; der Ton soll bei der ersten und den Folgeerinnerungen identisch sein. - Nach einer kleinen Operation tut mein zuvor vorhofflimmerndes Herz wieder tadellos. Sollte sich das ändern, bitte ich um Erweiterung des Skripts um eine Atemerinnerung. ;)

@haichen: Die MsgBox soll hinter anderen Fenstern verschwinden, weil sie mich ja gerade beim Arbeiten stört. Nur vergesse ich bis zur nächsten sinnvollen Unterbrechung oft, dass ich erinnert wurde. Und genau das soll der Ton solange tun, bis ich OK betätigt (und vorher Wasser getrunken) habe.

@just me: Deins ist die Luxuslösung, die über meinen Wunsch hinausgeht. Nach langem Zögern habe ich mich für Rohwedders entschieden. Es kann aber sein, dass ich probeweise wechsle.

Danke Euch allen, meine Gesundheit ist ein ganzes Stück mehr gesichert! (Dass ich den ganzen Tag vorm PC hocke, tut mir weniger gut, aber das ist ein anderes Kapitel, bei dem sicher kein AHK-Skript hilft.)

Gruß, Anselm
Intel Core i5-8250U CPU 1,6 GHz 20 GB RAM, 1 TB SSD, 1 TB HDD
Windows 10 Pro 64 Bit / AutoHotKey (stets aktuelle Version)
BoBo
Posts: 6564
Joined: 13 May 2014, 17:15

Re: Bitte schätzungsweise drei Zeilen Code

04 Jun 2020, 05:23

... , bei dem sicher kein AHK-Skript hilft.)
Barum? AFAIK kann dir AHK zum Wasserholen und Wasserlassen problemlos den Rechner runterfahren :mrgreen:
Anselm
Posts: 15
Joined: 25 Jan 2016, 04:28

Re: Bitte schätzungsweise drei Zeilen Code

05 Jun 2020, 07:09

BoBo wrote:
04 Jun 2020, 05:23
Barum? AFAIK kann dir AHK zum Wasserholen und Wasserlassen problemlos den Rechner runterfahren :mrgreen:
Die Besonderheiten eines solchen Skripts kann ich mir lebhaft vorstellen. Eimer und Scheuertuch sind mitzubringen. :lol:

Gruß, Anselm
Intel Core i5-8250U CPU 1,6 GHz 20 GB RAM, 1 TB SSD, 1 TB HDD
Windows 10 Pro 64 Bit / AutoHotKey (stets aktuelle Version)
Anselm
Posts: 15
Joined: 25 Jan 2016, 04:28

Re: Bitte schätzungsweise drei Zeilen Code

11 Jun 2020, 02:18

Übrigens: Mein Wasserverbrauch ist seit Erweiterung meines Wasser-Skripts deutlich gestiegen. :D Danke noch mal.

Gruß, Anselm
Intel Core i5-8250U CPU 1,6 GHz 20 GB RAM, 1 TB SSD, 1 TB HDD
Windows 10 Pro 64 Bit / AutoHotKey (stets aktuelle Version)

Return to “Ich brauche Hilfe”

Who is online

Users browsing this forum: Helmut2 and 38 guests