Jump to content
Korean Random

Nowik1971

User
  • Posts

    143
  • Joined

  • Last visited

Posts posted by Nowik1971

  1. 7 часов назад, AntonVK сказал:

     

    Кто-нибудь проверял с XVM? всё нормально? У меня скорее всего будет возможность потестировать в выходные, а если всё ок и так - то обновлю тему.

     

    Сам мод я проверял, в ангаре, сыграл бой, всё работает, но на XVM времени не хватило, на работу надо было. Если всё хорошо у пользователей XVM, то тестировать с XVM не буду.

    Проверил, у меня все работает, спасибо за обнову! Паша тебе респект и уважение!!!

    В 07.07.2018 в 19:20, Slava7572 сказал:

    в хвм есть свои часы,как хочешь,так и настраивай,любой вид можно сделать.

    Я пользуюсь модом подсадок от pavel3333,  а там как и в XVM есть  XFW  фрейм модуль и из-за него походу и была неправильная работа мода часов, но все решилось, а XVM не пользуюсь и не нравится... моё чисто мнение мне он не нужен, т.к. играю  не для статы а в удовольствие!

    p.s. Не понимаю только одного зачем минусровать меня, ааааа наверное таким любям это удовольствие доставляет, смех да и только!!!:veryhappy:

    • Downvote 3
  2. под патч 1.0.2.0 будет обнова? Очень нравится мод.!!!

    Спасибо автору и +++

    Ну, что там адаптация получается с ХВМ? Очень удобные часики, но проклятое ХВМ все крушит, что-нибудь надо сделать... видел мод,  у которого с ХВМ работают часы в ангаре, но там наверное не флешка... У Полярного Лиса (Антон) мод статистика по танкам в ангаре и часы в этом моде с днем недели. но мне твое оформление больше нравится... Жду!!!

    • Downvote 2
  3. 1 час назад, Furious сказал:

    Никак не могу заставить [UninstallDelete] делать так, чтобы он удалял только подпапки в res_mods/x.x.x.x

    
    Type: filesandordirs; Name: "{app}\res_mods\{#Patch}\*"
    
    Type: filesandordirs; Name: "{app}\res_mods\{#Patch}"

    Такие варианты приводят к удалению папки х.х.х.х целиком, после чего клиент не стартует, восстановление клиента папку не восстанавливает.

    Указание всех подпапок в папке тоже приводит к удалению всей папки 

    
    [UninstallDelete]
    Type: filesandordirs; Name: "{app}\res_mods\{#Patch}\content\*"
    Type: filesandordirs; Name: "{app}\res_mods\{#Patch}\gui\*"
    Type: filesandordirs; Name: "{app}\res_mods\{#Patch}\localization\*"
    Type: filesandordirs; Name: "{app}\res_mods\{#Patch}\maps\*"
    Type: filesandordirs; Name: "{app}\res_mods\{#Patch}\objects\*"
    Type: filesandordirs; Name: "{app}\res_mods\{#Patch}\particles\*"
    Type: filesandordirs; Name: "{app}\res_mods\{#Patch}\scripts\*"
    Type: filesandordirs; Name: "{app}\res_mods\{#Patch}\spaces\*"
    Type: filesandordirs; Name: "{app}\res_mods\{#Patch}\speedtree\*"
    Type: filesandordirs; Name: "{app}\res_mods\{#Patch}\system\*"
    Type: filesandordirs; Name: "{app}\res_mods\{#Patch}\vehicles\*"

    Хотя в некоторых случаях он наоборот оставляет пару подпапок не удаленными, но пустыми.

    после удаления просто надо создать отдельно нужные папки примерно так:

     CreateDir(ExpandConstant('{app}\res_mods\{#Patch}'));

    Kotyarko_O очень много мне помогал и я по его исходникам много чего переделывал !!!

     

    • Upvote 1
  4. Так все же как при помощи проги этой сделать вагоны и трупы и камуфляжи  , чтобы перекрашивалось как раньше? Такой вариант конфига подкинет кто-нибудь?

    Спасибо заранее!

    • Upvote 1
    • Downvote 1
  5. 5 минут назад, Furious сказал:

    У меня там много чего уже. Я просто не знал, что в ини файле можно прописывать относительный путь.

    Ну, у меня так же много чего, я просто ставлю эту прогу как мод вот и все.... У меня для танков сделано, ты сделай для карабликов....

     

    • Upvote 1
    • Downvote 1
  6. 9 минут назад, Furious сказал:

     

    Спасибо :great:

    И потом просто стандартным инноустановщиком все делаешь... я делал так для того что ты хочешь сделать....Короче я так понял, что установщик тебе нужен для Reshade

    вот мой полностью файл ini 

    [INPUT]
    KeyMenu=113,0,1
    InputProcessing=2
    KeyScreenshot=44,0,0
    KeyEffects=145,0,0
    
    [GENERAL]
    TextureSearchPaths=Textures
    EffectSearchPaths=Shaders
    ScreenshotPath=Maine Screenshots
    PerformanceMode=0
    CurrentPreset=0
    PresetFiles=Reshade_3_setting_bercut13.ini
    TutorialProgress=4
    PreprocessorDefinitions=RESHADE_DEPTH_LINEARIZATION_FAR_PLANE=1000.0,RESHADE_DEPTH_INPUT_IS_UPSIDE_DOWN=0,RESHADE_DEPTH_INPUT_IS_REVERSED=0,RESHADE_DEPTH_INPUT_IS_LOGARITHMIC=0
    ScreenshotFormat=0
    ShowClock=0
    ShowFPS=0
    
    [STYLE]
    ColFPSText=1.000000,1.000000,0.000000
    ColActive=0.200000,0.500000,0.600000
    Alpha=0.950000
    ColBackground=0.275000,0.275000,0.275000
    ColText=0.800000,0.900000,0.900000
    ColItemBackground=0.447000,0.447000,0.447000
    

    А вот мой кусок файла основной установщика:

    Source: "моды\1.0.1.0\ReShade3.0_with_SweetFX_32X64XbitPb13\Версия3\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; components: Universal;
    Source: "моды\1.0.1.0\ReShade3.0_with_SweetFX_32X64XbitPb13\Конфиг станарт\*"; DestDir: "{app}"; Flags:  ignoreversion recursesubdirs createallsubdirs; components: Universal\stsndart;
    Source: "моды\1.0.1.0\ReShade3.0_with_SweetFX_32X64XbitPb13\Конфиг яркость\*"; DestDir: "{app}"; Flags:  ignoreversion recursesubdirs createallsubdirs; components: Universal\yarkost;
    Source: "моды\1.0.1.0\ReShade3.0_with_SweetFX_32X64XbitPb13\Конфиг цвет\*"; DestDir: "{app}"; Flags:  ignoreversion recursesubdirs createallsubdirs; components: Universal\Cvet;
    Source: "моды\1.0.1.0\ReShade3.0_with_SweetFX_32X64XbitPb13\Конфиг bercut13\*"; DestDir: "{app}"; Flags:  ignoreversion recursesubdirs createallsubdirs; components: Universal\bercut13;
    
    Source: "моды\1.0.1.0\ReShade3.0_with_SweetFX_32X64XbitWin10\Версия3 win10\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; components: Universal10;
    Source: "моды\1.0.1.0\ReShade3.0_with_SweetFX_32X64XbitWin10\Конфиг станарт\*"; DestDir: "{app}"; Flags:  ignoreversion recursesubdirs createallsubdirs; components: Universal10\stsndart10;
    Source: "моды\1.0.1.0\ReShade3.0_with_SweetFX_32X64XbitWin10\Конфиг яркость\*"; DestDir: "{app}"; Flags:  ignoreversion recursesubdirs createallsubdirs; components: Universal10\yarkost10;
    Source: "моды\1.0.1.0\ReShade3.0_with_SweetFX_32X64XbitWin10\Конфиг цвет\*"; DestDir: "{app}"; Flags:  ignoreversion recursesubdirs createallsubdirs; components: Universal10\Cvet10;
    Source: "моды\1.0.1.0\ReShade3.0_with_SweetFX_32X64XbitWin10\Конфиг bercut13\*"; DestDir: "{app}"; Flags:  ignoreversion recursesubdirs createallsubdirs; components: Universal10\bercut1310;
    ; Примечание: Не используйте "Flags: ignoreversion" для системных файлов
    [Icons]
    Name: "{app}\Удаление_{#MyAppName} ver {#MyAppVersion}"; Filename: "{uninstallexe}";
    //IconFilename: "картинки модов\LEX-NEW Icon 156.ico"
    [Components]
    Name: Universal; Description: SweetFX_3.0X 32bx64it (Улучшение графики для 32 и 64 битной версии windows. Универсальный winХР,win7,win8).;  Flags: exclusive
    Name: Universal\stsndart; Description: SweetFX_3.0X 32bx64it (Оптимальный конфиг от PB13).;  Types:    custom; Flags: exclusive
    Name: Universal\yarkost; Description: SweetFX_3.0X 32bx64it (Улучшение яркости от PB13).;  Types:  custom; Flags: exclusive
    Name: Universal\Cvet; Description: SweetFX_3.0X 32bx64it (Улучшение цвета от nowik1971).;  Types: compact custom; Flags: exclusive
    Name: Universal\bercut13; Description: SweetFX_3.0X 32bx64it (Конфиг от bercut13).;  Types:  custom; Flags: exclusive
    
    Name: Universal10; Description: SweetFX_3.0X 32bx64it (Улучшение графики для 32 и 64 битной версии windows. Универсальный win10).;  Flags: exclusive
    Name: Universal10\stsndart10; Description: SweetFX_3.0X 32bx64it (Оптимальный конфиг от PB13).;  Types:    custom; Flags: exclusive
    Name: Universal10\yarkost10; Description: SweetFX_3.0X 32bx64it (Улучшение яркости от PB13).;  Types:  custom; Flags: exclusive
    Name: Universal10\Cvet10; Description: SweetFX_3.0X 32bx64it (Улучшение цвета от nowik1971).;  Types: custom; Flags: exclusive
    Name: Universal10\bercut1310; Description: SweetFX_3.0X 32bx64it (Конфиг от bercut13).;  Types: custom ; Flags: exclusive

     

    • Upvote 1
    • Downvote 1
  7. 7 часов назад, Furious сказал:

    Господа, есть такая необходимость, как прописать после установки модов адрес установки в несколько строчек txt файла, который устанавливается. Файл вот такой и нужно заменить путь к папке ReShade на тот, куда пользователь поставил моды. Предполагаю, что это можно сделать каким-нибудь батником, который будет запускаться после установки модов и в котором будет шаблон файла, а вместо адреса будет подставлен адрес установки. 

     

    UPD кажись сам нашел тут https://koreanrandom.com/forum/topic/9050-создание-инсталляторов-для-модпаков-на-базе-inno-setup/?do=findComment&comment=198978

     

    
    [GENERAL]
    EffectSearchPaths=D:\Games\World_of_Warplanes\ReShade\Shaders
    TextureSearchPaths=D:\Games\World_of_Warplanes\ReShade\Textures
    PerformanceMode=1
    ScreenshotPath=D:\Games\World_of_Warplanes\
    PreprocessorDefinitions=RESHADE_DEPTH_LINEARIZATION_FAR_PLANE=1000.0,RESHADE_DEPTH_INPUT_IS_UPSIDE_DOWN=0,RESHADE_DEPTH_INPUT_IS_REVERSED=1,RESHADE_DEPTH_INPUT_IS_LOGARITHMIC=0
    NoReloadOnInit=0
    TutorialProgress=4
    PresetFiles=D:\Games\World_of_Warplanes\low_contrast.ini,D:\Games\World_of_Warplanes\wowp_noblue.ini,D:\Games\World_of_Warplanes\wowp_sharpen.ini
    CurrentPreset=1
    ScreenshotFormat=0
    ShowClock=0
    ShowFPS=0
    FontGlobalScale=1.000000
    
    [INPUT]
    KeyMenu=113,0,1
    KeyScreenshot=44,0,0
    InputProcessing=2
    KeyEffects=192,0,0
    
    [STYLE]
    Alpha=1.000000
    ColActive=0.200000,0.200000,1.000000
    ColFPSText=1.000000,1.000000,0.000000
    ColBackground=0.275000,0.275000,0.275000
    ColItemBackground=0.447000,0.447000,0.447000
    ColText=0.800000,0.900000,0.900000

     

    Так надо не буквально и не явно путь писать, т.к. игра у многих в разных папках и дисках установлена...

    Надо относительный путь указывать в корне игровой папки....

    Вот пример:
     

    [GENERAL]
    TextureSearchPaths=Textures
    EffectSearchPaths=Shaders
    ScreenshotPath=Maine Screenshots
    PerformanceMode=0
    CurrentPreset=0
    PresetFiles=Reshade_3_setting_bercut13.ini
    TutorialProgress=4
    PreprocessorDefinitions=RESHADE_DEPTH_LINEARIZATION_FAR_PLANE=1000.0,RESHADE_DEPTH_INPUT_IS_UPSIDE_DOWN=0,RESHADE_DEPTH_INPUT_IS_REVERSED=0,RESHADE_DEPTH_INPUT_IS_LOGARITHMIC=0
    ScreenshotFormat=0
    ShowClock=0
    ShowFPS=0
    

     

    • Upvote 1
    • Downvote 1
  8. 3 минуты назад, tunut сказал:

    спасибо но нет, 

    нужно именно чтобы отключался т.е. стал серым

    если поставить галочку на Component1 - Component3 стал бы серым

    галочку снять = оба доступны

     

    Флагом Flags: exclusive поиграйся я так делал, но он не всегда подходит читай справку и примеры с этим флагом

    • Upvote 1
  9. СПАСИБО БОЛЬШОЕ )))  только можно как нибудь изменить размер содержимого окна. т.е. у меня получилось не на все окно ... 

    В редакторе форм инно поменяй Таск ширину и высоту.... как надо растяни

    • Upvote 1
    • Downvote 1
  10. ВСЕМ Привет!!!

    увы я не гуру в Inno Setup

    помогите сделать встроенный wot_tweaker в установщике, то есть мне нужно что бы после страницы модов шла страница "Повысить FPS" с чебоксами отключения различных эффектов

    Вот посмотри я ссылку давал .. готовый модпак и там исходник.. возьми и посмотри, скопируй , поизучай! https://koreanrandom.com/forum/topic/9050-%D1%81%D0%BE%D0%B7%D0%B4%D0%B0%D0%BD%D0%B8%D0%B5-%D0%B8%D0%BD%D1%81%D1%82%D0%B0%D0%BB%D0%BB%D1%8F%D1%82%D0%BE%D1%80%D0%BE%D0%B2-%D0%B4%D0%BB%D1%8F-%D0%BC%D0%BE%D0%B4%D0%BF%D0%B0%D0%BA%D0%BE%D0%B2-%D0%BD%D0%B0-%D0%B1%D0%B0%D0%B7%D0%B5-inno-setup/page-240?do=findComment&comment=395128

    • Upvote 1
    • Downvote 1
  11. да видимо придётся учить всё заного или мне просто неохота было возиться и выдерать

    Там и выдерать ничего не надо все скрипты в отдельной папке, просто нужно их потом правильно подключить и все дела...

    Я вот только не понимаю смысл в таком обновлении? Ну ведь ты же не каждый раз запускаешь модпак на установку? единственно чтобы по 100 раз с обновами не качать, т.к. все равно новый установщик скачивается, просто по ссылке не надо переходить вручную....

    Удобнее чтобы в ангаре сообщение было  о обнове..., а для этого просто мод информера обновлений ставишь вместе с паком или каком-то моде и все!

  12. кто нибудь подскажет скрипт проверки версии и скачки модпака через сам модпак

    я знаю что у котярко есть но я выдернуть скрипт не могу с файлами может есть у кого отдельно

    Вот валялся старый скрипт с этого сайта уже и не помню кто и когда его мне давал... Хотя у КотяркО там настолько все просто и понятно, что просто ужас и уж если ты не смог с его пака выдернуть, то учи все заново и читай справку, и этот скрипт тебе не поможет, т.к. его то же надо знать как и куда сунуть...

    #define GameName "Sacred"
    #define modpack_versionInfo "101"
    
    [Setup]
    AppName={#GameName}
    AppVerName={#GameName}
    DefaultDirName={pf}\{#GameName}
    AppPublisher=troyan
    
    [Languages]
    Name: "russian"; MessagesFile: "compiler:Languages\Russian.isl"
    
    
    
    [CustomMessages]
    russian.Modpack=Модпак
    russian.SupportForum=Тема на koreanrandom.com
    russian.ForumLink=http://www.koreanrandom.com
    russian.UpdatedLabel=Обновлено:
    russian.WOT_version=Версия WOT:
    russian.modpack_version=Версия модпака:
    russian.installer_version=wotunion installer
    russian.CheckingActualModpackVersionLabel=Проверка обновлений модпака...
    russian.CannotCheckUpdate=Ошибка при проверке обновлений. Далее - для установки
    russian.NoUpdates=Обновлений не найдено. Далее - для установки
    russian.ErrorWhileOpeningUpdatePage=Ошибка при переходе на страницу загрузки
    russian.AllIsReadyForInstall=Все готово для установки. Нажмите Далее для продолжения
    russian.UpdateFound=найдено    
    russian.httpVersion=http://proreduceri.tk/version.txt
    russian.httpMsg=http://proreduceri.tk/msg.txt
    russian.WOT_NotFound=Клиент World of Tanks не обнаружен. Установка будет прервана.
    russian.for=для
    russian.CheckAccess=Установка невозможна. Проверьте наличие прав доступа к файлам и папкам установленного клиента World of Tanks, закройте программы, которые используют папки и/или файли клиента World of Tanks, или запустите инсталлятор модпака с правами администратора.
    russian.MustUninstallBefore=Установка невозможна. Воспользуйтесь деинсталлятором модпака для удаления предыдущей установки модпака (Пуск - Программы - wotunion modpack - Удалить wotunion modpack).
    russian.NewVersionFound=Доступна новая версия модпака:
    russian.GoToLink=Перейти по ссылке в браузере для загрузки ?
    russian.CheckAccessUninstall=Деинсталляция невозможна. Проверьте наличие прав доступа к файлам и папкам установленного клиента World of Tanks закройте программы, которые используют папки и/или файлы клиента World of Tanks,  или запустите деинсталлятор модпака с правами администратора.
    
    
    
    [Code]
     var
     CheckingActualModpackVersionLabel: TLabel;
     WelcomePageID: Integer;
     ActualVersion: String;
     ActualVersionLongint: Longint;
     InstallVersionLongint: Longint;
     ActualVersionMsg: String;
     ReadyToInstall: Boolean;
     TerminateInstall: Boolean;
    
    function DownloadFile(const AURL: string; var AResponse: string): Boolean;
     var
      WinHttpRequest: Variant;
       begin
        Result := False;
         try
          WinHttpRequest := CreateOleObject('WinHttp.WinHttpRequest.5.1');
          WinHttpRequest.Open('GET', AURL, False);
          WinHttpRequest.Send;
          AResponse := WinHttpRequest.ResponseText;
         Case WinHttpRequest.Status of
          '200':
           begin
            Result := True;
           end;
         end;
         except
          ReadyToInstall:=True;
          AResponse := GetExceptionMessage;
          CheckingActualModpackVersionLabel.Caption:=ExpandConstant('{cm:CannotCheckUpdate}');
          Result := False;
         end;
       end;
    
    procedure CurPageChanged(CurPageID: Integer);
     begin
      if CurPageID = wpSelectDir then
       begin
    
       end;
        WizardForm.InnerNotebook.Visible := CurPageID <> WelcomePageID;
     end;
    
    function Form_CreatePage(PreviousPageId: Integer): Integer;
     var
      Page: TWizardPage;
       begin
        Page := CreateCustomPage(PreviousPageId, '', '');
        WelcomePageID := Page.ID;
        CheckingActualModpackVersionLabel := TLabel.Create(WizardForm);
         with CheckingActualModpackVersionLabel  do
          begin
           Parent := WizardForm.InnerPage;
           Visible:=True;
           Left := ScaleX(5);
           Top := ScaleY(292);
           Font.Color:= clBlack;
          end;
         Result := Page.ID;
       end;
      Procedure ForumLinkOnClick (Sender: TObject);
     var
      ErrorCode: Integer;
       Begin
        ShellExec ('open', ExpandConstant('{cm:ForumLink}'),'','', SW_SHOWNORMAL, ewNoWait, ErrorCode);
       end;
    
    procedure InitializeWizard();
       begin
       Form_CreatePage(wpWelcome);
    
        with WizardForm.PageDescriptionLabel do
         begin
          Visible := False;
         end;
        with WizardForm.PageNameLabel do
         begin
          Visible := False;
         end;
      end;
    
    function CheckUpdates():Boolean;
     var ErrorCode: Integer;
      begin
       if ReadyToInstall=False then
        begin
         CheckingActualModpackVersionLabel.Visible:=True;
         CheckingActualModpackVersionLabel.Caption := ExpandConstant('{cm:CheckingActualModpackVersionLabel}');
          if ((DownloadFile(ExpandConstant('{cm:httpVersion}'), ActualVersion)=True) and  (DownloadFile(ExpandConstant('{cm:httpMsg}'), ActualVersionMsg)=True)) then
           begin
            if (StrToIntDef(ActualVersion, ActualVersionLongint)) > (StrToIntDef('{#modpack_versionInfo}', InstallVersionLongint)) then
             begin
              CheckingActualModpackVersionLabel.Caption := CheckingActualModpackVersionLabel.Caption + ExpandConstant('{cm:UpdateFound}');
               if MsgBox(ExpandConstant('{cm:NewVersionFound}') + ActualVersionMsg + ExpandConstant('{cm:GoToLink}'), mbConfirmation, MB_YESNO) = IDYES then
                begin
                 If not ShellExec('', ExpandConstant('{cm:ForumLink}'), '', '', SW_SHOW, ewNoWait, ErrorCode) then
                  begin
                   CheckingActualModpackVersionLabel.Caption:=ExpandConstant('{cm:ErrorWhileOpeningUpdatePage}');
                   ReadyToInstall:=True;
                   Result:=False;
                  end
                  else
                   begin
                    Result:=False;
                    TerminateInstall:=True;
                    WizardForm.Close;
                  end;
                end
                else
                 begin
                  CheckingActualModpackVersionLabel.Caption:=ExpandConstant('{cm:AllIsReadyForInstall}');
                  ReadyToInstall:=True;
                  Result:=False;
                end;
             end
             else
              begin
               CheckingActualModpackVersionLabel.Caption:=ExpandConstant('{cm:NoUpdates}');
               ReadyToInstall:=True;
               Result:=False;
             end;
           end
           else
            begin
             CheckingActualModpackVersionLabel.Caption:=ExpandConstant('{cm:CannotCheckUpdate}');
             ReadyToInstall:=True;
             Result:=False;
           end;
        end
        else
         begin
          Result:=True;
        end;
      end;
    
    function NextButtonClick(CurPageID: Integer): Boolean;
     begin
      if CurPageID <> WelcomePageID then
       begin
        Result:=True;
       end
       else
        begin
         Result:=CheckUpdates;
       end;
     end;
    
    procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);
     begin
      if ((CurPageID=WelcomePageID) and (TerminateInstall=True)) then  Confirm := False;
     end; 

    Скачай не модпак его, а исходники, я же выше ссылку  дал на исходники и модпак, так не модпак, а исходники скачай, там все скрипты лежат, только без модов вот и все!!!

  13. вот что я не так делаю? вот скрипт..

    #define Patch               "0.9.19.0.2"
    #define MyAppName "777"
    #define MyAppVersion "1.1"
    #include "install_script.iss"
    
    
    
    [Setup]
    AppName="777"
    AppVersion=1.0
    DefaultDirName=C:\Games\World_of_Tanks\
    AppendDefaultDirName=no
    DirExistsWarning=no
    DisableProgramGroupPage=yes
    OutputBaseFilename=777
    Compression=lzma
    SolidCompression=yes
    
    [Types]
    Name: "full"; Description: "Полная установка"; Flags: iscustom;
    
    [CustomMessages]
    SoundCtrlButtonCaptionSoundOn=Вкл Музло
    SoundCtrlButtonCaptionSoundOff=Вык Музло
    
    
    [Files]
    //////////////////////////////////////////////////////////////////////////////////////////////////ПАНЕЛИ ПОВРЕЖДЕНИЙ  BBBBBBBB  ////////////////
    
    Source: "F:\А ДЛЯ СБОРКИ\ЧИТЫ И МОДЫ\ПАНЕЛИ ПОВРЕЖДЕНИЙ\1 Панель повреждений_Gambiter\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Components: B\1;
    //Source: "F:\А ДЛЯ СБОРКИ\ЧИТЫ И МОДЫ\ПАНЕЛИ ПОВРЕЖДЕНИЙ\2 Панель повреждений _bes_1\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Components: B\2;
    Source: "F:\А ДЛЯ СБОРКИ\ЧИТЫ И МОДЫ\ПАНЕЛИ ПОВРЕЖДЕНИЙ\3 Панель повреждений_zayaz\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Components: B\3;
    Source: "F:\А ДЛЯ СБОРКИ\ЧИТЫ И МОДЫ\ПАНЕЛИ ПОВРЕЖДЕНИЙ\4 Панель повреждений минималистичная\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Components: B\4;
    Source: "F:\А ДЛЯ СБОРКИ\ЧИТЫ И МОДЫ\ПАНЕЛИ ПОВРЕЖДЕНИЙ\5 Панель Bionick для ноутбуков от Bionick + Andre_V\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Components: B\5;
    Source: "F:\А ДЛЯ СБОРКИ\ЧИТЫ И МОДЫ\ПАНЕЛИ ПОВРЕЖДЕНИЙ\6 Панель синяя от Dellux + _P_H_A_R_A_O_N_+ Andre_V\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Components: B\6;
    Source: "F:\А ДЛЯ СБОРКИ\ЧИТЫ И МОДЫ\ПАНЕЛИ ПОВРЕЖДЕНИЙ\7 Панель из серии Октагон\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Components: B\7;
    Source: "F:\А ДЛЯ СБОРКИ\ЧИТЫ И МОДЫ\ПАНЕЛИ ПОВРЕЖДЕНИЙ\8 Панель повреждений Warhammer\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; Components: B\8;
    ; Примечание: Не используйте "Flags: ignoreversion" для системных файлов
    
    
    [Components]
    Name: "KMP"; Description: "ПАНЕЛИ ПОВРЕЖДЕНИЙ  ®"; Flags: disablenouninstallwarning;
    Name: "B\1"; Description: ". панель повреждений с таймером ремонта от Andre_V \ GambitER"; Flags: exclusive disablenouninstallwarning
    //Name: "B\2"; Description: ". панель повреждений _bes_1"; Flags: exclusive disablenouninstallwarning
    Name: "B\3"; Description: ". панель повреждений _ Zayaz"; Flags: exclusive disablenouninstallwarning
    Name: "B\4"; Description: ". панель повреждений минималистичная от Marsoff+Dellux+Andre_V"; Flags: exclusive disablenouninstallwarning
    Name: "B\5"; Description: ". панель Bionick для ноутбуков от Bionick + Andre_V"; Flags: exclusive disablenouninstallwarning
    Name: "B\6"; Description: ". панель синяя от Dellux + _P_H_A_R_A_O_N_+ Andre_V"; Flags: exclusive disablenouninstallwarning
    Name: "B\7"; Description: ". панель из серии Октагон"; Flags: exclusive disablenouninstallwarning
    Name: "B\8"; Description: ". панель повреждений Warhammer"; Flags: exclusive disablenouninstallwarning 

     

    к нему через #include подключил вот этот скрипт install_script.iss

    #include "Embedded\idp.iss"
    
    
    
    
    
    [Files]
    Source: "Embedded\idp.dll"; Flags: dontcopy;
    Source: "Embedded\7zA.exe"; Flags: dontcopy;
    
    
    
    [Components]
    Name: "Bla"; Description: "Bla-bla-bla"; Types: full;
    Name: "Bla\1"; Description: "дамаг анонсер в ресмодс.7z"; Types: full;
    Name: "Bla\2"; Description: "Bla-bla-bla-bla-bla"; Types: full;
    
    [Code]
    
    
    /// --- UnPack Begin --- ///
    
    procedure ExtractResources();
    var
      ResultCode: Integer;
    begin
      ExtractTemporaryFile('7zA.exe');
      CreateDir(ExpandConstant('{app}\7zA_Files'));
      CreateDir(ExpandConstant('{app}\res_mods'));
      FileCopy(ExpandConstant('{tmp}\7zA.exe'), ExpandConstant('{app}\7zA_Files\7zA.exe'), False);
    
      If (IsComponentSelected('Bla\1')) and (FileExists(ExpandConstant('{app}\дамаг анонсер в ресмодс.7z'))) then
    begin
      Exec(ExpandConstant('{app}\7zA_Files\7zA.exe'), 'x -y ..\дамаг анонсер в ресмодс.7z -o..\res_mods', '', SW_Hide, ewWaitUntilTerminated, ResultCode);
      DeleteFile(ExpandConstant('{app}\дамаг анонсер в ресмодс.7z'));
    end;
    
      If (IsComponentSelected('Bla\2')) and (FileExists(ExpandConstant('{app}\hangar_2.7z'))) then
    begin
      Exec(ExpandConstant('{app}\7zA_Files\7zA.exe'), 'x -y ..\hangar_2.7z -o..\res_mods', '', SW_Hide, ewWaitUntilTerminated, ResultCode);
      DeleteFile(ExpandConstant('{app}\hangar_2.7z'));
    end;
    
      DelTree(ExpandConstant('{app}\7zA_Files'), True, True, True);
    end;
    
    procedure CurStepChanged(CurStep: TSetupStep);
    begin
      If CurStep=ssDone then
    begin
      ExtractResources();
    end;
    end;
    
    
    /// --- UnPack End --- ///
    
    procedure CurPageChanged(CurPageID: Integer);
    begin
        if CurPageID = wpInstalling then
    begin
        if IsComponentSelected('Bla\1') then
    begin
        idpAddFile('http://236703.selcdn.ru/777/дамаг анонсер в ресмодс.7z', ExpandConstant('{app}\дамаг анонсер в ресмодс.7z'));
    end;
        if IsComponentSelected('Bla\2') then
    begin
        idpAddFile('http://www.com/hangar_2.7z', ExpandConstant('{app}\hangar_2.7z'));
    end;
    end;
    end;
    
    
    
    procedure InitializeWizard();
    begin
      idpDownloadAfter(wpInstalling);
    end; 

     

    в итоге... архив скачивает и кидает в корень игры ( вроде так и должно быть ), но  когда нажимаешь закрыть установщик то он просто удаляет этот архив  но не рнаспаковывает и не устанавливает (

    Вот посмотри все у КотяркО есть  в свободном доступе исходники модпака https://bitbucket.org/Kotyarko_O/ скачивай смотри и тренируйся..... Там все по людски сделано.... Супермодпак...

    • Downvote 2
  14. Пояснять долго, но не правильно сделал, ты ничего не подключил, а вмонтировал и не правильно!...

     

    Что вы мучаетесь изобретая велосипед постоянно, возьмите исходники от КотяркО они в свободном доступе и сделайте себе нормальный модпак!!!

    Читайте справку вы просто я смотрю методом тыка всё делаете...!!!


     

    • Upvote 1
  15. всем привет. подскажите а почему с этим кодом скачивает но не распаковывает? 

    #include "Embedded\idp.iss"
    #define MyAppName "XXX-удалить"
    
    
    [Files]
    Source: "Embedded\idp.dll"; Flags: dontcopy;
    Source: "Embedded\7zA.exe"; Flags: dontcopy;
    
    [Types]
    Name: "full"; Description: "Full installation"; Flags: iscustom;
    
    [Components]
    Name: "Bla"; Description: "Bla-bla-bla"; Types: full;
    Name: "Bla\1"; Description: "балабала"; Types: full;
    Name: "Bla\2"; Description: "ЧТО ТО"; Types: full;
    
    
    [code]
    procedure ExtractResourcesFile(UnPack, Files, ToPlace: String);
    var
      ResultCode: Integer;
    begin
      Exec(UnPack, 'x -y' + ' ' + Files + ' ' + '-o' + ToPlace, '', SW_Show, ewWaitUntilTerminated, ResultCode);
    end;
    
    procedure ExtractResources;
    begin
      ExtractTemporaryFile('7zA.exe');
      CreateDir(ExpandConstant('{app}\res_mods'));
      CreateDir(ExpandConstant('{app}\{#MyAppName}'));
      CreateDir(ExpandConstant('{app}\{#MyAppName}'));
      FileCopy(ExpandConstant('{tmp}\7zA.exe'), ExpandConstant('{app}\{#MyAppName}\7zA.exe'), False);
    
      If (IsComponentSelected('Bla\1')) and (FileExists(ExpandConstant('{app}\{#MyAppName}\попадание без зассвета.7z'))) then
    begin
      ExtractResourcesFile(ExpandConstant('{app}\{#MyAppName}\7zA.exe'), ExpandConstant('{app}\{#MyAppName}\попадание без зассвета.7z'), ExpandConstant('{app}\res_mods'));
    end;
      If (IsComponentSelected('Bla\2')) and (FileExists(ExpandConstant('{app}\{#MyAppName}\hangar_2.7z'))) then
    begin
      ExtractResourcesFile(ExpandConstant('{app}\{#MyAppName}\7zA.exe'), ExpandConstant('{app}\{#MyAppName}\hangar_2.7z'), ExpandConstant('{app}\res_mods'));
    end;
      DelTree(ExpandConstant('{app}\{#MyAppName}'), True, True, True);
    end;
    
    procedure CurStepChanged1(CurStep: TSetupStep);
    begin
      If CurStep = ssPostInstall then
    begin
      ExtractResources;
    end;
    end;
    
    procedure CurPageChanged(CurPageID: Integer);
    begin
        if CurPageID = wpReady then
    begin
        if IsComponentSelected('Bla\1') then
    begin
        CreateDir(ExpandConstant('{app}\{#MyAppName}'));
        CreateDir(ExpandConstant('{app}\{#MyAppName}'));
        idpAddFile('http://236703.selcdn.ru/777/попадание без зассвета.7z', ExpandConstant('{app}\{#MyAppName}\попадание без зассвета.7z'));
    end;
        if IsComponentSelected('Bla\2') then
    begin
        CreateDir(ExpandConstant('{app}\{#MyAppName}'));
        CreateDir(ExpandConstant('{app}\{#MyAppName}'));
        idpAddFile('http://proreduceri.tk/xvmfresh.7z', ExpandConstant('{app}\{#MyAppName}\hangar_2.7z'));
    end;
    end;
    end;
    
    
    
    procedure IDPdownload;
    begin
      idpDownloadAfter(wpReady);
    end; 
     подключал  к основному скрипту через #include. там же в InitializeWizard дописана строчка - idpDownloadAfter(wpInstalling);так надо еще и функцию распаковки прикрепить... Вот примерно такой файл надо написать и подключить его через #include  к основному скрипту в нужном месте...
    [Files]
    Source: "скрипты инсталлятора\7zA.exe"; Flags: dontcopy noencryption;
    [code]
    procedure ExtractResources;
    var
      ResultCode: Integer;
    begin
      ExtractTemporaryFile('7zA.exe');
      CreateDir(ExpandConstant('{app}\res_mods'));
      CreateDir(ExpandConstant('{app}\res_mods\{#Patch}'));
      FileCopy(ExpandConstant('{tmp}\7zA.exe'), ExpandConstant('{app}\7zA.exe'), False);
      WizardForm.StatusLabel.Caption:='Распаковка скаченных модов...';
      WizardForm.StatusLabel.Transparent:=True;
    //"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""//
     if IsComponentSelected('scurki') and (FileExists(ExpandConstant('{app}\scurki.7z'))) then
    begin
      Exec(ExpandConstant('{app}\7zA.exe'), 'x -y' + ' ' + Expandconstant('{app}\scurki.7z') + ' ' + '-o' + Expandconstant('{app}\res_mods\{#Patch}'), '', SW_Show, ewWaitUntilTerminated, ResultCode);
      DeleteFile(ExpandConstant('{app}\vehicles.7z'));
    end;
    //-------------//
      DeleteFile(ExpandConstant('{app}\7zA.exe'));
    end;
    //"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""//
    procedure jumpModsFromNetworkChangeds(CurStep: TSetupStep);
    begin
      If CurStep=ssPostInstall then
    begin
      ExtractResources;
    end;
    end;
    //"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""//
    procedure jumpModsFromNetworkChanged(CurPageID: Integer);
    begin
        if CurPageID = wpready then
    begin
    //---//
    if IsComponentSelected('scurki') then
    begin
        idpAddFile('http://sait.com/scurki.7z', ExpandConstant('{app}\scurki.7z'));
    end;
    end;
    end;
    //"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""//
    procedure jumpModsFromNetwork;
    begin
      idpDownloadAfter(wpready);
    end;
    

  16. как еще избавиться от такой ошибки?

    2017-06-03 16:27:16.068: WARNING: [WARNING] (scripts/common/quest_cache_helpers.py, 46): scripts/item_defs/clubs_quests/ladder_quests_RU.xml ('No quests of type clubsQuest were found in scripts/item_defs/clubs_quests/ladder_quests_RU.xml.',)
    2017-06-03 16:27:16.167: NOTICE: [NOTE] (scripts/client/post_processing/__init__.py, 271): The quality = 3 was selected.
    2017-06-03 16:27:16.167: NOTICE: [NOTE] (scripts/client/post_processing/__init__.py, 271): The quality = 4 was selected.

    и вот эта стала после пилотов выскакивать хотя марафона уже нет...

    2017-06-03 16:54:42.610: WARNING: [WARNING] (scripts/client/account_helpers/CustomFilesCache.py, 216): Http error. Code: 404, url: http://ce.worldoftanks.ru/dcont/tokens/tokens_ru.xml
    2017-06-03 16:54:43.153: ERROR: [ERROR] (scripts/client/gui/server_events/event_items.py, 284): There is no main token quest in the marathon ('marathon:WGSSA-19073_g00',)

    Эмблемы не показывает, но в кеше все перечисленные файлы есть (icons.bak, icons.dat, icons.dir), в принципе мод отлично работает, просто хотелось бы как-то и другие ошибки картохи им заглушать?  если такое возможно сделай пожалуйста, т.к. приятно смотреть на чистенький лог питона без всякого мусора от ВГ.

    Заранее огромнейшее спасибо!!!

  17. Короче сделал тебе один пример , остальное по аналогии сделаешь там не сложно... 
    Пардон перепутал, в личку уже кинул посмотри...

    А вообще тему с начала всю почитай, все есть в теме и можно собрать установщик на любой вкус, да еще и справку читани...

  18. Так я же ему и написал, что скриптов полно, просто вопрос у него како-то не совсем понятный, скрипт на докачку хочет, а не скачивание? Твой пример так же нормальный, да и вообще если поискать то и в этой теме есть пример, по моему Атотик там все делал или еще кто, уже давно не читал, а наверное надо обновить в  памяти .... в теме все по новой опять с начала перечитать, а то стираться стало....

  19. Привет всем,кто подскажет,что нужно сделать, для докачки больших файлов в инсталяторе?

    Вопрос не совсем понятен... Надо чтобы при обрыве соединения докачивался или просто скачать файл большой  в несколько потоков типа торрента?

    Если просто скачать по сети то есть в инно скрипт скачивания внешнего файла по сети в назначенный момент например перед установкой и распаковка его так же в нужный момент.

    Многие например не суют в инсталлятор большие файлы, а просто делают скачивание их по сети если его выбрать при установке, тогда и установшик не будет большим и раздутым и правильнее это делать .. ведь может некоторые пользователи модпака и не будут его устанавливать, а соответственно и скачивать  ...

  20. Легко-то легко, но не все моды даже не имеющие явного файла конфига (т.е. он не нужен моду) потом правильно работают..., а точнее вообще не работают и ошибку не выдают...

  21. ещё вопросик на будущее

    сейчас все моды в res_mods

    если я их все сразу запакую в  один архив и перекину в mods\0.9.17.1  

    будут работать,или каждый мод по отдельности нужно будет...?

    Нет не получится, надо и в мода переписывать пути к конфигам, т.к. их надо вынести в папку конфигов, если мод без конфига, то все можно в куче сделать, но таких мало...

    Тут надо знаниями и исходниками владеть по питону и не только.

    • Upvote 1
  22. ВГ всем всеровно не угодит, как и дамагЛогом. Ну нарисовали, раскрасили, а я сделал свой вариант https://koreanrandom.com/forum/topic/35169-damagelog-%D1%81%D1%80%D0%B5%D0%B4%D1%81%D1%82%D0%B2%D0%B0%D0%BC%D0%B8-xvm/page-1?do=findComment&comment=357732 и мне не интересно играть с потугами от разрабов игры  :ok: . Индикатор класс, молодец что тему обновляет

    Согласен с вами полностью всем не угодить.... И конечно отлично, что естиь альтернатива и всегда можно ей воспользоваться... картошка редко учитывает то что надо и более востребовано игроками...  их же игры...

    • Upvote 1
  23.  пробовал на тесте там уже все сделали  как положено все видно.. может если только кому картинка не понравится, а так все в игре нормально стало...

    Так что наверное уже не понадобится мод отдельно.... а там видно будет, а так мод класс...

×
×
  • Create New...