diff options
Diffstat (limited to 'engines/avalanche/initxf.cpp')
-rw-r--r-- | engines/avalanche/initxf.cpp | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/engines/avalanche/initxf.cpp b/engines/avalanche/initxf.cpp new file mode 100644 index 0000000000..964aa51422 --- /dev/null +++ b/engines/avalanche/initxf.cpp @@ -0,0 +1,32 @@ +#include "ptoc.h" + + +/*#include "Crt.h"*/ + +struct inirex { + varying_string<12> a; + word num; +}; + +text i; +file<inirex> o; +inirex x; + +int main(int argc, const char* argv[]) +{pio_initialize(argc, argv); +; + assign(i,"v:init0.dat"); reset(i); + assign(o,"v:init.avd"); rewrite(o); + + while (! eof(i)) + {; + i >> x.a >> NL; + i >> x.num >> NL; + o << x; + output << '.'; + } + + close(i); close(o); + output << NL; +return EXIT_SUCCESS; +}
\ No newline at end of file |