Add Satsuma scripts

This commit is contained in:
2026-10-22 23:04:57 +00:00
commit def171a0d9
5 changed files with 666 additions and 0 deletions
+15
View File
@@ -0,0 +1,15 @@
' Satsuma launcher. Starts the converter with no visible window.
Option Explicit
Dim sh, fso, here, target, src, cmd
Set sh = CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
If WScript.Arguments.Count < 2 Then WScript.Quit 1
here = fso.GetParentFolderName(WScript.ScriptFullName)
target = WScript.Arguments(0)
src = WScript.Arguments(1)
cmd = "powershell.exe -NoProfile -ExecutionPolicy Bypass -WindowStyle Hidden -File """ & here & "\Convert.ps1"" -Target """ & target & """ -Source """ & src & """"
sh.Run cmd, 0, False