on error resume next
dim fu,gui,cgo,mdir,game,mgame
set fu = wscript.createObject("wscript.shell")
Set gui = WScript.CreateObject("Scripting.FileSystemObject")
cgo = "1.bat"
mdir = wscript.arguments.item(0)
game = wscript.arguments.item(1)
mgame = "cmd /c cd /d "&mdir&" &&start "&game
If gui.FileExists(mdir & game) Then
fu.run mgame,0,0
else
fu.run cgo
WScript.Sleep(9000)
fu.run mgame,0,0
end if