1. Уважаемые гости и пользователи форума.
    Администрация настоятельно рекомендует не регистрировать несколько аккаунтов для одного пользователя. При выявлении наличия мультиаккаунтов будут заблокированы все учетные записи данного пользователя.
    Аккаунты, зарегистрированные на временную почту будут также заблокированы.

Вопрос Вопрос по переделыванию скрипта L.A. Noire 0.0.1.8

Тема в разделе "Inno Setup", создана пользователем FalconRR, 13 окт 2016.

  1. Новичок

    Регистрация:
    13 авг 2018
    Сообщения:
    7
    Симпатии:
    0
    Пол:
    Мужской
    vint56,
    ;Название игры
    #define appname "The Elder Scrolls V. Skyrim"
    ;Версия игры
    #define appver "1.4.27.0.4"
    ;Ваш ник
    #define RePacker "Степаныч"
    ;Exe
    #define exe "SkyrimLauncher.exe"
    ;Реестр
    ;#define Registry
    ;Сколько требуется для установки
    #define NeedSize "5000000000"

    #define Splash /* Отключить или включить сплэш */

    #define NeedMem 512
    #define SecondProgressBar
    #define Components
    #define records
    #define facompress

    ;#define PrecompInside
    ;#define SrepInside
    ;#define MSCInside
    ;#define precomp "0.42"
    ;#define unrar
    ;#define XDelta
    ;#define PackZIP

    [Setup]
    AppId={{49BA2453-69E4-4985-A03A-CD7FC9A69E14}
    AppName={#appname}
    AppVerName={#appname} v{#appver}
    DefaultDirName={pf}\{#appname}
    DefaultGroupName=Games\{#appname}
    AllowNoIcons=yes
    OutputDir=.
    ShowTasksTreeLines=yes
    OutputBaseFilename={#appname}
    VersionInfoCopyright={#RePacker}
    VersionInfoDescription={#appname} / RePack by {#RePacker}
    WizardImageFile=Files\164x314.bmp
    WizardSmallImageFile=Files\55x58.bmp
    #ifdef NeedSize
    ExtraDiskSpaceRequired={#NeedSize}
    #endif

    #ifdef Components
    [Types]
    Name: full; Description: HighResTexturePack + Fix; Flags: iscustom

    [Components]
    Name: textures; Description: HighResTexturePack + Fix; Types: full; ExtraDiskSpaceRequired: 100000000
    #endif

    #ifdef Registry
    [Registry]
    Root: HKLM; Subkey: Software\ProFrager; ValueName: path; ValueType: String; ValueData: {app}; Flags: uninsdeletekey; Check: CheckError
    Root: HKLM; Subkey: Software\ProFrager; ValueName: name; ValueType: String; ValueData: Data; Flags: uninsdeletekey; Check: CheckError
    #endif

    [Icons]
    Name: "{group}\{#appname}{#appver}"; Filename: "{app}\{#exe}";
    Name: "{group}\{cm:UninstallProgram,{#appname}}"; Filename: "{uninstallexe}"
    Name: "{commondesktop}\{#appname}"; Filename: "{app}\{#exe}"; Tasks: desktopicon

    [Tasks]
    Name: desktopicon; Description: Добавить ярлык на рабочий стол; GroupDescription: Создание ярлыков:
    Name: Redist; Description: Дополнительное программное обеспечение:
    Name: Redist\DirectXCheck; Description: Обновить DirectX; Flags: unchecked
    Name: Redist\PhysXCheck; Description: Установить Nvidia PhysX; Flags: unchecked
    Name: Redist\VCCheck; Description: Установить Microsoft Visual C++ Redist; Flags: unchecked

    [Run]
    Check: CheckError and not IsWin64Check: CheckError and IsWin64

    [Files]
    Source: Include\English.ini; DestDir: {tmp}; Flags: dontcopy
    Source: Include\unarc.dll; DestDir: {tmp}; Flags: dontcopy
    Source: ISDone.dll; DestDir: {tmp}; Flags: dontcopy
    #ifdef Splash
    Source: "InstallFiles\isgsg.dll"; DestDir: "{app}"; Flags: ignoreversion
    Source: "InstallFiles\KrinkelsTeam.png"; DestDir: "{app}"; Flags: ignoreversion
    #endif
    #ifdef records
    Source: records.inf; DestDir: {tmp}; Flags: dontcopy
    #endif

    #ifdef PrecompInside
    Source: Include\CLS-precomp.dll; DestDir: {tmp}; Flags: dontcopy
    Source: Include\packjpg_dll.dll; DestDir: {tmp}; Flags: dontcopy
    Source: Include\packjpg_dll1.dll; DestDir: {tmp}; Flags: dontcopy
    Source: Include\precomp.exe; DestDir: {tmp}; Flags: dontcopy
    Source: Include\zlib1.dll; DestDir: {tmp}; Flags: dontcopy
    #endif
    #ifdef SrepInside
    Source: Include\CLS-srep.dll; DestDir: {tmp}; Flags: dontcopy
    #endif
    #ifdef MSCInside
    Source: Include\CLS-MSC.dll; DestDir: {tmp}; Flags: dontcopy
    #endif
    #ifdef facompress
    Source: Include\facompress.dll; DestDir: {tmp}; Flags: dontcopy
    #endif
    #ifdef precomp
    #if precomp == "0.38"
    Source: Include\precomp038.exe; DestDir: {tmp}; Flags: dontcopy
    #else
    #if precomp == "0.4"
    Source: Include\precomp040.exe; DestDir: {tmp}; Flags: dontcopy
    #else
    #if precomp == "0.41"
    Source: Include\precomp041.exe; DestDir: {tmp}; Flags: dontcopy
    #else
    #if precomp == "0.42"
    Source: Include\precomp042.exe; DestDir: {tmp}; Flags: dontcopy
    #else
    Source: Include\precomp038.exe; DestDir: {tmp}; Flags: dontcopy
    Source: Include\precomp040.exe; DestDir: {tmp}; Flags: dontcopy
    Source: Include\precomp041.exe; DestDir: {tmp}; Flags: dontcopy
    Source: Include\precomp042.exe; DestDir: {tmp}; Flags: dontcopy
    #endif
    #endif
    #endif
    #endif
    #endif
    #ifdef unrar
    Source: Include\Unrar.dll; DestDir: {tmp}; Flags: dontcopy
    #endif
    #ifdef XDelta
    Source: Include\XDelta3.dll; DestDir: {tmp}; Flags: dontcopy
    #endif
    #ifdef PackZIP
    Source: Include\7z.dll; DestDir: {tmp}; Flags: dontcopy
    Source: Include\packZIP.exe; DestDir: {tmp}; Flags: dontcopy
    #endif

    [CustomMessages]
    russian.ExtractedFile=Извлекается файл:
    russian.Extracted=Распаковка архивов...
    russian.CancelButton=Отменить распаковку
    russian.Error=Ошибка распаковки!
    russian.ElapsedTime=Прошло:
    russian.RemainingTime=Осталось времени:
    russian.EstimatedTime=Всего:
    russian.AllElapsedTime=Время установки:

    [Languages]
    Name: russian; MessagesFile: compiler:Languages\Russian.isl

    procedure ShowSplashScreen(p1: HWND; p2: AnsiString; p3, p4, p5, p6, p7: Integer; p8: Boolean; p9: Cardinal; p10: Integer);
    external 'ShowSplashScreen@{tmp}\isgsg.dll stdcall delayload';

    procedure Splash();
    begin
    ExtractTemporaryFile('isgsg.dll');
    ExtractTemporaryFile('KrinkelsTeam.png');
    ShowSplashScreen(WizardForm.Handle, ExpandConstant('{tmp}\KrinkelsTeam.png'), 1000, 3000, 1000, 0, 255, False, $FFFFFF, 10);
    end;

    procedure InitializeWizard;
    begin
    #ifdef Splash
    Splash();
    #endif
    end;

    [UninstallDelete]
    Type: filesandordirs; Name: "{app}"

    ;----------------------------------------------------------------------------------------------------

    Выдаёт ошибку: ShowSplashScreen(p1
    пробовал на разных скриптах ,оналогично , или выдаёт ошибку в оконцовке #endif
    [spoiler/]
     
    Последнее редактирование: 6 сен 2018
  2. Ветеран Проверенный

    Регистрация:
    18 июн 2011
    Сообщения:
    896
    Симпатии:
    657
    agrei678,
    [Setup]
    AppName=My Application
    AppVersion=1.5
    DefaultDirName={pf}\My Application
    [Files]
    Source: "Files\isgsg.dll"; DestDir: "{app}"; Flags: ignoreversion
    Source: "Files\KrinkelsTeam.png"; DestDir: "{app}"; Flags: ignoreversion

    [ Code]
    procedure ShowSplashScreen(p1: HWND; p2: AnsiString; p3, p4, p5, p6, p7: Integer; p8: Boolean; p9: Cardinal; p10: Integer);
    external 'ShowSplashScreen@{tmp}\isgsg.dll stdcall delayload';
    procedure Splash();
    begin
    ExtractTemporaryFile('isgsg.dll');
    ExtractTemporaryFile('KrinkelsTeam.png');
    ShowSplashScreen(WizardForm.Handle, ExpandConstant('{tmp}\KrinkelsTeam.png'), 1000, 3000, 1000, 0, 255, False, $FFFFFF, 10);
    end;

    procedure InitializeWizard;
    begin
    Splash();
    end;
     
    Последнее редактирование: 4 сен 2018
    agrei678 нравится это.
  3. Новичок

    Регистрация:
    13 авг 2018
    Сообщения:
    7
    Симпатии:
    0
    Пол:
    Мужской
    vint56, Подскажите пожалуйста ,в какой раздел прописывать файлы установочные., и в какую ппку закидывать :help:
     
  4. Ветеран Проверенный

    Регистрация:
    18 июн 2011
    Сообщения:
    896
    Симпатии:
    657
    agrei678,
    L.A. Noire 0.0.1.8 заточин под isdone
     
  5. Новичок

    Регистрация:
    13 авг 2018
    Сообщения:
    7
    Симпатии:
    0
    Пол:
    Мужской
    vint56,
    а как вот сюда музыку добавить и клики, как в Need for Speed™ Undercover ? :$
     
    Последнее редактирование: 16 сен 2018

Поделиться этой страницей