14 lines
312 B
Plaintext
14 lines
312 B
Plaintext
Const ForReading = 1
|
|
Const ForWriting = 2
|
|
|
|
Set FSO = CreateObject("Scripting.FileSystemObject")
|
|
Set inFile = FSO.OpenTextFile("gpu/b288.inc", 1)
|
|
|
|
str = inFile.ReadAll
|
|
inFile.Close
|
|
|
|
newStr = Replace(str, "DEBUG_SHADER_ID", "0")
|
|
|
|
Set outFile = FSO.OpenTextFile("gpu/b288.inc", 2)
|
|
outFile.Write newStr
|
|
outFile.Close |