Hallo !
Da ich mir vor kurzem einen Becker Traffic Assist Highspeed 7934 um 99 Euro
gekauft habe, und bei diesem eine direkte Koordinateneingabe vermisste,
und auch im Internet nichts passendes fand, musste ich einige ähnliche
Scripts für andere Navis entsprechend modifizieren.
Vorerst einmal recht herzlichen Dank an Concor & Spiti, Stroetmann,
Schmischi, Morton ..... die durch Veröffentlichung ihrer Tools die
Realisierung erst ermöglichten
kurze Beschreibung:
Aufgerufen wir das / die Tool/s über den Button, der früher den
PictureViewer startete, der in "Menü" umbenannt wurde.
Über dieses Menü lassen sich die Koordinateneingabe und auch der
PictureViewer starten. Der PictureViewer lässt sich nur durch
Hardwarereset beenden. Das Menü läßt sich für weitere Programme gut
anpassen. Ein direkter Aufruf von Windows ist ebenfalls enthalten.
Die Koordinateneingabe erklärt sich von selbst - es wird aber statt
einem neuen Ziel eine neue Route mit dem gewählten Namen angelegt.
Benötigte Software:
MortScript 4.1 ( davon nur die MortScript.exe aus ...BIN\PNA\ )
Schmischi-Skin V 2.0 für Gopal PE 4.01 (davon aus ...\ADDINS eine
..._Menu.exe ( 18k) zB. Ce_Menu.exe und .bmp - Dateien)
eine Softwaretastatur wie zB ToggleInputPanel.exe
Ausführung:
Scripts erstellen:
----------------------------------------------------------------------------
in die Datei PictureViewer.nfsm kommt folgender Inhalt nach ev. Anpassung
der freien Tasten 1, 2, 6 für eigene Anwendungen :
# Extendet Startmenü By Schmischi V1.0
# Erstellt mit nfSpeedMenu
# © 2007 by stroetmann.
# nfSpeedMenu darf nur nach schriftlicher Zustimmung des Autors angeboten werden.
# Der Download ist ausschließlich bei http://www.NaviFriends.com erlaubt.
# Der Autor und Navifriends.com übernehmen keinerlei Haftung aus dem Gebrauch des nfSpeedMenu.
# Der Einsatz geschieht auf eigenes Risiko.
[INIT]
Titel= Menue by Schmischi und Franz
HIDETASKBAR=0
ONTOP=0
CLOSE=1
Xoffset=4
Yoffset=0
TYP=6
[0]
Bitmap=.\3.bmp
DownBitmap=.\3.bmp
Textcolor=0xffffff
[1]
ALIGN=1
Text=\n\n\n
Textcolor=0xffffff
EXEC=\My Flash Disk\navigation\Skin480x272\Addins\Splitview.exe
Bitmap=.\2.bmp
DownBitmap=.\1.bmp
CLOSE=1
[5]
ALIGN=1
Text=\nKoordinaten\nEingabe\n
Textcolor=0xffffff
EXEC=\My Flash Disk\Programs\Eingabe.lnk
Bitmap=.\6.bmp
DownBitmap=.\1.bmp
CLOSE=0
[2]
ALIGN=1
Text=\nPicture\nViewer\n
Textcolor=0x000000
EXEC=\My Flash Disk\PV.exe
Bitmap=.\8.bmp
DownBitmap=.\1.bmp
CLOSE=0
[4]
ALIGN=1
Text=\n\nWindows\n
Textcolor=0xffffff
EXEC=\Windows\Explorer.exe
Bitmap=.\10.bmp
DownBitmap=.\1.bmp
CLOSE=0
[8]
ALIGN=1
Text=\n\nN A V I \n
Textcolor=0xffffff
EXEC=\My Flash Disk\MNAV\Mnavdce.exe
Bitmap=.\7.bmp
DownBitmap=.\1.bmp
CLOSE=1
[9]
ALIGN=1
Text=\nMenü\nbeenden\n
Textcolor=0xffffff
Bitmap=.\9.bmp
DownBitmap=.\1.bmp
CLOSE=1
[3]
ALIGN=1
Text=\n\n\n
Textcolor=0xffffff
EXEC=\My Flash Disk\navigation\Skin480x272\Addins\SM_Start.exe
Bitmap=.\2.bmp
DownBitmap=.\1.bmp
CLOSE=1
[6]
ALIGN=1
Text=\n\n\n
Textcolor=0xffffff
EXEC=\My Flash Disk\Tools_Menu.exe
Bitmap=.\2.bmp
DownBitmap=.\1.bmp
CLOSE=1
[7]
ALIGN=1
Text=\n\nRESET\n
Textcolor=0xffffff
EXEC=\My Flash Disk\Softreset.exe
Bitmap=.\2.bmp
DownBitmap=.\1.bmp
CLOSE=0
--------------------------------------------------------------------------------
in die Datei Eingabe.mscr kommt folgender Inhalt:
# Koordinateneingabe in MN5 V1.52
# By Concor & Spiti 2006
# http://www.pocketnavigation.de/board/tid1044219-sid.htm
# modifiziert by Franz
#
# run "\My Flash Disk\Programs\ToggleInputPanel.exe"
# sleep 1000
# mousedown Input Panel, 2,2
# sleep 500
# mouseup Input Panel, 340,260
# run "\My Flash Disk\Programs\ToggleInputPanel.exe"
# sleep 500
run "\My Flash Disk\Programs\ToggleInputPanel.exe"
sleep 500
mousedown Input Panel, 2,2
sleep 500
mouseup Input Panel, -2,-82
call start
sub start
titel = input(" Name der zu erstellenden neuen ROUTE")
run "\My Flash Disk\Programs\ToggleInputPanel.exe"
choice ("Koordinateneingabe"," Bitte Koordinatenformat auswählen","Deg.Min.Sec. z.B. 44° 23' 45'' ","Deg.Dec. z.B. 44.12345°")
case(1)
run "\My Flash Disk\Programs\ToggleInputPanel.exe"
lgr = Input(" Längengrad Eingabe! getrennt durch Leerzeichen^NL^z.B. für^NL^9° 23' 45''^NL^9 23 45")
split %lgr%, " ", 1,gr,minuten,sekunden
m = minuten * 1000000 / 60
s = sekunden * 1000000 / 3600
msdec =m+s
call Pruefung
lgrad = %gr% & %pn% & %msdec%
bgr = Input(" Breitengrad Eingabe! getrennt durch Leerzeichen^NL^z.B. für^NL^44° 9' 45''^NL^44 9 45")
split %bgr%, " ", 1,gr,minuten,sekunden
m = minuten * 1000000 / 60
s = sekunden * 1000000 / 3600
msdec =m+s
call Pruefung
bgrad = %gr% & %pn% & %msdec%
case(2)
run "\My Flash Disk\Programs\ToggleInputPanel.exe"
lgrad = input(" Längengrad Deg.Dec z.B. 16.12345")
bgrad = input(" Breitengrad Deg.Dec z.B. 48.12345")
case(1,2)
run "\My Flash Disk\Programs\ToggleInputPanel.exe"
messagetext = "Möchten Sie die Koordinaten^NL^" & %bgrad% & "° - " & %lgrad% & "° nun in MN5 in der Route: " & %titel% & " speichern?"
If Question %messagetext%, Koordinateneingabe in MN5 V1.5
rte_eintrag= %titel% & "|-|-|-|-|-|-|-|-|-|-|" & %lgrad% & "|" & %bgrad% & "|-|-|-|-|"
writefile ( "\My Flash Disk\save\mnavsettings\Routes\" & %titel% & ".rte",%rte_eintrag%)
call new
Else
call new
EndIf
EndChoice
sub new
if Question Möchten Sie eine weitere Route eingeben?, Koordinateneingabe in MN5 V1.5
run "\My Flash Disk\Programs\ToggleInputPanel.exe"
call start
else
exit
endif
sub Pruefung
if(msdec <= 99999)
pn = ".0"
else
pn = "."
endif
if(msdec <= 9999)
pn = ".00"
endif
if(msdec <= 999)
pn = ".000"
endif
if(msdec <= 99)
pn = ".0000"
endif
if(msdec <= 9)
pn = ".00000"
endif
EndSub
-------------------------------------------------------------------------------------------
in die Datei Eingabe.lnk kommt folgender Inhalt:
54#"\My Flash Disk\Programs\Mortscript\Mortscript.exe"
"\My Flash Disk\Programs\Eingabe\Eingabe.mscr"
-------------------------------------------------------------------------------------------
Tastenname ändern:
in \My Flash Disk\Resurces\Localization\strings_shell_default_german.txt
"Bilder" in "Menü" ändern. Ev.entsprechend auch in anderen Sprachen
ev. Grafik ändern:
\My Flash Disk\Resurces\Images\sh_hb_Settings.bmp als
\My Flash Disk\Resurces\Images\sh_hb_PictureViewer.bmp kopieren
Datei \My Flash Disk\PictureViewer.exe in \My Flash Disk\PV.exe umbenennen
neue Verzeichnisse anlegen:
\My Flash Disk\Programs
\My Flash Disk\Programs\MortScript
\My Flash Disk\Programs\Eingabe
Dateien kopieren:
ins Verzeichnis \My Flash Disk\ kommen :
PictureViewer.nfsm
Ce_Menu.exe in PictureViewer.exe umbenannt
und zur optischen Aufbesserung der Menüknöpfe 1.bmp - 3.bmp von Schmischi
( weitere .bmp können mit Paint im Format 48 x 48 Pixel erstellt werden
...Anpassung der PictureViewer.nfsm, ev TextColor ändern wobei 0xffffff weiss
und 0x000000 schwarz ist)
ins Verzeichnis \My Flash Disk\Programs kommen :
Eingabe.lnk
ToggleInputPanel.exe oder eine andere Softwaretastatur - Anpassung der Eingabe.mscr
ev. SoftReset.exe von Schmischi
ins Verzeichnis \My Flash Disk\Programs\MortScript kommt :
MortScript.exe
ins Verzeichnis \My Flash Disk\Programs\Eingabe kommt :
Eingabe.mscr
Gutes Gelingen und viel Spass damit
Franz
