Advertisement
_Zume

Load bytes

Apr 8th, 2015
259
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 1.48 KB | None | 0 0
  1. #include <a_samp>
  2. #include <YSI\y_bit>
  3.  
  4. main(){}
  5.  
  6. new
  7.     BitArray:Test<51>
  8.     ;
  9.  
  10. public OnGameModeInit()
  11. {
  12.     static const
  13.         var_name[5] = "Bit",
  14.         num_vals = 50
  15.         ;
  16.  
  17.     if(!fexist("Bits.ini"))
  18.     {
  19.         new
  20.             File:file = fopen("Bits.ini", io_write),
  21.             str[51 * 13]
  22.             ;
  23.  
  24.         for(new i; i != num_vals+1; i++)
  25.             format(str, sizeof(str), "%s%s_%d = %d\n", str, var_name, i, (random(500) % 2));
  26.  
  27.         fwrite(file, str);
  28.         fclose(file);
  29.     }
  30.     else
  31.     {
  32.         new
  33.             File:file = fopen("Bits.ini", io_read), str[32]
  34.             ;
  35.  
  36.         if (!file)
  37.             return 0;
  38.  
  39.         for(new i; i != num_vals+1; i++)
  40.             format(str, sizeof(str), "%s_%d", var_name, i), Bit_Set(Test, i, ((file_parse_int(file, str) == 1) ? (true) : (false)));
  41.  
  42.         fclose(file);
  43.  
  44.         for(new i; i < num_vals; i++)
  45.             printf("Bit[%d]: %s.", i, (Bit_Get(Test, i) ? ("ON") : ("OFF")));
  46.     }
  47.     return 1;
  48. }
  49.  
  50. stock file_parse_int(File:handle, const field[])
  51. {
  52.     static
  53.         string_val[16];
  54.  
  55.     if (!handle)
  56.         return 0;
  57.  
  58.     new
  59.         str[128],
  60.         pos = strlen(field);
  61.  
  62.     fseek(handle, 0, seek_start);
  63.  
  64.     while (fread(handle, str)) if (strfind(str, field, true) == 0 && (str[pos] == '=' || str[pos] == ' '))
  65.     {
  66.         strmid(string_val, str, (str[pos] == '=') ? (pos + 1) : (pos + 3), strlen(str), sizeof string_val);
  67.  
  68.         if ((pos = strfind(string_val, "\r")) != -1)
  69.             string_val[pos] = '\0';
  70.            
  71.         else if ((pos = strfind(string_val, "\n")) != -1)
  72.             string_val[pos] = '\0';
  73.            
  74.     }
  75.     return strval(string_val);
  76. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement