BaRS 74
Newbie | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
MyError:=true;
if not ISArcExtract ( 0, OveralPct, 50, ExpandConstant('{src}\GameData.bin'), ExpandConstant('{app}\GameData.srp'), false,CallBack, '', '', '') then break;
// if not ISArcExtract ( 0, OveralPct, 0, ExpandConstant('{src}\Music.bin'), ExpandConstant('{app}'), false,CallBack, '', '', '') then break;
if not ISSRepExtract ( 0, OveralPct, 65, ExpandConstant('{app}\White Gold\GameData.srp'), ExpandConstant('{app}Music.pcf'), '', true, CallBack ) then break;
if not ISPrecompExtract( 0, OveralPct, 25, ExpandConstant('{app}\White Gold\Music.pcf'), ExpandConstant('{app}\Music.7z'), true, CallBack ) then break;
if not IS7ZipExtract ( 0, OveralPct, 15, ExpandConstant('{app}\White Gold\Music.7z'), ExpandConstant('{app}'), true, CallBack, '' ) then break;
// if not ShowChangeDiskWindow('Пожалуйста, вставьте диск 2 и дождитесь его инициализации.', ExpandConstant('{src}'),'CODMW2_Disk2.arc' ) then break;
// if not ISArcExtract ( 1, OveralPct, 0, ExpandConstant('{src}\rustext.arc'), ExpandConstant('{app}'), false,CallBack, '', '', '') then break;
// if not ISArcExtract ( 2, OveralPct, 0, ExpandConstant('{src}\engtext.arc'), ExpandConstant('{app}'), false,CallBack, '', '', '') then break;
// if not ISArcExtract ( 3, OveralPct, 0, ExpandConstant('{src}\rusvoice.arc'),ExpandConstant('{app}'), false,CallBack, '', '', '') then break;
// if not ISArcExtract ( 4, OveralPct, 0, ExpandConstant('{src}\engvoice.arc'),ExpandConstant('{app}'), false,CallBack, '', '', '') then break;
MyError:=false;
|
