Support Navigon 7071 Premium-VW "UP"- MN 7.10.25 Build

[Voldemort04]

Hallo

Hat sich da schon jemand ran getraut?
Ich habe es mal probiert, aber direkt nach dem start des Navis kommt die Meldung das ich mein Gerät in die Halterung und die Zündung betätigt werden soll.
Ich denke mal das die Software Daten vom Fahrzeug abfragt.
Wie kann man diese Abfrage umgehen umgehen?

Das steht in der autorunce:

Spoiler

ErrorLevel ( "syntax" )


Run("\My Flash Disk\VwUserShell\CradleLEDCtrl.exe")
Run("\My Flash Disk\VwUserShell\VwCommunicationExe.exe")
SetFileAttribute("\My Flash Disk\BrandDevice.reg", "readonly", FALSE)
RunWait("\My Flash Disk\VwBrandDevice\VwBrandDevice.exe")
Run("\My Flash Disk\VwUserShell\Mute.exe")
Run("\My Flash Disk\NAVIGON\VolumeUI.exe")
Run("\My Flash Disk\WatchdogPuppy.exe", "Watchdog_MN.ini Watchdog_BTCore.ini Watchdog_VwUserShell.ini Watchdog_PhoneApplication.ini Watchdog_MMP.ini Watchdog_HW.ini")


Sleep(5000)
If ( FileExists("\My Flash Disk\NAVIGON\CheckForStorageCard2.exe") )
Run("\My Flash Disk\NAVIGON\CheckForStorageCard2.exe")
EndIf


Call AddFontSkipping
Call InstallDebugger
Call CleanupInstallation


Exit


# ----------------------


Sub InstallDebugger
RegWriteDWord("HKLM","Debug","Debugger_Enable", 1)
If ( NOT RegValueExists("HKLM","Debug","JITDebugger") OR RegRead("HKLM","Debug","JITDebugger") ne "\My Flash Disk\ErrorReporter.exe" )
RegWriteString("HKLM","Debug","JITDebugger","\My Flash Disk\ErrorReporter.exe")
EndIf
EndSub


Sub AddFontSkipping
RegWriteDWord("HKLM", "SYSTEM\GDI", "FontLinkMethods", 3 )
RegDeleteKey("HKLM", "Software\Microsoft\FontLink\SystemLink", TRUE, TRUE)
RegWriteString("HKLM", "Software\Microsoft\FontLink\SystemLink", "Neo Tech VWNG", "\windows\arial.ttf,Arial")
RegWriteString("HKLM", "Software\Microsoft\FontLink\SystemLink", "Neo Tech VWNG Light", "\windows\arial.ttf,Arial")
RegWriteString("HKLM", "Software\Microsoft\FontLink\SystemLink", "Neo Tech VWNG Medium", "\windows\arialbd.ttf,Arial")
RegDeleteKey("HKLM", "Software\Microsoft\FontLink\SkipTable", TRUE, TRUE)
RegWriteString("HKLM", "Software\Microsoft\FontLink\SkipTable", "Neo Tech VWNG", "025CF, 0300-FFFF")
RegWriteString("HKLM", "Software\Microsoft\FontLink\SkipTable", "Neo Tech VWNG Light", "025CF, 0300-FFFF")
RegWriteString("HKLM", "Software\Microsoft\FontLink\SkipTable", "Neo Tech VWNG Medium", "025CF, 0300-FFFF")
EndSub


Sub CleanupInstallation
If ( FileExists("\My Flash Disk\updateme_bak.exe") )
Delete("\My Flash Disk\*.NB0")
EndIf
If ( FileExists("\My Flash Disk\DFUWizardCE_bak.exe") )
Delete("\My Flash Disk\*.xpv")
Delete("\My Flash Disk\*.xdv")
Delete("\My Flash Disk\*.dfu")
EndIf
Delete("\My Flash Disk\*_bak")
Delete("\My Flash Disk\*_bak.exe")
Delete("\My Flash Disk\restore*.txt")
Delete("\My Flash Disk\WaitUntilBatteryFull*.exe")
Delete("\My Flash Disk\*.rgb")
Delete("\My Flash Disk\*.bin")
EndSub