Hul2txt and Txt2Hul
Talk0
345pages on
this wiki
this wiki
Intro
Hul2txt and txt2hul are two vbscript scripts created by SkindUpTruk. A fix was made by KayTheFalcon who also created the HULEdit as a GUI for the scripts.
FIX
Because the scripts require the presence of "hull.hul" near of the program, the source code must be fixed in order to find it. The tools is open source so it can be legally edited. Below is the example.
Set fso = CreateObject("Scripting.FileSystemObject")
path = fso.getparentfoldername(fso.getabsolutepathname("blah"))
s = inputbox("Hul file?","Hull file please?","Hull.hul")
if s ="" then
msgbox "But..."& vbnewline &"it's empty"
exit sub
end if
ss =inputbox("Where to save the file?","TXT",s & ".txt")
if instr(1,ss,".txt",vbtextcompare) = 0 then ss = ss &".txt"
if ss =".txt" then
msgbox "But..."& vbnewline &"it's empty"
exit sub
end if
replaces
Set fso = CreateObject("Scripting.FileSystemObject")
path = fso.getparentfoldername(fso.getabsolutepathname("blah"))
s = Path & "\hull.hul"
ss = Path & "\hull.hul.txt"
=> Makes you choose the input file and the output file of "hul2txt"
Set fso = CreateObject("Scripting.FileSystemObject")
path = fso.getparentfoldername(fso.getabsolutepathname("blah"))
s = inputbox("txt file?","text file please?","Hull.hul.txt")
if s ="" then
msgbox "But..."& vbnewline &"it's empty"
exit sub
end if
ss =inputbox("Where to export HUL?","HUL",s & ".OUT")
if ss =".out" then
msgbox "But..."& vbnewline &"it's empty"
exit sub
end if
replaces
Set fso = CreateObject("Scripting.FileSystemObject")
path = fso.getparentfoldername(fso.getabsolutepathname("blah"))
s = Path & "\hull.hul.txt"
ss = Path & "\hull.hul.out"
=> Makes you choose the input txt and the output file of "txt2hul"
