Bitte schätzungsweise drei Zeilen Code

Post a reply


In an effort to prevent automatic submissions, we require that you complete the following challenge.
Smilies
:D :) ;) :( :o :shock: :? 8-) :lol: :x :P :oops: :cry: :evil: :twisted: :roll: :!: :?: :idea: :| :mrgreen: :geek: :ugeek: :arrow: :angel: :clap: :crazy: :eh: :lolno: :problem: :shh: :shifty: :sick: :silent: :think: :thumbup: :thumbdown: :salute: :wave: :wtf: :yawn: :facepalm: :bravo: :dance: :beard: :morebeard: :xmas: :HeHe: :trollface: :cookie: :rainbow: :monkeysee: :monkeysay: :happybday: :headwall: :offtopic: :superhappy: :terms: :beer:
View more smilies

BBCode is ON
[img] is OFF
[flash] is OFF
[url] is ON
Smilies are ON

Topic review
   

Expand view Topic review: Bitte schätzungsweise drei Zeilen Code

Re: Bitte schätzungsweise drei Zeilen Code

Post by Anselm » 11 Jun 2020, 02:18

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

Gruß, Anselm

Re: Bitte schätzungsweise drei Zeilen Code

Post by Anselm » 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

Re: Bitte schätzungsweise drei Zeilen Code

Post by BoBo » 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:

Re: Bitte schätzungsweise drei Zeilen Code

Post by Anselm » 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

Re: Bitte schätzungsweise drei Zeilen Code

Post by Anselm » 30 May 2020, 10:42

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

Gruß, Anselm

Re: Bitte schätzungsweise drei Zeilen Code

Post by just me » 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'.

Re: Bitte schätzungsweise drei Zeilen Code

Post by haichen » 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.

Re: Bitte schätzungsweise drei Zeilen Code

Post by Rohwedder » 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?

Re: Bitte schätzungsweise drei Zeilen Code

Post by Scr1pter » 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

Re: Bitte schätzungsweise drei Zeilen Code

Post by BNOLI » 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. :)

Bitte schätzungsweise drei Zeilen Code

Post by Anselm » 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

Top