rem Run this script 3 times without "-r" and one time with "-r"
if "%1"=="-r" goto russian

rem Current directory contains all .ZIPs from /etext92/
rem or from /etext94/ or /etext96/ . And it's writable.
md temp
cd temp
echo a | pkunzip ..\*.zip
ren *.web       *.txt
ren *.          *.txt
ren readme*.*   *.txt
ren read*.me    *.txt
ren *.asc       *.txt
ren *.dpb       *.txt
ren *.gut       *.txt
ren *.lst       *.txt
ren *.out       *.txt
ren kushalbio.txt  kushalbi.txt
ren savenet994.txt savenet9.txt
move *.txt ..
dir/w *.*
del *.*
cd ..
rd temp
goto end

:russian
rem Current directory contains all 20 .QFCs from 20 .PMMs
qfc /x ANDERSON.QFC     *.txt
ren MEMORY.TXT MEMORY0.TXT
qfc /x AZIMOV1D.QFC     *.txt
qfc /x AZIMOV2W.QFC     *.txt
qfc /x CHERRYH.QFC      *.txt
qfc /x DICK.QFC         *.txt
qfc /x DICKSON.QFC      *.txt
ren WARRIOR.TXT WARRIOR0.TXT
qfc /x HEINLN1D.QFC     *.txt
qfc /x HEINLN2W.QFC     *.txt
qfc /x HOWARD.QFC       *.txt
ren DAMNATIO.TXT DAMNATI0.TXT
ren THING.TXT THING0.TXT
qfc /x LUKIANE2.QFC     *.txt
qfc /x LUKIANEN.QFC     *.txt
qfc /x NORTON.QFC       *.txt
qfc /x PIERS.QFC        *.txt
qfc /x SIMAK1D.QFC      *.txt
qfc /x SIMAK2W.QFC      *.txt
qfc /x STERN.QFC        *.txt
qfc /x STRUGAZ2.QFC     *.txt
qfc /x STRUGAZK.QFC     *.txt
qfc /x TOLKIEN.QFC      *.txt
qfc /x ZELAZNY.QFC      *.txt
ren Professia.txt Professi.txt
ren Glass_Sea.txt GlassSea.txt
:end
