BattleTest2000

Made by Cherry, written in VBScript.

Sourcecode

Original Post: https://rpgmaker.net/forums/topics/21525/?post=875459#post875459

Set FSO = CreateObject("Scripting.FileSystemObject")
ScriptDir = FSO.GetParentFolderName(WScript.ScriptFullName)
Set Shell = WScript.CreateObject("WScript.Shell")
MonsterGroup = InputBox("Enter Monster Group ID", "Battle Test")
If MonsterGroup Then Shell.Run("""" + FSO.BuildPath(ScriptDir, "RPG_RT.exe") + """ BattleTest HideTitle Window " + MonsterGroup)