Advertisement
Guest User

Gamemaker

a guest
Mar 15th, 2017
92
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. case 4:
  2.                 //a = Array; p = Part; s = Small; ss = Super Small
  3.                 //aString = array into string: variable = string(array[]);
  4.                 var aString = buffer_read(Buff, buffer_string);
  5.                 var Length = string_length(aString);
  6.                
  7.                 //Start at 2 (starting bracket and ending bracket removed)
  8.                 var paString = string_copy(aString, 2, Length - 2);
  9.                
  10.                 var count = 0;
  11.                 var count2 = 0;
  12.                
  13.                 for(var i = 0; i != -1; i=i) {                
  14.                     var a = string_pos("{", paString);                      
  15.                     var b = string_pos("}", paString);
  16.                    
  17.                     if a != 0 && b != 0 {
  18.                         var spaString = string_copy(paString, a+1, b-a);
  19.                        
  20.                         count2 = 0;
  21.                         for(var j = 0; j != -1; j=j) {
  22.                             var d = string_pos(",", spaString);  
  23.                            
  24.                             if d != 0 {
  25.                                 var sspaString = string_copy(spaString, 1, d-1);
  26.                                 mapChanges[count,count2] = sspaString;
  27.                                 show_debug_message("Adding: [" + string(count) + "," + string(count2) +"] --1");
  28.                                
  29.                                 spaString = string_copy(spaString, d+1,b-a);
  30.                                 count2++;
  31.                             } else {
  32.                                 var e = string_pos("}", spaString);
  33.                                 if e != 0 {
  34.                                     sspaString = string_copy(spaString, 1, e-1);
  35.                                     mapChanges[count,count2] = sspaString;
  36.                                     show_debug_message("Adding: [" + string(count) + "," + string(count2) +"] --2");
  37.                                    
  38.                                     paString = string_copy(paString, b+2, Length - 2);
  39.                                     show_debug_message("paString: " + string(paString));
  40.                                     count++;
  41.                                     j = -1;
  42.                                 }
  43.                             }
  44.                         }
  45.                     } else {
  46.                         i = -1;
  47.                         show_debug_message("Array build up.")
  48.                     }
  49.                 }
  50.             break;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement