Kill ("SonyCalibMan.exe")
Close("SonyAppMan")
Copy("\Mounted Volume\Sony\nav-u\MortScript.exe","\Windows\MortScript.exe")
Copy("\Mounted Volume\Sony\nav-u\toolhelp.dll","\Windows\toolhelp.dll")
Copy("\Mounted Volume\Sony\nav-u\TestMode.exe","\Windows\TestMode.exe")
Copy("\Mounted Volume\Sony\nav-u\PowerOn.mscr","\Windows\PowerOn.mscr")
RunOnPowerOn ("\Windows\MortScript.exe","\Windows\PowerOn.mscr")
RunWait("\Mounted Volume\Sony\nav-u\ToolDevice.exe","off 18")
RunWait("\Mounted Volume\Sony\nav-u\ToolDevice.exe","off 15")
RunWait("\Mounted Volume\Sony\nav-u\ToolDevice.exe","on Serial")
Run ("\Windows\TestMode.exe")
Sleep (50)
Kill ("TestMode.exe")
RegWriteDWord("HKLM","SOFTWARE\Dennis Groning\SirfTech","NmeaBaudrateIdx",6)
RegWriteDWord("HKLM","SOFTWARE\Dennis Groning\SirfTech","BaudrateIdx",6)
RegWriteDWord("HKLM","SOFTWARE\Dennis Groning\SirfTech","CommPortIdx",5)
RegWriteDWord("HKLM","SOFTWARE\Dennis Groning\SirfTech","NmeaIntervalIdx10",0)
RegWriteDWord("HKLM","SOFTWARE\Dennis Groning\SirfTech","NmeaIntervalIdx09",0)
RegWriteDWord("HKLM","SOFTWARE\Dennis Groning\SirfTech","NmeaIntervalIdx08",0)
RegWriteDWord("HKLM","SOFTWARE\Dennis Groning\SirfTech","NmeaIntervalIdx07",0)
RegWriteDWord("HKLM","SOFTWARE\Dennis Groning\SirfTech","NmeaIntervalIdx06",1)
RegWriteDWord("HKLM","SOFTWARE\Dennis Groning\SirfTech","NmeaIntervalIdx05",1)
RegWriteDWord("HKLM","SOFTWARE\Dennis Groning\SirfTech","NmeaIntervalIdx04",5)
RegWriteDWord("HKLM","SOFTWARE\Dennis Groning\SirfTech","NmeaIntervalIdx03",5)
RegWriteDWord("HKLM","SOFTWARE\Dennis Groning\SirfTech","NmeaIntervalIdx02",1)
RegWriteDWord("HKLM","SOFTWARE\Dennis Groning\SirfTech","NmeaIntervalIdx01",0)
While (TRUE)
RunWait("\Mounted Volume\Skin\X-Treme.exe")
PowerOff
EndWhile