;Start Pingotron by HM2K 01/10/09

;If Pingotron window exists, restore, otherwise run
;Fix for "The program is already running!" issue.

Dim $title='Pingotron'
Dim $exe=@ProgramFilesDir & '\Pingotron 4\Pingotron.exe'

If WinExists($title) Then
	WinSetState($title,"",@SW_ENABLE)
	WinSetState($title,"",@SW_SHOW)
	WinSetState($title,"",@SW_MAXIMIZE)
ElseIf FileExists($exe) Then
	Run($exe)
EndIf