inital commit кек

dist/windows-portable/CBE-Emulator.vbs

@@ -0,0 +1,40 @@
+' ===========================================================
+' CBE Emulator launcher (VBScript - no console window)
+' Double-click to run with embedded plugins, silently.
+' ===========================================================
+
+Option Explicit
+
+Dim shell, fso, javaExe, jar, baseDir, cmd
+
+Set shell = CreateObject("WScript.Shell")
+Set fso   = CreateObject("Scripting.FileSystemObject")
+
+baseDir = fso.GetParentFolderName(WScript.ScriptFullName)
+javaExe = baseDir & "\runtime\bin\javaw.exe"
+jar     = baseDir & "\app\cbe-emu.jar"
+
+If Not fso.FileExists(javaExe) Then
+    MsgBox "JRE not found at:" & vbCrLf & javaExe, 16, "CBE Emulator"
+    WScript.Quit 1
+End If
+
+If Not fso.FileExists(jar) Then
+    MsgBox "cbe-emu.jar not found at:" & vbCrLf & jar, 16, "CBE Emulator"
+    WScript.Quit 1
+End If
+
+' Collect extra args after the .vbs filename
+Dim extra
+extra = ""
+Dim i
+For i = 0 To WScript.Arguments.Count - 1
+    extra = extra & " """ & WScript.Arguments(i) & """"
+Next
+
+' Build command. 0 = hide window, False = don't wait for return
+cmd = """" & javaExe & """ -Xmx256m -jar """ & jar & """ " & extra
+shell.Run cmd, 0, False
+
+Set shell = Nothing
+Set fso   = Nothing