Wochentags- und zeitabhängige Verabschiedung per Makro

sotel

So, liebe Leute, ich hab mal etwas für diejenigen, die Code reviewen möchten:

Situation:

Ich möchte eine Wochentags- und zeitabhängige Verabschiedung in meinen Mails haben, die folgender Bedingung folgt:

montags bis donnerstags:
00:00 Uhr bis 03:59 Uhr: eine angenehme Nacht!
04:00 Uhr bis 17:59 Uhr: einen schönen Tag!
18:00 Uhr bis 23:59 Uhr: einen schönen Abend!

freitags:
00:00 Uhr bis 03:59 Uhr: eine angenehme Nacht!
04:00 Uhr bis 12:29 Uhr: einen schönen Tag!
12:30 Uhr bis 23:59 Uhr: ein schönes Wochenende!

samstags:
00:00 Uhr bis 23:59 Uhr: ein schönes Wochenende!

sonntags:
00:00 Uhr bis 17:59 Uhr: ein schönes Wochenende!
18:00 Uhr bis 23:59 Uhr: einen schönen Abend!

Ich habe mir folgendes Makro überlegt:

Code

%REM('==================================================')%-
%REM('=== Wochenende oder nicht, falls ja, welcher Tag')%-
%REM('==================================================')%-
%IF("%DATE('ddd')"="Fr", %_WOE=1, %-
%IF("%DATE('ddd')"="Sa", %_WOE=2, %-
%IF("%DATE('ddd')"="So", %_WOE=3, %-
%_WOE=0)))%-
%-
%REM('==================================================')%-
%REM('=== Tageszeit ermitteln')%-
%REM('==================================================')%-
%IF("%TIME('hh:mm:ss')"=>"00:00:00", %IF("%TIME('hh:mm:ss')"<="03:59:59", %_DYT=0, %-
%IF("%TIME('hh:mm:ss')"=>"04:00:00", %IF("%TIME('hh:mm:ss')"<="12:29:59", %_DYT=1, %-
%IF("%TIME('hh:mm:ss')"=>"12:30:00", %IF("%TIME('hh:mm:ss')"<="17:59:59", %_DYT=2, %-
%IF("%TIME('hh:mm:ss')"=>"18:00:00", %IF("%TIME('hh:mm:ss')"<="23:59:59", %_DYT=3, %-
%_DYT=-1))))))))%-
%-
%REM('==================================================')%-
%REM('=== Richtige Verabschiedung ermitteln')%-
%REM('==================================================')%-
%IFN("%_WOE"="0", %-
%IF("%_DYT"="0", %_BYE='eine angenehme Nacht!', %-
%IF("%_DYT"="1", %_BYE='einen schönen Tag!', %-
%IF("%_DYT"="2", %_BYE='einen schönen Tag!', %-
%_BYE='einen schönen Abend!'))), %-
%-
%IFN("%_WOE"="1", %-
%IF("%_DYT"="0", %_BYE='eine angenehme Nacht!', %-
%IF("%_DYT"="1", %_BYE='einen schönen Tag!', %-
%_BYE='ein schönes Wochenende!')), %-
%-
%IFN("%_WOE"="3", %-
%IF("%_DYT"="3", %_BYE='einen schönen Abend!', %-
%_BYE='ein schönes Wochenende!'), %-
%_BYE='ein schönes Wochenende!')))%-
%-
%REM('==================================================')%-
%REM('=== Die generierte Verabschiedung')%-
%REM('==================================================')%-
Vielen Dank - weiterhin %_BYE
%-
%-
%REM('==================================================')%-
%REM('=== debuggen HIER!')%-
%REM('==================================================')%-
-----------------------------------
Wochende: '%_WOE'
DayTime:  '%_DYT'
Gruss:    '%_BYE'
-----------------------------------
Datum:    %DATE('dddd, dd. MMMM YYYY')
Uhrzeit:  %TIME('hh:mm:ss')
-----------------------------------

Alles anzeigen

Die letzten Zeilen sind muß debuggen, denn es funktioniert nicht so, wie ich es haben will. Meine Ausgabe sieht so aus:

Zitat

Vielen Dank - weiterhin
-----------------------------------
Wochende: 0
DayTime: 3
Gruss:
-----------------------------------
Datum: Donnerstag, 19. September 2013
Uhrzeit: 18:04:51
-----------------------------------

Alles anzeigen

Zu Erläuterung: ich starte The Bat! in einer Testumgebung mit änderbarem Datum, die es mir gestattet, Datum und Uhrzeit ohne Änderung der Systemzeit zu starten.

Aber ich kriege keine Ausgabe bei der Grußformel, die in der Variable %_BYE stecken sollte.
Ich finde einfach nicht den Fehler.
Vielleicht siehst Du ihn? Dann schreibs doch bitte mal hier auf.

**GwenDragon**

Das generieren von %_BYE abjhängig von %_WOE und %_DYT eben in einer Vorlage für Neue Nachricht getestet.

Code

%_WOE=0
%_DYT=3


%IFN("%_WOE"="0", %-
%IF("%_DYT"="0", %_BYE='eine angenehme Nacht!', %-
%IF("%_DYT"="1", %_BYE='einen schönen Tag!', %-
%IF("%_DYT"="2", %_BYE='einen schönen Tag!', %-
%_BYE='einen schönen Abend!'))), %-
%-
%IFN("%_WOE"="1", %-
%IF("%_DYT"="0", %_BYE='eine angenehme Nacht!', %-
%IF("%_DYT"="1", %_BYE='einen schönen Tag!', %-
%_BYE='ein schönes Wochenende!')), %-
%-
%IFN("%_WOE"="3", %-
%IF("%_DYT"="3", %_BYE='einen schönen Abend!', %-
%_BYE='ein schönes Wochenende!'), %-
%_BYE='ein schönes Wochenende!')))%-
%-


-----------------------------------
Wochende: '%_WOE'
DayTime:  '%_DYT'
Gruss:    '%_BYE'
-----------------------------------
Datum:    %DATE('dddd, dd. MMMM YYYY')
Uhrzeit:  %TIME('hh:mm:ss')
-----------------------------------

Alles anzeigen

ist mein Mail so
-----------------------------------
Wochende: '0'
DayTime: '3'
Gruss: 'einen schönen Abend!'
-----------------------------------
Datum: Montag, 16. September 2013
Uhrzeit: 13:50:30
-----------------------------------

TheBat 5.4.8 Final Windows 7

Dein Makro für %_BYE gibt jedenfalls bei mir was aus, im Gegensatz zu dem bei dir.

**GwenDragon**

Das -1 ist die böse Falle, nehm ich an!
Nimm 99999 als ungültiger Tag.

Code

%_D=-1%-
%%_D ist %_D
%_E="-1"%-
%%_E ist %_E

sieht gültig aus, macht aber für %_D keine Ausgabe.

**mse**

Zitat von GwenDragon

Das -1 ist die böse Falle, nehm ich an!
Nimm 99999 als ungültiger Tag.

Du nimmst richtig an! Mit der minus 1 hatte ich alle möglichen wirren Effekte in dem Makroblock, aber jetzt funktioniert es!

Danke euch beiden!

sotel

Hallo Gwen,
hallo mse,

Zitat von GwenDragon

Das -1 ist die böse Falle, nehm ich an!

¡Volltreffer!

ja, die minus eins ist wohl ein Bug in der Makro-Engine. Ich habe Gwens Tipp berücksichtigt, und die minus eins entfernt und einfach meine Tageszeitbenennungen um eins inkrementiert: Null ist jetzt eine ungültige Tageszeit.
Zwischenzeitlich hatte ich schon meinen Linux/wine-Unterbau in Verdacht, doch das hatte sich durch Debuggen von wine nicht bestätigt.
Vielen Dank noch mal für Eure Durchsicht.

Und hier nun der vollstädige Code, gern zum Nachmachen:

Code

%REM('==================================================')%-
%REM('=== Wochenende oder nicht, falls ja, welcher Tag')%-
%REM('==================================================')%-
%IF("%DATE('ddd')"="Fr", %_WOE=1, %-
%IF("%DATE('ddd')"="Sa", %_WOE=2, %-
%IF("%DATE('ddd')"="So", %_WOE=3, %-
%_WOE=0)))%-
%-
%REM('==================================================')%-
%REM('=== Tageszeit ermitteln')%-
%REM('==================================================')%-
%IF("%TIME('hh:mm:ss')"=>"00:00:00", %IF("%TIME('hh:mm:ss')"<="03:59:59", %_DYT=1, %-
%IF("%TIME('hh:mm:ss')"=>"04:00:00", %IF("%TIME('hh:mm:ss')"<="12:29:59", %_DYT=2, %-
%IF("%TIME('hh:mm:ss')"=>"12:30:00", %IF("%TIME('hh:mm:ss')"<="17:59:59", %_DYT=3, %-
%IF("%TIME('hh:mm:ss')"=>"18:00:00", %IF("%TIME('hh:mm:ss')"<="23:59:59", %_DYT=4, %-
%_DYT=0))))))))%-
%-
%REM('==================================================')%-
%REM('=== Richtige Verabschiedung ermitteln')%-
%REM('==================================================')%-
%IFN("%_WOE"="0", %-
%IF("%_DYT"="1", %_BYE='eine angenehme Nacht!', %-
%IF("%_DYT"="2", %_BYE='einen schönen Tag!', %-
%IF("%_DYT"="3", %_BYE='einen schönen Tag!', %-
%_BYE='einen schönen Abend!'))), %-
%-
%IFN("%_WOE"="1", %-
%IF("%_DYT"="1", %_BYE='eine angenehme Nacht!', %-
%IF("%_DYT"="2", %_BYE='einen schönen Tag!', %-
%_BYE='ein schönes Wochenende!')), %-
%-
%IFN("%_WOE"="3", %-
%IF("%_DYT"="4", %_BYE='einen schönen Abend!', %-
%_BYE='ein schönes Wochenende!'), %-
%_BYE='ein schönes Wochenende!')))%-
%-
%REM('==================================================')%-
%REM('=== Die generierte Verabschiedung')%-
%REM('==================================================')%-
Vielen Dank - weiterhin %_BYE
%-
%-
%REM('==================================================')%-
%REM('=== debuggen HIER!')%-
%REM('==================================================')%-
-----------------------------------
Wochende: '%_WOE'
DayTime:  '%_DYT'
Gruss:    '%_BYE'
-----------------------------------
Datum:    %DATE('dddd, dd. MMMM YYYY')
Uhrzeit:  %TIME('hh:mm:ss')
-----------------------------------

Alles anzeigen

@mod: Liebe Moderatorin, könntest Du den Typo in der Überschrift (Zeitabhängige mit kleinem Zett) korrigieren?
Schon mal meinen Dank dafür!

**mse**

Danke Jörg für deine Arbeit und deine Zeit, die Vorlage zu basteln und der Community zur Verfügung zu stellen. Ich könnte mir vorstellen, dass sie Anklang findet.

de-bugger

Von mir gibt's einen Daumen nach oben dafür.

**GwenDragon**

Scheint ein Bug in der makro-Engine zu sein.

Wenn du statt -1 dann "-1" nimmst, gehts vielleicht auch.
Ja geht!

//EDIT:
Wenn ich mir die TheBat-Hilfe ansehe, steht da:

Zitat

_name="value"

Ich nehme mal an, dass die " standardgemäß notwendig sind, dass es ohne ging ist wohl Zufall.

sotel

Zitat von GwenDragon

//EDIT:
Wenn ich mir die TheBat-Hilfe ansehe, steht da:

Hmm, ja, die Zeile am Anfang der Hilfe kenne ich wohl.
Dann muß im Code wohl jede Zahl gequoted werden?

Ich habs nicht getan, weil ich Integer nie quote, aber wenns hier nötig ist: ich lern eben nie aus...!

**GwenDragon**

Zitat von sotel

Dann muß im Code wohl jede Zahl gequoted werden?

Weiß nicht, musst du die Herren und Damen Programmierende in Moldavia fragen.
Aber du fällst nicht tot um, wenn du quotest.

sotel

Zitat von GwenDragon

Weiß nicht, musst du die Herren und Damen Programmierende in Moldavia fragen.
Aber du fällst nicht tot um, wenn du quotest.

Das ist wohl war!
Danke, Gwen!

Tags