################################################ ### ### ####### Windows Startup ####### ### ### ####### ####### ### (c) 2008 Team Sokobana ### ####### http://forum.pocketnavigation.de ####### ### http://www.varioskin.de ### ################################################ ############################################################ ### Anwendung auf eigene Gefahr und ohne Gewährleistung! ### ### Dieses Programm unterliegt den Rechten der ### ###Creative Commons Attribut Non-Commercial Share Alike 3### ### Lizenz. Genaue Angaben finden Sie beiliegend ### ### in der Datei Lizenz_VarioSkin3.txt ### ############################################################ # V.3.2 vom 21.06.08 08:00 ErrorLevel ("off") If (FileExists ("\Windows\StartUp\vario-install.lnk")) Delete ("\Windows\StartUp\vario-install.lnk") Endif Kill( "vario-install.exe" ) If not (ProcExists ("StartFromMenu.exe")) Sleep ( 1000 ) RunWait ("\My Flash Disk\Sokobana\MortScript\find_poiw.exe") Endif PlaySound ("\My Flash Disk\Sokobana\MortScript\success.wav" ) # --- DRM --- sokobana ------------------------------------------------------------ If (RegValueExists ("HKCU", "Software\sokobana", "DRMMemo")) RegDelete ("HKCU", "Software\sokobana", "DRMMemo") # --- warten auf Karte ---- Sleep (1500) # --- Variante I ---------------------------------------------------------- If (FileExists ("\Storage Card\BackupV3\Pathfinder.reg")) Copy ("\Storage Card\BackupV3\Pathfinder.reg","\My Flash Disk\settings\Navigation\Pathfinder.reg",1) EndIf # --- Variante II --------------------------------------------------------- # If (FileExists ("\Storage Card\backupV3\DRM.ini")) # FeatureSet00048 = IniRead ("\Storage Card\backupV3\" "DRM.ini", "FeatureSet00048", "Wert") # If { FeatureSet00048 ne "" } # RegWriteString ("HKCU", "Software\3SOFT\Pathfinder\Navlib_DRM", "FeatureSet00048", FeatureSet00048) # EndIf # EndIf # ------------------------------------------------------------------------- Endif # --- Sat-Turbo --- sokobana ------------------------------------------------------- If (RegValueExists ("HKCU", "Software\sokobana", "SATTURBO")) Sleep (1500) If (RegValueExists ("HKCU", "Software\3SOFT\Pathfinder\Position", "LastValidDirection")) RegDelete ("HKCU", "Software\3SOFT\Pathfinder\Position", "LastValidDirection") EndIf If (RegValueExists ("HKCU", "Software\3SOFT\Pathfinder\Position", "LastValidMercatorX")) RegDelete ("HKCU", "Software\3SOFT\Pathfinder\Position", "LastValidMercatorX") EndIf If (RegValueExists ("HKCU", "Software\3SOFT\Pathfinder\Position", "LastValidMercatorY")) RegDelete ("HKCU", "Software\3SOFT\Pathfinder\Position", "LastValidMercatorY") voldelay = RegRead ("HKCU","Software\sokobana", "VOLDELAY") SetVolume ( voldelay ) PlaySound ("\My Flash Disk\Sokobana\MortScript\satturbo.wav") SetVolume (255) EndIf RegDelete ("HKCU", "Software\sokobana", "SATTURBO") EndIf ErrorLevel ("off") Sleep ( 4000 ) If (FileExists ("\Windows\StartUp\vario-install.lnk")) Delete ("\Windows\StartUp\vario-install.lnk") Endif Kill( "vario-install.exe" ) If not (ProcExists ("StartFromMenu.exe")) RunWait ("\My Flash Disk\Sokobana\MortScript\find_poiw.exe") Sleep ( 6000 ) Endif # Rush Hour --- PrinzEmu ------------------------------------------------------- RunWait ("\My Flash Disk\Sokobana\MortScript\RushHour_Status.exe") Sleep ( 1500 ) # Kartenfehler --- PrinzEmu ------------------------------------------------------- If (not DirExists("\Storage Card")) SetVolume ( 255 ) PlaySound ("\My Flash Disk\Sokobana\MortScript\kartenfehler.wav") RunWait ("\My Flash Disk\Sokobana\MortScript\sokobana_auto_restart.exe") EndIf # --- Autoreset-Behandlung --- PrinzEmu ---------------------------------------------- If (RegValueExists ("HKCU", "Software\sokobana", "AUTORESET")) Run( "\My Flash Disk\Navigation\mnavdce.exe" ) RegDelete ("HKCU", "Software\sokobana", "AUTORESET") Run ("\My Flash Disk\Sokobana\MortScript\startfrommenu.exe") Endif # --- Ende Hauptprogramm