Dragon Quest XI: Echoes of an Elusive Age

[mercury32244 1 341]

1 час назад, Zolodei сказал:

  Описание (Показать содержимое)

 

Вот описание, только не знаю какой метод шифрования.

Можешь поробовать разобраться?

57 минут назад, Alexey19111997 сказал:

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

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

[Zolodei 113]

12 часов назад, mercury32244 сказал:

Можешь поробовать разобраться?

нет

[mercury32244 1 341]

Блин, жаль я в программировании не шарю. Уж эту игру надо перевести в любом случае.

[makc_ar 591]

Распаковка https://pastebin.com/ktqAvXXx

[makc_ar 591]

Текстуры для перевода https://www107.zippyshare.com/v/OyAqCRc1/file.html

[makc_ar 591]

Текст https://www88.zippyshare.com/v/y8158pgJ/file.html

[Estery 717]

1 минуту назад, makc_ar сказал:

Текст https://www88.zippyshare.com/v/y8158pgJ/file.html

Поставила бы тебе 20 лайков, если бы могла! Спасибо! Посмотрю из дома.

[makc_ar 591]

Перевод игры: http://notabenoid.org/book/74563
Прогресс перевода: 

Изменено 10 сентября, 2018 пользователем makc_ar

[Zolodei 113]

10 часов назад, mercury32244 сказал:

Блин, жаль я в программировании не шарю. Уж эту игру надо перевести в любом случае.

Попробуй PureBasic, пример кода: 

Скрытый текст

Цитата

;{
Enumeration
  #ZOLO_ReadPAK
EndEnumeration

Structure Hender_PAK 
  Unknown00.q
  Offset_DATA00.q
  Size_DATA00.q
  HASH_SHA1.b[20]
EndStructure

Structure Hender_DATA01
  OffsetData.q
  Size.q
  zSize.q
  Pack.l
  HASH_SHA1.b[20]
EndStructure

Structure Hender_DATA02
  OffsetStart.q
  OffsetEnd.q
EndStructure
;}

Procedure XOR_HEX(iXOr.s, *mem_xor) 
  ;"0xDEADFADEBEEFCAFE"
  If FindString(iXOr, "0x")
    iXOr = RemoveString(iXOr, "0x")
    Len.l =  Len(iXOr)/2
    *mem_xor = ReAllocateMemory(*mem_xor, Len)
    For t = 1 To Len*2 Step 2
      PokeB(*mem_xor+(t/2), Val("$"+Mid(iXOr, t, 2)))
    Next
  EndIf
EndProcedure

Procedure DEC_XOR(*FilesXOR, *KeyXOR, bXor.b)
  FilesXOR_len.l = MemorySize(*FilesXOR)
  KeyXOR_len.l = MemorySize(*KeyXOR)
  
  tt.l = 0
  For t = 0 To FilesXOR_len-1
    iFilesXOR.b =  PeekB(*FilesXOR+t)
    iKeyXOR.b =  PeekB(*KeyXOR+tt)
    If bXor = 0
    iReturn.b   = (iFilesXOR ! iKeyXOR) ! $FF
    Else
    iReturn.b   = (iFilesXOR ! iKeyXOR) 
    EndIf
    PokeA(*FilesXOR+t, iReturn)
    
    If tt = (KeyXOR_len-1) : tt = 0 : Else : tt+1 : EndIf 
    
  Next
EndProcedure

Procedure ReadPAK(FilesNames.s, iXOR_key.s)
  *mem_xor = AllocateMemory(1)
  XOR_HEX(iXOR_key, *mem_xor) 
  If ReadFile(#ZOLO_ReadPAK, FilesNames)
    FileSeek(#ZOLO_ReadPAK, Lof(#ZOLO_ReadPAK) - SizeOf(Hender_PAK))
    *MemoryPAK.Hender_PAK = AllocateStructure(Hender_PAK)
    ReadData(#ZOLO_ReadPAK, *MemoryPAK, SizeOf(Hender_PAK))
    
    FileSeek(#ZOLO_ReadPAK, *MemoryPAK\Offset_DATA00)
    
    Size_TEXT.l = ReadLong(#ZOLO_ReadPAK)
    Debug ReadString(#ZOLO_ReadPAK, #PB_Ascii , Size_TEXT)
    Number_Data01.l = ReadLong(#ZOLO_ReadPAK)
    Debug Number_Data01
    Debug "-----------------"
    For t = 0 To Number_Data01-1
      ;{    
       Number_00.l = (ReadLong(#ZOLO_ReadPAK) ! $FFFFFFFF)+1
       Size_2.l = (Number_00 * 2)
       *Memory_Size_2 = AllocateMemory(Size_2)
       ReadData(#ZOLO_ReadPAK, *Memory_Size_2, Size_2)
       DEC_XOR(*Memory_Size_2, *mem_xor, 1)
       Debug PeekS(*Memory_Size_2 , Number_00-2, #PB_Unicode)
       ;}
       ;{
       *MemoryDATA01.Hender_DATA01 = AllocateStructure(Hender_DATA01)
       ReadData(#ZOLO_ReadPAK, *MemoryDATA01, SizeOf(Hender_DATA01))

      ;}    
       ;{
       If *MemoryDATA01\Pack  = 1
         Number_01.l = ReadLong(#ZOLO_ReadPAK)       
       NumberSize.l  = (Number_01 * SizeOf(Hender_DATA02))
       *Memory_NumberSize = AllocateMemory(NumberSize)
    
       ReadData(#ZOLO_ReadPAK, *Memory_NumberSize, NumberSize) 
       ReadByte(#ZOLO_ReadPAK)
       ReadLong(#ZOLO_ReadPAK)
       FreeMemory(*Memory_NumberSize)
     ElseIf *MemoryDATA01\Pack  = 0   
       ReadLong(#ZOLO_ReadPAK) 
       ReadByte(#ZOLO_ReadPAK)
       Else
       Debug Loc(#ZOLO_ReadPAK)
       CallDebugger
       EndIf
       ;}

       FreeStructure(*MemoryDATA01)
       FreeMemory(*Memory_Size_2)
    Next
    
    FreeStructure(*MemoryPAK)
    CloseFile(#ZOLO_ReadPAK)
  Else
    Debug "ERR: "+FilesNames
  EndIf
  FreeMemory(*mem_xor)
EndProcedure

wer.s = "Data.pak"
iXOR_key.s = "0xDE00AD00FA00DE00BE00EF00CA00FE00"
ReadPAK(wer, iXOR_key)

P.S. Осталось добавить извлечение и готова программа.

 

[Константин 0]

Ребят так что переводом занялись?

[mercury32244 1 341]

38 минут назад, Константин сказал:

Ребят так что переводом занялись?

Ждём инструменты для запаковки, пока ознакомились с текстом. 160 тысяч строк. Ещё ни водном своём переводе не видел такую тонну текста. Основными переводчиками будем я и Estery, пока больше никого нет. Тут нужно человек 10 хотя бы людей, чтоб перевод через год вышел.
Надеемся на вашу поддержку, как моральную, так и донатовую.

[Meloman19 73]

20 минут назад, mercury32244 сказал:

...160 тысяч строк. Ещё ни водном своём переводе не видел такую тонну текста...

А... как же... Персона 5?..

[mercury32244 1 341]

5 минут назад, Meloman19 сказал:

А... как же... Персона 5?..

Про Персону я вообще молчу!!!))) Но там хоть немного спасает, что фразы, у которых уйма двойников из таблицы можно будет проставить везде)

[FieryDragon 2]

А что за шрифт в игре используется кто нибудь знает?

[Dasgun 0]

Подождём