rewrite Tinfo from nasm to fasm

data/Tupfile.lua

@@ -441,6 +441,7 @@ tup.append_table(img_files, {
  {"TERMINAL", VAR_PROGS .. "/system/terminal/terminal"},
  {"TEST", VAR_PROGS .. "/testing/protection/trunk/test"},
  {"TINYPAD", VAR_PROGS .. "/develop/tinypad/trunk/tinypad"},
+ {"TINFO", VAR_PROGS .. "/system/tinfo/tinfo"},
  {"UNZ", VAR_PROGS .. "/fs/unz/unz"},
  {"ZKEY", VAR_PROGS .. "/system/zkey/trunk/ZKEY"},
  {"3D/3DWAV", VAR_PROGS .. "/demos/3dwav/trunk/3dwav"},
@@ -647,7 +648,6 @@ tup.append_table(img_files, {
  {"ACLOCK", VAR_PROGS .. "/demos/aclock/trunk/aclock"},
  {"LOD", VAR_PROGS .. "/fs/lod/lod"},
  {"TIMER", VAR_PROGS .. "/other/Timer/timer"},
- {"TINFO", VAR_PROGS .. "/system/tinfo/tinfo"},
  {"DEVELOP/GENFILES", VAR_PROGS .. "/testing/genfiles/GenFiles"},
  {"MEDIA/FILLSCR", VAR_PROGS .. "/media/FillScr/fillscr"},
 })

programs/system/tinfo/Tupfile.lua

@@ -1,2 +1,7 @@
-if tup.getconfig("NO_NASM") ~= "" then return end
-tup.rule("tinfo.asm", "nasm -f bin -o %o %f " .. tup.getconfig("KPACK_CMD"), "tinfo")
+if tup.getconfig("NO_FASM") ~= "" then return end
+HELPERDIR = (tup.getconfig("HELPERDIR") == "") and "../.." or tup.getconfig("HELPERDIR")
+tup.include(HELPERDIR .. "/use_fasm.lua")
+add_include(tup.getvariantdir())
+
+tup.rule("echo lang fix " .. ((tup.getconfig("LANG") == "") and "en_US" or tup.getconfig("LANG")) .. " > %o", {"lang.inc"})
+tup.rule({"tinfo.asm", extra_inputs = {"lang.inc"}}, FASM .. " %f %o " .. tup.getconfig("KPACK_CMD"), "tinfo")

programs/system/tinfo/build_en.bat

@@ -0,0 +1,4 @@
+@echo lang fix en_EN >lang.inc
+@fasm.exe -m 16384 tinfo.asm tinfo.kex
+@kpack tinfo.kex
+pause

programs/system/tinfo/build_ru.bat

@@ -0,0 +1,4 @@
+@echo lang fix ru_RU >lang.inc
+@fasm.exe -m 16384 tinfo.asm tinfo.kex
+@kpack tinfo.kex
+pause

programs/system/tinfo/make.bat

@@ -1 +0,0 @@
-nasm -f bin tinfo.asm -o tinfo