#
# Stellt Standard-Einstellungen widerher. Z.B. nach Neuinstallation der Software
# oder Hardreset

If( question( "Sokobana-Standard-Einstellungen?" ) )
	#### tti-Original widerherstellen und TMC-Statusanzeige setzen.

	Run ("\Storage Card\Sokobana\Koord\koord465.exe", "window=0 copy=\My Flash Disk\Navigation\tti\tti_0.te|\My Flash Disk\Navigation\tti\tti.te")
	Run ("\Storage Card\Sokobana\Koord\koord465.exe", "window=0 copy=\My Flash Disk\Navigation\skin480x272\PPSkin\tmc_0.png|\My Flash Disk\Navigation\skin480x272\PPSkin\tmc_status.png")

	# Löscht evtl. bestehende Einträge
	If (RegValueExists ("HKCU", "Software\sokobana", "TMC_1"))
	RegDelete ("HKCU", "Software\sokobana", "TMC_1")
	EndIf

	If (RegValueExists ("HKCU", "Software\sokobana", "TMC_2"))
	RegDelete ("HKCU", "Software\sokobana", "TMC_2")
	EndIf

	If (RegValueExists ("HKCU", "Software\sokobana", "TMC_3"))
	RegDelete ("HKCU", "Software\sokobana", "TMC_3")
	EndIf

	If (RegValueExists ("HKCU", "Software\sokobana", "TMC_0"))
	RegDelete ("HKCU", "Software\sokobana", "TMC_0")
	EndIf

	# Legt Eintrag an
	If not (RegValueExists ("HKCU", "Software\sokobana", "TMC_0"))
	RegWriteString ("HKCU","Software\sokobana", "TMC_0", "\Storage Card\Sokobana\Koord\koord465.exe")
	EndIf

	#### Standard-Pfeil wiederherstellen und Statusanzeige setzen

	Run ("\Storage Card\Sokobana\Koord\koord465.exe", "window=0 copy=\My Flash Disk\Navigation\Skin480x272\OPFSkin.skn|\My Flash Disk\Navigation\Skin480x272\PFSkin.skn")

	# Löscht evtl. bestehende Einträge
	If (RegValueExists ("HKCU", "Software\sokobana", "SPP_1"))
	RegDelete ("HKCU", "Software\sokobana", "SPP_1")
	EndIf

	If (RegValueExists ("HKCU", "Software\sokobana", "SPP_2"))
	RegDelete ("HKCU", "Software\sokobana", "SPP_2")
	EndIf

	If (RegValueExists ("HKCU", "Software\sokobana", "SPP_3"))
	RegDelete ("HKCU", "Software\sokobana", "SPP_3")
	EndIf

	If (RegValueExists ("HKCU", "Software\sokobana", "SPP_4"))
	RegDelete ("HKCU", "Software\sokobana", "SPP_4")
	EndIf

	# Legt Eintrag an
	If not (RegValueExists ("HKCU", "Software\sokobana", "SPP_1"))
	RegWriteString ("HKCU","Software\sokobana", "SPP_1", "\Storage Card\Sokobana\Koord\koord465.exe")
	EndIf

	#### nontransparente Geschwindigkeitswarnung anzeigen

	Copy ("\My Flash Disk\Navigation\Skin480x272\PPSkin\sl.png","\My Flash Disk\Navigation\Skin480x272\PPSkin\speed_limit_sign2.png",1)
	Delete ("\My Flash Disk\Navigation\Skin480x272\bb\speed_limit_sign2.png")
	Delete ("\My Flash Disk\Navigation\Skin480x272\bbt\speed_limit_sign2.png")

	#### Speicherüberwachung und Auto-Gyro initiieren

	if not (FileExists ("\Windows\StartUp\sokobana_service.lnk"))
	CreateShortcut ("\Windows\StartUp\sokobana_service.lnk", "\Storage Card\Sokobana\MortScript\tunnel_checker.exe")
	Endif
	
	If not (RegValueExists ("HKCU", "Software\sokobana", "AUTOGYRO"))
		RegWriteString ("HKCU","Software\sokobana", "AUTOGYRO", "\Storage Card\Sokobana\Koord\koord465.exe")
		Copy ("\My Flash Disk\Navigation\Skin480x272\PPSkin\brsr.png","\My Flash Disk\Navigation\Skin480x272\PPSkin\button_route_simulation.png",1)
		Message ("Auto-Gyro eingeschaltet")
	Endif

	If not (RegValueExists ("HKCU", "Software\sokobana", "MEMDIAGNOSTIC"))
		RegWriteString ("HKCU","Software\sokobana", "MEMDIAGNOSTIC", "\Storage Card\Sokobana\Koord\koord465.exe")
		Message ("Memory-Manager eingeschaltet")
	Endif

	#### NotButtons für WindowsDesktop

	if not (FileExists ("\Windows\Desktop\Navigation.lnk"))
	CreateShortcut ("\Windows\Desktop\Navigation.lnk", "\My Flash Disk\Navigation\mnavdce.exe")
	Endif
	if not (FileExists ("\Windows\Desktop\Menu.lnk"))
	CreateShortcut ("\Windows\Desktop\Menu.lnk", "\My Flash Disk\Menu.exe")
	Endif
	
	#### Ende
Endif