Merge branch 'master' of https://github.com/a2-4am/pitch-dark

.

winmake.bat

@@ -1,3 +1,4 @@
+0</* :
 @echo off
 if "%1" equ "clean" (
 :clean
@@ -28,8 +29,9 @@ call :asm
 1>nul copy /y res\_FileInformation.txt build\
 cadius ADDFILE "build\%DISK%" "/PITCH.DARK/" "build\GRUE.SYSTEM"
 cadius ADDFILE "build\%DISK%" "/PITCH.DARK/" "build\PITCH.DARK"
-cadius ADDFILE "build\%DISK%" "/PITCH.DARK/" "build\WEEGUI"
 cadius ADDFILE "build\%DISK%" "/PITCH.DARK/" "build\ONBEYOND.SYSTEM"
+cadius CREATEFOLDER "build\%DISK%" "/PITCH.DARK/LIB/"
+cadius ADDFILE "build\%DISK%" "/PITCH.DARK/LIB/" "build\WEEGUI"
 cadius ADDFILE "build\%DISK%" "/PITCH.DARK/LIB/" "build\ONBEYONDZ3"
 cadius ADDFILE "build\%DISK%" "/PITCH.DARK/LIB/" "build\ONBEYONDZ4"
 cadius ADDFILE "build\%DISK%" "/PITCH.DARK/LIB/" "build\ONBEYONDZ5"
@@ -42,7 +44,7 @@ if "%1" equ "txt" (
 call :dsk
 :txt
 2>nul md build\text
-python bin\textnormalize.py text\*
+cscript /nologo //e:jscript %~f0
 cd build
 cadius ADDFOLDER "%DISK%" "/PITCH.DARK/TEXT" text
 cd ..
@@ -72,12 +74,41 @@ goto :EOF
 
 echo usage: %0 clean / asm / dsk / txt / artwork / all
 goto :EOF
+*/
+WScript.echo("")
+a = new ActiveXObject("scripting.filesystemobject")
+fileinfo = ""
+for (b = new Enumerator(a.GetFolder("res\\text").files); !b.atEnd(); b.moveNext())
+{
+    f = a.opentextfile(b.item())
+    try
+    {
+        shortf = a.GetBaseName(b.item()).toUpperCase()
+        newf = ""
+        fileinfo += "\r\n" + shortf + "=Type(04),AuxType(0000),VersionCreate(70),MinVersion(BE),Access(C3)"
+        l = 0
+        while (1)
+        {
+            lines = f.readline()
+            !lines.length && (linelength = 0);
+            l && linelength && (lines += new Array(linelength - lines.length).join(" "))
+            newf += lines + "\n"
+            if (lines.substring(0, 6) == "[info]") linelength = 65
+            else if (lines.substring(0, 13) == "[description]") linelength = 78
+            l = linelength
+        }
+    }
+    catch(e){}
+    a.createtextfile("build\\text\\" + shortf, 1).write(newf)
+}
+a.createtextfile("build\\text\\_FileInformation.txt", 1).write(fileinfo.substring(2))
 
-rem make script for Windows environments
-rem a qkumba monstrosity from 2018-02-20
-rem requires ACME, CADIUS, Python
-rem https://sourceforge.net/projects/acme-crossass/
-rem https://www.brutaldeluxe.fr/products/crossdevtools/cadius/
-rem https://github.com/mach-kernel/cadius
-rem https://www.python.org/
-rem requires ACME, CADIUS, Python to be in path
+/*
+bat/jscript hybrid make script for Windows environments
+a qkumba monstrosity from 2018-03-01
+requires ACME, CADIUS
+https://sourceforge.net/projects/acme-crossass/
+https://www.brutaldeluxe.fr/products/crossdevtools/cadius/
+https://github.com/mach-kernel/cadius
+requires ACME, CADIUS to be in path
+*/