[MN5-AddOn] TMC-LIGHT-Changer feat. "SunCalc&PowerCheck" by Petterson. NEUE Version 4.4 vom 24.05.06

Hi,

wer möchte, kann ja mal folgende Zeilen auskommentieren
(vorher original "TMC-LIGHT-Changer.mscr" sichern!)

If {%Ausschalten% = 1}
#If Question "PDA Ausschalten JA / NEIN",[Ausschalten?]
#If {%entfernen% = 1}
#Delete %Dummy%
#Delete %DayOrNightTxt%
#EndIf
#SleepMessage %AuschaltenNachSek%, "PDA Ausschalten in...",[TMC-LIGHT-Changer 3.9.6]
#Sleep %SleepKurz%
#PowerOff
#EndIf
Endif

und statt dessen die Zeile von pikki einfügen und mal schauen wie's läuft

If {%Ausschalten% = 1}
ChoiceDefault "PDA ausschalten?","PDA wird in 5s ausgeschalten...", 1, 5,"Ja","Nein"
Case 1
If {%entfernen% = 1}
Delete %Dummy%
Delete %DayOrNightTxt%
EndIf
Sleep %SleepKurz%
PowerOff
Exit
Case 2
SleepMessage 2, "PDA wird nicht ausgeschaltet.",[Nicht_ausschalten]
If {%entfernen% = 1}
Delete %Dummy%
Delete %DayOrNightTxt%
EndIf
Exit
Case 0
If {%entfernen% = 1}
Delete %Dummy%
Delete %DayOrNightTxt%
EndIf
Exit
EndChoice
EndIf

Ich finde halt nur das "Auswahlfenster" nicht passend - habe aber nichts dagegen, wenn jemand das Script für sich persönlich nach seinen Bedürfnissen/Wünschen modifiziert.

Hallo,

wer den Countdown-Timer abbrechen möchte, kann die folgenden Zeilen im Sub Beenden nach der If {%Ausschalten% = 2}-Schleife einfügen und in der Ini Ausschalten=3 setzen:

If {%Ausschalten% = 3}
If {%entfernen% = 1}
Delete %Dummy%
Delete %DayOrNightTxt%
EndIf
ChoiceDefault "PDA ausschalten?","PDA wird ausgeschaltet...", 1, %AuschaltenNachSek%,"Ja","Nein","Reset"
Case 1
Sleep %SleepNormal%
PowerOff
Exit
Case 2
SleepMessage 2, "PDA wird nicht ausgeschaltet.",[Nicht_ausschalten]
Exit
Case 3
SleepMessage 2, "Reset wird durchgeführt...",[Reset]
Reset
Case 0
Exit
EndChoice
Endif

Bei mir läuft es bisher ohne Probleme - der PDA kann am Ende auch einen Reset durchführen.

Viele Grüße,

pikki

Ihr macht hier Sachen mit einer Sprache, die eigentlich für kleine Batch-Jobs gedacht war... *kopfschüttel* ;D

Hat eigentlich schon jemand probiert, wie die aktuelle Beta für Smartphones läuft? Die ist ja scheinbar auch für PNA-User interessant. Im aktuellen Update gibt's da auch IniRead, Choice(Default) und SleepMessage...

Hallo aryps,

geht leider nicht, der Countdown startet automatisch von vorne - siehe Auszug aus der Erläuterung zu ChoiceDefault (http://www.sto-helit.de/modules/edito/content.php?id=23

ChoiceDefault ist eine Variante, bei ein Eintrag vorausgewählt werden kann und der gerade gewählte Eintrag nach Ablauf der angegebenen Zeitspanne automatisch ausgewählt wird. Wählt der Benutzer einen anderen Eintrag, wird dieser Countdown neu gestartet.

Viele Grüße,

pikki

Wär halt aber auch blöd, wenn ein kurzer Countdown abgelaufen wäre, bevor der gewünschte Eintrag ausgewählt wurde...
Aber du kannst ja auch einfach den Eintrag mit OK oder dem "Feuerknopf" auswählen...

Hi picci,

kannst Du mir bitte sagen, wo genau die
If {%Ausschalten% = 2}-Schleife endet im Script, damit ich weiß, wo ich die
If {%Ausschalten% = 3 }-Schleife anhängen muß?

If {%Ausschalten% = 2}
If {%entfernen% = 1}
Delete %Dummy%
Delete %DayOrNightTxt%
EndIf
SleepMessage %AuschaltenNachSek%, "PDA Ausschalten in...",[TMC-LIGHT-Changer 3.9.6]
Sleep %SleepKurz%
PowerOff
Endif hier?
If {%entfernen% = 1}
Delete %Dummy%
Delete %DayOrNightTxt%
EndIf oder hier?
sleep %SleepNormal%
EndIf oder hier?

Schon jetzt vielen Dank

Ciao

Ladgaz

Hallo zappa,

wir mir scheint, ist noch ein kleiner Bug in der aktuellen Version:

Da ich keinen POI-Warner habe, stehen in der INI alle entsprechenden Einträge auf 0. Es sieht so aus, als ob im Abschnitt Diverse Pfade festlegen trotzdem nach dem POI-Warner gesucht wird und sich das Skript dann verabschiedet, weil der POI-Warner nicht gefunden wurde. Wenn das Programm nicht gestartet werden soll, dann sollte am besten auch gar nicht erst danach gesucht werden (ist ja nur eine kleine IF-Schleife...).

Noch zwei Bitten bzw. Vorschläge:

Hatte das Problem, dass das Umschaltfenster für Tag-/Nachtansicht bei mir fast immer hängen blieb, obwohl die Umschaltung erfolgte.

Hier die Lösung für das Problem:
Habe im Sub NightDay die Zeile
MouseClick %NIGHTswitch_x%,%NIGHTswitch_y%
durch
MouseDown %NIGHTswitch_x%,%NIGHTswitch_y%
Sleep %sleepkurz%
MouseUp %NIGHTswitch_x%,%NIGHTswitch_y%
ersetzt. Anstelle eines kurzen Mausklicks wird jetzt eine halbe Sekunde geklickt. Seitdem ist dieses Problem für mich gelöst. Das TMC-Fenster blieb bei mir auch schon einige male hängen, vermutlich dürfte der obige Ansatz auch dort helfen. Muss ich mir aber erst noch mal in Ruhe im Auto ansehen.

Zweites Problem:
Aus unerklärlichen Gründen schaltet MN5.2 bei mir die Helligkeit auf Standard zurück, sobald die Tag-/Nachtumschaltung statt findet (bei MN5.2 ist die Helligkeitsumschaltung definitv deaktiviert).
Wäre es möglich, bei der Umschaltung von Tag auf Nacht und umgekehrt erst das Sub NightDay aufzurufen und anschliessend die Helligkeit umzuschalten? Mit einen Sleep %SleepNormal% dazwischen tritt dieses Problem bei mir nicht mehr auf. Macht ja im Endeffekt keinen grossen Unterschied, ob die Helligkeit zwei Sekunden früher oder später angepasst wird.

Wäre schön, wenn du das übernehmen könntest - dann muss ich nicht alle paar Tage die neuen Versionen für mich anpassen ;D .

Viele Grüße,

pikki

@Mort: Vielen Dank und grossen Respekt für diese tolle Skript-Sprache.

Hallo Ladgaz,

suche in der TMC-LIGHT-Changer.mscr nach folgenden Zeilen:

If {%Ausschalten% = 2}
If {%entfernen% = 1}
Delete %Dummy%
Delete %DayOrNightTxt%
EndIf
SleepMessage %AuschaltenNachSek%, "PDA Ausschalten in...",[TMC-LIGHT-Changer 3.9.6]
Sleep %SleepKurz%
PowerOff
Endif

Genau danach kannst du die Schleife von mir einhängen. Jede If-Schleife wird durch ein EndIf abgeschlossen, die zusammengehörigen IFs und EndIfs kannst du an Zappas Einzügen sehr gut erkennen (ein EndIf ist so weit eingerückt wie das zugehörige If).

Viele Grüße,

pikki