/* Rexx */
If 0 then do
 '@If Exists C:\Windows Exit'
End

Call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
Call SysLoadFuncs

Address CMD '@Echo off'; Call SysCls

Line_break = D2C( '13' ) || D2C( '10' )
Temp_drive = Left( Value( 'TEMP',, 'OS2Environment' ), 2 )

Call SysSetPriority 1, -31

/* * */

File_name = 'Paul_Kelver-The_Sausage_Reavers-RU'

Address CMD 'Del /F ' || Temp_drive || '\' || File_name || '.inf > NUL 2> NUL'
Address CMD 'Del /F ' || Temp_drive || '\' || File_name || '.ipf > NUL 2> NUL'
Address CMD 'Del /F ' || Temp_drive || '\' || File_name || '.fb2 > NUL 2> NUL'

Address CMD 'Unzip ' || Directory() || '\..\..\..\www\files\books\ethology\experience\Paul_Kelver-The_Sausage_Reavers-RU.zip' || ' -d ' || Temp_drive || '\'

Address CMD 'Del /F ' || Temp_drive || '\*.ipf > NUL 2> NUL'

Exit