Advertisement
Sandsky0

shapewrite();

Sep 1st, 2014
356
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. // shapewrite();
  2.  
  3. // argument0 = number of fruit
  4. // argument1 = object
  5. // argument2 = name of text file (put quotes!!!)
  6.  
  7. file=file_text_open_write(argument2+".txt") // name of the textfile you're writing to
  8.  
  9. for(i=1; i<=argument0; i+=1){
  10. file_text_write_string(file, "dire"+string(i)+"="+string(point_direction(instance_find(argument1,i-1).x,instance_find(argument1,i-1).y,400,304)));
  11. file_text_writeln(file);
  12. file_text_write_string(file, "length"+string(i)+"="+string(point_distance(instance_find(argument1,i-1).x,instance_find(argument1,i-1).y,400,304)));
  13. file_text_writeln(file);
  14. file_text_writeln(file);
  15. }
  16.  
  17. file_text_write_string(file, "steps=1;");
  18. file_text_writeln(file);
  19. file_text_write_string(file, "frame=argument2;");
  20. file_text_writeln(file);
  21. file_text_write_string(file, "repeat("+string(i-1)+"){");
  22. file_text_writeln(file);
  23. file_text_write_string(file, "b=instance_create(argument0,argument1,argument4);");
  24. file_text_writeln(file);
  25. file_text_write_string(file, "b.direction=variable_local_get("+'"'+"dire"+'"'+"+string(steps))+argument3;");
  26. file_text_writeln(file);
  27. file_text_write_string(file, "b.speed=variable_local_get("+'"'+"length"+'"'+"+string(steps))/frame;");
  28. file_text_writeln(file);
  29. file_text_write_string(file, "steps+=1;");
  30. file_text_writeln(file);
  31. file_text_write_string(file, "}");
  32. file_text_writeln(file);
  33. file_text_writeln(file);
  34. file_text_write_string(file, "// argument0 = shape center x");
  35. file_text_writeln(file);
  36. file_text_write_string(file, "// argument1 = shape center y");
  37. file_text_writeln(file);
  38. file_text_write_string(file, "// argument2 = length objects are on screen");
  39. file_text_writeln(file);
  40. file_text_write_string(file, "// argument3 = angle");
  41. file_text_writeln(file);
  42. file_text_write_string(file, "// argument4 = object");
  43. file_text_writeln(file);
  44. file_text_writeln(file);
  45. file_text_write_string(file, "// --- IGNORE ---");
  46. file_text_writeln(file);
  47. file_text_write_string(file, "// gamemaker is broken with text writing so i have to put these here");
  48. file_text_writeln(file);
  49. file_text_write_string(file, "// this is filler space");
  50. file_text_writeln(file);
  51. file_text_write_string(file, "// gamemaker why");
  52. file_text_writeln(file);
  53. file_text_write_string(file, "// why do i have to put these here just to wrte all of the code dsfdsfds");
  54. file_text_writeln(file);
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement