Advertisement
BigETI

Speicher- und Ladebeispiel

Feb 19th, 2015
266
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 0.86 KB | None | 0 0
  1. #define FRAKTIONSKASSEN_FILE    "Fraktionskassen.bin"
  2. bool:SaveFraktionsKassen()
  3. {
  4.     new bool:ret, File:file = fopen(FRAKTIONSKASSEN_FILE, io_write);
  5.     if(file)
  6.     {
  7.         fblockwrite(file, FraktionsKasse);
  8.         fclose(file);
  9.         ret = true;
  10.     }
  11.     else print("Die Datei \"" FRAKTIONSKASSEN_FILE "\" konnte nicht geöffnet bzw. generiert werden.");
  12.     return ret;
  13. }
  14.  
  15. bool:LoadFraktionsKassen()
  16. {
  17.     new bool:ret, len, i, File:file = fopen(FRAKTIONSKASSEN_FILE, io_read);
  18.     if(file)
  19.     {
  20.         if((len = (flength(file)/4)) >= sizeof FraktionsKasse)
  21.         {
  22.             fblockread(file, FraktionsKasse);
  23.             ret = true;
  24.         }
  25.         else if(len)
  26.         {
  27.             fblockread(file, FraktionsKasse, len);
  28.             ret = true;
  29.         }
  30.         for(i = len; i < sizeof FraktionsKasse; i++) FraktionsKasse[i] = 0;
  31.         fclose(file);
  32.     }
  33.     else print("Die Datei \"" FRAKTIONSKASSEN_FILE "\" konnte nicht geöffnet werden.");
  34.     return ret;
  35. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement