Beiträge von Manni 123

Manni 123 · 26. Juli 2011

Nee nee das ist vorwiegend von Stefan und Mikee , ich habe nur auf 8 Bit gedrückt .

Und gefühlte 1000 Falten ausgebügelt .:icon_mrgreen:

Gruß Manni

Manni 123 · 26. Juli 2011

Hier ändert sich die Farbe je nach gewählte TMC-MenldeArt .

Gruß Manni

Code

#########################################
# TMC Einstellung by Navirunner         #
#########################################


Sound = "\Storage Card\Changer\sounds"


Include( "IniReadWrite.mscr" )


# Pfad\Name der ini-Datei
iniDatei = "NR-Skin.ini"
# Vorbelegungen einlesen
Call("iniFile", "Read","TMC Einstellung")
#########################################	
block = "TMC Setting"
vorbelegung = section[block]


liste[1]="GoPal Standard Parameter - grau"
liste[2]="Alle Störungen anzeigen    - rot"
liste[3]="Alle Staus umfahren          - blau"
liste[4]="Alle Störungen umfahren   - grün"


SetChoiceEntryFormat ( 25 , 20 , Arial )


auswahl=Choice ("TMC Einstellung","Wählen Sie aus:^NL^Achtung: Die Änderungen werden erst nach einem Neustart aktiv !",vorbelegung,0,liste)
		if(auswahl > 0)
#########################################
# Einstellung und Eintrag anlegen
If (auswahl=(1))
		#Call ("Warten")
		sleep (300)
	Copy ("\My Flash Disk\Navigation\Skin480x272\Elemente\TTI\tti_A.teb","\My Flash Disk\navigation\TTI\default\tti.teb",1)
	Copy ("\My Flash Disk\Navigation\Skin480x272\Elemente\TTI\TMC_Warnart-_Origi.png","\My Flash Disk\Navigation\Skin480x272\PPSkin\480x272\PPSkin\TMC_Warnart.png",1)
	section[block] = auswahl
		Call ("Wert1")


	Message("Sie haben die Gopal original TMC Einstellungen gewählt.^NL^^NL^Es werden alle TMC Meldungen wie im original Skin behandelt.^NL^^NL^Nutzbar mit automatischer oder manueller Stauumfahrung.")
 Playsound(%Sound%&"\INFBEG.WAV")
EndIf


If (auswahl=(2))
		#Call ("Warten")
		sleep (300)
	Copy ("\My Flash Disk\Navigation\Skin480x272\Elemente\TTI\tti_B.teb","\My Flash Disk\navigation\TTI\default\tti.teb",1)
 	Copy ("\My Flash Disk\Navigation\Skin480x272\Elemente\TTI\TMC_Warnart-_StoerA.png","\My Flash Disk\Navigation\Skin480x272\PPSkin\480x272\PPSkin\TMC_Warnart.png",1)
	section[block] = auswahl
		Call ("Wert2")
	
	Message("Sie haben gewählt das alle Störungen angezeigt werden sollen.^NL^^NL^Es werden alle TMC Meldungen wie im original Skin behandelt und zusätzlich weitere TMC Meldungen angezeigt.^NL^^NL^Nutzbar mit automatischer oder manueller Stauumfahrung.")
Playsound(%Sound%&"\INFBEG.WAV")
EndIf


If (auswahl=(3))
		#Call ("Warten")
		sleep (300)
	Copy ("\My Flash Disk\Navigation\Skin480x272\Elemente\TTI\tti_C.teb","\My Flash Disk\navigation\TTI\default\tti.teb",1)
	Copy ("\My Flash Disk\Navigation\Skin480x272\Elemente\TTI\TMC_Warnart-_StauU.png","\My Flash Disk\Navigation\Skin480x272\PPSkin\480x272\PPSkin\TMC_Warnart.png",1)
	section[block] = auswahl
		Call ("Wert3")


	Message("Sie haben gewählt das alle Staus umfahren werden sollen.^NL^^NL^Es werden alle TMC Meldungen mit höheren Zeitverlusten berechnet.^NL^^NL^Nutzbar mit automatischer oder manueller Stauumfahrung (manuell empfohlen).")
Playsound(%Sound%&"\INFBEG.WAV")
EndIf


If (auswahl=(4))
		#Call ("Warten")
		sleep (300)
	Copy ("\My Flash Disk\Navigation\Skin480x272\Elemente\TTI\\tti_D.teb","\My Flash Disk\navigation\TTI\default\tti.teb",1)
	Copy ("\My Flash Disk\Navigation\Skin480x272\Elemente\TTI\TMC_Warnart-_StoerU.png","\My Flash Disk\Navigation\Skin480x272\PPSkin\480x272\PPSkin\TMC_Warnart.png",1)
	section[block] = auswahl
		Call ("Wert4")


	Message("Sie haben gewählt das alle Störungen umfahren werden sollen.^NL^^NL^Es werden alle TMC Meldungen mit sehr hohen Zeitverlusten berechnet.^NL^^NL^Diese Einstellung bitte nur mit manueller Stauumfahrung nutzen, da man sonst auch für kleinste Störungen von der AB geholt wird.")
Playsound(%Sound%&"\INFBEG.WAV")
EndIf
		Else
			Exit
		EndIf
		
# Gewählte Optionen zurückschreiben
Call("iniFile", "Write", "TMC Einstellung")
#########################################	
	
# Schließt GoPal
Run ("\My Flash Disk\programme\koord465.exe" , "window=0 SendKey=\0x80\|")


If WndExists ("GoPal Navigator")
sleep (2000)
	Kill ("GoPal Navigator")
	While (WndExists ("GoPal Navigator"))
	EndWhile
EndIf


If not (ProcExists ("koord465.exe"))
	Run ("\My Flash Disk\programme\koord465.exe" , "window=0 KoordServ=0")
EndIf


#########################################
Sub Wert1
 
file = "\My Flash Disk\navigation\Skin480x272\dpitems.xml"
Wert1 = "<item id=""2139000029"""
Wert2 = " value="
Wert3 = " type=""INT"" />"
Text1 = """0"""


String= ReadFile( file )
gefunden1=Find(String,Wert1)
If(gefunden1)
	gefunden2=Find(String,Wert2,gefunden1)
	gefunden3=Find(String,Wert3,gefunden2)
  NeuString=Substr(String,1,gefunden2+6)&Text1 &Substr(String,gefunden3)
	WriteFile(file,NeuString,FALSE,"standard")
EndIf


EndSub
#########################################
Sub Wert2


file = "\My Flash Disk\navigation\Skin480x272\dpitems.xml"
Wert1 = "<item id=""2139000029"""
Wert2 = " value="
Wert3 = " type=""INT"" />"
Text1 = """1"""


String= ReadFile( file )
gefunden1=Find(String,Wert1)
If(gefunden1)
	gefunden2=Find(String,Wert2,gefunden1)
	gefunden3=Find(String,Wert3,gefunden2)
  NeuString=Substr(String,1,gefunden2+6)&Text1 &Substr(String,gefunden3)
	WriteFile(file,NeuString,FALSE,"standard")
EndIf


EndSub
#########################################
Sub Wert3
 
file = "\My Flash Disk\navigation\Skin480x272\dpitems.xml"
Wert1 = "<item id=""2139000029"""
Wert2 = " value="
Wert3 = " type=""INT"" />"
Text1 = """2"""


String= ReadFile( file )
gefunden1=Find(String,Wert1)
If(gefunden1)
	gefunden2=Find(String,Wert2,gefunden1)
	gefunden3=Find(String,Wert3,gefunden2)
  NeuString=Substr(String,1,gefunden2+6)&Text1 &Substr(String,gefunden3)
	WriteFile(file,NeuString,FALSE,"standard")
EndIf


EndSub
#########################################
Sub Wert4


file = "\My Flash Disk\navigation\Skin480x272\dpitems.xml"
Wert1 = "<item id=""2139000029"""
Wert2 = " value="
Wert3 = " type=""INT"" />"
Text1 = """3"""


String= ReadFile( file )
gefunden1=Find(String,Wert1)
If(gefunden1)
	gefunden2=Find(String,Wert2,gefunden1)
	gefunden3=Find(String,Wert3,gefunden2)
  NeuString=Substr(String,1,gefunden2+6)&Text1 &Substr(String,gefunden3)
	WriteFile(file,NeuString,FALSE,"standard")
EndIf


EndSub
#########################################
Sub Warten


# Bildschirmanzeige während der Inst
    StatusListEntryFormat ( 50 , 26 , Arial )
    StatusInfo( "Bitte warten. Nicht ausschalten!" )
    StatusMessage( "Änderungen werden vorgenommen!", ST_LIST, false )
    StatusShow()
EndSub
#########################################

Alles anzeigen

Manni 123 · 26. Juli 2011

Danke Ralf

Laut Handbuch pdf geht da nichts mit Schrift in Farbe , habe jedenfalls nichts gefunden.

Ich habe mal bei Sokobana gefragt , die haben glaube ich reichlich so Sachen in Skin , ich kann es aber nicht herauslesen .

Gruß Manni

Manni 123 · 26. Juli 2011

Hallo Sokobana und alle

Ich bräuchte mal von euch Hilfe , im Sokobana Skin ist doch so was in der Art reichlich drin .

Wie bekomme ich die drei Farben ins MortFenster ?

Kann als Icon oder als Schrifthintergrund oder die Schifft selbst sein .

Wenn da nichts geht wovon ich fast ausgehe muss ich halt die Farbe in Buchstaben dahinter schreiben , schöner wäre mit Farbe .

Habe schon in anderen Forum gefragt aber die mir hätten helfen können sind im Urlaub oder waren mit einer anderen harten Nuss beschäftigt .

Und unser Koord-Stefan war schon lange lange nicht Online .

Edit:
Habe ich zu spät gesehen das hier geschlossen ist . Wieso kann ich trotzdem hier schreiben ?

Gruß Manni

Manni 123 · 26. Juli 2011

Hatte mich schon gewundert das du darauf nichts sagtest .:icon_mrgreen:

Edir:
Das sah ja wieder Irre aus was ich oben geschrieben hatte .:017:

Gruß Manni

Manni 123 · 26. Juli 2011

Zitat von ackibaun

und dann bei einem Neustart des Navis installierte das Gerät nun eine andere Software als 4.5. an, allerdings plötzlich 4.6.0.0 R8154
...

Hallo ackibaun

Die 4.6.0.0 R8154 hat mit der GoPal Version nichts zu tun , das ist dein ROM oder kannst auch Bios nennen .

Für die GoPal Version siehst du in GoPal selbst unten rechts auf dem keinem runden ( i ) , findest du .

Edit:
Bis ich das mit dem Zitieren auseinander gebröselt hatte haben schon andere geantwortet.

Gruß Manni

Manni 123 · 26. Juli 2011

Hallo deka94

Nur für GP6 PE , nur diese hat die ***.mxf Dateien im Ordner MapConfigs .

Gruß Manni

Manni 123 · 26. Juli 2011

Genau , ein danke ohne Dankebutton wäre ja auch schon was .

Danke Panik für das Spitzen-Tool .

Gruß Manni

Manni 123 · 26. Juli 2011

Man kann nicht in allen Bereichen gleich stark tätig sein .

Dass du dich dem Programmieren so stark widmest kommt uns alle nur zugute .

Gruß Manni

Manni 123 · 26. Juli 2011

So geht es ja auch , ist letztendlich nur Gewöhnungssache .

Gruß Manni

Manni 123 · 26. Juli 2011

Hi Adolar

Die ***.mbf laufen nicht mal zwischen GP5 und 6 , und die ***.mxf hat die GP5 schon gar nicht , glaube auch nicht das GP5 aus die ***.mxf die ***.mbf erzeugen kann .

Gruß Manni

Manni 123 · 25. Juli 2011

Klasse Adolar

Endlich wieder ein MapFarb Tool für GoPal 6.

Danke

Gruß Manni

Manni 123 · 25. Juli 2011

Oder mit Koord als Server ein Bild drauf legen lassen ?

Gruß Manni

Manni 123 · 25. Juli 2011

Ich bräuchte mal von euch Hilfe .

Wie bekomme ich die drei Farben ins MortFenster ?

Kann als Icon oder als Schrifthintergrund oder die Schifft selbst sein .
Das obere GoPal Standard Parameter brauch keine Farbe , vielleicht fällt mir dafür später noch was ein .

Wenn da nichts geht wovon ich fast ausgehe muss ich halt die Farbe in Buchstaben dahinter schreiben , schöner wäre mit Farbe .

@ Libero Es kommt immer was neues hinzu .:icon_mrgreen:

Gruß Manni

Manni 123 · 25. Juli 2011

diesen.

\Navigation\plugins\navigating.de_poi-warner_LIGHT\pois

Gruß Manni

Beiträge von Manni 123

Teamskin GoPal 6

Teamskin GoPal 6

Teamskin GoPal 6

Beta-Test-Area: Betatests abgeschlossen deshalb --- geschlossen ---

E4430 Assistant Application funktioniert nicht + Microsoft Visual C++ Runtime Library

E4430 Assistant Application funktioniert nicht + Microsoft Visual C++ Runtime Library

MapColor - Farben für GoPal

MapColor - Farben für GoPal

MapColor - Eigene Farben für GoPal 6.0

Teamskin GoPal 6

MapColor - Eigene Farben für GoPal 6.0

MapColor - Eigene Farben für GoPal 6.0

Teamskin GoPal 6

Teamskin GoPal 6

Problem mit POI Warner Light für GoPal 6.0

Google lässt Nutzer die Ionosphäre vermessen

TomTom GO Discover: Neue Navi-Serie vorgestellt

Neue Smartwatch Garmin Lily veröffentlicht

Baidu kooperiert mit chinesischem Autobauer Geely

CHOETECH 100 Watt PD Dual USB-C-Netzteil im Test