Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5

[Tool]Pes
#1

Hello good afternoon:
My goal is to create a scoreboard editor, in which I created this app to start learning with it and pegandado the manhas in c ++. Because c ++ is a bit different from pascal.

This app is for editing the DpFileList of the 2018 pes ps3, xbox360 and pc.
No need to be connected on the Internet for it to work is simple and practical.

Ver. 1.0 with Hex Viewer
Download
 http://www.mediafire.com/file/12kh433qtr...es2018.exe
Download Code Delphi pascal
http://www.mediafire.com/file/bm8b0qsefg...es2018.rar

[Image: 1.jpg]
image hosting

Ver. Beta 0.1

Preview:
[Image: Sem_t_tulo.jpg]
Reply
#2

Salut
Reply
#3

Download:  http://www.mediafire.com/file/a1if16h9tz...r_2018.exe

Code source, whoever wants to improve is willing, just people do not remove my creaditos ..
C ++ Builder 10.2: http://www.mediafire.com/file/urpjkwo5e5...ST2018.rar

Main part of source code
For those who do not have C ++ Builder 10.2 and have knowledge of Microsoft C ++ easily you adapt to for Microsoft C ++

Code:
//--------------------------------------------------------------------------
void Pc_Procedure(TLabel *LBA_T_S_cpk,TEdit *Edit2,TCheckBox *CheckBox1,
  TListBox *ListBox1){

  FILE *arq;
  AnsiString path;
  char buffer[48];
  AnsiString str;
  int NULL_[725] = {0};  //Total file size.
  int Control[1] = {100}; //d
  int Control2[1] = {10200};//D8 27
  int Control3[1] = {10300};//28 3C
  int Control4[1] = {200}; //C8

  //---listbox
  int tmp_offset[] = {16,64,112,160,208,256,304,352,400,448,496,544,592,640,688,
     736,784,832,880,928,976,1024,1072,1120,1168,1216,1264,1312,1360,1408,1456,
     1504,1552,1600,1648,1696,1744,1792,1840,1888,1936,1984,2032,2080,2128,2176,
     2224,2272,2320,2368,2416,2464,2512,2560,2608,2656,2704,2752,2800,2848,2896,
     2944,2992,3040,3088,3136,3184,3232,3280,3328,3376,3424,3472,3520,3568,3616,
     3664,3712,3760,3808,3856,3904,3952,4000,4048,4096,4144,4192,4240,4288,4336,
     4384,4432,4480,4528,4576,4624,4672,4720,4768}; //total offset =100   total CPKs Supported = 99

  //------------------------------------------------------------

    path = Edit2->Text + "\\DpFileList.bin";
    if((arq = fopen(path.c_str(), "w+b")) == 0){
      ShowMessage("Erro ao acessar o arquivo");
    }

    //Orden de gravação 1
     if(fwrite(&NULL_, sizeof(NULL_), 1, arq)==1){ }else{
      ShowMessage("ERR Open DpFileList!!!!");
      MessageBeep(0);
     }
     //Orden de gravação 2
     if(fseek(arq, 0, SEEK_SET)!=1)
        if(fwrite(&Control, 1, 1, arq)==1);

    //---------------bagacera----------------------------------------------
    for (int i = 0; i < ListBox1->Items->Count; i++) {

       str = ListBox1->Items->Strings[i];
       strcpy(buffer, str.c_str());
       //Orden de gravação 3
       if(fseek(arq, tmp_offset[i], SEEK_SET)!=1)
          if(fwrite(&buffer, strlen(str.c_str()), 1, arq)==1)
       //Orden de gravação 4
       if(fseek(arq, tmp_offset[i]-4, SEEK_SET)!=1) // 28 3C
         if(fwrite(&Control3, 2, 1, arq)==1)
       //Orden de gravação 5
       if(fseek(arq, 12, SEEK_SET)!=1) //D8 27
        if(fwrite(&Control2, 4, 1, arq)==1);
       //Orden de gravação 6
       if(fseek(arq, tmp_offset[i]-8, SEEK_SET)!=1) // 28 3C
         if(fwrite(&Control4, 1, 1, arq)==1)
       //Orden de gravação 7
       if(fseek(arq, 8, SEEK_SET)!=1)
        if(fwrite(&Control, 1, 1, arq)==1);
    }
  CountApplyCPKs(arq, tmp_offset, ListBox1);
  fclose(arq);
  ShowMessage("DpFileList Saved with Success!");

  if (CheckBox1->Checked)
     InIFILEConf(platformSelect(0), "FolderPath", "DpFileList_conf.ini", 2, false);
}
//--------------------------------------------------------------------------
Reply
#4

Ver. 1.0 with Hex Viewer
Download
http://www.mediafire.com/file/12kh433qtr...es2018.exe
Download Code Delphi pascal
http://www.mediafire.com/file/bm8b0qsefg...es2018.rar

[Image: 1.jpg]
image hosting
Reply


Possibly Related Threads…
Thread / Author Replies Views Last Post



Users browsing this thread: 1 Guest(s)