optimized to avoid storing a big string in RAM (you can write the output file while reading the input file)

Const ForReading = 1
Const ForWriting = 2

filePath = WScript.Arguments(0)
outFilePath = WScript.Arguments(1)
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile(filePath)

If fso.FileExists(outFilePath)  then
	fso.DeleteFile(outFilePath)  
End If 
Set objFile = fso.CreateTextFile(outFilePath)

objFile.WriteLine "#ifndef __BANK0GFX_H__"
objFile.WriteLine "#define __BANK0GFX_H__"
objFile.WriteLine ""

Do Until f.AtEndOfStream
	currentLine =  f.ReadLine
	objFile.WriteLine "#define " & Replace(currentLine, "	=	", " ")
Loop

f.Close
objFile.WriteLine "#endif"
objFile.Close